Módulo:I.Skills

A documentação para este módulo pode ser criada em Módulo:I.Skills/doc

-- Módulo:I.Skills — skill(), skin() com suporte nativo a subskills recursivas
local p = {}

local utils = require("Módulo:I.Utils")
local trim = utils.trim
local colorize = utils.colorize

-- Fallback se colorize não existir
if not colorize or type(colorize) ~= "function" then
    colorize = function(txt)
        if not txt or txt == "" then
            return ""
        end
        -- Versão simplificada sem colorização
        return tostring(txt)
    end
end

local cUtils = require("Módulo:C.Utils")
local requireCharModule = cUtils.requireCharModule

-- Processa descrição (desc table → desc_i18n)
local function processDesc(desc)
    if not desc then return nil end
    if type(desc) == "string" then
        return { pt = colorize(desc) }
    end
    if type(desc) == "table" then
        local desc_i18n = {}
        for code, text in pairs(desc) do
            if type(text) == "string" and text ~= "" then
                desc_i18n[code] = colorize(text)
            end
        end
        return next(desc_i18n) and desc_i18n or nil
    end
    return nil
end

-- Processa weapon (aplica colorize nas descrições)
local function processWeapon(weapon)
    if not weapon or type(weapon) ~= "table" then
        return weapon
    end

    local processed = {}
    -- Copia todos os campos do weapon
    for k, v in pairs(weapon) do
        processed[k] = v
    end

    -- Processa descrição do weapon (se existir)
    if weapon.desc then
        processed.desc_i18n = processDesc(weapon.desc)
        -- Remove desc se desc_i18n foi criado (para evitar duplicação)
        if processed.desc_i18n then
            processed.desc = nil
        end
    end

    -- Se o weapon processado estiver vazio (sem campos), retorna nil
    -- Isso evita que weapons vazios {} sejam considerados válidos
    if next(processed) == nil then
        return nil
    end

    return processed
end

-- Processa subskills recursivamente (suporte ilimitado a níveis)
-- parentSkills: tabela de skills principais para herança automática
local function processSubskills(subskills, suborder, parentSkills)
    if not subskills or not suborder or type(subskills) ~= "table" or type(suborder) ~= "table" then
        return nil
    end

    local arr = {}
    for _, subName in ipairs(suborder) do
        local sub = subskills[subName]
        if type(sub) == "table" then
            -- HERANCA: verifica se heranca esta desabilitada
            local shouldInherit = not (sub.inherit == false or sub.inherit == "no")

            -- HERANÇA: determina de qual skill principal herdar
            local inheritFromName = sub.inherit_from or
                subName -- Se tiver inherit_from explícito, usa; senão usa o nome da subskill
            local parentSkill = nil

            -- Se parentSkills foi fornecido e herança não está desabilitada, busca a skill principal para herdar
            if shouldInherit and parentSkills and type(parentSkills) == "table" then
                parentSkill = parentSkills[inheritFromName]
            end

            -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
            local subFlags = (sub.flags ~= nil) and sub.flags or (shouldInherit and parentSkill and parentSkill.flags)
            local validSubFlags = (type(subFlags) == "table" and #subFlags > 0) and subFlags or nil

            -- Cria o objeto da subskill, herdando campos não definidos da skill principal (se herança não estiver desabilitada)
            local subObj = {
                name = subName,
                n = subName,
                -- Herda icon se não estiver definido na subskill (só se herança estiver habilitada)
                icon = sub.icon or (shouldInherit and parentSkill and parentSkill.icon) or "",
                -- Herda level se não estiver definido na subskill (só se herança estiver habilitada)
                level = sub.level or (shouldInherit and parentSkill and parentSkill.level) or "",
                -- Herda energy se não estiver definido na subskill (nil é válido, então verifica explicitamente)
                energy = (sub.energy ~= nil) and sub.energy or (shouldInherit and parentSkill and parentSkill.energy),
                -- Herda powerpve se não estiver definido na subskill (só se herança estiver habilitada)
                powerpve = (sub.powerpve ~= nil) and sub.powerpve or
                    (shouldInherit and parentSkill and parentSkill.powerpve),
                -- Herda powerpvp se não estiver definido na subskill (só se herança estiver habilitada)
                powerpvp = (sub.powerpvp ~= nil) and sub.powerpvp or
                    (shouldInherit and parentSkill and parentSkill.powerpvp),
                -- Herda cooldown se não estiver definido na subskill (só se herança estiver habilitada)
                cooldown = (sub.cooldown ~= nil) and sub.cooldown or
                    (shouldInherit and parentSkill and parentSkill.cooldown),
                -- Video sempre vem da subskill (nunca herda)
                video = sub.video or "",
                -- Herda desc se não estiver definido na subskill
                -- Se inherit = false, nunca herda, mesmo que processDesc retorne nil
                -- Se sub.desc existe, sempre usa (mesmo que processDesc retorne nil)
                -- Só herda se sub.desc não existir E herança estiver habilitada
                desc_i18n = (sub.desc ~= nil) and processDesc(sub.desc) or
                    (shouldInherit and parentSkill and processDesc(parentSkill.desc)) or nil,
                -- Herda flags se não estiver definido na subskill (só se herança estiver habilitada)
                flags = validSubFlags,
                -- Herda weapon se não estiver definido na subskill (sempre processa com processWeapon para aplicar colorize)
                weapon = (sub.weapon and processWeapon(sub.weapon)) or
                    (shouldInherit and parentSkill and processWeapon(parentSkill.weapon)),
                -- Herda back se não estiver definido na subskill (só se herança estiver habilitada)
                back = (sub.back ~= nil) and sub.back or (shouldInherit and parentSkill and parentSkill.back),
                -- Inclui o campo inherit para o frontend saber se herança está desabilitada
                inherit = sub.inherit
            }

            -- RECURSÃO NATIVA: processa sub-subskills (e sub-sub-subskills, etc.)
            -- Passa parentSkills também para recursão (herança sempre vem das skills principais)
            if type(sub.subskills) == "table" and type(sub.suborder) == "table" then
                subObj.subs = processSubskills(sub.subskills, sub.suborder, parentSkills)
                subObj.suborder = sub.suborder
            end

            table.insert(arr, subObj)
        end
    end

    return #arr > 0 and arr or nil
end

-- Gera JSON de skills a partir do módulo
function p.skill(frame)
    local parent = frame:getParent() or frame
    local args = parent.args or {}

    local moduleName = trim(args.module or "")
    if moduleName == "" then
        return "[]"
    end

    local data = requireCharModule(moduleName) or {}
    if not data.order or not data.skills then
        return "[]"
    end

    local skillsArr = {}

    -- Se houver forms, obtém a primeira forma disponível (genérico)
    local firstForm = nil
    local firstFormName = nil
    if type(data.forms) == "table" then
        -- Pega a primeira forma disponível (ordem não garantida em pairs, mas pega a primeira válida)
        for formName, formData in pairs(data.forms) do
            if type(formData) == "table" and type(formData.skills) == "table" and type(formData.order) == "table" then
                firstForm = formData
                firstFormName = formName
                break
            end
        end
    end

    -- Encontra a skill com form_switch = true (genérico)
    local formSwitchSkillName = nil
    local nextFixedSkillAfterFormSwitch = nil
    if type(data.skills) == "table" then
        for skillName, sk in pairs(data.skills) do
            if type(sk) == "table" and sk.form_switch == true then
                formSwitchSkillName = skillName
                break
            end
        end

        -- Encontra a próxima skill fixa depois do form_switch no order
        if formSwitchSkillName and type(data.order) == "table" then
            local foundFormSwitch = false
            for _, skillName in ipairs(data.order) do
                if foundFormSwitch then
                    -- Esta é a próxima skill fixa depois do form_switch
                    nextFixedSkillAfterFormSwitch = skillName
                    break
                end
                if skillName == formSwitchSkillName then
                    foundFormSwitch = true
                end
            end
        end
    end

    -- Se houver forms, insere a primeira skill da forma ANTES da skill com form_switch
    if firstForm and type(firstForm.skills) == "table" and type(firstForm.order) == "table" and #firstForm.order > 0 then
        local firstSkillName = firstForm.order[1]
        local formSk = firstForm.skills[firstSkillName]
        if type(formSk) == "table" then
            -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
            local formFlags = nil
            if type(formSk.flags) == "table" and #formSk.flags > 0 then
                formFlags = formSk.flags
            end

            local formSkillObj = {
                name = firstSkillName,
                n = firstSkillName,
                icon = (formSk.icon and formSk.icon ~= "") and formSk.icon or "Nada.png",
                level = formSk.level or "NIVEL",
                energy = formSk.energy,
                powerpve = formSk.powerpve,
                powerpvp = formSk.powerpvp,
                cooldown = formSk.cooldown,
                video = formSk.video or "",
                desc_i18n = processDesc(formSk.desc),
                flags = formFlags,
                weapon = processWeapon(formSk.weapon)
            }
            if type(formSk.subskills) == "table" and type(formSk.suborder) == "table" then
                formSkillObj.subs = processSubskills(formSk.subskills, formSk.suborder, data.skills)
                formSkillObj.suborder = formSk.suborder
            end
            table.insert(skillsArr, formSkillObj)
        end
    end

    -- Itera sobre order para manter ordem correta (skills fixas)
    local nextFixedSkillIndex = -1
    for idx, skillName in ipairs(data.order) do
        local sk = data.skills[skillName]
        if type(sk) == "table" then
            -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
            -- Proteção extra: verifica se flags é uma tabela válida e serializável
            local validFlags = nil
            if type(sk.flags) == "table" and #sk.flags > 0 then
                -- Testa se consegue serializar as flags antes de incluir
                local testOk, _ = pcall(function()
                    return mw.text.jsonEncode(sk.flags)
                end)
                if testOk then
                    validFlags = sk.flags
                else
                    -- Se não conseguir serializar, tenta criar uma cópia limpa
                    local cleanFlags = {}
                    for i, flag in ipairs(sk.flags) do
                        if type(flag) == "string" and flag ~= "" then
                            table.insert(cleanFlags, flag)
                        end
                    end
                    if #cleanFlags > 0 then
                        validFlags = cleanFlags
                    end
                end
            end

            local skillObj = {
                name = skillName,
                n = skillName,
                icon = (sk.icon and sk.icon ~= "") and sk.icon or "Nada.png",
                level = sk.level or "NIVEL",
                energy = sk.energy,
                powerpve = sk.powerpve,
                powerpvp = sk.powerpvp,
                cooldown = sk.cooldown,
                video = sk.video or "",
                desc_i18n = processDesc(sk.desc),
                flags = validFlags,
                weapon = processWeapon(sk.weapon),
                weaponicon = data.weaponicon,
                form_switch = sk.form_switch,
                form_videos = sk.form_videos -- Vídeos específicos para transições de forma
            }

            -- Processa subskills recursivamente (suporte nativo ilimitado)
            -- Passa data.skills para herança automática quando subskill tem mesmo nome que skill principal
            if type(sk.subskills) == "table" and type(sk.suborder) == "table" then
                skillObj.subs = processSubskills(sk.subskills, sk.suborder, data.skills)
                skillObj.suborder = sk.suborder
            end

            -- Valida flags antes de inserir no array (proteção extra)
            if skillObj.flags and (type(skillObj.flags) ~= "table" or #skillObj.flags == 0) then
                skillObj.flags = nil
            end

            table.insert(skillsArr, skillObj)

            -- Se for a skill com form_switch e houver forms, adiciona a terceira skill da forma logo após
            if skillName == formSwitchSkillName and firstForm and type(firstForm.skills) == "table" and type(firstForm.order) == "table" and #firstForm.order >= 2 then
                local thirdSkillName = firstForm.order[2] -- Segunda na ordem = terceira skill (1, 2, 3)
                local formSk = firstForm.skills[thirdSkillName]
                if type(formSk) == "table" then
                    -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
                    local formFlags3 = nil
                    if type(formSk.flags) == "table" and #formSk.flags > 0 then
                        formFlags3 = formSk.flags
                    end

                    local formSkillObj = {
                        name = thirdSkillName,
                        n = thirdSkillName,
                        icon = (formSk.icon and formSk.icon ~= "") and formSk.icon or "Nada.png",
                        level = formSk.level or "NIVEL",
                        energy = formSk.energy,
                        powerpve = formSk.powerpve,
                        powerpvp = formSk.powerpvp,
                        cooldown = formSk.cooldown,
                        video = formSk.video or "",
                        desc_i18n = processDesc(formSk.desc),
                        flags = formFlags3,
                        weapon = processWeapon(formSk.weapon)
                    }
                    if type(formSk.subskills) == "table" and type(formSk.suborder) == "table" then
                        formSkillObj.subs = processSubskills(formSk.subskills, formSk.suborder, data.skills)
                        formSkillObj.suborder = formSk.suborder
                    end
                    table.insert(skillsArr, formSkillObj)
                end
            end

            -- Guarda índice da próxima skill fixa depois do form_switch para inserir a quinta skill depois
            if skillName == nextFixedSkillAfterFormSwitch then
                nextFixedSkillIndex = #skillsArr
            end

            -- Se for a próxima skill fixa depois do form_switch e houver forms, adiciona a quinta skill da forma logo após
            if skillName == nextFixedSkillAfterFormSwitch and firstForm and type(firstForm.skills) == "table" and type(firstForm.order) == "table" and #firstForm.order >= 3 then
                local fifthSkillName = firstForm.order[3] -- Terceira na ordem = quinta skill (1, 2, 3)
                local formSk = firstForm.skills[fifthSkillName]
                if type(formSk) == "table" then
                    -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
                    local formFlags5 = nil
                    if type(formSk.flags) == "table" and #formSk.flags > 0 then
                        formFlags5 = formSk.flags
                    end

                    local formSkillObj = {
                        name = fifthSkillName,
                        n = fifthSkillName,
                        icon = (formSk.icon and formSk.icon ~= "") and formSk.icon or "Nada.png",
                        level = formSk.level or "NIVEL",
                        energy = formSk.energy,
                        powerpve = formSk.powerpve,
                        powerpvp = formSk.powerpvp,
                        cooldown = formSk.cooldown,
                        video = formSk.video or "",
                        desc_i18n = processDesc(formSk.desc),
                        flags = formFlags5,
                        weapon = processWeapon(formSk.weapon)
                    }
                    if type(formSk.subskills) == "table" and type(formSk.suborder) == "table" then
                        formSkillObj.subs = processSubskills(formSk.subskills, formSk.suborder, data.skills)
                        formSkillObj.suborder = formSk.suborder
                    end
                    table.insert(skillsArr, formSkillObj)
                end
            end
        end
    end

    -- Proteção contra erros no jsonEncode (especialmente para flags)
    local ok, jsonResult = pcall(function()
        return mw.text.jsonEncode(skillsArr)
    end)
    if ok and jsonResult then
        return jsonResult
    else
        -- Em caso de erro, tenta sem flags problemáticas
        for _, skill in ipairs(skillsArr) do
            if skill.flags and (type(skill.flags) ~= "table" or #skill.flags == 0) then
                skill.flags = nil
            end
        end
        return mw.text.jsonEncode(skillsArr)
    end
end

-- Gera JSON de forms a partir do módulo
function p.forms(frame)
    local parent = frame:getParent() or frame
    local args = parent.args or {}

    local moduleName = trim(args.module or "")
    if moduleName == "" then
        return "{}"
    end

    local data = requireCharModule(moduleName) or {}
    if not data.forms or type(data.forms) ~= "table" then
        return "{}"
    end

    local formsData = {}
    for formName, formData in pairs(data.forms) do
        if type(formData) == "table" and type(formData.skills) == "table" and type(formData.order) == "table" then
            local formSkills = {}
            for _, skillName in ipairs(formData.order) do
                local sk = formData.skills[skillName]
                if type(sk) == "table" then
                    -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
                    local formSkillFlags = nil
                    if type(sk.flags) == "table" and #sk.flags > 0 then
                        formSkillFlags = sk.flags
                    end

                    local skillObj = {
                        name = skillName,
                        n = skillName,
                        icon = (sk.icon and sk.icon ~= "") and sk.icon or "Nada.png",
                        level = sk.level or "NIVEL",
                        energy = sk.energy,
                        powerpve = sk.powerpve,
                        powerpvp = sk.powerpvp,
                        cooldown = sk.cooldown,
                        video = sk.video or "",
                        desc_i18n = processDesc(sk.desc),
                        flags = formSkillFlags,
                        weapon = processWeapon(sk.weapon)
                    }
                    -- Processa subskills se houver
                    -- Passa data.skills para herança automática quando subskill tem mesmo nome que skill principal
                    if type(sk.subskills) == "table" and type(sk.suborder) == "table" then
                        skillObj.subs = processSubskills(sk.subskills, sk.suborder, data.skills)
                        skillObj.suborder = sk.suborder
                    end
                    table.insert(formSkills, skillObj)
                end
            end
            formsData[formName] = {
                order = formData.order,
                skills = formSkills
            }
        end
    end

    return mw.text.jsonEncode(formsData)
end

-- Gera JSON de skins a partir do módulo
function p.skin(frame)
    local parent = frame:getParent() or frame
    local args = parent.args or {}

    local moduleName = trim(args.module or "")
    if moduleName == "" then
        return "[]"
    end

    local data = requireCharModule(moduleName) or {}
    if not data.skins or type(data.skins) ~= "table" then
        return "[]"
    end

    -- Processa skins do módulo
    local skinsArr = {}
    for _, skin in ipairs(data.skins) do
        if type(skin) == "table" then
            local skinObj = {
                name = skin.name or "",
                sprite = skin.sprite or "",
                tooltip = skin.tooltip or "",
                offset_x = skin.offset_x,
                tile = skin.tile or "",
                tile_x = skin.tile_x,
                tile_y = skin.tile_y,
                youtube = skin.youtube
            }

            -- Se tooltip é table, converte para JSON string
            if type(skin.tooltip) == "table" then
                skinObj.tooltip = mw.text.jsonEncode(skin.tooltip)
            end

            table.insert(skinsArr, skinObj)
        end
    end

    return mw.text.jsonEncode(skinsArr)
end

return p