diff options
Diffstat (limited to 'src/lib/libcrypto/ec/eck_prn.c')
-rw-r--r-- | src/lib/libcrypto/ec/eck_prn.c | 391 |
1 files changed, 0 insertions, 391 deletions
diff --git a/src/lib/libcrypto/ec/eck_prn.c b/src/lib/libcrypto/ec/eck_prn.c deleted file mode 100644 index 7d3e175ae7..0000000000 --- a/src/lib/libcrypto/ec/eck_prn.c +++ /dev/null | |||
@@ -1,391 +0,0 @@ | |||
1 | /* crypto/ec/eck_prn.c */ | ||
2 | /* | ||
3 | * Written by Nils Larsch for the OpenSSL project. | ||
4 | */ | ||
5 | /* ==================================================================== | ||
6 | * Copyright (c) 1998-2005 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 | * Portions originally developed by SUN MICROSYSTEMS, INC., and | ||
61 | * contributed to the OpenSSL project. | ||
62 | */ | ||
63 | |||
64 | #include <stdio.h> | ||
65 | #include "cryptlib.h" | ||
66 | #include <openssl/evp.h> | ||
67 | #include <openssl/ec.h> | ||
68 | #include <openssl/bn.h> | ||
69 | |||
70 | #ifndef OPENSSL_NO_FP_API | ||
71 | int ECPKParameters_print_fp(FILE *fp, const EC_GROUP *x, int off) | ||
72 | { | ||
73 | BIO *b; | ||
74 | int ret; | ||
75 | |||
76 | if ((b=BIO_new(BIO_s_file())) == NULL) | ||
77 | { | ||
78 | ECerr(EC_F_ECPKPARAMETERS_PRINT_FP,ERR_R_BUF_LIB); | ||
79 | return(0); | ||
80 | } | ||
81 | BIO_set_fp(b, fp, BIO_NOCLOSE); | ||
82 | ret = ECPKParameters_print(b, x, off); | ||
83 | BIO_free(b); | ||
84 | return(ret); | ||
85 | } | ||
86 | |||
87 | int EC_KEY_print_fp(FILE *fp, const EC_KEY *x, int off) | ||
88 | { | ||
89 | BIO *b; | ||
90 | int ret; | ||
91 | |||
92 | if ((b=BIO_new(BIO_s_file())) == NULL) | ||
93 | { | ||
94 | ECerr(EC_F_EC_KEY_PRINT_FP, ERR_R_BIO_LIB); | ||
95 | return(0); | ||
96 | } | ||
97 | BIO_set_fp(b, fp, BIO_NOCLOSE); | ||
98 | ret = EC_KEY_print(b, x, off); | ||
99 | BIO_free(b); | ||
100 | return(ret); | ||
101 | } | ||
102 | |||
103 | int ECParameters_print_fp(FILE *fp, const EC_KEY *x) | ||
104 | { | ||
105 | BIO *b; | ||
106 | int ret; | ||
107 | |||
108 | if ((b=BIO_new(BIO_s_file())) == NULL) | ||
109 | { | ||
110 | ECerr(EC_F_ECPARAMETERS_PRINT_FP, ERR_R_BIO_LIB); | ||
111 | return(0); | ||
112 | } | ||
113 | BIO_set_fp(b, fp, BIO_NOCLOSE); | ||
114 | ret = ECParameters_print(b, x); | ||
115 | BIO_free(b); | ||
116 | return(ret); | ||
117 | } | ||
118 | #endif | ||
119 | |||
120 | int EC_KEY_print(BIO *bp, const EC_KEY *x, int off) | ||
121 | { | ||
122 | EVP_PKEY *pk; | ||
123 | int ret; | ||
124 | pk = EVP_PKEY_new(); | ||
125 | if (!pk || !EVP_PKEY_set1_EC_KEY(pk, (EC_KEY *)x)) | ||
126 | return 0; | ||
127 | ret = EVP_PKEY_print_private(bp, pk, off, NULL); | ||
128 | EVP_PKEY_free(pk); | ||
129 | return ret; | ||
130 | } | ||
131 | |||
132 | int ECParameters_print(BIO *bp, const EC_KEY *x) | ||
133 | { | ||
134 | EVP_PKEY *pk; | ||
135 | int ret; | ||
136 | pk = EVP_PKEY_new(); | ||
137 | if (!pk || !EVP_PKEY_set1_EC_KEY(pk, (EC_KEY *)x)) | ||
138 | return 0; | ||
139 | ret = EVP_PKEY_print_params(bp, pk, 4, NULL); | ||
140 | EVP_PKEY_free(pk); | ||
141 | return ret; | ||
142 | } | ||
143 | |||
144 | static int print_bin(BIO *fp, const char *str, const unsigned char *num, | ||
145 | size_t len, int off); | ||
146 | |||
147 | int ECPKParameters_print(BIO *bp, const EC_GROUP *x, int off) | ||
148 | { | ||
149 | unsigned char *buffer=NULL; | ||
150 | size_t buf_len=0, i; | ||
151 | int ret=0, reason=ERR_R_BIO_LIB; | ||
152 | BN_CTX *ctx=NULL; | ||
153 | const EC_POINT *point=NULL; | ||
154 | BIGNUM *p=NULL, *a=NULL, *b=NULL, *gen=NULL, | ||
155 | *order=NULL, *cofactor=NULL; | ||
156 | const unsigned char *seed; | ||
157 | size_t seed_len=0; | ||
158 | |||
159 | static const char *gen_compressed = "Generator (compressed):"; | ||
160 | static const char *gen_uncompressed = "Generator (uncompressed):"; | ||
161 | static const char *gen_hybrid = "Generator (hybrid):"; | ||
162 | |||
163 | if (!x) | ||
164 | { | ||
165 | reason = ERR_R_PASSED_NULL_PARAMETER; | ||
166 | goto err; | ||
167 | } | ||
168 | |||
169 | ctx = BN_CTX_new(); | ||
170 | if (ctx == NULL) | ||
171 | { | ||
172 | reason = ERR_R_MALLOC_FAILURE; | ||
173 | goto err; | ||
174 | } | ||
175 | |||
176 | if (EC_GROUP_get_asn1_flag(x)) | ||
177 | { | ||
178 | /* the curve parameter are given by an asn1 OID */ | ||
179 | int nid; | ||
180 | |||
181 | if (!BIO_indent(bp, off, 128)) | ||
182 | goto err; | ||
183 | |||
184 | nid = EC_GROUP_get_curve_name(x); | ||
185 | if (nid == 0) | ||
186 | goto err; | ||
187 | |||
188 | if (BIO_printf(bp, "ASN1 OID: %s", OBJ_nid2sn(nid)) <= 0) | ||
189 | goto err; | ||
190 | if (BIO_printf(bp, "\n") <= 0) | ||
191 | goto err; | ||
192 | } | ||
193 | else | ||
194 | { | ||
195 | /* explicit parameters */ | ||
196 | int is_char_two = 0; | ||
197 | point_conversion_form_t form; | ||
198 | int tmp_nid = EC_METHOD_get_field_type(EC_GROUP_method_of(x)); | ||
199 | |||
200 | if (tmp_nid == NID_X9_62_characteristic_two_field) | ||
201 | is_char_two = 1; | ||
202 | |||
203 | if ((p = BN_new()) == NULL || (a = BN_new()) == NULL || | ||
204 | (b = BN_new()) == NULL || (order = BN_new()) == NULL || | ||
205 | (cofactor = BN_new()) == NULL) | ||
206 | { | ||
207 | reason = ERR_R_MALLOC_FAILURE; | ||
208 | goto err; | ||
209 | } | ||
210 | |||
211 | if (is_char_two) | ||
212 | { | ||
213 | if (!EC_GROUP_get_curve_GF2m(x, p, a, b, ctx)) | ||
214 | { | ||
215 | reason = ERR_R_EC_LIB; | ||
216 | goto err; | ||
217 | } | ||
218 | } | ||
219 | else /* prime field */ | ||
220 | { | ||
221 | if (!EC_GROUP_get_curve_GFp(x, p, a, b, ctx)) | ||
222 | { | ||
223 | reason = ERR_R_EC_LIB; | ||
224 | goto err; | ||
225 | } | ||
226 | } | ||
227 | |||
228 | if ((point = EC_GROUP_get0_generator(x)) == NULL) | ||
229 | { | ||
230 | reason = ERR_R_EC_LIB; | ||
231 | goto err; | ||
232 | } | ||
233 | if (!EC_GROUP_get_order(x, order, NULL) || | ||
234 | !EC_GROUP_get_cofactor(x, cofactor, NULL)) | ||
235 | { | ||
236 | reason = ERR_R_EC_LIB; | ||
237 | goto err; | ||
238 | } | ||
239 | |||
240 | form = EC_GROUP_get_point_conversion_form(x); | ||
241 | |||
242 | if ((gen = EC_POINT_point2bn(x, point, | ||
243 | form, NULL, ctx)) == NULL) | ||
244 | { | ||
245 | reason = ERR_R_EC_LIB; | ||
246 | goto err; | ||
247 | } | ||
248 | |||
249 | buf_len = (size_t)BN_num_bytes(p); | ||
250 | if (buf_len < (i = (size_t)BN_num_bytes(a))) | ||
251 | buf_len = i; | ||
252 | if (buf_len < (i = (size_t)BN_num_bytes(b))) | ||
253 | buf_len = i; | ||
254 | if (buf_len < (i = (size_t)BN_num_bytes(gen))) | ||
255 | buf_len = i; | ||
256 | if (buf_len < (i = (size_t)BN_num_bytes(order))) | ||
257 | buf_len = i; | ||
258 | if (buf_len < (i = (size_t)BN_num_bytes(cofactor))) | ||
259 | buf_len = i; | ||
260 | |||
261 | if ((seed = EC_GROUP_get0_seed(x)) != NULL) | ||
262 | seed_len = EC_GROUP_get_seed_len(x); | ||
263 | |||
264 | buf_len += 10; | ||
265 | if ((buffer = OPENSSL_malloc(buf_len)) == NULL) | ||
266 | { | ||
267 | reason = ERR_R_MALLOC_FAILURE; | ||
268 | goto err; | ||
269 | } | ||
270 | |||
271 | if (!BIO_indent(bp, off, 128)) | ||
272 | goto err; | ||
273 | |||
274 | /* print the 'short name' of the field type */ | ||
275 | if (BIO_printf(bp, "Field Type: %s\n", OBJ_nid2sn(tmp_nid)) | ||
276 | <= 0) | ||
277 | goto err; | ||
278 | |||
279 | if (is_char_two) | ||
280 | { | ||
281 | /* print the 'short name' of the base type OID */ | ||
282 | int basis_type = EC_GROUP_get_basis_type(x); | ||
283 | if (basis_type == 0) | ||
284 | goto err; | ||
285 | |||
286 | if (!BIO_indent(bp, off, 128)) | ||
287 | goto err; | ||
288 | |||
289 | if (BIO_printf(bp, "Basis Type: %s\n", | ||
290 | OBJ_nid2sn(basis_type)) <= 0) | ||
291 | goto err; | ||
292 | |||
293 | /* print the polynomial */ | ||
294 | if ((p != NULL) && !ASN1_bn_print(bp, "Polynomial:", p, buffer, | ||
295 | off)) | ||
296 | goto err; | ||
297 | } | ||
298 | else | ||
299 | { | ||
300 | if ((p != NULL) && !ASN1_bn_print(bp, "Prime:", p, buffer,off)) | ||
301 | goto err; | ||
302 | } | ||
303 | if ((a != NULL) && !ASN1_bn_print(bp, "A: ", a, buffer, off)) | ||
304 | goto err; | ||
305 | if ((b != NULL) && !ASN1_bn_print(bp, "B: ", b, buffer, off)) | ||
306 | goto err; | ||
307 | if (form == POINT_CONVERSION_COMPRESSED) | ||
308 | { | ||
309 | if ((gen != NULL) && !ASN1_bn_print(bp, gen_compressed, gen, | ||
310 | buffer, off)) | ||
311 | goto err; | ||
312 | } | ||
313 | else if (form == POINT_CONVERSION_UNCOMPRESSED) | ||
314 | { | ||
315 | if ((gen != NULL) && !ASN1_bn_print(bp, gen_uncompressed, gen, | ||
316 | buffer, off)) | ||
317 | goto err; | ||
318 | } | ||
319 | else /* form == POINT_CONVERSION_HYBRID */ | ||
320 | { | ||
321 | if ((gen != NULL) && !ASN1_bn_print(bp, gen_hybrid, gen, | ||
322 | buffer, off)) | ||
323 | goto err; | ||
324 | } | ||
325 | if ((order != NULL) && !ASN1_bn_print(bp, "Order: ", order, | ||
326 | buffer, off)) goto err; | ||
327 | if ((cofactor != NULL) && !ASN1_bn_print(bp, "Cofactor: ", cofactor, | ||
328 | buffer, off)) goto err; | ||
329 | if (seed && !print_bin(bp, "Seed:", seed, seed_len, off)) | ||
330 | goto err; | ||
331 | } | ||
332 | ret=1; | ||
333 | err: | ||
334 | if (!ret) | ||
335 | ECerr(EC_F_ECPKPARAMETERS_PRINT, reason); | ||
336 | if (p) | ||
337 | BN_free(p); | ||
338 | if (a) | ||
339 | BN_free(a); | ||
340 | if (b) | ||
341 | BN_free(b); | ||
342 | if (gen) | ||
343 | BN_free(gen); | ||
344 | if (order) | ||
345 | BN_free(order); | ||
346 | if (cofactor) | ||
347 | BN_free(cofactor); | ||
348 | if (ctx) | ||
349 | BN_CTX_free(ctx); | ||
350 | if (buffer != NULL) | ||
351 | OPENSSL_free(buffer); | ||
352 | return(ret); | ||
353 | } | ||
354 | |||
355 | static int print_bin(BIO *fp, const char *name, const unsigned char *buf, | ||
356 | size_t len, int off) | ||
357 | { | ||
358 | size_t i; | ||
359 | char str[128]; | ||
360 | |||
361 | if (buf == NULL) | ||
362 | return 1; | ||
363 | if (off) | ||
364 | { | ||
365 | if (off > 128) | ||
366 | off=128; | ||
367 | memset(str,' ',off); | ||
368 | if (BIO_write(fp, str, off) <= 0) | ||
369 | return 0; | ||
370 | } | ||
371 | |||
372 | if (BIO_printf(fp,"%s", name) <= 0) | ||
373 | return 0; | ||
374 | |||
375 | for (i=0; i<len; i++) | ||
376 | { | ||
377 | if ((i%15) == 0) | ||
378 | { | ||
379 | str[0]='\n'; | ||
380 | memset(&(str[1]),' ',off+4); | ||
381 | if (BIO_write(fp, str, off+1+4) <= 0) | ||
382 | return 0; | ||
383 | } | ||
384 | if (BIO_printf(fp,"%02x%s",buf[i],((i+1) == len)?"":":") <= 0) | ||
385 | return 0; | ||
386 | } | ||
387 | if (BIO_write(fp,"\n",1) <= 0) | ||
388 | return 0; | ||
389 | |||
390 | return 1; | ||
391 | } | ||