Up

module X509_lwt

: sig
#
type priv = X509.Cert.t list * X509.PK.t
#
type authenticator = X509.Authenticator.t
#
val private_of_pems : cert:Lwt_io.file_name -> priv_key:Lwt_io.file_name -> priv Lwt.t
#
val certs_of_pem : Lwt_io.file_name -> X509.Cert.t list Lwt.t
#
val certs_of_pem_dir : Lwt_io.file_name -> X509.Cert.t list Lwt.t
#
val authenticator : [
| `Ca_file of Lwt_io.file_name
| `Ca_dir of Lwt_io.file_name
| `Fingerprints of Nocrypto.Hash.hash * (string * Cstruct.t) list
| `Hex_fingerprints of Nocrypto.Hash.hash * (string * string) list
| `No_authentication_I'M_STUPID
] -> authenticator Lwt.t
end