Module:SportsReference

Usage

This module returns a link to Sports-Reference.com. The URL is taken from Wikidata, unless there is no link on Wikidata. If that's the case, the module uses the link from the optional backup parameter; if there is no link on Wikidata and no backup parameter, it will return an error message explaining how to fix the issue.

The module only has one function, link, which returns the external link text ready for use. It should be used in the {{Sports-reference}} template thusly:

{{#invoke:SportsReference|link|optional backup parameter}}

The reason the module prefers links from Wikidata rather than the links given in the backup parameter is that it is much simpler to correct the links in Wikidata, and that will benefit all projects and not just this wiki; also, Wikidata supports various constraints so that the items and values can easily be checked for errors.

---

local function linktext(s1,s2,s3)
	if (s3 == nil) or (s3 == "") then
		return "[https://www.sports-reference.com/olympics/athletes/" .. s1 .. ".html " .. s2 .. "] at [[Sports Reference#Olympics|Olympics at Sports-Reference.com]]"
	else
		return "[https://www.sports-reference.com/olympics/athletes/" .. s1 .. ".html " .. s2 .. "] at [[Sports Reference#Olympics|Olympics at Sports-Reference.com]] ([https://web.archive.org/web/" .. s3 .. "/https://www.sports-reference.com/olympics/athletes/" .. s1 .. ".html archive])"
	end
end

local function category(s)
	if mw.title.getCurrentTitle().namespace ~= 0 then
		return ""
	end
	return "[[Category:Sports-Reference template " .. s .. "]]"
end

local p = {}

function p.link(frame)

	-- Optional first parameter contains ID portion of Sports-Reference URL.
	-- Trim any leading or trailing spaces. If it contains ".html", remove it.

	local id = string.gsub((mw.text.trim(frame.args[1]) or ""), ".html", "")

	-- Optional second parameter contains name for link. Trim leading or trailing spaces.
	-- If name is not provided, use article name without disambiguation.

	local name = mw.text.trim(frame.args[2])
	if (name == nil) or (name == "") then
		name = string.gsub(mw.title.getCurrentTitle().text, "%s+%b()$", "", 1)
	end

	-- Optional third parameter contains date/time portion of Archive.org URL.

	local archive = mw.text.trim(frame.args[3])

	-- For articles without Wikidata property:
	-- if ID not provided, return error text and tracking category
	-- if ID is provided, return link and tracking category

	local entity = mw.wikibase.getEntityObject() or {}
	local claims = entity.claims or {}
	local hasProp = claims["P1447"]
	if not hasProp then
		if (id == nil) or (id == "") then
			return "<span class='error'>Sports-Reference template missing ID and not present in Wikidata.</span> [[Template:Sports-reference#Add ID in Wikidata|How do I fix this?]]" .. category("missing ID and not in Wikidata")
		else
			return linktext(id,name,archive) .. category("with ID not in Wikidata")
		end
	end

	-- For articles with Wikidata property:
	-- if ID not provided, return link (using Wikidata) and tracking category
	-- if ID is provided, return link (using ID) and one of two tracking categories

	local propValue = hasProp[1].mainsnak.datavalue.value
	if (id == nil) or (id == "") then
		return linktext(propValue,name,archive) .. " [[File:Blue pencil.svg |frameless |text-top |10px |alt=Edit this at Wikidata |link=https://www.wikidata.org/wiki/" .. entity.id .. "#P1447|Edit this at Wikidata]]"   -- .. category("using Wikidata")
	end
	if id == propValue then
		return linktext(id,name,archive)   -- .. category("with ID same as Wikidata")
	else
		return linktext(id,name,archive) .. category("with ID different from Wikidata")
	end

end

return p

This module "SportsReference" is from Wikipedia if otherwise notified