]> git.ipfire.org Git - thirdparty/openssl.git/blob - apps/rand.c
a893896033a8c4422a9c6138ae31deb17602e4e1
[thirdparty/openssl.git] / apps / rand.c
1 /* apps/rand.c */
2 /* ====================================================================
3 * Copyright (c) 1998-2001 The OpenSSL Project. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 *
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 *
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
15 * distribution.
16 *
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/)"
21 *
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.
26 *
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.
30 *
31 * 6. Redistributions of any form whatsoever must retain the following
32 * acknowledgment:
33 * "This product includes software developed by the OpenSSL Project
34 * for use in the OpenSSL Toolkit (http://www.openssl.org/)"
35 *
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 * ====================================================================
49 *
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).
53 *
54 */
55
56 #include "apps.h"
57
58 #include <ctype.h>
59 #include <stdio.h>
60 #include <string.h>
61
62 #include <openssl/bio.h>
63 #include <openssl/err.h>
64 #include <openssl/rand.h>
65
66 #undef PROG
67 #define PROG rand_main
68
69 /* -out file - write to file
70 * -rand file:file - PRNG seed files
71 * -base64 - encode output
72 * num - write 'num' bytes
73 */
74
75 int MAIN(int, char **);
76
77 int MAIN(int argc, char **argv)
78 {
79 #ifndef OPENSSL_NO_ENGINE
80 ENGINE *e = NULL;
81 #endif
82 int i, r, ret = 1;
83 int badopt;
84 char *outfile = NULL;
85 char *inrand = NULL;
86 int base64 = 0;
87 BIO *out = NULL;
88 int num = -1;
89 #ifndef OPENSSL_NO_ENGINE
90 char *engine=NULL;
91 #endif
92
93 apps_startup();
94
95 if (bio_err == NULL)
96 if ((bio_err = BIO_new(BIO_s_file())) != NULL)
97 BIO_set_fp(bio_err, stderr, BIO_NOCLOSE|BIO_FP_TEXT);
98
99 if (!load_config(bio_err, NULL))
100 goto err;
101
102 badopt = 0;
103 i = 0;
104 while (!badopt && argv[++i] != NULL)
105 {
106 if (strcmp(argv[i], "-out") == 0)
107 {
108 if ((argv[i+1] != NULL) && (outfile == NULL))
109 outfile = argv[++i];
110 else
111 badopt = 1;
112 }
113 #ifndef OPENSSL_NO_ENGINE
114 else if (strcmp(argv[i], "-engine") == 0)
115 {
116 if ((argv[i+1] != NULL) && (engine == NULL))
117 engine = argv[++i];
118 else
119 badopt = 1;
120 }
121 #endif
122 else if (strcmp(argv[i], "-rand") == 0)
123 {
124 if ((argv[i+1] != NULL) && (inrand == NULL))
125 inrand = argv[++i];
126 else
127 badopt = 1;
128 }
129 else if (strcmp(argv[i], "-base64") == 0)
130 {
131 if (!base64)
132 base64 = 1;
133 else
134 badopt = 1;
135 }
136 else if (isdigit((unsigned char)argv[i][0]))
137 {
138 if (num < 0)
139 {
140 r = sscanf(argv[i], "%d", &num);
141 if (r == 0 || num < 0)
142 badopt = 1;
143 }
144 else
145 badopt = 1;
146 }
147 else
148 badopt = 1;
149 }
150
151 if (num < 0)
152 badopt = 1;
153
154 if (badopt)
155 {
156 BIO_printf(bio_err, "Usage: rand [options] num\n");
157 BIO_printf(bio_err, "where options are\n");
158 BIO_printf(bio_err, "-out file - write to file\n");
159 #ifndef OPENSSL_NO_ENGINE
160 BIO_printf(bio_err, "-engine e - use engine e, possibly a hardware device.\n");
161 #endif
162 BIO_printf(bio_err, "-rand file%cfile%c... - seed PRNG from files\n", LIST_SEPARATOR_CHAR, LIST_SEPARATOR_CHAR);
163 BIO_printf(bio_err, "-base64 - encode output\n");
164 goto err;
165 }
166
167 #ifndef OPENSSL_NO_ENGINE
168 e = setup_engine(bio_err, engine, 0);
169 #endif
170
171 app_RAND_load_file(NULL, bio_err, (inrand != NULL));
172 if (inrand != NULL)
173 BIO_printf(bio_err,"%ld semi-random bytes loaded\n",
174 app_RAND_load_files(inrand));
175
176 out = BIO_new(BIO_s_file());
177 if (out == NULL)
178 goto err;
179 if (outfile != NULL)
180 r = BIO_write_filename(out, outfile);
181 else
182 {
183 r = BIO_set_fp(out, stdout, BIO_NOCLOSE | BIO_FP_TEXT);
184 #ifdef OPENSSL_SYS_VMS
185 {
186 BIO *tmpbio = BIO_new(BIO_f_linebuffer());
187 out = BIO_push(tmpbio, out);
188 }
189 #endif
190 }
191 if (r <= 0)
192 goto err;
193
194 if (base64)
195 {
196 BIO *b64 = BIO_new(BIO_f_base64());
197 if (b64 == NULL)
198 goto err;
199 out = BIO_push(b64, out);
200 }
201
202 while (num > 0)
203 {
204 unsigned char buf[4096];
205 int chunk;
206
207 chunk = num;
208 if (chunk > (int)sizeof(buf))
209 chunk = sizeof buf;
210 r = RAND_bytes(buf, chunk);
211 if (r <= 0)
212 goto err;
213 BIO_write(out, buf, chunk);
214 num -= chunk;
215 }
216 BIO_flush(out);
217
218 app_RAND_write_file(NULL, bio_err);
219 ret = 0;
220
221 err:
222 ERR_print_errors(bio_err);
223 if (out)
224 BIO_free_all(out);
225 apps_shutdown();
226 OPENSSL_EXIT(ret);
227 }