mirror of
https://github.com/dongdigua/demo.lua.git
synced 2024-11-27 17:10:54 +08:00
Compare commits
2 Commits
9031c01147
...
acbfcc8bdc
| Author | SHA1 | Date | |
|---|---|---|---|
| acbfcc8bdc | |||
| 6c33be9ba3 |
34
demo.lua
34
demo.lua
@ -37,10 +37,10 @@ or
|
|||||||
choose one of the demo programs below.
|
choose one of the demo programs below.
|
||||||
|
|
||||||
<DIV CLASS="menubar">
|
<DIV CLASS="menubar">
|
||||||
<A HREF="/demo.lua?hello">hello</A>
|
<A HREF="./demo.lua?hello">hello</A>
|
||||||
</DIV>
|
</DIV>
|
||||||
|
|
||||||
<FORM ACTION="/demo.lua" METHOD="POST">
|
<FORM ACTION="./demo.lua" METHOD="POST">
|
||||||
<TEXTAREA ROWS="16" COLS="72" NAME="input" maxlength="2000">]]
|
<TEXTAREA ROWS="16" COLS="72" NAME="input" maxlength="2000">]]
|
||||||
|
|
||||||
-- demo.lua
|
-- demo.lua
|
||||||
@ -49,20 +49,6 @@ choose one of the demo programs below.
|
|||||||
local T=""
|
local T=""
|
||||||
local E,I
|
local E,I
|
||||||
|
|
||||||
-- convert input to plain text
|
|
||||||
if os.getenv("REQUEST_METHOD") == "POST" then
|
|
||||||
T=io.read"*a"
|
|
||||||
T=string.match(T,"=(.-)$") or ""
|
|
||||||
T=string.gsub(T,"+"," ")
|
|
||||||
T=string.gsub(T,"%%(%x%x)",function (x) return string.char(tonumber(x,16)) end)
|
|
||||||
T=string.gsub(T,"^%s*=%s*","return ")
|
|
||||||
if T ~= "" then
|
|
||||||
log=io.open("/logs/lua.log", "a")
|
|
||||||
log:write("-- ", os.date(), "\n", T, "\n\n")
|
|
||||||
log:close()
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
-- save functions needed at the end
|
-- save functions needed at the end
|
||||||
local _G=_G
|
local _G=_G
|
||||||
local collectgarbage=collectgarbage
|
local collectgarbage=collectgarbage
|
||||||
@ -81,6 +67,20 @@ if query ~= "" then
|
|||||||
T=demos[query] or ""
|
T=demos[query] or ""
|
||||||
end
|
end
|
||||||
|
|
||||||
|
-- convert input to plain text
|
||||||
|
if os.getenv("REQUEST_METHOD") == "POST" then
|
||||||
|
T=io.read"*a"
|
||||||
|
T=string.match(T,"=(.-)$") or ""
|
||||||
|
T=string.gsub(T,"+"," ")
|
||||||
|
T=string.gsub(T,"%%(%x%x)",function (x) return string.char(tonumber(x,16)) end)
|
||||||
|
T=string.gsub(T,"^%s*=%s*","return ")
|
||||||
|
if T ~= "" then
|
||||||
|
log=io.open("/logs/lua.log", "a")
|
||||||
|
log:write("-- ", os.date(), "\n", T, "\n\n")
|
||||||
|
log:close()
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
-- continue HTML began in shell script
|
-- continue HTML began in shell script
|
||||||
write(T)
|
write(T)
|
||||||
write[[</TEXTAREA>
|
write[[</TEXTAREA>
|
||||||
@ -88,7 +88,7 @@ write[[</TEXTAREA>
|
|||||||
<INPUT TYPE="submit" VALUE="run">
|
<INPUT TYPE="submit" VALUE="run">
|
||||||
<INPUT TYPE="button" VALUE="clear" onclick="this.form.elements['input'].value=''">
|
<INPUT TYPE="button" VALUE="clear" onclick="this.form.elements['input'].value=''">
|
||||||
<INPUT TYPE="reset" VALUE="restore">
|
<INPUT TYPE="reset" VALUE="restore">
|
||||||
<INPUT TYPE="button" VALUE="restart" onclick="window.location.href='/demo.lua'">
|
<INPUT TYPE="button" VALUE="restart" onclick="window.location.href='./demo.lua'">
|
||||||
</FORM>
|
</FORM>
|
||||||
]]
|
]]
|
||||||
io.flush()
|
io.flush()
|
||||||
|
|||||||
164
demo.ngx.lua
Executable file
164
demo.ngx.lua
Executable file
@ -0,0 +1,164 @@
|
|||||||
|
#! /lua/lua
|
||||||
|
|
||||||
|
-- vi: set noexpandtab :vi
|
||||||
|
|
||||||
|
ngx.header.content_type = "text.html"
|
||||||
|
|
||||||
|
print=ngx.say
|
||||||
|
|
||||||
|
print[[
|
||||||
|
<!DOCTYPE html>
|
||||||
|
<HTML>
|
||||||
|
<HEAD>
|
||||||
|
<TITLE>Lua: demo</TITLE>
|
||||||
|
<LINK REL="stylesheet" TYPE="text/css" HREF="https://lua.org/lua.css">
|
||||||
|
<META HTTP-EQUIV="content-type" CONTENT="text/html; charset=utf-8">
|
||||||
|
<STYLE TYPE="text/css">
|
||||||
|
textarea {
|
||||||
|
font-family: monospace ;
|
||||||
|
}
|
||||||
|
|
||||||
|
input {
|
||||||
|
margin-right: 1em ;
|
||||||
|
}
|
||||||
|
</STYLE>
|
||||||
|
</HEAD>
|
||||||
|
|
||||||
|
<BODY>
|
||||||
|
|
||||||
|
<H1>
|
||||||
|
<A HREF="https://lua.org/home.html"><IMG SRC="https://lua.org/images/logo.gif" ALT="Lua"></A>
|
||||||
|
Demo
|
||||||
|
</H1>
|
||||||
|
|
||||||
|
<P>
|
||||||
|
Try Lua before
|
||||||
|
<A HREF="https://lua.org/download.html">downloading</A> it.
|
||||||
|
Enter your Lua program
|
||||||
|
or
|
||||||
|
choose one of the demo programs below.
|
||||||
|
|
||||||
|
<DIV CLASS="menubar">
|
||||||
|
<A HREF="./demo.lua?hello">hello</A>
|
||||||
|
</DIV>
|
||||||
|
|
||||||
|
<FORM ACTION="./demo.lua" METHOD="POST">
|
||||||
|
<TEXTAREA ROWS="16" COLS="72" NAME="input" maxlength="2000">]]
|
||||||
|
|
||||||
|
-- demo.lua
|
||||||
|
-- run user programs in constrained environment
|
||||||
|
|
||||||
|
local T=""
|
||||||
|
local E,I
|
||||||
|
|
||||||
|
-- save functions needed at the end
|
||||||
|
local _G=_G
|
||||||
|
local collectgarbage=collectgarbage
|
||||||
|
local pack=table.pack
|
||||||
|
local tostring=tostring
|
||||||
|
local unpack=table.unpack
|
||||||
|
local write=ngx.print
|
||||||
|
|
||||||
|
-- snippets
|
||||||
|
local demos = {}
|
||||||
|
demos["hello"] = "setmetatable({}, {__gc = function() print[[hello shenjack]] end})"
|
||||||
|
|
||||||
|
local query=ngx.req.get_uri_args(1)
|
||||||
|
if query ~= nil then
|
||||||
|
for k,_ in pairs(query) do
|
||||||
|
T=demos[k] or ""
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
-- convert input to plain text
|
||||||
|
if ngx.req.get_method() == "POST" then
|
||||||
|
ngx.req.read_body()
|
||||||
|
T=ngx.req.get_body_data()
|
||||||
|
T=string.match(T,"=(.-)$") or ""
|
||||||
|
T=string.gsub(T,"+"," ")
|
||||||
|
T=string.gsub(T,"%%(%x%x)",function (x) return string.char(tonumber(x,16)) end)
|
||||||
|
T=string.gsub(T,"^%s*=%s*","return ")
|
||||||
|
-- if T ~= "" then
|
||||||
|
-- log=io.open("/logs/lua.log", "a")
|
||||||
|
-- log:write("-- ", os.date(), "\n", T, "\n\n")
|
||||||
|
-- log:close()
|
||||||
|
-- end
|
||||||
|
end
|
||||||
|
|
||||||
|
-- continue HTML began in shell script
|
||||||
|
write(T)
|
||||||
|
write[[</TEXTAREA>
|
||||||
|
<P>
|
||||||
|
<INPUT TYPE="submit" VALUE="run">
|
||||||
|
<INPUT TYPE="button" VALUE="clear" onclick="this.form.elements['input'].value=''">
|
||||||
|
<INPUT TYPE="reset" VALUE="restore">
|
||||||
|
<INPUT TYPE="button" VALUE="restart" onclick="window.location.href='./demo.lua'">
|
||||||
|
</FORM>
|
||||||
|
]]
|
||||||
|
ngx.flush()
|
||||||
|
|
||||||
|
-- the serious thing begins
|
||||||
|
if ngx.req.get_method() == "POST" then
|
||||||
|
|
||||||
|
-- limit resource
|
||||||
|
--local steplimit = 1000
|
||||||
|
--local memlimit = 1000
|
||||||
|
--
|
||||||
|
--local count = 0
|
||||||
|
--local function step ()
|
||||||
|
-- count = count + 1
|
||||||
|
-- if collectgarbage("count") > memlimit then
|
||||||
|
-- error("DoSer uses too much memory")
|
||||||
|
-- end
|
||||||
|
-- if count > steplimit then
|
||||||
|
-- error("DoSer uses too much CPU")
|
||||||
|
-- end
|
||||||
|
--end
|
||||||
|
--
|
||||||
|
--debug.sethook(step, "", 100)
|
||||||
|
|
||||||
|
-- delete unsafe functions
|
||||||
|
arg=nil
|
||||||
|
debug.debug=nil
|
||||||
|
debug.getfenv=getfenv
|
||||||
|
debug.getregistry=nil
|
||||||
|
dofile=nil
|
||||||
|
io={write=io.write}
|
||||||
|
loadfile=nil
|
||||||
|
os.execute=nil
|
||||||
|
os.getenv=nil
|
||||||
|
os.remove=nil
|
||||||
|
os.rename=nil
|
||||||
|
os.tmpname=nil
|
||||||
|
package.loaded.io=io
|
||||||
|
package.loaded.package=nil
|
||||||
|
--package=nil
|
||||||
|
require=nil
|
||||||
|
|
||||||
|
-- run program in global environment
|
||||||
|
write[[<H2>Output</H2>
|
||||||
|
<TEXTAREA ROWS="8" COLS="72">]]
|
||||||
|
|
||||||
|
T,E=load(T,"=input","t")
|
||||||
|
if not T then
|
||||||
|
print(E) E="failed to compile" I="alert"
|
||||||
|
else
|
||||||
|
T=pack(pcall(T))
|
||||||
|
_G.tostring=tostring
|
||||||
|
if not T[1] then
|
||||||
|
print(T[2]) E="failed to run" I="alert"
|
||||||
|
else
|
||||||
|
print(unpack(T,2,T.n)) E="ran successfully" I="ok"
|
||||||
|
end
|
||||||
|
collectgarbage()
|
||||||
|
end
|
||||||
|
|
||||||
|
write("\n-- steps/100:\t", count, "\n")
|
||||||
|
write("-- memory:\t", string.format("%.2f",collectgarbage("count")), "\n")
|
||||||
|
|
||||||
|
-- continue HTML
|
||||||
|
write('</TEXTAREA><P><IMG SRC="https://lua.org/images/',I,'.png" ALIGN="absbottom">\n')
|
||||||
|
write('Your program ',E,'.\n')
|
||||||
|
|
||||||
|
ngx.flush()
|
||||||
|
end
|
||||||
Loading…
Reference in New Issue
Block a user