X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2FDEVEL%2Focaml-http%2Fhttp_parser.mli;h=cd42c79e52e27cbea9fc49d1259d06e57379e411;hb=b73ff734037c4438874f5a8d8f144178279b7aa1;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..cd42c79e5 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 +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