X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2FDEVEL%2Focaml-http%2Fhttp_parser.mli;h=c2c5a71134dfe702289bfa9a08a9964973c50d01;hb=a4df9661e15509e5da6ed9c57e3ab6a27a440c3f;hp=76f1021724c2405df9c3194259788713b2763ff0;hpb=db0eab65e607d5f499a6f5455d7fcd4130d0b727;p=helm.git diff --git a/helm/DEVEL/ocaml-http/http_parser.mli b/helm/DEVEL/ocaml-http/http_parser.mli index 76f102172..c2c5a7113 100644 --- a/helm/DEVEL/ocaml-http/http_parser.mli +++ b/helm/DEVEL/ocaml-http/http_parser.mli @@ -19,9 +19,18 @@ Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *) -val is_http_field_name: string -> bool -val is_http_field_value: string -> bool -val heal_header: string * string -> unit +open Http_types;; +val split_query_params: string -> (string * string) list + +val parse_request_fst_line: in_channel -> meth * Neturl.url * version option +val parse_query_get_params: Neturl.url -> (string * string) list +val parse_path: Neturl.url -> string +val parse_headers: in_channel -> (string * string) list + + (** given an input channel, reads from it a GET HTTP request and + @return a pair where path is a string representing the + requested path and query_params is a list of pairs (the GET + parameters) *) val parse_request: in_channel -> string * (string * string) list