Legend:
Library
Module
Module type
Parameter
Class
Class type
Library
Module
Module type
Parameter
Class
Class type
val pp_status : status Fmt.t
val pp_cert_status : cert_status Fmt.t
val create_single_response :
?next_update:Ptime.t ->
?single_extensions:X509.Extension.t ->
X509.OCSP.cert_id ->
cert_status ->
Ptime.t ->
single_response
val pp_single_response : single_response Fmt.t
val single_response_cert_id : single_response -> X509.OCSP.cert_id
val single_response_status : single_response -> cert_status
val create_responder_id : X509.Public_key.t -> responder_id
val pp_responder_id : responder_id Fmt.t
val create :
[ `InternalError
| `MalformedRequest
| `SigRequired
| `TryLater
| `Unauthorized ] ->
t
val pp : t Fmt.t
val responder_id : t -> (responder_id, [> `Msg of string ]) Stdlib.result
val encode_der : t -> Cstruct.t
val validate :
t ->
?allowed_hashes:Mirage_crypto.Hash.hash list ->
?now:Ptime.t ->
X509.Public_key.t ->
(unit,
[> `Bad_encoding of X509.Distinguished_name.t * string * Cstruct.t
| `Bad_signature of X509.Distinguished_name.t * string
| `Hash_not_allowed of X509.Distinguished_name.t * Mirage_crypto.Hash.hash
| `Msg of string
| `No_signature
| `Time_invalid
| `Unsupported_algorithm of X509.Distinguished_name.t * string
| `Unsupported_keytype of X509.Distinguished_name.t * X509.Public_key.t ])
Stdlib.result
val create_success :
?digest:Mirage_crypto.Hash.hash ->
?certs:Certificate.t list ->
?response_extensions:Extension.t ->
Private_key.t ->
responder_id ->
Ptime.t ->
single_response list ->
t Core.Or_error.t
val responses : t -> single_response list Core.Or_error.t
val decode_der : contents:string -> t Core.Or_error.t