Module:Numlinks

Module documentation[view] [edit] [history] [purge]

This module implements a metatemplate, and may be invoked by templates using its corresponding template Template:Numlinks, or used directly from other modules.

This module generates previous and next links for a numbered page.

Introspection summary for Module:Numlinks

Functions provided (4)
Line	Function	Params
9	`_numlinks` (main)	`(args)`
101	`numlinks_2num`	`(args)`
126	`numlinks` (invokable)	`(frame)`
139	`tester`	none

Lua modules required (3)
Variable	Module	Functions used
getArgs	Module:Arguments	`getArgs`
ordinal	Module:Ordinal	`_ordinal`
yesno	Module:Yesno	`yesno`

No function descriptions were provided. The Lua code may have further information.

-- Page is following provisonal style guide: User:Ganaram_inukshuk/Provisional_style_guide_for_Lua
local getArgs = require("Module:Arguments").getArgs
local ordinal = require("Module:Ordinal"  )._ordinal
local yesno   = require("Module:Yesno"    )

local p = {}

-- Main function
function p._numlinks(args)
	local num_links   = tonumber(args["Link Count"]) or 1		-- Number of links to display in each direction (EG, for 12edo, with default of 1, show links for 11edo and 13edo)
	local curr_num    = tonumber(args["Num"])					-- Current number (EG, 12edo)
	local min_num     = tonumber(args["Min"]) or 1				-- Minimum valid number (EG, for 12edo, this corresponds to 1edo)
	local is_ordinal  = yesno(args["Is Ordinal"], false)		-- Whether to format numbers as ordinals (EG, for nth-octave temperament pages)
	local is_table    = yesno(args["Is Table"  ], true)			-- Toggle whether to display as a 3-cell table or one line

	-- Format strings
	local link_fmt    = args["Link Format"] or "%s"					-- Format for link target (EG, %sedo)
	local display_fmt = args["Displayed Format"   ] or link_fmt		-- Format for displayed text in links, if it differs from the link text
	local current_fmt = args["Current Page Format"] or link_fmt		-- Format for current page text, if it differs from the link text

	-- Helper function to format a number
	local function format_number(n)
		local str = is_ordinal and ordinal(n) or tostring(n)
		return str
	end

	-- Nested helper function to make a link
	local function make_link(num)
		local link_target  = string.format(link_fmt   , num)
		local display_text = string.format(display_fmt, num)

		if display_fmt == link_fmt then
			return string.format("[[%s]]", link_target)
		else
			return string.format("[[%s|%s]]", link_target, display_text)
		end
	end

	-- Helper function to make current page text
	local function make_current(num)
		local display_text = string.format(current_fmt, num)
		return string.format("'''%s'''", display_text)
	end

	-- Generate previous links, if they are greater or equal to the minimum.
	-- If the first link in the sequence is greater than the minimum, add an
	-- arrow to the beginning.
	local prev_links = {}
	if curr_num - num_links >= min_num then
		table.insert(prev_links, "&larr;")
	end
	for i = num_links, 1, -1 do
		local n = curr_num - i
		if n >= min_num then
			table.insert(prev_links, make_link(format_number(n)))
			
			-- If output is a table, don't add a bullet after the last link
			if n - 1 ~= curr_num and is_table then 
				table.insert(prev_links, "&bull;")
			end
		end
	end

	-- Generate next links. Add an arrow after the last link.
	local next_links = {}
	for i = 1, num_links do
		local n = curr_num + i
		
		-- If output is a table, don't add a bullet before the first link
		if n + 1 ~= curr_num and is_table then
			table.insert(next_links, "&bull;")
		end
		
		table.insert(next_links, make_link(format_number(n)))
	end
	table.insert(next_links, "&rarr;")

	-- Current page text
	local current = make_current(format_number(curr_num))

	-- Output
	if is_table then
		local out = {}
		table.insert(out, '{| style="width: 100%;"')
		table.insert(out, '|-')
		table.insert(out, '| style="font-size: 0.75em;" | ' .. table.concat(prev_links, "&nbsp;"))
		table.insert(out, '| style="width: 50%;" | ' .. current)
		table.insert(out, '| style="font-size: 0.75em;" | ' .. table.concat(next_links, "&nbsp;"))
		table.insert(out, '|}')
		return table.concat(out, "\n")
	else
		local out = {}
		table.insert(out, table.concat(prev_parts, "&nbsp;"))
		table.insert(out, current)
		table.insert(out, table.concat(next_links, "&nbsp;"))
		return table.concat(out, "&nbsp;")
	end
end

-- wip; to be placed in its own module
function p.numlinks_2num(args)
	local curr_num_1   = args["Num 1"]
	local min_num_1    = args["Min 1"] or 1
	local curr_num_2   = args["Num 2"]
	local min_num_2    = args["Min 2"] or 1
	local disp_text    = args["Page Text"] or { "PRE-TEXT", "MID-TEXT", "POST-TEXT" }
	local link_text    = args["Link Text"] or nil
	local is_ordinal_1 = args["Is Ordinal 1"] ~= nil and args["Is Ordinal 1"] or false
	local is_ordinal_2 = args["Is Ordinal 1"] ~= nil and args["Is Ordinal 2"] or false
	
	local x = curr_num_1
	local y = curr_num_2
	local link_nums = {
		{x-1, y-1}, {x  , y-1}, {x+1, y-1},
		{x-1, y  },             {x+1, y  },
		{x-1, y+1}, {x  , y+1}, {x+1, y+1}
	}
	
	local links = {}
	for i = 1, #link_nums do
		
	end
end

-- Main function (TODO: split functionality into two modules)
function p.numlinks(frame)
	local args = getArgs(frame)
	
	args["Num"] = tonumber(args["Num"]) or 123
	args["Min"] = tonumber(args["Min"]) or 1
	args["Link Count"] = tonumber(args["Link Count"]) or 1
	
	-- Create numbered navigation links
	local result = p._numlinks(args)

	return result
end

function p.tester()
	local args = {
		["Link Count"] = 3,
		["Num"]        = 3,
		["Link Format"]  = "%s-octave temperaments",
		["Current Page Format"] = "%s-octave",
		["Is Ordinal"] = 1,
		["Is Table"  ] = 0
	}
	
	return p._numlinks(args)
end

return p