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}})
--------------------------------------------------------------------------------

function p.skin(frame)
    local a = frame.args

    local function nz(s)
        s = mw.text.trim(tostring(s or ""))
        return (s ~= "" and s or nil)
    end

    -- se vier algum idioma, empacota em JSON; senão mantém tooltip legado
    local pack = {
        pt = nz(a.tooltip_pt),
        en = nz(a.tooltip_en),
        es = nz(a.tooltip_es),
        pl = nz(a.tooltip_pl)
    }

    local tooltip
    if pack.pt or pack.en or pack.es or pack.pl then
        tooltip = mw.text.jsonEncode(pack)
    else
        tooltip = a.tooltip or ''
    end

    local obj = {
        sprite = a.sprite or '',
        background = a.background or '',
        tooltip = tooltip,
        youtube = a.youtube or '',
        source = a.source or ''
    }
    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 bannerFile = trim(sk.background or "")
            local imageFile = trim(sk.sprite or "")
            local tooltipRaw = trim(sk.tooltip or "")
            local tooltipHtml = ""
            local tipPack = nil

            -- Se o tooltip vier em JSON (i18n), renderiza PT inicialmente e preserva o pacote
            if tooltipRaw:match("^%s*{") then
                local ok2, obj2 = pcall(mw.text.jsonDecode, tooltipRaw)
                if ok2 and type(obj2) == "table" then
                    tipPack = obj2
                    local base = trim(obj2.pt or obj2.en or obj2.es or obj2.pl or "")
                    if base ~= "" then
                        tooltipHtml = base:gsub("'''([^']+)'''", "<b>%1</b>"):gsub("\n", "<br>")
                    end
                end
            end

            -- Legado (texto simples)
            if tooltipHtml == "" then
                tooltipHtml = tooltipRaw:gsub("'''([^']+)'''", "<b>%1</b>"):gsub("\n", "<br>")
            end

            local skinCard = carousel:tag('div'):addClass('skin-card'):attr('data-skin-tooltip', tooltipHtml)

            -- Se tinha i18n, guarda pra troca dinâmica pelo Char Translator
            if tipPack then
                skinCard:attr('data-skin-tooltip-i18n', mw.text.jsonEncode(tipPack))
            end

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

            skinCard:tag('div'):addClass('skin-banner'):wikitext(bannerFile ~= "" and
                                                                     string.format('[[Arquivo:%s|link=]]', bannerFile) or
                                                                     ""):attr('alt', 'banner')

            skinCard:tag('div'):addClass('skin-sprite'):wikitext(imageFile ~= "" and
                                                                     string.format('[[Arquivo:%s|link=]]', imageFile) or
                                                                     ""):attr('alt', 'skin')
        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