Fix typo in CONTRIBUTING.md
[openssl.git] / crypto / x509 / x_all.c
1 /*
2  * Copyright 1995-2023 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the Apache License 2.0 (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9
10 /*
11  * Low level APIs are deprecated for public use, but still ok for
12  * internal use.
13  */
14 #include "internal/deprecated.h"
15
16 #include <stdio.h>
17 #include "internal/cryptlib.h"
18 #include <openssl/buffer.h>
19 #include <openssl/asn1.h>
20 #include <openssl/evp.h>
21 #include <openssl/x509.h>
22 #include <openssl/x509_acert.h>
23 #include <openssl/http.h>
24 #include <openssl/rsa.h>
25 #include <openssl/dsa.h>
26 #include <openssl/x509v3.h>
27 #include "internal/asn1.h"
28 #include "crypto/pkcs7.h"
29 #include "crypto/x509.h"
30 #include "crypto/x509_acert.h"
31 #include "crypto/rsa.h"
32
33 int X509_verify(X509 *a, EVP_PKEY *r)
34 {
35     if (X509_ALGOR_cmp(&a->sig_alg, &a->cert_info.signature) != 0)
36         return 0;
37
38     return ASN1_item_verify_ex(ASN1_ITEM_rptr(X509_CINF), &a->sig_alg,
39                                &a->signature, &a->cert_info,
40                                a->distinguishing_id, r, a->libctx, a->propq);
41 }
42
43 int X509_REQ_verify_ex(X509_REQ *a, EVP_PKEY *r, OSSL_LIB_CTX *libctx,
44                        const char *propq)
45 {
46     return ASN1_item_verify_ex(ASN1_ITEM_rptr(X509_REQ_INFO), &a->sig_alg,
47                                a->signature, &a->req_info, a->distinguishing_id,
48                                r, libctx, propq);
49 }
50
51 int X509_REQ_verify(X509_REQ *a, EVP_PKEY *r)
52 {
53     return X509_REQ_verify_ex(a, r, NULL, NULL);
54 }
55
56 int X509_ACERT_verify(X509_ACERT *a, EVP_PKEY *r)
57 {
58     if (X509_ALGOR_cmp(&a->sig_alg, &a->acinfo->signature) != 0)
59         return 0;
60
61     return ASN1_item_verify_ex(ASN1_ITEM_rptr(X509_ACERT_INFO), &a->sig_alg,
62                                &a->signature, a->acinfo,
63                                NULL, r, NULL, NULL);
64 }
65
66 int NETSCAPE_SPKI_verify(NETSCAPE_SPKI *a, EVP_PKEY *r)
67 {
68     return ASN1_item_verify(ASN1_ITEM_rptr(NETSCAPE_SPKAC),
69                             &a->sig_algor, a->signature, a->spkac, r);
70 }
71
72 int X509_sign(X509 *x, EVP_PKEY *pkey, const EVP_MD *md)
73 {
74     if (x == NULL) {
75         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
76         return 0;
77     }
78     if (sk_X509_EXTENSION_num(X509_get0_extensions(x)) > 0
79             && !X509_set_version(x, X509_VERSION_3))
80         return 0;
81
82     /*
83      * Setting the modified flag before signing it. This makes the cached
84      * encoding to be ignored, so even if the certificate fields have changed,
85      * they are signed correctly.
86      * The X509_sign_ctx, X509_REQ_sign{,_ctx}, X509_CRL_sign{,_ctx} functions
87      * which exist below are the same.
88      */
89     x->cert_info.enc.modified = 1;
90     return ASN1_item_sign_ex(ASN1_ITEM_rptr(X509_CINF), &x->cert_info.signature,
91                              &x->sig_alg, &x->signature, &x->cert_info, NULL,
92                              pkey, md, x->libctx, x->propq);
93 }
94
95 int X509_sign_ctx(X509 *x, EVP_MD_CTX *ctx)
96 {
97     if (x == NULL) {
98         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
99         return 0;
100     }
101     if (sk_X509_EXTENSION_num(X509_get0_extensions(x)) > 0
102             && !X509_set_version(x, X509_VERSION_3))
103         return 0;
104     x->cert_info.enc.modified = 1;
105     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CINF),
106                               &x->cert_info.signature,
107                               &x->sig_alg, &x->signature, &x->cert_info, ctx);
108 }
109
110 static ASN1_VALUE *simple_get_asn1(const char *url, BIO *bio, BIO *rbio,
111                                    int timeout, const ASN1_ITEM *it)
112 {
113 #ifndef OPENSSL_NO_HTTP
114     BIO *mem = OSSL_HTTP_get(url, NULL /* proxy */, NULL /* no_proxy */,
115                              bio, rbio, NULL /* cb */, NULL /* arg */,
116                              1024 /* buf_size */, NULL /* headers */,
117                              NULL /* expected_ct */, 1 /* expect_asn1 */,
118                              OSSL_HTTP_DEFAULT_MAX_RESP_LEN, timeout);
119     ASN1_VALUE *res = ASN1_item_d2i_bio(it, mem, NULL);
120
121     BIO_free(mem);
122     return res;
123 #else
124     return 0;
125 #endif
126 }
127
128 X509 *X509_load_http(const char *url, BIO *bio, BIO *rbio, int timeout)
129 {
130     return (X509 *)simple_get_asn1(url, bio, rbio, timeout,
131                                    ASN1_ITEM_rptr(X509));
132 }
133
134 int X509_REQ_sign(X509_REQ *x, EVP_PKEY *pkey, const EVP_MD *md)
135 {
136     if (x == NULL) {
137         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
138         return 0;
139     }
140     x->req_info.enc.modified = 1;
141     return ASN1_item_sign_ex(ASN1_ITEM_rptr(X509_REQ_INFO), &x->sig_alg, NULL,
142                              x->signature, &x->req_info, NULL,
143                              pkey, md, x->libctx, x->propq);
144 }
145
146 int X509_REQ_sign_ctx(X509_REQ *x, EVP_MD_CTX *ctx)
147 {
148     if (x == NULL) {
149         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
150         return 0;
151     }
152     x->req_info.enc.modified = 1;
153     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_REQ_INFO),
154                               &x->sig_alg, NULL, x->signature, &x->req_info,
155                               ctx);
156 }
157
158 int X509_CRL_sign(X509_CRL *x, EVP_PKEY *pkey, const EVP_MD *md)
159 {
160     if (x == NULL) {
161         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
162         return 0;
163     }
164     x->crl.enc.modified = 1;
165     return ASN1_item_sign_ex(ASN1_ITEM_rptr(X509_CRL_INFO), &x->crl.sig_alg,
166                              &x->sig_alg, &x->signature, &x->crl, NULL,
167                              pkey, md, x->libctx, x->propq);
168 }
169
170 int X509_CRL_sign_ctx(X509_CRL *x, EVP_MD_CTX *ctx)
171 {
172     if (x == NULL) {
173         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
174         return 0;
175     }
176     x->crl.enc.modified = 1;
177     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CRL_INFO),
178                               &x->crl.sig_alg, &x->sig_alg, &x->signature,
179                               &x->crl, ctx);
180 }
181
182 X509_CRL *X509_CRL_load_http(const char *url, BIO *bio, BIO *rbio, int timeout)
183 {
184     return (X509_CRL *)simple_get_asn1(url, bio, rbio, timeout,
185                                        ASN1_ITEM_rptr(X509_CRL));
186 }
187
188 int X509_ACERT_sign(X509_ACERT *x, EVP_PKEY *pkey, const EVP_MD *md)
189 {
190     return ASN1_item_sign_ex(ASN1_ITEM_rptr(X509_ACERT_INFO), &x->sig_alg,
191                              &x->acinfo->signature,
192                              &x->signature, x->acinfo, NULL,
193                              pkey, md, NULL, NULL);
194 }
195
196 int X509_ACERT_sign_ctx(X509_ACERT *x, EVP_MD_CTX *ctx)
197 {
198     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_ACERT_INFO),
199                               &x->sig_alg, &x->acinfo->signature, &x->signature,
200                               &x->acinfo, ctx);
201 }
202
203 int NETSCAPE_SPKI_sign(NETSCAPE_SPKI *x, EVP_PKEY *pkey, const EVP_MD *md)
204 {
205     return
206         ASN1_item_sign_ex(ASN1_ITEM_rptr(NETSCAPE_SPKAC), &x->sig_algor, NULL,
207                           x->signature, x->spkac, NULL, pkey, md, NULL, NULL);
208 }
209
210 #ifndef OPENSSL_NO_STDIO
211 X509 *d2i_X509_fp(FILE *fp, X509 **x509)
212 {
213     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509), fp, x509);
214 }
215
216 int i2d_X509_fp(FILE *fp, const X509 *x509)
217 {
218     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509), fp, x509);
219 }
220 #endif
221
222 X509 *d2i_X509_bio(BIO *bp, X509 **x509)
223 {
224     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509), bp, x509);
225 }
226
227 int i2d_X509_bio(BIO *bp, const X509 *x509)
228 {
229     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509), bp, x509);
230 }
231
232 #ifndef OPENSSL_NO_STDIO
233 X509_CRL *d2i_X509_CRL_fp(FILE *fp, X509_CRL **crl)
234 {
235     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
236 }
237
238 int i2d_X509_CRL_fp(FILE *fp, const X509_CRL *crl)
239 {
240     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
241 }
242 #endif
243
244 X509_CRL *d2i_X509_CRL_bio(BIO *bp, X509_CRL **crl)
245 {
246     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
247 }
248
249 int i2d_X509_CRL_bio(BIO *bp, const X509_CRL *crl)
250 {
251     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
252 }
253
254 #ifndef OPENSSL_NO_STDIO
255 PKCS7 *d2i_PKCS7_fp(FILE *fp, PKCS7 **p7)
256 {
257     PKCS7 *ret;
258     OSSL_LIB_CTX *libctx = NULL;
259     const char *propq = NULL;
260
261     if (p7 != NULL && *p7 != NULL) {
262         libctx = (*p7)->ctx.libctx;
263         propq = (*p7)->ctx.propq;
264     }
265
266     ret = ASN1_item_d2i_fp_ex(ASN1_ITEM_rptr(PKCS7), fp, p7, libctx, propq);
267     if (ret != NULL)
268         ossl_pkcs7_resolve_libctx(ret);
269     return ret;
270 }
271
272 int i2d_PKCS7_fp(FILE *fp, const PKCS7 *p7)
273 {
274     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
275 }
276 #endif
277
278 PKCS7 *d2i_PKCS7_bio(BIO *bp, PKCS7 **p7)
279 {
280     PKCS7 *ret;
281     OSSL_LIB_CTX *libctx = NULL;
282     const char *propq = NULL;
283
284     if (p7 != NULL && *p7 != NULL) {
285         libctx = (*p7)->ctx.libctx;
286         propq = (*p7)->ctx.propq;
287     }
288
289     ret = ASN1_item_d2i_bio_ex(ASN1_ITEM_rptr(PKCS7), bp, p7, libctx, propq);
290     if (ret != NULL)
291         ossl_pkcs7_resolve_libctx(ret);
292     return ret;
293 }
294
295 int i2d_PKCS7_bio(BIO *bp, const PKCS7 *p7)
296 {
297     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
298 }
299
300 #ifndef OPENSSL_NO_STDIO
301 X509_REQ *d2i_X509_REQ_fp(FILE *fp, X509_REQ **req)
302 {
303     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
304 }
305
306 int i2d_X509_REQ_fp(FILE *fp, const X509_REQ *req)
307 {
308     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
309 }
310 #endif
311
312 X509_REQ *d2i_X509_REQ_bio(BIO *bp, X509_REQ **req)
313 {
314     OSSL_LIB_CTX *libctx = NULL;
315     const char *propq = NULL;
316
317     if (req != NULL && *req != NULL) {
318         libctx = (*req)->libctx;
319         propq = (*req)->propq;
320     }
321
322     return
323         ASN1_item_d2i_bio_ex(ASN1_ITEM_rptr(X509_REQ), bp, req, libctx, propq);
324 }
325
326 int i2d_X509_REQ_bio(BIO *bp, const X509_REQ *req)
327 {
328     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
329 }
330
331 #ifndef OPENSSL_NO_STDIO
332 RSA *d2i_RSAPrivateKey_fp(FILE *fp, RSA **rsa)
333 {
334     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
335 }
336
337 int i2d_RSAPrivateKey_fp(FILE *fp, const RSA *rsa)
338 {
339     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
340 }
341
342 RSA *d2i_RSAPublicKey_fp(FILE *fp, RSA **rsa)
343 {
344     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
345 }
346
347 RSA *d2i_RSA_PUBKEY_fp(FILE *fp, RSA **rsa)
348 {
349     return ASN1_d2i_fp((void *(*)(void))
350                        RSA_new, (D2I_OF(void)) d2i_RSA_PUBKEY, fp,
351                        (void **)rsa);
352 }
353
354 int i2d_RSAPublicKey_fp(FILE *fp, const RSA *rsa)
355 {
356     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
357 }
358
359 int i2d_RSA_PUBKEY_fp(FILE *fp, const RSA *rsa)
360 {
361     return ASN1_i2d_fp((I2D_OF(void))i2d_RSA_PUBKEY, fp, rsa);
362 }
363 #endif
364
365 RSA *d2i_RSAPrivateKey_bio(BIO *bp, RSA **rsa)
366 {
367     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
368 }
369
370 int i2d_RSAPrivateKey_bio(BIO *bp, const RSA *rsa)
371 {
372     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
373 }
374
375 RSA *d2i_RSAPublicKey_bio(BIO *bp, RSA **rsa)
376 {
377     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
378 }
379
380 RSA *d2i_RSA_PUBKEY_bio(BIO *bp, RSA **rsa)
381 {
382     return ASN1_d2i_bio_of(RSA, RSA_new, d2i_RSA_PUBKEY, bp, rsa);
383 }
384
385 int i2d_RSAPublicKey_bio(BIO *bp, const RSA *rsa)
386 {
387     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
388 }
389
390 int i2d_RSA_PUBKEY_bio(BIO *bp, const RSA *rsa)
391 {
392     return ASN1_i2d_bio_of(RSA, i2d_RSA_PUBKEY, bp, rsa);
393 }
394
395 #ifndef OPENSSL_NO_DSA
396 # ifndef OPENSSL_NO_STDIO
397 DSA *d2i_DSAPrivateKey_fp(FILE *fp, DSA **dsa)
398 {
399     return ASN1_d2i_fp_of(DSA, DSA_new, d2i_DSAPrivateKey, fp, dsa);
400 }
401
402 int i2d_DSAPrivateKey_fp(FILE *fp, const DSA *dsa)
403 {
404     return ASN1_i2d_fp_of(DSA, i2d_DSAPrivateKey, fp, dsa);
405 }
406
407 DSA *d2i_DSA_PUBKEY_fp(FILE *fp, DSA **dsa)
408 {
409     return ASN1_d2i_fp_of(DSA, DSA_new, d2i_DSA_PUBKEY, fp, dsa);
410 }
411
412 int i2d_DSA_PUBKEY_fp(FILE *fp, const DSA *dsa)
413 {
414     return ASN1_i2d_fp_of(DSA, i2d_DSA_PUBKEY, fp, dsa);
415 }
416 # endif
417
418 DSA *d2i_DSAPrivateKey_bio(BIO *bp, DSA **dsa)
419 {
420     return ASN1_d2i_bio_of(DSA, DSA_new, d2i_DSAPrivateKey, bp, dsa);
421 }
422
423 int i2d_DSAPrivateKey_bio(BIO *bp, const DSA *dsa)
424 {
425     return ASN1_i2d_bio_of(DSA, i2d_DSAPrivateKey, bp, dsa);
426 }
427
428 DSA *d2i_DSA_PUBKEY_bio(BIO *bp, DSA **dsa)
429 {
430     return ASN1_d2i_bio_of(DSA, DSA_new, d2i_DSA_PUBKEY, bp, dsa);
431 }
432
433 int i2d_DSA_PUBKEY_bio(BIO *bp, const DSA *dsa)
434 {
435     return ASN1_i2d_bio_of(DSA, i2d_DSA_PUBKEY, bp, dsa);
436 }
437
438 #endif
439
440 #ifndef OPENSSL_NO_EC
441 # ifndef OPENSSL_NO_STDIO
442 EC_KEY *d2i_EC_PUBKEY_fp(FILE *fp, EC_KEY **eckey)
443 {
444     return ASN1_d2i_fp_of(EC_KEY, EC_KEY_new, d2i_EC_PUBKEY, fp, eckey);
445 }
446
447 int i2d_EC_PUBKEY_fp(FILE *fp, const EC_KEY *eckey)
448 {
449     return ASN1_i2d_fp_of(EC_KEY, i2d_EC_PUBKEY, fp, eckey);
450 }
451
452 EC_KEY *d2i_ECPrivateKey_fp(FILE *fp, EC_KEY **eckey)
453 {
454     return ASN1_d2i_fp_of(EC_KEY, EC_KEY_new, d2i_ECPrivateKey, fp, eckey);
455 }
456
457 int i2d_ECPrivateKey_fp(FILE *fp, const EC_KEY *eckey)
458 {
459     return ASN1_i2d_fp_of(EC_KEY, i2d_ECPrivateKey, fp, eckey);
460 }
461 # endif
462 EC_KEY *d2i_EC_PUBKEY_bio(BIO *bp, EC_KEY **eckey)
463 {
464     return ASN1_d2i_bio_of(EC_KEY, EC_KEY_new, d2i_EC_PUBKEY, bp, eckey);
465 }
466
467 int i2d_EC_PUBKEY_bio(BIO *bp, const EC_KEY *ecdsa)
468 {
469     return ASN1_i2d_bio_of(EC_KEY, i2d_EC_PUBKEY, bp, ecdsa);
470 }
471
472 EC_KEY *d2i_ECPrivateKey_bio(BIO *bp, EC_KEY **eckey)
473 {
474     return ASN1_d2i_bio_of(EC_KEY, EC_KEY_new, d2i_ECPrivateKey, bp, eckey);
475 }
476
477 int i2d_ECPrivateKey_bio(BIO *bp, const EC_KEY *eckey)
478 {
479     return ASN1_i2d_bio_of(EC_KEY, i2d_ECPrivateKey, bp, eckey);
480 }
481 #endif
482
483 int X509_pubkey_digest(const X509 *data, const EVP_MD *type,
484                        unsigned char *md, unsigned int *len)
485 {
486     ASN1_BIT_STRING *key = X509_get0_pubkey_bitstr(data);
487
488     if (key == NULL)
489         return 0;
490     return EVP_Digest(key->data, key->length, md, len, type, NULL);
491 }
492
493 int X509_digest(const X509 *cert, const EVP_MD *md, unsigned char *data,
494                 unsigned int *len)
495 {
496     if (EVP_MD_is_a(md, SN_sha1) && (cert->ex_flags & EXFLAG_SET) != 0
497             && (cert->ex_flags & EXFLAG_NO_FINGERPRINT) == 0) {
498         /* Asking for SHA1 and we already computed it. */
499         if (len != NULL)
500             *len = sizeof(cert->sha1_hash);
501         memcpy(data, cert->sha1_hash, sizeof(cert->sha1_hash));
502         return 1;
503     }
504     return ossl_asn1_item_digest_ex(ASN1_ITEM_rptr(X509), md, (char *)cert,
505                                     data, len, cert->libctx, cert->propq);
506 }
507
508 /* calculate cert digest using the same hash algorithm as in its signature */
509 ASN1_OCTET_STRING *X509_digest_sig(const X509 *cert,
510                                    EVP_MD **md_used, int *md_is_fallback)
511 {
512     unsigned int len;
513     unsigned char hash[EVP_MAX_MD_SIZE];
514     int mdnid, pknid;
515     EVP_MD *md = NULL;
516     const char *md_name;
517     ASN1_OCTET_STRING *new;
518
519     if (md_used != NULL)
520         *md_used = NULL;
521     if (md_is_fallback != NULL)
522         *md_is_fallback = 0;
523
524     if (cert == NULL) {
525         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
526         return NULL;
527     }
528
529     if (!OBJ_find_sigid_algs(X509_get_signature_nid(cert), &mdnid, &pknid)) {
530         ERR_raise(ERR_LIB_X509, X509_R_UNKNOWN_SIGID_ALGS);
531         return NULL;
532     }
533
534     if (mdnid == NID_undef) {
535         if (pknid == EVP_PKEY_RSA_PSS) {
536             RSA_PSS_PARAMS *pss = ossl_rsa_pss_decode(&cert->sig_alg);
537             const EVP_MD *mgf1md, *mmd = NULL;
538             int saltlen, trailerfield;
539
540             if (pss == NULL
541                 || !ossl_rsa_pss_get_param_unverified(pss, &mmd, &mgf1md,
542                                                       &saltlen,
543                                                       &trailerfield)
544                 || mmd == NULL) {
545                 RSA_PSS_PARAMS_free(pss);
546                 ERR_raise(ERR_LIB_X509, X509_R_UNSUPPORTED_ALGORITHM);
547                 return NULL;
548             }
549             RSA_PSS_PARAMS_free(pss);
550             /* Fetch explicitly and do not fallback */
551             if ((md = EVP_MD_fetch(cert->libctx, EVP_MD_get0_name(mmd),
552                                    cert->propq)) == NULL)
553                 /* Error code from fetch is sufficient */
554                 return NULL;
555         } else if (pknid != NID_undef) {
556             /* A known algorithm, but without a digest */
557             switch (pknid) {
558             case NID_ED25519: /* Follow CMS default given in RFC8419 */
559                 md_name = "SHA512";
560                 break;
561             case NID_ED448: /* Follow CMS default given in RFC8419 */
562                 md_name = "SHAKE256";
563                 break;
564             default: /* Fall back to SHA-256 */
565                 md_name = "SHA256";
566                 break;
567             }
568             if ((md = EVP_MD_fetch(cert->libctx, md_name,
569                                    cert->propq)) == NULL)
570                 return NULL;
571             if (md_is_fallback != NULL)
572                 *md_is_fallback = 1;
573         } else {
574             /* A completely unknown algorithm */
575             ERR_raise(ERR_LIB_X509, X509_R_UNSUPPORTED_ALGORITHM);
576             return NULL;
577         }
578     } else if ((md = EVP_MD_fetch(cert->libctx, OBJ_nid2sn(mdnid),
579                                   cert->propq)) == NULL
580                && (md = (EVP_MD *)EVP_get_digestbynid(mdnid)) == NULL) {
581         ERR_raise(ERR_LIB_X509, X509_R_UNSUPPORTED_ALGORITHM);
582         return NULL;
583     }
584     if (!X509_digest(cert, md, hash, &len)
585             || (new = ASN1_OCTET_STRING_new()) == NULL)
586         goto err;
587     if (ASN1_OCTET_STRING_set(new, hash, len)) {
588         if (md_used != NULL)
589             *md_used = md;
590         else
591             EVP_MD_free(md);
592         return new;
593     }
594     ASN1_OCTET_STRING_free(new);
595  err:
596     EVP_MD_free(md);
597     return NULL;
598 }
599
600 int X509_CRL_digest(const X509_CRL *data, const EVP_MD *type,
601                     unsigned char *md, unsigned int *len)
602 {
603     if (type == NULL) {
604         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
605         return 0;
606     }
607     if (EVP_MD_is_a(type, SN_sha1)
608             && (data->flags & EXFLAG_SET) != 0
609             && (data->flags & EXFLAG_NO_FINGERPRINT) == 0) {
610         /* Asking for SHA1; always computed in CRL d2i. */
611         if (len != NULL)
612             *len = sizeof(data->sha1_hash);
613         memcpy(md, data->sha1_hash, sizeof(data->sha1_hash));
614         return 1;
615     }
616     return
617         ossl_asn1_item_digest_ex(ASN1_ITEM_rptr(X509_CRL), type, (char *)data,
618                                  md, len, data->libctx, data->propq);
619 }
620
621 int X509_REQ_digest(const X509_REQ *data, const EVP_MD *type,
622                     unsigned char *md, unsigned int *len)
623 {
624     return
625         ossl_asn1_item_digest_ex(ASN1_ITEM_rptr(X509_REQ), type, (char *)data,
626                                  md, len, data->libctx, data->propq);
627 }
628
629 int X509_NAME_digest(const X509_NAME *data, const EVP_MD *type,
630                      unsigned char *md, unsigned int *len)
631 {
632     return ASN1_item_digest(ASN1_ITEM_rptr(X509_NAME), type, (char *)data,
633                             md, len);
634 }
635
636 int PKCS7_ISSUER_AND_SERIAL_digest(PKCS7_ISSUER_AND_SERIAL *data,
637                                    const EVP_MD *type, unsigned char *md,
638                                    unsigned int *len)
639 {
640     return ASN1_item_digest(ASN1_ITEM_rptr(PKCS7_ISSUER_AND_SERIAL), type,
641                             (char *)data, md, len);
642 }
643
644 #ifndef OPENSSL_NO_STDIO
645 X509_SIG *d2i_PKCS8_fp(FILE *fp, X509_SIG **p8)
646 {
647     return ASN1_d2i_fp_of(X509_SIG, X509_SIG_new, d2i_X509_SIG, fp, p8);
648 }
649
650 int i2d_PKCS8_fp(FILE *fp, const X509_SIG *p8)
651 {
652     return ASN1_i2d_fp_of(X509_SIG, i2d_X509_SIG, fp, p8);
653 }
654 #endif
655
656 X509_SIG *d2i_PKCS8_bio(BIO *bp, X509_SIG **p8)
657 {
658     return ASN1_d2i_bio_of(X509_SIG, X509_SIG_new, d2i_X509_SIG, bp, p8);
659 }
660
661 int i2d_PKCS8_bio(BIO *bp, const X509_SIG *p8)
662 {
663     return ASN1_i2d_bio_of(X509_SIG, i2d_X509_SIG, bp, p8);
664 }
665
666 #ifndef OPENSSL_NO_STDIO
667 X509_PUBKEY *d2i_X509_PUBKEY_fp(FILE *fp, X509_PUBKEY **xpk)
668 {
669     return ASN1_d2i_fp_of(X509_PUBKEY, X509_PUBKEY_new, d2i_X509_PUBKEY,
670                           fp, xpk);
671 }
672
673 int i2d_X509_PUBKEY_fp(FILE *fp, const X509_PUBKEY *xpk)
674 {
675     return ASN1_i2d_fp_of(X509_PUBKEY, i2d_X509_PUBKEY, fp, xpk);
676 }
677 #endif
678
679 X509_PUBKEY *d2i_X509_PUBKEY_bio(BIO *bp, X509_PUBKEY **xpk)
680 {
681     return ASN1_d2i_bio_of(X509_PUBKEY, X509_PUBKEY_new, d2i_X509_PUBKEY,
682                            bp, xpk);
683 }
684
685 int i2d_X509_PUBKEY_bio(BIO *bp, const X509_PUBKEY *xpk)
686 {
687     return ASN1_i2d_bio_of(X509_PUBKEY, i2d_X509_PUBKEY, bp, xpk);
688 }
689
690 #ifndef OPENSSL_NO_STDIO
691 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_fp(FILE *fp,
692                                                 PKCS8_PRIV_KEY_INFO **p8inf)
693 {
694     return ASN1_d2i_fp_of(PKCS8_PRIV_KEY_INFO, PKCS8_PRIV_KEY_INFO_new,
695                           d2i_PKCS8_PRIV_KEY_INFO, fp, p8inf);
696 }
697
698 int i2d_PKCS8_PRIV_KEY_INFO_fp(FILE *fp, const PKCS8_PRIV_KEY_INFO *p8inf)
699 {
700     return ASN1_i2d_fp_of(PKCS8_PRIV_KEY_INFO, i2d_PKCS8_PRIV_KEY_INFO, fp,
701                           p8inf);
702 }
703
704 int i2d_PKCS8PrivateKeyInfo_fp(FILE *fp, const EVP_PKEY *key)
705 {
706     PKCS8_PRIV_KEY_INFO *p8inf;
707     int ret;
708
709     p8inf = EVP_PKEY2PKCS8(key);
710     if (p8inf == NULL)
711         return 0;
712     ret = i2d_PKCS8_PRIV_KEY_INFO_fp(fp, p8inf);
713     PKCS8_PRIV_KEY_INFO_free(p8inf);
714     return ret;
715 }
716
717 int i2d_PrivateKey_fp(FILE *fp, const EVP_PKEY *pkey)
718 {
719     return ASN1_i2d_fp_of(EVP_PKEY, i2d_PrivateKey, fp, pkey);
720 }
721
722 EVP_PKEY *d2i_PrivateKey_fp(FILE *fp, EVP_PKEY **a)
723 {
724     return ASN1_d2i_fp_of(EVP_PKEY, EVP_PKEY_new, d2i_AutoPrivateKey, fp, a);
725 }
726
727 EVP_PKEY *d2i_PrivateKey_ex_fp(FILE *fp, EVP_PKEY **a, OSSL_LIB_CTX *libctx,
728                                const char *propq)
729 {
730     BIO *b;
731     void *ret;
732
733     if ((b = BIO_new(BIO_s_file())) == NULL) {
734         ERR_raise(ERR_LIB_X509, ERR_R_BUF_LIB);
735         return NULL;
736     }
737     BIO_set_fp(b, fp, BIO_NOCLOSE);
738     ret = d2i_PrivateKey_ex_bio(b, a, libctx, propq);
739     BIO_free(b);
740     return ret;
741 }
742
743 int i2d_PUBKEY_fp(FILE *fp, const EVP_PKEY *pkey)
744 {
745     return ASN1_i2d_fp_of(EVP_PKEY, i2d_PUBKEY, fp, pkey);
746 }
747
748 EVP_PKEY *d2i_PUBKEY_ex_fp(FILE *fp, EVP_PKEY **a, OSSL_LIB_CTX *libctx,
749                            const char *propq)
750 {
751     BIO *b;
752     void *ret;
753
754     if ((b = BIO_new(BIO_s_file())) == NULL) {
755         ERR_raise(ERR_LIB_X509, ERR_R_BUF_LIB);
756         return NULL;
757     }
758     BIO_set_fp(b, fp, BIO_NOCLOSE);
759     ret = d2i_PUBKEY_ex_bio(b, a, libctx, propq);
760     BIO_free(b);
761     return ret;
762 }
763
764 EVP_PKEY *d2i_PUBKEY_fp(FILE *fp, EVP_PKEY **a)
765 {
766     return ASN1_d2i_fp_of(EVP_PKEY, EVP_PKEY_new, d2i_PUBKEY, fp, a);
767 }
768
769 #endif
770
771 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_bio(BIO *bp,
772                                                  PKCS8_PRIV_KEY_INFO **p8inf)
773 {
774     return ASN1_d2i_bio_of(PKCS8_PRIV_KEY_INFO, PKCS8_PRIV_KEY_INFO_new,
775                            d2i_PKCS8_PRIV_KEY_INFO, bp, p8inf);
776 }
777
778 int i2d_PKCS8_PRIV_KEY_INFO_bio(BIO *bp, const PKCS8_PRIV_KEY_INFO *p8inf)
779 {
780     return ASN1_i2d_bio_of(PKCS8_PRIV_KEY_INFO, i2d_PKCS8_PRIV_KEY_INFO, bp,
781                            p8inf);
782 }
783
784 int i2d_PKCS8PrivateKeyInfo_bio(BIO *bp, const EVP_PKEY *key)
785 {
786     PKCS8_PRIV_KEY_INFO *p8inf;
787     int ret;
788
789     p8inf = EVP_PKEY2PKCS8(key);
790     if (p8inf == NULL)
791         return 0;
792     ret = i2d_PKCS8_PRIV_KEY_INFO_bio(bp, p8inf);
793     PKCS8_PRIV_KEY_INFO_free(p8inf);
794     return ret;
795 }
796
797 int i2d_PrivateKey_bio(BIO *bp, const EVP_PKEY *pkey)
798 {
799     return ASN1_i2d_bio_of(EVP_PKEY, i2d_PrivateKey, bp, pkey);
800 }
801
802 EVP_PKEY *d2i_PrivateKey_bio(BIO *bp, EVP_PKEY **a)
803 {
804     return ASN1_d2i_bio_of(EVP_PKEY, EVP_PKEY_new, d2i_AutoPrivateKey, bp, a);
805 }
806
807 EVP_PKEY *d2i_PrivateKey_ex_bio(BIO *bp, EVP_PKEY **a, OSSL_LIB_CTX *libctx,
808                                 const char *propq)
809 {
810     BUF_MEM *b = NULL;
811     const unsigned char *p;
812     void *ret = NULL;
813     int len;
814
815     len = asn1_d2i_read_bio(bp, &b);
816     if (len < 0)
817         goto err;
818
819     p = (unsigned char *)b->data;
820     ret = d2i_AutoPrivateKey_ex(a, &p, len, libctx, propq);
821  err:
822     BUF_MEM_free(b);
823     return ret;
824 }
825
826 int i2d_PUBKEY_bio(BIO *bp, const EVP_PKEY *pkey)
827 {
828     return ASN1_i2d_bio_of(EVP_PKEY, i2d_PUBKEY, bp, pkey);
829 }
830
831 EVP_PKEY *d2i_PUBKEY_ex_bio(BIO *bp, EVP_PKEY **a, OSSL_LIB_CTX *libctx,
832                             const char *propq)
833 {
834     BUF_MEM *b = NULL;
835     const unsigned char *p;
836     void *ret = NULL;
837     int len;
838
839     len = asn1_d2i_read_bio(bp, &b);
840     if (len < 0)
841         goto err;
842
843     p = (unsigned char *)b->data;
844     ret = d2i_PUBKEY_ex(a, &p, len, libctx, propq);
845  err:
846     BUF_MEM_free(b);
847     return ret;
848 }
849
850 EVP_PKEY *d2i_PUBKEY_bio(BIO *bp, EVP_PKEY **a)
851 {
852     return ASN1_d2i_bio_of(EVP_PKEY, EVP_PKEY_new, d2i_PUBKEY, bp, a);
853 }
854
855 #ifndef OPENSSL_NO_STDIO
856 X509_ACERT *d2i_X509_ACERT_fp(FILE *fp, X509_ACERT **acert)
857 {
858     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_ACERT), fp, acert);
859 }
860
861 int i2d_X509_ACERT_fp(FILE *fp, const X509_ACERT *acert)
862 {
863     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_ACERT), fp, acert);
864 }
865 #endif
866
867 X509_ACERT *d2i_X509_ACERT_bio(BIO *bp, X509_ACERT **acert)
868 {
869     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_ACERT), bp, acert);
870 }
871
872 int i2d_X509_ACERT_bio(BIO *bp, const X509_ACERT *acert)
873 {
874     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_ACERT), bp, acert);
875 }