Mòdul:Wikidata: diferència entre les revisions
Contingut suprimit Contingut afegit
un espai en blanc que sobra |
anys dC menors de 100 i sense 0 al davant, demanat a la discussió |
||
Línia 111: | Línia 111: | ||
elseif datatype == 'time' then |
elseif datatype == 'time' then |
||
-- Dates and times are stored in ISO 8601 format |
-- Dates and times are stored in ISO 8601 format |
||
-- check for negative date |
-- check for negative date, ex. "-0027-01-16T00:00:00Z" |
||
local suffix = "" |
local suffix = "" |
||
local timestamp = snak.datavalue.value.time |
local timestamp = snak.datavalue.value.time |
||
Línia 117: | Línia 117: | ||
timestamp = '+' .. string.sub(timestamp, 2) |
timestamp = '+' .. string.sub(timestamp, 2) |
||
suffix = " aC" |
suffix = " aC" |
||
⚫ | |||
suffix = " dC" |
|||
end |
end |
||
local function d(f) |
local function d(f) |
||
Línia 123: | Línia 125: | ||
if formatting == 'year' then |
if formatting == 'year' then |
||
-- suppress leading zeros in year |
-- suppress leading zeros in year |
||
local |
local ret, _ = string.gsub(d("Y"), "^0+", "") |
||
⚫ | |||
⚫ | |||
stryear = string.sub(stryear, 2) |
|||
end |
|||
⚫ | |||
else |
else |
||
local ret, _ = string.gsub(d("j F Y"), " 0+", " ") |
|||
return ret |
|||
end |
end |
||
Revisió del 21:34, 19 nov 2015
Documentació del mòdul [ mostra ] [ modifica el codi ] [ mostra l'historial ] [ refresca ]
A continuació es mostra la documentació transclosa de la subpàgina /ús. [salta a la caixa de codi]
Aquesta pàgina és una redirecció. Per les darreres versions d'aquest mòdul, a partir de 20200210, vegeu Module:Wikidades. |
(en) This is a redirect page. For newer versions of this module, from 20200210, see Module:Wikidades. |
local p = {}
-- module local variables
local wiki =
{
langcode = mw.language.getContentLanguage().code
}
local i18n = {
["errors"] = {
["property-param-not-provided"] = "Falta el paràmetre de la propietat.",
["qualifier-property-param-not-provided"] = "Falta el paràmetre de la propietat del qualificador.",
["entity-not-found"] = "Entitat no trobada.",
["unknown-claim-type"] = "Tipus d'afirmació (claim) desconegut.",
["unknown-snak-type"] = "Tipus de connector (snak) desconegut.",
["unknown-datavalue-type"] = "Tipus de valor (datavalue) desconegut.",
["unknown-entity-type"] = "Tipus d'entitat desconegut.",
["unknown-value-module"] = "You must set both value-module and value-function parameters.",
["value-module-not-found"] = "The module pointed by value-module not found.",
["value-function-not-found"] = "The function pointed by value-function not found."
},
["somevalue"] = "''valor desconegut''",
["novalue"] = "''cap valor aplicable''",
["warnDump"] = "[[Categoria:Funció Dump del mòdul Wikidata]]",
["datetime"] =
{
-- $1 is a placeholder for the actual number
[0] = "$1 mil milions d'anys", -- precision: billion years
[1] = "$100 milions d'anys", -- precision: hundred million years
[2] = "$10 milions d'anys", -- precision: ten million years
[3] = "$1 milions d'anys", -- precision: million years
[4] = "$100.000 anys", -- precision: hundred thousand years
[5] = "$10.000 anys", -- precision: ten thousand years
[6] = "$1 mil·leni", -- precision: millennium
[7] = "$1 segle", -- precision: century
[8] = "dècada del $1", -- precision: decade
-- the following use the format of #time parser function
[9] = "Y", -- precision: year,
[10] = "F Y", -- precision: month
[11] = "F j, Y", -- precision: day
[12] = "F j, Y ga", -- precision: hour
[13] = "F j, Y g:ia", -- precision: minute
[14] = "F j, Y g:i:sa", -- precision: second
["beforenow"] = "$1 aC", -- how to format negative numbers for precisions 0 to 5
["afternow"] = "$1 dC", -- how to format positive numbers for precisions 0 to 5
["bc"] = '$1 "BCE"', -- how print negative years
["ad"] = "$1" -- how print positive years
},
["monolingualtext"] = '<span lang="%language">%text</span>'
}
function getClaims( args ) -- returns a table of the claims (TODO: matching some conditions given in args)
if not args.property then
return formatError( 'property-param-not-provided' )
end
--Get entity
local entity = nil
local property = string.upper(args.property)
if args.entity and type( args.entity ) == "table" then
entity = args.entity
else
entity = mw.wikibase.getEntityObject()
end
if not entity or not entity.claims or not entity.claims[property] then
return nil
end
return entity.claims[property]
end
function numOfClaims( claims )
if type(claims) ~= "table" then
return 0
elseif claims == {} then
return 0
else
return #claims
end
end
function getDatavalue(snak, formatting)
if snak.snaktype ~= 'value' then
return nil
end
datatype = snak.datavalue.type
if datatype == 'wikibase-entityid' then
local entityId = "Q" .. tostring(snak.datavalue.value['numeric-id'])
local label = mw.wikibase.label( entityId )
local sitelink = mw.wikibase.sitelink( entityId )
if formatting == 'raw' then
return entityId
elseif formatting == 'label' then
return ( label or entityId )
elseif formatting == 'sitelink' then
return ( sitelink or 'wikidata:' .. entityId )
else
return formatEntityId( entityId )
end
elseif datatype == 'string' then
local astring = snak.datavalue.value
if formatting == 'weblink' then
return '[' .. astring .. ' ' .. mw.text.split( astring, '//' )[2] .. ']'
elseif mw.ustring.find( (formatting or ''), '$1', 1, true ) then -- formatting = a pattern
return mw.ustring.gsub( formatting, '$1', astring ) .. '' --Hack to get only the first result of the function
else
return astring
end
elseif datatype == 'time' then
-- Dates and times are stored in ISO 8601 format
-- check for negative date, ex. "-0027-01-16T00:00:00Z"
local suffix = ""
local timestamp = snak.datavalue.value.time
if string.sub(timestamp, 1, 1) == '-' then
timestamp = '+' .. string.sub(timestamp, 2)
suffix = " aC"
elseif string.sub(timestamp, 2, 3) == '00' then
suffix = " dC"
end
local function d(f)
return mw.language.new(wiki.langcode):formatDate(f, timestamp) .. suffix
end
if formatting == 'year' then
-- suppress leading zeros in year
local ret, _ = string.gsub(d("Y"), "^0+", "")
return ret
else
local ret, _ = string.gsub(d("j F Y"), " 0+", " ")
return ret
end
elseif datatype == 'globecoordinate' then
local coord = snak.datavalue.value
local globetable = { Q2 = 'earth', Q111 = 'mars', Q405 = 'moon'}
if formatting == 'latitude' then
return coord.latitude
elseif formatting == 'longitude' then
return coord.longitude
elseif formatting == 'dimension' then
return coord.dimension
else
if coord.globe == '' or coord.globe == nil then
return 'earth'
else
local globenum = mw.text.split( snak.datavalue.value.globe, 'entity/' )[2] -- http://www.wikidata.org/wiki/Q2
if globetable[globenum] then
return globetable[globenum]
else
return globenum
end
end
end
else
return formatError( 'unknown-datavalue-type' )
end
end
function getEntityIdFromValue( value )
if value['entity-type'] == 'item' then
return 'q' .. value['numeric-id']
elseif value['entity-type'] == 'property' then
return 'p' .. value['numeric-id']
else
return formatError( 'unknown-entity-type' )
end
end
function formatError( key )
return '<span class="error">' .. i18n.errors[key] .. '</span>'
end
function formatStatement( statement, options )
if not statement.type or statement.type ~= 'statement' then
return formatError( 'unknown-claim-type' )
end
return formatSnak( statement.mainsnak, options )
--TODO reference and qualifiers
end
function formatQualifier ( qualifiers, qualifierProperty, options )
if not qualifiers[qualifierProperty] then
return nil
end
return formatSnak( qualifiers[qualifierProperty][1], options )
end
function formatSnak( snak, options )
if snak.snaktype == 'somevalue' then
return i18n['somevalue']
elseif snak.snaktype == 'novalue' then
return i18n['novalue']
elseif snak.snaktype == 'value' then
return getDatavalue( snak, options.formatting )
else
return formatError( 'unknown-snak-type' )
end
end
function formatEntityId( entityId )
local label = mw.wikibase.label( entityId )
local link = mw.wikibase.sitelink( entityId )
if link then
if label then
return '[[' .. link .. '|' .. label .. ']]'
else
return '[[' .. link .. ']]'
end
else
return '[[wikidata:' .. entityId .. '|' .. (label or entityId) .. ']]'
end
end
-- Return the site link (for the current site) for a given data item.
function p.getSiteLink( frame )
if frame.args[1] == nil then
entity = mw.wikibase.getEntityObject()
if not entity then
return nil
end
id = entity.id
else
id = frame.args[1]
end
return mw.wikibase.sitelink( id )
end
-- Return the statements with a format
function p.formatStatements( frame ) -- Format statement and concat them cleanly
local args = frame.args
--If a value is already set, use it
if args.value and args.value ~= '' then
return args.value
end
local rawStatements = getClaims( args )
if not rawStatements or numOfClaims(rawStatements) == 0 then
return nil
end
--Format statement and concat them cleanly
local formattedStatements = {}
for i, statement in pairs( rawStatements ) do
if args.rank == 'one' then
return formatStatement( statement, args ) --Output only one value
elseif args.rank == 'preferred' then --This should be set as the default case
if #rawStatements == 1 then
return formatStatement( statement, args ) --Output the only value
else
if statement.rank == 'preferred' then
table.insert( formattedStatements, formatStatement( statement, args ) ) --Output only the preferred values
end
end
else
table.insert( formattedStatements, formatStatement( statement, args ) )
end
end
return mw.text.listToText( formattedStatements, args.separator, args.conjunction )
end
--Return the qualifiers wth a format
function p.formatQualifiers( frame )
local args = frame.args
--If a value is already set, use it
if args.value and args.value ~= '' then
return args.value
end
--Required parameters
local property = string.upper(args.property)
local qualifierProperty = string.upper(args.qualifierProperty)
if not property then
return formatError( 'property-param-not-provided' )
end
if not qualifierProperty then
return formatError( 'qualifier-property-param-not-provided' )
end
--Get statements
local rawStatements = getClaims( args )
if not rawStatements or numOfClaims(rawStatements) == 0 then
return nil
end
--Format statement and concat them cleanly
local formattedQualifiers = {}
for i, statement in pairs( rawStatements ) do
if not statement.qualifiers then
return nil
end
if args.rank == 'one' then
return formatQualifier( statement.qualifiers, qualifierProperty, args )
elseif args.rank == 'preferred' then --This should be set as the default case
if #rawStatements == 1 then
return formatQualifier( statement.qualifiers, qualifierProperty, args ) --Output the only value
else
if statement.rank == 'preferred' then
table.insert( formattedQualifiers, formatQualifier( statement.qualifiers, qualifierProperty, args ) ) --Output only the preferred values
end
end
else
table.insert( formattedQualifiers, formatQualifier( statement.qualifiers, qualifierProperty, args ) )
end
end
return mw.text.listToText( formattedQualifiers, args.separator, args.conjunction )
end
-- Dump data tree structure
-- From pl:Module:Wikidane, by User:Paweł Ziemian
-- Funció pensada com a eina d'ajuda en previsualització.
function p.Dump(frame)
local data = mw.wikibase.getEntityObject()
if not data then
return i18n.warnDump
end
local f = frame.args[1] and frame or frame:getParent()
local i = 1
while true do
local index = f.args[i]
if not index then
return "<pre>" .. mw.dumpObject(data) .. "</pre>" .. i18n.warnDump
end
data = data[index] or data[tonumber(index)]
if not data then
return i18n.warnDump
end
i = i + 1
end
end
-- Look into entity object
-- From pl:Module:Wikidane, function V, by User:Paweł Ziemian
function p.getEntityFromTree(frame)
local data = mw.wikibase.getEntityObject()
if not data then
return nil
end
local f = frame.args[1] and frame or frame:getParent()
local i = 1
while true do
local index = f.args[i]
if not index then
return tostring(data)
end
data = data[index] or data[tonumber(index)]
if not data then
return
end
i = i + 1
end
end
return p