crypto/openssl/crypto/x509/x_all.c

   1 /* crypto/x509/x_all.c */
   2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
   3  * All rights reserved.
   4  *
   5  * This package is an SSL implementation written
   6  * by Eric Young (eay@cryptsoft.com).
   7  * The implementation was written so as to conform with Netscapes SSL.
   8  *
   9  * This library is free for commercial and non-commercial use as long as
  10  * the following conditions are aheared to.  The following conditions
  11  * apply to all code found in this distribution, be it the RC4, RSA,
  12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
  13  * included with this distribution is covered by the same copyright terms
  14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
  15  *
  16  * Copyright remains Eric Young's, and as such any Copyright notices in
  17  * the code are not to be removed.
  18  * If this package is used in a product, Eric Young should be given attribution
  19  * as the author of the parts of the library used.
  20  * This can be in the form of a textual message at program startup or
  21  * in documentation (online or textual) provided with the package.
  22  *
  23  * Redistribution and use in source and binary forms, with or without
  24  * modification, are permitted provided that the following conditions
  25  * are met:
  26  * 1. Redistributions of source code must retain the copyright
  27  *    notice, this list of conditions and the following disclaimer.
  28  * 2. Redistributions in binary form must reproduce the above copyright
  29  *    notice, this list of conditions and the following disclaimer in the
  30  *    documentation and/or other materials provided with the distribution.
  31  * 3. All advertising materials mentioning features or use of this software
  32  *    must display the following acknowledgement:
  33  *    "This product includes cryptographic software written by
  34  *     Eric Young (eay@cryptsoft.com)"
  35  *    The word 'cryptographic' can be left out if the rouines from the library
  36  *    being used are not cryptographic related :-).
  37  * 4. If you include any Windows specific code (or a derivative thereof) from
  38  *    the apps directory (application code) you must include an acknowledgement:
  39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
  40  *
  41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
  42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  51  * SUCH DAMAGE.
  52  *
  53  * The licence and distribution terms for any publically available version or
  54  * derivative of this code cannot be changed.  i.e. this code cannot simply be
  55  * copied and put under another distribution licence
  56  * [including the GNU Public Licence.]
  57  */
  58
  59 #include <stdio.h>
  60 #include <openssl/stack.h>
  61 #include "cryptlib.h"
  62 #include <openssl/buffer.h>
  63 #include <openssl/asn1.h>
  64 #include <openssl/evp.h>
  65 #include <openssl/x509.h>
  66 #ifndef OPENSSL_NO_RSA
  67 # include <openssl/rsa.h>
  68 #endif
  69 #ifndef OPENSSL_NO_DSA
  70 # include <openssl/dsa.h>
  71 #endif
  72
  73 int X509_verify(X509 *a, EVP_PKEY *r)
  74 {
  75     if (X509_ALGOR_cmp(a->sig_alg, a->cert_info->signature))
  76         return 0;
  77     return (ASN1_item_verify(ASN1_ITEM_rptr(X509_CINF), a->sig_alg,
  78                              a->signature, a->cert_info, r));
  79 }
  80
  81 int X509_REQ_verify(X509_REQ *a, EVP_PKEY *r)
  82 {
  83     return (ASN1_item_verify(ASN1_ITEM_rptr(X509_REQ_INFO),
  84                              a->sig_alg, a->signature, a->req_info, r));
  85 }
  86
  87 int NETSCAPE_SPKI_verify(NETSCAPE_SPKI *a, EVP_PKEY *r)
  88 {
  89     return (ASN1_item_verify(ASN1_ITEM_rptr(NETSCAPE_SPKAC),
  90                              a->sig_algor, a->signature, a->spkac, r));
  91 }
  92
  93 int X509_sign(X509 *x, EVP_PKEY *pkey, const EVP_MD *md)
  94 {
  95     x->cert_info->enc.modified = 1;
  96     return (ASN1_item_sign(ASN1_ITEM_rptr(X509_CINF), x->cert_info->signature,
  97                            x->sig_alg, x->signature, x->cert_info, pkey, md));
  98 }
  99
 100 int X509_sign_ctx(X509 *x, EVP_MD_CTX *ctx)
 101 {
 102     x->cert_info->enc.modified = 1;
 103     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CINF),
 104                               x->cert_info->signature,
 105                               x->sig_alg, x->signature, x->cert_info, ctx);
 106 }
 107
 108 int X509_REQ_sign(X509_REQ *x, EVP_PKEY *pkey, const EVP_MD *md)
 109 {
 110     return (ASN1_item_sign(ASN1_ITEM_rptr(X509_REQ_INFO), x->sig_alg, NULL,
 111                            x->signature, x->req_info, pkey, md));
 112 }
 113
 114 int X509_REQ_sign_ctx(X509_REQ *x, EVP_MD_CTX *ctx)
 115 {
 116     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_REQ_INFO),
 117                               x->sig_alg, NULL, x->signature, x->req_info,
 118                               ctx);
 119 }
 120
 121 int X509_CRL_sign(X509_CRL *x, EVP_PKEY *pkey, const EVP_MD *md)
 122 {
 123     x->crl->enc.modified = 1;
 124     return (ASN1_item_sign(ASN1_ITEM_rptr(X509_CRL_INFO), x->crl->sig_alg,
 125                            x->sig_alg, x->signature, x->crl, pkey, md));
 126 }
 127
 128 int X509_CRL_sign_ctx(X509_CRL *x, EVP_MD_CTX *ctx)
 129 {
 130     x->crl->enc.modified = 1;
 131     return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CRL_INFO),
 132                               x->crl->sig_alg, x->sig_alg, x->signature,
 133                               x->crl, ctx);
 134 }
 135
 136 int NETSCAPE_SPKI_sign(NETSCAPE_SPKI *x, EVP_PKEY *pkey, const EVP_MD *md)
 137 {
 138     return (ASN1_item_sign(ASN1_ITEM_rptr(NETSCAPE_SPKAC), x->sig_algor, NULL,
 139                            x->signature, x->spkac, pkey, md));
 140 }
 141
 142 #ifndef OPENSSL_NO_FP_API
 143 X509 *d2i_X509_fp(FILE *fp, X509 **x509)
 144 {
 145     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509), fp, x509);
 146 }
 147
 148 int i2d_X509_fp(FILE *fp, X509 *x509)
 149 {
 150     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509), fp, x509);
 151 }
 152 #endif
 153
 154 X509 *d2i_X509_bio(BIO *bp, X509 **x509)
 155 {
 156     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509), bp, x509);
 157 }
 158
 159 int i2d_X509_bio(BIO *bp, X509 *x509)
 160 {
 161     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509), bp, x509);
 162 }
 163
 164 #ifndef OPENSSL_NO_FP_API
 165 X509_CRL *d2i_X509_CRL_fp(FILE *fp, X509_CRL **crl)
 166 {
 167     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
 168 }
 169
 170 int i2d_X509_CRL_fp(FILE *fp, X509_CRL *crl)
 171 {
 172     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
 173 }
 174 #endif
 175
 176 X509_CRL *d2i_X509_CRL_bio(BIO *bp, X509_CRL **crl)
 177 {
 178     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
 179 }
 180
 181 int i2d_X509_CRL_bio(BIO *bp, X509_CRL *crl)
 182 {
 183     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
 184 }
 185
 186 #ifndef OPENSSL_NO_FP_API
 187 PKCS7 *d2i_PKCS7_fp(FILE *fp, PKCS7 **p7)
 188 {
 189     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
 190 }
 191
 192 int i2d_PKCS7_fp(FILE *fp, PKCS7 *p7)
 193 {
 194     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
 195 }
 196 #endif
 197
 198 PKCS7 *d2i_PKCS7_bio(BIO *bp, PKCS7 **p7)
 199 {
 200     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
 201 }
 202
 203 int i2d_PKCS7_bio(BIO *bp, PKCS7 *p7)
 204 {
 205     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
 206 }
 207
 208 #ifndef OPENSSL_NO_FP_API
 209 X509_REQ *d2i_X509_REQ_fp(FILE *fp, X509_REQ **req)
 210 {
 211     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
 212 }
 213
 214 int i2d_X509_REQ_fp(FILE *fp, X509_REQ *req)
 215 {
 216     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
 217 }
 218 #endif
 219
 220 X509_REQ *d2i_X509_REQ_bio(BIO *bp, X509_REQ **req)
 221 {
 222     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
 223 }
 224
 225 int i2d_X509_REQ_bio(BIO *bp, X509_REQ *req)
 226 {
 227     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
 228 }
 229
 230 #ifndef OPENSSL_NO_RSA
 231
 232 # ifndef OPENSSL_NO_FP_API
 233 RSA *d2i_RSAPrivateKey_fp(FILE *fp, RSA **rsa)
 234 {
 235     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
 236 }
 237
 238 int i2d_RSAPrivateKey_fp(FILE *fp, RSA *rsa)
 239 {
 240     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
 241 }
 242
 243 RSA *d2i_RSAPublicKey_fp(FILE *fp, RSA **rsa)
 244 {
 245     return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
 246 }
 247
 248 RSA *d2i_RSA_PUBKEY_fp(FILE *fp, RSA **rsa)
 249 {
 250     return ASN1_d2i_fp((void *(*)(void))
 251                        RSA_new, (D2I_OF(void)) d2i_RSA_PUBKEY, fp,
 252                        (void **)rsa);
 253 }
 254
 255 int i2d_RSAPublicKey_fp(FILE *fp, RSA *rsa)
 256 {
 257     return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
 258 }
 259
 260 int i2d_RSA_PUBKEY_fp(FILE *fp, RSA *rsa)
 261 {
 262     return ASN1_i2d_fp((I2D_OF(void))i2d_RSA_PUBKEY, fp, rsa);
 263 }
 264 # endif
 265
 266 RSA *d2i_RSAPrivateKey_bio(BIO *bp, RSA **rsa)
 267 {
 268     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
 269 }
 270
 271 int i2d_RSAPrivateKey_bio(BIO *bp, RSA *rsa)
 272 {
 273     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
 274 }
 275
 276 RSA *d2i_RSAPublicKey_bio(BIO *bp, RSA **rsa)
 277 {
 278     return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
 279 }
 280
 281 RSA *d2i_RSA_PUBKEY_bio(BIO *bp, RSA **rsa)
 282 {
 283     return ASN1_d2i_bio_of(RSA, RSA_new, d2i_RSA_PUBKEY, bp, rsa);
 284 }
 285
 286 int i2d_RSAPublicKey_bio(BIO *bp, RSA *rsa)
 287 {
 288     return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
 289 }
 290
 291 int i2d_RSA_PUBKEY_bio(BIO *bp, RSA *rsa)
 292 {
 293     return ASN1_i2d_bio_of(RSA, i2d_RSA_PUBKEY, bp, rsa);
 294 }
 295 #endif
 296
 297 #ifndef OPENSSL_NO_DSA
 298 # ifndef OPENSSL_NO_FP_API
 299 DSA *d2i_DSAPrivateKey_fp(FILE *fp, DSA **dsa)
 300 {
 301     return ASN1_d2i_fp_of(DSA, DSA_new, d2i_DSAPrivateKey, fp, dsa);
 302 }
 303
 304 int i2d_DSAPrivateKey_fp(FILE *fp, DSA *dsa)
 305 {
 306     return ASN1_i2d_fp_of_const(DSA, i2d_DSAPrivateKey, fp, dsa);
 307 }
 308
 309 DSA *d2i_DSA_PUBKEY_fp(FILE *fp, DSA **dsa)
 310 {
 311     return ASN1_d2i_fp_of(DSA, DSA_new, d2i_DSA_PUBKEY, fp, dsa);
 312 }
 313
 314 int i2d_DSA_PUBKEY_fp(FILE *fp, DSA *dsa)
 315 {
 316     return ASN1_i2d_fp_of(DSA, i2d_DSA_PUBKEY, fp, dsa);
 317 }
 318 # endif
 319
 320 DSA *d2i_DSAPrivateKey_bio(BIO *bp, DSA **dsa)
 321 {
 322     return ASN1_d2i_bio_of(DSA, DSA_new, d2i_DSAPrivateKey, bp, dsa);
 323 }
 324
 325 int i2d_DSAPrivateKey_bio(BIO *bp, DSA *dsa)
 326 {
 327     return ASN1_i2d_bio_of_const(DSA, i2d_DSAPrivateKey, bp, dsa);
 328 }
 329
 330 DSA *d2i_DSA_PUBKEY_bio(BIO *bp, DSA **dsa)
 331 {
 332     return ASN1_d2i_bio_of(DSA, DSA_new, d2i_DSA_PUBKEY, bp, dsa);
 333 }
 334
 335 int i2d_DSA_PUBKEY_bio(BIO *bp, DSA *dsa)
 336 {
 337     return ASN1_i2d_bio_of(DSA, i2d_DSA_PUBKEY, bp, dsa);
 338 }
 339
 340 #endif
 341
 342 #ifndef OPENSSL_NO_EC
 343 # ifndef OPENSSL_NO_FP_API
 344 EC_KEY *d2i_EC_PUBKEY_fp(FILE *fp, EC_KEY **eckey)
 345 {
 346     return ASN1_d2i_fp_of(EC_KEY, EC_KEY_new, d2i_EC_PUBKEY, fp, eckey);
 347 }
 348
 349 int i2d_EC_PUBKEY_fp(FILE *fp, EC_KEY *eckey)
 350 {
 351     return ASN1_i2d_fp_of(EC_KEY, i2d_EC_PUBKEY, fp, eckey);
 352 }
 353
 354 EC_KEY *d2i_ECPrivateKey_fp(FILE *fp, EC_KEY **eckey)
 355 {
 356     return ASN1_d2i_fp_of(EC_KEY, EC_KEY_new, d2i_ECPrivateKey, fp, eckey);
 357 }
 358
 359 int i2d_ECPrivateKey_fp(FILE *fp, EC_KEY *eckey)
 360 {
 361     return ASN1_i2d_fp_of(EC_KEY, i2d_ECPrivateKey, fp, eckey);
 362 }
 363 # endif
 364 EC_KEY *d2i_EC_PUBKEY_bio(BIO *bp, EC_KEY **eckey)
 365 {
 366     return ASN1_d2i_bio_of(EC_KEY, EC_KEY_new, d2i_EC_PUBKEY, bp, eckey);
 367 }
 368
 369 int i2d_EC_PUBKEY_bio(BIO *bp, EC_KEY *ecdsa)
 370 {
 371     return ASN1_i2d_bio_of(EC_KEY, i2d_EC_PUBKEY, bp, ecdsa);
 372 }
 373
 374 EC_KEY *d2i_ECPrivateKey_bio(BIO *bp, EC_KEY **eckey)
 375 {
 376     return ASN1_d2i_bio_of(EC_KEY, EC_KEY_new, d2i_ECPrivateKey, bp, eckey);
 377 }
 378
 379 int i2d_ECPrivateKey_bio(BIO *bp, EC_KEY *eckey)
 380 {
 381     return ASN1_i2d_bio_of(EC_KEY, i2d_ECPrivateKey, bp, eckey);
 382 }
 383 #endif
 384
 385 int X509_pubkey_digest(const X509 *data, const EVP_MD *type,
 386                        unsigned char *md, unsigned int *len)
 387 {
 388     ASN1_BIT_STRING *key;
 389     key = X509_get0_pubkey_bitstr(data);
 390     if (!key)
 391         return 0;
 392     return EVP_Digest(key->data, key->length, md, len, type, NULL);
 393 }
 394
 395 int X509_digest(const X509 *data, const EVP_MD *type, unsigned char *md,
 396                 unsigned int *len)
 397 {
 398     return (ASN1_item_digest
 399             (ASN1_ITEM_rptr(X509), type, (char *)data, md, len));
 400 }
 401
 402 int X509_CRL_digest(const X509_CRL *data, const EVP_MD *type,
 403                     unsigned char *md, unsigned int *len)
 404 {
 405     return (ASN1_item_digest
 406             (ASN1_ITEM_rptr(X509_CRL), type, (char *)data, md, len));
 407 }
 408
 409 int X509_REQ_digest(const X509_REQ *data, const EVP_MD *type,
 410                     unsigned char *md, unsigned int *len)
 411 {
 412     return (ASN1_item_digest
 413             (ASN1_ITEM_rptr(X509_REQ), type, (char *)data, md, len));
 414 }
 415
 416 int X509_NAME_digest(const X509_NAME *data, const EVP_MD *type,
 417                      unsigned char *md, unsigned int *len)
 418 {
 419     return (ASN1_item_digest
 420             (ASN1_ITEM_rptr(X509_NAME), type, (char *)data, md, len));
 421 }
 422
 423 int PKCS7_ISSUER_AND_SERIAL_digest(PKCS7_ISSUER_AND_SERIAL *data,
 424                                    const EVP_MD *type, unsigned char *md,
 425                                    unsigned int *len)
 426 {
 427     return (ASN1_item_digest(ASN1_ITEM_rptr(PKCS7_ISSUER_AND_SERIAL), type,
 428                              (char *)data, md, len));
 429 }
 430
 431 #ifndef OPENSSL_NO_FP_API
 432 X509_SIG *d2i_PKCS8_fp(FILE *fp, X509_SIG **p8)
 433 {
 434     return ASN1_d2i_fp_of(X509_SIG, X509_SIG_new, d2i_X509_SIG, fp, p8);
 435 }
 436
 437 int i2d_PKCS8_fp(FILE *fp, X509_SIG *p8)
 438 {
 439     return ASN1_i2d_fp_of(X509_SIG, i2d_X509_SIG, fp, p8);
 440 }
 441 #endif
 442
 443 X509_SIG *d2i_PKCS8_bio(BIO *bp, X509_SIG **p8)
 444 {
 445     return ASN1_d2i_bio_of(X509_SIG, X509_SIG_new, d2i_X509_SIG, bp, p8);
 446 }
 447
 448 int i2d_PKCS8_bio(BIO *bp, X509_SIG *p8)
 449 {
 450     return ASN1_i2d_bio_of(X509_SIG, i2d_X509_SIG, bp, p8);
 451 }
 452
 453 #ifndef OPENSSL_NO_FP_API
 454 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_fp(FILE *fp,
 455                                                 PKCS8_PRIV_KEY_INFO **p8inf)
 456 {
 457     return ASN1_d2i_fp_of(PKCS8_PRIV_KEY_INFO, PKCS8_PRIV_KEY_INFO_new,
 458                           d2i_PKCS8_PRIV_KEY_INFO, fp, p8inf);
 459 }
 460
 461 int i2d_PKCS8_PRIV_KEY_INFO_fp(FILE *fp, PKCS8_PRIV_KEY_INFO *p8inf)
 462 {
 463     return ASN1_i2d_fp_of(PKCS8_PRIV_KEY_INFO, i2d_PKCS8_PRIV_KEY_INFO, fp,
 464                           p8inf);
 465 }
 466
 467 int i2d_PKCS8PrivateKeyInfo_fp(FILE *fp, EVP_PKEY *key)
 468 {
 469     PKCS8_PRIV_KEY_INFO *p8inf;
 470     int ret;
 471     p8inf = EVP_PKEY2PKCS8(key);
 472     if (!p8inf)
 473         return 0;
 474     ret = i2d_PKCS8_PRIV_KEY_INFO_fp(fp, p8inf);
 475     PKCS8_PRIV_KEY_INFO_free(p8inf);
 476     return ret;
 477 }
 478
 479 int i2d_PrivateKey_fp(FILE *fp, EVP_PKEY *pkey)
 480 {
 481     return ASN1_i2d_fp_of(EVP_PKEY, i2d_PrivateKey, fp, pkey);
 482 }
 483
 484 EVP_PKEY *d2i_PrivateKey_fp(FILE *fp, EVP_PKEY **a)
 485 {
 486     return ASN1_d2i_fp_of(EVP_PKEY, EVP_PKEY_new, d2i_AutoPrivateKey, fp, a);
 487 }
 488
 489 int i2d_PUBKEY_fp(FILE *fp, EVP_PKEY *pkey)
 490 {
 491     return ASN1_i2d_fp_of(EVP_PKEY, i2d_PUBKEY, fp, pkey);
 492 }
 493
 494 EVP_PKEY *d2i_PUBKEY_fp(FILE *fp, EVP_PKEY **a)
 495 {
 496     return ASN1_d2i_fp_of(EVP_PKEY, EVP_PKEY_new, d2i_PUBKEY, fp, a);
 497 }
 498
 499 #endif
 500
 501 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_bio(BIO *bp,
 502                                                  PKCS8_PRIV_KEY_INFO **p8inf)
 503 {
 504     return ASN1_d2i_bio_of(PKCS8_PRIV_KEY_INFO, PKCS8_PRIV_KEY_INFO_new,
 505                            d2i_PKCS8_PRIV_KEY_INFO, bp, p8inf);
 506 }
 507
 508 int i2d_PKCS8_PRIV_KEY_INFO_bio(BIO *bp, PKCS8_PRIV_KEY_INFO *p8inf)
 509 {
 510     return ASN1_i2d_bio_of(PKCS8_PRIV_KEY_INFO, i2d_PKCS8_PRIV_KEY_INFO, bp,
 511                            p8inf);
 512 }
 513
 514 int i2d_PKCS8PrivateKeyInfo_bio(BIO *bp, EVP_PKEY *key)
 515 {
 516     PKCS8_PRIV_KEY_INFO *p8inf;
 517     int ret;
 518     p8inf = EVP_PKEY2PKCS8(key);
 519     if (!p8inf)
 520         return 0;
 521     ret = i2d_PKCS8_PRIV_KEY_INFO_bio(bp, p8inf);
 522     PKCS8_PRIV_KEY_INFO_free(p8inf);
 523     return ret;
 524 }
 525
 526 int i2d_PrivateKey_bio(BIO *bp, EVP_PKEY *pkey)
 527 {
 528     return ASN1_i2d_bio_of(EVP_PKEY, i2d_PrivateKey, bp, pkey);
 529 }
 530
 531 EVP_PKEY *d2i_PrivateKey_bio(BIO *bp, EVP_PKEY **a)
 532 {
 533     return ASN1_d2i_bio_of(EVP_PKEY, EVP_PKEY_new, d2i_AutoPrivateKey, bp, a);
 534 }
 535
 536 int i2d_PUBKEY_bio(BIO *bp, EVP_PKEY *pkey)
 537 {
 538     return ASN1_i2d_bio_of(EVP_PKEY, i2d_PUBKEY, bp, pkey);
 539 }
 540
 541 EVP_PKEY *d2i_PUBKEY_bio(BIO *bp, EVP_PKEY **a)
 542 {
 543     return ASN1_d2i_bio_of(EVP_PKEY, EVP_PKEY_new, d2i_PUBKEY, bp, a);
 544 }