Module:PublicationAuthorList: Difference between revisions
From MaRDI portal
EloiFerrer (talk | contribs) No edit summary |
EloiFerrer (talk | contribs) No edit summary |
||
(2 intermediate revisions by the same user not shown) | |||
Line 29: | Line 29: | ||
local link = binding.value.value | local link = binding.value.value | ||
if binding. | if binding.isHuman and binding.isHuman.value == "Y" then | ||
link = link:gsub("entity/Q", "wiki/Person:") | link = link:gsub("entity/Q", "wiki/Person:") | ||
end | end | ||
Line 59: | Line 59: | ||
PREFIX wd: <https://portal.mardi4nfdi.de/entity/> | PREFIX wd: <https://portal.mardi4nfdi.de/entity/> | ||
SELECT ?property ?propertyLabel ? | SELECT DISTINCT ?value ?valueLabel ?property ?propertyLabel ?isHuman ?seriesOrdinal | ||
WHERE { | WHERE { | ||
target1: | target1: p:P16 ?authorstatement . | ||
?authorstatement ps:P16 ?value. | |||
?value wdt:P31 ?instance. | |||
OPTIONAL { ?authorstatement pq:P146 ?seriesOrdinal.} | |||
OPTIONAL { | |||
BIND(wdt:P16 AS ?property) | BIND(wdt:P16 AS ?property) | ||
BIND(IF(?instance = wd:Q57162, "Y", "N") AS ?isHuman) | |||
SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],en". } | SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],en". } | ||
} | } |
Latest revision as of 14:36, 19 July 2024
Documentation for this module may be created at Module:PublicationAuthorList/doc
-- Required module containing helper methods
local helper = require('Module:HelperMethods')
-- Required modules for SPARQL queries and HTML table generation
local sparql = require('SPARQL')
local mwHtml = require('mw.html')
-- Main table to hold all functions
local p = {}
-- Function to convert JSON results into a comma-separated string
function p.convertJsonToCommaSeparatedList(jsonResults)
local resultsString = ""
if jsonResults and jsonResults.results and jsonResults.results.bindings then
local bindings = jsonResults.results.bindings
for i = 0, #bindings do
local binding = bindings[i]
if binding.valueLabel and binding.valueLabel.value then
if resultsString ~= "" then
resultsString = resultsString .. ", "
end
local name = binding.valueLabel.value
if string.find(name, "https://") then
name = "Unnamed Author"
end
local link = binding.value.value
if binding.isHuman and binding.isHuman.value == "Y" then
link = link:gsub("entity/Q", "wiki/Person:")
end
local nameAndLink = "[" .. link .. " " .. name .. "]"
resultsString = resultsString .. nameAndLink
end
end
end
return resultsString
end
-- Function to build the list
function p.buildAuthorList(frame)
-- Retrieve target1 from frame arguments or return error message if not set
local target1 = frame.args[1]
if not target1 or target1 == '' then
return "No ID given"
end
-- Constructing the SPARQL query with dynamic entity target1
local sparqlQuery = [[
PREFIX target1: <https://portal.mardi4nfdi.de/entity/]] .. target1 .. [[>
PREFIX wdt: <https://portal.mardi4nfdi.de/prop/direct/>
PREFIX wd: <https://portal.mardi4nfdi.de/entity/>
SELECT DISTINCT ?value ?valueLabel ?property ?propertyLabel ?isHuman ?seriesOrdinal
WHERE {
target1: p:P16 ?authorstatement .
?authorstatement ps:P16 ?value.
?value wdt:P31 ?instance.
OPTIONAL { ?authorstatement pq:P146 ?seriesOrdinal.}
BIND(wdt:P16 AS ?property)
BIND(IF(?instance = wd:Q57162, "Y", "N") AS ?isHuman)
SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],en". }
}
ORDER BY xsd:integer(?seriesOrdinal)
]]
-- mw.log( sparqlQuery )
-- Executing the SPARQL query and retrieving results in JSON format
local jsonResults = sparql.runQuery(sparqlQuery)
-- mw.logObject(jsonResults)
-- Handle error in SPARQL query execution
if jsonResults and jsonResults.error then
mw.log("Error in SPARQL query: " .. tostring(jsonResults.error))
return nil
end
if not jsonResults then
return "Could not fetch data."
end
if helper.countElementsInBindings(jsonResults.results.bindings) == 0 then
return "No author found."
end
local authorList = p.convertJsonToCommaSeparatedList(jsonResults)
mw.log(authorList)
return authorList
end
-- Return the created html table
return p