sig
  val section : Lwt_log_core.section
  val scan_multipart_body_from_stream :
    ?max_size:Stdlib.Int64.t ->
    boundary:string ->
    create:((string * string) list -> 'a) ->
    add:('-> string -> unit Lwt.t) ->
    stop:(int64 -> '-> 'Lwt.t) ->
    string Ocsigen_stream.stream -> unit Lwt.t
  type content_type = (string * string) * (string * string) list
  type file_info = {
    tmp_filename : string;
    filesize : int64;
    raw_original_filename : string;
    file_content_type : Ocsigen_multipart.content_type option;
  }
  type post_data =
      (string * string) list * (string * Ocsigen_multipart.file_info) list
  val post_params :
    content_type:Ocsigen_multipart.content_type ->
    Cohttp_lwt.Body.t ->
    (string option ->
     Stdlib.Int64.t option -> Ocsigen_multipart.post_data Lwt.t)
    option
  val parse_content_type : string -> Ocsigen_multipart.content_type option
end