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 SELETIVA: lista de campos que NÃO devem ser herdados
            -- Se no_inherit for uma tabela, apenas os campos listados não serão herdados
            -- Se inherit = false, nenhum campo é herdado (comportamento antigo)
            local noInherit = {}
            if type(sub.no_inherit) == "table" then
                -- Converte para um set para busca rápida
                for _, field in ipairs(sub.no_inherit) do
                    if type(field) == "string" then
                        noInherit[field] = true
                    end
                end
            end

            -- Função auxiliar para verificar se um campo pode ser herdado
            local function canInherit(fieldName)
                if not shouldInherit then
                    return false                -- Se herança está desabilitada, nada é herdado
                end
                return not noInherit[fieldName] -- Se campo não está em no_inherit, pode herdar
            end

            -- 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
            -- Flags herdam se não estiverem em no_inherit
            local subFlags = (sub.flags ~= nil) and sub.flags or
                (canInherit("flags") 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 e icon não estiver em no_inherit)
                icon = sub.icon or (canInherit("icon") and parentSkill and parentSkill.icon) or "",
                -- Herda level se não estiver definido na subskill (só se herança estiver habilitada e level não estiver em no_inherit)
                level = sub.level or (canInherit("level") 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
                    (canInherit("energy") and parentSkill and parentSkill.energy),
                -- Herda powerpve se não estiver definido na subskill (só se herança estiver habilitada e powerpve não estiver em no_inherit)
                powerpve = (sub.powerpve ~= nil) and sub.powerpve or
                    (canInherit("powerpve") and parentSkill and parentSkill.powerpve),
                -- Herda powerpvp se não estiver definido na subskill (só se herança estiver habilitada e powerpvp não estiver em no_inherit)
                powerpvp = (sub.powerpvp ~= nil) and sub.powerpvp or
                    (canInherit("powerpvp") and parentSkill and parentSkill.powerpvp),
                -- Herda cooldown se não estiver definido na subskill (só se herança estiver habilitada e cooldown não estiver em no_inherit)
                cooldown = (sub.cooldown ~= nil) and sub.cooldown or
                    (canInherit("cooldown") and parentSkill and parentSkill.cooldown),
                -- Video sempre vem da subskill (nunca herda)
                video = sub.video or "",
                -- Descrição: se desc não estiver em no_inherit, pode herdar (mas por padrão desc NUNCA herda)
                -- Se desc estiver em no_inherit ou se não houver desc na subskill, não herda
                desc_i18n = nil, -- Será definido depois se sub.desc existir
                -- Flags: se flags não estiver em no_inherit, herda normalmente
                -- Se flags estiver em no_inherit, não herda (usa apenas flags da subskill)
                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
                    (canInherit("weapon") and parentSkill and processWeapon(parentSkill.weapon)),
                -- Herda back se não estiver definido na subskill (só se herança estiver habilitada e back não estiver em no_inherit)
                back = (sub.back ~= nil) and sub.back or (canInherit("back") and parentSkill and parentSkill.back),
                -- Inclui o campo inherit para o frontend saber se herança está desabilitada
                inherit = sub.inherit,
                -- Inclui no_inherit para o frontend saber quais campos não devem ser herdados
                no_inherit = sub.no_inherit
            }

            -- PROTEÇÃO TOTAL: Se "desc" está em no_inherit, NUNCA herda (MESMA LÓGICA DE inherit = false)
            -- FORÇA: desc_i18n NUNCA será herdado quando "desc" está em no_inherit
            if noInherit["desc"] then
                -- BLOQUEIO TOTAL: Se "desc" está em no_inherit, desc_i18n NUNCA herda da skill principal
                -- Remove qualquer possibilidade de herança
                if sub.desc ~= nil then
                    -- Só processa se sub.desc existir explicitamente na subskill
                    local processedDesc = processDesc(sub.desc)
                    if processedDesc then
                        -- FORÇA: sempre atribui desc_i18n quando processDesc retorna algo
                        subObj.desc_i18n = processedDesc
                    else
                        -- Se processDesc retornou nil, tenta processar novamente
                        -- Isso pode acontecer se processDesc falhou por algum motivo
                        local retryDesc = processDesc(sub.desc)
                        if retryDesc then
                            subObj.desc_i18n = retryDesc
                        else
                            -- Se ainda retornou nil, desc_i18n fica nil (NUNCA herda)
                            subObj.desc_i18n = nil
                        end
                    end
                else
                    -- Se "desc" está em no_inherit e não existe na subskill, desc_i18n é nil (NUNCA herda)
                    -- GARANTE que não há nenhuma herança
                    subObj.desc_i18n = nil
                end
                -- PROTEÇÃO EXTRA: Remove desc_i18n explicitamente do objeto se for nil
                -- Isso garante que não seja incluído no JSON e não seja herdado de forma alguma
                if subObj.desc_i18n == nil then
                    subObj.desc_i18n = nil -- Explicitamente nil
                end
                -- GARANTE que desc_i18n NUNCA seja herdado: remove qualquer referência à skill principal
                -- Isso força o frontend a usar apenas a descrição da subskill
                subObj.desc_i18n = subObj.desc_i18n -- Mantém apenas o que foi processado acima
            else
                -- Se "desc" NÃO está em no_inherit, pode herdar normalmente
                if sub.desc ~= nil then
                    -- Sempre processa a descrição da subskill se existir
                    local processedDesc = processDesc(sub.desc)
                    if processedDesc then
                        subObj.desc_i18n = processedDesc
                    else
                        -- Se processDesc retornou nil, tenta processar novamente
                        subObj.desc_i18n = processDesc(sub.desc) or {}
                    end
                elseif canInherit("desc") and parentSkill and parentSkill.desc then
                    -- Herda descrição se não existir na subskill e "desc" não estiver em no_inherit
                    local processedDesc = processDesc(parentSkill.desc)
                    if processedDesc then
                        subObj.desc_i18n = processedDesc
                    end
                else
                    -- Se não tem desc na subskill e não pode herdar, desc_i18n é nil
                    subObj.desc_i18n = nil
                end
            end

            -- 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
            -- Valida flags: deve ser uma tabela com pelo menos um elemento, senão nil
            -- Simplificado: se é uma tabela válida com strings, inclui diretamente
            local validFlags = nil
            if type(sk.flags) == "table" and #sk.flags > 0 then
                -- Verifica se todos os elementos são strings válidas
                local allValid = true
                for i, flag in ipairs(sk.flags) do
                    if type(flag) ~= "string" or flag == "" then
                        allValid = false
                        break
                    end
                end
                if allValid then
                    validFlags = sk.flags
                else
                    -- Se houver elementos inválidos, cria 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)
    -- Limpa flags problemáticas ANTES de tentar serializar
    -- NOTA: Não remove flags válidas, apenas valida e limpa flags inválidas
    for _, skill in ipairs(skillsArr) do
        if skill.flags then
            if type(skill.flags) ~= "table" or #skill.flags == 0 then
                skill.flags = nil
            else
                -- Limpa flags inválidas (não strings ou vazias)
                local cleanFlags = {}
                for i, flag in ipairs(skill.flags) do
                    if type(flag) == "string" and flag ~= "" then
                        table.insert(cleanFlags, flag)
                    end
                end
                if #cleanFlags > 0 then
                    skill.flags = cleanFlags
                else
                    skill.flags = nil
                end
            end
        end
        -- Limpa flags em subskills também
        if skill.subs and type(skill.subs) == "table" then
            for _, sub in ipairs(skill.subs) do
                if sub.flags then
                    if type(sub.flags) ~= "table" or #sub.flags == 0 then
                        sub.flags = nil
                    else
                        local cleanSubFlags = {}
                        for i, flag in ipairs(sub.flags) do
                            if type(flag) == "string" and flag ~= "" then
                                table.insert(cleanSubFlags, flag)
                            end
                        end
                        if #cleanSubFlags > 0 then
                            sub.flags = cleanSubFlags
                        else
                            sub.flags = nil
                        end
                    end
                end
            end
        end
    end

    local ok, jsonResult = pcall(function()
        return mw.text.jsonEncode(skillsArr)
    end)
    if ok and jsonResult then
        return jsonResult
    else
        -- Última tentativa: remove TODAS as flags
        for _, skill in ipairs(skillsArr) do
            skill.flags = nil
            if skill.subs and type(skill.subs) == "table" then
                for _, sub in ipairs(skill.subs) do
                    sub.flags = nil
                end
            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