Geen bewerkingssamenvatting |
Geen bewerkingssamenvatting |
||
| Regel 13: | Regel 13: | ||
p.map = function(frame) | p.map = function(frame) | ||
--mandatory | |||
local vals = frame.args.vals or mw.text.trim(frame.args[1]) or "" | local vals = frame.args.vals or mw.text.trim(frame.args[1]) or "" | ||
local sep = frame.args.sep or mw.text.trim(frame.args[2]) or "," | local sep = frame.args.sep or mw.text.trim(frame.args[2]) or "," | ||
local varstr = frame.args.varstr or mw.text.trim(frame.args[3]) or "@@@" | local varstr = frame.args.varstr or mw.text.trim(frame.args[3]) or "@@@" | ||
local map = frame.args.map or mw.text.trim(frame.args[4]) or "" | local map = frame.args.map or mw.text.trim(frame.args[4]) or "" | ||
local outputsep = frame.args.outputsep or | --optional | ||
local outputsep = string.gsub( outputsep, [[\s]], " " ) --allow for spaces with \s | local outputsep = frame.args.outputsep or frame.args[5] or "" | ||
local outputsep = string.gsub( mw.text.trim(outputsep), [[\s]], " " ) --allow for spaces with \s | |||
local fuzzy = frame.args.fuzzysep or frame.args[6] or "false" | |||
-- fuzzysep (need a better name) lets you use a series of single characters (OR not AND) | -- fuzzysep (need a better name) lets you use a series of single characters (OR not AND) | ||
--[[ | --[[ | ||
if fuzzy == "true" then | if mw.text.trim(fuzzy) == "true" then | ||
local sepPattern = '[^' .. sep .. ')+' | local sepPattern = '[^' .. sep .. ')+' | ||
local valTable = {} | local valTable = {} | ||
Versie van 5 sep 2023 20:10
Module:Arraymap
Summary
Module similar in functionality to PageForms's arraymap.
==Simple==
{{#invoke:Arraymap |map
|vals=Álvar,Núñez ,, Cabeza,de Vaca,,|sep=,,
|varstr=xxx |map=(xxx) |outputsep=;\s
}}
[Álvar,Núñez]; [Cabeza, de Vaca]
Or, using unnamed, sequential approach:
{{#invoke:Arraymap |map |Álvar,Núñez ,, Cabeza, de Vaca,, |, |xxx |[xxx] |;\s}}
[Álvar]; [Núñez]; [Cabeza]; [de Vaca]
Special use cases
If sep needs to be a space, use %s?
Escaped syntax for curly braces and pipes
Escape {{... }} as %{%{ ... %}%}
Escape | as %
{{#invoke:Arraymap |map
|vals=Persoon/-1002367743,Persoon/400
|sep=,
|varstr=xxx
|map=%{%{#ask: [[xxx]] %mainlabel=- %?Has name= %}%}
|outputsep=;\s
|escaped=true
|fuzzy=false
}}
%{%{#ask: Nelly Kruize %mainlabel=- %?Has name= %}%}; %{%{#ask: Ralph Blum %mainlabel=- %?Has name= %}%}--[[
{{#invoke:Arraymap
|vals=
|sep=
|varstr=
|map=
|outputsep=
}}
]]--
local p = {}
p.map = function(frame)
--mandatory
local vals = frame.args.vals or mw.text.trim(frame.args[1]) or ""
local sep = frame.args.sep or mw.text.trim(frame.args[2]) or ","
local varstr = frame.args.varstr or mw.text.trim(frame.args[3]) or "@@@"
local map = frame.args.map or mw.text.trim(frame.args[4]) or ""
--optional
local outputsep = frame.args.outputsep or frame.args[5] or ""
local outputsep = string.gsub( mw.text.trim(outputsep), [[\s]], " " ) --allow for spaces with \s
local fuzzy = frame.args.fuzzysep or frame.args[6] or "false"
-- fuzzysep (need a better name) lets you use a series of single characters (OR not AND)
--[[
if mw.text.trim(fuzzy) == "true" then
local sepPattern = '[^' .. sep .. ')+'
local valTable = {}
for val in string.gmatch( vals, sepPattern ) do
-- replace varstr in map with val
local val = mw.text.trim( val )
local newVal = string.gsub( map, varstr, val )
table.insert( valTable, newVal )
end
local newVals = table.concat( valTable, outputsep )
return newVals
end
--]]
--Standard approach
local valTable = {}
local valTable = mw.text.split( vals, sep )
local mappedTable = {}
for k,v in pairs(valTable) do
local v = mw.text.trim( v )
if v == "" or v == nil then
--nothing
else
local newVal = string.gsub( map, varstr, v )
table.insert( mappedTable, newVal )
end
end
local newVals = table.concat( mappedTable, outputsep )
return newVals
end
return p
