A few change to make it more customizable

and prepare integration to EiffelWebReloaded (see on github)

configuration/http_server_configuration.e

@@ -0,0 +1,60 @@
+note
+	description: "Summary description for {HTTP_SERVER_CONFIGURATION}."
+	date: "$Date$"
+	revision: "$Revision$"
+
+class
+	HTTP_SERVER_CONFIGURATION
+
+create
+	make
+
+feature {NONE} -- Initialization
+
+	make
+		do
+			http_server_port := 9_000
+			max_tcp_clients := 100
+			socket_accept_timeout := 1_000
+			socket_connect_timeout := 5_000
+			document_root := "htdocs"
+		end
+
+feature -- Access
+
+	Server_details : STRING = "Server : NANO Eiffel Server"
+
+	document_root: STRING assign set_document_root
+	http_server_port: INTEGER assign set_http_server_port
+	max_tcp_clients: INTEGER assign set_max_tcp_clients
+	socket_accept_timeout: INTEGER assign set_socket_accept_timeout
+	socket_connect_timeout: INTEGER assign set_socket_connect_timeout
+
+feature -- Element change
+
+	set_http_server_port (v: like http_server_port)
+		do
+			http_server_port := v
+		end
+
+	set_document_root (v: like document_root)
+		do
+			document_root := v
+		end
+
+	set_max_tcp_clients (v: like max_tcp_clients)
+		do
+			max_tcp_clients := v
+		end
+
+	set_socket_accept_timeout (v: like socket_accept_timeout)
+		do
+			socket_accept_timeout := v
+		end
+
+	set_socket_connect_timeout (v: like socket_connect_timeout)
+		do
+			socket_connect_timeout := v
+		end
+
+end