#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 "SDK/DarwinParadox_classes.hpp"

using namespace SDK;

// Constants
const std::string PLUGIN_NAME = "DarwinsParadox";
const std::string PLUGIN_LOG = PLUGIN_NAME + ".log";
constexpr ULONGLONG DEFAULT_DELAY_BETWEEN_TICK = 500; // Used for retrieving Game resolution

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

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

// Plugin states
static bool AOBScanDone = false;
static bool g_Console = false;
static bool g_fix_enabled = false;
static bool g_fov_fix_enabled = false;
static bool g_ultrawide_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_Stealth_fix_enabled = false;
static int g_AdditionalFOVValue = 0;
static float g_WorldTimeDilationValue = 1.f;
static bool user_inputs_logged = false;

// Shared values
static float g_FOV_In = 80.f;
static float g_CompensatedFOV = 80.f;
static float g_FOV_Out = 80.f;

// AOB Scan pointers
static uint8_t* DOFaddress = nullptr;
static uint8_t* CAaddress = nullptr;
static uint8_t* Vignettingaddress = nullptr;
static uint8_t* Fogaddress = nullptr;
static uint8_t* CameraComponentaddress = nullptr;
static uint8_t* WorldTimedilationaddress = nullptr;
static uint8_t* Timedilationaddress = nullptr;

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

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

extern "C" __declspec(dllexport) void SetFixEnabled(bool enabled, bool init) {
    g_fix_enabled = enabled;
    if (!AOBScanDone) { // Unreal Engine 5.4.4
        logger = InitializeLogger("Darwin's Paradox", PLUGIN_LOG);
        logger->info("Plugin {} loaded.", PLUGIN_NAME);
        logger->info("--------------- AOB scan started ---------------");
        constexpr auto CameraComponentStringObfuscated = make_obfuscated<0xF3>("EB ?? F3 0F ?? ?? ?? ?? ?? ?? F3 0F ?? ?? ?? 8B 83");
        constexpr auto DOFStringObfuscated = make_obfuscated<0xC1>("8B ?? ?? 48 ?? ?? E8 ?? ?? ?? ?? 0F ?? ?? 48 6B ?? ?? 48 8D");
        constexpr auto CAStringObfuscated = make_obfuscated<0x39>("7F ?? 44 89 ?? ?? ?? ?? ?? 43 8B ?? ?? 39 05 ?? ?? ?? ?? 0F 8F");
        constexpr auto VignettingStringObfuscated = make_obfuscated<0xEB>("8B ?? 83 ?? ?? 7D ?? 44 89 ?? ?? ?? ?? ?? EB");
        constexpr auto FogStringObfuscated = make_obfuscated<0x75>("74 ?? 48 8B ?? ?? ?? ?? ?? 83 ?? ?? ?? 75 ?? 40 ?? ?? EB ?? 40 ?? ?? 48 8B");
        constexpr auto WorldTimeDilationStringObfuscated = make_obfuscated<0x59>("F3 0F 10 ?? ?? ?? ?? ?? F3 0F 59 ?? ?? ?? ?? ?? F3 0F 59 ?? ?? ?? ?? ?? C3");
        constexpr auto TimeDilationStringObfuscated = make_obfuscated<0x44>("F3 0F ?? ?? ?? EB ?? F3 0F ?? ?? ?? ?? ?? ?? 48 8B ?? ?? 4C ?? ?? F3 0F ?? ?? 44");

        using AOBScan::Make;
        using OffsetScan::Make;
        // Prepare all data for scanning
        std::vector<AOBScanEntry> signatures = {
            Make(&CameraComponentaddress, CameraComponentStringObfuscated, "Camera component"),
            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, TimeDilationStringObfuscated, "Actor time dilation"),
        };
        // Scan all signature in a batch
        Memory::AOBScanBatch(signatures, logger);

        if (CameraComponentaddress && DOFaddress && CAaddress && Vignettingaddress &&
            Fogaddress && WorldTimedilationaddress && Timedilationaddress)
            logger->info("All AOB signatures found. Ready to patch...");

        if (!GObjectsaddress || !AppendStringaddress || !ProcessEventaddress) {
            logger->info("------------ UEngine offsets search ------------");
            uint8_t* baseModule = reinterpret_cast<uint8_t*>(GetModuleHandleA(nullptr)); // Get game base address

            constexpr auto GObjetcsStringObfuscated = make_obfuscated<0x8D>("48 8B ?? ?? ?? ?? ?? 48 8B ?? ?? 48 8D ?? ?? EB ?? 33");
            constexpr auto AppendStringStringObfuscated = make_obfuscated<0x80>("48 89 ?? ?? ?? 48 89 ?? ?? ?? 57 48 83 ?? ?? 80 3D ?? ?? ?? ?? ?? 48 ?? F2 8B ?? 48 ?? ?? 74 ?? 4C 8D ?? ?? ?? ?? ?? EB ?? 48 8D ?? ?? ?? ?? ?? E8 ?? ?? ?? ?? 4C");
            constexpr auto ProcessEventStringObfuscated = make_obfuscated<0x56>("40 ?? 56 57 41 ?? 41 ?? 41 ?? 41 ?? 48 81 ?? ?? ?? ?? ?? 48 8D ?? ?? ?? 48 89 ?? ?? ?? ?? ?? 48 8B ?? ?? ?? ?? ?? 48 ?? ?? 48 89 ?? ?? ?? ?? ?? 4D");

            // Prepare all data for scanning
            std::vector<OffsetScanEntry> UEoffsetsScans = {
                Make(&GObjectsaddress, GObjetcsStringObfuscated, "GObjects", OffsetCalcType::GetOffsetFromOpcode, &Offsets::GObjects, 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;
    }

    ProcessEvent();
    if (init) return;
    FOVFixEnabled();
    UltraWideFixEnabled();
    DOFFixEnabled();
    CAFixEnabled();
    VignettingFixEnabled();
    FogFixEnabled();
}

// Setters for Reshade addon call
extern "C" __declspec(dllexport) void SetFixesEnabled(GameFixes fix, bool enabled) { // Set each fix individually
    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::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::TimeDilation)         { g_TimeDilation_fix_enabled = enabled; EnableCheats(Cheat::TimeDilation); }
    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::WorldTimeDilation) g_WorldTimeDilationValue = value;
}
// Getters for Reshade addon call
extern "C" __declspec(dllexport) void GetGameInfos(GameInfos* infos) {
    if (!infos) return;

    infos->FOVIn = g_FOV_In;
    infos->CompensatedFOV = g_CompensatedFOV;
    infos->FOVOut = g_FOV_Out;
    infos->consoleEnabled = g_Console_Enabled;
    infos->screenWidth = screenWidth;
    infos->screenHeight = screenHeight;
    infos->aspectRatio = (float)screenWidth / screenHeight;
}

// Code injection functions
static ULONGLONG lastScanTick = 0; // Last time tick was called
static void ProcessEvent() {
    if (!PEHook && ProcessEventaddress) {
        PEHook = safetyhook::create_mid(ProcessEventaddress + 0xc,
            [](SafetyHookContext& ctx) {
                UObject* object = (UObject*)ctx.rcx;
                UFunction* func = (UFunction*)ctx.rdx;

                ULONGLONG now = GetTickCount64();
				if (now - lastScanTick >= DEFAULT_DELAY_BETWEEN_TICK) { // Get game resolution every 500 ms, (like when alt-tabbing or changing settings)
                    lastScanTick = now;
                    GetResolution(screenWidth, screenHeight, g_AspectRatio);
                }
            });
    }
}

static void FOVFixEnabled() {
    if (!CameraComponentaddress) return;
    if (g_fix_enabled && g_fov_fix_enabled) {
        if (!FOVHook) { // Hook only once
            FOVHook = safetyhook::create_mid(CameraComponentaddress + 0xa,
                [](SafetyHookContext& ctx) {
					UWorld* world = UWorld::GetWorld();
                    // Game default FOV is locked to 60, we need to unlock it before applying our fix
                    if (world && world->PersistentLevel) {
                        UZGameplayStatics::UnlockFOV(world);
                        if (UZGameplayStatics::IsInCinematicMode(world)) return;
                    }
                    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();
    }
    else if (FOVHook) FOVHook.disable();

    logger->info("FOV fix {}", g_fix_enabled && g_fov_fix_enabled ? "enabled" : "disabled");
}

// Cheats
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;

                if (object->IsA(AZCharacter::StaticClass())) {
                    AZCharacter* character = static_cast<AZCharacter*>(object);
                    if (g_Stealth_fix_enabled) {
                        if (character->SensingComponent) {
                            character->SensingComponent->ResetSensing();
                            character->SensingComponent->SetSensingLOD(ESensingLOD::None);
                        }                        
                    }
                    else if (character->SensingComponent) character->SensingComponent->SetSensingLOD(ESensingLOD::Light);
                }
            });
    }
    if (cheat == Cheat::TimeDilation) logger->info("Time dilation cheat {}", g_TimeDilation_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 (!CameraComponentaddress) return;
    if (g_fix_enabled && g_ultrawide_fix_enabled)
        Memory::PatchBytes(CameraComponentaddress + 0x18, "\x31\xC9\x90\x90\x90\x90\x90", 7); // bConstrainAspectRatio = 0
    else Memory::RestoreBytes(CameraComponentaddress + 0x18);

    logger->info("Ultrawide fix {}", g_fix_enabled && g_ultrawide_fix_enabled ? "enabled" : "disabled");
}

static void DOFFixEnabled() {
	if (!DOFaddress) return;
    if (g_fix_enabled && g_DOF_fix_enabled)
        Memory::PatchBytes(DOFaddress, "\x31\xFF\x90", 3); // xor edi,edi r.DepthOfFieldQuality = 0
    else Memory::RestoreBytes(DOFaddress);

    logger->info("Depth of field fix {}", g_fix_enabled && g_DOF_fix_enabled ? "enabled" : "disabled");
}

static void CAFixEnabled() {
	if (!CAaddress) return;
    if (g_fix_enabled && g_CA_fix_enabled)
        Memory::PatchBytes(CAaddress, "\x90\x90", 2); // NOP x 2 r.SceneColorFringeQuality = 0
    else Memory::RestoreBytes(CAaddress);

    logger->info("Chromatics aberrations fix {}", g_fix_enabled && g_CA_fix_enabled ? "enabled" : "disabled");
}

static void VignettingFixEnabled() {
	if (!Vignettingaddress) return;
    if (g_fix_enabled && g_Vignetting_fix_enabled)
        Memory::PatchBytes(Vignettingaddress, "\x31\xC9", 2); // xor ecx,ecx r.Tonemapper.Quality=0
    else Memory::RestoreBytes(Vignettingaddress);

    logger->info("Vignetting fix disabled", g_fix_enabled && g_CA_fix_enabled ? "enabled" : "disabled");
}

static void FogFixEnabled() {
	if (!Fogaddress) return;
    if (g_fix_enabled && g_Fog_fix_enabled)
        Memory::PatchBytes(Fogaddress, "\xEB", 1); // jmp -> r.Fog 0
    else Memory::RestoreBytes(Fogaddress);

    logger->info("Fog fix disabled", g_fix_enabled && g_Fog_fix_enabled ? "enabled" : "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_DETACH) {
        logger->info("Plugin {} unloaded.", PLUGIN_NAME);
        spdlog::drop_all();
    }
    return TRUE;
}