Commit | Line | Data |
---|---|---|
56276539 SS |
1 | /* crypto/ecdsa/ecs_lib.c */ |
2 | /* ==================================================================== | |
3 | * Copyright (c) 1998-2005 The OpenSSL Project. All rights reserved. | |
4 | * | |
5 | * Redistribution and use in source and binary forms, with or without | |
6 | * modification, are permitted provided that the following conditions | |
7 | * are met: | |
8 | * | |
9 | * 1. Redistributions of source code must retain the above copyright | |
9eaaad39 | 10 | * notice, this list of conditions and the following disclaimer. |
56276539 SS |
11 | * |
12 | * 2. Redistributions in binary form must reproduce the above copyright | |
13 | * notice, this list of conditions and the following disclaimer in | |
14 | * the documentation and/or other materials provided with the | |
15 | * distribution. | |
16 | * | |
17 | * 3. All advertising materials mentioning features or use of this | |
18 | * software must display the following acknowledgment: | |
19 | * "This product includes software developed by the OpenSSL Project | |
20 | * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | |
21 | * | |
22 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | |
23 | * endorse or promote products derived from this software without | |
24 | * prior written permission. For written permission, please contact | |
25 | * openssl-core@OpenSSL.org. | |
26 | * | |
27 | * 5. Products derived from this software may not be called "OpenSSL" | |
28 | * nor may "OpenSSL" appear in their names without prior written | |
29 | * permission of the OpenSSL Project. | |
30 | * | |
31 | * 6. Redistributions of any form whatsoever must retain the following | |
32 | * acknowledgment: | |
33 | * "This product includes software developed by the OpenSSL Project | |
34 | * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | |
35 | * | |
36 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | |
37 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
38 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | |
39 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | |
40 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | |
41 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
42 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | |
43 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
44 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | |
45 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | |
46 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | |
47 | * OF THE POSSIBILITY OF SUCH DAMAGE. | |
48 | * ==================================================================== | |
49 | * | |
50 | * This product includes cryptographic software written by Eric Young | |
51 | * (eay@cryptsoft.com). This product includes software written by Tim | |
52 | * Hudson (tjh@cryptsoft.com). | |
53 | * | |
54 | */ | |
55 | ||
56 | #include <string.h> | |
57 | #include "ecs_locl.h" | |
58 | #ifndef OPENSSL_NO_ENGINE | |
9eaaad39 | 59 | # include <openssl/engine.h> |
56276539 SS |
60 | #endif |
61 | #include <openssl/err.h> | |
62 | #include <openssl/bn.h> | |
672590bc | 63 | #ifdef OPENSSL_FIPS |
9eaaad39 | 64 | # include <openssl/fips.h> |
672590bc | 65 | #endif |
56276539 | 66 | |
9eaaad39 | 67 | const char ECDSA_version[] = "ECDSA" OPENSSL_VERSION_PTEXT; |
56276539 SS |
68 | |
69 | static const ECDSA_METHOD *default_ECDSA_method = NULL; | |
70 | ||
71 | static void *ecdsa_data_new(void); | |
72 | static void *ecdsa_data_dup(void *); | |
9eaaad39 | 73 | static void ecdsa_data_free(void *); |
56276539 SS |
74 | |
75 | void ECDSA_set_default_method(const ECDSA_METHOD *meth) | |
76 | { | |
9eaaad39 | 77 | default_ECDSA_method = meth; |
56276539 SS |
78 | } |
79 | ||
80 | const ECDSA_METHOD *ECDSA_get_default_method(void) | |
81 | { | |
9eaaad39 | 82 | if (!default_ECDSA_method) { |
672590bc | 83 | #ifdef OPENSSL_FIPS |
9eaaad39 SW |
84 | if (FIPS_mode()) |
85 | return FIPS_ecdsa_openssl(); | |
86 | else | |
87 | return ECDSA_OpenSSL(); | |
672590bc | 88 | #else |
9eaaad39 | 89 | default_ECDSA_method = ECDSA_OpenSSL(); |
672590bc | 90 | #endif |
9eaaad39 SW |
91 | } |
92 | return default_ECDSA_method; | |
56276539 SS |
93 | } |
94 | ||
95 | int ECDSA_set_method(EC_KEY *eckey, const ECDSA_METHOD *meth) | |
96 | { | |
9eaaad39 | 97 | ECDSA_DATA *ecdsa; |
56276539 | 98 | |
9eaaad39 | 99 | ecdsa = ecdsa_check(eckey); |
56276539 | 100 | |
9eaaad39 SW |
101 | if (ecdsa == NULL) |
102 | return 0; | |
56276539 | 103 | |
56276539 | 104 | #ifndef OPENSSL_NO_ENGINE |
9eaaad39 SW |
105 | if (ecdsa->engine) { |
106 | ENGINE_finish(ecdsa->engine); | |
107 | ecdsa->engine = NULL; | |
108 | } | |
56276539 | 109 | #endif |
9eaaad39 | 110 | ecdsa->meth = meth; |
56276539 | 111 | |
9eaaad39 | 112 | return 1; |
56276539 SS |
113 | } |
114 | ||
115 | static ECDSA_DATA *ECDSA_DATA_new_method(ENGINE *engine) | |
116 | { | |
9eaaad39 | 117 | ECDSA_DATA *ret; |
56276539 | 118 | |
9eaaad39 SW |
119 | ret = (ECDSA_DATA *)OPENSSL_malloc(sizeof(ECDSA_DATA)); |
120 | if (ret == NULL) { | |
121 | ECDSAerr(ECDSA_F_ECDSA_DATA_NEW_METHOD, ERR_R_MALLOC_FAILURE); | |
122 | return (NULL); | |
123 | } | |
56276539 | 124 | |
9eaaad39 | 125 | ret->init = NULL; |
56276539 | 126 | |
9eaaad39 SW |
127 | ret->meth = ECDSA_get_default_method(); |
128 | ret->engine = engine; | |
56276539 | 129 | #ifndef OPENSSL_NO_ENGINE |
9eaaad39 SW |
130 | if (!ret->engine) |
131 | ret->engine = ENGINE_get_default_ECDSA(); | |
132 | if (ret->engine) { | |
133 | ret->meth = ENGINE_get_ECDSA(ret->engine); | |
134 | if (!ret->meth) { | |
135 | ECDSAerr(ECDSA_F_ECDSA_DATA_NEW_METHOD, ERR_R_ENGINE_LIB); | |
136 | ENGINE_finish(ret->engine); | |
137 | OPENSSL_free(ret); | |
138 | return NULL; | |
139 | } | |
140 | } | |
56276539 SS |
141 | #endif |
142 | ||
9eaaad39 SW |
143 | ret->flags = ret->meth->flags; |
144 | CRYPTO_new_ex_data(CRYPTO_EX_INDEX_ECDSA, ret, &ret->ex_data); | |
56276539 | 145 | #if 0 |
9eaaad39 SW |
146 | if ((ret->meth->init != NULL) && !ret->meth->init(ret)) { |
147 | CRYPTO_free_ex_data(CRYPTO_EX_INDEX_ECDSA, ret, &ret->ex_data); | |
148 | OPENSSL_free(ret); | |
149 | ret = NULL; | |
150 | } | |
151 | #endif | |
152 | return (ret); | |
56276539 SS |
153 | } |
154 | ||
155 | static void *ecdsa_data_new(void) | |
156 | { | |
9eaaad39 | 157 | return (void *)ECDSA_DATA_new_method(NULL); |
56276539 SS |
158 | } |
159 | ||
160 | static void *ecdsa_data_dup(void *data) | |
161 | { | |
9eaaad39 | 162 | ECDSA_DATA *r = (ECDSA_DATA *)data; |
56276539 | 163 | |
9eaaad39 SW |
164 | /* XXX: dummy operation */ |
165 | if (r == NULL) | |
166 | return NULL; | |
56276539 | 167 | |
9eaaad39 | 168 | return ecdsa_data_new(); |
56276539 SS |
169 | } |
170 | ||
171 | static void ecdsa_data_free(void *data) | |
172 | { | |
9eaaad39 | 173 | ECDSA_DATA *r = (ECDSA_DATA *)data; |
56276539 SS |
174 | |
175 | #ifndef OPENSSL_NO_ENGINE | |
9eaaad39 SW |
176 | if (r->engine) |
177 | ENGINE_finish(r->engine); | |
56276539 | 178 | #endif |
9eaaad39 | 179 | CRYPTO_free_ex_data(CRYPTO_EX_INDEX_ECDSA, r, &r->ex_data); |
56276539 | 180 | |
9eaaad39 | 181 | OPENSSL_cleanse((void *)r, sizeof(ECDSA_DATA)); |
56276539 | 182 | |
9eaaad39 | 183 | OPENSSL_free(r); |
56276539 SS |
184 | } |
185 | ||
186 | ECDSA_DATA *ecdsa_check(EC_KEY *key) | |
187 | { | |
9eaaad39 SW |
188 | ECDSA_DATA *ecdsa_data; |
189 | ||
190 | void *data = EC_KEY_get_key_method_data(key, ecdsa_data_dup, | |
191 | ecdsa_data_free, ecdsa_data_free); | |
192 | if (data == NULL) { | |
193 | ecdsa_data = (ECDSA_DATA *)ecdsa_data_new(); | |
194 | if (ecdsa_data == NULL) | |
195 | return NULL; | |
196 | data = EC_KEY_insert_key_method_data(key, (void *)ecdsa_data, | |
197 | ecdsa_data_dup, ecdsa_data_free, | |
198 | ecdsa_data_free); | |
199 | if (data != NULL) { | |
200 | /* | |
201 | * Another thread raced us to install the key_method data and | |
202 | * won. | |
203 | */ | |
204 | ecdsa_data_free(ecdsa_data); | |
205 | ecdsa_data = (ECDSA_DATA *)data; | |
206 | } | |
207 | } else | |
208 | ecdsa_data = (ECDSA_DATA *)data; | |
672590bc | 209 | #ifdef OPENSSL_FIPS |
9eaaad39 SW |
210 | if (FIPS_mode() && !(ecdsa_data->flags & ECDSA_FLAG_FIPS_METHOD) |
211 | && !(EC_KEY_get_flags(key) & EC_FLAG_NON_FIPS_ALLOW)) { | |
212 | ECDSAerr(ECDSA_F_ECDSA_CHECK, ECDSA_R_NON_FIPS_METHOD); | |
213 | return NULL; | |
214 | } | |
672590bc | 215 | #endif |
56276539 | 216 | |
9eaaad39 | 217 | return ecdsa_data; |
56276539 SS |
218 | } |
219 | ||
220 | int ECDSA_size(const EC_KEY *r) | |
221 | { | |
9eaaad39 SW |
222 | int ret, i; |
223 | ASN1_INTEGER bs; | |
224 | BIGNUM *order = NULL; | |
225 | unsigned char buf[4]; | |
226 | const EC_GROUP *group; | |
227 | ||
228 | if (r == NULL) | |
229 | return 0; | |
230 | group = EC_KEY_get0_group(r); | |
231 | if (group == NULL) | |
232 | return 0; | |
233 | ||
234 | if ((order = BN_new()) == NULL) | |
235 | return 0; | |
236 | if (!EC_GROUP_get_order(group, order, NULL)) { | |
237 | BN_clear_free(order); | |
238 | return 0; | |
239 | } | |
240 | i = BN_num_bits(order); | |
241 | bs.length = (i + 7) / 8; | |
242 | bs.data = buf; | |
243 | bs.type = V_ASN1_INTEGER; | |
244 | /* If the top bit is set the asn1 encoding is 1 larger. */ | |
245 | buf[0] = 0xff; | |
246 | ||
247 | i = i2d_ASN1_INTEGER(&bs, NULL); | |
248 | i += i; /* r and s */ | |
249 | ret = ASN1_object_size(1, i, V_ASN1_SEQUENCE); | |
250 | BN_clear_free(order); | |
251 | return (ret); | |
56276539 SS |
252 | } |
253 | ||
56276539 | 254 | int ECDSA_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func, |
9eaaad39 | 255 | CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func) |
56276539 | 256 | { |
9eaaad39 SW |
257 | return CRYPTO_get_ex_new_index(CRYPTO_EX_INDEX_ECDSA, argl, argp, |
258 | new_func, dup_func, free_func); | |
56276539 SS |
259 | } |
260 | ||
261 | int ECDSA_set_ex_data(EC_KEY *d, int idx, void *arg) | |
262 | { | |
9eaaad39 SW |
263 | ECDSA_DATA *ecdsa; |
264 | ecdsa = ecdsa_check(d); | |
265 | if (ecdsa == NULL) | |
266 | return 0; | |
267 | return (CRYPTO_set_ex_data(&ecdsa->ex_data, idx, arg)); | |
56276539 SS |
268 | } |
269 | ||
270 | void *ECDSA_get_ex_data(EC_KEY *d, int idx) | |
271 | { | |
9eaaad39 SW |
272 | ECDSA_DATA *ecdsa; |
273 | ecdsa = ecdsa_check(d); | |
274 | if (ecdsa == NULL) | |
275 | return NULL; | |
276 | return (CRYPTO_get_ex_data(&ecdsa->ex_data, idx)); | |
56276539 | 277 | } |