51d23f7d624851428af3c923e5b9ca86788313f0
[openssl.git] / 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 #include <openssl/ocsp.h>
67 #ifndef OPENSSL_NO_RSA
68 #include <openssl/rsa.h>
69 #endif
70 #ifndef OPENSSL_NO_DSA
71 #include <openssl/dsa.h>
72 #endif
73
74 int X509_verify(X509 *a, EVP_PKEY *r)
75         {
76         return(ASN1_item_verify(ASN1_ITEM_rptr(X509_CINF),a->sig_alg,
77                 a->signature,a->cert_info,r));
78         }
79
80 int X509_REQ_verify(X509_REQ *a, EVP_PKEY *r)
81         {
82         return( ASN1_item_verify(ASN1_ITEM_rptr(X509_REQ_INFO),
83                 a->sig_alg,a->signature,a->req_info,r));
84         }
85
86 int NETSCAPE_SPKI_verify(NETSCAPE_SPKI *a, EVP_PKEY *r)
87         {
88         return(ASN1_item_verify(ASN1_ITEM_rptr(NETSCAPE_SPKAC),
89                 a->sig_algor,a->signature,a->spkac,r));
90         }
91
92 int X509_sign(X509 *x, EVP_PKEY *pkey, const EVP_MD *md)
93         {
94         x->cert_info->enc.modified = 1;
95         return(ASN1_item_sign(ASN1_ITEM_rptr(X509_CINF), x->cert_info->signature,
96                 x->sig_alg, x->signature, x->cert_info,pkey,md));
97         }
98
99 int X509_sign_ctx(X509 *x, EVP_MD_CTX *ctx)
100         {
101         x->cert_info->enc.modified = 1;
102         return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CINF),
103                 x->cert_info->signature,
104                 x->sig_alg, x->signature, x->cert_info, ctx);
105         }
106
107 int X509_http_nbio(OCSP_REQ_CTX *rctx, X509 **pcert)
108         {
109         return OCSP_REQ_CTX_nbio_d2i(rctx,
110                                 (ASN1_VALUE **)pcert, ASN1_ITEM_rptr(X509));
111         }
112
113 int X509_REQ_sign(X509_REQ *x, EVP_PKEY *pkey, const EVP_MD *md)
114         {
115         return(ASN1_item_sign(ASN1_ITEM_rptr(X509_REQ_INFO),x->sig_alg, NULL,
116                 x->signature, x->req_info,pkey,md));
117         }
118
119 int X509_REQ_sign_ctx(X509_REQ *x, EVP_MD_CTX *ctx)
120         {
121         return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_REQ_INFO),
122                 x->sig_alg, NULL, x->signature, x->req_info, ctx);
123         }
124
125 int X509_CRL_sign(X509_CRL *x, EVP_PKEY *pkey, const EVP_MD *md)
126         {
127         x->crl->enc.modified = 1;
128         return(ASN1_item_sign(ASN1_ITEM_rptr(X509_CRL_INFO),x->crl->sig_alg,
129                 x->sig_alg, x->signature, x->crl,pkey,md));
130         }
131
132 int X509_CRL_sign_ctx(X509_CRL *x, EVP_MD_CTX *ctx)
133         {
134         return ASN1_item_sign_ctx(ASN1_ITEM_rptr(X509_CRL_INFO),
135                 x->crl->sig_alg, x->sig_alg, x->signature, x->crl, ctx);
136         }
137
138 int X509_CRL_http_nbio(OCSP_REQ_CTX *rctx, X509_CRL **pcrl)
139         {
140         return OCSP_REQ_CTX_nbio_d2i(rctx,
141                                 (ASN1_VALUE **)pcrl, ASN1_ITEM_rptr(X509_CRL));
142         }
143
144
145 int NETSCAPE_SPKI_sign(NETSCAPE_SPKI *x, EVP_PKEY *pkey, const EVP_MD *md)
146         {
147         return(ASN1_item_sign(ASN1_ITEM_rptr(NETSCAPE_SPKAC), x->sig_algor,NULL,
148                 x->signature, x->spkac,pkey,md));
149         }
150
151 #ifndef OPENSSL_NO_FP_API
152 X509 *d2i_X509_fp(FILE *fp, X509 **x509)
153         {
154         return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509), fp, x509);
155         }
156
157 int i2d_X509_fp(FILE *fp, X509 *x509)
158         {
159         return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509), fp, x509);
160         }
161 #endif
162
163 X509 *d2i_X509_bio(BIO *bp, X509 **x509)
164         {
165         return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509), bp, x509);
166         }
167
168 int i2d_X509_bio(BIO *bp, X509 *x509)
169         {
170         return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509), bp, x509);
171         }
172
173 #ifndef OPENSSL_NO_FP_API
174 X509_CRL *d2i_X509_CRL_fp(FILE *fp, X509_CRL **crl)
175         {
176         return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
177         }
178
179 int i2d_X509_CRL_fp(FILE *fp, X509_CRL *crl)
180         {
181         return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_CRL), fp, crl);
182         }
183 #endif
184
185 X509_CRL *d2i_X509_CRL_bio(BIO *bp, X509_CRL **crl)
186         {
187         return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
188         }
189
190 int i2d_X509_CRL_bio(BIO *bp, X509_CRL *crl)
191         {
192         return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_CRL), bp, crl);
193         }
194
195 #ifndef OPENSSL_NO_FP_API
196 PKCS7 *d2i_PKCS7_fp(FILE *fp, PKCS7 **p7)
197         {
198         return ASN1_item_d2i_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
199         }
200
201 int i2d_PKCS7_fp(FILE *fp, PKCS7 *p7)
202         {
203         return ASN1_item_i2d_fp(ASN1_ITEM_rptr(PKCS7), fp, p7);
204         }
205 #endif
206
207 PKCS7 *d2i_PKCS7_bio(BIO *bp, PKCS7 **p7)
208         {
209         return ASN1_item_d2i_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
210         }
211
212 int i2d_PKCS7_bio(BIO *bp, PKCS7 *p7)
213         {
214         return ASN1_item_i2d_bio(ASN1_ITEM_rptr(PKCS7), bp, p7);
215         }
216
217 #ifndef OPENSSL_NO_FP_API
218 X509_REQ *d2i_X509_REQ_fp(FILE *fp, X509_REQ **req)
219         {
220         return ASN1_item_d2i_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
221         }
222
223 int i2d_X509_REQ_fp(FILE *fp, X509_REQ *req)
224         {
225         return ASN1_item_i2d_fp(ASN1_ITEM_rptr(X509_REQ), fp, req);
226         }
227 #endif
228
229 X509_REQ *d2i_X509_REQ_bio(BIO *bp, X509_REQ **req)
230         {
231         return ASN1_item_d2i_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
232         }
233
234 int i2d_X509_REQ_bio(BIO *bp, X509_REQ *req)
235         {
236         return ASN1_item_i2d_bio(ASN1_ITEM_rptr(X509_REQ), bp, req);
237         }
238
239 #ifndef OPENSSL_NO_RSA
240
241 #ifndef OPENSSL_NO_FP_API
242 RSA *d2i_RSAPrivateKey_fp(FILE *fp, RSA **rsa)
243         {
244         return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
245         }
246
247 int i2d_RSAPrivateKey_fp(FILE *fp, RSA *rsa)
248         {
249         return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPrivateKey), fp, rsa);
250         }
251
252 RSA *d2i_RSAPublicKey_fp(FILE *fp, RSA **rsa)
253         {
254         return ASN1_item_d2i_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
255         }
256
257
258 RSA *d2i_RSA_PUBKEY_fp(FILE *fp, RSA **rsa)
259         {
260         return ASN1_d2i_fp((void *(*)(void))
261                            RSA_new,(D2I_OF(void))d2i_RSA_PUBKEY, fp,
262                            (void **)rsa);
263         }
264
265 int i2d_RSAPublicKey_fp(FILE *fp, RSA *rsa)
266         {
267         return ASN1_item_i2d_fp(ASN1_ITEM_rptr(RSAPublicKey), fp, rsa);
268         }
269
270 int i2d_RSA_PUBKEY_fp(FILE *fp, RSA *rsa)
271         {
272         return ASN1_i2d_fp((I2D_OF(void))i2d_RSA_PUBKEY,fp,rsa);
273         }
274 #endif
275
276 RSA *d2i_RSAPrivateKey_bio(BIO *bp, RSA **rsa)
277         {
278         return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
279         }
280
281 int i2d_RSAPrivateKey_bio(BIO *bp, RSA *rsa)
282         {
283         return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPrivateKey), bp, rsa);
284         }
285
286 RSA *d2i_RSAPublicKey_bio(BIO *bp, RSA **rsa)
287         {
288         return ASN1_item_d2i_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
289         }
290
291
292 RSA *d2i_RSA_PUBKEY_bio(BIO *bp, RSA **rsa)
293         {
294         return ASN1_d2i_bio_of(RSA,RSA_new,d2i_RSA_PUBKEY,bp,rsa);
295         }
296
297 int i2d_RSAPublicKey_bio(BIO *bp, RSA *rsa)
298         {
299         return ASN1_item_i2d_bio(ASN1_ITEM_rptr(RSAPublicKey), bp, rsa);
300         }
301
302 int i2d_RSA_PUBKEY_bio(BIO *bp, RSA *rsa)
303         {
304         return ASN1_i2d_bio_of(RSA,i2d_RSA_PUBKEY,bp,rsa);
305         }
306 #endif
307
308 #ifndef OPENSSL_NO_DSA
309 #ifndef OPENSSL_NO_FP_API
310 DSA *d2i_DSAPrivateKey_fp(FILE *fp, DSA **dsa)
311         {
312         return ASN1_d2i_fp_of(DSA,DSA_new,d2i_DSAPrivateKey,fp,dsa);
313         }
314
315 int i2d_DSAPrivateKey_fp(FILE *fp, DSA *dsa)
316         {
317         return ASN1_i2d_fp_of_const(DSA,i2d_DSAPrivateKey,fp,dsa);
318         }
319
320 DSA *d2i_DSA_PUBKEY_fp(FILE *fp, DSA **dsa)
321         {
322         return ASN1_d2i_fp_of(DSA,DSA_new,d2i_DSA_PUBKEY,fp,dsa);
323         }
324
325 int i2d_DSA_PUBKEY_fp(FILE *fp, DSA *dsa)
326         {
327         return ASN1_i2d_fp_of(DSA,i2d_DSA_PUBKEY,fp,dsa);
328         }
329 #endif
330
331 DSA *d2i_DSAPrivateKey_bio(BIO *bp, DSA **dsa)
332         {
333         return ASN1_d2i_bio_of(DSA,DSA_new,d2i_DSAPrivateKey,bp,dsa
334 );
335         }
336
337 int i2d_DSAPrivateKey_bio(BIO *bp, DSA *dsa)
338         {
339         return ASN1_i2d_bio_of_const(DSA,i2d_DSAPrivateKey,bp,dsa);
340         }
341
342 DSA *d2i_DSA_PUBKEY_bio(BIO *bp, DSA **dsa)
343         {
344         return ASN1_d2i_bio_of(DSA,DSA_new,d2i_DSA_PUBKEY,bp,dsa);
345         }
346
347 int i2d_DSA_PUBKEY_bio(BIO *bp, DSA *dsa)
348         {
349         return ASN1_i2d_bio_of(DSA,i2d_DSA_PUBKEY,bp,dsa);
350         }
351
352 #endif
353
354 #ifndef OPENSSL_NO_EC
355 #ifndef OPENSSL_NO_FP_API
356 EC_KEY *d2i_EC_PUBKEY_fp(FILE *fp, EC_KEY **eckey)
357         {
358         return ASN1_d2i_fp_of(EC_KEY,EC_KEY_new,d2i_EC_PUBKEY,fp,eckey);
359         }
360   
361 int i2d_EC_PUBKEY_fp(FILE *fp, EC_KEY *eckey)
362         {
363         return ASN1_i2d_fp_of(EC_KEY,i2d_EC_PUBKEY,fp,eckey);
364         }
365
366 EC_KEY *d2i_ECPrivateKey_fp(FILE *fp, EC_KEY **eckey)
367         {
368         return ASN1_d2i_fp_of(EC_KEY,EC_KEY_new,d2i_ECPrivateKey,fp,eckey);
369         }
370   
371 int i2d_ECPrivateKey_fp(FILE *fp, EC_KEY *eckey)
372         {
373         return ASN1_i2d_fp_of(EC_KEY,i2d_ECPrivateKey,fp,eckey);
374         }
375 #endif
376 EC_KEY *d2i_EC_PUBKEY_bio(BIO *bp, EC_KEY **eckey)
377         {
378         return ASN1_d2i_bio_of(EC_KEY,EC_KEY_new,d2i_EC_PUBKEY,bp,eckey);
379         }
380   
381 int i2d_EC_PUBKEY_bio(BIO *bp, EC_KEY *ecdsa)
382         {
383         return ASN1_i2d_bio_of(EC_KEY,i2d_EC_PUBKEY,bp,ecdsa);
384         }
385
386 EC_KEY *d2i_ECPrivateKey_bio(BIO *bp, EC_KEY **eckey)
387         {
388         return ASN1_d2i_bio_of(EC_KEY,EC_KEY_new,d2i_ECPrivateKey,bp,eckey);
389         }
390   
391 int i2d_ECPrivateKey_bio(BIO *bp, EC_KEY *eckey)
392         {
393         return ASN1_i2d_bio_of(EC_KEY,i2d_ECPrivateKey,bp,eckey);
394         }
395 #endif
396
397
398 int X509_pubkey_digest(const X509 *data, const EVP_MD *type, unsigned char *md,
399              unsigned int *len)
400         {
401         ASN1_BIT_STRING *key;
402         key = X509_get0_pubkey_bitstr(data);
403         if(!key) return 0;
404         return EVP_Digest(key->data, key->length, md, len, type, NULL);
405         }
406
407 int X509_digest(const X509 *data, const EVP_MD *type, unsigned char *md,
408              unsigned int *len)
409         {
410         return(ASN1_item_digest(ASN1_ITEM_rptr(X509),type,(char *)data,md,len));
411         }
412
413 int X509_CRL_digest(const X509_CRL *data, const EVP_MD *type, unsigned char *md,
414              unsigned int *len)
415         {
416         return(ASN1_item_digest(ASN1_ITEM_rptr(X509_CRL),type,(char *)data,md,len));
417         }
418
419 int X509_REQ_digest(const X509_REQ *data, const EVP_MD *type, unsigned char *md,
420              unsigned int *len)
421         {
422         return(ASN1_item_digest(ASN1_ITEM_rptr(X509_REQ),type,(char *)data,md,len));
423         }
424
425 int X509_NAME_digest(const X509_NAME *data, const EVP_MD *type, unsigned char *md,
426              unsigned int *len)
427         {
428         return(ASN1_item_digest(ASN1_ITEM_rptr(X509_NAME),type,(char *)data,md,len));
429         }
430
431 int PKCS7_ISSUER_AND_SERIAL_digest(PKCS7_ISSUER_AND_SERIAL *data, const EVP_MD *type,
432              unsigned char *md, unsigned int *len)
433         {
434         return(ASN1_item_digest(ASN1_ITEM_rptr(PKCS7_ISSUER_AND_SERIAL),type,
435                 (char *)data,md,len));
436         }
437
438
439 #ifndef OPENSSL_NO_FP_API
440 X509_SIG *d2i_PKCS8_fp(FILE *fp, X509_SIG **p8)
441         {
442         return ASN1_d2i_fp_of(X509_SIG,X509_SIG_new,d2i_X509_SIG,fp,p8);
443         }
444
445 int i2d_PKCS8_fp(FILE *fp, X509_SIG *p8)
446         {
447         return ASN1_i2d_fp_of(X509_SIG,i2d_X509_SIG,fp,p8);
448         }
449 #endif
450
451 X509_SIG *d2i_PKCS8_bio(BIO *bp, X509_SIG **p8)
452         {
453         return ASN1_d2i_bio_of(X509_SIG,X509_SIG_new,d2i_X509_SIG,bp,p8);
454         }
455
456 int i2d_PKCS8_bio(BIO *bp, X509_SIG *p8)
457         {
458         return ASN1_i2d_bio_of(X509_SIG,i2d_X509_SIG,bp,p8);
459         }
460
461 #ifndef OPENSSL_NO_FP_API
462 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_fp(FILE *fp,
463                                                  PKCS8_PRIV_KEY_INFO **p8inf)
464         {
465         return ASN1_d2i_fp_of(PKCS8_PRIV_KEY_INFO,PKCS8_PRIV_KEY_INFO_new,
466                               d2i_PKCS8_PRIV_KEY_INFO,fp,p8inf);
467         }
468
469 int i2d_PKCS8_PRIV_KEY_INFO_fp(FILE *fp, PKCS8_PRIV_KEY_INFO *p8inf)
470         {
471         return ASN1_i2d_fp_of(PKCS8_PRIV_KEY_INFO,i2d_PKCS8_PRIV_KEY_INFO,fp,
472                               p8inf);
473         }
474
475 int i2d_PKCS8PrivateKeyInfo_fp(FILE *fp, EVP_PKEY *key)
476         {
477         PKCS8_PRIV_KEY_INFO *p8inf;
478         int ret;
479         p8inf = EVP_PKEY2PKCS8(key);
480         if(!p8inf) return 0;
481         ret = i2d_PKCS8_PRIV_KEY_INFO_fp(fp, p8inf);
482         PKCS8_PRIV_KEY_INFO_free(p8inf);
483         return ret;
484         }
485
486 int i2d_PrivateKey_fp(FILE *fp, EVP_PKEY *pkey)
487         {
488         return ASN1_i2d_fp_of(EVP_PKEY,i2d_PrivateKey,fp,pkey);
489         }
490
491 EVP_PKEY *d2i_PrivateKey_fp(FILE *fp, EVP_PKEY **a)
492 {
493         return ASN1_d2i_fp_of(EVP_PKEY,EVP_PKEY_new,d2i_AutoPrivateKey,fp,a);
494 }
495
496 int i2d_PUBKEY_fp(FILE *fp, EVP_PKEY *pkey)
497         {
498         return ASN1_i2d_fp_of(EVP_PKEY,i2d_PUBKEY,fp,pkey);
499         }
500
501 EVP_PKEY *d2i_PUBKEY_fp(FILE *fp, EVP_PKEY **a)
502 {
503         return ASN1_d2i_fp_of(EVP_PKEY,EVP_PKEY_new,d2i_PUBKEY,fp,a);
504 }
505
506 #endif
507
508 PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO_bio(BIO *bp,
509                                                  PKCS8_PRIV_KEY_INFO **p8inf)
510         {
511         return ASN1_d2i_bio_of(PKCS8_PRIV_KEY_INFO,PKCS8_PRIV_KEY_INFO_new,
512                             d2i_PKCS8_PRIV_KEY_INFO,bp,p8inf);
513         }
514
515 int i2d_PKCS8_PRIV_KEY_INFO_bio(BIO *bp, PKCS8_PRIV_KEY_INFO *p8inf)
516         {
517         return ASN1_i2d_bio_of(PKCS8_PRIV_KEY_INFO,i2d_PKCS8_PRIV_KEY_INFO,bp,
518                                p8inf);
519         }
520
521 int i2d_PKCS8PrivateKeyInfo_bio(BIO *bp, EVP_PKEY *key)
522         {
523         PKCS8_PRIV_KEY_INFO *p8inf;
524         int ret;
525         p8inf = EVP_PKEY2PKCS8(key);
526         if(!p8inf) return 0;
527         ret = i2d_PKCS8_PRIV_KEY_INFO_bio(bp, p8inf);
528         PKCS8_PRIV_KEY_INFO_free(p8inf);
529         return ret;
530         }
531
532 int i2d_PrivateKey_bio(BIO *bp, EVP_PKEY *pkey)
533         {
534         return ASN1_i2d_bio_of(EVP_PKEY,i2d_PrivateKey,bp,pkey);
535         }
536
537 EVP_PKEY *d2i_PrivateKey_bio(BIO *bp, EVP_PKEY **a)
538         {
539         return ASN1_d2i_bio_of(EVP_PKEY,EVP_PKEY_new,d2i_AutoPrivateKey,bp,a);
540         }
541
542 int i2d_PUBKEY_bio(BIO *bp, EVP_PKEY *pkey)
543         {
544         return ASN1_i2d_bio_of(EVP_PKEY,i2d_PUBKEY,bp,pkey);
545         }
546
547 EVP_PKEY *d2i_PUBKEY_bio(BIO *bp, EVP_PKEY **a)
548         {
549         return ASN1_d2i_bio_of(EVP_PKEY,EVP_PKEY_new,d2i_PUBKEY,bp,a);
550         }