1 /* $OpenBSD: tls_ocsp.c,v 1.23 2023/05/14 07:26:25 op Exp $ */
3 * Copyright (c) 2015 Marko Kreen <markokr@gmail.com>
4 * Copyright (c) 2016 Bob Beck <beck@openbsd.org>
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
21 #include <sys/types.h>
23 #include <arpa/inet.h>
24 #include <netinet/in.h>
28 #include <openssl/err.h>
29 #include <openssl/ocsp.h>
30 #include <openssl/x509.h>
33 #include "tls_internal.h"
35 #define MAXAGE_SEC (14*24*60*60)
36 #define JITTER_SEC (60)
42 static struct tls_ocsp *
45 return (calloc(1, sizeof(struct tls_ocsp)));
49 tls_ocsp_free(struct tls_ocsp *ocsp)
54 X509_free(ocsp->main_cert);
55 free(ocsp->ocsp_result);
62 tls_ocsp_asn1_parse_time(struct tls *ctx, ASN1_GENERALIZEDTIME *gt, time_t *gt_time)
68 /* RFC 6960 specifies that all times in OCSP must be GENERALIZEDTIME */
69 if (ASN1_time_parse(gt->data, gt->length, &tm,
70 V_ASN1_GENERALIZEDTIME) == -1)
72 if ((*gt_time = timegm(&tm)) == -1)
78 tls_ocsp_fill_info(struct tls *ctx, int response_status, int cert_status,
79 int crl_reason, ASN1_GENERALIZEDTIME *revtime,
80 ASN1_GENERALIZEDTIME *thisupd, ASN1_GENERALIZEDTIME *nextupd)
82 struct tls_ocsp_result *info = NULL;
84 free(ctx->ocsp->ocsp_result);
85 ctx->ocsp->ocsp_result = NULL;
87 if ((info = calloc(1, sizeof (struct tls_ocsp_result))) == NULL) {
88 tls_set_error(ctx, "calloc");
91 info->response_status = response_status;
92 info->cert_status = cert_status;
93 info->crl_reason = crl_reason;
94 if (info->response_status != OCSP_RESPONSE_STATUS_SUCCESSFUL) {
96 OCSP_response_status_str(info->response_status);
97 } else if (info->cert_status != V_OCSP_CERTSTATUS_REVOKED) {
98 info->result_msg = OCSP_cert_status_str(info->cert_status);
100 info->result_msg = OCSP_crl_reason_str(info->crl_reason);
102 info->revocation_time = info->this_update = info->next_update = -1;
103 if (revtime != NULL &&
104 tls_ocsp_asn1_parse_time(ctx, revtime, &info->revocation_time) != 0) {
106 "unable to parse revocation time in OCSP reply");
109 if (thisupd != NULL &&
110 tls_ocsp_asn1_parse_time(ctx, thisupd, &info->this_update) != 0) {
112 "unable to parse this update time in OCSP reply");
115 if (nextupd != NULL &&
116 tls_ocsp_asn1_parse_time(ctx, nextupd, &info->next_update) != 0) {
118 "unable to parse next update time in OCSP reply");
121 ctx->ocsp->ocsp_result = info;
130 tls_ocsp_get_certid(X509 *main_cert, STACK_OF(X509) *extra_certs,
133 X509_NAME *issuer_name;
135 X509_STORE_CTX *storectx = NULL;
136 X509_OBJECT *obj = NULL;
137 OCSP_CERTID *cid = NULL;
140 if ((issuer_name = X509_get_issuer_name(main_cert)) == NULL)
143 if (extra_certs != NULL) {
144 issuer = X509_find_by_subject(extra_certs, issuer_name);
145 if (issuer != NULL) {
146 cid = OCSP_cert_to_id(NULL, main_cert, issuer);
151 if ((store = SSL_CTX_get_cert_store(ssl_ctx)) == NULL)
153 if ((storectx = X509_STORE_CTX_new()) == NULL)
155 if (X509_STORE_CTX_init(storectx, store, main_cert, extra_certs) != 1)
157 if ((obj = X509_STORE_CTX_get_obj_by_subject(storectx, X509_LU_X509,
158 issuer_name)) == NULL)
161 cid = OCSP_cert_to_id(NULL, main_cert, X509_OBJECT_get0_X509(obj));
164 X509_STORE_CTX_free(storectx);
165 X509_OBJECT_free(obj);
171 tls_ocsp_setup_from_peer(struct tls *ctx)
173 struct tls_ocsp *ocsp = NULL;
174 STACK_OF(OPENSSL_STRING) *ocsp_urls = NULL;
176 if ((ocsp = tls_ocsp_new()) == NULL)
179 /* steal state from ctx struct */
180 ocsp->main_cert = SSL_get_peer_certificate(ctx->ssl_conn);
181 ocsp->extra_certs = SSL_get_peer_cert_chain(ctx->ssl_conn);
182 if (ocsp->main_cert == NULL) {
183 tls_set_errorx(ctx, "no peer certificate for OCSP");
187 ocsp_urls = X509_get1_ocsp(ocsp->main_cert);
188 if (ocsp_urls == NULL) {
189 tls_set_errorx(ctx, "no OCSP URLs in peer certificate");
193 ocsp->ocsp_url = strdup(sk_OPENSSL_STRING_value(ocsp_urls, 0));
194 if (ocsp->ocsp_url == NULL) {
195 tls_set_errorx(ctx, "out of memory");
199 X509_email_free(ocsp_urls);
204 X509_email_free(ocsp_urls);
209 tls_ocsp_verify_response(struct tls *ctx, OCSP_RESPONSE *resp)
211 OCSP_BASICRESP *br = NULL;
212 ASN1_GENERALIZEDTIME *revtime = NULL, *thisupd = NULL, *nextupd = NULL;
213 OCSP_CERTID *cid = NULL;
214 STACK_OF(X509) *combined = NULL;
215 int response_status=0, cert_status=0, crl_reason=0;
219 if ((br = OCSP_response_get1_basic(resp)) == NULL) {
220 tls_set_errorx(ctx, "cannot load ocsp reply");
225 * Skip validation of 'extra_certs' as this should be done
226 * already as part of main handshake.
228 flags = OCSP_TRUSTOTHER;
231 if (OCSP_basic_verify(br, ctx->ocsp->extra_certs,
232 SSL_CTX_get_cert_store(ctx->ssl_ctx), flags) != 1) {
233 tls_set_errorx(ctx, "ocsp verify failed");
237 /* signature OK, look inside */
238 response_status = OCSP_response_status(resp);
239 if (response_status != OCSP_RESPONSE_STATUS_SUCCESSFUL) {
240 tls_set_errorx(ctx, "ocsp verify failed: response - %s",
241 OCSP_response_status_str(response_status));
245 cid = tls_ocsp_get_certid(ctx->ocsp->main_cert,
246 ctx->ocsp->extra_certs, ctx->ssl_ctx);
248 tls_set_errorx(ctx, "ocsp verify failed: no issuer cert");
252 if (OCSP_resp_find_status(br, cid, &cert_status, &crl_reason,
253 &revtime, &thisupd, &nextupd) != 1) {
254 tls_set_errorx(ctx, "ocsp verify failed: no result for cert");
258 if (OCSP_check_validity(thisupd, nextupd, JITTER_SEC,
261 "ocsp verify failed: ocsp response not current");
265 if (tls_ocsp_fill_info(ctx, response_status, cert_status,
266 crl_reason, revtime, thisupd, nextupd) != 0)
269 /* finally can look at status */
270 if (cert_status != V_OCSP_CERTSTATUS_GOOD && cert_status !=
271 V_OCSP_CERTSTATUS_UNKNOWN) {
272 tls_set_errorx(ctx, "ocsp verify failed: revoked cert - %s",
273 OCSP_crl_reason_str(crl_reason));
279 sk_X509_free(combined);
280 OCSP_CERTID_free(cid);
281 OCSP_BASICRESP_free(br);
286 * Process a raw OCSP response from an OCSP server request.
287 * OCSP details can then be retrieved with tls_peer_ocsp_* functions.
288 * returns 0 if certificate ok, -1 otherwise.
291 tls_ocsp_process_response_internal(struct tls *ctx, const unsigned char *response,
297 resp = d2i_OCSP_RESPONSE(NULL, &response, size);
299 tls_ocsp_free(ctx->ocsp);
301 tls_set_error(ctx, "unable to parse OCSP response");
304 ret = tls_ocsp_verify_response(ctx, resp);
305 OCSP_RESPONSE_free(resp);
309 /* TLS handshake verification callback for stapled requests */
311 tls_ocsp_verify_cb(SSL *ssl, void *arg)
313 const unsigned char *raw = NULL;
317 if ((ctx = SSL_get_app_data(ssl)) == NULL)
320 size = SSL_get_tlsext_status_ocsp_resp(ssl, &raw);
322 if (ctx->config->ocsp_require_stapling) {
323 tls_set_errorx(ctx, "no stapled OCSP response provided");
329 tls_ocsp_free(ctx->ocsp);
330 if ((ctx->ocsp = tls_ocsp_setup_from_peer(ctx)) == NULL)
333 if (ctx->config->verify_cert == 0 || ctx->config->verify_time == 0)
336 res = tls_ocsp_process_response_internal(ctx, raw, size);
338 return (res == 0) ? 1 : 0;
342 /* Staple the OCSP information in ctx->ocsp to the server handshake. */
344 tls_ocsp_stapling_cb(SSL *ssl, void *arg)
346 int ret = SSL_TLSEXT_ERR_ALERT_FATAL;
347 unsigned char *ocsp_staple = NULL;
350 if ((ctx = SSL_get_app_data(ssl)) == NULL)
353 if (ctx->keypair == NULL || ctx->keypair->ocsp_staple == NULL ||
354 ctx->keypair->ocsp_staple_len == 0)
355 return SSL_TLSEXT_ERR_NOACK;
357 if ((ocsp_staple = malloc(ctx->keypair->ocsp_staple_len)) == NULL)
360 memcpy(ocsp_staple, ctx->keypair->ocsp_staple,
361 ctx->keypair->ocsp_staple_len);
363 if (SSL_set_tlsext_status_ocsp_resp(ctx->ssl_conn, ocsp_staple,
364 ctx->keypair->ocsp_staple_len) != 1)
367 ret = SSL_TLSEXT_ERR_OK;
369 if (ret != SSL_TLSEXT_ERR_OK)
379 /* Retrieve OCSP URL from peer certificate, if present. */
381 tls_peer_ocsp_url(struct tls *ctx)
383 if (ctx->ocsp == NULL)
385 return ctx->ocsp->ocsp_url;
389 tls_peer_ocsp_result(struct tls *ctx)
391 if (ctx->ocsp == NULL)
393 if (ctx->ocsp->ocsp_result == NULL)
395 return ctx->ocsp->ocsp_result->result_msg;
399 tls_peer_ocsp_response_status(struct tls *ctx)
401 if (ctx->ocsp == NULL)
403 if (ctx->ocsp->ocsp_result == NULL)
405 return ctx->ocsp->ocsp_result->response_status;
409 tls_peer_ocsp_cert_status(struct tls *ctx)
411 if (ctx->ocsp == NULL)
413 if (ctx->ocsp->ocsp_result == NULL)
415 return ctx->ocsp->ocsp_result->cert_status;
419 tls_peer_ocsp_crl_reason(struct tls *ctx)
421 if (ctx->ocsp == NULL)
423 if (ctx->ocsp->ocsp_result == NULL)
425 return ctx->ocsp->ocsp_result->crl_reason;
429 tls_peer_ocsp_this_update(struct tls *ctx)
431 if (ctx->ocsp == NULL)
433 if (ctx->ocsp->ocsp_result == NULL)
435 return ctx->ocsp->ocsp_result->this_update;
439 tls_peer_ocsp_next_update(struct tls *ctx)
441 if (ctx->ocsp == NULL)
443 if (ctx->ocsp->ocsp_result == NULL)
445 return ctx->ocsp->ocsp_result->next_update;
449 tls_peer_ocsp_revocation_time(struct tls *ctx)
451 if (ctx->ocsp == NULL)
453 if (ctx->ocsp->ocsp_result == NULL)
455 return ctx->ocsp->ocsp_result->revocation_time;
459 tls_ocsp_process_response(struct tls *ctx, const unsigned char *response,
462 if ((ctx->state & TLS_HANDSHAKE_COMPLETE) == 0)
464 return tls_ocsp_process_response_internal(ctx, response, size);