You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
100 lines
2.3 KiB
Lua
100 lines
2.3 KiB
Lua
-- Copyright 2010 Jo-Philipp Wich <jow@openwrt.org>
|
|
-- Licensed to the public under the Apache License 2.0.
|
|
|
|
require "nixio.util"
|
|
require "luci.http"
|
|
require "luci.sys"
|
|
require "luci.dispatcher"
|
|
require "luci.ltn12"
|
|
|
|
function handle_request(env)
|
|
exectime = os.clock()
|
|
local renv = {
|
|
CONTENT_LENGTH = env.CONTENT_LENGTH,
|
|
CONTENT_TYPE = env.CONTENT_TYPE,
|
|
REQUEST_METHOD = env.REQUEST_METHOD,
|
|
REQUEST_URI = env.REQUEST_URI,
|
|
PATH_INFO = env.PATH_INFO,
|
|
SCRIPT_NAME = env.SCRIPT_NAME:gsub("/+$", ""),
|
|
SCRIPT_FILENAME = env.SCRIPT_NAME,
|
|
SERVER_PROTOCOL = env.SERVER_PROTOCOL,
|
|
QUERY_STRING = env.QUERY_STRING,
|
|
DOCUMENT_ROOT = env.DOCUMENT_ROOT,
|
|
HTTPS = env.HTTPS,
|
|
REDIRECT_STATUS = env.REDIRECT_STATUS,
|
|
REMOTE_ADDR = env.REMOTE_ADDR,
|
|
REMOTE_NAME = env.REMOTE_NAME,
|
|
REMOTE_PORT = env.REMOTE_PORT,
|
|
REMOTE_USER = env.REMOTE_USER,
|
|
SERVER_ADDR = env.SERVER_ADDR,
|
|
SERVER_NAME = env.SERVER_NAME,
|
|
SERVER_PORT = env.SERVER_PORT
|
|
}
|
|
|
|
local k, v
|
|
for k, v in pairs(env.headers) do
|
|
k = k:upper():gsub("%-", "_")
|
|
renv["HTTP_" .. k] = v
|
|
end
|
|
|
|
local len = tonumber(env.CONTENT_LENGTH) or 0
|
|
local function recv()
|
|
if len > 0 then
|
|
local rlen, rbuf = uhttpd.recv(4096)
|
|
if rlen >= 0 then
|
|
len = len - rlen
|
|
return rbuf
|
|
end
|
|
end
|
|
return nil
|
|
end
|
|
|
|
local send = uhttpd.send
|
|
|
|
local req = luci.http.Request(
|
|
renv, recv, luci.ltn12.sink.file(io.stderr)
|
|
)
|
|
|
|
|
|
local x = coroutine.create(luci.dispatcher.httpdispatch)
|
|
local hcache = { }
|
|
local active = true
|
|
|
|
while coroutine.status(x) ~= "dead" do
|
|
local res, id, data1, data2 = coroutine.resume(x, req)
|
|
|
|
if not res then
|
|
send("Status: 500 Internal Server Error\r\n")
|
|
send("Content-Type: text/plain\r\n\r\n")
|
|
send(tostring(id))
|
|
break
|
|
end
|
|
|
|
if active then
|
|
if id == 1 then
|
|
send("Status: ")
|
|
send(tostring(data1))
|
|
send(" ")
|
|
send(tostring(data2))
|
|
send("\r\n")
|
|
elseif id == 2 then
|
|
hcache[data1] = data2
|
|
elseif id == 3 then
|
|
for k, v in pairs(hcache) do
|
|
send(tostring(k))
|
|
send(": ")
|
|
send(tostring(v))
|
|
send("\r\n")
|
|
end
|
|
send("\r\n")
|
|
elseif id == 4 then
|
|
send(tostring(data1 or ""))
|
|
elseif id == 5 then
|
|
active = false
|
|
elseif id == 6 then
|
|
data1:copyz(nixio.stdout, data2)
|
|
end
|
|
end
|
|
end
|
|
end
|