Jump to content

Module:PadUtils

From PAD Wiki
Revision as of 04:43, 22 August 2025 by GlifterPad (talk | contribs)

Documentation for this module may be created at Module:PadUtils/doc

-- Module:PadUtils
local p = {}

-- split "A;B;C" safely (ignores empty pieces)
local function split(text, delim)
    local out = {}
    if not text or text == "" then return out end
    for part in mw.text.gsplit(text, delim, true) do
        part = mw.text.trim(part)
        if part ~= "" then table.insert(out, part) end
    end
    return out
end

-- Extract target + label from one item.
-- Accepts any of:
--   "Floor Name"
--   "Floor_Target|Floor Label"
--   "[[Dungeon/Floor_Target|Floor Label]]"
--   "[[Floor_Target|Floor Label]]"
local function parseItem(item)
    -- Strip [[...]] if present
    local inner = item:match("^%[%[(.*)%]%]$")
    if inner then item = inner end
    -- Split on pipe "|"
    local t, l = item:match("^(.-)|(.*)$")
    local target = mw.text.trim(t or item)
    local label  = mw.text.trim(l or item)
    return target, label
end

-- Normalize a target so it is ALWAYS a subpage of `base`.
-- If the target already includes "base/", strip that prefix.
-- Otherwise, we treat target as just the floor segment.
local function normalizeTarget(base, target)
    -- Remove leading/trailing spaces
    target = mw.text.trim(target)

    -- If target is like "Base/Floor" (with spaces or underscores), strip the base part
    -- Compare case-sensitively (MediaWiki titles are case-sensitive after the first char)
    local withSlash = base .. "/"
    if target:sub(1, #withSlash) == withSlash then
        target = target:sub(#withSlash + 1)
    end

    -- Final title is ALWAYS base/target
    local titleText = base .. "/" .. target
    return titleText
end

-- Build a UL/OL list of HTML <a> links: base/floor
-- Args:
--   base   : page prefix; default = FULLPAGENAME (the dungeon page)
--   floors : "Floor A;Floor B" or "Floor_Target|Label" or wiki links
--   ol     : "1"/"true" -> <ol>, otherwise <ul>
--   before : optional text before each label (display only)
--   after  : optional text after each label  (display only)
function p.dungeonFloors(frame)
    local args    = frame.args
    local base    = args.base and mw.text.trim(args.base) or mw.title.getCurrentTitle().fullText
    local floors  = split(args.floors or "", ";")
    local listTag = (args.ol == "1" or args.ol == "true") and "ol" or "ul"
    local before  = args.before or ""
    local after   = args.after or ""

    if #floors == 0 then return "" end

    local items = {}
    for _, raw in ipairs(floors) do
        local target, label = parseItem(raw)

        -- Normalize to always "base/floor"
        local titleText = normalizeTarget(base, target)
        local titleObj  = mw.title.new(titleText)

        -- Build URL safely
        local url = titleObj and titleObj:localUrl()
            or ("/wiki/" .. mw.uri.encode(titleText))

        -- Encode label for HTML (avoid breaking if label has special chars)
        local linkText = before .. label .. after
        table.insert(items,
            '<li><a href="' .. url .. '">' .. mw.text.encode(linkText) .. '</a></li>'
        )
    end

    return '<' .. listTag .. '>' .. table.concat(items) .. '</' .. listTag .. '>'
end

return p