sig
  val split_query_params : string -> (string * string) list
  val parse_request_fst_line :
    Pervasives.in_channel ->
    Http_types.meth * Neturl.url * Http_types.version option
  val parse_response_fst_line :
    Pervasives.in_channel -> Http_types.version * Http_types.status
  val parse_query_get_params : Neturl.url -> (string * string) list
  val parse_path : Neturl.url -> string
  val parse_headers : Pervasives.in_channel -> (string * string) list
  val parse_request :
    Pervasives.in_channel -> string * (string * string) list
end