X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fhbugs%2Fcommon%2Fhbugs_misc.mli;h=b0ef59719aba92610b1c9862ac31a54aec19235d;hb=60f8a4de1287ea04ee5722460bdc6ff16a3eb4be;hp=991c9fa261e532950dec3b45fd36c09f02dde6e0;hpb=3c1a6c534877f7b7266809e4d92de02c7f1ee9d4;p=helm.git diff --git a/helm/hbugs/common/hbugs_misc.mli b/helm/hbugs/common/hbugs_misc.mli index 991c9fa26..b0ef59719 100644 --- a/helm/hbugs/common/hbugs_misc.mli +++ b/helm/hbugs/common/hbugs_misc.mli @@ -1,5 +1,7 @@ (* - * Copyright (C) 2003, HELM Team. + * Copyright (C) 2003: + * Stefano Zacchiroli + * for the HELM Team http://helm.cs.unibo.it/ * * This file is part of HELM, an Hypertextual, Electronic * Library of Mathematics, developed at the Computer Science @@ -21,14 +23,28 @@ * MA 02111-1307, USA. * * For details, see the HELM World-Wide-Web page, - * http://cs.unibo.it/helm/. + * 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