Modul:category tree/affix cat

Dokumentasjon for modulen kan opprettast på Modul:category tree/affix cat/dok

local m_links = require("Module:links")
local m_compound = require("Module:compound")
local kategoriser = require('Modul:kategoriser')
local tilpassing = require('Modul:compound/tilpassing')

local export = {}

-- Category object

local Category = {}
Category.__index = Category

function Category.new_main(frame)
	local params = {
		[1] = {required = true},
		[2] = {required = true},
		[3] = {},
		
		["id"] = {},
		["pos"] = {},
		["sc"] = {},
		["sort"] = {},
		["tr"] = {},
	}
	
	args = require("Module:parameters").process(frame:getParent().args, params)
	local info = {code = args[1], term = args[2], alt = args[3], id = args["id"], pos = args["pos"], sc = args["sc"], sort = args["sort"], tr = args["tr"], affixtype = frame.args["affixtype"]}
	
	return Category.new(info)
end

function Category.new(info)
	local self = setmetatable({}, Category)
	
	for key, val in pairs(info) do
		if not (key == "affixtype" or key == "alt" or key == "code" or key == "id" or key == "pos" or key == "sc" or key == "sort" or key == "term" or key == "tr") then
			error("The parameter \"" .. key .. "\" was not recognized.")
		end
	end
	
	self._info = info
	
	-- Make pos plural
	self._pos = self._info.pos or 'ord'

	
	if not self._info.code then
		error("No language code was specified.")
	end
	
	if not self._info.term then
		error("No term was specified.")
	end
	
	self._lang = require("Module:languages").getByCode(self._info.code) or error("The language code \"" .. self._info.code .. "\" is not valid.")
	self._sc = (self._info.sc and (require("Module:scripts").getByCode(val) or error("The script code \"" .. val .. "\" is not valid.")) or nil)
	
	self._term = m_compound.make_affix(self._info.term, self._lang, self._sc, self._info.affixtype)
	self._alt = m_compound.make_affix(self._info.alt, self._lang, self._sc, self._info.affixtype)
	self._tr = m_compound.make_affix(self._info.tr, self._lang, require("Module:scripts").getByCode("Latn"), self._info.affixtype)
	
	-- Convert term/alt into affixes if needed
	local desc = {
		["prefix"]		= "som byrjar med førefestet",
		["suffix"]		= "som endar med etterfestet",
		["circumfix"]	= "bookended with the circumfix",
		["infix"]		= "spliced with the infix",
		["interfix"]	= "joined with the interfix",
		["transfix"]	= "patterned with the transfix",
	}
	
	self._desc = desc[self._info.affixtype] or error("Invalid affixtype specified.")
	
	return self
end

export.new = Category.new
export.new_main = Category.new_main


function Category:getInfo()
	return self._info
end


function Category:getBreadcrumbName()
	local link = m_links.full_link({lang = self._lang, alt = self._alt or self._term, sc = self._sc, tr = "-"}, "term")
	return kategoriser.engelskTilNorsk(self._pos, true) .. " med " .. tilpassing.hentNamn(self._info.affixtype, 'bu_ein') .. ' ' .. link ..  (self._info.id and " (" .. self._info.id .. ")" or "")
end


function Category:getDataModule()
	return "Module:category tree/affix cat"
end


function Category:canBeEmpty()
	return false
end


function Category:isHidden()
	return false
end


function Category:getCategoryName()
	return kategoriser.hovud(self._lang, kategoriser.engelskTilNorsk(self._pos, true), " med " .. tilpassing.hentNamn(self._info.affixtype, 'bu_ein') .. ' ' .. self._lang:makeEntryName(self._term) ..  (self._info.id and " (" .. self._info.id .. ")" or ""))
end


function Category:getDescription()
	local description =
		kategoriser.hovud(self._lang, kategoriser.engelskTilNorsk(self._pos, true), ' ' .. self._desc .. " " ..
		m_links.full_link({lang = self._lang, term = self._term, alt = self._alt, sc = self._sc, id = self._info.id, tr = self._tr}, "term") ..
		".")
	
	return description
end


function Category:getParents()
	local parents = {}
	local parent
	
	parent = {}
	parent.name = require("Module:category tree/poscatboiler").new({code = self._info.code, label = "ord etter " .. kategoriser.engelskTilNorsk(self._info.affixtype)})
	parent.sort = self._lang:makeSortKey(self._info.sort or self._term)
	table.insert(parents, parent)
	
	if self._info.id then
		parent = {}
		parent.name = export.new({code = self._info.code, term = self._info.term, affixtype = self._info.affixtype})
		parent.sort = self._lang:makeSortKey(self._info.id)
		table.insert(parents, parent)
	end
	
	return parents
end


function Category:getChildren()
	return nil
end


function Category:getUmbrella()
	return nil
end


return export