sig
  exception MongoAdmin_failed of string
  type t
  val get_db_name : MongoAdmin_lwt.t -> string
  val get_collection_name : MongoAdmin_lwt.t -> string
  val get_ip : MongoAdmin_lwt.t -> string
  val get_port : MongoAdmin_lwt.t -> int
  val get_channel_pool :
    MongoAdmin_lwt.t ->
    (Lwt_io.input_channel * Lwt_io.output_channel) Lwt_pool.t
  val create : ?max_connection:int -> string -> int -> MongoAdmin_lwt.t Lwt.t
  val create_local_default : unit -> MongoAdmin_lwt.t Lwt.t
  val destory : MongoAdmin_lwt.t -> unit Lwt.t
  val listDatabases : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val buildInfo : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val collStats : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val connPoolStats : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val cursorInfo : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val getCmdLineOpts : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val hostInfo : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val listCommands : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
  val serverStatus : MongoAdmin_lwt.t -> MongoReply.t Lwt.t
end