Difference between revisions of "Parameters"
From Unofficial Stationeers Wiki
(h) |
(This and that) |
||
| Line 12: | Line 12: | ||
end | end | ||
| − | local function extractParams(source | + | local function extractParams(source) |
| − | |||
| − | |||
local parameters = {} | local parameters = {} | ||
for parameter in string.gmatch(source, '{{{(.-)%f[}|<>]') do | for parameter in string.gmatch(source, '{{{(.-)%f[}|<>]') do | ||
| − | table.insert(parameters, | + | table.insert(parameters, parameter) |
end | end | ||
return removeDuplicates(parameters) | return removeDuplicates(parameters) | ||
| + | end | ||
| + | |||
| + | local function strMap(iter, transform) | ||
| + | local returnTable = {} | ||
| + | for _, v in pairs(iter) do | ||
| + | table.insert(returnTable, transform(v)) | ||
| + | end | ||
| + | return table.concat(returnTable) | ||
end | end | ||
| Line 25: | Line 31: | ||
local title = args._base or mw.title.getCurrentTitle().baseText | local title = args._base or mw.title.getCurrentTitle().baseText | ||
return string.format([[{{%s | return string.format([[{{%s | ||
| − | %s}}]], title, | + | %s}}]], title, strMap(extractParams(args.base), |
| − | function(s) return string.format('| %s = \n', s) end | + | function(s) return string.format('| %s = \n', s) end)) |
end | end | ||
| Line 52: | Line 58: | ||
local otherNormParams = normaliseParams(otherParams) | local otherNormParams = normaliseParams(otherParams) | ||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
return string.format([[Identical: | return string.format([[Identical: | ||
| − | + | %s | |
| − | |||
Similar: | 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', | |
| + | baseNormParams[v], otherNormParams[v], v) end), | ||
| + | strMap(Set.valueComplement(otherNormParams, baseNormParams), | ||
| + | function(v) return string.format('* %s\n', baseNormParams[v]) end)) | ||
end | end | ||
| Line 77: | Line 80: | ||
function p._list(args) | function p._list(args) | ||
| − | return | + | return strMap(extractParams(args.base), |
| − | function(s) return string.format('* %s\n', s) end | + | function(s) return string.format('* %s\n', s) end) |
end | end | ||
Revision as of 11:25, 7 June 2015
-- This module implements [[Template:Parameters]].
-- [SublimeLinter luacheck-globals:mw]
local p = {}
local removeDuplicates = require('Module:TableTools').removeDuplicates
local function makeInvokeFunction(funcName)
return function(frame)
local getArgs = require('Module:Arguments').getArgs
return p[funcName](getArgs(frame))
end
end
local function extractParams(source)
local parameters = {}
for parameter in string.gmatch(source, '{{{(.-)%f[}|<>]') do
table.insert(parameters, parameter)
end
return removeDuplicates(parameters)
end
local function strMap(iter, transform)
local returnTable = {}
for _, v in pairs(iter) do
table.insert(returnTable, transform(v))
end
return table.concat(returnTable)
end
function p._code(args)
local title = args._base or mw.title.getCurrentTitle().baseText
return string.format([[{{%s
%s}}]], title, strMap(extractParams(args.base),
function(s) return string.format('| %s = \n', s) end))
end
function p._compare(args)
local Set = require('Module:Set')
local function normaliseParams(parameters)
local paramsNorm, paramIndex = {}, {}
for _, parameter in pairs(parameters) do
table.insert(paramsNorm,
string.lower(string.gsub(parameter, '%A', '')))
paramIndex[
string.lower(string.gsub(parameter, '%A', ''))] = parameter
end
paramsNorm = removeDuplicates(paramsNorm)
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',
baseNormParams[v], otherNormParams[v], v) end),
strMap(Set.valueComplement(otherNormParams, baseNormParams),
function(v) return string.format('* %s\n', baseNormParams[v]) end))
end
function p._demo(args)
local title = args._base and ('|_template=' .. args._base) or ''
return string.format('{{Parameter names example%s|%s}}', title,
table.concat(extractParams(args.base), '|'))
end
function p._list(args)
return strMap(extractParams(args.base),
function(s) return string.format('* %s\n', s) end)
end
p.code = makeInvokeFunction('_code')
p.compare = makeInvokeFunction('_compare')
p.demo = makeInvokeFunction('_demo')
p.list = makeInvokeFunction('_list')
return p