Module:links: difference between revisions
using output table makes addition of categories a little simpler and clearer |
this was adding a space to links without annotations |
||
Line 318: | Line 318: | ||
if #annotations > 0 then |
if #annotations > 0 then |
||
table.insert(output, mark(table.concat(annotations, ", "), "annotations")) |
table.insert(output, " " .. mark(table.concat(annotations, ", "), "annotations")) |
||
end |
end |
||
Line 422: | Line 422: | ||
annotations = export.format_link_annotations(terminfo, face) |
annotations = export.format_link_annotations(terminfo, face) |
||
table.insert(output, link |
table.insert(output, link .. annotations) |
||
if mantrFix then |
if mantrFix then |
Revision as of 19:18, 11 March 2017
- The following documentation is located at Module:links/documentation. [edit]
- Useful links: subpage list • links • transclusions • testcases • sandbox
This module provides many useful utility functions for creating and processing wikilinks within Wiktionary. It is used by the linking templates {{m}}
and {{l}}
through the functions in Module:links/templates.
Functions
export.getLinkPage
function export.getLinkPage(target, lang)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
export.format_link_annotations
function export.format_link_annotations(terminfo, face)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
export.full_link
function export.full_link(term, alt, lang, sc, face, id, annotations, allowSelfLink, dontLinkRecons)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
export.full_link_new
function export.full_link_new(terminfo, face, allowSelfLink, dontLinkRecons)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
export.language_link
function export.language_link(text, alt, lang, id, allowSelfLink)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
export.remove_links
function export.remove_links(text)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
export.english_links
function export.english_links(text)
This function lacks documentation. Please add a description of its usages, inputs and outputs, or its difference from similar functions, or make it local to remove it from the function list.
Changes
- 2013-09-13: Category:Terms with manual transliterations different from the automated ones and Category:Terms with redundant transliterations or their subcategories begin to be added
- 2018-03-08:
ts
(transcription) annotation added; accepted as field of table in first parameter offull_link
and as field of table in second parameter offormat_link_annotations
, and as second parameter (itemType
) ofmark
Contents of data module
- Unsupported titles
- ] [
- &
- λοπαδοτεμαχοσελαχογαλεοκρανιολειψανοδριμυποτριμματοσιλφιοκαραβομελιτοκατακεχυμενοκιχλεπικοσσυφοφαττοπεριστεραλεκτρυονοπτοκεφαλλιοκιγκλοπελειολαγῳοσιραιοβαφητραγανοπτερύγων
- กรุงเทพมหานคร อมรรัตนโกสินทร์ มหินทรายุธยา มหาดิลกภพ นพรัตนราชธานีบูรีรมย์ อุดมราชนิเวศน์มหาสถาน อมรพิมานอวตารสถิต สักกะทัตติยวิษณุกรรมประสิทธิ์
- ] [
- ] [
local export = {}
--TODO: move to [[Module:languages]]
local override_translit = {
["ab"] = true,
["abq"] = true,
["ady"] = true,
["av"] = true,
["axm"] = true,
["ba"] = true,
["bo"] = true,
["bua"] = true,
["ce"] = true,
["chm"] = true,
["cv"] = true,
["dar"] = true,
["dv"] = true,
["dz"] = true,
["el"] = true,
["gmy"] = true,
["grc"] = true,
["hy"] = true,
["inh"] = true,
["iu"] = true,
["ka"] = true,
["kk"] = true,
--["ko"] = true,
["kbd"] = true,
["kca"] = true,
["kjh"] = true,
["kjj"] = true,
["kn"] = true,
["koi"] = true,
["kpv"] = true,
["ky"] = true,
["kv"] = true,
--["lo"] = true,
["lbe"] = true,
["lez"] = true,
["lzz"] = true,
["mdf"] = true,
["ml"] = true,
["mn"] = true,
["my"] = true,
["myv"] = true,
["nog"] = true,
["oge"] = true,
["os"] = true,
["sah"] = true,
["si"] = true,
["sgh"] = true,
["sva"] = true,
["ta"] = true,
["tab"] = true,
["te"] = true,
["tg"] = true,
["tt"] = true,
["tyv"] = true,
["ug"] = true,
["udi"] = true,
["udm"] = true,
["xal"] = true,
["xcl"] = true,
["xmf"] = true,
}
local ignore_cap = {
["ko"] = true,
}
local phonetic_extraction = {
["th"] = "Module:th"
}
local pos_tags = {
["a"] = "adjective",
["adv"] = "adverb",
["int"] = "interjection",
["n"] = "noun",
["pron"] = "pronoun",
["v"] = "verb",
["vi"] = "intransitive verb",
["vt"] = "transitive verb",
["vti"] = "transitive and intransitive verb",
}
function export.getLinkPage(target, lang)
-- If the link contains unexpanded template parameters, then don't create a link.
if target:find("{{{", nil, true) then
return nil
end
if target:find("^:") or target:find("^w:") or target:find("^wikipedia:") then
return target
end
-- Remove diacritics from the page name
target = lang:makeEntryName(target)
-- Link to appendix for reconstructed terms and terms in appendix-only languages
if target:find("^*.") then
if lang:getCode() == "und" then
return nil
end
target = "Reconstruction:" .. lang:getCanonicalName() .. "/" .. mw.ustring.sub(target, 2)
elseif lang:getType() == "reconstructed" then
error("The specified language " .. lang:getCanonicalName() .. " is unattested, while the given word is not marked with '*' to indicate that it is reconstructed")
elseif lang:getType() == "appendix-constructed" then
target = "Appendix:" .. lang:getCanonicalName() .. "/" .. target
end
return target
end
-- Make a language-specific link from given link's parts
local function makeLangLink(link, lang, id, allowSelfLink)
-- If there is no display form, then create a default one
if not link.display then
link.display = link.target
-- Strip the prefix from the displayed form
-- TODO: other interwiki links?
if link.display:find("^:") then
link.display = link.display:gsub("^:", "")
elseif link.display:find("^w:") then
link.display = link.display:gsub("^w:", "")
elseif link.display:find("^wikipedia:") then
link.display = link.display:gsub("^wikipedia:", "")
end
end
-- Process the target
link.target = export.getLinkPage(link.target, lang)
if not link.target then
return link.display
end
-- If the target is the same as the current page, then return a "self-link" like the software does
if not allowSelfLink and not id and (link.target == mw.title.getCurrentTitle().prefixedText or link.target == ":" .. mw.title.getCurrentTitle().prefixedText) then
return "<strong class=\"selflink\">" .. link.display .. "</strong>"
end
-- Add fragment
-- Do not add a section link to "Undetermined", as such sections do not exist and are invalid.
-- TabbedLanguages handles links without a section by linking to the "last visited" section,
-- but adding "Undetermined" would break that feature.
if not (link.target:find("^w:") or link.target:find("^wikipedia:")) then
if link.fragment or mw.ustring.find(link.target, "#$") then
require("Module:debug").track("links/fragment")
require("Module:debug").track("links/fragment/" .. lang:getCode())
end
if not link.fragment and lang:getCode() ~= "und" then
if id then
link.fragment = lang:getCanonicalName() .. "-" .. id
elseif not link.target:find("^Appendix:") and not link.target:find("^Reconstruction:") then
link.fragment = lang:getCanonicalName()
end
end
end
-- This allows linking to pages like [[sms:a]] without it being treated weirdly.
link.target = mw.ustring.gsub(link.target, ":", ":")
return "[[" .. link.target .. (link.fragment and "#" .. link.fragment or "") .. "|" .. link.display .. "]]"
end
-- Split a link into its parts
local function parseLink(linktext)
local link = {target = linktext}
local found, _, first, second
found, _, first, second = mw.ustring.find(link.target, "^([^|]+)|(.+)$")
if found then
link.target = first
link.display = second
else
link.display = link.target
end
found, _, first, second = mw.ustring.find(link.target, "^(.+)#(.+)$")
if found then
link.target = first
link.fragment = second
end
return link
end
-- Creates a basic wikilink to the given term. If the text already contains
-- links, these are replaced with links to the correct section.
local function language_link2(terminfo, allowSelfLink, dontLinkRecons)
local text = terminfo.term
if ignore_cap[terminfo.lang:getCode()] and text then
text = mw.ustring.gsub(text, "%^", "")
end
-- If the text begins with * and another character,
-- then act as if each link begins with *
local allReconstructed = false
if text:find("^*.") then
allReconstructed = true
end
-- Do we have embedded wikilinks?
if text:find("[[", nil, true) then
if terminfo.id then
require("Module:debug").track("links/bad id")
end
-- Begins and ends with a wikilink tag
if mw.ustring.find(text, "^%[%[(.+)%]%]$") then
-- There are no [ ] in between.
-- This makes the wikilink tag redundant.
if mw.ustring.find(text, "^%[%[[^%[%]]+%]%]$") then
require("Module:debug").track("links/redundant wikilink")
else
local temp = mw.ustring.gsub(text, "^%[%[(.+)%]%]$", "%1")
temp = mw.ustring.gsub(temp, "%]%], %[%[", "|")
if not mw.ustring.find(temp, "[%[%]]") then
require("Module:debug").track("links/list")
end
end
end
text = mw.ustring.gsub(text, "%[%[([^%]]+)%]%]",
function(linktext)
local link = parseLink(linktext)
if allReconstructed then
link.target = "*" .. link.target
end
return makeLangLink(link, terminfo.lang, terminfo.id, allowSelfLink, dontLinkRecons)
end
)
-- Remove the extra * at the beginning if it's immediately followed
-- by a link whose display begins with * too
if allReconstructed then
text = mw.ustring.gsub(text, "^%*%[%[([^|%]]+)|%*", "[[%1|*")
end
else
-- There is no embedded wikilink, make a link using the parameters.
text = makeLangLink({target = text, display = terminfo.alt}, terminfo.lang, terminfo.id, allowSelfLink, dontLinkRecons)
end
return text
end
local function mark(text, itemType, face)
local tag = { "", "" }
if itemType == "gloss" then
tag = { '<span class="mention-gloss-double-quote">“</span><span class="mention-gloss">', '</span><span class="mention-gloss-double-quote">”</span>' }
elseif itemType == "tr" then
if face == "term" then
tag = { '<span lang="" class="tr mention-tr">', '</span>' }
else
tag = { '<span lang="" class="tr">', '</span>' }
end
elseif itemType == "annotations" then
tag = { '<span class="mention-gloss-paren">(</span>', '<span class="mention-gloss-paren">)</span>' }
end
if type(text) == "string" then
return tag[1] .. text .. tag[2]
else
return ""
end
end
-- Format the annotations (things following the linked term)
function export.format_link_annotations(terminfo, face)
local output = {}
-- Interwiki link
if terminfo.interwiki then
table.insert(output, terminfo.interwiki)
end
-- Genders
if terminfo.genders and #terminfo.genders > 0 then
local m_gen = require("Module:gender and number")
table.insert(output, " " .. m_gen.format_list(terminfo.genders, terminfo.lang))
end
local annotations = {}
-- Transliteration
if terminfo.tr then
table.insert(annotations, mark(terminfo.tr, "tr", face))
end
-- Gloss/translation
if terminfo.gloss then
table.insert(annotations, mark(terminfo.gloss, "gloss"))
end
-- Part of speech
if terminfo.pos then
table.insert(annotations, pos_tags[terminfo.pos] or terminfo.pos)
end
-- Literal/sum-of-parts meaning
if terminfo.lit then
table.insert(annotations, "literally " .. mark(terminfo.lit, "gloss"))
end
if #annotations > 0 then
table.insert(output, " " .. mark(table.concat(annotations, ", "), "annotations"))
end
return table.concat(output)
end
function export.full_link(term, alt, lang, sc, face, id, annotations, allowSelfLink, dontLinkRecons)
--[[ If term is a table, all arguments in that table are removed from the list above, and
it is as if the list of arguments were . ]]
if type(term) == "table" then
terminfo = term
face = alt
allowSelfLink = lang
dontLinkRecons = sc
else
require("Module:debug").track("links/term not table")
terminfo = {
term = term,
alt = alt,
lang = lang,
sc = sc,
id = id,
genders = annotations and annotations.genders,
tr = annotations and annotations.tr,
gloss = annotations and annotations.gloss,
pos = annotations and annotations.pos,
lit = annotations and annotations.lit,
interwiki = annotations and annotations.interwiki
}
end
return export.full_link_new(terminfo, face, allowSelfLink, dontLinkRecons)
end
-- A version of {{l}} or {{m}} that can be called from other modules too
function export.full_link_new(terminfo, face, allowSelfLink, dontLinkRecons)
-- Create the link
local output = {}
local link, annotations
local m_utilities = require("Module:utilities")
local m_scriptutils = require("Module:script utilities")
-- Is there any text to show?
if (terminfo.term or terminfo.alt) then
-- Try to detect the script if it was not provided
if not terminfo.sc then
terminfo.sc = require("Module:scripts").findBestScript(terminfo.alt or terminfo.term, terminfo.lang)
end
-- Only make a link if the term has been given, otherwise just show the alt text without a link
link = m_scriptutils.tag_text(terminfo.term and language_link2(terminfo, allowSelfLink, dontLinkRecons) or terminfo.alt, terminfo.lang, terminfo.sc, face)
else
--[[ No term to show.
Is there at least a transliteration we can work from? ]]
link = m_scriptutils.request_script(terminfo.lang, terminfo.sc)
if link == "" or not terminfo.tr or terminfo.tr == "-" then
-- No link to show, and no transliteration either. Show a term request.
local category = ""
if mw.title.getCurrentTitle().nsText ~= "Template" then
category = "[[Category:" .. terminfo.lang:getCanonicalName() .. " term requests]]"
end
link = "<small>[Term?]</small>" .. category
end
end
local mantrFix, redtrFix
local manual_tr = ""
if terminfo.tr == "" or terminfo.tr == "-" then
terminfo.tr = nil
elseif phonetic_extraction[terminfo.lang:getCode()] then
local m_phonetic = require(phonetic_extraction[terminfo.lang:getCode()])
terminfo.tr = terminfo.tr or m_phonetic.getTranslit(export.remove_links(terminfo.term))
elseif (terminfo.term or terminfo.alt) and not ((terminfo.sc:getCode():find("Latn", nil, true)) or terminfo.sc:getCode() == "Latinx") and (not terminfo.tr or override_translit[terminfo.lang:getCode()]) then
-- Try to generate a transliteration if necessary
local automated_tr = terminfo.lang:transliterate(export.remove_links(terminfo.alt or terminfo.term), terminfo.sc)
if automated_tr then
if terminfo.tr ~= automated_tr then
if terminfo.tr then
manual_tr = terminfo.tr
mantrFix = true
end
terminfo.tr = automated_tr
else
redtrFix = true
end
end
end
-- Link to the transliteration entry for languages that require this
if terminfo.tr and terminfo.lang:link_tr() then
terminfo.tr = language_link2({lang = terminfo.lang, term = terminfo.tr})
end
annotations = export.format_link_annotations(terminfo, face)
table.insert(output, link .. annotations)
if mantrFix then
table.insert(output, "[[Category:Terms with manual transliterations different from the automated ones]][[Category:Terms with manual transliterations different from the automated ones/" .. terminfo.lang:getCode() .. "]]")
end
if redtrFix then
table.insert(output, "[[Category:Terms with redundant transliterations]][[Category:Terms with redundant transliterations/" .. terminfo.lang:getCode() .. "]]")
end
return table.concat(output)
end
function export.language_link(text, alt, lang, id, allowSelfLink)
local terminfo = text
if type(terminfo) == "table" then
allowSelfLink = alt
else
terminfo = {term = text, alt = alt, lang = lang, id = id}
require("Module:debug").track("links/term not table")
end
return language_link2(terminfo, allowSelfLink)
end
-- Strips all square brackets out or replaces them.
function export.remove_links(text)
if type(text) == "table" then text = text.args[1] end; if not text then text = "" end
text = text:gsub("%[%[Category:[^|%]]-|?[^|%]]-%]%]", "")
text = text:gsub("%[%[[^|%]]-|", "")
text = text:gsub("%[%[", "")
text = text:gsub("%]%]", "")
return text
end
function export.english_links(text)
local lang = require("Module:languages").getByCode("en")
text = mw.ustring.gsub(text, "%[%[([^%]]+)%]%]",
function(linktext)
local link = parseLink(linktext)
return makeLangLink(link, lang, nil, true, false)
end
)
return text
end
return export