Module:Controllu paràmetros disconnotos
Appearance
Documentation for this module may be created at Module:Controllu paràmetros disconnotos/doc
--[[
* Mòdulu pro averguare si unu template est impreadu cun paràmetros disconnotos.
* Bolet impreadu in su template, dislindende sa lista de sos nùmenes de sos paràmetros chi si bolent e
* su testu de ammustrare in casu de errore, che a unu messàgiu o una categoria de servìtziu.
*
* Su mòdulu est istadu importadu dae:
* http://en.wikipedia.org/w/index.php?title=Module:Check_for_unknown_parameters&oldid=669492475
]]--
local p = {}
local function isnotempty(s)
return s and s:match( '^%s*(.-)%s*$' ) ~= ''
end
function p.check (frame)
local args = frame.args
local pargs = frame:getParent().args
local ignoreblank = isnotempty(frame.args['ignorabòidos'])
local checkpos = isnotempty(frame.args['controllupositzionales'])
local knownargs = {}
local unknown = 'Agatadu _VALUE_, '
local res = {}
local regexps = {}
local comments = {}
local commentstr = ''
-- est abilitadu in totu sos namespaces chi non sunt de cuntierra o de sos impitadores,
-- o si nono petzi in cussu definidu in su paràmetru "ns"
local ns = mw.title.getCurrentTitle().namespace
if args.ns then
if ns ~= tonumber(args.ns) then
return ''
end
elseif ns == 2 or (ns % 2 == 1) then
return ''
end
-- crea sa lista de args connotos, sas espressiones regulares e s'istringa de torrare
for k, v in pairs(args) do
if type(k) == 'number' then
v = mw.ustring.gsub(v, '^%s*(.-)%s*$', '%1')
knownargs[v] = 1
else
if (k == 'disconnotu' and type(v) == 'string') then
unknown = v
elseif (mw.ustring.match(k, '^regexp[%d]*$') and type(v) == 'string') then
table.insert(regexps, '^' .. v .. '$')
end
end
end
-- loop over the parent args, and make sure they are on the list
for k,v in pairs(pargs) do
if (type(k) == 'string' and knownargs[k] == nil) then
local knownflag = nil
for r = 1,#regexps do
if ( mw.ustring.match(k,regexps[r]) ) then
knownflag = 1
end
end
if ( (not knownflag) and ( (not ignoreblank) or (ignoreblank and isnotempty(v)) ) ) then
k = mw.ustring.gsub(k, '[^%w\-_ ]', '?')
local r = mw.ustring.gsub(unknown, '_VALUE_', k)
table.insert(res, r)
table.insert(comments, '"' .. k .. '"')
end
elseif (checkpos and type(k) == 'number' and knownargs[tostring(k)] == nil) then
if ( (not ignoreblank) or (ignoreblank and isnotempty(v)) ) then
local r = mw.ustring.gsub(unknown, '_VALUE_', k)
table.insert(res, r)
table.insert(comments, '"' .. k .. '"')
end
end
end
if (#comments > 0) then
commentstr = '<!-- Module:Controllu paràmetros disconnotos: ' ..
table.concat(comments, ', ') .. '-->'
end
return table.concat(res) .. commentstr
end
return p