2 /* ====================================================================
3 * Copyright (c) 1998-2001 The OpenSSL Project. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
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
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/)"
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.
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.
31 * 6. Redistributions of any form whatsoever must retain the following
33 * "This product includes software developed by the OpenSSL Project
34 * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
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 * ====================================================================
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).
62 #include <openssl/bio.h>
63 #include <openssl/err.h>
64 #include <openssl/rand.h>
67 #define PROG rand_main
70 * -out file - write to file
71 * -rand file:file - PRNG seed files
72 * -base64 - base64 encode output
73 * -hex - hex encode output
74 * num - write 'num' bytes
77 int MAIN(int, char **);
79 int MAIN(int argc, char **argv)
89 #ifndef OPENSSL_NO_ENGINE
96 if ((bio_err = BIO_new(BIO_s_file())) != NULL)
97 BIO_set_fp(bio_err, stderr, BIO_NOCLOSE | BIO_FP_TEXT);
99 if (!load_config(bio_err, NULL))
104 while (!badopt && argv[++i] != NULL) {
105 if (strcmp(argv[i], "-out") == 0) {
106 if ((argv[i + 1] != NULL) && (outfile == NULL))
111 #ifndef OPENSSL_NO_ENGINE
112 else if (strcmp(argv[i], "-engine") == 0) {
113 if ((argv[i + 1] != NULL) && (engine == NULL))
119 else if (strcmp(argv[i], "-rand") == 0) {
120 if ((argv[i + 1] != NULL) && (inrand == NULL))
124 } else if (strcmp(argv[i], "-base64") == 0) {
129 } else if (strcmp(argv[i], "-hex") == 0) {
134 } else if (isdigit((unsigned char)argv[i][0])) {
136 r = sscanf(argv[i], "%d", &num);
137 if (r == 0 || num < 0)
152 BIO_printf(bio_err, "Usage: rand [options] num\n");
153 BIO_printf(bio_err, "where options are\n");
154 BIO_printf(bio_err, "-out file - write to file\n");
155 #ifndef OPENSSL_NO_ENGINE
157 "-engine e - use engine e, possibly a hardware device.\n");
159 BIO_printf(bio_err, "-rand file%cfile%c... - seed PRNG from files\n",
160 LIST_SEPARATOR_CHAR, LIST_SEPARATOR_CHAR);
161 BIO_printf(bio_err, "-base64 - base64 encode output\n");
162 BIO_printf(bio_err, "-hex - hex encode output\n");
165 #ifndef OPENSSL_NO_ENGINE
166 setup_engine(bio_err, engine, 0);
169 app_RAND_load_file(NULL, bio_err, (inrand != NULL));
171 BIO_printf(bio_err, "%ld semi-random bytes loaded\n",
172 app_RAND_load_files(inrand));
174 out = BIO_new(BIO_s_file());
178 r = BIO_write_filename(out, outfile);
180 r = BIO_set_fp(out, stdout, BIO_NOCLOSE | BIO_FP_TEXT);
181 #ifdef OPENSSL_SYS_VMS
183 BIO *tmpbio = BIO_new(BIO_f_linebuffer());
184 out = BIO_push(tmpbio, out);
192 BIO *b64 = BIO_new(BIO_f_base64());
195 out = BIO_push(b64, out);
199 unsigned char buf[4096];
203 if (chunk > (int)sizeof(buf))
205 r = RAND_bytes(buf, chunk);
209 BIO_write(out, buf, chunk);
211 for (i = 0; i < chunk; i++)
212 BIO_printf(out, "%02x", buf[i]);
218 (void)BIO_flush(out);
220 app_RAND_write_file(NULL, bio_err);
224 ERR_print_errors(bio_err);