package it.polimi.ingsw.gc14.Model;

import it.polimi.ingsw.gc14.Model.Cards.BuildingCard;
import it.polimi.ingsw.gc14.Model.Cards.TribeCard;
import it.polimi.ingsw.gc14.Model.Cards.TribeCards.Character;
import it.polimi.ingsw.gc14.Model.Cards.TribeCards.CharacterType;
import it.polimi.ingsw.gc14.Model.GamePackage.GameStages;
import it.polimi.ingsw.gc14.Model.Cards.TribeCards.Characters.Artist;
import it.polimi.ingsw.gc14.Model.Cards.TribeCards.Characters.Builder;
import it.polimi.ingsw.gc14.Model.Cards.TribeCards.Characters.Inventor;
import org.junit.jupiter.api.Test;
import org.junit.jupiter.api.Timeout;

import java.util.*;
import java.util.concurrent.TimeUnit;

import static org.junit.jupiter.api.Assertions.*;

@Timeout(value = 10, unit = TimeUnit.SECONDS)
class GameTest {


    private Queue<Player> completeSlotChoice(Game game) {
        Queue<Player> order = new LinkedList<>();

        for (int i = 0; i < game.getNPlayers(); i++) {
            Player current = game.getCurrentState().getCurrentPlayer();
            order.add(current);

            assertTrue(game.SlotChoiceByIndex(current, i));
        }

        assertEquals(GameStages.RES_ACTIONS, game.getCurrentState().getGameStage());

        return order;
    }

    private int firstNonEventIndex(List<TribeCard> cards) {
        for (int i = 0; i < cards.size(); i++) {
            if (!cards.get(i).IsEventCard()) {
                return i;
            }
        }

        fail("No non-event tribe card available.");
        return -1;
    }

    private int firstNonEventIndexOrMinusOne(List<TribeCard> cards) {
        for (int i = 0; i < cards.size(); i++) {
            if (!cards.get(i).IsEventCard()) {
                return i;
            }
        }

        return -1;
    }

    private void giveOptionalEffectToAllPlayers(Player... players) {
        for (Player player : players) {
            player.buildingCards.add(new BuildingCard(12, 1, 1, 1));
        }
    }

    private void resolveAllMandatoryActions(Game game) {
        while (game.getCurrentState().getGameStage() == GameStages.RES_ACTIONS) {
            resolveOneMandatoryAction(game);
        }
    }

    private void resolveOneMandatoryAction(Game game) {
        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        if (game.getCurrentState().getNLower() > 0) {
            int index = firstNonEventIndexOrMinusOne(game.getLowerListTribeCards());

            if (index != -1) {
                assertTrue(game.DrawLowerTribeCardByIndex(current, index));
                return;
            }

            if (!game.getLowerListBuilding().isEmpty()
                    && game.DrawLowerBuildingCardByIndex(current, 0)) {
                return;
            }

            assertTrue(game.SkipLowerDrawing(current));
            return;
        }

        if (game.getCurrentState().getNUpper() > 0) {
            int index = firstNonEventIndexOrMinusOne(game.getUpperListTribeCards());

            if (index != -1) {
                assertTrue(game.DrawUpperTribeCardByIndex(current, index));
                return;
            }

            if (!game.getUpperListBuilding().isEmpty()
                    && game.DrawUpperBuildingCardByIndex(current, 0)) {
                return;
            }

            assertTrue(game.SkipUpperDrawing(current));
            return;
        }

        fail(
                "Current player has no remaining draw actions.\n" +
                        "Current player: " + current + "\n" +
                        "Round: " + game.getCurrentState().getRound() + "\n" +
                        "Stage: " + game.getCurrentState().getGameStage() + "\n" +
                        "Slot: " + (game.getCurrentState().getSlot() == null
                        ? "null"
                        : game.getCurrentState().getSlot().getSlotId()) + "\n" +
                        "NLower: " + game.getCurrentState().getNLower() + "\n" +
                        "NUpper: " + game.getCurrentState().getNUpper() + "\n" +
                        "Lower tribe size: " + game.getLowerListTribeCards().size() + "\n" +
                        "Upper tribe size: " + game.getUpperListTribeCards().size() + "\n" +
                        "Lower building size: " + game.getLowerListBuilding().size() + "\n" +
                        "Upper building size: " + game.getUpperListBuilding().size() + "\n" +
                        "First lower non-event: " + firstNonEventIndexOrMinusOne(game.getLowerListTribeCards()) + "\n" +
                        "First upper non-event: " + firstNonEventIndexOrMinusOne(game.getUpperListTribeCards())
        );
    }

    private void resolveActionsUntilOptionalCardEffect(Game game) {
        while (game.getCurrentState().getGameStage() == GameStages.RES_ACTIONS) {
            resolveOneMandatoryAction(game);
        }

        assertEquals(GameStages.OPT_CARD_E, game.getCurrentState().getGameStage());
    }

    private void resolveOptionalPhaseIfPresent(Game game) {
        while (game.getCurrentState().getGameStage() == GameStages.OPT_CARD_E) {
            Player current = game.getCurrentState().getCurrentPlayer();
            assertNotNull(current);

            assertTrue(game.NoOptionalCard(current));
        }
    }

    private void playOneFullRound(Game game) {
        assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());

        completeSlotChoice(game);

        assertEquals(GameStages.RES_ACTIONS, game.getCurrentState().getGameStage());

        resolveAllMandatoryActions(game);

        resolveOptionalPhaseIfPresent(game);
    }

    private void resolveCurrentPlayerCompletely(Game game, Player expectedPlayer) {
        assertEquals(expectedPlayer, game.getCurrentState().getCurrentPlayer());

        while (game.getCurrentState().getGameStage() == GameStages.RES_ACTIONS
                && expectedPlayer.equals(game.getCurrentState().getCurrentPlayer())) {
            resolveOneMandatoryAction(game);
        }
    }

    @Test
    void constructorShouldInitializeGameCorrectly() {
        int nPlayers = 3;
        Game game = new Game(nPlayers);

        assertEquals(nPlayers, game.getNPlayers());
        assertEquals(GameStages.WAITING, game.getCurrentState().getGameStage());

        assertThrows(IllegalArgumentException.class, () -> new Game(6));
        assertThrows(IllegalArgumentException.class, () -> new Game(-1));

        game = new Game();

        assertFalse(game.addPlayer(new Player("p1")));


        assertTrue(game.setNPlayer(nPlayers));
        assertTrue(game.addPlayer(new Player("p1")));

        assertEquals(nPlayers, game.getNPlayers());
        assertEquals(GameStages.WAITING, game.getCurrentState().getGameStage());
    }

    @Test
    void getUpperListTribeCards() {
        int nPlayers = 3;
        Game game = new Game(nPlayers);
        assertEquals(nPlayers + 4, game.getUpperListTribeCards().size());
    }

    @Test
    void getUpperListBuildingCards() {
        int nPlayers = 3;
        Game game = new Game(nPlayers);
        assertEquals(2, game.getUpperListBuilding().size());
    }

    @Test
    void getLowerListBuildingCards() {
        int nPlayers = 3;
        Game game = new Game(nPlayers);
        assertEquals(0, game.getLowerListBuilding().size());
    }


    @Test
    void getLowerListTribeCards() {
        int nPlayers = 3;
        Game game = new Game(nPlayers);
        assertEquals(nPlayers + 1, game.getLowerListTribeCards().size());
    }


    @Test
    void getPlayerByUsernameShouldReturnPlayerOrNull() {
        Game game = new Game(3);

        Player p1 = new Player("p1");

        assertTrue(game.addPlayer(p1));

        assertEquals(p1, game.getPlayerByUsername("p1"));
        assertNull(game.getPlayerByUsername("ghost"));
    }

    @Test
    void setNPlayerShouldWorkOnlyIfGameWasCreatedWithZeroPlayers() {
        Game game = new Game();

        assertTrue(game.setNPlayer(3));
        assertEquals(3, game.getNPlayers());

        assertFalse(game.setNPlayer(4));
    }

    @Test
    void addPlayerShouldRejectDuplicatesAndStartSlotChoiceWhenFull() {
        Game game = new Game(3);
        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");
        Player p4 = new Player("p4");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertFalse(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());

        assertFalse(game.addPlayer(p4));
    }

    @Test
    void shouldRejectInvalidSlotChoices() {
        Game game = new Game(3);

        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        Player current = game.getCurrentState().getCurrentPlayer();

        assertFalse(game.SlotChoiceByIndex(current, -1));
        assertFalse(game.SlotChoiceByIndex(current, 999));

        Player wrongPlayer = current.equals(p1) ? p2 : p1;
        assertFalse(game.SlotChoiceByIndex(wrongPlayer, 0));

        assertTrue(game.SlotChoiceByIndex(current, 0));

        Player next = game.getCurrentState().getCurrentPlayer();
        assertFalse(game.SlotChoiceByIndex(next, 0));
    }

    @Test
    void drawingByIndex() {
        Game game = new Game(3);
        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertFalse(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        Queue<Player> players = new LinkedList<>();
        for (int i = 0; i < game.getNPlayers(); i++) {
            players.add(game.getCurrentState().getCurrentPlayer());
            assertTrue(game.SlotChoiceByIndex(game.getCurrentState().getCurrentPlayer(), i));
        }
        Player temp_player;

        temp_player = players.poll();
        assertEquals(temp_player, game.getCurrentState().getCurrentPlayer());

        int index;
        List<TribeCard> cards = game.getLowerListTribeCards();

        index = firstNonEventIndex(cards);
        assertTrue(game.DrawLowerTribeCardByIndex(temp_player, index));

        temp_player = players.poll();
        assertEquals(temp_player, game.getCurrentState().getCurrentPlayer());

        int nCards = game.getUpperListTribeCards().size();
        int countCards = 0;
        HashMap<CharacterType, Integer> nCardsByType = new HashMap<CharacterType, Integer>();
        Arrays.stream(CharacterType.values()).forEach(type -> nCardsByType.put(type, 0));
        while (game.getCurrentState().getNUpper() > 1) {
            cards = game.getUpperListTribeCards();
            index = firstNonEventIndexOrMinusOne(cards);

            if (index == -1) {
                break;
            }

            TribeCard temp_card = cards.get(index);
            assertEquals(nCards - countCards, game.getUpperListTribeCards().size());
            assertTrue(game.DrawUpperTribeCardByIndex(temp_player, index));
            drawTribeTest(nCardsByType, temp_card, temp_player);
            countCards++;
        }
        cards = game.getUpperListTribeCards();

        int eventIndex = firstEventIndexOrMinusOne(cards);
        if (eventIndex != -1) {
            assertFalse(game.DrawUpperTribeCardByIndex(temp_player, eventIndex));
        }

        assertFalse(game.getUpperListBuilding().isEmpty());

        temp_player.builders.clear();

        index = 0;
        BuildingCard selectedBuilding = game.getUpperListBuilding().get(index);
        temp_player.addFood(selectedBuilding.getPrice());

        assertTrue(game.DrawUpperBuildingCardByIndex(temp_player, index));

        int remainingTribeIndex = firstNonEventIndexOrMinusOne(game.getUpperListTribeCards());
        if (remainingTribeIndex != -1) {
            assertFalse(game.DrawUpperTribeCardByIndex(temp_player, remainingTribeIndex));
        }

        Player thirdPlayer = players.poll();
        assertNotNull(thirdPlayer);
        assertEquals(thirdPlayer, game.getCurrentState().getCurrentPlayer());

        while (game.getCurrentState().getGameStage() == GameStages.RES_ACTIONS
                && thirdPlayer.equals(game.getCurrentState().getCurrentPlayer())) {
            resolveOneMandatoryAction(game);
        }

        assertNotEquals(thirdPlayer, game.getCurrentState().getCurrentPlayer());
    }

    private void drawTribeTest(HashMap<CharacterType, Integer> nCardsByType,
                               TribeCard temp_card,
                               Player temp_player) {

        switch (((Character) temp_card).getType()) {
            case ARTIST:
                assertEquals(nCardsByType.get(((Character) temp_card).getType()) + 1, temp_player.artists.size());
                nCardsByType.merge(((Character) temp_card).getType(), 1, Integer::sum);
                break;
            case INVENTOR:
                assertEquals(nCardsByType.get(((Character) temp_card).getType()) + 1, temp_player.inventors.size());
                nCardsByType.merge(((Character) temp_card).getType(), 1, Integer::sum);
                break;
            case HUNTER:
                assertEquals(nCardsByType.get(((Character) temp_card).getType()) + 1, temp_player.hunters.size());
                nCardsByType.merge(((Character) temp_card).getType(), 1, Integer::sum);
                break;
            case SHAMAN:
                assertEquals(nCardsByType.get(((Character) temp_card).getType()) + 1, temp_player.shamans.size());
                nCardsByType.merge(((Character) temp_card).getType(), 1, Integer::sum);
                break;
            case BUILDER:
                assertEquals(nCardsByType.get(((Character) temp_card).getType()) + 1, temp_player.builders.size());
                nCardsByType.merge(((Character) temp_card).getType(), 1, Integer::sum);
                break;
            case GATHERER:
                assertEquals(nCardsByType.get(((Character) temp_card).getType()) + 1, temp_player.gatherers.size());
                nCardsByType.merge(((Character) temp_card).getType(), 1, Integer::sum);
                break;

        }
    }

    @Test
    void pickOptionalTribeCard() {
        Game game = new Game(3);

        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        giveOptionalEffectToAllPlayers(p1, p2, p3);

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        int index = firstNonEventIndex(game.getUpperListTribeCards());

        int charactersBefore = current.getTotCharacters();

        assertTrue(game.PickOptionalTribeCardByIndex(current, index));

        assertEquals(charactersBefore + 1, current.getTotCharacters());
    }

    @Test
    void pickOptionalBuildingCard() {
        Game game = new Game(3);

        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        giveOptionalEffectToAllPlayers(p1, p2, p3);

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertFalse(game.getUpperListBuilding().isEmpty());

        current.builders.clear();

        BuildingCard selectedBuilding = game.getUpperListBuilding().get(0);
        int expectedCost = selectedBuilding.getPrice();

        current.addFood(expectedCost);

        int buildingsBefore = current.buildingCards.size();
        int upperBuildingsBefore = game.getUpperListBuilding().size();
        int foodBefore = current.getFoodValue();

        assertTrue(game.PickOptionalBuildingCard(current, 0));

        assertEquals(buildingsBefore + 1, current.buildingCards.size());
        assertEquals(upperBuildingsBefore - 1, game.getUpperListBuilding().size());

        assertTrue(current.buildingCards.stream()
                .anyMatch(building ->
                        building.getPrice() == selectedBuilding.getPrice()
                                && building.getPrestigeValue() == selectedBuilding.getPrestigeValue()
                                && building.getEffectId() == selectedBuilding.getEffectId()
                ));

        assertEquals(foodBefore - expectedCost, current.getFoodValue());
    }

    @Test
    void noOptionalCard() {
        Game game = new Game(3);

        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        giveOptionalEffectToAllPlayers(p1, p2, p3);

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertTrue(game.NoOptionalCard(current));

        assertEquals(GameStages.OPT_CARD_E, game.getCurrentState().getGameStage());
        assertNotEquals(current, game.getCurrentState().getCurrentPlayer());
    }

    private List<Player> addPlayers(Game game, int nPlayers, String prefix) {
        List<Player> players = new ArrayList<>();

        for (int i = 1; i <= nPlayers; i++) {
            Player player = new Player(prefix + i);
            players.add(player);
            assertTrue(game.addPlayer(player));
        }

        return players;
    }

    private int firstEventIndexOrMinusOne(List<TribeCard> cards) {
        for (int i = 0; i < cards.size(); i++) {
            if (cards.get(i).IsEventCard()) {
                return i;
            }
        }

        return -1;
    }

    @Test
    void getCurrentPlayerNumberShouldTrackAddedPlayers() {
        Game game = new Game(3);

        assertEquals(0, game.getCurrentPlayerNumber());

        assertTrue(game.addPlayer(new Player("a")));
        assertEquals(1, game.getCurrentPlayerNumber());

        assertTrue(game.addPlayer(new Player("b")));
        assertEquals(2, game.getCurrentPlayerNumber());

        assertTrue(game.addPlayer(new Player("c")));
        assertEquals(3, game.getCurrentPlayerNumber());
    }


    @Test
    void slotChoiceByIndexShouldReturnFalseOutsideSlotChoiceStage() {
        Game game = new Game(3);

        addPlayers(game, 3, "slot_out_");

        completeSlotChoice(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertFalse(game.SlotChoiceByIndex(current, 0));
    }

    @Test
    void shouldRejectInvalidDrawRequests() {
        Game game = new Game(3);

        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertFalse(game.DrawLowerTribeCardByIndex(current, 0));
        assertFalse(game.DrawUpperTribeCardByIndex(current, 0));
        assertFalse(game.DrawUpperBuildingCardByIndex(current, 0));
        assertFalse(game.DrawLowerBuildingCardByIndex(current, 0));

        completeSlotChoice(game);

        current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        Player wrongPlayer = current.equals(p1) ? p2 : p1;

        assertFalse(game.DrawLowerTribeCardByIndex(current, -1));
        assertFalse(game.DrawLowerTribeCardByIndex(current, 999));

        assertFalse(game.DrawUpperTribeCardByIndex(current, -1));
        assertFalse(game.DrawUpperTribeCardByIndex(current, 999));

        assertFalse(game.DrawUpperBuildingCardByIndex(current, -1));
        assertFalse(game.DrawUpperBuildingCardByIndex(current, 999));

        assertFalse(game.DrawLowerBuildingCardByIndex(current, -1));
        assertFalse(game.DrawLowerBuildingCardByIndex(current, 999));

        int lowerIndex = firstNonEventIndexOrMinusOne(game.getLowerListTribeCards());
        if (lowerIndex != -1) {
            assertFalse(game.DrawLowerTribeCardByIndex(wrongPlayer, lowerIndex));
        }

        int upperIndex = firstNonEventIndexOrMinusOne(game.getUpperListTribeCards());
        if (upperIndex != -1) {
            assertFalse(game.DrawUpperTribeCardByIndex(wrongPlayer, upperIndex));
        }

        if (!game.getUpperListBuilding().isEmpty()) {
            assertFalse(game.DrawUpperBuildingCardByIndex(wrongPlayer, 0));
        }
    }


    @Test
    void optionalMethodsShouldReturnFalseOutsideOptionalState() {
        Game game = new Game(3);

        addPlayers(game, 3, "optional_out_");

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertFalse(game.PickOptionalTribeCardByIndex(current, 0));
        assertFalse(game.PickOptionalBuildingCard(current, 0));
        assertFalse(game.NoOptionalCard(current));
    }

    @Test
    void optionalMethodsShouldRejectWrongPlayerAndInvalidIndexes() {
        Game game = new Game(3);

        List<Player> players = addPlayers(game, 3, "optional_invalid_");

        giveOptionalEffectToAllPlayers(players.get(0), players.get(1), players.get(2));

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        Player wrongPlayer = current.equals(players.get(0)) ? players.get(1) : players.get(0);

        assertFalse(game.PickOptionalTribeCardByIndex(wrongPlayer, 0));
        assertFalse(game.PickOptionalBuildingCard(wrongPlayer, 0));
        assertFalse(game.NoOptionalCard(wrongPlayer));

        assertFalse(game.PickOptionalTribeCardByIndex(current, -1));
        assertFalse(game.PickOptionalTribeCardByIndex(current, 999));

        assertFalse(game.PickOptionalBuildingCard(current, -1));
        assertFalse(game.PickOptionalBuildingCard(current, 999));

    }

    @Test
    @Timeout(value = 2, unit = TimeUnit.SECONDS)
    void shouldNotCrashWhenNoPlayerHasOptionalEffect() {
        Game game = new Game(3);

        addPlayers(game, 3, "no_optional_");

        completeSlotChoice(game);

        assertDoesNotThrow(() -> resolveAllMandatoryActions(game));

        assertNotEquals(GameStages.OPT_CARD_E, game.getCurrentState().getGameStage());
    }


    @Test
    void constructorShouldRejectOnePlayerGame() {
        assertThrows(IllegalArgumentException.class, () -> new Game(1));
    }

    @Test
    void setNPlayerShouldAllowCompleteGameSetup() {
        Game game = new Game();

        assertTrue(game.setNPlayer(3));

        assertTrue(game.addPlayer(new Player("p1")));
        assertTrue(game.addPlayer(new Player("p2")));
        assertTrue(game.addPlayer(new Player("p3")));

        assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertTrue(game.SlotChoiceByIndex(current, 0));
    }

    @Test
    @Timeout(value = 20, unit = TimeUnit.SECONDS)
    void shouldCompleteFullGameThroughRealFlow() {
        for (int nPlayers : new int[]{2, 3, 4, 5}) {
            Game game = new Game(nPlayers);

            for (int i = 1; i <= nPlayers; i++) {
                assertTrue(game.addPlayer(new Player("p" + nPlayers + "_" + i)));
            }

            assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());
            assertEquals(1, game.getCurrentState().getRound());
            assertNotNull(game.getCurrentState().getCurrentPlayer());

            for (int expectedRound = 1; expectedRound < 10; expectedRound++) {
                assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());
                assertEquals(expectedRound, game.getCurrentState().getRound());

                playOneFullRound(game);

                assertEquals(
                        GameStages.SLOT_CHOICE,
                        game.getCurrentState().getGameStage(),
                        "After round " + expectedRound + ", the game should return to SLOT_CHOICE."
                );

                assertEquals(
                        expectedRound + 1,
                        game.getCurrentState().getRound(),
                        "The round should increase after completing round " + expectedRound + "."
                );

                assertNotNull(game.getCurrentState().getCurrentPlayer());
            }

            assertEquals(10, game.getCurrentState().getRound());
            assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());

            playOneFullRound(game);

            assertEquals(
                    GameStages.ENDED,
                    game.getCurrentState().getGameStage(),
                    "The game should end after completing round 10 with " + nPlayers + " players."
            );

            assertEquals(
                    10,
                    game.getCurrentState().getRound(),
                    "The game should end at round 10 with " + nPlayers + " players."
            );
        }
    }

    @Test
    void setNPlayerShouldRejectInvalidPlayerCounts() {
        assertFalse(new Game().setNPlayer(-1));
        assertFalse(new Game().setNPlayer(1));
        assertFalse(new Game().setNPlayer(6));
    }

    @Test
    void addPlayerShouldRejectDifferentPlayerWithSameUsername() {
        Game game = new Game(3);

        assertTrue(game.addPlayer(new Player("same_name")));
        assertFalse(game.addPlayer(new Player("same_name")));
    }

    @Test
    @Timeout(value = 2, unit = TimeUnit.SECONDS)
    void roundShouldAdvanceAfterOnlyOptionalPlayerSkipsOptionalCard() {
        Game game = new Game(3);

        List<Player> players = addPlayers(game, 3, "single_optional_");

        players.get(0).buildingCards.add(new BuildingCard(12, 1, 1, 1));

        int roundBefore = game.getCurrentState().getRound();

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        assertTrue(game.NoOptionalCard(current));

        assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());
        assertEquals(roundBefore + 1, game.getCurrentState().getRound());
        assertNotNull(game.getCurrentState().getCurrentPlayer());
    }

    @Test
    @Timeout(value = 2, unit = TimeUnit.SECONDS)
    void roundShouldAdvanceAfterAllOptionalPlayersSkipOptionalCard() {
        Game game = new Game(3);

        Player p1 = new Player("p1");
        Player p2 = new Player("p2");
        Player p3 = new Player("p3");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));

        giveOptionalEffectToAllPlayers(p1, p2, p3);

        int roundBefore = game.getCurrentState().getRound();

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        resolveOptionalPhaseIfPresent(game);

        assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());
        assertEquals(roundBefore + 1, game.getCurrentState().getRound());
        assertNotNull(game.getCurrentState().getCurrentPlayer());
    }

    @Test
    void pickOptionalBuildingCardShouldReturnFalseIfPlayerCannotPay() {
        Game game = new Game(3);
        List<Player> players = addPlayers(game, 3, "no_food_");

        giveOptionalEffectToAllPlayers(players.get(0), players.get(1), players.get(2));

        completeSlotChoice(game);
        resolveActionsUntilOptionalCardEffect(game);

        Player current = game.getCurrentState().getCurrentPlayer();
        assertNotNull(current);

        while (current.getFoodValue() > 0) {
            assertTrue(current.removeFood(1));
        }

        current.builders.clear();

        assertEquals(0, current.getFoodValue());

        assertFalse(
                game.getUpperListBuilding().isEmpty(),
                "There must be at least one upper building card to test that the player cannot buy it."
        );

        assertFalse(game.PickOptionalBuildingCard(current, 0));
    }

    @Test
    void toStringModel() {
        Game game=new Game(5);
        Player p1=new Player("p1");
        Player p2=new Player("p2");
        Player p3=new Player("p3");
        Player p4=new Player("p4");
        Player p5=new Player("p5");

        assertTrue(game.addPlayer(p1));
        assertTrue(game.addPlayer(p2));
        assertTrue(game.addPlayer(p3));
        assertTrue(game.addPlayer(p4));
        assertTrue(game.addPlayer(p5));

        Queue<Player>players=new LinkedList<>();
        for (int i = 0; i < game.getNPlayers(); i++) {
            players.add(game.getCurrentState().getCurrentPlayer());
            assertTrue(game.SlotChoiceByIndex(game.getCurrentState().getCurrentPlayer(), i));
        }

        String result = game.toString();

        assertNotNull(result);
        assertFalse(result.isBlank());
        assertTrue(result.contains("CURRENT STATE"));
    }

    @Test
    @Timeout(value = 5, unit = TimeUnit.SECONDS)
    void shouldDrawLowerBuildingWhenAvailableAndPlayerCanPay() {
        Game game = new Game(3);

        addPlayers(game, 3, "lower_building_");

        for (int safety = 0; safety < 300; safety++) {

            if (game.getCurrentState().getGameStage() == GameStages.SLOT_CHOICE) {
                completeSlotChoice(game);
            }

            if (game.getCurrentState().getGameStage() == GameStages.RES_ACTIONS) {
                Player current = game.getCurrentState().getCurrentPlayer();
                assertNotNull(current);

                if (game.getCurrentState().getNLower() > 0
                        && !game.getLowerListBuilding().isEmpty()) {

                    current.builders.clear();

                    BuildingCard selectedBuilding = game.getLowerListBuilding().get(0);
                    int expectedCost = selectedBuilding.getPrice();

                    current.addFood(expectedCost);

                    int buildingsBefore = current.buildingCards.size();
                    int lowerBuildingsBefore = game.getLowerListBuilding().size();
                    int foodBefore = current.getFoodValue();

                    assertTrue(
                            game.DrawLowerBuildingCardByIndex(current, 0),
                            "DrawLowerBuildingCardByIndex should return true when lower building exists, player can draw lower, and player has food."
                    );

                    assertEquals(buildingsBefore + 1, current.buildingCards.size());
                    assertEquals(lowerBuildingsBefore - 1, game.getLowerListBuilding().size());
                    assertTrue(current.buildingCards.stream()
                            .anyMatch(building ->
                                    building.getPrice() == selectedBuilding.getPrice()
                                            && building.getPrestigeValue() == selectedBuilding.getPrestigeValue()
                                            && building.getEffectId() == selectedBuilding.getEffectId()
                            ));
                    assertTrue(
                            current.getFoodValue() >= foodBefore - expectedCost,
                            "After buying the building, food should not be lower than the price paid because later effects may add food."
                    );
                    return;
                }

                resolveOneMandatoryAction(game);
            }

            if (game.getCurrentState().getGameStage() == GameStages.OPT_CARD_E) {
                resolveOptionalPhaseIfPresent(game);
            }

            if (game.getCurrentState().getGameStage() == GameStages.ENDED) {
                break;
            }
        }

        fail("The test never reached a state with NLower > 0 and at least one lower building.");
    }

    @Test
    void drawBuildingShouldReturnFalseIfPlayerCannotPay() {
        Game game = new Game(3);
        addPlayers(game, 3, "no_food_building_");

        completeSlotChoice(game);

        while (game.getCurrentState().getGameStage() == GameStages.RES_ACTIONS) {
            Player current = game.getCurrentState().getCurrentPlayer();

            if (game.getCurrentState().getNUpper() > 0
                    && !game.getUpperListBuilding().isEmpty()) {

                while (current.getFoodValue() > 0) {
                    assertTrue(current.removeFood(1));
                }

                current.builders.clear();

                assertEquals(0, current.getFoodValue());

                assertFalse(game.DrawUpperBuildingCardByIndex(current, 0));
                return;
            }

            resolveOneMandatoryAction(game);
        }

        fail("No upper building draw state reached.");
    }

    @Test
    void shouldResolvePlayersAccordingToSlotOrder() {
        Game game = new Game(3);
        addPlayers(game, 3, "slot_order_");

        Player firstChooser = game.getCurrentState().getCurrentPlayer();
        assertTrue(game.SlotChoiceByIndex(firstChooser, 2));

        Player secondChooser = game.getCurrentState().getCurrentPlayer();
        assertTrue(game.SlotChoiceByIndex(secondChooser, 0));

        Player thirdChooser = game.getCurrentState().getCurrentPlayer();
        assertTrue(game.SlotChoiceByIndex(thirdChooser, 1));

        assertEquals(GameStages.RES_ACTIONS, game.getCurrentState().getGameStage());

        assertEquals(secondChooser, game.getCurrentState().getCurrentPlayer());

        resolveCurrentPlayerCompletely(game, secondChooser);

        assertEquals(thirdChooser, game.getCurrentState().getCurrentPlayer());

        resolveCurrentPlayerCompletely(game, thirdChooser);

        assertEquals(firstChooser, game.getCurrentState().getCurrentPlayer());
    }

    @Test
    @Timeout(value = 20, unit = TimeUnit.SECONDS)
    void endGameShouldNotCrashWhenTriggeredAfterRoundTen() {
        Game game = new Game(3);

        List<Player> players = addPlayers(game, 3, "end_game_");

        giveOptionalEffectToAllPlayers(players.get(0), players.get(1), players.get(2));

        while (game.getCurrentState().getRound() < 10) {
            playOneFullRound(game);
        }

        assertEquals(10, game.getCurrentState().getRound());
        assertEquals(GameStages.SLOT_CHOICE, game.getCurrentState().getGameStage());

        completeSlotChoice(game);
        resolveAllMandatoryActions(game);

        assertEquals(GameStages.OPT_CARD_E, game.getCurrentState().getGameStage());

        assertDoesNotThrow(() -> resolveOptionalPhaseIfPresent(game));

        assertEquals(GameStages.ENDED, game.getCurrentState().getGameStage());
    }

    @Test
    @Timeout(value = 20, unit = TimeUnit.SECONDS)
    void endGameShouldAddBuildingPrestigeValues() {
        Game game = new Game(3);

        List<Player> players = addPlayers(game, 3, "building_prestige_");

        giveOptionalEffectToAllPlayers(players.get(0), players.get(1), players.get(2));

        while (game.getCurrentState().getRound() < 10) {
            playOneFullRound(game);
        }

        completeSlotChoice(game);
        resolveAllMandatoryActions(game);

        assertEquals(GameStages.OPT_CARD_E, game.getCurrentState().getGameStage());

        Player player = players.get(0);

        int prestigeBefore = player.getPrestigeValue();

        player.buildingCards.add(new BuildingCard(12, 1, 1, 7));
        player.buildingCards.add(new BuildingCard(12, 1, 1, 5));

        int expectedMinimumIncrease = 7 + 5;

        resolveOptionalPhaseIfPresent(game);

        assertEquals(GameStages.ENDED, game.getCurrentState().getGameStage());

        assertTrue(
                player.getPrestigeValue() >= prestigeBefore + expectedMinimumIncrease,
                "Final scoring should add at least the prestige values of the two added building cards."
        );
    }

    @Test
    @Timeout(value = 20, unit = TimeUnit.SECONDS)
    void endGameShouldApplyFinalCharacterPrestigeBonuses() {
        Game game = new Game(3);

        List<Player> players = addPlayers(game, 3, "final_characters_");
        giveOptionalEffectToAllPlayers(players.get(0), players.get(1), players.get(2));

        while (game.getCurrentState().getRound() < 10) {
            playOneFullRound(game);
        }

        completeSlotChoice(game);
        resolveAllMandatoryActions(game);

        assertEquals(GameStages.OPT_CARD_E, game.getCurrentState().getGameStage());

        Player player = players.get(0);
        assertNotNull(player);

        int prestigeBefore = player.getPrestigeValue();

        player.builders.add(new Builder(1, 0, 4));

        player.inventors.add(new Inventor(1, 0));
        player.inventors.add(new Inventor(1, 1));

        player.artists.add(new Artist(1));
        player.artists.add(new Artist(1));

        int expectedMinimumIncrease = 4 + 4 + 10;

        resolveOptionalPhaseIfPresent(game);

        assertEquals(GameStages.ENDED, game.getCurrentState().getGameStage());

        assertTrue(
                player.getPrestigeValue() >= prestigeBefore + expectedMinimumIncrease,
                "Final scoring should add at least builder prestige, inventor bonus, and artist pair bonus."
        );
    }

}