« Module:WikidataTable » : différence entre les versions

De Wikiromandie.org
Aller à la navigation Aller à la recherche
Aucun résumé des modifications
Aucun résumé des modifications
 
(5 versions intermédiaires par le même utilisateur non affichées)
Ligne 2 : Ligne 2 :


function p.render(frame)
function p.render(frame)
     local sparql = frame.args.sparql
    -- Fetch arguments from frame or parent template frame
    local title  = frame.args.title
     local getArgs = function(key)
 
        return (frame.args and frame.args[key])
    if not sparql or sparql == "" then
            or (frame:getParent() and frame:getParent().args and frame:getParent().args[key])
        return "⚠️ No SPARQL query provided."
            or ""
     end
     end


     -- ✅ Correct HTTP module for MediaWiki Lua
     local sparql = getArgs("sparql")
     local http = require("http") -- Only works if the Http extension is enabled
     local title  = getArgs("title")


     -- Better: use mw.ext.externalData if available
     if sparql == "" then
    -- Best on Wikimedia wikis: use the built-in method below
         return "⚠️ No SPARQL query provided."
    local url = "https://query.wikidata.org/sparql?format=json&query="
        .. mw.uri.encode(sparql)
 
    -- ✅ Use mw.ext.LuaHttp if installed
    local ok, result = pcall(function()
        return mw.ext.LuaHttp.request({
            url = url,
            method = "GET",
            headers = {
                ["Accept"] = "application/json",
                ["User-Agent"] = "MediaWiki Lua Module/1.0"
            }
        })
    end)
 
    if not ok or not result or result.code ~= 200 then
         return "⚠️ HTTP request failed. Check that LuaHttp extension is installed."
    end
 
    local data = mw.text.jsonDecode(result.body)
    local vars = data.head.vars
    local rows = data.results.bindings
 
    local html = {}
 
    if title and title ~= "" then
        table.insert(html, "=== " .. title .. " ===")
     end
     end


     table.insert(html, '{| class="wikitable sortable"')
     -- Clean query string
 
    sparql = sparql:gsub('<nowiki>', ''):gsub('</nowiki>', '')
    -- Header row
                  :gsub('\194\160', ' ') -- Remove non-breaking spaces
    table.insert(html, "|-")
                  :gsub('%s+', ' ')    -- Collapse spaces and newlines
    for _, var in ipairs(vars) do
        table.insert(html, "! " .. var)
     end


     -- Data rows
     local function htmlEncode(s)
    for _, row in ipairs(rows) do
         return s:gsub('&', '&amp;')
         table.insert(html, "|-")
                :gsub('"', '&quot;')
        for _, var in ipairs(vars) do
                :gsub('<', '&lt;')
            local cell = (row[var] and row[var].value) or ""
                :gsub('>', '&gt;')
            -- ✅ Render entity URIs as wiki links
            cell = cell:gsub("http://www%.wikidata%.org/entity/(Q%d+)", "[[wikidata:%1|%1]]")
            table.insert(html, "| " .. cell)
        end
     end
     end


     table.insert(html, "|}")
     return string.format(
 
        '<div class="wikidata-sparql-table" data-sparql="%s" data-title="%s"></div>',
     return table.concat(html, "\n")
        htmlEncode(sparql),
        htmlEncode(title)
     )
end
end


return p
return p

Dernière version du 21 septembre 2026 à 12:41

La documentation pour ce module peut être créée à Module:WikidataTable/doc

local p = {}

function p.render(frame)
    -- Fetch arguments from frame or parent template frame
    local getArgs = function(key)
        return (frame.args and frame.args[key]) 
            or (frame:getParent() and frame:getParent().args and frame:getParent().args[key]) 
            or ""
    end

    local sparql = getArgs("sparql")
    local title  = getArgs("title")

    if sparql == "" then
        return "⚠️ No SPARQL query provided."
    end

    -- Clean query string
    sparql = sparql:gsub('<nowiki>', ''):gsub('</nowiki>', '')
                   :gsub('\194\160', ' ') -- Remove non-breaking spaces
                   :gsub('%s+', ' ')     -- Collapse spaces and newlines

    local function htmlEncode(s)
        return s:gsub('&', '&amp;')
                :gsub('"', '&quot;')
                :gsub('<', '&lt;')
                :gsub('>', '&gt;')
    end

    return string.format(
        '<div class="wikidata-sparql-table" data-sparql="%s" data-title="%s"></div>',
        htmlEncode(sparql),
        htmlEncode(title)
    )
end

return p