Module GapiService

Common operations for services.

exception ServiceError of GapiConversation.Session.t * GapiError.RequestError.t

Wraps a server error

val service_request : ?⁠post_data:GapiCore.PostData.t -> ?⁠version:string -> ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> ?⁠media_download:GapiMediaResource.download -> ?⁠request_type:GapiRequest.request_type -> string -> (GapiPipe.OcamlnetPipe.t -> GapiCore.Header.t list -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t
val service_request_with_data : GapiRequest.request_type -> ('a -> GapiCore.PostData.t) -> ?⁠version:string -> ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> ?⁠media_download:GapiMediaResource.download -> 'a -> string -> (GapiPipe.OcamlnetPipe.t -> GapiCore.Header.t list -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t
val download_resource : ?⁠version:string -> ?⁠query_parameters:(string * string) list -> ?⁠ranges:(int64 option * int64 option) list -> string -> GapiMediaResource.destination -> GapiConversation.Session.t -> unit * GapiConversation.Session.t
val build_param : 'a -> 'a -> ('a -> 'b) -> ('b -> string) -> string -> (string * string) list
val build_params : 'a -> ('a -> 'b list) -> ('b -> string) -> string -> (string * string) list
module StandardParameters : sig ... end
val head : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_download:GapiMediaResource.download -> string -> (GapiCore.Header.t list -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t
val get : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_download:GapiMediaResource.download -> string -> (GapiPipe.OcamlnetPipe.t -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t
val post : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> ?⁠media_download:GapiMediaResource.download -> ?⁠data_to_post:('a -> GapiCore.PostData.t) -> data:'a -> string -> (GapiPipe.OcamlnetPipe.t -> 'b) -> GapiConversation.Session.t -> 'b * GapiConversation.Session.t
val put : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> data_to_post:('a -> GapiCore.PostData.t) -> data:'a -> string -> (GapiPipe.OcamlnetPipe.t -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t
val put' : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> data_to_post:('a -> GapiCore.PostData.t) -> data:'a -> string -> (GapiPipe.OcamlnetPipe.t -> 'b) -> GapiConversation.Session.t -> 'b * GapiConversation.Session.t
val patch : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> data_to_post:('a -> GapiCore.PostData.t) -> data:'a -> string -> (GapiPipe.OcamlnetPipe.t -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t
val patch' : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> ?⁠media_source:GapiMediaResource.t -> data_to_post:('a -> GapiCore.PostData.t) -> data:'a -> string -> (GapiPipe.OcamlnetPipe.t -> 'b) -> GapiConversation.Session.t -> 'b * GapiConversation.Session.t
val delete : ?⁠etag:string -> ?⁠query_parameters:(string * string) list -> string -> (GapiPipe.OcamlnetPipe.t -> 'a) -> GapiConversation.Session.t -> 'a * GapiConversation.Session.t