module Netcgi_env: sig .. end
type input_mode = [ `Standard ]
type input_state = [ `Received_body
| `Received_header
| `Receiving_body
| `Receiving_header
| `Start ]
type output_mode = [ `Standard ]
type output_state = [ `End
| `Sending_body
| `Sending_header
| `Sending_part_body
| `Sending_part_header
| `Sent_body
| `Sent_header
| `Sent_part_body
| `Sent_part_header
| `Start ]
type protocol_version = Nethttp.protocol_version
type protocol_attribute = Nethttp.protocol_attribute
type protocol = Nethttp.protocol
type workaround = [ `Work_around_MSIE_Content_type_bug | `Work_around_backslash_bug ]
type cgi_config = Netcgi_env.cgi_config = {
|
tmp_directory : string; |
|
tmp_prefix : string; |
|
permitted_http_methods : string list; |
|
permitted_input_content_types : string list; |
|
input_content_length_limit : int; |
|
workarounds : workaround list; |
}
val default_config : cgi_config
class type cgi_environment = object .. end