Modul:Check for unknown parameters: Perbedaan antara revisi

tidak ada ringkasan suntingan
(←Membuat halaman berisi '-- This module may be used to compare the arguments passed to the parent -- with a list of arguments, returning a specified result if an argument is -- not on the list local p = {} local function trim(s) return s:match('^%s*(.-)%s*$') end local function isnotempty(s) return s and trim(s) ~= '' end function p.check (frame) local args = frame.args local pargs = frame:getParent().args local ignoreblank = isnotempty(frame.args['ignoreblank']) local showblank...')
Tidak ada ringkasan suntingan
Tag: Dikembalikan
Baris 1: Baris 1:
-- This module may be used to compare the arguments passed to the parent
-- with a list of arguments, returning a specified result if an argument is
-- not on the list
local p = {}
local p = {}


local function trim(s)
-- Returns the expiry of a restriction of an action on a given title, or unknown if it cannot be known.
return s:match('^%s*(.-)%s*$')
-- If no title is specified, the title of the page being displayed is used.
end
function p._main(action, pagename)
 
local title
local function isnotempty(s)
if type(pagename) == 'table' and pagename.prefixedText then
return s and trim(s) ~= ''
title = pagename
end
elseif pagename then
 
title = mw.title.new(pagename)
function p.check (frame)
else
local args = frame.args
title = mw.title.getCurrentTitle()
local pargs = frame:getParent().args
local ignoreblank = isnotempty(frame.args['ignoreblank'])
local showblankpos = isnotempty(frame.args['showblankpositional'])
local knownargs = {}
local unknown = frame.args['unknown'] or 'Found _VALUE_, '
local preview = frame.args['preview']
 
local values = {}
local res = {}
local regexps = {}
 
-- create the list of known args, regular expressions, and the return string
for k, v in pairs(args) do
if type(k) == 'number' then
v = trim(v)
knownargs[v] = 1
elseif k:find('^regexp[1-9][0-9]*$') then
table.insert(regexps, '^' .. v .. '$')
end
end
end
if isnotempty(preview) then  
pagename = title.prefixedText
preview = '<div class="hatnote" style="color:red"><strong>Peringatan:</strong> ' .. preview .. ' (pesan ini hanya ditampilkan dalam pratinjau).</div>'
if action == 'autoreview' then
elseif preview == nil then
local stabilitySettings = mw.ext.FlaggedRevs.getStabilitySettings(title)
preview = unknown
return stabilitySettings and stabilitySettings.expiry or 'unknown'
elseif action ~= 'edit' and action ~= 'move' and action ~= 'create' and action ~= 'upload' then
error( 'First parameter must be one of edit, move, create, upload, autoreview', 2 )
end
end
 
local rawExpiry = mw.getCurrentFrame():callParserFunction('PROTECTIONEXPIRY', action, pagename)
-- loop over the parent args, and make sure they are on the list
if rawExpiry == 'infinity' then
for k, v in pairs(pargs) do
return 'infinity'
if type(k) == 'string' and knownargs[k] == nil then
elseif rawExpiry == '' then
local knownflag = false
return 'unknown'
for i, regexp in ipairs(regexps) do
else
if mw.ustring.match(k, regexp) then
local year, month, day, hour, minute, second = rawExpiry:match(
knownflag = true
'^(%d%d%d%d)(%d%d)(%d%d)(%d%d)(%d%d)(%d%d)$'
break
)
end
if year then
end
return string.format(
if not knownflag and ( not ignoreblank or isnotempty(v) ) then
'%s-%s-%sT%s:%s:%s',
k = mw.ustring.gsub(k, '[^%w\-_ ]', '?')
year, month, day, hour, minute, second
table.insert(values, k)
)
end
else
elseif type(k) == 'number' and
error('internal error in Modul:Effective protection expiry; malformed expiry timestamp')
knownargs[tostring(k)] == nil and
( showblankpos or isnotempty(v) )
then
local vlen = mw.ustring.len(v)
v = mw.ustring.sub(v, 1, (vlen < 25) and vlen or 25)
v = mw.ustring.gsub(v, '[^%w\-_ ]', '?')
table.insert(values, k .. ' = ' .. v .. ((vlen >= 25) and ' ...' or ''))
end
end
end
end
end


-- add resuls to the output tables
setmetatable(p, { __index = function(t, k)
if #values > 0 then
return function(frame)
if frame:preprocess( "{{REVISIONID}}" ) == "" then
return t._main(k, frame.args[1])
unknown = preview
end
for k, v in pairs(values) do
if v == '' then
-- Fix odd bug for | = which gets stripped to the empty string and
-- breaks category links
v = ' '
end
local r =  unknown:gsub('_VALUE_', v)
table.insert(res, r)
end
end
end
 
end })
return table.concat(res)
end


return p
return p