]>
Commit | Line | Data |
---|---|---|
7e765f46 DDO |
1 | /* |
2 | * Copyright 2007-2019 The OpenSSL Project Authors. All Rights Reserved. | |
3 | * Copyright Nokia 2007-2019 | |
4 | * Copyright Siemens AG 2015-2019 | |
5 | * | |
6 | * Licensed under the Apache License 2.0 (the "License"). You may not use | |
7 | * this file except in compliance with the License. You can obtain a copy | |
8 | * in the file LICENSE in the source distribution or at | |
9 | * https://www.openssl.org/source/license.html | |
10 | */ | |
11 | ||
12 | #include "cmp_local.h" | |
13 | #include "internal/cryptlib.h" | |
14 | ||
15 | /* explicit #includes not strictly needed since implied by the above: */ | |
16 | #include <openssl/bio.h> | |
17 | #include <openssl/cmp.h> | |
18 | #include <openssl/err.h> | |
19 | #include <openssl/evp.h> | |
20 | #include <openssl/x509v3.h> | |
21 | ||
22 | #include "openssl/cmp_util.h" | |
23 | ||
24 | #define IS_CREP(t) ((t) == OSSL_CMP_PKIBODY_IP || (t) == OSSL_CMP_PKIBODY_CP \ | |
25 | || (t) == OSSL_CMP_PKIBODY_KUP) | |
26 | ||
27 | /*- | |
28 | * Evaluate whether there's an exception (violating the standard) configured for | |
29 | * handling negative responses without protection or with invalid protection. | |
30 | * Returns 1 on acceptance, 0 on rejection, or -1 on (internal) error. | |
31 | */ | |
32 | static int unprotected_exception(const OSSL_CMP_CTX *ctx, | |
33 | const OSSL_CMP_MSG *rep, | |
34 | int invalid_protection, | |
35 | int expected_type /* ignored here */) | |
36 | { | |
37 | int rcvd_type = ossl_cmp_msg_get_bodytype(rep /* may be NULL */); | |
38 | const char *msg_type = NULL; | |
39 | ||
40 | if (!ossl_assert(ctx != NULL && rep != NULL)) | |
41 | return -1; | |
42 | ||
43 | if (!ctx->unprotectedErrors) | |
44 | return 0; | |
45 | ||
46 | switch (rcvd_type) { | |
47 | case OSSL_CMP_PKIBODY_ERROR: | |
48 | msg_type = "error response"; | |
49 | break; | |
50 | case OSSL_CMP_PKIBODY_RP: | |
51 | { | |
52 | OSSL_CMP_PKISI *si = | |
53 | ossl_cmp_revrepcontent_get_pkisi(rep->body->value.rp, | |
54 | OSSL_CMP_REVREQSID); | |
55 | ||
56 | if (si == NULL) | |
57 | return -1; | |
58 | if (ossl_cmp_pkisi_get_status(si) == OSSL_CMP_PKISTATUS_rejection) | |
59 | msg_type = "revocation response message with rejection status"; | |
60 | break; | |
61 | } | |
62 | case OSSL_CMP_PKIBODY_PKICONF: | |
63 | msg_type = "PKI Confirmation message"; | |
64 | break; | |
65 | default: | |
66 | if (IS_CREP(rcvd_type)) { | |
67 | OSSL_CMP_CERTREPMESSAGE *crepmsg = rep->body->value.ip; | |
68 | OSSL_CMP_CERTRESPONSE *crep = | |
69 | ossl_cmp_certrepmessage_get0_certresponse(crepmsg, | |
70 | -1 /* any rid */); | |
71 | ||
72 | if (sk_OSSL_CMP_CERTRESPONSE_num(crepmsg->response) > 1) | |
73 | return -1; | |
74 | /* TODO: handle potentially multiple CertResponses in CertRepMsg */ | |
75 | if (crep == NULL) | |
76 | return -1; | |
77 | if (ossl_cmp_pkisi_get_status(crep->status) | |
78 | == OSSL_CMP_PKISTATUS_rejection) | |
79 | msg_type = "CertRepMessage with rejection status"; | |
80 | } | |
81 | } | |
82 | if (msg_type == NULL) | |
83 | return 0; | |
84 | ossl_cmp_log2(WARN, ctx, "ignoring %s protection of %s", | |
85 | invalid_protection ? "invalid" : "missing", msg_type); | |
86 | return 1; | |
87 | } | |
88 | ||
89 | ||
90 | /* Save error info from PKIStatusInfo field of a certresponse into ctx */ | |
91 | static int save_statusInfo(OSSL_CMP_CTX *ctx, OSSL_CMP_PKISI *si) | |
92 | { | |
93 | int i; | |
94 | OSSL_CMP_PKIFREETEXT *ss; | |
95 | ||
96 | if (!ossl_assert(ctx != NULL && si != NULL)) | |
97 | return 0; | |
98 | ||
99 | if ((ctx->status = ossl_cmp_pkisi_get_status(si)) < 0) | |
100 | return 0; | |
101 | ||
102 | ctx->failInfoCode = 0; | |
103 | if (si->failInfo != NULL) { | |
104 | for (i = 0; i <= OSSL_CMP_PKIFAILUREINFO_MAX; i++) { | |
105 | if (ASN1_BIT_STRING_get_bit(si->failInfo, i)) | |
106 | ctx->failInfoCode |= (1 << i); | |
107 | } | |
108 | } | |
109 | ||
110 | if (!ossl_cmp_ctx_set0_statusString(ctx, sk_ASN1_UTF8STRING_new_null()) | |
111 | || (ctx->statusString == NULL)) | |
112 | return 0; | |
113 | ||
114 | ss = si->statusString; /* may be NULL */ | |
115 | for (i = 0; i < sk_ASN1_UTF8STRING_num(ss); i++) { | |
116 | ASN1_UTF8STRING *str = sk_ASN1_UTF8STRING_value(ss, i); | |
117 | ||
118 | if (!sk_ASN1_UTF8STRING_push(ctx->statusString, ASN1_STRING_dup(str))) | |
119 | return 0; | |
120 | } | |
121 | return 1; | |
122 | } | |
123 | ||
124 | /*- | |
125 | * Perform the generic aspects of sending a request and receiving a response. | |
126 | * Returns 1 on success and provides the received PKIMESSAGE in *rep. | |
127 | * Returns 0 on error. | |
128 | * Regardless of success, caller is responsible for freeing *rep (unless NULL). | |
129 | */ | |
130 | static int send_receive_check(OSSL_CMP_CTX *ctx, const OSSL_CMP_MSG *req, | |
131 | OSSL_CMP_MSG **rep, int expected_type) | |
132 | { | |
133 | const char *req_type_str = | |
134 | ossl_cmp_bodytype_to_string(ossl_cmp_msg_get_bodytype(req)); | |
135 | const char *expected_type_str = ossl_cmp_bodytype_to_string(expected_type); | |
136 | int msg_timeout; | |
137 | int bt; | |
138 | time_t now = time(NULL); | |
139 | int time_left; | |
140 | OSSL_CMP_transfer_cb_t transfer_cb = ctx->transfer_cb; | |
141 | ||
142 | if (transfer_cb == NULL) | |
afe554c2 | 143 | transfer_cb = OSSL_CMP_MSG_http_perform; |
7e765f46 DDO |
144 | |
145 | *rep = NULL; | |
146 | msg_timeout = ctx->msg_timeout; /* backup original value */ | |
147 | if ((IS_CREP(expected_type) || expected_type == OSSL_CMP_PKIBODY_POLLREP) | |
148 | && ctx->total_timeout > 0 /* timeout is not infinite */) { | |
149 | if (now >= ctx->end_time) { | |
150 | CMPerr(0, CMP_R_TOTAL_TIMEOUT); | |
151 | return 0; | |
152 | } | |
153 | if (!ossl_assert(ctx->end_time - time(NULL) < INT_MAX)) { | |
154 | /* cannot really happen due to the assignment in do_certreq_seq() */ | |
155 | CMPerr(0, CMP_R_INVALID_ARGS); | |
156 | return 0; | |
157 | } | |
158 | time_left = (int)(ctx->end_time - now); | |
159 | if (ctx->msg_timeout == 0 || time_left < ctx->msg_timeout) | |
160 | ctx->msg_timeout = time_left; | |
161 | } | |
162 | ||
163 | /* should print error queue since transfer_cb may call ERR_clear_error() */ | |
164 | OSSL_CMP_CTX_print_errors(ctx); | |
165 | ||
166 | ossl_cmp_log1(INFO, ctx, "sending %s", req_type_str); | |
167 | ||
168 | *rep = (*transfer_cb)(ctx, req); | |
169 | ctx->msg_timeout = msg_timeout; /* restore original value */ | |
170 | ||
171 | if (*rep == NULL) { | |
172 | CMPerr(0, CMP_R_TRANSFER_ERROR); /* or receiving response */ | |
173 | ERR_add_error_data(1, req_type_str); | |
174 | ERR_add_error_data(2, ", expected response: ", expected_type_str); | |
175 | return 0; | |
176 | } | |
177 | ||
178 | bt = ossl_cmp_msg_get_bodytype(*rep); | |
179 | /* | |
180 | * The body type in the 'bt' variable is not yet verified. | |
181 | * Still we use this preliminary value already for a progress report because | |
182 | * the following msg verification may also produce log entries and may fail. | |
183 | */ | |
184 | ossl_cmp_log1(INFO, ctx, "received %s", ossl_cmp_bodytype_to_string(bt)); | |
185 | ||
186 | if ((bt = ossl_cmp_msg_check_received(ctx, *rep, unprotected_exception, | |
187 | expected_type)) < 0) | |
188 | return 0; | |
189 | ||
190 | if (bt == expected_type | |
191 | /* as an answer to polling, there could be IP/CP/KUP: */ | |
192 | || (IS_CREP(bt) && expected_type == OSSL_CMP_PKIBODY_POLLREP)) | |
193 | return 1; | |
194 | ||
195 | /* received message type is not one of the expected ones (e.g., error) */ | |
196 | CMPerr(0, bt == OSSL_CMP_PKIBODY_ERROR ? CMP_R_RECEIVED_ERROR : | |
197 | CMP_R_UNEXPECTED_PKIBODY); /* in next line for mkerr.pl */ | |
198 | ||
199 | if (bt != OSSL_CMP_PKIBODY_ERROR) { | |
200 | ERR_add_error_data(3, "message type is '", | |
201 | ossl_cmp_bodytype_to_string(bt), "'"); | |
202 | } else { | |
203 | OSSL_CMP_ERRORMSGCONTENT *emc = (*rep)->body->value.error; | |
204 | OSSL_CMP_PKISI *si = emc->pKIStatusInfo; | |
205 | char buf[OSSL_CMP_PKISI_BUFLEN]; | |
206 | ||
207 | if (save_statusInfo(ctx, si) | |
208 | && OSSL_CMP_CTX_snprint_PKIStatus(ctx, buf, sizeof(buf)) != NULL) | |
209 | ERR_add_error_data(1, buf); | |
210 | if (emc->errorCode != NULL | |
211 | && BIO_snprintf(buf, sizeof(buf), "; errorCode: %ld", | |
212 | ASN1_INTEGER_get(emc->errorCode)) > 0) | |
213 | ERR_add_error_data(1, buf); | |
214 | if (emc->errorDetails != NULL) { | |
215 | char *text = sk_ASN1_UTF8STRING2text(emc->errorDetails, ", ", | |
216 | OSSL_CMP_PKISI_BUFLEN - 1); | |
217 | ||
218 | if (text != NULL) | |
219 | ERR_add_error_data(2, "; errorDetails: ", text); | |
220 | OPENSSL_free(text); | |
221 | } | |
222 | if (ctx->status != OSSL_CMP_PKISTATUS_rejection) { | |
223 | CMPerr(0, CMP_R_UNEXPECTED_PKISTATUS); | |
224 | if (ctx->status == OSSL_CMP_PKISTATUS_waiting) | |
225 | ctx->status = OSSL_CMP_PKISTATUS_rejection; | |
226 | } | |
227 | } | |
228 | return 0; | |
229 | } | |
230 | ||
231 | /*- | |
232 | * When a 'waiting' PKIStatus has been received, this function is used to | |
233 | * poll, which should yield a pollRep or finally a CertRepMessage in ip/cp/kup. | |
234 | * On receiving a pollRep, which includes a checkAfter value, it return this | |
235 | * value if sleep == 0, else it sleeps as long as indicated and retries. | |
236 | * | |
237 | * A transaction timeout is enabled if ctx->total_timeout is > 0. | |
238 | * In this case polling will continue until the timeout is reached and then | |
239 | * polling is done a last time even if this is before the "checkAfter" time. | |
240 | * | |
241 | * Returns -1 on receiving pollRep if sleep == 0, setting the checkAfter value. | |
242 | * Returns 1 on success and provides the received PKIMESSAGE in *rep. | |
243 | * In this case the caller is responsible for freeing *rep. | |
244 | * Returns 0 on error (which includes the case that timeout has been reached). | |
245 | */ | |
246 | static int poll_for_response(OSSL_CMP_CTX *ctx, int sleep, int rid, | |
247 | OSSL_CMP_MSG **rep, int *checkAfter) | |
248 | { | |
249 | OSSL_CMP_MSG *preq = NULL; | |
250 | OSSL_CMP_MSG *prep = NULL; | |
251 | ||
252 | ossl_cmp_info(ctx, | |
253 | "received 'waiting' PKIStatus, starting to poll for response"); | |
254 | *rep = NULL; | |
255 | for (;;) { | |
256 | /* TODO: handle potentially multiple poll requests per message */ | |
257 | if ((preq = ossl_cmp_pollReq_new(ctx, rid)) == NULL) | |
258 | goto err; | |
259 | ||
260 | if (!send_receive_check(ctx, preq, &prep, OSSL_CMP_PKIBODY_POLLREP)) | |
261 | goto err; | |
262 | ||
263 | /* handle potential pollRep */ | |
264 | if (ossl_cmp_msg_get_bodytype(prep) == OSSL_CMP_PKIBODY_POLLREP) { | |
265 | OSSL_CMP_POLLREPCONTENT *prc = prep->body->value.pollRep; | |
266 | OSSL_CMP_POLLREP *pollRep = NULL; | |
267 | int64_t check_after; | |
268 | char str[OSSL_CMP_PKISI_BUFLEN]; | |
269 | int len; | |
270 | ||
271 | /* TODO: handle potentially multiple elements in pollRep */ | |
272 | if (sk_OSSL_CMP_POLLREP_num(prc) > 1) { | |
273 | CMPerr(0, CMP_R_MULTIPLE_RESPONSES_NOT_SUPPORTED); | |
274 | goto err; | |
275 | } | |
276 | pollRep = ossl_cmp_pollrepcontent_get0_pollrep(prc, rid); | |
277 | if (pollRep == NULL) | |
278 | goto err; | |
279 | ||
280 | if (!ASN1_INTEGER_get_int64(&check_after, pollRep->checkAfter)) { | |
281 | CMPerr(0, CMP_R_BAD_CHECKAFTER_IN_POLLREP); | |
282 | goto err; | |
283 | } | |
284 | if (check_after < 0 || (uint64_t)check_after | |
285 | > (sleep ? ULONG_MAX / 1000 : INT_MAX)) { | |
286 | CMPerr(0, CMP_R_CHECKAFTER_OUT_OF_RANGE); | |
b5f7aa5c | 287 | if (BIO_snprintf(str, OSSL_CMP_PKISI_BUFLEN, "value = %jd", |
7e765f46 DDO |
288 | check_after) >= 0) |
289 | ERR_add_error_data(1, str); | |
290 | goto err; | |
291 | } | |
292 | if (ctx->total_timeout > 0) { /* timeout is not infinite */ | |
293 | const int exp = 5; /* expected max time per msg round trip */ | |
294 | int64_t time_left = (int64_t)(ctx->end_time - exp - time(NULL)); | |
295 | ||
296 | if (time_left <= 0) { | |
297 | CMPerr(0, CMP_R_TOTAL_TIMEOUT); | |
298 | goto err; | |
299 | } | |
300 | if (time_left < check_after) | |
301 | check_after = time_left; | |
302 | /* poll one last time just when timeout was reached */ | |
303 | } | |
304 | ||
305 | if (pollRep->reason == NULL | |
306 | || (len = BIO_snprintf(str, OSSL_CMP_PKISI_BUFLEN, | |
307 | " with reason = '")) < 0) { | |
308 | *str = '\0'; | |
309 | } else { | |
310 | char *text = sk_ASN1_UTF8STRING2text(pollRep->reason, ", ", | |
311 | sizeof(str) - len - 2); | |
312 | ||
313 | if (text == NULL | |
314 | || BIO_snprintf(str + len, sizeof(str) - len, | |
315 | "%s'", text) < 0) | |
316 | *str = '\0'; | |
317 | OPENSSL_free(text); | |
318 | } | |
319 | ossl_cmp_log2(INFO, ctx, | |
320 | "received polling response%s; checkAfter = %ld seconds", | |
321 | str, check_after); | |
322 | ||
323 | OSSL_CMP_MSG_free(preq); | |
324 | preq = NULL; | |
325 | OSSL_CMP_MSG_free(prep); | |
326 | prep = NULL; | |
327 | if (sleep) { | |
328 | ossl_sleep((unsigned long)(1000 * check_after)); | |
329 | } else { | |
330 | if (checkAfter != NULL) | |
331 | *checkAfter = (int)check_after; | |
332 | return -1; /* exits the loop */ | |
333 | } | |
334 | } else { | |
335 | ossl_cmp_info(ctx, "received ip/cp/kup after polling"); | |
336 | /* any other body type has been rejected by send_receive_check() */ | |
337 | break; | |
338 | } | |
339 | } | |
340 | if (prep == NULL) | |
341 | goto err; | |
342 | ||
343 | OSSL_CMP_MSG_free(preq); | |
344 | *rep = prep; | |
345 | ||
346 | return 1; | |
347 | err: | |
348 | OSSL_CMP_MSG_free(preq); | |
349 | OSSL_CMP_MSG_free(prep); | |
350 | return 0; | |
351 | } | |
352 | ||
353 | /* Send certConf for IR, CR or KUR sequences and check response */ | |
354 | int ossl_cmp_exchange_certConf(OSSL_CMP_CTX *ctx, int fail_info, | |
355 | const char *txt) | |
356 | { | |
357 | OSSL_CMP_MSG *certConf; | |
358 | OSSL_CMP_MSG *PKIconf = NULL; | |
359 | int res = 0; | |
360 | ||
361 | /* OSSL_CMP_certConf_new() also checks if all necessary options are set */ | |
362 | if ((certConf = ossl_cmp_certConf_new(ctx, fail_info, txt)) == NULL) | |
363 | goto err; | |
364 | ||
365 | res = send_receive_check(ctx, certConf, &PKIconf, OSSL_CMP_PKIBODY_PKICONF); | |
366 | ||
367 | err: | |
368 | OSSL_CMP_MSG_free(certConf); | |
369 | OSSL_CMP_MSG_free(PKIconf); | |
370 | return res; | |
371 | } | |
372 | ||
373 | /* Send given error and check response */ | |
374 | int ossl_cmp_exchange_error(OSSL_CMP_CTX *ctx, int status, int fail_info, | |
375 | const char *txt, int errorCode, const char *details) | |
376 | { | |
377 | OSSL_CMP_MSG *error = NULL; | |
378 | OSSL_CMP_PKISI *si = NULL; | |
379 | OSSL_CMP_MSG *PKIconf = NULL; | |
380 | int res = 0; | |
381 | ||
382 | if ((si = OSSL_CMP_STATUSINFO_new(status, fail_info, txt)) == NULL) | |
383 | goto err; | |
384 | /* ossl_cmp_error_new() also checks if all necessary options are set */ | |
385 | if ((error = ossl_cmp_error_new(ctx, si, errorCode, details, 0)) == NULL) | |
386 | goto err; | |
387 | ||
388 | res = send_receive_check(ctx, error, &PKIconf, OSSL_CMP_PKIBODY_PKICONF); | |
389 | ||
390 | err: | |
391 | OSSL_CMP_MSG_free(error); | |
392 | OSSL_CMP_PKISI_free(si); | |
393 | OSSL_CMP_MSG_free(PKIconf); | |
394 | return res; | |
395 | } | |
396 | ||
397 | /*- | |
398 | * Retrieve a copy of the certificate, if any, from the given CertResponse. | |
399 | * Take into account PKIStatusInfo of CertResponse in ctx, report it on error. | |
400 | * Returns NULL if not found or on error. | |
401 | */ | |
402 | static X509 *get1_cert_status(OSSL_CMP_CTX *ctx, int bodytype, | |
403 | OSSL_CMP_CERTRESPONSE *crep) | |
404 | { | |
405 | char buf[OSSL_CMP_PKISI_BUFLEN]; | |
406 | X509 *crt = NULL; | |
407 | EVP_PKEY *privkey; | |
408 | ||
409 | if (!ossl_assert(ctx != NULL && crep != NULL)) | |
410 | return NULL; | |
411 | ||
412 | privkey = OSSL_CMP_CTX_get0_newPkey(ctx, 1); | |
413 | switch (ossl_cmp_pkisi_get_status(crep->status)) { | |
414 | case OSSL_CMP_PKISTATUS_waiting: | |
415 | ossl_cmp_err(ctx, | |
416 | "received \"waiting\" status for cert when actually aiming to extract cert"); | |
417 | CMPerr(0, CMP_R_ENCOUNTERED_WAITING); | |
418 | goto err; | |
419 | case OSSL_CMP_PKISTATUS_grantedWithMods: | |
420 | ossl_cmp_warn(ctx, "received \"grantedWithMods\" for certificate"); | |
421 | crt = ossl_cmp_certresponse_get1_certificate(privkey, crep); | |
422 | break; | |
423 | case OSSL_CMP_PKISTATUS_accepted: | |
424 | crt = ossl_cmp_certresponse_get1_certificate(privkey, crep); | |
425 | break; | |
426 | /* get all information in case of a rejection before going to error */ | |
427 | case OSSL_CMP_PKISTATUS_rejection: | |
428 | ossl_cmp_err(ctx, "received \"rejection\" status rather than cert"); | |
429 | CMPerr(0, CMP_R_REQUEST_REJECTED_BY_SERVER); | |
430 | goto err; | |
431 | case OSSL_CMP_PKISTATUS_revocationWarning: | |
432 | ossl_cmp_warn(ctx, | |
433 | "received \"revocationWarning\" - a revocation of the cert is imminent"); | |
434 | crt = ossl_cmp_certresponse_get1_certificate(privkey, crep); | |
435 | break; | |
436 | case OSSL_CMP_PKISTATUS_revocationNotification: | |
437 | ossl_cmp_warn(ctx, | |
438 | "received \"revocationNotification\" - a revocation of the cert has occurred"); | |
439 | crt = ossl_cmp_certresponse_get1_certificate(privkey, crep); | |
440 | break; | |
441 | case OSSL_CMP_PKISTATUS_keyUpdateWarning: | |
442 | if (bodytype != OSSL_CMP_PKIBODY_KUR) { | |
443 | CMPerr(0, CMP_R_ENCOUNTERED_KEYUPDATEWARNING); | |
444 | goto err; | |
445 | } | |
446 | crt = ossl_cmp_certresponse_get1_certificate(privkey, crep); | |
447 | break; | |
448 | default: | |
449 | ossl_cmp_log1(ERROR, ctx, | |
450 | "received unsupported PKIStatus %d for certificate", | |
451 | ctx->status); | |
452 | CMPerr(0, CMP_R_UNKNOWN_PKISTATUS); | |
453 | goto err; | |
454 | } | |
455 | if (crt == NULL) /* according to PKIStatus, we can expect a cert */ | |
456 | CMPerr(0, CMP_R_CERTIFICATE_NOT_FOUND); | |
457 | ||
458 | return crt; | |
459 | ||
460 | err: | |
461 | if (OSSL_CMP_CTX_snprint_PKIStatus(ctx, buf, sizeof(buf)) != NULL) | |
462 | ERR_add_error_data(1, buf); | |
463 | return NULL; | |
464 | } | |
465 | ||
466 | /*- | |
467 | * Callback fn validating that the new certificate can be verified, using | |
468 | * ctx->certConf_cb_arg, which has been initialized using opt_out_trusted, and | |
469 | * ctx->untrusted_certs, which at this point already contains ctx->extraCertsIn. | |
470 | * Returns 0 on acceptance, else a bit field reflecting PKIFailureInfo. | |
471 | * Quoting from RFC 4210 section 5.1. Overall PKI Message: | |
472 | * The extraCerts field can contain certificates that may be useful to | |
473 | * the recipient. For example, this can be used by a CA or RA to | |
474 | * present an end entity with certificates that it needs to verify its | |
475 | * own new certificate (if, for example, the CA that issued the end | |
476 | * entity's certificate is not a root CA for the end entity). Note that | |
477 | * this field does not necessarily contain a certification path; the | |
478 | * recipient may have to sort, select from, or otherwise process the | |
479 | * extra certificates in order to use them. | |
480 | * Note: While often handy, there is no hard requirement by CMP that | |
481 | * an EE must be able to validate the certificates it gets enrolled. | |
482 | */ | |
483 | int OSSL_CMP_certConf_cb(OSSL_CMP_CTX *ctx, X509 *cert, int fail_info, | |
484 | const char **text) | |
485 | { | |
486 | X509_STORE *out_trusted = OSSL_CMP_CTX_get_certConf_cb_arg(ctx); | |
487 | (void)text; /* make (artificial) use of var to prevent compiler warning */ | |
488 | ||
489 | if (fail_info != 0) /* accept any error flagged by CMP core library */ | |
490 | return fail_info; | |
491 | ||
492 | if (out_trusted != NULL | |
493 | && !OSSL_CMP_validate_cert_path(ctx, out_trusted, cert)) | |
494 | fail_info = 1 << OSSL_CMP_PKIFAILUREINFO_incorrectData; | |
495 | ||
496 | return fail_info; | |
497 | } | |
498 | ||
499 | /*- | |
500 | * Perform the generic handling of certificate responses for IR/CR/KUR/P10CR. | |
501 | * Returns -1 on receiving pollRep if sleep == 0, setting the checkAfter value. | |
502 | * Returns 1 on success and provides the received PKIMESSAGE in *resp. | |
503 | * Returns 0 on error (which includes the case that timeout has been reached). | |
504 | * Regardless of success, caller is responsible for freeing *resp (unless NULL). | |
505 | */ | |
506 | static int cert_response(OSSL_CMP_CTX *ctx, int sleep, int rid, | |
507 | OSSL_CMP_MSG **resp, int *checkAfter, | |
508 | int req_type, int expected_type) | |
509 | { | |
510 | EVP_PKEY *rkey = OSSL_CMP_CTX_get0_newPkey(ctx /* may be NULL */, 0); | |
511 | int fail_info = 0; /* no failure */ | |
512 | const char *txt = NULL; | |
513 | OSSL_CMP_CERTREPMESSAGE *crepmsg; | |
514 | OSSL_CMP_CERTRESPONSE *crep; | |
515 | X509 *cert; | |
516 | char *subj = NULL; | |
517 | int ret = 1; | |
518 | ||
519 | retry: | |
520 | crepmsg = (*resp)->body->value.ip; /* same for cp and kup */ | |
521 | if (sk_OSSL_CMP_CERTRESPONSE_num(crepmsg->response) > 1) { | |
522 | CMPerr(0, CMP_R_MULTIPLE_RESPONSES_NOT_SUPPORTED); | |
523 | return 0; | |
524 | } | |
525 | /* TODO: handle potentially multiple CertResponses in CertRepMsg */ | |
526 | crep = ossl_cmp_certrepmessage_get0_certresponse(crepmsg, rid); | |
527 | if (crep == NULL) | |
528 | return 0; | |
529 | if (!save_statusInfo(ctx, crep->status)) | |
530 | return 0; | |
531 | if (rid == -1) { | |
532 | /* for OSSL_CMP_PKIBODY_P10CR learn CertReqId from response */ | |
533 | rid = ossl_cmp_asn1_get_int(crep->certReqId); | |
534 | if (rid == -1) { | |
535 | CMPerr(0, CMP_R_BAD_REQUEST_ID); | |
536 | return 0; | |
537 | } | |
538 | } | |
539 | ||
540 | if (ossl_cmp_pkisi_get_status(crep->status) == OSSL_CMP_PKISTATUS_waiting) { | |
541 | OSSL_CMP_MSG_free(*resp); | |
542 | *resp = NULL; | |
543 | if ((ret = poll_for_response(ctx, sleep, rid, resp, checkAfter)) != 0) { | |
544 | if (ret == -1) /* at this point implies sleep == 0 */ | |
545 | return ret; /* waiting */ | |
546 | goto retry; /* got ip/cp/kup, which may still indicate 'waiting' */ | |
547 | } else { | |
548 | CMPerr(0, CMP_R_POLLING_FAILED); | |
549 | return 0; | |
550 | } | |
551 | } | |
552 | ||
553 | cert = get1_cert_status(ctx, (*resp)->body->type, crep); | |
554 | if (cert == NULL) { | |
555 | ERR_add_error_data(1, "; cannot extract certificate from response"); | |
556 | return 0; | |
557 | } | |
558 | if (!ossl_cmp_ctx_set0_newCert(ctx, cert)) | |
559 | return 0; | |
560 | ||
561 | /* | |
562 | * if the CMP server returned certificates in the caPubs field, copy them | |
563 | * to the context so that they can be retrieved if necessary | |
564 | */ | |
565 | if (crepmsg->caPubs != NULL | |
566 | && !ossl_cmp_ctx_set1_caPubs(ctx, crepmsg->caPubs)) | |
567 | return 0; | |
568 | ||
569 | /* copy received extraCerts to ctx->extraCertsIn so they can be retrieved */ | |
570 | if (!ossl_cmp_ctx_set1_extraCertsIn(ctx, (*resp)->extraCerts)) | |
571 | return 0; | |
572 | ||
573 | subj = X509_NAME_oneline(X509_get_subject_name(cert), NULL, 0); | |
574 | if (rkey != NULL | |
575 | /* X509_check_private_key() also works if rkey is just public key */ | |
576 | && !(X509_check_private_key(ctx->newCert, rkey))) { | |
577 | fail_info = 1 << OSSL_CMP_PKIFAILUREINFO_incorrectData; | |
578 | txt = "public key in new certificate does not match our enrollment key"; | |
579 | /*- | |
580 | * not callling (void)ossl_cmp_exchange_error(ctx, | |
581 | * OSSL_CMP_PKISTATUS_rejection, fail_info, txt) | |
582 | * not throwing CMP_R_CERTIFICATE_NOT_ACCEPTED with txt | |
583 | * not returning 0 | |
584 | * since we better leave this for any ctx->certConf_cb to decide | |
585 | */ | |
586 | } | |
587 | ||
588 | /* | |
589 | * Execute the certification checking callback function possibly set in ctx, | |
590 | * which can determine whether to accept a newly enrolled certificate. | |
591 | * It may overrule the pre-decision reflected in 'fail_info' and '*txt'. | |
592 | */ | |
593 | if (ctx->certConf_cb | |
594 | && (fail_info = ctx->certConf_cb(ctx, ctx->newCert, | |
595 | fail_info, &txt)) != 0) { | |
596 | if (txt == NULL) | |
597 | txt = "CMP client application did not accept it"; | |
598 | } | |
599 | if (fail_info != 0) /* immediately log error before any certConf exchange */ | |
600 | ossl_cmp_log1(ERROR, ctx, | |
601 | "rejecting newly enrolled cert with subject: %s", subj); | |
602 | ||
603 | /* | |
604 | * TODO: better move certConf exchange to do_certreq_seq() such that | |
605 | * also more low-level errors with CertReqMessages get reported to server | |
606 | */ | |
607 | if (!ctx->disableConfirm | |
608 | && !ossl_cmp_hdr_has_implicitConfirm((*resp)->header)) { | |
609 | if (!ossl_cmp_exchange_certConf(ctx, fail_info, txt)) | |
610 | ret = 0; | |
611 | } | |
612 | ||
613 | /* not throwing failure earlier as transfer_cb may call ERR_clear_error() */ | |
614 | if (fail_info != 0) { | |
615 | CMPerr(0, CMP_R_CERTIFICATE_NOT_ACCEPTED); | |
616 | ERR_add_error_data(2, "rejecting newly enrolled cert with subject: ", | |
617 | subj); | |
618 | if (txt != NULL) | |
619 | ERR_add_error_txt("; ", txt); | |
620 | ret = 0; | |
621 | } | |
622 | OPENSSL_free(subj); | |
623 | return ret; | |
624 | } | |
625 | ||
626 | int OSSL_CMP_try_certreq(OSSL_CMP_CTX *ctx, int req_type, int *checkAfter) | |
627 | { | |
628 | OSSL_CMP_MSG *req = NULL; | |
629 | OSSL_CMP_MSG *rep = NULL; | |
630 | int is_p10 = req_type == OSSL_CMP_PKIBODY_P10CR; | |
631 | int rid = is_p10 ? -1 : OSSL_CMP_CERTREQID; | |
632 | int rep_type = is_p10 ? OSSL_CMP_PKIBODY_CP : req_type + 1; | |
633 | int res = 0; | |
634 | ||
635 | if (ctx == NULL) { | |
636 | CMPerr(0, CMP_R_NULL_ARGUMENT); | |
637 | return 0; | |
638 | } | |
639 | ||
640 | if (ctx->status != OSSL_CMP_PKISTATUS_waiting) { /* not polling already */ | |
641 | ctx->status = -1; | |
642 | if (!ossl_cmp_ctx_set0_newCert(ctx, NULL)) | |
643 | return 0; | |
644 | ||
645 | if (ctx->total_timeout > 0) /* else ctx->end_time is not used */ | |
646 | ctx->end_time = time(NULL) + ctx->total_timeout; | |
647 | ||
648 | req = ossl_cmp_certReq_new(ctx, req_type, 0 /* req_err */); | |
649 | if (req == NULL) /* also checks if all necessary options are set */ | |
650 | return 0; | |
651 | ||
652 | if (!send_receive_check(ctx, req, &rep, rep_type)) | |
653 | goto err; | |
654 | } else { | |
655 | if (req_type < 0) | |
656 | return ossl_cmp_exchange_error(ctx, OSSL_CMP_PKISTATUS_rejection, | |
657 | 0 /* TODO better fail_info value? */, | |
658 | "polling aborted", 0 /* errorCode */, | |
659 | "by application"); | |
660 | res = poll_for_response(ctx, 0 /* no sleep */, rid, &rep, checkAfter); | |
661 | if (res <= 0) /* waiting or error */ | |
662 | return res; | |
663 | } | |
664 | res = cert_response(ctx, 0 /* no sleep */, rid, &rep, checkAfter, | |
665 | req_type, rep_type); | |
666 | ||
667 | err: | |
668 | OSSL_CMP_MSG_free(req); | |
669 | OSSL_CMP_MSG_free(rep); | |
670 | return res; | |
671 | } | |
672 | ||
673 | /*- | |
674 | * Do the full sequence CR/IR/KUR/P10CR, CP/IP/KUP/CP, | |
675 | * certConf, PKIconf, and polling if required. | |
676 | * Will sleep as long as indicated by the server (according to checkAfter). | |
677 | * All enrollment options need to be present in the context. | |
678 | * TODO: another function to request two certificates at once should be created. | |
679 | * Returns pointer to received certificate, or NULL if none was received. | |
680 | */ | |
681 | static X509 *do_certreq_seq(OSSL_CMP_CTX *ctx, int req_type, int req_err, | |
682 | int rep_type) | |
683 | { | |
684 | OSSL_CMP_MSG *req = NULL; | |
685 | OSSL_CMP_MSG *rep = NULL; | |
686 | int rid = (req_type == OSSL_CMP_PKIBODY_P10CR) ? -1 : OSSL_CMP_CERTREQID; | |
687 | X509 *result = NULL; | |
688 | ||
689 | if (ctx == NULL) { | |
690 | CMPerr(0, CMP_R_NULL_ARGUMENT); | |
691 | return NULL; | |
692 | } | |
693 | ctx->status = -1; | |
694 | if (!ossl_cmp_ctx_set0_newCert(ctx, NULL)) | |
695 | return NULL; | |
696 | ||
697 | if (ctx->total_timeout > 0) /* else ctx->end_time is not used */ | |
698 | ctx->end_time = time(NULL) + ctx->total_timeout; | |
699 | ||
700 | /* OSSL_CMP_certreq_new() also checks if all necessary options are set */ | |
701 | if ((req = ossl_cmp_certReq_new(ctx, req_type, req_err)) == NULL) | |
702 | goto err; | |
703 | ||
704 | if (!send_receive_check(ctx, req, &rep, rep_type)) | |
705 | goto err; | |
706 | ||
707 | if (cert_response(ctx, 1 /* sleep */, rid, &rep, NULL, req_type, rep_type) | |
708 | <= 0) | |
709 | goto err; | |
710 | ||
711 | result = ctx->newCert; | |
712 | err: | |
713 | OSSL_CMP_MSG_free(req); | |
714 | OSSL_CMP_MSG_free(rep); | |
715 | return result; | |
716 | } | |
717 | ||
718 | X509 *OSSL_CMP_exec_IR_ses(OSSL_CMP_CTX *ctx) | |
719 | { | |
720 | return do_certreq_seq(ctx, OSSL_CMP_PKIBODY_IR, | |
721 | CMP_R_ERROR_CREATING_IR, OSSL_CMP_PKIBODY_IP); | |
722 | } | |
723 | ||
724 | X509 *OSSL_CMP_exec_CR_ses(OSSL_CMP_CTX *ctx) | |
725 | { | |
726 | return do_certreq_seq(ctx, OSSL_CMP_PKIBODY_CR, | |
727 | CMP_R_ERROR_CREATING_CR, OSSL_CMP_PKIBODY_CP); | |
728 | } | |
729 | ||
730 | X509 *OSSL_CMP_exec_KUR_ses(OSSL_CMP_CTX *ctx) | |
731 | { | |
732 | return do_certreq_seq(ctx, OSSL_CMP_PKIBODY_KUR, | |
733 | CMP_R_ERROR_CREATING_KUR, OSSL_CMP_PKIBODY_KUP); | |
734 | } | |
735 | ||
736 | X509 *OSSL_CMP_exec_P10CR_ses(OSSL_CMP_CTX *ctx) | |
737 | { | |
738 | return do_certreq_seq(ctx, OSSL_CMP_PKIBODY_P10CR, | |
739 | CMP_R_ERROR_CREATING_P10CR, OSSL_CMP_PKIBODY_CP); | |
740 | } | |
741 | ||
742 | X509 *OSSL_CMP_exec_RR_ses(OSSL_CMP_CTX *ctx) | |
743 | { | |
744 | OSSL_CMP_MSG *rr = NULL; | |
745 | OSSL_CMP_MSG *rp = NULL; | |
746 | const int num_RevDetails = 1; | |
747 | const int rsid = OSSL_CMP_REVREQSID; | |
748 | OSSL_CMP_REVREPCONTENT *rrep = NULL; | |
749 | OSSL_CMP_PKISI *si = NULL; | |
750 | char buf[OSSL_CMP_PKISI_BUFLEN]; | |
751 | X509 *result = NULL; | |
752 | ||
753 | if (ctx == NULL) { | |
754 | CMPerr(0, CMP_R_INVALID_ARGS); | |
755 | return 0; | |
756 | } | |
753283cd DDO |
757 | if (ctx->oldCert == NULL) { |
758 | CMPerr(0, CMP_R_MISSING_REFERENCE_CERT); | |
759 | return 0; | |
760 | } | |
7e765f46 DDO |
761 | ctx->status = -1; |
762 | ||
763 | /* OSSL_CMP_rr_new() also checks if all necessary options are set */ | |
764 | if ((rr = ossl_cmp_rr_new(ctx)) == NULL) | |
765 | goto end; | |
766 | ||
767 | if (!send_receive_check(ctx, rr, &rp, OSSL_CMP_PKIBODY_RP)) | |
768 | goto end; | |
769 | ||
770 | rrep = rp->body->value.rp; | |
e599d0ae | 771 | #ifndef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION |
7e765f46 DDO |
772 | if (sk_OSSL_CMP_PKISI_num(rrep->status) != num_RevDetails) { |
773 | CMPerr(0, CMP_R_WRONG_RP_COMPONENT_COUNT); | |
774 | goto end; | |
775 | } | |
e599d0ae DDO |
776 | #else |
777 | if (sk_OSSL_CMP_PKISI_num(rrep->status) < 1) { | |
778 | CMPerr(0, CMP_R_WRONG_RP_COMPONENT_COUNT); | |
779 | goto end; | |
780 | } | |
781 | #endif | |
7e765f46 DDO |
782 | |
783 | /* evaluate PKIStatus field */ | |
784 | si = ossl_cmp_revrepcontent_get_pkisi(rrep, rsid); | |
785 | if (!save_statusInfo(ctx, si)) | |
786 | goto err; | |
787 | switch (ossl_cmp_pkisi_get_status(si)) { | |
788 | case OSSL_CMP_PKISTATUS_accepted: | |
789 | ossl_cmp_info(ctx, "revocation accepted (PKIStatus=accepted)"); | |
790 | result = ctx->oldCert; | |
791 | break; | |
792 | case OSSL_CMP_PKISTATUS_grantedWithMods: | |
793 | ossl_cmp_info(ctx, "revocation accepted (PKIStatus=grantedWithMods)"); | |
794 | result = ctx->oldCert; | |
795 | break; | |
796 | case OSSL_CMP_PKISTATUS_rejection: | |
797 | CMPerr(0, CMP_R_REQUEST_REJECTED_BY_SERVER); | |
798 | goto err; | |
799 | case OSSL_CMP_PKISTATUS_revocationWarning: | |
800 | ossl_cmp_info(ctx, "revocation accepted (PKIStatus=revocationWarning)"); | |
801 | result = ctx->oldCert; | |
802 | break; | |
803 | case OSSL_CMP_PKISTATUS_revocationNotification: | |
804 | /* interpretation as warning or error depends on CA */ | |
805 | ossl_cmp_warn(ctx, | |
806 | "revocation accepted (PKIStatus=revocationNotification)"); | |
807 | result = ctx->oldCert; | |
808 | break; | |
809 | case OSSL_CMP_PKISTATUS_waiting: | |
810 | case OSSL_CMP_PKISTATUS_keyUpdateWarning: | |
811 | CMPerr(0, CMP_R_UNEXPECTED_PKISTATUS); | |
812 | goto err; | |
813 | default: | |
814 | CMPerr(0, CMP_R_UNKNOWN_PKISTATUS); | |
815 | goto err; | |
816 | } | |
817 | ||
818 | /* check any present CertId in optional revCerts field */ | |
819 | if (rrep->revCerts != NULL) { | |
820 | OSSL_CRMF_CERTID *cid; | |
821 | OSSL_CRMF_CERTTEMPLATE *tmpl = | |
822 | sk_OSSL_CMP_REVDETAILS_value(rr->body->value.rr, rsid)->certDetails; | |
823 | const X509_NAME *issuer = OSSL_CRMF_CERTTEMPLATE_get0_issuer(tmpl); | |
824 | ASN1_INTEGER *serial = OSSL_CRMF_CERTTEMPLATE_get0_serialNumber(tmpl); | |
825 | ||
826 | if (sk_OSSL_CRMF_CERTID_num(rrep->revCerts) != num_RevDetails) { | |
827 | CMPerr(0, CMP_R_WRONG_RP_COMPONENT_COUNT); | |
828 | result = NULL; | |
829 | goto err; | |
830 | } | |
831 | if ((cid = ossl_cmp_revrepcontent_get_CertId(rrep, rsid)) == NULL) { | |
832 | result = NULL; | |
833 | goto err; | |
834 | } | |
835 | if (X509_NAME_cmp(issuer, OSSL_CRMF_CERTID_get0_issuer(cid)) != 0) { | |
e599d0ae | 836 | #ifndef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION |
7e765f46 DDO |
837 | CMPerr(0, CMP_R_WRONG_CERTID_IN_RP); |
838 | result = NULL; | |
839 | goto err; | |
e599d0ae | 840 | #endif |
7e765f46 DDO |
841 | } |
842 | if (ASN1_INTEGER_cmp(serial, | |
843 | OSSL_CRMF_CERTID_get0_serialNumber(cid)) != 0) { | |
e599d0ae | 844 | #ifndef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION |
7e765f46 DDO |
845 | CMPerr(0, CMP_R_WRONG_SERIAL_IN_RP); |
846 | result = NULL; | |
847 | goto err; | |
e599d0ae | 848 | #endif |
7e765f46 DDO |
849 | } |
850 | } | |
851 | ||
852 | /* check number of any optionally present crls */ | |
853 | if (rrep->crls != NULL && sk_X509_CRL_num(rrep->crls) != num_RevDetails) { | |
854 | CMPerr(0, CMP_R_WRONG_RP_COMPONENT_COUNT); | |
855 | result = NULL; | |
856 | goto err; | |
857 | } | |
858 | ||
859 | err: | |
860 | if (result == NULL | |
861 | && OSSL_CMP_CTX_snprint_PKIStatus(ctx, buf, sizeof(buf)) != NULL) | |
862 | ERR_add_error_data(1, buf); | |
863 | ||
864 | end: | |
865 | OSSL_CMP_MSG_free(rr); | |
866 | OSSL_CMP_MSG_free(rp); | |
867 | return result; | |
868 | } | |
869 | ||
870 | STACK_OF(OSSL_CMP_ITAV) *OSSL_CMP_exec_GENM_ses(OSSL_CMP_CTX *ctx) | |
871 | { | |
872 | OSSL_CMP_MSG *genm; | |
873 | OSSL_CMP_MSG *genp = NULL; | |
874 | STACK_OF(OSSL_CMP_ITAV) *rcvd_itavs = NULL; | |
875 | ||
876 | if (ctx == NULL) { | |
877 | CMPerr(0, CMP_R_INVALID_ARGS); | |
878 | return 0; | |
879 | } | |
880 | ||
881 | if ((genm = ossl_cmp_genm_new(ctx)) == NULL) | |
882 | goto err; | |
883 | ||
884 | if (!send_receive_check(ctx, genm, &genp, OSSL_CMP_PKIBODY_GENP)) | |
885 | goto err; | |
886 | ||
887 | /* received stack of itavs not to be freed with the genp */ | |
888 | rcvd_itavs = genp->body->value.genp; | |
889 | genp->body->value.genp = NULL; | |
890 | ||
891 | err: | |
892 | OSSL_CMP_MSG_free(genm); | |
893 | OSSL_CMP_MSG_free(genp); | |
894 | ||
895 | return rcvd_itavs; /* recv_itavs == NULL indicates an error */ | |
896 | } |