ec_lib.c
上传用户:yisoukefu
上传日期:2020-08-09
资源大小:39506k
文件大小:27k
源码类别:

其他游戏

开发平台:

Visual C++

  1. /* crypto/ec/ec_lib.c */
  2. /*
  3.  * Originally written by Bodo Moeller for the OpenSSL project.
  4.  */
  5. /* ====================================================================
  6.  * Copyright (c) 1998-2003 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.  * Binary polynomial ECC support in OpenSSL originally developed by 
  61.  * SUN MICROSYSTEMS, INC., and contributed to the OpenSSL project.
  62.  */
  63. #include <string.h>
  64. #include <openssl/err.h>
  65. #include <openssl/opensslv.h>
  66. #include "ec_lcl.h"
  67. static const char EC_version[] = "EC" OPENSSL_VERSION_PTEXT;
  68. /* functions for EC_GROUP objects */
  69. EC_GROUP *EC_GROUP_new(const EC_METHOD *meth)
  70. {
  71. EC_GROUP *ret;
  72. if (meth == NULL)
  73. {
  74. ECerr(EC_F_EC_GROUP_NEW, ERR_R_PASSED_NULL_PARAMETER);
  75. return NULL;
  76. }
  77. if (meth->group_init == 0)
  78. {
  79. ECerr(EC_F_EC_GROUP_NEW, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  80. return NULL;
  81. }
  82. ret = OPENSSL_malloc(sizeof *ret);
  83. if (ret == NULL)
  84. {
  85. ECerr(EC_F_EC_GROUP_NEW, ERR_R_MALLOC_FAILURE);
  86. return NULL;
  87. }
  88. ret->meth = meth;
  89. ret->extra_data = NULL;
  90. ret->generator = NULL;
  91. BN_init(&ret->order);
  92. BN_init(&ret->cofactor);
  93. ret->curve_name = 0;
  94. ret->asn1_flag  = 0;
  95. ret->asn1_form  = POINT_CONVERSION_UNCOMPRESSED;
  96. ret->seed = NULL;
  97. ret->seed_len = 0;
  98. if (!meth->group_init(ret))
  99. {
  100. OPENSSL_free(ret);
  101. return NULL;
  102. }
  103. return ret;
  104. }
  105. void EC_GROUP_free(EC_GROUP *group)
  106. {
  107. if (!group) return;
  108. if (group->meth->group_finish != 0)
  109. group->meth->group_finish(group);
  110. EC_EX_DATA_free_all_data(&group->extra_data);
  111. if (group->generator != NULL)
  112. EC_POINT_free(group->generator);
  113. BN_free(&group->order);
  114. BN_free(&group->cofactor);
  115. if (group->seed)
  116. OPENSSL_free(group->seed);
  117. OPENSSL_free(group);
  118. }
  119.  
  120. void EC_GROUP_clear_free(EC_GROUP *group)
  121. {
  122. if (!group) return;
  123. if (group->meth->group_clear_finish != 0)
  124. group->meth->group_clear_finish(group);
  125. else if (group->meth->group_finish != 0)
  126. group->meth->group_finish(group);
  127. EC_EX_DATA_clear_free_all_data(&group->extra_data);
  128. if (group->generator != NULL)
  129. EC_POINT_clear_free(group->generator);
  130. BN_clear_free(&group->order);
  131. BN_clear_free(&group->cofactor);
  132. if (group->seed)
  133. {
  134. OPENSSL_cleanse(group->seed, group->seed_len);
  135. OPENSSL_free(group->seed);
  136. }
  137. OPENSSL_cleanse(group, sizeof *group);
  138. OPENSSL_free(group);
  139. }
  140. int EC_GROUP_copy(EC_GROUP *dest, const EC_GROUP *src)
  141. {
  142. EC_EXTRA_DATA *d;
  143. if (dest->meth->group_copy == 0)
  144. {
  145. ECerr(EC_F_EC_GROUP_COPY, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  146. return 0;
  147. }
  148. if (dest->meth != src->meth)
  149. {
  150. ECerr(EC_F_EC_GROUP_COPY, EC_R_INCOMPATIBLE_OBJECTS);
  151. return 0;
  152. }
  153. if (dest == src)
  154. return 1;
  155. EC_EX_DATA_free_all_data(&dest->extra_data);
  156. for (d = src->extra_data; d != NULL; d = d->next)
  157. {
  158. void *t = d->dup_func(d->data);
  159. if (t == NULL)
  160. return 0;
  161. if (!EC_EX_DATA_set_data(&dest->extra_data, t, d->dup_func, d->free_func, d->clear_free_func))
  162. return 0;
  163. }
  164. if (src->generator != NULL)
  165. {
  166. if (dest->generator == NULL)
  167. {
  168. dest->generator = EC_POINT_new(dest);
  169. if (dest->generator == NULL) return 0;
  170. }
  171. if (!EC_POINT_copy(dest->generator, src->generator)) return 0;
  172. }
  173. else
  174. {
  175. /* src->generator == NULL */
  176. if (dest->generator != NULL)
  177. {
  178. EC_POINT_clear_free(dest->generator);
  179. dest->generator = NULL;
  180. }
  181. }
  182. if (!BN_copy(&dest->order, &src->order)) return 0;
  183. if (!BN_copy(&dest->cofactor, &src->cofactor)) return 0;
  184. dest->curve_name = src->curve_name;
  185. dest->asn1_flag  = src->asn1_flag;
  186. dest->asn1_form  = src->asn1_form;
  187. if (src->seed)
  188. {
  189. if (dest->seed)
  190. OPENSSL_free(dest->seed);
  191. dest->seed = OPENSSL_malloc(src->seed_len);
  192. if (dest->seed == NULL)
  193. return 0;
  194. if (!memcpy(dest->seed, src->seed, src->seed_len))
  195. return 0;
  196. dest->seed_len = src->seed_len;
  197. }
  198. else
  199. {
  200. if (dest->seed)
  201. OPENSSL_free(dest->seed);
  202. dest->seed = NULL;
  203. dest->seed_len = 0;
  204. }
  205. return dest->meth->group_copy(dest, src);
  206. }
  207. EC_GROUP *EC_GROUP_dup(const EC_GROUP *a)
  208. {
  209. EC_GROUP *t = NULL;
  210. int ok = 0;
  211. if (a == NULL) return NULL;
  212. if ((t = EC_GROUP_new(a->meth)) == NULL) return(NULL);
  213. if (!EC_GROUP_copy(t, a)) goto err;
  214. ok = 1;
  215.   err:
  216. if (!ok)
  217. {
  218. if (t) EC_GROUP_free(t);
  219. return NULL;
  220. }
  221. else return t;
  222. }
  223. const EC_METHOD *EC_GROUP_method_of(const EC_GROUP *group)
  224. {
  225. return group->meth;
  226. }
  227. int EC_METHOD_get_field_type(const EC_METHOD *meth)
  228.         {
  229.         return meth->field_type;
  230.         }
  231. int EC_GROUP_set_generator(EC_GROUP *group, const EC_POINT *generator, const BIGNUM *order, const BIGNUM *cofactor)
  232. {
  233. if (generator == NULL)
  234. {
  235. ECerr(EC_F_EC_GROUP_SET_GENERATOR, ERR_R_PASSED_NULL_PARAMETER);
  236. return 0   ;
  237. }
  238. if (group->generator == NULL)
  239. {
  240. group->generator = EC_POINT_new(group);
  241. if (group->generator == NULL) return 0;
  242. }
  243. if (!EC_POINT_copy(group->generator, generator)) return 0;
  244. if (order != NULL)
  245. { if (!BN_copy(&group->order, order)) return 0; }
  246. else
  247. BN_zero(&group->order);
  248. if (cofactor != NULL)
  249. { if (!BN_copy(&group->cofactor, cofactor)) return 0; }
  250. else
  251. BN_zero(&group->cofactor);
  252. return 1;
  253. }
  254. const EC_POINT *EC_GROUP_get0_generator(const EC_GROUP *group)
  255. {
  256. return group->generator;
  257. }
  258. int EC_GROUP_get_order(const EC_GROUP *group, BIGNUM *order, BN_CTX *ctx)
  259. {
  260. if (!BN_copy(order, &group->order))
  261. return 0;
  262. return !BN_is_zero(order);
  263. }
  264. int EC_GROUP_get_cofactor(const EC_GROUP *group, BIGNUM *cofactor, BN_CTX *ctx)
  265. {
  266. if (!BN_copy(cofactor, &group->cofactor))
  267. return 0;
  268. return !BN_is_zero(&group->cofactor);
  269. }
  270. void EC_GROUP_set_curve_name(EC_GROUP *group, int nid)
  271. {
  272. group->curve_name = nid;
  273. }
  274. int EC_GROUP_get_curve_name(const EC_GROUP *group)
  275. {
  276. return group->curve_name;
  277. }
  278. void EC_GROUP_set_asn1_flag(EC_GROUP *group, int flag)
  279. {
  280. group->asn1_flag = flag;
  281. }
  282. int EC_GROUP_get_asn1_flag(const EC_GROUP *group)
  283. {
  284. return group->asn1_flag;
  285. }
  286. void EC_GROUP_set_point_conversion_form(EC_GROUP *group, 
  287.                                         point_conversion_form_t form)
  288. {
  289. group->asn1_form = form;
  290. }
  291. point_conversion_form_t EC_GROUP_get_point_conversion_form(const EC_GROUP *group)
  292. {
  293. return group->asn1_form;
  294. }
  295. size_t EC_GROUP_set_seed(EC_GROUP *group, const unsigned char *p, size_t len)
  296. {
  297. if (group->seed)
  298. {
  299. OPENSSL_free(group->seed);
  300. group->seed = NULL;
  301. group->seed_len = 0;
  302. }
  303. if (!len || !p)
  304. return 1;
  305. if ((group->seed = OPENSSL_malloc(len)) == NULL)
  306. return 0;
  307. memcpy(group->seed, p, len);
  308. group->seed_len = len;
  309. return len;
  310. }
  311. unsigned char *EC_GROUP_get0_seed(const EC_GROUP *group)
  312. {
  313. return group->seed;
  314. }
  315. size_t EC_GROUP_get_seed_len(const EC_GROUP *group)
  316. {
  317. return group->seed_len;
  318. }
  319. int EC_GROUP_set_curve_GFp(EC_GROUP *group, const BIGNUM *p, const BIGNUM *a, const BIGNUM *b, BN_CTX *ctx)
  320. {
  321. if (group->meth->group_set_curve == 0)
  322. {
  323. ECerr(EC_F_EC_GROUP_SET_CURVE_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  324. return 0;
  325. }
  326. return group->meth->group_set_curve(group, p, a, b, ctx);
  327. }
  328. int EC_GROUP_get_curve_GFp(const EC_GROUP *group, BIGNUM *p, BIGNUM *a, BIGNUM *b, BN_CTX *ctx)
  329. {
  330. if (group->meth->group_get_curve == 0)
  331. {
  332. ECerr(EC_F_EC_GROUP_GET_CURVE_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  333. return 0;
  334. }
  335. return group->meth->group_get_curve(group, p, a, b, ctx);
  336. }
  337. int EC_GROUP_set_curve_GF2m(EC_GROUP *group, const BIGNUM *p, const BIGNUM *a, const BIGNUM *b, BN_CTX *ctx)
  338. {
  339. if (group->meth->group_set_curve == 0)
  340. {
  341. ECerr(EC_F_EC_GROUP_SET_CURVE_GF2M, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  342. return 0;
  343. }
  344. return group->meth->group_set_curve(group, p, a, b, ctx);
  345. }
  346. int EC_GROUP_get_curve_GF2m(const EC_GROUP *group, BIGNUM *p, BIGNUM *a, BIGNUM *b, BN_CTX *ctx)
  347. {
  348. if (group->meth->group_get_curve == 0)
  349. {
  350. ECerr(EC_F_EC_GROUP_GET_CURVE_GF2M, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  351. return 0;
  352. }
  353. return group->meth->group_get_curve(group, p, a, b, ctx);
  354. }
  355. int EC_GROUP_get_degree(const EC_GROUP *group)
  356. {
  357. if (group->meth->group_get_degree == 0)
  358. {
  359. ECerr(EC_F_EC_GROUP_GET_DEGREE, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  360. return 0;
  361. }
  362. return group->meth->group_get_degree(group);
  363. }
  364. int EC_GROUP_check_discriminant(const EC_GROUP *group, BN_CTX *ctx)
  365. {
  366. if (group->meth->group_check_discriminant == 0)
  367. {
  368. ECerr(EC_F_EC_GROUP_CHECK_DISCRIMINANT, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  369. return 0;
  370. }
  371. return group->meth->group_check_discriminant(group, ctx);
  372. }
  373. int EC_GROUP_cmp(const EC_GROUP *a, const EC_GROUP *b, BN_CTX *ctx)
  374. {
  375. int    r = 0;
  376. BIGNUM *a1, *a2, *a3, *b1, *b2, *b3;
  377. BN_CTX *ctx_new = NULL;
  378. /* compare the field types*/
  379. if (EC_METHOD_get_field_type(EC_GROUP_method_of(a)) !=
  380.     EC_METHOD_get_field_type(EC_GROUP_method_of(b)))
  381. return 1;
  382. /* compare the curve name (if present) */
  383. if (EC_GROUP_get_curve_name(a) && EC_GROUP_get_curve_name(b) &&
  384.     EC_GROUP_get_curve_name(a) == EC_GROUP_get_curve_name(b))
  385. return 0;
  386. if (!ctx)
  387. ctx_new = ctx = BN_CTX_new();
  388. if (!ctx)
  389. return -1;
  390. BN_CTX_start(ctx);
  391. a1 = BN_CTX_get(ctx);
  392. a2 = BN_CTX_get(ctx);
  393. a3 = BN_CTX_get(ctx);
  394. b1 = BN_CTX_get(ctx);
  395. b2 = BN_CTX_get(ctx);
  396. b3 = BN_CTX_get(ctx);
  397. if (!b3)
  398. {
  399. BN_CTX_end(ctx);
  400. if (ctx_new)
  401. BN_CTX_free(ctx);
  402. return -1;
  403. }
  404. /* XXX This approach assumes that the external representation
  405.  * of curves over the same field type is the same.
  406.  */
  407. if (!a->meth->group_get_curve(a, a1, a2, a3, ctx) ||
  408.     !b->meth->group_get_curve(b, b1, b2, b3, ctx))
  409. r = 1;
  410. if (r || BN_cmp(a1, b1) || BN_cmp(a2, b2) || BN_cmp(a3, b3))
  411. r = 1;
  412. /* XXX EC_POINT_cmp() assumes that the methods are equal */
  413. if (r || EC_POINT_cmp(a, EC_GROUP_get0_generator(a),
  414.     EC_GROUP_get0_generator(b), ctx))
  415. r = 1;
  416. if (!r)
  417. {
  418. /* compare the order and cofactor */
  419. if (!EC_GROUP_get_order(a, a1, ctx) ||
  420.     !EC_GROUP_get_order(b, b1, ctx) ||
  421.     !EC_GROUP_get_cofactor(a, a2, ctx) ||
  422.     !EC_GROUP_get_cofactor(b, b2, ctx))
  423. {
  424. BN_CTX_end(ctx);
  425. if (ctx_new)
  426. BN_CTX_free(ctx);
  427. return -1;
  428. }
  429. if (BN_cmp(a1, b1) || BN_cmp(a2, b2))
  430. r = 1;
  431. }
  432. BN_CTX_end(ctx);
  433. if (ctx_new)
  434. BN_CTX_free(ctx);
  435. return r;
  436. }
  437. /* this has 'package' visibility */
  438. int EC_EX_DATA_set_data(EC_EXTRA_DATA **ex_data, void *data,
  439. void *(*dup_func)(void *), void (*free_func)(void *), void (*clear_free_func)(void *))
  440. {
  441. EC_EXTRA_DATA *d;
  442. if (ex_data == NULL)
  443. return 0;
  444. for (d = *ex_data; d != NULL; d = d->next)
  445. {
  446. if (d->dup_func == dup_func && d->free_func == free_func && d->clear_free_func == clear_free_func)
  447. {
  448. ECerr(EC_F_EC_EX_DATA_SET_DATA, EC_R_SLOT_FULL);
  449. return 0;
  450. }
  451. }
  452. if (data == NULL)
  453. /* no explicit entry needed */
  454. return 1;
  455. d = OPENSSL_malloc(sizeof *d);
  456. if (d == NULL)
  457. return 0;
  458. d->data = data;
  459. d->dup_func = dup_func;
  460. d->free_func = free_func;
  461. d->clear_free_func = clear_free_func;
  462. d->next = *ex_data;
  463. *ex_data = d;
  464. return 1;
  465. }
  466. /* this has 'package' visibility */
  467. void *EC_EX_DATA_get_data(const EC_EXTRA_DATA *ex_data,
  468. void *(*dup_func)(void *), void (*free_func)(void *), void (*clear_free_func)(void *))
  469. {
  470. const EC_EXTRA_DATA *d;
  471. for (d = ex_data; d != NULL; d = d->next)
  472. {
  473. if (d->dup_func == dup_func && d->free_func == free_func && d->clear_free_func == clear_free_func)
  474. return d->data;
  475. }
  476. return NULL;
  477. }
  478. /* this has 'package' visibility */
  479. void EC_EX_DATA_free_data(EC_EXTRA_DATA **ex_data,
  480. void *(*dup_func)(void *), void (*free_func)(void *), void (*clear_free_func)(void *))
  481. {
  482. EC_EXTRA_DATA **p;
  483. if (ex_data == NULL)
  484. return;
  485. for (p = ex_data; *p != NULL; p = &((*p)->next))
  486. {
  487. if ((*p)->dup_func == dup_func && (*p)->free_func == free_func && (*p)->clear_free_func == clear_free_func)
  488. {
  489. EC_EXTRA_DATA *next = (*p)->next;
  490. (*p)->free_func((*p)->data);
  491. OPENSSL_free(*p);
  492. *p = next;
  493. return;
  494. }
  495. }
  496. }
  497. /* this has 'package' visibility */
  498. void EC_EX_DATA_clear_free_data(EC_EXTRA_DATA **ex_data,
  499. void *(*dup_func)(void *), void (*free_func)(void *), void (*clear_free_func)(void *))
  500. {
  501. EC_EXTRA_DATA **p;
  502. if (ex_data == NULL)
  503. return;
  504. for (p = ex_data; *p != NULL; p = &((*p)->next))
  505. {
  506. if ((*p)->dup_func == dup_func && (*p)->free_func == free_func && (*p)->clear_free_func == clear_free_func)
  507. {
  508. EC_EXTRA_DATA *next = (*p)->next;
  509. (*p)->clear_free_func((*p)->data);
  510. OPENSSL_free(*p);
  511. *p = next;
  512. return;
  513. }
  514. }
  515. }
  516. /* this has 'package' visibility */
  517. void EC_EX_DATA_free_all_data(EC_EXTRA_DATA **ex_data)
  518. {
  519. EC_EXTRA_DATA *d;
  520. if (ex_data == NULL)
  521. return;
  522. d = *ex_data;
  523. while (d)
  524. {
  525. EC_EXTRA_DATA *next = d->next;
  526. d->free_func(d->data);
  527. OPENSSL_free(d);
  528. d = next;
  529. }
  530. *ex_data = NULL;
  531. }
  532. /* this has 'package' visibility */
  533. void EC_EX_DATA_clear_free_all_data(EC_EXTRA_DATA **ex_data)
  534. {
  535. EC_EXTRA_DATA *d;
  536. if (ex_data == NULL)
  537. return;
  538. d = *ex_data;
  539. while (d)
  540. {
  541. EC_EXTRA_DATA *next = d->next;
  542. d->clear_free_func(d->data);
  543. OPENSSL_free(d);
  544. d = next;
  545. }
  546. *ex_data = NULL;
  547. }
  548. /* functions for EC_POINT objects */
  549. EC_POINT *EC_POINT_new(const EC_GROUP *group)
  550. {
  551. EC_POINT *ret;
  552. if (group == NULL)
  553. {
  554. ECerr(EC_F_EC_POINT_NEW, ERR_R_PASSED_NULL_PARAMETER);
  555. return NULL;
  556. }
  557. if (group->meth->point_init == 0)
  558. {
  559. ECerr(EC_F_EC_POINT_NEW, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  560. return NULL;
  561. }
  562. ret = OPENSSL_malloc(sizeof *ret);
  563. if (ret == NULL)
  564. {
  565. ECerr(EC_F_EC_POINT_NEW, ERR_R_MALLOC_FAILURE);
  566. return NULL;
  567. }
  568. ret->meth = group->meth;
  569. if (!ret->meth->point_init(ret))
  570. {
  571. OPENSSL_free(ret);
  572. return NULL;
  573. }
  574. return ret;
  575. }
  576. void EC_POINT_free(EC_POINT *point)
  577. {
  578. if (!point) return;
  579. if (point->meth->point_finish != 0)
  580. point->meth->point_finish(point);
  581. OPENSSL_free(point);
  582. }
  583.  
  584. void EC_POINT_clear_free(EC_POINT *point)
  585. {
  586. if (!point) return;
  587. if (point->meth->point_clear_finish != 0)
  588. point->meth->point_clear_finish(point);
  589. else if (point->meth != NULL && point->meth->point_finish != 0)
  590. point->meth->point_finish(point);
  591. OPENSSL_cleanse(point, sizeof *point);
  592. OPENSSL_free(point);
  593. }
  594. int EC_POINT_copy(EC_POINT *dest, const EC_POINT *src)
  595. {
  596. if (dest->meth->point_copy == 0)
  597. {
  598. ECerr(EC_F_EC_POINT_COPY, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  599. return 0;
  600. }
  601. if (dest->meth != src->meth)
  602. {
  603. ECerr(EC_F_EC_POINT_COPY, EC_R_INCOMPATIBLE_OBJECTS);
  604. return 0;
  605. }
  606. if (dest == src)
  607. return 1;
  608. return dest->meth->point_copy(dest, src);
  609. }
  610. EC_POINT *EC_POINT_dup(const EC_POINT *a, const EC_GROUP *group)
  611. {
  612. EC_POINT *t;
  613. int r;
  614. if (a == NULL) return NULL;
  615. t = EC_POINT_new(group);
  616. if (t == NULL) return(NULL);
  617. r = EC_POINT_copy(t, a);
  618. if (!r)
  619. {
  620. EC_POINT_free(t);
  621. return NULL;
  622. }
  623. else return t;
  624. }
  625. const EC_METHOD *EC_POINT_method_of(const EC_POINT *point)
  626. {
  627. return point->meth;
  628. }
  629. int EC_POINT_set_to_infinity(const EC_GROUP *group, EC_POINT *point)
  630. {
  631. if (group->meth->point_set_to_infinity == 0)
  632. {
  633. ECerr(EC_F_EC_POINT_SET_TO_INFINITY, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  634. return 0;
  635. }
  636. if (group->meth != point->meth)
  637. {
  638. ECerr(EC_F_EC_POINT_SET_TO_INFINITY, EC_R_INCOMPATIBLE_OBJECTS);
  639. return 0;
  640. }
  641. return group->meth->point_set_to_infinity(group, point);
  642. }
  643. int EC_POINT_set_Jprojective_coordinates_GFp(const EC_GROUP *group, EC_POINT *point,
  644. const BIGNUM *x, const BIGNUM *y, const BIGNUM *z, BN_CTX *ctx)
  645. {
  646. if (group->meth->point_set_Jprojective_coordinates_GFp == 0)
  647. {
  648. ECerr(EC_F_EC_POINT_SET_JPROJECTIVE_COORDINATES_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  649. return 0;
  650. }
  651. if (group->meth != point->meth)
  652. {
  653. ECerr(EC_F_EC_POINT_SET_JPROJECTIVE_COORDINATES_GFP, EC_R_INCOMPATIBLE_OBJECTS);
  654. return 0;
  655. }
  656. return group->meth->point_set_Jprojective_coordinates_GFp(group, point, x, y, z, ctx);
  657. }
  658. int EC_POINT_get_Jprojective_coordinates_GFp(const EC_GROUP *group, const EC_POINT *point,
  659. BIGNUM *x, BIGNUM *y, BIGNUM *z, BN_CTX *ctx)
  660. {
  661. if (group->meth->point_get_Jprojective_coordinates_GFp == 0)
  662. {
  663. ECerr(EC_F_EC_POINT_GET_JPROJECTIVE_COORDINATES_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  664. return 0;
  665. }
  666. if (group->meth != point->meth)
  667. {
  668. ECerr(EC_F_EC_POINT_GET_JPROJECTIVE_COORDINATES_GFP, EC_R_INCOMPATIBLE_OBJECTS);
  669. return 0;
  670. }
  671. return group->meth->point_get_Jprojective_coordinates_GFp(group, point, x, y, z, ctx);
  672. }
  673. int EC_POINT_set_affine_coordinates_GFp(const EC_GROUP *group, EC_POINT *point,
  674. const BIGNUM *x, const BIGNUM *y, BN_CTX *ctx)
  675. {
  676. if (group->meth->point_set_affine_coordinates == 0)
  677. {
  678. ECerr(EC_F_EC_POINT_SET_AFFINE_COORDINATES_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  679. return 0;
  680. }
  681. if (group->meth != point->meth)
  682. {
  683. ECerr(EC_F_EC_POINT_SET_AFFINE_COORDINATES_GFP, EC_R_INCOMPATIBLE_OBJECTS);
  684. return 0;
  685. }
  686. return group->meth->point_set_affine_coordinates(group, point, x, y, ctx);
  687. }
  688. int EC_POINT_set_affine_coordinates_GF2m(const EC_GROUP *group, EC_POINT *point,
  689. const BIGNUM *x, const BIGNUM *y, BN_CTX *ctx)
  690. {
  691. if (group->meth->point_set_affine_coordinates == 0)
  692. {
  693. ECerr(EC_F_EC_POINT_SET_AFFINE_COORDINATES_GF2M, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  694. return 0;
  695. }
  696. if (group->meth != point->meth)
  697. {
  698. ECerr(EC_F_EC_POINT_SET_AFFINE_COORDINATES_GF2M, EC_R_INCOMPATIBLE_OBJECTS);
  699. return 0;
  700. }
  701. return group->meth->point_set_affine_coordinates(group, point, x, y, ctx);
  702. }
  703. int EC_POINT_get_affine_coordinates_GFp(const EC_GROUP *group, const EC_POINT *point,
  704. BIGNUM *x, BIGNUM *y, BN_CTX *ctx)
  705. {
  706. if (group->meth->point_get_affine_coordinates == 0)
  707. {
  708. ECerr(EC_F_EC_POINT_GET_AFFINE_COORDINATES_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  709. return 0;
  710. }
  711. if (group->meth != point->meth)
  712. {
  713. ECerr(EC_F_EC_POINT_GET_AFFINE_COORDINATES_GFP, EC_R_INCOMPATIBLE_OBJECTS);
  714. return 0;
  715. }
  716. return group->meth->point_get_affine_coordinates(group, point, x, y, ctx);
  717. }
  718. int EC_POINT_get_affine_coordinates_GF2m(const EC_GROUP *group, const EC_POINT *point,
  719. BIGNUM *x, BIGNUM *y, BN_CTX *ctx)
  720. {
  721. if (group->meth->point_get_affine_coordinates == 0)
  722. {
  723. ECerr(EC_F_EC_POINT_GET_AFFINE_COORDINATES_GF2M, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  724. return 0;
  725. }
  726. if (group->meth != point->meth)
  727. {
  728. ECerr(EC_F_EC_POINT_GET_AFFINE_COORDINATES_GF2M, EC_R_INCOMPATIBLE_OBJECTS);
  729. return 0;
  730. }
  731. return group->meth->point_get_affine_coordinates(group, point, x, y, ctx);
  732. }
  733. int EC_POINT_set_compressed_coordinates_GFp(const EC_GROUP *group, EC_POINT *point,
  734. const BIGNUM *x, int y_bit, BN_CTX *ctx)
  735. {
  736. if (group->meth->point_set_compressed_coordinates == 0)
  737. {
  738. ECerr(EC_F_EC_POINT_SET_COMPRESSED_COORDINATES_GFP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  739. return 0;
  740. }
  741. if (group->meth != point->meth)
  742. {
  743. ECerr(EC_F_EC_POINT_SET_COMPRESSED_COORDINATES_GFP, EC_R_INCOMPATIBLE_OBJECTS);
  744. return 0;
  745. }
  746. return group->meth->point_set_compressed_coordinates(group, point, x, y_bit, ctx);
  747. }
  748. int EC_POINT_set_compressed_coordinates_GF2m(const EC_GROUP *group, EC_POINT *point,
  749. const BIGNUM *x, int y_bit, BN_CTX *ctx)
  750. {
  751. if (group->meth->point_set_compressed_coordinates == 0)
  752. {
  753. ECerr(EC_F_EC_POINT_SET_COMPRESSED_COORDINATES_GF2M, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  754. return 0;
  755. }
  756. if (group->meth != point->meth)
  757. {
  758. ECerr(EC_F_EC_POINT_SET_COMPRESSED_COORDINATES_GF2M, EC_R_INCOMPATIBLE_OBJECTS);
  759. return 0;
  760. }
  761. return group->meth->point_set_compressed_coordinates(group, point, x, y_bit, ctx);
  762. }
  763. size_t EC_POINT_point2oct(const EC_GROUP *group, const EC_POINT *point, point_conversion_form_t form,
  764.         unsigned char *buf, size_t len, BN_CTX *ctx)
  765. {
  766. if (group->meth->point2oct == 0)
  767. {
  768. ECerr(EC_F_EC_POINT_POINT2OCT, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  769. return 0;
  770. }
  771. if (group->meth != point->meth)
  772. {
  773. ECerr(EC_F_EC_POINT_POINT2OCT, EC_R_INCOMPATIBLE_OBJECTS);
  774. return 0;
  775. }
  776. return group->meth->point2oct(group, point, form, buf, len, ctx);
  777. }
  778. int EC_POINT_oct2point(const EC_GROUP *group, EC_POINT *point,
  779.         const unsigned char *buf, size_t len, BN_CTX *ctx)
  780. {
  781. if (group->meth->oct2point == 0)
  782. {
  783. ECerr(EC_F_EC_POINT_OCT2POINT, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  784. return 0;
  785. }
  786. if (group->meth != point->meth)
  787. {
  788. ECerr(EC_F_EC_POINT_OCT2POINT, EC_R_INCOMPATIBLE_OBJECTS);
  789. return 0;
  790. }
  791. return group->meth->oct2point(group, point, buf, len, ctx);
  792. }
  793. int EC_POINT_add(const EC_GROUP *group, EC_POINT *r, const EC_POINT *a, const EC_POINT *b, BN_CTX *ctx)
  794. {
  795. if (group->meth->add == 0)
  796. {
  797. ECerr(EC_F_EC_POINT_ADD, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  798. return 0;
  799. }
  800. if ((group->meth != r->meth) || (r->meth != a->meth) || (a->meth != b->meth))
  801. {
  802. ECerr(EC_F_EC_POINT_ADD, EC_R_INCOMPATIBLE_OBJECTS);
  803. return 0;
  804. }
  805. return group->meth->add(group, r, a, b, ctx);
  806. }
  807. int EC_POINT_dbl(const EC_GROUP *group, EC_POINT *r, const EC_POINT *a, BN_CTX *ctx)
  808. {
  809. if (group->meth->dbl == 0)
  810. {
  811. ECerr(EC_F_EC_POINT_DBL, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  812. return 0;
  813. }
  814. if ((group->meth != r->meth) || (r->meth != a->meth))
  815. {
  816. ECerr(EC_F_EC_POINT_DBL, EC_R_INCOMPATIBLE_OBJECTS);
  817. return 0;
  818. }
  819. return group->meth->dbl(group, r, a, ctx);
  820. }
  821. int EC_POINT_invert(const EC_GROUP *group, EC_POINT *a, BN_CTX *ctx)
  822. {
  823. if (group->meth->dbl == 0)
  824. {
  825. ECerr(EC_F_EC_POINT_INVERT, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  826. return 0;
  827. }
  828. if (group->meth != a->meth)
  829. {
  830. ECerr(EC_F_EC_POINT_INVERT, EC_R_INCOMPATIBLE_OBJECTS);
  831. return 0;
  832. }
  833. return group->meth->invert(group, a, ctx);
  834. }
  835. int EC_POINT_is_at_infinity(const EC_GROUP *group, const EC_POINT *point)
  836. {
  837. if (group->meth->is_at_infinity == 0)
  838. {
  839. ECerr(EC_F_EC_POINT_IS_AT_INFINITY, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  840. return 0;
  841. }
  842. if (group->meth != point->meth)
  843. {
  844. ECerr(EC_F_EC_POINT_IS_AT_INFINITY, EC_R_INCOMPATIBLE_OBJECTS);
  845. return 0;
  846. }
  847. return group->meth->is_at_infinity(group, point);
  848. }
  849. int EC_POINT_is_on_curve(const EC_GROUP *group, const EC_POINT *point, BN_CTX *ctx)
  850. {
  851. if (group->meth->is_on_curve == 0)
  852. {
  853. ECerr(EC_F_EC_POINT_IS_ON_CURVE, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  854. return 0;
  855. }
  856. if (group->meth != point->meth)
  857. {
  858. ECerr(EC_F_EC_POINT_IS_ON_CURVE, EC_R_INCOMPATIBLE_OBJECTS);
  859. return 0;
  860. }
  861. return group->meth->is_on_curve(group, point, ctx);
  862. }
  863. int EC_POINT_cmp(const EC_GROUP *group, const EC_POINT *a, const EC_POINT *b, BN_CTX *ctx)
  864. {
  865. if (group->meth->point_cmp == 0)
  866. {
  867. ECerr(EC_F_EC_POINT_CMP, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  868. return 0;
  869. }
  870. if ((group->meth != a->meth) || (a->meth != b->meth))
  871. {
  872. ECerr(EC_F_EC_POINT_CMP, EC_R_INCOMPATIBLE_OBJECTS);
  873. return 0;
  874. }
  875. return group->meth->point_cmp(group, a, b, ctx);
  876. }
  877. int EC_POINT_make_affine(const EC_GROUP *group, EC_POINT *point, BN_CTX *ctx)
  878. {
  879. if (group->meth->make_affine == 0)
  880. {
  881. ECerr(EC_F_EC_POINT_MAKE_AFFINE, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  882. return 0;
  883. }
  884. if (group->meth != point->meth)
  885. {
  886. ECerr(EC_F_EC_POINT_MAKE_AFFINE, EC_R_INCOMPATIBLE_OBJECTS);
  887. return 0;
  888. }
  889. return group->meth->make_affine(group, point, ctx);
  890. }
  891. int EC_POINTs_make_affine(const EC_GROUP *group, size_t num, EC_POINT *points[], BN_CTX *ctx)
  892. {
  893. size_t i;
  894. if (group->meth->points_make_affine == 0)
  895. {
  896. ECerr(EC_F_EC_POINTS_MAKE_AFFINE, ERR_R_SHOULD_NOT_HAVE_BEEN_CALLED);
  897. return 0;
  898. }
  899. for (i = 0; i < num; i++)
  900. {
  901. if (group->meth != points[i]->meth)
  902. {
  903. ECerr(EC_F_EC_POINTS_MAKE_AFFINE, EC_R_INCOMPATIBLE_OBJECTS);
  904. return 0;
  905. }
  906. }
  907. return group->meth->points_make_affine(group, num, points, ctx);
  908. }
  909. /* Functions for point multiplication.
  910.  *
  911.  * If group->meth->mul is 0, we use the wNAF-based implementations in ec_mult.c;
  912.  * otherwise we dispatch through methods.
  913.  */
  914. int EC_POINTs_mul(const EC_GROUP *group, EC_POINT *r, const BIGNUM *scalar,
  915. size_t num, const EC_POINT *points[], const BIGNUM *scalars[], BN_CTX *ctx)
  916. {
  917. if (group->meth->mul == 0)
  918. /* use default */
  919. return ec_wNAF_mul(group, r, scalar, num, points, scalars, ctx);
  920. return group->meth->mul(group, r, scalar, num, points, scalars, ctx);
  921. }
  922. int EC_POINT_mul(const EC_GROUP *group, EC_POINT *r, const BIGNUM *g_scalar,
  923. const EC_POINT *point, const BIGNUM *p_scalar, BN_CTX *ctx)
  924. {
  925. /* just a convenient interface to EC_POINTs_mul() */
  926. const EC_POINT *points[1];
  927. const BIGNUM *scalars[1];
  928. points[0] = point;
  929. scalars[0] = p_scalar;
  930. return EC_POINTs_mul(group, r, g_scalar, (point != NULL && p_scalar != NULL), points, scalars, ctx);
  931. }
  932. int EC_GROUP_precompute_mult(EC_GROUP *group, BN_CTX *ctx)
  933. {
  934. if (group->meth->mul == 0)
  935. /* use default */
  936. return ec_wNAF_precompute_mult(group, ctx);
  937. if (group->meth->precompute_mult != 0)
  938. return group->meth->precompute_mult(group, ctx);
  939. else
  940. return 1; /* nothing to do, so report success */
  941. }
  942. int EC_GROUP_have_precompute_mult(const EC_GROUP *group)
  943. {
  944. if (group->meth->mul == 0)
  945. /* use default */
  946. return ec_wNAF_have_precompute_mult(group);
  947. if (group->meth->have_precompute_mult != 0)
  948. return group->meth->have_precompute_mult(group);
  949. else
  950. return 0; /* cannot tell whether precomputation has been performed */
  951. }