package awa

  1. Overview
  2. Docs
type user = {
  1. name : string;
  2. password : string option;
  3. keys : Hostkey.pub list;
}
type db = user list
type state =
  1. | Preauth
  2. | Inprogress of string * string * int
  3. | Done
val make_user : string -> ?password:string -> Hostkey.pub list -> user
val lookup_user : string -> user list -> user option
val lookup_key : user -> Hostkey.pub -> Hostkey.pub option
val lookup_user_key : string -> Hostkey.pub -> user list -> Hostkey.pub option
val by_password : string -> String.t -> user list -> bool
val to_hash : string -> Hostkey.alg -> Hostkey.pub -> string -> string -> string
val sign : string -> Hostkey.alg -> Hostkey.priv -> string -> string -> string
val by_pubkey : string -> Hostkey.alg -> Hostkey.pub -> string -> string -> string -> user list -> bool
OCaml

Innovation. Community. Security.