X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fhbugs%2Fcommon%2Fhbugs_misc.mli;h=b0ef59719aba92610b1c9862ac31a54aec19235d;hb=1fb8d0192e1f7ee891c53dc282c9c9f111e63e3c;hp=015c7b82b78165c602d6625dd174de1e02ff8377;hpb=5d7d6bd5090f3f82279bef0b93b4b361a5b1d751;p=helm.git diff --git a/helm/hbugs/common/hbugs_misc.mli b/helm/hbugs/common/hbugs_misc.mli index 015c7b82b..b0ef59719 100644 --- a/helm/hbugs/common/hbugs_misc.mli +++ b/helm/hbugs/common/hbugs_misc.mli @@ -26,11 +26,25 @@ * http://helm.cs.unibo.it/ *) - (* HTTP GET request for a given url, return http response's body *) + (** helpers *) + + (** remove all bindings of a given key from an hash table *) +val hashtbl_remove_all: ('a, 'b) Hashtbl.t -> 'a -> unit + + (** follows cut and paste from zack's Http_client_smart module *) + + (** can't parse an HTTP url *) +exception Malformed_URL of string + (** can't parse an HTTP response *) +exception Malformed_HTTP_response of string + + (** HTTP GET request for a given url, return http response's body *) val http_get: string -> string - (* HTTP POST request for a given url, return http response's body, body - argument, if specified, is sent as body along with request *) + (** HTTP POST request for a given url, return http response's body, + body argument, if specified, is sent as body along with request *) val http_post: ?body:string -> string -> string -val hashtbl_remove_all: ('a, 'b) Hashtbl.t -> 'a -> unit + (** perform an HTTP GET request and apply a given function on each + 'slice' of HTTP response read from server *) +val http_get_iter_buf: callback:(string -> unit) -> string -> unit