using Fleck;
using SharpChat.Commands;
using SharpChat.Config;
using SharpChat.EventStorage;
using SharpChat.Misuzu;
using SharpChat.Packet;
using SharpChat.PacketHandlers;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Net.Http;
using System.Threading;

namespace SharpChat {
    public class SockChatServer : IDisposable {
        public const ushort DEFAULT_PORT = 6770;
        public const int DEFAULT_MSG_LENGTH_MAX = 5000;
        public const int DEFAULT_MAX_CONNECTIONS = 5;
        public const int DEFAULT_FLOOD_KICK_LENGTH = 30;
        public const int DEFAULT_FLOOD_KICK_EXEMPT_RANK = 9;

        public IWebSocketServer Server { get; }
        public ChatContext Context { get; }

        private readonly HttpClient HttpClient;
        private readonly MisuzuClient Misuzu;

        private readonly CachedValue<int> MaxMessageLength;
        private readonly CachedValue<int> MaxConnections;
        private readonly CachedValue<int> FloodKickLength;
        private readonly CachedValue<int> FloodKickExemptRank;

        private readonly List<IPacketHandler> GuestHandlers = new();
        private readonly List<IPacketHandler> AuthedHandlers = new();
        private readonly SendMessageHandler SendMessageHandler;

        private bool IsShuttingDown = false;

        public SockChatServer(HttpClient httpClient, MisuzuClient msz, IEventStorage evtStore, IConfig config) {
            Logger.Write("Initialising Sock Chat server...");

            DateTimeOffset started = DateTimeOffset.UtcNow;
            HttpClient = httpClient;
            Misuzu = msz;

            MaxMessageLength = config.ReadCached("msgMaxLength", DEFAULT_MSG_LENGTH_MAX);
            MaxConnections = config.ReadCached("connMaxCount", DEFAULT_MAX_CONNECTIONS);
            FloodKickLength = config.ReadCached("floodKickLength", DEFAULT_FLOOD_KICK_LENGTH);
            FloodKickExemptRank = config.ReadCached("floodKickExemptRank", DEFAULT_FLOOD_KICK_EXEMPT_RANK);

            Context = new ChatContext(evtStore);

            string[]? channelNames = config.ReadValue("channels", new[] { "lounge" });

            if(channelNames != null)
                foreach(string channelName in channelNames) {
                    IConfig channelCfg = config.ScopeTo($"channels:{channelName}");

                    string? name = channelCfg.SafeReadValue("name", string.Empty);
                    if(string.IsNullOrWhiteSpace(name))
                        name = channelName;

                    ChannelInfo channelInfo = new(
                        name,
                        channelCfg.SafeReadValue("password", string.Empty),
                        rank: channelCfg.SafeReadValue("minRank", 0)
                    );

                    Context.Channels.Add(channelInfo);
                }

            if(Context.Channels.PublicCount < 1)
                Context.Channels.Add(new ChannelInfo("Default"));

            GuestHandlers.Add(new AuthHandler(
                started,
                Misuzu,
                Context.Channels.MainChannel,
                MaxMessageLength,
                MaxConnections
            ));

            AuthedHandlers.AddRange(new IPacketHandler[] {
                new PingHandler(Misuzu),
                SendMessageHandler = new SendMessageHandler(MaxMessageLength),
            });

            SendMessageHandler.AddCommands(new IUserCommand[] {
                new UserAFKCommand(),
                new UserNickCommand(),
                new MessageWhisperCommand(),
                new MessageActionCommand(),
                new WhoCommand(),
                new ChannelJoinCommand(),
                new ChannelCreateCommand(),
                new ChannelDeleteCommand(),
                new ChannelPasswordCommand(),
                new ChannelRankCommand(),
                new MessageBroadcastCommand(),
                new MessageDeleteCommand(),
                new KickBanCommand(msz),
                new PardonUserCommand(msz),
                new PardonAddressCommand(msz),
                new BanListCommand(msz),
                new WhoisCommand(),
            });

            ushort port = config.SafeReadValue("port", DEFAULT_PORT);
            Server = new SharpChatWebSocketServer($"ws://0.0.0.0:{port}");
        }

        public void Listen(ManualResetEvent waitHandle) {
            if(waitHandle != null)
                SendMessageHandler.AddCommand(new ShutdownRestartCommand(waitHandle, () => !IsShuttingDown && (IsShuttingDown = true)));

            Server.Start(sock => {
                if(IsShuttingDown) {
                    sock.Close(1013);
                    return;
                }

                ConnectionInfo conn = new(sock);
                Context.Connections.Add(conn);

                sock.OnOpen = () => OnOpen(conn);
                sock.OnClose = () => OnClose(conn);
                sock.OnError = err => OnError(conn, err);
                sock.OnMessage = msg => OnMessage(conn, msg);
            });

            Logger.Write("Listening...");
        }

        private void OnOpen(ConnectionInfo conn) {
            Logger.Write($"Connection opened from {conn.RemoteAddress}:{conn.RemotePort}");
            Context.SafeUpdate();
        }

        private void OnError(ConnectionInfo conn, Exception ex) {
            Logger.Write($"[{conn.Id} {conn.RemoteAddress}] {ex}");
            Context.SafeUpdate();
        }

        private void OnClose(ConnectionInfo conn) {
            Logger.Write($"Connection closed from {conn.RemoteAddress}:{conn.RemotePort}");

            Context.ContextAccess.Wait();
            try {
                Context.Connections.Remove(conn);

                if(conn.User != null && !Context.Connections.Any(c => c.User == conn.User))
                    Context.HandleDisconnect(conn.User);

                Context.Update();
            } finally {
                Context.ContextAccess.Release();
            }
        }

        private void OnMessage(ConnectionInfo conn, string msg) {
            Context.SafeUpdate();

            // this doesn't affect non-authed connections?????
            if(conn.User is not null && conn.User.Rank < FloodKickExemptRank) {
                UserInfo? banUser = null;
                string banAddr = string.Empty;
                TimeSpan banDuration = TimeSpan.MinValue;

                Context.ContextAccess.Wait();
                try {
                    if(!Context.UserRateLimiters.TryGetValue(conn.User.UserId, out RateLimiter? rateLimiter))
                        Context.UserRateLimiters.Add(conn.User.UserId, rateLimiter = new RateLimiter(
                            UserInfo.DEFAULT_SIZE,
                            UserInfo.DEFAULT_MINIMUM_DELAY,
                            UserInfo.DEFAULT_RISKY_OFFSET
                        ));

                    rateLimiter.Update();

                    if(rateLimiter.IsExceeded) {
                        banDuration = TimeSpan.FromSeconds(FloodKickLength);
                        banUser = conn.User;
                        banAddr = conn.RemoteAddress.ToString();
                    } else if(rateLimiter.IsRisky) {
                        banUser = conn.User;
                    }

                    if(banUser is not null) {
                        if(banDuration == TimeSpan.MinValue) {
                            Context.SendTo(conn.User, new FloodWarningPacket());
                        } else {
                            Context.BanUser(conn.User, banDuration, UserDisconnectReason.Flood);

                            if(banDuration > TimeSpan.Zero)
                                Misuzu.CreateBanAsync(
                                    conn.User.UserId.ToString(), conn.RemoteAddress.ToString(),
                                    string.Empty, "::1",
                                    banDuration,
                                    "Kicked from chat for flood protection."
                                ).Wait();

                            return;
                        }
                    }
                } finally {
                    Context.ContextAccess.Release();
                }
            }

            PacketHandlerContext context = new(msg, Context, conn);
            IPacketHandler? handler = conn.User is null
                ? GuestHandlers.FirstOrDefault(h => h.IsMatch(context))
                : AuthedHandlers.FirstOrDefault(h => h.IsMatch(context));

            handler?.Handle(context);
        }

        private bool IsDisposed;

        ~SockChatServer() {
            DoDispose();
        }

        public void Dispose() {
            DoDispose();
            GC.SuppressFinalize(this);
        }

        private void DoDispose() {
            if(IsDisposed)
                return;
            IsDisposed = true;
            IsShuttingDown = true;

            foreach(ConnectionInfo conn in Context.Connections)
                conn.Dispose();

            Server?.Dispose();
            HttpClient?.Dispose();
        }
    }
}