91 lines
2.1 KiB
Lua
91 lines
2.1 KiB
Lua
--[[
|
|
LuCI - SGI-Module for CGI
|
|
|
|
Description:
|
|
Server Gateway Interface for CGI
|
|
|
|
FileId:
|
|
$Id: cgi.lua 3739 2008-11-08 20:25:49Z Cyrus $
|
|
|
|
License:
|
|
Copyright 2008 Steven Barth <steven@midlink.org>
|
|
|
|
Licensed under the Apache License, Version 2.0 (the "License");
|
|
you may not use this file except in compliance with the License.
|
|
You may obtain a copy of the License at
|
|
|
|
http://www.apache.org/licenses/LICENSE-2.0
|
|
|
|
Unless required by applicable law or agreed to in writing, software
|
|
distributed under the License is distributed on an "AS IS" BASIS,
|
|
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
See the License for the specific language governing permissions and
|
|
limitations under the License.
|
|
|
|
]]--
|
|
module("luci.sgi.cgi", package.seeall)
|
|
local ltn12 = require("luci.ltn12")
|
|
require("luci.http")
|
|
require("luci.sys")
|
|
require("luci.dispatcher")
|
|
|
|
-- Limited source to avoid endless blocking
|
|
local function limitsource(handle, limit)
|
|
limit = limit or 0
|
|
local BLOCKSIZE = ltn12.BLOCKSIZE
|
|
|
|
return function()
|
|
if limit < 1 then
|
|
handle:close()
|
|
return nil
|
|
else
|
|
local read = (limit > BLOCKSIZE) and BLOCKSIZE or limit
|
|
limit = limit - read
|
|
|
|
local chunk = handle:read(read)
|
|
if not chunk then handle:close() end
|
|
return chunk
|
|
end
|
|
end
|
|
end
|
|
|
|
function run()
|
|
local r = luci.http.Request(
|
|
luci.sys.getenv(),
|
|
limitsource(io.stdin, tonumber(luci.sys.getenv("CONTENT_LENGTH"))),
|
|
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, r)
|
|
|
|
if not res then
|
|
print("Status: 500 Internal Server Error")
|
|
print("Content-Type: text/plain\n")
|
|
print(id)
|
|
break;
|
|
end
|
|
|
|
if active then
|
|
if id == 1 then
|
|
io.write("Status: " .. tostring(data1) .. " " .. data2 .. "\r\n")
|
|
elseif id == 2 then
|
|
hcache = hcache .. data1 .. ": " .. data2 .. "\r\n"
|
|
elseif id == 3 then
|
|
io.write(hcache)
|
|
io.write("\r\n")
|
|
elseif id == 4 then
|
|
io.write(data1)
|
|
elseif id == 5 then
|
|
io.flush()
|
|
io.close()
|
|
active = false
|
|
end
|
|
end
|
|
end
|
|
end
|