모듈:Mfunctions 문서 원본 보기

local p = {}
local FuncTable = {}
local default = {}

function FuncTable:parse(text)
	for func in text:gmatch('{%b{}}') do
		local innfunc = func:sub(3, -3)
		if innfunc:match('{%b{}}') then innfunc = self:parse(innfunc) end
		local name = innfunc:sub(1, innfunc:find(':') and (innfunc:find(':') - 1))
		
		if name:match('%b##') then
			name = name:sub(2, -2)
			local argstr = innfunc:find(':') and innfunc:sub(innfunc:find(':') + 1, -1)
			local args = {}
			local result = ''
			
			if argstr then
				local index = 1
				
				for arg in mw.text.gsplit(argstr, '|') do
					if arg:find('=') then
						args[arg:sub(1, arg:find('=') - 1)] = arg:sub(arg:find('=') + 1, -1)
					else
						args[index] = arg
						index = index + 1
					end
				end
			end
			
			if (type(self[name]) == 'function')
				then result = self[name](mw.getCurrentFrame():newChild{title = '#' .. name .. '#', args = args}, '{{' .. innfunc .. '}}')
				else result = self[name]
			end
			
			text = text:sub(1, text:find(func) - 1) .. result .. text:sub(text:find(func) + func:len(), -1)
		else
			text = text:sub(1, text:find(func) - 1) .. '{{' .. innfunc .. '}}'.. text:sub(text:find(func) + func:len(), -1)
		end
	end
	
	return mw.getCurrentFrame():preprocess(text)
end

function FuncTable:set(name, value)
	self[name] = value
	return self
end

function default.keep(frame, func)
	return '{{' .. func:sub(func:find(':') + 1, -1)
end

function default.param(frame)
	local parent = frame:getParent():getParent()
	local value = parent and parent.args[frame.args[1]]
	
	if frame.args[2]
		then return value or frame.args[2]
		else return value or '{{{' .. frame.args[1] .. '}}}'
	end
end

function default.test()
	return frame:getParent():getParent():getTitle()
end

function p.newFuncTable()
	return setmetatable(default, {__index = FuncTable})
end

return p