Misplaced Pages

This is an old revision of this page, as edited by Mr. Stradivarius (talk | contribs) at 09:05, 8 December 2014 (fix archive link code). The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.

This module is rated as beta, and is ready for widespread use. It is still new and should be used with some caution to ensure the results are as expected.

This module depends on the following other modules: Module:Random (sandbox)

This module implements {{random portal component}}. Please see the template page for documentation.

See also

v t e Portal templates
Visual overview of template usage
Layout and formatting	{{Box portal skeleton}} {{Box-header}} color palettes plain round square watch {{Box-header colour}} {{Box-footer}} {{Flex columns}} {{Plain navboxes}}
Content transclusion	{{Transclude lead excerpt}} {{Transclude linked excerpt}} {{Transclude list item excerpt}} {{Transclude random excerpt}} {{Transclude selected excerpt}} {{Excerpt}} {{Transclude DYK}} {{Transclude selected current events}} {{Transclude selected recent additions}}
Content slideshows	{{Random slideshow}} {{Transclude files as random slideshow}} {{Transclude excerpts as random slideshow}} {{Transclude linked excerpts as random slideshow}} {{Transclude list item excerpts as random slideshow}}
Content randomisation	{{Random portal component}} {{Random quotation}} {{Random subpage}}
General	{{Portals}} {{Portals browsebar}} {{Portal description}} {{Portal information sidebar}} {{Portal navbar no header2}} {{Purge link portals}} {{Wikimedia for portals}}
Linking templates	{{Portal}} {{Portal bar}} {{Portal-inline}} {{Pbox}} {{Related portals2}}
Talk pages / Maintenance	{{Portal talk}} {{Portal maintenance status}} {{Portal suggestions}} {{Portal toolbox}} {{WikiProject Portals}}
Images	{{Portal dynamic image}} {{Portal image banner}} {{Portal pictures}} {{Portal POTD}}
Modules	1. Module:Box-header 2. Module:Excerpt/portals 3. Module:Selected current events 4. Module:Selected recent additions 5. Module:Random slideshow 6. Module:Excerpt slideshow 7. Module:Random portal component 8. Module:Portal maintenance status 9. Module:Transclude DYK 10. Module:Portal image banner 11. Module:Portal 12. Module:Portal bar 13. Module:Portal-inline 14. Module:Portal pictures
Usage	Misplaced Pages:Portal Misplaced Pages:WikiProject Portals
For more information, see: Category:Template-Class Portal pages and Category:Misplaced Pages Portal templates

-- This module implements ]

local p = {}

local mRandom = require('Module:Random')
local currentTitle = mw.title.getCurrentTitle()

local function getRandomNumber(max)
	-- gets a random integer between 1 and max; max defaults to 1
	return mRandom.number{max or 1}
end

local function expandArg(args, key)
	-- Emulate how unspecified template parameters appear in wikitext. If the
	-- specified argument exists, its value is returned, and if not the argument
	-- name is returned inside triple curly braces.
	local val = args
	if val then
		return val
	else
		return string.format('{{{%s}}}', key)
	end
end

local function getPages(args)
	local pages = {}
	pages.root = args.rootpage or currentTitle.prefixedText
	pages.subpage = pages.root .. '/' .. expandArg(args, 'subpage')
	pages.random = pages.subpage .. '/' .. getRandomNumber(args.max)
	return pages
end

local function tryExpandTemplate(frame, title, args)
	local success, result = pcall(frame.expandTemplate, frame, {title = title, args = args})
	if success then
		return result
	else
		local msg = string.format(
			'<strong class="error">Error: ] does not exist.</strong>',
			title
		)
		if mw.title.getCurrentTitle().namespace == 100 then -- is in the portal namespace
			msg = msg .. ']'
		end
		return msg
	end
end

local function getHeader(frame, pages, header)
	return tryExpandTemplate(
		frame,
		pages.root .. '/box-header',
		{header, pages.random}
	)
end

local function getRandomSubpageContent(frame, pages)
	return tryExpandTemplate(
		frame,
		pages.random
	)
end

local function getFooter(frame, pages, link)
	return tryExpandTemplate(
		frame,
		pages.root .. '/box-footer',
		{link}
	)
end

function p._main(args, frame)
	frame = frame or mw.getCurrentFrame()
	local pages = getPages(args)

	local ret = {}
	ret = getHeader(frame, pages, args.header or 'subpage')
	ret = getRandomSubpageContent(frame, pages)
	if not args.footer or not args.footer:find('%S') then
		ret = '<div style="clear:both;"></div></div>'
	else
		ret = getFooter(frame, pages, string.format(
			']',
			pages.subpage,
			expandArg(args, 'footer')
		))
	end

	return table.concat(ret, '\n')
end

function p._nominate(args, frame)
	frame = frame or mw.getCurrentFrame()
	local pages = getPages(args)
	
	local ret = {}
	ret = getHeader(frame, pages, expandArg(args, 'header'))
	ret = getRandomSubpageContent(frame, pages)
	ret = getFooter(frame, pages, string.format(
		'] • ] ',
		expandArg(args, 'subpage'),
		pages.subpage,
		args.footer or 'Archive'
	))

	return table.concat(ret, '\n')
end

local function makeInvokeFunction(func)
	return function (frame)
		local args = require('Module:Arguments').getArgs(frame, {
			trim = false,
			removeBlanks = false,
			wrappers = {
				'Template:Random portal component',
				'Template:Random portal component with nominate'
			}
		})
		return func(args, frame)
	end
end

p.main = makeInvokeFunction(p._main)
p.nominate = makeInvokeFunction(p._nominate)

return p

• Modules in beta