local export = {}
local m_utilities = require("Module:utilities")
local m_languages = require("Module:languages")
function export.coinage(frame)
local args = frame:getParent().args
local params = {
[1] = {required = true, default = "und"},
[2] = {required = true, default = "unknown"},
["in"] = {}, -- date: "in"
["w"] = {default = nil}, -- Wikipedia link target
["nationality"] = {}, -- nationality
["occupation"] = {list = true, default = nil},
["alt"] = {default = nil}, -- alt text
["nat"] = {},
["occ"] = {list = true, default = nil},
["sort"] = {},
["nobycat"] = {type = "boolean"},
["nocat"] = {type = "boolean"},
["nocap"] = {type = "boolean"},
["notext"] = {type = "boolean"},
}
args = require("Module:parameters").process(args, params)
local lang = m_languages.getByCode(args[1]) or m_languages.err(args[1], 1)
local coiner = args[2]
local wikilink = args["w"] or coiner
local date = args["in"]
local result = ""
if not args["notext"] then
result = result .. " [[Phụ lục:Từ điển thuật ngữ#từ được đặt ra|" .. (args["nocap"] and "đ" or "Đ") .. "ặt ra]] "
end
local nationality = args["nationality"] or args["nat"] or nil
local occupation = args["occupation"]
if not occupation or #occupation < 1 then
occupation = args["occ"]
end
local nat_occ = ""
if nationality then
nat_occ = nat_occ .. nationality .. " "
end
if occupation and #occupation > 0 then
nat_occ = mw.text.listToText(occupation) .. " " .. nat_occ
end
-- use Wikidata to get label and Wikipedia link if coiner looks like a QID
if mw.wikibase and mw.ustring.match(coiner, "^Q%d+$") then
wikilink = mw.wikibase.sitelink(coiner, 'viwiki')
if nat_occ == "" then
-- fall back to Wikidata description if nothing specified
nat_occ = mw.wikibase.getDescription(coiner) or ""
end
coiner = mw.wikibase.getLabel(coiner)
end
local coiner_text = args["alt"] or coiner
local link = coiner_text
if wikilink and wikilink ~= "-" then
-- create Wikipedia link
-- default to title, or interpret as language code if a colon is present
if mw.ustring.match(wikilink, ":$") then
-- just language code and a colon?
wikilink = wikilink .. coiner
end
link = "[[w:" .. wikilink .. "|" .. coiner_text .. "]]"
end
result = nat_occ .. " " .. link .. result
if date then
if mw.ustring.match(date, "^[0-9]+$") -- year only
or mw.ustring.match(date, "^[A-Z]") -- month and year?
then
result = result .. " vào " .. date
else -- assume alternative preposition was given
result = result .. " " .. date
end
end
local categories = {}
if not args["nocat"] then
if not args["nobycat"] then
table.insert(categories, "Từ " .. lang:getCanonicalName() .. " được " .. coiner .. " đặt ra")
end
table.insert(categories, "Từ được đặt ra trong " .. lang:getCanonicalName())
end
categories = m_utilities.format_categories(categories, lang, args["sort"])
return result .. categories
end
return export
