查看“︁模块:沙盒”︁的源代码

local p = {}
local libraryUtil = require("libraryUtil")
local bit32 = require("bit32")
local getArgs = require("Module:Arguments").getArgs
local ustring = mw.ustring

function p._sts(str)
	libraryUtil.checkType("_sts", 1, str, "string")
	local out = ""
	for codePoint in ustring.gcodepoint(str) do
		local mask = bit32.rshift(codePoint, 1)
		mask = bit32.bor(mask, bit32.rshift(mask, 1))
		mask = bit32.bor(mask, bit32.rshift(mask, 2))
		mask = bit32.bor(mask, bit32.rshift(mask, 4))
		mask = bit32.bor(mask, bit32.rshift(mask, 8))
		mask = bit32.bor(mask, bit32.rshift(mask, 16))
		out = out .. ustring.char(bit32.bxor(codePoint, mask))
	end
	return out
end

function p.sts(frame)
	local args = getArgs(frame)
	local input = mw.text.killMarkers(frame.args[1])
	return p._sts(input)
end

function p.args(frame)
	return mw.text.nowiki(mw.text.jsonEncode(frame.args))
end

return p