local _, Cell = ...
local L = Cell.L
local F = Cell.funcs
local I = Cell.iFuncs
local P = Cell.pixelPerfectFuncs

local Serializer = LibStub:GetLibrary("LibSerialize")
local LibDeflate = LibStub:GetLibrary("LibDeflate")
local deflateConfig = {level = 9}

local toLayout, toLayoutName
local imported

-------------------------------------------------
-- import frame
-------------------------------------------------
local importFrame, title, textArea

local function CreateIndicatorsImportFrame()
    if not Cell.frames.indicatorsTab.mask then
        Cell:CreateMask(Cell.frames.indicatorsTab, nil, {1, -1, -1, 1})
        Cell.frames.indicatorsTab.mask:Hide()
    end

    importFrame = Cell:CreateFrame("CellOptionsFrame_IndicatorsImport", Cell.frames.indicatorsTab, 430, 221)
    importFrame:SetFrameLevel(Cell.frames.indicatorsTab:GetFrameLevel() + 50)
    Cell:StylizeFrame(importFrame, nil, Cell:GetAccentColorTable())
    importFrame:SetPoint("BOTTOMLEFT", P:Scale(1), 24)
    
    -- title
    title = importFrame:CreateFontString(nil, "OVERLAY", "CELL_FONT_CLASS")
    title:SetPoint("TOPLEFT", 5, -5)

    -- list
    local listFrame = CreateFrame("Frame", nil, importFrame, "BackdropTemplate")
    Cell:StylizeFrame(listFrame, {0, 0, 0, 0}, Cell:GetAccentColorTable())
    listFrame:SetPoint("TOPLEFT", 5, -20)
    listFrame:SetPoint("BOTTOMRIGHT", importFrame, "BOTTOMLEFT", 139, 29)
    Cell:CreateScrollFrame(listFrame)
    listFrame.scrollFrame:SetScrollStep(19)

    -- buttons
    local importBtn = Cell:CreateButton(importFrame, L["Import"], "green", {67, 20})
    importBtn:SetPoint("BOTTOMLEFT", 5, 5)
    importBtn:SetEnabled(false)
    importBtn:SetScript("OnClick", function()
        -- lower frame level
        importFrame:SetFrameLevel(Cell.frames.indicatorsTab:GetFrameLevel() + 20)
    
        local text = L["Import"].." > "..Cell:GetAccentColorString()..toLayoutName.."|r\n"
            ..L["This may overwrite built-in indicators"].."\n"
            ..L["|cff1Aff1AYes|r - Overwrite"].."\n|cffff1A1A"..L["No"].."|r - "..L["Cancel"]
    
        local popup = Cell:CreateConfirmPopup(Cell.frames.indicatorsTab, 250, text, function(self)
            local toLayoutTable = CellDB["layouts"][toLayout]
            -- last custom index
            local lastIndex
            local last = #toLayoutTable["indicators"]
            if toLayoutTable["indicators"][last]["type"] == "built-in" then
                lastIndex = 0
            else
                lastIndex = tonumber(strmatch(toLayoutTable["indicators"][last]["indicatorName"], "%d+"))
            end
    
            -- local toLayoutTable = { ["indicators"] = {} }

            -- indicators
            for i, t in pairs(imported.indicators) do
                if t["type"] == "built-in" then
                    -- filter invalid
                    if Cell.defaults.indicatorIndices[t.indicatorName] then
                        -- NOTE: overwrite built-in
                        toLayoutTable.indicators[Cell.defaults.indicatorIndices[t.indicatorName]] = t
                    end
                else
                    -- NOTE: add customs
                    lastIndex = lastIndex + 1
                    t["indicatorName"] = "indicator"..lastIndex
                    -- NOTE: remove invalid spells from custom indicators
                    F:FilterInvalidSpells(t["auras"])
                    tinsert(toLayoutTable["indicators"], t)
                end
            end

            -- texplore(toLayoutTable)

            -- related
            for k, v in pairs(imported.related) do
                if k ~= "cleuGlow" and k ~= "targetedSpellsGlow" then
                    F:FilterInvalidSpells(v)
                end

                CellDB[k] = v
                
                if k == "debuffBlacklist" then
                    Cell.vars.debuffBlacklist = F:ConvertTable(CellDB[k])
                elseif k == "bigDebuffs" then
                    Cell.vars.bigDebuffs = F:ConvertTable(CellDB[k])
                elseif k == "customDefensives" then
                    I:UpdateCustomDefensives(CellDB[k])
                elseif k == "customExternals" then
                    I:UpdateCustomExternals(CellDB[k])
                -- elseif k == "cleuAuras" then
                --     if Cell.isRetail then
                --         I:UpdateCleuAuras(CellDB[k])
                --     elseif Cell.isWrath then
                --         CellDB[k] = nil
                --     end
                -- elseif k == "cleuGlow" then
                --     if Cell.isWrath then
                --         CellDB[k] = nil
                --     end
                elseif k == "targetedSpellsList" then
                    Cell.vars.targetedSpellsList = F:ConvertTable(CellDB[k])
                elseif k == "targetedSpellsGlow" then
                    Cell.vars.targetedSpellsGlow = CellDB[k]
                elseif k == "consumables" then
                    Cell.vars.consumables = I:ConvertConsumables(CellDB[k])
                end
            end

            -- fire events
            Cell:Fire("UpdateIndicators", toLayout)
            Cell:Fire("IndicatorsChanged", toLayout)
    
            importFrame:Hide()
        end, function(self)
            importFrame:Hide()
        end, true)
        popup:SetPoint("TOPLEFT", importFrame, 75, -40)

        textArea.eb:ClearFocus()
    end)
    
    local closeBtn = Cell:CreateButton(importFrame, L["Close"], "red", {67, 20})
    closeBtn:SetPoint("BOTTOMLEFT", importBtn, "BOTTOMRIGHT", P:Scale(-1), 0)
    closeBtn:SetScript("OnClick", function()
        importFrame:Hide()
    end)

    -- content
    local function Failed(reason)
        title:SetText(L["Import"].." > "..toLayoutName..": |cffff2222"..reason)
        importBtn:SetEnabled(false)
        listFrame.scrollFrame:Reset()
    end
    
    textArea = Cell:CreateScrollEditBox(importFrame, function(eb, userChanged)
        if userChanged then
            listFrame.scrollFrame:Reset()
            local text = eb:GetText()
            -- check
            local version, count, data = string.match(text, "^!CELL:(%d+):INDICATOR:(%d+)!(.+)$")
            version = tonumber(version)
            count = tonumber(count)
    
            if version and count and data then
                if version >= Cell.MIN_INDICATORS_VERSION then
                    local success
                    data = LibDeflate:DecodeForPrint(data) -- decode
                    success, data = pcall(LibDeflate.DecompressDeflate, LibDeflate, data) -- decompress
                    success, data = Serializer:Deserialize(data) -- deserialize
                    
                    if success and data then
                        -- check data
                        local builtIn, custom = 0, 0
                        for i, t in pairs(data["indicators"]) do
                            if t["type"] == "built-in" then
                                builtIn = builtIn + 1
                            else
                                custom = custom + 1
                            end
                        end
                        
                        if builtIn + custom == count then
                            title:SetText(L["Import"].." > "..toLayoutName..": |cff90EE90"..builtIn.." "..L["built-in(s)"].."|r, |cffFFB5C5"..custom.." "..L["custom(s)"].."|r")
                            importBtn:SetEnabled(true)
                            imported = data
                            
                            -- create buttons, update list
                            local last
                            for i, t in pairs(data["indicators"]) do
                                local b
                                if t["type"] == "built-in" then
                                    local color = Cell.defaults.indicatorIndices[t.indicatorName] and "" or "|cff777777" 
                                    b = Cell:CreateButton(listFrame.scrollFrame.content, color..L[t["name"]], "transparent-accent", {20, 20})
                                else
                                    b = Cell:CreateButton(listFrame.scrollFrame.content, t["name"], "transparent-accent", {20, 20})
                                    b.typeIcon = b:CreateTexture(nil, "ARTWORK")
                                    b.typeIcon:SetPoint("RIGHT", -2, 0)
                                    b.typeIcon:SetSize(16, 16)
                                    b.typeIcon:SetTexture("Interface\\AddOns\\Cell\\Media\\Indicators\\indicator-"..t["type"])
                                    b.typeIcon:SetAlpha(0.5)
                        
                                    b:GetFontString():ClearAllPoints()
                                    b:GetFontString():SetPoint("LEFT", 5, 0)
                                    b:GetFontString():SetPoint("RIGHT", b.typeIcon, "LEFT", -2, 0)
                                end
    
                                b:HookScript("OnEnter", function()
                                    if b:GetFontString():IsTruncated() then
                                        CellTooltip:SetOwner(b, "ANCHOR_NONE")
                                        CellTooltip:SetPoint("RIGHT", b, "LEFT", -1, 0)
                                        CellTooltip:AddLine(b:GetText())
                                        CellTooltip:Show()
                                    end
                                end)
                        
                                b:HookScript("OnLeave", function()
                                    CellTooltip:Hide()
                                end)
    
                                b:SetPoint("RIGHT")
                                if last then
                                    b:SetPoint("TOPLEFT", last, "BOTTOMLEFT", 0, 1)
                                else
                                    b:SetPoint("TOPLEFT")
                                end
                                last = b
                            end
                            listFrame.scrollFrame:SetContentHeight(20, count, -1)
                        else
                            Failed(L["Error"])
                        end
                    else
                        Failed(L["Error"])
                    end
                else -- incompatible version
                    Failed(L["Incompatible Version"])
                end
            else
                Failed(L["Error"])
            end
        end
    end)
    Cell:StylizeFrame(textArea.scrollFrame, {0, 0, 0, 0}, Cell:GetAccentColorTable())
    textArea:SetPoint("TOPLEFT", listFrame, "TOPRIGHT", 5, 0)
    textArea:SetPoint("BOTTOMRIGHT", -5, 5)
    
    -- highlight text
    textArea.eb:SetScript("OnEditFocusGained", function() textArea.eb:HighlightText() end)
    textArea.eb:SetScript("OnMouseUp", function()
        if not isImport then
            textArea.eb:HighlightText()
        end
    end)

    -- scripts
    importFrame:SetScript("OnHide", function()
        importFrame:Hide()
        Cell.frames.indicatorsTab.mask:Hide()
        textArea:SetText("")
        listFrame.scrollFrame:Reset()
        importBtn:SetEnabled(false)
    end)
    
    importFrame:SetScript("OnShow", function()
        -- raise frame level
        importFrame:SetFrameLevel(Cell.frames.indicatorsTab:GetFrameLevel() + 50)
        Cell.frames.indicatorsTab.mask:Show()
    end)
end

-------------------------------------------------
-- functions
-------------------------------------------------
local init
function F:ShowIndicatorsImportFrame(layout)
    if not init then
        init = true
        CreateIndicatorsImportFrame()
    end

    importFrame:Show()
    toLayout = layout
    toLayoutName = toLayout == "default" and _G.DEFAULT or toLayout
    title:SetText(L["Import"].." > "..toLayoutName)
end