モジュール:goh-conj

このモジュールについての説明文ページを モジュール:goh-conj/doc に作成できます

local export = {}

local m_links = require("モジュール:links")
local m_utils = require("モジュール:utilities")

local lang = require("モジュール:languages").getByCode("goh")

local conj_data = {}

conj_data["st"] = {
	params = {
		[1] = {},
		[2] = {},
		[3] = {},
		[4] = {},
		["mutstem"] = {},
		["impr"] = {},
		["class"] = {},
		["pastpart"] = {},
		},
}
setmetatable(conj_data["st"], {__call = function(self, args, data)
	if not args.class then
		error("Class parameter required for strong verbs")
	end
	data.conj_type = "強変化第" .. args.class .. "類"
	
	if args[1]:sub(1,1) == "*" then
		error("Redundant asterisks")
	end
	
	data.forms["inf"] = {args.head or (args[1] .. "an")}
	
	data.forms["pres_ind_1s"] = {(args.mutstem or args[1]) .. "u"}
	data.forms["pres_ind_2s"] = {(args.mutstem or args[1]) .. "is"}
	data.forms["pres_ind_3s"] = {(args.mutstem or args[1]) .. "it"}
	data.forms["pres_ind_1p"] = {args[1] .. "em", args[1] .. "emes"}
	data.forms["pres_ind_2p"] = {args[1] .. "et"}
	data.forms["pres_ind_3p"] = {args[1] .. "ant"}

	data.forms["past_ind_1s"] = {args[2]}
	data.forms["past_ind_2s"] = {args[3] .. "i"}
	data.forms["past_ind_3s"] = {args[2]}
	data.forms["past_ind_1p"] = {args[3] .. "um", args[3] .. "umes"}
	data.forms["past_ind_2p"] = {args[3] .. "ut"}
	data.forms["past_ind_3p"] = {args[3] .. "un"}

	data.forms["pres_sub_1s"] = {args[1] .. "e"}
	data.forms["pres_sub_2s"] = {args[1] .. "es"}
	data.forms["pres_sub_3s"] = {args[1] .. "e"}
	data.forms["pres_sub_1p"] = {args[1] .. "em", args[1] .. "emes"}
	data.forms["pres_sub_2p"] = {args[1] .. "et"}
	data.forms["pres_sub_3p"] = {args[1] .. "en"}
	
	data.forms["past_sub_1s"] = {args[3] .. "i"}
	data.forms["past_sub_2s"] = {args[3] .. "is"}
	data.forms["past_sub_3s"] = {args[3] .. "i"}
	data.forms["past_sub_1p"] = {args[3] .. "im", args[3] .. "imes"}
	data.forms["past_sub_2p"] = {args[3] .. "it"}
	data.forms["past_sub_3p"] = {args[3] .. "in"}
	
	data.forms["imp_s"] = {(args.impr or args.mutstem) or args[1]}
	data.forms["imp_p"] = {args[1] .. "et"}
	
	data.forms["pres_part"] = {args[1] .. "anti"}
	data.forms["past_part"] = {args.pastpart or ("gi" .. args[4] .. "an")}
	
	table.insert(data.categories, "古高ドイツ語 強変化動詞第" .. args.class .. "類")
end
})

conj_data["wk1"] = {
	params = {
		[1] = {},
		[2] = {},
		["mutstem"] = {},
		["impr"] = {},
		["past_ptc"] = {},
		},
}
setmetatable(conj_data["wk1"], {__call = function(self, args, data)
	data.conj_type = "弱変化第1類"
	
	if args[1]:sub(1,1) == "*" then
		error("Redundant asterisks")
	end
	
	data.forms["inf"] = {args.head or (args[1] .. "en")}
	
	data.forms["pres_ind_1s"] = {args[1] .. "u"}
	data.forms["pres_ind_2s"] = {(args.mutstem or args[1]) .. "is"}
	data.forms["pres_ind_3s"] = {(args.mutstem or args[1]) .. "it"}
	data.forms["pres_ind_1p"] = {args[1] .. "em", args[1] .. "emes"}
	data.forms["pres_ind_2p"] = {args[1] .. "et"}
	data.forms["pres_ind_3p"] = {args[1] .. "ent"}

	data.forms["past_ind_1s"] = {(args[2] or args[1]) .. "ta"}
	data.forms["past_ind_2s"] = {(args[2] or args[1]) .. "tos"}
	data.forms["past_ind_3s"] = {(args[2] or args[1]) .. "ta"}
	data.forms["past_ind_1p"] = {(args[2] or args[1]) .. "tum", (args[2] or args[1]) .. "tumes"}
	data.forms["past_ind_2p"] = {(args[2] or args[1]) .. "tut"}
	data.forms["past_ind_3p"] = {(args[2] or args[1]) .. "tun"}

	data.forms["pres_sub_1s"] = {args[1] .. "e"}
	data.forms["pres_sub_2s"] = {args[1] .. "es"}
	data.forms["pres_sub_3s"] = {args[1] .. "e"}
	data.forms["pres_sub_1p"] = {args[1] .. "em", args[1] .. "emes"}
	data.forms["pres_sub_2p"] = {args[1] .. "et"}
	data.forms["pres_sub_3p"] = {args[1] .. "en"}
	
	data.forms["past_sub_1s"] = {(args[2] or args[1]) .. "ti"}
	data.forms["past_sub_2s"] = {(args[2] or args[1]) .. "tis"}
	data.forms["past_sub_3s"] = {(args[2] or args[1]) .. "ti"}
	data.forms["past_sub_1p"] = {(args[2] or args[1]) .. "tim", (args[2] or args[1]) .. "times"}
	data.forms["past_sub_2p"] = {(args[2] or args[1]) .. "tit"}
	data.forms["past_sub_3p"] = {(args[2] or args[1]) .. "tin"}
	
	data.forms["imp_s"] = {((args.impr or args.mutstem) or args[1]) .. "i"}
	data.forms["imp_p"] = {args[1] .. "et"}
	
	data.forms["pres_part"] = {args[1] .. "enti"}
	data.forms["past_part"] = {args.past_ptc or ("gi" .. (args[2] or args[1]) .. "t")}
	
	table.insert(data.categories, "古高ドイツ語 弱変化動詞第1類")
end
})

conj_data["wk2"] = {
	params = {
		[1] = {},
		["mutstem"] = {},
		["impr"] = {},
		["past_ptc"] = {},
		},
}
setmetatable(conj_data["wk2"], {__call = function(self, args, data)
	data.conj_type = "弱変化第2類"
	
	if args[1]:sub(1,1) == "*" then
		error("Redundant asterisks")
	end
	
	data.forms["inf"] = {args.head or (args[1] .. "ōn")}
	
	data.forms["pres_ind_1s"] = {args[1] .. "om"}
	data.forms["pres_ind_2s"] = {(args.mutstem or args[1]) .. "os"}
	data.forms["pres_ind_3s"] = {(args.mutstem or args[1]) .. "ot"}
	data.forms["pres_ind_1p"] = {args[1] .. "om", args[1] .. "omes"}
	data.forms["pres_ind_2p"] = {args[1] .. "ot"}
	data.forms["pres_ind_3p"] = {args[1] .. "ont"}

	data.forms["past_ind_1s"] = {args[1] .. "ota"}
	data.forms["past_ind_2s"] = {args[1] .. "otos"}
	data.forms["past_ind_3s"] = {args[1] .. "ota"}
	data.forms["past_ind_1p"] = {args[1] .. "otum", args[1] .. "otumes"}
	data.forms["past_ind_2p"] = {args[1] .. "otut"}
	data.forms["past_ind_3p"] = {args[1] .. "otun"}

	data.forms["pres_sub_1s"] = {args[1] .. "o"}
	data.forms["pres_sub_2s"] = {args[1] .. "os"}
	data.forms["pres_sub_3s"] = {args[1] .. "o"}
	data.forms["pres_sub_1p"] = {args[1] .. "om", args[1] .. "omes"}
	data.forms["pres_sub_2p"] = {args[1] .. "ot"}
	data.forms["pres_sub_3p"] = {args[1] .. "on"}
	
	data.forms["past_sub_1s"] = {args[1] .. "oti"}
	data.forms["past_sub_2s"] = {args[1] .. "otis"}
	data.forms["past_sub_3s"] = {args[1] .. "oti"}
	data.forms["past_sub_1p"] = {args[1] .. "otim", args[1] .. "otimes"}
	data.forms["past_sub_2p"] = {args[1] .. "otit"}
	data.forms["past_sub_3p"] = {args[1] .. "otin"}
	
	data.forms["imp_s"] = {((args.impr or args.mutstem) or args[1]) .. "o"}
	data.forms["imp_p"] = {args[1] .. "ot"}
	
	data.forms["pres_part"] = {args[1] .. "onti"}
	data.forms["past_part"] = {args.past_ptc or ("gi" .. args[1] .. "ot")}
	
	table.insert(data.categories, "古高ドイツ語 弱変化動詞第2類")
end
})

conj_data["wk3"] = {
	params = {
		[1] = {},
		["mutstem"] = {},
		["impr"] = {},
		["past_ptc"] = {},
		},
}
setmetatable(conj_data["wk3"], {__call = function(self, args, data)
	data.conj_type = "弱変化第3類"
	
	if args[1]:sub(1,1) == "*" then
		error("Redundant asterisks")
	end
	
	data.forms["inf"] = {args.head or (args[1] .. "ēn")}
	
	data.forms["pres_ind_1s"] = {args[1] .. "em"}
	data.forms["pres_ind_2s"] = {(args.mutstem or args[1]) .. "es"}
	data.forms["pres_ind_3s"] = {(args.mutstem or args[1]) .. "et"}
	data.forms["pres_ind_1p"] = {args[1] .. "em", args[1] .. "emes"}
	data.forms["pres_ind_2p"] = {args[1] .. "et"}
	data.forms["pres_ind_3p"] = {args[1] .. "ent"}

	data.forms["past_ind_1s"] = {args[1] .. "eta"}
	data.forms["past_ind_2s"] = {args[1] .. "etos"}
	data.forms["past_ind_3s"] = {args[1] .. "eta"}
	data.forms["past_ind_1p"] = {args[1] .. "etum", args[1] .. "etumes"}
	data.forms["past_ind_2p"] = {args[1] .. "etut"}
	data.forms["past_ind_3p"] = {args[1] .. "etun"}

	data.forms["pres_sub_1s"] = {args[1] .. "e"}
	data.forms["pres_sub_2s"] = {args[1] .. "es"}
	data.forms["pres_sub_3s"] = {args[1] .. "e"}
	data.forms["pres_sub_1p"] = {args[1] .. "em", args[1] .. "emes"}
	data.forms["pres_sub_2p"] = {args[1] .. "et"}
	data.forms["pres_sub_3p"] = {args[1] .. "en"}
	
	data.forms["past_sub_1s"] = {args[1] .. "eti"}
	data.forms["past_sub_2s"] = {args[1] .. "etis"}
	data.forms["past_sub_3s"] = {args[1] .. "eti"}
	data.forms["past_sub_1p"] = {args[1] .. "etim", args[1] .. "etimes"}
	data.forms["past_sub_2p"] = {args[1] .. "etit"}
	data.forms["past_sub_3p"] = {args[1] .. "etin"}
	
	data.forms["imp_s"] = {((args.impr or args.mutstem) or args[1]) .. "e"}
	data.forms["imp_p"] = {args[1] .. "et"}
	
	data.forms["pres_part"] = {args[1] .. "enti"}
	data.forms["past_part"] = {args.past_ptc or ("gi" .. args[1] .. "et")}
	
	table.insert(data.categories, "古高ドイツ語 弱変化動詞第3類")
end
})

conj_data.irregular = {}

conj_data.irregular["wesan"] = function(data)
	data.conj_type = "不規則, 補充形"
	
	data.forms["inf"] = {"wesan"}
	
	data.forms["pres_ind_1s"] = {"bim"}
	data.forms["pres_ind_2s"] = {"bist"}
	data.forms["pres_ind_3s"] = {"ist"}
	data.forms["pres_ind_1p"] = {"sum", "sumes"}
	data.forms["pres_ind_2p"] = {"sīt"}
	data.forms["pres_ind_3p"] = {"sint"}

	data.forms["past_ind_1s"] = {"was"}
	data.forms["past_ind_2s"] = {"wāri"}
	data.forms["past_ind_3s"] = {"was"}
	data.forms["past_ind_1p"] = {"wārum", "wārumes"}
	data.forms["past_ind_2p"] = {"wārut"}
	data.forms["past_ind_3p"] = {"wārun"}
	
	data.forms["pres_sub_1s"] = {"sī"}
	data.forms["pres_sub_2s"] = {"sīs", "sīst"}
	data.forms["pres_sub_3s"] = {"sī"}
	data.forms["pres_sub_1p"] = {"sīm", "sīmes"}
	data.forms["pres_sub_2p"] = {"sīt"}
	data.forms["pres_sub_3p"] = {"sīn"}

	data.forms["past_sub_1s"] = {"wāri"}
	data.forms["past_sub_2s"] = {"wāris", "wārist"}
	data.forms["past_sub_3s"] = {"wāri"}
	data.forms["past_sub_1p"] = {"wārim", "wārimes"}
	data.forms["past_sub_2p"] = {"wārit"}
	data.forms["past_sub_3p"] = {"wārin"}
	
	data.forms["imp_s"] = {"wes"}
	data.forms["imp_p"] = {"wesit"}
	
	data.forms["pres_part"] = {"wesanti"}
	data.forms["past_part"] = {"giwesan"}
	
	table.insert(data.categories, "古高ドイツ語 動詞 補充形")
end

local function add_asterisks(forms, data)
	for _, form in ipairs(forms) do
		for i, subform in ipairs(data.forms[form]) do
			data.forms[form][i] = "*" .. subform
		end
	end
end

-- The main entry point.
-- This is the only function that can be invoked from a template.
function export.show(frame)

	local parent_args = frame:getParent().args
	local conj_type = (frame.args["conj"] or parent_args["conj"]) or "st"

	if not conj_data[conj_type] then
		error("Unknown conjugation '" .. conj_type .. "'")
	end
	
	local data = {forms = {}, categories = {}}
	
	data.head = parent_args["head"] or nil

	local args = require("モジュール:parameters").process(parent_args, conj_data[conj_type].params, true)
	
	-- Override for templates
	if not args[1] then
		setmetatable(args, {__index = function(self, key)
			return "{{{" .. key .. "}}}"
		end
		})
	end
	
	-- Generate the forms
	if parent_args.irr then
		table.insert(data.categories, "古高ドイツ語 不規則動詞")
		if conj_data.irregular[parent_args.irr] then
			conj_data.irregular[parent_args.irr](data)
		else
			conj_data[conj_type](args, data)
		end
	else
		conj_data[conj_type](args, data)
	end

	-- Make the table
	return make_table(data)
end

function make_table(data)
	local function show_form(form)
		if not form then
			return "—"
		end
		
		local ret = {}
		
		for key, subform in ipairs(form) do
			if mw.title.getCurrentTitle().nsText == "Reconstruction" and subform ~= "—" then
				subform = "*" .. subform
			end
			table.insert(ret, m_links.full_link({lang = lang, term = subform}))
		end
			
		return table.concat(ret, ", ")
	end
	
	local function repl(param)
		if param == "conj_type" then
			return data.conj_type
		else
			return show_form(data.forms[param])
		end
	end
	
	local wikicode = [=[
<div class="NavFrame" style="width: 42em">
<div class="NavHead" style="background-color:#93C572;">''{{{inf}}}'' の活用({{{conj_type}}})</div>
<div class="NavContent">
{| style="width: 100%; border:1px solid #93C572; line-height: 125%; background-color:#F9F9F9; text-align:center; border: 1px solid #CCCCFF;" cellspacing="1" cellpadding="3" cellspacing="1" class="inflection-table"
|- style="background-color:#F2F2FF;"
|-
! style="background-color:#90EE90;" | 不定詞
| colspan="2" style="background-color:#EFEFEF;" | {{{inf}}}
|-
! style="background-color:#93C572;" | [[直説法]]
! style="background-color:#DEDEEE;" | [[現在形|現在]]
! style="background-color:#DEDEEE;" | [[過去形|過去]]
|-
! style="background-color:#90EE90;" | 一人称単数
| style="background-color:#efefff;" | {{{pres_ind_1s}}}
| style="background-color:#efefff;" | {{{past_ind_1s}}}
|-
! style="background-color:#90EE90;" | 二人称単数
| style="background-color:#efefff;" | {{{pres_ind_2s}}}
| style="background-color:#efefff;" | {{{past_ind_2s}}}
|-
! style="background-color:#90EE90;" | 三人称単数
| style="background-color:#efefff;" | {{{pres_ind_3s}}}
| style="background-color:#efefff;" | {{{past_ind_3s}}}
|-
! style="background-color:#90EE90;" | 一人称複数
| style="background-color:#efefff;" | {{{pres_ind_1p}}}
| style="background-color:#efefff;" | {{{past_ind_1p}}}
|-
! style="background-color:#90EE90;" | 二人称複数
| style="background-color:#efefff;" | {{{pres_ind_2p}}}
| style="background-color:#efefff;" | {{{past_ind_2p}}}
|-
! style="background-color:#90EE90;" | 三人称複数
| style="background-color:#efefff;" | {{{pres_ind_3p}}}
| style="background-color:#efefff;" | {{{past_ind_3p}}}
|-
! style="background-color:#93C572;" | [[接続法]]
! style="background-color:#eeeede;" | 現在
! style="background-color:#eeeede;" | 過去
|-
! style="background-color:#90EE90;" | 一人称単数
| style="background-color:#ffffef;" | {{{pres_sub_1s}}}
| style="background-color:#ffffef;" | {{{past_sub_1s}}}
|-
! style="background-color:#90EE90;" | 二人称単数
| style="background-color:#ffffef;" | {{{pres_sub_2s}}}
| style="background-color:#ffffef;" | {{{past_sub_2s}}}
|-
! style="background-color:#90EE90;" | 三人称単数
| style="background-color:#ffffef;" | {{{pres_sub_3s}}}
| style="background-color:#ffffef;" | {{{past_sub_3s}}}
|-
! style="background-color:#90EE90;" | 一人称複数
| style="background-color:#ffffef;" | {{{pres_sub_1p}}}
| style="background-color:#ffffef;" | {{{past_sub_1p}}}
|-
! style="background-color:#90EE90;" | 二人称複数
| style="background-color:#ffffef;" | {{{pres_sub_2p}}}
| style="background-color:#ffffef;" | {{{past_sub_2p}}}
|-
! style="background-color:#90EE90;" | 三人称複数
| style="background-color:#ffffef;" | {{{pres_sub_3p}}}
| style="background-color:#ffffef;" | {{{past_sub_3p}}}
|-
! style="background-color:#93C572;" | [[命令法]]
! style="background-color:#eedede;" | 現在
! rowspan="3" style="background-color:#e0e0e0;" |
|-
! style="background-color:#90EE90;" | 単数
| style="background-color:#ffefef;" | {{{imp_s}}}
|-
! style="background-color:#90EE90;" | 複数
| style="background-color:#ffefef;" | {{{imp_p}}}
|-
! style="background-color:#93C572; font-weight:bold;" | [[分詞]]
! style="background-color:#deeede; font-weight:bold;" | [[現在分詞|現在]]
! style="background-color:#deeede; font-weight:bold;" | [[過去分詞|過去]]
|-
! style="background-color:#90EE90; font-weight:bold;" |
| style="background-color:#efffef;" | {{{pres_part}}} 
| style="background-color:#efffef;" | {{{past_part}}}
|}</div></div>]=]

	return (mw.ustring.gsub(wikicode, "{{{([a-z0-9_]+)}}}", repl)) .. m_utils.format_categories(data.categories, lang)
end

return export