sig
type config_log_error = Nethttpd_types.request_info -> string -> unit
type config_log_access = Nethttpd_types.full_info -> unit
type config_error_response = Nethttpd_types.error_response_params -> string
val std_log_error :
Netplex_types.container -> Nethttpd_plex.config_log_error
val std_log_access :
?debug:bool -> Netplex_types.container -> Nethttpd_plex.config_log_access
val std_error_response : Nethttpd_plex.config_error_response
val restrict_file_service_config :
Netplex_types.config_file -> Netplex_types.address -> unit
val read_file_service_config :
Netplex_types.config_file ->
Netplex_types.address -> string -> Nethttpd_services.file_service
val restrict_dynamic_service_config :
Netplex_types.config_file -> Netplex_types.address -> unit
val read_dynamic_service_config :
(string *
(Netplex_types.config_file ->
Netplex_types.address ->
string ->
(#Netcgi.cgi_activation as 'a) Nethttpd_services.dynamic_service))
list ->
Netplex_types.config_file ->
Netplex_types.address -> string -> 'a Nethttpd_services.dynamic_service
val nethttpd_processor :
?hooks:Netplex_types.processor_hooks ->
(Netplex_types.container -> #Nethttpd_reactor.http_reactor_config) ->
'a Nethttpd_types.http_service -> Netplex_types.processor
type ('a, 'b) service_factory =
(string * 'a Nethttpd_services.dynamic_service) list ->
Netplex_types.config_file ->
Netplex_types.address -> string -> 'b Nethttpd_types.http_service
constraint 'a = #Netcgi.cgi_activation
constraint 'b =
[ `Dynamic_service of 'a Nethttpd_services.dynamic_service
| `File_service of Nethttpd_services.file_service ]
val default_services :
(string *
(#Netcgi.cgi_activation as 'a,
[ `Dynamic_service of 'a Nethttpd_services.dynamic_service
| `File_service of Nethttpd_services.file_service ])
Nethttpd_plex.service_factory)
list
type httpd_factory = {
httpd_factory :
'a.
(Netplex_types.container -> Nethttpd_reactor.http_reactor_config) ->
'a Nethttpd_types.http_service -> Netplex_types.processor;
}
val nethttpd_factory :
?name:string ->
?hooks:Netplex_types.processor_hooks ->
?config_cgi:Netcgi.config ->
?handlers:(string *
(#Netcgi.cgi_activation as 'a)
Nethttpd_services.dynamic_service)
list ->
?services:(string *
('a,
[ `Dynamic_service of 'a Nethttpd_services.dynamic_service
| `File_service of Nethttpd_services.file_service ])
Nethttpd_plex.service_factory)
list ->
?log_error:(Netplex_types.container -> Nethttpd_plex.config_log_error) ->
?log_access:(?debug:bool ->
Netplex_types.container -> Nethttpd_plex.config_log_access) ->
?error_response:Nethttpd_plex.config_error_response ->
?processor_factory:Nethttpd_plex.httpd_factory ->
unit -> Netplex_types.processor_factory
end
