#include "CommonHeaders.h"
#include "UEngine.hpp"
#include "UETools.hpp"
#include "UEVars.hpp"
#include "Logger.hpp"
#include "SDK/Basic.hpp"
#include "SDK/Engine_classes.hpp"
#include "Phoenix_classes.hpp"
#include "SDK/UI_BP_PhoenixHUDWidget_classes.hpp"
#include "SDK/UI_BP_AsyncLoadWrapper_classes.hpp"
#include "SDK/UI_BP_BeaconHUDPanel_classes.hpp"

using namespace SDK;

// Constants
const std::string PLUGIN_NAME = "HogwartsLegacy";
const std::string PLUGIN_LOG = PLUGIN_NAME + ".log";
constexpr ULONGLONG DEFAULT_ACTORS_SCAN_BETWEEN_TICKS = 40; // Used for enemies time dilation

// Logger
std::shared_ptr<spdlog::logger> logger;

// Screen informations
static int screenWidth = GetSystemMetrics(SM_CXSCREEN);
static int screenHeight = GetSystemMetrics(SM_CYSCREEN);
static float aspectRatio = (float)screenWidth / screenHeight;

// Plugin states
static bool AOBScanDone = false;
static bool g_fix_enabled = false;
static bool g_fov_fix_enabled = false;
static bool g_ultrawide_fix_enabled = false;
static bool g_HUD_fix_enabled = false;
static bool g_camera_fix_enabled = false;
static bool g_DOF_fix_enabled = false;
static bool g_CA_fix_enabled = false;
static bool g_Vignetting_fix_enabled = false;
static bool g_Fog_fix_enabled = false;
static bool g_TimeDilation_fix_enabled = false;
static bool g_GodMide_fix_enabled = false;
static bool g_Stealth_fix_enabled = false;
static int g_AdditionalFOVValue = 0;
static float g_CameraMultiplier = 1.f;
static float g_WorldTimeDilationValue = 1.f;
static float g_AITimeDilationValue = 1.f;
static int g_HUDOffsets = 0.f;
static bool g_Console = true;
static bool user_inputs_logged = false;

// Shared values
static float g_FOV_In = 67.85f;
static float g_FOV_Out = 67.85f;
static float g_Camera_In = 360.f;
static float g_Camera_Out = 360.f;

// AOB Scan pointers
static uint8_t* FOVaddress = nullptr;
static uint8_t* ConstrainAspectaddress = nullptr;
static uint8_t* Cameraaddress = nullptr;
static uint8_t* DOFaddress = nullptr;
static uint8_t* CAaddress = nullptr;
static uint8_t* Vignettingaddress = nullptr;
static uint8_t* Fogaddress = nullptr;
static uint8_t* WorldTimedilationaddress = nullptr;
static uint8_t* timedilationaddress = nullptr;

// Hooking
static SafetyHookMid FOVHook{};
static SafetyHookMid CameraHook{};
static SafetyHookMid FogHook{};
static SafetyHookMid PEHook{};
static SafetyHookMid WorldTimeDilationHook{};
static SafetyHookMid TimeDilationHook{};

// Prototypes
static void FOVFixEnabled();
static void UltraWideFixEnabled();
static void CameraFixEnabled();
static void DOFFixEnabled();
static void CAFixEnabled();
static void VignettingFixEnabled();
static void FogFixEnabled();
static void EnableConsole();
static void ProcessEvent();
static void HUDFixEnabled();
static void ProcessEvent();
static void EnableCheats(Cheat cheat);
static void LogHUD();

extern "C" __declspec(dllexport) void SetFixEnabled(bool enabled, bool init) {
    g_fix_enabled = enabled;
    if (!AOBScanDone) { // Unreal Engine 4.27.2
        uint8_t* baseModule = reinterpret_cast<uint8_t*>(GetModuleHandleA(nullptr)); // Get game base address
        logger->info("--------------- AOB scan started ---------------");
        constexpr auto FOVStringObfuscated = make_obfuscated<0x4A>("EB ?? F3 0F ?? ?? ?? ?? ?? ?? F3 0F ?? ?? ?? 8B 83");
        constexpr auto CameraStringObfuscated = make_obfuscated<0x4A>("F3 0F ?? ?? C8 ?? ?? ?? E8 ?? ?? ?? ?? 4C 8D ?? ?? ?? ?? ?? 48");
        constexpr auto DOFStringObfuscated = make_obfuscated<0x4A>("8B ?? ?? E8 ?? ?? ?? ?? 8B ?? E8 ?? ?? ?? ?? 84 ?? 74 ?? 48");
        constexpr auto CAStringObfuscated = make_obfuscated<0x4A>("7F ?? 89 B3 ?? ?? ?? ?? 41 ?? ?? ?? 39 05 ?? ?? ?? ?? 7E");
        constexpr auto VignettingStringObfuscated = make_obfuscated<0x4A>("8B ?? 83 ?? ?? 7D ?? 89 B3 ?? ?? ?? ?? 89 B3 ?? ?? ?? ?? 89 B3");
        constexpr auto FogStringObfuscated = make_obfuscated<0x4A>("83 ?? ?? ?? 75 ?? B3 ?? EB ?? 32 ?? 48 8B ?? ?? ?? 48 ?? ?? 74 ?? E8");
        constexpr auto WorldTimeDilationStringObfuscated = make_obfuscated<0x59>("F3 0F 10 81 ?? ?? ?? ?? F3 0F 59 81 ?? ?? ?? ?? F3 0F 59 81 ?? ?? ?? ?? C3");
        constexpr auto timeDilationObfuscated = make_obfuscated<0xB4>("F3 0F ?? ?? ?? ?? ?? ?? EB ?? F3 0F ?? ?? ?? ?? ?? ?? 48 8B ?? ?? 4C 8B ?? F3 0F ?? ?? 44 8B");
        using AOBScan::Make;
        using OffsetScan::Make;
        // Prepare all data for scanning
        std::vector<AOBScanEntry> signatures = {
            Make(&FOVaddress, FOVStringObfuscated, "FOV"),
            Make(&Cameraaddress, CameraStringObfuscated, "Camera distance"),
            Make(&DOFaddress, DOFStringObfuscated, "DOF"),
            Make(&CAaddress, CAStringObfuscated, "Chromatic aberrations"),
            Make(&Vignettingaddress, VignettingStringObfuscated, "Vignetting"),
            Make(&Fogaddress, FogStringObfuscated, "Fog"),
            Make(&WorldTimedilationaddress, WorldTimeDilationStringObfuscated, "World time dilation"),
            Make(&timedilationaddress, timeDilationObfuscated, "Time dilation"),
        };
        // Scan all signature in a batch
        Memory::AOBScanBatch(signatures, logger);
        if (FOVaddress) ConstrainAspectaddress = FOVaddress + 0x18;
        if (FOVaddress && ConstrainAspectaddress && Cameraaddress && DOFaddress && CAaddress && 
            Vignettingaddress && Fogaddress && WorldTimedilationaddress && timedilationaddress)
            logger->info("All AOB signatures found. Ready to patch...");

        if (!GObjectsaddress || !AppendStringaddress || !ProcessEventaddress) {
            logger->info("------------ UEngine offsets search ------------");

            constexpr auto GObjetcsStringObfuscated = make_obfuscated<0x4A>("48 8B ?? ?? ?? ?? ?? 48 8B ?? ?? 48 8D ?? ?? EB ?? 33");
            constexpr auto GWorldStringObfuscated = make_obfuscated<0x4A>("48 8B 05 ?? ?? ?? ?? 48 ?? ?? 0F 84 ?? ?? ?? ?? 45 ?? ?? 48 ?? ?? 74");
            constexpr auto AppendStringStringObfuscated = make_obfuscated<0x4A>("48 89 ?? ?? ?? 48 89 ?? ?? ?? 57 48 ?? ?? ?? 8B ?? 48 ?? ?? 8B ?? 44 ?? ?? ?? C1 ?? ?? 48 ?? ?? 80 3D ?? ?? ?? ?? ?? 89 ?? ?? ?? 44 89 ?? ?? ?? 74 ?? 4C 8D ?? ?? ?? ?? ?? EB ?? 48 8D ?? ?? ?? ?? ?? E8 ?? ?? ?? ?? 4C ?? ??  C6 05 ?? ?? ?? ?? ?? 48 8B ?? ?? ?? 48 ?? ?? 48 ?? ?? ?? 8D ?? ?? 49 03 ?? ?? ?? E8 ?? ?? ?? ?? 83");
            constexpr auto ProcessEventStringObfuscated = make_obfuscated<0x4A>("40 ?? 56 57 41 ?? 41 ?? 41 ?? 41 ?? 48 81 ?? ?? ?? ?? ?? 48 8D ?? ?? ?? 48 89 ?? ?? ?? ?? ?? 48 8B ?? ?? ?? ?? ?? 48 ?? ?? 48 89 ?? ?? ?? ?? ?? 8B");

            // Prepare all data for scanning
            std::vector<OffsetScanEntry> UEoffsetsScans = {
                Make(&GObjectsaddress, GObjetcsStringObfuscated, "GObjects", OffsetCalcType::GetOffsetFromOpcode, &Offsets::GObjects, 0x3),
                Make(&GWorldaddress, GWorldStringObfuscated, "GWorld", OffsetCalcType::GetOffsetFromOpcode, &Offsets::GWorld, 0x3),
                Make(&AppendStringaddress, AppendStringStringObfuscated, "AppendString", OffsetCalcType::UE_CalculateOffset, &Offsets::AppendString),
                Make(&ProcessEventaddress, ProcessEventStringObfuscated, "ProcessEvent", OffsetCalcType::UE_CalculateOffset, &Offsets::ProcessEvent)
            };
            // Retrieve all Unreal Engine offsets in a batch
            Memory::OffsetScanBatch(UEoffsetsScans, baseModule, logger, "");

            logger->info("-------------- Fixes initialisation -------------");
        }
        AOBScanDone = true;
    }

    if (!init && FOVaddress) FOVFixEnabled();
    if (!init && ConstrainAspectaddress) UltraWideFixEnabled();
    if (!init && Cameraaddress) CameraFixEnabled();
    if (!init && DOFaddress) DOFFixEnabled();
    if (!init && CAaddress) CAFixEnabled();
    if (!init && Vignettingaddress) VignettingFixEnabled();
    if (!init && Fogaddress) FogFixEnabled();
    if (!init && GObjectsaddress && AppendStringaddress && ProcessEventaddress) EnableConsole();
    if (!init) {
        HUDFixEnabled();
        LogHUD();
    }
    if (!init && WorldTimedilationaddress) {
        EnableCheats(Cheat::TimeDilation);
        EnableCheats(Cheat::GodMode);
        EnableCheats(Cheat::Stealth);
    }
    ProcessEvent();
}

// Setters for Reshade addon call
extern "C" __declspec(dllexport) void SetFixesEnabled(GameFixes fix, bool enabled) {
    if (fix == GameFixes::DevConsole)           { g_Console = enabled; EnableConsole(); };
    if (fix == GameFixes::FOV)                  { g_fov_fix_enabled = enabled; FOVFixEnabled(); }
    if (fix == GameFixes::UltraWide)            { g_ultrawide_fix_enabled = enabled; UltraWideFixEnabled(); }
    if (fix == GameFixes::Camera)               { g_camera_fix_enabled = enabled; CameraFixEnabled(); }
    if (fix == GameFixes::DOF)                  { g_DOF_fix_enabled = enabled; DOFFixEnabled(); }
    if (fix == GameFixes::ChromaticAberrations) { g_CA_fix_enabled = enabled; CAFixEnabled(); }
    if (fix == GameFixes::Vignetting)           { g_Vignetting_fix_enabled = enabled; VignettingFixEnabled(); }
    if (fix == GameFixes::Fog)                  { g_Fog_fix_enabled = enabled; FogFixEnabled(); }
    if (fix == GameFixes::HUD)                  { g_HUD_fix_enabled = enabled; HUDFixEnabled(); LogHUD(); }
    if (fix == GameFixes::TimeDilation)         { g_TimeDilation_fix_enabled = enabled; EnableCheats(Cheat::TimeDilation); }
    if (fix == GameFixes::GodMode)              { g_GodMide_fix_enabled = enabled; EnableCheats(Cheat::GodMode); }
    if (fix == GameFixes::Stealth)              { g_Stealth_fix_enabled = enabled; EnableCheats(Cheat::Stealth); }
}

extern "C" __declspec(dllexport) void SetValues(GameSetting setting, float value) {
    if (setting == GameSetting::FOV) g_AdditionalFOVValue = (int)(value);
    if (setting == GameSetting::CameraDistance) g_CameraMultiplier = value;
    if (setting == GameSetting::HUD) {
        g_HUDOffsets = ((int)value * screenWidth) / 100;
        HUDFixEnabled();
    }
    if (setting == GameSetting::WorldTimeDilation) g_WorldTimeDilationValue = value;
    if (setting == GameSetting::AITimeDilation) g_AITimeDilationValue = value;
}

// Getters for Reshade addon call
extern "C" __declspec(dllexport) void GetGameInfos(GameInfos* infos) {
    if (!infos) return;

    infos->FOVIn = g_FOV_In;
    infos->FOVOut = g_FOV_Out;
    infos->cameraIn = g_Camera_In;
    infos->cameraOut = g_Camera_Out;
    infos->consoleEnabled = g_Console_Enabled;
}

// Hooks injections
static UUI_BP_PhoenixHUDWidget_C* gPhoenixHUDWidget = nullptr;
static ULONGLONG lastScanTick = 0; // Last time Actors were scanned for enemies time dilation
static void ProcessEvent() {
    if (!PEHook) {
        PEHook = safetyhook::create_mid(ProcessEventaddress + 0xc,
            [](SafetyHookContext& ctx) {
                UObject* object = (UObject*)ctx.rcx;
                UFunction* function = (UFunction*)ctx.rdx;

                std::string funcName = function->GetName();
                std::string objectName = object->GetName();

                if (g_HUD_fix_enabled && objectName.contains("UI_BP_PhoenixHUDWidget_C")) {
                    if (funcName == "OnShowEnemyInfo") {
                        UUI_BP_PhoenixHUDWidget_C* phoenixHUDWidget = reinterpret_cast<UUI_BP_PhoenixHUDWidget_C*>(ctx.rcx);
                        if (phoenixHUDWidget && phoenixHUDWidget->Class && phoenixHUDWidget->IsA(UUserWidget::StaticClass())) {
                            gPhoenixHUDWidget = phoenixHUDWidget; // Store UUI_BP_PhoenixHUDWidget_C pointer
                            HUDFixEnabled(); // Enable live offsets modifications
                        }
                    }
                    if (funcName == "Destruct") gPhoenixHUDWidget = nullptr;
                }
            });
    }
}
// HUD fix
static void HUDFixEnabled() {
    if (!gPhoenixHUDWidget) return;

    auto ApplyCanvas{ [](UWidget* panel, float left, float right = 0.f) {
        if (!panel || !panel->Slot || !panel->Slot->IsA(UCanvasPanelSlot::StaticClass())) return;
        auto* slot = static_cast<UCanvasPanelSlot*>(panel->Slot);

        FMargin offsets = slot->GetOffsets();
        offsets.Left = left;
        offsets.Right = right;
        slot->SetOffsets(offsets);
    }};

    float rootOffset = g_HUD_fix_enabled ? (float)g_HUDOffsets : 0.f;
    ApplyCanvas(gPhoenixHUDWidget->Root, rootOffset, rootOffset); // Position main HUD
    ApplyCanvas(gPhoenixHUDWidget->AsyncReticule, -rootOffset); // Fix Reticle shift
    ApplyCanvas(gPhoenixHUDWidget->BeaconHUDPanel, -rootOffset); // Fix marker shift
}

static void LogHUD() { // Log toggle state
    if (g_HUD_fix_enabled) logger->info("HUD fix enabled");
    else logger->info("HUD fix disabled");
}

static void FOVFixEnabled() {
    if (g_fix_enabled && g_fov_fix_enabled && FOVaddress) {
        if (!FOVHook) { // Hook only once
            FOVHook = safetyhook::create_mid(FOVaddress + 0xa,
                [](SafetyHookContext& ctx) {
                    g_FOV_In = ctx.xmm0.f32[0];
                    ctx.xmm0.f32[0] += g_fix_enabled && g_fov_fix_enabled ? g_AdditionalFOVValue : 0;
                    g_FOV_Out = ctx.xmm0.f32[0];
                });
        }
        else FOVHook.enable();
        logger->info("FOV fix enabled");
    }
    if (!(g_fix_enabled && g_fov_fix_enabled) && FOVaddress) {
        if (FOVHook) FOVHook.disable();
        logger->info("FOV fix disabled");
    }
}

static void CameraFixEnabled() {
    if (g_fix_enabled && g_camera_fix_enabled && Cameraaddress) {
        if (!CameraHook) { // Hook only once
            CameraHook = safetyhook::create_mid(Cameraaddress + 0x8,
                [](SafetyHookContext& ctx) {
                    g_Camera_In = ctx.xmm1.f32[0];
                    ctx.xmm1.f32[0] *= g_CameraMultiplier;
                    g_Camera_Out = ctx.xmm1.f32[0];
                });
        }
        else CameraHook.enable();
        logger->info("Camera fix enabled");
    }
    if (!(g_fix_enabled && g_camera_fix_enabled) && Cameraaddress) {
        if (CameraHook) CameraHook.disable();
        logger->info("Camera fix disabled");
    }
}

static void FogFixEnabled() {
    if (g_fix_enabled && g_Fog_fix_enabled && Fogaddress) {
        if (!FogHook) {
            FogHook = safetyhook::create_mid(Fogaddress,
                [](SafetyHookContext& ctx) {
                    if (!ctx.rax) return;
                    *reinterpret_cast<uint8_t*>(ctx.rax + 0x4) = g_fix_enabled && g_Fog_fix_enabled ? 0 : 1; // r.Fog = 0
                });
        }
        logger->info("Fog fix enabled");
    }
    if (!(g_fix_enabled && g_Fog_fix_enabled) && Fogaddress)
        logger->info("Fog fix disabled");
}

// Cheats
static UWorld* LastWorld = nullptr;
static void EnableCheats(Cheat cheat) {
    if (WorldTimedilationaddress && !WorldTimeDilationHook) {
        WorldTimeDilationHook = safetyhook::create_mid(WorldTimedilationaddress + 0x10,
            [](SafetyHookContext& ctx) {
                // From AWorldSettings retrieved from world->K2_GetWorldSettings()
                ctx.xmm0.f32[0] *= g_TimeDilation_fix_enabled ? g_WorldTimeDilationValue : 1.f;
            });
    }
    if (timedilationaddress && !TimeDilationHook) {
        TimeDilationHook = safetyhook::create_mid(timedilationaddress,
            [](SafetyHookContext& ctx) {
                if (!ctx.rbx) return;
                UObject* object = (UObject*)ctx.rbx;
                if (!object || !object->Class) return;

                ULONGLONG now = GetTickCount64();
                if (now - lastScanTick < DEFAULT_ACTORS_SCAN_BETWEEN_TICKS) return;
                lastScanTick = now;
                
                if (object->IsA(ABiped_Player::StaticClass())) {
                    ABiped_Player* bipedPlayer = static_cast<ABiped_Player*>(object);
                    if (bipedPlayer && bipedPlayer->Controller && bipedPlayer->Controller->IsA(APlayerController::StaticClass()))
                        if (g_GodMide_fix_enabled) bipedPlayer->RestoreHealth();
                }
                if (!object->IsA(AEnemy_Character::StaticClass())) return;

                AEnemy_Character* enemy = static_cast<AEnemy_Character*>(object);
                if (!enemy || !enemy->Class) return;
                enemy->CustomTimeDilation = g_TimeDilation_fix_enabled ? g_AITimeDilationValue : 1.f; // Enemy time dilation
                if (enemy->EnemyAIComponent && enemy->EnemyAIComponent->IsA(UEnemyAIComponent::StaticClass()))
                    enemy->EnemyAIComponent->EnablePerception(!g_Stealth_fix_enabled); // Stealth mode
            });
    }

    if (cheat == Cheat::TimeDilation) logger->info("Time dilation cheat {}", g_TimeDilation_fix_enabled ? "enabled" : "disabled");
    if (cheat == Cheat::GodMode) logger->info("God mode cheat {}", g_GodMide_fix_enabled ? "enabled" : "disabled");
    if (cheat == Cheat::Stealth) logger->info("Stealth cheat {}", g_Stealth_fix_enabled ? "enabled" : "disabled");
}

// Memory patch fixes
static void UltraWideFixEnabled() {
    if (g_fix_enabled && g_ultrawide_fix_enabled && ConstrainAspectaddress) {
        Memory::PatchBytes(ConstrainAspectaddress, "\x31\xC9\x90\x90\x90\x90\x90", 7); // bConstrainAspectRatio = 0
        logger->info("Ultra wide fix enabled");
    }
    if (!(g_fix_enabled && g_ultrawide_fix_enabled) && ConstrainAspectaddress) {
        Memory::RestoreBytes(ConstrainAspectaddress);
        logger->info("Ultra wide fix disabled");
    }
}

static void DOFFixEnabled() {
    if (g_fix_enabled && g_DOF_fix_enabled && DOFaddress) {
        Memory::PatchBytes(DOFaddress, "\x31\xFF\x90", 3); // xor edi,edi r.DepthOfFieldQuality = 0
        logger->info("Depth of field fix enabled");
    }
    if (!(g_fix_enabled && g_DOF_fix_enabled) && DOFaddress) {
        Memory::RestoreBytes(DOFaddress);
        logger->info("Depth of field fix disabled");
    }
}

static void CAFixEnabled() {
    if (g_fix_enabled && g_CA_fix_enabled && CAaddress) {
        Memory::PatchBytes(CAaddress, "\x90\x90", 2); // NOP jg "HellIsUs-Win64-Shipping.exe"+3D73BD5 r.SceneColorFringeQuality = 0
        logger->info("Chromatic aberrations fix enabled");
    }
    if (!(g_fix_enabled && g_CA_fix_enabled) && CAaddress) {
        Memory::RestoreBytes(CAaddress);
        logger->info("Chromatic aberrations fix disabled");
    }
}

static void VignettingFixEnabled() {
    if (g_fix_enabled && g_Vignetting_fix_enabled && Vignettingaddress) {
        Memory::PatchBytes(Vignettingaddress, "\x31\xC9", 2); // xor ecx,ecx r.Tonemapper.Quality=0
        logger->info("Vignetting fix enabled");
    }
    if (!(g_fix_enabled && g_Vignetting_fix_enabled) && Vignettingaddress) {
        Memory::RestoreBytes(Vignettingaddress);
        logger->info("Vignetting fix disabled");
    }
}

// UE Console creation
static void EnableConsole() {
    if (g_Console_Enabled || !g_Console || !GObjectsaddress || !AppendStringaddress || !ProcessEventaddress) {
        if (!g_Console && !user_inputs_logged) {
            logger->info("------------------ User inputs ------------------");
            user_inputs_logged = true;
        }
        return;
    }

    logger->info("-------------- Console re-enabling --------------");
    ReactivateDevConsole(logger);
}

// Standard dll entry
BOOL APIENTRY DllMain(HMODULE hModule, DWORD reason, LPVOID) {
    if (reason == DLL_PROCESS_ATTACH) {
        logger = InitializeLogger("Hogwarts Legacy", PLUGIN_LOG);
        logger->info("Plugin {} loaded.", PLUGIN_NAME);
    }
    else if (reason == DLL_PROCESS_DETACH) {
        logger->info("Plugin {} unloaded.", PLUGIN_NAME);
        spdlog::drop_all();
    }
    return TRUE;
}