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