using System;
using System.Collections.Generic;
using System.Linq;
using Microsoft.Xna.Framework;
using Microsoft.Xna.Framework.Graphics;
using Microsoft.Xna.Framework.Input;
using Barotrauma.Networking;
using Barotrauma.Items.Components;
using System.Text;
using FarseerPhysics;

namespace Barotrauma
{
    struct ColoredText
    {
        public string Text;
        public Color Color;

        public readonly string Time;

        public ColoredText(string text, Color color)
        {
            this.Text = text;
            this.Color = color;

            Time = DateTime.Now.ToString();
        }
    }

    static partial class DebugConsole
    {
        const int MaxMessages = 20000;

        public static List<ColoredText> Messages = new List<ColoredText>();

        public static void ExecuteCommand(string command, GameMain game)
        {
            if (string.IsNullOrWhiteSpace(command)) return;
            string[] commands = command.Split(' ');
            
            if (!commands[0].ToLowerInvariant().Equals("admin"))
            {
                NewMessage(command, Color.White);
            }

#if !DEBUG
#if CLIENT
            if (GameMain.Client != null && !IsCommandPermitted(commands[0].ToLowerInvariant(), GameMain.Client))
            {
                ThrowError("You're not permitted to use the command \"" + commands[0].ToLowerInvariant()+"\"!");
                return;
            }
#endif
#endif

            switch (commands[0].ToLowerInvariant())
            {
                case "entitylist":
                    System.IO.StreamWriter sw = new System.IO.StreamWriter("ENTLIST "+Rand.Int(20000).ToString()+".TXT");

                    List<Entity> entList = Entity.GetEntityList();
                    foreach (Entity ent in entList)
                    {
                        sw.WriteLine(ent.ID.ToString()+" "+ent.ToString());
                    }

                    sw.Close();
                    break;
                case "help":
                    NewMessage("menu: go to main menu", Color.Cyan);
                    NewMessage("game: enter the \"game screen\"", Color.Cyan);
                    NewMessage("edit: switch to submarine editor", Color.Cyan);
                    NewMessage("edit [submarine name]: load a submarine and switch to submarine editor", Color.Cyan);
                    NewMessage("load [submarine name]: load a submarine", Color.Cyan);
                    NewMessage("save [submarine name]: save the current submarine using the specified name", Color.Cyan);

                    NewMessage(" ", Color.Cyan);                    

                    NewMessage("spawn [creaturename] [near/inside/outside]: spawn a creature at a random spawnpoint (use the second parameter to only select spawnpoints near/inside/outside the submarine)", Color.Cyan);
                    NewMessage("spawnitem [itemname] [cursor/inventory]: spawn an item at the position of the cursor, in the inventory of the controlled character or at a random spawnpoint if the last parameter is omitted", Color.Cyan);

                    NewMessage(" ", Color.Cyan);

                    NewMessage("lights: disable lighting", Color.Cyan);
                    NewMessage("los: disable the line of sight effect", Color.Cyan);
                    NewMessage("freecam: detach the camera from the controlled character", Color.Cyan);
                    NewMessage("control [character name]: start controlling the specified character", Color.Cyan);

                    NewMessage(" ", Color.Cyan);

                    NewMessage("water: allows adding water into rooms or removing it by holding the left/right mouse buttons", Color.Cyan);
                    NewMessage("fire: allows putting up fires by left clicking", Color.Cyan);

                    NewMessage(" ", Color.Cyan);

                    NewMessage("teleport: teleport the controlled character to the position of the cursor", Color.Cyan);
                    NewMessage("teleport [character name]: teleport the specified character to the position of the cursor", Color.Cyan);
                    NewMessage("heal: restore the controlled character to full health", Color.Cyan);
                    NewMessage("heal [character name]: restore the specified character to full health", Color.Cyan);
                    NewMessage("revive: bring the controlled character back from the dead", Color.Cyan);
                    NewMessage("revive [character name]: bring the specified character back from the dead", Color.Cyan);
                    NewMessage("killmonsters: immediately kills all AI-controlled enemies in the level", Color.Cyan);

                    NewMessage(" ", Color.Cyan);
                    
                    NewMessage("fixwalls: fixes all the walls", Color.Cyan);
                    NewMessage("fixitems: fixes every item/device in the sub", Color.Cyan);
                    NewMessage("oxygen: replenishes the oxygen in every room to 100%", Color.Cyan);
                    NewMessage("power [amount]: immediately sets the temperature of the reactor to the specified value", Color.Cyan);

                    NewMessage(" ", Color.Cyan);

                    NewMessage("kick [name]: kick a player out from the server", Color.Cyan);
                    NewMessage("ban [name]: kick and ban the player from the server", Color.Cyan);
                    NewMessage("banip [IP address]: ban the IP address from the server", Color.Cyan);
                    NewMessage("debugdraw: toggles the \"debug draw mode\"", Color.Cyan);
                    NewMessage("netstats: toggles the visibility of the network statistics panel", Color.Cyan);
                    
                    break;
                case "createfilelist":
                    UpdaterUtil.SaveFileList("filelist.xml");
                    break;
                case "spawn":
                case "spawncharacter":
                    if (commands.Length == 1) return;

                    Character spawnedCharacter = null;

                    Vector2 spawnPosition = Vector2.Zero;
                    WayPoint spawnPoint = null;

                    if (commands.Length > 2)
                    {
                        switch (commands[2].ToLowerInvariant())
                        {
                            case "inside":
                                spawnPoint = WayPoint.GetRandom(SpawnType.Human, null, Submarine.MainSub);
                                break;
                            case "outside":
                                spawnPoint = WayPoint.GetRandom(SpawnType.Enemy);
                                break;
                            case "near":
                            case "close":
                                float closestDist = -1.0f;
                                foreach (WayPoint wp in WayPoint.WayPointList)
                                {
                                    if (wp.Submarine != null) continue;

                                    //don't spawn inside hulls
                                    if (Hull.FindHull(wp.WorldPosition, null) != null) continue;

                                    float dist = Vector2.Distance(wp.WorldPosition, GameMain.GameScreen.Cam.WorldViewCenter);

                                    if (closestDist < 0.0f || dist < closestDist)
                                    {
                                        spawnPoint = wp;
                                        closestDist = dist;
                                    }
                                }
                                break;
                            case "cursor":
                                spawnPosition = GameMain.GameScreen.Cam.ScreenToWorld(PlayerInput.MousePosition);
                                break;
                            default:
                                spawnPoint = WayPoint.GetRandom(commands[1].ToLowerInvariant() == "human" ? SpawnType.Human : SpawnType.Enemy);
                                break;
                        }
                    }
                    else
                    {
                        spawnPoint = WayPoint.GetRandom(commands[1].ToLowerInvariant() == "human" ? SpawnType.Human : SpawnType.Enemy);
                    }

                    if (string.IsNullOrWhiteSpace(commands[1])) return;

                    if (spawnPoint != null) spawnPosition = spawnPoint.WorldPosition;

                    if (commands[1].ToLowerInvariant()=="human")
                    {
                        spawnedCharacter = Character.Create(Character.HumanConfigFile, spawnPosition);

#if CLIENT
                        if (GameMain.GameSession != null)
                        {
                            SinglePlayerMode mode = GameMain.GameSession.gameMode as SinglePlayerMode;
                            if (mode != null)
                            {
                                Character.Controlled = spawnedCharacter;
                                GameMain.GameSession.CrewManager.AddCharacter(Character.Controlled);
                                GameMain.GameSession.CrewManager.SelectCharacter(null, Character.Controlled);
                            }
                        }
#endif
                    }
                    else
                    {
                        spawnedCharacter = Character.Create(
                            "Content/Characters/" 
                            + commands[1].First().ToString().ToUpper() + commands[1].Substring(1) 
                            + "/" + commands[1].ToLower() + ".xml", spawnPosition);
                    }

                    break;
                case "spawnitem":
                    if (commands.Length < 2) return;
                    
                    Vector2? spawnPos = null;
                    Inventory spawnInventory = null;

                    int extraParams = 0;
                    switch (commands.Last())
                    {
                        case "cursor":
                            extraParams = 1;
                            spawnPos = GameMain.GameScreen.Cam.ScreenToWorld(PlayerInput.MousePosition);
                            break;
                        case "inventory":
                            extraParams = 1;
                            spawnInventory = Character.Controlled == null ? null : Character.Controlled.Inventory;
                            break;
                        default:
                            extraParams = 0;
                            break;
                    }

                    string itemName = string.Join(" ", commands.Skip(1).Take(commands.Length - extraParams - 1)).ToLowerInvariant();

                    var itemPrefab = MapEntityPrefab.list.Find(ip => ip.Name.ToLowerInvariant() == itemName) as ItemPrefab;
                    if (itemPrefab == null)
                    {
                        ThrowError("Item \""+itemName+"\" not found!");
                        return;
                    }

                    if (spawnPos == null && spawnInventory == null)
                    {
                        var wp = WayPoint.GetRandom(SpawnType.Human, null, Submarine.MainSub);
                        spawnPos = wp == null ? Vector2.Zero : wp.WorldPosition;
                    }

                    if (spawnPos != null)
                    {
                        Item.Spawner.AddToSpawnQueue(itemPrefab, (Vector2)spawnPos);

                    }
                    else if (spawnInventory != null)
                    {
                        Item.Spawner.AddToSpawnQueue(itemPrefab, spawnInventory);
                    }

                    break;
                case "disablecrewai":
                    HumanAIController.DisableCrewAI = !HumanAIController.DisableCrewAI;
                    break;
                case "enablecrewai":
                    HumanAIController.DisableCrewAI = false;
                    break;
                /*case "admin":
                    if (commands.Length < 2) break;

                    if (GameMain.Server != null)
                    {
                        GameMain.Server.AdminAuthPass = commands[1];

                    }
                    else if (GameMain.Client != null)
                    {
                        GameMain.Client.RequestAdminAuth(commands[1]);
                    }
                    break;*/
                case "kick":
                    if (GameMain.NetworkMember == null || commands.Length < 2) break;
                    GameMain.NetworkMember.KickPlayer(string.Join(" ", commands.Skip(1)), false);

                    break;
                case "ban":
                    if (GameMain.NetworkMember == null || commands.Length < 2) break;
                    GameMain.NetworkMember.KickPlayer(string.Join(" ", commands.Skip(1)), true);
               
                    break;
                case "banip":
                    {
                        if (GameMain.Server == null || commands.Length < 2) break;

                        var client = GameMain.Server.ConnectedClients.Find(c => c.Connection.RemoteEndPoint.Address.ToString() == commands[1]);
                        if (client == null)
                        {
                            GameMain.Server.BanList.BanPlayer("Unnamed", commands[1]);
                        }
                        else
                        {
                            GameMain.Server.KickClient(client, true);   
                        }
                    }               
                    break;
                case "teleportcharacter":
                case "teleport":
                    var tpCharacter = FindMatchingCharacter(commands, false);

                    if (commands.Length < 2)
                    {
                        tpCharacter = Character.Controlled;
                    }

                    if (tpCharacter != null)
                    {
                        var cam = GameMain.GameScreen.Cam;
                        tpCharacter.AnimController.CurrentHull = null;
                        tpCharacter.Submarine = null;
                        tpCharacter.AnimController.SetPosition(ConvertUnits.ToSimUnits(cam.ScreenToWorld(PlayerInput.MousePosition)));
                        tpCharacter.AnimController.FindHull(cam.ScreenToWorld(PlayerInput.MousePosition), true);
                    }
                    break;
                case "godmode":
                    if (Submarine.MainSub == null) return;

                    Submarine.MainSub.GodMode = !Submarine.MainSub.GodMode;
                    break;
                case "lockx":
                    Submarine.LockX = !Submarine.LockX;
                    break;
                case "locky":
                    Submarine.LockY = !Submarine.LockY;
                    break;
                case "dumpids":
                    try
                    {
                        int count = commands.Length < 2 ? 10 : int.Parse(commands[1]);
                        Entity.DumpIds(count);
                    }
                    catch
                    {
                        return;
                    }
                    break;
                case "heal":
                    Character healedCharacter = null;
                    if (commands.Length == 1)
                    {
                        healedCharacter = Character.Controlled;
                    }
                    else
                    {
                        healedCharacter = FindMatchingCharacter(commands);
                    }

                    if (healedCharacter != null)
                    {
                        healedCharacter.AddDamage(CauseOfDeath.Damage, -healedCharacter.MaxHealth, null);
                        healedCharacter.Oxygen = 100.0f;
                        healedCharacter.Bleeding = 0.0f;
                        healedCharacter.Stun = 0.0f;
                    }

                    break;
                case "revive":
                    Character revivedCharacter = null;
                    if (commands.Length == 1)
                    {
                        revivedCharacter = Character.Controlled;
                    }
                    else
                    {
                        revivedCharacter = FindMatchingCharacter(commands);
                    }

                    if (revivedCharacter != null)
                    {
                        revivedCharacter.Revive(false);
                        if (GameMain.Server != null)
                        {
                            foreach (Client c in GameMain.Server.ConnectedClients)
                            {
                                if (c.Character != revivedCharacter) continue;
                                //clients stop controlling the character when it dies, force control back
                                GameMain.Server.SetClientCharacter(c, revivedCharacter);
                                break;
                            }
                        }
                    }
                    break;
                case "freeze":
                    if (Character.Controlled != null) Character.Controlled.AnimController.Frozen = !Character.Controlled.AnimController.Frozen;
                    break;
                case "freecamera":
                case "freecam":
                    Character.Controlled = null;
                    GameMain.GameScreen.Cam.TargetPos = Vector2.Zero;
                    break;
                case "editwater":
                case "water":
                    if (GameMain.Client == null) Hull.EditWater = !Hull.EditWater;
                    
                    break;
                case "fire":
                    if (GameMain.Client == null) Hull.EditFire = !Hull.EditFire;
                    
                    break;
                case "fixitems":
                    foreach (Item it in Item.ItemList)
                    {
                        it.Condition = 100.0f;
                    }
                    break;
                case "fixhull":
                case "fixwalls":
                    foreach (Structure w in Structure.WallList)
                    {
                        for (int i = 0 ; i < w.SectionCount; i++)
                        {
                            w.AddDamage(i, -100000.0f);
                        }
                    }
                    break;
                case "power":
                    Item reactorItem = Item.ItemList.Find(i => i.GetComponent<Reactor>() != null);
                    if (reactorItem == null) return;

                    float power = 5000.0f;
                    if (commands.Length>1) float.TryParse(commands[1], out power);

                    var reactor = reactorItem.GetComponent<Reactor>();
                    reactor.ShutDownTemp = power == 0 ? 0 : 7000.0f;
                    reactor.AutoTemp = true;
                    reactor.Temperature = power;

                    if (GameMain.Server != null)
                    {
                        reactorItem.CreateServerEvent(reactor);
                    }
                    break;
                case "oxygen":
                case "air":
                    foreach (Hull hull in Hull.hullList)
                    {
                        hull.OxygenPercentage = 100.0f;
                    }
                    break;
                
                case "killmonsters":
                    foreach (Character c in Character.CharacterList)
                    {
                        if (!(c.AIController is EnemyAIController)) continue;
                        c.AddDamage(CauseOfDeath.Damage, 10000.0f, null);
                    }
                    break;
                case "netstats":
                    if (GameMain.Server == null) return;

                    GameMain.Server.ShowNetStats = !GameMain.Server.ShowNetStats;
                    break;

                default:
                    if (!ExecProjSpecific(commands)) NewMessage("Command not found", Color.Red);
                    break;
            }
        }
        
        private static Character FindMatchingCharacter(string[] commands, bool ignoreRemotePlayers = false)
        {
            if (commands.Length < 2) return null;

            int characterIndex;
            string characterName;
            if (int.TryParse(commands.Last(), out characterIndex) && commands.Length > 2)
            {
                characterName = string.Join(" ", commands.Skip(1).Take(commands.Length - 2)).ToLowerInvariant();
            }
            else
            {
                characterName = string.Join(" ", commands.Skip(1)).ToLowerInvariant();
                characterIndex = -1;
            }

            var matchingCharacters = Character.CharacterList.FindAll(c => (!ignoreRemotePlayers || !c.IsRemotePlayer) && c.Name.ToLowerInvariant() == characterName);

            if (!matchingCharacters.Any())
            {
                NewMessage("Matching characters not found", Color.Red);
                return null;
            }

            if (characterIndex == -1)
            {
                if (matchingCharacters.Count > 1)
                {
                    NewMessage(
                        "Found multiple matching characters. " +
                        "Use \"" + commands[0] + " [charactername] [0-" + (matchingCharacters.Count - 1) + "]\" to choose a specific character.",
                        Color.LightGray);
                }
                return matchingCharacters[0];
            }
            else if (characterIndex < 0 || characterIndex >= matchingCharacters.Count)
            {
                ThrowError("Character index out of range. Select an index between 0 and " + (matchingCharacters.Count - 1));
            }
            else
            {
                return matchingCharacters[characterIndex];
            }

            return null;
        }

        public static void NewMessage(string msg, Color color)
        {
            if (String.IsNullOrEmpty((msg))) return;

            Messages.Add(new ColoredText(msg, color));
#if SERVER
            //TODO: REMOVE
            Console.ForegroundColor = XnaToConsoleColor.Convert(color);
            Console.WriteLine(msg);
            Console.ForegroundColor = ConsoleColor.White;
#endif

            if (Messages.Count > MaxMessages)
            {
                Messages.RemoveRange(0, Messages.Count - MaxMessages);
            }

#if CLIENT
            //listbox not created yet, don't attempt to add
            if (listBox == null) return;

            if (listBox.children.Count > MaxMessages)
            {
                listBox.children.RemoveRange(0, listBox.children.Count - MaxMessages);
            }

            try
            {
                var textBlock = new GUITextBlock(new Rectangle(0, 0, listBox.Rect.Width, 0), msg, "", Alignment.TopLeft, Alignment.Left, null, true, GUI.SmallFont);
                textBlock.CanBeFocused = false;
                textBlock.TextColor = color;

                listBox.AddChild(textBlock);
                listBox.BarScroll = 1.0f;
            }
            catch
            {
                return;
            }
            
            selectedIndex = listBox.children.Count;
#endif
        }

        public static void Log(string message)
        {
            if (GameSettings.VerboseLogging) NewMessage(message, Color.Gray);
        }

        public static void ThrowError(string error, Exception e = null)
        {
            if (e != null)
            {
                error += " {" + e.Message + "}\n" + e.StackTrace;
            }
            System.Diagnostics.Debug.WriteLine(error);
            NewMessage(error, Color.Red);
#if CLIENT
            isOpen = true;
#endif
        }
    }
}