package sonet

  1. Overview
  2. Docs
type error =
  1. | Internal_error of string
  2. | Unexpected_char of char
  3. | Unrecognized_server_protocol of string
exception Auth_error of error
type auth_mechanism =
  1. | External
  2. | Anonymous
type auth_state =
  1. | Auth_in_progress
  2. | Auth_failed
  3. | Auth_succeeded of string * int
type client_context
type protocol_sender = string -> unit
val init_client_context : auth_mechanism -> protocol_sender -> client_context * auth_state
val parse_input : client_context -> protocol_sender -> string -> int -> int -> auth_state