diff options
Diffstat (limited to 'src/usr.bin/openssl/openssl.c')
-rw-r--r-- | src/usr.bin/openssl/openssl.c | 724 |
1 files changed, 0 insertions, 724 deletions
diff --git a/src/usr.bin/openssl/openssl.c b/src/usr.bin/openssl/openssl.c deleted file mode 100644 index 75a0e4d266..0000000000 --- a/src/usr.bin/openssl/openssl.c +++ /dev/null | |||
@@ -1,724 +0,0 @@ | |||
1 | /* $OpenBSD: openssl.c,v 1.39 2025/01/02 13:10:03 tb Exp $ */ | ||
2 | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) | ||
3 | * All rights reserved. | ||
4 | * | ||
5 | * This package is an SSL implementation written | ||
6 | * by Eric Young (eay@cryptsoft.com). | ||
7 | * The implementation was written so as to conform with Netscapes SSL. | ||
8 | * | ||
9 | * This library is free for commercial and non-commercial use as long as | ||
10 | * the following conditions are aheared to. The following conditions | ||
11 | * apply to all code found in this distribution, be it the RC4, RSA, | ||
12 | * lhash, DES, etc., code; not just the SSL code. The SSL documentation | ||
13 | * included with this distribution is covered by the same copyright terms | ||
14 | * except that the holder is Tim Hudson (tjh@cryptsoft.com). | ||
15 | * | ||
16 | * Copyright remains Eric Young's, and as such any Copyright notices in | ||
17 | * the code are not to be removed. | ||
18 | * If this package is used in a product, Eric Young should be given attribution | ||
19 | * as the author of the parts of the library used. | ||
20 | * This can be in the form of a textual message at program startup or | ||
21 | * in documentation (online or textual) provided with the package. | ||
22 | * | ||
23 | * Redistribution and use in source and binary forms, with or without | ||
24 | * modification, are permitted provided that the following conditions | ||
25 | * are met: | ||
26 | * 1. Redistributions of source code must retain the copyright | ||
27 | * notice, this list of conditions and the following disclaimer. | ||
28 | * 2. Redistributions in binary form must reproduce the above copyright | ||
29 | * notice, this list of conditions and the following disclaimer in the | ||
30 | * documentation and/or other materials provided with the distribution. | ||
31 | * 3. All advertising materials mentioning features or use of this software | ||
32 | * must display the following acknowledgement: | ||
33 | * "This product includes cryptographic software written by | ||
34 | * Eric Young (eay@cryptsoft.com)" | ||
35 | * The word 'cryptographic' can be left out if the rouines from the library | ||
36 | * being used are not cryptographic related :-). | ||
37 | * 4. If you include any Windows specific code (or a derivative thereof) from | ||
38 | * the apps directory (application code) you must include an acknowledgement: | ||
39 | * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | ||
40 | * | ||
41 | * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND | ||
42 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
43 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | ||
44 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | ||
45 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | ||
46 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | ||
47 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
48 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | ||
49 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | ||
50 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | ||
51 | * SUCH DAMAGE. | ||
52 | * | ||
53 | * The licence and distribution terms for any publically available version or | ||
54 | * derivative of this code cannot be changed. i.e. this code cannot simply be | ||
55 | * copied and put under another distribution licence | ||
56 | * [including the GNU Public Licence.] | ||
57 | */ | ||
58 | /* ==================================================================== | ||
59 | * Copyright (c) 1998-2006 The OpenSSL Project. All rights reserved. | ||
60 | * | ||
61 | * Redistribution and use in source and binary forms, with or without | ||
62 | * modification, are permitted provided that the following conditions | ||
63 | * are met: | ||
64 | * | ||
65 | * 1. Redistributions of source code must retain the above copyright | ||
66 | * notice, this list of conditions and the following disclaimer. | ||
67 | * | ||
68 | * 2. Redistributions in binary form must reproduce the above copyright | ||
69 | * notice, this list of conditions and the following disclaimer in | ||
70 | * the documentation and/or other materials provided with the | ||
71 | * distribution. | ||
72 | * | ||
73 | * 3. All advertising materials mentioning features or use of this | ||
74 | * software must display the following acknowledgment: | ||
75 | * "This product includes software developed by the OpenSSL Project | ||
76 | * for use in the OpenSSL Toolkit. (http://www.openssl.org/)" | ||
77 | * | ||
78 | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | ||
79 | * endorse or promote products derived from this software without | ||
80 | * prior written permission. For written permission, please contact | ||
81 | * openssl-core@openssl.org. | ||
82 | * | ||
83 | * 5. Products derived from this software may not be called "OpenSSL" | ||
84 | * nor may "OpenSSL" appear in their names without prior written | ||
85 | * permission of the OpenSSL Project. | ||
86 | * | ||
87 | * 6. Redistributions of any form whatsoever must retain the following | ||
88 | * acknowledgment: | ||
89 | * "This product includes software developed by the OpenSSL Project | ||
90 | * for use in the OpenSSL Toolkit (http://www.openssl.org/)" | ||
91 | * | ||
92 | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | ||
93 | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | ||
94 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | ||
95 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR | ||
96 | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | ||
97 | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | ||
98 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | ||
99 | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | ||
100 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | ||
101 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | ||
102 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | ||
103 | * OF THE POSSIBILITY OF SUCH DAMAGE. | ||
104 | * ==================================================================== | ||
105 | * | ||
106 | * This product includes cryptographic software written by Eric Young | ||
107 | * (eay@cryptsoft.com). This product includes software written by Tim | ||
108 | * Hudson (tjh@cryptsoft.com). | ||
109 | * | ||
110 | */ | ||
111 | |||
112 | #include <err.h> | ||
113 | #include <signal.h> | ||
114 | #include <stdio.h> | ||
115 | #include <string.h> | ||
116 | #include <stdlib.h> | ||
117 | #include <unistd.h> | ||
118 | |||
119 | #include "apps.h" | ||
120 | |||
121 | #include <openssl/bio.h> | ||
122 | #include <openssl/conf.h> | ||
123 | #include <openssl/crypto.h> | ||
124 | #include <openssl/err.h> | ||
125 | #include <openssl/lhash.h> | ||
126 | #include <openssl/pem.h> | ||
127 | #include <openssl/ssl.h> | ||
128 | #include <openssl/x509.h> | ||
129 | |||
130 | #define FUNC_TYPE_GENERAL 1 | ||
131 | #define FUNC_TYPE_MD 2 | ||
132 | #define FUNC_TYPE_CIPHER 3 | ||
133 | #define FUNC_TYPE_PKEY 4 | ||
134 | #define FUNC_TYPE_MD_ALG 5 | ||
135 | #define FUNC_TYPE_CIPHER_ALG 6 | ||
136 | |||
137 | typedef struct { | ||
138 | int type; | ||
139 | const char *name; | ||
140 | int (*func)(int argc, char **argv); | ||
141 | } FUNCTION; | ||
142 | |||
143 | DECLARE_LHASH_OF(FUNCTION); | ||
144 | |||
145 | FUNCTION functions[] = { | ||
146 | |||
147 | /* General functions. */ | ||
148 | { FUNC_TYPE_GENERAL, "asn1parse", asn1parse_main }, | ||
149 | { FUNC_TYPE_GENERAL, "ca", ca_main }, | ||
150 | { FUNC_TYPE_GENERAL, "certhash", certhash_main }, | ||
151 | { FUNC_TYPE_GENERAL, "ciphers", ciphers_main }, | ||
152 | #ifndef OPENSSL_NO_CMS | ||
153 | { FUNC_TYPE_GENERAL, "cms", cms_main }, | ||
154 | #endif | ||
155 | { FUNC_TYPE_GENERAL, "crl2pkcs7", crl2pkcs7_main }, | ||
156 | { FUNC_TYPE_GENERAL, "crl", crl_main }, | ||
157 | { FUNC_TYPE_GENERAL, "dgst", dgst_main }, | ||
158 | { FUNC_TYPE_GENERAL, "enc", enc_main }, | ||
159 | { FUNC_TYPE_GENERAL, "errstr", errstr_main }, | ||
160 | { FUNC_TYPE_GENERAL, "genpkey", genpkey_main }, | ||
161 | #ifndef OPENSSL_NO_OCSP | ||
162 | { FUNC_TYPE_GENERAL, "ocsp", ocsp_main }, | ||
163 | #endif | ||
164 | { FUNC_TYPE_GENERAL, "passwd", passwd_main }, | ||
165 | { FUNC_TYPE_GENERAL, "pkcs7", pkcs7_main }, | ||
166 | { FUNC_TYPE_GENERAL, "pkcs8", pkcs8_main }, | ||
167 | #if !defined(OPENSSL_NO_DES) && !defined(OPENSSL_NO_SHA1) | ||
168 | { FUNC_TYPE_GENERAL, "pkcs12", pkcs12_main }, | ||
169 | #endif | ||
170 | { FUNC_TYPE_GENERAL, "pkey", pkey_main }, | ||
171 | { FUNC_TYPE_GENERAL, "pkeyparam", pkeyparam_main }, | ||
172 | { FUNC_TYPE_GENERAL, "pkeyutl", pkeyutl_main }, | ||
173 | { FUNC_TYPE_GENERAL, "prime", prime_main }, | ||
174 | { FUNC_TYPE_GENERAL, "rand", rand_main }, | ||
175 | { FUNC_TYPE_GENERAL, "req", req_main }, | ||
176 | { FUNC_TYPE_GENERAL, "s_client", s_client_main }, | ||
177 | { FUNC_TYPE_GENERAL, "s_server", s_server_main }, | ||
178 | { FUNC_TYPE_GENERAL, "s_time", s_time_main }, | ||
179 | { FUNC_TYPE_GENERAL, "sess_id", sess_id_main }, | ||
180 | { FUNC_TYPE_GENERAL, "smime", smime_main }, | ||
181 | #ifndef OPENSSL_NO_SPEED | ||
182 | { FUNC_TYPE_GENERAL, "speed", speed_main }, | ||
183 | #endif | ||
184 | { FUNC_TYPE_GENERAL, "ts", ts_main }, | ||
185 | { FUNC_TYPE_GENERAL, "verify", verify_main }, | ||
186 | { FUNC_TYPE_GENERAL, "version", version_main }, | ||
187 | { FUNC_TYPE_GENERAL, "x509", x509_main }, | ||
188 | |||
189 | #ifndef OPENSSL_NO_DH | ||
190 | { FUNC_TYPE_GENERAL, "dh", dh_main }, | ||
191 | { FUNC_TYPE_GENERAL, "dhparam", dhparam_main }, | ||
192 | { FUNC_TYPE_GENERAL, "gendh", gendh_main }, | ||
193 | #endif | ||
194 | #ifndef OPENSSL_NO_DSA | ||
195 | { FUNC_TYPE_GENERAL, "dsa", dsa_main }, | ||
196 | { FUNC_TYPE_GENERAL, "dsaparam", dsaparam_main }, | ||
197 | { FUNC_TYPE_GENERAL, "gendsa", gendsa_main }, | ||
198 | #endif | ||
199 | #ifndef OPENSSL_NO_EC | ||
200 | { FUNC_TYPE_GENERAL, "ec", ec_main }, | ||
201 | { FUNC_TYPE_GENERAL, "ecparam", ecparam_main }, | ||
202 | #endif | ||
203 | #ifndef OPENSSL_NO_RSA | ||
204 | { FUNC_TYPE_GENERAL, "genrsa", genrsa_main }, | ||
205 | { FUNC_TYPE_GENERAL, "rsa", rsa_main }, | ||
206 | { FUNC_TYPE_GENERAL, "rsautl", rsautl_main }, | ||
207 | #endif | ||
208 | |||
209 | /* Message Digests. */ | ||
210 | #ifndef OPENSSL_NO_MD4 | ||
211 | { FUNC_TYPE_MD, "md4", dgst_main }, | ||
212 | #endif | ||
213 | #ifndef OPENSSL_NO_MD5 | ||
214 | { FUNC_TYPE_MD, "md5", dgst_main }, | ||
215 | #endif | ||
216 | #ifndef OPENSSL_NO_RIPEMD160 | ||
217 | { FUNC_TYPE_MD, "ripemd160", dgst_main }, | ||
218 | #endif | ||
219 | #ifndef OPENSSL_NO_SHA1 | ||
220 | { FUNC_TYPE_MD, "sha1", dgst_main }, | ||
221 | #endif | ||
222 | #ifndef OPENSSL_NO_SHA224 | ||
223 | { FUNC_TYPE_MD, "sha224", dgst_main }, | ||
224 | #endif | ||
225 | #ifndef OPENSSL_NO_SHA256 | ||
226 | { FUNC_TYPE_MD, "sha256", dgst_main }, | ||
227 | #endif | ||
228 | #ifndef OPENSSL_NO_SHA384 | ||
229 | { FUNC_TYPE_MD, "sha384", dgst_main }, | ||
230 | #endif | ||
231 | #ifndef OPENSSL_NO_SHA512 | ||
232 | { FUNC_TYPE_MD, "sha512", dgst_main }, | ||
233 | #endif | ||
234 | #ifndef OPENSSL_NO_SM3 | ||
235 | { FUNC_TYPE_MD, "sm3", dgst_main }, | ||
236 | { FUNC_TYPE_MD, "sm3WithRSAEncryption", dgst_main }, | ||
237 | #endif | ||
238 | #ifndef OPENSSL_NO_WHIRLPOOL | ||
239 | { FUNC_TYPE_MD, "whirlpool", dgst_main }, | ||
240 | #endif | ||
241 | |||
242 | /* Ciphers. */ | ||
243 | { FUNC_TYPE_CIPHER, "base64", enc_main }, | ||
244 | #ifndef OPENSSL_NO_AES | ||
245 | { FUNC_TYPE_CIPHER, "aes-128-cbc", enc_main }, | ||
246 | { FUNC_TYPE_CIPHER, "aes-128-ecb", enc_main }, | ||
247 | { FUNC_TYPE_CIPHER, "aes-192-cbc", enc_main }, | ||
248 | { FUNC_TYPE_CIPHER, "aes-192-ecb", enc_main }, | ||
249 | { FUNC_TYPE_CIPHER, "aes-256-cbc", enc_main }, | ||
250 | { FUNC_TYPE_CIPHER, "aes-256-ecb", enc_main }, | ||
251 | #endif | ||
252 | #ifndef OPENSSL_NO_BF | ||
253 | { FUNC_TYPE_CIPHER, "bf", enc_main }, | ||
254 | { FUNC_TYPE_CIPHER, "bf-cbc", enc_main }, | ||
255 | { FUNC_TYPE_CIPHER, "bf-ecb", enc_main }, | ||
256 | { FUNC_TYPE_CIPHER, "bf-cfb", enc_main }, | ||
257 | { FUNC_TYPE_CIPHER, "bf-ofb", enc_main }, | ||
258 | #endif | ||
259 | #ifndef OPENSSL_NO_CAMELLIA | ||
260 | { FUNC_TYPE_CIPHER, "camellia-128-cbc", enc_main }, | ||
261 | { FUNC_TYPE_CIPHER, "camellia-128-ecb", enc_main }, | ||
262 | { FUNC_TYPE_CIPHER, "camellia-192-cbc", enc_main }, | ||
263 | { FUNC_TYPE_CIPHER, "camellia-192-ecb", enc_main }, | ||
264 | { FUNC_TYPE_CIPHER, "camellia-256-cbc", enc_main }, | ||
265 | { FUNC_TYPE_CIPHER, "camellia-256-ecb", enc_main }, | ||
266 | #endif | ||
267 | #ifndef OPENSSL_NO_CAST | ||
268 | { FUNC_TYPE_CIPHER, "cast", enc_main }, | ||
269 | { FUNC_TYPE_CIPHER, "cast5-cbc", enc_main }, | ||
270 | { FUNC_TYPE_CIPHER, "cast5-ecb", enc_main }, | ||
271 | { FUNC_TYPE_CIPHER, "cast5-cfb", enc_main }, | ||
272 | { FUNC_TYPE_CIPHER, "cast5-ofb", enc_main }, | ||
273 | { FUNC_TYPE_CIPHER, "cast-cbc", enc_main }, | ||
274 | #endif | ||
275 | #ifndef OPENSSL_NO_CHACHA | ||
276 | { FUNC_TYPE_CIPHER, "chacha", enc_main }, | ||
277 | #endif | ||
278 | #ifndef OPENSSL_NO_DES | ||
279 | { FUNC_TYPE_CIPHER, "des", enc_main }, | ||
280 | { FUNC_TYPE_CIPHER, "des3", enc_main }, | ||
281 | { FUNC_TYPE_CIPHER, "desx", enc_main }, | ||
282 | { FUNC_TYPE_CIPHER, "des-ecb", enc_main }, | ||
283 | { FUNC_TYPE_CIPHER, "des-ede", enc_main }, | ||
284 | { FUNC_TYPE_CIPHER, "des-ede3", enc_main }, | ||
285 | { FUNC_TYPE_CIPHER, "des-cbc", enc_main }, | ||
286 | { FUNC_TYPE_CIPHER, "des-ede-cbc", enc_main }, | ||
287 | { FUNC_TYPE_CIPHER, "des-ede3-cbc", enc_main }, | ||
288 | { FUNC_TYPE_CIPHER, "des-cfb", enc_main }, | ||
289 | { FUNC_TYPE_CIPHER, "des-ede-cfb", enc_main }, | ||
290 | { FUNC_TYPE_CIPHER, "des-ede3-cfb", enc_main }, | ||
291 | { FUNC_TYPE_CIPHER, "des-ofb", enc_main }, | ||
292 | { FUNC_TYPE_CIPHER, "des-ede-ofb", enc_main }, | ||
293 | { FUNC_TYPE_CIPHER, "des-ede3-ofb", enc_main }, | ||
294 | #endif | ||
295 | #ifndef OPENSSL_NO_IDEA | ||
296 | { FUNC_TYPE_CIPHER, "idea", enc_main }, | ||
297 | { FUNC_TYPE_CIPHER, "idea-cbc", enc_main }, | ||
298 | { FUNC_TYPE_CIPHER, "idea-ecb", enc_main }, | ||
299 | { FUNC_TYPE_CIPHER, "idea-cfb", enc_main }, | ||
300 | { FUNC_TYPE_CIPHER, "idea-ofb", enc_main }, | ||
301 | #endif | ||
302 | #ifndef OPENSSL_NO_RC2 | ||
303 | { FUNC_TYPE_CIPHER, "rc2", enc_main }, | ||
304 | { FUNC_TYPE_CIPHER, "rc2-cbc", enc_main }, | ||
305 | { FUNC_TYPE_CIPHER, "rc2-ecb", enc_main }, | ||
306 | { FUNC_TYPE_CIPHER, "rc2-cfb", enc_main }, | ||
307 | { FUNC_TYPE_CIPHER, "rc2-ofb", enc_main }, | ||
308 | { FUNC_TYPE_CIPHER, "rc2-64-cbc", enc_main }, | ||
309 | { FUNC_TYPE_CIPHER, "rc2-40-cbc", enc_main }, | ||
310 | #endif | ||
311 | #ifndef OPENSSL_NO_RC4 | ||
312 | { FUNC_TYPE_CIPHER, "rc4", enc_main }, | ||
313 | { FUNC_TYPE_CIPHER, "rc4-40", enc_main }, | ||
314 | #endif | ||
315 | #ifndef OPENSSL_NO_SM4 | ||
316 | { FUNC_TYPE_CIPHER, "sm4", enc_main }, | ||
317 | { FUNC_TYPE_CIPHER, "sm4-ecb", enc_main }, | ||
318 | { FUNC_TYPE_CIPHER, "sm4-cbc", enc_main }, | ||
319 | { FUNC_TYPE_CIPHER, "sm4-ofb", enc_main }, | ||
320 | { FUNC_TYPE_CIPHER, "sm4-cfb", enc_main }, | ||
321 | #endif | ||
322 | { 0, NULL, NULL } | ||
323 | }; | ||
324 | |||
325 | static void openssl_startup(void); | ||
326 | static void openssl_shutdown(void); | ||
327 | |||
328 | /* The LHASH callbacks ("hash" & "cmp") have been replaced by functions with the | ||
329 | * base prototypes (we cast each variable inside the function to the required | ||
330 | * type of "FUNCTION*"). This removes the necessity for macro-generated wrapper | ||
331 | * functions. */ | ||
332 | |||
333 | static LHASH_OF(FUNCTION) *prog_init(void); | ||
334 | static int do_cmd(LHASH_OF(FUNCTION) *prog, int argc, char *argv[]); | ||
335 | static void print_help(void); | ||
336 | static void list_pkey(BIO * out); | ||
337 | static void list_cipher(BIO * out); | ||
338 | static void list_md(BIO * out); | ||
339 | char *default_config_file = NULL; | ||
340 | |||
341 | CONF *config = NULL; | ||
342 | BIO *bio_err = NULL; | ||
343 | |||
344 | static void | ||
345 | openssl_startup(void) | ||
346 | { | ||
347 | signal(SIGPIPE, SIG_IGN); | ||
348 | |||
349 | OpenSSL_add_all_algorithms(); | ||
350 | SSL_library_init(); | ||
351 | SSL_load_error_strings(); | ||
352 | |||
353 | setup_ui(); | ||
354 | } | ||
355 | |||
356 | static void | ||
357 | openssl_shutdown(void) | ||
358 | { | ||
359 | CONF_modules_unload(1); | ||
360 | destroy_ui(); | ||
361 | OBJ_cleanup(); | ||
362 | EVP_cleanup(); | ||
363 | CRYPTO_cleanup_all_ex_data(); | ||
364 | ERR_remove_thread_state(NULL); | ||
365 | ERR_free_strings(); | ||
366 | } | ||
367 | |||
368 | int | ||
369 | main(int argc, char **argv) | ||
370 | { | ||
371 | char *to_free = NULL; | ||
372 | int i, ret = 0; | ||
373 | char *p; | ||
374 | LHASH_OF(FUNCTION) * prog = NULL; | ||
375 | long errline; | ||
376 | |||
377 | if (pledge("stdio cpath wpath rpath inet dns proc flock tty", NULL) == -1) { | ||
378 | fprintf(stderr, "openssl: pledge: %s\n", strerror(errno)); | ||
379 | exit(1); | ||
380 | } | ||
381 | |||
382 | bio_err = BIO_new_fp(stderr, BIO_NOCLOSE); | ||
383 | if (bio_err == NULL) { | ||
384 | fprintf(stderr, "openssl: failed to initialise bio_err\n"); | ||
385 | exit(1); | ||
386 | } | ||
387 | |||
388 | if (BIO_sock_init() != 1) { | ||
389 | BIO_printf(bio_err, "BIO_sock_init failed\n"); | ||
390 | exit(1); | ||
391 | } | ||
392 | |||
393 | openssl_startup(); | ||
394 | |||
395 | /* Lets load up our environment a little */ | ||
396 | p = getenv("OPENSSL_CONF"); | ||
397 | if (p == NULL) { | ||
398 | p = to_free = make_config_name(); | ||
399 | if (p == NULL) { | ||
400 | BIO_printf(bio_err, "error making config file name\n"); | ||
401 | goto end; | ||
402 | } | ||
403 | } | ||
404 | |||
405 | default_config_file = p; | ||
406 | |||
407 | config = NCONF_new(NULL); | ||
408 | i = NCONF_load(config, p, &errline); | ||
409 | if (i == 0) { | ||
410 | if (ERR_GET_REASON(ERR_peek_last_error()) == | ||
411 | CONF_R_NO_SUCH_FILE) { | ||
412 | BIO_printf(bio_err, | ||
413 | "WARNING: can't open config file: %s\n", p); | ||
414 | ERR_clear_error(); | ||
415 | NCONF_free(config); | ||
416 | config = NULL; | ||
417 | } else { | ||
418 | ERR_print_errors(bio_err); | ||
419 | NCONF_free(config); | ||
420 | exit(1); | ||
421 | } | ||
422 | } | ||
423 | |||
424 | if (!load_config(bio_err, NULL)) { | ||
425 | BIO_printf(bio_err, "failed to load configuration\n"); | ||
426 | goto end; | ||
427 | } | ||
428 | |||
429 | prog = prog_init(); | ||
430 | |||
431 | /* | ||
432 | * ok, now check that there are not arguments, if there are, run with | ||
433 | * them, shifting the executable name off the front | ||
434 | */ | ||
435 | argc--; | ||
436 | argv++; | ||
437 | |||
438 | if (argc < 1) { | ||
439 | print_help(); | ||
440 | goto end; | ||
441 | } | ||
442 | |||
443 | ret = do_cmd(prog, argc, argv); | ||
444 | if (ret < 0) | ||
445 | ret = 0; | ||
446 | |||
447 | end: | ||
448 | free(to_free); | ||
449 | |||
450 | if (config != NULL) { | ||
451 | NCONF_free(config); | ||
452 | config = NULL; | ||
453 | } | ||
454 | if (prog != NULL) | ||
455 | lh_FUNCTION_free(prog); | ||
456 | |||
457 | openssl_shutdown(); | ||
458 | |||
459 | if (bio_err != NULL) { | ||
460 | BIO_free(bio_err); | ||
461 | bio_err = NULL; | ||
462 | } | ||
463 | return (ret); | ||
464 | } | ||
465 | |||
466 | #define LIST_STANDARD_COMMANDS "list-standard-commands" | ||
467 | #define LIST_MESSAGE_DIGEST_COMMANDS "list-message-digest-commands" | ||
468 | #define LIST_MESSAGE_DIGEST_ALGORITHMS "list-message-digest-algorithms" | ||
469 | #define LIST_CIPHER_COMMANDS "list-cipher-commands" | ||
470 | #define LIST_CIPHER_ALGORITHMS "list-cipher-algorithms" | ||
471 | #define LIST_PUBLIC_KEY_ALGORITHMS "list-public-key-algorithms" | ||
472 | |||
473 | |||
474 | static int | ||
475 | do_cmd(LHASH_OF(FUNCTION) * prog, int argc, char *argv[]) | ||
476 | { | ||
477 | FUNCTION f, *fp; | ||
478 | int ret = 1; | ||
479 | |||
480 | if (argc <= 0 || argv[0] == NULL) | ||
481 | return 0; | ||
482 | |||
483 | f.name = argv[0]; | ||
484 | fp = lh_FUNCTION_retrieve(prog, &f); | ||
485 | if (fp == NULL) { | ||
486 | if (EVP_get_digestbyname(argv[0])) { | ||
487 | f.type = FUNC_TYPE_MD; | ||
488 | f.func = dgst_main; | ||
489 | fp = &f; | ||
490 | } else if (EVP_get_cipherbyname(argv[0])) { | ||
491 | f.type = FUNC_TYPE_CIPHER; | ||
492 | f.func = enc_main; | ||
493 | fp = &f; | ||
494 | } | ||
495 | } | ||
496 | |||
497 | if (fp != NULL) | ||
498 | return fp->func(argc, argv); | ||
499 | |||
500 | if (strcmp(argv[0], "help") == 0) { | ||
501 | print_help(); | ||
502 | return 0; | ||
503 | } | ||
504 | |||
505 | if ((strncmp(argv[0], "no-", 3)) == 0) { | ||
506 | BIO *bio_stdout = BIO_new_fp(stdout, BIO_NOCLOSE); | ||
507 | f.name = argv[0] + 3; | ||
508 | ret = (lh_FUNCTION_retrieve(prog, &f) != NULL); | ||
509 | if (!ret) | ||
510 | BIO_printf(bio_stdout, "%s\n", argv[0]); | ||
511 | else | ||
512 | BIO_printf(bio_stdout, "%s\n", argv[0] + 3); | ||
513 | BIO_free_all(bio_stdout); | ||
514 | return ret; | ||
515 | } | ||
516 | |||
517 | if ((strcmp(argv[0], LIST_STANDARD_COMMANDS) == 0) || | ||
518 | (strcmp(argv[0], LIST_MESSAGE_DIGEST_COMMANDS) == 0) || | ||
519 | (strcmp(argv[0], LIST_MESSAGE_DIGEST_ALGORITHMS) == 0) || | ||
520 | (strcmp(argv[0], LIST_CIPHER_COMMANDS) == 0) || | ||
521 | (strcmp(argv[0], LIST_CIPHER_ALGORITHMS) == 0) || | ||
522 | (strcmp(argv[0], LIST_PUBLIC_KEY_ALGORITHMS) == 0)) { | ||
523 | int list_type; | ||
524 | BIO *bio_stdout; | ||
525 | |||
526 | if (strcmp(argv[0], LIST_STANDARD_COMMANDS) == 0) | ||
527 | list_type = FUNC_TYPE_GENERAL; | ||
528 | else if (strcmp(argv[0], LIST_MESSAGE_DIGEST_COMMANDS) == 0) | ||
529 | list_type = FUNC_TYPE_MD; | ||
530 | else if (strcmp(argv[0], LIST_MESSAGE_DIGEST_ALGORITHMS) == 0) | ||
531 | list_type = FUNC_TYPE_MD_ALG; | ||
532 | else if (strcmp(argv[0], LIST_PUBLIC_KEY_ALGORITHMS) == 0) | ||
533 | list_type = FUNC_TYPE_PKEY; | ||
534 | else if (strcmp(argv[0], LIST_CIPHER_ALGORITHMS) == 0) | ||
535 | list_type = FUNC_TYPE_CIPHER_ALG; | ||
536 | else /* strcmp(argv[0],LIST_CIPHER_COMMANDS) == 0 */ | ||
537 | list_type = FUNC_TYPE_CIPHER; | ||
538 | bio_stdout = BIO_new_fp(stdout, BIO_NOCLOSE); | ||
539 | |||
540 | if (list_type == FUNC_TYPE_PKEY) | ||
541 | list_pkey(bio_stdout); | ||
542 | if (list_type == FUNC_TYPE_MD_ALG) | ||
543 | list_md(bio_stdout); | ||
544 | if (list_type == FUNC_TYPE_CIPHER_ALG) | ||
545 | list_cipher(bio_stdout); | ||
546 | else { | ||
547 | for (fp = functions; fp->name != NULL; fp++) | ||
548 | if (fp->type == list_type) | ||
549 | BIO_printf(bio_stdout, "%s\n", | ||
550 | fp->name); | ||
551 | } | ||
552 | BIO_free_all(bio_stdout); | ||
553 | return 0; | ||
554 | } | ||
555 | |||
556 | BIO_printf(bio_err, | ||
557 | "openssl:Error: '%s' is an invalid command.\n", | ||
558 | argv[0]); | ||
559 | print_help(); | ||
560 | |||
561 | return 1; | ||
562 | } | ||
563 | |||
564 | static void | ||
565 | print_help(void) | ||
566 | { | ||
567 | FUNCTION *fp; | ||
568 | int i = 0; | ||
569 | int tp = 0; | ||
570 | int nl; | ||
571 | |||
572 | BIO_printf(bio_err, "\nStandard commands"); | ||
573 | for (fp = functions; fp->name != NULL; fp++) { | ||
574 | nl = 0; | ||
575 | #ifdef OPENSSL_NO_CAMELLIA | ||
576 | if (((i++) % 5) == 0) | ||
577 | #else | ||
578 | if (((i++) % 4) == 0) | ||
579 | #endif | ||
580 | { | ||
581 | BIO_printf(bio_err, "\n"); | ||
582 | nl = 1; | ||
583 | } | ||
584 | if (fp->type != tp) { | ||
585 | tp = fp->type; | ||
586 | if (!nl) | ||
587 | BIO_printf(bio_err, "\n"); | ||
588 | if (tp == FUNC_TYPE_MD) { | ||
589 | i = 1; | ||
590 | BIO_printf(bio_err, | ||
591 | "\nMessage Digest commands (see the `dgst' command for more details)\n"); | ||
592 | } else if (tp == FUNC_TYPE_CIPHER) { | ||
593 | i = 1; | ||
594 | BIO_printf(bio_err, "\nCipher commands (see the `enc' command for more details)\n"); | ||
595 | } | ||
596 | } | ||
597 | #ifdef OPENSSL_NO_CAMELLIA | ||
598 | BIO_printf(bio_err, "%-15s", fp->name); | ||
599 | #else | ||
600 | BIO_printf(bio_err, "%-18s", fp->name); | ||
601 | #endif | ||
602 | } | ||
603 | |||
604 | BIO_printf(bio_err, "\n\n"); | ||
605 | } | ||
606 | |||
607 | static int | ||
608 | SortFnByName(const void *_f1, const void *_f2) | ||
609 | { | ||
610 | const FUNCTION *f1 = _f1; | ||
611 | const FUNCTION *f2 = _f2; | ||
612 | |||
613 | if (f1->type != f2->type) | ||
614 | return f1->type - f2->type; | ||
615 | return strcmp(f1->name, f2->name); | ||
616 | } | ||
617 | |||
618 | static void | ||
619 | list_pkey(BIO * out) | ||
620 | { | ||
621 | int i; | ||
622 | |||
623 | for (i = 0; i < EVP_PKEY_asn1_get_count(); i++) { | ||
624 | const EVP_PKEY_ASN1_METHOD *ameth; | ||
625 | int pkey_id, pkey_base_id, pkey_flags; | ||
626 | const char *pinfo, *pem_str; | ||
627 | ameth = EVP_PKEY_asn1_get0(i); | ||
628 | EVP_PKEY_asn1_get0_info(&pkey_id, &pkey_base_id, &pkey_flags, | ||
629 | &pinfo, &pem_str, ameth); | ||
630 | if (pkey_flags & ASN1_PKEY_ALIAS) { | ||
631 | BIO_printf(out, "Name: %s\n", | ||
632 | OBJ_nid2ln(pkey_id)); | ||
633 | BIO_printf(out, "\tType: Alias to %s\n", | ||
634 | OBJ_nid2ln(pkey_base_id)); | ||
635 | } else { | ||
636 | BIO_printf(out, "Name: %s\n", pinfo); | ||
637 | BIO_printf(out, "\tType: %s Algorithm\n", | ||
638 | pkey_flags & ASN1_PKEY_DYNAMIC ? | ||
639 | "External" : "Builtin"); | ||
640 | BIO_printf(out, "\tOID: %s\n", OBJ_nid2ln(pkey_id)); | ||
641 | if (pem_str == NULL) | ||
642 | pem_str = "(none)"; | ||
643 | BIO_printf(out, "\tPEM string: %s\n", pem_str); | ||
644 | } | ||
645 | |||
646 | } | ||
647 | } | ||
648 | |||
649 | static void | ||
650 | list_cipher_fn(const EVP_CIPHER * c, const char *from, const char *to, | ||
651 | void *arg) | ||
652 | { | ||
653 | if (c) | ||
654 | BIO_printf(arg, "%s\n", EVP_CIPHER_name(c)); | ||
655 | else { | ||
656 | if (!from) | ||
657 | from = "<undefined>"; | ||
658 | if (!to) | ||
659 | to = "<undefined>"; | ||
660 | BIO_printf(arg, "%s => %s\n", from, to); | ||
661 | } | ||
662 | } | ||
663 | |||
664 | static void | ||
665 | list_cipher(BIO * out) | ||
666 | { | ||
667 | EVP_CIPHER_do_all_sorted(list_cipher_fn, out); | ||
668 | } | ||
669 | |||
670 | static void | ||
671 | list_md_fn(const EVP_MD * m, const char *from, const char *to, void *arg) | ||
672 | { | ||
673 | if (m) | ||
674 | BIO_printf(arg, "%s\n", EVP_MD_name(m)); | ||
675 | else { | ||
676 | if (!from) | ||
677 | from = "<undefined>"; | ||
678 | if (!to) | ||
679 | to = "<undefined>"; | ||
680 | BIO_printf(arg, "%s => %s\n", from, to); | ||
681 | } | ||
682 | } | ||
683 | |||
684 | static void | ||
685 | list_md(BIO * out) | ||
686 | { | ||
687 | EVP_MD_do_all_sorted(list_md_fn, out); | ||
688 | } | ||
689 | |||
690 | static int | ||
691 | function_cmp(const FUNCTION * a, const FUNCTION * b) | ||
692 | { | ||
693 | return strncmp(a->name, b->name, 8); | ||
694 | } | ||
695 | |||
696 | static IMPLEMENT_LHASH_COMP_FN(function, FUNCTION) | ||
697 | |||
698 | static unsigned long | ||
699 | function_hash(const FUNCTION * a) | ||
700 | { | ||
701 | return lh_strhash(a->name); | ||
702 | } | ||
703 | |||
704 | static IMPLEMENT_LHASH_HASH_FN(function, FUNCTION) | ||
705 | |||
706 | static LHASH_OF(FUNCTION) * | ||
707 | prog_init(void) | ||
708 | { | ||
709 | LHASH_OF(FUNCTION) * ret; | ||
710 | FUNCTION *f; | ||
711 | size_t i; | ||
712 | |||
713 | /* Purely so it looks nice when the user hits ? */ | ||
714 | for (i = 0, f = functions; f->name != NULL; ++f, ++i) | ||
715 | ; | ||
716 | qsort(functions, i, sizeof *functions, SortFnByName); | ||
717 | |||
718 | if ((ret = lh_FUNCTION_new()) == NULL) | ||
719 | return (NULL); | ||
720 | |||
721 | for (f = functions; f->name != NULL; f++) | ||
722 | (void) lh_FUNCTION_insert(ret, f); | ||
723 | return (ret); | ||
724 | } | ||