Module:Arguments - Revision history

Sushoff: Created page with "-- This module provides easy processing of arguments passed to Scribunto from -- #invoke. It is intended for use by other Lua modules, and should not be -- called from #invoke directly. local libraryUtil = require('libraryUtil') local checkType = libraryUtil.checkType local arguments = {} -- Generate four different tidyVal functions, so that we don't have to check the -- options every time we call it. local function tidyValDefault(key, val) if type(val) == 'string'..."

2025-02-01T12:49:15Z

Created page with "-- This module provides easy processing of arguments passed to Scribunto from -- #invoke. It is intended for use by other Lua modules, and should not be -- called from #invoke directly. local libraryUtil = require('libraryUtil') local checkType = libraryUtil.checkType local arguments = {} -- Generate four different tidyVal functions, so that we don't have to check the -- options every time we call it. local function tidyValDefault(key, val) if type(val) == 'string'..."

← Older revision	Revision as of 12:49, 1 February 2025
(No difference)

imported>MusikAnimal: 1 revision imported

2020-04-01T06:12:40Z

1 revision imported

← Older revision	Revision as of 06:12, 1 April 2020
(No difference)

w>MusikAnimal: Protected "Module:Arguments": High-risk template ([Edit=Allow only administrators] (indefinite) [Move=Allow only administrators] (indefinite))

2019-02-14T01:32:53Z

Protected "Module:Arguments": High-risk template ([Edit=Allow only administrators] (indefinite) [Move=Allow only administrators] (indefinite))

← Older revision	Revision as of 01:32, 14 February 2019
(No difference)

imported>Xaosflux: Changed protection level of Module:Arguments: used in the mediawiki interface ex: MediaWiki:Watchlist-details ([Edit=Allow only administrators] (indefinite) [Move=Allow only administrators] (indefinite))

2015-12-23T16:07:27Z

Changed protection level of Module:Arguments: used in the mediawiki interface ex: MediaWiki:Watchlist-details ([Edit=Allow only administrators] (indefinite) [Move=Allow only administrators] (indefinite))

← Older revision	Revision as of 16:07, 23 December 2015
(No difference)

imported>Jackmcbarn: add argument translation from sandbox - all tests pass

2015-06-26T22:53:15Z

add argument translation from sandbox - all tests pass

← Older revision		Revision as of 22:53, 26 June 2015
Line 52:		Line 52:
	return (tp == 'string' or tp == 'number') and mw.title.new( given ).prefixedText == title		return (tp == 'string' or tp == 'number') and mw.title.new( given ).prefixedText == title
	end		end

			local translate_mt = { __index = function(t, k) return k end }

	function arguments.getArgs(frame, options)		function arguments.getArgs(frame, options)
Line 58:		Line 60:
	frame = frame or {}		frame = frame or {}
	options = options or {}		options = options or {}

			--[[
			-- Set up argument translation.
			--]]
			options.translate = options.translate or {}
			if getmetatable(options.translate) == nil then
			setmetatable(options.translate, translate_mt)
			end
			if options.backtranslate == nil then
			options.backtranslate = {}
			for k,v in pairs(options.translate) do
			options.backtranslate[v] = k
			end
			end
			if options.backtranslate and getmetatable(options.backtranslate) == nil then
			setmetatable(options.backtranslate, {
			__index = function(t, k)
			if options.translate[k] ~= k then
			return nil
			else
			return k
			end
			end
			})
			end

	--[[		--[[
Line 97:		Line 124:
	end		end
	end		end

	-- We test for false specifically here so that nil (the default) acts like true.		-- We test for false specifically here so that nil (the default) acts like true.
	if found or options.frameOnly == false then		if found or options.frameOnly == false then
Line 122:		Line 149:
	luaArgs = frame		luaArgs = frame
	end		end

	-- Set the order of precedence of the argument tables. If the variables are		-- Set the order of precedence of the argument tables. If the variables are
	-- nil, nothing will be added to the table, which is how we avoid clashes		-- nil, nothing will be added to the table, which is how we avoid clashes
	-- between the frame/parent args and the Lua args.		-- between the frame/parent args and the Lua args.
	local argTables = {fargs}		local argTables = {fargs}
	argTables[#argTables + 1] = pargs		argTables[#argTables + 1] = pargs
Line 215:		Line 242:
	-- must be nil.		-- must be nil.
	--]]		--]]
			if type(key) == 'string' then
			key = options.translate[key]
			end
	local val = metaArgs[key]		local val = metaArgs[key]
	if val ~= nil then		if val ~= nil then
Line 235:		Line 265:
	-- This function is called when a module tries to add a new value to the		-- This function is called when a module tries to add a new value to the
	-- args table, or tries to change an existing value.		-- args table, or tries to change an existing value.
			if type(key) == 'string' then
			key = options.translate[key]
			end
	if options.readOnly then		if options.readOnly then
	error(		error(
Line 261:		Line 294:
	else		else
	metaArgs[key] = val		metaArgs[key] = val
			end
			end

			local function translatenext(invariant)
			local k, v = next(invariant.t, invariant.k)
			invariant.k = k
			if k == nil then
			return nil
			elseif type(k) ~= 'string' or not options.backtranslate then
			return k, v
			else
			local backtranslate = options.backtranslate[k]
			if backtranslate == nil then
			-- Skip this one. This is a tail call, so this won't cause stack overflow
			return translatenext(invariant)
			else
			return backtranslate, v
			end
	end		end
	end		end
Line 270:		Line 321:
	metatable.donePairs = true		metatable.donePairs = true
	end		end
	return ~~pairs(~~metaArgs)		return translatenext, { t = metaArgs }
	end		end

	local function inext(t, i)		local function inext(t, i)
	-- This uses our __index metamethod		-- This uses our __index metamethod

imported>Jackmcbarn: apply changes from sandbox - all tests pass

2015-01-31T22:31:40Z

apply changes from sandbox - all tests pass

← Older revision		Revision as of 22:31, 31 January 2015
Line 46:		Line 46:
	local function tidyValNoChange(key, val)		local function tidyValNoChange(key, val)
	return val		return val
			end

			local function matchesTitle(given, title)
			local tp = type( given )
			return (tp == 'string' or tp == 'number') and mw.title.new( given ).prefixedText == title
	end		end

Line 82:		Line 87:
	local title = parent:getTitle():gsub('/sandbox$', '')		local title = parent:getTitle():gsub('/sandbox$', '')
	local found = false		local found = false
	if type(options.wrappers) == 'table' then		if matchesTitle(options.wrappers, title) then
			found = true
			elseif type(options.wrappers) == 'table' then
	for _,v in pairs(options.wrappers) do		for _,v in pairs(options.wrappers) do
	if v == title then		if matchesTitle(v, title) then
	found = true		found = true
	break		break
	end		end
	end		end
	~~elseif options.wrappers == title then~~
	~~found = true~~
	end		end

Line 165:		Line 170:
	setmetatable(args, metatable)		setmetatable(args, metatable)

	local function mergeArgs(~~iterator,~~ tables)		local function mergeArgs(tables)
	--[[		--[[
	-- Accepts multiple tables as input and merges their keys and values		-- Accepts multiple tables as input and merges their keys and values
	-- into one table ~~using the specified iterator~~. If a value is already		-- into one table. If a value is already present it is not overwritten;
	-- present it is not overwritten; tables listed earlier have precedence.		-- tables listed earlier have precedence. We are also memoizing nil
	-- We are also memoizing nil values, which can be overwritten if they		-- values, which can be overwritten if they are 's' (soft).
	-- are 's' (soft).
	--]]		--]]
	for _, t in ipairs(tables) do		for _, t in ipairs(tables) do
	for key, val in ~~iterator~~(t) do		for key, val in pairs(t) do
	if metaArgs[key] == nil and nilArgs[key] ~= 'h' then		if metaArgs[key] == nil and nilArgs[key] ~= 'h' then
	local tidiedVal = tidyVal(key, val)		local tidiedVal = tidyVal(key, val)
Line 263:		Line 267:
	-- Called when pairs is run on the args table.		-- Called when pairs is run on the args table.
	if not metatable.donePairs then		if not metatable.donePairs then
	mergeArgs(~~pairs,~~ argTables)		mergeArgs(argTables)
	metatable.donePairs = true		metatable.donePairs = true
	~~metatable.doneIpairs = true~~
	end		end
	return pairs(metaArgs)		return pairs(metaArgs)
			end

			local function inext(t, i)
			-- This uses our __index metamethod
			local v = t[i + 1]
			if v ~= nil then
			return i + 1, v
			end
	end		end

	metatable.__ipairs = function ()		metatable.__ipairs = function (t)
	-- Called when ipairs is run on the args table.		-- Called when ipairs is run on the args table.
	~~if not metatable.doneIpairs then~~		return inext, t, 0
	~~mergeArgs(ipairs~~, ~~argTables)~~
	~~metatable.doneIpairs = true~~
	~~end~~
	~~return ipairs(metaArgs)~~
	end		end

imported>Mr. Stradivarius: fix bug where explicitly deleted args were still appearing when iterated over with pairs or ipairs - code courtesy of User:Jackmcbarn

2014-12-11T04:32:27Z

fix bug where explicitly deleted args were still appearing when iterated over with pairs or ipairs - code courtesy of User:Jackmcbarn

← Older revision		Revision as of 04:32, 11 December 2014
Line 170:		Line 170:
	-- into one table using the specified iterator. If a value is already		-- into one table using the specified iterator. If a value is already
	-- present it is not overwritten; tables listed earlier have precedence.		-- present it is not overwritten; tables listed earlier have precedence.
	-- We are also memoizing nil values, ~~but those values~~ can be		-- We are also memoizing nil values, which can be overwritten if they
	-- ~~overwritten~~.		-- are 's' (soft).
	--]]		--]]
	for _, t in ipairs(tables) do		for _, t in ipairs(tables) do
	for key, val in iterator(t) do		for key, val in iterator(t) do
	if metaArgs[key] == nil then		if metaArgs[key] == nil and nilArgs[key] ~= 'h' then
	local tidiedVal = tidyVal(key, val)		local tidiedVal = tidyVal(key, val)
	if tidiedVal == nil then		if tidiedVal == nil then
	nilArgs[key] = ~~true~~		nilArgs[key] = 's'
	else		else
	metaArgs[key] = tidiedVal		metaArgs[key] = tidiedVal
Line 219:		Line 219:
	for _, argTable in ipairs(argTables) do		for _, argTable in ipairs(argTables) do
	local argTableVal = tidyVal(key, argTable[key])		local argTableVal = tidyVal(key, argTable[key])
	if argTableVal == nil then		if argTableVal ~= nil then
	~~nilArgs[key] = true~~
	~~else~~
	metaArgs[key] = argTableVal		metaArgs[key] = argTableVal
	return argTableVal		return argTableVal
	end		end
	end		end
			nilArgs[key] = 'h'
	return nil		return nil
	end		end
Line 255:		Line 254:
	--]]		--]]
	metaArgs[key] = nil		metaArgs[key] = nil
	nilArgs[key] = ~~true~~		nilArgs[key] = 'h'
	else		else
	metaArgs[key] = val		metaArgs[key] = val

imported>Mr. Stradivarius: allow using both the frame and parent frame arguments with the wrappers option if specifically requested, per protected edit request by User:Jackmcbarn

2014-07-05T03:52:56Z

allow using both the frame and parent frame arguments with the wrappers option if specifically requested, per protected edit request by User:Jackmcbarn

← Older revision		Revision as of 03:52, 5 July 2014
Line 92:		Line 92:
	found = true		found = true
	end		end
	if found then
			-- We test for false specifically here so that nil (the default) acts like true.
			if found or options.frameOnly == false then
	pargs = parent.args		pargs = parent.args
	~~else~~		end
			if not found or options.parentOnly == false then
	fargs = frame.args		fargs = frame.args
	end		end
Line 107:		Line 110:
	pargs = parent and parent.args or nil		pargs = parent and parent.args or nil
	end		end
	if options.parentFirst then		end
	fargs, pargs = pargs, fargs		if options.parentFirst then
	~~end~~		fargs, pargs = pargs, fargs
	end		end
	else		else

imported>Mr. Stradivarius: add a "wrappers" option and fix bug when frame:getParent() returns nil, per protected edit request by User:Jackmcbarn

2014-06-06T14:24:47Z

add a "wrappers" option and fix bug when frame:getParent() returns nil, per protected edit request by User:Jackmcbarn

← Older revision		Revision as of 14:24, 6 June 2014
Line 55:		Line 55:

	--[[		--[[
	-- Get the arguments ~~from~~ the frame ~~object if available~~. If ~~the frame object~~		-- Get the argument tables. If we were passed a valid frame object, get the
	-- ~~is not available~~, we are being called from another Lua module or from the		-- frame arguments (fargs) and the parent frame arguments (pargs), depending
	-- ~~debug console~~, so assign ~~the args~~ to a new variable ~~so we can~~		-- on the options set and on the parent frame's availability. If we weren't
	~~-- differentiate them~~.		-- passed a valid frame object, we are being called from another Lua module
			-- or from the debug console, so assume that we were passed a table of args
			-- directly, and assign it to a new variable (luaArgs).
	--]]		--]]
	local fargs, pargs, luaArgs		local fargs, pargs, luaArgs
	if type(frame.args) == 'table' and type(frame.getParent) == 'function' then		if type(frame.args) == 'table' and type(frame.getParent) == 'function' then
	if not options.~~parentOnly~~ then		if options.wrappers then
	fargs = frame.args		--[[
	end		-- The wrappers option makes Module:Arguments look up arguments in
	if not options.frameOnly then		-- either the frame argument table or the parent argument table, but
	~~pargs~~ = frame:getParent().args		-- not both. This means that users can use either the #invoke syntax
	end		-- or a wrapper template without the loss of performance associated
	if options.parentFirst then		-- with looking arguments up in both the frame and the parent frame.
	fargs, pargs = pargs, fargs		-- Module:Arguments will look up arguments in the parent frame
			-- if it finds the parent frame's title in options.wrapper;
			-- otherwise it will look up arguments in the frame object passed
			-- to getArgs.
			--]]
			local parent = frame:getParent()
			if not parent then
			fargs = frame.args
			else
			local title = parent:getTitle():gsub('/sandbox$', '')
			local found = false
			if type(options.wrappers) == 'table' then
			for _,v in pairs(options.wrappers) do
			if v == title then
			found = true
			break
			end
			end
			elseif options.wrappers == title then
			found = true
			end
			if found then
			pargs = parent.args
			else
			fargs = frame.args
			end
			end
			else
			-- options.wrapper isn't set, so check the other options.
			if not options.parentOnly then
			fargs = frame.args
			end
			if not options.frameOnly then
			local parent = frame:getParent()
			pargs = parent and parent.args or nil
			end
			if options.parentFirst then
			fargs, pargs = pargs, fargs
			end
	end		end
	else		else
Line 212:		Line 252:
	--]]		--]]
	metaArgs[key] = nil		metaArgs[key] = nil
	nilArgs[key] = true ~~-- Memoize nils.~~		nilArgs[key] = true
	else		else
	metaArgs[key] = val		metaArgs[key] = val

imported>Mr. Stradivarius: memoize nils using a separate nilArgs table; this fixes a bug where nil values were being iterated over with pairs()

2014-04-18T10:30:10Z

memoize nils using a separate nilArgs table; this fixes a bug where nil values were being iterated over with pairs()

Show changes