Module:Highest archive number - Revision history

Mr. Stradivarius: add a "start" parameter to specify the starting archive number with, and convert to use Module:Exponential search

2019-10-08T15:47:04Z

add a "start" parameter to specify the starting archive number with, and convert to use Module:Exponential search

@@ Line 2: / Line 2: @@
 -- archive pages.
 local p = {}
 local function pageExists(page)
@@ Line 11: / Line 19: @@
 end
-local function midPoint(lower, upper)
+function p._main(prefix, start)
 		return nil
 	else
 	end
 end
@@ Line 50: / Line 53: @@
 	})
 	local prefix = args[1]
 end

Mr. Stradivarius: alter pageExists so that title.exists is caught by pcall

2015-02-10T13:56:35Z

alter pageExists so that title.exists is caught by pcall

← Previous revision		Revision as of 13:56, 10 February 2015
Line 5:		Line 5:

	local function pageExists(page)		local function pageExists(page)
	local success, ~~title~~ = pcall(~~mw.title.new, page~~)		local success, exists = pcall(function()
	return ~~success and title and~~ title.exists		return mw.title.new(page).exists
			end)
			return success and exists
	end		end

Mr. Stradivarius: Protected Module:Highest archive number: High-risk Lua module ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))

2014-10-08T23:39:06Z

Protected Module:Highest archive number: High-risk Lua module ([Edit=Allow only template editors and admins] (indefinite) [Move=Allow only template editors and admins] (indefinite))

← Previous revision	Revision as of 23:39, 8 October 2014
(No difference)

Mr. Stradivarius: oops, use the right variable name

2014-10-07T03:35:54Z

oops, use the right variable name

← Previous revision		Revision as of 03:35, 7 October 2014
Line 35:		Line 35:

	function p._main(prefix)		function p._main(prefix)
	if type(prefix) ~= 'string' or not ~~string~~:find('%S') then		if type(prefix) ~= 'string' or not prefix:find('%S') then
	error('no prefix supplied to [[Module:Highest archive number]]', 2)		error('no prefix supplied to [[Module:Highest archive number]]', 2)
	end		end

Mr. Stradivarius: remove the automatic prefix-finding code - this might introduce subtle bugs

2014-10-07T03:34:11Z

remove the automatic prefix-finding code - this might introduce subtle bugs

← Previous revision		Revision as of 03:34, 7 October 2014
Line 35:		Line 35:

	function p._main(prefix)		function p._main(prefix)
	if not ~~prefix~~ then		if type(prefix) ~= 'string' or not string:find('%S') then
			error('no prefix supplied to [[Module:Highest archive number]]', 2)
	-- Try to detect whether we are on an archive page or not and create
	-- the prefix accordingly.
	local title = mw.title.getCurrentTitle()
	prefix = title.prefixedText:match('^(.*/Archive )[0-9]+$')
	prefix = prefix or title.prefixedText .. '/Archive '
	end		end
	return findHighestArchive(prefix, 10)		return findHighestArchive(prefix, 10)

Mr. Stradivarius: split the midpoint-finding code out into its own function

2014-10-06T06:11:49Z

split the midpoint-finding code out into its own function

← Previous revision		Revision as of 06:11, 6 October 2014
Line 7:		Line 7:
	local success, title = pcall(mw.title.new, page)		local success, title = pcall(mw.title.new, page)
	return success and title and title.exists		return success and title and title.exists
			end

			local function midPoint(lower, upper)
			return math.floor(lower + (upper - lower) / 2)
	end		end

Line 17:		Line 21:
	return i		return i
	elseif upper then		elseif upper then
	i = ~~math.floor~~(lower ~~+ (~~upper ~~- lower) / 2~~)		i = midPoint(lower, upper)
	else		else
	i = i * 2		i = i * 2
Line 25:		Line 29:
	upper = i		upper = i
	lower = lower or 0		lower = lower or 0
	i = ~~math.floor~~(lower ~~+ (~~upper ~~- lower) / 2~~)		i = midPoint(lower, upper)
	return findHighestArchive(prefix, i, lower, upper)		return findHighestArchive(prefix, i, lower, upper)
	end		end

Mr. Stradivarius: fix a bug in the recursion algorithm, try to guess the prefix if we are not provided with one, and make this usable from wikitext

2014-10-05T15:35:32Z

fix a bug in the recursion algorithm, try to guess the prefix if we are not provided with one, and make this usable from wikitext

← Previous revision		Revision as of 15:35, 5 October 2014
Line 10:		Line 10:

	local function findHighestArchive(prefix, i, lower, upper)		local function findHighestArchive(prefix, i, lower, upper)
	if ~~pageExists(prefix~~ .. ~~tostring(i))~~ then		if i < 1 then
			return nil
			elseif pageExists(prefix .. tostring(i)) then
	lower = i		lower = i
	if upper and i + 1 == upper then		if upper and i + 1 == upper then
Line 22:		Line 24:
	else		else
	upper = i		upper = i
	lower = lower or ~~math.floor(i / 2)~~		lower = lower or 0
	i = math.floor(lower + (upper - lower) / 2)		i = math.floor(lower + (upper - lower) / 2)
	return findHighestArchive(prefix, i, lower, upper)		return findHighestArchive(prefix, i, lower, upper)
Line 28:		Line 30:
	end		end

		⚫	function p._main(prefix)
	p.find = findHighestArchive
			if not prefix then

			-- Try to detect whether we are on an archive page or not and create
⚫	function p._main(~~args~~)
			-- the prefix accordingly.
			local title = mw.title.getCurrentTitle()
			prefix = title.prefixedText:match('^(.*/Archive )[0-9]+$')
			prefix = prefix or title.prefixedText .. '/Archive '
			end
			return findHighestArchive(prefix, 10)
	end		end

	function p.main(frame)		function p.main(frame)
	local args = require('Module:Arguments').getArgs(frame)		local args = require('Module:Arguments').getArgs(frame, {
			trim = false,
⚫	return p._main(~~args~~)
			removeBlanks = false,
			wrappers = 'Template:Highest archive number'
			})
			local prefix = args[1]
		⚫	return p._main(prefix)
	end		end

Mr. Stradivarius: create a recursive algorithm for finding the highest archive number of a set of archive pages

2014-10-05T15:05:31Z

create a recursive algorithm for finding the highest archive number of a set of archive pages

New page

-- This module finds the highest existing archive number for a set of talk
-- archive pages.

local p = {}

local function pageExists(page)
local success, title = pcall(mw.title.new, page)
return success and title and title.exists
end

local function findHighestArchive(prefix, i, lower, upper)
if pageExists(prefix .. tostring(i)) then
lower = i
if upper and i + 1 == upper then
return i
elseif upper then
i = math.floor(lower + (upper - lower) / 2)
else
i = i * 2
end
return findHighestArchive(prefix, i, lower, upper)
else
upper = i
lower = lower or math.floor(i / 2)
i = math.floor(lower + (upper - lower) / 2)
return findHighestArchive(prefix, i, lower, upper)
end
end

p.find = findHighestArchive

function p._main(args)
end

function p.main(frame)
local args = require('Module:Arguments').getArgs(frame)
return p._main(args)
end

return p