Modul:taxonomy

local export = {}

local lang_en = require("Module:languages").getByCode("en")
local lang_mul = require("Module:languages").getByCode("mul")


function export.taxon(frame)
	local params = {
		 = {required = true, default = "{{{1}}}"},
		 = {required = true, default = "{{{2}}}"},
		 = {required = true, default = "{{{3}}}"},
		 = {},
		
		 = {type = "boolean"},
		 = {type = "boolean"},
	}
	
	local args = require("Module:parameters").process(frame:getParent().args, params)
	
	local ret = {}
	local categories = {"mul:Taxonomic names (" .. args .. ")"}
	
	table.insert(ret, "A taxonomic ")
	table.insert(ret, require("Module:links").language_link{lang = lang_en, term = args})
	table.insert(ret, " within the ")
	table.insert(ret, require("Module:links").language_link{lang = lang_en, term = args})
	table.insert(ret, " ")
	
	local parent = require("Module:links").language_link{lang = lang_mul, term = args}
	
	if args == "genus" or args == "species" or args then
		parent = "''" .. parent .. "''"
	end
	
	table.insert(ret, parent)
	
	-- Track missing taxonomic name
	parent = mw.title.new(args)
	
	if not (parent and parent.exists) then
		table.insert(categories, "Entries using missing taxonomic name (" .. args .. ")")
	end
	
	-- Vernacular name
	if args then
		table.insert(ret, " – ")
	    table.insert(ret, args)
	else
		table.insert(categories, "Taxonomic names needing vernacular names")
	end
	
	if not args then
		table.insert(ret, ".")
	end
	
	return table.concat(ret) .. require("Module:utilities").format_categories(categories, lang_mul)
end


return export