Module:Archive list and Module:Archive list/sandbox: Difference between pages

Line 1:

~~-- This module implements {{archive list}} in Lua, and adds a few~~

-- Process a numeric argument to make sure it is a positive integer.

~~-- new features.~~

-- Process a numeric argument to make sure it is a positive

-- integer.

local function processNumArg( num )

if num then

Line 17:

Line 13:

end

-- Checks whether a page exists, going through pcall

-- Checks whether a page exists, going through pcall in case we are over the

-- in case we are over the expensive function limit.

-- expensive function limit.

local function checkPageExists( title )

if not title then

Line 37:

Line 33:

end

-- Checks every nth archive to see if it exists, and returns the

-- Checks every nth archive to see if it exists, and returns the number of the

-- ~~number of the~~ first archive that doesn't exist. It is

-- first archive that doesn't exist. It is necessary to do this in batches

-- necessary to do this in batches because each check is an

-- because each check is an expensive function call, and we want to avoid making

-- expensive function call, and we want to avoid making ~~too many~~

-- too many of them so as not to go over the expensive function limit.

-- of them so as not to go over the expensive function limit.

local function checkArchives( prefix, n, start )

local i = start

Line 54:

Line 49:

end

-- Return the biggest archive number, using checkArchives()

-- Return the biggest archive number, using checkArchives() and starting in

-- ~~and starting in~~ intervals of 1000. This should get us a

-- intervals of 1000. This should get us a maximum of 500,000 possible archives

-- maximum of 500,000 possible archives before we hit the

-- before we hit the expensive function limit.

-- expensive function limit.

local function getBiggestArchiveNum( prefix, start, max )

-- Return the value for max if it is specified.

Line 80:

Line 74:

end

-- Get the archive link prefix (the title of the archive pages

-- Get the archive link prefix (the title of the archive pages minus the number).

-- minus the number).

local function getPrefix( root, prefix, prefixSpace )

local ret = root or mw.title.getCurrentTitle().prefixedText

Line 96:

Line 89:

end

-- Get the number of archives to put on one line. Set to

-- Get the number of archives to put on one line. Set to math.huge if there

-- math.huge if there should be no line breaks.

-- should be no line breaks.

local function getLineNum( links, nobr, isLong )

local linksToNum = tonumber( links )

Line 128:

Line 121:

-- Get the link prefix.

local ret = ''

if isLong==true then ---- Default of old template for long is 'Archive '

if isLong==true then -- Default of old template for long is 'Archive '

if type(prefix) == 'string' then

if prefix == 'none' then -- 'none' overrides to empty prefix

Line 141:

Line 134:

ret = 'Archive '

end

else --type is not long

else -- type is not long

if type(prefix) == 'string' then

ret = prefix

Line 254:

Line 247:

end

if glargs.isLong == true then --Long version is a table

if glargs.isLong == true then -- Long version is a table

table.insert(ret, "</td></tr></table>")

end

Line 265:

Line 258:

return false

elseif auto == 'long' then

return true

else

return false

Line 296:

Line 289:

end

-- A wrapper function to make getBiggestArchiveNum() available from

-- A wrapper function to make getBiggestArchiveNum() available from #invoke.

-- #invoke.

local function _count( args )

local prefix = getPrefix( args.root, args.prefix, args.prefixspace )

Line 321:

Line 313:

end

-- Ignore blank values for parameters other than "links",

-- Ignore blank values for parameters other than "links", which functions

-- ~~which functions~~ differently depending on whether it is

-- differently depending on whether it is blank or absent.

-- blank or absent.

local args = {}

for k, v in pairs( origArgs ) do