diff options
Diffstat (limited to 'src/lib/libcrypto/ec/eck_prn.c')
-rw-r--r-- | src/lib/libcrypto/ec/eck_prn.c | 357 |
1 files changed, 0 insertions, 357 deletions
diff --git a/src/lib/libcrypto/ec/eck_prn.c b/src/lib/libcrypto/ec/eck_prn.c deleted file mode 100644 index c40a64966a..0000000000 --- a/src/lib/libcrypto/ec/eck_prn.c +++ /dev/null | |||
@@ -1,357 +0,0 @@ | |||
1 | /* $OpenBSD: eck_prn.c,v 1.41 2025/01/25 10:30:17 tb 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 | |||
66 | #include <openssl/bio.h> | ||
67 | #include <openssl/bn.h> | ||
68 | #include <openssl/ec.h> | ||
69 | #include <openssl/err.h> | ||
70 | #include <openssl/evp.h> | ||
71 | #include <openssl/objects.h> | ||
72 | |||
73 | #include "bn_local.h" | ||
74 | #include "ec_local.h" | ||
75 | |||
76 | int | ||
77 | EC_KEY_print(BIO *bio, const EC_KEY *ec_key, int off) | ||
78 | { | ||
79 | EVP_PKEY *pkey; | ||
80 | int ret = 0; | ||
81 | |||
82 | if ((pkey = EVP_PKEY_new()) == NULL) | ||
83 | goto err; | ||
84 | |||
85 | if (!EVP_PKEY_set1_EC_KEY(pkey, (EC_KEY *)ec_key)) | ||
86 | goto err; | ||
87 | |||
88 | ret = EVP_PKEY_print_private(bio, pkey, off, NULL); | ||
89 | |||
90 | err: | ||
91 | EVP_PKEY_free(pkey); | ||
92 | |||
93 | return ret; | ||
94 | } | ||
95 | LCRYPTO_ALIAS(EC_KEY_print); | ||
96 | |||
97 | int | ||
98 | EC_KEY_print_fp(FILE *fp, const EC_KEY *ec_key, int off) | ||
99 | { | ||
100 | BIO *bio; | ||
101 | int ret; | ||
102 | |||
103 | if ((bio = BIO_new(BIO_s_file())) == NULL) { | ||
104 | ECerror(ERR_R_BIO_LIB); | ||
105 | return 0; | ||
106 | } | ||
107 | |||
108 | BIO_set_fp(bio, fp, BIO_NOCLOSE); | ||
109 | |||
110 | ret = EC_KEY_print(bio, ec_key, off); | ||
111 | |||
112 | BIO_free(bio); | ||
113 | |||
114 | return ret; | ||
115 | } | ||
116 | LCRYPTO_ALIAS(EC_KEY_print_fp); | ||
117 | |||
118 | int | ||
119 | ECParameters_print(BIO *bio, const EC_KEY *ec_key) | ||
120 | { | ||
121 | EVP_PKEY *pkey; | ||
122 | int ret = 0; | ||
123 | |||
124 | if ((pkey = EVP_PKEY_new()) == NULL) | ||
125 | goto err; | ||
126 | |||
127 | if (!EVP_PKEY_set1_EC_KEY(pkey, (EC_KEY *)ec_key)) | ||
128 | goto err; | ||
129 | |||
130 | ret = EVP_PKEY_print_params(bio, pkey, 4, NULL); | ||
131 | |||
132 | err: | ||
133 | EVP_PKEY_free(pkey); | ||
134 | |||
135 | return ret; | ||
136 | } | ||
137 | LCRYPTO_ALIAS(ECParameters_print); | ||
138 | |||
139 | int | ||
140 | ECParameters_print_fp(FILE *fp, const EC_KEY *ec_key) | ||
141 | { | ||
142 | BIO *bio; | ||
143 | int ret; | ||
144 | |||
145 | if ((bio = BIO_new(BIO_s_file())) == NULL) { | ||
146 | ECerror(ERR_R_BIO_LIB); | ||
147 | return 0; | ||
148 | } | ||
149 | |||
150 | BIO_set_fp(bio, fp, BIO_NOCLOSE); | ||
151 | |||
152 | ret = ECParameters_print(bio, ec_key); | ||
153 | |||
154 | BIO_free(bio); | ||
155 | |||
156 | return ret; | ||
157 | } | ||
158 | LCRYPTO_ALIAS(ECParameters_print_fp); | ||
159 | |||
160 | static int | ||
161 | ecpk_print_asn1_parameters(BIO *bio, const EC_GROUP *group, int off) | ||
162 | { | ||
163 | const char *nist_name; | ||
164 | int nid; | ||
165 | int ret = 0; | ||
166 | |||
167 | if (!BIO_indent(bio, off, 128)) { | ||
168 | ECerror(ERR_R_BIO_LIB); | ||
169 | goto err; | ||
170 | } | ||
171 | |||
172 | if ((nid = EC_GROUP_get_curve_name(group)) == NID_undef) { | ||
173 | ECerror(ERR_R_INTERNAL_ERROR); | ||
174 | goto err; | ||
175 | } | ||
176 | |||
177 | if (BIO_printf(bio, "ASN1 OID: %s\n", OBJ_nid2sn(nid)) <= 0) { | ||
178 | ECerror(ERR_R_BIO_LIB); | ||
179 | goto err; | ||
180 | } | ||
181 | |||
182 | if ((nist_name = EC_curve_nid2nist(nid)) != NULL) { | ||
183 | if (!BIO_indent(bio, off, 128)) { | ||
184 | ECerror(ERR_R_BIO_LIB); | ||
185 | goto err; | ||
186 | } | ||
187 | if (BIO_printf(bio, "NIST CURVE: %s\n", nist_name) <= 0) { | ||
188 | ECerror(ERR_R_BIO_LIB); | ||
189 | goto err; | ||
190 | } | ||
191 | } | ||
192 | |||
193 | ret = 1; | ||
194 | err: | ||
195 | |||
196 | return ret; | ||
197 | } | ||
198 | |||
199 | static int | ||
200 | ecpk_print_explicit_parameters(BIO *bio, const EC_GROUP *group, int off) | ||
201 | { | ||
202 | BN_CTX *ctx = NULL; | ||
203 | const BIGNUM *order; | ||
204 | BIGNUM *p, *a, *b, *cofactor; | ||
205 | BIGNUM *gen = NULL; | ||
206 | const EC_POINT *generator; | ||
207 | const char *conversion_form; | ||
208 | const unsigned char *seed; | ||
209 | size_t seed_len; | ||
210 | point_conversion_form_t form; | ||
211 | int ret = 0; | ||
212 | |||
213 | if ((ctx = BN_CTX_new()) == NULL) { | ||
214 | ECerror(ERR_R_MALLOC_FAILURE); | ||
215 | goto err; | ||
216 | } | ||
217 | |||
218 | BN_CTX_start(ctx); | ||
219 | |||
220 | if ((p = BN_CTX_get(ctx)) == NULL) | ||
221 | goto err; | ||
222 | if ((a = BN_CTX_get(ctx)) == NULL) | ||
223 | goto err; | ||
224 | if ((b = BN_CTX_get(ctx)) == NULL) | ||
225 | goto err; | ||
226 | if ((cofactor = BN_CTX_get(ctx)) == NULL) | ||
227 | goto err; | ||
228 | if ((gen = BN_CTX_get(ctx)) == NULL) | ||
229 | goto err; | ||
230 | |||
231 | if (!EC_GROUP_get_curve(group, p, a, b, ctx)) { | ||
232 | ECerror(ERR_R_EC_LIB); | ||
233 | goto err; | ||
234 | } | ||
235 | if ((order = EC_GROUP_get0_order(group)) == NULL) { | ||
236 | ECerror(ERR_R_EC_LIB); | ||
237 | goto err; | ||
238 | } | ||
239 | if (!EC_GROUP_get_cofactor(group, cofactor, NULL)) { | ||
240 | ECerror(ERR_R_EC_LIB); | ||
241 | goto err; | ||
242 | } | ||
243 | |||
244 | if ((generator = EC_GROUP_get0_generator(group)) == NULL) { | ||
245 | ECerror(ERR_R_EC_LIB); | ||
246 | goto err; | ||
247 | } | ||
248 | |||
249 | form = EC_GROUP_get_point_conversion_form(group); | ||
250 | if (EC_POINT_point2bn(group, generator, form, gen, ctx) == NULL) { | ||
251 | ECerror(ERR_R_EC_LIB); | ||
252 | goto err; | ||
253 | } | ||
254 | |||
255 | if (!BIO_indent(bio, off, 128)) | ||
256 | goto err; | ||
257 | |||
258 | if (BIO_printf(bio, "Field Type: %s\n", SN_X9_62_prime_field) <= 0) | ||
259 | goto err; | ||
260 | |||
261 | if (!bn_printf(bio, p, off, "Prime:")) | ||
262 | goto err; | ||
263 | if (!bn_printf(bio, a, off, "A: ")) | ||
264 | goto err; | ||
265 | if (!bn_printf(bio, b, off, "B: ")) | ||
266 | goto err; | ||
267 | |||
268 | if (form == POINT_CONVERSION_COMPRESSED) | ||
269 | conversion_form = "compressed"; | ||
270 | else if (form == POINT_CONVERSION_UNCOMPRESSED) | ||
271 | conversion_form = "uncompressed"; | ||
272 | else if (form == POINT_CONVERSION_HYBRID) | ||
273 | conversion_form = "hybrid"; | ||
274 | else | ||
275 | conversion_form = "unknown"; | ||
276 | if (!bn_printf(bio, gen, off, "Generator (%s):", conversion_form)) | ||
277 | goto err; | ||
278 | |||
279 | if (!bn_printf(bio, order, off, "Order: ")) | ||
280 | goto err; | ||
281 | if (!bn_printf(bio, cofactor, off, "Cofactor: ")) | ||
282 | goto err; | ||
283 | |||
284 | if ((seed = EC_GROUP_get0_seed(group)) != NULL) { | ||
285 | size_t i; | ||
286 | |||
287 | seed_len = EC_GROUP_get_seed_len(group); | ||
288 | |||
289 | /* XXX - ecx_buf_print() has a CBS version of this - dedup. */ | ||
290 | if (!BIO_indent(bio, off, 128)) | ||
291 | goto err; | ||
292 | if (BIO_printf(bio, "Seed:") <= 0) | ||
293 | goto err; | ||
294 | |||
295 | for (i = 0; i < seed_len; i++) { | ||
296 | const char *sep = ":"; | ||
297 | |||
298 | if (i % 15 == 0) { | ||
299 | if (BIO_printf(bio, "\n") <= 0) | ||
300 | goto err; | ||
301 | if (!BIO_indent(bio, off + 4, 128)) | ||
302 | goto err; | ||
303 | } | ||
304 | |||
305 | if (i + 1 == seed_len) | ||
306 | sep = ""; | ||
307 | if (BIO_printf(bio, "%02x%s", seed[i], sep) <= 0) | ||
308 | goto err; | ||
309 | } | ||
310 | |||
311 | if (BIO_printf(bio, "\n") <= 0) | ||
312 | goto err; | ||
313 | } | ||
314 | |||
315 | ret = 1; | ||
316 | err: | ||
317 | BN_CTX_end(ctx); | ||
318 | BN_CTX_free(ctx); | ||
319 | |||
320 | return ret; | ||
321 | } | ||
322 | |||
323 | int | ||
324 | ECPKParameters_print(BIO *bio, const EC_GROUP *group, int off) | ||
325 | { | ||
326 | if (group == NULL) { | ||
327 | ECerror(ERR_R_PASSED_NULL_PARAMETER); | ||
328 | return 0; | ||
329 | } | ||
330 | |||
331 | if ((EC_GROUP_get_asn1_flag(group) & OPENSSL_EC_NAMED_CURVE) != 0) | ||
332 | return ecpk_print_asn1_parameters(bio, group, off); | ||
333 | |||
334 | return ecpk_print_explicit_parameters(bio, group, off); | ||
335 | } | ||
336 | LCRYPTO_ALIAS(ECPKParameters_print); | ||
337 | |||
338 | int | ||
339 | ECPKParameters_print_fp(FILE *fp, const EC_GROUP *group, int off) | ||
340 | { | ||
341 | BIO *bio; | ||
342 | int ret; | ||
343 | |||
344 | if ((bio = BIO_new(BIO_s_file())) == NULL) { | ||
345 | ECerror(ERR_R_BUF_LIB); | ||
346 | return 0; | ||
347 | } | ||
348 | |||
349 | BIO_set_fp(bio, fp, BIO_NOCLOSE); | ||
350 | |||
351 | ret = ECPKParameters_print(bio, group, off); | ||
352 | |||
353 | BIO_free(bio); | ||
354 | |||
355 | return ret; | ||
356 | } | ||
357 | LCRYPTO_ALIAS(ECPKParameters_print_fp); | ||