Merge pull request #1793 from OWASP/fix-trump

#1350: Make sure the trump suits trumps

Author: sydseter

copi.owasp.org/lib/copi/cornucopia.ex

@@ -335,6 +335,7 @@ defmodule Copi.Cornucopia do
     Enum.reduce(game.players, [], fn player, cards -> (player.dealt_cards |> played_cards) ++ cards end) # Combine all played cards from all players
       |> lead_suit_cards # Filter to just the lead suit cards
       |> scoring_cards(Enum.count(game.players)) # Filter to just the cards that scored
+      |> special_lead_cards # Filter to just the special lead cards (jokers, trump cards, or lead suit cards)
       |> Enum.group_by(fn card -> card.played_in_round end) # Convert to map where {round, [scoring_cards]}
       |> Enum.flat_map(fn {_, cards} -> highest_card(cards) end) # Back to a list of just the highest scoring card in each round
   end
@@ -357,6 +358,34 @@ defmodule Copi.Cornucopia do
       |> elem(1)
   end
 
+  defp special_lead_cards(ordered_played_cards) do
+    jokers = Enum.filter(ordered_played_cards, fn card ->
+      card.card.value in ["JokerA", "JokerB"]
+    end)
+
+    if jokers != [] do
+      jokers
+    else
+      trumps = Enum.filter(ordered_played_cards, fn card ->
+        cat = String.upcase(card.card.category)
+        cat in ["CORNUCOPIA", "DATASET RISK", "ELEVATION OF PRIVILEGE"]
+      end)
+
+      if trumps != [] do
+        trumps
+      else
+        case List.first(ordered_played_cards) do
+        nil -> []
+        first_card ->
+          lead_suit = first_card.card.category
+          Enum.filter(ordered_played_cards, fn card ->
+            card.card.category == lead_suit
+          end)
+      end
+      end
+    end
+end
+
   def unplayed_cards(cards) do
     Enum.filter(cards, fn card -> card.played_in_round == nil end)
   end