]>
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 | |
40720ce3 | 13 | * notice, this list of conditions and the following disclaimer. |
38e3c581 BM |
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 | |
37942fab NL |
64 | #include <limits.h> |
65 | ||
5c6bf031 BM |
66 | #include <openssl/err.h> |
67 | #include <openssl/obj_mac.h> | |
38e3c581 | 68 | #include "ec_lcl.h" |
0657bf9c | 69 | |
0657bf9c | 70 | const EC_METHOD *EC_GFp_nist_method(void) |
40720ce3 MC |
71 | { |
72 | static const EC_METHOD ret = { | |
73 | NID_X9_62_prime_field, | |
74 | ec_GFp_simple_group_init, | |
75 | ec_GFp_simple_group_finish, | |
76 | ec_GFp_simple_group_clear_finish, | |
77 | ec_GFp_nist_group_copy, | |
78 | ec_GFp_nist_group_set_curve, | |
79 | ec_GFp_simple_group_get_curve, | |
80 | ec_GFp_simple_group_get_degree, | |
81 | ec_GFp_simple_group_check_discriminant, | |
82 | ec_GFp_simple_point_init, | |
83 | ec_GFp_simple_point_finish, | |
84 | ec_GFp_simple_point_clear_finish, | |
85 | ec_GFp_simple_point_copy, | |
86 | ec_GFp_simple_point_set_to_infinity, | |
87 | ec_GFp_simple_set_Jprojective_coordinates_GFp, | |
88 | ec_GFp_simple_get_Jprojective_coordinates_GFp, | |
89 | ec_GFp_simple_point_set_affine_coordinates, | |
90 | ec_GFp_simple_point_get_affine_coordinates, | |
91 | ec_GFp_simple_set_compressed_coordinates, | |
92 | ec_GFp_simple_point2oct, | |
93 | ec_GFp_simple_oct2point, | |
94 | ec_GFp_simple_add, | |
95 | ec_GFp_simple_dbl, | |
96 | ec_GFp_simple_invert, | |
97 | ec_GFp_simple_is_at_infinity, | |
98 | ec_GFp_simple_is_on_curve, | |
99 | ec_GFp_simple_cmp, | |
100 | ec_GFp_simple_make_affine, | |
101 | ec_GFp_simple_points_make_affine, | |
102 | 0 /* mul */ , | |
103 | 0 /* precompute_mult */ , | |
104 | 0 /* have_precompute_mult */ , | |
105 | ec_GFp_nist_field_mul, | |
106 | ec_GFp_nist_field_sqr, | |
107 | 0 /* field_div */ , | |
108 | 0 /* field_encode */ , | |
109 | 0 /* field_decode */ , | |
110 | 0 /* field_set_to_one */ | |
111 | }; | |
112 | ||
113 | return &ret; | |
114 | } | |
60428dbf | 115 | |
fcb41c0e | 116 | #if BN_BITS2 == 64 |
40720ce3 | 117 | # define NO_32_BIT_TYPE |
5c6bf031 | 118 | #endif |
60428dbf | 119 | |
e2c9c91b | 120 | int ec_GFp_nist_group_copy(EC_GROUP *dest, const EC_GROUP *src) |
40720ce3 MC |
121 | { |
122 | dest->field_mod_func = src->field_mod_func; | |
e2c9c91b | 123 | |
40720ce3 MC |
124 | return ec_GFp_simple_group_copy(dest, src); |
125 | } | |
5c6bf031 BM |
126 | |
127 | int ec_GFp_nist_group_set_curve(EC_GROUP *group, const BIGNUM *p, | |
40720ce3 MC |
128 | const BIGNUM *a, const BIGNUM *b, BN_CTX *ctx) |
129 | { | |
130 | int ret = 0; | |
131 | BN_CTX *new_ctx = NULL; | |
132 | BIGNUM *tmp_bn; | |
133 | ||
134 | if (ctx == NULL) | |
135 | if ((ctx = new_ctx = BN_CTX_new()) == NULL) | |
136 | return 0; | |
137 | ||
138 | BN_CTX_start(ctx); | |
139 | if ((tmp_bn = BN_CTX_get(ctx)) == NULL) | |
140 | goto err; | |
141 | ||
142 | if (BN_ucmp(BN_get0_nist_prime_192(), p) == 0) | |
143 | group->field_mod_func = BN_nist_mod_192; | |
144 | else if (BN_ucmp(BN_get0_nist_prime_224(), p) == 0) { | |
6b695fef | 145 | #ifndef NO_32_BIT_TYPE |
40720ce3 | 146 | group->field_mod_func = BN_nist_mod_224; |
5c6bf031 | 147 | #else |
40720ce3 MC |
148 | ECerr(EC_F_EC_GFP_NIST_GROUP_SET_CURVE, |
149 | EC_R_NOT_A_SUPPORTED_NIST_PRIME); | |
150 | goto err; | |
5c6bf031 | 151 | #endif |
40720ce3 | 152 | } else if (BN_ucmp(BN_get0_nist_prime_256(), p) == 0) { |
6b695fef | 153 | #ifndef NO_32_BIT_TYPE |
40720ce3 | 154 | group->field_mod_func = BN_nist_mod_256; |
5c6bf031 | 155 | #else |
40720ce3 MC |
156 | ECerr(EC_F_EC_GFP_NIST_GROUP_SET_CURVE, |
157 | EC_R_NOT_A_SUPPORTED_NIST_PRIME); | |
158 | goto err; | |
5c6bf031 | 159 | #endif |
40720ce3 | 160 | } else if (BN_ucmp(BN_get0_nist_prime_384(), p) == 0) { |
6b695fef | 161 | #ifndef NO_32_BIT_TYPE |
40720ce3 | 162 | group->field_mod_func = BN_nist_mod_384; |
5c6bf031 | 163 | #else |
40720ce3 MC |
164 | ECerr(EC_F_EC_GFP_NIST_GROUP_SET_CURVE, |
165 | EC_R_NOT_A_SUPPORTED_NIST_PRIME); | |
166 | goto err; | |
5c6bf031 | 167 | #endif |
40720ce3 MC |
168 | } else if (BN_ucmp(BN_get0_nist_prime_521(), p) == 0) |
169 | /* this one works in the NO_32_BIT_TYPE case */ | |
170 | group->field_mod_func = BN_nist_mod_521; | |
171 | else { | |
172 | ECerr(EC_F_EC_GFP_NIST_GROUP_SET_CURVE, EC_R_NOT_A_NIST_PRIME); | |
173 | goto err; | |
174 | } | |
5c6bf031 | 175 | |
40720ce3 | 176 | ret = ec_GFp_simple_group_set_curve(group, p, a, b, ctx); |
5c6bf031 | 177 | |
40720ce3 MC |
178 | err: |
179 | BN_CTX_end(ctx); | |
180 | if (new_ctx != NULL) | |
181 | BN_CTX_free(new_ctx); | |
182 | return ret; | |
183 | } | |
a2dbcf36 | 184 | |
5c6bf031 | 185 | int ec_GFp_nist_field_mul(const EC_GROUP *group, BIGNUM *r, const BIGNUM *a, |
40720ce3 MC |
186 | const BIGNUM *b, BN_CTX *ctx) |
187 | { | |
188 | int ret = 0; | |
189 | BN_CTX *ctx_new = NULL; | |
190 | ||
191 | if (!group || !r || !a || !b) { | |
192 | ECerr(EC_F_EC_GFP_NIST_FIELD_MUL, ERR_R_PASSED_NULL_PARAMETER); | |
193 | goto err; | |
194 | } | |
195 | if (!ctx) | |
196 | if ((ctx_new = ctx = BN_CTX_new()) == NULL) | |
197 | goto err; | |
198 | ||
199 | if (!BN_mul(r, a, b, ctx)) | |
200 | goto err; | |
201 | if (!group->field_mod_func(r, r, &group->field, ctx)) | |
202 | goto err; | |
203 | ||
204 | ret = 1; | |
205 | err: | |
206 | if (ctx_new) | |
207 | BN_CTX_free(ctx_new); | |
208 | return ret; | |
209 | } | |
a2dbcf36 | 210 | |
5c6bf031 | 211 | int ec_GFp_nist_field_sqr(const EC_GROUP *group, BIGNUM *r, const BIGNUM *a, |
40720ce3 MC |
212 | BN_CTX *ctx) |
213 | { | |
214 | int ret = 0; | |
215 | BN_CTX *ctx_new = NULL; | |
216 | ||
217 | if (!group || !r || !a) { | |
218 | ECerr(EC_F_EC_GFP_NIST_FIELD_SQR, EC_R_PASSED_NULL_PARAMETER); | |
219 | goto err; | |
220 | } | |
221 | if (!ctx) | |
222 | if ((ctx_new = ctx = BN_CTX_new()) == NULL) | |
223 | goto err; | |
224 | ||
225 | if (!BN_sqr(r, a, ctx)) | |
226 | goto err; | |
227 | if (!group->field_mod_func(r, r, &group->field, ctx)) | |
228 | goto err; | |
229 | ||
230 | ret = 1; | |
231 | err: | |
232 | if (ctx_new) | |
233 | BN_CTX_free(ctx_new); | |
234 | return ret; | |
235 | } |