using System;
using System.Collections.Generic;
using System.IO;
using HarmonyLib;
using RedLoader;
using RedLoader.Utils;
using Sons.Weapon;
using SonsSdk;
using SonsSdk.Attributes;
using TheForest.Utils;
using UnityEngine;

namespace FullAuto;

public enum FireMode
{
    Auto,
    Burst,
    Semi
}

public class FullAuto : SonsMod
{
    internal const float MinRpm = 60f;
    internal const float MaxRpm = 3000f;

    internal static bool Enabled = true;
    internal static float Rpm = 900f;
    internal static FireMode Mode = FireMode.Auto;
    internal static bool Verbose;

    private static string _configPath;

    public FullAuto()
    {
        HarmonyPatchAll = true;
        OnUpdateCallback = OnUpdate;
    }

    protected override void OnSdkInitialized()
    {
        _configPath = Path.Combine(LoaderEnvironment.UserDataDirectory, "FullAuto.txt");
        Load();
        RLog.Msg($"FullAuto loaded. RPM: {Rpm}. Guns only. Middle mouse cycles modes. Console: fullauto");
    }

    private void OnUpdate()
    {
        CheckFireInputPatch.UpdateTrigger();

        if (!Enabled || !GameState.IsPlayerControllable || !CheckFireInputPatch.HoldingGun)
            return;

        if (Input.GetMouseButtonDown(2))
        {
            Mode = Mode switch
            {
                FireMode.Auto => FireMode.Semi,
                FireMode.Semi => FireMode.Burst,
                _ => FireMode.Auto
            };
            CheckFireInputPatch.CancelBurst();
            SonsTools.ShowMessage(ModeName(), 2f);
            RLog.Msg($"FullAuto mode: {ModeName()}");
        }
    }

    [DebugCommand("fullauto")]
    private static void FullAutoCommand(string args)
    {
        var parts = (args ?? string.Empty).Trim().Split(' ', StringSplitOptions.RemoveEmptyEntries);

        if (parts.Length == 0)
        {
            Announce();
            return;
        }

        switch (parts[0].ToLowerInvariant())
        {
            case "on":
                Enabled = true;
                break;
            case "off":
                Enabled = false;
                break;
            case "toggle":
                Enabled = !Enabled;
                break;
            case "debug":
                Verbose = !Verbose;
                SonsTools.ShowMessage($"FullAuto debug: {Verbose}");
                RLog.Msg($"FullAuto debug: {Verbose}");
                return;
            case "rpm":
                if (parts.Length > 1 && float.TryParse(parts[1], out var value))
                {
                    Rpm = Mathf.Clamp(value, MinRpm, MaxRpm);
                    Save();
                    break;
                }
                Usage();
                return;
            default:
                Usage();
                return;
        }

        CheckFireInputPatch.CancelBurst();
        Announce();
    }

    private static void Usage()
    {
        var text = $"Usage: fullauto [on|off|toggle|debug] or fullauto rpm <{MinRpm}-{MaxRpm}>";
        SonsTools.ShowMessage(text, 5f);
        RLog.Msg(text);
    }

    private static string ModeName()
    {
        return Mode switch
        {
            FireMode.Auto => "Full-automatic",
            FireMode.Burst => "3-Round Burst",
            _ => "Semi-automatic"
        };
    }

    internal static void Announce()
    {
        var text = Enabled ? $"{ModeName()} ({Rpm} RPM)" : "FullAuto OFF";
        SonsTools.ShowMessage(text);
        RLog.Msg(text);
    }

    private static void Load()
    {
        try
        {
            if (!File.Exists(_configPath))
                return;

            foreach (var line in File.ReadAllLines(_configPath))
            {
                var kv = line.Split('=', 2);
                if (kv.Length != 2)
                    continue;

                var key = kv[0].Trim().ToLowerInvariant();
                var val = kv[1].Trim();

                if (key == "rpm" && float.TryParse(val, out var rpm))
                    Rpm = Mathf.Clamp(rpm, MinRpm, MaxRpm);
            }
        }
        catch (Exception e)
        {
            RLog.Error($"FullAuto could not read config: {e.Message}");
        }
    }

    private static void Save()
    {
        try
        {
            File.WriteAllText(_configPath, $"rpm={Rpm}\n");
        }
        catch (Exception e)
        {
            RLog.Error($"FullAuto could not write config: {e.Message}");
        }
    }
}

[HarmonyPatch(typeof(RangedWeaponController), nameof(RangedWeaponController.CheckFireInput))]
internal static class CheckFireInputPatch
{
    private const int MaxShotsPerFrame = 4;
    private const int BurstSize = 3;
    private const float ReleaseTime = 0.05f;

    private static readonly HashSet<string> Guns = new()
    {
        "CompactPistolWeaponController",
        "RevolverWeaponController",
        "ShotgunWeaponController",
        "RifleAnimatorController"
    };

    private static readonly Dictionary<IntPtr, bool> Allowed = new();
    private static readonly Dictionary<IntPtr, float> FireDelays = new();
    private static readonly HashSet<string> Reported = new();
    private static float _nextShot;
    private static int _burstLeft;
    private static float _lastGunTime = -1f;
    private static bool _triggerDown;
    private static float _releasedFor;
    private static bool _loggedHook;

    internal static bool HoldingGun => _lastGunTime >= 0f && Time.time - _lastGunTime < 0.25f;

    internal static void CancelBurst()
    {
        _burstLeft = 0;
    }

    internal static void UpdateTrigger()
    {
        if (Input.GetMouseButton(0))
        {
            _releasedFor = 0f;
            if (_triggerDown)
                return;

            _triggerDown = true;
            if (FullAuto.Enabled && FullAuto.Mode == FireMode.Burst && HoldingGun && GameState.IsPlayerControllable)
                StartBurst();
            return;
        }

        _releasedFor += Time.unscaledDeltaTime;
        if (_releasedFor >= ReleaseTime)
            _triggerDown = false;
    }

    private static void StartBurst()
    {
        if (_burstLeft > 0)
            return;

        _burstLeft = BurstSize;
        _nextShot = 0f;

        if (FullAuto.Verbose)
            RLog.Msg("FullAuto burst start");
    }

    private static bool Prefix(RangedWeaponController __instance)
    {
        if (!_loggedHook)
        {
            _loggedHook = true;
            RLog.Msg("FullAuto: CheckFireInput hook is firing");
        }

        if (!__instance.IsLocalPlayer())
            return true;

        var allowed = IsAllowed(__instance);
        _lastGunTime = allowed ? Time.time : -1f;

        if (!FullAuto.Enabled || !allowed)
            return true;

        if (FullAuto.Mode == FireMode.Semi)
            return true;

        var held = Input.GetMouseButton(0);

        if (!GameState.IsPlayerControllable)
        {
            CancelBurst();
            return !held;
        }

        if (__instance._isReloading || __instance.IsReloading())
            return Stop();

        var weapon = __instance.GetRangedWeapon();
        if (!weapon)
            return Stop();

        var ammo = weapon.GetAmmo();
        if (ammo == null || ammo.GetRemainingAmmo() <= 0)
            return Stop();

        if (FullAuto.Mode == FireMode.Burst)
        {
            if (_burstLeft <= 0)
                return !held;
        }
        else if (!held)
        {
            return true;
        }

        if (__instance._mustAimToFire && !__instance.IsAiming)
            return Stop();

        var now = Time.time;
        var interval = 60f / FullAuto.Rpm;

        if (_nextShot < now - interval)
            _nextShot = now;

        var shots = 0;
        while (_nextShot <= now && shots < MaxShotsPerFrame && ammo.GetRemainingAmmo() > 0)
        {
            if (FullAuto.Mode == FireMode.Burst)
            {
                if (_burstLeft <= 0)
                    break;
                _burstLeft--;
            }

            Fire(__instance, ammo);
            _nextShot += interval;
            shots++;
        }

        if (FireDelays.TryGetValue(__instance.Pointer, out var delay))
            __instance._fireDelay = delay;

        return false;
    }

    private static bool Stop()
    {
        _burstLeft = 0;
        return true;
    }

    private static void Fire(RangedWeaponController controller, RangedWeapon.Ammo ammo)
    {
        var before = ammo.GetRemainingAmmo();

        controller._fireDelay = 0f;
        controller._nextFireDelay = 0f;
        controller.FireWeapon();

        if (controller._playFireAudio == RangedWeaponController.FireAudio.OnAnimShootCallback)
        {
            controller.TriggerShotFiredAudio();
            if (controller.ShouldShowMuzzleFlash())
                controller.OnMuzzleFlash();
        }

        controller._attackState = RangedWeaponController.AttackState.Idle;

        var after = ammo.GetRemainingAmmo();
        var name = controller.GetIl2CppType().Name;

        if (Reported.Add(name))
            RLog.Msg($"FullAuto first shot with {name}: ammo {before} -> {after}, audio {controller._playFireAudio}");

        if (FullAuto.Verbose)
            RLog.Msg($"FullAuto shot {name} ({FullAuto.Mode}): ammo {before} -> {after}");
    }

    private static bool IsAllowed(RangedWeaponController controller)
    {
        var ptr = controller.Pointer;
        if (Allowed.TryGetValue(ptr, out var allowed))
            return allowed;

        var name = controller.GetIl2CppType().Name;
        allowed = Guns.Contains(name);
        Allowed[ptr] = allowed;
        if (allowed)
            FireDelays[ptr] = controller._fireDelay;
        RLog.Msg($"FullAuto {name}: {(allowed ? "full-auto" : "ignored")}");
        return allowed;
    }
}