]>
Commit | Line | Data |
---|---|---|
38e3c581 | 1 | /* crypto/ec/ecp_nist.c */ |
5c6bf031 BM |
2 | /* |
3 | * Written by Nils Larsch for the OpenSSL project. | |
4 | */ | |
38e3c581 | 5 | /* ==================================================================== |
bd1217a1 | 6 | * Copyright (c) 1998-2003 The OpenSSL Project. All rights reserved. |
38e3c581 BM |
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 | */ | |
7793f30e BM |
58 | /* ==================================================================== |
59 | * Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED. | |
60 | * Portions of this software developed by SUN MICROSYSTEMS, INC., | |
61 | * and contributed to the OpenSSL project. | |
62 | */ | |
38e3c581 | 63 | |
73e45b2d | 64 | |
84b08eee | 65 | |
37942fab NL |
66 | #include <limits.h> |
67 | ||
5c6bf031 BM |
68 | #include <openssl/err.h> |
69 | #include <openssl/obj_mac.h> | |
38e3c581 | 70 | #include "ec_lcl.h" |
0657bf9c | 71 | |
0657bf9c BM |
72 | const EC_METHOD *EC_GFp_nist_method(void) |
73 | { | |
58fc6229 | 74 | static const EC_METHOD ret = { |
84b08eee | 75 | EC_FLAGS_DEFAULT_OCT, |
5c6bf031 | 76 | NID_X9_62_prime_field, |
a2dbcf36 BM |
77 | ec_GFp_simple_group_init, |
78 | ec_GFp_simple_group_finish, | |
79 | ec_GFp_simple_group_clear_finish, | |
e2c9c91b | 80 | ec_GFp_nist_group_copy, |
35b73a1f BM |
81 | ec_GFp_nist_group_set_curve, |
82 | ec_GFp_simple_group_get_curve, | |
7793f30e | 83 | ec_GFp_simple_group_get_degree, |
17d6bb81 | 84 | ec_GFp_simple_group_check_discriminant, |
58fc6229 BM |
85 | ec_GFp_simple_point_init, |
86 | ec_GFp_simple_point_finish, | |
87 | ec_GFp_simple_point_clear_finish, | |
88 | ec_GFp_simple_point_copy, | |
226cc7de | 89 | ec_GFp_simple_point_set_to_infinity, |
1d5bd6cf BM |
90 | ec_GFp_simple_set_Jprojective_coordinates_GFp, |
91 | ec_GFp_simple_get_Jprojective_coordinates_GFp, | |
35b73a1f BM |
92 | ec_GFp_simple_point_set_affine_coordinates, |
93 | ec_GFp_simple_point_get_affine_coordinates, | |
84b08eee | 94 | 0,0,0, |
58fc6229 BM |
95 | ec_GFp_simple_add, |
96 | ec_GFp_simple_dbl, | |
1d5bd6cf | 97 | ec_GFp_simple_invert, |
58fc6229 BM |
98 | ec_GFp_simple_is_at_infinity, |
99 | ec_GFp_simple_is_on_curve, | |
1d5bd6cf | 100 | ec_GFp_simple_cmp, |
58fc6229 | 101 | ec_GFp_simple_make_affine, |
48fe4d62 | 102 | ec_GFp_simple_points_make_affine, |
37c660ff BM |
103 | 0 /* mul */, |
104 | 0 /* precompute_mult */, | |
105 | 0 /* have_precompute_mult */, | |
60428dbf | 106 | ec_GFp_nist_field_mul, |
58fc6229 | 107 | ec_GFp_nist_field_sqr, |
7793f30e | 108 | 0 /* field_div */, |
156e8557 | 109 | 0 /* field_encode */, |
48fe4d62 BM |
110 | 0 /* field_decode */, |
111 | 0 /* field_set_to_one */ }; | |
0657bf9c BM |
112 | |
113 | return &ret; | |
114 | } | |
60428dbf | 115 | |
e2c9c91b BM |
116 | int ec_GFp_nist_group_copy(EC_GROUP *dest, const EC_GROUP *src) |
117 | { | |
118 | dest->field_mod_func = src->field_mod_func; | |
119 | ||
120 | return ec_GFp_simple_group_copy(dest, src); | |
121 | } | |
5c6bf031 BM |
122 | |
123 | int ec_GFp_nist_group_set_curve(EC_GROUP *group, const BIGNUM *p, | |
124 | const BIGNUM *a, const BIGNUM *b, BN_CTX *ctx) | |
125 | { | |
126 | int ret = 0; | |
127 | BN_CTX *new_ctx = NULL; | |
5c6bf031 BM |
128 | |
129 | if (ctx == NULL) | |
130 | if ((ctx = new_ctx = BN_CTX_new()) == NULL) return 0; | |
131 | ||
132 | BN_CTX_start(ctx); | |
5c6bf031 BM |
133 | |
134 | if (BN_ucmp(BN_get0_nist_prime_192(), p) == 0) | |
19b8d06a | 135 | group->field_mod_func = BN_nist_mod_192; |
5c6bf031 | 136 | else if (BN_ucmp(BN_get0_nist_prime_224(), p) == 0) |
19b8d06a | 137 | group->field_mod_func = BN_nist_mod_224; |
5c6bf031 | 138 | else if (BN_ucmp(BN_get0_nist_prime_256(), p) == 0) |
19b8d06a | 139 | group->field_mod_func = BN_nist_mod_256; |
5c6bf031 | 140 | else if (BN_ucmp(BN_get0_nist_prime_384(), p) == 0) |
19b8d06a | 141 | group->field_mod_func = BN_nist_mod_384; |
5c6bf031 | 142 | else if (BN_ucmp(BN_get0_nist_prime_521(), p) == 0) |
19b8d06a | 143 | group->field_mod_func = BN_nist_mod_521; |
5c6bf031 BM |
144 | else |
145 | { | |
aa4ce731 | 146 | ECerr(EC_F_EC_GFP_NIST_GROUP_SET_CURVE, EC_R_NOT_A_NIST_PRIME); |
5c6bf031 BM |
147 | goto err; |
148 | } | |
149 | ||
bd1217a1 | 150 | ret = ec_GFp_simple_group_set_curve(group, p, a, b, ctx); |
5c6bf031 BM |
151 | |
152 | err: | |
153 | BN_CTX_end(ctx); | |
154 | if (new_ctx != NULL) | |
155 | BN_CTX_free(new_ctx); | |
156 | return ret; | |
157 | } | |
158 | ||
a2dbcf36 | 159 | |
5c6bf031 BM |
160 | int ec_GFp_nist_field_mul(const EC_GROUP *group, BIGNUM *r, const BIGNUM *a, |
161 | const BIGNUM *b, BN_CTX *ctx) | |
162 | { | |
163 | int ret=0; | |
164 | BN_CTX *ctx_new=NULL; | |
60428dbf | 165 | |
5c6bf031 BM |
166 | if (!group || !r || !a || !b) |
167 | { | |
168 | ECerr(EC_F_EC_GFP_NIST_FIELD_MUL, ERR_R_PASSED_NULL_PARAMETER); | |
169 | goto err; | |
170 | } | |
171 | if (!ctx) | |
172 | if ((ctx_new = ctx = BN_CTX_new()) == NULL) goto err; | |
60428dbf | 173 | |
5c6bf031 | 174 | if (!BN_mul(r, a, b, ctx)) goto err; |
19b8d06a | 175 | if (!group->field_mod_func(r, r, &group->field, ctx)) |
5c6bf031 | 176 | goto err; |
60428dbf | 177 | |
5c6bf031 BM |
178 | ret=1; |
179 | err: | |
180 | if (ctx_new) | |
181 | BN_CTX_free(ctx_new); | |
182 | return ret; | |
183 | } | |
60428dbf | 184 | |
a2dbcf36 | 185 | |
5c6bf031 BM |
186 | int ec_GFp_nist_field_sqr(const EC_GROUP *group, BIGNUM *r, const BIGNUM *a, |
187 | BN_CTX *ctx) | |
188 | { | |
189 | int ret=0; | |
190 | BN_CTX *ctx_new=NULL; | |
60428dbf | 191 | |
5c6bf031 BM |
192 | if (!group || !r || !a) |
193 | { | |
194 | ECerr(EC_F_EC_GFP_NIST_FIELD_SQR, EC_R_PASSED_NULL_PARAMETER); | |
195 | goto err; | |
196 | } | |
197 | if (!ctx) | |
198 | if ((ctx_new = ctx = BN_CTX_new()) == NULL) goto err; | |
60428dbf | 199 | |
5c6bf031 | 200 | if (!BN_sqr(r, a, ctx)) goto err; |
19b8d06a | 201 | if (!group->field_mod_func(r, r, &group->field, ctx)) |
5c6bf031 | 202 | goto err; |
60428dbf | 203 | |
5c6bf031 BM |
204 | ret=1; |
205 | err: | |
206 | if (ctx_new) | |
207 | BN_CTX_free(ctx_new); | |
208 | return ret; | |
209 | } |