sig
  val register_basic_authentication_method :
    (Simplexmlparser.xml -> string -> string -> bool Lwt.t) -> unit
  val get_basic_authentication_method :
    Simplexmlparser.xml -> string -> string -> bool Lwt.t
end