Module:Large category TOC

Documentation for this module may be created at Module:Large category TOC/doc

local p = {}

local azupper = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
local azlower = 'abcdefghijklmnopqrstuvwxyz'
local aejot = 'aejot'

-- Implements [[Template:Large Category TOC]]
function p.scrollable(frame)
	-- It should be much faster to only process these once, and just re use them as variables
	local pageurl = frame:preprocess('{{fullurl:{{FULLPAGENAME}}}}')
	local toc = frame:preprocess('{{MediaWiki:Toc}}')
	
	-- Begins the "title" parameter of {{Navigation bar}} with Top of the category (no ?from) and numerals (?from=0)
	local title = '<div style="width:100%;">\n<span class="plainlinks">'..toc..':\n['..pageurl..' Top]'..
					'\n['..pageurl..'?from=0 0-9]'
	-- Add ?from=A through Z to the title bar
	for i=1,26,1 do
		local letter = string.sub(azupper,i,i)
		title = title..'\n['..pageurl..'?from='..letter..' '..letter..']'
	end
	-- Closing tags
	title = title..'\n</span>\n</div>'
	-- Begin the list parameter with ?from=*
	local list = '<div style="overflow-x:auto; overflow-y:hidden; width:98%;"><span class="plainlinks">'..
					'\n['..pageurl..'?from=* *] •'
	-- Function to handle all 500+ ?from=Aa-z parameters with a simple loop
	local function atoz(letter)
		local azlist = '\n• <b>'..letter..'</b> '
			for i=1,26,1 do
				local lowerletter = string.sub(azlower,i,i)
				azlist = azlist..'\n['..pageurl..'?from='..letter..lowerletter..' '..letter..lowerletter..'] '
			end
		return azlist
	end
	-- Add ?from=0 through 9 to the list
	for i=0,9,1 do
		list = list..'\n['..pageurl..'?from='..i..' '..i..']'
	end
	-- A-Z loop that calls the a-z function
	for i=1,26,1 do
		local letter = string.sub(azupper,i,i)
		list = list..atoz(letter)
	end
	-- Close tags
	list = list..'\n</span></div>'
	
	return frame:expandTemplate{title='Navigation bar',args={color='#f9f9f9;',title=title,list=list}}
end

-- Implements [[Template:Collapsible large category TOC]]
function p.collapsible(frame)
	-- It should be much faster to only process these once, and just re use them as variables
	local pageurl = frame:preprocess('{{fullurl:{{FULLPAGENAME}}}}')
	
	local toc_string = '<div class="collapsible" style="background:transparent;">\n'..
						'<div class="NavFrame" style="clear:both; background:WhiteSmoke;">\n'..
						'<div class="NavHead" style="background:WhiteSmoke;">\n'..
						'<div class="plainlinks" id="kat_toc" style="background:WhiteSmoke; text-align:center; font-size:100%;">\n'..
						'<b>Index:</b> ['..pageurl..' *] ['..pageurl..'?from=# 0-9]'
	-- Add ?from=A through Z to the title bar
	for i=1,26,1 do
		local letter = string.sub(azupper,i,i)
		toc_string = toc_string..' ['..pageurl..'?from='..letter..' '..letter..']'
	end
	-- Closing tags
	toc_string = toc_string..'<span style="font-size: 85%;">(Click <i>Show</i> for more navigation options.)</span>'..
							'\n</div>\n</div>'..
							'<div class="NavContent" style="background:White; display:none;">'..
							'<div class="plainlinks" style="background:White; font-size:100%; text-align:center;">'..
							'\n----'..
							'\n<code style="background:White;"> <b>#</b>'
	-- Add ?from=0 through 9 to the list
	for i=0,9,1 do
		toc_string = toc_string..'\n['..pageurl..'?from='..i..' '..i..']'
	end
	
	toc_string = toc_string..'<br/>'
	-- Function to handle all 500+ ?from=Aa-z parameters with a simple loop
	local function atoz(letter)
		local azlist = '\n<b>'..letter..'</b> '
			for i=1,26,1 do
				local lowerletter = string.sub(azlower,i,i)
				azlist = azlist..' ['..pageurl..'?from='..letter..lowerletter..' '..letter..lowerletter..'] '
			end
		return azlist..'<br/>'
	end

	-- A-Z loop that calls the a-z function
	for i=1,26,1 do
		local letter = string.sub(azupper,i,i)
		toc_string = toc_string..atoz(letter)
	end
	-- Close tags
	toc_string = toc_string..'\n</code>\n</div></div></div>'
	
	return toc_string
end

return p