Bureaucrats, emailconfirmed, Interface administrators, staff, Administrators, translation-admin, translator, Widget editors
154
edits
Module:ModuleData: Difference between revisions
Jump to navigation
Jump to search
Made the AutoModule use The infobox temlate
(<@188013945699696640> <-that's a test) |
(Made the AutoModule use The infobox temlate) |
||
| Line 1: | Line 1: | ||
local p = {} | local p = {} | ||
local trim = mw.text.trim | local trim = mw.text.trim | ||
local split = mw.text.split | local split = mw.text.split | ||
local tableParser = mw.text.listToText | local tableParser = mw.text.listToText | ||
local data = {} | local data = {} | ||
local translation = {} | local translation = {} | ||
| Line 11: | Line 11: | ||
local langCode = "" | local langCode = "" | ||
local titlearg | local titlearg | ||
function check(string) | function check(string) | ||
return string and #tostring(string) > 0 | |||
end | end | ||
function toTable(table) | function toTable(table) | ||
local bck = {} | |||
for k,v in pairs(table) do | |||
bck[k] = v | |||
end | |||
return bck | |||
end | end | ||
function transform(inp, toType) | function transform(inp, toType) | ||
if type(inp) == toType then | |||
return inp | |||
end | |||
if toType == "string" then | |||
return tostring(inp) | |||
end | |||
if toType == "number" then | |||
return tonumber(inp) | |||
end | |||
end | end | ||
function translate(string) | function translate(string) | ||
if string == "pagename" then | |||
string = titlearg or string | |||
end | |||
if string == "pagename" and data.translated then | |||
return data.translated[langCode] or translation[string] or english[string] or string | |||
end | |||
return translation[string] or english[string] or string | |||
end | end | ||
function replace(string, fnd, repl) | function replace(string, fnd, repl) | ||
local splits = split(string, fnd,true) | |||
local bck = splits[1] | |||
for i = 2, #splits do | |||
bck = bck .. repl .. splits[i] | |||
end | |||
return bck | |||
end | end | ||
function special(value, rules) | function special(value, rules) | ||
-- Only run if a special tag is in the "order" | |||
local i = 1 | |||
while rules[i] do | |||
-- Loop through all the rules until a good one is found | |||
-- (while cause it's a fake table) | |||
cur = rules[i] | |||
-- Use of "copy" cause the source needs to stay its type | |||
local copy | |||
if check(cur.transform) then | |||
copy = transform(value,cur.transform) | |||
else | |||
copy = value | |||
end | |||
-- Transformation of fake table to real table so the count parameter can be used | |||
if type(copy) == "table" then | |||
copy = toTable(copy) | |||
end | |||
local ok = true -- This rule is good until there is a problem | |||
local req = cur.require | |||
if check(req) then | |||
ok = ok and ( ( not check(req.count) ) or ( #copy == req.count) ) | |||
ok = ok and ( ( not check(req.type) ) or ( type(copy) == req.type) ) | |||
ok = ok and ( ( not check(req.regex) ) or not(mw.ustring.gmatch( copy, req.regex )() == nil) ) | |||
-- http://dev.wikia.com/wiki/Lua_reference_manual/Standard_libraries#Patterns | |||
-- http://dev.wikia.com/wiki/Lua_reference_manual/Scribunto_libraries#Ustring_patterns | |||
end | |||
if ok then | |||
local table = {} | |||
if type(cur.result) == "string" then | |||
return replace(cur.result,"$",transform(copy,"string")) | |||
elseif type(cur.result) == "table" then | |||
for k,v in pairs(cur.result.format) do | |||
if type(v) == "string" then | |||
table[k] = replace(v,"$",copy) | |||
if table[k] == v then | |||
table[k] = translate(v) | |||
end | |||
elseif type(v) == "number" then | |||
table[k] = copy[v] | |||
end | |||
end | |||
return tableParser(table, | |||
translate(cur.result.separatorMid or "separatorMid"), | |||
translate(cur.result.separatorEnd or "separatorEnd") | |||
) | |||
end | |||
end | |||
i = i + 1 | |||
end | |||
return "Data was suplied in the wrong format." | |||
end | end | ||
function addData(value, info) | function addData(value, info) | ||
q = value or info.default | |||
if not(check(q)) then | |||
return {} | |||
end | |||
ret = {} | |||
ret.type = info.tag | |||
if check(info.label) then | |||
ret.label = translate(info.label) | |||
end | |||
if check(info.special) then | |||
ret.value = special(q, info.special) | |||
elseif type(q) == "string" then | |||
ret.value = translate(q) | |||
elseif type(q) == "table" then | |||
local tabl = {} | |||
for k,v in pairs(q) do | |||
table[k] = v | |||
end | |||
ret.value = tableParser(table,translate("separatorMid"), translate("separatorEnd")) | |||
end | |||
return ret | |||
end | end | ||
function loopTilNil(func,start) | function loopTilNil(func,start) | ||
return func(start) and (loopTilNil(func,func(start)) or start) | |||
end | end | ||
function calcInfoBox(boxData) | |||
local nextLabel = 1 | |||
local res = "" | |||
for i = 1,#boxData do | |||
current = boxData[i] | |||
if current and current.type then | |||
if current.type == "data" then | |||
local x = tostring(nextLabel) | |||
res = res .. "\n| label" .. x .. " = " .. current.label .. "\n| data" .. x .. " = " .. current.value | |||
nextLabel = nextLabel + 1 | |||
else | |||
res = res .. "\n| " .. current.type .. " = " .. current.value | |||
end | |||
end | |||
end | |||
return "{{Infobox" .. res .. "\n}}" | |||
end | |||
function p.ModuleInfo(frame,bol) | function p.ModuleInfo(frame,bol) | ||
local page = "" | |||
local mainPage | |||
if(bol) then | |||
page = "Bat Grenades" | |||
langCode = "nl" | |||
else | |||
mw.log("this is not supported in debuger mate") | |||
mainPage = loopTilNil( | |||
function(start) | |||
return start:getParent() | |||
end | |||
,frame) | |||
titlearg = frame.args["Title"] | |||
page = frame.args["Title"] or mainPage:preprocess("{{Template:English Parent}}") | |||
langCode = frame.args["Language Code"] or mainPage:preprocess("{{Template:Language Code}}") | |||
end | |||
if not pcall(function() data = mw.loadData("Module:ModuleData/" .. page) end) then | |||
return "Couldn't find module:" .. page | |||
end | |||
if not pcall(function() order = mw.loadData("Module:ModuleData/Order") end) then | |||
return "An error has ocured, please contact staff\nErrorcode:ModuleData#orderNotFound" | |||
end | |||
if not pcall(function() translation = mw.loadData("Module:ModuleData/Translations/" .. langCode) end) then | |||
if not pcall(function() translation = mw.loadData("Module:ModuleData/Translations/en") end) then | |||
return "An error has ocured, please contact staff.\nErrorcode:ModuleData#translationNotFound" | |||
else | |||
english = translation | |||
end | |||
else | |||
if not pcall(function() english = mw.loadData("Module:ModuleData/Translations/en") end) then | |||
return "An error has ocured, please contact staff.\nErrorcode:ModuleData#translationNotFound" | |||
end | |||
end | |||
local mode = "latest" | |||
local boxData = {} | |||
if mode == "latest" then | |||
local i = 1 | |||
while order[i] do | |||
boxData[i] = addData(data[1].moduleInfo[order[i].source], order[i]) | |||
i = i + 1 | |||
end | |||
end | |||
--[[ | |||
local t = "<div style=\"width:280px; float:right;\"><tabber>\n" | |||
local i = 1 | |||
while data[i] do | |||
if i > 1 then | |||
t = t .. "\n|-|" | |||
end | |||
t = t .. data[i].version .. "=<infobox>\n" | |||
local j = 1 | |||
while order[j] do | |||
t = t .. addData(data[i].moduleInfo[order[j].source],order[j]) | |||
j = j + 1 | |||
end | |||
t = t .. "</infobox>\n" | |||
i = i + 1 | |||
end | |||
]] | |||
local calc = calcInfoBox(boxData) | |||
if bol or frame.args.raw then | if bol or frame.args.raw then | ||
return calc | |||
end | |||
return frame:preprocess(calc) | |||
end | end | ||
return p | return p | ||