|
|
| (не показано 40 промежуточных версий этого же участника) |
| Строка 1: |
Строка 1: |
| local p = {} | | local p = {} |
| | local getArgs = require('Module:Arguments').getArgs |
|
| |
|
| local function trim(s) | | function p.main(frame) |
| if not s then return s end
| | local args = getArgs(frame, { removeBlanks = false }) |
| return (s:gsub("^%s*(.-)%s*$", "%1"))
| | local name = args[1] or "" |
| end
| | local attributes = args[2] or "" |
| | if name == "" then |
| | return "<span class=\"error\">Ошибка: не указано имя файла.</span>" |
| | end |
| | local ext = (args["ext"] or "png"):gsub("^%.", "") |
| | local namespace = args["namespace"] or "Файл" |
| | local max = tonumber(args["max"]) or 50 |
| | local include_base = (args["base"] ~= "no") |
|
| |
|
| local function split(s, sep) | | local found = {} |
| if s == nil then return {} end
| |
| local parts = {}
| |
| sep = sep or "%."
| |
| for part in string.gmatch(s, "([^" .. sep .. "]+)") do
| |
| table.insert(parts, part)
| |
| end
| |
| return parts
| |
| end
| |
|
| |
|
| local function parse_keys_from_template(content)
| | if include_base then |
| if not content then return {} end
| | local t = mw.title.new("Файл:" .. name .. "." .. ext) |
| local keys = {}
| | if t and t.exists then |
| local lower = content:lower()
| | table.insert(found, "") |
| local titlePos = lower:find("|%s*title%s*=")
| | end |
| if not titlePos then
| | end |
| return keys
| |
| end
| |
|
| |
| local startBrace = content:find("{{", titlePos)
| |
| local region = nil
| |
| if startBrace then
| |
| local len = #content
| |
| local i = startBrace
| |
| local depth = 0
| |
| while i <= len - 1 do
| |
| local two = content:sub(i, i+1)
| |
| if two == "{{" then
| |
| depth = depth + 1
| |
| i = i + 2
| |
| elseif two == "}}" then
| |
| depth = depth - 1
| |
| i = i + 2
| |
| if depth == 0 then
| |
| region = content:sub(startBrace, i-1)
| |
| break
| |
| end
| |
| else
| |
| i = i + 1
| |
| end
| |
| end
| |
| end
| |
| if not region then
| |
| local substr = content:sub(titlePos)
| |
| local endPos = substr:find("}}")
| |
| if endPos then
| |
| region = substr:sub(1, endPos)
| |
| else
| |
| region = substr
| |
| end
| |
| end
| |
| for key in string.gmatch(region, "|%s*([^=|%}]-)%s*=") do
| |
| local k = trim(key)
| |
| if k ~= "" then
| |
| table.insert(keys, k)
| |
| end
| |
| end
| |
| return keys
| |
| end | |
|
| |
|
| local function load_module_data(page)
| | for i = 1, max do |
| local baseUser = "IanComradeBot/"
| | local t = mw.title.new("Файл:" .. name .. "-" .. i .. "." .. ext) |
| local moduleName = "Module:" .. baseUser .. page .. "/data"
| | if t and t.exists then |
| local ok, data = pcall(mw.loadData, moduleName)
| | table.insert(found, "-" .. i) |
| if not ok then return nil end
| | end |
| return data
| | end |
| end | |
|
| |
|
| local function load_template_content(path)
| | if #found == 0 then |
| local title = mw.title.new("Template:" .. path)
| | return "" |
| if not title then return nil end
| | end |
| local ok, content = pcall(function() return title:getContent() end)
| |
| if not ok then return nil end
| |
| return content
| |
| end | |
|
| |
|
| function p.get(frame)
| | local before = "[[" .. namespace .. ":" .. name |
| local args = frame.args or {}
| | local after = "." .. ext .. "|" .. attributes .. "]]" |
| local id = args[1] or ""
| |
| if id == "" then return "" end
| |
|
| |
|
| local componentDefs = load_module_data("component.json")
| | local parts = {} |
| local prototypeDefs = load_module_data("prototype.json")
| | table.insert(parts, "<choose before=\"" .. before .. "\" after=\"" .. after .. "\">") |
| if not componentDefs or not prototypeDefs then
| | for _, suf in ipairs(found) do |
| return ""
| | table.insert(parts, "<option>" .. suf .. "</option>") |
| end
| | end |
| | table.insert(parts, "</choose>") |
|
| |
|
| local foundComponents = {}
| | return frame:preprocess(table.concat(parts, "\n")) |
| local 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
| |
| | |
| local out = {}
| |
| local errors = {}
| |
| local keyOrder = {}
| |
| local keyToTemplates = {}
| |
| | |
| 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
| |
| | |
| for compName,_ in pairs(foundComponents) do
| |
| local compPathName = lcfirst(compName)
| |
| local tplPath = "component/" .. compPathName
| |
| local content = load_template_content(tplPath)
| |
| if not content then
| |
| table.insert(errors, "Ошибка: не найден шаблон component/" .. compPathName)
| |
| else
| |
| local keys = parse_keys_from_template(content)
| |
| for _, key in ipairs(keys) do
| |
| if not keyToTemplates[key] then
| |
| keyToTemplates[key] = {}
| |
| table.insert(keyOrder, key)
| |
| end
| |
| table.insert(keyToTemplates[key], "{{" .. tplPath .. "|title|" .. key .. "}}")
| |
| end
| |
| end
| |
| end
| |
| | |
| for protoName,_ in pairs(foundPrototypes) do
| |
| local protoPathName = lcfirst(protoName)
| |
| local tplPath = "prototype/" .. protoPathName
| |
| local content = load_template_content(tplPath)
| |
| if not content then
| |
| table.insert(errors, "Ошибка: не найден шаблон prototype/" .. protoPathName)
| |
| else
| |
| local keys = parse_keys_from_template(content)
| |
| for _, key in ipairs(keys) do
| |
| if not keyToTemplates[key] then
| |
| keyToTemplates[key] = {}
| |
| table.insert(keyOrder, key)
| |
| end
| |
| table.insert(keyToTemplates[key], "{{" .. tplPath .. "|title|" .. key .. "}}")
| |
| end
| |
| end
| |
| end
| |
| | |
| for _, e in ipairs(errors) do
| |
| table.insert(out, "<div class=\"error\">" .. mw.text.encode(e) .. "</div>")
| |
| end
| |
| | |
| for _, key in ipairs(keyOrder) do
| |
| table.insert(out, "<h2>" .. mw.text.encode(key) .. "</h2>")
| |
| for _, tplCall in ipairs(keyToTemplates[key]) do
| |
| table.insert(out, tplCall)
| |
| end
| |
| end
| |
| | |
| return table.concat(out, "\n\n")
| |
| end | | end |
|
| |
|
| return p | | return p |
Для документации этого модуля может быть создана страница Модуль:Песочница/Pok/doc
local p = {}
local getArgs = require('Module:Arguments').getArgs
function p.main(frame)
local args = getArgs(frame, { removeBlanks = false })
local name = args[1] or ""
local attributes = args[2] or ""
if name == "" then
return "<span class=\"error\">Ошибка: не указано имя файла.</span>"
end
local ext = (args["ext"] or "png"):gsub("^%.", "")
local namespace = args["namespace"] or "Файл"
local max = tonumber(args["max"]) or 50
local include_base = (args["base"] ~= "no")
local found = {}
if include_base then
local t = mw.title.new("Файл:" .. name .. "." .. ext)
if t and t.exists then
table.insert(found, "")
end
end
for i = 1, max do
local t = mw.title.new("Файл:" .. name .. "-" .. i .. "." .. ext)
if t and t.exists then
table.insert(found, "-" .. i)
end
end
if #found == 0 then
return ""
end
local before = "[[" .. namespace .. ":" .. name
local after = "." .. ext .. "|" .. attributes .. "]]"
local parts = {}
table.insert(parts, "<choose before=\"" .. before .. "\" after=\"" .. after .. "\">")
for _, suf in ipairs(found) do
table.insert(parts, "<option>" .. suf .. "</option>")
end
table.insert(parts, "</choose>")
return frame:preprocess(table.concat(parts, "\n"))
end
return p
