Difference between revisions of "Parameters"
From Unofficial Stationeers Wiki
(t/v) |
(Eureka, or something) |
||
Line 3: | Line 3: | ||
local p = {} | local p = {} | ||
+ | local removeDuplicates = require('Module:TableTools').removeDuplicates | ||
local function makeInvokeFunction(funcName) | local function makeInvokeFunction(funcName) | ||
Line 12: | Line 13: | ||
local function extractParams(source, transform) | local function extractParams(source, transform) | ||
− | |||
transform = transform or function(s) return s end | transform = transform or function(s) return s end | ||
Line 41: | Line 41: | ||
end | end | ||
+ | paramsNorm = removeDuplicates(paramsNorm) | ||
setmetatable(paramsNorm, {__index = paramIndex}) | setmetatable(paramsNorm, {__index = paramIndex}) | ||
return paramsNorm | return paramsNorm |
Revision as of 08:00, 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, transform) transform = transform or function(s) return s end local parameters = {} for parameter in string.gmatch(source, '{{{(.-)%f[}|<>]') do table.insert(parameters, transform(parameter)) end return removeDuplicates(parameters) end function p._code(args) local title = args._base or mw.title.getCurrentTitle().baseText return string.format([[{{%s %s}}]], title, table.concat(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) local similar = {} for _, v in pairs(Set.valueIntersection(baseNormParams, otherNormParams)) do table.insert(similar, string.format('%s < %s (%s)', baseNormParams[v] or '', otherNormParams[v], v)) end return string.format([[Identical: * %s Similar: * %s Not matched: * %s]], table.concat(Set.valueIntersection(baseParams, otherParams), '\n* '), table.concat(similar, '\n* '), table.concat(Set.valueComplement(otherParams, baseParams), '\n* ')) 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 table.concat(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