--=====================================================================================
-- BLU - interface/options/modules.lua
-- Modules options panel
--=====================================================================================

local BLU = _G["BLU"]

local Modules = {}
BLU.Modules = BLU.Modules or {}
BLU.Modules["modules"] = Modules

local MODULE_LOAD_MAP = {
    honorrank = "honor",
    renownrank = "renown",
    delvecompanion = "delve",
}

function BLU.CreateModulesPanel(panel)
    for _, child in ipairs({panel:GetChildren()}) do
        child:Hide()
        child:SetParent(nil)
    end

    local content = CreateFrame("Frame", nil, panel)
    content:SetPoint("TOPLEFT", 8, -8)
    content:SetPoint("BOTTOMRIGHT", -8, 8)

    local contentBg = content:CreateTexture(nil, "BACKGROUND")
    contentBg:SetAllPoints()
    contentBg:SetColorTexture(0.05, 0.05, 0.05, 0.3)

    -- Header
    local header = BLU.Modules.design:CreateSectionHeader(content, "Module Management", "Interface\\Icons\\INV_Misc_Gear_08")
    header:SetPoint("TOPLEFT", 0, 0)
    header:SetPoint("RIGHT", 0, 0)

    -- Info text
    local infoText = content:CreateFontString(nil, "OVERLAY", "GameFontHighlight")
    infoText:SetPoint("TOPLEFT", header, "BOTTOMLEFT", 0, -10)
    infoText:SetPoint("RIGHT", 0, 0)
    infoText:SetText("Enable or disable specific BLU features. Disabled modules won't use any resources and won't respond to game events.")
    infoText:SetJustifyH("LEFT")

    -- Quick actions
    local actionBar = CreateFrame("Frame", nil, content)
    actionBar:SetPoint("TOPLEFT", infoText, "BOTTOMLEFT", 0, -15)
    actionBar:SetSize(500, 30)

    local enableAllBtn = BLU.Modules.design:CreateButton(actionBar, "Enable All", 100, 25)
    enableAllBtn:SetPoint("LEFT", 0, 0)

    local disableAllBtn = BLU.Modules.design:CreateButton(actionBar, "Disable All", 100, 25)
    disableAllBtn:SetPoint("LEFT", enableAllBtn, "RIGHT", 10, 0)

    local defaultBtn = BLU.Modules.design:CreateButton(actionBar, "Default Setup", 100, 25)
    defaultBtn:SetPoint("LEFT", disableAllBtn, "RIGHT", 10, 0)

    -- Module categories
    local categories = {
        {
            name = "Core Features",
            icon = "Interface\\Icons\\Achievement_General",
            modules = {
                {
                    id = "levelup",
                    name = "Level Up",
                    desc = "Plays sounds when you gain a level",
                    icon = "Interface\\Icons\\Achievement_Level_100",
                    default = true
                },
                {
                    id = "achievement",
                    name = "Achievements",
                    desc = "Play sounds when you earn achievements",
                    icon = "Interface\\Icons\\Achievement_GuildPerk_MobileMailbox",
                    default = true
                },
                {
                    id = "quest",
                    name = "Quest Complete",
                    desc = "Play sounds when you complete quests",
                    icon = "Interface\\Icons\\INV_Misc_Note_01",
                    default = true
                },
                {
                    id = "reputation",
                    name = "Reputation",
                    desc = "Play sounds when you gain reputation",
                    icon = "Interface\\Icons\\Achievement_Reputation_01",
                    default = true
                }
            }
        },
        {
            name = "PvP Features",
            icon = "Interface\\Icons\\Achievement_PVP_A_A",
            modules = {
                {
                    id = "honorrank",
                    name = "Honor Rank",
                    desc = "Play sounds when you gain honor ranks",
                    icon = "Interface\\Icons\\PVPCurrency-Honor-Horde",
                    default = false
                },
                {
                    id = "renownrank",
                    name = "Renown Rank",
                    desc = "Play sounds when you gain renown with factions",
                    icon = "Interface\\Icons\\UI_MajorFaction_Centaur",
                    default = true
                }
            }
        },
        {
            name = "Special Features",
            icon = "Interface\\Icons\\INV_Misc_Coin_01",
            modules = {
                {
                    id = "tradingpost",
                    name = "Trading Post",
                    desc = "Play sounds for trading post rewards",
                    icon = "Interface\\Icons\\INV_Tradingpost_Currency",
                    default = false
                },
                {
                    id = "battlepet",
                    name = "Battle Pets",
                    desc = "Play sounds for pet battle victories and level ups",
                    icon = "Interface\\Icons\\INV_Pet_BattlePetTraining",
                    default = false
                },
                {
                    id = "delvecompanion",
                    name = "Delve Companion",
                    desc = "Play sounds for delve companion events",
                    icon = "Interface\\Icons\\UI_MajorFaction_Delve",
                    default = false
                }
            }
        }
    }

    if not BLU.db or not BLU.db.profile then
        C_Timer.After(0.5, function()
            if panel and panel:IsVisible() then
                BLU.CreateModulesPanel(panel)
            end
        end)
        return
    end
    BLU.db.profile.modules = BLU.db.profile.modules or {}

    local yOffset = -80

    for _, category in ipairs(categories) do
        local section = BLU.Modules.design:CreateSection(content, category.name, category.icon)
        section:SetPoint("TOPLEFT", 0, yOffset)
        section:SetPoint("RIGHT", 0, 0)
        -- Extra vertical room prevents bottom row clipping under section borders.
        section:SetHeight(56 + #category.modules * 55)

        local moduleY = -10

        for i, module in ipairs(category.modules) do
            local modFrame = CreateFrame("Frame", nil, section.content)
            modFrame:SetPoint("TOPLEFT", 0, moduleY)
            modFrame:SetPoint("RIGHT", 0, 0)
            modFrame:SetHeight(50)

            modFrame:EnableMouse(true)
            modFrame:SetScript("OnEnter", function(self)
                if not self.highlight then
                    self.highlight = self:CreateTexture(nil, "HIGHLIGHT")
                    self.highlight:SetAllPoints()
                    self.highlight:SetColorTexture(1, 1, 1, 0.05)
                end
                self.highlight:Show()
            end)
            modFrame:SetScript("OnLeave", function(self)
                if self.highlight then
                    self.highlight:Hide()
                end
            end)

            local icon = modFrame:CreateTexture(nil, "ARTWORK")
            icon:SetSize(36, 36)
            icon:SetPoint("LEFT", 10, 0)
            icon:SetTexture(module.icon)

            local name = modFrame:CreateFontString(nil, "OVERLAY", "GameFontNormal")
            name:SetPoint("LEFT", icon, "RIGHT", 10, 10)
            name:SetText(module.name)

            local desc = modFrame:CreateFontString(nil, "OVERLAY", "GameFontHighlightSmall")
            desc:SetPoint("TOPLEFT", name, "BOTTOMLEFT", 0, -2)
            desc:SetText(module.desc)
            desc:SetTextColor(0.7, 0.7, 0.7)

            local status = modFrame:CreateFontString(nil, "OVERLAY", "GameFontNormalSmall")
            status:SetPoint("RIGHT", modFrame, "RIGHT", -80, 0)

            local switchFrame = CreateFrame("Frame", nil, modFrame)
            switchFrame:SetSize(60, 24)
            switchFrame:SetPoint("RIGHT", -10, 0)

            local switchBg = switchFrame:CreateTexture(nil, "BACKGROUND")
            switchBg:SetAllPoints()
            switchBg:SetTexture("Interface\\Buttons\\WHITE8x8")

            local toggle = CreateFrame("Button", nil, switchFrame)
            toggle:SetSize(28, 28)
            toggle:EnableMouse(true)

            local toggleBg = toggle:CreateTexture(nil, "ARTWORK")
            toggleBg:SetAllPoints()
            toggleBg:SetTexture("Interface\\Buttons\\WHITE8x8")
            toggleBg:SetVertexColor(1, 1, 1, 1)

            local glow = toggle:CreateTexture(nil, "OVERLAY")
            glow:SetSize(32, 32)
            glow:SetPoint("CENTER")
            glow:SetTexture("Interface\\Buttons\\UI-CheckBox-Highlight")
            glow:SetBlendMode("ADD")
            glow:SetAlpha(0)

            toggle.moduleId = module.id
            toggle.statusText = status
            toggle.switchBg = switchBg
            toggle.glow = glow

            local function UpdateToggleState(btn, enabled)
                btn:ClearAllPoints()
                btn.isEnabled = enabled
                if enabled then
                    btn:SetPoint("RIGHT", switchFrame, "RIGHT", -2, 0)
                    btn.switchBg:SetVertexColor(0.02, 0.37, 1, 1)
                    btn.statusText:SetText("|cff00ff00ENABLED|r")
                    btn.statusText:SetTextColor(0, 1, 0)
                else
                    btn:SetPoint("LEFT", switchFrame, "LEFT", 2, 0)
                    btn.switchBg:SetVertexColor(0.3, 0.3, 0.3, 1)
                    btn.statusText:SetText("|cffff0000DISABLED|r")
                    btn.statusText:SetTextColor(1, 0, 0)
                end
            end

            local isEnabled = true
            if BLU.db and BLU.db.profile and BLU.db.profile.modules then
                isEnabled = BLU.db.profile.modules[module.id] ~= false
            else
                isEnabled = module.default ~= false
            end
            UpdateToggleState(toggle, isEnabled)

            toggle:SetScript("OnClick", function(self)
                if not BLU.db or not BLU.db.profile then
                    BLU:Print("Database not ready. Please try again.")
                    return
                end
                BLU.db.profile.modules = BLU.db.profile.modules or {}
                local enabled = BLU.db.profile.modules[self.moduleId] ~= false
                enabled = not enabled
                BLU.db.profile.modules[self.moduleId] = enabled

                UpdateToggleState(self, enabled)

                self.glow:SetAlpha(0.8)
                local fadeOut = self.glow:CreateAnimationGroup()
                local alpha = fadeOut:CreateAnimation("Alpha")
                alpha:SetFromAlpha(0.8)
                alpha:SetToAlpha(0)
                alpha:SetDuration(0.3)
                fadeOut:Play()

                if enabled then
                    if BLU.LoadModule then
                        BLU:LoadModule("features", MODULE_LOAD_MAP[self.moduleId] or self.moduleId)
                    end
                else
                    if BLU.UnloadModule then
                        BLU:UnloadModule(MODULE_LOAD_MAP[self.moduleId] or self.moduleId)
                    end
                end

                C_Timer.After(0, function()
                    if self and self:IsVisible() and BLU.db and BLU.db.profile and BLU.db.profile.modules then
                        UpdateToggleState(self, BLU.db.profile.modules[self.moduleId] ~= false)
                    end
                end)
            end)

            modFrame.toggle = toggle
            modFrame.moduleData = module

            moduleY = moduleY - 55
        end

        section.modules = category.modules
        content["section_" .. category.name:gsub(" ", "")] = section

        yOffset = yOffset - section:GetHeight() - 20
    end

    enableAllBtn:SetScript("OnClick", function()
        if not BLU.db or not BLU.db.profile then
            BLU:Print("Database not ready. Please try again.")
            return
        end
        BLU.db.profile.modules = BLU.db.profile.modules or {}
        for _, category in ipairs(categories) do
            for _, module in ipairs(category.modules) do
                BLU.db.profile.modules[module.id] = true
                if BLU.LoadModule then
                    BLU:LoadModule("features", MODULE_LOAD_MAP[module.id] or module.id)
                end
            end
        end
        if panel.Refresh then
            panel:Refresh()
        else
            BLU.CreateModulesPanel(panel)
        end
    end)

    disableAllBtn:SetScript("OnClick", function()
        if not BLU.db or not BLU.db.profile then
            BLU:Print("Database not ready. Please try again.")
            return
        end
        BLU.db.profile.modules = BLU.db.profile.modules or {}
        for _, category in ipairs(categories) do
            for _, module in ipairs(category.modules) do
                BLU.db.profile.modules[module.id] = false
                if BLU.UnloadModule then
                    BLU:UnloadModule(MODULE_LOAD_MAP[module.id] or module.id)
                end
            end
        end
        if panel.Refresh then
            panel:Refresh()
        else
            BLU.CreateModulesPanel(panel)
        end
    end)

    defaultBtn:SetScript("OnClick", function()
        if not BLU.db or not BLU.db.profile then
            BLU:Print("Database not ready. Please try again.")
            return
        end
        BLU.db.profile.modules = BLU.db.profile.modules or {}
        for _, category in ipairs(categories) do
            for _, module in ipairs(category.modules) do
                BLU.db.profile.modules[module.id] = module.default
                if module.default then
                    if BLU.LoadModule then
                        BLU:LoadModule("features", MODULE_LOAD_MAP[module.id] or module.id)
                    end
                else
                    if BLU.UnloadModule then
                        BLU:UnloadModule(MODULE_LOAD_MAP[module.id] or module.id)
                    end
                end
            end
        end
        if panel.Refresh then
            panel:Refresh()
        else
            BLU.CreateModulesPanel(panel)
        end
    end)

    content:SetHeight(math.abs(yOffset) + 50)
end

function Modules:Init()
    BLU:PrintDebug("[Modules] Modules panel module initialized")
end

if BLU.RegisterModule then
    BLU:RegisterModule(Modules, "modules", "Modules Panel")
end
