class Falcon::Server

def failure_response(exception)
	[500, {'Content-Type' => 'text/plain'}, ["Request failed due to: #{exception.class}: #{exception.message}"]]
end

def handle_request(request, peer, address)
	request_path, query_string = request.path.split('?', 2)
	server_name, server_port = request.headers.fetch('HTTP_HOST', '').split(':', 2)
	
	input = StringIO.new(request.body || '')
	input.set_encoding(Encoding::BINARY)
	
	env = {
		'rack.version' => [2, 0, 0],
		
		'rack.input' => input,
		'rack.errors' => $stderr,
		
		'rack.multithread' => true,
		'rack.multiprocess' => true,
		'rack.run_once' => false,
		
		# The HTTP request method, such as “GET” or “POST”. This cannot ever be an empty string, and so is always required.
		'REQUEST_METHOD' => request.method,
		
		# The initial portion of the request URL's “path” that corresponds to the application object, so that the application knows its virtual “location”. This may be an empty string, if the application corresponds to the “root” of the server.
		'SCRIPT_NAME' => '',
		
		# The remainder of the request URL's “path”, designating the virtual “location” of the request's target within the application. This may be an empty string, if the request URL targets the application root and does not have a trailing slash. This value may be percent-encoded when originating from a URL.
		'PATH_INFO' => request_path,
		
		# The portion of the request URL that follows the ?, if any. May be empty, but is always required!
		'QUERY_STRING' => query_string || '',
		
		# The server protocol, e.g. HTTP/1.1
		'SERVER_PROTOCOL' => request.version,
		'rack.url_scheme' => 'http',
		
		'SERVER_NAME' => server_name,
		'SERVER_PORT' => server_port,
	}.merge(request.headers)
	
	if remote_address = peer.remote_address
		env['REMOTE_ADDR'] = remote_address.ip_address if remote_address.ip?
	end
	
	return @app.call(env)
rescue => exception
	logger.error "#{exception.class}: #{exception.message}\n\t#{$!.backtrace.join("\n\t")}"
	
	return failure_response(exception)
end

def initialize(app, *args)
	super(*args)
	
	@app = app
end

def logger
	Async.logger
end