模块:CardData

此模块的文档可以在模块:CardData/doc创建

-- Module:CardData
-- 用法：{{#invoke:CardData|render|复仇童谣}}
-- 通过 ExternalData 扩展从 Directus API 拉取数据，在服务端渲染完整 HTML

local p = {}

-- ══════════════════════════════════════════════
-- 工具函数
-- ══════════════════════════════════════════════

local function val(v, fallback)
    if v == nil or v == "" then
        return fallback or "—"
    end
    return v
end

local function rarityStars(n)
    n = tonumber(n) or 0
    return string.rep("★", n)
end

local function parseJson(str)
    if not str or str == "" then return nil end
    local ok, result = pcall(mw.text.jsonDecode, str)
    if ok then return result else return nil end
end

-- ──────────────────────────────────────────────
-- 辅助：段落标题
-- ──────────────────────────────────────────────
local function makeTitle(titleText, subtitleText, extraClass)
    local div = mw.html.create("div")
        :addClass("card_content-item-title")
        :addClass("card_content-item-title--mt")
    if extraClass then div:addClass(extraClass) end
    div:wikitext(titleText)
    div:tag("span")
        :addClass("card_content-item-subtitle")
        :wikitext(subtitleText)
    return div
end

local function makeHr(extraClass)
    local div = mw.html.create("div")
        :addClass("card_content-item-hr")
    if extraClass then div:addClass(extraClass) end
    return div
end

local function makeTriggerLabel(triggerType, triggerValue)
    local span = mw.html.create("span")
        :addClass("card_content_skill-meta-val")
    if triggerType == "normal_attack" then
        span:wikitext("每进行")
        span:tag("span"):addClass("card_accent"):wikitext(tostring(triggerValue or "?"))
        span:wikitext("次普攻")
    else
        span:wikitext(val(triggerType))
    end
    return span
end

local function makeTagsRow(tagsJson)
    local div = mw.html.create("div"):addClass("card_content_skill-tags")
    local tags = parseJson(tagsJson)
    if tags and type(tags) == "table" then
        for _, tag in ipairs(tags) do
            div:tag("div"):addClass("card_content_skill-tag"):wikitext(tag)
        end
    end
    return div
end

local function makeUpgradeTable(levelsJson)
    local wrap = mw.html.create("div"):addClass("card_content_skill-upgrade")
    local rows = parseJson(levelsJson)
    if not rows or type(rows) ~= "table" or #rows == 0 then
        return wrap
    end

    local firstRow = rows[1]
    local colCount = 0
    if firstRow and firstRow.levels then
        colCount = #firstRow.levels
    end

    local gridClass = "card_content_skill-upgrade-grid"
    if colCount >= 10 then
        gridClass = gridClass .. " card_content_skill-upgrade-grid--10"
    end

    local grid = wrap:tag("div"):addClass(gridClass)
    grid:tag("div")
    for i = 2, colCount do
        grid:tag("div"):addClass("card_content_skill-upgrade-lv"):wikitext(tostring(i))
    end

    for idx, row in ipairs(rows) do
        local labelCell = grid:tag("div"):addClass("card_content_skill-upgrade-row-label")
        labelCell:tag("span"):addClass("card_content_skill-upgrade-badge"):wikitext(tostring(idx))
        labelCell:tag("span"):addClass("card_content_skill-upgrade-badge-text"):wikitext(val(row.name, ""))
        labelCell:tag("span"):addClass("card_content_skill-upgrade-arrow"):wikitext("→")

        if row.levels and type(row.levels) == "table" then
            for _, v in ipairs(row.levels) do
                local cell = grid:tag("div"):addClass("card_content_skill-upgrade-val")
                if v == nil or v == "" or v == "—" then
                    cell:addClass("card_content_skill-upgrade-val--null"):wikitext("—")
                else
                    cell:addClass("card_accent"):wikitext(tostring(v))
                end
            end
        end
    end

    return wrap
end

local function makeSkillCard(skillData, skillType)
    local card = mw.html.create("div"):addClass("card_content_skill-card")
    local left = card:tag("div"):addClass("card_content_skill-left")

    local titleRow = left:tag("div"):addClass("card_content_skill-title")
    titleRow:tag("div"):addClass("card_content_skill-icon")
    local titleText = titleRow:tag("div"):addClass("card_content_skill-title-text")

    local nameRow = titleText:tag("div")
    nameRow:tag("span"):addClass("card_content_skill-name"):wikitext(val(skillData.name))
    nameRow:tag("span")
        :addClass("card_content_skill-type card_accent--type")
        :wikitext("「" .. val(skillData.type) .. "」")

    local metaRow = titleText:tag("div"):addClass("card_content_skill-meta")
    if skillType == "normal_attack" then
        metaRow:wikitext("使用武器 ")
        metaRow:tag("span")
            :addClass("card_content_skill-meta-val card_accent")
            :wikitext(val(skillData.weapon))
    elseif skillType == "passive" then
        metaRow:wikitext("触发条件 ")
        metaRow:node(makeTriggerLabel(skillData.trigger_type, skillData.trigger_value))
    elseif skillType == "ultimate" then
        metaRow:wikitext("欲火消耗 ")
        local costSpan = metaRow:tag("span"):addClass("card_content_skill-meta-val")
        costSpan:tag("span"):addClass("card_accent"):wikitext(val(skillData.desire_cost))
    end

    if skillType == "passive" or skillType == "ultimate" then
        left:node(makeTagsRow(skillData.tags))
    end

    left:tag("div")
        :addClass("card_content_skill_effect")
        :wikitext(val(skillData.description))

    card:node(makeUpgradeTable(skillData.levels))
    return card
end

local function makeFeatList(stagesJson)
    local ul = mw.html.create("ul"):addClass("card_content_feat-ul")
    local stages = parseJson(stagesJson)

    if not stages or type(stages) ~= "table" then
        ul:tag("li"):wikitext("—")
        return ul
    end

    for _, stage in ipairs(stages) do
        local li = ul:tag("li"):addClass("card_content_feat-list")
        local row = li:tag("div"):addClass("card_content_feat-row")

        local stageWrap = row:tag("div"):addClass("card_content_feat-stage-wrap")
        stageWrap:tag("p"):tag("span"):addClass("card_content_feat-stage"):wikitext("STAGE")
        local stageNum = stage.stage or 0
        stageWrap:tag("div"):addClass("card_content_feat-number")
            :wikitext(string.format("%02d", stageNum))

        local rightDiv = row:tag("div")

        if stage.value and type(stage.value) == "table" and #stage.value > 0 then
            for _, v in ipairs(stage.value) do
                if v.description then
                    rightDiv:tag("span"):addClass("card_accent"):wikitext(v.description)
                    rightDiv:tag("br")
                end
            end
        end

        if stage.stat_boosts and type(stage.stat_boosts) == "table" then
            for _, boost in ipairs(stage.stat_boosts) do
                rightDiv:wikitext((boost.type or "") .. "提升" .. (boost.value or ""))
            end
        end

        if stage.extra_name then
            rightDiv:tag("span")
                :addClass("card_content_feat-stage-cn")
                :wikitext("「" .. stage.extra_name .. "」")
        end
    end

    return ul
end

-- ──────────────────────────────────────────────
-- 辅助：小传时间线
-- stories: card.stories 数组
-- 每项结构：{ sort, story: [ { id, text }, ... ] }
-- ──────────────────────────────────────────────
local function makeStoryTimeline(stories)
    local timeline = mw.html.create("div")
        :addClass("card_timeline card_content_story-timeline")
    timeline:tag("div"):addClass("card_timeline-line")

    -- 没有小传数据时显示占位
    if not stories or type(stories) ~= "table" or #stories == 0 then
        timeline:tag("div"):addClass("card_timeline-item"):wikitext("（小传数据待补充）")
        return timeline
    end

    -- 按 sort 字段排序（sort 为 null 时按原始顺序）
    local sorted = {}
    for _, s in ipairs(stories) do
        table.insert(sorted, s)
    end
    table.sort(sorted, function(a, b)
        local sa = tonumber(a.sort) or 0
        local sb = tonumber(b.sort) or 0
        return sa < sb
    end)

    for idx, storyEntry in ipairs(sorted) do
        local item = timeline:tag("div"):addClass("card_timeline-item")

        -- 序号标记
        item:tag("div")
            :addClass("card_timeline-badge")
            :wikitext(tostring(idx))

        -- 正文：story 是子数组，取所有 text 段落
        local bodyDiv = item:tag("div"):addClass("card_timeline-body")
        if storyEntry.story and type(storyEntry.story) == "table" then
            for _, para in ipairs(storyEntry.story) do
                if para.text and para.text ~= "" then
                    -- 将换行符转为 <br>，保留原文段落感
                    local lines = mw.text.split(para.text, "\n")
                    for i, line in ipairs(lines) do
                        if line ~= "" then
                            bodyDiv:wikitext(line)
                        end
                        if i < #lines then
                            bodyDiv:tag("br")
                        end
                    end
                end
            end
        end
    end

    return timeline
end

-- ══════════════════════════════════════════════
-- 主渲染函数
-- ══════════════════════════════════════════════
function p.render(frame)
    local name = mw.text.trim(frame.args[1] or frame.args.name or "")

    if name == "" then
        return '<span class="error">错误：请提供卡片名称，例如 {{#invoke:CardData|render|复仇童谣}}</span>'
    end

    -- ── 1. 构造 API URL ──
    local fields = table.concat({
        "stylename", "rarity",
        "character.name",
        "profession.name",
        "desire.name",
        "skill_normal_attack.name",
        "skill_normal_attack.type",
        "skill_normal_attack.weapon",
        "skill_normal_attack.description",
        "skill_normal_attack.levels.*",
        "skill_passive.name",
        "skill_passive.type",
        "skill_passive.trigger_type",
        "skill_passive.trigger_value",
        "skill_passive.tags",
        "skill_passive.description",
        "skill_passive.levels.*",
        "skill_ultimate.name",
        "skill_ultimate.type",
        "skill_ultimate.desire_cost",
        "skill_ultimate.tags",
        "skill_ultimate.description",
        "skill_ultimate.levels.*",
        "feats.stages",
        "stories.sort",
        "stories.story.text"
    }, ",")

    local encodedName = mw.uri.encode(name, "QUERY")
    local apiUrl = "https://data.saltedkiss.org/items/cards"
        .. "?fields=" .. mw.uri.encode(fields, "QUERY")
        .. "&filter[stylename][_eq]=" .. encodedName

    -- ── 2. 拉取数据 ──
    local rawResponse = frame:preprocess(
        '{{#get_web_data:url=' .. apiUrl
        .. '|format=text'
        .. '|data=responseText=__text}}'
        .. '{{#external_value:responseText}}'
    )

    rawResponse = mw.text.trim(rawResponse or "")

    -- ── 3. 解析 ──
    local parsed = parseJson(rawResponse)
    local card = parsed and type(parsed.data) == "table" and parsed.data[1] or nil

    if not card then
        return '<span class="error">⚠ 无法加载卡片数据：' .. mw.text.nowiki(name)
            .. '（response=' .. mw.text.nowiki(rawResponse) .. '）</span>'
    end

    local charData   = card.character or {}
    local profData   = card.profession or {}
    local desireData = card.desire or {}
    local skillNA    = card.skill_normal_attack or {}
    local skillPA    = card.skill_passive or {}
    local skillUL    = card.skill_ultimate or {}
    local stories    = card.stories or {}

    local featsStagesJson = "[]"
    if card.feats and type(card.feats) == "table" and card.feats[1] then
        local stagesRaw = card.feats[1].stages
        if type(stagesRaw) == "table" then
            featsStagesJson = mw.text.jsonEncode(stagesRaw)
        elseif type(stagesRaw) == "string" then
            featsStagesJson = stagesRaw
        end
    end

    local function levelsToJson(skill)
        if not skill.levels then return "[]" end
        if type(skill.levels) == "string" then return skill.levels end
        if type(skill.levels) == "table" then return mw.text.jsonEncode(skill.levels) end
        return "[]"
    end
    skillNA.levels = levelsToJson(skillNA)
    skillPA.levels = levelsToJson(skillPA)
    skillUL.levels = levelsToJson(skillUL)

    local function tagsToJson(skill)
        if not skill.tags then return "[]" end
        if type(skill.tags) == "string" then return skill.tags end
        if type(skill.tags) == "table" then return mw.text.jsonEncode(skill.tags) end
        return "[]"
    end
    skillPA.tags = tagsToJson(skillPA)
    skillUL.tags = tagsToJson(skillUL)

    -- ── 4. 组装 HTML ──
    local rarity    = tonumber(card.rarity) or 0
    local stylename = val(card.stylename)
    local charName  = val(charData.name)
    local profName  = val(profData.name)
    local desName   = val(desireData.name)

    local root = mw.html.create("div")
        :addClass("ron-card")
        :addClass("ron-card--rarity-" .. rarity)
        :attr("data-rarity", rarity)

    root:tag("div"):addClass("card_fullscreen-img")
    root:tag("div"):addClass("card_hero"):css("height", "100vh")

    local container = root:tag("div"):addClass("card_content-container")
    local bg        = container:tag("div"):addClass("card_content-background")
    local inner     = bg:tag("div"):addClass("card_content-inner")
    local layout    = inner:tag("div"):addClass("card_content card_content--layout")

    -- 左栏
    local leftCol = layout:tag("div"):addClass("card_content_left")
    local nameContainer = leftCol:tag("div"):addClass("card_content_name-container")
    local nameRow = nameContainer:tag("div"):addClass("card_content_name-row")

    nameRow:tag("div"):addClass("card_content_name-icon")
    nameRow:tag("div"):addClass("card_content_name-classtext"):wikitext(profName)
    nameRow:tag("div"):addClass("card_content_name-icon card_content_name-icon--ml")
    nameRow:tag("div"):addClass("card_content_name-classtext"):wikitext(desName)

    local nameText = nameContainer:tag("div"):addClass("card_content_name-text")
    nameText:wikitext(stylename .. " ")
    nameText:tag("span"):addClass("card_accent"):wikitext("·")
    nameText:wikitext(" " .. charName)

    leftCol:node(makeTitle("信息", "Info"))
    leftCol:node(makeHr())
    local infoGrid = leftCol:tag("div"):addClass("card_content_info")
    infoGrid:tag("div"):addClass("card_content_info-item")
        :tag("div"):wikitext("稀有度"):done()
        :tag("div"):wikitext(rarityStars(rarity))

    leftCol:node(makeTitle("等级 100", "Lv. Max"))
    leftCol:node(makeHr())
    leftCol:tag("div"):addClass("card_content_attribute-item"):wikitext("（数据待补充）")

    leftCol:node(makeTitle("映像", "Reflection"))
    leftCol:node(makeHr())
    leftCol:tag("div"):addClass("card_content_attribute-item"):wikitext("（数据待补充）")

    leftCol:node(makeTitle("认知", "Cognition"))
    leftCol:node(makeHr())
    leftCol:tag("div"):addClass("card_content_attribute-item"):wikitext("（数据待补充）")

    -- 右栏
    local rightCol = layout:tag("div"):addClass("card_content_right")

    rightCol:node(makeTitle("战斗技能", "Tactical"))
    rightCol:node(makeHr("card_content-item-hr--mb12"))
    rightCol:node(makeSkillCard(skillNA, "normal_attack"))
    rightCol:tag("div"):addClass("card_content_skill-gap")
    rightCol:node(makeSkillCard(skillPA, "passive"))
    rightCol:tag("div"):addClass("card_content_skill-gap")
    rightCol:node(makeSkillCard(skillUL, "ultimate"))

    rightCol:node(makeTitle("觉醒", "Feat"))
    rightCol:node(makeHr("card_content-item-hr--mb12"))
    rightCol:node(makeFeatList(featsStagesJson))

    -- ── 小传 ──
    local storySection = rightCol:tag("div"):addClass("card_content_story")
    local storyHeader  = storySection:tag("div"):addClass("card_content_story-header")
    local storyLeft    = storyHeader:tag("div"):addClass("card_content_story-header-left")

    storyLeft:node(makeTitle("小传", "Story"))
    storyLeft:node(makeHr("card_content-item-hr--mb12"))
    storyLeft:tag("div"):addClass("card_content_story-toggle")
        :attr("data-collapsed", "false")
        :tag("span"):addClass("story-toggle-text"):wikitext("收起"):done()
        :tag("span"):addClass("story-toggle-icon"):wikitext("－")

    storyHeader:tag("div"):addClass("card_content_story-header-spacer")

    -- 时间线（有数据就渲染，没有就显示占位）
    storyHeader:node(makeStoryTimeline(stories))

    -- ── 邀约（暂无数据） ──
    rightCol:tag("div"):css("height", "12px"):css("width", "100%")
    rightCol:node(makeTitle("邀约", "Date"))
    rightCol:node(makeHr("card_content-item-hr--mb12"))

    local dateWrap = rightCol:tag("div"):addClass("card_content_date")
    dateWrap:tag("div"):addClass("card_content_date-track")
        :tag("ul"):addClass("card_content_date-list")
        :tag("li"):addClass("card_content_date-item")
        :wikitext("（邀约数据待补充）")

    return tostring(root)
end

return p