crypto/x509/x_all.c

   1 /*
   2  * Copyright 1995-2021 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/http.h>
  23 #include <openssl/rsa.h>
  24 #include <openssl/dsa.h>
  25 #include <openssl/x509v3.h>
  26 #include "internal/asn1.h"
  27 #include "crypto/pkcs7.h"
  28 #include "crypto/x509.h"
  29
  30 int X509_verify(X509 *a, EVP_PKEY *r)
  31 {
  32     if (X509_ALGOR_cmp(&a->sig_alg, &a->cert_info.signature))
  33         return 0;
  34
  35     return ASN1_item_verify_ex(ASN1_ITEM_rptr(X509_CINF), &a->sig_alg,
  36                                &a->signature, &a->cert_info,
  37                                a->distinguishing_id, r, a->libctx, a->propq);
  38 }
  39
  40 int X509_REQ_verify_ex(X509_REQ *a, EVP_PKEY *r, OSSL_LIB_CTX *libctx,
  41                        const char *propq)
  42 {
  43     return ASN1_item_verify_ex(ASN1_ITEM_rptr(X509_REQ_INFO), &a->sig_alg,
  44                                a->signature, &a->req_info, a->distinguishing_id,
  45                                r, libctx, propq);
  46 }
  47
  48 int X509_REQ_verify(X509_REQ *a, EVP_PKEY *r)
  49 {
  50     return X509_REQ_verify_ex(a, r, NULL, NULL);
  51 }
  52
  53 int NETSCAPE_SPKI_verify(NETSCAPE_SPKI *a, EVP_PKEY *r)
  54 {
  55     return ASN1_item_verify(ASN1_ITEM_rptr(NETSCAPE_SPKAC),
  56                             &a->sig_algor, a->signature, a->spkac, r);
  57 }
  58
  59 int X509_sign(X509 *x, EVP_PKEY *pkey, const EVP_MD *md)
  60 {
  61     x->cert_info.enc.modified = 1;
  62     return ASN1_item_sign(ASN1_ITEM_rptr(X509_CINF), &x->cert_info.signature,
  63                           &x->sig_alg, &x->signature, &x->cert_info, pkey, md);
  64 }
  65
  66 int X509_sign_ctx(X509 *x, EVP_MD_CTX *ctx)
  67 {
  68     x->cert_info.enc.modified = 1;
  69     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CINF),
  70                               &x->cert_info.signature,
  71                               &x->sig_alg, &x->signature, &x->cert_info, ctx);
  72 }
  73
  74 static ASN1_VALUE *simple_get_asn1(const char *url, BIO *bio, BIO *rbio,
  75                                    int timeout, const ASN1_ITEM *it)
  76 {
  77     return OSSL_HTTP_get_asn1(url, NULL, NULL /* no proxy used */, bio,
  78                               rbio, NULL /* no callback for SSL/TLS */, NULL,
  79                               NULL /* headers */, 1024 /* maxline */,
  80                               0 /* max_resp_len */, timeout,
  81                               NULL /* expected_content_type */, it);
  82 }
  83
  84 X509 *X509_load_http(const char *url, BIO *bio, BIO *rbio, int timeout)
  85 {
  86     return (X509 *)simple_get_asn1(url, bio, rbio, timeout,
  87                                    ASN1_ITEM_rptr(X509));
  88 }
  89
  90 int X509_REQ_sign(X509_REQ *x, EVP_PKEY *pkey, const EVP_MD *md)
  91 {
  92     return ASN1_item_sign(ASN1_ITEM_rptr(X509_REQ_INFO), &x->sig_alg, NULL,
  93                           x->signature, &x->req_info, pkey, md);
  94 }
  95
  96 int X509_REQ_sign_ctx(X509_REQ *x, EVP_MD_CTX *ctx)
  97 {
  98     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_REQ_INFO),
  99                               &x->sig_alg, NULL, x->signature, &x->req_info,
 100                               ctx);
 101 }
 102
 103 int X509_CRL_sign(X509_CRL *x, EVP_PKEY *pkey, const EVP_MD *md)
 104 {
 105     x->crl.enc.modified = 1;
 106     return ASN1_item_sign(ASN1_ITEM_rptr(X509_CRL_INFO), &x->crl.sig_alg,
 107                           &x->sig_alg, &x->signature, &x->crl, pkey, md);
 108 }
 109
 110 int X509_CRL_sign_ctx(X509_CRL *x, EVP_MD_CTX *ctx)
 111 {
 112     x->crl.enc.modified = 1;
 113     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CRL_INFO),
 114                               &x->crl.sig_alg, &x->sig_alg, &x->signature,
 115                               &x->crl, ctx);
 116 }
 117
 118 X509_CRL *X509_CRL_load_http(const char *url, BIO *bio, BIO *rbio, int timeout)
 119 {
 120     return (X509_CRL *)simple_get_asn1(url, bio, rbio, timeout,
 121                                        ASN1_ITEM_rptr(X509_CRL));
 122 }
 123
 124 int NETSCAPE_SPKI_sign(NETSCAPE_SPKI *x, EVP_PKEY *pkey, const EVP_MD *md)
 125 {
 126     return ASN1_item_sign(ASN1_ITEM_rptr(NETSCAPE_SPKAC), &x->sig_algor, NULL,
 127                           x->signature, x->spkac, pkey, md);
 128 }
 129
 130 #ifndef OPENSSL_NO_STDIO
 131 X509 *d2i_X509_fp(FILE *fp, X509 **x509)
 132 {
 133     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509), fp, x509);
 134 }
 135
 136 int i2d_X509_fp(FILE *fp, const X509 *x509)
 137 {
 138     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509), fp, x509);
 139 }
 140 #endif
 141
 142 X509 *d2i_X509_bio(BIO *bp, X509 **x509)
 143 {
 144     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509), bp, x509);
 145 }
 146
 147 int i2d_X509_bio(BIO *bp, const X509 *x509)
 148 {
 149     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509), bp, x509);
 150 }
 151
 152 #ifndef OPENSSL_NO_STDIO
 153 X509_CRL *d2i_X509_CRL_fp(FILE *fp, X509_CRL **crl)
 154 {
 155     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
 156 }
 157
 158 int i2d_X509_CRL_fp(FILE *fp, const X509_CRL *crl)
 159 {
 160     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
 161 }
 162 #endif
 163
 164 X509_CRL *d2i_X509_CRL_bio(BIO *bp, X509_CRL **crl)
 165 {
 166     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
 167 }
 168
 169 int i2d_X509_CRL_bio(BIO *bp, const X509_CRL *crl)
 170 {
 171     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
 172 }
 173
 174 #ifndef OPENSSL_NO_STDIO
 175 PKCS7 *d2i_PKCS7_fp(FILE *fp, PKCS7 **p7)
 176 {
 177     PKCS7 *ret;
 178
 179     ret = ASN1_item_d2i_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
 180     if (ret != NULL)
 181         ossl_pkcs7_resolve_libctx(ret);
 182     return ret;
 183 }
 184
 185 int i2d_PKCS7_fp(FILE *fp, const PKCS7 *p7)
 186 {
 187     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
 188 }
 189 #endif
 190
 191 PKCS7 *d2i_PKCS7_bio(BIO *bp, PKCS7 **p7)
 192 {
 193     PKCS7 *ret;
 194
 195     ret = ASN1_item_d2i_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
 196     if (ret != NULL)
 197         ossl_pkcs7_resolve_libctx(ret);
 198     return ret;
 199 }
 200
 201 int i2d_PKCS7_bio(BIO *bp, const PKCS7 *p7)
 202 {
 203     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
 204 }
 205
 206 #ifndef OPENSSL_NO_STDIO
 207 X509_REQ *d2i_X509_REQ_fp(FILE *fp, X509_REQ **req)
 208 {
 209     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
 210 }
 211
 212 int i2d_X509_REQ_fp(FILE *fp, const X509_REQ *req)
 213 {
 214     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
 215 }
 216 #endif
 217
 218 X509_REQ *d2i_X509_REQ_bio(BIO *bp, X509_REQ **req)
 219 {
 220     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
 221 }
 222
 223 int i2d_X509_REQ_bio(BIO *bp, const X509_REQ *req)
 224 {
 225     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
 226 }
 227
 228 #ifndef OPENSSL_NO_STDIO
 229 RSA *d2i_RSAPrivateKey_fp(FILE *fp, RSA **rsa)
 230 {
 231     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
 232 }
 233
 234 int i2d_RSAPrivateKey_fp(FILE *fp, const RSA *rsa)
 235 {
 236     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
 237 }
 238
 239 RSA *d2i_RSAPublicKey_fp(FILE *fp, RSA **rsa)
 240 {
 241     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
 242 }
 243
 244 RSA *d2i_RSA_PUBKEY_fp(FILE *fp, RSA **rsa)
 245 {
 246     return ASN1_d2i_fp((void *(*)(void))
 247                        RSA_new, (D2I_OF(void)) d2i_RSA_PUBKEY, fp,
 248                        (void **)rsa);
 249 }
 250
 251 int i2d_RSAPublicKey_fp(FILE *fp, const RSA *rsa)
 252 {
 253     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
 254 }
 255
 256 int i2d_RSA_PUBKEY_fp(FILE *fp, const RSA *rsa)
 257 {
 258     return ASN1_i2d_fp((I2D_OF(void))i2d_RSA_PUBKEY, fp, rsa);
 259 }
 260 #endif
 261
 262 RSA *d2i_RSAPrivateKey_bio(BIO *bp, RSA **rsa)
 263 {
 264     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
 265 }
 266
 267 int i2d_RSAPrivateKey_bio(BIO *bp, const RSA *rsa)
 268 {
 269     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
 270 }
 271
 272 RSA *d2i_RSAPublicKey_bio(BIO *bp, RSA **rsa)
 273 {
 274     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
 275 }
 276
 277 RSA *d2i_RSA_PUBKEY_bio(BIO *bp, RSA **rsa)
 278 {
 279     return ASN1_d2i_bio_of(RSA, RSA_new, d2i_RSA_PUBKEY, bp, rsa);
 280 }
 281
 282 int i2d_RSAPublicKey_bio(BIO *bp, const RSA *rsa)
 283 {
 284     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
 285 }
 286
 287 int i2d_RSA_PUBKEY_bio(BIO *bp, const RSA *rsa)
 288 {
 289     return ASN1_i2d_bio_of(RSA, i2d_RSA_PUBKEY, bp, rsa);
 290 }
 291
 292 #ifndef OPENSSL_NO_DSA
 293 # ifndef OPENSSL_NO_STDIO
 294 DSA *d2i_DSAPrivateKey_fp(FILE *fp, DSA **dsa)
 295 {
 296     return ASN1_d2i_fp_of(DSA, DSA_new, d2i_DSAPrivateKey, fp, dsa);
 297 }
 298
 299 int i2d_DSAPrivateKey_fp(FILE *fp, const DSA *dsa)
 300 {
 301     return ASN1_i2d_fp_of(DSA, i2d_DSAPrivateKey, fp, dsa);
 302 }
 303
 304 DSA *d2i_DSA_PUBKEY_fp(FILE *fp, DSA **dsa)
 305 {
 306     return ASN1_d2i_fp_of(DSA, DSA_new, d2i_DSA_PUBKEY, fp, dsa);
 307 }
 308
 309 int i2d_DSA_PUBKEY_fp(FILE *fp, const DSA *dsa)
 310 {
 311     return ASN1_i2d_fp_of(DSA, i2d_DSA_PUBKEY, fp, dsa);
 312 }
 313 # endif
 314
 315 DSA *d2i_DSAPrivateKey_bio(BIO *bp, DSA **dsa)
 316 {
 317     return ASN1_d2i_bio_of(DSA, DSA_new, d2i_DSAPrivateKey, bp, dsa);
 318 }
 319
 320 int i2d_DSAPrivateKey_bio(BIO *bp, const DSA *dsa)
 321 {
 322     return ASN1_i2d_bio_of(DSA, i2d_DSAPrivateKey, bp, dsa);
 323 }
 324
 325 DSA *d2i_DSA_PUBKEY_bio(BIO *bp, DSA **dsa)
 326 {
 327     return ASN1_d2i_bio_of(DSA, DSA_new, d2i_DSA_PUBKEY, bp, dsa);
 328 }
 329
 330 int i2d_DSA_PUBKEY_bio(BIO *bp, const DSA *dsa)
 331 {
 332     return ASN1_i2d_bio_of(DSA, i2d_DSA_PUBKEY, bp, dsa);
 333 }
 334
 335 #endif
 336
 337 #ifndef OPENSSL_NO_EC
 338 # ifndef OPENSSL_NO_STDIO
 339 EC_KEY *d2i_EC_PUBKEY_fp(FILE *fp, EC_KEY **eckey)
 340 {
 341     return ASN1_d2i_fp_of(EC_KEY, EC_KEY_new, d2i_EC_PUBKEY, fp, eckey);
 342 }
 343
 344 int i2d_EC_PUBKEY_fp(FILE *fp, const EC_KEY *eckey)
 345 {
 346     return ASN1_i2d_fp_of(EC_KEY, i2d_EC_PUBKEY, fp, eckey);
 347 }
 348
 349 EC_KEY *d2i_ECPrivateKey_fp(FILE *fp, EC_KEY **eckey)
 350 {
 351     return ASN1_d2i_fp_of(EC_KEY, EC_KEY_new, d2i_ECPrivateKey, fp, eckey);
 352 }
 353
 354 int i2d_ECPrivateKey_fp(FILE *fp, const EC_KEY *eckey)
 355 {
 356     return ASN1_i2d_fp_of(EC_KEY, i2d_ECPrivateKey, fp, eckey);
 357 }
 358 # endif
 359 EC_KEY *d2i_EC_PUBKEY_bio(BIO *bp, EC_KEY **eckey)
 360 {
 361     return ASN1_d2i_bio_of(EC_KEY, EC_KEY_new, d2i_EC_PUBKEY, bp, eckey);
 362 }
 363
 364 int i2d_EC_PUBKEY_bio(BIO *bp, const EC_KEY *ecdsa)
 365 {
 366     return ASN1_i2d_bio_of(EC_KEY, i2d_EC_PUBKEY, bp, ecdsa);
 367 }
 368
 369 EC_KEY *d2i_ECPrivateKey_bio(BIO *bp, EC_KEY **eckey)
 370 {
 371     return ASN1_d2i_bio_of(EC_KEY, EC_KEY_new, d2i_ECPrivateKey, bp, eckey);
 372 }
 373
 374 int i2d_ECPrivateKey_bio(BIO *bp, const EC_KEY *eckey)
 375 {
 376     return ASN1_i2d_bio_of(EC_KEY, i2d_ECPrivateKey, bp, eckey);
 377 }
 378 #endif
 379
 380 int X509_pubkey_digest(const X509 *data, const EVP_MD *type,
 381                        unsigned char *md, unsigned int *len)
 382 {
 383     ASN1_BIT_STRING *key;
 384     key = X509_get0_pubkey_bitstr(data);
 385     if (!key)
 386         return 0;
 387     return EVP_Digest(key->data, key->length, md, len, type, NULL);
 388 }
 389
 390 int X509_digest(const X509 *cert, const EVP_MD *md, unsigned char *data,
 391                 unsigned int *len)
 392 {
 393     if (EVP_MD_is_a(md, SN_sha1) && (cert->ex_flags & EXFLAG_SET) != 0
 394             && (cert->ex_flags & EXFLAG_NO_FINGERPRINT) == 0) {
 395         /* Asking for SHA1 and we already computed it. */
 396         if (len != NULL)
 397             *len = sizeof(cert->sha1_hash);
 398         memcpy(data, cert->sha1_hash, sizeof(cert->sha1_hash));
 399         return 1;
 400     }
 401     return ossl_asn1_item_digest_ex(ASN1_ITEM_rptr(X509), md, (char *)cert,
 402                                     data, len, cert->libctx, cert->propq);
 403 }
 404
 405 /* calculate cert digest using the same hash algorithm as in its signature */
 406 ASN1_OCTET_STRING *X509_digest_sig(const X509 *cert)
 407 {
 408     unsigned int len;
 409     unsigned char hash[EVP_MAX_MD_SIZE];
 410     int md_NID;
 411     const EVP_MD *md = NULL;
 412     ASN1_OCTET_STRING *new = NULL;
 413
 414     if (cert == NULL) {
 415         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
 416         return NULL;
 417     }
 418
 419     if (!OBJ_find_sigid_algs(X509_get_signature_nid(cert), &md_NID, NULL)
 420             || (md = EVP_get_digestbynid(md_NID)) == NULL) {
 421         ERR_raise(ERR_LIB_CMP, X509_R_UNSUPPORTED_ALGORITHM);
 422         return NULL;
 423     }
 424     if (!X509_digest(cert, md, hash, &len)
 425             || (new = ASN1_OCTET_STRING_new()) == NULL)
 426         return NULL;
 427     if (!(ASN1_OCTET_STRING_set(new, hash, len))) {
 428         ASN1_OCTET_STRING_free(new);
 429         return NULL;
 430     }
 431     return new;
 432 }
 433
 434 int X509_CRL_digest(const X509_CRL *data, const EVP_MD *type,
 435                     unsigned char *md, unsigned int *len)
 436 {
 437     if (type == NULL) {
 438         ERR_raise(ERR_LIB_X509, ERR_R_PASSED_NULL_PARAMETER);
 439         return 0;
 440     }
 441     if (EVP_MD_is_a(type, SN_sha1)
 442             && (data->flags & EXFLAG_SET) != 0
 443             && (data->flags & EXFLAG_NO_FINGERPRINT) == 0) {
 444         /* Asking for SHA1; always computed in CRL d2i. */
 445         if (len != NULL)
 446             *len = sizeof(data->sha1_hash);
 447         memcpy(md, data->sha1_hash, sizeof(data->sha1_hash));
 448         return 1;
 449     }
 450     return ossl_asn1_item_digest_ex(ASN1_ITEM_rptr(X509_CRL), type, (char *)data,
 451                                     md, len, data->libctx, data->propq);
 452 }
 453
 454 int X509_REQ_digest(const X509_REQ *data, const EVP_MD *type,
 455                     unsigned char *md, unsigned int *len)
 456 {
 457     return ossl_asn1_item_digest_ex(ASN1_ITEM_rptr(X509_REQ), type, (char *)data,
 458                                     md, len, data->libctx, data->propq);
 459 }
 460
 461 int X509_NAME_digest(const X509_NAME *data, const EVP_MD *type,
 462                      unsigned char *md, unsigned int *len)
 463 {
 464     return ASN1_item_digest(ASN1_ITEM_rptr(X509_NAME), type, (char *)data,
 465                             md, len);
 466 }
 467
 468 int PKCS7_ISSUER_AND_SERIAL_digest(PKCS7_ISSUER_AND_SERIAL *data,
 469                                    const EVP_MD *type, unsigned char *md,
 470                                    unsigned int *len)
 471 {
 472     return ASN1_item_digest(ASN1_ITEM_rptr(PKCS7_ISSUER_AND_SERIAL), type,
 473                             (char *)data, md, len);
 474 }
 475
 476 #ifndef OPENSSL_NO_STDIO
 477 X509_SIG *d2i_PKCS8_fp(FILE *fp, X509_SIG **p8)
 478 {
 479     return ASN1_d2i_fp_of(X509_SIG, X509_SIG_new, d2i_X509_SIG, fp, p8);
 480 }
 481
 482 int i2d_PKCS8_fp(FILE *fp, const X509_SIG *p8)
 483 {
 484     return ASN1_i2d_fp_of(X509_SIG, i2d_X509_SIG, fp, p8);
 485 }
 486 #endif
 487
 488 X509_SIG *d2i_PKCS8_bio(BIO *bp, X509_SIG **p8)
 489 {
 490     return ASN1_d2i_bio_of(X509_SIG, X509_SIG_new, d2i_X509_SIG, bp, p8);
 491 }
 492
 493 int i2d_PKCS8_bio(BIO *bp, const X509_SIG *p8)
 494 {
 495     return ASN1_i2d_bio_of(X509_SIG, i2d_X509_SIG, bp, p8);
 496 }
 497
 498 #ifndef OPENSSL_NO_STDIO
 499 X509_PUBKEY *d2i_X509_PUBKEY_fp(FILE *fp, X509_PUBKEY **xpk)
 500 {
 501     return ASN1_d2i_fp_of(X509_PUBKEY, X509_PUBKEY_new, d2i_X509_PUBKEY,
 502                           fp, xpk);
 503 }
 504
 505 int i2d_X509_PUBKEY_fp(FILE *fp, const X509_PUBKEY *xpk)
 506 {
 507     return ASN1_i2d_fp_of(X509_PUBKEY, i2d_X509_PUBKEY, fp, xpk);
 508 }
 509 #endif
 510
 511 X509_PUBKEY *d2i_X509_PUBKEY_bio(BIO *bp, X509_PUBKEY **xpk)
 512 {
 513     return ASN1_d2i_bio_of(X509_PUBKEY, X509_PUBKEY_new, d2i_X509_PUBKEY,
 514                            bp, xpk);
 515 }
 516
 517 int i2d_X509_PUBKEY_bio(BIO *bp, const X509_PUBKEY *xpk)
 518 {
 519     return ASN1_i2d_bio_of(X509_PUBKEY, i2d_X509_PUBKEY, bp, xpk);
 520 }
 521
 522 #ifndef OPENSSL_NO_STDIO
 523 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_fp(FILE *fp,
 524                                                 PKCS8_PRIV_KEY_INFO **p8inf)
 525 {
 526     return ASN1_d2i_fp_of(PKCS8_PRIV_KEY_INFO, PKCS8_PRIV_KEY_INFO_new,
 527                           d2i_PKCS8_PRIV_KEY_INFO, fp, p8inf);
 528 }
 529
 530 int i2d_PKCS8_PRIV_KEY_INFO_fp(FILE *fp, const PKCS8_PRIV_KEY_INFO *p8inf)
 531 {
 532     return ASN1_i2d_fp_of(PKCS8_PRIV_KEY_INFO, i2d_PKCS8_PRIV_KEY_INFO, fp,
 533                           p8inf);
 534 }
 535
 536 int i2d_PKCS8PrivateKeyInfo_fp(FILE *fp, const EVP_PKEY *key)
 537 {
 538     PKCS8_PRIV_KEY_INFO *p8inf;
 539     int ret;
 540
 541     p8inf = EVP_PKEY2PKCS8(key);
 542     if (p8inf == NULL)
 543         return 0;
 544     ret = i2d_PKCS8_PRIV_KEY_INFO_fp(fp, p8inf);
 545     PKCS8_PRIV_KEY_INFO_free(p8inf);
 546     return ret;
 547 }
 548
 549 int i2d_PrivateKey_fp(FILE *fp, const EVP_PKEY *pkey)
 550 {
 551     return ASN1_i2d_fp_of(EVP_PKEY, i2d_PrivateKey, fp, pkey);
 552 }
 553
 554 EVP_PKEY *d2i_PrivateKey_fp(FILE *fp, EVP_PKEY **a)
 555 {
 556     return ASN1_d2i_fp_of(EVP_PKEY, EVP_PKEY_new, d2i_AutoPrivateKey, fp, a);
 557 }
 558
 559 EVP_PKEY *d2i_PrivateKey_ex_fp(FILE *fp, EVP_PKEY **a, OSSL_LIB_CTX *libctx,
 560                                const char *propq)
 561 {
 562     BIO *b;
 563     void *ret;
 564
 565     if ((b = BIO_new(BIO_s_file())) == NULL) {
 566         ERR_raise(ERR_LIB_X509, ERR_R_BUF_LIB);
 567         return NULL;
 568     }
 569     BIO_set_fp(b, fp, BIO_NOCLOSE);
 570     ret = d2i_PrivateKey_ex_bio(b, a, libctx, propq);
 571     BIO_free(b);
 572     return ret;
 573 }
 574
 575 int i2d_PUBKEY_fp(FILE *fp, const EVP_PKEY *pkey)
 576 {
 577     return ASN1_i2d_fp_of(EVP_PKEY, i2d_PUBKEY, fp, pkey);
 578 }
 579
 580 EVP_PKEY *d2i_PUBKEY_fp(FILE *fp, EVP_PKEY **a)
 581 {
 582     return ASN1_d2i_fp_of(EVP_PKEY, EVP_PKEY_new, d2i_PUBKEY, fp, a);
 583 }
 584
 585 #endif
 586
 587 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_bio(BIO *bp,
 588                                                  PKCS8_PRIV_KEY_INFO **p8inf)
 589 {
 590     return ASN1_d2i_bio_of(PKCS8_PRIV_KEY_INFO, PKCS8_PRIV_KEY_INFO_new,
 591                            d2i_PKCS8_PRIV_KEY_INFO, bp, p8inf);
 592 }
 593
 594 int i2d_PKCS8_PRIV_KEY_INFO_bio(BIO *bp, const PKCS8_PRIV_KEY_INFO *p8inf)
 595 {
 596     return ASN1_i2d_bio_of(PKCS8_PRIV_KEY_INFO, i2d_PKCS8_PRIV_KEY_INFO, bp,
 597                            p8inf);
 598 }
 599
 600 int i2d_PKCS8PrivateKeyInfo_bio(BIO *bp, const EVP_PKEY *key)
 601 {
 602     PKCS8_PRIV_KEY_INFO *p8inf;
 603     int ret;
 604
 605     p8inf = EVP_PKEY2PKCS8(key);
 606     if (p8inf == NULL)
 607         return 0;
 608     ret = i2d_PKCS8_PRIV_KEY_INFO_bio(bp, p8inf);
 609     PKCS8_PRIV_KEY_INFO_free(p8inf);
 610     return ret;
 611 }
 612
 613 int i2d_PrivateKey_bio(BIO *bp, const EVP_PKEY *pkey)
 614 {
 615     return ASN1_i2d_bio_of(EVP_PKEY, i2d_PrivateKey, bp, pkey);
 616 }
 617
 618 EVP_PKEY *d2i_PrivateKey_bio(BIO *bp, EVP_PKEY **a)
 619 {
 620     return ASN1_d2i_bio_of(EVP_PKEY, EVP_PKEY_new, d2i_AutoPrivateKey, bp, a);
 621 }
 622
 623 EVP_PKEY *d2i_PrivateKey_ex_bio(BIO *bp, EVP_PKEY **a, OSSL_LIB_CTX *libctx,
 624                                 const char *propq)
 625 {
 626     BUF_MEM *b = NULL;
 627     const unsigned char *p;
 628     void *ret = NULL;
 629     int len;
 630
 631     len = asn1_d2i_read_bio(bp, &b);
 632     if (len < 0)
 633         goto err;
 634
 635     p = (unsigned char *)b->data;
 636     ret = d2i_AutoPrivateKey_ex(a, &p, len, libctx, propq);
 637  err:
 638     BUF_MEM_free(b);
 639     return ret;
 640 }
 641
 642 int i2d_PUBKEY_bio(BIO *bp, const EVP_PKEY *pkey)
 643 {
 644     return ASN1_i2d_bio_of(EVP_PKEY, i2d_PUBKEY, bp, pkey);
 645 }
 646
 647 EVP_PKEY *d2i_PUBKEY_bio(BIO *bp, EVP_PKEY **a)
 648 {
 649     return ASN1_d2i_bio_of(EVP_PKEY, EVP_PKEY_new, d2i_PUBKEY, bp, a);
 650 }