Module:Sister project links - Revision history

WikiDwarf: Per talk page

2022-12-25T07:33:44Z

Per talk page

← Older revision		Revision as of 13:03, 25 December 2022
Line 18:		Line 18:
	v="Wikiversity logo 2017.svg",		v="Wikiversity logo 2017.svg",
	species="Wikispecies-logo.svg",		species="Wikispecies-logo.svg",
	iw="~~Wikipedia~~-logo-v2.svg",		iw="Bharatpedia-logo-v2.svg",
	iw1="~~Wikipedia~~-logo-v2.svg",		iw1="Bharatpedia-logo-v2.svg",
	iw2="~~Wikipedia~~-logo-v2.svg",		iw2="Bharatpedia-logo-v2.svg",
	d="~~Wikidata~~-logo.svg",		d="Bharatdata-logo.svg",
	m="~~Wikimedia~~ Community Logo.svg",		m="Bharatmedia Community Logo.svg",
	mw="MediaWiki-2020-icon.svg"}		mw="MediaWiki-2020-icon.svg"}

Line 38:		Line 38:
	v="Wikiversity",		v="Wikiversity",
	species="Wikispecies",		species="Wikispecies",
	iw="~~Wikipedia~~",		iw="Bharatpedia",
	iw1="~~Wikipedia~~",		iw1="Bharatpedia",
	iw2="~~Wikipedia~~",		iw2="Bharatpedia",
	d="~~Wikidata~~",		d="Bharatdata",
	m="Meta-Wiki",		m="Meta-Wiki",
	mw="MediaWiki"}		mw="MediaWiki"}
Line 94:		Line 94:

	local trackingType = {		local trackingType = {
	wdMismatch="Pages using Sister project links with ~~wikidata~~ mismatch",		wdMismatch="Pages using Sister project links with bharatdata mismatch",
	wdNamespace="Pages using Sister project links with ~~wikidata~~ namespace mismatch",		wdNamespace="Pages using Sister project links with bharatdata namespace mismatch",
	wdHidden="Pages using Sister project links with hidden ~~wikidata~~",		wdHidden="Pages using Sister project links with hidden bharatdata",
	defaultSearch="Pages using Sister project links with default search"}		defaultSearch="Pages using Sister project links with default search"}

Line 185:		Line 185:
	-- prefix = prefix string for wiki to lookup		-- prefix = prefix string for wiki to lookup
	-- qid = QID of entity to search for, current page entity by default		-- qid = QID of entity to search for, current page entity by default
	local function ~~fetchWikidata~~(prefix,qid)		local function fetchBharatdata(prefix,qid)
	local sisterDbName = sisterDb[prefix]		local sisterDbName = sisterDb[prefix]
	return sisterDbName and getSitelink(sisterDbName,qid)		return sisterDbName and getSitelink(sisterDbName,qid)
Line 196:		Line 196:
	-- args.default = link when blank		-- args.default = link when blank
	-- args.auto = new auto mode (don't fall back to search)		-- args.auto = new auto mode (don't fall back to search)
	-- args.sitelink = ~~wikidata~~ sitelink (if available)		-- args.sitelink = bharatdata sitelink (if available)
	-- args.qid = QID of entity		-- args.qid = QID of entity
	-- args.search = fallback string to search for		-- args.search = fallback string to search for
Line 206:		Line 206:
	return nil --- either editor specified "no", or "blank" (and default=no), then skip this sister		return nil --- either editor specified "no", or "blank" (and default=no), then skip this sister
	end		end
	local sitelink = args.sitelink or ~~fetchWikidata~~(args.sisterPrefix,args.qid)		local sitelink = args.sitelink or fetchBharatdata(args.sisterPrefix,args.qid)
	if args.auto and not sitelink and args[1][2] == nil then		if args.auto and not sitelink and args[1][2] == nil then
	return nil --- in auto mode, if link is blank and no sitelink, then skip		return nil --- in auto mode, if link is blank and no sitelink, then skip
	end		end
	-- fallback order of sister link: first specified page, then ~~wikidata~~, then search		-- fallback order of sister link: first specified page, then bharatdata, then search
	local link = args[1][1] or sitelink or (args.search and "Special:"..args.search)		local link = args[1][1] or sitelink or (args.search and "Special:"..args.search)
	if not link then		if not link then
Line 230:		Line 230:
	tracking.wdMismatch = args.sisterPrefix		tracking.wdMismatch = args.sisterPrefix
	end		end
	-- if no page link, nor a ~~wikidata~~ entry, and search is on, then warn		-- if no page link, nor a bharatdata entry, and search is on, then warn
	elseif not (args[1][2] or sitelink) and args.search then		elseif not (args[1][2] or sitelink) and args.search then
	tracking.defaultSearch = args.sisterPrefix		tracking.defaultSearch = args.sisterPrefix
Line 256:		Line 256:
	local ns_len = mw.ustring.len(ns)		local ns_len = mw.ustring.len(ns)
	local result = {}		local result = {}
	result.sitelink = ~~fetchWikidata~~(args.prefix, args.qid)		result.sitelink = fetchBharatdata(args.prefix, args.qid)
	local subtype = false		local subtype = false
	if args.page then		if args.page then
Line 320:		Line 320:
	end		end
	elseif page[2] or args.auto then		elseif page[2] or args.auto then
	sitelink = sitelink or ~~fetchWikidata~~('voy',args.qid)		sitelink = sitelink or fetchBharatdata('voy',args.qid)
	if sitelink and mw.ustring.match(sitelink,"phrasebook") then		if sitelink and mw.ustring.match(sitelink,"phrasebook") then
	info = "Phrasebook"		info = "Phrasebook"
Line 416:		Line 416:
	abovestyle = args.collapsible and 'clear: both' or nil,		abovestyle = args.collapsible and 'clear: both' or nil,
	above = mw.ustring.format(		above = mw.ustring.format(
	"'''%s''' at ~~Wikipedia~~'s [[~~Wikipedia~~:~~Wikimedia~~ sister projects\|<span id=\"sister-projects\">sister projects</span>]]",		"'''%s''' at Bharatpedia's [[Bharatpedia:Bharatmedia sister projects\|<span id=\"sister-projects\">sister projects</span>]]",
	args.display or args[1]		args.display or args[1]
	),		),
Line 436:		Line 436:
	local pagename = header:tag('b')		local pagename = header:tag('b')
	pagename:wikitext(args.display or args[1])		pagename:wikitext(args.display or args[1])
	local headerText = " at ~~Wikipedia~~'s [[~~Wikipedia~~:~~Wikimedia~~ sister projects\|"		local headerText = " at Bharatpedia's [[Bharatpedia:Bharatmedia sister projects\|"
	headerText = headerText..'<span id="sister-projects" style="white-space:nowrap;">sister projects</span>]]:'		headerText = headerText..'<span id="sister-projects" style="white-space:nowrap;">sister projects</span>]]:'
	header:wikitext(headerText)		header:wikitext(headerText)
Line 508:		Line 508:
	local link = "[["..sister.prefix..":"..sister.link.."\|<b><i>"..(args.display or args[1]).."</i></b>]]"		local link = "[["..sister.prefix..":"..sister.link.."\|<b><i>"..(args.display or args[1]).."</i></b>]]"
	if sister.name == 'Commons' then		if sister.name == 'Commons' then
	sister.name = '~~Wikimedia~~ Commons' -- make single sister commons box look like {{Commons}}		sister.name = 'Bharatmedia Commons' -- make single sister commons box look like {{Commons}}
	end		end
	local text = sister.name.." has "..mw.ustring.lower(sister.information).." related to "..link		local text = sister.name.." has "..mw.ustring.lower(sister.information).." related to "..link
	if sister.name == '~~Wikipedia~~' then -- make single sister interwiki box look like {{InterWiki}}		if sister.name == 'Bharatpedia' then -- make single sister interwiki box look like {{InterWiki}}
	text = "[["..sister.prefix..":"..sister.link.."\|<b><i>"..sister.information.."</i></b>]] at [[~~Wikipedia~~]], the free encyclopedia"		text = "[["..sister.prefix..":"..sister.link.."\|<b><i>"..sister.information.."</i></b>]] at [[Bharatpedia]], the free encyclopedia"
	end		end
	box:wikitext(sideBox({		box:wikitext(sideBox({
Line 528:		Line 528:
	end		end
	if #sisterList == 0 and args.auto then		if #sisterList == 0 and args.auto then
	box:wikitext(generateWarning({"No sister project links found in ~~Wikidata~~. Try auto=0"}))		box:wikitext(generateWarning({"No sister project links found in Bharatdata. Try auto=0"}))
	end		end
	-- Append tracking categories to container div		-- Append tracking categories to container div

SonOfZeus at 06:25, 25 December 2022

2022-12-25T06:25:09Z

Show changes

WikiDwarfBOT: /* top */clean up, replaced: Wikipedia: → Bharatpedia:

2021-05-31T19:01:37Z

top: clean up, replaced: Wikipedia: → Bharatpedia:

← Older revision		Revision as of 00:31, 1 June 2021
Line 209:		Line 209:
	pagename:css("display","block")		pagename:css("display","block")
	pagename:wikitext(args.display or args[1])		pagename:wikitext(args.display or args[1])
	local headerText = "at Wikipedia's [[~~Wikipedia~~:Wikimedia sister projects\|"		local headerText = "at Wikipedia's [[Bharatpedia:Wikimedia sister projects\|"
	headerText = headerText..'<span id="sister-projects">sister projects</span>]]'		headerText = headerText..'<span id="sister-projects">sister projects</span>]]'
	header:wikitext(headerText)		header:wikitext(headerText)

WikiDwarf: 1 revision imported

2021-02-24T17:58:22Z

1 revision imported

← Older revision	Revision as of 23:28, 24 February 2021
(No difference)

>Hike395: 3 changes: remove HTML wrapper from link entry point, only look qid up once, supply qid as sitelink to wikidata

2020-12-28T19:47:23Z

3 changes: remove HTML wrapper from link entry point, only look qid up once, supply qid as sitelink to wikidata

New page

-- Module to create sister project link box
local getArgs = require('Module:Arguments').getArgs
local commonsLink = require('Module:Commons link')
local p = {}

-- Function to canonicalize string
-- search for variants of "yes", and "no", and transform
-- them into a standard form (like [[Template:YesNo]])
-- Argument:
-- s --- input string
-- Result:
-- {x,y} list of length 2
-- x = nil if s is canonicalized, otherwise has trimmed s
-- y = canonical form of s (true if "yes" or other, false if "no", nil if blank)
local function canonicalize(s)
if s == nil then
return {nil, nil}
end
s = mw.text.trim(tostring(s))
if s == "" then
return {nil, nil}
end
lowerS = s:lower()
-- Check for various forms of "yes"
if lowerS == 'yes' or lowerS == 'y' or lowerS == 't'
or lowerS == '1' or lowerS == 'true' or lowerS == 'on' then
return {nil, true}
end
-- Check for various forms of "no"
if lowerS == 'no' or lowerS == 'n' or lowerS == 'f'
or lowerS == '0' or lowerS == 'false' or lowerS == 'off'then
return {nil, false}
end
-- Neither yes nor no recognized, leave string trimmed
return {s, true}
end

-- Merge two or more canonicalized argument lists
-- Arguments:
-- argList = list of canonicalized arguments
-- noAll = if true, return no when all argList is no.
-- otherwise, return blank when all argList is blank
local function mergeArgs(argList,noAll)
local test = nil -- default, return blank if all blank
if noAll then
test = false -- return no if all no
end
local allSame = true
-- Search through string for first non-no or non-blank
for _, arg in ipairs(argList) do
if arg[2] then
return arg -- found non-no and non-blank, return it
end
-- test to see if argList is all blank / no
allSame = allSame and (arg[2] == test)
end
-- if all blank / no, return blank / no
if allSame then
return {nil, test} -- all match no/blank, return it
end
-- otherwise, return no / blank
if noAll then
return {nil, nil}
end
return {nil, false}
end

-- Function to get sitelink for a wiki
-- Arguments:
-- wiki = db name of wiki to lookup
-- qid = QID of entity to search for, current page entity by default
local function getSitelink(wiki,qid)
qid = qid or mw.wikibase.getEntityIdForCurrentPage()
qid = qid and qid:upper()
-- return nil if some sort of lookup failure
return qid and mw.wikibase.getSitelink(qid,wiki)
end

local wdMismatch = nil
local wdNamespace = nil
local wdHidden = nil
local defaultSearch = nil

-- Function to generate the sister link itself
-- Arguments:
-- args = argument table for function
-- args[1] = canonicalized page to fetch
-- args.default = link when blank
-- args.auto = new auto mode (don't fall back to search)
-- args.sitelink = wikidata sitelink (if available)
-- args.sisterDbName = DB name of sister site (to get sitelink)
-- args.qid = QID of entity
-- args.search = fallback string to search for
-- args.sisterPrefix = wikitext prefix for sister site
-- args.information = type of info sister site contains
-- args.sisterName = friendly human name of sister site
function p._sisterLink(args)
if args[1][2] == false or (not args.default and args[1][2] == nil) then
return nil --- either editor specified "no", or "blank" (and default=no), then skip this sister
end
local sitelink = args.sitelink or (args.sisterDbName and getSitelink(args.sisterDbName,args.qid))
if args.auto and not sitelink and args[1][2] == nil then
return nil --- in auto mode, if link is blank and no sitelink, then skip
end
-- fallback order of sister link: first specified page, then wikidata, then search
local link = args[1][1] or sitelink or (args.search and "Special:"..args.search)
if not link then
return nil --- no link found, just skip
end
-- update state for tracking categories
if args[1][1] and sitelink then
-- transform supplied page name to be in wiki-format
local page = mw.ustring.gsub(args[1][1],"_"," ")
page = mw.ustring.sub(page,1,1):upper()..mw.ustring.sub(page,2)
local pageNS = mw.ustring.match(page,"^([^:]+):")
local sitelinkNS = mw.ustring.match(sitelink,"^([^:]+):")
if page == sitelink then
wdHidden = args.sisterPrefix
elseif pageNS ~= sitelinkNS then
wdNamespace = args.sisterPrefix
else
wdMismatch = args.sisterPrefix
end
-- if no page link, nor a wikidata entry, and search is on, then warn
elseif not (args[1][2] or sitelink) and args.search then
defaultSearch = args.sisterPrefix
end
return "[["..args.sisterPrefix..":"..link.."|"..args.information .."]] from "..args.sisterName
end

-- Function to generate HTML for one sister link
-- Arguments:
-- container = parent HTML object
-- args = argument table for function
-- args[1] = canonicalized page to fetch
-- args.default = link when blank
-- args.auto = new auto mode (don't fall back to search)
-- args.sitelink = wikidata sitelink (if available)
-- args.sisterDbName = DB name of sister site (to get sitelink)
-- args.qid = QID of entity (for debugging)
-- args.search = fallback string to search for
-- args.logo = filename of sister logo (no namespace)
-- args.sisterPrefix = wikitext prefix for sister site
-- args.information = type of info sister site contains
-- args.sisterName = friendly human name of sister site
local function oneSister(container,args)
local link = p._sisterLink(args)
if not link then
return nil
end
local li = container and container:tag('li') or mw.html.create('li')
li:css("min-height","31px")
-- html element for 27px-high logo
local logo = li:tag('span')
logo:css("display","inline-block")
logo:css("width","31px")
logo:css("line-height","31px")
logo:css("vertical-align","middle")
logo:css("text-align","center")
logo:wikitext("[[File:"..args.logo.."|27x27px|middle|link=|alt=]]")
-- html element for link
local linkspan = li:tag('span')
linkspan:css("display","inline-block")
linkspan:css("margin-left","4px")
linkspan:css("width","182px")
linkspan:css("vertical-align","middle")
linkspan:wikitext(link)
return li
end

-- Function to create html containers for sister project link list
-- Arguments:
-- args = table of arguments
-- args.position: if 'left', position links to left
-- args.collapsible: if non-empty, make box collapsible. If 'collapse', start box hidden
-- args.style: CSS style string appended to end of default CSS
-- args.display: boldface name to display
local function createContainer(args)
-- Outermost div (css from previous version of [[Template:Project sister links]])
local container = mw.html.create('div')
container:attr("role","navigation")
container:attr("aria-labelledby","sister-projects")
container:addClass("metadata")
container:addClass("plainlinks")
container:addClass("sistersitebox")
container:addClass("plainlist")
if args.position and args.position:lower() == "left" then
container:addClass("mbox-small-left")
else
container:addClass("mbox-small")
end
if args.collapsible then
container:addClass("mw-collapsible")
if args.collapsible == "collapsed" then
container:addClass("mw-collapsed")
end
end
container:css("border","1px solid #aaa")
container:css("padding",0)
container:css("background","#f9f9f9")
container:cssText(args.style)
-- Div for text header
local header = container:tag('div')
header:css("clear",args.collapsible and "both")
header:css("padding","0.75em 0")
header:css("text-align","center")
-- pagename in bold as part of header
local pagename = header:tag('b')
pagename:css("display","block")
pagename:wikitext(args.display or args[1])
local headerText = "at Wikipedia's [[Wikipedia:Wikimedia sister projects|"
headerText = headerText..'<span id="sister-projects">sister projects</span>]]'
header:wikitext(headerText)
-- start the unordered list element here
local ul = container:tag('ul')
ul:addClass(args.collapsible and "mw-collapsible-content")
ul:css("border-top","1px solid #aaa")
ul:css("padding","0.75em 0")
ul:css("width","217px")
ul:css("margin","0 auto")
-- pass ul element back to main, so sister links can be added
return ul
end

function p._main(args)
local titleObject = mw.title.getCurrentTitle()
-- Default title/search string is PAGENAME
args[1] = args[1] or titleObject.text
-- Canonicalize all sister links (handle yes/no/empty)
for _, k in pairs({"wikt","c","commons","n","q","s","b","voy",
"v","d","species","species_author","m","mw"}) do
args[k] = canonicalize(args[k])
end
-- Canonicalize general parameters
for _,k in pairs({"auto","commonscat","author"}) do
args[k] = canonicalize(args[k])[2]
end
-- Fill in args.qid with current qid (if available)
args.qid = args.qid or mw.wikibase.getEntityIdForCurrentPage()
args.qid = args.qid and args.qid:upper()
-- Initialize tracking categories to "no track"
wdMismatch = nil
wdNamespace = nil
wdHidden = nil
defaultSearch = nil
local ul = createContainer(args)
-- WIKTIONARY
oneSister(ul,{args.wikt,auto=args.auto,qid=args.qid,default=true,
logo="Wiktionary-logo-v2.svg",sisterPrefix="wikt",
search="Search/"..args[1],information="Definitions",
sisterName="Wiktionary",sisterDbName="enwiktionary"})
-- COMMONS
-- use [[Module:Commons link]] to determine best commons link
local cLink = (not args.commonscat) and commonsLink._hasGallery(args.qid)
or commonsLink._hasCategory(args.qid)
local commonsPage = mergeArgs({args.c,args.commons})
if commonsPage[1] and not mw.ustring.match(commonsPage[1]:lower(),"^category:") then
commonsPage[1] = (args.commonscat and "Category:" or "")..commonsPage[1]
end
local commonsSearch = "Search/"..(args.commonscat and "Category:" or "")..args[1]
oneSister(ul,{commonsPage,auto=args.auto,qid=args.qid,
default=true,sitelink=cLink,logo="Commons-logo.svg",
sisterPrefix="c",search=commonsSearch,information="Media",
sisterName="Wikimedia Commons"})
-- WIKINEWS
oneSister(ul,{args.n,auto=args.auto,qid=args.qid,default=true,
logo="Wikinews-logo.svg",sisterPrefix="n",search="Search/"..args[1],
information="News",sisterName="Wikinews",sisterDbName="enwikinews"})
-- WIKIQUOTE
oneSister(ul,{args.q,auto=args.auto,qid=args.qid,default=true,
logo="Wikiquote-logo.svg",sisterPrefix="q",search="Search/"..args[1],
information="Quotations",sisterName="Wikiquote",sisterDbName="enwikiquote"})
-- WIKISOURCE
if args.author and args.s[1] then
args.s[1] = "Author:"..args.s[1]
end
oneSister(ul,{args.s,auto=args.auto,qid=args.qid,default=true,
logo="Wikisource-logo.svg",sisterPrefix="s",search="Search/"..args[1],
information="Texts",sisterName="Wikisource",sisterDbName="enwikisource"})
-- WIKIBOOKS
oneSister(ul,{args.b,auto=args.auto,qid=args.qid,default=true,
logo="Wikibooks-logo.svg",sisterPrefix="b",search="Search/"..args[1],
information="Textbooks",sisterName="Wikibooks",sisterDbName="enwikibooks"})
-- WIKIVOYAGE
-- Information="guide" when we can be assured that search cannot be called
local voyInfo = (args.voy[1] or args.voy[2] == nil) and "guide" or "information"
oneSister(ul,{args.voy,auto=args.auto,qid=args.qid,default=args.auto,
logo="Wikivoyage-Logo-v3-icon.svg",sisterPrefix="voy",search="Search/"..args[1],
information="Travel "..voyInfo,sisterName="Wikivoyage",sisterDbName="enwikivoyage"})
-- WIKIVERSITY
oneSister(ul,{args.v,auto=args.auto,qid=args.qid,default=true,
logo="Wikiversity logo 2017.svg",sisterPrefix="v",search="Search/"..args[1],
information="Resources",sisterName="Wikiversity",sisterDbName="enwikiversity"})
-- WIKIDATA
oneSister(ul,{args.d,qid=args.qid,default=false,logo="Wikidata-logo.svg",sisterPrefix="d",
sitelink=args.qid,search="ItemByTitle/enwiki/"..args[1],information="Data",sisterName="Wikidata"})
-- WIKISPECIES
oneSister(ul,{mergeArgs({args.species,args.species_author},1),auto=args.auto,
qid=args.qid,default=args.auto,logo="Wikispecies-logo.svg",
sisterPrefix="species",search="Search/"..args[1],
information=(args.species[2] and "Taxonomy")
or (args.species_author[2] and "Species author")
or "Taxonomy",
sisterName="Wikispecies",sisterDbName="specieswiki"})
if args.species[2] and args.species_author[1] then
-- If species_author is explicitly defined, and species is used, then make second row
oneSister(ul,{args.species_author,auto=args.auto,qid=args.qid,
default=args.auto,logo="Wikispecies-logo.svg",
sisterPrefix="species",search="Search/"..args[1],
information="Species author",sisterName="Wikispecies"})
end
-- META
oneSister(ul,{args.m,qid=args.qid,default=false,logo="Wikimedia Community Logo.svg",
sisterPrefix="m",search="Search/"..args[1],information="Discussion",sisterName="Meta-Wiki"})
-- MEDIAWIKI
oneSister(ul,{args.mw,qid=args.qid,default=false,logo="MediaWiki-logo.svg",
sisterPrefix="mw",search="Search/"..args[1],information="Documentation",sisterName="MediaWiki"})
local container = ul:allDone()
-- Append tracking categories to container div
-- Alpha ordering is by sister prefix
if titleObject.namespace == 0 then
local trackingCats = wdMismatch and "[[Category:Pages using Sister project links with wikidata mismatch|"..wdMismatch.."]]" or ""
trackingCats = trackingCats..(wdNamespace and "[[Category:Pages using Sister project links with wikidata namespace mismatch|"..wdNamespace.."]]" or "")
trackingCats = trackingCats..(wdHidden and "[[Category:Pages using Sister project links with hidden wikidata|"..wdHidden.."]]" or "")
trackingCats = trackingCats..(defaultSearch and "[[Category:Pages using Sister project links with default search|"..defaultSearch.."]]" or "")
container:wikitext(trackingCats)
end
return container
end

-- Main entry point for generating sister project links box
function p.main(frame)
local args = getArgs(frame,{frameOnly=false,parentOnly=false,parentFirst=false})
return tostring(p._main(args))
end

-- Entry point for generating one sister link
function p.link(frame)
local args = getArgs(frame,{frameOnly=false,parentOnly=false,parentFirst=false})
args[1] = canonicalize(args[1])
args.auto = canonicalize(args.auto)[2]
return p._sisterLink(args)
end

return p