Modul:Wikidata utilities: Unterschied zwischen den Versionen
KKeine Bearbeitungszusammenfassung |
(erweitert) |
||
Zeile 28: | Zeile 28: | ||
end | end | ||
local function | local function getNValues( statements, count ) | ||
local | local ar = {} | ||
if #statements | if count > #statements then count = #statements end | ||
if (#statements == 0) or (count <= 0) then | |||
return ar | |||
end | |||
local i = 0 | |||
repeat | |||
i = i + 1 | |||
if statements[i].mainsnak.snaktype == 'value' then | |||
table.insert( ar, statements[i].mainsnak.datavalue.value ) | |||
end | end | ||
until ( i >= #statements ) or ( #ar >= count ) | |||
return | return ar | ||
end | end | ||
Zeile 46: | Zeile 51: | ||
end | end | ||
local value = getFirstValue( anEntity:getBestStatements( p ) ) | local value = getFirstValue( anEntity:getBestStatements( p ) ) | ||
if value then | if value then | ||
return value.id | return value.id | ||
Zeile 59: | Zeile 64: | ||
end | end | ||
local value = getFirstValue( anEntity:getBestStatements( p ) ) | local value = getFirstValue( anEntity:getBestStatements( p ) ) | ||
if value then | if value then | ||
return value | return value | ||
Zeile 72: | Zeile 77: | ||
end | end | ||
local value = getFirstValue( mw.wikibase.getBestStatements( id, p ) ) | local value = getFirstValue( mw.wikibase.getBestStatements( id, p ) ) | ||
if value then | if value then | ||
return value.id | return value.id | ||
Zeile 85: | Zeile 90: | ||
end | end | ||
local value = getFirstValue( mw.wikibase.getBestStatements( id, p ) ) | local value = getFirstValue( mw.wikibase.getBestStatements( id, p ) ) | ||
if value then | if value then | ||
return value | return value | ||
Zeile 91: | Zeile 96: | ||
return '' | return '' | ||
end | |||
function fw.getEntWDvalues( anEntity, p, count ) | |||
if anEntity == nil then | |||
return {} | |||
end | |||
local statements = anEntity:getBestStatements( p ) | |||
return getNValues( statements, count or #statements ) | |||
end | |||
function fw.getWDvalues( id, p, count ) | |||
if not id or id == '' then | |||
return {} | |||
end | |||
local statements = mw.wikibase.getBestStatements( id, p ) | |||
return getNValues( statements, count or #statements ) | |||
end | |||
function fw.typeSearch( p31, poi, limit ) | |||
-- p31: array of Wikidata values | |||
-- poi: array of q id - types relations | |||
-- limit: maximum levels to analyse | |||
if (not p31) or (#p31 == 0) then return 'error' end | |||
local aType, i, id, j | |||
for i = 1, #p31, 1 do | |||
id = p31[i].id | |||
aType = poi[id] | |||
if aType then | |||
return aType | |||
else | |||
j = 0 | |||
repeat | |||
id = fw.getWDid( id, 'P279' ) | |||
if id ~= '' then | |||
aType = poi[id] | |||
if aType then return aType end | |||
end | |||
j = j + 1 | |||
until (j >= limit) or (id == '') | |||
end | |||
end | |||
return 'error' | |||
end | end | ||
return fw | return fw |
Version vom 1. November 2017, 17:28 Uhr
Die Dokumentation für dieses Modul kann unter Modul:Wikidata utilities/doc erstellt werden
local fw = {} function fw.checkId( id ) if (not id) or (id == '') then return '' end local i = id:upper() if mw.ustring.match( i, '^Q[%d]+$') == nil then if mw.ustring.match( i, '^[%d]+$') ~= nil then -- only number return 'Q' .. i else -- invalid id return '' end end return i end local function getFirstValue( statements ) if #statements == 0 then return nil end for i = 1, #statements, 1 do if statements[i].mainsnak.snaktype == 'value' then return statements[i].mainsnak.datavalue.value end end return nil end local function getNValues( statements, count ) local ar = {} if count > #statements then count = #statements end if (#statements == 0) or (count <= 0) then return ar end local i = 0 repeat i = i + 1 if statements[i].mainsnak.snaktype == 'value' then table.insert( ar, statements[i].mainsnak.datavalue.value ) end until ( i >= #statements ) or ( #ar >= count ) return ar end function fw.getEntWDid( anEntity, p ) if anEntity == nil then return '' end local value = getFirstValue( anEntity:getBestStatements( p ) ) if value then return value.id end return '' end function fw.getEntWDvalue( anEntity, p ) if anEntity == nil then return '' end local value = getFirstValue( anEntity:getBestStatements( p ) ) if value then return value end return '' end function fw.getWDid( id, p ) if not id or id == '' then return '' end local value = getFirstValue( mw.wikibase.getBestStatements( id, p ) ) if value then return value.id end return '' end function fw.getWDvalue( id, p ) if not id or id == '' then return '' end local value = getFirstValue( mw.wikibase.getBestStatements( id, p ) ) if value then return value end return '' end function fw.getEntWDvalues( anEntity, p, count ) if anEntity == nil then return {} end local statements = anEntity:getBestStatements( p ) return getNValues( statements, count or #statements ) end function fw.getWDvalues( id, p, count ) if not id or id == '' then return {} end local statements = mw.wikibase.getBestStatements( id, p ) return getNValues( statements, count or #statements ) end function fw.typeSearch( p31, poi, limit ) -- p31: array of Wikidata values -- poi: array of q id - types relations -- limit: maximum levels to analyse if (not p31) or (#p31 == 0) then return 'error' end local aType, i, id, j for i = 1, #p31, 1 do id = p31[i].id aType = poi[id] if aType then return aType else j = 0 repeat id = fw.getWDid( id, 'P279' ) if id ~= '' then aType = poi[id] if aType then return aType end end j = j + 1 until (j >= limit) or (id == '') end end return 'error' end return fw