ocamlnet

Internet protocols (HTTP, CGI, e-mail etc.) and helper data structures
IN THIS PACKAGE
  • library equeue
  • library netaccel
  • library netcamlbox
  • library netcgi
  • library netcgi2-plex
  • library netclient
  • library nethttpd
  • library netmulticore
  • library netplex
  • library netshm
  • library netstring
  • library netsys
  • library netsys_oothr
  • library netsys_oothr_mt
  • library netunidata
  • library rpc
  • library rpc_auth_local
  • library rpc_generator
  • library shell
Module Nethttp
type protocol_version = int * int
type protocol_attribute = [
| `Secure_https
]
type protocol = [
| `Http of protocol_version * protocol_attribute list
| `Other
]
val string_of_protocol : protocol -> string
val protocol_of_string : string -> protocol
type http_status = [
| `Accepted
| `Bad_gateway
| `Bad_request
| `Conflict
| `Continue
| `Created
| `Expectation_failed
| `Forbidden
| `Found
| `Gateway_timeout
| `Gone
| `Http_version_not_supported
| `Internal_server_error
| `Length_required
| `Method_not_allowed
| `Moved_permanently
| `Multiple_choices
| `No_content
| `Non_authoritative
| `Not_acceptable
| `Not_found
| `Not_implemented
| `Not_modified
| `Ok
| `Partial_content
| `Payment_required
| `Precondition_failed
| `Proxy_auth_required
| `Request_entity_too_large
| `Request_timeout
| `Request_uri_too_long
| `Requested_range_not_satisfiable
| `Reset_content
| `See_other
| `Service_unavailable
| `Switching_protocols
| `Temporary_redirect
| `Unauthorized
| `Unsupported_media_type
| `Use_proxy
]
val int_of_http_status : http_status -> int
val http_status_of_int : int -> http_status
val string_of_http_status : http_status -> string
val base_code : int -> int
type http_method = string * string
type cache_control_token = [
| `Extension of string * string option
| `Max_age of int
| `Max_stale of int option
| `Min_fresh of int
| `Must_revalidate
| `No_cache of string list
| `No_store
| `No_transform
| `Only_if_cached
| `Private of string list
| `Proxy_revalidate
| `Public
| `S_maxage of int
]
type etag = [
| `Strong of string
| `Weak of string
]
val weak_validator_match : etag -> etag -> bool
val strong_validator_match : etag -> etag -> bool
exception Bad_header_field of string
val status_of_cgi_header : http_header -> int * string
val decode_query : string -> string * string
val split_host_port : string -> string * int option
val uripath_encode : string -> string
val uripath_decode : string -> string
module Header : sig ... end
type transport_layer_id = int
val new_trans_id : unit -> transport_layer_id
val http_trans_id : transport_layer_id
val https_trans_id : transport_layer_id
val spnego_trans_id : transport_layer_id
val proxy_only_trans_id : transport_layer_id
type match_result = [
| `Accept of string * string option
| `Accept_reroute of string * string option * transport_layer_id
| `Reject
| `Reroute of string * transport_layer_id
]
module type HTTP_CLIENT_MECHANISM = sig ... end
val rev_split : ( char -> bool ) -> string -> string list
val qstring_of_value : string -> string