Модуль:Без падстаноўкі

Зьвесткі зь Вікіпэдыі — вольнай энцыкляпэдыі
Перайсьці да навігацыі Перайсьці да пошуку

Дакумэнтацыю да гэтага модуля можна стварыць у Модуль:Без падстаноўкі/Дакумэнтацыя

local checkType = require('libraryUtil').checkType

local p = {}

local BODY_PARAM = '$B'

local specialParams = {
	['$params'] = 'сьпіс парамэтраў',
	['$aliases'] = 'сынонімы парамэтраў',
	['$flags'] = 'сьцягі',
	['$B'] = 'зьмест шаблёну',
	['$template-name'] = 'перапісаць назву выкліку шаблёну',
}

function p.main(frame, body)
	-- Калі мы падстаўляем, гэтая функцыя вяртае выклік шаблёну, а калі не,
	-- тады вяртае цела шаблёну. Цела шаблёну можа быць зададзенае парамэтрам
	-- цела альбо парамэтрам шаблёну, вызначаным у зьменнай BODY_PARAM.
	-- Гэтую функцыю можна выклікаць праз Lua ці праз #invoke.

	-- Вяртае цела шаблёну, калі мы не падстаўляем.
	if not mw.isSubsting() then
		if body ~= nil then
			return body
		elseif frame.args[BODY_PARAM] ~= nil then
			return frame.args[BODY_PARAM]
		else
			error(string.format(
				"не зададзены зьмест шаблёну (выкарыстайце парамэтар '%s' з #invoke)",
				BODY_PARAM
			), 2)
		end
	end

	-- Праверка карэктнасьці для рамкавага аб’екту.
	if type(frame) ~= 'table'
		or type(frame.getParent) ~= 'function'
		or not frame:getParent()
	then
		error(
			"аргумэнт №1 для 'main' мусіць быць рамкавым аб’ектам з бацькоўскай " ..
			"даступнай рамкай",
			2
		)
	end

	-- Знайсьці назву выкліку.
	local mTemplateInvocation = require('Модуль:Выклік шаблёну')
	local name

	if frame.args['$template-name'] and '' ~= frame.args['$template-name'] then
		name = frame.args['$template-name']										-- перапісаць якую-кольвек назву шаблёну гэтай назвай
	else
		name = mTemplateInvocation.name(frame:getParent():getTitle())
	end

	-- Спалучыць перададзеныя аргумэнты зь перададзенымі дапомнымі
	local args = {}
	if string.find( ','..(frame.args['$flags'] or '')..',', ',%s*override%s*,' ) then
		for k, v in pairs( frame:getParent().args ) do
			args[k] = v
		end
		for k, v in pairs( frame.args ) do
			if not specialParams[k] then
				if v == '__DATE__' then
					v = mw.getContentLanguage():formatDate( 'F Y' )
				end
				args[k] = v
			end
		end
	else
		for k, v in pairs( frame.args ) do
			if not specialParams[k] then
				if v == '__DATE__' then
					v = mw.getContentLanguage():formatDate( 'F Y' )
				end
				args[k] = v
			end
		end
		for k, v in pairs( frame:getParent().args ) do
			args[k] = v
		end
	end

	-- Абрэзаць парамэтры, калі не зададзена іншае
	if not string.find( ','..(frame.args['$flags'] or '')..',', ',%s*keep%-whitespace%s*,' ) then
		for k, v in pairs( args ) do args[k] = mw.ustring.match(v, '^%s*(.*)%s*$') or '' end
	end

	-- Выцягнуць інфармацыю з сынонімаў парамэтраў
	local aliases = {}
	if frame.args['$aliases'] then
		local list = mw.text.split( frame.args['$aliases'], '%s*,%s*' )
		for k, v in ipairs( list ) do
			local tmp = mw.text.split( v, '%s*>%s*' )
			aliases[tonumber(mw.ustring.match(tmp[1], '^[1-9][0-9]*$')) or tmp[1]] = ((tonumber(mw.ustring.match(tmp[2], '^[1-9][0-9]*$'))) or tmp[2])
		end
	end
	for k, v in pairs( aliases ) do
		if args[k] and ( not args[v] or args[v] == '' ) then
			args[v] = args[k]
		end
		args[k] = nil
	end

	-- Прыбраць пустыя парамэтры, калі зададзена
	if string.find( ','..(frame.args['$flags'] or '')..',', ',%s*remove%-empty%s*,' ) then
		local tmp = 0
		for k, v in ipairs( args ) do
			if v ~= '' or ( args[k+1] and args[k+1] ~= '' ) or ( args[k+2] and args[k+2] ~= '' ) then
				tmp = k
			else
				break
			end
		end
		for k, v in pairs( args ) do
			if v == '' then
				if not (type(k) == 'number' and k < tmp) then args[k] = nil end
			end
		end
	end

	-- Упарадкаваць парамэтры
	if frame.args['$params'] then
		local params, tmp = mw.text.split( frame.args['$params'], '%s*,%s*' ), {}
		for k, v in ipairs(params) do
			v = tonumber(mw.ustring.match(v, '^[1-9][0-9]*$')) or v
			if args[v] then tmp[v], args[v] = args[v], nil end
		end
		for k, v in pairs(args) do tmp[k], args[k] = args[k], nil end
		args = tmp
	end

	return mTemplateInvocation.invocation(name, args)
end

p[''] = p.main -- Для адваротнай сумяшчальнасьці

return p