devkit

Development kit - general purpose library
IN THIS PACKAGE
Module Devkit_core . Web
val log : Log.logger
val rawurlencode : string -> string

percent-encode (convert space into %20)

val urlencode : string -> string

percent-encode, but convert space into plus, not %20

val rawurldecode : string -> string

percent-decode (leave plus as is)

val urldecode : string -> string

percent-decode and convert plus into space

val htmlencode : string -> string
val htmldecode_exn : string -> string
val htmldecode : string -> string
val make_url_args : (string * string) list -> string
val parse_url_args : string -> (string * string) list

Minimum strictness, Neturl will fail on malformed parameters in url

val url_get_args : string -> (string * string) list
module CurlCache : sig ... end
val curl_default_setup : Curl.t -> unit
type http_action_old = [
| `GET
| `POST_FORM of (string * string) list
| `POST of string * string
| `PUT of string * string
| `DELETE
| `CUSTOM of string * string * string
]
type http_body = [
| `Raw of string * string
| `Form of (string * string) list
| `Chunked of string * ( unit -> string )
]
type http_action = [
| `GET
| `POST
| `PUT
| `PATCH
| `DELETE
| `CUSTOM of string
]
val string_of_http_action : http_action -> string
val http_action_of_string : string -> http_action
module type IO_TYPE = sig ... end
module type CURL = sig ... end
module type HTTP = sig ... end
val show_result : ?verbose:bool -> [< `Error of Curl.curlCode | `Ok of int * string ] -> string
val simple_result : ?is_ok:( int -> bool ) -> ?verbose:bool -> [< `Error of Curl.curlCode | `Ok of int * string Ok ] -> [> `Error of string | `Ok of string ]
val nr_http : int ref
module Http (IO : IO_TYPE) (Curl_IO : CURL with type 'a t = 'a IO.t) : HTTP with type 'a IO.t = 'a IO.t
module IO_blocking : sig ... end
module IO_lwt : sig ... end
module Curl_blocking : sig ... end
module Curl_lwt_for_http : sig ... end
module Http_blocking : sig ... end
module Http_lwt : sig ... end
val with_curl : ( Curl.t -> 'a Http_blocking.IO.t ) -> 'a Http_blocking.IO.t
val with_curl_cache : ( Curl.t -> 'a Http_blocking.IO.t ) -> 'a Http_blocking.IO.t
val http_gets : ?setup:( CurlCache.t -> unit ) -> ?max_size:int -> ?check:( CurlCache.t -> bool ) -> ?result:( CurlCache.t -> Curl.curlCode -> unit Http_blocking.IO.t ) -> string -> [ `Error of Curl.curlCode | `Ok of int * string ] Http_blocking.IO.t
val http_request' : [> `Error of Curl.curlCode | `Ok of int * string ] Http_blocking.http_request
val http_request : [> `Error of string | `Ok of string ] Http_blocking.http_request
val http_request_exn : string Http_blocking.http_request
val http_query : ( string * string, [> `Error of string | `Ok of string ] ) Http_blocking.http_request_
val http_submit : ?ua:string -> ?timeout:int -> ?verbose:bool -> ?setup:( CurlCache.t -> unit ) -> ?http_1_0:bool -> ?headers:string list -> ?action:http_action -> string -> (string * string) list -> [> `Error of string | `Ok of string ] Http_blocking.IO.t
val http_request_lwt' : [> `Error of Curl.curlCode | `Ok of int * string ] Http_lwt.http_request
val http_request_lwt : [> `Error of string | `Ok of string ] Http_lwt.http_request
val http_request_lwt_exn : string Http_lwt.http_request
val http_query_lwt : ( string * string, [> `Error of string | `Ok of string ] ) Http_lwt.http_request_
val http_submit_lwt : ?ua:string -> ?timeout:int -> ?verbose:bool -> ?setup:( CurlCache.t -> unit ) -> ?http_1_0:bool -> ?headers:string list -> ?action:http_action -> string -> (string * string) list -> [> `Error of string | `Ok of string ] Http_lwt.IO.t
val http_get_io_exn : ?setup:( Curl.t -> unit ) -> ?max_size:int -> ?check:( Curl.t -> bool ) -> string -> 'a IO.output -> unit Http_blocking.IO.t
val http_get_io : string -> ?verbose:bool -> ?setup:( Curl.t -> unit ) -> ?max_size:int -> 'a IO.output -> unit Http_blocking.IO.t
val http_get : ?verbose:bool -> ?setup:( Curl.t -> unit ) -> ?max_size:int -> string -> string
val http_get_io_lwt : ?body:(string * string) -> ?timeout:int -> ?setup:( Curl.t -> unit ) -> ?check:( Curl.t -> bool ) -> string -> 'a IO.output -> [> `Error of string | `Ok of float ] Lwt.t
val http_do : ?ua:string -> ?timeout:int -> ?verbose:bool -> ?setup:( CurlCache.t -> unit ) -> ?http_1_0:bool -> http_action_old -> string -> [> `Error of string | `Ok of string ]
val string_of_http_code : int -> string
val class_of_http_code : int -> string