#include <string>
#include <spdlog/spdlog.h>
#include <spdlog/sinks/rotating_file_sink.h>
#include <filesystem>
#include <safetyhook.hpp>
#include "ObfuscateString.h"
#include "Memory.hpp";
#include "Maths.hpp";
#include "UEngine.hpp";
#include "SDK/Basic.hpp"
#include "SDK/Engine_classes.hpp"

using namespace SDK;

// Constants
const std::string PLUGIN_NAME = "SilentHillf";
const std::string PLUGIN_LOG = PLUGIN_NAME + ".log";
const std::string gameExecutable = "SHf-Win64-Shipping.exe";
const float BASE_ASPECT = 1.777777791;

// 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_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_Camera_fix_enabled = false;
static int g_AdditionalFOVValue = 0;
static float g_CameraDistance = 1.f;

// Shared values
static float g_reference_FOV = 65.f;
static float g_FOV_In = 0.f;
static float g_FOV_Out = 0.f;
static bool g_Console_Enabled = false;

// AOB Unreal Engine offsets addresses
static uint8_t* GObjectsaddress = nullptr;
static uint8_t* GNamesaddress = nullptr;
static uint8_t* AppendStringaddress = nullptr;
static uint8_t* ProcessEventaddress = nullptr;

// AOB Scan pointers
static uint8_t* FOVaddress = nullptr;
static uint8_t* DOFaddress = nullptr;
static uint8_t* CAaddress = nullptr;
static uint8_t* Vignettingaddress = nullptr;
static uint8_t* VolumetricFogaddress = nullptr;
static uint8_t* Cameraaddress = nullptr;

// Hooking
static SafetyHookMid FOVHook{};
static SafetyHookMid VolumetricFogHook{};
static SafetyHookMid HUDHook{};
static SafetyHookMid CameraHook{};

// Prototypes
static void FOVFixEnabled();
static void DOFFixEnabled();
static void CAFixEnabled();
static void VignettingFixEnabled();
static void FogFixEnabled();
static void CameraFixEnabled();
static void EnableConsole();

extern "C" __declspec(dllexport) void SetFixEnabled(bool enabled)
{
    g_fix_enabled = enabled;
    if (g_fix_enabled && !AOBScanDone) {
        logger->info("--------------- AOB scan started ---------------");
        if (FOVaddress == nullptr) {
            constexpr auto FOVStringObfuscated = make_obfuscated<0x4A>("F3 0F ?? ?? 0F 28 ?? ?? ?? F3 0F ?? ?? ?? F3 0F 11 ?? ?? ?? ?? ?? ?? 45");
            FOVaddress = Memory::AOBScan(gameExecutable, FOVStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            //"SHf-Win64-Shipping.exe" + 48917E2 - 48 8B AC 24 A8 00 00 00 - mov rbp, [rsp + 000000A8]
            //"SHf-Win64-Shipping.exe" + 48917EA - F3 0F 58 B7 98 02 00 00 - addss xmm6, [rdi + 00000298]
            //"SHf-Win64-Shipping.exe" + 48917F2 - F3 0F 58 F7             - addss xmm6, xmm7
            //"SHf-Win64-Shipping.exe" + 48917F6 - 0F 28 7C 24 60          - movaps xmm7, [rsp + 60]
            //"SHf-Win64-Shipping.exe" + 48917FB - F3 0F 58 76 30          - addss xmm6, [rsi + 30]

            if (!FOVaddress)
                logger->warn("FOV signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                logger->info("FOV signature found at address: 0x{:X}.", reinterpret_cast<uintptr_t>(FOVaddress));
            }
        }

        if (DOFaddress == nullptr) {
            constexpr auto DOFStringObfuscated = make_obfuscated<0x4A>("8B ?? ?? 48 ?? ?? E8 ?? ?? ?? ?? 0F ?? ?? 48 6B ?? ?? 48 8D");
            DOFaddress = Memory::AOBScan(gameExecutable, DOFStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            //"SHf-Win64-Shipping.exe" + 2556DB2 - 75 05          - jne "SHf-Win64-Shipping.exe" + 2556DB9
            //"SHf-Win64-Shipping.exe" + 2556DB4 - BF 04 00 00 00 - mov edi, SilentHillfUI._Init_thread_epoch
            //"SHf-Win64-Shipping.exe" + 2556DB9 - 8B 3C 37       - mov edi, [rdi + rsi]
            //"SHf-Win64-Shipping.exe" + 2556DBC - 48 8B CB       - mov rcx, rbx
            //"SHf-Win64-Shipping.exe" + 2556DBF - E8 6C A2 67 01 - call "SHf-Win64-Shipping.exe" + 3BD1030

            if (!DOFaddress)
                logger->warn("DOF signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                logger->info("DOF signature found at address: 0x{:X}.", reinterpret_cast<uintptr_t>(DOFaddress));
            }
        }

        if (CAaddress == nullptr) {
            constexpr auto CAStringObfuscated = make_obfuscated<0x4A>("7F ?? 44 89 ?? ?? ?? ?? ?? 43 ?? ?? ?? 39 05");
            CAaddress = Memory::AOBScan(gameExecutable, CAStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            //"SHf-Win64-Shipping.exe" + 3BCD042 - 48 8B 05 87 CE 74 05 - mov rax, ["SHf-Win64-Shipping.exe" + 9319ED0]
            //"SHf-Win64-Shipping.exe" + 3BCD049 - 44 39 38             - cmp[rax], r15d
            //"SHf-Win64-Shipping.exe" + 3BCD04C - 7F 07                - jg "SHf-Win64-Shipping.exe" + 3BCD055
            //"SHf-Win64-Shipping.exe" + 3BCD04E - 44 89 BB 2C 1F 00 00 - mov[rbx + 00001F2C], r15d
            //"SHf-Win64-Shipping.exe" + 3BCD055 - 43 8B 04 26          - mov eax, [r14 + r12]

            if (!CAaddress)
                logger->warn("Chromatic aberrations signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                logger->info("Chromatic aberrations signature found at address: 0x{:X}.", reinterpret_cast<uintptr_t>(CAaddress));
            }
        }

        if (Vignettingaddress == nullptr) {
            constexpr auto VignettingStringObfuscated = make_obfuscated<0x4A>("8B ?? 83 ?? ?? 7D ?? 44 89");
            Vignettingaddress = Memory::AOBScan(gameExecutable, VignettingStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            //"SHf-Win64-Shipping.exe" + 3BCD0D6 - 44 89 BB 34 1F 00 00 - mov[rbx + 00001F34], r15d
            //"SHf-Win64-Shipping.exe" + 3BCD0DD - 48 8B 05 64 BB 74 05 - mov rax, ["SHf-Win64-Shipping.exe" + 9318C48]
            //"SHf-Win64-Shipping.exe" + 3BCD0E4 - 8B 08                - mov ecx, [rax]
            //"SHf-Win64-Shipping.exe" + 3BCD0E6 - 83 F9 02             - cmp ecx, 02
            //"SHf-Win64-Shipping.exe" + 3BCD0E9 - 7D 09                - jnl "SHf-Win64-Shipping.exe" + 3BCD0F4

            if (!Vignettingaddress)
                logger->warn("Vignetting signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                logger->info("Vignetting signature found at address: 0x{:X}.", reinterpret_cast<uintptr_t>(Vignettingaddress));
                Vignettingaddress += 0x5;
            }
        }

        if (VolumetricFogaddress == nullptr) {
            constexpr auto FogStringObfuscated = make_obfuscated<0x4A>("0F 84 ?? ?? ?? ?? F6 ?? ?? ?? 0F 84 ?? ?? ?? ?? 83 BF");
            VolumetricFogaddress = Memory::AOBScan(gameExecutable, FogStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            //"SHf-Win64-Shipping.exe" + 2174B8A - E8 51 73 F0 FE - call "SHf-Win64-Shipping.exe" + 107BEE0
            //"SHf-Win64-Shipping.exe" + 2174B8F - 0F B6 C3       - movzx eax, bl
            //"SHf-Win64-Shipping.exe" + 2174B92 - 48 8B 4C 24 50 - mov rcx, [rsp + 50]
            //"SHf-Win64-Shipping.exe" + 2174B97 - 48 33 CC       - xor rcx, rsp
            //"SHf-Win64-Shipping.exe" + 2174B9A - E8 91 78 C2 04 - call "SHf-Win64-Shipping.exe" + 6D9C430

            if (!VolumetricFogaddress)
                logger->warn("Volumetric fog signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                logger->info("Volumetric fog signature found at address: 0x{:X}.", reinterpret_cast<uintptr_t>(VolumetricFogaddress));
            }
        }

        if (Cameraaddress == nullptr) { // Low level function involved in displaying Widgets in real time
            constexpr auto CameraStringObfuscated = make_obfuscated<0x4A>("41 0F ?? ?? 48 8D ?? ?? ?? 48 8D ?? ?? ?? ?? ?? F3 0F ?? ?? ?? ?? F3 0F");
            Cameraaddress = Memory::AOBScan(gameExecutable, CameraStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            //"SHf-Win64-Shipping.exe" + 488F5F5 - F3 0F 11 86 CC 01 00 00 - movss[rsi + 000001CC], xmm0
            //"SHf-Win64-Shipping.exe" + 488F5FD - 4D 8D 8E B4 00 00 00    - lea r9, [r14 + 000000B4]
            //"SHf-Win64-Shipping.exe" + 488F604 - F3 0F 58 86 C0 01 00 00 - addss xmm0, [rsi + 000001C0]
            //"SHf-Win64-Shipping.exe" + 488F60C - 41 0F 28 D0             - movaps xmm2, xmm8
            //"SHf-Win64-Shipping.exe" + 488F610 - 48 8D 54 24 60          - lea rdx, [rsp + 60]

            if (!Cameraaddress)
                logger->warn("Camera signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                logger->info("Camera signature found at address: 0x{:X}.", reinterpret_cast<uintptr_t>(Cameraaddress));
            }
        }

        if (FOVaddress && DOFaddress && CAaddress && Vignettingaddress && VolumetricFogaddress) {
            logger->info("All AOB signatures found. Ready to patch...");
            AOBScanDone = true;
        }

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

            constexpr auto GObjetcsStringObfuscated = make_obfuscated<0x4A>("48 8B ?? ?? ?? ?? ?? 48 8B ?? ?? 48 8D ?? ?? EB ?? 33");
            GObjectsaddress = Memory::AOBScan(gameExecutable, GObjetcsStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            constexpr auto GNamesStringObfuscated = make_obfuscated<0x4A>("48 8D ?? ?? ?? ?? ?? EB ?? 48 8D ?? ?? ?? ?? ?? E8 ?? ?? ?? ?? C6 05 ?? ?? ?? ?? ?? 0F ?? ?? 4C");
            GNamesaddress = Memory::AOBScan(gameExecutable, GNamesStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            constexpr auto AppendStringStringObfuscated = make_obfuscated<0x4A>("48 89 ?? ?? ?? 48 89 ?? ?? ?? 57 48 83 ?? ?? 80 3D ?? ?? ?? ?? ?? 48 8B F2 8B ?? 48");
            AppendStringaddress = Memory::AOBScan(gameExecutable, AppendStringStringObfuscated.decrypt(), PAGE_EXECUTE_READ);
            constexpr auto ProcessEventStringObfuscated = make_obfuscated<0x4A>("40 ?? 56 57 41 ?? 41 ?? 41 ?? 41 ?? 48 81 ?? ?? ?? ?? ?? 48 8D ?? ?? ?? 48 89 ?? ?? ?? ?? ?? 48 8B ?? ?? ?? ?? ?? 48 33 ?? 48 89 ?? ?? ?? ?? ?? 4D ?? ?? 48");
            ProcessEventaddress = Memory::AOBScan(gameExecutable, ProcessEventStringObfuscated.decrypt(), PAGE_EXECUTE_READ);

            if (!GObjectsaddress)
                logger->warn("GObjects signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                uint32_t gObjectsOffset = static_cast<uint32_t>(Memory::GetOffsetFromOpcode(GObjectsaddress + 0x3) -
                    reinterpret_cast<uint8_t*>(GetModuleHandleA(gameExecutable.c_str())));
                logger->info("GObjects offset is: 0x{:X}.", gObjectsOffset);
                Offsets::GObjects = static_cast<UC::uint32>(gObjectsOffset); // Update GObjects offset
            }

            if (!GNamesaddress)
                logger->warn("GNames signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                uint32_t gNamesOffset = static_cast<uint32_t>(Memory::GetOffsetFromOpcode(GNamesaddress + 0x3) -
                    reinterpret_cast<uint8_t*>(GetModuleHandleA(gameExecutable.c_str())));
                logger->info("GNames offset is: 0x{:X}.", gNamesOffset);
                Offsets::GNames = static_cast<UC::uint32>(gNamesOffset); // Update GNames offset
            }

            if (!AppendStringaddress)
                logger->warn("AppendString signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                std::optional<uint32_t> gAppendStringOffsetOpt = UE::CalculateOffset(gameExecutable, AppendStringaddress);  // Get Offset from opcode
                uint32_t gAppendStringOffset = *gAppendStringOffsetOpt;
                logger->info("AppendString offset is: 0x{:X}.", gAppendStringOffset);
                Offsets::AppendString = static_cast<UC::uint32>(gAppendStringOffset); // Update AppendString offset
            }

            if (!ProcessEventaddress)
                logger->warn("Process Event signature not found. Maybe your game has been updated and is no more compatible with this plugin.");
            else {
                std::optional<uint32_t> gProcessEventOffsetOpt = UE::CalculateOffset(gameExecutable, ProcessEventaddress);
                uint32_t gProcessEventOffset = *gProcessEventOffsetOpt;
                logger->info("Process Event offset is: 0x{:X}.", gProcessEventOffset);
                Offsets::ProcessEvent = static_cast<UC::uint32>(gProcessEventOffset);// Update ProcessEvent offset
            }
        }

        logger->info("-------------- Fixes initialisation -------------");
    }

    if (FOVaddress) FOVFixEnabled();
    if (Cameraaddress) CameraFixEnabled();
    if (DOFaddress) DOFFixEnabled();
    if (CAaddress) CAFixEnabled();
    if (Vignettingaddress) VignettingFixEnabled();
    if (VolumetricFogaddress) FogFixEnabled();
    if (!g_Console_Enabled && GObjectsaddress && GNamesaddress && AppendStringaddress && ProcessEventaddress)
        EnableConsole();
}

// Setters for Reshade addon call
extern "C" __declspec(dllexport) void SetFOVFixEnabled(bool enabled, bool init)
{
    g_fov_fix_enabled = enabled;
    if (!init) FOVFixEnabled();
}

extern "C" __declspec(dllexport) void SetDOFFixEnabled(bool enabled, bool init)
{
    g_DOF_fix_enabled = enabled;
    if (!init) DOFFixEnabled();
}

extern "C" __declspec(dllexport) void SetCAFixEnabled(bool enabled, bool init)
{
    g_CA_fix_enabled = enabled;
    if (!init) CAFixEnabled();
}

extern "C" __declspec(dllexport) void SetVignettingFixEnabled(bool enabled, bool init)
{
    g_Vignetting_fix_enabled = enabled;
    if (!init) VignettingFixEnabled();
}

extern "C" __declspec(dllexport) void SetFogFixEnabled(bool enabled, bool init)
{
    g_Fog_fix_enabled = enabled;
    if (!init) FogFixEnabled();
}

extern "C" __declspec(dllexport) void SetCameraFixEnabled(bool enabled, bool init)
{
    g_Camera_fix_enabled = enabled;
    if (!init) CameraFixEnabled();
}


extern "C" __declspec(dllexport) void SetFOV(int fov)
{
    g_AdditionalFOVValue = fov;
}

extern "C" __declspec(dllexport) void SetCameraDistance(float multiplier) {
    g_CameraDistance = multiplier;
}

// Getters for Reshade addon call
extern "C" __declspec(dllexport) float GetFOVIn() {
    return g_FOV_In;
}

extern "C" __declspec(dllexport) float GetFOVOut() {
    return g_FOV_Out;
}

extern "C" __declspec(dllexport) bool GetConsoleEnabled() {
    return g_Console_Enabled;
}

// Code injection functions
static void FOVFixEnabled() {
    if (g_fix_enabled && g_fov_fix_enabled && FOVaddress) {
        if (!FOVHook) { // Hook only once
            FOVHook = safetyhook::create_mid(FOVaddress,
                [](SafetyHookContext& ctx) {
                    g_FOV_In = ctx.xmm6.f32[0];
                    ctx.xmm6.f32[0] += (g_fix_enabled && g_fov_fix_enabled ? g_AdditionalFOVValue : g_FOV_In);
                    g_FOV_Out = ctx.xmm6.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) {
            CameraHook = safetyhook::create_mid(Cameraaddress,
                [](SafetyHookContext& ctx) {
                    ctx.xmm0.f32[0] *= g_CameraDistance;
                });
        }
        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");
    }
}

// Memory patch fixes
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
        logger->info("Chromatics aberrations fix enabled");
    }
    if (!(g_fix_enabled && g_CA_fix_enabled) && CAaddress) {
        Memory::RestoreBytes(CAaddress);
        logger->info("Chromatics 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");
    }
}

static void FogFixEnabled() {
    if (g_fix_enabled && g_Fog_fix_enabled && VolumetricFogaddress) {
        if (!VolumetricFogHook) {
            VolumetricFogHook = safetyhook::create_mid(VolumetricFogaddress,
                [](SafetyHookContext& ctx) {
                    ctx.rflags |= 0x40;
                });
        }
        logger->info("Fog fix enabled");
    }
}

// UE Console creation
static void EnableConsole()
{
    logger->info("-------------- Console re-enabling --------------");
    if (!GObjectsaddress || !AppendStringaddress || !ProcessEventaddress) {
        logger->warn("Could not re-enable console");
        logger->info("------------------ User inputs ------------------");
        return;
    }

    std::thread([&]() {
        auto start = std::chrono::high_resolution_clock::now(); // Measure the time to renable console
        UEngine* Engine = nullptr;

        for (int i = 0; i < 100; ++i) { // gives 10 seconds to find UE Engine
            std::this_thread::sleep_for(std::chrono::milliseconds(100));
            Engine = UEngine::GetEngine();
            if (Engine && Engine->ConsoleClass && Engine->GameViewport)
                break;
        }

        if (!Engine || !Engine->ConsoleClass || !Engine->GameViewport) {
            logger->error("Console could not be found in engine.");
            return;
        }
        logger->info("Console found in engine");

        /* Creates a new UObject of class-type specified by Engine->ConsoleClass */
        UObject* NewObject = UGameplayStatics::SpawnObject(Engine->ConsoleClass, Engine->GameViewport);
        if (NewObject)
        {
            logger->info("Successfully spawned console object");
            // Set the console viewport so that it will be displayed
            Engine->GameViewport->ViewportConsole = static_cast<UConsole*>(NewObject);
            auto end = std::chrono::high_resolution_clock::now();
            std::chrono::duration<double> elapsed = end - start;

            logger->info("Console fully reactivated in {:.3f}s and bound to key Tilde", elapsed.count());
            logger->info("------------------ User inputs ------------------");

            g_Console_Enabled = true;
        }
        else {
            logger->error("Could not spawn console object");
        }
    }).detach();
}

static void InitializeLogger()
{
    try
    {
        std::filesystem::path log_path = std::filesystem::absolute(PLUGIN_LOG);
        if (std::filesystem::exists(log_path))
            std::filesystem::remove(log_path);
        logger = std::make_shared<spdlog::logger>("Silent Hill f", std::make_shared<spdlog::sinks::rotating_file_sink_st>(PLUGIN_LOG, 10 * 1024 * 1024, 1));
        logger->set_level(spdlog::level::debug);
        logger->flush_on(spdlog::level::debug); // Flush automatically
    }
    catch (const spdlog::spdlog_ex& ex)
    {
        std::string plugin_error_message = "Could not open " + PLUGIN_LOG;
        MessageBoxA(nullptr, plugin_error_message.c_str(), "Logger Error", MB_ICONERROR | MB_OK);
    }
}

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