sig
  class type cgi =
    object
      method argument : string -> Netcgi.cgi_argument
      method argument_exists : string -> bool
      method argument_value : ?default:string -> string -> string
      method arguments : Netcgi.cgi_argument list
      method at_exit : (unit -> unit) -> unit
      method data : Netchannels.in_obj_channel
      method data_length : int
      method data_mtime : float
      method environment : Netcgi.cgi_environment
      method finalize : unit -> unit
      method multiple_argument : string -> Netcgi.cgi_argument list
      method out_channel : Netchannels.trans_out_obj_channel
      method output : Netchannels.trans_out_obj_channel
      method request_method :
        [ `DELETE | `GET | `HEAD | `POST | `PUT of Netcgi.cgi_argument ]
      method role : [ `Authorizer | `Filter | `Responder ]
      method set_header :
        ?status:Nethttp.http_status ->
        ?content_type:string ->
        ?content_length:int ->
        ?set_cookie:Nethttp.cookie list ->
        ?set_cookies:Netcgi.Cookie.t list ->
        ?cache:Netcgi.cache_control ->
        ?filename:string ->
        ?language:string ->
        ?script_type:string ->
        ?style_type:string ->
        ?fields:(string * string list) list -> unit -> unit
      method set_redirection_header :
        ?set_cookies:Netcgi.Cookie.t list ->
        ?fields:(string * string list) list -> string -> unit
      method url :
        ?protocol:Nethttp.protocol ->
        ?with_authority:Netcgi.other_url_spec ->
        ?with_script_name:Netcgi.other_url_spec ->
        ?with_path_info:Netcgi.other_url_spec ->
        ?with_query_string:Netcgi.query_string_spec -> unit -> string
    end
  val run :
    ?config:Netcgi.config ->
    ?output_type:Netcgi.output_type ->
    ?arg_store:Netcgi.arg_store ->
    ?exn_handler:Netcgi.exn_handler ->
    ?sockaddr:Unix.sockaddr -> (Netcgi_fcgi.cgi -> unit) -> unit
end