Jump to content

Module:Portal bar/sandbox

Add links
From Wikipedia, the free encyclopedia
< Module:Portal bar
This is an old revision of this page, as edited by Hike395 (talk | contribs) at 20:48, 18 December 2021 (getArgs trims whitespace and drops blanks, so extra code is redundant). The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.
-- This module implements {{portal bar}}.

require('Module:No globals')

local getImageName = require( 'Module:Portal' ).image
local yesno = require( 'Module:Yesno' )
local getArgs = require('Module:Arguments').getArgs
local p = {}

local function sandbox(args, s)
	return args.sandbox and s.."-sand" or s
end

local function checkPortalExists(portal)
	return not (mw.title.makeTitle(100, portal).id == 0)
end

-- Check whether to do tracking in this namespace
-- Returns true unless the page is one of the banned namespaces
local function isTrackedNamespace()
	local thisPageNS = mw.title.getCurrentTitle().namespace
	return thisPageNS ~= 1 -- Talk
		and thisPageNS ~= 2 -- User
		and thisPageNS ~= 3 -- User talk
		and thisPageNS ~= 5 -- Wikipedia talk
		and thisPageNS ~= 7 -- File talk
		and thisPageNS ~= 11 -- Template talk
		and thisPageNS ~= 15 -- Category talk
		and thisPageNS ~= 101 -- Portal talk
		and thisPageNS ~= 118 -- Draft
		and thisPageNS ~= 119 -- Draft talk
		and thisPageNS ~= 829 -- Module talk
end

-- Check whether to do tracking on this pagename
-- Returns false if the page title matches one of the banned strings
-- Otherwise returns true
local function isTrackedPagename()
	local thisPageLC = mw.ustring.lower(mw.title.getCurrentTitle().text)
	local match = string.match
	return match(thisPageLC, "/archive") == nil
		and match(thisPageLC, "/doc") == nil
		and match(thisPageLC, "/test") == nil
end

-- Builds the portal bar used by {{portal bar}}.
function p._main( portals, args )
	
	-- Don't display a blank navbox if no portals were specified.
	if #portals < 1 then return '' end
	
	args.sandbox = yesno(args.sandbox)
	local nav = mw.html.create( 'div' )
		:addClass(sandbox(args,'portal-bar'))
		:addClass( 'noprint metadata nomobile' )
		:attr( 'role', 'navigation' )
		:attr( 'aria-label' , 'Portals' )
	if yesno( args.border ) == false then
		nav
			:addClass(sandbox(args,'portal-bar-unbordered'))
	else
		nav
			:addClass(sandbox(args,'portal-bar-bordered'))
	end
	
	local trackingEnabled = true
	local tracking = args.tracking
	if (tracking == 'no' or tracking == 'n' or tracking == 'false') or
		not isTrackedNamespace() or not isTrackedPagename() then
		trackingEnabled = false
	end

	-- TODO: This used to say 'if no portals are specified', but we return early
	-- above. Someone should check whether this is really 'portals[1]' or #portals < 0.
	-- If the first portal is not specified,
	-- display an error and add the page to a tracking category.
	if not portals[1] then
		local nominimum = args.nominimum
		local warning = mw.html.create()
		if nominimum ~= 'yes' and nominimum ~= 'y' and nominimum ~= 'true' then
			warning:tag('strong')
				:addClass('error')
				:wikitext('No portals specified: please specify at least one portal')
		end
		if trackingEnabled then
			warning:wikitext('[[Category:Portal templates without a parameter]]')
		end
		return tostring(warning)
	end

	-- scan for nonexistent portals, if they exist remove them from the portals
	-- table. If redlinks=yes, then don't remove
	local portallen = #portals
	-- traverse the list backwards to ensure that no portals are missed
	-- (table.remove also moves down the portals in the list, so that the next
	-- portal isn't checked if going fowards. going backwards allows us to
	-- circumvent this issue
	for i=portallen,1,-1 do
		-- the use of pcall here catches any errors that may occour when
		-- attempting to locate pages when the page name is invalid. if pcall
		-- returns true, then rerun the function to find if the page exists
		if not pcall(checkPortalExists, portals[i]) or not checkPortalExists(portals[i]) then
			-- Getting here means a redlinked portal has been found
			local redlinks = args.redlinks
			if redlinks == 'yes' or redlinks == 'y' or redlinks == 'true' or redlinks == 'include' then
				-- if redlinks as been set to yes (or similar), add the cleanup
				-- category and then break the loop before the portal is removed
				-- from the list
				if trackingEnabled then
					nav:wikitext('[[Category:Portal templates with redlinked portals]]')
				end
				-- TODO: This looks buggy given the comment above; we will always
				-- break if redlinks are yes, whether or not tracking is enabled
				break
			end
			-- remove the portal (this does not happen if redlinks=yes)
			table.remove(portals,i)
		end
	end
	
	-- if the length of the table is different, then rows were removed from the
	-- table, so portals were removed. If this is the case add the cleanup category
	if portallen ~= #portals then
		if #portals == 0 then
        	if trackingEnabled then
				return '[[Category:Portal templates with all redlinked portals]]'
			else
				return ""
			end
        end
		if trackingEnabled then
			nav:wikitext('[[Category:Portal templates with redlinked portals]]')
		end
	end
	
	local header = nav:tag('span')
	header:addClass(sandbox(args,'portal-bar-header'))
	header:wikitext('[[Wikipedia:Contents/Portals|Portal]]')
	if #portals > 1 then
		header:wikitext('s')
	end
	header:wikitext(':')
	local container = nav:tag('div')
	container:addClass(sandbox(args,'portal-bar-content'))
	for _, portal in ipairs( portals ) do
		container
			:tag( 'div' )
			:addClass(sandbox(args,'portal-bar-item'))
				:tag( 'span' )
					:addClass(sandbox(args,'portal-bar-logo'))
					:wikitext( string.format(
						'[[File:%s|21x19px|alt=]]', getImageName{ portal }
					) )
					:done()
				:tag('span')
					:addClass(sandbox(args,'portal-bar-link'))
					:wikitext( string.format('[[Portal:%s|%s]]', portal, portal))
	end
	
	local styleFile = 'Module:Portal bar/'
	styleFile = styleFile..(args.sandbox and 'sandbox/' or '')
	styleFile = styleFile..'styles.css'
	return mw.getCurrentFrame():extensionTag{
		name = 'templatestyles', args = { src = styleFile }
	} .. tostring( nav )
end

-- Processes external arguments and sends them to the other functions.
function p.main( frame )
	local origArgs = getArgs(frame)
	-- Process the args to make an array of portal names that can be used with
	-- ipairs. We need to use ipairs because we want to list all the portals in
	-- the order they were passed to the template, but we also want to be able
	-- to deal with positional arguments passed explicitly, for example
	-- {{portal|2=Politics}}. The behaviour of ipairs is undefined if nil values
	-- are present, so we need to make sure they are all removed.
	local portals, args = {}, {}
	for k, v in pairs( origArgs ) do
		-- Make sure we have no non-string portal names.
		if type( k ) == 'number' and type( v ) == 'string' then
			table.insert(portals, k)
		elseif type( k ) ~= 'number' then -- Separate named arguments from portals.
			args[ k ] = v
		end
	end
	table.sort( portals )
	for i, v in ipairs( portals ) do
		-- Swap keys with values
		portals[ i ] = origArgs[ v ]
	end
	return p._main( portals, args )
end

return p
Retrieved from "https://en.wikipedia.org/w/index.php?title=Module:Portal_bar/sandbox&oldid=1060972459"