using System.Buffers;
using System.Net;
using System.Net.Sockets;
using System.Reflection;
using EggLink.DanhengServer.Common.Enums;
using EggLink.DanhengServer.Game.Player;
using EggLink.DanhengServer.KcpSharp;
using EggLink.DanhengServer.Server.Packet;
using EggLink.DanhengServer.Util;
using Google.Protobuf;
using Google.Protobuf.Reflection;
using KcpSharp;
using Newtonsoft.Json;
using Newtonsoft.Json.Linq;

namespace EggLink.DanhengServer.Server;
public partial class Connection
{
    public long? ConversationID => Conversation.ConversationId;
    private readonly KcpConversation Conversation;
    private readonly CancellationTokenSource CancelToken;
    public readonly IPEndPoint RemoteEndPoint;
    public SessionStateEnum State { get; set; } = SessionStateEnum.INACTIVE;
    public PlayerInstance? Player { get; set; }
    public static readonly List<int> BANNED_PACKETS = [];
    public bool IsOnline = true;
    private static readonly Logger Logger = new("GameServer");
    public static readonly Dictionary<string, string> LogMap = [];
    public static readonly List<int> IgnoreLog = [CmdIds.PlayerHeartBeatCsReq, CmdIds.PlayerHeartBeatScRsp, CmdIds.SceneEntityMoveCsReq, CmdIds.SceneEntityMoveScRsp, CmdIds.GetShopListCsReq, CmdIds.GetShopListScRsp];

    public string DebugFile = "";
    public StreamWriter? writer = null;

    public Connection(KcpConversation conversation, IPEndPoint remote)
    {
        Conversation = conversation;
        RemoteEndPoint = remote;
        CancelToken = new CancellationTokenSource();
        Start();
    }

    private async void Start()
    {
        Logger.Info($"New connection from {RemoteEndPoint}.");
        State = SessionStateEnum.WAITING_FOR_TOKEN;
        await ReceiveLoop();
    }
    public void Stop()
    {
        Player?.OnLogoutAsync();
        Listener.UnregisterConnection(this);
        Conversation.Dispose();
        try
        {
            CancelToken.Cancel();
            CancelToken.Dispose();
        }
        catch { }
        IsOnline = false;
    }

    public void LogPacket(string sendOrRecv, ushort opcode, byte[] payload)
    {
        try
        {
            //Logger.DebugWriteLine($"{sendOrRecv}: {Enum.GetName(typeof(OpCode), opcode)}({opcode})\r\n{Convert.ToHexString(payload)}");
            if (IgnoreLog.Contains(opcode))
            {
                return;
            }
#pragma warning disable CS8600
            Type? typ = AppDomain.CurrentDomain.GetAssemblies().
           SingleOrDefault(assembly => assembly.GetName().Name == "DanhengCommon")!.GetTypes().First(t => t.Name == $"{LogMap[opcode.ToString()]}"); //get the type using the packet name
            MessageDescriptor? descriptor = (MessageDescriptor)typ.GetProperty("Descriptor", BindingFlags.Public | BindingFlags.Static)!.GetValue(null, null); // get the static property Descriptor
            IMessage? packet = descriptor!.Parser.ParseFrom(payload);
#pragma warning restore CS8600
            JsonFormatter? formatter = JsonFormatter.Default;
            string? asJson = formatter.Format(packet);
            var output = $"{sendOrRecv}: {LogMap[opcode.ToString()]}({opcode})\r\n{asJson}";
#if DEBUG
            Logger.Debug(output);
#endif
            if (DebugFile != "" && ConfigManager.Config.ServerOption.SavePersonalDebugFile)
            {
                StreamWriter? sw = GetWriter();
                sw.WriteLine($"[{DateTime.Now:HH:mm:ss}] [GameServer] [DEBUG] " + output);
                sw.Flush();
            }
        }
        catch
        {
            var output = $"{sendOrRecv}: {LogMap[opcode.ToString()]}({opcode})";
#if DEBUG
            Logger.Debug(output);
#endif
            if (DebugFile != "" && ConfigManager.Config.ServerOption.SavePersonalDebugFile)
            {
                StreamWriter? sw = GetWriter();
                sw.WriteLine($"[{DateTime.Now:HH:mm:ss}] [GameServer] [DEBUG] " + output);
                sw.Flush();
            }
        }
    }

    private StreamWriter GetWriter()
    {
        // Create the file if it doesn't exist
        var file = new FileInfo(DebugFile);
        if (!file.Exists)
        {
            Directory.CreateDirectory(file.DirectoryName!);
            File.Create(DebugFile).Dispose();
        }

        writer ??= new StreamWriter(DebugFile, true);
        return writer;
    }

    private async Task ReceiveLoop()
    {
        while (!CancelToken.IsCancellationRequested)
        {
            // WaitToReceiveAsync call completes when there is at least one message is received or the transport is closed.
            KcpConversationReceiveResult result = await Conversation.WaitToReceiveAsync(CancelToken.Token);
            if (result.TransportClosed)
            {
                Logger.Debug("Connection was closed");
                break;
            }
            if (result.BytesReceived > Listener.MAX_MSG_SIZE)
            {
                // The message is too large.
                Logger.Error("Packet too large");
                Conversation.SetTransportClosed();
                break;
            }

            byte[] buffer = ArrayPool<byte>.Shared.Rent(result.BytesReceived);
            try
            {
                // TryReceive should not return false here, unless the transport is closed.
                // So we don't need to check for result.TransportClosed.
                if (!Conversation.TryReceive(buffer, out result))
                {
                    Logger.Error("Failed to receive packet");
                    break;
                }
                await ProcessMessageAsync(buffer.AsMemory(0, result.BytesReceived));
            }
            catch (Exception ex)
            {
                Logger.Error("Packet parse error", ex);
            }
            finally
            {
                ArrayPool<byte>.Shared.Return(buffer);
            }
        }
        Stop();
    }

    // DO THE PROCESSING OF THE GAME PACKET
    private async Task ProcessMessageAsync(Memory<byte> data)
    {
        byte[] gamePacket = data.ToArray();

        await using MemoryStream? ms = new(gamePacket);
        using BinaryReader? br = new(ms);

        // Handle
        try
        {
            while (br.BaseStream.Position < br.BaseStream.Length)
            {
                // Length
                if (br.BaseStream.Length - br.BaseStream.Position < 12)
                {
                    return;
                }
                // Packet sanity check
                uint Magic1 = br.ReadUInt32BE();
                if (Magic1 != 0x9D74C714)
                {
                    Logger.Error($"Bad Data Package Received: got 0x{Magic1:X}, expect 0x9D74C714");
                    return; // Bad packet
                }
                // Data
                ushort opcode = br.ReadUInt16BE();
                ushort headerLength = br.ReadUInt16BE();
                uint payloadLength = br.ReadUInt32BE();
                byte[] header = br.ReadBytes(headerLength);
                byte[] payload = br.ReadBytes((int)payloadLength);
                LogPacket("Recv", opcode, payload);
                HandlePacket(opcode, header, payload);
            }

        }
        catch (Exception e)
        {
            Logger.Error(e.Message, e);
        }
        finally
        {
            await ms.DisposeAsync();
        }
    }

    private bool HandlePacket(ushort opcode, byte[] header, byte[] payload)
    {
        // Find the Handler for this opcode
        Handler? handler = HandlerManager.GetHandler(opcode);
        if (handler != null)
        {
            // Handle
            // Make sure session is ready for packets
            SessionStateEnum state = State;
            switch ((int)opcode)
            {
                case CmdIds.PlayerGetTokenCsReq:
                    {
                        if (state != SessionStateEnum.WAITING_FOR_TOKEN)
                        {
                            return true;
                        }
                        goto default;
                    }
                case CmdIds.PlayerLoginCsReq:
                    {
                        if (state != SessionStateEnum.WAITING_FOR_LOGIN)
                        {
                            return true;
                        }
                        goto default;
                    }
                default:
                    break;
            }
            handler.OnHandle(this, header, payload);
            return true;
        }

        return false;
    }

    public void SendPacket(BasePacket packet)
    {
        // Test
        if (packet.CmdId <= 0)
        {
            Logger.Debug("Tried to send packet with missing cmd id!");
            return;
        }

        // DO NOT REMOVE (unless we find a way to validate code before sending to client which I don't think we can)
        if (BANNED_PACKETS.Contains(packet.CmdId))
        {
            return;
        }
        LogPacket("Send", packet.CmdId, packet.Data);
        // Header
        byte[] packetBytes = packet.BuildPacket();

        try
        {
#pragma warning disable CA2012
            _ = Conversation.SendAsync(packetBytes, CancelToken.Token);
#pragma warning restore CA2012
        } catch
        {
            // ignore
        }
    }

    public void SendPacket(int cmdId)
    {
        SendPacket(new BasePacket((ushort)cmdId));
    }
}