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