Modul:Wd-norsk: Forskjell mellom sideversjoner

Fra Wikisida.no
Hopp til navigering Hopp til søk
mIngen redigeringsforklaring
m (Én sideversjon ble importert)
 
(46 mellomliggende versjoner av 9 brukere er ikke vist)
Linje 5: Linje 5:
local i18n
local i18n


function loadSubmodules(frame)
local function loadI18n(aliasesP, frame)
local title
local title

if frame then
if frame then
-- current module invoked by page/template, get its title from frame
-- current module invoked by page/template, get its title from frame
Linje 15: Linje 15:
title = arg
title = arg
end
end

if not i18n then
i18n = i18n or require(title .. "/i18n")
p.aliasesP = p.aliasesP or mw.loadData(title .. "/aliasesP")
i18n = require(title .. "/i18n").init(aliasesP)
end
end
end


Linje 61: Linje 62:


p.args = {
p.args = {
eid = "eid"
eid = "eid",
page = "side",
date = "dato",
max = "maks",
min = "min",
round = "avrund"
}

p.numberValue = {
max = 0,
min = 0
}

local aliasesP = {
coord = "P625",
-----------------------
image = "P18",
author = "P50",
publisher = "P123",
importedFrom = "P143",
statedIn = "P248",
pages = "P304",
language = "P407",
hasPart = "P527",
publicationDate = "P577",
startTime = "P580",
endTime = "P582",
chapter = "P792",
retrieved = "P813",
referenceURL = "P854",
sectionVerseOrParagraph = "P958",
archiveURL = "P1065",
title = "P1476",
formatterURL = "P1630",
quote = "P1683",
shortName = "P1813",
definingFormula = "P2534",
archiveDate = "P2960",
inferredFrom = "P3452",
typeOfReference = "P3865",
column = "P3903"
}
}


Linje 116: Linje 157:


local Config = {}
local Config = {}
Config.__index = Config


-- allows for recursive calls
-- allows for recursive calls
function Config.new()
function Config:new()
local cfg = {}
local cfg = {}
setmetatable(cfg, Config)
setmetatable(cfg, self)
self.__index = self

cfg.separators = {
cfg.separators = {
-- single value objects wrapped in arrays so that we can pass by reference
-- single value objects wrapped in arrays so that we can pass by reference
Linje 131: Linje 172:
["punc"] = {copyTable(defaultSeparators["punc"])}
["punc"] = {copyTable(defaultSeparators["punc"])}
}
}

cfg.entity = nil
cfg.entity = nil
cfg.entityID = nil
cfg.entityID = nil
Linje 138: Linje 179:
cfg.qualifierIDs = {}
cfg.qualifierIDs = {}
cfg.qualifierIDsAndValues = {}
cfg.qualifierIDsAndValues = {}

cfg.bestRank = true
cfg.bestRank = true
cfg.ranks = {true, true, false} -- preferred = true, normal = true, deprecated = false
cfg.ranks = {true, true, false} -- preferred = true, normal = true, deprecated = false
Linje 144: Linje 185:
cfg.flagBest = false
cfg.flagBest = false
cfg.flagRank = false
cfg.flagRank = false

cfg.periods = {true, true, true} -- future = true, current = true, former = true
cfg.periods = {true, true, true} -- future = true, current = true, former = true
cfg.flagPeriod = false
cfg.flagPeriod = false
cfg.atDate = {parseDate(os.date('!%Y-%m-%d'))} -- today as {year, month, day}

cfg.mdyDate = false
cfg.mdyDate = false
cfg.singleClaim = false
cfg.singleClaim = false
Linje 153: Linje 195:
cfg.editable = false
cfg.editable = false
cfg.editAtEnd = false
cfg.editAtEnd = false

cfg.inSitelinks = false
cfg.inSitelinks = false

cfg.langCode = mw.language.getContentLanguage().code
cfg.langCode = mw.language.getContentLanguage().code
cfg.langName = mw.language.fetchLanguageName(cfg.langCode, cfg.langCode)
cfg.langName = mw.language.fetchLanguageName(cfg.langCode, cfg.langCode)
cfg.langObj = mw.language.new(cfg.langCode)
cfg.langObj = mw.language.new(cfg.langCode)

cfg.siteID = mw.wikibase.getGlobalSiteId()
-- somewhat reliable way of determining global site ID in the absence of a library function, targeting the Wikipedia project (i.e. appending "wiki")

cfg.siteID = (function() for i,v in pairs(mw.site.interwikiMap("local")) do if v.isCurrentWiki and i~="w" then return mw.ustring.gsub(i,"-","_").."wiki" end end end)()
cfg.states = {}
cfg.states = {}
cfg.states.qualifiersCount = 0
cfg.states.qualifiersCount = 0
cfg.curState = nil
cfg.curState = nil

cfg.prefetchedRefs = nil
cfg.prefetchedRefs = nil

return cfg
return cfg
end
end


local State = {}
local State = {}
State.__index = State


function State.new(cfg)
function State:new(cfg, type)
local stt = {}
local stt = {}
setmetatable(stt, State)
setmetatable(stt, self)
self.__index = self

stt.conf = cfg
stt.conf = cfg
stt.type = type

stt.results = {}
stt.results = {}

stt.parsedFormat = {}
stt.parsedFormat = {}
stt.separator = {}
stt.separator = {}
stt.movSeparator = {}
stt.movSeparator = {}
stt.puncMark = {}
stt.puncMark = {}

stt.linked = false
stt.linked = false
stt.rawValue = false
stt.rawValue = false
Linje 194: Linje 236:
stt.unitOnly = false
stt.unitOnly = false
stt.singleValue = false
stt.singleValue = false

return stt
return stt
end
end


function replaceAlias(id)
local function replaceAlias(id)
if p.aliasesP[id] then
if aliasesP[id] then
id = p.aliasesP[id]
id = aliasesP[id]
end
end

return id
return id
end
end


function errorText(code, param)
local function errorText(code, param)
local text = i18n["errors"][code]
local text = i18n["errors"][code]
if param then text = mw.ustring.gsub(text, "$1", param) end
if param then text = mw.ustring.gsub(text, "$1", param) end
Linje 212: Linje 254:
end
end


function throwError(errorMessage, param)
local function throwError(errorMessage, param)
error(errorText(errorMessage, param))
error(errorText(errorMessage, param))
end
end


function replaceDecimalMark(num)
local function replaceDecimalMark(num)
return mw.ustring.gsub(num, "[.]", i18n['numeric']['decimal-mark'], 1)
return mw.ustring.gsub(num, "[.]", i18n['numeric']['decimal-mark'], 1)
end
end


function padZeros(num, numDigits)
local function padZeros(num, numDigits)
local numZeros
local numZeros
local negative = false
local negative = false

if num < 0 then
if num < 0 then
negative = true
negative = true
num = num * -1
num = num * -1
end
end

num = tostring(num)
num = tostring(num)
numZeros = numDigits - num:len()
numZeros = numDigits - num:len()

for i = 1, numZeros do
for _ = 1, numZeros do
num = "0"..num
num = "0"..num
end
end

if negative then
if negative then
num = "-"..num
num = "-"..num
end
end

return num
return num
end
end


function replaceSpecialChar(chr)
local function replaceSpecialChar(chr)
if chr == '_' then
if chr == '_' then
-- replace underscores with spaces
-- replace underscores with spaces
Linje 252: Linje 294:
end
end


function replaceSpecialChars(str)
local function replaceSpecialChars(str)
local chr
local chr
local esc = false
local esc = false
local strOut = ""
local strOut = ""

for i = 1, #str do
for i = 1, #str do
chr = str:sub(i,i)
chr = str:sub(i,i)

if not esc then
if not esc then
if chr == '\\' then
if chr == '\\' then
Linje 271: Linje 313:
end
end
end
end

return strOut
return strOut
end
end


function buildWikilink(target, label)
local function buildWikilink(target, label)
if not label or target == label then
if not label or target == label then
return "[[" .. target .. "]]"
return "[[" .. target .. "]]"
Linje 289: Linje 331:
return nil
return nil
end
end

local tOut = {}
local tOut = {}

for i, v in pairs(tIn) do
for i, v in pairs(tIn) do
tOut[i] = v
tOut[i] = v
end
end

return tOut
return tOut
end
end
Linje 301: Linje 343:
-- used to merge output arrays together;
-- used to merge output arrays together;
-- note that it currently mutates the first input array
-- note that it currently mutates the first input array
function mergeArrays(a1, a2)
local function mergeArrays(a1, a2)
for i = 1, #a2 do
for i = 1, #a2 do
a1[#a1 + 1] = a2[i]
a1[#a1 + 1] = a2[i]
end
end

return a1
return a1
end
end


function split(str, del)
local function split(str, del)
local out = {}
local out = {}
local i, j = str:find(del)
local i, j = str:find(del)

if i and j then
if i and j then
out[1] = str:sub(1, i - 1)
out[1] = str:sub(1, i - 1)
Linje 319: Linje 361:
out[1] = str
out[1] = str
end
end

return out
return out
end
end


function parseWikidataURL(url)
local function parseWikidataURL(url)
local id
local id

if url:match('^http[s]?://') then
if url:match('^http[s]?://') then
id = split(url, "Q")
id = split(url, "Q")

if id[2] then
if id[2] then
return "Q" .. id[2]
return "Q" .. id[2]
end
end
end
end

return nil
return nil
end
end
Linje 339: Linje 381:
function parseDate(dateStr, precision)
function parseDate(dateStr, precision)
precision = precision or "d"
precision = precision or "d"

local i, j, index, ptr
local i, j, index, ptr
local parts = {nil, nil, nil}
local parts = {nil, nil, nil}

if dateStr == nil then
if dateStr == nil then
return parts[1], parts[2], parts[3] -- year, month, day
return parts[1], parts[2], parts[3] -- year, month, day
end
end

-- 'T' for snak values, '/' for outputs with '/Julian' attached
-- 'T' for snak values, '/' for outputs with '/Julian' attached
i, j = dateStr:find("[T/]")
i, j = dateStr:find("[T/]")

if i then
if i then
dateStr = dateStr:sub(1, i-1)
dateStr = dateStr:sub(1, i-1)
end
end

local from = 1
local from = 1

if dateStr:sub(1,1) == "-" then
if dateStr:sub(1,1) == "-" then
-- this is a negative number, look further ahead
-- this is a negative number, look further ahead
from = 2
from = 2
end
end

index = 1
index = 1
ptr = 1
ptr = 1

i, j = dateStr:find("-", from)
i, j = dateStr:find("-", from)

if i then
if i then
-- year
-- year
parts[index] = tonumber(mw.ustring.gsub(dateStr:sub(ptr, i-1), "^\+(.+)$", "%1"), 10) -- remove '+' sign (explicitly give base 10 to prevent error)
parts[index] = tonumber(dateStr:sub(ptr, i-1), 10) -- explicitly give base 10 to prevent error

if parts[index] == -0 then
if parts[index] == -0 then
parts[index] = tonumber("0") -- for some reason, 'parts[index] = 0' may actually store '-0', so parse from string instead
parts[index] = tonumber("0") -- for some reason, 'parts[index] = 0' may actually store '-0', so parse from string instead
end
end

if precision == "y" then
if precision == "y" then
-- we're done
-- we're done
return parts[1], parts[2], parts[3] -- year, month, day
return parts[1], parts[2], parts[3] -- year, month, day
end
end

index = index + 1
index = index + 1
ptr = i + 1
ptr = i + 1

i, j = dateStr:find("-", ptr)
i, j = dateStr:find("-", ptr)

if i then
if i then
-- month
-- month
parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)
parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)

if precision == "m" then
if precision == "m" then
-- we're done
-- we're done
return parts[1], parts[2], parts[3] -- year, month, day
return parts[1], parts[2], parts[3] -- year, month, day
end
end

index = index + 1
index = index + 1
ptr = i + 1
ptr = i + 1
end
end
end
end

if dateStr:sub(ptr) ~= "" then
if dateStr:sub(ptr) ~= "" then
-- day if we have month, month if we have year, or year
-- day if we have month, month if we have year, or year
parts[index] = tonumber(dateStr:sub(ptr), 10)
parts[index] = tonumber(dateStr:sub(ptr), 10)
end
end

return parts[1], parts[2], parts[3] -- year, month, day
return parts[1], parts[2], parts[3] -- year, month, day
end
end


function datePrecedesDate(aY, aM, aD, bY, bM, bD)
local function datePrecedesDate(aY, aM, aD, bY, bM, bD)
if aY == nil or bY == nil then
if aY == nil or bY == nil then
return nil
return nil
Linje 414: Linje 456:
bM = bM or 1
bM = bM or 1
bD = bD or 1
bD = bD or 1

if aY < bY then
if aY < bY then
return true
return true
end
end

if aY > bY then
if aY > bY then
return false
return false
end
end

if aM < bM then
if aM < bM then
return true
return true
end
end

if aM > bM then
if aM > bM then
return false
return false
end
end

if aD < bD then
if aD < bD then
return true
return true
end
end

return false
return false
end
end


function getHookName(param, index)
local function getHookName(param, index)
if hookNames[param] then
if hookNames[param] then
return hookNames[param][index]
return hookNames[param][index]
Linje 448: Linje 490:
end
end


function alwaysTrue()
local function alwaysTrue()
return true
return true
end
end
Linje 497: Linje 539:
-- ]
-- ]
--
--
function parseFormat(str)
local function parseFormat(str)
local chr, esc, param, root, cur, prev, new
local chr, esc, param, root, cur, prev, new
local params = {}
local params = {}

local function newObject(array)
local function newObject(array)
local obj = {} -- new object
local obj = {} -- new object
obj.str = ""
obj.str = ""

array[#array + 1] = obj -- array{object}
array[#array + 1] = obj -- array{object}
obj.parent = array
obj.parent = array

return obj
return obj
end
end

local function endParam()
local function endParam()
if param > 0 then
if param > 0 then
Linje 524: Linje 566:
end
end
end
end

root = {} -- array
root = {} -- array
root.req = {}
root.req = {}
cur = newObject(root)
cur = newObject(root)
prev = nil
prev = nil

esc = false
esc = false
param = 0
param = 0

for i = 1, #str do
for i = 1, #str do
chr = str:sub(i,i)
chr = str:sub(i,i)

if not esc then
if not esc then
if chr == '\\' then
if chr == '\\' then
Linje 573: Linje 615:
end
end
end
end

cur.str = cur.str .. replaceSpecialChar(chr)
cur.str = cur.str .. replaceSpecialChar(chr)
end
end
Linje 580: Linje 622:
esc = false
esc = false
end
end

prev = nil
prev = nil
end
end

endParam()
endParam()

-- make sure that at least one required parameter has been defined
-- make sure that at least one required parameter has been defined
if not next(root.req) then
if not next(root.req) then
throwError("missing-required-parameter")
throwError("missing-required-parameter")
end
end

-- make sure that the separator parameter "%s" is not amongst the required parameters
-- make sure that the separator parameter "%s" is not amongst the required parameters
if root.req[parameters.separator] then
if root.req[parameters.separator] then
throwError("extra-required-parameter", parameters.separator)
throwError("extra-required-parameter", parameters.separator)
end
end

return root, params
return root, params
end
end


function sortOnRank(claims)
local function sortOnRank(claims)
local rankPos
local rankPos
local ranks = {{}, {}, {}, {}} -- preferred, normal, deprecated, (default)
local ranks = {{}, {}, {}, {}} -- preferred, normal, deprecated, (default)
local sorted = {}
local sorted = {}

for i, v in ipairs(claims) do
for _, v in ipairs(claims) do
rankPos = rankTable[v.rank] or 4
rankPos = rankTable[v.rank] or 4
ranks[rankPos][#ranks[rankPos] + 1] = v
ranks[rankPos][#ranks[rankPos] + 1] = v
end
end

sorted = ranks[1]
sorted = ranks[1]
sorted = mergeArrays(sorted, ranks[2])
sorted = mergeArrays(sorted, ranks[2])
sorted = mergeArrays(sorted, ranks[3])
sorted = mergeArrays(sorted, ranks[3])

return sorted
return sorted
end
end
Linje 621: Linje 663:
local title = nil
local title = nil
local prefix= ""
local prefix= ""

local lang
if not id then
if not id then
id = mw.wikibase.getEntityIdForCurrentPage()
id = mw.wikibase.getEntityIdForCurrentPage()

if not id then
if not id then
return ""
return ""
end
end
end
end

id = id:upper() -- just to be sure
id = id:upper() -- just to be sure

if raw then
if raw then
-- check if given id actually exists
-- check if given id actually exists
if mw.wikibase.getEntity(id) then
if mw.wikibase.isValidEntityId(id) and mw.wikibase.entityExists(id) then
label = id
label = id

if id:sub(1,1) == "P" then
if id:sub(1,1) == "P" then
prefix = "Property:"
prefix = "Property:"
end
end
end
end

prefix = "d:" .. prefix
prefix = "d:" .. prefix

title = label -- may be nil
title = label -- may be nil
else
else
-- try short name first if requested
-- try short name first if requested
if short then
if short then
label = p._property({p.aliasesP.shortName, [p.args.eid] = id}) -- get short name
label = p._egenskap{aliasesP.shortName, [p.args.eid] = id} -- get short name

if label == "" then
if label == "" then
label = nil
label = nil
end
end
end
end

-- get label
-- get label
if not label then
if not label then
label, lang = mw.wikibase.getLabelWithLang(id)
label = mw.wikibase.getLabel(id)
-- don't allow language fallback
if lang ~= self.langCode then
label = nil
end
end
end
end
end

if not label then
if not label then
local katname = "Artikler hvor elementer mangler oversatte etiketter via wd-norsk test"
label = ""
if id:sub(1,1) == "P" then
-- properties have no sitelink, link to Wikidata instead
prefix = "Property:"
katname = "Artikler hvor egenskaper mangler oversatte etiketter via wd-norsk test"
end

label = buildWikilink("d:" .. prefix .. id, id) .. buildWikilink("kategori:" .. katname, id)
elseif link then
elseif link then
-- build a link if requested
-- build a link if requested
if not title then
if not title then
if id:sub(1,1) == "Q" then
if id:sub(1,1) == "Q" then
title = mw.wikibase.sitelink(id)
title = mw.wikibase.getSitelink(id)
elseif id:sub(1,1) == "P" then
elseif id:sub(1,1) == "P" then
-- properties have no sitelink, link to Wikidata instead
-- properties have no sitelink, link to Wikidata instead
Linje 680: Linje 723:
end
end
end
end

if title then
if title then
label = buildWikilink(prefix .. title, label)
label = buildWikilink(prefix .. title, label)
end
end
end
end

return label
return label
end
end
Linje 692: Linje 735:
local value = ""
local value = ""
local prefix = ""
local prefix = ""
local front = " "
local front = "&nbsp;"
local back = ""
local back = ""

if self.entityID:sub(1,1) == "P" then
if self.entityID:sub(1,1) == "P" then
prefix = "Property:"
prefix = "Property:"
end
end

if self.editAtEnd then
if self.editAtEnd then
front = '<span style="float:'
front = '<span style="float:'

if self.langObj:isRTL() then
if self.langObj:isRTL() then
front = front .. 'left'
front = front .. 'left'
Linje 707: Linje 750:
front = front .. 'right'
front = front .. 'right'
end
end

front = front .. '">'
front = front .. '">'
back = '</span>'
back = '</span>'
end
end

value = "[[File:Blue pencil.svg|frameless|text-top|10px|alt=" .. i18n['info']['edit-on-wikidata'] .. "|link=https://www.wikidata.org/wiki/" .. prefix .. self.entityID .. "?uselang=" .. self.langCode
value = "[[File:OOjs UI icon edit-ltr-progressive.svg|frameless|text-top|10px|alt=" .. i18n['info']['edit-on-wikidata'] .. "|link=https://www.wikidata.org/wiki/" .. prefix .. self.entityID .. "?uselang=" .. self.langCode

if self.propertyID then
if self.propertyID then
value = value .. "#" .. self.propertyID
value = value .. "#" .. self.propertyID
Linje 719: Linje 762:
value = value .. "#sitelinks-wikipedia"
value = value .. "#sitelinks-wikipedia"
end
end

value = value .. "|" .. i18n['info']['edit-on-wikidata'] .. "]]"
value = value .. "|" .. i18n['info']['edit-on-wikidata'] .. "]]"

return front .. value .. back
return front .. value .. back
end
end
Linje 730: Linje 773:
local outString = ""
local outString = ""
local j, skip
local j, skip

for i = 1, #valuesArray do
for i = 1, #valuesArray do
-- check if this is a reference
-- check if this is a reference
Linje 736: Linje 779:
j = i - 1
j = i - 1
skip = false
skip = false

-- skip this reference if it is part of a continuous row of references that already contains the exact same reference
-- skip this reference if it is part of a continuous row of references that already contains the exact same reference
while valuesArray[j] and valuesArray[j].refHash do
while valuesArray[j] and valuesArray[j].refHash do
Linje 745: Linje 788:
j = j - 1
j = j - 1
end
end

if not skip then
if not skip then
-- add <ref> tag with the reference's hash as its name (to deduplicate references)
-- add <ref> tag with the reference's hash as its name (to deduplicate references)
Linje 754: Linje 797:
end
end
end
end

return outString
return outString
end
end
Linje 761: Linje 804:
local space = " "
local space = " "
local label = ""
local label = ""
local itemID

if unit == "" or unit == "1" then
if unit == "" or unit == "1" then
return nil
return nil
end
end

if unitOnly then
if unitOnly then
space = ""
space = ""
end
end

itemID = parseWikidataURL(unit)
itemID = parseWikidataURL(unit)

if itemID then
if itemID then
if itemID == aliasesQ.percentage then
if itemID == aliasesQ.percentage then
Linje 777: Linje 821:
else
else
label = self:getLabel(itemID, raw, link, short)
label = self:getLabel(itemID, raw, link, short)

if label ~= "" then
if label ~= "" then
return space .. label
return space .. label
Linje 783: Linje 827:
end
end
end
end

return ""
return ""
end
end


function Config:getValue(snak, raw, link, short, anyLang, unitOnly, noSpecial)
function State:getValue(snak)
return self.conf:getValue(snak, self.rawValue, self.linked, self.shortName, self.anyLanguage, self.unitOnly, false, self.type:sub(1,2))
end

function round(num, numDecimalPlaces)
if numDecimalPlaces and numDecimalPlaces>0 then
local mult = 10^numDecimalPlaces
return math.floor(num * mult + 0.5) / mult
end
return math.floor(num + 0.5)
end

function Config:getValue(snak, raw, link, short, anyLang, unitOnly, noSpecial, type)
if snak.snaktype == 'value' then
if snak.snaktype == 'value' then
local datatype = snak.datavalue.type
local datatype = snak.datavalue.type
local subtype = snak.datatype
local subtype = snak.datatype
local datavalue = snak.datavalue.value
local datavalue = snak.datavalue.value

if datatype == 'string' then
if datatype == 'string' then
if subtype == 'url' and link then
if subtype == 'url' and link then
Linje 813: Linje 869:
return buildWikilink("c:" .. datavalue, datavalue)
return buildWikilink("c:" .. datavalue, datavalue)
elseif subtype == 'math' and not raw then
elseif subtype == 'math' and not raw then
local attribute = nil
return mw.getCurrentFrame():extensionTag("math", datavalue)

if (type == parameters.property or (type == parameters.qualifier and self.propertyID == aliasesP.hasPart)) and snak.property == aliasesP.definingFormula then
attribute = {qid = self.entityID}
end

return mw.getCurrentFrame():extensionTag("math", datavalue, attribute)
elseif subtype == 'external-id' and link then
elseif subtype == 'external-id' and link then
local url = p._property({p.aliasesP.formatterURL, [p.args.eid] = snak.property}) -- get formatter URL
local url = p._egenskap{aliasesP.formatterURL, [p.args.eid] = snak.property} -- get formatter URL

if url ~= "" then
if url ~= "" then
url = mw.ustring.gsub(url, "$1", datavalue)
url = mw.ustring.gsub(url, "$1", datavalue)
Linje 827: Linje 889:
end
end
elseif datatype == 'monolingualtext' then
elseif datatype == 'monolingualtext' then
if anyLang then
if anyLang or datavalue['language'] == self.langCode then
return datavalue['text'], datavalue['language']
elseif datavalue['language'] == self.langCode then
return datavalue['text']
return datavalue['text']
else
else
Linje 837: Linje 897:
local value = ""
local value = ""
local unit
local unit

if not unitOnly then
if not unitOnly then
-- get value and strip + signs from front
-- get value and strip + signs from front
value = mw.ustring.gsub(datavalue['amount'], "^\+(.+)$", "%1")
value = mw.ustring.gsub(datavalue['amount'], "^%+(.+)$", "%1")

if raw then
if raw then
return value
return value
end
end

if p.numberValue.round then
value = round(value, p.numberValue.round)
end

-- replace decimal mark based on locale
-- replace decimal mark based on locale
value = replaceDecimalMark(value)
value = replaceDecimalMark(value)


-- add delimiters for readability
-- add delimiters for readability
value = i18n.addDelimiters(value)
value = i18n.addDelimiters(value)
end
end

unit = self:convertUnit(datavalue['unit'], raw, link, short, unitOnly)
unit = self:convertUnit(datavalue['unit'], raw, link, short, unitOnly)
if unit then
if unit then
value = value .. unit
if unit == '%' then
value = value .. ' ' .. unit
else
value = value .. unit
end
end
end

return value
return value

elseif datatype == 'time' then
elseif datatype == 'time' then
local y, m, d, p, yDiv, yRound, yFull, value, calendarID, dateStr
local y, m, d, p, yDiv, yRound, yFull, value, calendarID, dateStr
Linje 869: Linje 939:
local calendar = ""
local calendar = ""
local precision = datavalue['precision']
local precision = datavalue['precision']

if precision == 11 then
if precision == 11 then
p = "d"
p = "d"
Linje 878: Linje 948:
yFactor = 10^(9-precision)
yFactor = 10^(9-precision)
end
end

y, m, d = parseDate(datavalue['time'], p)
y, m, d = parseDate(datavalue['time'], p)

if y < 0 then
if y < 0 then
sign = -1
sign = -1
y = y * sign
y = y * sign
end
end

-- if precision is tens/hundreds/thousands/millions/billions of years
-- if precision is tens/hundreds/thousands/millions/billions of years
if precision <= 8 then
if precision <= 8 then
yDiv = y / yFactor
yDiv = y / yFactor

-- if precision is tens/hundreds/thousands of years
-- if precision is tens/hundreds/thousands of years
if precision >= 6 then
if precision >= 6 then
mayAddCalendar = true
mayAddCalendar = true

if precision <= 7 then
if precision <= 7 then
-- round centuries/millenniums up (e.g. 20th century or 3rd millennium)
-- round centuries/millenniums up (e.g. 20th century or 3rd millennium)
yRound = math.ceil(yDiv)
yRound = math.ceil(yDiv)

if not raw then
if not raw then
if precision == 6 then
if precision == 6 then
Linje 904: Linje 974:
suffix = i18n['datetime']['suffixes']['century']
suffix = i18n['datetime']['suffixes']['century']
end
end

suffix = i18n.getOrdinalSuffix(yRound) .. suffix
suffix = i18n.getOrdinalSuffix(yRound) .. suffix
else
else
Linje 915: Linje 985:
-- round decades down (e.g. 2010s)
-- round decades down (e.g. 2010s)
yRound = math.floor(yDiv) * yFactor
yRound = math.floor(yDiv) * yFactor

if not raw then
if not raw then
prefix = i18n['datetime']['prefixes']['decade-period']
prefix = i18n['datetime']['prefixes']['decade-period']
Linje 921: Linje 991:
end
end
end
end

if raw and sign < 0 then
if raw and sign < 0 then
-- if BCE then compensate for "counting backwards"
-- if BCE then compensate for "counting backwards"
Linje 929: Linje 999:
else
else
local yReFactor, yReDiv, yReRound
local yReFactor, yReDiv, yReRound

-- round to nearest for tens of thousands of years or more
-- round to nearest for tens of thousands of years or more
yRound = math.floor(yDiv + 0.5)
yRound = math.floor(yDiv + 0.5)

if yRound == 0 then
if yRound == 0 then
if precision <= 2 and y ~= 0 then
if precision <= 2 and y ~= 0 then
Linje 938: Linje 1 008:
yReDiv = y / yReFactor
yReDiv = y / yReFactor
yReRound = math.floor(yReDiv + 0.5)
yReRound = math.floor(yReDiv + 0.5)

if yReDiv == yReRound then
if yReDiv == yReRound then
-- change precision to millions of years only if we have a whole number of them
-- change precision to millions of years only if we have a whole number of them
Linje 946: Linje 1 016:
end
end
end
end

if yRound == 0 then
if yRound == 0 then
-- otherwise, take the unrounded (original) number of years
-- otherwise, take the unrounded (original) number of years
Linje 955: Linje 1 025:
end
end
end
end

if precision >= 1 and y ~= 0 then
if precision >= 1 and y ~= 0 then
yFull = yRound * yFactor
yFull = yRound * yFactor

yReFactor = 1e9
yReFactor = 1e9
yReDiv = yFull / yReFactor
yReDiv = yFull / yReFactor
yReRound = math.floor(yReDiv + 0.5)
yReRound = math.floor(yReDiv + 0.5)

if yReDiv == yReRound then
if yReDiv == yReRound then
-- change precision to billions of years if we're in that range
-- change precision to billions of years if we're in that range
Linje 972: Linje 1 042:
yReDiv = yFull / yReFactor
yReDiv = yFull / yReFactor
yReRound = math.floor(yReDiv + 0.5)
yReRound = math.floor(yReDiv + 0.5)

if yReDiv == yReRound then
if yReDiv == yReRound then
-- change precision to millions of years if we're in that range
-- change precision to millions of years if we're in that range
Linje 981: Linje 1 051:
end
end
end
end

if not raw then
if not raw then
if precision == 3 then
if precision == 3 then
Linje 1 003: Linje 1 073:
mayAddCalendar = true
mayAddCalendar = true
end
end

if mayAddCalendar then
if mayAddCalendar then
calendarID = parseWikidataURL(datavalue['calendarmodel'])
calendarID = parseWikidataURL(datavalue['calendarmodel'])

if calendarID and calendarID == aliasesQ.prolepticJulianCalendar then
if calendarID and calendarID == aliasesQ.prolepticJulianCalendar then
if not raw then
if not raw then
Linje 1 019: Linje 1 089:
end
end
end
end

if not raw then
if not raw then
local ce = nil
local ce = nil

if sign < 0 then
if sign < 0 then
ce = i18n['datetime']['BCE']
ce = i18n['datetime']['BCE']
Linje 1 028: Linje 1 098:
ce = i18n['datetime']['CE']
ce = i18n['datetime']['CE']
end
end

if ce then
if ce then
if link then
if link then
Linje 1 035: Linje 1 105:
suffix = suffix .. " " .. ce
suffix = suffix .. " " .. ce
end
end

value = tostring(yRound)
value = tostring(yRound)

if m then
if m then
dateStr = self.langObj:formatDate("F", "1-"..m.."-1")
dateStr = self.langObj:formatDate("F", "1-"..m.."-1")

if d then
if d then
if self.mdyDate then
if self.mdyDate then
dateStr = dateStr .. " " .. d .. "." .. ","
dateStr = dateStr .. " " .. d .. ","
else
else
dateStr = d .. ". " .. dateStr
dateStr = d .. ". " .. dateStr
end
end
end
end

value = dateStr .. " " .. value
value = dateStr .. " " .. value
end
end

value = prefix .. value .. suffix .. calendar
value = prefix .. value .. suffix .. calendar
else
else
value = padZeros(yRound * sign, 4)
value = padZeros(yRound * sign, 4)

if m then
if m then
value = value .. "-" .. padZeros(m, 2)
value = value .. "-" .. padZeros(m, 2)

if d then
if d then
value = value .. "-" .. padZeros(d, 2)
value = value .. "-" .. padZeros(d, 2)
end
end
end
end

value = value .. calendar
value = value .. calendar
end
end

return value
return value
elseif datatype == 'globecoordinate' then
elseif datatype == 'globecoordinate' then
-- logic from https://github.com/DataValues/Geo (v4.0.1)
-- logic from https://github.com/DataValues/Geo (v4.0.1)

local precision, unitsPerDegree, numDigits, strFormat, value, globe
local precision, unitsPerDegree, numDigits, strFormat, value, globe
local latitude, latConv, latValue, latLink
local latitude, latConv, latValue, latLink
Linje 1 076: Linje 1 146:
local latDirection, latDirectionN, latDirectionS, latDirectionEN
local latDirection, latDirectionN, latDirectionS, latDirectionEN
local lonDirection, lonDirectionE, lonDirectionW, lonDirectionEN
local lonDirection, lonDirectionE, lonDirectionW, lonDirectionEN
local degSymbol, minSymbol, secSymbol, separator

local latDegrees = nil
local latDegrees = nil
local latMinutes = nil
local latMinutes = nil
Linje 1 083: Linje 1 154:
local lonMinutes = nil
local lonMinutes = nil
local lonSeconds = nil
local lonSeconds = nil

local latDegSym = ""
local latDegSym = ""
local latMinSym = ""
local latMinSym = ""
Linje 1 090: Linje 1 161:
local lonMinSym = ""
local lonMinSym = ""
local lonSecSym = ""
local lonSecSym = ""

local latDirectionEN_N = "N"
local latDirectionEN_N = "N"
local latDirectionEN_S = "S"
local latDirectionEN_S = "S"
local lonDirectionEN_E = "E"
local lonDirectionEN_E = "E"
local lonDirectionEN_W = "W"
local lonDirectionEN_W = "W"

if not raw then
if not raw then
latDirectionN = i18n['coord']['latitude-north']
latDirectionN = i18n['coord']['latitude-north']
Linje 1 101: Linje 1 172:
lonDirectionE = i18n['coord']['longitude-east']
lonDirectionE = i18n['coord']['longitude-east']
lonDirectionW = i18n['coord']['longitude-west']
lonDirectionW = i18n['coord']['longitude-west']

degSymbol = i18n['coord']['degrees']
degSymbol = i18n['coord']['degrees']
minSymbol = i18n['coord']['minutes']
minSymbol = i18n['coord']['minutes']
Linje 1 111: Linje 1 182:
lonDirectionE = lonDirectionEN_E
lonDirectionE = lonDirectionEN_E
lonDirectionW = lonDirectionEN_W
lonDirectionW = lonDirectionEN_W

degSymbol = "/"
degSymbol = "/"
minSymbol = "/"
minSymbol = "/"
Linje 1 117: Linje 1 188:
separator = "/"
separator = "/"
end
end

latitude = datavalue['latitude']
latitude = datavalue['latitude']
longitude = datavalue['longitude']
longitude = datavalue['longitude']

if latitude < 0 then
if latitude < 0 then
latDirection = latDirectionS
latDirection = latDirectionS
Linje 1 129: Linje 1 200:
latDirectionEN = latDirectionEN_N
latDirectionEN = latDirectionEN_N
end
end

if longitude < 0 then
if longitude < 0 then
lonDirection = lonDirectionW
lonDirection = lonDirectionW
Linje 1 138: Linje 1 209:
lonDirectionEN = lonDirectionEN_E
lonDirectionEN = lonDirectionEN_E
end
end

precision = datavalue['precision']
precision = datavalue['precision']

if not precision or precision <= 0 then
if not precision or precision <= 0 then
precision = 1 / 3600 -- precision not set (correctly), set to arcsecond
precision = 1 / 3600 -- precision not set (correctly), set to arcsecond
end
end

-- remove insignificant detail
-- remove insignificant detail
latitude = math.floor(latitude / precision + 0.5) * precision
latitude = math.floor(latitude / precision + 0.5) * precision
longitude = math.floor(longitude / precision + 0.5) * precision
longitude = math.floor(longitude / precision + 0.5) * precision

if precision >= 1 - (1 / 60) and precision < 1 then
if precision >= 1 - (1 / 60) and precision < 1 then
precision = 1
precision = 1
Linje 1 154: Linje 1 225:
precision = 1 / 60
precision = 1 / 60
end
end

if precision >= 1 then
if precision >= 1 then
unitsPerDegree = 1
unitsPerDegree = 1
Linje 1 162: Linje 1 233:
unitsPerDegree = 3600
unitsPerDegree = 3600
end
end

numDigits = math.ceil(-math.log10(unitsPerDegree * precision))
numDigits = math.ceil(-math.log10(unitsPerDegree * precision))

if numDigits <= 0 then
if numDigits <= 0 then
numDigits = tonumber("0") -- for some reason, 'numDigits = 0' may actually store '-0', so parse from string instead
numDigits = tonumber("0") -- for some reason, 'numDigits = 0' may actually store '-0', so parse from string instead
end
end

strFormat = "%." .. numDigits .. "f"
strFormat = "%." .. numDigits .. "f"

if precision >= 1 then
if precision >= 1 then
latDegrees = strFormat:format(latitude)
latDegrees = strFormat:format(latitude)
lonDegrees = strFormat:format(longitude)
lonDegrees = strFormat:format(longitude)

if not raw then
if not raw then
latDegSym = replaceDecimalMark(latDegrees) .. degSymbol
latDegSym = replaceDecimalMark(latDegrees) .. degSymbol
Linje 1 185: Linje 1 256:
latConv = math.floor(latitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits
latConv = math.floor(latitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits
lonConv = math.floor(longitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits
lonConv = math.floor(longitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits

if precision >= (1 / 60) then
if precision >= (1 / 60) then
latMinutes = latConv
latMinutes = latConv
Linje 1 192: Linje 1 263:
latSeconds = latConv
latSeconds = latConv
lonSeconds = lonConv
lonSeconds = lonConv

latMinutes = math.floor(latSeconds / 60)
latMinutes = math.floor(latSeconds / 60)
lonMinutes = math.floor(lonSeconds / 60)
lonMinutes = math.floor(lonSeconds / 60)

latSeconds = strFormat:format(latSeconds - (latMinutes * 60))
latSeconds = strFormat:format(latSeconds - (latMinutes * 60))
lonSeconds = strFormat:format(lonSeconds - (lonMinutes * 60))
lonSeconds = strFormat:format(lonSeconds - (lonMinutes * 60))

if not raw then
if not raw then
latSecSym = replaceDecimalMark(latSeconds) .. secSymbol
latSecSym = replaceDecimalMark(latSeconds) .. secSymbol
Linje 1 207: Linje 1 278:
end
end
end
end

latDegrees = math.floor(latMinutes / 60)
latDegrees = math.floor(latMinutes / 60)
lonDegrees = math.floor(lonMinutes / 60)
lonDegrees = math.floor(lonMinutes / 60)

latDegSym = latDegrees .. degSymbol
latDegSym = latDegrees .. degSymbol
lonDegSym = lonDegrees .. degSymbol
lonDegSym = lonDegrees .. degSymbol

latMinutes = latMinutes - (latDegrees * 60)
latMinutes = latMinutes - (latDegrees * 60)
lonMinutes = lonMinutes - (lonDegrees * 60)
lonMinutes = lonMinutes - (lonDegrees * 60)

if precision >= (1 / 60) then
if precision >= (1 / 60) then
latMinutes = strFormat:format(latMinutes)
latMinutes = strFormat:format(latMinutes)
lonMinutes = strFormat:format(lonMinutes)
lonMinutes = strFormat:format(lonMinutes)

if not raw then
if not raw then
latMinSym = replaceDecimalMark(latMinutes) .. minSymbol
latMinSym = replaceDecimalMark(latMinutes) .. minSymbol
Linje 1 233: Linje 1 304:
end
end
end
end

latValue = latDegSym .. latMinSym .. latSecSym .. latDirection
latValue = latDegSym .. latMinSym .. latSecSym .. latDirection
lonValue = lonDegSym .. lonMinSym .. lonSecSym .. lonDirection
lonValue = lonDegSym .. lonMinSym .. lonSecSym .. lonDirection

value = latValue .. separator .. lonValue
value = latValue .. separator .. lonValue

if link then
if link then
globe = parseWikidataURL(datavalue['globe'])
globe = parseWikidataURL(datavalue['globe'])

if globe then
if globe then
globe = mw.wikibase.getEntity(globe):getLabel("en"):lower()
globe = mw.wikibase.getLabelByLang(globe, "en"):lower()
else
else
globe = "earth"
globe = "earth"
end
end

latLink = table.concat({latDegrees, latMinutes, latSeconds}, "_")
latLink = table.concat({latDegrees, latMinutes, latSeconds}, "_")
lonLink = table.concat({lonDegrees, lonMinutes, lonSeconds}, "_")
lonLink = table.concat({lonDegrees, lonMinutes, lonSeconds}, "_")

value = "[https://tools.wmflabs.org/geohack/geohack.php?language="..self.langCode.."&params="..latLink.."_"..latDirectionEN.."_"..lonLink.."_"..lonDirectionEN.."_globe:"..globe.." "..value.."]"
value = "[https://geohack.toolforge.org/geohack.php?language="..self.langCode.."&params="..latLink.."_"..latDirectionEN.."_"..lonLink.."_"..lonDirectionEN.."_globe:"..globe.." "..value.."]"
end
end

return value
return value
elseif datatype == 'wikibase-entityid' then
elseif datatype == 'wikibase-entityid' then
local label
local label
local itemID = datavalue['numeric-id']
local itemID = datavalue['numeric-id']

if subtype == 'wikibase-item' then
if subtype == 'wikibase-item' then
itemID = "Q" .. itemID
itemID = "Q" .. itemID
Linje 1 266: Linje 1 337:
return '<strong class="error">' .. errorText('unknown-data-type', subtype) .. '</strong>'
return '<strong class="error">' .. errorText('unknown-data-type', subtype) .. '</strong>'
end
end

label = self:getLabel(itemID, raw, link, short)
label = self:getLabel(itemID, raw, link, short)

if label == "" then
if label == "" then
label = nil
label = nil
end
end

return label
return label
else
else
Linje 1 296: Linje 1 367:
function Config:getSingleRawQualifier(claim, qualifierID)
function Config:getSingleRawQualifier(claim, qualifierID)
local qualifiers
local qualifiers

if claim.qualifiers then qualifiers = claim.qualifiers[qualifierID] end
if claim.qualifiers then qualifiers = claim.qualifiers[qualifierID] end

if qualifiers and qualifiers[1] then
if qualifiers and qualifiers[1] then
return self:getValue(qualifiers[1], true) -- raw = true
return self:getValue(qualifiers[1], true) -- raw = true
Linje 1 308: Linje 1 379:
function Config:snakEqualsValue(snak, value)
function Config:snakEqualsValue(snak, value)
local snakValue = self:getValue(snak, true) -- raw = true
local snakValue = self:getValue(snak, true) -- raw = true

if snakValue and snak.snaktype == 'value' and snak.datavalue.type == 'wikibase-entityid' then value = value:upper() end
if snakValue and snak.snaktype == 'value' and snak.datavalue.type == 'wikibase-entityid' then value = value:upper() end

return snakValue == value
return snakValue == value
end
end
Linje 1 316: Linje 1 387:
function Config:setRank(rank)
function Config:setRank(rank)
local rankPos
local rankPos

if rank == p.flags.best then
if rank == p.flags.best then
self.bestRank = true
self.bestRank = true
Linje 1 322: Linje 1 393:
return
return
end
end

if rank:sub(1,9) == p.flags.preferred then
if rank:sub(1,9) == p.flags.preferred then
rankPos = 1
rankPos = 1
Linje 1 332: Linje 1 403:
return
return
end
end

-- one of the rank flags was given, check if another one was given before
-- one of the rank flags was given, check if another one was given before
if not self.flagRank then
if not self.flagRank then
Linje 1 339: Linje 1 410:
self.flagRank = true -- mark that a rank flag was given
self.flagRank = true -- mark that a rank flag was given
end
end

if rank:sub(-1) == "+" then
if rank:sub(-1) == "+" then
for i = rankPos, 1, -1 do
for i = rankPos, 1, -1 do
Linje 1 355: Linje 1 426:
function Config:setPeriod(period)
function Config:setPeriod(period)
local periodPos
local periodPos

if period == p.flags.future then
if period == p.flags.future then
periodPos = 1
periodPos = 1
Linje 1 365: Linje 1 436:
return
return
end
end

-- one of the period flags was given, check if another one was given before
-- one of the period flags was given, check if another one was given before
if not self.flagPeriod then
if not self.flagPeriod then
Linje 1 371: Linje 1 442:
self.flagPeriod = true -- mark that a period flag was given
self.flagPeriod = true -- mark that a period flag was given
end
end

self.periods[periodPos] = true
self.periods[periodPos] = true
end
end
Linje 1 377: Linje 1 448:
function Config:qualifierMatches(claim, id, value)
function Config:qualifierMatches(claim, id, value)
local qualifiers
local qualifiers

if claim.qualifiers then qualifiers = claim.qualifiers[id] end
if claim.qualifiers then qualifiers = claim.qualifiers[id] end
if qualifiers then
if qualifiers then
for i, v in pairs(qualifiers) do
for _, v in pairs(qualifiers) do
if self:snakEqualsValue(v, value) then
if self:snakEqualsValue(v, value) then
return true
return true
Linje 1 389: Linje 1 460:
return true
return true
end
end

return false
return false
end
end
Linje 1 410: Linje 1 481:
local endTimeM = nil
local endTimeM = nil
local endTimeD = nil
local endTimeD = nil

if self.periods[1] and self.periods[2] and self.periods[3] then
if self.periods[1] and self.periods[2] and self.periods[3] then
-- any time
-- any time
return true
return true
end
end

startTime = self:getSingleRawQualifier(claim, aliasesP.startTime)
local now = os.date('!*t')
startTime = self:getSingleRawQualifier(claim, p.aliasesP.startTime)
if startTime and startTime ~= "" and startTime ~= " " then
if startTime and startTime ~= "" and startTime ~= " " then
startTimeY, startTimeM, startTimeD = parseDate(startTime)
startTimeY, startTimeM, startTimeD = parseDate(startTime)
end
end

endTime = self:getSingleRawQualifier(claim, p.aliasesP.endTime)
endTime = self:getSingleRawQualifier(claim, aliasesP.endTime)
if endTime and endTime ~= "" and endTime ~= " " then
if endTime and endTime ~= "" and endTime ~= " " then
endTimeY, endTimeM, endTimeD = parseDate(endTime)
endTimeY, endTimeM, endTimeD = parseDate(endTime)
elseif endTime == " " then
-- end time is 'unknown', assume it is somewhere in the past;
-- we can do this by taking the current date as a placeholder for the end time
endTimeY = now['year']
endTimeM = now['month']
endTimeD = now['day']
end
end

if startTimeY ~= nil and endTimeY ~= nil and datePrecedesDate(endTimeY, endTimeM, endTimeD, startTimeY, startTimeM, startTimeD) then
if startTimeY ~= nil and endTimeY ~= nil and datePrecedesDate(endTimeY, endTimeM, endTimeD, startTimeY, startTimeM, startTimeD) then
-- invalidate end time if it precedes start time
-- invalidate end time if it precedes start time
Linje 1 440: Linje 1 503:
endTimeD = nil
endTimeD = nil
end
end

if self.periods[1] then
if self.periods[1] then
-- future
-- future
if startTimeY and datePrecedesDate(now['year'], now['month'], now['day'], startTimeY, startTimeM, startTimeD) then
if startTimeY and datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD) then
return true
return true
end
end
end
end

if self.periods[2] then
if self.periods[2] then
-- current
-- current
if (startTimeY == nil or not datePrecedesDate(now['year'], now['month'], now['day'], startTimeY, startTimeM, startTimeD)) and
if (startTimeY == nil or not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD)) and
(endTimeY == nil or datePrecedesDate(now['year'], now['month'], now['day'], endTimeY, endTimeM, endTimeD)) then
(endTimeY == nil or datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD)) then
return true
return true
end
end
end
end

if self.periods[3] then
if self.periods[3] then
-- former
-- former
if endTimeY and not datePrecedesDate(now['year'], now['month'], now['day'], endTimeY, endTimeM, endTimeD) then
if endTimeY and not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD) then
return true
return true
end
end
end
end

return false
return false
end
end
Linje 1 469: Linje 1 532:
if not flag then
if not flag then
return false
return false
else
flag = mw.text.trim(flag)
end
end

if flag == p.flags.linked then
if flag == p.flags.linked then
self.curState.linked = true
self.curState.linked = true
Linje 1 478: Linje 1 539:
elseif flag == p.flags.raw then
elseif flag == p.flags.raw then
self.curState.rawValue = true
self.curState.rawValue = true

if self.curState == self.states[parameters.reference] then
if self.curState == self.states[parameters.reference] then
-- raw reference values end with periods and require a separator (other than none)
-- raw reference values end with periods and require a separator (other than none)
self.separators["sep%r"][1] = {" "}
self.separators["sep%r"][1] = {" "}
end
end

return true
return true
elseif flag == p.flags.short then
elseif flag == p.flags.short then
Linje 1 526: Linje 1 587:
function Config:processFlagOrCommand(flag)
function Config:processFlagOrCommand(flag)
local param = ""
local param = ""

if not flag then
if not flag then
return false
return false
else
flag = mw.text.trim(flag)
end
end

if flag == p.claimCommands.property or flag == p.claimCommands.properties then
if flag == p.claimCommands.property or flag == p.claimCommands.properties then
param = parameters.property
param = parameters.property
Linje 1 544: Linje 1 603:
return self:processFlag(flag)
return self:processFlag(flag)
end
end

if self.states[param] then
if self.states[param] then
return false
return false
end
end

-- create a new state for each command
-- create a new state for each command
self.states[param] = State.new(self)
self.states[param] = State:new(self, param)

-- use "%x" as the general parameter name
-- use "%x" as the general parameter name
self.states[param].parsedFormat = parseFormat(parameters.general) -- will be overwritten for param=="%p"
self.states[param].parsedFormat = parseFormat(parameters.general) -- will be overwritten for param=="%p"

-- set the separator
-- set the separator
self.states[param].separator = self.separators["sep"..param] -- will be nil for param=="%p", which will be set separately
self.states[param].separator = self.separators["sep"..param] -- will be nil for param=="%p", which will be set separately

if flag == p.claimCommands.property or flag == p.claimCommands.qualifier or flag == p.claimCommands.reference then
if flag == p.claimCommands.property or flag == p.claimCommands.qualifier or flag == p.claimCommands.reference then
self.states[param].singleValue = true
self.states[param].singleValue = true
end
end

self.curState = self.states[param]
self.curState = self.states[param]

return true
return true
end
end
Linje 1 569: Linje 1 628:
function Config:processSeparators(args)
function Config:processSeparators(args)
local sep
local sep

for i, v in pairs(self.separators) do
for i, v in pairs(self.separators) do
if args[i] then
if args[i] then
sep = replaceSpecialChars(args[i])
sep = replaceSpecialChars(args[i])

if sep ~= "" then
if sep ~= "" then
self.separators[i][1] = {sep}
self.separators[i][1] = {sep}
Linje 1 605: Linje 1 664:
function State:claimMatches(claim)
function State:claimMatches(claim)
local matches, rankPos
local matches, rankPos

-- first of all, reset any cached values used for the previous claim
-- first of all, reset any cached values used for the previous claim
self:resetCaches()
self:resetCaches()

-- if a property value was given, check if it matches the claim's property value
-- if a property value was given, check if it matches the claim's property value
if self.conf.propertyValue then
if self.conf.propertyValue then
Linje 1 615: Linje 1 674:
matches = true
matches = true
end
end

-- if any qualifier values were given, check if each matches one of the claim's qualifier values
-- if any qualifier values were given, check if each matches one of the claim's qualifier values
for i, v in pairs(self.conf.qualifierIDsAndValues) do
for i, v in pairs(self.conf.qualifierIDsAndValues) do
matches = (matches and self.conf:qualifierMatches(claim, i, v))
matches = (matches and self.conf:qualifierMatches(claim, i, v))
end
end

-- check if the claim's rank and time period match
-- check if the claim's rank and time period match
rankPos = rankTable[claim.rank] or 4
rankPos = rankTable[claim.rank] or 4
matches = (matches and self.conf:rankMatches(rankPos) and self.conf:timeMatches(claim))
matches = (matches and self.conf:rankMatches(rankPos) and self.conf:timeMatches(claim))

-- if only claims with references must be returned, check if this one has any
-- if only claims with references must be returned, check if this one has any
if self.conf.sourcedOnly then
if self.conf.sourcedOnly then
matches = (matches and self:isSourced(claim)) -- prefetches and caches references
matches = (matches and self:isSourced(claim)) -- prefetches and caches references
end
end

return matches, rankPos
return matches, rankPos
end
end
Linje 1 638: Linje 1 697:
local sep = nil -- value object
local sep = nil -- value object
local out = {} -- array with value objects
local out = {} -- array with value objects

local function walk(formatTable, result)
local function walk(formatTable, result)
local valuesArray = {} -- array with value objects
local valuesArray = {} -- array with value objects

for i, v in pairs(formatTable.req) do
for i, v in pairs(formatTable.req) do
if not result[i] or not result[i][1] then
if not result[i] or not result[i][1] then
Linje 1 649: Linje 1 708:
end
end
end
end

for i, v in ipairs(formatTable) do
for _, v in ipairs(formatTable) do
if v.param then
if v.param then
valuesArray = mergeArrays(valuesArray, result[v.str])
valuesArray = mergeArrays(valuesArray, result[v.str])
Linje 1 656: Linje 1 715:
valuesArray[#valuesArray + 1] = {v.str}
valuesArray[#valuesArray + 1] = {v.str}
end
end

if v.child then
if v.child then
valuesArray = mergeArrays(valuesArray, walk(v.child, result))
valuesArray = mergeArrays(valuesArray, walk(v.child, result))
end
end
end
end

return valuesArray
return valuesArray
end
end

-- iterate through the results from back to front, so that we know when to add separators
-- iterate through the results from back to front, so that we know when to add separators
for i = #self.results, 1, -1 do
for i = #self.results, 1, -1 do
result = self.results[i]
result = self.results[i]

-- if there is already some output, then add the separators
-- if there is already some output, then add the separators
if #out > 0 then
if #out > 0 then
Linje 1 677: Linje 1 736:
result[parameters.separator] = {self.puncMark[1]} -- optional punctuation mark
result[parameters.separator] = {self.puncMark[1]} -- optional punctuation mark
end
end

valuesArray = walk(self.parsedFormat, result)
valuesArray = walk(self.parsedFormat, result)

if #valuesArray > 0 then
if #valuesArray > 0 then
if sep then
if sep then
valuesArray[#valuesArray + 1] = sep
valuesArray[#valuesArray + 1] = sep
end
end

out = mergeArrays(valuesArray, out)
out = mergeArrays(valuesArray, out)
end
end
end
end

-- reset state before next iteration
-- reset state before next iteration
self.results = {}
self.results = {}

return out
return out
end
end
Linje 1 697: Linje 1 756:
-- level 1 hook
-- level 1 hook
function State:getProperty(claim)
function State:getProperty(claim)
local value = {self.conf:getValue(claim.mainsnak, self.rawValue, self.linked, self.shortName, self.anyLanguage, self.unitOnly)} -- create one value object
local value = {self:getValue(claim.mainsnak)} -- create one value object

if #value > 0 then
if #value > 0 then
return {value} -- wrap the value object in an array and return it
return {value} -- wrap the value object in an array and return it
Linje 1 709: Linje 1 768:
function State:getQualifiers(claim, param)
function State:getQualifiers(claim, param)
local qualifiers
local qualifiers

if claim.qualifiers then qualifiers = claim.qualifiers[self.conf.qualifierIDs[param]] end
if claim.qualifiers then qualifiers = claim.qualifiers[self.conf.qualifierIDs[param]] end
if qualifiers then
if qualifiers then
Linje 1 722: Linje 1 781:
-- level 2 hook
-- level 2 hook
function State:getQualifier(snak)
function State:getQualifier(snak)
local value = {self.conf:getValue(snak, self.rawValue, self.linked, self.shortName, self.anyLanguage, self.unitOnly)} -- create one value object
local value = {self:getValue(snak)} -- create one value object

if #value > 0 then
if #value > 0 then
return {value} -- wrap the value object in an array and return it
return {value} -- wrap the value object in an array and return it
Linje 1 735: Linje 1 794:
local out = {} -- array with value objects
local out = {} -- array with value objects
local sep = self.conf.separators["sep"..parameters.qualifier][1] -- value object
local sep = self.conf.separators["sep"..parameters.qualifier][1] -- value object

-- iterate through the output of the separate "qualifier(s)" commands
-- iterate through the output of the separate "qualifier(s)" commands
for i = 1, self.conf.states.qualifiersCount do
for i = 1, self.conf.states.qualifiersCount do

-- if a hook has not been called yet, call it now
-- if a hook has not been called yet, call it now
if not result[parameters.qualifier..i] then
if not result[parameters.qualifier..i] then
self:callHook(parameters.qualifier..i, hooks, claim, result)
self:callHook(parameters.qualifier..i, hooks, claim, result)
end
end

-- if there is output for this particular "qualifier(s)" command, then add it
-- if there is output for this particular "qualifier(s)" command, then add it
if result[parameters.qualifier..i] and result[parameters.qualifier..i][1] then
if result[parameters.qualifier..i] and result[parameters.qualifier..i][1] then

-- if there is already some output, then add the separator
-- if there is already some output, then add the separator
if #out > 0 and sep then
if #out > 0 and sep then
out[#out + 1] = sep
out[#out + 1] = sep
end
end

out = mergeArrays(out, result[parameters.qualifier..i])
out = mergeArrays(out, result[parameters.qualifier..i])
end
end
end
end

return out
return out
end
end
Linje 1 765: Linje 1 824:
return self.conf.prefetchedRefs
return self.conf.prefetchedRefs
end
end

if claim.references then
if claim.references then
-- iterate through claim's reference statements to collect their values;
-- iterate through claim's reference statements to collect their values;
-- return array with multiple value objects
-- return array with multiple value objects

return self.conf.states[parameters.reference]:iterate(claim.references, {[parameters.general] = hookNames[parameters.reference][2], count = 1}) -- pass reference state with level 2 hook
local refsCollected = self.conf.states[parameters.reference]:iterate(claim.references, {[parameters.general] = hookNames[parameters.reference][2], count = 1}) -- pass reference state with level 2 hook
if p.numberValue.max > 0 and table.getn(refsCollected) >= p.numberValue.max then -- If arg 'maks' is used. Limit the number of returned refs
limitedRefs = {}
for i=1, p.numberValue.max do
limitedRefs[i] = refsCollected[i]
end
return limitedRefs
else -- Else return all refs
return refsCollected
end

else
else
return {} -- return empty array
return {} -- return empty array
Linje 1 785: Linje 1 856:
local value = ""
local value = ""
local ref = {}
local ref = {}

local version = 1 -- increase this each time the below logic is changed to avoid conflict errors
local version = 11 -- increase this each time the below logic is changed to avoid conflict errors

if statement.snaks then
if statement.snaks then
-- don't include "imported from", which is added by a bot
-- don't include "imported from", which is added by a bot
if statement.snaks[p.aliasesP.importedFrom] then
if statement.snaks[aliasesP.importedFrom] then
statement.snaks[p.aliasesP.importedFrom] = nil
statement.snaks[aliasesP.importedFrom] = nil
end
end

-- don't include "inferred from", which is added by a bot
-- don't include "inferred from", which is added by a bot
if statement.snaks[p.aliasesP.inferredFrom] then
if statement.snaks[aliasesP.inferredFrom] then
statement.snaks[p.aliasesP.inferredFrom] = nil
statement.snaks[aliasesP.inferredFrom] = nil
end
end

-- don't include "type of reference"
-- don't include "type of reference"
if statement.snaks[p.aliasesP.typeOfReference] then
if statement.snaks[aliasesP.typeOfReference] then
statement.snaks[p.aliasesP.typeOfReference] = nil
statement.snaks[aliasesP.typeOfReference] = nil
end
end

-- don't include "wikimedia DB name", indication of a faulty reference
if statement.snaks[aliasesP.wmDBName] then
statement.snaks[aliasesP.wmDBName] = nil
end

-- don't include "wikimedia user name", indication of a faulty reference
if statement.snaks[aliasesP.wmUserName] then
statement.snaks[aliasesP.wmUserName] = nil
end

-- don't include "wikimedia import URL", indication of a faulty reference
if statement.snaks[aliasesP.wmImportURL] then
statement.snaks[aliasesP.wmImportURL] = nil
end

-- don't include "wikimedia page version", indication of a faulty reference
if statement.snaks[aliasesP.wmPageVersion] then
statement.snaks[aliasesP.wmPageVersion] = nil
end

-- don't include "wikimedia community discussion", indication of a faulty reference
if statement.snaks[aliasesP.wmCommunityDiscussion] then
statement.snaks[aliasesP.wmCommunityDiscussion] = nil
end

-- don't include "image" to prevent littering
-- don't include "image" to prevent littering
if statement.snaks[p.aliasesP.image] then
if statement.snaks[aliasesP.image] then
statement.snaks[p.aliasesP.image] = nil
statement.snaks[aliasesP.image] = nil
end
end

-- don't include "document file on Wikimedia Commons" to prevent littering
if statement.snaks["P996"] then
statement.snaks["P996"] = nil
end

-- don't include "language" if it is equal to the local one
-- don't include "language" if it is equal to the local one
if self:getReferenceDetail(statement.snaks, p.aliasesP.language) == self.conf.langName then
if self:getReferenceDetail(statement.snaks, aliasesP.language) == self.conf.langName then
statement.snaks[p.aliasesP.language] = nil
statement.snaks[aliasesP.language] = nil
end
end

-- retrieve all the parameters
-- retrieve all the parameters
for i in pairs(statement.snaks) do
for i in pairs(statement.snaks) do
label = ""
label = ""

-- multiple authors may be given
-- multiple authors may be given
if i == p.aliasesP.author then
if i == aliasesP.author then
params[i] = self:getReferenceDetails(statement.snaks, i, false, self.linked, true) -- link = true/false, anyLang = true
params[i] = self:getReferenceDetails(statement.snaks, i, false, self.linked, true) -- link = true/false, anyLang = true
else
else
params[i] = {self:getReferenceDetail(statement.snaks, i, false, (self.linked or (i == p.aliasesP.statedIn)) and (statement.snaks[i][1].datatype ~= 'url'), true)} -- link = true/false, anyLang = true
params[i] = {self:getReferenceDetail(statement.snaks, i, false, (self.linked or (i == aliasesP.statedIn)) and (statement.snaks[i][1].datatype ~= 'url'), true)} -- link = true/false, anyLang = true
end
end

if #params[i] == 0 then
if #params[i] == 0 then
params[i] = nil
params[i] = nil
Linje 1 831: Linje 1 932:
key = "external-id"
key = "external-id"
label = self.conf:getLabel(i)
label = self.conf:getLabel(i)

if label ~= "" then
if label ~= "" then
label = label .. " "
label = label .. " "
Linje 1 838: Linje 1 939:
key = i
key = i
end
end

-- add the parameter to each matching type of citation
-- add the parameter to each matching type of citation
for j in pairs(citeParams) do
for j in pairs(citeParams) do
Linje 1 848: Linje 1 949:
if i18n['cite'][j][key] ~= "" then
if i18n['cite'][j][key] ~= "" then
citeParams[j][i18n['cite'][j][key]] = label .. params[i][1]
citeParams[j][i18n['cite'][j][key]] = label .. params[i][1]

-- if there are multiple parameter values (authors), add those too
-- if there are multiple parameter values (authors), add those too
for k=2, #params[i] do
for k=2, #params[i] do
Linje 1 861: Linje 1 962:
end
end
end
end

-- get title of general template for citing web references
-- get title of general template for citing web references
citeWeb = split(mw.wikibase.sitelink(aliasesQ.citeWeb) or "", ":")[2] -- split off namespace from front
citeWeb = split(mw.wikibase.getSitelink(aliasesQ.citeWeb) or "", ":")[2] -- split off namespace from front

-- get title of template that expands stated-in references into citations
-- get title of template that expands stated-in references into citations
citeQ = split(mw.wikibase.sitelink(aliasesQ.citeQ) or "", ":")[2] -- split off namespace from front
citeQ = split(mw.wikibase.getSitelink(aliasesQ.citeQ) or "", ":")[2] -- split off namespace from front

-- (1) use the general template for citing web references if there is a match and if at least both "reference URL" and "title" are present
-- (1) use the general template for citing web references if there is a match and if at least both "reference URL" and "title" are present
if citeWeb and not citeMismatch['web'] and citeParams['web'][i18n['cite']['web'][p.aliasesP.referenceURL]] and citeParams['web'][i18n['cite']['web'][p.aliasesP.title]] then
if citeWeb and not citeMismatch['web'] and citeParams['web'][i18n['cite']['web'][aliasesP.referenceURL]] and citeParams['web'][i18n['cite']['web'][aliasesP.title]] then
useCite = citeWeb
useCite = citeWeb
useParams = citeParams['web']
useParams = citeParams['web']

-- (2) use the template that expands stated-in references into citations if there is a match and if at least "stated in" is present
-- (2) use the template that expands stated-in references into citations if there is a match and if at least "stated in" is present
elseif citeQ and not citeMismatch['q'] and citeParams['q'][i18n['cite']['q'][p.aliasesP.statedIn]] then
elseif citeQ and not citeMismatch['q'] and citeParams['q'][i18n['cite']['q'][aliasesP.statedIn]] then
-- we need the raw "stated in" Q-identifier for the this template
-- we need the raw "stated in" Q-identifier for the this template
citeParams['q'][i18n['cite']['q'][p.aliasesP.statedIn]] = self:getReferenceDetail(statement.snaks, p.aliasesP.statedIn, true) -- raw = true
citeParams['q'][i18n['cite']['q'][aliasesP.statedIn]] = self:getReferenceDetail(statement.snaks, aliasesP.statedIn, true) -- raw = true

useCite = citeQ
useCite = citeQ
useParams = citeParams['q']
useParams = citeParams['q']
end
end

if useCite and useParams then
if useCite and useParams then
-- if this module is being substituted then build a regular template call, otherwise expand the template
-- if this module is being substituted then build a regular template call, otherwise expand the template
Linje 1 888: Linje 1 989:
value = value .. "|" .. i .. "=" .. v
value = value .. "|" .. i .. "=" .. v
end
end

value = "{{" .. useCite .. value .. "}}"
value = "{{" .. useCite .. value .. "}}"
else
else
value = mw.getCurrentFrame():expandTemplate{title=useCite, args=useParams}
value = mw.getCurrentFrame():expandTemplate{title=useCite, args=useParams}
end
end

-- (3) else, do some default rendering of name-value pairs, but only if at least "stated in", "reference URL" or "title" is present
-- (3) else, do some default rendering of name-value pairs, but only if at least "stated in", "reference URL" or "title" is present
elseif params[p.aliasesP.statedIn] or params[p.aliasesP.referenceURL] or params[p.aliasesP.title] then
elseif params[aliasesP.statedIn] or params[aliasesP.referenceURL] or params[aliasesP.title] then
citeParams['default'] = {}
citeParams['default'] = {}

-- start by adding authors up front
-- start by adding authors up front
if params[p.aliasesP.author] and #params[p.aliasesP.author] > 0 then
if params[aliasesP.author] and #params[aliasesP.author] > 0 then
citeParams['default'][#citeParams['default'] + 1] = table.concat(params[p.aliasesP.author], " & ")
citeParams['default'][#citeParams['default'] + 1] = table.concat(params[aliasesP.author], " & ")
end
end

-- combine "reference URL" and "title" into one link if both are present
-- combine "reference URL" and "title" into one link if both are present
if params[p.aliasesP.referenceURL] and params[p.aliasesP.title] then
if params[aliasesP.referenceURL] and params[aliasesP.title] then
citeParams['default'][#citeParams['default'] + 1] = '[' .. params[p.aliasesP.referenceURL][1] .. ' "' .. params[p.aliasesP.title][1] .. '"]'
citeParams['default'][#citeParams['default'] + 1] = '[' .. params[aliasesP.referenceURL][1] .. ' "' .. params[aliasesP.title][1] .. '"]'
elseif params[p.aliasesP.referenceURL] then
elseif params[aliasesP.referenceURL] then
citeParams['default'][#citeParams['default'] + 1] = params[p.aliasesP.referenceURL][1]
citeParams['default'][#citeParams['default'] + 1] = params[aliasesP.referenceURL][1]
elseif params[p.aliasesP.title] then
elseif params[aliasesP.title] then
citeParams['default'][#citeParams['default'] + 1] = '"' .. params[p.aliasesP.title][1] .. '"'
citeParams['default'][#citeParams['default'] + 1] = '"' .. params[aliasesP.title][1] .. '"'
end
end

-- then add "stated in"
-- then add "stated in"
if params[p.aliasesP.statedIn] then
if params[aliasesP.statedIn] then
citeParams['default'][#citeParams['default'] + 1] = "''" .. params[p.aliasesP.statedIn][1] .. "''"
citeParams['default'][#citeParams['default'] + 1] = "''" .. params[aliasesP.statedIn][1] .. "''"
end
end

-- remove previously added parameters so that they won't be added a second time
-- remove previously added parameters so that they won't be added a second time
params[p.aliasesP.author] = nil
params[aliasesP.author] = nil
params[p.aliasesP.referenceURL] = nil
params[aliasesP.referenceURL] = nil
params[p.aliasesP.title] = nil
params[aliasesP.title] = nil
params[p.aliasesP.statedIn] = nil
params[aliasesP.statedIn] = nil

-- add the rest of the parameters
-- add the rest of the parameters
for i, v in pairs(params) do
for i, v in pairs(params) do
i = self.conf:getLabel(i)
i = self.conf:getLabel(i)

if i ~= "" then
if i ~= "" then
citeParams['default'][#citeParams['default'] + 1] = i .. ": " .. v[1]
citeParams['default'][#citeParams['default'] + 1] = i .. ": " .. v[1]
end
end
end
end

value = table.concat(citeParams['default'], "; ")
value = table.concat(citeParams['default'], "; ")

if value ~= "" then
if value ~= "" then
value = value .. "."
value = value .. "."
end
end
end
end

if value ~= "" then
if value ~= "" then
value = {value} -- create one value object
value = {value} -- create one value object

if not self.rawValue then
if not self.rawValue then
-- this should become a <ref> tag, so safe the reference's hash for later
-- this should become a <ref> tag, so save the reference's hash for later
value.refHash = "wikidata-" .. statement.hash .. "-v" .. (tonumber(i18n['cite']['version']) + version)
value.refHash = "wikidata-" .. statement.hash .. "-v" .. (tonumber(i18n['cite']['version']) + version)
end
end

ref = {value} -- wrap the value object in an array
ref = {value} -- wrap the value object in an array
end
end
end
end

return ref
return ref
end
end
Linje 1 958: Linje 2 059:
local switchLang = anyLang
local switchLang = anyLang
local value = nil
local value = nil

if not snaks[dType] then
if not snaks[dType] then
return nil
return nil
end
end

-- if anyLang, first try the local language and otherwise any language
-- if anyLang, first try the local language and otherwise any language
repeat
repeat
for i, v in ipairs(snaks[dType]) do
for _, v in ipairs(snaks[dType]) do
value = self.conf:getValue(v, raw, link, false, anyLang and not switchLang, false, true) -- noSpecial = true
value = self.conf:getValue(v, raw, link, false, anyLang and not switchLang, false, true) -- noSpecial = true

if value then
if value then
break
break
end
end
end
end

if value or not anyLang then
if value or not anyLang then
break
break
end
end

switchLang = not switchLang
switchLang = not switchLang
until anyLang and switchLang
until anyLang and switchLang

return value
return value
end
end
Linje 1 986: Linje 2 087:
function State:getReferenceDetails(snaks, dType, raw, link, anyLang)
function State:getReferenceDetails(snaks, dType, raw, link, anyLang)
local values = {}
local values = {}

if not snaks[dType] then
if not snaks[dType] then
return {}
return {}
end
end

for i, v in ipairs(snaks[dType]) do
for _, v in ipairs(snaks[dType]) do
-- if nil is returned then it will not be added to the table
-- if nil is returned then it will not be added to the table
values[#values + 1] = self.conf:getValue(v, raw, link, false, anyLang, false, true) -- noSpecial = true
values[#values + 1] = self.conf:getValue(v, raw, link, false, anyLang, false, true) -- noSpecial = true
end
end

return values
return values
end
end
Linje 2 003: Linje 2 104:
local value = object.value
local value = object.value
local title = nil
local title = nil

if value and self.linked then
if value and self.linked then
if self.conf.entityID:sub(1,1) == "Q" then
if self.conf.entityID:sub(1,1) == "Q" then
title = mw.wikibase.sitelink(self.conf.entityID)
title = mw.wikibase.getSitelink(self.conf.entityID)
elseif self.conf.entityID:sub(1,1) == "P" then
elseif self.conf.entityID:sub(1,1) == "P" then
title = "d:Property:" .. self.conf.entityID
title = "d:Property:" .. self.conf.entityID
end
end

if title then
if title then
value = buildWikilink(title, value)
value = buildWikilink(title, value)
end
end
end
end

value = {value} -- create one value object
value = {value} -- create one value object

if #value > 0 then
if #value > 0 then
return {value} -- wrap the value object in an array and return it
return {value} -- wrap the value object in an array and return it
Linje 2 028: Linje 2 129:
function State:getBadge(value)
function State:getBadge(value)
value = self.conf:getLabel(value, self.rawValue, self.linked, self.shortName)
value = self.conf:getLabel(value, self.rawValue, self.linked, self.shortName)

if value == "" then
if value == "" then
value = nil
value = nil
end
end

value = {value} -- create one value object
value = {value} -- create one value object

if #value > 0 then
if #value > 0 then
return {value} -- wrap the value object in an array and return it
return {value} -- wrap the value object in an array and return it
Linje 2 044: Linje 2 145:
function State:callHook(param, hooks, statement, result)
function State:callHook(param, hooks, statement, result)
local valuesArray, refHash
local valuesArray, refHash

-- call a parameter's hook if it has been defined and if it has not been called before
-- call a parameter's hook if it has been defined and if it has not been called before
if not result[param] and hooks[param] then
if not result[param] and hooks[param] then
valuesArray = self[hooks[param]](self, statement, param, result, hooks) -- array with value objects
valuesArray = self[hooks[param]](self, statement, param, result, hooks) -- array with value objects

-- add to the result
-- add to the result
if #valuesArray > 0 then
if #valuesArray > 0 then
Linje 2 058: Linje 2 159:
end
end
end
end

return false
return false
end
end
Linje 2 065: Linje 2 166:
function State:iterate(statements, hooks, matchHook)
function State:iterate(statements, hooks, matchHook)
matchHook = matchHook or alwaysTrue
matchHook = matchHook or alwaysTrue

local matches = false
local matches = false
local rankPos = nil
local rankPos = nil
local result, gotRequired
local result, gotRequired

for i, v in ipairs(statements) do
for _, v in ipairs(statements) do
-- rankPos will be nil for non-claim statements (e.g. qualifiers, references, etc.)
-- rankPos will be nil for non-claim statements (e.g. qualifiers, references, etc.)
matches, rankPos = matchHook(self, v)
matches, rankPos = matchHook(self, v)

if matches then
if matches then
result = {count = 0} -- collection of arrays with value objects
result = {count = 0} -- collection of arrays with value objects

local function walk(formatTable)
local function walk(formatTable)
local miss
local miss

for i2, v2 in pairs(formatTable.req) do
for i2, v2 in pairs(formatTable.req) do
-- call a hook, adding its return value to the result
-- call a hook, adding its return value to the result
miss = self:callHook(i2, hooks, v, result)
miss = self:callHook(i2, hooks, v, result)

if miss then
if miss then
-- we miss a required value for this level, so return false
-- we miss a required value for this level, so return false
return false
return false
end
end

if result.count == hooks.count then
if result.count == hooks.count then
-- we're done if all hooks have been called;
-- we're done if all hooks have been called;
Linje 2 095: Linje 2 196:
end
end
end
end

for i2, v2 in ipairs(formatTable) do
for _, v2 in ipairs(formatTable) do
if result.count == hooks.count then
if result.count == hooks.count then
-- we're done if all hooks have been called;
-- we're done if all hooks have been called;
Linje 2 102: Linje 2 203:
return true
return true
end
end

if v2.child then
if v2.child then
walk(v2.child)
walk(v2.child)
end
end
end
end

return true
return true
end
end
gotRequired = walk(self.parsedFormat)
gotRequired = walk(self.parsedFormat)

-- only append the result if we got values for all required parameters on the root level
-- only append the result if we got values for all required parameters on the root level
if gotRequired then
if gotRequired then
Linje 2 118: Linje 2 219:
self.conf.foundRank = rankPos
self.conf.foundRank = rankPos
end
end

-- append the result
-- append the result
self.results[#self.results + 1] = result
self.results[#self.results + 1] = result

-- break if we only need a single value
-- break if we only need a single value
if self.singleValue then
if self.singleValue then
Linje 2 129: Linje 2 230:
end
end
end
end

return self:out()
return self:out()
end
end


function extractEntityFromInput(id, allowOmitPropPrefix)
local function getEntityId(arg, eid, page, allowOmitPropPrefix)
local id = nil
if id:sub(1,1):upper() == "Q" then
local prop = nil
return id:upper() -- entity ID of an item was given

elseif id:sub(1,9):lower() == "property:" then
if arg then
return replaceAlias(mw.text.trim(id:sub(10))):upper() -- entity ID of a property was given
elseif allowOmitPropPrefix and id ~= "" then
if arg:sub(1,1) == ":" then
page = arg
return replaceAlias(id):upper() -- could be an entity ID of a property without "Property:" prefix
eid = nil
else
elseif arg:sub(1,1):upper() == "Q" or arg:sub(1,9):lower() == "property:" or allowOmitPropPrefix then
return nil
eid = arg
page = nil
else
prop = arg
end
end
end

if eid then
if eid:sub(1,9):lower() == "property:" then
id = replaceAlias(mw.text.trim(eid:sub(10)))

if id:sub(1,1):upper() ~= "P" then
id = ""
end
else
id = replaceAlias(eid)
end
elseif page then
if page:sub(1,1) == ":" then
page = mw.text.trim(page:sub(2))
end

id = mw.wikibase.getEntityIdForTitle(page) or ""
end

if not id then
id = mw.wikibase.getEntityIdForCurrentPage() or ""
end

id = id:upper()

if not mw.wikibase.isValidEntityId(id) then
id = ""
end

return id, prop
end
end


function extractEntityFromArgs(args, nextIndex, allowOmitPropPrefix)
local function nextArg(args)
local id, eidArg
local arg = args[args.pointer]

if args[nextIndex] then
if arg then
args[nextIndex] = mw.text.trim(args[nextIndex])
args.pointer = args.pointer + 1
return mw.text.trim(arg)
else
else
return nil
args[nextIndex] = ""
end
id = extractEntityFromInput(args[nextIndex], allowOmitPropPrefix)
eidArg = args[p.args.eid]
if id then
return id, nextIndex + 1
elseif eidArg then
return extractEntityFromInput(eidArg, true), nextIndex -- if no positional id was found but eid was given, use eid without a default
else
return mw.wikibase.getEntityIdForCurrentPage(), nextIndex -- by default, use item-entity connected to current page
end
end
end
end


function claimCommand(args, funcName)
local function claimCommand(args, funcName)
local _ = Config.new()
local cfg = Config:new()
_:processFlagOrCommand(funcName) -- process first command (== function name)
cfg:processFlagOrCommand(funcName) -- process first command (== function name)

local parsedFormat, formatParams, claims, value
local lastArg, parsedFormat, formatParams, claims, value
local hooks = {count = 0}
local hooks = {count = 0}

-- set the date if given;
local nextIndex = 1
-- must come BEFORE processing the flags
if args[p.args.date] then
cfg.atDate = {parseDate(args[p.args.date])}
cfg.periods = {false, true, false} -- change default time constraint to 'current'
end

-- process flags and commands
-- process flags and commands
repeat
while _:processFlagOrCommand(args[nextIndex]) do
lastArg = nextArg(args)
nextIndex = nextIndex + 1
until not cfg:processFlagOrCommand(lastArg)

-- get the entity ID from either the positional argument, the eid argument or the page argument
cfg.entityID, cfg.propertyID = getEntityId(lastArg, args[p.args.eid], args[p.args.page])

if cfg.entityID == "" then
return "" -- we cannot continue without a valid entity ID
end
end

cfg.entity = mw.wikibase.getEntity(cfg.entityID)
_.entityID, nextIndex = extractEntityFromArgs(args, nextIndex, false)

if not cfg.propertyID then
-- if eid was explicitly set to empty, then this returns an empty string
cfg.propertyID = nextArg(args)
if _.entityID == nil then
return ""
end
end

cfg.propertyID = replaceAlias(cfg.propertyID)
_.entity = mw.wikibase.getEntity(_.entityID)

_.propertyID = replaceAlias(args[nextIndex]):upper()
if not cfg.entity or not cfg.propertyID then
nextIndex = nextIndex + 1
return "" -- we cannot continue without an entity or a property ID
end
if _.states.qualifiersCount > 0 then

cfg.propertyID = cfg.propertyID:upper()

if not cfg.entity.claims or not cfg.entity.claims[cfg.propertyID] then
return "" -- there is no use to continue without any claims
end

claims = cfg.entity.claims[cfg.propertyID]

if cfg.states.qualifiersCount > 0 then
-- do further processing if "qualifier(s)" command was given
-- do further processing if "qualifier(s)" command was given

if #args - nextIndex + 1 > _.states.qualifiersCount then
if #args - args.pointer + 1 > cfg.states.qualifiersCount then
-- claim ID or literal value has been given
-- claim ID or literal value has been given

_.propertyValue = mw.text.trim(args[nextIndex])
cfg.propertyValue = nextArg(args)
nextIndex = nextIndex + 1
end
end

for i = 1, _.states.qualifiersCount do
for i = 1, cfg.states.qualifiersCount do
-- check if given qualifier ID is an alias and add it
-- check if given qualifier ID is an alias and add it
_.qualifierIDs[parameters.qualifier..i] = replaceAlias(mw.text.trim(args[nextIndex] or "")):upper()
cfg.qualifierIDs[parameters.qualifier..i] = replaceAlias(nextArg(args) or ""):upper()
nextIndex = nextIndex + 1
end
end
elseif _.states[parameters.reference] then
elseif cfg.states[parameters.reference] then
-- do further processing if "reference(s)" command was given
-- do further processing if "reference(s)" command was given

cfg.propertyValue = nextArg(args)
if args[nextIndex] then
_.propertyValue = mw.text.trim(args[nextIndex])
end
-- not incrementing nextIndex because it is never used after this
end
end

-- check for special property value 'somevalue' or 'novalue'
-- check for special property value 'somevalue' or 'novalue'
if _.propertyValue then
if cfg.propertyValue then
_.propertyValue = replaceSpecialChars(_.propertyValue)
cfg.propertyValue = replaceSpecialChars(cfg.propertyValue)

if _.propertyValue ~= "" and mw.text.trim(_.propertyValue) == "" then
if cfg.propertyValue ~= "" and mw.text.trim(cfg.propertyValue) == "" then
_.propertyValue = " " -- single space represents 'somevalue', whereas empty string represents 'novalue'
cfg.propertyValue = " " -- single space represents 'somevalue', whereas empty string represents 'novalue'
else
else
_.propertyValue = mw.text.trim(_.propertyValue)
cfg.propertyValue = mw.text.trim(cfg.propertyValue)
end
end
end
end

-- parse the desired format, or choose an appropriate format
-- parse the desired format, or choose an appropriate format
if args["format"] then
if args["format"] then
parsedFormat, formatParams = parseFormat(args["format"])
parsedFormat, formatParams = parseFormat(args["format"])
elseif _.states.qualifiersCount > 0 then -- "qualifier(s)" command given
elseif cfg.states.qualifiersCount > 0 then -- "qualifier(s)" command given
if _.states[parameters.property] then -- "propert(y|ies)" command given
if cfg.states[parameters.property] then -- "propert(y|ies)" command given
parsedFormat, formatParams = parseFormat(formats.propertyWithQualifier)
parsedFormat, formatParams = parseFormat(formats.propertyWithQualifier)
else
else
parsedFormat, formatParams = parseFormat(formats.qualifier)
parsedFormat, formatParams = parseFormat(formats.qualifier)
end
end
elseif _.states[parameters.property] then -- "propert(y|ies)" command given
elseif cfg.states[parameters.property] then -- "propert(y|ies)" command given
parsedFormat, formatParams = parseFormat(formats.property)
parsedFormat, formatParams = parseFormat(formats.property)
else -- "reference(s)" command given
else -- "reference(s)" command given
parsedFormat, formatParams = parseFormat(formats.reference)
parsedFormat, formatParams = parseFormat(formats.reference)
end
end

-- if a "qualifier(s)" command and no "propert(y|ies)" command has been given, make the movable separator a semicolon
-- if a "qualifier(s)" command and no "propert(y|ies)" command has been given, make the movable separator a semicolon
if _.states.qualifiersCount > 0 and not _.states[parameters.property] then
if cfg.states.qualifiersCount > 0 and not cfg.states[parameters.property] then
_.separators["sep"..parameters.separator][1] = {";"}
cfg.separators["sep"..parameters.separator][1] = {";"}
end
end

-- if only "reference(s)" has been given, set the default separator to none (except when raw)
-- if only "reference(s)" has been given, set the default separator to none (except when raw)
if _.states[parameters.reference] and not _.states[parameters.property] and _.states.qualifiersCount == 0
if cfg.states[parameters.reference] and not cfg.states[parameters.property] and cfg.states.qualifiersCount == 0
and not _.states[parameters.reference].rawValue then
and not cfg.states[parameters.reference].rawValue then
_.separators["sep"][1] = nil
cfg.separators["sep"][1] = nil
end
end

-- if exactly one "qualifier(s)" command has been given, make "sep%q" point to "sep%q1" to make them equivalent
-- if exactly one "qualifier(s)" command has been given, make "sep%q" point to "sep%q1" to make them equivalent
if _.states.qualifiersCount == 1 then
if cfg.states.qualifiersCount == 1 then
_.separators["sep"..parameters.qualifier] = _.separators["sep"..parameters.qualifier.."1"]
cfg.separators["sep"..parameters.qualifier] = cfg.separators["sep"..parameters.qualifier.."1"]
end
end

-- process overridden separator values;
-- process overridden separator values;
-- must come AFTER tweaking the default separators
-- must come AFTER tweaking the default separators
_:processSeparators(args)
cfg:processSeparators(args)

-- define the hooks that should be called (getProperty, getQualifiers, getReferences);
-- define the hooks that should be called (getProperty, getQualifiers, getReferences);
-- only define a hook if both its command ("propert(y|ies)", "reference(s)", "qualifier(s)") and its parameter ("%p", "%r", "%q1", "%q2", "%q3") have been given
-- only define a hook if both its command ("propert(y|ies)", "reference(s)", "qualifier(s)") and its parameter ("%p", "%r", "%q1", "%q2", "%q3") have been given
for i, v in pairs(_.states) do
for i, v in pairs(cfg.states) do
-- e.g. 'formatParams["%q1"] or formatParams["%q"]' to define hook even if "%q1" was not defined to be able to build a complete value for "%q"
-- e.g. 'formatParams["%q1"] or formatParams["%q"]' to define hook even if "%q1" was not defined to be able to build a complete value for "%q"
if formatParams[i] or formatParams[i:sub(1, 2)] then
if formatParams[i] or formatParams[i:sub(1, 2)] then
Linje 2 270: Linje 2 412:
end
end
end
end

-- the "%q" parameter is not attached to a state, but is a collection of the results of multiple states (attached to "%q1", "%q2", "%q3", ...);
-- the "%q" parameter is not attached to a state, but is a collection of the results of multiple states (attached to "%q1", "%q2", "%q3", ...);
-- so if this parameter is given then this hook must be defined separately, but only if at least one "qualifier(s)" command has been given
-- so if this parameter is given then this hook must be defined separately, but only if at least one "qualifier(s)" command has been given
if formatParams[parameters.qualifier] and _.states.qualifiersCount > 0 then
if formatParams[parameters.qualifier] and cfg.states.qualifiersCount > 0 then
hooks[parameters.qualifier] = getHookName(parameters.qualifier, 1)
hooks[parameters.qualifier] = getHookName(parameters.qualifier, 1)
hooks.count = hooks.count + 1
hooks.count = hooks.count + 1
end
end

if args[p.args.max] and tonumber(args[p.args.max]) then
p.numberValue.max = tonumber(args[p.args.max])
end

if args[p.args.round] and tonumber(args[p.args.round]) then
p.numberValue.round = tonumber(args[p.args.round])
end

-- create a state for "properties" if it doesn't exist yet, which will be used as a base configuration for each claim iteration;
-- create a state for "properties" if it doesn't exist yet, which will be used as a base configuration for each claim iteration;
-- must come AFTER defining the hooks
-- must come AFTER defining the hooks
if not _.states[parameters.property] then
if not cfg.states[parameters.property] then
_.states[parameters.property] = State.new(_)
cfg.states[parameters.property] = State:new(cfg, parameters.property)

-- if the "single" flag has been given then this state should be equivalent to "property" (singular)
-- if the "single" flag has been given then this state should be equivalent to "property" (singular)
if _.singleClaim then
if cfg.singleClaim then
_.states[parameters.property].singleValue = true
cfg.states[parameters.property].singleValue = true
end
end
end
end

-- if the "sourced" flag has been given then create a state for "reference" if it doesn't exist yet, using default values,
-- if the "sourced" flag has been given then create a state for "reference" if it doesn't exist yet, using default values,
-- which must exist in order to be able to determine if a claim has any references;
-- which must exist in order to be able to determine if a claim has any references;
-- must come AFTER defining the hooks
-- must come AFTER defining the hooks
if _.sourcedOnly and not _.states[parameters.reference] then
if cfg.sourcedOnly and not cfg.states[parameters.reference] then
_:processFlagOrCommand(p.claimCommands.reference) -- use singular "reference" to minimize overhead
cfg:processFlagOrCommand(p.claimCommands.reference) -- use singular "reference" to minimize overhead
end
end

-- set the parsed format and the separators (and optional punctuation mark);
-- set the parsed format and the separators (and optional punctuation mark);
-- must come AFTER creating the additonal states
-- must come AFTER creating the additonal states
_:setFormatAndSeparators(_.states[parameters.property], parsedFormat)
cfg:setFormatAndSeparators(cfg.states[parameters.property], parsedFormat)

-- process qualifier matching values, analogous to _.propertyValue
-- process qualifier matching values, analogous to cfg.propertyValue
for i, v in pairs(args) do
for i, v in pairs(args) do
i = tostring(i)
i = tostring(i)

if i:match('^[Pp]%d+$') or p.aliasesP[i] then
if i:match('^[Pp]%d+$') or aliasesP[i] then
v = replaceSpecialChars(v)
v = replaceSpecialChars(v)

-- check for special qualifier value 'somevalue'
-- check for special qualifier value 'somevalue'
if v ~= "" and mw.text.trim(v) == "" then
if v ~= "" and mw.text.trim(v) == "" then
v = " " -- single space represents 'somevalue'
v = " " -- single space represents 'somevalue'
end
end

_.qualifierIDsAndValues[replaceAlias(i):upper()] = v
cfg.qualifierIDsAndValues[replaceAlias(i):upper()] = v
end
end
end
end

-- first sort the claims on rank to pre-define the order of output (preferred first, then normal, then deprecated)
if _.entity and _.entity.claims then claims = _.entity.claims[_.propertyID] end
if claims then
claims = sortOnRank(claims)

-- first sort the claims on rank to pre-define the order of output (preferred first, then normal, then deprecated)
-- then iterate through the claims to collect values
claims = sortOnRank(claims)
value = cfg:concatValues(cfg.states[parameters.property]:iterate(claims, hooks, State.claimMatches)) -- pass property state with level 1 hooks and matchHook

-- then iterate through the claims to collect values
-- if desired, add a clickable icon that may be used to edit the returned values on Wikidata
value = _:concatValues(_.states[parameters.property]:iterate(claims, hooks, State.claimMatches)) -- pass property state with level 1 hooks and matchHook
if cfg.editable and value ~= "" then
value = value .. cfg:getEditIcon()
-- if desired, add a clickable icon that may be used to edit the returned values on Wikidata
if _.editable and value ~= "" then
value = value .. _:getEditIcon()
end
return value
else
return ""
end
end

return value
end
end


function generalCommand(args, funcName)
local function generalCommand(args, funcName)
local _ = Config.new()
local cfg = Config:new()
_.curState = State.new(_)
cfg.curState = State:new(cfg)

local lastArg
local value = nil
local value = nil

local nextIndex = 1
repeat
lastArg = nextArg(args)
while _:processFlag(args[nextIndex]) do
until not cfg:processFlag(lastArg)
nextIndex = nextIndex + 1

-- get the entity ID from either the positional argument, the eid argument or the page argument
cfg.entityID = getEntityId(lastArg, args[p.args.eid], args[p.args.page], true)

if cfg.entityID == "" or not mw.wikibase.entityExists(cfg.entityID) then
return "" -- we cannot continue without an entity
end
end

_.entityID, nextIndex = extractEntityFromArgs(args, nextIndex, true)
-- if eid was explicitly set to empty, then this returns an empty string
if _.entityID == nil then
return ""
end
-- serve according to the given command
-- serve according to the given command
if funcName == p.generalCommands.label then
if funcName == p.generalCommands.label then
value = _:getLabel(_.entityID, _.curState.rawValue, _.curState.linked, _.curState.shortName)
value = cfg:getLabel(cfg.entityID, cfg.curState.rawValue, cfg.curState.linked, cfg.curState.shortName)
elseif funcName == p.generalCommands.title then
elseif funcName == p.generalCommands.title then
_.inSitelinks = true
cfg.inSitelinks = true

if _.entityID:sub(1,1) == "Q" then
if cfg.entityID:sub(1,1) == "Q" then
value = mw.wikibase.sitelink(_.entityID)
value = mw.wikibase.getSitelink(cfg.entityID)
end
end

if _.curState.linked and value then
if cfg.curState.linked and value then
value = buildWikilink(value)
value = buildWikilink(value)
end
end
elseif funcName == p.generalCommands.description then
elseif funcName == p.generalCommands.description then
_.entity = mw.wikibase.getEntity(_.entityID)
value = mw.wikibase.getDescription(cfg.entityID)
if _.entity.descriptions[_.langCode] then
value = _.entity.descriptions[_.langCode].value
end
else
else
local parsedFormat, formatParams
local parsedFormat, formatParams
local hooks = {count = 0}
local hooks = {count = 0}

cfg.entity = mw.wikibase.getEntity(cfg.entityID)

if funcName == p.generalCommands.alias or funcName == p.generalCommands.badge then
if funcName == p.generalCommands.alias or funcName == p.generalCommands.badge then
_.curState.singleValue = true
cfg.curState.singleValue = true
end
end

_.entity = mw.wikibase.getEntity(_.entityID)
if funcName == p.generalCommands.alias or funcName == p.generalCommands.aliases then
if funcName == p.generalCommands.alias or funcName == p.generalCommands.aliases then
if not cfg.entity.aliases or not cfg.entity.aliases[cfg.langCode] then
local aliases
return "" -- there is no use to continue without any aliasses
end

local aliases = cfg.entity.aliases[cfg.langCode]

-- parse the desired format, or parse the default aliases format
-- parse the desired format, or parse the default aliases format
if args["format"] then
if args["format"] then
Linje 2 391: Linje 2 536:
parsedFormat, formatParams = parseFormat(formats.alias)
parsedFormat, formatParams = parseFormat(formats.alias)
end
end

-- process overridden separator values;
-- process overridden separator values;
-- must come AFTER tweaking the default separators
-- must come AFTER tweaking the default separators
_:processSeparators(args)
cfg:processSeparators(args)

-- define the hook that should be called (getAlias);
-- define the hook that should be called (getAlias);
-- only define the hook if the parameter ("%a") has been given
-- only define the hook if the parameter ("%a") has been given
Linje 2 402: Linje 2 547:
hooks.count = hooks.count + 1
hooks.count = hooks.count + 1
end
end

-- set the parsed format and the separators (and optional punctuation mark)
-- set the parsed format and the separators (and optional punctuation mark)
_:setFormatAndSeparators(_.curState, parsedFormat)
cfg:setFormatAndSeparators(cfg.curState, parsedFormat)

-- iterate to collect values
if _.entity and _.entity.aliases then aliases = _.entity.aliases[_.langCode] end
value = cfg:concatValues(cfg.curState:iterate(aliases, hooks))
if aliases then
value = _:concatValues(_.curState:iterate(aliases, hooks))
end
elseif funcName == p.generalCommands.badge or funcName == p.generalCommands.badges then
elseif funcName == p.generalCommands.badge or funcName == p.generalCommands.badges then
if not cfg.entity.sitelinks or not cfg.entity.sitelinks[cfg.siteID] or not cfg.entity.sitelinks[cfg.siteID].badges then
_.inSitelinks = true
return "" -- there is no use to continue without any badges
end
local badges

local badges = cfg.entity.sitelinks[cfg.siteID].badges

cfg.inSitelinks = true

-- parse the desired format, or parse the default aliases format
-- parse the desired format, or parse the default aliases format
if args["format"] then
if args["format"] then
Linje 2 421: Linje 2 568:
parsedFormat, formatParams = parseFormat(formats.badge)
parsedFormat, formatParams = parseFormat(formats.badge)
end
end

-- process overridden separator values;
-- process overridden separator values;
-- must come AFTER tweaking the default separators
-- must come AFTER tweaking the default separators
_:processSeparators(args)
cfg:processSeparators(args)

-- define the hook that should be called (getBadge);
-- define the hook that should be called (getBadge);
-- only define the hook if the parameter ("%b") has been given
-- only define the hook if the parameter ("%b") has been given
Linje 2 432: Linje 2 579:
hooks.count = hooks.count + 1
hooks.count = hooks.count + 1
end
end

-- set the parsed format and the separators (and optional punctuation mark)
-- set the parsed format and the separators (and optional punctuation mark)
_:setFormatAndSeparators(_.curState, parsedFormat)
cfg:setFormatAndSeparators(cfg.curState, parsedFormat)

-- iterate to collect values
if _.entity and _.entity.sitelinks and _.entity.sitelinks[_.siteID] then badges = _.entity.sitelinks[_.siteID].badges end
value = cfg:concatValues(cfg.curState:iterate(badges, hooks))
if badges then
value = _:concatValues(_.curState:iterate(badges, hooks))
end
end
end
end
end

value = value or ""
value = value or ""

if _.editable and value ~= "" then
if cfg.editable and value ~= "" then
-- if desired, add a clickable icon that may be used to edit the returned value on Wikidata
-- if desired, add a clickable icon that may be used to edit the returned value on Wikidata
value = value .. _:getEditIcon()
value = value .. cfg:getEditIcon()
end
end

return value
return value
end
end


-- modules that include this module should call the functions with an underscore prepended, e.g.: p._property(args)
-- modules that include this module should call the functions with an underscore prepended, e.g.: p._property(args)
function establishCommands(commandList, commandFunc)
local function establishCommands(commandList, commandFunc)
for commandIndex, commandName in pairs(commandList) do
for _, commandName in pairs(commandList) do
local function wikitextWrapper(frame)
local function wikitextWrapper(frame)
loadSubmodules(frame)
local args = copyTable(frame.args)
args.pointer = 1
return commandFunc(copyTable(frame.args), commandName)
loadI18n(aliasesP, frame)
return commandFunc(args, commandName)
end
end
p[commandName] = wikitextWrapper
p[commandName] = wikitextWrapper

local function luaWrapper(args)
local function luaWrapper(args)
args = copyTable(args)
loadSubmodules()
args.pointer = 1
loadI18n(aliasesP)
return commandFunc(args, commandName)
return commandFunc(args, commandName)
end
end
p["_" .. commandName] = luaWrapper
p["_" .. commandName] = luaWrapper
end
end
end
end
Linje 2 475: Linje 2 624:
-- main function that is supposed to be used by wrapper templates
-- main function that is supposed to be used by wrapper templates
function p.main(frame)
function p.main(frame)
if not mw.wikibase then return nil end
local f, args, i, v

local f, args
loadSubmodules(frame)

loadI18n(aliasesP, frame)

-- get the parent frame to take the arguments that were passed to the wrapper template
-- get the parent frame to take the arguments that were passed to the wrapper template
frame = frame:getParent() or frame
frame = frame:getParent() or frame

if not frame.args[1] then
if not frame.args[1] then
throwError("no-function-specified")
throwError("no-function-specified")
end
end

f = mw.text.trim(frame.args[1])
f = mw.text.trim(frame.args[1])

if f == "main" then
if f == "main" then
throwError("main-called-twice")
throwError("main-called-twice")
end
end

assert(p["_"..f], errorText('no-such-function', f))
assert(p["_"..f], errorText('no-such-function', f))

-- copy arguments from immutable to mutable table
-- copy arguments from immutable to mutable table
args = copyTable(frame.args)
args = copyTable(frame.args)

-- remove the function name from the list
-- remove the function name from the list
table.remove(args, 1)
table.remove(args, 1)

return p["_"..f](args)
return p["_"..f](args)
end
end

Siste sideversjon per 7. jan. 2025 kl. 20:42

Modulen henter data fra elementet på Wikidata, med eller uten kobling til artikkelen. Den inneholder også en rekke andre funksjoner.

Modulen er basert på Wd (enwiki), men er tilpasset for bruk på nowiki.

Bruk[rediger kilde]

Den generelle strukturen for et kall til denne modulen er som følger. (Legg merke til at grunnstrukturen består av kommandoer, flagg og argumenter, som alle har en fast posisjon.)

{{#invoke:Wd-norsk |kommando1|flagg1a|flagg1b|flagg1c |kommando2|flagg2a|flagg2b|flagg2c |flagg0a|flagg0b|flagg0c |arg1|arg2|arg3

Bruk forskjellige #Kommandoerkommandoer for å få forskjellige typer verdier fra Wikidata. Minst en kommando må gis, og flere kommandoer kan kombineres som vist ovenfor (i vilkårlig rekkefølge, mer enn to er mulig), men dette gjelder bare kommandoer fra utsagnsklassen; kall som inneholder en kommando fra den generelle klassen, kan ikke inneholde andre kommandoer. Hver kommando kan følges av et hvilket som helst antall kommandoflagg, som er valgfrie og kan brukes til å finjustere resultatet fra kommandoen.

Kommandoene og flaggene deres kan etterfølges av et hvilket som helst antall konfigurasjonsflagg, som også er valgfrie og påvirker valg av data og modulens oppførsel generelt. Kallet avsluttes med posisjonsargumenter, som kan være påkrevd avhengig av den/de gitte kommandoene. Noen navngitte argumenter (dvs. navn-verdi-par) eksisterer også, i tillegg til et sett med navngitte flagg for avansert bruk, som kan brukes til å endre måten hentede verdier slås sammen i resultatet.

Denne modulen ble lagd for å dekke de grunnleggende behovene for å hente data fra Wikidata. Mange avanserte behov kan dekkes ved sammensatte kall. Slike sammensatte kall kan pakkes inn i spesielle maler for spesifikke behov. Sjekk avsnittet om vanlig bruk nedenfor for eksempler på nyttige «byggesteiner».

Vanlig bruk[rediger kilde]

Nedenfor følger en liste av vanlige kall. I fremtiden kan kortkommandoer implementeres som tilsvarer disse kallene.

Kall Bruksområde
{{wd|label|raw}} Returnerer Q-identifikatoren til Wikidata-elementet som er koblet til den gjeldende siden (f.eks. "Q55").
{{#if:{{wd|label|raw}}|...}} Utfører en sjekk for å se om siden har et Wikidata-element.

Merk at dette kallet er avhengig av en returnert verdi som enten er tom eller ikke-tom, og at rå -flagget er viktig å ta med. Uten dette flagget ville en eksisterende vares vanlige etikett bli returnert som kan være tom, noe som gir et uønsket resultat. Hvis flagget er gitt på den annen side, returneres alltid en ikke-tom Q-identifikator hvis et element eksisterer og en tom verdi hvis et element ikke eksisterer.

Kommandoer[rediger kilde]

Kommandoene (kommando1, kommando2, ...) avgjør hvilke verdier som blir hentet. Kommandoer fra utsagn og signatur kan ikke kalles samtidig.

Utsagn[rediger kilde]

Kommandoer for utsagn (claim class) kan kombineres, det betyr at du kan bruke flere fra denne gruppen samtidig.

Kombiner flere kommandoer til ett kall på modulen, i stedet for flere kall til modulen med en kommando for hvert kall, for å være sikker på at alle delresultat passer sammen.

Type Kommando Returnerer Grunnleggende bruk Beskrivelse
I egenskap første treff[utsagn 1] {{#invoke:Wd-norsk|egenskap|P1}} Returnerer etterspurt egenskapen – eller en liste av egenskaper – fra det koblede elementet eller elementet med gitt ID.
Denne kommandoen kan kun gis én gang i et kall.
egenskaper alle treff {{#invoke:Wd-norsk|egenskaper|P1}}
II kvalifikator første treff[utsagn 1] {{#invoke:Wd-norsk|kvalifikator|P1|P2}} Returnerer etterspurt kvalifikator – eller en liste med kvalifikatorer – fra det koblede elementet eller elementet med gitt ID.
I motsetning til andre utsagnskommandoer kan denne gis flere ganger for å hente mer informasjon.
kvalifikatorer alle treff {{#invoke:Wd-norsk|kvalifikatorer|P1|P2}}
III referanse første treff[utsagn 1] {{#invoke:Wd-norsk|referanse|P1}} Returnerer etterspurt referanse – eller en liste med referanser – fra det koblede elementet eller elementet med gitt ID.[utsagn 2]
Denne kommandoen kan kun gis én gang i et kall.
referanser alle treff {{#invoke:Wd-norsk|referanser|P1}}
  1. ↑ 1,0 1,1 1,2 Returnerer kun en enkel verdi isteden for flere (hvis flere verdier eller søk stemmer). Det som returneres er den første som er funnet som er rangerer best
  2. ↑ Bare kilder som er gyldig i henhold til Wikidata retningslinjer på kilder er returnert (f.eks. de som minst har en verdi d:P248 eller d:P854.

Signatur[rediger kilde]

Kommandoer for signatur (general class) kan ikke kan ikke kombineres med hverandre.

Type Kommando Returnerer Grunnleggende bruk Beskrivelse
I etikett {{#invoke:Wd-norsk|etikett}} Returnerer etiketten til det koblede elementet eller elementet med gitt ID.
II tittel {{#invoke:Wd-norsk|tittel}} Returnerer tittel til det koblede elementet eller elementet med gitt ID.
III beskrivelse {{#invoke:Wd-norsk|beskrivelse}} Returnerer beskrivelsen til det koblede elementet eller elementet med gitt ID.
IV alias første treff[signature 1] {{#invoke:Wd-norsk|alias}} Returnerer et alias – eller en liste av aliaser – til det koblede elementet eller elementet med gitt ID.
aliaser alle treff {{#invoke:Wd-norsk|aliaser}}
V merke første treff[signature 1] {{#invoke:Wd-norsk|merke}} NB! Merke og Merker funker ikke for øyeblikket
Returnerer et merke – eller liste av merker – til det koblede elementet eller elementet med gitt ID.
merker all matches {{#invoke:Wd-norsk|merker}}
  1. ↑ 1,0 1,1 Returnerer kun en enkel verdi isteden for flere (hvis flere verdier eller søk stemmer).

Hovedkallet[rediger kilde]

Kommandoen main brukes alltid alene og tar ikke flagg eller argumenter. Den videreformidler parametre fra overordnede (innkapslende) maler til denne modulen.

Kommando Grunnlegene bruk Beskrivelse
main {{#invoke:Wd-norsk|main|kommando|P1}} Beregnet for bruk fra overordnede (innkapslende) maler for å kalle en eller flere kommandoer, og returnere resultatet fra dem.
Parametrene som blir gitt malene vil bli videresent til modulen. F.eks. {{wikidata-norsk|egenskap|P1549}} → {{#invoke:Wd-norsk|main}} → {{#invoke:Wd-norsk|main|property|P1549}}

Derfor vil parametere satt i malen bli forkastet, f.eks. {{wikidata-norsk|property|P1549}} → {{#invoke:Wd-norsk|main|qualifier|P1082|P585}} → {{#invoke:Wd-norsk|main|property|P1549}}.

Flagg[rediger kilde]

Følgende (valgfrie) flagg er tilgjengelig for å kunne endre denne modulens adferd. De må bli gitt etter den første kommando og før andre argumenter. For enkelhetens skyld er tomme flagg (f.eks. ||) tiltatt og vil simpelthen bli ignorert.

Kommandoflagg[rediger kilde]

Flaggene (flag1*, flag2*, ...) gjelder første kommando som står foran dem.

Flagg Forklaring
linket Oppretter en link til Wikipedia artikkelen som er koblet til egenskap eller kvalifikator hvis en artikkel eksisterer. Den linker også måleenheter for mengde (quantity).

Hvis dette flaget er utelatt, vil egenskap eller kvalifikator tas med som ren tekst.

kortnavn [RESSURSKREVENDE] Returnerer (P1813) av enhver entitet hvis det eksisterer. Hvis entiteten ikke har kortnavn så vil etiketten brukes som vanlig.
rå Returnerer rå verdi hvis det er mulig, gitt andre kommandoer og flagg.

Hvis flagget er brukt med et element eller en egenskap, så vil resultatet være Q-identen eller P-identen istedenfor en ordinær etikett.

For mengde (quantity) type vil flagget fjerne alle måleenheter, med mindre måleenhet flagget også er gitt, men da vil måleenheten bli gitt som en Q-ident.

Hvis flagget er brukt med datotype, så vil datoen hentes i formatet åååå-mm-dd (f.eks. 1731-02-11), eller åååå-mm eller åååå avhengig av datoens presisjon. Datoer i den julianske kalenderen lagret med en presisjon med dager gjennom millennium vil ha /Julian lagt til resultat (f.eks. 1731-02-11/Julian, som kan bli fjernet ved å bruke {{#titleparts}} parserfunksjonen).

Hvis flagget er brukt med globe koordinattype, så vil noen symboler bli erstattet med fremoverskråstrek i verdien (f.eks. 52/5/3/N/4/19/3/E), som igjen kan bli fjernet ved å bruke {{#titleparts}} parserfunksjonen).

flerspråklig Henter teksten i ethvert tilgjengelig språk, ikke bare prosjektets språk (dvs Norsk på nowiki).
måleenhet Henter kun måleenheten for mengde (quantity) datatypen.

Konfigurasjonsflagg[rediger kilde]

Flaggene (flag0*) er generelle konfigurasjonsflagg, og kan bli gitt når som helst etter første kommando, men før de andre argumentene.

Flagg Kommando gruppe Beskrivelse
Kombinasjon av: foretrukket hente Setter en rang begrensing for de valgte resultat(ene).

De første tre setter rang etter hvilket resultat(er) vil bli valgt. De kan alternativt bli fulgt med + eller -, f.eks. normal+ eller foretrukket-, hvor den første velger resultater med 'normal' rang eller høyere og den andre velger resultater med 'foretrukket' rang eller lavere. For å få resultater fra alle rangene bruk foretrukket- eller avskrevet+

Hvis best flagg er brukt vil det eneste resultatet som valgt den med høyest rank av alle resultatene bli valgt.

Det vanlige er normal+|best (så standard er resultatene med 'avskrevet' rang aldri hentet).

Resultatet vil alltid bli sorter fra høyest rang til lavest (uavhengig av at noen av disse flagge blir brukt).

normal
avskrevet
best
Kombinasjon av: fremtid hente Setter en tids begrensing for resultanten. Den anvender kvalifikatorene startdato (P580) og sluttdato (P482) for å avgjøre den riktige valgte perioden.

Det vanlige er fremtid|nåværende|tidligere (så standarden er resultat er gyldig for hvilket som helst tids periode).

nåværende
tidligere
mdå hente Henter datoen i måned-dag-år rekkefølge istdenfor dag-måned-år rekkefølgen.
enkel hente Henter bare en enkel resultat istedenfor mange (hvis det er flere treff). Den har ingen effekt på egenskap/egenskaper kommando som er gitt, i gitt tilfelle vil flagge være unødvendig.
referert hente Henter kun verdier som har minst en gyldig referanse.
En av: rediger hente, generell Legger til en klikkbart ikon som leder til Wikidata hvor leser har mulighet til å redigere informasjonen.

Hvis redigerpåslutten er brukt, vil ikonet plasseres på slutten av linjen for fine info bokser.

redigerpåslutten

Argumenter[rediger kilde]

Argumentene avgjør kilden fra hvor alle verdier blir hentet fra.

Posisjonelle argumenter[rediger kilde]

Denne tabellen viser de tilgjengelige posisjonelle argumentene (arg*) i dens låste rekkefølge. For hver kommando den aktuelle argumentert er markert. Hvis flere kommandoer er gitt er gjeldene sett forenlig med de mindre settene. For eksempel, hvis kommandoene egenskaper og kvalifikatorer er gitt skal minimum begge argumentene egenskap_id og kvalifikator_id bli gitt.

Mer enn en kvalifikator/kvalifikatorer kommandoer kan bli gitt. Rekkefølgen av de gitte kommandoene og deres flagg gir samme rekkefølgen som hvordan de respektive kvalifiaktor_id argumentene gies.

(påkrevd) (valgfri) (valgfri) (påkrevd) (valgfri) (påkrevd) (påkrevd)
{{#invoke:Wd kommandoer flagg artikkel_id egenskap_id rå_verdi kvalifikator_id kvalifikator_id }}
etikett, tittel,
beskrivelse,
alias/aliaser,
merke/merker
egenskap/egenskaper
referanse/referanser
kvalifikator/kvalifikatorer
kvalifikator/kvalifikatorer (valgfri 2., 3., osv.)


Under er beskrivelse av alle posisjonelle argumenter.

Argument Beskrivelse
artikkel_id

(valgfri)

[RESSURSKREVENDE] Q-IDtil artikkelen som skal hentet (f.eks. Q20), eller P-ID (eller en tilgjengelig alias) av egenskap-verdien som skal bli hentet av Egenskap: prefiks (f.eks. Egenskap:P38).

I forhold til generelle kommando gruppen, kan Egenskap: prefiksen bli droppet for P-ID (f.eks. P38).

Hvis denne parameteren ikke er brukt vil artikkel ID koblet til siden hvor modulen brukes (ved untakt hvis eid= er i bruk, mer info under). Hvis denne parameteren er gitt men er tom (f.eks. ||), vil den på grunn av sin plassering blir sett på som et tomt flagg og dermed bli ignorert, og gi samme resultat som om parameteren ikke hadde vært brukt. Se også eid= navngitte argumenter under som også kan brukes til å gi en artikkel ID, men uten at at artikkel ID koblet til siden modulen anvendes i.

egenskaps_id P-ID (eller en tilgjengelig alias) av egenskapen i artikkelen som skal bli hentet uten Egenskap: prefiksen (f.eks. P35).
rå_verdi

(optional)

Enten Q-ID lik til egenskaps verdien (f.eks. Q29574) eller en bokstavelig verdi (som streng eller mengde osv., ingen etikett er gyldig) som er lik den rå egenskap verdien av det som skal hentes.

Datoer som bokstavelig verdi må bli formatert åååå-mm-dd (f.eks. 1731-02-11 for datoer med nøyaktighetsnivå til dager, åååå-mm (f.eks. 1731-02) for datoer med presisjon til måneder, og åååå (f.eks. 1731 for datoer med lavere nøyaktighet. Datoer f.Kr. krever et minustegn foran årstallet (f.eks. -29500-01-31). Datoer lagret i den julianske kalenderen må ha /Julian lagt til på slutten (f.eks. 1731-02-11/Julian). Tiår som 2010-tallet må bli gitt som 2010 (men 2010-tallet f.Kr. som -2019, århundre som 20. århundre som 1901 (men som 20. århundre f.Kr. -2000, og for årtusener som den 3. årtusen som 2001 (men 3. årtusen f.Kr. som -3000.

Globe koordinater som bokstavelig verdi må bli formater med fremover skråstreker (f.eks. /) mellom delene og ingen symboler (f.eks. 52/5/3/N/4/19/3/E) uten noen mellomrom eller ledene null.

Den spesielle typen 'no value' kan bli gitt med å bruke en tom streng (slik ||) og den spesielle typen 'unknown value' kan bli gitt med å legge inn en enkel understrek (slik |_|). For å få faktisk understrek sett en bakover skråstrek \ direkte forran (slik \_, det samme gjelder for faktiske bakover skråstreker (slik \\.

For å få en faktisk loddrett strek |, bruk {{!}} eller &#124;.

Hvis denne parameteren er utelatt vil alle søk (møter alle andre krav) innen egenskapen bli hentet.

kvalifikator_id P-ID (eller en tilgjengelig alias) av egenskapen i artikkelen som skal bli hentet uten Egenskap: prefiksen (f.eks. P580).

Navngitte argumenter[rediger kilde]

Under er en tabell med beskrivelser av alle navngitte argumenter som er kommandoer som brukes |navn=verdi. Disse er alle valgfrie og kan bli brukt hvor som helst etter første kommando.

Argument Beskrivelse
eid= [RESSURSKREVENDE] Dette argumentet tilbyr funksjonalitet som posisjonelle argumente artikkel_id (f.eks. >|eid=Q55), med en forskjell: hvis argumentet er gitt men er blitt stående tom (|eid=) vil ingen artikkel bli hentet. Dette er nyttig hvor en artikkel_id er foreventet, men hvor sidens artikkel ikke skal bli brukt som standard.

Også Egenskap: prefiksen kan bli utelatt for P-ID (f.eks. |eid=P38) for alle kommandoer.

Dette argument har bare effekt hvis det posisjonelle argumentet artikkel_id er utelatt.

<kvalifikator>= <kvalifikator> er en plassholder for sett med argumenter for å avgjøre hvilket resultat som skal bli hentet basert på kvalifikator verdi, den benytter seg av Posisjonelle argumentene egenskaps_id og rå_verdi for å avgjøre hvilken resultater den skal hente.

<kvalifikator> er hvilken som helst kvalifikator P-ID (eller en tilgjengelig alias) uten bruk av Egenskap: prefiksen (f.eks. P518). Dens verdi er enten Q-verdi lik en av kvalifikatorens verdier (f.eks. Q27561 eller en bokstavelig verdi(som streng eller menge osv., igen etiketter kan brukes) lik rå verdien til kvalifikatorens verdier til resultatet. Verdi formater er det samme som det posisjonelle argumentet rå_verdi. Den spesielle verditypen 'no value' er gitt med en tom streng vil også gi resultater som totalt mangler den verdien i kvalifikatoren.

Eksempel: |P512=Q27561

Flere argumenter av denne typen kan brukes til å sammenligne flere kvalifaktor verdier samtidig.

maks= maks er en plassholder for et sett med referanser for å avgjøre maks antall referanser som skal bli hentet. Kun på nowiki.

Eksempel: |maks=2

avrund= avrund er en plassholder for bruk på egenskaper med datatype størrelse. Brukes ved å sette et nummer (int) for antall desimaler ønsket. Kun på nowiki.

Eksempel: |avrund=2

Egenskap aliaser[rediger kilde]

Egenskap aliaser er alternative navn for P-ID og kan bli benyttet istedet. Følgende aliaser er sensitiv for store og små bokstaver.

Alias P-ID
coord P625
image P18
author P50
publisher P123
importedFrom P143
statedIn P248
pages P304
language P407
publicationDate P577
startTime P580
endTime P582
chapter P792
retrieved P813
referenceURL P854
sectionVerseOrParagraph P958
archiveURL P1065
title P1476
formatterURL P1630
quote P1683
shortName P1813
archiveDate P2960
inferredFrom P3452
typeOfReference P3865
column P3903

Avansert bruk[rediger kilde]

Oppsettet av resultatet fra kommando(er) som både har en enkel og flere resultater (f.eks. egenskap/egenskaper) kan bli tilpasset med å bruke forskjellige navngitte flagg (|flagg=verdi), som kan brukers hvor som helst etter første kommando. Tabellen under viser de tilgjengelige flaggene.

For å sette inn et mellomrom i starten eller slutten av verdi, bruke en understrek _. For å få en faktisk underskrek plasser en bakover skråstrekt \ direkte foran (slik \_), det samme gjelder for faktiske bakover skråstrek (f.eks. \\). For å få en rett strek |, bruk {{!}} eller &#124;.

Navngitt flagg Standard verdi Standard krav Beskrivelse
format= %p[%s][%r] hvis egenskap/egenskaper kommando var brukt og kvalifikator/kvalifikatorer kommando var ikke gitt Formatet for et enkel resultat. De tilgjengelige parametre er som følger:
Parameter Beskrivelse
%p Resultatet hentet av egenskap/egenskaper kommando.
%q1, %q2, %q3, ... Resultatet hentet av kvalifikator verdi eller liste med kvalifikator verdier kvalifikator/kvalifikatorer kommando.
%q Sammlingen av alle kvalifikator verdier fra kvalifikator/kvalifikatorer kommando (som %q1 + %q2 + %q3 + ...). Hvis bare en kvalifikator/kvalifikatorer kommando var gitt er denne kommandoen det samme som %q1.
%r Den hentet referansen eller listen av referater hentet av referanse/referanser kommando.
%a Artikkelen alias eller aliaser hentet av alias/aliaser kommando.
%b Artikkelens merke eller merker hentet av merke/merker kommando.
%s Den flyttbare plassholder separatoren. Dette er en spesiell kommando som ikke er anvendt av en kommando, men istedet er puttet imellom vært resultat (gitt en liste med resultater). Dette er praktisk når referanser hentes også, siden det gir muligheten til at referansen blir plassert etter punktum. Standard verdien er (,) men den kan bli overstyrt med sep%s flagget (se nedenfor).

Valgfrie parameter kan bli gitt med å pakke inn i klammeparenteser: [...]. Alt innholdet mellom klammeparentesen vil bare bli vist hvis en verdi for hver valgfri parameter mellom klammeparentes eksisterer. Valgfri innhold kan også bli gruppert.

Minst en parameter må bli gitt som ikke er valgfri, mens %s parametere må alltid være satt som valgfri.

For å bokstavelig få [, ], % eller \, plasser en bakover skråstrek \ direkte foran tegnet (f.eks. \%). Se også beskrivelsen rett over denne tabellen for mer informasjon.

%q[%s][%r] hvis egenskap/egenskaper kommando ikke var brukt og kvalifikator/kvalifikatorer kommando var gitt
%r hvis bare referanse/referanser kommandoen var gitt
%p[ <span style="font-size:85\%">(%q)</span>][%s][%r] hvis egenskap/egenskaper kommando var brukt og kvalifikator/kvalifikatorer kommando var gitt
%a[%s] hvis alias/aliaser kommando var gitt
%b[%s] hvis merke/merker kommando var gitt
sep= standard Den satte separatoren mellom hvert par av resultater.
  hvis bare referanse/referanser kommando har blitt gitt uten rå flagg
sep%s= , standard Den flyttbare separatoren mellom hvert resultat. Dette vil være verdien av %s parameter vil gjelde alle resultater ved unntak av den siste i listen.
; hvis egenskap/egenskaper kommando ikke var brukt og kvalifikator/kvalifikatorer kommando var gitt
sep%q1=, sep%q2=, sep%q3=, ... , standard Separatoren mellom resultater av kvalifikatorer fra et søk. Disse verdiene er separatoren for %q1, %q2, %q3, ... parameterne.

Hvis bare en kvalifikator/kvalifikatorer kommando var gitt er sep%q1 flagget det samme som sep%q.

sep%q= , hvis nøyaktig en kvalifikator/kvalifikatorer kommando var gitt Separatoren mellom resultater av kvalifikatorer fra et søk. Disse verdiene er separatoren for %q parameterne.

Hvis bare en kvalifikator/kvalifikatorer kommando var gitt er sep%q1.

; hvis mer enn en kvalifikator/kvalifikatorer kommando var gitt
sep%r=   standard Separatoren mellom hver referanse av et enkelt søk. Dette er separatoren for %r parametere.
hvis rå flagget var gitt for referanse/referanser kommando
punc=   standard Et punktum plassers på slutten av resultatet. Dette vil bli plassert på %s parameter som settes til siste resultat i listen.

Dette gjør at referanser vil bli plassert etter punktum når den er brukt som del av settingen.

Eksempler[rediger kilde]

Parametere Kode Resultat Beskrivelse
Q20 = "", P396 = "" {{#invoke:Wd-norsk|egenskap|Q20|P395}} Får en streng verdi.
P396 = "" {{#invoke:Wd-norsk|egenskap|P395}} Hvis modulen brukes på siden Norge hentes artikkel-id Q20 automatisk og trenges ikke defineres.
Q20 = "", P396 = "" {{#invoke:Wd-norsk|egenskap|eid=Q20|P395}} En artikkel-ID kan også bli gitt med å bruke eid= argumentet.
Q20 = "", P396 = "" {{#invoke:Wd-norsk|egenskap|rediger|Q20|P395}} Legger til en klikkbar ikon som sender til hvor man kan redigere daten i Wikidata.
Q20 = "", P396 = "" {{#invoke:Wd-norsk|egenskap|redigerpåslutten|Q20|P395}} Plasserer redigeringsikonet på slutten av linjen.
Q20 = "", P2250 = "" {{#invoke:Wd-norsk|egenskap|normal+|Q20|P2250}} Henter en verdi som er rangert normal eller høyere.
Q20 = "", P2250 = "" {{#invoke:Wd-norsk|egenskaper|normal+|Q20|P2250}} Henter flere verdier som er rangert normal eller høyere.
Q20 = "", P2250 = "",
P585 ="" 		{{#invoke:Wd-norsk|egenskap|kvalifikator|normal+|Q20|P2250|P585}} Henter en kvalifikator fra hver verdi som hentes.
Q20 = "", P2250 = "",
P585 ="" 		{{#invoke:Wd-norsk|egenskap|kvalifikator|referanser|normal+|Q20|P2250|P585}} Henter referansene for hver verdi.
Q20 = "", P2250 = "", Forventet levetid er {{#invoke:Wd-norsk|egenskap|referanser|normal+|Q20|P2250}} i Norge. Forventet levetid er i Norge. Hente verdi med referanser for å implementer i en setning.
Q20 = "", P2250 = "", Forventet levetid i Norge er {{#invoke:Wd-norsk|egenskap|referanser|normal+|Q20|P2250|punc=.}} Forventet levetid i Norge er Legger til et punktum på slutten av resultatet, men før referansen.
Q20 = "", P1081 = "",
P585 ="" 		<ul>{{#invoke:Wd-norsk|egenskap|kvalifikator|referanser|normal+|Q20|P1081|P585|format=<li>%p[%r][<ul><li>%q</li></ul>]}}</ul>
    		Gir resultatene i egendefinert format.
    Q20 = "", P2250 = "", {{#invoke:Wd-norsk|kvalifikator|normal+|Q20|P2250|P585}} Henter en kvalifikator for vær verdi i P2250.
    Q20 = "", P2250 = "",
    P585 =""     		{{#invoke:Wd-norsk|kvalifikator|normal+|enkel|Q20|P2250|P585}} Henter kun en kvalifiaktor fra kun en verdi. enkel gjør egenskap til kun å hente en også.
    Q20 = "", P2250 = "",
    P585 =""     		{{#invoke:Wd-norsk|kvalifikator|normal+|enkel|Q20|P2250|P585}} Henter kun en kvalifiaktor fra kun en verdi. enkel gjør egenskap til kun å hente en også.
    Q55 = "", P1082 = "",
    P585 =""     		{{#invoke:Wd-norsk|kvalifikator|Q55|P1082|16829289|P585}} Henter en kvailifaktor fra en egenskap verdi som matcher den gitte ID verdien.
    Q55 = "", P1082 = "",
    P585 =""     		{{#invoke:Wd-norsk|kvalifikator|mdå|Q55|P1082|16829289|P585}} Henter datoen i måned-dag-år format.
    Q55 = "", P1082 = "",
    P585 =""     		{{#invoke:Wd-norsk|kvalifikator|rå|Q55|P1082|16829289}} Henter verdien rå fra Wikidata.
    Q55 = "", P1082 = "", {{#invoke:Wd-norsk|referanser|Q55|P1082|16829289}} Henter referanser får spesifikt verdi.
    Q55 = "", P1082 = "", {{#invoke:Wd-norsk|referanser|rå|Q55|P1082|16829289}} Henter referanser rå fra Wikidata.
    Q20 = "", P1082 = "", {{#invoke:Wd-norsk|egenskaper|referanser|normal+|Q20|P1082}} Henter alle egenskapverdier med alle referanser de her.
    Q20 = "", P1082 = "", {{#invoke:Wd-norsk|egenskaper|referanser|referert|normal+|Q20|P1082}} Henter kun data som har kilder.
    Q20 = "", P30 = "",
    P518 = "     		{{#invoke:Wd-norsk|kvalifikator|Q20|P30|P518}} Henter kun en kvalifikator fra P518 for hver verdi i P30.
    Q20 = "", P30 = "",
    P518 = "     		{{#invoke:Wd-norsk|kvalifikatorer|Q20|P30|P518}} Henter alle kvalifikatorer fra P518 for hver verdi i P30.
    Q20 = "", P30 = "",
    P518 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikatorer|Q20|P30|P518}} Henter alle egenskapverdier med alle kvalifikatorer.
    Q20 = "", P30 = "",
    P518 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikatorer|Q20|P30|P518|sep=_og_|sep%s=|sep%q=_/_}} Returnerer dataen med egendefinert separatorer.
    Q20 = "", P35 = "",
    P580 = ", P582 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikator|kvalifikator|normal+|Q20|P30|P580|P582}} Henter en verdi fra to kvalifikatorer.
    Q20 = "", P35 = "",
    P580 = ", P582 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikator|kvalifikator|normal+|Q20|P30|P580|P582|sep%q=_-_}} Returnere verdier med egendefinert separator.
    Q20 = "", P35 = "",
    P580 = ", P582 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikator|kvalifikator|normal+|Q20|P30|P580|P582|format=%p[ (%q1[ - %q2])[%s][%r]}} Returnere verdier med egendefinert format.
    Q20 = "", P35 = "",
    P580 = ", P582 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikator|kvalifikator|normal+|Q20|P30|P580|P582|format=%p[ ([<![]--%q2]siden [%q2--[]>]%q1[ - %q2])[%s][%r]}} For å legge til tekst som bare vises hvis en verdi ikke funnet. Som i dette eksemplet legge til order siden hvis det ikke er noen sluttdato gjøres med å pakke ordet inn mellom to valgfri bokser som inneholder HTML kommentar tagger og den relevante parameteren (dette forhindrer også teksten fra å bli lagt inn i sidens kilde).
    Q20 = "", P35 = "",
    Q154912 = "",
    P580 = ", P582 = "     		{{#invoke:Wd-norsk|egenskaper|kvalifikator|rå|kvalifikator|normal+|Q20|P30|Q154912|P580|P582|format=%p[ <span style="font-size:85\%">(%q1[ - %q2])</span>[%s][%r]}} Henter egenskapverdi med kvalifikatorer som stemmer med gitt Q-ID, ,ed en av kvalifikatorverdien i rå form.
    Q20 = "", P38 = "",
    P92 = ""     		{{#invoke:Wd-norsk|egenskaper|kvalifikatorer|nåværende|Q20|P38|P92}} Henter de nåværende riktige.
    Q20 = "", P38 = "",
    P92 = ""     		{{#invoke:Wd-norsk|egenskaper|linket|kvalifikatorer|nåværende|Q20|P38|P92}} Henter egenskapsverdeier med linker når det er tilgjengelig.
    Q20 = "", P38 = "",
    P92 = ""     		{{#invoke:Wd-norsk|egenskaper|kvalifikatorer|linket|nåværende|Q20|P38|P92}} Henter kvalifikatorverdier med linker når det er tilgjengelig.
    Q20 = "", P38 = "",
    P92 = ""     		{{#invoke:Wd-norsk|egenskaper|linket|kortnavn|kvalifikatorer|linket|nåværende|Q20|P38|P92}} Henter egenskapverdier og kvalifikatorverdier med linker når det er tilgjengelig. Itillegg hentes egenskapverdiers kortnavn hvis tilgjengelig.
    Q20 = "", P38 = "",
    Q132643 = "",
    P92 = ""     		{{#invoke:Wd-norsk|kvalifikatorer|nåværende|Q20|P38|Q13263|P92}} Henter kvalifikatorverdier hvor egenskapverdien er den samme som Q132643.
    Q20 = "", P38 = "",
    P92 = "",
    Q642673 = ""     		{{#invoke:Wd-norsk|egenskaper|nåværende|Q20|P38|P92=Q642673}} Henter egenskapverdier hvor kvalifiaktorverdien er den samme som Q642673.
    Q20 = "", P35 = "" {{#invoke:Wd-norsk|egenskaper|tidligere|Q20|P35}} Henter egenskapverdier som var gjeldene tidligere.
    Q20 = "", P35 = "" {{#invoke:Wd-norsk|egenskaper|rå|tidligere|Q20|P35}} Henter egenskapverdier som var gjeldene tidligere som rådata.
    Q20 = "", P35 = "" {{#invoke:Wd-norsk|egenskaper|rå|linket|tidligere|Q20|P35}} Henter egenskapverdier som var gjeldene tidligere som rådata med linker.
    Q20 = "", P1549 = "" {{#invoke:Wd-norsk|egenskap|Q20|P1549}} Henter egenskapverdi i et språk.
    Q20 = "", P1549 = "" {{#invoke:Wd-norsk|egenskap|flerspråklig|Q20|P1549}} Henter en egenskapverdi i et språk.
    Q20 = "", P1549 = "" {{#invoke:Wd-norsk|egenskaper|flerspråklig|Q20|P1549}} Henter egenskapverdier i alle språk.
    Q20 = "", P2884 = "" {{#invoke:Wd-norsk|egenskap|Q20|P2884}} Henter en egenskapverdi med måleenhet.
    Q20 = "", P2884 = "" {{#invoke:Wd-norsk|egenskap|linket|Q20|P2884}} Henter en egenskapverdi med linket måleenhet.
    Q20 = "", P2884 = "" {{#invoke:Wd-norsk|egenskap|rå|Q20|P2884}} Henter en egenskapverdi rå.
    Q20 = "", P2884 = "" {{#invoke:Wd-norsk|egenskap|måleenhet|Q20|P2884}} Henter egenskapverdi sin måleenhet.
    Q20 = "", P2884 = "" {{#invoke:Wd-norsk|egenskap|måleenhet|rå|Q20|P2884}} Henter egenskapverdi måleenhet råverdi.'
    Q20 = "", P625 = "" {{#invoke:Wd-norsk|egenskap|Q20|P625}} Henter gps kordinater.
    Q20 = "", P625 = "" {{#invoke:Wd-norsk|egenskap|linket|Q20|P625}} Henter linket gps kordinater.
    Q20 = "", P625 = "" {{#invoke:Wd-norsk|egenskap|rå|Q20|P625}} Henter rå gps kordinater.
    Q20 = "", P625 = "" {{#invoke:Wd-norsk|egenskap|Q20|coord}} En egenskaps alias som kan brukes istedet for P-verdien.
    Q20 = "", P41 = "" {{#invoke:Wd-norsk|egenskap|Q20|P41}} Alt for stort til å vises Henter bildet og setter det inn.
    Q20 = "", P41 = "" {{#invoke:Wd-norsk|egenskap|linket|Q20|P41}} Henter bildets navn og linker til Commons.
    Q20 = "", P41 = "" {{#invoke:Wd-norsk|egenskap|rå|Q20|P41|format=\[\[Fil:%p {{!}} mini {{!}} venstre\]\]}} Henter bilde og putter det inn angitt format
    Q915684 = "", P2534 = "" {{#invoke:Wd-norsk|egenskap|Q915684|P2534}} Henter en matematisk formel
    Q6256 = "", P3896 = "" {{#invoke:Wd-norsk|egenskap|linket|Q6256|P3896}} Henter navet til geografisk navene fil og linker til Commons.
    Q4917 = "" {{#invoke:Wd-norsk|etikett|Q4917}} Henter en artikkels etikett.
    Q4917 = "" {{#invoke:Wd-norsk|etikett|kortnavn|linketQ4917}} Henter en artikkels kortnavn og linker.
    P38 = "" {{#invoke:Wd-norsk|etikett|P38}} Henter en egenskapverdi etikett.
    P38 = "" {{#invoke:Wd-norsk|etikett|linket|P38}} Henter en egenskapverdi etikett og linker.
    Q50630 = "" {{#invoke:Wd-norsk|etikett|Q50630}} Henter en artikkel etikett.
    Q50630 = "" {{#invoke:Wd-norsk|etikett|linket|Q50630}} Henter en artikkels etikett og linker.
    {{#invoke:Wd-norsk|etikett}} Hadde modulen vært vært brukt på Nordland ville den hentet Q-ID selv og du hadde ikke trengt å oppgi den.
    {{#invoke:Wd-norsk|etikett|rå}} Med å bruke rå på en etikett får du Q-ID til artikkelen.
    Q50630 = "" {{#invoke:Wd-norsk|tittel|Q50630}} Henter artikkels tittel.
    Q50630 = "" {{#invoke:Wd-norsk|tittel|linket|Q50630}} Henter artikkels tittel og linker.
    {{#invoke:Wd-norsk|tittel}} Hadde modulen blitt brukt på siden Nordland hadde Q-ID hentet automatisk og du hadde ikke trengt å skrevet den inn.
    Q20 = "" {{#invoke:Wd-norsk|beskrivelse|Q20}} Henter artikkels beskrivelse.
    {{#invoke:Wd-norsk|beskrivelse}} Hadde modulen blitt brukt på siden Norge hadde Q-ID hentet automatisk og du hadde ikke trengt å skrevet den inn.
    Q20 = "" {{#invoke:Wd-norsk|alias|Q20}} Henter en av artikkels alias.
    Q20 = "" {{#invoke:Wd-norsk|aliaser|Q20}} Henter alle artikkels aliaser.
    Q20 = "" {{#invoke:Wd-norsk|alias|linket|Q20}} Henter en av artikkels alias og linker.
    {{#invoke:Wd-norsk|alias}} Hadde modulen blitt brukt på siden Norge hadde Q-ID hentet automatisk og du hadde ikke trengt å skrevet den inn.
    Q525 = "" {{#invoke:Wd-norsk|merker|Q525}} Henter artikkelens merker på nowiki.
    Q525 = "" {{#invoke:Wd-norsk|merker|rå|Q525}} Henter artikkelens merker på nowiki i rå data.
    {{#invoke:Wd-norsk|merker}} Hadde modulen blitt brukt på siden Solen hadde Q-ID hentet automatisk og du hadde ikke trengt å skrevet den inn.
    Q1808983 = "" {{#invoke:Wd-norsk|egenskaper|linket|referanser|P1412|maks=4}} Henter maks 4 referanser hvis det er flere enn 4.
    Q1808983 = "" {{#invoke:Wd-norsk|egenskaper|linket|referanser|P1412|min=5}} Henter kun hvis den har minst 5 referanser.
    Q20 = "", P2250 = "", Forventet levetid i Norge er {{#invoke:Wd-norsk|egenskap|referanser|normal+|Q20|P2250|avrund=2}} Forventet levetid i Norge er Runder av til angitt verdi

    Referanser fra eksempler[rediger kilde]

    -- Orginal modul finner du på [[:en:Module:Wd]], [[:en:Module:Wd/i18n]] og [[:en:Module:Wd/aliasesP]].

local p = {}
local arg = ...
local i18n

local function loadI18n(aliasesP, frame)
	local title

	if frame then
		-- current module invoked by page/template, get its title from frame
		title = frame:getTitle()
	else
		-- current module included by other module, get its title from ...
		title = arg
	end

	if not i18n then
		i18n = require(title .. "/i18n").init(aliasesP)
	end
end

p.claimCommands = {
	property   = "egenskap",
	properties = "egenskaper",
	qualifier  = "kvalifikator",
	qualifiers = "kvalifikatorer",
	reference  = "referanse",
	references = "referanser"
}

p.generalCommands = {
	label       = "etikett",
	title       = "tittel",
	description = "beskrivelse",
	alias       = "alias",
	aliases     = "aliaser",
	badge       = "merke",
	badges      = "merker"
}

p.flags = {
	linked        = "linket",
	short         = "kortnavn",
	raw           = "rå",
	multilanguage = "flerspråklig",
	unit          = "måleenhet",
	-------------
	preferred     = "foretrukket",
	normal        = "normal",
	deprecated    = "avskrevet",
	best          = "best",
	future        = "fremtid",
	current       = "nåværende",
	former        = "tidligere",
	edit          = "rediger",
	editAtEnd     = "redigerpåslutten",
	mdy           = "mdå",
	single        = "enkel",
	sourced       = "referert"
}

p.args = {
	eid  = "eid",
	page = "side",
	date = "dato",
	max = "maks",
	min = "min",
	round = "avrund"
}

p.numberValue = {
	max = 0,
	min = 0
}

local aliasesP = {
	coord                   = "P625",
	-----------------------
	image                   = "P18",
	author                  = "P50",
	publisher               = "P123",
	importedFrom            = "P143",
	statedIn                = "P248",
	pages                   = "P304",
	language                = "P407",
	hasPart                 = "P527",
	publicationDate         = "P577",
	startTime               = "P580",
	endTime                 = "P582",
	chapter                 = "P792",
	retrieved               = "P813",
	referenceURL            = "P854",
	sectionVerseOrParagraph = "P958",
	archiveURL              = "P1065",
	title                   = "P1476",
	formatterURL            = "P1630",
	quote                   = "P1683",
	shortName               = "P1813",
	definingFormula         = "P2534",
	archiveDate             = "P2960",
	inferredFrom            = "P3452",
	typeOfReference         = "P3865",
	column                  = "P3903"
}

local aliasesQ = {
	percentage              = "Q11229",
	prolepticJulianCalendar = "Q1985786",
	citeWeb                 = "Q5637226",
	citeQ                   = "Q22321052"
}

local parameters = {
	property  = "%p",
	qualifier = "%q",
	reference = "%r",
	alias     = "%a",
	badge     = "%b",
	separator = "%s",
	general   = "%x"
}

local formats = {
	property              = "%p[%s][%r]",
	qualifier             = "%q[%s][%r]",
	reference             = "%r",
	propertyWithQualifier = "%p[ <span style=\"font-size:85\\%\">(%q)</span>][%s][%r]",
	alias                 = "%a[%s]",
	badge                 = "%b[%s]"
}

local hookNames = {              -- {level_1, level_2}
	[parameters.property]         = {"getProperty"},
	[parameters.reference]        = {"getReferences", "getReference"},
	[parameters.qualifier]        = {"getAllQualifiers"},
	[parameters.qualifier.."\\d"] = {"getQualifiers", "getQualifier"},
	[parameters.alias]            = {"getAlias"},
	[parameters.badge]            = {"getBadge"}
}

-- default value objects, should NOT be mutated but instead copied
local defaultSeparators = {
	["sep"]      = {" "},
	["sep%s"]    = {","},
	["sep%q"]    = {"; "},
	["sep%q\\d"] = {", "},
	["sep%r"]    = nil,  -- none
	["punc"]     = nil   -- none
}

local rankTable = {
	["preferred"]  = 1,
	["normal"]     = 2,
	["deprecated"] = 3
}

local Config = {}

-- allows for recursive calls
function Config:new()
	local cfg = {}
	setmetatable(cfg, self)
	self.__index = self

	cfg.separators = {
		-- single value objects wrapped in arrays so that we can pass by reference
		["sep"]   = {copyTable(defaultSeparators["sep"])},
		["sep%s"] = {copyTable(defaultSeparators["sep%s"])},
		["sep%q"] = {copyTable(defaultSeparators["sep%q"])},
		["sep%r"] = {copyTable(defaultSeparators["sep%r"])},
		["punc"]  = {copyTable(defaultSeparators["punc"])}
	}

	cfg.entity = nil
	cfg.entityID = nil
	cfg.propertyID = nil
	cfg.propertyValue = nil
	cfg.qualifierIDs = {}
	cfg.qualifierIDsAndValues = {}

	cfg.bestRank = true
	cfg.ranks = {true, true, false}  -- preferred = true, normal = true, deprecated = false
	cfg.foundRank = #cfg.ranks
	cfg.flagBest = false
	cfg.flagRank = false

	cfg.periods = {true, true, true}  -- future = true, current = true, former = true
	cfg.flagPeriod = false
	cfg.atDate = {parseDate(os.date('!%Y-%m-%d'))}  -- today as {year, month, day}

	cfg.mdyDate = false
	cfg.singleClaim = false
	cfg.sourcedOnly = false
	cfg.editable = false
	cfg.editAtEnd = false

	cfg.inSitelinks = false

	cfg.langCode = mw.language.getContentLanguage().code
	cfg.langName = mw.language.fetchLanguageName(cfg.langCode, cfg.langCode)
	cfg.langObj = mw.language.new(cfg.langCode)

	cfg.siteID = mw.wikibase.getGlobalSiteId()

	cfg.states = {}
	cfg.states.qualifiersCount = 0
	cfg.curState = nil

	cfg.prefetchedRefs = nil

	return cfg
end

local State = {}

function State:new(cfg, type)
	local stt = {}
	setmetatable(stt, self)
	self.__index = self

	stt.conf = cfg
	stt.type = type

	stt.results = {}

	stt.parsedFormat = {}
	stt.separator = {}
	stt.movSeparator = {}
	stt.puncMark = {}

	stt.linked = false
	stt.rawValue = false
	stt.shortName = false
	stt.anyLanguage = false
	stt.unitOnly = false
	stt.singleValue = false

	return stt
end

local function replaceAlias(id)
	if aliasesP[id] then
		id = aliasesP[id]
	end

	return id
end

local function errorText(code, param)
	local text = i18n["errors"][code]
	if param then text = mw.ustring.gsub(text, "$1", param) end
	return text
end

local function throwError(errorMessage, param)
	error(errorText(errorMessage, param))
end

local function replaceDecimalMark(num)
	return mw.ustring.gsub(num, "[.]", i18n['numeric']['decimal-mark'], 1)
end

local function padZeros(num, numDigits)
	local numZeros
	local negative = false

	if num < 0 then
		negative = true
		num = num * -1
	end

	num = tostring(num)
	numZeros = numDigits - num:len()

	for _ = 1, numZeros do
		num = "0"..num
	end

	if negative then
		num = "-"..num
	end

	return num
end

local function replaceSpecialChar(chr)
	if chr == '_' then
		-- replace underscores with spaces
		return ' '
	else
		return chr
	end
end

local function replaceSpecialChars(str)
	local chr
	local esc = false
	local strOut = ""

	for i = 1, #str do
		chr = str:sub(i,i)

		if not esc then
			if chr == '\\' then
				esc = true
			else
				strOut = strOut .. replaceSpecialChar(chr)
			end
		else
			strOut = strOut .. chr
			esc = false
		end
	end

	return strOut
end

local function buildWikilink(target, label)
	if not label or target == label then
		return "[[" .. target .. "]]"
	else
		return "[[" .. target .. "|" .. label .. "]]"
	end
end

-- used to make frame.args mutable, to replace #frame.args (which is always 0)
-- with the actual amount and to simply copy tables
function copyTable(tIn)
	if not tIn then
		return nil
	end

	local tOut = {}

	for i, v in pairs(tIn) do
		tOut[i] = v
	end

	return tOut
end

-- used to merge output arrays together;
-- note that it currently mutates the first input array
local function mergeArrays(a1, a2)
	for i = 1, #a2 do
		a1[#a1 + 1] = a2[i]
	end

	return a1
end

local function split(str, del)
	local out = {}
	local i, j = str:find(del)

	if i and j then
		out[1] = str:sub(1, i - 1)
		out[2] = str:sub(j + 1)
	else
		out[1] = str
	end

	return out
end

local function parseWikidataURL(url)
	local id

	if url:match('^http[s]?://') then
		id = split(url, "Q")

		if id[2] then
			return "Q" .. id[2]
		end
	end

	return nil
end

function parseDate(dateStr, precision)
	precision = precision or "d"

	local i, j, index, ptr
	local parts = {nil, nil, nil}

	if dateStr == nil then
		return parts[1], parts[2], parts[3]  -- year, month, day
	end

	-- 'T' for snak values, '/' for outputs with '/Julian' attached
	i, j = dateStr:find("[T/]")

	if i then
		dateStr = dateStr:sub(1, i-1)
	end

	local from = 1

	if dateStr:sub(1,1) == "-" then
		-- this is a negative number, look further ahead
		from = 2
	end

	index = 1
	ptr = 1

	i, j = dateStr:find("-", from)

	if i then
		-- year
		parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)  -- explicitly give base 10 to prevent error

		if parts[index] == -0 then
			parts[index] = tonumber("0")  -- for some reason, 'parts[index] = 0' may actually store '-0', so parse from string instead
		end

		if precision == "y" then
			-- we're done
			return parts[1], parts[2], parts[3]  -- year, month, day
		end

		index = index + 1
		ptr = i + 1

		i, j = dateStr:find("-", ptr)

		if i then
			-- month
			parts[index] = tonumber(dateStr:sub(ptr, i-1), 10)

			if precision == "m" then
				-- we're done
				return parts[1], parts[2], parts[3]  -- year, month, day
			end

			index = index + 1
			ptr = i + 1
		end
	end

	if dateStr:sub(ptr) ~= "" then
		-- day if we have month, month if we have year, or year
		parts[index] = tonumber(dateStr:sub(ptr), 10)
	end

	return parts[1], parts[2], parts[3]  -- year, month, day
end

local function datePrecedesDate(aY, aM, aD, bY, bM, bD)
	if aY == nil or bY == nil then
		return nil
	end
	aM = aM or 1
	aD = aD or 1
	bM = bM or 1
	bD = bD or 1

	if aY < bY then
		return true
	end

	if aY > bY then
		return false
	end

	if aM < bM then
		return true
	end

	if aM > bM then
		return false
	end

	if aD < bD then
		return true
	end

	return false
end

local function getHookName(param, index)
	if hookNames[param] then
		return hookNames[param][index]
	elseif param:len() > 2 then
		return hookNames[param:sub(1, 2).."\\d"][index]
	else
		return nil
	end
end

local function alwaysTrue()
	return true
end

-- The following function parses a format string.
--
-- The example below shows how a parsed string is structured in memory.
-- Variables other than 'str' and 'child' are left out for clarity's sake.
--
-- Example:
-- "A %p B [%s[%q1]] C [%r] D"
--
-- Structure:
-- [
--   {
--     str = "A "
--   },
--   {
--     str = "%p"
--   },
--   {
--     str = " B ",
--     child =
--     [
--       {
--         str = "%s",
--         child =
--         [
--           {
--             str = "%q1"
--           }
--         ]
--       }
--     ]
--   },
--   {
--     str = " C ",
--     child =
--     [
--       {
--         str = "%r"
--       }
--     ]
--   },
--   {
--     str = " D"
--   }
-- ]
--
local function parseFormat(str)
	local chr, esc, param, root, cur, prev, new
	local params = {}

	local function newObject(array)
		local obj = {}  -- new object
		obj.str = ""

		array[#array + 1] = obj  -- array{object}
		obj.parent = array

		return obj
	end

	local function endParam()
		if param > 0 then
			if cur.str ~= "" then
				cur.str = "%"..cur.str
				cur.param = true
				params[cur.str] = true
				cur.parent.req[cur.str] = true
				prev = cur
				cur = newObject(cur.parent)
			end
			param = 0
		end
	end

	root = {}  -- array
	root.req = {}
	cur = newObject(root)
	prev = nil

	esc = false
	param = 0

	for i = 1, #str do
		chr = str:sub(i,i)

		if not esc then
			if chr == '\\' then
				endParam()
				esc = true
			elseif chr == '%' then
				endParam()
				if cur.str ~= "" then
					cur = newObject(cur.parent)
				end
				param = 2
			elseif chr == '[' then
				endParam()
				if prev and cur.str == "" then
					table.remove(cur.parent)
					cur = prev
				end
				cur.child = {}  -- new array
				cur.child.req = {}
				cur.child.parent = cur
				cur = newObject(cur.child)
			elseif chr == ']' then
				endParam()
				if cur.parent.parent then
					new = newObject(cur.parent.parent.parent)
					if cur.str == "" then
						table.remove(cur.parent)
					end
					cur = new
				end
			else
				if param > 1 then
					param = param - 1
				elseif param == 1 then
					if not chr:match('%d') then
						endParam()
					end
				end

				cur.str = cur.str .. replaceSpecialChar(chr)
			end
		else
			cur.str = cur.str .. chr
			esc = false
		end

		prev = nil
	end

	endParam()

	-- make sure that at least one required parameter has been defined
	if not next(root.req) then
		throwError("missing-required-parameter")
	end

	-- make sure that the separator parameter "%s" is not amongst the required parameters
	if root.req[parameters.separator] then
		throwError("extra-required-parameter", parameters.separator)
	end

	return root, params
end

local function sortOnRank(claims)
	local rankPos
	local ranks = {{}, {}, {}, {}}  -- preferred, normal, deprecated, (default)
	local sorted = {}

	for _, v in ipairs(claims) do
		rankPos = rankTable[v.rank] or 4
		ranks[rankPos][#ranks[rankPos] + 1] = v
	end

	sorted = ranks[1]
	sorted = mergeArrays(sorted, ranks[2])
	sorted = mergeArrays(sorted, ranks[3])

	return sorted
end

-- if id == nil then item connected to current page is used
function Config:getLabel(id, raw, link, short)
	local label = nil
	local title = nil
	local prefix= ""

	if not id then
		id = mw.wikibase.getEntityIdForCurrentPage()

		if not id then
			return ""
		end
	end

	id = id:upper()  -- just to be sure

	if raw then
		-- check if given id actually exists
		if mw.wikibase.isValidEntityId(id) and mw.wikibase.entityExists(id) then
			label = id

			if id:sub(1,1) == "P" then
				prefix = "Property:"
			end
		end

		prefix = "d:" .. prefix

		title = label  -- may be nil
	else
		-- try short name first if requested
		if short then
			label = p._egenskap{aliasesP.shortName, [p.args.eid] = id}  -- get short name

			if label == "" then
				label = nil
			end
		end

		-- get label
		if not label then
			label = mw.wikibase.getLabel(id)
		end
	end

	if not label then
		local katname = "Artikler hvor elementer mangler oversatte etiketter via wd-norsk test"
		if id:sub(1,1) == "P" then
				-- properties have no sitelink, link to Wikidata instead
			prefix = "Property:"
			katname = "Artikler hvor egenskaper mangler oversatte etiketter via wd-norsk test"
		end

		label = buildWikilink("d:" .. prefix .. id, id) .. buildWikilink("kategori:" .. katname, id)
	elseif link then
		-- build a link if requested
		if not title then
			if id:sub(1,1) == "Q" then
				title = mw.wikibase.getSitelink(id)
			elseif id:sub(1,1) == "P" then
				-- properties have no sitelink, link to Wikidata instead
				title = id
				prefix = "d:Property:"
			end
		end

		if title then
			label = buildWikilink(prefix .. title, label)
		end
	end

	return label
end

function Config:getEditIcon()
	local value = ""
	local prefix = ""
	local front = "&nbsp;"
	local back = ""

	if self.entityID:sub(1,1) == "P" then
		prefix = "Property:"
	end

	if self.editAtEnd then
		front = '<span style="float:'

		if self.langObj:isRTL() then
			front = front .. 'left'
		else
			front = front .. 'right'
		end

		front = front .. '">'
		back = '</span>'
	end

	value = "[[File:OOjs UI icon edit-ltr-progressive.svg|frameless|text-top|10px|alt=" .. i18n['info']['edit-on-wikidata'] .. "|link=https://www.wikidata.org/wiki/" .. prefix .. self.entityID .. "?uselang=" .. self.langCode

	if self.propertyID then
		value = value .. "#" .. self.propertyID
	elseif self.inSitelinks then
		value = value .. "#sitelinks-wikipedia"
	end

	value = value .. "|" .. i18n['info']['edit-on-wikidata'] .. "]]"

	return front .. value .. back
end

-- used to create the final output string when it's all done, so that for references the
-- function extensionTag("ref", ...) is only called when they really ended up in the final output
function Config:concatValues(valuesArray)
	local outString = ""
	local j, skip

	for i = 1, #valuesArray do
		-- check if this is a reference
		if valuesArray[i].refHash then
			j = i - 1
			skip = false

			-- skip this reference if it is part of a continuous row of references that already contains the exact same reference
			while valuesArray[j] and valuesArray[j].refHash do
				if valuesArray[i].refHash == valuesArray[j].refHash then
					skip = true
					break
				end
				j = j - 1
			end

			if not skip then
				-- add <ref> tag with the reference's hash as its name (to deduplicate references)
				outString = outString .. mw.getCurrentFrame():extensionTag("ref", valuesArray[i][1], {name = valuesArray[i].refHash})
			end
		else
			outString = outString .. valuesArray[i][1]
		end
	end

	return outString
end

function Config:convertUnit(unit, raw, link, short, unitOnly)
	local space = " "
	local label = ""
	local itemID

	if unit == "" or unit == "1" then
		return nil
	end

	if unitOnly then
		space = ""
	end

	itemID = parseWikidataURL(unit)

	if itemID then
		if itemID == aliasesQ.percentage then
			return "%"
		else
			label = self:getLabel(itemID, raw, link, short)

			if label ~= "" then
				return space .. label
			end
		end
	end

	return ""
end

function State:getValue(snak)
	return self.conf:getValue(snak, self.rawValue, self.linked, self.shortName, self.anyLanguage, self.unitOnly, false, self.type:sub(1,2))
end

function round(num, numDecimalPlaces)
  if numDecimalPlaces and numDecimalPlaces>0 then
    local mult = 10^numDecimalPlaces
    return math.floor(num * mult + 0.5) / mult
  end
  return math.floor(num + 0.5)
end

function Config:getValue(snak, raw, link, short, anyLang, unitOnly, noSpecial, type)
	if snak.snaktype == 'value' then
		local datatype = snak.datavalue.type
		local subtype = snak.datatype
		local datavalue = snak.datavalue.value

		if datatype == 'string' then
			if subtype == 'url' and link then
				-- create link explicitly
				if raw then
					-- will render as a linked number like [1]
					return "[" .. datavalue .. "]"
				else
					return "[" .. datavalue .. " " .. datavalue .. "]"
				end
			elseif subtype == 'commonsMedia' then
				if link then
					return buildWikilink("c:File:" .. datavalue, datavalue)
				elseif not raw then
					return "[[File:" .. datavalue .. "]]"
				else
					return datavalue
				end
			elseif subtype == 'geo-shape' and link then
				return buildWikilink("c:" .. datavalue, datavalue)
			elseif subtype == 'math' and not raw then
				local attribute = nil

				if (type == parameters.property or (type == parameters.qualifier and self.propertyID == aliasesP.hasPart)) and snak.property == aliasesP.definingFormula then
					attribute = {qid = self.entityID}
				end

				return mw.getCurrentFrame():extensionTag("math", datavalue, attribute)
			elseif subtype == 'external-id' and link then
				local url = p._egenskap{aliasesP.formatterURL, [p.args.eid] = snak.property}  -- get formatter URL

				if url ~= "" then
					url = mw.ustring.gsub(url, "$1", datavalue)
					return "[" .. url .. " " .. datavalue .. "]"
				else
					return datavalue
				end
			else
				return datavalue
			end
		elseif datatype == 'monolingualtext' then
			if anyLang or datavalue['language'] == self.langCode then
				return datavalue['text']
			else
				return nil
			end
		elseif datatype == 'quantity' then
			local value = ""
			local unit

			if not unitOnly then
				-- get value and strip + signs from front
				value = mw.ustring.gsub(datavalue['amount'], "^%+(.+)$", "%1")

				if raw then
					return value
				end

				if p.numberValue.round then
				    value = round(value, p.numberValue.round)
			    end

				-- replace decimal mark based on locale
				value = replaceDecimalMark(value)


				-- add delimiters for readability
				value = i18n.addDelimiters(value)
			end

			unit = self:convertUnit(datavalue['unit'], raw, link, short, unitOnly)
			
			if unit then
				if unit == '%' then
					value = value .. ' ' .. unit
				else
					value = value .. unit
				end
			end

            return value

		elseif datatype == 'time' then
			local y, m, d, p, yDiv, yRound, yFull, value, calendarID, dateStr
			local yFactor = 1
			local sign = 1
			local prefix = ""
			local suffix = ""
			local mayAddCalendar = false
			local calendar = ""
			local precision = datavalue['precision']

			if precision == 11 then
				p = "d"
			elseif precision == 10 then
				p = "m"
			else
				p = "y"
				yFactor = 10^(9-precision)
			end

			y, m, d = parseDate(datavalue['time'], p)

			if y < 0 then
				sign = -1
				y = y * sign
			end

			-- if precision is tens/hundreds/thousands/millions/billions of years
			if precision <= 8 then
				yDiv = y / yFactor

				-- if precision is tens/hundreds/thousands of years
				if precision >= 6 then
					mayAddCalendar = true

					if precision <= 7 then
						-- round centuries/millenniums up (e.g. 20th century or 3rd millennium)
						yRound = math.ceil(yDiv)

						if not raw then
							if precision == 6 then
								suffix = i18n['datetime']['suffixes']['millennium']
							else
								suffix = i18n['datetime']['suffixes']['century']
							end

							suffix = i18n.getOrdinalSuffix(yRound) .. suffix
						else
							-- if not verbose, take the first year of the century/millennium
							-- (e.g. 1901 for 20th century or 2001 for 3rd millennium)
							yRound = (yRound - 1) * yFactor + 1
						end
					else
						-- precision == 8
						-- round decades down (e.g. 2010s)
						yRound = math.floor(yDiv) * yFactor

						if not raw then
							prefix = i18n['datetime']['prefixes']['decade-period']
							suffix = i18n['datetime']['suffixes']['decade-period']
						end
					end

					if raw and sign < 0 then
						-- if BCE then compensate for "counting backwards"
						-- (e.g. -2019 for 2010s BCE, -2000 for 20th century BCE or -3000 for 3rd millennium BCE)
						yRound = yRound + yFactor - 1
					end
				else
					local yReFactor, yReDiv, yReRound

					-- round to nearest for tens of thousands of years or more
					yRound = math.floor(yDiv + 0.5)

					if yRound == 0 then
						if precision <= 2 and y ~= 0 then
							yReFactor = 1e6
							yReDiv = y / yReFactor
							yReRound = math.floor(yReDiv + 0.5)

							if yReDiv == yReRound then
								-- change precision to millions of years only if we have a whole number of them
								precision = 3
								yFactor = yReFactor
								yRound = yReRound
							end
						end

						if yRound == 0 then
							-- otherwise, take the unrounded (original) number of years
							precision = 5
							yFactor = 1
							yRound = y
							mayAddCalendar = true
						end
					end

					if precision >= 1 and y ~= 0 then
						yFull = yRound * yFactor

						yReFactor = 1e9
						yReDiv = yFull / yReFactor
						yReRound = math.floor(yReDiv + 0.5)

						if yReDiv == yReRound then
							-- change precision to billions of years if we're in that range
							precision = 0
							yFactor = yReFactor
							yRound = yReRound
						else
							yReFactor = 1e6
							yReDiv = yFull / yReFactor
							yReRound = math.floor(yReDiv + 0.5)

							if yReDiv == yReRound then
								-- change precision to millions of years if we're in that range
								precision = 3
								yFactor = yReFactor
								yRound = yReRound
							end
						end
					end

					if not raw then
						if precision == 3 then
							suffix = i18n['datetime']['suffixes']['million-years']
						elseif precision == 0 then
							suffix = i18n['datetime']['suffixes']['billion-years']
						else
							yRound = yRound * yFactor
							if yRound == 1 then
								suffix = i18n['datetime']['suffixes']['year']
							else
								suffix = i18n['datetime']['suffixes']['years']
							end
						end
					else
						yRound = yRound * yFactor
					end
				end
			else
				yRound = y
				mayAddCalendar = true
			end

			if mayAddCalendar then
				calendarID = parseWikidataURL(datavalue['calendarmodel'])

				if calendarID and calendarID == aliasesQ.prolepticJulianCalendar then
					if not raw then
						if link then
							calendar = " ("..buildWikilink(i18n['datetime']['julian-calendar'], i18n['datetime']['julian'])..")"
						else
							calendar = " ("..i18n['datetime']['julian']..")"
						end
					else
						calendar = "/"..i18n['datetime']['julian']
					end
				end
			end

			if not raw then
				local ce = nil

				if sign < 0 then
					ce = i18n['datetime']['BCE']
				elseif precision <= 5 then
					ce = i18n['datetime']['CE']
				end

				if ce then
					if link then
						ce = buildWikilink(i18n['datetime']['common-era'], ce)
					end
					suffix = suffix .. " " .. ce
				end

				value = tostring(yRound)

				if m then
					dateStr = self.langObj:formatDate("F", "1-"..m.."-1")

					if d then
						if self.mdyDate then
							dateStr = dateStr .. " " .. d .. ","
						else
							dateStr = d .. ". " .. dateStr
						end
					end

					value = dateStr .. " " .. value
				end

				value = prefix .. value .. suffix .. calendar
			else
				value = padZeros(yRound * sign, 4)

				if m then
					value = value .. "-" .. padZeros(m, 2)

					if d then
						value = value .. "-" .. padZeros(d, 2)
					end
				end

				value = value .. calendar
			end

			return value
		elseif datatype == 'globecoordinate' then
			-- logic from https://github.com/DataValues/Geo (v4.0.1)

			local precision, unitsPerDegree, numDigits, strFormat, value, globe
			local latitude, latConv, latValue, latLink
			local longitude, lonConv, lonValue, lonLink
			local latDirection, latDirectionN, latDirectionS, latDirectionEN
			local lonDirection, lonDirectionE, lonDirectionW, lonDirectionEN
			local degSymbol, minSymbol, secSymbol, separator

			local latDegrees = nil
			local latMinutes = nil
			local latSeconds = nil
			local lonDegrees = nil
			local lonMinutes = nil
			local lonSeconds = nil

			local latDegSym = ""
			local latMinSym = ""
			local latSecSym = ""
			local lonDegSym = ""
			local lonMinSym = ""
			local lonSecSym = ""

			local latDirectionEN_N = "N"
			local latDirectionEN_S = "S"
			local lonDirectionEN_E = "E"
			local lonDirectionEN_W = "W"

			if not raw then
				latDirectionN = i18n['coord']['latitude-north']
				latDirectionS = i18n['coord']['latitude-south']
				lonDirectionE = i18n['coord']['longitude-east']
				lonDirectionW = i18n['coord']['longitude-west']

				degSymbol = i18n['coord']['degrees']
				minSymbol = i18n['coord']['minutes']
				secSymbol = i18n['coord']['seconds']
				separator = i18n['coord']['separator']
			else
				latDirectionN = latDirectionEN_N
				latDirectionS = latDirectionEN_S
				lonDirectionE = lonDirectionEN_E
				lonDirectionW = lonDirectionEN_W

				degSymbol = "/"
				minSymbol = "/"
				secSymbol = "/"
				separator = "/"
			end

			latitude = datavalue['latitude']
			longitude = datavalue['longitude']

			if latitude < 0 then
				latDirection = latDirectionS
				latDirectionEN = latDirectionEN_S
				latitude = math.abs(latitude)
			else
				latDirection = latDirectionN
				latDirectionEN = latDirectionEN_N
			end

			if longitude < 0 then
				lonDirection = lonDirectionW
				lonDirectionEN = lonDirectionEN_W
				longitude = math.abs(longitude)
			else
				lonDirection = lonDirectionE
				lonDirectionEN = lonDirectionEN_E
			end

			precision = datavalue['precision']

			if not precision or precision <= 0 then
				precision = 1 / 3600  -- precision not set (correctly), set to arcsecond
			end

			-- remove insignificant detail
			latitude = math.floor(latitude / precision + 0.5) * precision
			longitude = math.floor(longitude / precision + 0.5) * precision

			if precision >= 1 - (1 / 60) and precision < 1 then
				precision = 1
			elseif precision >= (1 / 60) - (1 / 3600) and precision < (1 / 60) then
				precision = 1 / 60
			end

			if precision >= 1 then
				unitsPerDegree = 1
			elseif precision >= (1 / 60)  then
				unitsPerDegree = 60
			else
				unitsPerDegree = 3600
			end

			numDigits = math.ceil(-math.log10(unitsPerDegree * precision))

			if numDigits <= 0 then
				numDigits = tonumber("0")  -- for some reason, 'numDigits = 0' may actually store '-0', so parse from string instead
			end

			strFormat = "%." .. numDigits .. "f"

			if precision >= 1 then
				latDegrees = strFormat:format(latitude)
				lonDegrees = strFormat:format(longitude)

				if not raw then
					latDegSym = replaceDecimalMark(latDegrees) .. degSymbol
					lonDegSym = replaceDecimalMark(lonDegrees) .. degSymbol
				else
					latDegSym = latDegrees .. degSymbol
					lonDegSym = lonDegrees .. degSymbol
				end
			else
				latConv = math.floor(latitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits
				lonConv = math.floor(longitude * unitsPerDegree * 10^numDigits + 0.5) / 10^numDigits

				if precision >= (1 / 60) then
					latMinutes = latConv
					lonMinutes = lonConv
				else
					latSeconds = latConv
					lonSeconds = lonConv

					latMinutes = math.floor(latSeconds / 60)
					lonMinutes = math.floor(lonSeconds / 60)

					latSeconds = strFormat:format(latSeconds - (latMinutes * 60))
					lonSeconds = strFormat:format(lonSeconds - (lonMinutes * 60))

					if not raw then
						latSecSym = replaceDecimalMark(latSeconds) .. secSymbol
						lonSecSym = replaceDecimalMark(lonSeconds) .. secSymbol
					else
						latSecSym = latSeconds .. secSymbol
						lonSecSym = lonSeconds .. secSymbol
					end
				end

				latDegrees = math.floor(latMinutes / 60)
				lonDegrees = math.floor(lonMinutes / 60)

				latDegSym = latDegrees .. degSymbol
				lonDegSym = lonDegrees .. degSymbol

				latMinutes = latMinutes - (latDegrees * 60)
				lonMinutes = lonMinutes - (lonDegrees * 60)

				if precision >= (1 / 60) then
					latMinutes = strFormat:format(latMinutes)
					lonMinutes = strFormat:format(lonMinutes)

					if not raw then
						latMinSym = replaceDecimalMark(latMinutes) .. minSymbol
						lonMinSym = replaceDecimalMark(lonMinutes) .. minSymbol
					else
						latMinSym = latMinutes .. minSymbol
						lonMinSym = lonMinutes .. minSymbol
					end
				else
					latMinSym = latMinutes .. minSymbol
					lonMinSym = lonMinutes .. minSymbol
				end
			end

			latValue = latDegSym .. latMinSym .. latSecSym .. latDirection
			lonValue = lonDegSym .. lonMinSym .. lonSecSym .. lonDirection

			value = latValue .. separator .. lonValue

			if link then
				globe = parseWikidataURL(datavalue['globe'])

				if globe then
					globe = mw.wikibase.getLabelByLang(globe, "en"):lower()
				else
					globe = "earth"
				end

				latLink = table.concat({latDegrees, latMinutes, latSeconds}, "_")
				lonLink = table.concat({lonDegrees, lonMinutes, lonSeconds}, "_")

				value = "[https://geohack.toolforge.org/geohack.php?language="..self.langCode.."&params="..latLink.."_"..latDirectionEN.."_"..lonLink.."_"..lonDirectionEN.."_globe:"..globe.." "..value.."]"
			end

			return value
		elseif datatype == 'wikibase-entityid' then
			local label
			local itemID = datavalue['numeric-id']

			if subtype == 'wikibase-item' then
				itemID = "Q" .. itemID
			elseif subtype == 'wikibase-property' then
				itemID = "P" .. itemID
			else
				return '<strong class="error">' .. errorText('unknown-data-type', subtype) .. '</strong>'
			end

			label = self:getLabel(itemID, raw, link, short)

			if label == "" then
				label = nil
			end

			return label
		else
			return '<strong class="error">' .. errorText('unknown-data-type', datatype) .. '</strong>'
		end
	elseif snak.snaktype == 'somevalue' and not noSpecial then
		if raw then
			return " "  -- single space represents 'somevalue'
		else
			return i18n['values']['unknown']
		end
	elseif snak.snaktype == 'novalue' and not noSpecial then
		if raw then
			return ""  -- empty string represents 'novalue'
		else
			return i18n['values']['none']
		end
	else
		return nil
	end
end

function Config:getSingleRawQualifier(claim, qualifierID)
	local qualifiers

	if claim.qualifiers then qualifiers = claim.qualifiers[qualifierID] end

	if qualifiers and qualifiers[1] then
		return self:getValue(qualifiers[1], true)  -- raw = true
	else
		return nil
	end
end

function Config:snakEqualsValue(snak, value)
	local snakValue = self:getValue(snak, true)  -- raw = true

	if snakValue and snak.snaktype == 'value' and snak.datavalue.type == 'wikibase-entityid' then value = value:upper() end

	return snakValue == value
end

function Config:setRank(rank)
	local rankPos

	if rank == p.flags.best then
		self.bestRank = true
		self.flagBest = true  -- mark that 'best' flag was given
		return
	end

	if rank:sub(1,9) == p.flags.preferred then
		rankPos = 1
	elseif rank:sub(1,6) == p.flags.normal then
		rankPos = 2
	elseif rank:sub(1,10) == p.flags.deprecated then
		rankPos = 3
	else
		return
	end

	-- one of the rank flags was given, check if another one was given before
	if not self.flagRank then
		self.ranks = {false, false, false}  -- no other rank flag given before, so unset ranks
		self.bestRank = self.flagBest       -- unsets bestRank only if 'best' flag was not given before
		self.flagRank = true                -- mark that a rank flag was given
	end

	if rank:sub(-1) == "+" then
		for i = rankPos, 1, -1 do
			self.ranks[i] = true
		end
	elseif rank:sub(-1) == "-" then
		for i = rankPos, #self.ranks do
			self.ranks[i] = true
		end
	else
		self.ranks[rankPos] = true
	end
end

function Config:setPeriod(period)
	local periodPos

	if period == p.flags.future then
		periodPos = 1
	elseif period == p.flags.current then
		periodPos = 2
	elseif period == p.flags.former then
		periodPos = 3
	else
		return
	end

	-- one of the period flags was given, check if another one was given before
	if not self.flagPeriod then
		self.periods = {false, false, false}  -- no other period flag given before, so unset periods
		self.flagPeriod = true                -- mark that a period flag was given
	end

	self.periods[periodPos] = true
end

function Config:qualifierMatches(claim, id, value)
	local qualifiers

	if claim.qualifiers then qualifiers = claim.qualifiers[id] end
	if qualifiers then
		for _, v in pairs(qualifiers) do
			if self:snakEqualsValue(v, value) then
				return true
			end
		end
	elseif value == "" then
		-- if the qualifier is not present then treat it the same as the special value 'novalue'
		return true
	end

	return false
end

function Config:rankMatches(rankPos)
	if self.bestRank then
		return (self.ranks[rankPos] and self.foundRank >= rankPos)
	else
		return self.ranks[rankPos]
	end
end

function Config:timeMatches(claim)
	local startTime = nil
	local startTimeY = nil
	local startTimeM = nil
	local startTimeD = nil
	local endTime = nil
	local endTimeY = nil
	local endTimeM = nil
	local endTimeD = nil

	if self.periods[1] and self.periods[2] and self.periods[3] then
		-- any time
		return true
	end

	startTime = self:getSingleRawQualifier(claim, aliasesP.startTime)
	if startTime and startTime ~= "" and startTime ~= " " then
		startTimeY, startTimeM, startTimeD = parseDate(startTime)
	end

	endTime = self:getSingleRawQualifier(claim, aliasesP.endTime)
	if endTime and endTime ~= "" and endTime ~= " " then
		endTimeY, endTimeM, endTimeD = parseDate(endTime)
	end

	if startTimeY ~= nil and endTimeY ~= nil and datePrecedesDate(endTimeY, endTimeM, endTimeD, startTimeY, startTimeM, startTimeD) then
		-- invalidate end time if it precedes start time
		endTimeY = nil
		endTimeM = nil
		endTimeD = nil
	end

	if self.periods[1] then
		-- future
		if startTimeY and datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD) then
			return true
		end
	end

	if self.periods[2] then
		-- current
		if (startTimeY == nil or not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], startTimeY, startTimeM, startTimeD)) and
		   (endTimeY == nil or datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD)) then
			return true
		end
	end

	if self.periods[3] then
		-- former
		if endTimeY and not datePrecedesDate(self.atDate[1], self.atDate[2], self.atDate[3], endTimeY, endTimeM, endTimeD) then
			return true
		end
	end

	return false
end

function Config:processFlag(flag)
	if not flag then
		return false
	end

	if flag == p.flags.linked then
		self.curState.linked = true
		return true
	elseif flag == p.flags.raw then
		self.curState.rawValue = true

		if self.curState == self.states[parameters.reference] then
			-- raw reference values end with periods and require a separator (other than none)
			self.separators["sep%r"][1] = {" "}
		end

		return true
	elseif flag == p.flags.short then
		self.curState.shortName = true
		return true
	elseif flag == p.flags.multilanguage then
		self.curState.anyLanguage = true
		return true
	elseif flag == p.flags.unit then
		self.curState.unitOnly = true
		return true
	elseif flag == p.flags.mdy then
		self.mdyDate = true
		return true
	elseif flag == p.flags.single then
		self.singleClaim = true
		return true
	elseif flag == p.flags.sourced then
		self.sourcedOnly = true
		return true
	elseif flag == p.flags.edit then
		self.editable = true
		return true
	elseif flag == p.flags.editAtEnd then
		self.editable = true
		self.editAtEnd = true
		return true
	elseif flag == p.flags.best or flag:match('^'..p.flags.preferred..'[+-]?$') or flag:match('^'..p.flags.normal..'[+-]?$') or flag:match('^'..p.flags.deprecated..'[+-]?$') then
		self:setRank(flag)
		return true
	elseif flag == p.flags.future or flag == p.flags.current or flag == p.flags.former then
		self:setPeriod(flag)
		return true
	elseif flag == "" then
		-- ignore empty flags and carry on
		return true
	else
		return false
	end
end

function Config:processFlagOrCommand(flag)
	local param = ""

	if not flag then
		return false
	end

	if flag == p.claimCommands.property or flag == p.claimCommands.properties then
		param = parameters.property
	elseif flag == p.claimCommands.qualifier or flag == p.claimCommands.qualifiers then
		self.states.qualifiersCount = self.states.qualifiersCount + 1
		param = parameters.qualifier .. self.states.qualifiersCount
		self.separators["sep"..param] = {copyTable(defaultSeparators["sep%q\\d"])}
	elseif flag == p.claimCommands.reference or flag == p.claimCommands.references then
		param = parameters.reference
	else
		return self:processFlag(flag)
	end

	if self.states[param] then
		return false
	end

	-- create a new state for each command
	self.states[param] = State:new(self, param)

	-- use "%x" as the general parameter name
	self.states[param].parsedFormat = parseFormat(parameters.general)  -- will be overwritten for param=="%p"

	-- set the separator
	self.states[param].separator = self.separators["sep"..param]  -- will be nil for param=="%p", which will be set separately

	if flag == p.claimCommands.property or flag == p.claimCommands.qualifier or flag == p.claimCommands.reference then
		self.states[param].singleValue = true
	end

	self.curState = self.states[param]

	return true
end

function Config:processSeparators(args)
	local sep

	for i, v in pairs(self.separators) do
		if args[i] then
			sep = replaceSpecialChars(args[i])

			if sep ~= "" then
				self.separators[i][1] = {sep}
			else
				self.separators[i][1] = nil
			end
		end
	end
end

function Config:setFormatAndSeparators(state, parsedFormat)
	state.parsedFormat = parsedFormat
	state.separator = self.separators["sep"]
	state.movSeparator = self.separators["sep"..parameters.separator]
	state.puncMark = self.separators["punc"]
end

-- determines if a claim has references by prefetching them from the claim using getReferences,
-- which applies some filtering that determines if a reference is actually returned,
-- and caches the references for later use
function State:isSourced(claim)
	self.conf.prefetchedRefs = self:getReferences(claim)
	return (#self.conf.prefetchedRefs > 0)
end

function State:resetCaches()
	-- any prefetched references of the previous claim must not be used
	self.conf.prefetchedRefs = nil
end

function State:claimMatches(claim)
	local matches, rankPos

	-- first of all, reset any cached values used for the previous claim
	self:resetCaches()

	-- if a property value was given, check if it matches the claim's property value
	if self.conf.propertyValue then
		matches = self.conf:snakEqualsValue(claim.mainsnak, self.conf.propertyValue)
	else
		matches = true
	end

	-- if any qualifier values were given, check if each matches one of the claim's qualifier values
	for i, v in pairs(self.conf.qualifierIDsAndValues) do
		matches = (matches and self.conf:qualifierMatches(claim, i, v))
	end

	-- check if the claim's rank and time period match
	rankPos = rankTable[claim.rank] or 4
	matches = (matches and self.conf:rankMatches(rankPos) and self.conf:timeMatches(claim))

	-- if only claims with references must be returned, check if this one has any
	if self.conf.sourcedOnly then
		matches = (matches and self:isSourced(claim))  -- prefetches and caches references
	end

	return matches, rankPos
end

function State:out()
	local result  -- collection of arrays with value objects
	local valuesArray  -- array with value objects
	local sep = nil  -- value object
	local out = {}  -- array with value objects

	local function walk(formatTable, result)
		local valuesArray = {}  -- array with value objects

		for i, v in pairs(formatTable.req) do
			if not result[i] or not result[i][1] then
				-- we've got no result for a parameter that is required on this level,
				-- so skip this level (and its children) by returning an empty result
				return {}
			end
		end

		for _, v in ipairs(formatTable) do
			if v.param then
				valuesArray = mergeArrays(valuesArray, result[v.str])
			elseif v.str ~= "" then
				valuesArray[#valuesArray + 1] = {v.str}
			end

			if v.child then
				valuesArray = mergeArrays(valuesArray, walk(v.child, result))
			end
		end

		return valuesArray
	end

	-- iterate through the results from back to front, so that we know when to add separators
	for i = #self.results, 1, -1 do
		result = self.results[i]

		-- if there is already some output, then add the separators
		if #out > 0 then
			sep = self.separator[1]  -- fixed separator
			result[parameters.separator] = {self.movSeparator[1]}  -- movable separator
		else
			sep = nil
			result[parameters.separator] = {self.puncMark[1]}  -- optional punctuation mark
		end

		valuesArray = walk(self.parsedFormat, result)

		if #valuesArray > 0 then
			if sep then
				valuesArray[#valuesArray + 1] = sep
			end

			out = mergeArrays(valuesArray, out)
		end
	end

	-- reset state before next iteration
	self.results = {}

	return out
end

-- level 1 hook
function State:getProperty(claim)
	local value = {self:getValue(claim.mainsnak)}  -- create one value object

	if #value > 0 then
		return {value}  -- wrap the value object in an array and return it
	else
		return {}  -- return empty array if there was no value
	end
end

-- level 1 hook
function State:getQualifiers(claim, param)
	local qualifiers

	if claim.qualifiers then qualifiers = claim.qualifiers[self.conf.qualifierIDs[param]] end
	if qualifiers then
		-- iterate through claim's qualifier statements to collect their values;
		-- return array with multiple value objects
		return self.conf.states[param]:iterate(qualifiers, {[parameters.general] = hookNames[parameters.qualifier.."\\d"][2], count = 1})  -- pass qualifier state with level 2 hook
	else
		return {}  -- return empty array
	end
end

-- level 2 hook
function State:getQualifier(snak)
	local value = {self:getValue(snak)}  -- create one value object

	if #value > 0 then
		return {value}  -- wrap the value object in an array and return it
	else
		return {}  -- return empty array if there was no value
	end
end

-- level 1 hook
function State:getAllQualifiers(claim, param, result, hooks)
	local out = {}  -- array with value objects
	local sep = self.conf.separators["sep"..parameters.qualifier][1]  -- value object

	-- iterate through the output of the separate "qualifier(s)" commands
	for i = 1, self.conf.states.qualifiersCount do

		-- if a hook has not been called yet, call it now
		if not result[parameters.qualifier..i] then
			self:callHook(parameters.qualifier..i, hooks, claim, result)
		end

		-- if there is output for this particular "qualifier(s)" command, then add it
		if result[parameters.qualifier..i] and result[parameters.qualifier..i][1] then

			-- if there is already some output, then add the separator
			if #out > 0 and sep then
				out[#out + 1] = sep
			end

			out = mergeArrays(out, result[parameters.qualifier..i])
		end
	end

	return out
end

-- level 1 hook
function State:getReferences(claim)
	if self.conf.prefetchedRefs then
		-- return references that have been prefetched by isSourced
		return self.conf.prefetchedRefs
	end

	if claim.references then
		-- iterate through claim's reference statements to collect their values;
		-- return array with multiple value objects

		local refsCollected = self.conf.states[parameters.reference]:iterate(claim.references, {[parameters.general] = hookNames[parameters.reference][2], count = 1})  -- pass reference state with level 2 hook
		
		if p.numberValue.max > 0 and table.getn(refsCollected) >= p.numberValue.max then -- If arg 'maks' is used. Limit the number of returned refs
			limitedRefs = {}
			for i=1, p.numberValue.max do
				limitedRefs[i] = refsCollected[i]
			end
			return limitedRefs
		else -- Else return all refs
			return refsCollected
		end

	else
		return {}  -- return empty array
	end
end

-- level 2 hook
function State:getReference(statement)
	local key, citeWeb, citeQ, label
	local params = {}
	local citeParams = {['web'] = {}, ['q'] = {}}
	local citeMismatch = {}
	local useCite = nil
	local useParams = nil
	local value = ""
	local ref = {}

	local version = 11  -- increase this each time the below logic is changed to avoid conflict errors

	if statement.snaks then
		-- don't include "imported from", which is added by a bot
		if statement.snaks[aliasesP.importedFrom] then
			statement.snaks[aliasesP.importedFrom] = nil
		end

		-- don't include "inferred from", which is added by a bot
		if statement.snaks[aliasesP.inferredFrom] then
			statement.snaks[aliasesP.inferredFrom] = nil
		end

		-- don't include "type of reference"
		if statement.snaks[aliasesP.typeOfReference] then
			statement.snaks[aliasesP.typeOfReference] = nil
		end

		-- don't include "wikimedia DB name", indication of a faulty reference
		if statement.snaks[aliasesP.wmDBName] then
			statement.snaks[aliasesP.wmDBName] = nil
		end

		-- don't include "wikimedia user name", indication of a faulty reference
		if statement.snaks[aliasesP.wmUserName] then
			statement.snaks[aliasesP.wmUserName] = nil
		end

		-- don't include "wikimedia import URL", indication of a faulty reference
		if statement.snaks[aliasesP.wmImportURL] then
			statement.snaks[aliasesP.wmImportURL] = nil
		end

		-- don't include "wikimedia page version", indication of a faulty reference
		if statement.snaks[aliasesP.wmPageVersion] then
			statement.snaks[aliasesP.wmPageVersion] = nil
		end

		-- don't include "wikimedia community discussion", indication of a faulty reference
		if statement.snaks[aliasesP.wmCommunityDiscussion] then
			statement.snaks[aliasesP.wmCommunityDiscussion] = nil
		end

		-- don't include "image" to prevent littering
		if statement.snaks[aliasesP.image] then
			statement.snaks[aliasesP.image] = nil
		end

		-- don't include "document file on Wikimedia Commons" to prevent littering
		if statement.snaks["P996"] then
			statement.snaks["P996"] = nil
		end

		-- don't include "language" if it is equal to the local one
		if self:getReferenceDetail(statement.snaks, aliasesP.language) == self.conf.langName then
			statement.snaks[aliasesP.language] = nil
		end

		-- retrieve all the parameters
		for i in pairs(statement.snaks) do
			label = ""

			-- multiple authors may be given
			if i == aliasesP.author then
				params[i] = self:getReferenceDetails(statement.snaks, i, false, self.linked, true)  -- link = true/false, anyLang = true
			else
				params[i] = {self:getReferenceDetail(statement.snaks, i, false, (self.linked or (i == aliasesP.statedIn)) and (statement.snaks[i][1].datatype ~= 'url'), true)}  -- link = true/false, anyLang = true
			end

			if #params[i] == 0 then
				params[i] = nil
			else
				if statement.snaks[i][1].datatype == 'external-id' then
					key = "external-id"
					label = self.conf:getLabel(i)

					if label ~= "" then
						label = label .. " "
					end
				else
					key = i
				end

				-- add the parameter to each matching type of citation
				for j in pairs(citeParams) do
					-- do so if there was no mismatch with a previous parameter
					if not citeMismatch[j] then
						-- check if this parameter is not mismatching itself
						if i18n['cite'][j][key] then
							-- continue if an option is available in the corresponding cite template
							if i18n['cite'][j][key] ~= "" then
								citeParams[j][i18n['cite'][j][key]] = label .. params[i][1]

								-- if there are multiple parameter values (authors), add those too
								for k=2, #params[i] do
									citeParams[j][i18n['cite'][j][key]..k] = label .. params[i][k]
								end
							end
						else
							citeMismatch[j] = true
						end
					end
				end
			end
		end

		-- get title of general template for citing web references
		citeWeb = split(mw.wikibase.getSitelink(aliasesQ.citeWeb) or "", ":")[2]  -- split off namespace from front

		-- get title of template that expands stated-in references into citations
		citeQ = split(mw.wikibase.getSitelink(aliasesQ.citeQ) or "", ":")[2]  -- split off namespace from front

		-- (1) use the general template for citing web references if there is a match and if at least both "reference URL" and "title" are present
		if citeWeb and not citeMismatch['web'] and citeParams['web'][i18n['cite']['web'][aliasesP.referenceURL]] and citeParams['web'][i18n['cite']['web'][aliasesP.title]] then
			useCite = citeWeb
			useParams = citeParams['web']

		-- (2) use the template that expands stated-in references into citations if there is a match and if at least "stated in" is present
		elseif citeQ and not citeMismatch['q'] and citeParams['q'][i18n['cite']['q'][aliasesP.statedIn]] then
			-- we need the raw "stated in" Q-identifier for the this template
			citeParams['q'][i18n['cite']['q'][aliasesP.statedIn]] = self:getReferenceDetail(statement.snaks, aliasesP.statedIn, true)  -- raw = true

			useCite = citeQ
			useParams = citeParams['q']
		end

		if useCite and useParams then
			-- if this module is being substituted then build a regular template call, otherwise expand the template
			if mw.isSubsting() then
				for i, v in pairs(useParams) do
					value = value .. "|" .. i .. "=" .. v
				end

				value = "{{" .. useCite .. value .. "}}"
			else
				value = mw.getCurrentFrame():expandTemplate{title=useCite, args=useParams}
			end

		-- (3) else, do some default rendering of name-value pairs, but only if at least "stated in", "reference URL" or "title" is present
		elseif params[aliasesP.statedIn] or params[aliasesP.referenceURL] or params[aliasesP.title] then
			citeParams['default'] = {}

			-- start by adding authors up front
			if params[aliasesP.author] and #params[aliasesP.author] > 0 then
				citeParams['default'][#citeParams['default'] + 1] = table.concat(params[aliasesP.author], " & ")
			end

			-- combine "reference URL" and "title" into one link if both are present
			if params[aliasesP.referenceURL] and params[aliasesP.title] then
				citeParams['default'][#citeParams['default'] + 1] = '[' .. params[aliasesP.referenceURL][1] .. ' "' .. params[aliasesP.title][1] .. '"]'
			elseif params[aliasesP.referenceURL] then
				citeParams['default'][#citeParams['default'] + 1] = params[aliasesP.referenceURL][1]
			elseif params[aliasesP.title] then
				citeParams['default'][#citeParams['default'] + 1] = '"' .. params[aliasesP.title][1] .. '"'
			end

			-- then add "stated in"
			if params[aliasesP.statedIn] then
				citeParams['default'][#citeParams['default'] + 1] = "''" .. params[aliasesP.statedIn][1] .. "''"
			end

			-- remove previously added parameters so that they won't be added a second time
			params[aliasesP.author] = nil
			params[aliasesP.referenceURL] = nil
			params[aliasesP.title] = nil
			params[aliasesP.statedIn] = nil

			-- add the rest of the parameters
			for i, v in pairs(params) do
				i = self.conf:getLabel(i)

				if i ~= "" then
					citeParams['default'][#citeParams['default'] + 1] = i .. ": " .. v[1]
				end
			end

			value = table.concat(citeParams['default'], "; ")

			if value ~= "" then
				value = value .. "."
			end
		end

		if value ~= "" then
			value = {value}  -- create one value object

			if not self.rawValue then
				-- this should become a <ref> tag, so save the reference's hash for later
				value.refHash = "wikidata-" .. statement.hash .. "-v" .. (tonumber(i18n['cite']['version']) + version)
			end

			ref = {value}  -- wrap the value object in an array
		end
	end

	return ref
end

-- gets a detail of one particular type for a reference
function State:getReferenceDetail(snaks, dType, raw, link, anyLang)
	local switchLang = anyLang
	local value = nil

	if not snaks[dType] then
		return nil
	end

	-- if anyLang, first try the local language and otherwise any language
	repeat
		for _, v in ipairs(snaks[dType]) do
			value = self.conf:getValue(v, raw, link, false, anyLang and not switchLang, false, true)  -- noSpecial = true

			if value then
				break
			end
		end

		if value or not anyLang then
			break
		end

		switchLang = not switchLang
	until anyLang and switchLang

	return value
end

-- gets the details of one particular type for a reference
function State:getReferenceDetails(snaks, dType, raw, link, anyLang)
	local values = {}

	if not snaks[dType] then
		return {}
	end

	for _, v in ipairs(snaks[dType]) do
		-- if nil is returned then it will not be added to the table
		values[#values + 1] = self.conf:getValue(v, raw, link, false, anyLang, false, true)  -- noSpecial = true
	end

	return values
end

-- level 1 hook
function State:getAlias(object)
	local value = object.value
	local title = nil

	if value and self.linked then
		if self.conf.entityID:sub(1,1) == "Q" then
			title = mw.wikibase.getSitelink(self.conf.entityID)
		elseif self.conf.entityID:sub(1,1) == "P" then
			title = "d:Property:" .. self.conf.entityID
		end

		if title then
			value = buildWikilink(title, value)
		end
	end

	value = {value}  -- create one value object

	if #value > 0 then
		return {value}  -- wrap the value object in an array and return it
	else
		return {}  -- return empty array if there was no value
	end
end

-- level 1 hook
function State:getBadge(value)
	value = self.conf:getLabel(value, self.rawValue, self.linked, self.shortName)

	if value == "" then
		value = nil
	end

	value = {value}  -- create one value object

	if #value > 0 then
		return {value}  -- wrap the value object in an array and return it
	else
		return {}  -- return empty array if there was no value
	end
end

function State:callHook(param, hooks, statement, result)
	local valuesArray, refHash

	-- call a parameter's hook if it has been defined and if it has not been called before
	if not result[param] and hooks[param] then
		valuesArray = self[hooks[param]](self, statement, param, result, hooks)  -- array with value objects

		-- add to the result
		if #valuesArray > 0 then
			result[param] = valuesArray
			result.count = result.count + 1
		else
			result[param] = {}  -- an empty array to indicate that we've tried this hook already
			return true  -- miss == true
		end
	end

	return false
end

-- iterate through claims, claim's qualifiers or claim's references to collect values
function State:iterate(statements, hooks, matchHook)
	matchHook = matchHook or alwaysTrue

	local matches = false
	local rankPos = nil
	local result, gotRequired

	for _, v in ipairs(statements) do
		-- rankPos will be nil for non-claim statements (e.g. qualifiers, references, etc.)
		matches, rankPos = matchHook(self, v)

		if matches then
			result = {count = 0}  -- collection of arrays with value objects

			local function walk(formatTable)
				local miss

				for i2, v2 in pairs(formatTable.req) do
					-- call a hook, adding its return value to the result
					miss = self:callHook(i2, hooks, v, result)

					if miss then
						-- we miss a required value for this level, so return false
						return false
					end

					if result.count == hooks.count then
						-- we're done if all hooks have been called;
						-- returning at this point breaks the loop
						return true
					end
				end

				for _, v2 in ipairs(formatTable) do
					if result.count == hooks.count then
						-- we're done if all hooks have been called;
						-- returning at this point prevents further childs from being processed
						return true
					end

					if v2.child then
						walk(v2.child)
					end
				end

				return true
			end
			gotRequired = walk(self.parsedFormat)

			-- only append the result if we got values for all required parameters on the root level
			if gotRequired then
				-- if we have a rankPos (only with matchHook() for complete claims), then update the foundRank
				if rankPos and self.conf.foundRank > rankPos then
					self.conf.foundRank = rankPos
				end

				-- append the result
				self.results[#self.results + 1] = result

				-- break if we only need a single value
				if self.singleValue then
					break
				end
			end
		end
	end

	return self:out()
end

local function getEntityId(arg, eid, page, allowOmitPropPrefix)
	local id = nil
	local prop = nil

	if arg then
		if arg:sub(1,1) == ":" then
			page = arg
			eid = nil
		elseif arg:sub(1,1):upper() == "Q" or arg:sub(1,9):lower() == "property:" or allowOmitPropPrefix then
			eid = arg
			page = nil
		else
			prop = arg
		end
	end

	if eid then
		if eid:sub(1,9):lower() == "property:" then
			id = replaceAlias(mw.text.trim(eid:sub(10)))

			if id:sub(1,1):upper() ~= "P" then
				id = ""
			end
		else
			id = replaceAlias(eid)
		end
	elseif page then
		if page:sub(1,1) == ":" then
			page = mw.text.trim(page:sub(2))
		end

		id = mw.wikibase.getEntityIdForTitle(page) or ""
	end

	if not id then
		id = mw.wikibase.getEntityIdForCurrentPage() or ""
	end

	id = id:upper()

	if not mw.wikibase.isValidEntityId(id) then
		id = ""
	end

	return id, prop
end

local function nextArg(args)
	local arg = args[args.pointer]

	if arg then
		args.pointer = args.pointer + 1
		return mw.text.trim(arg)
	else
		return nil
	end
end

local function claimCommand(args, funcName)
	local cfg = Config:new()
	cfg:processFlagOrCommand(funcName)  -- process first command (== function name)

	local lastArg, parsedFormat, formatParams, claims, value
	local hooks = {count = 0}

	-- set the date if given;
	-- must come BEFORE processing the flags
	if args[p.args.date] then
		cfg.atDate = {parseDate(args[p.args.date])}
		cfg.periods = {false, true, false}  -- change default time constraint to 'current'
	end

	-- process flags and commands
	repeat
		lastArg = nextArg(args)
	until not cfg:processFlagOrCommand(lastArg)

	-- get the entity ID from either the positional argument, the eid argument or the page argument
	cfg.entityID, cfg.propertyID = getEntityId(lastArg, args[p.args.eid], args[p.args.page])

	if cfg.entityID == "" then
		return ""  -- we cannot continue without a valid entity ID
	end

	cfg.entity = mw.wikibase.getEntity(cfg.entityID)

	if not cfg.propertyID then
		cfg.propertyID = nextArg(args)
	end

	cfg.propertyID = replaceAlias(cfg.propertyID)

	if not cfg.entity or not cfg.propertyID then
		return ""  -- we cannot continue without an entity or a property ID
	end

	cfg.propertyID = cfg.propertyID:upper()

	if not cfg.entity.claims or not cfg.entity.claims[cfg.propertyID] then
		return ""  -- there is no use to continue without any claims
	end

	claims = cfg.entity.claims[cfg.propertyID]

	if cfg.states.qualifiersCount > 0 then
		-- do further processing if "qualifier(s)" command was given

		if #args - args.pointer + 1 > cfg.states.qualifiersCount then
			-- claim ID or literal value has been given

			cfg.propertyValue = nextArg(args)
		end

		for i = 1, cfg.states.qualifiersCount do
			-- check if given qualifier ID is an alias and add it
			cfg.qualifierIDs[parameters.qualifier..i] = replaceAlias(nextArg(args) or ""):upper()
		end
	elseif cfg.states[parameters.reference] then
		-- do further processing if "reference(s)" command was given

		cfg.propertyValue = nextArg(args)
	end

	-- check for special property value 'somevalue' or 'novalue'
	if cfg.propertyValue then
		cfg.propertyValue = replaceSpecialChars(cfg.propertyValue)

		if cfg.propertyValue ~= "" and mw.text.trim(cfg.propertyValue) == "" then
			cfg.propertyValue = " "  -- single space represents 'somevalue', whereas empty string represents 'novalue'
		else
			cfg.propertyValue = mw.text.trim(cfg.propertyValue)
		end
	end

	-- parse the desired format, or choose an appropriate format
	if args["format"] then
		parsedFormat, formatParams = parseFormat(args["format"])
	elseif cfg.states.qualifiersCount > 0 then  -- "qualifier(s)" command given
		if cfg.states[parameters.property] then  -- "propert(y|ies)" command given
			parsedFormat, formatParams = parseFormat(formats.propertyWithQualifier)
		else
			parsedFormat, formatParams = parseFormat(formats.qualifier)
		end
	elseif cfg.states[parameters.property] then  -- "propert(y|ies)" command given
		parsedFormat, formatParams = parseFormat(formats.property)
	else  -- "reference(s)" command given
		parsedFormat, formatParams = parseFormat(formats.reference)
	end

	-- if a "qualifier(s)" command and no "propert(y|ies)" command has been given, make the movable separator a semicolon
	if cfg.states.qualifiersCount > 0 and not cfg.states[parameters.property] then
		cfg.separators["sep"..parameters.separator][1] = {";"}
	end

	-- if only "reference(s)" has been given, set the default separator to none (except when raw)
	if cfg.states[parameters.reference] and not cfg.states[parameters.property] and cfg.states.qualifiersCount == 0
	   and not cfg.states[parameters.reference].rawValue then
		cfg.separators["sep"][1] = nil
	end

	-- if exactly one "qualifier(s)" command has been given, make "sep%q" point to "sep%q1" to make them equivalent
	if cfg.states.qualifiersCount == 1 then
		cfg.separators["sep"..parameters.qualifier] = cfg.separators["sep"..parameters.qualifier.."1"]
	end

	-- process overridden separator values;
	-- must come AFTER tweaking the default separators
	cfg:processSeparators(args)

	-- define the hooks that should be called (getProperty, getQualifiers, getReferences);
	-- only define a hook if both its command ("propert(y|ies)", "reference(s)", "qualifier(s)") and its parameter ("%p", "%r", "%q1", "%q2", "%q3") have been given
	for i, v in pairs(cfg.states) do
		-- e.g. 'formatParams["%q1"] or formatParams["%q"]' to define hook even if "%q1" was not defined to be able to build a complete value for "%q"
		if formatParams[i] or formatParams[i:sub(1, 2)] then
			hooks[i] = getHookName(i, 1)
			hooks.count = hooks.count + 1
		end
	end

	-- the "%q" parameter is not attached to a state, but is a collection of the results of multiple states (attached to "%q1", "%q2", "%q3", ...);
	-- so if this parameter is given then this hook must be defined separately, but only if at least one "qualifier(s)" command has been given
	if formatParams[parameters.qualifier] and cfg.states.qualifiersCount > 0 then
		hooks[parameters.qualifier] = getHookName(parameters.qualifier, 1)
		hooks.count = hooks.count + 1
	end

	if args[p.args.max] and tonumber(args[p.args.max]) then
		p.numberValue.max = tonumber(args[p.args.max])
	end

	if args[p.args.round] and tonumber(args[p.args.round]) then
        p.numberValue.round = tonumber(args[p.args.round])
	end

	-- create a state for "properties" if it doesn't exist yet, which will be used as a base configuration for each claim iteration;
	-- must come AFTER defining the hooks
	if not cfg.states[parameters.property] then
		cfg.states[parameters.property] = State:new(cfg, parameters.property)

		-- if the "single" flag has been given then this state should be equivalent to "property" (singular)
		if cfg.singleClaim then
			cfg.states[parameters.property].singleValue = true
		end
	end

	-- if the "sourced" flag has been given then create a state for "reference" if it doesn't exist yet, using default values,
	-- which must exist in order to be able to determine if a claim has any references;
	-- must come AFTER defining the hooks
	if cfg.sourcedOnly and not cfg.states[parameters.reference] then
		cfg:processFlagOrCommand(p.claimCommands.reference)  -- use singular "reference" to minimize overhead
	end

	-- set the parsed format and the separators (and optional punctuation mark);
	-- must come AFTER creating the additonal states
	cfg:setFormatAndSeparators(cfg.states[parameters.property], parsedFormat)

	-- process qualifier matching values, analogous to cfg.propertyValue
	for i, v in pairs(args) do
		i = tostring(i)

		if i:match('^[Pp]%d+$') or aliasesP[i] then
			v = replaceSpecialChars(v)

			-- check for special qualifier value 'somevalue'
			if v ~= "" and mw.text.trim(v) == "" then
				v = " "  -- single space represents 'somevalue'
			end

			cfg.qualifierIDsAndValues[replaceAlias(i):upper()] = v
		end
	end

	-- first sort the claims on rank to pre-define the order of output (preferred first, then normal, then deprecated)
	claims = sortOnRank(claims)

	-- then iterate through the claims to collect values
	value = cfg:concatValues(cfg.states[parameters.property]:iterate(claims, hooks, State.claimMatches))  -- pass property state with level 1 hooks and matchHook

	-- if desired, add a clickable icon that may be used to edit the returned values on Wikidata
	if cfg.editable and value ~= "" then
		value = value .. cfg:getEditIcon()
	end

	return value
end

local function generalCommand(args, funcName)
	local cfg = Config:new()
	cfg.curState = State:new(cfg)

	local lastArg
	local value = nil

	repeat
		lastArg = nextArg(args)
	until not cfg:processFlag(lastArg)

	-- get the entity ID from either the positional argument, the eid argument or the page argument
	cfg.entityID = getEntityId(lastArg, args[p.args.eid], args[p.args.page], true)

	if cfg.entityID == "" or not mw.wikibase.entityExists(cfg.entityID) then
		return ""  -- we cannot continue without an entity
	end

	-- serve according to the given command
	if funcName == p.generalCommands.label then
		value = cfg:getLabel(cfg.entityID, cfg.curState.rawValue, cfg.curState.linked, cfg.curState.shortName)
	elseif funcName == p.generalCommands.title then
		cfg.inSitelinks = true

		if cfg.entityID:sub(1,1) == "Q" then
			value = mw.wikibase.getSitelink(cfg.entityID)
		end

		if cfg.curState.linked and value then
			value = buildWikilink(value)
		end
	elseif funcName == p.generalCommands.description then
		value = mw.wikibase.getDescription(cfg.entityID)
	else
		local parsedFormat, formatParams
		local hooks = {count = 0}

		cfg.entity = mw.wikibase.getEntity(cfg.entityID)

		if funcName == p.generalCommands.alias or funcName == p.generalCommands.badge then
			cfg.curState.singleValue = true
		end

		if funcName == p.generalCommands.alias or funcName == p.generalCommands.aliases then
			if not cfg.entity.aliases or not cfg.entity.aliases[cfg.langCode] then
				return ""  -- there is no use to continue without any aliasses
			end

			local aliases = cfg.entity.aliases[cfg.langCode]

			-- parse the desired format, or parse the default aliases format
			if args["format"] then
				parsedFormat, formatParams = parseFormat(args["format"])
			else
				parsedFormat, formatParams = parseFormat(formats.alias)
			end

			-- process overridden separator values;
			-- must come AFTER tweaking the default separators
			cfg:processSeparators(args)

			-- define the hook that should be called (getAlias);
			-- only define the hook if the parameter ("%a") has been given
			if formatParams[parameters.alias] then
				hooks[parameters.alias] = getHookName(parameters.alias, 1)
				hooks.count = hooks.count + 1
			end

			-- set the parsed format and the separators (and optional punctuation mark)
			cfg:setFormatAndSeparators(cfg.curState, parsedFormat)

			-- iterate to collect values
			value = cfg:concatValues(cfg.curState:iterate(aliases, hooks))
		elseif funcName == p.generalCommands.badge or funcName == p.generalCommands.badges then
			if not cfg.entity.sitelinks or not cfg.entity.sitelinks[cfg.siteID] or not cfg.entity.sitelinks[cfg.siteID].badges then
				return ""  -- there is no use to continue without any badges
			end

			local badges = cfg.entity.sitelinks[cfg.siteID].badges

			cfg.inSitelinks = true

			-- parse the desired format, or parse the default aliases format
			if args["format"] then
				parsedFormat, formatParams = parseFormat(args["format"])
			else
				parsedFormat, formatParams = parseFormat(formats.badge)
			end

			-- process overridden separator values;
			-- must come AFTER tweaking the default separators
			cfg:processSeparators(args)

			-- define the hook that should be called (getBadge);
			-- only define the hook if the parameter ("%b") has been given
			if formatParams[parameters.badge] then
				hooks[parameters.badge] = getHookName(parameters.badge, 1)
				hooks.count = hooks.count + 1
			end

			-- set the parsed format and the separators (and optional punctuation mark)
			cfg:setFormatAndSeparators(cfg.curState, parsedFormat)

			-- iterate to collect values
			value = cfg:concatValues(cfg.curState:iterate(badges, hooks))
		end
	end

	value = value or ""

	if cfg.editable and value ~= "" then
		-- if desired, add a clickable icon that may be used to edit the returned value on Wikidata
		value = value .. cfg:getEditIcon()
	end

	return value
end

-- modules that include this module should call the functions with an underscore prepended, e.g.: p._property(args)
local function establishCommands(commandList, commandFunc)
	for _, commandName in pairs(commandList) do
		local function wikitextWrapper(frame)
			local args = copyTable(frame.args)
			args.pointer = 1
			loadI18n(aliasesP, frame)
			return commandFunc(args, commandName)
		end
		p[commandName] = wikitextWrapper

		local function luaWrapper(args)
			args = copyTable(args)
			args.pointer = 1
			loadI18n(aliasesP)
			return commandFunc(args, commandName)
		end
		p["_" .. commandName] = luaWrapper
	end
end

establishCommands(p.claimCommands, claimCommand)
establishCommands(p.generalCommands, generalCommand)

-- main function that is supposed to be used by wrapper templates
function p.main(frame)
	if not mw.wikibase then return nil end

	local f, args

	loadI18n(aliasesP, frame)

	-- get the parent frame to take the arguments that were passed to the wrapper template
	frame = frame:getParent() or frame

	if not frame.args[1] then
		throwError("no-function-specified")
	end

	f = mw.text.trim(frame.args[1])

	if f == "main" then
		throwError("main-called-twice")
	end

	assert(p["_"..f], errorText('no-such-function', f))

	-- copy arguments from immutable to mutable table
	args = copyTable(frame.args)

	-- remove the function name from the list
	table.remove(args, 1)

	return p["_"..f](args)
end

return p
    Hentet fra «https://www.wikisida.no/index.php?title=Modul:Wd-norsk&oldid=373479»