Módulo:Character

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

local p = {}

--------------------------------------------------------------------------------
-- Utils
--------------------------------------------------------------------------------

local function trim(s)
    return (tostring(s or ""):gsub("^%s+", ""):gsub("%s+$", ""))
end

-- Gera URL pública de arquivo (tenta "Special:" e "Especial:" por compat)
local function fileURL(name)
    name = trim(name or "")
    if name == "" then
        return ""
    end
    name = name:gsub("^Arquivo:", ""):gsub("^File:", "")
    local t1 = mw.title.new("Special:FilePath/" .. name)
    if t1 then
        local u = t1:fullUrl()
        if u and u ~= "" then
            return u
        end
    end
    local t2 = mw.title.new("Especial:FilePath/" .. name)
    if t2 then
        local u = t2:fullUrl()
        if u and u ~= "" then
            return u
        end
    end
    return ""
end

-- Carrega o módulo do personagem (Módulo:<Nome>/Modulo/Module)
local function requireCharModule(char)
    char = trim(char or "")
    if char == "" then
        return nil
    end

    local ok, data
    ok, data = pcall(function()
        return require("Módulo:" .. char)
    end)
    if ok and type(data) == "table" then
        return data
    end

    ok, data = pcall(function()
        return require("Modulo:" .. char)
    end)
    if ok and type(data) == "table" then
        return data
    end

    ok, data = pcall(function()
        return require("Module:" .. char)
    end)
    if ok and type(data) == "table" then
        return data
    end

    return nil
end

-- Separa uma sequência de {} (JSONs colados) em uma tabela de chunks
local function collectJsonObjects(s)
    s = tostring(s or "")
    local out = {}
    for chunk in s:gmatch("%b{}") do
        table.insert(out, chunk)
    end
    return out
end

--------------------------------------------------------------------------------
-- I18N: rótulos de atributos + "Nível"
--------------------------------------------------------------------------------

local ATTR_I18N = {
    pt = {
        cooldown = "Recarga:",
        energy_gain = "Ganho de Energia:",
        energy_cost = "Custo de Energia:",
        power = "Poder:",
        power_pvp = "Poder PvP:",
        level = "Nível:"
    },
    en = {
        cooldown = "Cooldown:",
        energy_gain = "Energy Gain:",
        energy_cost = "Energy Cost:",
        power = "Power:",
        power_pvp = "PvP Power:",
        level = "Level:"
    },
    es = {
        cooldown = "Enfriamiento:",
        energy_gain = "Ganancia de Energía:",
        energy_cost = "Costo Energético:",
        power = "Poder:",
        power_pvp = "Poder PvP:",
        level = "Nivel:"
    },
    pl = {
        cooldown = "Czas Odnowienia:",
        energy_gain = "Odzyskanle Energii:",
        energy_cost = "Koszt energii:",
        power = "Moc:",
        power_pvp = "Moc PvP:",
        level = "Poziom:"
    }
}

--------------------------------------------------------------------------------
-- I18N: rótulos das abas (Skills/Skins + título da área de Skins)
--------------------------------------------------------------------------------

local TAB_I18N = {
    pt = {
        skills = "Habilidades",
        skins = "Skins",
        skins_title = "SKINS & SPOTLIGHTS"
    },
    en = {
        skills = "Skills",
        skins = "Skins",
        skins_title = "SKINS & SPOTLIGHTS"
    },
    es = {
        skills = "Habilidades",
        skins = "Aspectos",
        skins_title = "ASPECTOS Y DESTACADOS"
    },
    pl = {
        skills = "Umiejętności",
        skins = "Skórki",
        skins_title = "SKÓRKI I PREZENTACJE"
    }
}

--------------------------------------------------------------------------------
-- Serializer de skin (para {{Skin}})
--------------------------------------------------------------------------------

-- Serializer de skin (para {{Skin}})
-- Agora busca tooltip i18n no módulo do personagem e já injeta w/h e bg padrão
function p.skin(frame)
    local parent = frame:getParent() or frame
    local a = frame.args or {}
    local function trim(s) return (tostring(s or ""):gsub("^%s+", ""):gsub("%s+$", "")) end
    local function nz(s)  s = trim(s or ""); return (s ~= "" and s or nil) end

    -- personagem vem do {{Character|nome=...}} ou via |char=
    local char = nz(a.char) or nz(parent.args and parent.args.nome)
    if not char then
        return mw.text.jsonEncode({ error = "Skin: personagem não informado" })
    end

    -- nome da skin (chave em mod.skins)
    local skinName = nz(a.name) or nz(a.n)
    if not skinName then
        return mw.text.jsonEncode({ error = "Skin: nome (name/n) não informado" })
    end

    local mod = requireCharModule(char) or {}
    local sk  = (mod.skins or {})[skinName] or {}
    local info = sk.info or {}

    -- Monta tooltip i18n no formato: "<Nome>: <descrição>"
    local tip_pt = (info.pt and trim(info.pt) ~= "" and (skinName .. ": " .. info.pt)) or ""
    local tip_en = (info.en and trim(info.en) ~= "" and (skinName .. ": " .. info.en)) or ""
    local tip_es = (info.es and trim(info.es) ~= "" and (skinName .. ": " .. info.es)) or ""
    local tip_pl = (info.pl and trim(info.pl) ~= "" and (skinName .. ": " .. info.pl)) or ""

    -- visuais vindos da predef: sprite + w/h + bg (com fallback)
    local sprite = nz(a.sprite) or "Nada.png"
    local bg     = trim(a.background or "")
    if bg == "" then bg = "Backgroundteste.png" end

    local w = tonumber(a.w or a.width) or 100
    local h = tonumber(a.h or a.height) or 100
    if w < 1 then w = 100 end
    if h < 1 then h = 100 end

    local obj = {
        name       = skinName,
        sprite     = sprite,
        background = bg,
        w = w, h = h,
        tooltip_i18n = {
            pt = tip_pt, en = tip_en, es = tip_es, pl = tip_pl
        },
        -- flatten p/ data-attrs fáceis:
        tooltipPt = tip_pt, tooltipEn = tip_en, tooltipEs = tip_es, tooltipPl = tip_pl,
        youtube = nz(a.youtube),
        source  = nz(a.source),
    }

    return mw.text.jsonEncode(obj)
end

--------------------------------------------------------------------------------
-- Componente principal
--------------------------------------------------------------------------------

function p.generate(frame)
    local parent = frame:getParent() or frame
    local args = parent.args or {}

    local html = mw.html.create('div')
    local box = html:tag('div'):addClass('character-box')

    ----------------------------------------------------------------------------
    -- Background (suporta |background= ou |banner= como fallback)
    ----------------------------------------------------------------------------
    do
        local bgParam = trim(frame:preprocess(args.background or ""))
        if bgParam == "" then
            bgParam = trim(frame:preprocess(args.banner or "")) -- opcional compat
        end
        if bgParam ~= "" then
            box:attr('data-bg-file', bgParam)
            local url = fileURL(bgParam)
            if url and url ~= "" then
                box:attr('data-bg-url', url)
                -- fallback inline para certos temas
                local style = string.format("--character-bg: url('%s'); background-image: url('%s');", url, url)
                local old = box:getAttr('style')
                box:attr('style', old and (old .. " " .. style) or style)
            end
        end
    end

    ----------------------------------------------------------------------------
    -- Header
    ----------------------------------------------------------------------------
    local header = box:tag('div'):addClass('character-header')

    -- topbar (avatar + nome + tags)
    local topbar = header:tag('div'):addClass('character-topbar')
    local nameBox = topbar:tag('div'):addClass('character-name-box')

    local avatarImg = trim(args.avatar or "Franky_ts_medal.png")
    nameBox:wikitext(string.format('[[Arquivo:%s|class=topbar-icon|link=|alt=Avatar]]', avatarImg))

    local nameGroup = nameBox:tag('div'):addClass('character-name-group')
    nameGroup:tag('div'):addClass('character-name'):wikitext(args.nome or "")

    -- Class tags (TIER + TAGS, com i18n injetada)
    local classTags = nameGroup:tag('div'):addClass('class-tags')

    -- Resolve Tier/Tags em PT (render inicial)
    local nomeChar = trim(args.nome or "")
    local charData = requireCharModule(nomeChar) or {}
    local rawTier = trim(frame:preprocess(args.tier or ""))
    local rawClasse = trim(frame:preprocess(args.classe or ""))

    -- Se vier tokens tipo "tier*", resolve via módulo
    if rawTier ~= "" and mw.ustring.lower(rawTier):sub(1, 4) == "tier" then
        rawTier = (charData.tier_i18n and charData.tier_i18n.pt) or charData.tier or rawTier
    end
    if rawClasse ~= "" and mw.ustring.lower(rawClasse):sub(1, 5) == "class" then
        local arr = (charData.tags_i18n and charData.tags_i18n.pt) or charData.tags
        if type(arr) == "table" then
            rawClasse = table.concat(arr, " / ")
        end
    end
    -- Se continuar vazio, puxa do módulo do personagem
    if rawTier == "" then
        rawTier = (charData.tier_i18n and charData.tier_i18n.pt) or charData.tier or ""
    end
    if rawClasse == "" then
        local arr = (charData.tags_i18n and charData.tags_i18n.pt) or charData.tags
        if type(arr) == "table" then
            rawClasse = table.concat(arr, " / ")
        else
            rawClasse = arr or ""
        end
    end

    -- Chip de TIER
    local tierDiv
    if rawTier ~= "" then
        tierDiv = classTags:tag('div'):addClass('class-tag tier'):wikitext(rawTier)
    end

    -- Injeta i18n do TIER como data-*
    do
        local tI = charData.tier_i18n or {
            pt = rawTier,
            en = rawTier,
            es = rawTier,
            pl = rawTier
        }
        if tierDiv then
            tierDiv:attr('data-tier-pt', tI.pt or rawTier):attr('data-tier-en', tI.en or tI.pt or rawTier):attr(
                'data-tier-es', tI.es or tI.pt or rawTier):attr('data-tier-pl', tI.pl or tI.pt or rawTier)
        end
    end

    -- Injeta i18n das TAGS em JSON no container
    do
        local tagsI = charData.tags_i18n
        if type(tagsI) ~= "table" then
            tagsI = {
                pt = {},
                en = {},
                es = {},
                pl = {}
            }
            if type(charData.tags) == "table" then
                tagsI.pt = charData.tags
            end
        end
        classTags:attr('data-tags-i18n', mw.text.jsonEncode(tagsI))
    end

    -- Render inicial das TAGS (PT)
    do
        for entry in mw.text.gsplit(rawClasse, '/', true) do
            local clean = mw.text.trim(entry or '')
            if clean ~= '' then
                classTags:tag('div'):addClass('class-tag'):wikitext(clean)
            end
        end
    end

    -- Descrição geral (se houver)
    header:tag('div'):addClass('topbar-description'):wikitext(args.desc or "")

    ----------------------------------------------------------------------------
    -- Idioma para tabs (PT padrão + aceita pt-br,en-US,... via |lang=)
    ----------------------------------------------------------------------------
    local rawLang = trim(args.lang or "pt")
    rawLang = mw.ustring.lower(rawLang)
    local baseLang = rawLang:match("^([a-z][a-z])") or rawLang
    local TAB = TAB_I18N[rawLang] or TAB_I18N[baseLang] or TAB_I18N.pt

    ----------------------------------------------------------------------------
    -- Abas (tabs)
    ----------------------------------------------------------------------------
    local tabs = header:tag('div'):addClass('character-tabs')
    tabs:tag('div'):addClass('tab-btn active'):attr('data-tab', 'skills'):wikitext(TAB.skills)
    tabs:tag('div'):addClass('tab-btn'):attr('data-tab', 'skins'):wikitext(TAB.skins)

    ----------------------------------------------------------------------------
    -- Aba: Skills
    ----------------------------------------------------------------------------
    local skillsTab = box:tag('div'):addClass('tab-content active'):attr('id', 'skills')
    local iconBar = skillsTab:tag('div'):addClass('icon-bar')
    local skillsContainer = skillsTab:tag('div'):addClass('skills-container')
    local details = skillsContainer:tag('div'):addClass('skills-details')
    local descBox = details:tag('div'):addClass('desc-box')
    skillsContainer:tag('div'):addClass('video-container'):done()

    skillsTab:attr('data-i18n-attrs', mw.text.jsonEncode(ATTR_I18N))
    if args.lang and trim(args.lang) ~= "" then
        skillsTab:attr('data-i18n-default', baseLang)
    end

    -- Monta ícones de skill a partir de |skills= (sequência de {} JSON)
    local skillsPacked = args.skills or ""
    local idx = 0
    for _, chunk in ipairs(collectJsonObjects(skillsPacked)) do
        local ok, sk = pcall(mw.text.jsonDecode, chunk)
        if ok and type(sk) == "table" then
            local name = trim(sk.name or sk.nome or "")
            local icon = trim(sk.icon or "")
            local desc = trim(sk.desc or "")
            local level = trim(tostring(sk.level or ""))
            local pve = trim(sk.powerpve or "")
            local pvp = trim(sk.powerpvp or "")
            local energy = trim(sk.energy or "")
            local cd = trim(sk.cooldown or "")
            local video = trim(sk.video or "")
            if icon ~= "" then
                idx = idx + 1
                local attrs = table.concat({pve ~= "" and pve or "-", pvp ~= "" and pvp or "-",
                                            energy ~= "" and energy or "-", cd ~= "" and cd or "-"}, ", ")

                local iconWrap = iconBar:tag('div'):addClass('skill-icon'):attr('data-index', idx):attr('data-nome',
                    name):attr('data-desc', desc):attr('data-atr', attrs):attr('data-video',
                    (video ~= "" and fileURL(video) or "")):attr('data-video-preload', 'auto')

                -- Level (para "Nível X" no JS)
                if level ~= "" and mw.ustring.upper(level) ~= "NIVEL" then
                    iconWrap:attr('data-level', level)
                end

                -- Descrições i18n (quando vierem do Info)
                if type(sk.desc_i18n) == "table" then
                    iconWrap:attr('data-desc-pt', sk.desc_i18n.pt or ""):attr('data-desc-en', sk.desc_i18n.en or "")
                        :attr('data-desc-es', sk.desc_i18n.es or ""):attr('data-desc-pl', sk.desc_i18n.pl or "")
                elseif desc and desc ~= "" then
                    -- Pelo menos PT
                    iconWrap:attr('data-desc-pt', desc)
                end

                -- Subskills: injeta dados no HTML pro Widget ler
                if type(sk.subs) == "table" and #sk.subs > 0 then
                    iconWrap:attr('data-subs', mw.text.jsonEncode(sk.subs))
                end
                if type(sk.suborder) == "table" and #sk.suborder > 0 then
                    iconWrap:attr('data-suborder', mw.text.jsonEncode(sk.suborder))
                end

                -- Imagem do ícone
                iconWrap:wikitext(string.format('[[Arquivo:%s|class=skill-icon-img|link=]]', icon))

                -- Slot de descrição indexado (o JS usa para sincronizar)
                descBox:tag('div'):addClass('skill-desc'):attr('data-index', idx)
            end
        end
    end

    ----------------------------------------------------------------------------
    -- Aba: Skins (carrossel)
    ----------------------------------------------------------------------------
    local skinsTab = box:tag('div'):addClass('tab-content'):attr('id', 'skins')
    local cardSkins = skinsTab:tag('div'):addClass('card-skins')
    cardSkins:tag('span'):addClass('card-skins-title'):wikitext(TAB.skins_title)

    local wrapper = cardSkins:tag('div'):addClass('skins-carousel-wrapper')
    wrapper:tag('div'):addClass('skins-arrow left'):wikitext('«')
    local carousel = wrapper:tag('div'):addClass('skins-carousel')

    local skinsPacked = args.skins or ""
for _, chunk in ipairs(collectJsonObjects(skinsPacked)) do
    local ok, sk = pcall(mw.text.jsonDecode, chunk)
    if ok and type(sk) == "table" then
        local imageFile = trim(sk.sprite or "")
        local bannerFile = trim(sk.background or "")
        if bannerFile == "" then bannerFile = "Backgroundteste.png" end

        -- i18n: novo (tooltip_i18n/flatten) OU legado (tooltip)
        local tip_pt = trim((sk.tooltipPt or (sk.tooltip_i18n and sk.tooltip_i18n.pt) or "") or "")
        local tip_en = trim((sk.tooltipEn or (sk.tooltip_i18n and sk.tooltip_i18n.en) or "") or "")
        local tip_es = trim((sk.tooltipEs or (sk.tooltip_i18n and sk.tooltip_i18n.es) or "") or "")
        local tip_pl = trim((sk.tooltipPl or (sk.tooltip_i18n and sk.tooltip_i18n.pl) or "") or "")
        local tooltipRaw = trim(sk.tooltip or "") -- legado (uma única língua)

        -- tamanho (%)
        local w = tonumber(sk.w) or 100
        local h = tonumber(sk.h) or 100
        if w < 1 then w = 100 end
        if h < 1 then h = 100 end

        local skinCard = carousel:tag('div'):addClass('skin-card')
            :attr('data-background', bannerFile)
            :attr('data-w', tostring(w))
            :attr('data-h', tostring(h))

        -- Se tiver i18n, injeta por data-attrs p/ o JS; senão mantém legado
        if tip_pt ~= "" or tip_en ~= "" or tip_es ~= "" or tip_pl ~= "" then
            skinCard:attr('data-tooltip-pt', tip_pt)
                    :attr('data-tooltip-en', tip_en)
                    :attr('data-tooltip-es', tip_es)
                    :attr('data-tooltip-pl', tip_pl)
        elseif tooltipRaw ~= "" then
            local tooltipHtml = tooltipRaw:gsub("'''([^']+)'''", "<b>%1</b>"):gsub("\n", "<br>")
            skinCard:attr('data-skin-tooltip', tooltipHtml)  -- legado
        end

        -- Spotlight do YouTube (opcional)
        local yt = trim(sk.youtube or "")
        if yt ~= "" then
            skinCard:attr('data-youtube', yt):addClass('is-clickable')
        end

        -- banner (com fallback aplicado acima)
        skinCard:tag('div'):addClass('skin-banner')
            :wikitext(string.format('[[Arquivo:%s|link=]]', bannerFile))
            :attr('alt', 'banner')

        -- sprite (aplica w/h via style inline simples; se preferir CSS, só ler data-w/h)
        skinCard:tag('div'):addClass('skin-sprite')
            :attr('style', string.format('width:%d%%;height:%d%%;', w, h))
            :wikitext(imageFile ~= "" and string.format('[[Arquivo:%s|link=]]', imageFile) or "")
            :attr('alt', 'skin')

        -- cria container onde o JS escreve a tooltip i18n
        skinCard:tag('div'):addClass('skin-tooltip')
    end
end

    wrapper:tag('div'):addClass('skins-arrow right'):wikitext('»')

    ----------------------------------------------------------------------------
    -- Tier -> classe CSS (visual)
    ----------------------------------------------------------------------------
    do
        local key = mw.ustring.lower(rawTier or "")
        local tierMap = {
            bronze = "tier-bronze",
            bronce = "tier-bronze",
            silver = "tier-silver",
            prata = "tier-silver",
            gold = "tier-gold",
            ouro = "tier-gold",
            diamond = "tier-diamond",
            diamante = "tier-diamond"
        }
        local tierClass = tierMap[key]
        if tierClass and tierClass ~= "" then
            box:addClass(tierClass)
        end
    end

    ----------------------------------------------------------------------------
    -- Retorno
    ----------------------------------------------------------------------------
    return tostring(html)
end

return p