Module:ResolveEntityId: Difference between revisions

From Project: Jotunnheim
Jump to navigation Jump to search
Content added Content deleted
imported>Eden
m (1 revision imported)
m (1 revision imported)
 
(One intermediate revision by one other user not shown)
Line 1: Line 1:
 
local p = {}
 
local p = {}
   
function p._entityid(_,id,alt)
+
function p._id(idOrTitle, alt)
 
local function checkId(id)
-- backwards compatibility for deprecated _entityid function
 
 
if id and mw.wikibase.entityExists(id) then
return p._id(id,alt)
 
 
local sitelink = mw.wikibase.getSitelink(id)
end
 
 
if sitelink then
 
 
return mw.wikibase.getEntityIdForTitle(sitelink) or mw.wikibase.getEntity(id).id
function p._id(id,alt)
 
if type(id) == 'string' then
 
id = mw.ustring.upper(mw.ustring.sub(id,1,1))..mw.ustring.sub(id,2)
 
if mw.ustring.match(id,'^Q%d+$') then
 
-- id is in the proper format for a Wikidata entity
 
if mw.wikibase.isValidEntityId(id) then
 
-- id is valid
 
id = mw.wikibase.getEntity(id)
 
if id then
 
-- entity exists
 
return id.id
 
end
 
 
end
 
end
 
return mw.wikibase.getEntity(id).id
 
else
 
else
 
return alt
id = mw.wikibase.getEntityIdForTitle(id)
 
  +
end
if id then
 
 
end
-- id is a title that matches a Wikidata entity
 
  +
local instanceOf = mw.wikibase.getBestStatements(id, 'P31')[1] --instance of
 
 
if type(idOrTitle) == 'string' then
if instanceOf and instanceOf.mainsnak.datavalue.value.id ~= 'Q4167410' then
 
 
idOrTitle = mw.ustring.upper(mw.ustring.sub(idOrTitle, 1, 1)) .. mw.ustring.sub(idOrTitle, 2)
-- not disambiguation
 
return mw.wikibase.getEntity(id).id
+
if mw.wikibase.isValidEntityId(idOrTitle) then
 
-- idOrTitle is in the proper format for a Wikidata entity ID
elseif instanceOf == nil then
 
  +
return checkId(idOrTitle)
-- id is a title, but is missing an instance-of value
 
  +
else
return mw.wikibase.getEntity(id).id
 
  +
local eid = mw.wikibase.getEntityIdForTitle(idOrTitle)
 
if eid then
 
-- idOrTitle is a title that matches a Wikidata entity
 
local instanceOf = mw.wikibase.getBestStatements(eid, 'P31')[1] --instance of
 
if not instanceOf or instanceOf.mainsnak.datavalue.value.id ~= 'Q4167410' then
 
-- instance-of value is missing or is not "disambiguation"
  +
return checkId(eid)
 
end
  +
else
  +
-- idOrTitle is a title, but no wikidata item exists for that title
  +
local rtarget = mw.title.new(idOrTitle).redirectTarget
  +
if rtarget then
  +
-- title is a Wikipedia redirect
 
return p._id(rtarget.fullText, alt)
 
end
 
end
 
end
 
end
 
end
 
end
 
end
 
end
return alt or nil
+
return alt
 
end
 
end
   

Latest revision as of 20:31, 19 July 2022

Documentation for this module may be created at Module:ResolveEntityId/doc

local p = {}

function p._id(idOrTitle, alt)
	local function checkId(id)
		if id and mw.wikibase.entityExists(id) then
			local sitelink = mw.wikibase.getSitelink(id)
			if sitelink then
				return mw.wikibase.getEntityIdForTitle(sitelink) or mw.wikibase.getEntity(id).id
			end
			return mw.wikibase.getEntity(id).id
		else
			return alt
		end
	end

	if type(idOrTitle) == 'string' then
		idOrTitle = mw.ustring.upper(mw.ustring.sub(idOrTitle, 1, 1)) .. mw.ustring.sub(idOrTitle, 2)
		if mw.wikibase.isValidEntityId(idOrTitle) then
			-- idOrTitle is in the proper format for a Wikidata entity ID
			return checkId(idOrTitle)
		else
			local eid = mw.wikibase.getEntityIdForTitle(idOrTitle)
			if eid then
				-- idOrTitle is a title that matches a Wikidata entity
				local instanceOf = mw.wikibase.getBestStatements(eid, 'P31')[1] --instance of
				if not instanceOf or instanceOf.mainsnak.datavalue.value.id ~= 'Q4167410' then
					-- instance-of value is missing or is not "disambiguation"
					return checkId(eid)
				end
			else
				-- idOrTitle is a title, but no wikidata item exists for that title
				local rtarget = mw.title.new(idOrTitle).redirectTarget
				if rtarget then
					-- title is a Wikipedia redirect
					return p._id(rtarget.fullText, alt)
				end
			end
		end
	end
	return alt
end

function p.entityid(frame)
	return p._id(frame.args[1], frame.args[2])
end

return p