c553bd1e1e
to let the user integrate at the level of its choice (either very early so handle itself the header handling, or later to reuse existing code)
62 lines
1.0 KiB
Plaintext
62 lines
1.0 KiB
Plaintext
note
|
|
description: "Summary description for {HTTP_SERVER}."
|
|
author: ""
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
HTTP_SERVER
|
|
|
|
inherit
|
|
HTTP_SERVER_SHARED_CONFIGURATION
|
|
|
|
create
|
|
make
|
|
|
|
feature -- Initialization
|
|
|
|
make (cfg: like configuration)
|
|
do
|
|
configuration := cfg
|
|
end
|
|
|
|
setup (a_http_handler : HTTP_HANDLER)
|
|
require
|
|
a_http_handler_valid: a_http_handler /= Void
|
|
do
|
|
print("%N%N%N")
|
|
print ("Starting Web Application Server:%N")
|
|
stop_requested := False
|
|
set_server_configuration (configuration)
|
|
a_http_handler.launch
|
|
a_http_handler.join
|
|
end
|
|
|
|
shutdown_server
|
|
do
|
|
stop_requested := True
|
|
end
|
|
|
|
feature -- Access
|
|
|
|
configuration: HTTP_SERVER_CONFIGURATION
|
|
-- Configuration of the server
|
|
|
|
stop_requested: BOOLEAN
|
|
-- Stops the server
|
|
|
|
feature {NONE} -- implementation
|
|
|
|
run
|
|
-- Start the server
|
|
local
|
|
e: EXECUTION_ENVIRONMENT
|
|
do
|
|
create e
|
|
from until stop_requested loop
|
|
e.sleep (1_000_000)
|
|
end
|
|
end
|
|
|
|
end
|