Actions

Module

Editing Parameters

Warning: You are not logged in. Your IP address will be publicly visible if you make any edits. If you log in or create an account, your edits will be attributed to your username, along with other benefits.

The edit can be undone. Please check the comparison below to verify that this is what you want to do, and then save the changes below to finish undoing the edit.
Latest revision Your text
Line 1: Line 1:
 
-- This module implements [[Template:Parameters]].
 
-- This module implements [[Template:Parameters]].
 
-- [SublimeLinter luacheck-globals:mw]
 
-- [SublimeLinter luacheck-globals:mw]
 
local DEFINITIONS = {
 
alt = {
 
code = '<!-- text alternative for image; see WP:ALT -->',
 
dlist = 'text alternative for image; see [[WP:ALT]]'},
 
coordinates = {
 
code = '<!-- use {{Coord}} -->',
 
dlist = 'using {{tl|Coord}}'},
 
coords = {
 
code = '<!-- use {{Coord}} -->',
 
dlist = 'using {{tl|Coord}}'},
 
native_name = {
 
code = '<!-- name in local language; if more than one, separate ' ..
 
'using {{Plainlist}} use {{lang}}, and omit native_name_lang -->',
 
dlist = 'name in local language; if more than one, separate ' ..
 
'using {{tl|Plainlist}}, use {{tl|lang}}, and omit {{para|native_name_lang}}'},
 
native_name_lang = {
 
code = '<!-- language two- or three-letter ISO code -->',
 
dlist = 'language two- or three-letter ISO code'},
 
start_date = {
 
code = '<!-- {{Start date|YYYY|MM|DD|df=y}} -->',
 
dlist = 'use {{tlx|Start date|YYYY|MM|DD|df=y}}'},
 
end_date = {
 
code = '<!-- {{End date|YYYY|MM|DD|df=y}} -->',
 
dlist = 'use {{tlx|Start date|YYYY|MM|DD|df=y}}'},
 
url = {
 
code = '<!-- use {{URL|example.com}} -->',
 
dlist = 'using {{tl|URL}}'},
 
website = {
 
code = '<!-- use {{URL|example.com}} -->',
 
dlist = 'using {{tls|URL|example.com}}'},}
 
  
 
local p = {}
 
local p = {}
local removeDuplicates = require('Module:TableTools').removeDuplicates
 
local yesno = require('Module:Yesno')
 
  
 
local function makeInvokeFunction(funcName)
 
local function makeInvokeFunction(funcName)
 
return function(frame)
 
return function(frame)
 
local getArgs = require('Module:Arguments').getArgs
 
local getArgs = require('Module:Arguments').getArgs
return p[funcName](getArgs(frame, {removeBlanks = false}))
+
return p[funcName](getArgs(frame))
 
end
 
end
 
end
 
end
  
local function extractParams(page)
+
local function extractParams(args)
local source = mw.title.new(page, 'Template'):getContent()
+
local removeDuplicates = require('Module:TableTools').removeDuplicates
  
 
local parameters = {}
 
local parameters = {}
for parameter in string.gmatch(source, '{{{(.-)%f[}|<>]') do
+
for parameter in string.gmatch(args.base, '{{{(.-)%f[}|<>]') do
 
table.insert(parameters, parameter)
 
table.insert(parameters, parameter)
 
end
 
end
 
return removeDuplicates(parameters)
 
return removeDuplicates(parameters)
end
 
 
local function map(tbl, transform)
 
local returnTable = {}
 
for k, v in pairs(tbl) do
 
returnTable[k] = transform(v)
 
end
 
return returnTable
 
end
 
 
local function strMap(tbl, transform)
 
local returnTable = map(tbl, transform)
 
return table.concat(returnTable)
 
end
 
 
function p._check(args)
 
local title = args._base or mw.title.getCurrentTitle().fullText
 
return string.format(
 
'{{#invoke:Check for unknown parameters|check|unknown=' ..
 
'[[Category:Pages using %s with unknown parameters]]|%s}}', title,
 
table.concat(extractParams(args.base), '|'))
 
end
 
 
function p._code(args)
 
local definitions = yesno(args.definitions)
 
local pad = yesno(args.pad)
 
 
local parameters = extractParams(args.base)
 
-- Space-pad the parameters to align the equal signs vertically
 
if pad then
 
local lengthPerPara = map(parameters, function (parameter)
 
return string.len(parameter) end)
 
-- Lua doesn't support printf's <*> to specify the width, apparently
 
local fs = string.format('%%-%ss', math.max(unpack(lengthPerPara)))
 
for i, parameter in pairs(parameters) do
 
parameters[i] = string.format(fs, parameter)
 
end
 
end
 
 
local title = args._base or mw.title.getCurrentTitle().baseText
 
return string.format([[{{%s
 
%s}}]], title, strMap(parameters,
 
function(s)
 
if definitions then
 
return string.format('| %s = %s\n', s,
 
DEFINITIONS[s] and DEFINITIONS[s].code or '')
 
else
 
return string.format('| %s = \n', s)
 
end
 
end))
 
end
 
 
function p._compare(args)
 
local Set = require('Module:Set')
 
 
local function normaliseParams(parameters)
 
local paramsNorm = {}
 
-- Prepare a key lookup metatable, which will hold the original
 
-- parameter names for each normalised parameter, e.g.
 
-- [test] = {TEST, Test}. paramIndex functions like a Python
 
-- defaultdict, where the default is a table.
 
local paramIndex = setmetatable({}, {__index = function(t, k)
 
if not rawget(t, k) then
 
rawset(t, k, {})
 
end
 
return rawget(t, k)
 
end})
 
for _, parameter in pairs(parameters) do
 
table.insert(paramsNorm,
 
string.lower(string.gsub(parameter, '%A', '')))
 
table.insert(paramIndex[
 
string.lower(string.gsub(parameter, '%A', ''))], parameter)
 
end
 
 
paramsNorm = removeDuplicates(paramsNorm)
 
-- Overload key lookup in paramsNorm. While [[Module:Set]] will
 
-- operate on the table (which is to say, the normalised parameters
 
-- array), key access will be by way of the paramIndex metatable.
 
setmetatable(paramsNorm, {__index = paramIndex})
 
return paramsNorm
 
end
 
 
local baseParams = extractParams(args.base)
 
local otherParams = extractParams(args.other)
 
local baseNormParams = normaliseParams(Set.valueComplement(
 
otherParams, baseParams))
 
local otherNormParams = normaliseParams(otherParams)
 
 
return string.format([[Identical:
 
%s
 
Similar:
 
%s
 
Disparate:
 
%s]],
 
strMap(Set.valueIntersection(baseParams, otherParams),
 
function(v) return string.format('* %s\n', v) end),
 
strMap(Set.valueIntersection(baseNormParams, otherNormParams),
 
function(v) return string.format('* %s < %s [%s]\n',
 
table.concat(baseNormParams[v], '; '),
 
table.concat(otherNormParams[v], '; '),
 
v)
 
end),
 
strMap(Set.valueComplement(otherNormParams, baseNormParams),
 
function(v) return strMap(baseNormParams[v],
 
function(s) return string.format('* %s\n', s) end)
 
end))
 
 
end
 
end
  
 
function p._demo(args)
 
function p._demo(args)
local title = args._base and ('|_template=' .. args._base) or ''
+
return string.format('{{Parameter names example|_template=%s|%s}}',
return string.format('{{Parameter names example%s|%s}}', title,
+
args._base or '', table.concat(extractParams(args), '|'))
table.concat(extractParams(args.base), '|'))
 
end
 
 
 
function p._dlist(args)
 
local definitions = yesno(args.definitions, true)
 
return strMap(extractParams(args.base),
 
function(s)
 
if definitions then
 
return string.format('; %s: %s\n', s,
 
DEFINITIONS[s] and DEFINITIONS[s].dlist or '')
 
else
 
return string.format('; %s: \n', s)
 
end
 
end)
 
 
end
 
end
  
 
function p._list(args)
 
function p._list(args)
return strMap(extractParams(args.base),
+
local list = require('Module:List').bulleted
function(s) return string.format('* %s\n', s) end)
+
return list(extractParams(args))
 
end
 
end
  
p.check = makeInvokeFunction('_check')
 
p.code = makeInvokeFunction('_code')
 
p.compare = makeInvokeFunction('_compare')
 
 
p.demo = makeInvokeFunction('_demo')
 
p.demo = makeInvokeFunction('_demo')
p.dlist = makeInvokeFunction('_dlist')
 
 
p.list = makeInvokeFunction('_list')
 
p.list = makeInvokeFunction('_list')
  
 
return p
 
return p

Please note that all contributions to Unofficial Stationeers Wiki may be edited, altered, or removed by other contributors. If you do not want your writing to be edited mercilessly, then do not submit it here.
You are also promising us that you wrote this yourself, or copied it from a public domain or similar free resource (see Unofficial Stationeers Wiki:Copyrights for details). Do not submit copyrighted work without permission!

To edit this page, please answer the question that appears below (more info):

Cancel | Editing help (opens in new window)