package krb

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type t =
  1. | Auth
  2. | Safe
  3. | Priv

Levels of Kerberos protection on the connection, in order of increasing strength:

  • Auth: The client is authenticated to the server, but all information is sent in plaintext afterward
  • Safe: The client is authenticated. Afterward all information is sent in plaintext but contains a checksum to check for integrity.
  • Priv: The client is authenticated, and all communication is encrypted.

The client and server each communicate a set of levels they will accept and settle on using the strongest one acceptable to both sides.

include Ppx_compare_lib.Comparable.S with type t := t
include Ppx_enumerate_lib.Enumerable.S with type t := t
val all : t list
include Ppx_hash_lib.Hashable.S with type t := t
val hash_fold_t : Base.Hash.state -> t -> Base.Hash.state
val hash : t -> Base.Hash.hash_value
val sexp_of_t : t -> Sexplib0.Sexp.t
include Core.Comparable.S_plain with type t := t
include Base.Comparable.S with type t := t
include Base.Comparisons.S with type t := t
include Base.Comparisons.Infix with type t := t
val (>=) : t -> t -> bool
val (<=) : t -> t -> bool
val (=) : t -> t -> bool
val (>) : t -> t -> bool
val (<) : t -> t -> bool
val (<>) : t -> t -> bool
val equal : t -> t -> bool
val compare : t -> t -> int

compare t1 t2 returns 0 if t1 is equal to t2, a negative integer if t1 is less than t2, and a positive integer if t1 is greater than t2.

val min : t -> t -> t
val max : t -> t -> t
val ascending : t -> t -> int

ascending is identical to compare. descending x y = ascending y x. These are intended to be mnemonic when used like List.sort ~compare:ascending and List.sort ~cmp:descending, since they cause the list to be sorted in ascending or descending order, respectively.

val descending : t -> t -> int
val between : t -> low:t -> high:t -> bool

between t ~low ~high means low <= t <= high

val clamp_exn : t -> min:t -> max:t -> t

clamp_exn t ~min ~max returns t', the closest value to t such that between t' ~low:min ~high:max is true.

Raises if not (min <= max).

val clamp : t -> min:t -> max:t -> t Base.Or_error.t
include Base.Comparator.S with type t := t
type comparator_witness
val validate_lbound : min:t Core.Maybe_bound.t -> t Validate.check
val validate_ubound : max:t Core.Maybe_bound.t -> t Validate.check
val validate_bound : min:t Core.Maybe_bound.t -> max:t Core.Maybe_bound.t -> t Validate.check
include Core.Stringable.S with type t := t
val of_string : string -> t
val to_string : t -> string
val strongest : Set.t -> t option
val negotiate_strongest : us:Set.t -> peer:Set.t -> t Core.Or_error.t

Find the strongest connection type supported by us and peer, if any

val is_as_strong : t -> as_:t -> bool
val flag : t list Core.Command.Param.t
val optional_flag : t list option Core.Command.Param.t
module Stable : sig ... end