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
10 * notice, this list of conditions and the following disclaimer.
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
59 #include <openssl/engine.h>
60 #endif
61 #include <openssl/err.h>
62 #include <openssl/bn.h>
63
64 const char ECDSA_version[]="ECDSA" OPENSSL_VERSION_PTEXT;
65
66 static const ECDSA_METHOD *default_ECDSA_method = NULL;
67
68 static void *ecdsa_data_new(void);
69 static void *ecdsa_data_dup(void *);
70 static void ecdsa_data_free(void *);
71
ECDSA_set_default_method(const ECDSA_METHOD * meth)72 void ECDSA_set_default_method(const ECDSA_METHOD *meth)
73 {
74 default_ECDSA_method = meth;
75 }
76
ECDSA_get_default_method(void)77 const ECDSA_METHOD *ECDSA_get_default_method(void)
78 {
79 if(!default_ECDSA_method)
80 default_ECDSA_method = ECDSA_OpenSSL();
81 return default_ECDSA_method;
82 }
83
ECDSA_set_method(EC_KEY * eckey,const ECDSA_METHOD * meth)84 int ECDSA_set_method(EC_KEY *eckey, const ECDSA_METHOD *meth)
85 {
86 ECDSA_DATA *ecdsa;
87
88 ecdsa = ecdsa_check(eckey);
89
90 if (ecdsa == NULL)
91 return 0;
92
93 #ifndef OPENSSL_NO_ENGINE
94 if (ecdsa->engine)
95 {
96 ENGINE_finish(ecdsa->engine);
97 ecdsa->engine = NULL;
98 }
99 #endif
100 ecdsa->meth = meth;
101
102 return 1;
103 }
104
ECDSA_DATA_new_method(ENGINE * engine)105 static ECDSA_DATA *ECDSA_DATA_new_method(ENGINE *engine)
106 {
107 ECDSA_DATA *ret;
108
109 ret=(ECDSA_DATA *)OPENSSL_malloc(sizeof(ECDSA_DATA));
110 if (ret == NULL)
111 {
112 ECDSAerr(ECDSA_F_ECDSA_DATA_NEW_METHOD, ERR_R_MALLOC_FAILURE);
113 return(NULL);
114 }
115
116 ret->init = NULL;
117
118 ret->meth = ECDSA_get_default_method();
119 ret->engine = engine;
120 #ifndef OPENSSL_NO_ENGINE
121 if (!ret->engine)
122 ret->engine = ENGINE_get_default_ECDSA();
123 if (ret->engine)
124 {
125 ret->meth = ENGINE_get_ECDSA(ret->engine);
126 if (!ret->meth)
127 {
128 ECDSAerr(ECDSA_F_ECDSA_DATA_NEW_METHOD, ERR_R_ENGINE_LIB);
129 ENGINE_finish(ret->engine);
130 OPENSSL_free(ret);
131 return NULL;
132 }
133 }
134 #endif
135
136 ret->flags = ret->meth->flags;
137 CRYPTO_new_ex_data(CRYPTO_EX_INDEX_ECDSA, ret, &ret->ex_data);
138 #if 0
139 if ((ret->meth->init != NULL) && !ret->meth->init(ret))
140 {
141 CRYPTO_free_ex_data(CRYPTO_EX_INDEX_ECDSA, ret, &ret->ex_data);
142 OPENSSL_free(ret);
143 ret=NULL;
144 }
145 #endif
146 return(ret);
147 }
148
ecdsa_data_new(void)149 static void *ecdsa_data_new(void)
150 {
151 return (void *)ECDSA_DATA_new_method(NULL);
152 }
153
ecdsa_data_dup(void * data)154 static void *ecdsa_data_dup(void *data)
155 {
156 ECDSA_DATA *r = (ECDSA_DATA *)data;
157
158 /* XXX: dummy operation */
159 if (r == NULL)
160 return NULL;
161
162 return ecdsa_data_new();
163 }
164
ecdsa_data_free(void * data)165 static void ecdsa_data_free(void *data)
166 {
167 ECDSA_DATA *r = (ECDSA_DATA *)data;
168
169 #ifndef OPENSSL_NO_ENGINE
170 if (r->engine)
171 ENGINE_finish(r->engine);
172 #endif
173 CRYPTO_free_ex_data(CRYPTO_EX_INDEX_ECDSA, r, &r->ex_data);
174
175 OPENSSL_cleanse((void *)r, sizeof(ECDSA_DATA));
176
177 OPENSSL_free(r);
178 }
179
ecdsa_check(EC_KEY * key)180 ECDSA_DATA *ecdsa_check(EC_KEY *key)
181 {
182 ECDSA_DATA *ecdsa_data;
183
184 void *data = EC_KEY_get_key_method_data(key, ecdsa_data_dup,
185 ecdsa_data_free, ecdsa_data_free);
186 if (data == NULL)
187 {
188 ecdsa_data = (ECDSA_DATA *)ecdsa_data_new();
189 if (ecdsa_data == NULL)
190 return NULL;
191 EC_KEY_insert_key_method_data(key, (void *)ecdsa_data,
192 ecdsa_data_dup, ecdsa_data_free, ecdsa_data_free);
193 }
194 else
195 ecdsa_data = (ECDSA_DATA *)data;
196
197
198 return ecdsa_data;
199 }
200
ECDSA_size(const EC_KEY * r)201 int ECDSA_size(const EC_KEY *r)
202 {
203 int ret,i;
204 ASN1_INTEGER bs;
205 BIGNUM *order=NULL;
206 unsigned char buf[4];
207 const EC_GROUP *group;
208
209 if (r == NULL)
210 return 0;
211 group = EC_KEY_get0_group(r);
212 if (group == NULL)
213 return 0;
214
215 if ((order = BN_new()) == NULL) return 0;
216 if (!EC_GROUP_get_order(group,order,NULL))
217 {
218 BN_clear_free(order);
219 return 0;
220 }
221 i=BN_num_bits(order);
222 bs.length=(i+7)/8;
223 bs.data=buf;
224 bs.type=V_ASN1_INTEGER;
225 /* If the top bit is set the asn1 encoding is 1 larger. */
226 buf[0]=0xff;
227
228 i=i2d_ASN1_INTEGER(&bs,NULL);
229 i+=i; /* r and s */
230 ret=ASN1_object_size(1,i,V_ASN1_SEQUENCE);
231 BN_clear_free(order);
232 return(ret);
233 }
234
235
ECDSA_get_ex_new_index(long argl,void * argp,CRYPTO_EX_new * new_func,CRYPTO_EX_dup * dup_func,CRYPTO_EX_free * free_func)236 int ECDSA_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func,
237 CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func)
238 {
239 return CRYPTO_get_ex_new_index(CRYPTO_EX_INDEX_ECDSA, argl, argp,
240 new_func, dup_func, free_func);
241 }
242
ECDSA_set_ex_data(EC_KEY * d,int idx,void * arg)243 int ECDSA_set_ex_data(EC_KEY *d, int idx, void *arg)
244 {
245 ECDSA_DATA *ecdsa;
246 ecdsa = ecdsa_check(d);
247 if (ecdsa == NULL)
248 return 0;
249 return(CRYPTO_set_ex_data(&ecdsa->ex_data,idx,arg));
250 }
251
ECDSA_get_ex_data(EC_KEY * d,int idx)252 void *ECDSA_get_ex_data(EC_KEY *d, int idx)
253 {
254 ECDSA_DATA *ecdsa;
255 ecdsa = ecdsa_check(d);
256 if (ecdsa == NULL)
257 return NULL;
258 return(CRYPTO_get_ex_data(&ecdsa->ex_data,idx));
259 }
260