#include "GameCore.h"
#include "CommandParser.h"
#include <stdio.h>
#include <cstring>
#include <string>
#include <vector>

namespace TextGame
{
    RoomData CreateRoom(const std::string& inName, const std::string& inDescription)
    {
        RoomData room = {};
        room.Name = inName;
        room.Description = inDescription;

        return room;
    }

    ItemData CreateItem(ItemType itemType,
        int inPositionX,
        int inPositionY,
        int quantity,
        char icon,
        const std::string& name)
    {
        ItemData item = {};
        item.Type = itemType;
        item.Icon = icon;
        item.Name = name;
        item.Quantity = quantity;
        item.ItemPosition.X = inPositionX;
        item.ItemPosition.Y = inPositionY;

        return item;
    }

    void InitializeGame(PlayerState& playerState, WorldState& worldState)
    {
        printf("Welcome to...\n");
        printf("The ASCII Temple of Doom by ME!\n\n");

        playerState.WantsDescription = true;
        playerState.CurrentRoomIndex = 0;
        playerState.CurrentPosition.X = playerState.NewPosition.X = 3;
        playerState.CurrentPosition.Y = playerState.NewPosition.Y = 2;

        worldState.Rooms.clear();

        // 0
        {
            RoomData room = CreateRoom("INNER HALL", "After a long day of chasing children around in humid, 80 degree weather, the cherry on top is that you get to clean up their mess, too! What fun.\n\n\nRobin,\nPlease take care of the church and its premises after our yearly Easter event. And, if it's not too much trouble, do you mind gathering up any leftover eggs from the hunt? It seems as though there are about six missing from their bowls on the left side of the inner hall. I'll see you after my holiday in The Bahamas!\nGod bless,\nPaster Carl\n\n\nThanks, Pastor Carl. ");

            room.RoomMapWidth = 8;
            room.RoomMap =
                "###..###"
                "#8.....#"
                "#8......"
                "#8.....#"
                "###..###";
            room.RoomPosition.X = 0;
            room.RoomPosition.Y = 0;

            ItemData item = CreateItem(ItemType_EGG, 6, 1, 1, 'O', "White Egg");
            /*ItemData item = {};
            item.Type = ItemType_BOOK;
            item.Icon = 'b';
            item.Name = "Book of Cooking + 1";
            item.Quantity = 1;
            item.ItemPosition.X = 2;
            item.ItemPosition.Y = 1;*/

            room.Inventory.push_back(item);


            worldState.Rooms.push_back(room);
        }

        // 1
        {
            RoomData room = CreateRoom("ROOM NAME", "ROOM DESCRIPTION");

            room.RoomMapWidth = 10;
            room.RoomMap =
                "###...####"
                "#.....#..#"
                "#..####..#"
                "#........#"
                "##########";
            room.RoomPosition.X = 0;
            room.RoomPosition.Y = 1;

            ItemData item = CreateItem(ItemType_EGG2, 8, 1, 1, 'O', "Striped Egg");
            room.Inventory.push_back(item);
            worldState.Rooms.push_back(room);
        }

        // 2
        {
            RoomData room = CreateRoom("ROOM NAME", "ROOM DESCRIPTION");

            room.RoomMapWidth = 8;
            room.RoomMap =
                "########"
                ".#...#.#"
                "...#...#"
                "###..###";
            room.RoomPosition.X = 1;
            room.RoomPosition.Y = 0;

            ItemData item = CreateItem(ItemType_EGG3, 6, 1, 1, 'O', "Spotted Egg");
            room.Inventory.push_back(item);
            worldState.Rooms.push_back(room);
        }
        // 3
        {
            RoomData room = CreateRoom("ROOM NAME", "ROOM DESCRIPTION");

            room.RoomMapWidth = 6;
            room.RoomMap =
                "###..#"
                "##...#"
                "###..#"
                "#...##"
                "#..###"
                "#...##"
                "######";
            room.RoomPosition.X = 1;
            room.RoomPosition.Y = 1;

            ItemData item = CreateItem(ItemType_EGG4, 3, 5, 1, 'O', "Golden Egg");
            room.Inventory.push_back(item);
            worldState.Rooms.push_back(room);
        }
        // 4
        {
            RoomData room = CreateRoom("ROOM NAME", "ROOM DESCRIPTION");

            room.RoomMapWidth = 6;
            room.RoomMap =
                "######"
                "#....#"
                "#....#"
                "#....."
                "#....#"
                "#....#"
                "#....#"
                "#....#"
                "#....#"
                "##..##";
            room.RoomPosition.X = 0;
            room.RoomPosition.Y = -1;

            ItemData item = CreateItem(ItemType_EGG5, 2, 7, 1, 'O', "Crystal Egg");
            room.Inventory.push_back(item);
            worldState.Rooms.push_back(room);
        }
        // 4
        {
            RoomData room = CreateRoom("ROOM NAME", "ROOM DESCRIPTION");

            room.RoomMapWidth = 14;
            room.RoomMap =
                "##############"
                "#............#"
                "#............#"
                ".............#"
                "##############";
            room.RoomPosition.X = 0;
            room.RoomPosition.Y = -1;

            ItemData item = CreateItem(ItemType_EGG6, 7, 1, 1, 'O', "Rotten Egg");
            room.Inventory.push_back(item);
            worldState.Rooms.push_back(room);
        }
    }

    void GetInput(PlayerState& playerState, const WorldState& worldState)
    {
        playerState.WantsToExit = false;
        playerState.WantsDescription = false;
        playerState.WantsInventoryListed = false;
        playerState.WantsToGet = false;
        playerState.WinCondition = false;

        printf("What do you do?\n");
        printf("> ");
        TextAdventureCommand command = ParseAdventureCommand();

        if (command.CommandType == CommandType_QUIT)
        {
            playerState.WantsToExit = true;
        }
        else if (command.CommandType == CommandType_NORTH)
        {
            playerState.NewPosition.Y = playerState.CurrentPosition.Y - 1;
        }
        else if (command.CommandType == CommandType_SOUTH)
        {
            playerState.NewPosition.Y = playerState.CurrentPosition.Y + 1;
        }
        else if (command.CommandType == CommandType_WEST)
        {
            playerState.NewPosition.X = playerState.CurrentPosition.X - 1;
        }
        else if (command.CommandType == CommandType_EAST)
        {
            playerState.NewPosition.X = playerState.CurrentPosition.X + 1;
        }
        else if (command.CommandType == CommandType_LOOK)
        {
            playerState.WantsDescription = true;
        }
        else if (command.CommandType == CommandType_INVENTORY)
        {
            playerState.WantsInventoryListed = true;
        }
        else if (command.CommandType == CommandType_GET)
        {
            playerState.WantsToGet = true;
        }
        else if (command.CommandType == CommandType_HELP)
        {
            printf("Command List: look, quit, inventory, get, north, south, west, east\n");
            printf("Key:\n");
            printf("  @ - Player\n");
            printf("  8 - Cups\n");
            printf("  O - Egg\n");
            printf("  . - Floor\n");
            printf("  # - Wall\n");
            printf("  H - Door (Locked)\n");
        }

        if(command.CommandType == CommandType_NONE)
        {
            printf("I don't understand\n");
        }
        printf("\n");

    }

    void RenderGame(const PlayerState& playerState, const WorldState& worldState)
    {
        if (playerState.WantsDescription)
        {
            const RoomData& currRoom = worldState.Rooms[playerState.CurrentRoomIndex];
            printf("================================================\n");
            printf("LOCATION: %s\n", currRoom.Name.c_str());
            printf("%s\n\n", currRoom.Description.c_str());

            std::string mapString = "";
            unsigned int currentSpace = 0;
            while (currentSpace < currRoom.RoomMap.size())
            {
                char characterToDisplay = currRoom.RoomMap[currentSpace];

                for (unsigned int i = 0; i < currRoom.Inventory.size(); i++)
                {
                    const ItemData& itemData = currRoom.Inventory[i];
                    if (currentSpace == PositionToIndex(itemData.ItemPosition, currRoom.RoomMapWidth))
                    {
                        characterToDisplay = itemData.Icon;
                    }
                }

                if (currentSpace == PositionToIndex(playerState.CurrentPosition, currRoom.RoomMapWidth))
                {
                    characterToDisplay = '@';
                }

                mapString += characterToDisplay;

                if(currentSpace % currRoom.RoomMapWidth == (currRoom.RoomMapWidth - 1))
                {
                    mapString += '\n';
                }

                currentSpace++;
            }
            printf("%s\n", mapString.c_str());

            printf("\n");
        }
        else if (playerState.WantsInventoryListed)
        {
            printf("================================================\n");
            printf("INVENTORY:\n");

            if (playerState.Inventory.size() == 0)
            {
                printf("Not even pocket lint. Figures.\n");
            }
            else
            {
                for (unsigned int i = 0; i < playerState.Inventory.size(); i++)
                {
                    const ItemData& currItem = playerState.Inventory[i];
                    printf("%s: %d\n", currItem.Name.c_str(), currItem.Quantity);
                }
            }

            printf("\n");
        }
    }

    void UpdateGame(PlayerState& playerState, WorldState& worldState)
    {
        RoomData& currRoom = worldState.Rooms[playerState.CurrentRoomIndex];

        //Player Movement Code
        if (playerState.NewPosition != playerState.CurrentPosition)
        {
            if (IsSpaceOutsideMap(playerState.NewPosition, currRoom))
            {
                int newRoomIndex = 0;

                int playerExitType = 0;
                Position targetRoomPosition = currRoom.RoomPosition;
                if (playerState.NewPosition.X < 0)
                {
                    //Exited West
                    targetRoomPosition.X--;
                    playerExitType = 1;
                }
                else if(playerState.NewPosition.X >= (int)currRoom.RoomMapWidth)
                {
                    //Exited East
                    targetRoomPosition.X++;
                    playerExitType = 2;
                }
                else if (playerState.NewPosition.Y < 0)
                {
                    //Exited North
                    targetRoomPosition.Y--;
                    playerExitType = 3;
                }
                else if (playerState.NewPosition.Y >= (int)(currRoom.RoomMap.size() / currRoom.RoomMapWidth))
                {
                    //Exited South
                    targetRoomPosition.Y++;
                    playerExitType = 4;
                }

                bool foundNewRoom = false;
                for (unsigned int i = 0; i < worldState.Rooms.size(); ++i)
                {
                    if (worldState.Rooms[i].RoomPosition == targetRoomPosition)
                    {
                        foundNewRoom = true;
                        newRoomIndex = i;
                        break;
                    }
                }

                if (foundNewRoom)
                {
                    playerState.CurrentRoomIndex = newRoomIndex;
                    playerState.WantsDescription = true;

                    switch (playerExitType)
                    {
                    case 1:
                        playerState.CurrentPosition.X = worldState.Rooms[playerState.CurrentRoomIndex].RoomMapWidth - 1;
                        break;
                    case 2:
                        playerState.CurrentPosition.X = 0;
                        break;
                    case 3:
                        playerState.CurrentPosition.Y = (int)(worldState.Rooms[playerState.CurrentRoomIndex].RoomMap.size() / worldState.Rooms[playerState.CurrentRoomIndex].RoomMapWidth) - 1;
                        break;
                    case 4:
                        playerState.CurrentPosition.Y = 0;
                        break;
                    default:
                        break;
                    }
                }
                else
                {
                    printf("There is nothing out there for you...\n");
                    playerState.NewPosition = playerState.CurrentPosition;
                }
            }
            else if (IsSpaceOpenForMovement(playerState.NewPosition, currRoom))
            {
                playerState.CurrentPosition = playerState.NewPosition;
                playerState.WantsDescription = true;
            }
            else
            {
                printf("The path is blocked! Curses!\n");
                playerState.NewPosition = playerState.CurrentPosition;
            }
        }

        //Get Item Code
        if (playerState.WantsToGet)
        {
            for (unsigned int i = 0; i < currRoom.Inventory.size(); i++)
            {
                const ItemData& currItem = currRoom.Inventory[i];
                if (currItem.ItemPosition == playerState.CurrentPosition)
                {
                    printf("Got a %s!\n", currItem.Name.c_str());

                    bool itemInInventory = false;
                    for (unsigned int j = 0; j < playerState.Inventory.size(); i++)
                    {
                        if (playerState.Inventory[j].Type == currItem.Type)
                        {
                            playerState.Inventory[j].Quantity += currItem.Quantity;
                            itemInInventory = true;
                            break;
                        }
                    }
                    if (!itemInInventory)
                    {
                        playerState.Inventory.push_back(currItem);
                    }

                    currRoom.Inventory.erase(currRoom.Inventory.begin() + i);
                    break;
                }
            }
        }

        if (playerState.Inventory.size() == 6)
        {
            printf("You've done it! You found all six! You place the eggs back into the bowls in the inner hall. Now it's time to EXIT this church and binge watch seasons 1 through 7 of The Golden Girls. Hooray!");
        }
    }




void CleanupGame(PlayerState& playerState, WorldState& worldState)
    {
        worldState.Rooms.clear();
    }

    int PositionToIndex(const Position& position, int roomWidth)
    {
        return position.Y * roomWidth + position.X;
    }

    bool IsSpaceOutsideMap(const Position& position, const RoomData& currRoom)
    {
        return position.Y < 0 ||
            position.X < 0 ||
            position.X >= (int)currRoom.RoomMapWidth ||
            position.Y >= (int)(currRoom.RoomMap.size() / currRoom.RoomMapWidth);
    }

    bool IsSpaceOpenForMovement(const Position& position, const RoomData& currRoom)
    {
        int spaceIndex = PositionToIndex(position, currRoom.RoomMapWidth);
        char currentSpace = currRoom.RoomMap[spaceIndex];

        /*
        if(currentSpace == '.')
        {
            return true;
        }
        else
        {
            return false;
        }
        */
        return currentSpace == '.';
    }
}