2 * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved.
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
11 * DSA low level APIs are deprecated for public use, but still ok for
14 #include "internal/deprecated.h"
17 #include "internal/cryptlib.h"
18 #include <openssl/asn1t.h>
19 #include <openssl/x509.h>
20 #include "crypto/asn1.h"
21 #include "crypto/evp.h"
22 #include "crypto/x509.h"
23 #include <openssl/rsa.h>
24 #include <openssl/dsa.h>
25 #include <openssl/encoder.h>
26 #include "internal/provider.h"
28 struct X509_pubkey_st {
30 ASN1_BIT_STRING *public_key;
33 /* extra data for the callback, used by d2i_PUBKEY_ex */
38 static int x509_pubkey_decode(EVP_PKEY **pk, const X509_PUBKEY *key);
40 static int x509_pubkey_set0_libctx(X509_PUBKEY *x, OSSL_LIB_CTX *libctx,
45 OPENSSL_free(x->propq);
48 x->propq = OPENSSL_strdup(propq);
56 /* Minor tweak to operation: free up EVP_PKEY */
57 static int pubkey_cb(int operation, ASN1_VALUE **pval, const ASN1_ITEM *it,
60 X509_PUBKEY *pubkey = (X509_PUBKEY *)*pval;
62 if (operation == ASN1_OP_FREE_POST) {
63 OPENSSL_free(pubkey->propq);
64 EVP_PKEY_free(pubkey->pkey);
65 } else if (operation == ASN1_OP_D2I_POST) {
66 /* Attempt to decode public key and cache in pubkey structure. */
67 EVP_PKEY_free(pubkey->pkey);
70 * Opportunistically decode the key but remove any non fatal errors
71 * from the queue. Subsequent explicit attempts to decode/use the key
72 * will return an appropriate error.
75 if (x509_pubkey_decode(&pubkey->pkey, pubkey) == -1) {
76 ERR_clear_last_mark();
80 } else if (operation == ASN1_OP_DUP_POST) {
81 X509_PUBKEY *old = exarg;
83 if (!x509_pubkey_set0_libctx(pubkey, old->libctx, old->propq))
89 ASN1_SEQUENCE_cb(X509_PUBKEY, pubkey_cb) = {
90 ASN1_SIMPLE(X509_PUBKEY, algor, X509_ALGOR),
91 ASN1_SIMPLE(X509_PUBKEY, public_key, ASN1_BIT_STRING)
92 } ASN1_SEQUENCE_END_cb(X509_PUBKEY, X509_PUBKEY)
94 IMPLEMENT_ASN1_FUNCTIONS(X509_PUBKEY)
95 IMPLEMENT_ASN1_DUP_FUNCTION(X509_PUBKEY)
97 /* TODO should better be called X509_PUBKEY_set1 */
98 int X509_PUBKEY_set(X509_PUBKEY **x, EVP_PKEY *pkey)
100 X509_PUBKEY *pk = NULL;
108 if (pkey->ameth != NULL) {
109 if ((pk = X509_PUBKEY_new()) == NULL) {
110 ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
113 if (pkey->ameth->pub_encode != NULL) {
114 if (!pkey->ameth->pub_encode(pk, pkey)) {
115 ERR_raise(ERR_LIB_X509, X509_R_PUBLIC_KEY_ENCODE_ERROR);
119 ERR_raise(ERR_LIB_X509, X509_R_METHOD_NOT_SUPPORTED);
122 } else if (evp_pkey_is_provided(pkey)) {
123 unsigned char *der = NULL;
125 OSSL_ENCODER_CTX *ectx =
126 OSSL_ENCODER_CTX_new_by_EVP_PKEY(pkey, EVP_PKEY_PUBLIC_KEY,
127 "DER", "SubjectPublicKeyInfo",
130 if (OSSL_ENCODER_to_data(ectx, &der, &derlen)) {
131 const unsigned char *pder = der;
133 pk = d2i_X509_PUBKEY(NULL, &pder, (long)derlen);
136 OSSL_ENCODER_CTX_free(ectx);
143 X509_PUBKEY_free(*x);
144 if (!EVP_PKEY_up_ref(pkey)) {
145 ERR_raise(ERR_LIB_X509, ERR_R_INTERNAL_ERROR);
151 * pk->pkey is NULL when using the legacy routine, but is non-NULL when
152 * going through the encoder, and for all intents and purposes, it's
153 * a perfect copy of |pkey|, just not the same instance. In that case,
154 * we could simply return early, right here.
155 * However, in the interest of being cautious leaning on paranoia, some
156 * application might very well depend on the passed |pkey| being used
157 * and none other, so we spend a few more cycles throwing away the newly
158 * created |pk->pkey| and replace it with |pkey|.
159 * TODO(3.0) Investigate if it's safe to change to simply return here
160 * if |pk->pkey != NULL|.
162 if (pk->pkey != NULL)
163 EVP_PKEY_free(pk->pkey);
169 ERR_raise(ERR_LIB_X509, X509_R_UNSUPPORTED_ALGORITHM);
172 X509_PUBKEY_free(pk);
177 * Attempt to decode a public key.
178 * Returns 1 on success, 0 for a decode failure and -1 for a fatal
179 * error e.g. malloc failure.
183 static int x509_pubkey_decode(EVP_PKEY **ppkey, const X509_PUBKEY *key)
185 EVP_PKEY *pkey = EVP_PKEY_new();
188 ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
192 if (!EVP_PKEY_set_type(pkey, OBJ_obj2nid(key->algor->algorithm))) {
193 ERR_raise(ERR_LIB_X509, X509_R_UNSUPPORTED_ALGORITHM);
197 if (pkey->ameth->pub_decode) {
199 * Treat any failure of pub_decode as a decode error. In
200 * future we could have different return codes for decode
201 * errors and fatal errors such as malloc failure.
203 if (!pkey->ameth->pub_decode(pkey, key))
206 ERR_raise(ERR_LIB_X509, X509_R_METHOD_NOT_SUPPORTED);
218 EVP_PKEY *X509_PUBKEY_get0(const X509_PUBKEY *key)
220 EVP_PKEY *ret = NULL;
222 if (key == NULL || key->public_key == NULL)
225 if (key->pkey != NULL)
229 * When the key ASN.1 is initially parsed an attempt is made to
230 * decode the public key and cache the EVP_PKEY structure. If this
231 * operation fails the cached value will be NULL. Parsing continues
232 * to allow parsing of unknown key types or unsupported forms.
233 * We repeat the decode operation so the appropriate errors are left
236 x509_pubkey_decode(&ret, key);
237 /* If decode doesn't fail something bad happened */
239 ERR_raise(ERR_LIB_X509, ERR_R_INTERNAL_ERROR);
246 EVP_PKEY *X509_PUBKEY_get(const X509_PUBKEY *key)
248 EVP_PKEY *ret = X509_PUBKEY_get0(key);
250 if (ret != NULL && !EVP_PKEY_up_ref(ret)) {
251 ERR_raise(ERR_LIB_X509, ERR_R_INTERNAL_ERROR);
258 * Now three pseudo ASN1 routines that take an EVP_PKEY structure and encode
259 * or decode as X509_PUBKEY
262 EVP_PKEY *d2i_PUBKEY_ex(EVP_PKEY **a, const unsigned char **pp, long length,
263 OSSL_LIB_CTX *libctx, const char *propq)
265 X509_PUBKEY *xpk, *xpk2 = NULL, **pxpk = NULL;
266 EVP_PKEY *pktmp = NULL;
267 const unsigned char *q;
272 * If libctx or propq are non-NULL, we take advantage of the reuse
273 * feature. It's not generally recommended, but is safe enough for
274 * newly created structures.
276 if (libctx != NULL || propq != NULL) {
277 xpk2 = OPENSSL_zalloc(sizeof(*xpk2));
279 ERR_raise(ERR_LIB_X509, ERR_R_MALLOC_FAILURE);
282 if (!x509_pubkey_set0_libctx(xpk2, libctx, propq))
286 xpk = d2i_X509_PUBKEY(pxpk, &q, length);
289 pktmp = X509_PUBKEY_get(xpk);
290 X509_PUBKEY_free(xpk);
291 xpk2 = NULL; /* We know that xpk == xpk2 */
300 X509_PUBKEY_free(xpk2);
304 EVP_PKEY *d2i_PUBKEY(EVP_PKEY **a, const unsigned char **pp, long length)
306 return d2i_PUBKEY_ex(a, pp, length, NULL, NULL);
309 int i2d_PUBKEY(const EVP_PKEY *a, unsigned char **pp)
315 if (a->ameth != NULL) {
316 X509_PUBKEY *xpk = NULL;
318 if ((xpk = X509_PUBKEY_new()) == NULL)
321 /* pub_encode() only encode parameters, not the key itself */
322 if (a->ameth->pub_encode != NULL && a->ameth->pub_encode(xpk, a)) {
323 xpk->pkey = (EVP_PKEY *)a;
324 ret = i2d_X509_PUBKEY(xpk, pp);
327 X509_PUBKEY_free(xpk);
328 } else if (a->keymgmt != NULL) {
329 OSSL_ENCODER_CTX *ctx =
330 OSSL_ENCODER_CTX_new_by_EVP_PKEY(a, EVP_PKEY_PUBLIC_KEY,
331 "DER", "SubjectPublicKeyInfo",
333 BIO *out = BIO_new(BIO_s_mem());
336 if (OSSL_ENCODER_CTX_get_num_encoders(ctx) != 0
338 && OSSL_ENCODER_to_bio(ctx, out)
339 && BIO_get_mem_ptr(out, &buf) > 0) {
344 *pp = (unsigned char *)buf->data;
348 memcpy(*pp, buf->data, ret);
354 OSSL_ENCODER_CTX_free(ctx);
361 * The following are equivalents but which return RSA and DSA keys
363 #ifndef OPENSSL_NO_RSA
364 RSA *d2i_RSA_PUBKEY(RSA **a, const unsigned char **pp, long length)
368 const unsigned char *q;
371 pkey = d2i_PUBKEY(NULL, &q, length);
374 key = EVP_PKEY_get1_RSA(pkey);
386 int i2d_RSA_PUBKEY(const RSA *a, unsigned char **pp)
392 pktmp = EVP_PKEY_new();
394 ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
397 (void)EVP_PKEY_assign_RSA(pktmp, (RSA *)a);
398 ret = i2d_PUBKEY(pktmp, pp);
399 pktmp->pkey.ptr = NULL;
400 EVP_PKEY_free(pktmp);
405 #ifndef OPENSSL_NO_DSA
406 DSA *d2i_DSA_PUBKEY(DSA **a, const unsigned char **pp, long length)
410 const unsigned char *q;
413 pkey = d2i_PUBKEY(NULL, &q, length);
416 key = EVP_PKEY_get1_DSA(pkey);
428 int i2d_DSA_PUBKEY(const DSA *a, unsigned char **pp)
434 pktmp = EVP_PKEY_new();
436 ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
439 (void)EVP_PKEY_assign_DSA(pktmp, (DSA *)a);
440 ret = i2d_PUBKEY(pktmp, pp);
441 pktmp->pkey.ptr = NULL;
442 EVP_PKEY_free(pktmp);
447 #ifndef OPENSSL_NO_EC
448 EC_KEY *d2i_EC_PUBKEY(EC_KEY **a, const unsigned char **pp, long length)
452 const unsigned char *q;
455 pkey = d2i_PUBKEY(NULL, &q, length);
458 key = EVP_PKEY_get1_EC_KEY(pkey);
470 int i2d_EC_PUBKEY(const EC_KEY *a, unsigned char **pp)
477 if ((pktmp = EVP_PKEY_new()) == NULL) {
478 ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
481 (void)EVP_PKEY_assign_EC_KEY(pktmp, (EC_KEY *)a);
482 ret = i2d_PUBKEY(pktmp, pp);
483 pktmp->pkey.ptr = NULL;
484 EVP_PKEY_free(pktmp);
489 int X509_PUBKEY_set0_param(X509_PUBKEY *pub, ASN1_OBJECT *aobj,
490 int ptype, void *pval,
491 unsigned char *penc, int penclen)
493 if (!X509_ALGOR_set0(pub->algor, aobj, ptype, pval))
496 OPENSSL_free(pub->public_key->data);
497 pub->public_key->data = penc;
498 pub->public_key->length = penclen;
499 /* Set number of unused bits to zero */
500 pub->public_key->flags &= ~(ASN1_STRING_FLAG_BITS_LEFT | 0x07);
501 pub->public_key->flags |= ASN1_STRING_FLAG_BITS_LEFT;
506 int X509_PUBKEY_get0_param(ASN1_OBJECT **ppkalg,
507 const unsigned char **pk, int *ppklen,
508 X509_ALGOR **pa, const X509_PUBKEY *pub)
511 *ppkalg = pub->algor->algorithm;
513 *pk = pub->public_key->data;
514 *ppklen = pub->public_key->length;
521 ASN1_BIT_STRING *X509_get0_pubkey_bitstr(const X509 *x)
525 return x->cert_info.key->public_key;
528 /* Returns 1 for equal, 0, for non-equal, < 0 on error */
529 int X509_PUBKEY_eq(const X509_PUBKEY *a, const X509_PUBKEY *b)
531 X509_ALGOR *algA, *algB;
536 if (a == NULL || b == NULL)
538 if (!X509_PUBKEY_get0_param(NULL, NULL, NULL, &algA, a) || algA == NULL
539 || !X509_PUBKEY_get0_param(NULL, NULL, NULL, &algB, b) || algB == NULL)
541 if (X509_ALGOR_cmp(algA, algB) != 0)
543 if ((pA = X509_PUBKEY_get0(a)) == NULL
544 || (pB = X509_PUBKEY_get0(b)) == NULL)
546 return EVP_PKEY_eq(pA, pB);
549 int X509_PUBKEY_get0_libctx(OSSL_LIB_CTX **plibctx, const char **ppropq,
550 const X509_PUBKEY *key)
553 *plibctx = key->libctx;
555 *ppropq = key->propq;