Module:Officiële website

Moduledocumentatie[bekijk] [bewerk] [ververs] [geschiedenis]
Deze module implementeert {{Officiële website}}. Raadpleeg de sjabloonpagina voor documentatie.
Volgcategorieën

Zie ook

Module:URL
local makeUrl = require('Module:URL')._url

local p = {}

-- Wrapper voor pcall die nil retourneert bij een fout.
local function quickPcall(func)
	local success, result = pcall(func)
	if success then
		return result
	end
end

-- Haalt de rang op voor een Wikidata-eigenschapstabel. Geeft 1, 0 of -1 terug.
local function getRank(prop)
	local rank = prop.rank
	if rank == 'preferred' then
		return 1
	elseif rank == 'normal' then
		return 0
	elseif rank == 'deprecated' then
		return -1
	else
		-- Geen of onbekende rang wordt als "normaal" behandeld.
		return 0
	end
end

-- Controleert of een Wikidata-eigenschap Nederlands als taal heeft.
local function isDutch(prop)
	local ret = quickPcall(function ()
		for _, lang in ipairs(prop.qualifiers.P407) do
			if lang.datavalue.value['numeric-id'] == 7411 then -- Nederlands (Q7411)
				return true
			end
		end
		return false
	end)
	return ret == true
end

-- Haalt de officiële website-URL op uit Wikidata.
local fetchWikidataUrl
fetchWikidataUrl = function()
	-- Verkrijg alle officiële websites uit Wikidata.
	local websites = quickPcall(function ()
		return mw.wikibase.getAllStatements(mw.wikibase.getEntityIdForCurrentPage(), 'P856')
	end)

	-- Kopieer de objecten zodat hun originele volgorde behouden blijft.
	websites = websites and mw.clone(websites) or {}

	-- Voeg een index toe voor sorteervolgorde.
	for i, website in ipairs(websites) do
		website._index = i
	end

	-- Sorteer de websites: eerst hoogste rang, dan voorkeur voor Nederlands, dan oorspronkelijke volgorde.
	table.sort(websites, function(ws1, ws2)
		local r1 = getRank(ws1)
		local r2 = getRank(ws2)
		if r1 ~= r2 then
			return r1 > r2
		end
		local e1 = isDutch(ws1)
		local e2 = isDutch(ws2)
		if e1 ~= e2 then
			return e1
		end
		return ws1._index < ws2._index
	end)
	local url = quickPcall(function ()
		return websites[1].mainsnak.datavalue.value
	end)

	-- Cache het resultaat zodat we dit maar één keer per aanroep hoeven te doen.
	fetchWikidataUrl = function ()
		return url
	end

	return url
end

-- Render de URL-link en andere zichtbare output.
local function renderUrl(options)
	if not options.url and not options.wikidataurl then
		local qid = mw.wikibase.getEntityIdForCurrentPage()
		local result = '<strong class="error">Geen URL gevonden. Voeg een URL toe hier of op Wikidata.</strong>'
		if qid then
			result = result.. ' [[Bestand:OOjs UI icon edit-ltr-progressive.svg |frameless |text-top |10px |alt=Bewerk dit op Wikidata |link=https://www.wikidata.org/wiki/' .. qid .. '#P856|Bewerk dit op Wikidata]]'
		end
		return result
	end
	local ret = {}
	ret[#ret + 1] = string.format(
		'<span class="officiele-website">%s</span>',
		makeUrl(options.url or options.wikidataurl, options.display)
	)
	if options.wikidataurl and not options.url then
		local qid = mw.wikibase.getEntityIdForCurrentPage()
		if qid then
			ret[#ret + 1] = '[[Bestand:OOjs UI icon edit-ltr-progressive.svg |frameless |text-top |10px |alt=Bewerk dit op Wikidata |link=https://www.wikidata.org/wiki/' .. qid .. '#P856|Bewerk dit op Wikidata]]'
		end
	end
	return table.concat(ret, ' ')
end

-- Render de trackingcategorie.
local function renderTrackingCategory(url, wikidataurl)
	if mw.title.getCurrentTitle().namespace ~= 0 then
		return ''
	end
	local category
	if not url and not wikidataurl then
		category = 'Wikipedia:Officiële website zonder URL'
	elseif not url and wikidataurl then
		return ''
	elseif url and wikidataurl then
		if url:gsub('/%s*$', '') ~= wikidataurl:gsub('/%s*$', '') then
			category = 'Wikipedia:Officiële website verschilt tussen Wikidata en Wikipedia'
		end
	else
		category = 'Wikipedia:Officiële website niet op Wikidata'
	end
	return category and string.format('[[Categorie:%s]]', category) or ''
end

function p._main(args)
	local url = args[1] or args.URL or args.url
	local wikidataurl = fetchWikidataUrl()
	local formattedUrl = renderUrl{
		url = url,
		wikidataurl = wikidataurl,
		display = args[2] or args.titel or 'Officiële website'
	}
	return formattedUrl .. renderTrackingCategory(url, wikidataurl)
end

function p.main(frame)
	local args = require('Module:Arguments').getArgs(frame, {
		wrappers = 'Sjabloon:Officiële website'
	})
	return p._main(args)
end

return p