Param (tls-async.Tls_async.X509_async.Authenticator.Param)

type t

val ca_file : 
  ?allowed_hashes:Digestif.hash' list ->
  ?crls:Core.Filename.t ->
  Core.Filename.t ->
  unit ->
  t

val ca_dir : 
  ?allowed_hashes:Digestif.hash' list ->
  ?crls:Core.Filename.t ->
  Core.Filename.t ->
  unit ->
  t

val cert_fingerprint : Digestif.hash' -> string -> t

The fingerprint can be collected from a browser or by invoking an openssl command like 'openssl x509 -in <pem_file> -noout -fingerprint -sha256'

val key_fingerprint : Digestif.hash' -> string -> t

The fingerprint can be collected from a browser or by invoking an openssl command like 'openssl x509 -in <pem_file> -noout -pubkey | openssl pkey -pubin -outform DER | openssl dgst -sha256'

val time : unit -> Ptime.t option

Async programs often don't use Ptime_clock, so this is provided as a convenience function. Relies on Unix.gettimeofday.

val to_authenticator : 
  time:(unit -> Ptime.t option) ->
  t ->
  {Authenticator}7.t Async.Deferred.Or_error.t