Mô đun:ParameterAliasNormalizer/sandbox
local ModuleObj = {}
local getArgs = require("Module:Arguments").getArgs
--[[
Hàm dùng để chuẩn bị dữ liệu
--]]
function ModuleObj.main(frame)
local moduleArgs = getArgs(frame, {frameOnly = true})
local callerArgs = getArgs(frame, {parentOnly = true})
return ModuleObj._main(frame, moduleArgs, callerArgs)
end
--[[
Chuẩn hóa tên của tham số về tên gốc
--]]
function ModuleObj._main(frame, moduleArgs, callerArgs)
-- Replace dấu dollar thành số nếu có
replaceDollar(moduleArgs)
-- Lowercase hóa key của bảng callerArgs
callerArgs = lowerKey(callerArgs)
-- Hàm kiểm tra chuỗi có rỗng không
local function isEmpty(s)
return s == nil or mw.text.trim(s) == ''
end
-- Lấy tên bản mẫu gốc
local templateName = moduleArgs.__template
moduleArgs.__template = nil;
-- Lấy giá trị của đối số ánh xạ gán cho đối số gốc
for baseParam, aliasesStr in pairs(moduleArgs) do
for alias in mw.text.gsplit(aliasesStr, '/', true) do
alias = mw.ustring.lower(mw.text.trim(alias))
if callerArgs[alias] ~= nil then
local value = callerArgs[alias]
if isEmpty(value) == false then
callerArgs[baseParam] = value
end
callerArgs[alias] = nil
end
end
end
-- Tạo bản mẫu với bảng đối số callerArgs
local content = frame:expandTemplate{ title = templateName, args = callerArgs }
return content
end
--[[
Hàm lowercase hóa key của các pair trong một table
--]]
function lowerKey(table)
local lowercased = {}
for key, value in pairs(table) do
lowercased[mw.ustring.lower(key)] = value
end
return lowercased
end
--[[
Hàm thay dấu dollar thành số
Ví dụ: "combatant${1,3} = bên $" sẽ sinh ra 3 đối số:
"combatant1 = bên 1", "combatant2 = bên 2", "combatant3 = bên 3"
--]]
function replaceDollar(table)
local temp = {}
-- Tìm các key có pattern phù hợp, sinh các cặp key-value tương ứng
-- và xóa cặp key-value ban đầu
for key, value in pairs(table) do
if (mw.ustring.match(key, "${(%d+,%d+)}")) then
local points = mw.text.split(mw.ustring.match(key, "${(%d+,%d+)}"), ",", true)
for i = points[1], points[2], 1 do
local k = mw.ustring.gsub(key, "(${%d+,%d+})", i)
local v = mw.ustring.gsub(value, "%$", i)
temp[k] = v
end
table[key] = nil
end
end
for key, value in pairs(temp) do
table[key] = value
end
end
return ModuleObj
|
Index:
pl ar de en es fr it arz nl ja pt ceb sv uk vi war zh ru af ast az bg zh-min-nan bn be ca cs cy da et el eo eu fa gl ko hi hr id he ka la lv lt hu mk ms min no nn ce uz kk ro simple sk sl sr sh fi ta tt th tg azb tr ur zh-yue hy my ace als am an hyw ban bjn map-bms ba be-tarask bcl bpy bar bs br cv nv eml hif fo fy ga gd gu hak ha hsb io ig ilo ia ie os is jv kn ht ku ckb ky mrj lb lij li lmo mai mg ml zh-classical mr xmf mzn cdo mn nap new ne frr oc mhr or as pa pnb ps pms nds crh qu sa sah sco sq scn si sd szl su sw tl shn te bug vec vo wa wuu yi yo diq bat-smg zu lad kbd ang smn ab roa-rup frp arc gn av ay bh bi bo bxr cbk-zam co za dag ary se pdc dv dsb myv ext fur gv gag inh ki glk gan guw xal haw rw kbp pam csb kw km kv koi kg gom ks gcr lo lbe ltg lez nia ln jbo lg mt mi tw mwl mdf mnw nqo fj nah na nds-nl nrm nov om pi pag pap pfl pcd krc kaa ksh rm rue sm sat sc trv stq nso sn cu so srn kab roa-tara tet tpi to chr tum tk tyv udm ug vep fiu-vro vls wo xh zea ty ak bm ch ny ee ff got iu ik kl mad cr pih ami pwn pnt dz rmy rn sg st tn ss ti din chy ts kcg ve
Portal di Ensiklopedia Dunia