Модуль:Example: различия между версиями
Материал из FetbukWiki
WerySkok (обсуждение | вклад) м (1 версия импортирована) |
https://ru.wikipedia.org/wiki/>Jack who built the house (не развёртываем {{sp↓}} всегда, а то шаблон имеет 2 тыс. включений на ровном месте) |
||
Строка 1: | Строка 1: | ||
local p = {} | local p = {} | ||
-- вызов шаблона, при ошибке возвращает пустую строку | -- вызов шаблона, при ошибке возвращает пустую строку | ||
Строка 23: | Строка 14: | ||
end | end | ||
--return frame:expandTemplate({title = tname, args = args}) | --return frame:expandTemplate({title = tname, args = args}) | ||
end | end | ||
Строка 53: | Строка 27: | ||
return str | return str | ||
end | end | ||
function p.main(frame) | function p.main(frame) | ||
local getArgs = require('Module:Arguments').getArgs | |||
local yesno = require('Module:Yesno') | local yesno = require('Module:Yesno') | ||
local args = copy(getArgs(frame, {trim = false, removeBlanks = false}) | local template_code = require('Module:Template call code')._main | ||
local copy = require('Module:TableTools').shallowClone | |||
local args = copy(getArgs(frame, {trim = false, removeBlanks = false})) | |||
local tag = args._tag | local tag = args._tag | ||
local sep = args._sep and args._sep .. ' ' | local sep = args._sep and args._sep .. ' ' | ||
local prefix = args._prefix or args['_pre-text'] or '' | local prefix = args._prefix or args['_pre-text'] or '' | ||
local postfix = args._postfix or args['_post-text'] or '' | local postfix = args._postfix or args['_post-text'] or '' | ||
local nocat = yesno(args._nocat, false) | local nocat = yesno(args._nocat, false) | ||
local style = args._style | local style = args._style | ||
Строка 78: | Строка 46: | ||
-- передаётся шаблоном {{стопка примеров}}, один разделитель на все примеры | -- передаётся шаблоном {{стопка примеров}}, один разделитель на все примеры | ||
local comment_sep = args._comment_sep | local comment_sep = args._comment_sep | ||
local comment = args._comment | |||
-- полезно в шаблоне {{стопка примеров}} (это просто текст в конце) | -- полезно в шаблоне {{стопка примеров}} (это просто текст в конце) | ||
local after = args._after or | local after = args._after or '' | ||
-- полезно в шаблоне {{стопка примеров}} (это просто текст в начале) | -- полезно в шаблоне {{стопка примеров}} (это просто текст в начале) | ||
local before = args._before and args._before .. ' ' or '' | local before = args._before and args._before .. ' ' or '' | ||
if style == 'pre' then | if style == 'pre' or style == '*pre' or style == 'pre↓' or style == '*pre↓' then | ||
tag = tag or 'pre' | |||
end | |||
if style == 'pre' or style == '*pre' then | |||
sep = sep or '\n' | sep = sep or '\n' | ||
elseif style == ' | elseif style == 'pre↓' or style == '*pre↓' then | ||
sep = sep or expand(frame, 'sp-down', {'', '-0.5em'}) | |||
end | |||
sep = sep or ' | if style == '*pre' or style == '*pre↓' then | ||
before = '<ul><li>' .. expand(frame, 'chrome bullet hack', {}) .. before | |||
after = after .. '</li></ul>' | |||
end | |||
if style == 'wikitable' then | |||
tag = tag or 'kbd' | |||
sep = sep or '\n| ' | sep = sep or '\n| ' | ||
comment_sep = '\n| ' | comment_sep = '\n| ' | ||
end | end | ||
tag = tag or 'code' | |||
sep = sep or '→ ' | |||
comment_sep = comment_sep or ' ' | |||
if | if comment then | ||
if not style then | if not style then | ||
comment = '<small>' .. comment .. '</small>' | |||
end | end | ||
after = comment_sep .. after | after = comment_sep .. comment .. after | ||
end | end | ||
local | local _args = copy(args) | ||
_args._style = args._codestyle | |||
_args._comment = args._codecomment | |||
_args._tag = tag | |||
_args._prefix = prefix | |||
_args._postfix = postfix | |||
_args._nowiki = true | |||
if args._template then | |||
table.insert(_args, 1, args._template) | |||
end | end | ||
local | local nwt = template_code(_args, {withoutParams = false}) | ||
local tname = args._template or args[1] | local tname = args._template or args[1] | ||
Строка 150: | Строка 104: | ||
args[k] = nil --больше этот параметр нам не пригодится | args[k] = nil --больше этот параметр нам не пригодится | ||
end | end | ||
elseif not args._template then | |||
-- Имя вызываемого шаблона в неименованном первом параметре (или же взято из названия страницы или | |||
-- из именованного параметра в отсутствие неименованных — в следующей строчке вреда нет в любом случае), | |||
-- больше его обрабатывать не надо | |||
table.remove(args, 1) | |||
end | end | ||
if tname == '' or tname == nil then -- при опущенном первом параметре берём имя шаблона из названия страницы | if tname == '' or tname == nil then -- при опущенном первом параметре берём имя шаблона из названия страницы | ||
tname = mw.title.getCurrentTitle().rootText | |||
end | end | ||
local targs, equals_pos, param, value, left_shift = {}, 0, '', '', 0 | local targs, equals_pos, param, value, left_shift = {}, 0, '', '', 0 | ||
for k, v in pairs(args) do | for k, v in pairs(args) do | ||
if type(k) == 'number' then -- неименованные параметры | if type(k) == 'number' then -- неименованные параметры | ||
Строка 191: | Строка 126: | ||
value = v:sub(equals_pos+1) | value = v:sub(equals_pos+1) | ||
targs[param] = process_nowiki_equals(value) | targs[param] = process_nowiki_equals(value) | ||
left_shift = left_shift + 1 -- переменная нужна, чтобы квазинумерованные параметры, переданные через "{{=}}", | left_shift = left_shift + 1 -- переменная нужна, чтобы квазинумерованные параметры, переданные через "{{=}}", | ||
-- не сбивали порядок | -- не сбивали порядок | ||
else -- истинно неименованные | else -- истинно неименованные | ||
targs[k - left_shift] = process_nowiki_equals(v) | targs[k - left_shift] = process_nowiki_equals(v) | ||
end | end | ||
elseif not k:find('^_') then -- именованные параметры, исключая модификаторы внешнего вида | elseif not k:find('^_') then -- именованные параметры, исключая модификаторы внешнего вида | ||
targs[k] = process_nowiki_equals(v) | targs[k] = process_nowiki_equals(v) | ||
end | end | ||
end | end | ||
Строка 219: | Строка 140: | ||
end | end | ||
expand_result = tostring(expand(frame, tname, targs)) | local expand_result = tostring(expand(frame, tname, targs)) | ||
if expand_result:sub(1, 2) == '{|' then | if expand_result:sub(1, 2) == '{|' then | ||
sep = sep .. '\n' | sep = sep .. '\n' |
Версия от 23:04, 25 октября 2021
Для документации этого модуля может быть создана страница Модуль:Example/doc
local p = {}
-- вызов шаблона, при ошибке возвращает пустую строку
local function expand(frame, tname, targs)
local success, result = pcall(
frame.expandTemplate,
frame,
{title = tname, args = targs}
)
if success then
return result
else
return ''
end
--return frame:expandTemplate({title = tname, args = args})
end
--удаляет из параметров вписанные через HTML-сущности "<nowiki>" и заменяет "{{=}}" на "=" для вызова шаблона
local function process_nowiki_equals(str)
str = str:gsub('<nowiki>', ''):gsub('</nowiki>', '')
:gsub('<nowiki>', ''):gsub('</nowiki>', '')
:gsub('{{=}}', '=')
:gsub('{{=}}', '=')
:gsub('{{=}}', '=')
:gsub('{{=}}', '=')
:gsub('&', '&')
return str
end
function p.main(frame)
local getArgs = require('Module:Arguments').getArgs
local yesno = require('Module:Yesno')
local template_code = require('Module:Template call code')._main
local copy = require('Module:TableTools').shallowClone
local args = copy(getArgs(frame, {trim = false, removeBlanks = false}))
local tag = args._tag
local sep = args._sep and args._sep .. ' '
local prefix = args._prefix or args['_pre-text'] or ''
local postfix = args._postfix or args['_post-text'] or ''
local nocat = yesno(args._nocat, false)
local style = args._style
if style == '' then
style = nil
end
-- передаётся шаблоном {{стопка примеров}}, один разделитель на все примеры
local comment_sep = args._comment_sep
local comment = args._comment
-- полезно в шаблоне {{стопка примеров}} (это просто текст в конце)
local after = args._after or ''
-- полезно в шаблоне {{стопка примеров}} (это просто текст в начале)
local before = args._before and args._before .. ' ' or ''
if style == 'pre' or style == '*pre' or style == 'pre↓' or style == '*pre↓' then
tag = tag or 'pre'
end
if style == 'pre' or style == '*pre' then
sep = sep or '\n'
elseif style == 'pre↓' or style == '*pre↓' then
sep = sep or expand(frame, 'sp-down', {'', '-0.5em'})
end
if style == '*pre' or style == '*pre↓' then
before = '<ul><li>' .. expand(frame, 'chrome bullet hack', {}) .. before
after = after .. '</li></ul>'
end
if style == 'wikitable' then
tag = tag or 'kbd'
sep = sep or '\n| '
comment_sep = '\n| '
end
tag = tag or 'code'
sep = sep or '→ '
comment_sep = comment_sep or ' '
if comment then
if not style then
comment = '<small>' .. comment .. '</small>'
end
after = comment_sep .. comment .. after
end
local _args = copy(args)
_args._style = args._codestyle
_args._comment = args._codecomment
_args._tag = tag
_args._prefix = prefix
_args._postfix = postfix
_args._nowiki = true
if args._template then
table.insert(_args, 1, args._template)
end
local nwt = template_code(_args, {withoutParams = false})
local tname = args._template or args[1]
if tname == nil then -- если имя шаблона содержит знак "=" (работает, только если нет неименованных параметров)
local nextfunc, static, cur = pairs(args)
local k, v = nextfunc(static, cur)
if k ~= nil and type(k) ~= 'number' and not k:find('^_') then -- именованные параметры, исключая модификаторы внешнего вида
tname = k .. "=" .. v
args[k] = nil --больше этот параметр нам не пригодится
end
elseif not args._template then
-- Имя вызываемого шаблона в неименованном первом параметре (или же взято из названия страницы или
-- из именованного параметра в отсутствие неименованных — в следующей строчке вреда нет в любом случае),
-- больше его обрабатывать не надо
table.remove(args, 1)
end
if tname == '' or tname == nil then -- при опущенном первом параметре берём имя шаблона из названия страницы
tname = mw.title.getCurrentTitle().rootText
end
local targs, equals_pos, param, value, left_shift = {}, 0, '', '', 0
for k, v in pairs(args) do
if type(k) == 'number' then -- неименованные параметры
equals_pos = v:find('=')
if equals_pos and v:find('{{=}}') == equals_pos-2 then
equals_pos = nil
end
if equals_pos then -- содержащие "=" преобразуем в именованные
param = v:sub(1, equals_pos-1)
value = v:sub(equals_pos+1)
targs[param] = process_nowiki_equals(value)
left_shift = left_shift + 1 -- переменная нужна, чтобы квазинумерованные параметры, переданные через "{{=}}",
-- не сбивали порядок
else -- истинно неименованные
targs[k - left_shift] = process_nowiki_equals(v)
end
elseif not k:find('^_') then -- именованные параметры, исключая модификаторы внешнего вида
targs[k] = process_nowiki_equals(v)
end
end
if nocat then
targs['nocat'] = 1
end
local expand_result = tostring(expand(frame, tname, targs))
if expand_result:sub(1, 2) == '{|' then
sep = sep .. '\n'
end
return before .. tostring(nwt) .. ' ' .. sep .. prefix .. expand_result .. postfix .. after
end
return p