package obus

  1. Overview
  2. Docs

Module OBus_auth.Server

type mechanism_return =
  1. | Mech_continue of data
  2. | Mech_ok of int option
  3. | Mech_reject
class virtual mechanism_handler : object ... end
type mechanism = {
  1. mech_name : string;
  2. mech_exec : int option -> mechanism_handler;
}
val mech_name : mechanism -> string
val mech_exec : mechanism -> int option -> mechanism_handler
val mech_anonymous : mechanism
val mech_external : mechanism
val default_mechanisms : mechanism list
val authenticate : ?capabilities:capability list -> ?mechanisms:mechanism list -> ?user_id:int -> guid:OBus_address.guid -> stream:stream -> unit -> (int option * capability list) Lwt.t