Модуль:Сущность: различия между версиями

Материал из Space Station 14 Вики
Нет описания правки
Нет описания правки
 
(не показано 6 промежуточных версий этого же участника)
Строка 1: Строка 1:
local p = {}
local p = {}
local getArgs = require('Module:Arguments').getArgs
local getArgs = require('Module:Arguments').getArgs
local entityData = require('Module:Сущность/data')


local function is_array(tbl)
local function trim(s)
    local max = 0
     if not s then return "" end
    local count = 0
     return mw.text.trim(tostring(s))
    for k in pairs(tbl) do
        if type(k) ~= "number" then
            return false
        end
        if k > max then max = k end
        count = count + 1
    end
    return count > 0 and max == count
end
 
local function apply_pattern(s, pattern, repl)
     if not pattern or pattern == "" or not s then
        return s
    end
 
    local text = tostring(s)
    local replacement
    if repl and repl ~= "" then
        replacement = tostring(repl)
        replacement = replacement:gsub("\\(%d)", "%%%1")
    else
        replacement = "%1"
    end
 
     local patt = pattern
    if not patt:find("%^") and not patt:find("%$") then
        patt = "^" .. patt .. "$"
    end
 
    return (text:gsub(patt, replacement))
end
end
local firstCall = true


function p.get(frame)
function p.get(frame)
Строка 50: Строка 19:


     for k, v in pairs(args) do
     for k, v in pairs(args) do
         if k ~= 1 and v ~= nil and v ~= "" then
         if k ~= 1 and k ~= "cardTag" and k ~= "tag" and v ~= nil and v ~= "" then
             params = params .. "|" .. k .. "=" .. v
             params = params .. "|" .. k .. "=" .. v


Строка 60: Строка 29:


     local ajax = "{{ajax|<nowiki>{{#invoke:Сущность/data|get|" .. id .. params .. "}}</nowiki>|auto}}"
     local ajax = "{{ajax|<nowiki>{{#invoke:Сущность/data|get|" .. id .. params .. "}}</nowiki>|auto}}"
     local text = ajax
     local text = ajax


     if not hasExtraArgs then
     if not hasExtraArgs then
         text = "{{#if:{{NAMESPACE}}|{{переключатель_проекта|[[Категория:{{NAMESPACE}}:Сущности]]{{NAMESPACE}}}}|[[Категория:Сущности]]{{переключатель_проекта}}}}" .. ajax
        local cardTagText = entityData.collectCardTagText(frame, args, id)
        if cardTagText ~= "" then
            params = params .. "|cardTag=" .. cardTagText
        end
         text =
            "{{#if:{{NAMESPACE}}|{{переключатель_проекта|[[Категория:{{NAMESPACE}}:Сущности]]{{NAMESPACE}}}}|[[Категория:Сущности]]{{переключатель_проекта}}}}" ..
            '<span style="display:none;">{{#invoke:CategoryFormatter|main|' .. cardTagText .. '}}</span>' .. ajax
     end
     end


Строка 77: Строка 51:
     local params = ""
     local params = ""
     for k, v in pairs(args) do
     for k, v in pairs(args) do
         if k ~= 1 then
         if k ~= 1 and k ~= "cardTag" and k ~= "tag" then
             params = params .. "|" .. k .. "=" .. v
             params = params .. "|" .. k .. "=" .. v
         end
         end
    end
    local cardTagText = entityData.mergeCardTagText(args.cardTag or "", args.tag or "")
    if cardTagText ~= "" then
        params = params .. "|cardTag=" .. trim(cardTagText)
     end
     end


Строка 85: Строка 64:


     return frame:preprocess(text)
     return frame:preprocess(text)
end
function p.json(frame)
    local args = getArgs(frame, { removeBlanks = false })
    local jsonStr = mw.text.unstripNoWiki(args[1] or args.json or "")
    local tplPath = mw.text.unstripNoWiki(args[2] or args.template or "")
    if jsonStr == "" or tplPath == "" then return "" end
    local ok, data = pcall(mw.text.jsonDecode, jsonStr)
    if not ok or type(data) ~= "table" then
        return ""
    end
    local okDp, dp = pcall(require, "Module:GetField")
    local calls = {}
    local function makeCall(id, obj)
        if type(id) ~= "string" then return end
        local parts = { "{{" .. tplPath, "id=" .. id }
        if type(obj) == "table" then
            if okDp and dp and type(dp.flattenParams) == "function" then
                local extra = dp.flattenParams(obj)
                for i = 1, #extra do
                    parts[#parts + 1] = extra[i]
                end
            else
                for k, v in pairs(obj) do
                    if v ~= nil then
                        parts[#parts + 1] = tostring(k) .. "=" .. tostring(v)
                    end
                end
            end
        elseif obj ~= nil then
            parts[#parts + 1] = "value=" .. tostring(obj)
        end
        parts[#parts + 1] = "}}"
        calls[#calls + 1] = table.concat(parts, "|")
    end
    if is_array(data) then
        for _, item in ipairs(data) do
            if type(item) == "table" then
                for k, v in pairs(item) do
                    makeCall(k, v)
                end
            end
        end
    else
        for k, v in pairs(data) do
            makeCall(k, v)
        end
    end
    if #calls == 0 then
        return ""
    end
    local rendered = table.concat(calls, " ")
    return frame:preprocess(rendered)
end
function p.jsonList(frame)
    local args = getArgs(frame, { removeBlanks = false })
    local jsonStr = mw.text.unstripNoWiki(args[1] or args.json or "")
    if jsonStr == "" then return "" end
    local ok, data = pcall(mw.text.jsonDecode, jsonStr)
    if not ok or type(data) ~= "table" then
        return ""
    end
    local outputType = (args.type or "list"):lower()
    local bullet = mw.text.unstripNoWiki(args.prefix or "* ")
    local sep = mw.text.unstripNoWiki(args.sep or ": ")
    if outputType == "none" then
        bullet = ""
        sep = ""
    end
    local keyPattern = mw.text.unstripNoWiki(args.key_pattern or "(.*)")
    local keyReplace = mw.text.unstripNoWiki(args.key_replace or "\\1")
    local valuePattern = mw.text.unstripNoWiki(args.value_pattern or "(.*)")
    local valueReplace = mw.text.unstripNoWiki(args.value_replace or "\\1")
    local pairPattern = mw.text.unstripNoWiki(args.pattern or "(.*)")
    local pairReplace = mw.text.unstripNoWiki(args.replace or "\\1")
    local out = {}
    if is_array(data) then
        for _, v in ipairs(data) do
            local text = ""
            if type(v) == "table" then
                if is_array(v) then
                    text = table.concat(v, ", ")
                else
                    local okJson, jsonVal = pcall(mw.text.jsonEncode, v)
                    if okJson and jsonVal then
                        text = jsonVal
                    end
                end
            else
                text = tostring(v)
            end
            if text ~= "" then
                local patt = valuePattern ~= "" and valuePattern or keyPattern
                local repl = valueReplace ~= "" and valueReplace or keyReplace
                text = apply_pattern(text, patt, repl)
                local line
                if outputType == "enum" then
                    line = text
                else
                    line = bullet .. text
                end
                if pairPattern ~= "" then
                    line = apply_pattern(line, pairPattern, pairReplace)
                end
                table.insert(out, line)
            end
        end
    else
        local keys = {}
        for k in pairs(data) do
            keys[#keys + 1] = k
        end
        table.sort(keys, function(a, b) return tostring(a) < tostring(b) end)
        for _, k in ipairs(keys) do
            local v = data[k]
            local vStr
            if type(v) == "table" then
                local okJson, jsonVal = pcall(mw.text.jsonEncode, v)
                if okJson and jsonVal then
                    vStr = jsonVal
                else
                    vStr = ""
                end
            else
                vStr = tostring(v)
            end
            local baseKey = apply_pattern(tostring(k), keyPattern, "\\1")
            local MARK_KEY = "\31KEY\31"
            local vRepl = (valueReplace or "\\1"):gsub("\\2", MARK_KEY)
            local vStr0 = apply_pattern(vStr, valuePattern, vRepl)
            vStr0 = tostring(vStr0):gsub(MARK_KEY, baseKey)
            local MARK_VAL = "\31VAL\31"
            local kRepl = (keyReplace or "\\1"):gsub("\\2", MARK_VAL)
            local keyStr0 = apply_pattern(tostring(k), keyPattern, kRepl)
            local keyStr = tostring(keyStr0):gsub(MARK_VAL, vStr0)
            vStr = vStr0
            if vStr ~= "" then
                local line
                if outputType == "enum" then
                    line = vStr .. " " .. keyStr
                else
                    line = bullet .. keyStr .. sep .. vStr
                end
                if pairPattern ~= "" then
                    line = apply_pattern(line, pairPattern, pairReplace)
                end
                table.insert(out, line)
            end
        end
    end
    if outputType == "enum" then
        return frame:preprocess(table.concat(out, ", "))
    elseif outputType == "list" then
        return frame:preprocess(table.concat(out, "\n"))
    else
    return frame:preprocess(table.concat(out, ""))
    end
end
end


return p
return p

Текущая версия от 18:08, 6 апреля 2026

Для документации этого модуля может быть создана страница Модуль:Сущность/doc

local p = {}
local getArgs = require('Module:Arguments').getArgs
local entityData = require('Module:Сущность/data')

local function trim(s)
    if not s then return "" end
    return mw.text.trim(tostring(s))
end

function p.get(frame)
    local args = getArgs(frame, { removeBlanks = false })
    local id = args[1] or ""
    if id == "" then
        return ""
    end

    local params = ""
    local hasExtraArgs = false

    for k, v in pairs(args) do
        if k ~= 1 and k ~= "cardTag" and k ~= "tag" and v ~= nil and v ~= "" then
            params = params .. "|" .. k .. "=" .. v

            if k ~= "blacklist" then
                hasExtraArgs = true
            end
        end
    end

    local ajax = "{{ajax|<nowiki>{{#invoke:Сущность/data|get|" .. id .. params .. "}}</nowiki>|auto}}"
    local text = ajax

    if not hasExtraArgs then
        local cardTagText = entityData.collectCardTagText(frame, args, id)
        if cardTagText ~= "" then
            params = params .. "|cardTag=" .. cardTagText
        end
        text =
            "{{#if:{{NAMESPACE}}|{{переключатель_проекта|[[Категория:{{NAMESPACE}}:Сущности]]{{NAMESPACE}}}}|[[Категория:Сущности]]{{переключатель_проекта}}}}" ..
            '<span style="display:none;">{{#invoke:CategoryFormatter|main|' .. cardTagText .. '}}</span>' .. ajax
    end

    return frame:preprocess(text)
end

function p.preview(frame)
    local args = getArgs(frame, { removeBlanks = false })
    local id = args[1] or ""
    if id == "" then return "" end

    local params = ""
    for k, v in pairs(args) do
        if k ~= 1 and k ~= "cardTag" and k ~= "tag" then
            params = params .. "|" .. k .. "=" .. v
        end
    end

    local cardTagText = entityData.mergeCardTagText(args.cardTag or "", args.tag or "")
    if cardTagText ~= "" then
        params = params .. "|cardTag=" .. trim(cardTagText)
    end

    local text = "{{#invoke:Сущность/data|preview|" .. id .. params .. "}}"

    return frame:preprocess(text)
end

return p