Line data Source code
1 : /* crypto/ec/ec_key.c */
2 : /*
3 : * Written by Nils Larsch for the OpenSSL project.
4 : */
5 : /* ====================================================================
6 : * Copyright (c) 1998-2005 The OpenSSL Project. All rights reserved.
7 : *
8 : * Redistribution and use in source and binary forms, with or without
9 : * modification, are permitted provided that the following conditions
10 : * are met:
11 : *
12 : * 1. Redistributions of source code must retain the above copyright
13 : * notice, this list of conditions and the following disclaimer.
14 : *
15 : * 2. Redistributions in binary form must reproduce the above copyright
16 : * notice, this list of conditions and the following disclaimer in
17 : * the documentation and/or other materials provided with the
18 : * distribution.
19 : *
20 : * 3. All advertising materials mentioning features or use of this
21 : * software must display the following acknowledgment:
22 : * "This product includes software developed by the OpenSSL Project
23 : * for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
24 : *
25 : * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26 : * endorse or promote products derived from this software without
27 : * prior written permission. For written permission, please contact
28 : * openssl-core@openssl.org.
29 : *
30 : * 5. Products derived from this software may not be called "OpenSSL"
31 : * nor may "OpenSSL" appear in their names without prior written
32 : * permission of the OpenSSL Project.
33 : *
34 : * 6. Redistributions of any form whatsoever must retain the following
35 : * acknowledgment:
36 : * "This product includes software developed by the OpenSSL Project
37 : * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
38 : *
39 : * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40 : * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41 : * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42 : * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
43 : * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44 : * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45 : * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46 : * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 : * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48 : * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49 : * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50 : * OF THE POSSIBILITY OF SUCH DAMAGE.
51 : * ====================================================================
52 : *
53 : * This product includes cryptographic software written by Eric Young
54 : * (eay@cryptsoft.com). This product includes software written by Tim
55 : * Hudson (tjh@cryptsoft.com).
56 : *
57 : */
58 : /* ====================================================================
59 : * Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED.
60 : * Portions originally developed by SUN MICROSYSTEMS, INC., and
61 : * contributed to the OpenSSL project.
62 : */
63 :
64 : #include <string.h>
65 : #include "ec_lcl.h"
66 : #include <openssl/err.h>
67 : #ifdef OPENSSL_FIPS
68 : # include <openssl/fips.h>
69 : #endif
70 :
71 3974 : EC_KEY *EC_KEY_new(void)
72 : {
73 : EC_KEY *ret;
74 :
75 3974 : ret = (EC_KEY *)OPENSSL_malloc(sizeof(EC_KEY));
76 3974 : if (ret == NULL) {
77 0 : ECerr(EC_F_EC_KEY_NEW, ERR_R_MALLOC_FAILURE);
78 0 : return (NULL);
79 : }
80 :
81 3974 : ret->version = 1;
82 3974 : ret->flags = 0;
83 3974 : ret->group = NULL;
84 3974 : ret->pub_key = NULL;
85 3974 : ret->priv_key = NULL;
86 3974 : ret->enc_flag = 0;
87 3974 : ret->conv_form = POINT_CONVERSION_UNCOMPRESSED;
88 3974 : ret->references = 1;
89 3974 : ret->method_data = NULL;
90 3974 : return (ret);
91 : }
92 :
93 872 : EC_KEY *EC_KEY_new_by_curve_name(int nid)
94 : {
95 872 : EC_KEY *ret = EC_KEY_new();
96 872 : if (ret == NULL)
97 : return NULL;
98 872 : ret->group = EC_GROUP_new_by_curve_name(nid);
99 872 : if (ret->group == NULL) {
100 0 : EC_KEY_free(ret);
101 0 : return NULL;
102 : }
103 : return ret;
104 : }
105 :
106 3974 : void EC_KEY_free(EC_KEY *r)
107 : {
108 : int i;
109 :
110 3974 : if (r == NULL)
111 : return;
112 :
113 3974 : i = CRYPTO_add(&r->references, -1, CRYPTO_LOCK_EC);
114 : #ifdef REF_PRINT
115 : REF_PRINT("EC_KEY", r);
116 : #endif
117 3974 : if (i > 0)
118 : return;
119 : #ifdef REF_CHECK
120 : if (i < 0) {
121 : fprintf(stderr, "EC_KEY_free, bad reference count\n");
122 : abort();
123 : }
124 : #endif
125 :
126 3974 : if (r->group != NULL)
127 3974 : EC_GROUP_free(r->group);
128 3974 : if (r->pub_key != NULL)
129 2735 : EC_POINT_free(r->pub_key);
130 3974 : if (r->priv_key != NULL)
131 2732 : BN_clear_free(r->priv_key);
132 :
133 3974 : EC_EX_DATA_free_all_data(&r->method_data);
134 :
135 3974 : OPENSSL_cleanse((void *)r, sizeof(EC_KEY));
136 :
137 3974 : OPENSSL_free(r);
138 : }
139 :
140 1995 : EC_KEY *EC_KEY_copy(EC_KEY *dest, const EC_KEY *src)
141 : {
142 : EC_EXTRA_DATA *d;
143 :
144 1995 : if (dest == NULL || src == NULL) {
145 0 : ECerr(EC_F_EC_KEY_COPY, ERR_R_PASSED_NULL_PARAMETER);
146 0 : return NULL;
147 : }
148 : /* copy the parameters */
149 1995 : if (src->group) {
150 1995 : const EC_METHOD *meth = EC_GROUP_method_of(src->group);
151 : /* clear the old group */
152 1995 : if (dest->group)
153 0 : EC_GROUP_free(dest->group);
154 1995 : dest->group = EC_GROUP_new(meth);
155 1995 : if (dest->group == NULL)
156 : return NULL;
157 1995 : if (!EC_GROUP_copy(dest->group, src->group))
158 : return NULL;
159 : }
160 : /* copy the public key */
161 1995 : if (src->pub_key && src->group) {
162 1123 : if (dest->pub_key)
163 0 : EC_POINT_free(dest->pub_key);
164 1123 : dest->pub_key = EC_POINT_new(src->group);
165 1123 : if (dest->pub_key == NULL)
166 : return NULL;
167 1123 : if (!EC_POINT_copy(dest->pub_key, src->pub_key))
168 : return NULL;
169 : }
170 : /* copy the private key */
171 1995 : if (src->priv_key) {
172 1123 : if (dest->priv_key == NULL) {
173 1123 : dest->priv_key = BN_new();
174 1123 : if (dest->priv_key == NULL)
175 : return NULL;
176 : }
177 1123 : if (!BN_copy(dest->priv_key, src->priv_key))
178 : return NULL;
179 : }
180 : /* copy method/extra data */
181 1995 : EC_EX_DATA_free_all_data(&dest->method_data);
182 :
183 1994 : for (d = src->method_data; d != NULL; d = d->next) {
184 0 : void *t = d->dup_func(d->data);
185 :
186 0 : if (t == NULL)
187 : return 0;
188 0 : if (!EC_EX_DATA_set_data
189 0 : (&dest->method_data, t, d->dup_func, d->free_func,
190 : d->clear_free_func))
191 : return 0;
192 : }
193 :
194 : /* copy the rest */
195 1994 : dest->enc_flag = src->enc_flag;
196 1994 : dest->conv_form = src->conv_form;
197 1994 : dest->version = src->version;
198 1994 : dest->flags = src->flags;
199 :
200 1994 : return dest;
201 : }
202 :
203 1995 : EC_KEY *EC_KEY_dup(const EC_KEY *ec_key)
204 : {
205 1995 : EC_KEY *ret = EC_KEY_new();
206 1995 : if (ret == NULL)
207 : return NULL;
208 1995 : if (EC_KEY_copy(ret, ec_key) == NULL) {
209 0 : EC_KEY_free(ret);
210 0 : return NULL;
211 : }
212 : return ret;
213 : }
214 :
215 0 : int EC_KEY_up_ref(EC_KEY *r)
216 : {
217 0 : int i = CRYPTO_add(&r->references, 1, CRYPTO_LOCK_EC);
218 : #ifdef REF_PRINT
219 : REF_PRINT("EC_KEY", r);
220 : #endif
221 : #ifdef REF_CHECK
222 : if (i < 2) {
223 : fprintf(stderr, "EC_KEY_up, bad reference count\n");
224 : abort();
225 : }
226 : #endif
227 0 : return ((i > 1) ? 1 : 0);
228 : }
229 :
230 1615 : int EC_KEY_generate_key(EC_KEY *eckey)
231 : {
232 : int ok = 0;
233 : BN_CTX *ctx = NULL;
234 : BIGNUM *priv_key = NULL, *order = NULL;
235 : EC_POINT *pub_key = NULL;
236 :
237 : #ifdef OPENSSL_FIPS
238 : if (FIPS_mode())
239 : return FIPS_ec_key_generate_key(eckey);
240 : #endif
241 :
242 1615 : if (!eckey || !eckey->group) {
243 0 : ECerr(EC_F_EC_KEY_GENERATE_KEY, ERR_R_PASSED_NULL_PARAMETER);
244 0 : return 0;
245 : }
246 :
247 1615 : if ((order = BN_new()) == NULL)
248 : goto err;
249 1615 : if ((ctx = BN_CTX_new()) == NULL)
250 : goto err;
251 :
252 1615 : if (eckey->priv_key == NULL) {
253 1242 : priv_key = BN_new();
254 1242 : if (priv_key == NULL)
255 : goto err;
256 : } else
257 : priv_key = eckey->priv_key;
258 :
259 1615 : if (!EC_GROUP_get_order(eckey->group, order, ctx))
260 : goto err;
261 :
262 : do
263 1615 : if (!BN_rand_range(priv_key, order))
264 : goto err;
265 1615 : while (BN_is_zero(priv_key)) ;
266 :
267 1615 : if (eckey->pub_key == NULL) {
268 1242 : pub_key = EC_POINT_new(eckey->group);
269 1242 : if (pub_key == NULL)
270 : goto err;
271 : } else
272 : pub_key = eckey->pub_key;
273 :
274 1615 : if (!EC_POINT_mul(eckey->group, pub_key, priv_key, NULL, NULL, ctx))
275 : goto err;
276 :
277 1615 : eckey->priv_key = priv_key;
278 1615 : eckey->pub_key = pub_key;
279 :
280 : ok = 1;
281 :
282 : err:
283 1615 : if (order)
284 1615 : BN_free(order);
285 1615 : if (pub_key != NULL && eckey->pub_key == NULL)
286 0 : EC_POINT_free(pub_key);
287 1615 : if (priv_key != NULL && eckey->priv_key == NULL)
288 0 : BN_free(priv_key);
289 1615 : if (ctx != NULL)
290 1615 : BN_CTX_free(ctx);
291 1615 : return (ok);
292 : }
293 :
294 0 : int EC_KEY_check_key(const EC_KEY *eckey)
295 : {
296 : int ok = 0;
297 : BN_CTX *ctx = NULL;
298 : const BIGNUM *order = NULL;
299 : EC_POINT *point = NULL;
300 :
301 0 : if (!eckey || !eckey->group || !eckey->pub_key) {
302 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, ERR_R_PASSED_NULL_PARAMETER);
303 0 : return 0;
304 : }
305 :
306 0 : if (EC_POINT_is_at_infinity(eckey->group, eckey->pub_key)) {
307 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, EC_R_POINT_AT_INFINITY);
308 0 : goto err;
309 : }
310 :
311 0 : if ((ctx = BN_CTX_new()) == NULL)
312 : goto err;
313 0 : if ((point = EC_POINT_new(eckey->group)) == NULL)
314 : goto err;
315 :
316 : /* testing whether the pub_key is on the elliptic curve */
317 0 : if (EC_POINT_is_on_curve(eckey->group, eckey->pub_key, ctx) <= 0) {
318 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, EC_R_POINT_IS_NOT_ON_CURVE);
319 0 : goto err;
320 : }
321 : /* testing whether pub_key * order is the point at infinity */
322 0 : order = &eckey->group->order;
323 0 : if (BN_is_zero(order)) {
324 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, EC_R_INVALID_GROUP_ORDER);
325 0 : goto err;
326 : }
327 0 : if (!EC_POINT_mul(eckey->group, point, NULL, eckey->pub_key, order, ctx)) {
328 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, ERR_R_EC_LIB);
329 0 : goto err;
330 : }
331 0 : if (!EC_POINT_is_at_infinity(eckey->group, point)) {
332 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, EC_R_WRONG_ORDER);
333 0 : goto err;
334 : }
335 : /*
336 : * in case the priv_key is present : check if generator * priv_key ==
337 : * pub_key
338 : */
339 0 : if (eckey->priv_key) {
340 0 : if (BN_cmp(eckey->priv_key, order) >= 0) {
341 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, EC_R_WRONG_ORDER);
342 0 : goto err;
343 : }
344 0 : if (!EC_POINT_mul(eckey->group, point, eckey->priv_key,
345 : NULL, NULL, ctx)) {
346 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, ERR_R_EC_LIB);
347 0 : goto err;
348 : }
349 0 : if (EC_POINT_cmp(eckey->group, point, eckey->pub_key, ctx) != 0) {
350 0 : ECerr(EC_F_EC_KEY_CHECK_KEY, EC_R_INVALID_PRIVATE_KEY);
351 0 : goto err;
352 : }
353 : }
354 : ok = 1;
355 : err:
356 0 : if (ctx != NULL)
357 0 : BN_CTX_free(ctx);
358 0 : if (point != NULL)
359 0 : EC_POINT_free(point);
360 0 : return (ok);
361 : }
362 :
363 0 : int EC_KEY_set_public_key_affine_coordinates(EC_KEY *key, BIGNUM *x,
364 : BIGNUM *y)
365 : {
366 : BN_CTX *ctx = NULL;
367 : BIGNUM *tx, *ty;
368 : EC_POINT *point = NULL;
369 : int ok = 0, tmp_nid, is_char_two = 0;
370 :
371 0 : if (!key || !key->group || !x || !y) {
372 0 : ECerr(EC_F_EC_KEY_SET_PUBLIC_KEY_AFFINE_COORDINATES,
373 : ERR_R_PASSED_NULL_PARAMETER);
374 0 : return 0;
375 : }
376 0 : ctx = BN_CTX_new();
377 0 : if (!ctx)
378 : goto err;
379 :
380 0 : point = EC_POINT_new(key->group);
381 :
382 0 : if (!point)
383 : goto err;
384 :
385 0 : tmp_nid = EC_METHOD_get_field_type(EC_GROUP_method_of(key->group));
386 :
387 0 : if (tmp_nid == NID_X9_62_characteristic_two_field)
388 : is_char_two = 1;
389 :
390 0 : tx = BN_CTX_get(ctx);
391 0 : ty = BN_CTX_get(ctx);
392 : #ifndef OPENSSL_NO_EC2M
393 0 : if (is_char_two) {
394 0 : if (!EC_POINT_set_affine_coordinates_GF2m(key->group, point,
395 : x, y, ctx))
396 : goto err;
397 0 : if (!EC_POINT_get_affine_coordinates_GF2m(key->group, point,
398 : tx, ty, ctx))
399 : goto err;
400 : } else
401 : #endif
402 : {
403 0 : if (!EC_POINT_set_affine_coordinates_GFp(key->group, point,
404 : x, y, ctx))
405 : goto err;
406 0 : if (!EC_POINT_get_affine_coordinates_GFp(key->group, point,
407 : tx, ty, ctx))
408 : goto err;
409 : }
410 : /*
411 : * Check if retrieved coordinates match originals: if not values are out
412 : * of range.
413 : */
414 0 : if (BN_cmp(x, tx) || BN_cmp(y, ty)) {
415 0 : ECerr(EC_F_EC_KEY_SET_PUBLIC_KEY_AFFINE_COORDINATES,
416 : EC_R_COORDINATES_OUT_OF_RANGE);
417 0 : goto err;
418 : }
419 :
420 0 : if (!EC_KEY_set_public_key(key, point))
421 : goto err;
422 :
423 0 : if (EC_KEY_check_key(key) == 0)
424 : goto err;
425 :
426 : ok = 1;
427 :
428 : err:
429 0 : if (ctx)
430 0 : BN_CTX_free(ctx);
431 0 : if (point)
432 0 : EC_POINT_free(point);
433 0 : return ok;
434 :
435 : }
436 :
437 2590 : const EC_GROUP *EC_KEY_get0_group(const EC_KEY *key)
438 : {
439 2590 : return key->group;
440 : }
441 :
442 1107 : int EC_KEY_set_group(EC_KEY *key, const EC_GROUP *group)
443 : {
444 1107 : if (key->group != NULL)
445 0 : EC_GROUP_free(key->group);
446 1107 : key->group = EC_GROUP_dup(group);
447 1107 : return (key->group == NULL) ? 0 : 1;
448 : }
449 :
450 1850 : const BIGNUM *EC_KEY_get0_private_key(const EC_KEY *key)
451 : {
452 1850 : return key->priv_key;
453 : }
454 :
455 367 : int EC_KEY_set_private_key(EC_KEY *key, const BIGNUM *priv_key)
456 : {
457 367 : if (key->priv_key)
458 0 : BN_clear_free(key->priv_key);
459 367 : key->priv_key = BN_dup(priv_key);
460 367 : return (key->priv_key == NULL) ? 0 : 1;
461 : }
462 :
463 2602 : const EC_POINT *EC_KEY_get0_public_key(const EC_KEY *key)
464 : {
465 2602 : return key->pub_key;
466 : }
467 :
468 370 : int EC_KEY_set_public_key(EC_KEY *key, const EC_POINT *pub_key)
469 : {
470 370 : if (key->pub_key != NULL)
471 0 : EC_POINT_free(key->pub_key);
472 370 : key->pub_key = EC_POINT_dup(pub_key, key->group);
473 370 : return (key->pub_key == NULL) ? 0 : 1;
474 : }
475 :
476 0 : unsigned int EC_KEY_get_enc_flags(const EC_KEY *key)
477 : {
478 0 : return key->enc_flag;
479 : }
480 :
481 0 : void EC_KEY_set_enc_flags(EC_KEY *key, unsigned int flags)
482 : {
483 0 : key->enc_flag = flags;
484 0 : }
485 :
486 0 : point_conversion_form_t EC_KEY_get_conv_form(const EC_KEY *key)
487 : {
488 0 : return key->conv_form;
489 : }
490 :
491 0 : void EC_KEY_set_conv_form(EC_KEY *key, point_conversion_form_t cform)
492 : {
493 0 : key->conv_form = cform;
494 0 : if (key->group != NULL)
495 0 : EC_GROUP_set_point_conversion_form(key->group, cform);
496 0 : }
497 :
498 737 : void *EC_KEY_get_key_method_data(EC_KEY *key,
499 : void *(*dup_func) (void *),
500 : void (*free_func) (void *),
501 : void (*clear_free_func) (void *))
502 : {
503 : void *ret;
504 :
505 737 : CRYPTO_r_lock(CRYPTO_LOCK_EC);
506 737 : ret =
507 737 : EC_EX_DATA_get_data(key->method_data, dup_func, free_func,
508 : clear_free_func);
509 737 : CRYPTO_r_unlock(CRYPTO_LOCK_EC);
510 :
511 737 : return ret;
512 : }
513 :
514 737 : void *EC_KEY_insert_key_method_data(EC_KEY *key, void *data,
515 : void *(*dup_func) (void *),
516 : void (*free_func) (void *),
517 : void (*clear_free_func) (void *))
518 : {
519 : EC_EXTRA_DATA *ex_data;
520 :
521 737 : CRYPTO_w_lock(CRYPTO_LOCK_EC);
522 737 : ex_data =
523 737 : EC_EX_DATA_get_data(key->method_data, dup_func, free_func,
524 : clear_free_func);
525 737 : if (ex_data == NULL)
526 737 : EC_EX_DATA_set_data(&key->method_data, data, dup_func, free_func,
527 : clear_free_func);
528 737 : CRYPTO_w_unlock(CRYPTO_LOCK_EC);
529 :
530 737 : return ex_data;
531 : }
532 :
533 0 : void EC_KEY_set_asn1_flag(EC_KEY *key, int flag)
534 : {
535 0 : if (key->group != NULL)
536 0 : EC_GROUP_set_asn1_flag(key->group, flag);
537 0 : }
538 :
539 0 : int EC_KEY_precompute_mult(EC_KEY *key, BN_CTX *ctx)
540 : {
541 0 : if (key->group == NULL)
542 : return 0;
543 0 : return EC_GROUP_precompute_mult(key->group, ctx);
544 : }
545 :
546 737 : int EC_KEY_get_flags(const EC_KEY *key)
547 : {
548 737 : return key->flags;
549 : }
550 :
551 0 : void EC_KEY_set_flags(EC_KEY *key, int flags)
552 : {
553 0 : key->flags |= flags;
554 0 : }
555 :
556 0 : void EC_KEY_clear_flags(EC_KEY *key, int flags)
557 : {
558 0 : key->flags &= ~flags;
559 0 : }
|