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

Материал из Space Station 14 Вики
мНет описания правки
Нет описания правки
 
(не показаны 124 промежуточные версии этого же участника)
Строка 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 trim(s)
local function trim(s)
     if not s then return s end
     if not s then return "" end
     return (s:gsub("^%s*(.-)%s*$", "%1"))
     return mw.text.trim(tostring(s))
end
end


local function load_module_data(page)
function p.get(frame)
     local baseUser = "IanComradeBot/"
     local args = getArgs(frame, { removeBlanks = false })
    local moduleName = "Module:" .. baseUser .. page .. "/data"
     local id = args[1] or ""
    local ok, data = pcall(mw.loadData, moduleName)
     if id == "" then
     if not ok then return nil end
        return ""
    return data
    end
end
 
local function load_template_content(path)
    local title = mw.title.new("Template:" .. path)
    if not title then return nil end
    local ok, content = pcall(function() return title:getContent() end)
    if not ok then return nil end
    return content
end
 
local function lcfirst(s)
     if not s or s == "" then return s end
    return string.lower(s:sub(1, 1)) .. (s:sub(2) or "")
end


local function makeTplCall(tplPath, sw, key, id, extra)
     local params = ""
     local tplStr = "{{" .. tplPath .. "|" .. sw .. "|" .. key
     local hasExtraArgs = false
     tplStr = tplStr .. "|id=" .. tostring(id)
    if extra and extra ~= "" then tplStr = tplStr .. "|" .. extra end
    tplStr = tplStr .. "}}"
    return tplStr
end


local function makeSourceLink(s)
    for k, v in pairs(args) do
    local className = s.name .. (s.kind and (s.kind:sub(1, 1):upper() .. s.kind:sub(2)) or "")
        if k ~= 1 and k ~= "cardTag" and k ~= "tag" and v ~= nil and v ~= "" then
    local tplLabel = "Template:" .. s.tplPath
            params = params .. "|" .. k .. "=" .. v
    return "[[" .. tplLabel .. "|" .. className .. "]]"
end


local switches = { "card", "title" }
             if k ~= "blacklist" then
local switchConfigs = {
                 hasExtraArgs = true
    card = {
        wrapper = function(key, tplCalls, sources)
             if not tplCalls or #tplCalls == 0 then return "" end
            local calls = table.concat(tplCalls, " ")
            local srcStr = ""
            if sources and #sources > 0 then
                 local srcParts = {}
                for _, s in ipairs(sources) do table.insert(srcParts, makeSourceLink(s)) end
                srcStr = " " .. table.concat(srcParts, " ")
             end
             end
            return "{{карточка/Сущность|" .. mw.text.encode(key) .. "|" .. calls .. srcStr .. "}}"
         end
         end
    },
    title = {
        wrapper = function(key, tplCalls, sources)
            local parts = {}
            table.insert(parts, "<h2>" .. mw.text.encode(key) .. "</h2>")
            if tplCalls and #tplCalls > 0 then
                for i, tpl in ipairs(tplCalls) do
                    local line = tpl
                    local src = sources and sources[i]
                    if src then line = line .. " " .. makeSourceLink(src) end
                    table.insert(parts, "<p>" .. line .. "</p>")
                end
            end
            return table.concat(parts, "\n")
        end
    }
}
local function getTemplateMeta(frame, tplPath)
    local expanded = frame:expandTemplate {
        title = tplPath,
        args = { "json" }
    }
    local ok, data = pcall(mw.text.jsonDecode, expanded)
    if ok and type(data) == "table" then
        return data
     end
     end


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


local function renderBlocks(frame, switchesTbl, configs, keyOrder, keyToTemplates, keySources)
     if not hasExtraArgs then
     local outLocal = {}
         local cardTagText = entityData.collectCardTagText(frame, args, id)
    for _, sw in ipairs(switchesTbl) do
        if cardTagText ~= "" then
         local cfg = configs[sw] or {}
             params = params .. "|cardTag=" .. cardTagText
        for _, key in ipairs(keyOrder[sw] or {}) do
            local entries = keyToTemplates[sw][key] or {}
            local tplCalls = {}
            local sources = {}
            if #entries > 0 then
                table.sort(entries, function(a, b)
                    if a.priority == b.priority then return a.idx < b.idx end
                    return a.priority > b.priority
                end)
                for _, e in ipairs(entries) do
                    table.insert(tplCalls, e.tpl)
                    table.insert(sources, e.source)
                end
             end
            if cfg.wrapper then
                local outStr = cfg.wrapper(key, tplCalls, sources)
                if outStr and outStr ~= "" then table.insert(outLocal, outStr) end
            end
         end
         end
        text =
            "{{#if:{{NAMESPACE}}|{{переключатель_проекта|[[Категория:{{NAMESPACE}}:Сущности]]{{NAMESPACE}}}}|[[Категория:Сущности]]{{переключатель_проекта}}}}" ..
            '<span style="display:none;">{{#invoke:CategoryFormatter|main|' .. cardTagText .. '}}</span>' .. ajax
     end
     end
     return outLocal
 
     return frame:preprocess(text)
end
end


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


     local componentDefs = load_module_data("component.json")
     local params = ""
    local prototypeDefs = load_module_data("prototype.json")
     for k, v in pairs(args) do
    if not componentDefs or not prototypeDefs then return "" end
        if k ~= 1 and k ~= "cardTag" and k ~= "tag" then
 
            params = params .. "|" .. k .. "=" .. v
    local foundComponents, foundPrototypes = {}, {}
    local compList = componentDefs[id]
     if type(compList) == "table" then for _, v in ipairs(compList) do if type(v) == "string" then foundComponents[v] = true end end end
    local protoList = prototypeDefs[id]
    if type(protoList) == "table" then for _, v in ipairs(protoList) do if type(v) == "string" then foundPrototypes[v] = true end end end
    for name in string.gmatch(id, "[^,]+") do
        local n = trim(name)
        if n ~= "" then
            if componentDefs[n] ~= nil then foundComponents[n] = true end
            if prototypeDefs[n] ~= nil then foundPrototypes[n] = true end
            if componentDefs[n] == nil and prototypeDefs[n] == nil then foundComponents[n] = true end
         end
         end
     end
     end


     local switchKeyOrder, switchKeyToTemplates, switchKeySources = {}, {}, {}
     local cardTagText = entityData.mergeCardTagText(args.cardTag or "", args.tag or "")
    for _, sw in ipairs(switches) do
    if cardTagText ~= "" then
        switchKeyOrder[sw] = {}; switchKeyToTemplates[sw] = {}; switchKeySources[sw] = {}
         params = params .. "|cardTag=" .. trim(cardTagText)
    end
 
    local errors = {}
    local function processEntity(kind, name)
        local pathName = lcfirst(name)
        local tplPath = kind .. "/" .. pathName
        local content = load_template_content(tplPath)
        if not content then
            local classType = (s.kind and (s.kind:sub(1, 1):upper() .. s.kind:sub(2)) or "")
            local className = name .. classType
            local tplLabel = "Template:" .. tplPath
            table.insert(errors,
                "{{сущность/infobox|тип=" .. classType .. "|название=" .. className .. "|ссылка=" .. tplLabel .. "}}")
            return
        end
        local parsed = getTemplateMeta(frame, tplPath)
        local ok, dp = pcall(require, "Module:GetField")
        for _, sw in ipairs(switches) do
            local keys = parsed[sw] or {}
            for _, key in ipairs(keys) do
                if not switchKeyToTemplates[sw][key] then
                    switchKeyToTemplates[sw][key] = {}
                    table.insert(switchKeyOrder[sw], key)
                end
                local extra = ""
                if ok and dp and dp.flattenField then
                    local dataPage = tplPath .. ".json"
                    extra = dp.flattenField({ args = { id, dataPage } })
                end
                local tplStr = makeTplCall(tplPath, sw, key, id, extra)
                local priority = 1
                if parsed and parsed.priority ~= nil then
                    if type(parsed.priority) == "number" then
                        priority = parsed.priority
                    else
                        local pnum = tonumber(parsed.priority)
                        if pnum then priority = pnum end
                    end
                end
                local entry = {
                    tpl = tplStr,
                    source = { kind = kind, name = name, pathName = pathName, tplPath = tplPath },
                    priority = priority,
                    idx = #switchKeyToTemplates[sw][key] + 1
                }
                table.insert(switchKeyToTemplates[sw][key], entry)
            end
         end
    end
 
    local items = {}
    for compName, _ in pairs(foundComponents) do table.insert(items, { kind = "component", name = compName }) end
    for protoName, _ in pairs(foundPrototypes) do table.insert(items, { kind = "prototype", name = protoName }) end
    for _, it in ipairs(items) do processEntity(it.kind, it.name) end
 
    local out = {}
    local blocks = renderBlocks(frame, switches, switchConfigs, switchKeyOrder, switchKeyToTemplates, switchKeySources)
    for _, b in ipairs(blocks) do table.insert(out, b) end
    for _, e in ipairs(errors) do table.insert(out, e) end
 
    return frame:preprocess(table.concat(out, "\n\n"))
end
 
function p.preview(frame)
    local args = getArgs(frame, { removeBlanks = false })
    local tplPath = args[1] or ""
    if tplPath == "" then return "" end
 
    local content = load_template_content(tplPath)
    if not content then
        return ""
    end
 
    local parsed = getTemplateMeta(frame, tplPath) or {}
 
    local switchKeyOrder, switchKeyToTemplates, switchKeySources = {}, {}, {}
    for _, sw in ipairs(switches) do
        switchKeyOrder[sw] = {}; switchKeyToTemplates[sw] = {}; switchKeySources[sw] = {}
    end
 
    for _, sw in ipairs(switches) do
        local keys = parsed[sw] or {}
        for idx, key in ipairs(keys) do
            if not switchKeyToTemplates[sw][key] then
                switchKeyToTemplates[sw][key] = {}
                table.insert(switchKeyOrder[sw], key)
            end
            local tplStr = makeTplCall(tplPath, sw, key, "")
            local entry = {
                tpl = tplStr,
                source = { kind = "", name = tplPath, pathName = tplPath, tplPath = tplPath },
                priority = 1,
                idx = #switchKeyToTemplates[sw][key] + 1
            }
            table.insert(switchKeyToTemplates[sw][key], entry)
        end
     end
     end


     local out = {}
     local text = "{{#invoke:Сущность/data|preview|" .. id .. params .. "}}"
    local blocks = renderBlocks(frame, switches, switchConfigs, switchKeyOrder, switchKeyToTemplates, switchKeySources)
    for _, b in ipairs(blocks) do table.insert(out, b) end


     return frame:preprocess(table.concat(out, "\n\n"))
     return frame:preprocess(text)
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