using System;
using System.Collections.Generic;
using System.Text;
using MoonSharp.Interpreter;
using Microsoft.Xna.Framework;
using Barotrauma.Networking;
using System.Threading.Tasks;
using Barotrauma.Items.Components;
using System.IO;
using System.Net;
using System.Linq;
using System.Xml.Linq;

namespace Barotrauma
{

	partial class LuaSetup
	{
		private static Vector2 CreateVector2(float x, float y)
		{
			return new Vector2(x, y);
		}

		private static Vector3 CreateVector3(float x, float y, float z)
		{
			return new Vector3(x, y, z);
		}

		private static Vector4 CreateVector4(float x, float y, float z, float w)
		{
			return new Vector4(x, y, z, w);
		}

		private partial class LuaPlayer
		{

		}

		public partial class LuaGame
		{
			LuaSetup env;

			public LuaGame(LuaSetup e)
			{
				env = e;
			}

			public bool allowWifiChat = false;
			public bool overrideTraitors = false;
			public bool overrideRespawnSub = false;
			public bool overrideSignalRadio = false;
			public bool disableSpamFilter = false;

			public bool RoundStarted
			{
				
				get
				{
#if SERVER 
					return GameMain.Server.GameStarted;
#else
					return GameMain.Client.GameStarted;
#endif
				}
			}

			public GameSession GameSession
			{
				get
				{
					return GameMain.GameSession;
				}
			}

			public NetLobbyScreen NetLobbyScreen
			{
				get
				{
					return GameMain.NetLobbyScreen;
				}
			}

			public void OverrideTraitors(bool o)
			{
				overrideTraitors = o;
			}

			public void OverrideRespawnSub(bool o)
			{
				overrideRespawnSub = o;
			}

			public void AllowWifiChat(bool o)
			{
				allowWifiChat = o;
			}

			public void OverrideSignalRadio(bool o)
			{
				overrideSignalRadio = o;
			}

			public void DisableSpamFilter(bool o)
			{
				disableSpamFilter = o;
			}

			public static void Explode(Vector2 pos, float range = 100, float force = 30, float damage = 30, float structureDamage = 30, float itemDamage = 30, float empStrength = 0, float ballastFloraStrength = 0)
			{
				new Explosion(range, force, damage, structureDamage, itemDamage, empStrength, ballastFloraStrength).Explode(pos, null);
			}

			public static Character Spawn(string name, Vector2 worldPos)
			{
				Character spawnedCharacter = null;
				Vector2 spawnPosition = worldPos;

				string characterLowerCase = name.ToLowerInvariant();
				JobPrefab job = null;
				if (!JobPrefab.Prefabs.ContainsKey(characterLowerCase))
				{
					job = JobPrefab.Prefabs.Find(jp => jp.Name != null && jp.Name.Equals(characterLowerCase, StringComparison.OrdinalIgnoreCase));
				}
				else
				{
					job = JobPrefab.Prefabs[characterLowerCase];
				}
				bool human = job != null || characterLowerCase == CharacterPrefab.HumanSpeciesName;


				if (string.IsNullOrWhiteSpace(name)) { return null; }

				if (human)
				{
					var variant = job != null ? Rand.Range(0, job.Variants, Rand.RandSync.Server) : 0;
					CharacterInfo characterInfo = new CharacterInfo(CharacterPrefab.HumanSpeciesName, jobPrefab: job, variant: variant);
					spawnedCharacter = Character.Create(characterInfo, spawnPosition, ToolBox.RandomSeed(8));
					if (GameMain.GameSession != null)
					{
						//TODO: a way to select which team to spawn to?
						spawnedCharacter.TeamID = Character.Controlled != null ? Character.Controlled.TeamID : CharacterTeamType.Team1;
#if CLIENT
                    GameMain.GameSession.CrewManager.AddCharacter(spawnedCharacter);          
#endif
					}
					spawnedCharacter.GiveJobItems(null);
					spawnedCharacter.Info.StartItemsGiven = true;
				}
				else
				{
					if (CharacterPrefab.FindBySpeciesName(name) != null)
					{
						spawnedCharacter = Character.Create(name, spawnPosition, ToolBox.RandomSeed(8));
					}
				}

				return spawnedCharacter;
			}

			public static string SpawnItem(string name, Vector2 pos, bool inventory = false, Character character = null)
			{
				string error;
				DebugConsole.SpawnItem(new string[] { name, inventory ? "inventory" : "cursor" }, pos, character, out error);
				return error;
			}

			public static void RemoveItem(Item item)
			{
				EntitySpawner.Spawner.AddToRemoveQueue(item);
			}

			public static ItemPrefab GetItemPrefab(string itemNameOrId)
			{
				ItemPrefab itemPrefab =
				(MapEntityPrefab.Find(itemNameOrId, identifier: null, showErrorMessages: false) ??
				MapEntityPrefab.Find(null, identifier: itemNameOrId, showErrorMessages: false)) as ItemPrefab;

				return itemPrefab;
			}

			public void AddItemPrefabToSpawnQueue(ItemPrefab itemPrefab, Vector2 position, DynValue spawned = null)
			{
				EntitySpawner.Spawner.AddToSpawnQueue(itemPrefab, position, onSpawned: (Item item) => {
					if (spawned?.Type == DataType.Function) env.lua.Call(spawned, UserData.Create(item));
				});
			}

			public void AddItemPrefabToSpawnQueue(ItemPrefab itemPrefab, Inventory inventory, DynValue spawned = null)
			{
				EntitySpawner.Spawner.AddToSpawnQueue(itemPrefab, inventory, onSpawned: (Item item) => {
					if (spawned?.Type == DataType.Function) env.lua.Call(spawned, UserData.Create(item));
				});
			}

			public static Submarine GetRespawnSub()
			{
#if SERVER
				if (GameMain.Server.RespawnManager == null)
					return null;
				return GameMain.Server.RespawnManager.RespawnShuttle;
#else
				if (GameMain.Client.RespawnManager == null)
					return null;
				return GameMain.Client.RespawnManager.RespawnShuttle;
#endif
			}

			public static Items.Components.Steering GetSubmarineSteering(Submarine sub)
			{
				foreach (Item item in Item.ItemList)
				{
					if (item.Submarine != sub) continue;

					var steering = item.GetComponent<Items.Components.Steering>();
					if (steering != null)
					{
						return steering;
					}
				}

				return null;
			}

			public static WifiComponent GetWifiComponent(Item item)
			{
				if (item == null) return null;
				return item.GetComponent<WifiComponent>();
			}

			public static LightComponent GetLightComponent(Item item)
			{
				if (item == null) return null;
				return item.GetComponent<LightComponent>();
			}

			public static CustomInterface GetCustomInterface(Item item)
			{
				if (item == null) return null;
				return item.GetComponent<CustomInterface>();
			}

			public static Fabricator GetFabricatorComponent(Item item)
			{
				if (item == null) return null;
				return item.GetComponent<Fabricator>();
			}

			public static Holdable GetHoldableComponent(Item item)
			{
				if (item == null) return null;
				return item.GetComponent<Holdable>();
			}

			public static void ExecuteCommand(string command)
			{
				DebugConsole.ExecuteCommand(command);
			}

			public static Signal CreateSignal(string value, int stepsTaken = 1, Character sender = null, Item source = null, float power = 0, float strength = 1)
			{
				return new Signal(value, stepsTaken, sender, source, power, strength);
			}

			public static ContentPackage[] GetEnabledContentPackages()
			{
				return GameMain.Config.AllEnabledPackages.ToArray();
			}
			 
			public static List<string> GetEnabledPackagesDirectlyFromFile()
			{
				List<string> enabledPackages = new List<string>();

				XDocument doc = XMLExtensions.LoadXml("config_player.xml");
				var contentPackagesElement = doc.Root.Element("contentpackages");

				string coreName = contentPackagesElement.Element("core")?.GetAttributeString("name", "");
				enabledPackages.Add(coreName);

				XElement regularElement = contentPackagesElement.Element("regular");
				List<XElement> subElements = regularElement?.Elements()?.ToList();

				foreach (var subElement in subElements)
				{
					if (!bool.TryParse(subElement.GetAttributeString("enabled", "false"), out bool enabled) || !enabled)	{ continue; }

					string name = subElement.GetAttributeString("name", null);
					enabledPackages.Add(name);
				}
				return enabledPackages;
			}

			public void AddCommand(string name, string help, object onExecute, object getValidArgs = null, bool isCheat = false)
			{
				DebugConsole.Commands.Add(new DebugConsole.Command(name, help, (string[] arg1) => { env.CallFunction(onExecute, new object[] { arg1 }); }, 
					() => {
						var result = env.CallFunction(getValidArgs, new object[] { });
						if (result == null || !(result is string[][])) { return null; }
						return (string[][])result;

					}, isCheat = false));
			}

			public void AssignOnExecute(string names, object onExecute) => DebugConsole.AssignOnExecute(names, (string[] a) => { env.CallFunction(onExecute, new object[] { a }); });

		}


		private partial class LuaTimer
		{
			public LuaSetup env;

			public LuaTimer(LuaSetup e)
			{
				env = e;
			}

			public static double GetTime()
			{
				return Timing.TotalTime;
			}


		}

		private partial class LuaRandom
		{
			Random random;

			public LuaRandom()
			{
				random = new Random();
			}

			public int Range(int min, int max)
			{
				return random.Next(min, max);
			}

			public float RangeFloat(float min, float max)
			{
				double range = (double)max - (double)min;
				double sample = random.NextDouble();
				double scaled = (sample * range) + min;
				float f = (float)scaled;

				return f;
			}

		}

		private partial class LuaFile
		{
			// TODO: SANDBOXING

			public static string Read(string path)
			{
				return File.ReadAllText(path);
			}

			public static void Write(string path, string text)
			{
				File.WriteAllText(path, text);
			}

			public static bool Exists(string path)
			{
				return File.Exists(path);
			}

			public static bool DirectoryExists(string path)
			{
				return Directory.Exists(path);
			}

			public static string[] GetFiles(string path)
			{
				return Directory.GetFiles(path);
			}

			public static string[] GetDirectories(string path)
			{
				return Directory.GetDirectories(path);
			}

			public static string[] DirSearch(string sDir)
			{
				List<string> files = new List<string>();

				try
				{
					foreach (string f in Directory.GetFiles(sDir))
					{
						files.Add(f);
					}

					foreach (string d in Directory.GetDirectories(sDir))
					{
						foreach (string f in Directory.GetFiles(d))
						{
							files.Add(f);
						}
						DirSearch(d);
					}
				}
				catch (System.Exception excpt)
				{
					Console.WriteLine(excpt.Message);
				}

				return files.ToArray();
			}
		}

		public partial class LuaNetworking
		{
			public LuaSetup env;

			public LuaNetworking(LuaSetup e)
			{
				env = e;
			}

			public Dictionary<string, object> NetReceives = new Dictionary<string, object>();
			
			[MoonSharpHidden]
			public void NetMessageReceived(IReadMessage netMessage, Client client = null)
			{
				string netMessageName = netMessage.ReadString();
				if (NetReceives[netMessageName] is Closure)
					env.lua.Call(NetReceives[netMessageName], new object[] { netMessage, client });
			}

			public void Receive(string netMessageName, object callback)
			{
				NetReceives[netMessageName] = callback;
			}


			public IWriteMessage Start(string netMessageName)
			{
				var message = new WriteOnlyMessage();
#if SERVER
				message.Write((byte)ServerPacketHeader.LUA_NET_MESSAGE);
#else
				message.Write((byte)ClientPacketHeader.LUA_NET_MESSAGE);
#endif
				message.Write(netMessageName);
				return ((IWriteMessage)message);
			}

			public IWriteMessage Start()
			{
				return new WriteOnlyMessage();
			}

#if SERVER
			public void ClientWriteLobby(Client client) => GameMain.Server.ClientWriteLobby(client);

			public void Send(IWriteMessage netMessage, NetworkConnection connection = null, DeliveryMethod deliveryMethod = DeliveryMethod.Reliable)
			{
				if (connection == null)
				{
					foreach (NetworkConnection conn in Client.ClientList.Select(c => c.Connection))
					{
						GameMain.Server.ServerPeer.Send(netMessage, conn, deliveryMethod);
					}
				}
				else
				{
					GameMain.Server.ServerPeer.Send(netMessage, connection, deliveryMethod);
				}
			}
#else
			public void Send(IWriteMessage netMessage, DeliveryMethod deliveryMethod = DeliveryMethod.Reliable)
			{
				GameMain.Client.ClientPeer.Send(netMessage, deliveryMethod);
			}
#endif

			public void RequestPostHTTP(string url, object callback, string data, string contentType = "application/json")
			{
				try
				{
					var httpWebRequest = (HttpWebRequest)WebRequest.Create(url);
					httpWebRequest.ContentType = contentType;
					httpWebRequest.Method = "POST";

					using (var streamWriter = new StreamWriter(httpWebRequest.GetRequestStream()))
						streamWriter.Write(data);

					httpWebRequest.BeginGetResponse(new AsyncCallback((IAsyncResult result) => 
					{
						var httpResponse = httpWebRequest.EndGetResponse(result);
						using (var streamReader = new StreamReader(httpResponse.GetResponseStream()))
							env.CallFunction(callback, new object[] { streamReader.ReadToEnd() });
					}), null);

				}catch(Exception e)
				{
					env.CallFunction(callback, new object[] { e.ToString() });
				}
			}

			public void RequestGetHTTP(string url, object callback)
			{
				try
				{
					var httpWebRequest = (HttpWebRequest)WebRequest.Create(url);

					httpWebRequest.BeginGetResponse(new AsyncCallback((IAsyncResult result) =>
					{
						var httpResponse = httpWebRequest.EndGetResponse(result);
						using (var streamReader = new StreamReader(httpResponse.GetResponseStream()))
							env.CallFunction(callback, new object[] { streamReader.ReadToEnd() });
					}), null);
				}
				catch(Exception e)
				{
					env.CallFunction(callback, new object[] { e.ToString() });
				}
			}
		}

		public partial class LuaHook
		{
			public LuaSetup env;

			public LuaHook(LuaSetup e)
			{
				env = e;
			}

			public class HookFunction
			{
				public string name;
				public string hookName;
				public object function;

				public HookFunction(string n, string hn, object func)
				{
					name = n;
					hookName = hn;
					function = func;
				}
			}

			public Dictionary<string, Dictionary<string, HookFunction>> hookFunctions = new Dictionary<string, Dictionary<string, HookFunction>>();

			public void Add(string name, string hookName, object function)
			{
				if (name == null && hookName == null && function == null) return;

				if (!hookFunctions.ContainsKey(name))
					hookFunctions.Add(name, new Dictionary<string, HookFunction>());


				hookFunctions[name][hookName] = new HookFunction(name, hookName, function);
			}

			public void Remove(string name, string hookName)
			{
				if (name == null && hookName == null) return;

				if (!hookFunctions.ContainsKey(name))
					return;

				if(hookFunctions[name].ContainsKey(hookName))
					hookFunctions[name].Remove(hookName);
			}

			public object Call(string name, object[] args)
			{
				if (env == null) return null;
				if (name == null) return null;
				if (args == null) { args = new object[] { }; }

				if (!hookFunctions.ContainsKey(name))
					return null;

				object lastResult = null;

				foreach (HookFunction hf in hookFunctions[name].Values)
				{
					try
					{
						if (hf.function is Closure)
						{
							var result = env.lua.Call(hf.function, args);
							if (!result.IsNil())
								lastResult = result;
						}
						//else if (hf.function is NLua.LuaFunction luaFunction)
						//	lastResult = luaFunction.Call(args);
					}
					catch (Exception e)
					{
						env.HandleLuaException(e);
					}
				}

				return lastResult;
			}
		}

	}

	public class LuaResult
	{
		object result;
		public LuaResult(object arg)
		{
			result = arg;
		}

		public bool IsNull()
		{
			if (result == null)
				return true;

			if (result is DynValue dynValue)
				return dynValue.IsNil();

			return false;
		}

		public bool Bool()
		{
			if (result is DynValue dynValue)
			{
				return dynValue.CastToBool();
			}

			return false;
		}

		public float Float()
		{
			if (result is DynValue dynValue)
			{
				var num = dynValue.CastToNumber();
				if (num == null) { return 0f; }
				return (float)num;
			}

			return 0f;
		}

		public double Double()
		{
			if (result is DynValue dynValue)
			{
				var num = dynValue.CastToNumber();
				if (num == null) { return 0f; }
				return (double)num;
			}

			return 0f;
		}
	}
}