Module Awa.Keys

val src : Logs.src
module Log : Logs.LOG
type typ = [
  1. | `Rsa
  2. | `Ed25519
]
val typ_of_string : string -> ([> `Ed25519 | `Rsa ], string) Stdlib.result
val string_of_typ : [< `Ed25519 | `Rsa ] -> string
type authenticator = [
  1. | `No_authentication
  2. | `Key of Hostkey.pub
  3. | `Fingerprint of typ * string
]
val hostkey_matches : [< `Fingerprint of [> `Ed25519 | `Rsa ] * Stdlib.String.t | `Key of Hostkey.pub | `No_authentication ] -> Hostkey.pub -> bool
val authenticator_of_string : string -> ([> `Fingerprint of [> `Ed25519 | `Rsa ] * string | `Key of Hostkey.pub | `No_authentication ], string) Stdlib.result
val of_seed : ?bits:int -> [< `Ed25519 | `Rsa ] -> string -> Hostkey.priv
val of_string : string -> (Hostkey.priv, [> `Msg of string ]) Stdlib.result