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