import openssl(1) (LibreSSL 2.5.4)
[unleashed.git] / bin / openssl / gendsa.c
blob5aeb294e7f11c5c5e08a797927153217fbfd4d5a
1 /* $OpenBSD: gendsa.c,v 1.8 2017/01/20 08:57:12 deraadt Exp $ */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 * All rights reserved.
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.
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).
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.
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)"
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.
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.]
59 #include <openssl/opensslconf.h> /* for OPENSSL_NO_DSA */
62 #include <sys/types.h>
63 #include <sys/stat.h>
65 #include <stdio.h>
66 #include <string.h>
68 #include "apps.h"
70 #include <openssl/bio.h>
71 #include <openssl/bn.h>
72 #include <openssl/dsa.h>
73 #include <openssl/err.h>
74 #include <openssl/pem.h>
75 #include <openssl/x509.h>
77 int
78 gendsa_main(int argc, char **argv)
80 DSA *dsa = NULL;
81 int ret = 1;
82 char *outfile = NULL;
83 char *dsaparams = NULL;
84 char *passargout = NULL, *passout = NULL;
85 BIO *out = NULL, *in = NULL;
86 const EVP_CIPHER *enc = NULL;
88 if (single_execution) {
89 if (pledge("stdio cpath wpath rpath tty", NULL) == -1) {
90 perror("pledge");
91 exit(1);
95 argv++;
96 argc--;
97 for (;;) {
98 if (argc <= 0)
99 break;
100 if (strcmp(*argv, "-out") == 0) {
101 if (--argc < 1)
102 goto bad;
103 outfile = *(++argv);
104 } else if (strcmp(*argv, "-passout") == 0) {
105 if (--argc < 1)
106 goto bad;
107 passargout = *(++argv);
109 else if (strcmp(*argv, "-") == 0)
110 goto bad;
111 #ifndef OPENSSL_NO_DES
112 else if (strcmp(*argv, "-des") == 0)
113 enc = EVP_des_cbc();
114 else if (strcmp(*argv, "-des3") == 0)
115 enc = EVP_des_ede3_cbc();
116 #endif
117 #ifndef OPENSSL_NO_IDEA
118 else if (strcmp(*argv, "-idea") == 0)
119 enc = EVP_idea_cbc();
120 #endif
121 #ifndef OPENSSL_NO_AES
122 else if (strcmp(*argv, "-aes128") == 0)
123 enc = EVP_aes_128_cbc();
124 else if (strcmp(*argv, "-aes192") == 0)
125 enc = EVP_aes_192_cbc();
126 else if (strcmp(*argv, "-aes256") == 0)
127 enc = EVP_aes_256_cbc();
128 #endif
129 #ifndef OPENSSL_NO_CAMELLIA
130 else if (strcmp(*argv, "-camellia128") == 0)
131 enc = EVP_camellia_128_cbc();
132 else if (strcmp(*argv, "-camellia192") == 0)
133 enc = EVP_camellia_192_cbc();
134 else if (strcmp(*argv, "-camellia256") == 0)
135 enc = EVP_camellia_256_cbc();
136 #endif
137 else if (**argv != '-' && dsaparams == NULL) {
138 dsaparams = *argv;
139 } else
140 goto bad;
141 argv++;
142 argc--;
145 if (dsaparams == NULL) {
146 bad:
147 BIO_printf(bio_err, "usage: gendsa [args] dsaparam-file\n");
148 BIO_printf(bio_err, " -out file - output the key to 'file'\n");
149 #ifndef OPENSSL_NO_DES
150 BIO_printf(bio_err, " -des - encrypt the generated key with DES in cbc mode\n");
151 BIO_printf(bio_err, " -des3 - encrypt the generated key with DES in ede cbc mode (168 bit key)\n");
152 #endif
153 #ifndef OPENSSL_NO_IDEA
154 BIO_printf(bio_err, " -idea - encrypt the generated key with IDEA in cbc mode\n");
155 #endif
156 #ifndef OPENSSL_NO_AES
157 BIO_printf(bio_err, " -aes128, -aes192, -aes256\n");
158 BIO_printf(bio_err, " encrypt PEM output with cbc aes\n");
159 #endif
160 #ifndef OPENSSL_NO_CAMELLIA
161 BIO_printf(bio_err, " -camellia128, -camellia192, -camellia256\n");
162 BIO_printf(bio_err, " encrypt PEM output with cbc camellia\n");
163 #endif
164 BIO_printf(bio_err, " dsaparam-file\n");
165 BIO_printf(bio_err, " - a DSA parameter file as generated by the dsaparam command\n");
166 goto end;
168 if (!app_passwd(bio_err, NULL, passargout, NULL, &passout)) {
169 BIO_printf(bio_err, "Error getting password\n");
170 goto end;
172 in = BIO_new(BIO_s_file());
173 if (!(BIO_read_filename(in, dsaparams))) {
174 perror(dsaparams);
175 goto end;
177 if ((dsa = PEM_read_bio_DSAparams(in, NULL, NULL, NULL)) == NULL) {
178 BIO_printf(bio_err, "unable to load DSA parameter file\n");
179 goto end;
181 BIO_free(in);
182 in = NULL;
184 out = BIO_new(BIO_s_file());
185 if (out == NULL)
186 goto end;
188 if (outfile == NULL) {
189 BIO_set_fp(out, stdout, BIO_NOCLOSE);
190 } else {
191 if (BIO_write_filename(out, outfile) <= 0) {
192 perror(outfile);
193 goto end;
197 BIO_printf(bio_err, "Generating DSA key, %d bits\n",
198 BN_num_bits(dsa->p));
199 if (!DSA_generate_key(dsa))
200 goto end;
202 if (!PEM_write_bio_DSAPrivateKey(out, dsa, enc, NULL, 0, NULL, passout))
203 goto end;
204 ret = 0;
205 end:
206 if (ret != 0)
207 ERR_print_errors(bio_err);
208 BIO_free(in);
209 if (out != NULL)
210 BIO_free_all(out);
211 if (dsa != NULL)
212 DSA_free(dsa);
213 free(passout);
215 return (ret);