69 lines
1.2 KiB
Lua
69 lines
1.2 KiB
Lua
--[[
|
|
|
|
HTTP server implementation for LuCI - core
|
|
(c) 2008 Freifunk Leipzig / Jo-Philipp Wich <xm@leipzig.freifunk.net>
|
|
|
|
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
|
|
|
|
$Id$
|
|
|
|
]]--
|
|
|
|
require("ltn12")
|
|
require("socket")
|
|
|
|
require("luci.util")
|
|
require("luci.http.protocol")
|
|
require("luci.httpd.server")
|
|
|
|
|
|
local srv = luci.httpd.server
|
|
local host = "0.0.0.0"
|
|
local port = 50000
|
|
|
|
|
|
server = socket.bind(host, port)
|
|
server:settimeout( 0, "t" )
|
|
|
|
reading = { server }
|
|
running = { }
|
|
|
|
|
|
while true do
|
|
|
|
local input = socket.select( reading, nil, 0.1 )
|
|
|
|
-- accept new connections
|
|
for i, connection in ipairs(input) do
|
|
|
|
local sock = connection:accept()
|
|
|
|
-- check capacity
|
|
if #running < srv.MAX_CLIENTS then
|
|
|
|
table.insert( running, {
|
|
coroutine.create( srv.client_handler ),
|
|
sock
|
|
} )
|
|
|
|
-- reject client
|
|
else
|
|
srv.error503( sock )
|
|
end
|
|
end
|
|
|
|
-- create client handler
|
|
for i, client in ipairs( running ) do
|
|
|
|
-- reap dead clients
|
|
if coroutine.status( client[1] ) == "dead" then
|
|
table.remove( running, i )
|
|
end
|
|
|
|
coroutine.resume( client[1], client[2] )
|
|
end
|
|
end
|