Modul:Wb

Aus STA Dokumentationsplattform
Version vom 30. Mai 2020, 20:57 Uhr von imported>Juergen.Kett
Zur Navigation springen Zur Suche springen

Die Dokumentation für dieses Modul kann unter Modul:Wb/Doku erstellt werden

local p = {}; 

p.id = nil;
p.entity = nil;
p.claims = nil;

local rowDelA = "<tr>"
local rowDelB = "</tr>\n"
local colDelA = "<td>"
local colDelB = "</td>"
local tableDelA = "<table>"
local tableDelB = "</table>"
local refUrl = nil

function p.getFormatedStatements(frame)
   id = frame.args.id
   return p._getFormatedStatements(id)
end

function p._getFormatedStatements(id)
  local ret = ""
  local qualifiers = ""
  local prop = ""
  local value = ""
  p.entity = mw.wikibase.getEntity(id)
  
  if not p.entity then
     return "no entity with id found: " .. id
  end
  
  p.claims = p.entity["claims"]
  
  for propId, valueSnaks in pairs(p.claims) do
     local values = ""
     for key, valueSnak in pairs(valueSnaks) do
        qualifiers = p.getFormatedQualifiers(valueSnak["qualifiers"])
        values = values .. p.renderValue(valueSnak["mainsnak"])
     end
     ret = ret .. p.renderStatement(propId, values, qualifiers) 
  end
  return ret
end

function p.getFormatedQualifiers(props)
    if not props then return "" end
    local ret = ""

    for propId, valueSnaks in pairs(props) do
       local values = ""
       for key, valueSnak in pairs(valueSnaks) do
          values = values .. p.renderValue(valueSnak)
       end
       ret = ret .. p.renderStatement(propId, values, nil) 
    end

    return ret
end

function p.renderStatement(propId, values, qualifiers)
  local propLabel = mw.wikibase.getLabel(propId)
  if not propLabel then propLabel = "" end
  local ret = rowDelA .. colDelA .. propLabel .. colDelB .. tableDelA .. values 
  if qualifiers then
     ret = ret .. tableDelA .. qualifiers .. tableDelB
  end
  ret = ret .. tableDelB .. rowDelB
  return ret
end

function p.renderValue(valueSnak)
  local value = mw.wikibase.renderSnak(valueSnak)
  return rowDelA .. colDelA .. value .. colDelB .. rowDelB 
end

p.getLabel = function (frame)
 local id = frame.args.id
 if id then 
   return mw.wikibase.getLabel(id)
 end
 return ""
end

-- wird nicht mehr benötigt
function p.nextStatement() 
  p.property = p.keys[p.index]
  mw.log(p.property)
  if p.property then
    claim = p.claims[p.property]
    snak = claim[1]["mainsnak"] 
    p.value = mw.wikibase.renderSnak(snak)
    p.index = p.index + 1
  end
end

-- wird nicht mehr benötigt
function p.initEntity(qid)
  p.entity = mw.wikibase.getEntity(qid)
  p.claims = p.entity["claims"]
  -- p.i, p.v = next(p.claims, nil) 
  -- mw.logObject(p.entity)
  p.keys = {}
  p.index=1
  local i = 1
  for k in pairs(p.claims) do  
     p.keys[i]=k
     i = i + 1
  end
  mw.logObject(p.keys)
end



return p