2000-03-01 07:47:01 +08:00
|
|
|
/* apps/rand.c */
|
|
|
|
|
|
|
|
#include "apps.h"
|
|
|
|
|
|
|
|
#include <ctype.h>
|
|
|
|
#include <stdio.h>
|
2000-03-14 12:09:48 +08:00
|
|
|
#include <string.h>
|
2000-03-01 07:47:01 +08:00
|
|
|
|
|
|
|
#include <openssl/bio.h>
|
|
|
|
#include <openssl/err.h>
|
|
|
|
#include <openssl/rand.h>
|
2000-10-27 05:07:28 +08:00
|
|
|
#include <openssl/engine.h>
|
2000-03-01 07:47:01 +08:00
|
|
|
|
|
|
|
#undef PROG
|
|
|
|
#define PROG rand_main
|
|
|
|
|
|
|
|
/* -out file - write to file
|
|
|
|
* -rand file:file - PRNG seed files
|
|
|
|
* -base64 - encode output
|
|
|
|
* num - write 'num' bytes
|
|
|
|
*/
|
|
|
|
|
|
|
|
int MAIN(int, char **);
|
|
|
|
|
|
|
|
int MAIN(int argc, char **argv)
|
|
|
|
{
|
2000-10-27 05:07:28 +08:00
|
|
|
ENGINE *e = NULL;
|
2000-03-01 07:47:01 +08:00
|
|
|
int i, r, ret = 1;
|
|
|
|
int badopt;
|
|
|
|
char *outfile = NULL;
|
2000-06-29 00:47:45 +08:00
|
|
|
char *inrand = NULL;
|
2000-03-01 07:47:01 +08:00
|
|
|
int base64 = 0;
|
|
|
|
BIO *out = NULL;
|
|
|
|
int num = -1;
|
2000-10-27 05:07:28 +08:00
|
|
|
char *engine=NULL;
|
2000-03-01 07:47:01 +08:00
|
|
|
|
|
|
|
apps_startup();
|
|
|
|
|
|
|
|
if (bio_err == NULL)
|
|
|
|
if ((bio_err = BIO_new(BIO_s_file())) != NULL)
|
|
|
|
BIO_set_fp(bio_err, stderr, BIO_NOCLOSE|BIO_FP_TEXT);
|
|
|
|
|
|
|
|
badopt = 0;
|
|
|
|
i = 0;
|
|
|
|
while (!badopt && argv[++i] != NULL)
|
|
|
|
{
|
|
|
|
if (strcmp(argv[i], "-out") == 0)
|
|
|
|
{
|
|
|
|
if ((argv[i+1] != NULL) && (outfile == NULL))
|
|
|
|
outfile = argv[++i];
|
|
|
|
else
|
|
|
|
badopt = 1;
|
|
|
|
}
|
2000-10-27 05:07:28 +08:00
|
|
|
if (strcmp(argv[i], "-engine") == 0)
|
|
|
|
{
|
|
|
|
if ((argv[i+1] != NULL) && (engine == NULL))
|
|
|
|
engine = argv[++i];
|
|
|
|
else
|
|
|
|
badopt = 1;
|
|
|
|
}
|
2000-03-01 07:47:01 +08:00
|
|
|
else if (strcmp(argv[i], "-rand") == 0)
|
|
|
|
{
|
|
|
|
if ((argv[i+1] != NULL) && (inrand == NULL))
|
|
|
|
inrand = argv[++i];
|
|
|
|
else
|
|
|
|
badopt = 1;
|
|
|
|
}
|
|
|
|
else if (strcmp(argv[i], "-base64") == 0)
|
|
|
|
{
|
|
|
|
if (!base64)
|
|
|
|
base64 = 1;
|
|
|
|
else
|
|
|
|
badopt = 1;
|
|
|
|
}
|
2000-05-19 20:02:49 +08:00
|
|
|
else if (isdigit((unsigned char)argv[i][0]))
|
2000-03-01 07:47:01 +08:00
|
|
|
{
|
|
|
|
if (num < 0)
|
|
|
|
{
|
|
|
|
r = sscanf(argv[i], "%d", &num);
|
|
|
|
if (r == 0 || num < 0)
|
|
|
|
badopt = 1;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
badopt = 1;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
badopt = 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (num < 0)
|
|
|
|
badopt = 1;
|
|
|
|
|
|
|
|
if (badopt)
|
|
|
|
{
|
|
|
|
BIO_printf(bio_err, "Usage: rand [options] num\n");
|
|
|
|
BIO_printf(bio_err, "where options are\n");
|
2000-10-27 05:07:28 +08:00
|
|
|
BIO_printf(bio_err, "-out file - write to file\n");
|
|
|
|
BIO_printf(bio_err," -engine e - use engine e, possibly a hardware device.\n");
|
|
|
|
BIO_printf(bio_err, "-rand file%cfile%c... - seed PRNG from files\n", LIST_SEPARATOR_CHAR, LIST_SEPARATOR_CHAR);
|
|
|
|
BIO_printf(bio_err, "-base64 - encode output\n");
|
2000-03-01 07:47:01 +08:00
|
|
|
goto err;
|
|
|
|
}
|
|
|
|
|
2000-10-27 05:07:28 +08:00
|
|
|
if (engine != NULL)
|
|
|
|
{
|
|
|
|
if((e = ENGINE_by_id(engine)) == NULL)
|
|
|
|
{
|
|
|
|
BIO_printf(bio_err,"invalid engine \"%s\"\n",
|
|
|
|
engine);
|
|
|
|
goto err;
|
|
|
|
}
|
|
|
|
if(!ENGINE_set_default(e, ENGINE_METHOD_ALL))
|
|
|
|
{
|
|
|
|
BIO_printf(bio_err,"can't use that engine\n");
|
|
|
|
goto err;
|
|
|
|
}
|
|
|
|
BIO_printf(bio_err,"engine \"%s\" set.\n", engine);
|
|
|
|
/* Free our "structural" reference. */
|
|
|
|
ENGINE_free(e);
|
|
|
|
}
|
|
|
|
|
2000-06-29 00:47:45 +08:00
|
|
|
app_RAND_load_file(NULL, bio_err, (inrand != NULL));
|
2000-03-01 07:47:01 +08:00
|
|
|
if (inrand != NULL)
|
|
|
|
BIO_printf(bio_err,"%ld semi-random bytes loaded\n",
|
|
|
|
app_RAND_load_files(inrand));
|
|
|
|
|
|
|
|
out = BIO_new(BIO_s_file());
|
|
|
|
if (out == NULL)
|
|
|
|
goto err;
|
|
|
|
if (outfile != NULL)
|
|
|
|
r = BIO_write_filename(out, outfile);
|
|
|
|
else
|
On VMS, stdout may very well lead to a file that is written to in a
record-oriented fashion. That means that every write() will write a
separate record, which will be read separately by the programs trying
to read from it. This can be very confusing.
The solution is to put a BIO filter in the way that will buffer text
until a linefeed is reached, and then write everything a line at a
time, so every record written will be an actual line, not chunks of
lines and not (usually doesn't happen, but I've seen it once) several
lines in one record. Voila, BIO_f_linebuffer() is born.
Since we're so close to release time, I'm making this VMS-only for
now, just to make sure no code is needlessly broken by this. After
the release, this BIO method will be enabled on all other platforms as
well.
2000-09-20 21:55:50 +08:00
|
|
|
{
|
2000-03-01 07:47:01 +08:00
|
|
|
r = BIO_set_fp(out, stdout, BIO_NOCLOSE | BIO_FP_TEXT);
|
On VMS, stdout may very well lead to a file that is written to in a
record-oriented fashion. That means that every write() will write a
separate record, which will be read separately by the programs trying
to read from it. This can be very confusing.
The solution is to put a BIO filter in the way that will buffer text
until a linefeed is reached, and then write everything a line at a
time, so every record written will be an actual line, not chunks of
lines and not (usually doesn't happen, but I've seen it once) several
lines in one record. Voila, BIO_f_linebuffer() is born.
Since we're so close to release time, I'm making this VMS-only for
now, just to make sure no code is needlessly broken by this. After
the release, this BIO method will be enabled on all other platforms as
well.
2000-09-20 21:55:50 +08:00
|
|
|
#ifdef VMS
|
|
|
|
{
|
|
|
|
BIO *tmpbio = BIO_new(BIO_f_linebuffer());
|
|
|
|
out = BIO_push(tmpbio, out);
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
}
|
2000-03-01 07:47:01 +08:00
|
|
|
if (r <= 0)
|
|
|
|
goto err;
|
|
|
|
|
|
|
|
if (base64)
|
|
|
|
{
|
|
|
|
BIO *b64 = BIO_new(BIO_f_base64());
|
|
|
|
if (b64 == NULL)
|
|
|
|
goto err;
|
|
|
|
out = BIO_push(b64, out);
|
|
|
|
}
|
|
|
|
|
|
|
|
while (num > 0)
|
|
|
|
{
|
|
|
|
unsigned char buf[4096];
|
|
|
|
int chunk;
|
|
|
|
|
|
|
|
chunk = num;
|
|
|
|
if (chunk > sizeof buf)
|
|
|
|
chunk = sizeof buf;
|
|
|
|
r = RAND_bytes(buf, chunk);
|
|
|
|
if (r <= 0)
|
|
|
|
goto err;
|
|
|
|
BIO_write(out, buf, chunk);
|
|
|
|
num -= chunk;
|
|
|
|
}
|
|
|
|
BIO_flush(out);
|
|
|
|
|
|
|
|
app_RAND_write_file(NULL, bio_err);
|
|
|
|
ret = 0;
|
|
|
|
|
|
|
|
err:
|
|
|
|
ERR_print_errors(bio_err);
|
|
|
|
if (out)
|
|
|
|
BIO_free_all(out);
|
|
|
|
EXIT(ret);
|
|
|
|
}
|