package ocamlnet

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
module StrMap : sig ... end
module StrSet : sig ... end
type ptype = [
  1. | `HTTP
  2. | `SASL
]
type profile = {
  1. ptype : ptype;
  2. hash_functions : Netsys_digests.iana_hash_fn list;
  3. mutual : bool;
}
type response_params = {
  1. r_ptype : ptype;
  2. r_hash : Netsys_digests.iana_hash_fn;
  3. r_no_sess : bool;
  4. r_rfc2069 : bool;
  5. r_user : string;
  6. r_authz : string option;
  7. r_realm : string;
  8. r_nonce : string;
  9. r_cnonce : string;
  10. r_nc : int;
  11. r_method : string;
  12. r_digest_uri : string;
  13. r_utf8 : bool;
  14. r_opaque : string option;
  15. r_domain : string list;
  16. r_userhash : bool;
}
type credentials = (string * string * (string * string) list) list
type server_session = {
  1. sstate : Netsys_sasl_types.server_state;
  2. sresponse : (response_params * string * string) option;
  3. snextnc : int;
  4. sstale : bool;
  5. snonce : string;
  6. srealm : string option;
  7. sprofile : profile;
  8. sutf8 : bool;
  9. snosess : bool;
  10. lookup : string -> string -> credentials option;
}
val create_nonce : unit -> string
val hash : Netsys_digests.iana_hash_fn -> string -> Digest.t
val hash_available : Netsys_digests.iana_hash_fn -> bool
val qstring : string -> string
val hex : string -> string
val verify_utf8 : string -> unit
val to_utf8 : bool -> string -> string
val to_client : bool -> string -> string
val create_hashed_creds : Netsys_digests.iana_hash_fn -> string -> string -> string -> (string * string * (string * string) list) list
val compute_response : response_params -> Netsys_sasl.credentials -> string -> string
val to_strmap : (StrSet.elt * 'a) list -> 'a StrMap.t
val space_re : Netstring_str.regexp
val space_split : string -> string list
val get_nc : string -> int
val server_emit_initial_challenge_kv : ?quote:bool -> server_session -> server_session * (string * string) list
val server_emit_final_challenge_kv : ?quote:bool -> server_session -> server_session * (string * string) list
val iana_sess_alist : (string * Netsys_digests.iana_hash_fn) list
val decode_response : ptype -> (StrSet.elt * string) list -> string -> response_params * string
val validate_response : server_session -> response_params -> string -> credentials
exception Restart of string
val server_process_response_kv : server_session -> (StrSet.elt * string) list -> string -> server_session
val server_process_response_restart_kv : server_session -> (StrSet.elt * string) list -> bool -> string -> server_session * bool
val server_stash_session_i : server_session -> string
val server_resume_session_i : lookup:(string -> string -> credentials option) -> string -> server_session
val server_prop_i : server_session -> string -> string
type client_session = {
  1. cstate : Netsys_sasl_types.client_state;
  2. cresp : response_params option;
  3. cdigest_uri : string;
  4. cmethod : string;
  5. cprofile : profile;
  6. crealm : string option;
  7. cuser : string;
  8. cauthz : string;
  9. cpasswd : string;
  10. cnonce : string;
}
val client_restart_i : client_session -> client_session
val client_process_final_challenge_kv : client_session -> (StrSet.elt * string) list -> client_session
val client_process_initial_challenge_kv : client_session -> (StrSet.elt * string) list -> client_session
val client_modify : ?mod_method:string -> ?mod_uri:string -> client_session -> client_session
val client_emit_response_kv : ?quote:bool -> client_session -> client_session * (string * Digest.t) list
val client_stash_session_i : 'a -> string
val client_resume_session_i : string -> client_session
val client_prop_i : client_session -> string -> string
OCaml

Innovation. Community. Security.