Modul:WikidataCheck

Dokumentacija modula[stvori]

Možda želite stvoriti dokumentaciju ovog Scribunto modula.
Molimo dodajte kategorije na /doc podstranicu. Podstranice ovog modula.

local p = {}

function p.wikidatacheck(frame)
	local pframe = frame:getParent()
	local config = frame.args -- the arguments passed BY the template, in the wikitext of the template itself
	local args = pframe.args -- the arguments passed TO the template, in the wikitext that transcludes the template

	local property = config.property
	local value = config.value or ""
	local catbase = config.category
	local namespaces = config.namespaces
	local nocatsame = config.nocatsame or ""
	local ok = false -- one-way flag to check if we're in a good namespace
	local ns = mw.title.getCurrentTitle().namespace
	for v in mw.text.gsplit( namespaces, ",", true) do
		if tonumber(v) == ns then
			ok = true
		end
	end
	if not ok then -- not in one of the approved namespaces
		return ""
	end
	local entity = mw.wikibase.getEntityObject()
	if not entity then -- no Wikidata item
		return '<abbr style="color:grey;" title="Podatak nije prisutan na Wikipodatcima">?</abbr>' .. "[[Category:" .. catbase .. " koji nisu prisutni na Wikipodatcima]]" 
	end
	if value == "" then
		return nil -- Using Wikidata
	end
	local claims = entity.claims or {}
	local hasProp = claims[property]
	if not hasProp then -- no claim of that property
		return '<abbr style="color:grey;" title="Podatak nije prisutan na Wikipodatcima">?</abbr>' .. "[[Category:" .. catbase .. " koji nisu prisutni na Wikipodatcima]]" -- bad. Bot needs to add the property
	end
	for i, v in ipairs(hasProp) do -- Now we try to iterate over all possible values?
		propValue = (v.mainsnak.datavalue or {}).value
		if propValue == value then
			if nocatsame == "" then
				return '<abbr style="color:green;" title="Podatak je isti kao na Wikipodatcima">✓</abbr>' .. "[[Category:" .. catbase .. " isti kao na Wikipodatcima]]" -- yay!
			else
				return nil -- if nocatsame, the "same as" category is not added
			end
		end
	end
	return '<abbr style="color:red;" title="Podatak je različit od Wikipodataka">X</abbr>' .. "[[Category:" .. catbase .. " različiti od Wikipodataka]]" -- needs human review :(
end

return p