`sig
class type simple_message = Netmime.mime_body
type store = [ `File of string | `Memory ]
type representation =
[ `MIME of Netmime.mime_message
| `Simple of Netcgi1_compat.Netcgi_types.simple_message ]
class type cgi_argument =
object
method charset : string
method content_type : string
method content_type_params : (string * Mimestring.s_param) list
method filename : string option
method finalize : unit -> unit
method name : string
method open_value_rd : unit -> Netchannels.in_obj_channel
method open_value_wr : unit -> Netchannels.out_obj_channel
method representation : Netcgi1_compat.Netcgi_types.representation
method ro : bool
method set_value : string -> unit
method store : Netcgi1_compat.Netcgi_types.store
method value : string
end
val to_compat_argument :
Netcgi.cgi_argument -> Netcgi1_compat.Netcgi_types.cgi_argument
val of_compat_argument :
Netcgi1_compat.Netcgi_types.cgi_argument -> Netcgi.cgi_argument
type cgi_cookie =
Nethttp.netscape_cookie = {
cookie_name : string;
cookie_value : string;
cookie_expires : float option;
cookie_domain : string option;
cookie_path : string option;
cookie_secure : bool;
}
type status = Nethttp.http_status
type request_method =
[ `DELETE
| `GET
| `HEAD
| `POST
| `PUT of Netcgi1_compat.Netcgi_types.cgi_argument ]
type cache_control = [ `Max_age of int | `No_cache | `Unspecified ]
type query_string_spec =
[ `Args of Netcgi1_compat.Netcgi_types.cgi_argument list
| `Current
| `Initial
| `None ]
type other_url_spec = [ `Env | `None | `This of string ]
class type cgi_activation =
object
method argument : string -> Netcgi1_compat.Netcgi_types.cgi_argument
method argument_value : ?default:string -> string -> string
method arguments :
(string * Netcgi1_compat.Netcgi_types.cgi_argument) list
method delete_argument : ?fin:bool -> string -> unit
method environment : Netcgi1_compat.Netcgi_env.cgi_environment
method finalize : unit -> unit
method initial_argument :
string -> Netcgi1_compat.Netcgi_types.cgi_argument
method initial_argument_value : ?default:string -> string -> string
method initial_arguments :
(string * Netcgi1_compat.Netcgi_types.cgi_argument) list
method initial_multiple_argument :
string -> Netcgi1_compat.Netcgi_types.cgi_argument list
method multiple_argument :
string -> Netcgi1_compat.Netcgi_types.cgi_argument list
method output : Netchannels.trans_out_obj_channel
method request_method : Netcgi1_compat.Netcgi_types.request_method
method set_arguments :
?fin:bool -> Netcgi1_compat.Netcgi_types.cgi_argument list -> unit
method set_header :
?status:Netcgi1_compat.Netcgi_types.status ->
?content_type:string ->
?cache:Netcgi1_compat.Netcgi_types.cache_control ->
?filename:string ->
?language:string ->
?script_type:string ->
?style_type:string ->
?set_cookie:Netcgi1_compat.Netcgi_types.cgi_cookie list ->
?fields:(string * string list) list -> unit -> unit
method set_redirection_header : string -> unit
method update_argument :
?fin:bool -> Netcgi1_compat.Netcgi_types.cgi_argument -> unit
method update_multiple_argument :
?fin:bool -> Netcgi1_compat.Netcgi_types.cgi_argument list -> unit
method url :
?protocol:Netcgi1_compat.Netcgi_env.protocol ->
?with_authority:Netcgi1_compat.Netcgi_types.other_url_spec ->
?with_script_name:Netcgi1_compat.Netcgi_types.other_url_spec ->
?with_path_info:Netcgi1_compat.Netcgi_types.other_url_spec ->
?with_query_string:Netcgi1_compat.Netcgi_types.query_string_spec ->
unit -> string
end
val to_compat_activation :
Netcgi.cgi -> Netcgi1_compat.Netcgi_types.cgi_activation
val of_compat_activation :
Netcgi1_compat.Netcgi_types.cgi_activation -> Netcgi.cgi
end`