1 /* crypto/asn1/x_pubkey.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
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.
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).
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.
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
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)"
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
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.]
61 #include <openssl/asn1t.h>
62 #include <openssl/x509.h>
63 #include <openssl/rsa.h>
64 #include <openssl/dsa.h>
66 /* Minor tweak to operation: free up EVP_PKEY */
67 static int pubkey_cb(int operation
, ASN1_VALUE
**pval
, const ASN1_ITEM
*it
)
69 if (operation
== ASN1_OP_FREE_POST
)
71 X509_PUBKEY
*pubkey
= (X509_PUBKEY
*)*pval
;
72 EVP_PKEY_free(pubkey
->pkey
);
77 ASN1_SEQUENCE_cb(X509_PUBKEY
, pubkey_cb
) = {
78 ASN1_SIMPLE(X509_PUBKEY
, algor
, X509_ALGOR
),
79 ASN1_SIMPLE(X509_PUBKEY
, public_key
, ASN1_BIT_STRING
)
80 } ASN1_SEQUENCE_END_cb(X509_PUBKEY
, X509_PUBKEY
)
82 IMPLEMENT_ASN1_FUNCTIONS(X509_PUBKEY
)
84 int X509_PUBKEY_set(X509_PUBKEY
**x
, EVP_PKEY
*pkey
)
89 unsigned char *s
,*p
= NULL
;
92 if (x
== NULL
) return(0);
94 if ((pk
=X509_PUBKEY_new()) == NULL
) goto err
;
97 /* set the algorithm id */
98 if ((o
=OBJ_nid2obj(pkey
->type
)) == NULL
) goto err
;
99 ASN1_OBJECT_free(a
->algorithm
);
102 /* Set the parameter list */
103 if (!pkey
->save_parameters
|| (pkey
->type
== EVP_PKEY_RSA
))
105 if ((a
->parameter
== NULL
) ||
106 (a
->parameter
->type
!= V_ASN1_NULL
))
108 ASN1_TYPE_free(a
->parameter
);
109 if (!(a
->parameter
=ASN1_TYPE_new()))
111 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
114 a
->parameter
->type
=V_ASN1_NULL
;
117 #ifndef OPENSSL_NO_DSA
118 else if (pkey
->type
== EVP_PKEY_DSA
)
125 ASN1_TYPE_free(a
->parameter
);
126 if ((i
=i2d_DSAparams(dsa
,NULL
)) <= 0)
128 if (!(p
=(unsigned char *)OPENSSL_malloc(i
)))
130 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
134 i2d_DSAparams(dsa
,&pp
);
135 if (!(a
->parameter
=ASN1_TYPE_new()))
138 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
141 a
->parameter
->type
=V_ASN1_SEQUENCE
;
142 if (!(a
->parameter
->value
.sequence
=ASN1_STRING_new()))
145 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
148 if (!ASN1_STRING_set(a
->parameter
->value
.sequence
,p
,i
))
151 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
157 #ifndef OPENSSL_NO_EC
158 else if (pkey
->type
== EVP_PKEY_EC
)
164 eckey
= pkey
->pkey
.eckey
;
165 ASN1_TYPE_free(a
->parameter
);
167 if ((a
->parameter
= ASN1_TYPE_new()) == NULL
)
169 X509err(X509_F_X509_PUBKEY_SET
, ERR_R_ASN1_LIB
);
173 if (EC_GROUP_get_asn1_flag(eckey
->group
)
174 && (nid
= EC_GROUP_get_curve_name(eckey
->group
)))
176 /* just set the OID */
177 a
->parameter
->type
= V_ASN1_OBJECT
;
178 a
->parameter
->value
.object
= OBJ_nid2obj(nid
);
180 else /* explicit parameters */
182 if ((i
= i2d_ECParameters(eckey
, NULL
)) == 0)
184 X509err(X509_F_X509_PUBKEY_SET
, ERR_R_EC_LIB
);
187 if ((p
= (unsigned char *) OPENSSL_malloc(i
)) == NULL
)
189 X509err(X509_F_X509_PUBKEY_SET
, ERR_R_MALLOC_FAILURE
);
193 if (!i2d_ECParameters(eckey
, &pp
))
195 X509err(X509_F_X509_PUBKEY_SET
, ERR_R_EC_LIB
);
199 a
->parameter
->type
= V_ASN1_SEQUENCE
;
200 if ((a
->parameter
->value
.sequence
= ASN1_STRING_new()) == NULL
)
202 X509err(X509_F_X509_PUBKEY_SET
, ERR_R_ASN1_LIB
);
206 ASN1_STRING_set(a
->parameter
->value
.sequence
, p
, i
);
213 X509err(X509_F_X509_PUBKEY_SET
,X509_R_UNSUPPORTED_ALGORITHM
);
217 if ((i
=i2d_PublicKey(pkey
,NULL
)) <= 0) goto err
;
218 if ((s
=(unsigned char *)OPENSSL_malloc(i
+1)) == NULL
)
220 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
224 i2d_PublicKey(pkey
,&p
);
225 if (!M_ASN1_BIT_STRING_set(pk
->public_key
,s
,i
))
227 X509err(X509_F_X509_PUBKEY_SET
,ERR_R_MALLOC_FAILURE
);
230 /* Set number of unused bits to zero */
231 pk
->public_key
->flags
&= ~(ASN1_STRING_FLAG_BITS_LEFT
|0x07);
232 pk
->public_key
->flags
|=ASN1_STRING_FLAG_BITS_LEFT
;
237 CRYPTO_add(&pkey
->references
,1,CRYPTO_LOCK_EVP_PKEY
);
242 X509_PUBKEY_free(*x
);
248 if (pk
!= NULL
) X509_PUBKEY_free(pk
);
252 EVP_PKEY
*X509_PUBKEY_get(X509_PUBKEY
*key
)
257 const unsigned char *p
;
258 #if !defined(OPENSSL_NO_DSA) || !defined(OPENSSL_NO_ECDSA)
259 const unsigned char *cp
;
263 if (key
== NULL
) goto err
;
265 if (key
->pkey
!= NULL
)
267 CRYPTO_add(&key
->pkey
->references
, 1, CRYPTO_LOCK_EVP_PKEY
);
271 if (key
->public_key
== NULL
) goto err
;
273 type
=OBJ_obj2nid(key
->algor
->algorithm
);
274 if ((ret
= EVP_PKEY_new()) == NULL
)
276 X509err(X509_F_X509_PUBKEY_GET
, ERR_R_MALLOC_FAILURE
);
279 ret
->type
= EVP_PKEY_type(type
);
281 /* the parameters must be extracted before the public key (ECDSA!) */
283 #if !defined(OPENSSL_NO_DSA) || !defined(OPENSSL_NO_ECDSA)
289 #ifndef OPENSSL_NO_DSA
290 else if (ret
->type
== EVP_PKEY_DSA
)
292 if (a
->parameter
&& (a
->parameter
->type
== V_ASN1_SEQUENCE
))
294 if ((ret
->pkey
.dsa
= DSA_new()) == NULL
)
296 X509err(X509_F_X509_PUBKEY_GET
, ERR_R_MALLOC_FAILURE
);
299 ret
->pkey
.dsa
->write_params
=0;
300 cp
=p
=a
->parameter
->value
.sequence
->data
;
301 j
=a
->parameter
->value
.sequence
->length
;
302 if (!d2i_DSAparams(&ret
->pkey
.dsa
, &cp
, (long)j
))
305 ret
->save_parameters
=1;
308 #ifndef OPENSSL_NO_EC
309 else if (ret
->type
== EVP_PKEY_EC
)
311 if (a
->parameter
&& (a
->parameter
->type
== V_ASN1_SEQUENCE
))
313 /* type == V_ASN1_SEQUENCE => we have explicit parameters
314 * (e.g. parameters in the X9_62_EC_PARAMETERS-structure )
316 if ((ret
->pkey
.eckey
= EC_KEY_new()) == NULL
)
318 X509err(X509_F_X509_PUBKEY_GET
,
319 ERR_R_MALLOC_FAILURE
);
322 cp
= p
= a
->parameter
->value
.sequence
->data
;
323 j
= a
->parameter
->value
.sequence
->length
;
324 if (!d2i_ECParameters(&ret
->pkey
.eckey
, &cp
, (long)j
))
326 X509err(X509_F_X509_PUBKEY_GET
, ERR_R_EC_LIB
);
330 else if (a
->parameter
&& (a
->parameter
->type
== V_ASN1_OBJECT
))
332 /* type == V_ASN1_OBJECT => the parameters are given
336 if (ret
->pkey
.eckey
== NULL
)
337 ret
->pkey
.eckey
= EC_KEY_new();
338 eckey
= ret
->pkey
.eckey
;
340 EC_GROUP_free(eckey
->group
);
341 if ((eckey
->group
= EC_GROUP_new_by_curve_name(
342 OBJ_obj2nid(a
->parameter
->value
.object
))) == NULL
)
344 EC_GROUP_set_asn1_flag(eckey
->group
,
345 OPENSSL_EC_NAMED_CURVE
);
347 /* the case implicitlyCA is currently not implemented */
348 ret
->save_parameters
= 1;
352 p
=key
->public_key
->data
;
353 j
=key
->public_key
->length
;
354 if (!d2i_PublicKey(type
, &ret
, &p
, (long)j
))
356 X509err(X509_F_X509_PUBKEY_GET
, X509_R_ERR_ASN1_LIB
);
361 CRYPTO_add(&ret
->references
, 1, CRYPTO_LOCK_EVP_PKEY
);
369 /* Now two pseudo ASN1 routines that take an EVP_PKEY structure
370 * and encode or decode as X509_PUBKEY
373 EVP_PKEY
*d2i_PUBKEY(EVP_PKEY
**a
, const unsigned char **pp
,
378 xpk
= d2i_X509_PUBKEY(NULL
, pp
, length
);
379 if(!xpk
) return NULL
;
380 pktmp
= X509_PUBKEY_get(xpk
);
381 X509_PUBKEY_free(xpk
);
382 if(!pktmp
) return NULL
;
391 int i2d_PUBKEY(EVP_PKEY
*a
, unsigned char **pp
)
393 X509_PUBKEY
*xpk
=NULL
;
396 if(!X509_PUBKEY_set(&xpk
, a
)) return 0;
397 ret
= i2d_X509_PUBKEY(xpk
, pp
);
398 X509_PUBKEY_free(xpk
);
402 /* The following are equivalents but which return RSA and DSA
405 #ifndef OPENSSL_NO_RSA
406 RSA
*d2i_RSA_PUBKEY(RSA
**a
, const unsigned char **pp
,
411 const unsigned char *q
;
413 pkey
= d2i_PUBKEY(NULL
, &q
, length
);
414 if (!pkey
) return NULL
;
415 key
= EVP_PKEY_get1_RSA(pkey
);
417 if (!key
) return NULL
;
427 int i2d_RSA_PUBKEY(RSA
*a
, unsigned char **pp
)
432 pktmp
= EVP_PKEY_new();
435 ASN1err(ASN1_F_I2D_RSA_PUBKEY
, ERR_R_MALLOC_FAILURE
);
438 EVP_PKEY_set1_RSA(pktmp
, a
);
439 ret
= i2d_PUBKEY(pktmp
, pp
);
440 EVP_PKEY_free(pktmp
);
445 #ifndef OPENSSL_NO_DSA
446 DSA
*d2i_DSA_PUBKEY(DSA
**a
, const unsigned char **pp
,
451 const unsigned char *q
;
453 pkey
= d2i_PUBKEY(NULL
, &q
, length
);
454 if (!pkey
) return NULL
;
455 key
= EVP_PKEY_get1_DSA(pkey
);
457 if (!key
) return NULL
;
467 int i2d_DSA_PUBKEY(DSA
*a
, unsigned char **pp
)
472 pktmp
= EVP_PKEY_new();
475 ASN1err(ASN1_F_I2D_DSA_PUBKEY
, ERR_R_MALLOC_FAILURE
);
478 EVP_PKEY_set1_DSA(pktmp
, a
);
479 ret
= i2d_PUBKEY(pktmp
, pp
);
480 EVP_PKEY_free(pktmp
);
485 #ifndef OPENSSL_NO_EC
486 EC_KEY
*d2i_EC_PUBKEY(EC_KEY
**a
, const unsigned char **pp
, long length
)
490 const unsigned char *q
;
492 pkey
= d2i_PUBKEY(NULL
, &q
, length
);
493 if (!pkey
) return(NULL
);
494 key
= EVP_PKEY_get1_EC_KEY(pkey
);
496 if (!key
) return(NULL
);
506 int i2d_EC_PUBKEY(EC_KEY
*a
, unsigned char **pp
)
511 if ((pktmp
= EVP_PKEY_new()) == NULL
)
513 ASN1err(ASN1_F_I2D_EC_PUBKEY
, ERR_R_MALLOC_FAILURE
);
516 EVP_PKEY_set1_EC_KEY(pktmp
, a
);
517 ret
= i2d_PUBKEY(pktmp
, pp
);
518 EVP_PKEY_free(pktmp
);