Module:goh-decl-noun

From Wiktionary, the free dictionary
Jump to navigation Jump to search
This module needs documentation.
Please document this module by describing its purpose and usage on the documentation page.

local export = {}

local m_links = require("Module:links")
local m_utils = require("Module:utilities")

local lang = require("Module:languages").getByCode("goh")

local decl_data = {}

decl_data["a-m"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
	},
}
setmetatable(decl_data["a-m"], {__call = function(self, args, data)
	data.decl_type = "masculine a-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]
	
	data.forms["nom_sg"] = {args.alt1 or args[1]}
	data.forms["acc_sg"] = {args.alt1 or args[1]}
	data.forms["gen_sg"] = {a2 .. "es"}
	data.forms["dat_sg"] = {a2 .. "e"}
	data.forms["ins_sg"] = {a2 .. "u"}

	data.forms["nom_pl"] = {a2 .. "a"}
	data.forms["acc_pl"] = {a2 .. "a"}
	data.forms["gen_pl"] = {a2 .. "o"}
	data.forms["dat_pl"] = {a2 .. "um"}
	
	table.insert(data.categories, "Old High German a-stem nouns")
end
})

decl_data["a-n"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
	},
}
setmetatable(decl_data["a-n"], {__call = function(self, args, data)
	decl_data["a-m"](args, data)
	
	data.decl_type = "neuter a-stem"

	data.forms["nom_pl"] = {args.alt1 or args[1]}
	data.forms["acc_pl"] = {args.alt1 or args[1]}
end
})

decl_data["i-f"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
		["nom_sg"] = {},
		},
}
setmetatable(decl_data["i-f"], {__call = function(self, args, data)
	data.decl_type = "feminine i-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]
	
	data.forms["nom_sg"] = {args.nom_sg or args.alt1 or args[1]}
	data.forms["acc_sg"] = {args.nom_sg or args.alt1 or args[1]}
	data.forms["gen_sg"] = {a2 .. "i"}
	data.forms["dat_sg"] = {a2 .. "i"}

	data.forms["nom_pl"] = {a2 .. "i"}
	data.forms["acc_pl"] = {a2 .. "i"}
	data.forms["gen_pl"] = {a2 .. "o"}
	data.forms["dat_pl"] = {a2 .. "im", a2 .. "en"}
	
	table.insert(data.categories, "Old High German i-stem nouns")
end
})

decl_data["i-m"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
		["nom_sg"] = {},
		},
}
setmetatable(decl_data["i-m"], {__call = function(self, args, data)
	data.decl_type = "masculine i-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]

	data.forms["nom_sg"] = {args.nom_sg or args.alt1 or args[1]}
	data.forms["acc_sg"] = {args.nom_sg or args.alt1 or args[1]}
	data.forms["gen_sg"] = {args.alt1 or args[1] .. "es"}
	data.forms["dat_sg"] = {args.alt1 or args[1] .. "e"}
	data.forms["ins_sg"] = {args.alt1 or args[1] .. "u"}

	data.forms["nom_pl"] = {a2 .. "i"}
	data.forms["acc_pl"] = {a2 .. "i"}
	data.forms["gen_pl"] = {a2 .. "o"}
	data.forms["dat_pl"] = {a2 .. "im", a2 .. "en"}
	
	table.insert(data.categories, "Old High German i-stem nouns")
end
})

decl_data["ja-m"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
	},
}
setmetatable(decl_data["ja-m"], {__call = function(self, args, data)
	data.decl_type = "masculine ja-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]
	
	data.forms["nom_sg"] = {(args.alt1 or args[1]) .. "i"}
	data.forms["acc_sg"] = {(args.alt1 or args[1]) .. "i"}
	data.forms["gen_sg"] = {a2 .. "es"}
	data.forms["dat_sg"] = {a2 .. "e"}
	data.forms["ins_sg"] = {a2 .. "u"}

	data.forms["nom_pl"] = {a2 .. "a"}
	data.forms["acc_pl"] = {a2 .. "a"}
	data.forms["gen_pl"] = {a2 .. "o"}
	data.forms["dat_pl"] = {a2 .. "im"}
	
	table.insert(data.categories, "Old High German ja-stem nouns")
end
})

decl_data["ja-n"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
	},
}
setmetatable(decl_data["ja-n"], {__call = function(self, args, data)
	decl_data["ja-m"](args, data)
	
	data.decl_type = "neuter ja-stem"

	data.forms["nom_pl"] = {(args.alt1 or args[1]) .. "i"}
	data.forms["acc_pl"] = {(args.alt1 or args[1]) .. "i"}
end
})

decl_data["n-m"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
	},
}
setmetatable(decl_data["n-m"], {__call = function(self, args, data)
	data.decl_type = "masculine n-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]
	
	data.forms["nom_sg"] = {args.alt1 or args[1] .. "o"}
	data.forms["acc_sg"] = {args.alt1 or args[1] .. "on", args.alt1 or args[1] .. "un"}
	data.forms["gen_sg"] = {a2 .. "en", a2 .. "in"}
	data.forms["dat_sg"] = {a2 .. "en", a2 .. "in"}

	data.forms["nom_pl"] = {a2 .. "on", a2 .. "un"}
	data.forms["acc_pl"] = {a2 .. "on", a2 .. "un"}
	data.forms["gen_pl"] = {a2 .. "ōno"}
	data.forms["dat_pl"] = {a2 .. "ōm", a2 .. "ōn"}
	
	table.insert(data.categories, "Old High German n-stem nouns")
end
})

decl_data["n-n"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
	},
}
setmetatable(decl_data["n-n"], {__call = function(self, args, data)
	data.decl_type = "neuter n-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]
	
	data.forms["nom_sg"] = {args.alt1 or args[1] .. "a"}
	data.forms["acc_sg"] = {args.alt1 or args[1] .. "a"}
	data.forms["gen_sg"] = {a2 .. "en", a2 .. "in"}
	data.forms["dat_sg"] = {a2 .. "en", a2 .. "in"}

	data.forms["nom_pl"] = {a2 .. "un"}
	data.forms["acc_pl"] = {a2 .. "un"}
	data.forms["gen_pl"] = {a2 .. "ōno"}
	data.forms["dat_pl"] = {a2 .. "ōm", a2 .. "ōn"}
	
	table.insert(data.categories, "Old High German n-stem nouns")
end
})

decl_data["n-f"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
		},
}
setmetatable(decl_data["n-f"], {__call = function(self, args, data)
	decl_data["n-n"](args, data)
	
	data.decl_type = "feminine n-stem"
	
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]

	data.forms["acc_sg"] = {args.alt1 or args[1] .. "ūn"}
	data.forms["gen_sg"] = {a2 .. "ūn"}
	data.forms["dat_sg"] = {a2 .. "ūn"}
end
})

decl_data["o-f"] = {
	params = {
		[1] = {},
		["alt1"] = {},
		},
}
setmetatable(decl_data["o-f"], {__call = function(self, args, data)
	data.decl_type = "ō-stem"
	
	local a1 = args.alt1 or args[1]
	
	data.forms["nom_sg"] = {a1 .. "a"}
	data.forms["acc_sg"] = {a1 .. "a"}
	data.forms["gen_sg"] = {a1 .. "a"}
	data.forms["dat_sg"] = {a1 .. "u"}

	data.forms["nom_pl"] = {a1 .. "ā"}
	data.forms["acc_pl"] = {a1 .. "ā"}
	data.forms["gen_pl"] = {a1 .. "ōno"}
	data.forms["dat_pl"] = {a1 .. "ōm"}

	table.insert(data.categories, "Old High German ō-stem nouns")
end
})

decl_data["in-f"] = {
	params = {
		[1] = {},
		[2] = {type = "boolean", default = false},
		["alt1"] = {},
		["pl"] = {type = "boolean", default = false},
		},
}
setmetatable(decl_data["in-f"], {__call = function(self, args, data)
	data.decl_type = "īn-stem"
	
	local a1 = args.alt1 or args[1]
	local a2 = args.pl or args[2]

	data.forms["nom_sg"] = {a1 .. "ī"}
	data.forms["acc_sg"] = {a1 .. "ī"}
	data.forms["gen_sg"] = {a1 .. "ī"}
	data.forms["dat_sg"] = {a1 .. "ī"}
	
	if a2 == true then

		data.forms["nom_pl"] = {a1 .. "ī"}
		data.forms["acc_pl"] = {a1 .. "ī"}
		data.forms["gen_pl"] = {a1 .. "ino"}
		data.forms["dat_pl"] = {a1 .. "inum"}
		
	else end

	table.insert(data.categories, "Old High German īn-stem nouns")
end
})

decl_data["wa-m"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
		["nomsg"] = {},
	},
}
setmetatable(decl_data["wa-m"], {__call = function(self, args, data)
	data.decl_type = "masculine wa-stem"
	
	local ns = args.nomsg or args.alt1 or args[1]
	local a2 = args.alt2 or args[2] or args.alt1 or args[1]
	
	data.forms["nom_sg"] = {ns}
	data.forms["acc_sg"] = {ns}
	data.forms["gen_sg"] = {a2 .. "wes"}
	data.forms["dat_sg"] = {a2 .. "we"}

	data.forms["nom_pl"] = {(args.alt1 or args[1]) .. "wa"}
	data.forms["acc_pl"] = {(args.alt1 or args[1]) .. "wa"}
	data.forms["gen_pl"] = {a2 .. "wo"}
	data.forms["dat_pl"] = {a2 .. "wum"}
	
	table.insert(data.categories, "Old High German wa-stem nouns")
end
})

decl_data["wa-n"] = {
	params = {
		[1] = {},
		[2] = {},
		["alt1"] = {},
		["alt2"] = {},
		["nomsg"] = {},
		},
}
setmetatable(decl_data["wa-n"], {__call = function(self, args, data)
	decl_data["wa-m"](args, data)
	
	data.decl_type = "neuter wa-stem"
	
	local ns = args.nomsg or args.alt1 or args[1]

	data.forms["nom_pl"] = {ns}
	data.forms["acc_pl"] = {ns}
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 decl_type = (frame.args["decl"] or parent_args["decl"]) or "a-m"

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

	local args = require("Module:parameters").process(parent_args, decl_data[decl_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, "Old High German irregular nouns")
		if decl_data.irregular[parent_args.irr] then
			decl_data.irregular[parent_args.irr](data)
		else
			decl_data[decl_type](args, data)
		end
	else
		decl_data[decl_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 == "decl_type" then
			return data.decl_type
		else
			return show_form(data.forms[param])
		end
	end

	local wikicode = [=[<div class="NavFrame" style="width:30em">
<div class="NavHead" style="">Declension of {{{nom_sg}}} ({{{decl_type}}})</div>
<div class="NavContent">

{| style="background:#F5FFFA;text-align:center;width:30em" class="inflection-table"
|-
! style="background:#F5FFFA" | case
! style="background:#93C572; width: 37.5%" | singular
! style="background:#93C572; width: 37.5%" | plural
|-
! style="background:#90EE90" | [[Appendix:Glossary#nominative case|nominative]]
| {{{nom_sg}}}
| {{{nom_pl}}}
|-
! style="background:#90EE90" | [[Appendix:Glossary#accusative case|accusative]]
| {{{acc_sg}}}
| {{{acc_pl}}}
|-
! style="background:#90EE90" | [[Appendix:Glossary#genitive case|genitive]]
| {{{gen_sg}}}
| {{{gen_pl}}}
|-
! style="background:#90EE90" | [[Appendix:Glossary#dative case|dative]]
| {{{dat_sg}}}
| {{{dat_pl}}}
]=]

if data.forms.ins_sg or data.forms.ins_pl then
	wikicode = wikicode .. [=[|-
! style="background:#90EE90" | [[Appendix:Glossary#instrumental case|instrumental]]
| {{{ins_sg}}}
| {{{ins_pl}}}
]=]
end
	wikicode = wikicode .. "|}</div></div>"

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

return export