-- [ ORBIT EDIT MODE FRAME SYSTEM ] ------------------------------------------------------------------

local _, Orbit = ...
local Engine = Orbit.Engine

---@class OrbitFrameManager
Engine.Frame = {}
local Frame = Engine.Frame

-- [ MODULE REFERENCES ]-----------------------------------------------------------------------------

local Anchor, Snap, Selection, Persistence, Guard

local function EnsureModules()
    Anchor = Anchor or Engine.FrameAnchor
    Snap = Snap or Engine.FrameSnap
    Selection = Selection or Engine.FrameSelection
    Persistence = Persistence or Engine.FramePersistence
    Guard = Guard or Engine.FrameGuard
end

-- [ ANCHOR API ]------------------------------------------------------------------------------------

function Frame:CreateAnchor(child, parent, edge, padding, syncOptions)
    EnsureModules()
    local success = Anchor:CreateAnchor(child, parent, edge, padding, syncOptions)
    if success then Selection:UpdateVisuals(child) end
    return success
end

function Frame:BreakAnchor(child)
    EnsureModules()
    local success = Anchor:BreakAnchor(child)
    if success then Selection:UpdateVisuals(child) end
    return success
end

function Frame:GetAnchorParent(child)
    EnsureModules()
    return Anchor:GetAnchorParent(child)
end

function Frame:GetRootParent(frame)
    EnsureModules()
    return Anchor:GetRootParent(frame)
end

function Frame:GetAnchoredChildren(parent)
    EnsureModules()
    return Anchor:GetAnchoredChildren(parent)
end

function Frame:SyncChildren(parent)
    EnsureModules()
    Anchor:SyncChildren(parent)
end

function Frame:GetAnchorAxis(frame)
    if not frame or not frame.GetPoint then return nil end
    if not frame:GetPoint() then return nil end

    local point, relativeTo, relativePoint = frame:GetPoint()
    if not point or not relativePoint then return nil end

    if (point:find("TOP") and relativePoint:find("BOTTOM")) or (point:find("BOTTOM") and relativePoint:find("TOP")) then
        return "y"
    end
    return "x"
end

-- [ SNAP API ]--------------------------------------------------------------------------------------

function Frame:Snap(frame, showGuides)
    EnsureModules()
    local targets = Selection:GetSnapTargets(frame)
    return Snap:DetectSnap(frame, showGuides, targets, nil)
end

-- [ SELECTION API ]---------------------------------------------------------------------------------

Frame.selections = {}

function Frame:Attach(frame, dragCallback, selectionCallback)
    EnsureModules()
    Selection:Attach(frame, dragCallback, selectionCallback)
    Frame.selections = Selection.selections
end

function Frame:DeselectAll()
    EnsureModules()
    Selection:DeselectAll()
end

function Frame:ForceUpdateSelection(frame)
    EnsureModules()
    Selection:ForceUpdate(frame)
end

function Frame:UpdateSelectionVisuals(frame, selection)
    EnsureModules()
    Selection:UpdateVisuals(frame, selection)
end

function Frame:OnEditModeEnter()
    EnsureModules()
    Selection:OnEditModeEnter()
end

function Frame:OnEditModeExit()
    EnsureModules()
    Selection:OnEditModeExit()
end

function Frame:NudgeFrame(frame, direction)
    EnsureModules()
    return Selection:NudgeFrame(frame, direction)
end

function Frame:GetSelectedFrame()
    EnsureModules()
    return Selection:GetSelectedFrame()
end

-- [ CANVAS MODE DELEGATION ]------------------------------------------------------------------------
-- These methods delegate to Engine.CanvasMode (cross-domain call).
-- Edit Mode needs to trigger Canvas Mode entry from selection double-click.

function Frame:EnterCanvasMode(frame)
    EnsureModules()
    local CM = Engine.CanvasMode
    if CM then CM:Enter(frame, function(f) Selection:UpdateVisuals(f) end) end
end

function Frame:ExitCanvasMode(frame)
    EnsureModules()
    local CM = Engine.CanvasMode
    if CM then CM:Exit(frame, function(f) Selection:UpdateVisuals(f) end) end
end

function Frame:IsCanvasModeActive(frame)
    local CM = Engine.CanvasMode
    return CM and CM:IsActive(frame) or false
end

function Frame:ToggleCanvasMode(frame)
    EnsureModules()
    local CM = Engine.CanvasMode
    if CM then CM:Toggle(frame, function(f) Selection:UpdateVisuals(f) end) end
end

Frame.EnterComponentEdit = Frame.EnterCanvasMode
Frame.ExitComponentEdit = Frame.ExitCanvasMode
Frame.IsComponentEditActive = Frame.IsCanvasModeActive
Frame.ToggleComponentEdit = Frame.ToggleCanvasMode

-- [ PERSISTENCE API ]-------------------------------------------------------------------------------

function Frame:RestorePosition(frame, plugin, systemIndex)
    EnsureModules()
    return Persistence:RestorePosition(frame, plugin, systemIndex)
end

-- [ GUARD API ]-------------------------------------------------------------------------------------

function Frame:Protect(frame, parent, onRestoreFunc, options)
    EnsureModules()
    Guard:Protect(frame, parent)
    Guard:UpdateProtection(frame, parent, onRestoreFunc, options)
end

function Frame:AttachSettingsListener(frame, plugin, systemIndex)
    EnsureModules()
    Persistence:AttachSettingsListener(frame, plugin, systemIndex)
end

-- [ ORIENTATION API ]-------------------------------------------------------------------------------

function Frame:GetOrientation(frame)
    EnsureModules()
    if Engine.FrameOrientation then return Engine.FrameOrientation:DetectOrientation(frame) end
    return "LEFT"
end

function Frame:RegisterOrientationCallback(frame, callback)
    EnsureModules()
    if Engine.FrameOrientation then Engine.FrameOrientation:RegisterCallback(frame, callback) end
end

function Frame:UnregisterOrientationCallback(frame)
    EnsureModules()
    if Engine.FrameOrientation then Engine.FrameOrientation:UnregisterCallback(frame) end
end

-- [ NATIVE FRAME INTEGRATION ]----------------------------------------------------------------------

function Frame:UpdateNativeFrameVisual(systemFrame)
    local CM = Engine.CanvasMode
    if CM and CM.UpdateNativeFrameVisual then CM:UpdateNativeFrameVisual(systemFrame) end
end

-- [ CLICK-THROUGH ]---------------------------------------------------------------------------------

function Frame:DisableMouseRecursive(frame)
    if not frame then return end
    frame:EnableMouse(false)
    frame.orbitClickThrough = true
    for _, child in ipairs({ frame:GetChildren() }) do
        if not child.isOrbitSelection then self:DisableMouseRecursive(child) end
    end
end

-- [ INITIALIZATION ]--------------------------------------------------------------------------------

if EditModeManagerFrame then
    hooksecurefunc(EditModeManagerFrame, "SelectSystem", function(_, systemFrame)
        local Selection = Engine.FrameSelection
        if Selection then
            Selection:DeselectAll()
            if systemFrame then
                Selection:SetSelectedFrame(systemFrame, true)
                Selection:EnableKeyboardNudge()
                local systemID = systemFrame.system
                local plugin = Orbit:GetPlugin(systemID)
                if plugin and Orbit.SettingsDialog then
                    if EditModeSystemSettingsDialog then EditModeSystemSettingsDialog:Hide() end
                    Orbit.SettingsDialog:UpdateDialog({ system = systemID, systemIndex = systemFrame.systemIndex or systemID, systemFrame = systemFrame })
                    Orbit.SettingsDialog:Show()
                    Orbit.SettingsDialog:PositionNearButton()
                elseif Orbit.SettingsDialog and Orbit.SettingsDialog:IsShown() then
                    Orbit.SettingsDialog:Hide()
                end
            end
        end
    end)

    hooksecurefunc(EditModeManagerFrame, "ClearSelectedSystem", function()
        local Selection = Engine.FrameSelection
        if Selection and not Selection.isClearingNativeSelection then
            if Selection.isNativeFrame then Selection:DisableKeyboardNudge() end
            local foci = GetMouseFoci and GetMouseFoci() or {}
            for _, focus in ipairs(foci) do
                if focus and focus.isOrbitSelection then return end
            end
            Selection:DeselectAll()
        end
    end)

    if Engine.CanvasMode then Engine.CanvasMode:Initialize() end
end

-- [ PROPERTY ALIASES ]------------------------------------------------------------------------------

setmetatable(Frame, {
    __index = function(t, k)
        if k == "anchors" then
            EnsureModules()
            return Anchor and Anchor.anchors or {}
        elseif k == "currentCanvasModeFrame" then
            local CM = Engine.CanvasMode
            return CM and CM.currentFrame or nil
        elseif k == "dragCallbacks" then
            EnsureModules()
            return Selection and Selection.dragCallbacks or {}
        elseif k == "selectionCallbacks" then
            EnsureModules()
            return Selection and Selection.selectionCallbacks or {}
        end
        return rawget(t, k)
    end,
})
