Module:qlu-nouns

From Linguifex
Revision as of 01:50, 27 January 2025 by Lëtzelúcia (talk | contribs)
Jump to navigation Jump to search

Documentation for this module may be created at Module:qlu-nouns/doc

local m_utilities = require("Module:utilities")
local m_links = require("Module:links")
local lang = require("Module:languages").getByCode("qlu")

local export = {}

local branch_links = {
	["L"] = "[[Luthic|Standard Ravennese Luthic]]",
}

local decl_names = {
	["a"] = "a-stem",
	["o"] = "o-stem",
	["o-N"] = "o-stem neuter",
	["i"] = "i-stem",
	["r"] = "r-stem",
	["d"] = "d-stem",
	["u"] = "u-stem",
	["u-N"] = "u-stem neuter",
}

local decls = {}

decls["a"] = {
	params = {
		[1] = {},
		},
}
setmetatable(decls["a"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "a"
	data.forms["nom-pl"] = args[1] .. "e"
	
	data.forms["gen-sg"] = args[1] .. "e"
	data.forms["gen-pl"] = args[1] .. "aro"
	
	data.forms["dat-sg"] = args[1] .. "a"
	data.forms["dat-pl"] = args[1] .. "evo"
	
	data.forms["acc-sg"] = args[1] .. "a"
	data.forms["acc-pl"] = args[1] .. "as"
end
})

decls["o"] = {
	params = {
		[1] = {},
		},
}
setmetatable(decls["o"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "u"
	data.forms["nom-pl"] = args[1] .. "i"
	
	data.forms["gen-sg"] = args[1] .. "i"
	data.forms["gen-pl"] = args[1] .. "oro"
	
	data.forms["dat-sg"] = args[1] .. "a"
	data.forms["dat-pl"] = args[1] .. "evo"
	
	data.forms["acc-sg"] = args[1] .. "o"
	data.forms["acc-pl"] = args[1] .. "os"
end
})

decls["o-N"] = {
	params = {
		[1] = {},
		},
}
setmetatable(decls["o-N"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "o"
	data.forms["nom-pl"] = args[1] .. "a"
	
	data.forms["gen-sg"] = args[1] .. "i"
	data.forms["gen-pl"] = args[1] .. "oro"
	
	data.forms["dat-sg"] = args[1] .. "a"
	data.forms["dat-pl"] = args[1] .. "evo"
	
	data.forms["acc-sg"] = args[1] .. "o"
	data.forms["acc-pl"] = args[1] .. "a"
end
})

decls["i"] = {
	params = {
		[1] = {},
		},
}
setmetatable(decls["i"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "e"
	data.forms["nom-pl"] = args[1] .. "i"
	
	data.forms["gen-sg"] = args[1] .. "i"
	data.forms["gen-pl"] = args[1] .. "e"
	
	data.forms["dat-sg"] = args[1] .. "i"
	data.forms["dat-pl"] = args[1] .. "evo"
	
	data.forms["acc-sg"] = args[1] .. "e"
	data.forms["acc-pl"] = args[1] .. "es"
end
})

decls["r"] = {
	params = {
		[1] = {},
		[2] = {},
		},
}
setmetatable(decls["r"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1]
	data.forms["nom-pl"] = args[2] .. "i"
	
	data.forms["gen-sg"] = args[2] .. "i"
	data.forms["gen-pl"] = args[2] .. "e"
	
	data.forms["dat-sg"] = args[2] .. "i"
	data.forms["dat-pl"] = args[2] .. "evo"
	
	data.forms["acc-sg"] = args[2] .. "e"
	data.forms["acc-pl"] = args[2] .. "es"
end
})

decls["d"] = {
	params = {
		[1] = {},
		[2] = {},
		},
}
setmetatable(decls["d"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "ê"
	data.forms["nom-pl"] = args[2] .. "edi"
	
	data.forms["gen-sg"] = args[2] .. "edi"
	data.forms["gen-pl"] = args[2] .. "ede"
	
	data.forms["dat-sg"] = args[2] .. "edi"
	data.forms["dat-pl"] = args[2] .. "edevo"
	
	data.forms["acc-sg"] = args[2] .. "ede"
	data.forms["acc-pl"] = args[2] .. "edes"
end
})

decls["u"] = {
	params = {
		[1] = {},
		},
}
setmetatable(decls["u"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "u"
	data.forms["nom-pl"] = args[1] .. "us"
	
	data.forms["gen-sg"] = args[1] .. "aus"
	data.forms["gen-pl"] = args[1] .. "eve"
	
	data.forms["dat-sg"] = args[1] .. "au"
	data.forms["dat-pl"] = args[1] .. "evo"
	
	data.forms["acc-sg"] = args[1] .. "u"
	data.forms["acc-pl"] = args[1] .. "us"
end
})

decls["u-N"] = {
	params = {
		[1] = {},
		},
}
setmetatable(decls["u-N"], {__call = function(self, args, data)
	data.forms["nom-sg"] = args[1] .. "u"
	data.forms["nom-pl"] = args[1] .. "ua"
	
	data.forms["gen-sg"] = args[1] .. "aus"
	data.forms["gen-pl"] = args[1] .. "eve"
	
	data.forms["dat-sg"] = args[1] .. "au"
	data.forms["dat-pl"] = args[1] .. "evo"
	
	data.forms["acc-sg"] = args[1] .. "u"
	data.forms["acc-pl"] = args[1] .. "ua"
end
})

local cases = {
	["nominative"] = {short_form = "nom", link = "''[[nominative case|nominative]]''"},
	["accusative"] = {short_form = "acc", link = "''[[accusative case|accusative]]''"},
	["genitive"] = {short_form = "gen", link = "''[[genitive case|genitive]]''"},
	["dative"] = {short_form = "dat", link = "''[[dative case|dative]]''"},
}

local function make_headers(data, wikicode)
	table.insert(wikicode, '|- class="vsHide"\n')
	table.insert(wikicode, '! style="background:#' .. '; font-style:italic;" | Number\n')
	table.insert(wikicode, '! style="background:#' .. '; font-style:italic;" | Singular\n')
	table.insert(wikicode, '! style="background:#' .. '; font-style:italic;" | Plural\n')
end

local function show_form(form, data, branch)
	local function convert_word(form, branch)
		if mw.ustring.find(form, "{{{") then
			return form
		else
			return m_vl_translit.convert_words(form, branch)
		end
	end

	if not form then
		return "—"
	end
	
	
	if title:inNamespace("") then
		return m_links.full_link({lang = lang, alt = convert_word(form, branch), term = form})
	else
		return m_links.full_link({lang = lang, alt = convert_word(form, branch), term = "*" .. form})
	end
end

local function make_case(data, wikicode, case)
	local case_short = cases[case].short_form
	table.insert(wikicode, '|- class="vsHide"\n')
	table.insert(wikicode, '! style="background:#' .. ';" | ' .. cases[case].link .. '\n')
	table.insert(wikicode, '| style="background:#' .. ';" | ' .. show_form(data.forms[case_short .. '-sg'], data) .. '\n')
	table.insert(wikicode, '| style="background:#' .. ';" | ' .. show_form(data.forms[case_short .. '-pl'], data) .. '\n')
end

local function make_table(data)
	local wikicode = {'{| class="prettytable inflection-table vsSwitcher" data-toggle-category="inflection"\n'}
	table.insert(wikicode, '! colspan="5" class="vsToggleElement" style="text-align:left;min-width: 25em;background:#' ..
				  '" | ')

	make_headers(data, wikicode)
	make_case(data, wikicode, "nominative")
	make_case(data, wikicode, "genitive")
	make_case(data, wikicode, "dative")
	make_case(data, wikicode, "accusative")

	table.insert(wikicode, "|}")
	
	return table.concat(wikicode)
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"
	
	if not decls[decl_type] then
		error("Unknown declension type '" .. decl_type .. "'")
	end
	
	local data = {forms = {}}
	data.head = parent_args["head"] or nil

	local args = require("Module:parameters").process(parent_args, decls[decl_type].params, true)
	
	if not args[1] then
		setmetatable(args, {__index = function(self, key)
			return "{{{" .. key .. "}}}"
		end
		})
	end
	
	-- Generate the forms
	decls[decl_type](args, data)
	data["decl"] = decl_type
	
	-- Make the table
	t = decl_names[data.decl] .. '.\n\n'
	if parent_args.family then
		t = t .. make_table(data, parent_args.family)
		if parent_args.family2 then
			t = t .. "\n" .. make_table(data, parent_args.family2)
		end
	else
		t = t .. make_table(data, "It-W") .. "\n" .. make_table(data, "E") .. "\n" .. make_table(data, "S")
	end
	if title:inNamespace("") then
		t = mw.ustring.gsub(t, "#head", m_links.full_link({lang = lang, alt = data.forms["nom-sg"]}, "term"))
	else
		t = mw.ustring.gsub(t, "#head", m_links.full_link({lang = lang, alt = "*" .. data.forms["nom-sg"]}, "term"))
	end
	return t
end

return export