Module:Sandbox/Aidan9382: Difference between revisions

Revision as of 09:14, 27 September 2022

Latest revision as of 12:47, 12 August 2025

(79 intermediate revisions by 2 users not shown)

Line 1:

if mw.title.getCurrentTitle().prefixedText == "Module:Sandbox/Aidan9382" then

require("Module:No globals")

require('Module:Module wikitext')._addText('{{User:Aidan9382/sandbox/header|nolint=y}}')

local functions = {}

end

require("strict")

local p = {}

function functionsp.main(data)

return "<div style=text-align:right;font-size:80%>This does nothing as of right now. "..os.time().."</div>"

end

function p.Debug(arg1, arg2) -- General-purpose debugger/testing tool; combines multiple submodules

function functions:namecall()

-- Runs CodeAnalysis and Benchmarker

return self

-- Benchmarker expects either p and the module name or the return function and the module name

-- This is to be required in the module, not `#invoke:`ed

require('Module:Module wikitext')._addText('{{#invoke:Sandbox/Aidan9382/CodeAnalysis|main}}')

local Hook = require("Module:Sandbox/Aidan9382/Benchmarker")

local t = type(arg1) == "table" and arg1 or type(arg1) == "nil" and {} or nil

if t then

return Hook(t, arg2 or "root module")

elseif type(arg1) == "function" then

return Hook(arg1, arg2 or "root module")

elseif arg1 ~= false then

mw.log("Aidan9382 | Unable to load Benchmarker (unexpected arg setup)")

end

end

function p.getargs(frame)

local function Dump(t,depth,result,indent,recursion)

local depthtext = depth"Frame or 10arguments:"

for k,v in pairs(frame.args) do

local result = result or ""

k,v = tostring(k), tostring(v)

local indent = indent or 2

text = text .. "\n\n'<code>" .. mw.text.nowiki(mw.text.unstrip(k)) .. "</code>' = '<code>" .. mw.text.nowiki(mw.text.unstrip(v)) .. "</code>'"

local recursion = recursion or {}

result = result .. "Dump start\n"

for a,b in next,t do

--Indent the table

result = result .. "D"..string.rep(" ",indent)

--Represent the key (we dont expand table keys)

if type(a) == "string" then

result = result .. "\""..a.."\""

else

result = result .. tostring(a)

end

result = result .. ": "

--Represent the value

if type(b) == "string" then

result = result .. "\""..b.."\""

elseif type(b) == "table" then

if depth == 0 then

result = result .. tostring(b) .. "[ Depth limit ]"

elseif recursion[b] then

result = result .. tostring(b) .. "[ Recursion ]"

else --Dump the table inside

recursion[b] = true

result = result .. Dump(b,depth-1,"",indent+2,recursion)

end

elseif type(b) == "nil" then

result = result .. "nil"

else

result = result .. tostring(b)

end

--Finalise line

result = result .. "\n"

end

return resulttext

end

function functions:RawInfo()

function p.testGP(frame)

return "<sytaxhighlight lang=text>\n"..Dump(self,5).."</syntaxhighlight>"

local s1 = "Frame args:"

local s2 = "getParameters args:"

local p1 = frame.args

local p2 = require("Module:GetParameters").getParameters(p1, {"a", "b", "c"})

for k,v in pairs(p1) do

s1 = s1 .. "\n'" .. tostring(k) .. "' = '" .. v .. "'"

end

for k,v in pairs(p2) do

s2 = s2 .. "\n'" .. tostring(k) .. "' = '" .. v .. "'"

end

return s1 .. "\n\n" .. s2 .. "\n\n\n"

end

function p.testframe(options) --For the Debug console - easy way into template entry points

return functions

--To be invoked with the wanted arguments and page titles, or none for the default.

--Setting .args after testframe() has been called is allowed but discouraged over simply

--calling the function with provided arguments so as to match the real functionality

local options = options or {}

local base = mw.getCurrentFrame()

local childArgs = options.args or {}

local parentArgs = options.parentArgs or childArgs

local childTitle = options.title or base:getTitle()

local parentTitle = options.parentTitle

local parentFrame = base:newChild({title=parentTitle, args=parentArgs})

local childFrame = parentFrame:newChild({title=childTitle, args=childArgs})

--Hide the extra parents, which would be unexpected outside of a debug setting

parentFrame.getParent = function() return nil end

--This 2nd hook is required, or else childFrame:getParent() somehow returns

--the unmodified parent frame, which doesn't have the getParent hook. :/

childFrame.getParent = function() return parentFrame end

return childFrame

end

function p.magicWordTests(frame)

local args = frame.args

if args.process == "y" then

frame:preprocess("{{DEFAULTSORT:XYZ}}")

elseif args.returnprocess == "y" then

return frame:preprocess("{{DEFAULTSORT:XYZ}}")

else

return "{{DEFAULTSORT:XYZ}}"

end

end

function p.substMagic(frame)

local arg = tonumber(frame.args[1]) or 0

return "{{safesubst:#invoke:Sandbox/Aidan9382|substMagic|" .. arg+1 .. "|~~~~}}"

end

function p.SpeedTest(frame)

local text = mw.text.unstripNoWiki(frame.args[1])

local outs = {}

local start = os.clock()

for i = 1, tonumber(frame.args[2]) or 10 do

local r = tostring(math.random())

outs[#outs+1] = string.sub(frame:preprocess(text..r),1,-(1+#r))

end

local duration = os.clock() - start

return "Time taken: " .. duration .. "\n\n" .. table.concat(outs, frame.args[3] or "\n")

end

function p.SpeedTestNoRandom(frame)

local text = mw.text.unstripNoWiki(frame.args[1])

local outs = {}

local start = os.clock()

for i = 1, tonumber(frame.args[2]) or 10 do

outs[#outs+1] = frame:preprocess(text)

end

local duration = os.clock() - start

return "Time taken: " .. duration .. "\n\n" .. table.concat(outs, frame.args[3] or "\n")

end

function p.AnalysisTest()

repeat

local x = 5

until x == 5

end

function p.WasteExecutionTime(frame)

local t = tonumber(frame.args[1]) or 0

local start = os.clock()

while os.clock()-start < t do end

return "Wasted " .. (os.clock()-start) .. " seconds"

end

p["+expensive"] = function()

mw.incrementExpensiveFunctionCount()

return ""

end

function p:namecall()

return self

end

return setmetatable(p,{

__index=function(t,k)

mw.log("Attempted to access unknown function '"..tostring(k).."' from Module:Sandbox/Aidan9382\n"..debug.traceback())

return function()

return "<span class=\"error\">Attempted to access unknown function '"..tostring(k).."'</span>"

--local frame = mw.getCurrentFrame()

--local traceback = frame:extensionTag("syntaxhighlight", debug.traceback(), {lang="text"})

--return "<span class=\"error\">Attempted to access unknown function '"..tostring(k).."'</span>\n"..traceback

end

end

})