wikidata

local p = {} -- Sekalaisia funktioita Wikidatan ja suomenkielisen Wikipedian yhteensopivuuden edistämiseksi  p.defaultDateFormat = { [ 7] =  {'[[Y-"luku eaa."]]', '[["ensimmäinen vuosisata eaa."]]'}, [ 8] =  {'[[Y-"luku eaa."]]', '[[Y-"vuosikymmen eaa."]]'}, [ 9] = '[[Y" eaa."]]', [10] = '[[F]] [[Y" eaa."]]', [11] = '[[j. F"ta"]] [[Y" eaa."]]', [12] = '[[j. F"ta"]] [[Y" eaa."]] "kello" H', [13] = '[[j. F"ta"]] [[Y" eaa."]] "kello" H.i', [14] = '[[j. F"ta"]] [[Y" eaa."]] "kello" H.i.s', functions = { [7] = function (year) return (year == 0) and 2 or 1 end, [8] = function (year) return (year % 100 == 0) and 2 or 1 end }, check = function (self, object, lang, bce) local format = self[object.precision] if object.precision == 7 then object.time = object.time..' -100 years' end if type(format) == 'table' then format = format[ self.functions[object.precision]( tonumber(lang:formatDate('Y', object.time)) ) ] end return bce == 0 and string.gsub(format, ' eaa.', '') or format end } p.calendar = { jul = 'http://www.wikidata.org/entity/Q1985786', greg = 'http://www.wikidata.org/entity/Q1985727', check = function (self, object, calendar) if type(self[calendar]) == 'string' then if object.calendarmodel == self[calendar] then return object.time end else return object.time end end }  function p.getDate(frame) local lang = mw.getContentLanguage() local format = { [0] = frame:getArgument('format'):expand() } local calendar = frame:getArgument('calendar'):expand() local property = frame.args[1] local entity = mw.wikibase.getEntity(frame.args[2]) if entity and entity.claims and entity.claims[property] then local statements = entity.claims[property] local date = {} for k, v in ipairs(statements) do if v.mainsnak.datavalue    and v.rank ~= 'deprecated'    and p.calendar:check(v.mainsnak.datavalue.value, calendar) then    if v.rank == 'preferred' then    date = { v.mainsnak.datavalue.value }    break    end    table.insert(date, v.mainsnak.datavalue.value) end end for k, v in ipairs(date) do local bce v.time, bce = string.gsub(v.time, '^%-', '+') v.time = string.gsub(v.time, '%-00', '-01') if format[0] then format[k] = format[0] else format[k] = p.defaultDateFormat:check(v, lang, bce) bce = false end format[k] = string.gsub(format[k], 'Y', tonumber(lang:formatDate('Y', v.time)) .. (bce == 1 and ' "eaa".' or '')) date[k] = lang:formatDate(format[k], v.time) end return table.concat(date, ', ') end end  return p