local _, addon = ...
local API = addon.API;
local CallbackRegistry = addon.CallbackRegistry;

local CameraUtil = CreateFrame("Frame");
addon.CameraUtil = CameraUtil;
addon.SetCameraController(CameraUtil);

-- User Settings
local HIDE_UI = false;
local HIDE_UNIT_NAMES = false;
local CHANGE_FOV = false;
local DISABLE_IN_INSTANCE = false;
local FOV_DEFAULT = 90;
local FOV_ZOOMED_IN = 75;
local FOCUS_STRENGTH_PITCH = 1.0;
local FOCUS_SHOULDER_OFFSET_DEFAULT = 1.5;
local FOCUS_SHOULDER_OFFSET = FOCUS_SHOULDER_OFFSET_DEFAULT;
local MOUNTED_CAMERA_ENABLED = true;
local MOUNTED_CAMERA_MULTIPLIER = 4.8;  --1.85 (Netherwing)     1.25(Renewed Proto)   (update 5.725)
local HIDE_SPARKLES = false;
local ZOOM_MUTIPLIER = 1.0;
------------------
local PAN_MULTIPLIER = 1.0;
local PLAYER_IS_SHAPESHIFTER = false;
local NO_CHANGE_FLAG = 255;

local DeltaLerp = API.DeltaLerp;
local Esaing_OutSine = addon.EasingFunctions.outSine;
local IsPlayingCutscene = API.IsPlayingCutscene;

local SetCVar = C_CVar.SetCVar;     --not boolean
local GetCVar = C_CVar.GetCVar;
local IsInteractingWithNpcOfType = C_PlayerInteractionManager.IsInteractingWithNpcOfType;
local GetCameraZoom = GetCameraZoom;
local CameraZoomIn = CameraZoomIn;
local CameraZoomOut = CameraZoomOut;
local UnitExists = UnitExists;
local UnitIsUnit = UnitIsUnit;
local ConsoleExec = ConsoleExec;
local SetUIVisibility = SetUIVisibility;
local InCombatLockdown = InCombatLockdown;
local IsMounted = IsMounted;
local IsInInstance = IsInInstance;
local IsIndoors = IsIndoors;


local UIParent = UIParent;
UIParent:UnregisterEvent("EXPERIMENTAL_CVAR_CONFIRMATION_NEEDED");  --Disable EXPERIMENTAL_CVAR_WARNING

local FadeHelper = CreateFrame("Frame");
addon.UIParentFadeHelper = FadeHelper;
FadeHelper.isMidnight = addon.IsToCVersionEqualOrNewerThan(120000);

if FadeHelper.isMidnight then
    SetUIVisibility = function(state)
        UIParent:SetShown(state);
    end
end


local OFFSET_INFO = {};

local CVar_TargetFocus = {  --Can be used in combat
    test_cameraTargetFocusInteractEnable = 1,
    test_cameraTargetFocusInteractStrengthPitch = 0,
    test_cameraTargetFocusInteractStrengthYaw = 0,
    test_cameraOverShoulder = FOCUS_SHOULDER_OFFSET,
    test_cameraHeadMovementStrength = 0,
    CameraKeepCharacterCentered = 0,        --11.0.2 Fix
    CameraReduceUnexpectedMovement = 0,     --11.0.2 Fix
};

local CVar_UnitText = {     --Shouldn't be used in combat
    UnitNameOwn = 0,
	UnitNameNonCombatCreatureName = 0,
	UnitNameFriendlyPlayerName = 0,
	UnitNameFriendlyPetName = 0,
	UnitNameFriendlyMinionName = 0,
	UnitNameFriendlyGuardianName = 0,
	UnitNameFriendlySpecialNPCName = 0,
	UnitNameEnemyPlayerName = 0,
	UnitNameEnemyPetName = 0,
	UnitNameEnemyGuardianName = 0,
	UnitNameNPC = 0,
	UnitNameInteractiveNPC = 0,
	UnitNameHostleNPC = 0,
};

local CVar_Backup = {};

local function BackupAndSetCVar(cvar, value)
    if CVar_Backup[cvar] == nil then
        CVar_Backup[cvar] = GetCVar(cvar);
    end
    if (value ~= nil) and (value ~= NO_CHANGE_FLAG) then
        SetCVar(cvar, value);
    end
end

function CameraUtil:SetDefaultCameraMode(mode)
    --0: No Zoom
    --1: Zoom to NPC
    --2: Shift camear horizontally
    self.defaultCameraMode = mode;
    CallbackRegistry:Trigger("Camera.ModeChanged", mode);   --Core.lua: Affects event process delay
end
CameraUtil.defaultCameraMode = 0;


function CameraUtil:ChangeCVars()
    if self.cvarStored then return end;
    self.cvarStored = true;

    if self.cameraMode == 1 then
        --ConsoleExec("actioncam on");
        for cvar, value in pairs(CVar_TargetFocus) do
            BackupAndSetCVar(cvar, value);
        end
    elseif self.cameraMode == 2 then
        BackupAndSetCVar("test_cameraOverShoulder", nil);
        BackupAndSetCVar("CameraKeepCharacterCentered", 0);
        BackupAndSetCVar("CameraReduceUnexpectedMovement", 0);
    end

    if (not InCombatLockdown()) and (HIDE_UNIT_NAMES and HIDE_UI) then
        for cvar, value in pairs(CVar_UnitText) do
            BackupAndSetCVar(cvar, value);
        end
    end

    if CHANGE_FOV then
        FOV_DEFAULT = GetCVar("cameraFov") or 90;
        BackupAndSetCVar("cameraFov", nil);
    end

    local outline = (HIDE_UI and HIDE_SPARKLES and 0) or nil;
    BackupAndSetCVar("graphicsOutlineMode", outline);   --This hides the outline immediately. But the sparkle effects when UI is hidden is controlled by "Outline"
    BackupAndSetCVar("Outline", outline);           --This fails to hide the outline when the UI is fading

    self:ListenEvent(true);
end

function CameraUtil:RestoreCVars()
    if self.cvarStored then
        self.cvarStored = nil;

        for cvar, value in pairs(CVar_Backup) do
            SetCVar(cvar, value);
        end

        CVar_Backup = {};

        self:ListenEvent(false);

        return true
    end
end

function CameraUtil:RestoreCombatCVar()
    if self.cvarStored then
        for cvar, value in pairs(CVar_Backup) do
            if CVar_UnitText[cvar] ~= nil then
                SetCVar(cvar, value);
                CVar_Backup[cvar] = nil;
            end
        end
    end
end

function CameraUtil:SetHideUnitNames(state)
    --Trigger by clicking checkbox manually
    if state then
        if not InCombatLockdown() then
            self.cvarStored = true;
            for cvar, value in pairs(CVar_UnitText) do
                if CVar_Backup[cvar] == nil then
                    CVar_Backup[cvar] = GetCVar(cvar);
                    SetCVar(cvar, value);
                end
            end
        end
    else
        self:RestoreCombatCVar();
    end
end

function CameraUtil:SetHideOutlineSparkles(state)
    local cvars = {
        "graphicsOutlineMode",
        "Outline",
    };

    if state then
        for _, cvar in pairs(cvars) do
            BackupAndSetCVar(cvar, 0);
        end
    else
        for _, cvar in pairs(cvars) do
            if CVar_Backup[cvar] ~= nil then
                SetCVar(cvar, CVar_Backup[cvar]);
            end
        end
    end
end

function CameraUtil:OnEvent(event, ...)
    if event == "PLAYER_MOUNT_DISPLAY_CHANGED" then
        self:OnMountChanged();
    elseif event == "UPDATE_SHAPESHIFT_FORM" then
        self:RequestUpdateShapeshiftForm(0.0);
    else    --Logout
        self:RestoreCVars();
    end
end

function CameraUtil:UpdateMounted_Right()
    --UI on the right
    self.isMounted = IsMounted();
    if self.isMounted then
        if MOUNTED_CAMERA_ENABLED then
            self.offsetMultiplier = MOUNTED_CAMERA_MULTIPLIER;
        else
            self.offsetMultiplier = 1.5;
        end
    else
        self.offsetMultiplier = 1;
    end
end

function CameraUtil:UpdateMounted_Left()
    --UI on the left
    self.isMounted = IsMounted();
    if self.isMounted then
        if MOUNTED_CAMERA_ENABLED then
            self.offsetMultiplier = -0.3;
        else
            self.offsetMultiplier = -0.25;
        end
    else
        self.offsetMultiplier = -1;
    end
end

CameraUtil.UpdateMounted = CameraUtil.UpdateMounted_Right;


local function SetCameraOverShoulder(value)
    SetCVar("test_cameraOverShoulder", value);
end

local function GetMountID()
    local GetAuraDataByIndex = C_UnitAuras.GetAuraDataByIndex;
    local GetMountFromSpell = C_MountJournal.GetMountFromSpell;
    local i = 1;
    local mountID, count, duration;
    local spellID = 0;
    local aura;

    while spellID do
        aura = GetAuraDataByIndex("player", i, "HELPFUL");
        spellID = aura and aura.spellId;
        if spellID then
            count = aura.applications;
            duration = aura.duration;
            if count == 0 and duration == 0 then
                mountID = GetMountFromSpell(spellID);
                if mountID then
                    break
                else
                    i = i + 1;
                end
            else
                i = i + 1;
            end
        else
            break
        end
    end

    if mountID then
        --API.EvaluateMountScale(mountID);
        print(mountID)
    end
end

function CameraUtil:MoveCameraToFinalPosition()
    local baseOffset = (self.cameraMode == 1 and FOCUS_SHOULDER_OFFSET) or (self:GetShoulderOffsetForCurrentZoom());
    local offset = self.offsetMultiplier * baseOffset;
    self.shoulderOffset = offset;
    SetCameraOverShoulder(offset);
end

function CameraUtil:ShouldUseOffset()
    return self.isActive and self.cameraMode ~= 0
end

function CameraUtil:OnMountChanged()
    if not self:ShouldUseOffset()then return end;

    local changed;

    if IsMounted() then
        if not self.isMounted then
            self:UpdateMounted();
            changed = true;
            --GetMountID();
        end
    else
        if self.isMounted then
            self:UpdateMounted();
            changed = true;
        end
    end

    if changed then
        self:MoveCameraToFinalPosition();
    end
end

function CameraUtil:OnUIOrientationChanged()
    self:UpdateMounted();

    if self:ShouldUseOffset() then
        self:MoveCameraToFinalPosition();
    end
end


function CameraUtil:ListenEvent(state)
    if state then
        self:RegisterEvent("PLAYER_LOGOUT");
        self:RegisterEvent("PLAYER_QUITING");
        self:RegisterEvent("PLAYER_CAMPING");
        self:RegisterEvent("PLAYER_MOUNT_DISPLAY_CHANGED");
        if PLAYER_IS_SHAPESHIFTER then
            self:RegisterEvent("UPDATE_SHAPESHIFT_FORM");
        end
        self:SetScript("OnEvent", self.OnEvent);
    else
        self:UnregisterEvent("PLAYER_LOGOUT");
        self:UnregisterEvent("PLAYER_QUITING");
        self:UnregisterEvent("PLAYER_CAMPING");
        self:UnregisterEvent("PLAYER_MOUNT_DISPLAY_CHANGED");
        if PLAYER_IS_SHAPESHIFTER then
            self:UnregisterEvent("UPDATE_SHAPESHIFT_FORM");
        end
        self:SetScript("OnEvent", nil);
    end
end

local function GetShoulderOffsetByZoom(zoom)
	--return zoom * 0.3283 - 0.02
    return (zoom * 0.4314 + 0.1057) * PAN_MULTIPLIER
end

CameraUtil.offsetMultiplier = 1;

function CameraUtil:GetShoulderOffsetForCurrentZoom()
    return GetShoulderOffsetByZoom(GetCameraZoom())
end

function CameraUtil:ZoomTo(goal, noZoomOut)
    local current = GetCameraZoom();
    self.oldZoom = current;

    local diff = current - goal;

    if noZoomOut and diff < 0 then
        return
    end

    if diff < 0.1 and diff > -0.1 then
        return
    end

    if diff > 0 then
        CameraZoomIn(diff);
    else
        CameraZoomOut(-diff);
    end
end

function CameraUtil:GetBestZoomForNPC()
    --Unused. Zoom is driven by ModelSceneActor:OnModelLoaded()
end

function CameraUtil:OnModelEvaluationComplete(modelHeight)
    if not (self.isActive and self.cameraMode == 1) then return end;

    local zoom;

    if modelHeight < 2 then
        zoom = 2.0
    elseif modelHeight < 2.6 then    --Pandaren, Elf
        zoom = 3.0
    elseif modelHeight < 4 then
        zoom = 4.0
    elseif modelHeight < 5.1 then
        zoom = 5.0
    elseif modelHeight < 6.1 then
        zoom = 6.0
    elseif modelHeight < 8 then
        zoom = 10.0
    else
        zoom = modelHeight + 2.0;
        if zoom > 28.5 then
            zoom = nil;
        end
    end

    self.bestTargetZoom = zoom;

    if zoom then
        zoom = zoom * ZOOM_MUTIPLIER;
        self:ZoomTo(zoom, true);
    end
end

local CAMERA_MOVEMENT_DURATION = 1.0;

local function ZoomIn_Fov_OnUpdate(self, elapsed)
    self.fovChanged = true;

    local fov = Esaing_OutSine(self.t, FOV_DEFAULT,  FOV_ZOOMED_IN, CAMERA_MOVEMENT_DURATION);

    if self.t >= CAMERA_MOVEMENT_DURATION then
        fov = FOV_ZOOMED_IN;
    end

    SetCVar("cameraFov", fov);
end

local function ZoomIn_FocusNPC_OnUpdate(self, elapsed)
    self.t = self.t + elapsed;

    local pitch = Esaing_OutSine(self.t, 88,  15, CAMERA_MOVEMENT_DURATION);
    local targetStrengh = Esaing_OutSine(self.t, 0.0, FOCUS_STRENGTH_PITCH, CAMERA_MOVEMENT_DURATION);

    if self.t >= CAMERA_MOVEMENT_DURATION then
        ConsoleExec("pitchlimit "..15);
        pitch = 88;
        targetStrengh = FOCUS_STRENGTH_PITCH;
        self:SetScript("OnUpdate", nil);
    end

    if CHANGE_FOV then
        ZoomIn_Fov_OnUpdate(self, elapsed);
    end

    SetCVar("test_cameraTargetFocusInteractStrengthPitch", targetStrengh);
    ConsoleExec("pitchlimit "..pitch);
end

local function ZoomIn_PanCamera_OnUpdate(self, elapsed)
    self.t = self.t + elapsed;
    if self.t > 0.03 then
        self.t = 0;
        self.shoulderOffset = DeltaLerp(self.shoulderOffset, self.offsetMultiplier * self:GetShoulderOffsetForCurrentZoom(), self.shoulderBlend, elapsed);
        SetCameraOverShoulder(self.shoulderOffset);
    end
end

function CameraUtil:Intro_None()
    self.cameraMode = 0;
end

function CameraUtil:Intro_FocusNPC()
    --SaveView(5)   --We can't use this to restore pitch because it breaks Camera Following Style

    self.cameraMode = 1;
    self.oldZoom = GetCameraZoom();
    self.t = 0;
    self:SetScript("OnUpdate", ZoomIn_FocusNPC_OnUpdate);
    API.EvaluateNPCSize();
end

function CameraUtil:Intro_PanCamera()
    self.cameraMode = 2;
    self.t = 0;
    self.shoulderOffset = tonumber(GetCVar("test_cameraOverShoulder"));

    local targetOffset = self:GetShoulderOffsetForCurrentZoom();
    local diff = targetOffset - self.shoulderOffset;

    if diff > 8 then
        self.shoulderBlend = 0.06;
    else
        self.shoulderBlend = 0.10;
    end

    self:SetScript("OnUpdate", ZoomIn_PanCamera_OnUpdate);
end

function CameraUtil:Intro_ZoomToObject()
    self.oldZoom = GetCameraZoom();
    self.t = 0;
    self:ZoomTo(3);
end

function CameraUtil:OnInteractionStart()
    --Reserved for DynamicCam
end

function CameraUtil:OnInteractionStop()
    --Reserved for DynamicCam
end

function CameraUtil:InitiateInteraction()
    self.isActive = true;

    self:UpdateMounted();

    if PLAYER_IS_SHAPESHIFTER then
        self:UpdateShapeshiftForm();
    end

    self.bestTargetZoom = nil;

    if self.defaultCameraMode == 0 or (DISABLE_IN_INSTANCE and IsInInstance()) then
        self:Intro_None();
    else
        if (self.defaultCameraMode == 1) and API.IsQuestNPCPlayer() then
            self:Intro_FocusNPC();
        else
            self:Intro_PanCamera();
            if self.defaultCameraMode == 1 then
                self:Intro_ZoomToObject();
            end
        end
    end

    self:OnInteractionStart();
    self:ChangeCVars();

    local caller = addon.DialogueUI;
    FadeHelper:FadeOutUI(caller);

    if self.cameraMode == 1 then
        local offset = self.offsetMultiplier * FOCUS_SHOULDER_OFFSET;
        SetCameraOverShoulder(offset);
    end
end

function CameraUtil:Restore()
    self.isActive = false;
    self:SetScript("OnUpdate", nil);
    self:StopUpdatingForm();

    if not self:RestoreCVars() then
        return
    end

    --ConsoleExec("actioncam off");
    ConsoleExec("pitchlimit 88");

    if self.fovChanged then
        self.fovChanged = nil;
    end

    local caller = addon.DialogueUI;
    FadeHelper:FadeInUI(caller);

    if self.oldZoom then
        self:ZoomTo(self.oldZoom);
        self.oldZoom = nil;
    end

    self:OnInteractionStop();
end

function CameraUtil:OnFovSettingsChanged()
    if not (self.isActive and self.cameraMode == 1) then return end;

    local cvar = "cameraFov";

    if CHANGE_FOV then
        if not self.fovChanged then
            self.fovChanged = true;
            BackupAndSetCVar(cvar, FOV_ZOOMED_IN);
        end
    else
        if self.fovChanged then
            self.fovChanged = nil;
            if CVar_Backup[cvar] ~= nil then
                SetCVar(cvar, CVar_Backup[cvar]);
                CVar_Backup[cvar] = nil;
            end
        end
    end
end

do  --Calibrator
    function CameraUtil:EnterCalibartorMode()
        self:SetScript("OnUpdate", nil);
    end

    function CameraUtil:ExitCalibartorMode()
        if not self.isActive then return end;
        self:InitiateInteraction();
    end
end


local MovieFrame = MovieFrame;

local function ShouldShowUIParent()
    --Trading Post, Barbershop, MoviewFrame hide UIParent
    return not ((IsPlayingCutscene()) or (IsInteractingWithNpcOfType(57)) )
end

local function ShowUIParent(state)
    if InCombatLockdown() then return end;

    if state then
        if ShouldShowUIParent() then
            UIParent:Show();
            SetUIVisibility(true);
        else
            MovieFrame.uiParentShown = true;
        end
    else
        FadeHelper:HideUIParentInstantly();
    end
end

function FadeHelper:ShowUIParentInstantly()
    self:SnapToFadeResult();
    ShowUIParent(true);
end
CallbackRegistry:Register("PlayerInteraction.ShowUI", "ShowUIParentInstantly", FadeHelper);  --For Classic

function FadeHelper:HideUIParentInstantly()
    self:SetScript("OnUpdate", nil);
    self.t = 0;
    self.alpha = 0;

    if not InCombatLockdown() then
        self.fadeDelta = -1;
        UIParent:SetAlpha(1);
        SetUIVisibility(false);
        if HIDE_UI and HIDE_SPARKLES then
            self.t = 2;
            self:SetScript("OnUpdate", self.HideSparkles_OnUpdate);
        end
    end
end

function FadeHelper:HideSparkles_OnUpdate(elapsed)
    --The game turns unit outline into sparkles when Alt+Z
    --We have to /console Outline 0 constantly to remove this effect
    --Frequency is affected by FPS

    self.t = self.t + elapsed;
    if self.t >= 1.0 then
        self.t = 0;
        if CameraUtil.cvarStored then   --Avoid changing this CVar during AKF Logout
            SetCVar("Outline", 0);
        end
    end
end



local ALPHA_UPDATE_INTERVAL = 1/30;

function FadeHelper:OnEvent(event, ...)
    if event == "PLAYER_REGEN_DISABLED" or event == "PLAY_MOVIE" or event == "CINEMATIC_START" then
        self:ShowUIParentInstantly();
    end
end
FadeHelper:SetScript("OnEvent", FadeHelper.OnEvent);

function FadeHelper:SnapToFadeResult(inCombat)
    self:SetScript("OnUpdate", nil);
    self.t = 0;
    self.alpha = 1;
    self:UnregisterEvent("PLAYER_REGEN_DISABLED");
    self:UnregisterEvent("PLAY_MOVIE");
    self:UnregisterEvent("CINEMATIC_START");

    if self.fadeDelta then
        UIParent:SetAlpha(1);
        if self.fadeDelta > 0 then
            ShowUIParent(true);
        elseif not inCombat then
            ShowUIParent(false);
        end
        self.fadeDelta = nil;
    end
end

function FadeHelper:FadeIn_OnUpdate(elapsed)
    self.t = self.t + elapsed;
    if self.t >= ALPHA_UPDATE_INTERVAL then
        self.alpha = self.alpha + 4*self.t;
        self.t = self.t - ALPHA_UPDATE_INTERVAL;
        if self.alpha >= 1 then
           self:SnapToFadeResult();
        else
            UIParent:SetAlpha(self.alpha);
        end
    end
end

function FadeHelper:FadeOut_OnUpdate(elapsed)
    self.t = self.t + elapsed;
    if self.t >= ALPHA_UPDATE_INTERVAL then
        self.alpha = self.alpha - 2*self.t;
        self.t = self.t - ALPHA_UPDATE_INTERVAL;
        if self.alpha <= 0 then
           self:SnapToFadeResult();
        else
            UIParent:SetAlpha(self.alpha);
        end
    end
end

function FadeHelper:FadeOutUI(caller)
    if not HIDE_UI then return end;

    self.owner = caller;

    --UI: UIParent
    if self.fadeDelta == -1 or (not UIParent:IsShown()) then
        return
    end
    self.fadeDelta = -1;

    local inCombat = InCombatLockdown();

    if inCombat then
        self:SnapToFadeResult(inCombat);
    else
        self.alpha = UIParent:GetAlpha();
        self.t = 0;
        self:RegisterEvent("PLAYER_REGEN_DISABLED");
        self:RegisterEvent("PLAY_MOVIE");
        self:RegisterEvent("CINEMATIC_START");
        self:SetScript("OnUpdate", self.FadeOut_OnUpdate);
    end
end

function FadeHelper:FadeInUI(caller)
    if caller and caller ~= self.owner then
        return
    end

    if self.fadeDelta == 1 then
        return
    end
    self.fadeDelta = 1;

    local inCombat = InCombatLockdown();

    if inCombat or UIParent:IsVisible() then
        self:SnapToFadeResult(inCombat);
    else
        self.alpha = UIParent:GetAlpha();
        if self.alpha >= 0.999 then
            self.alpha = 0;
        end
        self.t = 0;
        UIParent:SetAlpha(self.alpha);
        ShowUIParent(true);
        self:RegisterEvent("PLAYER_REGEN_DISABLED");
        self:RegisterEvent("PLAY_MOVIE");
        self:RegisterEvent("CINEMATIC_START");
        self:SetScript("OnUpdate", self.FadeIn_OnUpdate);
    end
end

function FadeHelper:SetOwner(owner)
    self.owner = owner;
end


function CameraUtil:OnEnterCombatDuringInteraction()
    self:RestoreCombatCVar()
    if ShouldShowUIParent() then
        ShowUIParent(true);
    end
end


do
    local function Settings_CameraMovement(dbValue)
        CameraUtil:SetDefaultCameraMode(dbValue)
    end
    CallbackRegistry:Register("SettingChanged.CameraMovement", Settings_CameraMovement);

    local function Settings_CameraChangeFov(dbValue)
        CHANGE_FOV = dbValue == true;
        CameraUtil:OnFovSettingsChanged()
    end
    CallbackRegistry:Register("SettingChanged.CameraChangeFov", Settings_CameraChangeFov);

    local function Settings_CameraMovementMountedCamera(dbValue)
        MOUNTED_CAMERA_ENABLED = dbValue == true;
    end
    CallbackRegistry:Register("SettingChanged.CameraMovementMountedCamera", Settings_CameraMovementMountedCamera);

    local function Settings_HideUI(dbValue, userInput)
        HIDE_UI = dbValue == true;
        if userInput and CameraUtil.isActive then
            if HIDE_UI then
                FadeHelper:HideUIParentInstantly();
                CameraUtil:SetHideUnitNames(HIDE_UNIT_NAMES);
                if addon.DialogueUI:IsShown() then
                    FadeHelper.owner = addon.DialogueUI;
                elseif addon.BookUI:IsShown() then
                    FadeHelper.owner = addon.BookUI;
                end
            else
                FadeHelper:ShowUIParentInstantly();
                CameraUtil:SetHideUnitNames(false);
            end
        end
    end
    CallbackRegistry:Register("SettingChanged.HideUI", Settings_HideUI);

    local function Settings_HideUnitNames(dbValue, userInput)
        HIDE_UNIT_NAMES = dbValue == true;
        if userInput and CameraUtil.isActive then
            CameraUtil:SetHideUnitNames(HIDE_UNIT_NAMES);
        end
    end
    CallbackRegistry:Register("SettingChanged.HideUnitNames", Settings_HideUnitNames);

    local function Settings_CameraMovementDisableInstance(dbValue)
        DISABLE_IN_INSTANCE = dbValue == true;
    end
    CallbackRegistry:Register("SettingChanged.CameraMovementDisableInstance", Settings_CameraMovementDisableInstance);

    local function Settings_FrameOrientation(dbValue)
        if dbValue == 1 then
            CameraUtil.UpdateMounted = CameraUtil.UpdateMounted_Left;
        else
            CameraUtil.UpdateMounted = CameraUtil.UpdateMounted_Right;
        end
        CameraUtil:OnUIOrientationChanged();
    end
    CallbackRegistry:Register("SettingChanged.FrameOrientation", Settings_FrameOrientation);

    local function Settings_HideOutlineSparkles(dbValue, userInput)
        HIDE_SPARKLES = (dbValue == true) and addon.IsToCVersionEqualOrNewerThan(110000);
        if userInput and CameraUtil.isActive then
            Settings_HideUI(HIDE_UI, userInput);
            if HIDE_UI then
                if not HIDE_SPARKLES then
                    CameraUtil:SetHideOutlineSparkles(HIDE_SPARKLES);
                end
            end
        end
    end
    CallbackRegistry:Register("SettingChanged.HideOutlineSparkles", Settings_HideOutlineSparkles);

    local ZoomMultiplierValues = {
        [1] = 1.0,
        [2] = 1.5,
        [3] = 2.0,
        [4] = 2.5,
        [5] = 3.0,
    };
    local function Settings_CameraZoomMultiplier(dbValue, userInput)
        ZOOM_MUTIPLIER = ZoomMultiplierValues[dbValue] or 1.0;
        if userInput and CameraUtil.isActive and CameraUtil.bestTargetZoom then
            local oldZoom = CameraUtil.oldZoom;
            local zoom = CameraUtil.bestTargetZoom * ZOOM_MUTIPLIER;
            CameraUtil:ZoomTo(zoom);
            CameraUtil.oldZoom = oldZoom;
        end
    end
    addon.CallbackRegistry:Register("SettingChanged.CameraZoomMultiplier", Settings_CameraZoomMultiplier);
end


do  --DynamicCam
    local function CheckRequiredMethods()
        if not (C_AddOns.IsAddOnLoaded("DynamicCam") and DynamicCam) then return end;

        local dc = DynamicCam;

        local methods = {
            "BlockShoulderOffsetZoom",      --We handle the camera motion during NPC interaction
            "AllowShoulderOffsetZoom",
            "ApplySettings",
        };

        for _, v in ipairs(methods) do
            if not dc[v] then
                return false
            end
        end


        local function ReApplySettings(oldShoulderOffset)
            local self = dc;

            local curSituation = self.db.profile.situations[self.currentSituationID]

            self.virtualCameraZoom = nil
            self.easeShoulderOffsetInProgress = false;

            for cvar, value in pairs(self.db.profile.standardSettings.cvars) do
                if CVar_TargetFocus[cvar] then
                    if curSituation and curSituation.situationSettings.cvars[cvar] then
                        value = curSituation.situationSettings.cvars[cvar]
                    end

                    if cvar == "test_cameraOverShoulder" then
                        SetCVar(cvar, oldShoulderOffset or value);
                    else
                        self:DC_SetCVar(cvar, value);
                    end
                end
            end
        end

        function CameraUtil:OnInteractionStart()
            dc:BlockShoulderOffsetZoom();
            self.oldShoulderOffset = GetCVar("test_cameraOverShoulder");
        end

        function CameraUtil:OnInteractionStop()
            dc:AllowShoulderOffsetZoom();
            ReApplySettings(self.oldShoulderOffset);
        end

        return true
    end

    CallbackRegistry:Register("PLAYER_ENTERING_WORLD", CheckRequiredMethods);
end


do  --Update Parameters Based On Player Form
    local _, _, playerClassID = UnitClass("player");
    if playerClassID == 11 then
        PLAYER_IS_SHAPESHIFTER = true;
    end

    OFFSET_INFO = {
        DruidForm_1 = 1.0,          --Cat
        DruidForm_2 = 1.0,          --Tree of Life  (untested)
        DruidForm_3 = 1.1,          --Travel (Run)
        DruidForm_4 = 0.9,          --Swim
        DruidForm_5 = 0.9,          --Bear
        DruidForm_27 = 0.55,        --Fly Swift
        DruidForm_29 = 0.55,        --Fly
        DruidForm_31 = 1.0          --Moonkin
    };

    local function Updator_OnUpdate(self, elapsed)
        self.t = self.t + elapsed;
        if self.t > 0 then
            self.t = 0;
            self:SetScript("OnUpdate", nil);
            if CameraUtil.isActive then
                CameraUtil:UpdateShapeshiftForm(true);
            end
        end
    end

    function CameraUtil:UpdateShapeshiftForm(setToFinalValue)
        local newOffset;

        if PLAYER_IS_SHAPESHIFTER then
            local formID = API.GetShapeshiftFormID();
            if formID then
                if formID == 31 then
                    local glyphID = API.GetGlyphIDForSpell(24858);		--Moonkin form with Glyph of Stars use regular configuration
                    if glyphID and glyphID == 114301 then
                        formID = 0;
                    end
                end

                local key = "DruidForm_"..formID;
                newOffset = OFFSET_INFO[key];
                if newOffset then
                    PAN_MULTIPLIER = newOffset / FOCUS_SHOULDER_OFFSET_DEFAULT;
                end
            end
        end

        if not newOffset then
            newOffset = FOCUS_SHOULDER_OFFSET_DEFAULT;
            PAN_MULTIPLIER = 1.0;
        end

        if newOffset ~= FOCUS_SHOULDER_OFFSET then
            FOCUS_SHOULDER_OFFSET = newOffset;
            if setToFinalValue and self:ShouldUseOffset() then
                CameraUtil:MoveCameraToFinalPosition();
            end
        end
    end

    function CameraUtil:StopUpdatingForm()
        if self.updator then
            self.updator.t = 0;
            self.updator:SetScript("OnUpdate", nil);
        end
    end

    function CameraUtil:RequestUpdateShapeshiftForm(delay)
        if not self.updator then
            self.updator = CreateFrame("Frame", nil, self);
        end

        delay = (delay and -delay) or 0;
        self.updator.t = delay;
        self.updator:SetScript("OnUpdate", Updator_OnUpdate);
    end
end