Module:Lua call/sandbox - Revision history

HouseBlaster: HouseBlaster moved page Module:LuaCall/sandbox to Module:Lua call/sandbox: expand module name in the spirit of WP:TPN

2025-02-12T06:59:58Z

HouseBlaster moved page Module:LuaCall/sandbox to Module:Lua call/sandbox: expand module name in the spirit of WP:TPN

← Previous revision	Revision as of 06:59, 12 February 2025
(No difference)

50.53.12.84: convert "invoke" to do a true #invoke off the parent frame instead of mangling the frame args and attempting to emulate a #invoke as the emulation is error prone and can easily be detected

2021-12-29T04:18:04Z

convert "invoke" to do a true #invoke off the parent frame instead of mangling the frame args and attempting to emulate a #invoke as the emulation is error prone and can easily be detected

@@ Line 144: / Line 144: @@
 --]]
 function p.invoke(frame)
-	if frame.args[1] ~= nil then
+	local pfargs = setmetatable({frame.args[1], frame.args[2]}, {__index = table})
-			func = m[frame.args[2]]
+		if not pfargs[2] then
 		end
 	else
 	end
-	for _, v in ipairsAtOffset(frame.args, offset) do
+	for i, v in ipairs(pframe.args) do
-		table.insert(args, v)
+			pfargs:insert(v)
 	end
 end

50.53.12.84: sync

2021-12-15T19:13:00Z

sync

Show changes

Ans: +

2019-03-08T10:09:24Z

← Previous revision		Revision as of 10:09, 8 March 2019
Line 14:		Line 14:
	_G[k]=tonumber(v) or v -- transfer every parameter directly to the global variable table		_G[k]=tonumber(v) or v -- transfer every parameter directly to the global variable table
	end		end

	--- Alas Scribunto does NOT implement coroutines, according to		--- Alas Scribunto does NOT implement coroutines, according to
	--- http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#string.format		--- http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#string.format
Line 80:		Line 81:
	local function f() end		local function f() end
	local v = 123		local v = 123
			--p.f0()
			--p.f()
			--p.f2()

	p.sub = p.import(mw.ustring).sub		p.sub = p.import(mw.ustring).sub

Ans: +

2019-03-08T09:57:50Z

← Previous revision		Revision as of 09:57, 8 March 2019
Line 42:		Line 42:
	end		end

	local function f0() end		local function f0() return f() end
	local v0 = 123		local v0 = 123
	-- This function is modified from https://en.wikipedia.org/wiki/Module:Ustring?oldid=885619921		-- This function is modified from https://en.wikipedia.org/wiki/Module:Ustring?oldid=885619921
Line 65:		Line 65:
	end		end
	end		end
	p.f0 = function (frame) return f0 end		p.f0 = function (frame) return f0() end
	p.v0 = function (frame) return v0 end		p.v0 = function (frame) return v0 end
	p.f = function (frame) return f end		p.f = function (frame) return f() end
	p.v = function (frame) return v end		p.v = function (frame) return v end
			p.f2 = function (frame) return f2() end

	return p		return p
	end		end
			p.f0 = function (frame) return f0() end
			p.v0 = function (frame) return v0 end
			p.f = function (frame) return f() end
			p.v = function (frame) return v end
			p.f2 = function (frame) return f2() end
	local function f() end		local function f() end
	local v = 123		local v = 123

Ans: +

2019-03-08T09:38:16Z

← Previous revision		Revision as of 09:38, 8 March 2019
Line 42:		Line 42:
	end		end

			local function f0() end
			local v0 = 123
	-- This function is modified from https://en.wikipedia.org/wiki/Module:Ustring?oldid=885619921		-- This function is modified from https://en.wikipedia.org/wiki/Module:Ustring?oldid=885619921
	-- All frame's arguments are coerced as number type if possible. If you wish for something to remain a string, you can simply escape it by insert \ at the beginning of the string.		-- All frame's arguments are coerced as number type if possible. If you wish for something to remain a string, you can simply escape it by insert \ at the beginning of the string.
Line 63:		Line 65:
	end		end
	end		end
			p.f0 = function (frame) return f0 end
			p.v0 = function (frame) return v0 end
			p.f = function (frame) return f end
			p.v = function (frame) return v end

	return p		return p
	end		end
			local function f() end
			local v = 123

	p.sub = p.import(mw.ustring).sub		p.sub = p.import(mw.ustring).sub

Ans: +

2019-03-01T12:47:02Z

← Previous revision		Revision as of 12:47, 1 March 2019
Line 51:		Line 51:
	local args = frame.args		local args = frame.args
	mw.log(#args)		mw.log(#args)
	mw.log(args)		mw.log(unpack(args))
	mw.logObject(args)		mw.logObject(args)
	for _, v in ipairs(args) do		for _, v in ipairs(args) do
Line 58:		Line 58:
	end		end
	mw.log(#args)		mw.log(#args)
	mw.log(args)		mw.log(unpack(args))
	mw.logObject(args)		mw.logObject(args)
	return (v(unpack(args)))		return (v(unpack(args)))

Ans: +

2019-03-01T12:45:23Z

← Previous revision		Revision as of 12:45, 1 March 2019
Line 51:		Line 51:
	local args = frame.args		local args = frame.args
	mw.log(#args)		mw.log(#args)
			mw.log(args)
			mw.logObject(args)
	for _, v in ipairs(args) do		for _, v in ipairs(args) do
	mw.log(_, v)		mw.log(_, v)
	args[_] = tonumber(v) or v:gsub("^\\", "", 1)		args[_] = tonumber(v) or v:gsub("^\\", "", 1)
	end		end
			mw.log(#args)
			mw.log(args)
			mw.logObject(args)
	return (v(unpack(args)))		return (v(unpack(args)))
	end		end

Ans: +

2019-03-01T12:41:49Z

← Previous revision		Revision as of 12:41, 1 March 2019
Line 50:		Line 50:
	p[k] = function(frame)		p[k] = function(frame)
	local args = frame.args		local args = frame.args
			mw.log(#args)
	for _, v in ipairs(args) do		for _, v in ipairs(args) do
			mw.log(_, v)
	args[_] = tonumber(v) or v:gsub("^\\", "", 1)		args[_] = tonumber(v) or v:gsub("^\\", "", 1)
	end		end
Line 59:		Line 61:
	return p		return p
	end		end

			p.sub = p.import(mw.ustring).sub

	return p		return p

Ans: <-- https://en.wikipedia.org/wiki/Module:LuaCall?oldid=885636978

2019-03-01T12:35:50Z

<-- https://en.wikipedia.org/wiki/Module:LuaCall?oldid=885636978

New page

local p={}

function p.main(frame)
local parent=frame.getParent(frame) or {}
local reserved_value={}
local reserved_function,reserved_contents
for k,v in pairs(parent.args or {}) do
--if tonumber(v) then v=tonumber(v) end
_G[k]=tonumber(v) or v -- transfer every parameter directly to the global variable table
-- debuglog=debuglog..k.."="..v.."</nowiki><br /><nowiki>"
end
for k,v in pairs(frame.args or {}) do
--if tonumber(v) then v=tonumber(v) end
_G[k]=tonumber(v) or v -- transfer every parameter directly to the global variable table
end
--- Alas Scribunto does NOT implement coroutines, according to
--- http://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#string.format
--- this will not stop us from trying to implement one single lousy function call
if _G[1] then
reserved_function,reserved_contents=mw.ustring.match(_G[1],"^%s*(%a[^%s%(]*)%(([^%)]*)%)%s*$")
end
if reserved_contents then
local reserved_counter=0
repeat
reserved_counter=reserved_counter+1
reserved_value[reserved_counter]=_G[mw.ustring.match(reserved_contents,"([^%,]+)")]
reserved_contents=mw.ustring.match(reserved_contents,"[^%,]+,(.*)$")
until not reserved_contents
end
local reserved_arraypart=_G
while mw.ustring.match(reserved_function,"%.") do
reserved_functionpart,reserved_function=mw.ustring.match(reserved_function,"^(%a[^%.]*)%.(.*)$")
reserved_arraypart=reserved_arraypart[reserved_functionpart]
end
local reserved_call=reserved_arraypart[reserved_function]
if type(reserved_call)~="function" then
return tostring(reserved_call)
elseif reserved_debug or not reserved_function then return mw.text.nowiki(debuglog)
else reserved_output={reserved_call(unpack(reserved_value))}
return reserved_output[reserved_return or 1]
end
end

-- This function is modified from https://en.wikipedia.org/wiki/Module:Ustring?oldid=885619921
-- All frame's arguments are coerced as number type if possible. If you wish for something to remain a string, you can simply escape it by insert \ at the beginning of the string.
function p.import(o)
local p = {}

for k, v in pairs(o) do
p[k] = function(frame)
local args = frame.args
for _, v in ipairs(args) do
args[_] = tonumber(v) or v:gsub("^\\", "", 1)
end
return (v(unpack(args)))
end
end

return p
end

return p