local labels = {}
local raw_categories = {}
local handlers = {}
-----------------------------------------------------------------------------
-- --
-- LABELS --
-- --
-----------------------------------------------------------------------------
labels["alliterative compounds"] = {
description = "{{{langname}}} noun phrases composed of two or more stems that alliterate.",
parents = {"คำประสม", "alliterative phrases"},
}
labels["คำประสมตรงข้าม"] = {
description = "{{{langname}}} compounds in which one part is an antonym of the other.",
parents = {"คำประสมทวันทวะ", sort = "คำตรงข้าม"},
}
labels["antonymous compounds"] = labels["คำประสมตรงข้าม"]
labels["คำประสมพหุวรีหิ"] = {
description = "{{{langname}}} compounds in which the first part (A) modifies the second (B), and whose meaning follows a [[metonymic]] pattern: “<person> having a B that is A.”",
parents = {"คำประสม", "exocentric compounds"},
}
labels["bahuvrihi compounds"] = labels["คำประสมพหุวรีหิ"]
-- Add "compound POS" categories for various parts of speech.
local compound_poses = {
"คำคุณศัพท์",
"คำกริยาวิเศษณ์",
"คำสันธาน",
"คำกำหนด",
"คำอุทาน",
"คำนาม",
"เลข",
"คำอนุภาค",
"คำปัจฉบท",
"อุปสรรค",
"คำบุพบท",
"คำสรรพนาม",
"คำวิสามานยนาม",
"ปัจจัย",
"คำกริยา",
}
for _, pos in ipairs(compound_poses) do
labels[pos .. "ประสม"] = {
description = "{{{langname}}} " .. pos .. " composed of two or more stems.",
parents = {{name = "คำประสม", sort = " "}, pos},
}
end
labels["compound determinatives"] = {
description = "{{{langname}}} determinatives composed of two or more stems.",
parents = {"คำประสม", "คำกำหนด"},
}
labels["คำประสม"] = {
description = "{{{langname}}} terms composed of two or more stems.",
umbrella_parents = "หมวดหมู่ย่อยของศัพท์แบ่งตามรากศัพท์แบ่งตามภาษา",
parents = {"ศัพท์แบ่งตามรากศัพท์"},
}
labels["compound terms"] = labels["คำประสม"]
labels["คำประสมทวันทวะ"] = {
description = "{{{langname}}} terms composed of two or more stems whose stems could be connected by an 'and'.",
parents = {"คำประสม"},
}
labels["dvandva compounds"] = labels["คำประสมทวันทวะ"]
labels["endocentric compounds"] = {
description = "{{{langname}}} terms composed of two or more stems, one of which is the [[w:head (linguistics)|head]] of that compound.",
parents = {"คำประสม"},
}
labels["endocentric noun-noun compounds"] = {
description = "{{{langname}}} terms composed of two or more stems, one of which is the [[w:head (linguistics)|head]] of that compound.",
breadcrumb = "นาม-นาม",
parents = {"endocentric compounds", "คำประสม"},
}
labels["endocentric verb-noun compounds"] = {
description = "{{{langname}}} compounds in which the first element is a verbal stem, the second a nominal stem and the head of the compound.",
breadcrumb = "กริยา-นาม",
parents = {"endocentric compounds", "verb-noun compounds"},
}
labels["exocentric compounds"] = {
description = "{{{langname}}} terms composed of two or more stems, none of which is the [[w:head (linguistics)|head]] of that compound.",
parents = {"คำประสม"},
}
labels["exocentric verb-noun compounds"] = {
description = "{{{langname}}} compounds in which the first element is a transitive verb, the second a noun functioning as its direct object, and whose referent is the person or thing doing the action.",
breadcrumb = "กริยา-นาม",
parents = {"exocentric compounds", "verb-noun compounds"},
}
labels["คำประสมกรรมธารยะ"] = {
description = "{{{langname}}} terms composed of two or more stems in which the main stem determines the case endings.",
parents = {"คำประสมตัตปุรุษะ"},
}
labels["karmadharaya compounds"] = labels["คำประสมกรรมธารยะ"]
labels["คำประสมอิตเรตรทวันทวะ"] = {
description = "{{{langname}}} terms composed of two or more stems whose stems could be connected by an 'and'.",
breadcrumb = "อิตเรตะ",
parents = {"คำประสมทวันทวะ"},
}
labels["itaretara dvandva compounds"] = labels["คำประสมอิตเรตรทวันทวะ"]
labels["คำประสมสัมผัส"] = {
description = "{{{langname}}} noun phrases composed of two or more stems that rhyme.",
parents = {"คำประสม", "rhyming phrases"},
}
labels["rhyming compounds"] = labels["คำประสมสัมผัส"]
labels["คำประสมสมาหารทวันทวะ"] = {
description = "{{{langname}}} terms composed of two or more stems whose stems could be connected by an 'and'.",
breadcrumb = "สมาหาระ",
parents = {"คำประสมทวันทวะ"},
}
labels["samahara dvandva compounds"] = labels["คำประสมสมาหารทวันทวะ"]
labels["shitgibbons"] = {
description = "{{{langname}}} terms that consist of a single-syllable [[expletive]] followed by a two-syllable [[trochee]] that serves as a [[nominalizer]] or [[intensifier]].",
parents = {"endocentric compounds"},
}
labels["คำประสมพ้องความ"] = {
description = "{{{langname}}} compounds in which one part is a synonym of the other.",
parents = {"คำประสมทวันทวะ", sort = "คำพ้องความ"},
}
labels["synonymous compounds"] = labels["คำประสมพ้องความ"]
labels["คำประสมตัตปุรุษะ"] = {
description = "{{{langname}}} terms composed of two or more stems",
parents = {"คำประสม"},
}
labels["tatpurusa compounds"] = labels["คำประสมตัตปุรุษะ"]
labels["คำประสมกริยา-นาม"] = {
description = "{{{langname}}} compounds in which the first element is a transitive verb, the second a noun functioning as its direct object, and whose referent is the person or thing doing the action, or an adjective describing such a person or thing.",
parents = {"คำประสมกริยา-กรรม"},
}
labels["verb-noun compounds"] = labels["คำประสมกริยา-นาม"]
labels["คำประสมกริยา-กรรม"] = {
description = "{{{langname}}} compounds in which the first element is a transitive verb, the second a term (usually but not always a noun) functioning as its (normally direct) object, and whose referent is the person or thing doing the action, or an adjective describing such a person or thing.",
additional = "Examples in English are {{m|en|pickpocket|lit=someone who picks pockets}} and {{m|en|catch-all|lit=something that catches everything}}.",
parents = {"คำประสม"},
}
labels["verb-object compounds"] = labels["คำประสมกริยา-กรรม"]
labels["คำประสมกริยา-กริยา"] = {
description = "{{{langname}}} compounds composed of two or more verbs in apposition, often either synonyms or antonyms, and whose referent refers to the result of performing those actions.",
parents = {"คำประสม"},
}
labels["verb-verb compounds"] = labels["คำประสมกริยา-กริยา"]
labels["vrddhi derivatives"] = {
description = "{{{langname}}} terms derived from a Proto-Indo-European root by the process of [[w:vṛddhi|vṛddhi]] derivation.",
parents = {"ศัพท์แบ่งตามรากศัพท์"},
}
labels["vrddhi gerundives"] = {
description = "{{{langname}}} [[gerundive]]s derived from a Proto-Indo-European root by the process of [[w:vṛddhi|vṛddhi]] derivation.",
parents = {"vrddhi derivatives"},
}
labels["คำประสมวยาธิกรณะ"] = {
description = "{{{langname}}} terms composed of two or more stems in which the non-main stem determines the case endings.",
parents = {"คำประสมตัตปุรุษะ"},
}
labels["vyadhikarana compounds"] = labels["คำประสมวยาธิกรณะ"]
for _, fixtype in ipairs({"หน่วยคำเติมคร่อม", "อาคม", "หน่วยคำเติมเชื่อม", "อุปสรรค", "ปัจจัย",}) do
labels["ศัพท์แบ่งตาม" .. fixtype] = {
description = "{{{langname}}} terms categorized by their " .. fixtype,
umbrella_parents = "หมวดหมู่ย่อยของศัพท์แบ่งตามรากศัพท์แบ่งตามภาษา",
parents = {{name = "ศัพท์แบ่งตามรากศัพท์", sort = fixtype}, fixtype},
}
end
-- Add 'umbrella_parents' key if not already present.
for key, data in pairs(labels) do
-- NOTE: umbrella.parents overrides umbrella_parents if both are given.
if not data.umbrella_parents then
data.umbrella_parents = "ชนิดของคำประสมแบ่งตามภาษา"
end
end
-----------------------------------------------------------------------------
-- --
-- RAW CATEGORIES --
-- --
-----------------------------------------------------------------------------
raw_categories["ชนิดของคำประสมแบ่งตามภาษา"] = {
description = "Umbrella categories covering topics related to types of compound terms.",
additional = "{{{umbrella_meta_msg}}}",
parents = {
"หมวดหมู่ใหญ่รวมหัวข้อ",
{name = "คำประสม", is_label = true, sort = " "},
{name = "หมวดหมู่ย่อยของศัพท์แบ่งตามรากศัพท์แบ่งตามภาษา", sort = " "},
},
}
-----------------------------------------------------------------------------
-- --
-- HANDLERS --
-- --
-----------------------------------------------------------------------------
-----------------------------------------------------------------------------
------------------------------ Affix handlers -------------------------------
-----------------------------------------------------------------------------
table.insert(handlers, function(data)
--local labelpref, pos, affixtype, term_and_id = data.label:match("^(([a-z -]+) ([a-z]+fix)ed with )(.+)$")
local labelpref, pos, affixtype, term_and_id = data.label:match("^(([ก-๎ -]+)ที่เติม([อุปสรคัจยหน่วำเติม]+) )(.+)$")
if affixtype then
local term, id = term_and_id:match("^(.+) %(([^()]+)%)$")
term = term or term_and_id
-- Convert term/alt into affixes if needed
local desc = {
["อุปสรรค"] = "beginning with the prefix",
["ปัจจัย"] = "ending with the suffix",
["หน่วยคำเติมคร่อม"] = "bookended with the circumfix",
["อาคม"] = "spliced with the infix",
["หน่วยคำเติมเชื่อม"] = "joined with the interfix",
-- Transfixes not supported currently.
-- ["หน่วยคำเติมแทรก"] = "patterned with the transfix",
}
if not desc[affixtype] then
return nil
end
-- Here, {LANG} is replaced with the actual language, {TERM_AND_ID} with the actual term (or with 'TERM<id:ID>'
-- if there is an ID), {BASE} with '<var>base</var>', {BASE2} with '<var>base2</var>', {BASE_EXPL} with an
-- explanation of what "base" means, {BASE_BASE2_EXPL} with an explanation of what "base" and "base2" mean, and
-- {POS} with '|pos=POS' if there is a `pos` other than "terms", otherwise a blank string.
local what_categorizes = {
["อุปสรรค"] = "{{tl|af|{LANG}|{TERM_AND_ID}|{BASE}{POS}}} or {{tl|affix|{LANG}|{TERM_AND_ID}|{BASE}{POS}}} (or the more specific and less-preferred equivalents {{tl|pre}} or {{tl|prefix}}), where {BASE_EXPL}",
["ปัจจัย"] = "{{tl|af|{LANG}|{BASE}|{TERM_AND_ID}{POS}}} or {{tl|affix|{LANG}|{BASE}|{TERM_AND_ID}{POS}}} (or the more specific and less-preferred equivalents {{tl|suf}} or {{tl|suffix}}), where {BASE_EXPL}",
["หน่วยคำเติมคร่อม"] = "{{tl|af|{LANG}|{BASE}|{TERM_AND_ID}{POS}}} or {{tl|affix|{LANG}|{BASE}|{TERM_AND_ID}{POS}}}, where {BASE_EXPL}",
["อาคม"] = "{{tl|infix|{LANG}|{BASE}|{TERM_AND_ID}{POS}}}, where {BASE_EXPL}",
["หน่วยคำเติมเชื่อม"] = "{{tl|af|{LANG}|{BASE}|{TERM_AND_ID}{POS}|{BASE2}}} or {{tl|affix|{LANG}|{BASE}|{TERM_AND_ID}|{BASE2}{POS}}}, where {BASE_BASE2_EXPL}",
}
local params = {
["alt"] = {},
["sc"] = {},
["sort"] = {},
["tr"] = {},
["ts"] = {},
}
local args = require("Module:parameters").process(data.args, params, nil, "category tree/poscatboiler/data/ศัพท์แบ่งตามรากศัพท์")
local sc = data.sc or args.sc and require("Module:scripts").getByCode(args.sc, "sc") or nil
local m_affix = require("Module:affix")
-- Call make_affix to add display hyphens if they're not already present.
local _, display_term, lookup_term = m_affix.make_affix(term, data.lang, sc, affixtype, nil, true)
local _, display_alt = m_affix.make_affix(args.alt, data.lang, sc, affixtype)
local _, display_tr = m_affix.make_affix(args.tr, data.lang, require("Module:scripts").getByCode("Latn"), affixtype)
local _, display_ts = m_affix.make_affix(args.ts, data.lang, require("Module:scripts").getByCode("Latn"), affixtype)
local m_script_utilities = require("Module:script utilities")
local id_text = id and " (" .. id .. ")" or ""
-- Compute parents.
local parents = {}
if id then
if pos == "คำ" then
-- don't allow formerly-named categories with "words"
return nil
end
if pos == "ศัพท์" then
table.insert(parents, {name = labelpref .. term, sort = id, args = args})
else
table.insert(parents, {name = "ศัพท์ที่เติม" .. affixtype .. " " .. term_and_id, sort = id .. ", " .. pos, args = args})
table.insert(parents, {name = labelpref .. term, sort = id, args = args})
end
elseif pos == "คำ" then
-- don't allow formerly-named categories with "words"
return nil
elseif pos ~= "ศัพท์" then
table.insert(parents, {name = "ศัพท์ที่เติม" .. affixtype .. " " .. term, sort = pos, args = args})
end
table.insert(parents, {name = "ศัพท์แบ่งตาม" .. affixtype, sort = (data.lang:makeSortKey((data.lang:makeEntryName(args.sort or term))))})
-- If other affixes are mapped to this one, show them.
local additional
if data.lang then
local langcode = data.lang:getCode()
if m_affix.langs_with_lang_specific_data[langcode] then
local langdata = mw.loadData(m_affix.affix_lang_data_module_prefix .. langcode)
local variants = {}
if langdata.affix_mappings then
for variant, canonical in pairs(langdata.affix_mappings) do
-- Above, we converted the stripped link term as we received it to the lookup form, so we
-- can look up the variants that are mapped to this term. Once we find them, map them to
-- display form.
local is_variant = false
if type(canonical) == "table" then
for _, canonical_v in pairs(canonical) do
if canonical_v == lookup_term then
is_variant = true
break
end
end
else
is_variant = canonical == lookup_term
end
if is_variant then
local _, display_variant = m_affix.make_affix(variant, data.lang, sc, affixtype)
table.insert(variants, "{{m|" .. langcode .. "|" .. display_variant .. "}}")
end
end
if #variants > 0 then
table.sort(variants)
additional = ("This category also includes terms %sed with %s."):format(affixtype,
require("Module:table").serialCommaJoin(variants))
end
end
end
end
if data.lang then
local what_categorizes_msg = what_categorizes[affixtype]
if not what_categorizes_msg then
error(("Internal error: No what_categorizes value for affixtype '%s' for label '%s', lang '%s'"):
format(affixtype, data.label, data.lang:getCode()))
end
what_categorizes_msg = "Terms are placed in this category using " .. (what_categorizes_msg
:gsub("{LANG}", data.lang:getCode())
:gsub("{TERM_AND_ID}", require("Module:pattern utilities").replacement_escape(
id and ("%s<id:%s>"):format(term, id) or term))
:gsub("{POS}", require("Module:pattern utilities").replacement_escape(
pos == "terms" and "" or ("|pos=%s"):format(pos)))
:gsub("{BASE}", "<var>base</var>")
:gsub("{BASE2}", "<var>base2</var>")
:gsub("{BASE_EXPL}", "<code><var>base</var></code> is the base lemma from which this term is derived")
:gsub("{BASE_BASE2_EXPL}", "<code><var>base</var></code> and <code><var>base2</var></code> are the " ..
"base lemmas from which this term is derived")
) .. "."
if additional then
additional = additional .. "\n\n" .. what_categorizes_msg
else
additional = what_categorizes_msg
end
end
return {
description = "{{{langname}}} " .. pos .. " " .. desc[affixtype] .. " " .. require("Module:links").full_link({
lang = data.lang, term = display_term, alt = display_alt, sc = sc, id = id, tr = display_tr, ts = display_ts}, "term") .. ".",
additional = additional,
breadcrumb = pos == "ศัพท์" and m_script_utilities.tag_text(display_alt or display_term, data.lang, sc, "term") .. id_text or pos,
displaytitle = "{{{langname}}} " .. labelpref .. m_script_utilities.tag_text(term, data.lang, sc, "term") .. id_text,
parents = parents,
umbrella = false,
}, true -- true = args handled
end
end)
return {LABELS = labels, RAW_CATEGORIES = raw_categories, HANDLERS = handlers}
