You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

265 lines
10 KiB

local _, Cell = ...
local L = Cell.L
local F = Cell.funcs
local P = Cell.pixelPerfectFuncs
local Serializer = LibStub:GetLibrary("LibSerialize")
local LibDeflate = LibStub:GetLibrary("LibDeflate")
local deflateConfig = {level = 9}
local isImport, imported = false, {}
local exportedAllBosses, exported = false, ""
local currentInstanceId, currentBossId, currentBossName
local ShowData
local importExportFrame, importBtn, title, instance, boss, whichBossesBtn, textArea
local function CreateDebuffsImportExportFrame()
importExportFrame = CreateFrame("Frame", "CellOptionsFrame_RaidDebuffsImportExport", Cell.frames.raidDebuffsTab, "BackdropTemplate")
importExportFrame:Hide()
Cell:StylizeFrame(importExportFrame, nil, Cell:GetAccentColorTable())
importExportFrame:EnableMouse(true)
importExportFrame:SetFrameLevel(Cell.frames.raidDebuffsTab:GetFrameLevel() + 50)
P:Size(importExportFrame, 430, 170)
importExportFrame:SetPoint("TOPLEFT", P:Scale(1), -100)
if not Cell.frames.raidDebuffsTab.mask then
Cell:CreateMask(Cell.frames.raidDebuffsTab, nil, {1, -1, -1, 1})
Cell.frames.raidDebuffsTab.mask:Hide()
end
-- close
local closeBtn = Cell:CreateButton(importExportFrame, "×", "red", {18, 18}, false, false, "CELL_FONT_SPECIAL", "CELL_FONT_SPECIAL")
closeBtn:SetPoint("TOPRIGHT", -5, -1)
closeBtn:SetScript("OnClick", function() importExportFrame:Hide() end)
-- title
title = importExportFrame:CreateFontString(nil, "OVERLAY", "CELL_FONT_CLASS")
title:SetPoint("TOPLEFT", 5, -5)
-- instance name
instance = importExportFrame:CreateFontString(nil, "OVERLAY", "CELL_FONT_CLASS")
instance:SetPoint("TOPLEFT", title, "BOTTOMLEFT", 0, -5)
-- boss name
boss = importExportFrame:CreateFontString(nil, "OVERLAY", "CELL_FONT_CLASS")
boss:SetPoint("TOPLEFT", instance, "BOTTOMLEFT", 0, -5)
-- which bosses
whichBossesBtn = Cell:CreateButton(importExportFrame, L["Current Boss"], "blue", {111, 18})
whichBossesBtn:SetPoint("TOPRIGHT", closeBtn, "TOPLEFT", 1, 0)
whichBossesBtn:Hide()
whichBossesBtn:SetScript("OnClick", function()
exportedAllBosses = not exportedAllBosses
if exportedAllBosses then
whichBossesBtn:SetText(L["All Bosses"])
boss:SetText(L["Boss Name"]..": |cffffffff"..L["All Bosses"])
ShowData(currentInstanceId)
else
whichBossesBtn:SetText(L["Current Boss"])
boss:SetText(L["Boss Name"]..": |cffffffff"..currentBossName)
ShowData(currentInstanceId, currentBossId)
end
end)
-- import
importBtn = Cell:CreateButton(importExportFrame, L["Import"], "green", {57, 18})
importBtn:Hide()
importBtn:SetPoint("TOPRIGHT", closeBtn, "TOPLEFT", 1, 0)
importBtn:SetScript("OnClick", function()
-- lower frame level
importExportFrame:SetFrameLevel(Cell.frames.raidDebuffsTab:GetFrameLevel() + 20)
local text = L["This will overwrite your debuffs"].."\n"..
L["|cff1Aff1AYes|r - Overwrite"].."\n|cffff1A1A"..L["No"].."|r - "..L["Cancel"]
local popup = Cell:CreateConfirmPopup(Cell.frames.raidDebuffsTab, 200, text, function(self)
local instanceName, bossName = F:GetInstanceAndBossName(imported["instanceId"], imported["bossId"])
local which
if bossName then
which = bossName.." ("..instanceName..")"
else
which = instanceName
end
F:UpdateRaidDebuffs(imported["instanceId"], imported["bossId"], imported["data"], which)
F:ShowInstanceDebuffs(imported["instanceId"], imported["bossId"])
importExportFrame:Hide()
end, function(self)
importExportFrame:Hide()
end, true)
popup:SetPoint("TOPLEFT", importExportFrame, 117, -50)
textArea.eb:ClearFocus()
end)
-- textArea
textArea = Cell:CreateScrollEditBox(importExportFrame, function(eb, userChanged)
if userChanged then
if isImport then
imported = {}
local text = eb:GetText()
-- check
local version, instanceId, bossId, data = string.match(text, "^!CELL:(%d+):DEBUFF:(%d+):(.+)!(.+)$")
local error
if version and instanceId and bossId and data then
version = tonumber(version)
instanceId = tonumber(instanceId)
local isValidBossId
if bossId == "all" then
bossId = nil
isValidBossId = true
elseif bossId == "general" then
isValidBossId = true
else
bossId = tonumber(bossId)
if bossId then isValidBossId = true end
end
local instanceName, bossName = F:GetInstanceAndBossName(instanceId, bossId)
if isValidBossId and instanceName then
if version >= Cell.MIN_DEBUFFS_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
local builtIn, custom = F:CalcRaidDebuffs(instanceId, bossId, data)
title:SetText(L["Import"]..": ".."|cff90EE90"..builtIn.." "..L["built-in(s)"].."|r, |cffFFB5C5"..custom.." "..L["custom(s)"].."|r")
instance:SetText(L["Instance Name"]..": |cffffffff"..instanceName)
boss:SetText(L["Boss Name"]..": |cffffffff"..(bossName or L["All Bosses"]))
imported["instanceId"] = instanceId
imported["bossId"] = bossId
imported["data"] = data
importBtn:SetEnabled(true)
else
error = L["Error"]
end
else -- incompatible version
error = L["Incompatible Version"]
end
else
error = L["Error"]
end
else
error = L["Error"]
end
if error then
title:SetText(L["Import"]..": |cffff2222"..error)
instance:SetText(L["Instance Name"]..": |cffff2222"..L["Error"])
boss:SetText(L["Boss Name"]..": |cffff2222"..L["Error"])
importBtn:SetEnabled(false)
end
else
eb:SetText(exported)
eb:SetCursorPosition(0)
eb:HighlightText()
end
end
end)
Cell:StylizeFrame(textArea.scrollFrame, {0, 0, 0, 0}, Cell:GetAccentColorTable())
textArea:SetPoint("TOPLEFT", 5, -60)
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)
importExportFrame:SetScript("OnHide", function()
importExportFrame:Hide()
isImport = false
exported = ""
imported = {}
Cell.frames.raidDebuffsTab.mask:Hide()
end)
importExportFrame:SetScript("OnShow", function()
-- raise frame level
importExportFrame:SetFrameLevel(Cell.frames.raidDebuffsTab:GetFrameLevel() + 50)
Cell.frames.raidDebuffsTab.mask:Show()
end)
end
local init
function F:ShowRaidDebuffsImportFrame()
if not init then
init = true
CreateDebuffsImportExportFrame()
end
importExportFrame:Show()
isImport = true
importBtn:Show()
importBtn:SetEnabled(false)
whichBossesBtn:Hide()
exported = ""
title:SetText(L["Import"])
instance:SetText(L["Instance Name"])
boss:SetText(L["Boss Name"])
textArea:SetText("")
textArea.eb:SetFocus(true)
end
ShowData = function(instanceId, bossId)
local data
if not bossId then -- all bosses
if CellDB["raidDebuffs"][instanceId] then
data = CellDB["raidDebuffs"][instanceId]
end
else
if CellDB["raidDebuffs"][instanceId] and CellDB["raidDebuffs"][instanceId][bossId] then
data = CellDB["raidDebuffs"][instanceId][bossId]
end
end
if data then
local builtIn, custom = F:CalcRaidDebuffs(instanceId, bossId, data)
title:SetText(L["Export"]..": ".."|cff90EE90"..builtIn.." "..L["built-in(s)"].."|r, |cffFFB5C5"..custom.." "..L["custom(s)"].."|r")
local prefix = "!CELL:"..Cell.versionNum..":DEBUFF:"..instanceId..":"..(bossId or "all").."!"
exported = Serializer:Serialize(data) -- serialize
exported = LibDeflate:CompressDeflate(exported, deflateConfig) -- compress
exported = LibDeflate:EncodeForPrint(exported) -- encode
exported = prefix..exported
else
title:SetText(L["Export"]..": ")
exported = L["No custom debuffs to export!"]
end
textArea:SetText(exported)
textArea.eb:SetFocus(true)
end
function F:ShowRaidDebuffsExportFrame(instanceId, bossId)
if not init then
init = true
CreateDebuffsImportExportFrame()
end
importExportFrame:Show()
isImport = false
importBtn:Hide()
exportedAllBosses = false
whichBossesBtn:SetText(L["Current Boss"])
whichBossesBtn:Show()
local instanceName, bossName = F:GetInstanceAndBossName(instanceId, bossId)
currentInstanceId = instanceId
currentBossId = bossId
currentBossName = bossName
title:SetText(L["Export"]..": ")
instance:SetText(L["Instance Name"]..": |cffffffff"..instanceName)
boss:SetText(L["Boss Name"]..": |cffffffff"..bossName)
ShowData(instanceId, bossId)
end