1 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
4 * This package is an SSL implementation written
5 * by Eric Young (eay@cryptsoft.com).
6 * The implementation was written so as to conform with Netscapes SSL.
8 * This library is free for commercial and non-commercial use as long as
9 * the following conditions are aheared to. The following conditions
10 * apply to all code found in this distribution, be it the RC4, RSA,
11 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
12 * included with this distribution is covered by the same copyright terms
13 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 * Copyright remains Eric Young's, and as such any Copyright notices in
16 * the code are not to be removed.
17 * If this package is used in a product, Eric Young should be given attribution
18 * as the author of the parts of the library used.
19 * This can be in the form of a textual message at program startup or
20 * in documentation (online or textual) provided with the package.
22 * Redistribution and use in source and binary forms, with or without
23 * modification, are permitted provided that the following conditions
25 * 1. Redistributions of source code must retain the copyright
26 * notice, this list of conditions and the following disclaimer.
27 * 2. Redistributions in binary form must reproduce the above copyright
28 * notice, this list of conditions and the following disclaimer in the
29 * documentation and/or other materials provided with the distribution.
30 * 3. All advertising materials mentioning features or use of this software
31 * must display the following acknowledgement:
32 * "This product includes cryptographic software written by
33 * Eric Young (eay@cryptsoft.com)"
34 * The word 'cryptographic' can be left out if the rouines from the library
35 * being used are not cryptographic related :-).
36 * 4. If you include any Windows specific code (or a derivative thereof) from
37 * the apps directory (application code) you must include an acknowledgement:
38 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
41 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
52 * The licence and distribution terms for any publically available version or
53 * derivative of this code cannot be changed. i.e. this code cannot simply be
54 * copied and put under another distribution licence
55 * [including the GNU Public Licence.]
58 #include <openssl/opensslconf.h>
60 NON_EMPTY_TRANSLATION_UNIT
68 # include <openssl/bio.h>
69 # include <openssl/err.h>
70 # include <openssl/bn.h>
71 # include <openssl/dsa.h>
72 # include <openssl/x509.h>
73 # include <openssl/pem.h>
77 static int stop_keygen_flag = 0;
79 static void timebomb_sigalarm(int foo)
86 static int dsa_cb(int p, int n, BN_GENCB *cb);
88 typedef enum OPTION_choice {
89 OPT_ERR = -1, OPT_EOF = 0, OPT_HELP,
90 OPT_INFORM, OPT_OUTFORM, OPT_IN, OPT_OUT, OPT_TEXT, OPT_C,
91 OPT_NOOUT, OPT_GENKEY, OPT_RAND, OPT_ENGINE,
95 OPTIONS dsaparam_options[] = {
96 {"help", OPT_HELP, '-', "Display this summary"},
97 {"inform", OPT_INFORM, 'F', "Input format - DER or PEM"},
98 {"in", OPT_IN, '<', "Input file"},
99 {"outform", OPT_OUTFORM, 'F', "Output format - DER or PEM"},
100 {"out", OPT_OUT, '>', "Output file"},
101 {"text", OPT_TEXT, '-', "Print as text"},
102 {"C", OPT_C, '-', "Output C code"},
103 {"noout", OPT_NOOUT, '-', "No output"},
104 {"genkey", OPT_GENKEY, '-', "Generate a DSA key"},
105 {"rand", OPT_RAND, 's', "Files to use for random number input"},
107 {"timebomb", OPT_TIMEBOMB, 'p', "Interrupt keygen after 'pnum' seconds"},
109 # ifndef OPENSSL_NO_ENGINE
110 {"engine", OPT_ENGINE, 's', "Use engine e, possibly a hardware device"},
115 int dsaparam_main(int argc, char **argv)
118 BIO *in = NULL, *out = NULL;
120 int numbits = -1, num = 0, genkey = 0, need_rand = 0;
121 int informat = FORMAT_PEM, outformat = FORMAT_PEM, noout = 0, C = 0;
122 int ret = 1, i, text = 0, private = 0;
126 char *infile = NULL, *outfile = NULL, *prog, *inrand = NULL;
129 prog = opt_init(argc, argv, dsaparam_options);
130 while ((o = opt_next()) != OPT_EOF) {
135 BIO_printf(bio_err, "%s: Use -help for summary.\n", prog);
138 opt_help(dsaparam_options);
142 if (!opt_format(opt_arg(), OPT_FMT_PEMDER, &informat))
149 if (!opt_format(opt_arg(), OPT_FMT_PEMDER, &outformat))
156 (void)setup_engine(opt_arg(), 0);
160 timebomb = atoi(opt_arg());
170 genkey = need_rand = 1;
181 argc = opt_num_rest();
185 if (!opt_int(argv[0], &num) || num < 0)
191 private = genkey ? 1 : 0;
193 in = bio_open_default(infile, 'r', informat);
196 out = bio_open_owner(outfile, outformat, private);
201 app_RAND_load_file(NULL, (inrand != NULL));
203 BIO_printf(bio_err, "%ld semi-random bytes loaded\n",
204 app_RAND_load_files(inrand));
210 BIO_printf(bio_err, "Error allocating BN_GENCB object\n");
213 BN_GENCB_set(cb, dsa_cb, bio_err);
217 BIO_printf(bio_err, "Error allocating DSA object\n");
220 BIO_printf(bio_err, "Generating DSA parameters, %d bit long prime\n",
222 BIO_printf(bio_err, "This could take some time\n");
225 struct sigaction act;
226 act.sa_handler = timebomb_sigalarm;
229 "(though I'll stop it if not done within %d secs)\n",
231 if (sigaction(SIGALRM, &act, NULL) != 0) {
232 BIO_printf(bio_err, "Error, couldn't set SIGALRM handler\n");
238 if (!DSA_generate_parameters_ex(dsa, num, NULL, 0, NULL, NULL, cb)) {
240 if (stop_keygen_flag) {
241 BIO_printf(bio_err, "DSA key generation time-stopped\n");
242 /* This is an asked-for behaviour! */
247 ERR_print_errors(bio_err);
248 BIO_printf(bio_err, "Error, DSA key generation failed\n");
251 } else if (informat == FORMAT_ASN1)
252 dsa = d2i_DSAparams_bio(in, NULL);
254 dsa = PEM_read_bio_DSAparams(in, NULL, NULL, NULL);
256 BIO_printf(bio_err, "unable to load DSA parameters\n");
257 ERR_print_errors(bio_err);
262 DSAparams_print(out, dsa);
266 int len = BN_num_bytes(dsa->p);
267 int bits_p = BN_num_bits(dsa->p);
268 unsigned char *data = app_malloc(len + 20, "BN space");
270 BIO_printf(bio_out, "DSA *get_dsa%d()\n{\n", bits_p);
271 print_bignum_var(bio_out, dsa->p, "dsap", len, data);
272 print_bignum_var(bio_out, dsa->q, "dsaq", len, data);
273 print_bignum_var(bio_out, dsa->g, "dsag", len, data);
274 BIO_printf(bio_out, " DSA *dsa = DSA_new();\n"
276 BIO_printf(bio_out, " if (dsa == NULL)\n"
278 BIO_printf(bio_out, " dsa->p = BN_bin2bn(dsap_%d, sizeof (dsap_%d), NULL);\n",
280 BIO_printf(bio_out, " dsa->q = BN_bin2bn(dsaq_%d, sizeof (dsaq_%d), NULL);\n",
282 BIO_printf(bio_out, " dsa->g = BN_bin2bn(dsag_%d, sizeof (dsag_%d), NULL);\n",
284 BIO_printf(bio_out, " if (!dsa->p || !dsa->q || !dsa->g) {\n"
288 " return(dsa);\n}\n");
292 if (outformat == FORMAT_ASN1)
293 i = i2d_DSAparams_bio(out, dsa);
295 i = PEM_write_bio_DSAparams(out, dsa);
297 BIO_printf(bio_err, "unable to write DSA parameters\n");
298 ERR_print_errors(bio_err);
306 if ((dsakey = DSAparams_dup(dsa)) == NULL)
308 if (!DSA_generate_key(dsakey)) {
309 ERR_print_errors(bio_err);
314 if (outformat == FORMAT_ASN1)
315 i = i2d_DSAPrivateKey_bio(out, dsakey);
317 i = PEM_write_bio_DSAPrivateKey(out, dsakey, NULL, NULL, 0, NULL,
322 app_RAND_write_file(NULL);
332 static int dsa_cb(int p, int n, BN_GENCB *cb)
344 BIO_write(BN_GENCB_get_arg(cb), &c, 1);
345 (void)BIO_flush(BN_GENCB_get_arg(cb));
347 if (stop_keygen_flag)