xref: /openbsd-src/usr.bin/openssl/genrsa.c (revision 7350f337b9e3eb4461d99580e625c7ef148d107c)
1 /* $OpenBSD: genrsa.c,v 1.13 2019/06/19 01:51:14 inoguchi Exp $ */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3  * All rights reserved.
4  *
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.
8  *
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).
15  *
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.
22  *
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)"
40  *
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.
52  *
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.]
57  */
58 
59 #include <openssl/opensslconf.h>
60 
61 /* Until the key-gen callbacks are modified to use newer prototypes, we allow
62  * deprecated functions for openssl-internal code */
63 #ifdef OPENSSL_NO_DEPRECATED
64 #undef OPENSSL_NO_DEPRECATED
65 #endif
66 
67 
68 #include <sys/types.h>
69 #include <sys/stat.h>
70 
71 #include <stdio.h>
72 #include <string.h>
73 
74 #include "apps.h"
75 
76 #include <openssl/bio.h>
77 #include <openssl/bn.h>
78 #include <openssl/err.h>
79 #include <openssl/evp.h>
80 #include <openssl/pem.h>
81 #include <openssl/rsa.h>
82 #include <openssl/x509.h>
83 
84 #define DEFBITS	2048
85 
86 static int genrsa_cb(int p, int n, BN_GENCB * cb);
87 
88 static struct {
89 	const EVP_CIPHER *enc;
90 	unsigned long f4;
91 	char *outfile;
92 	char *passargout;
93 } genrsa_config;
94 
95 int
96 genrsa_main(int argc, char **argv)
97 {
98 	BN_GENCB cb;
99 	int ret = 1;
100 	int i, num = DEFBITS;
101 	long l;
102 	char *passout = NULL;
103 	BIO *out = NULL;
104 	BIGNUM *bn = BN_new();
105 	RSA *rsa = NULL;
106 
107 	if (single_execution) {
108 		if (pledge("stdio cpath wpath rpath tty", NULL) == -1) {
109 			perror("pledge");
110 			exit(1);
111 		}
112 	}
113 
114 	if (!bn)
115 		goto err;
116 
117 	BN_GENCB_set(&cb, genrsa_cb, bio_err);
118 
119 	if ((out = BIO_new(BIO_s_file())) == NULL) {
120 		BIO_printf(bio_err, "unable to create BIO for output\n");
121 		goto err;
122 	}
123 
124 	memset(&genrsa_config, 0, sizeof(genrsa_config));
125 	genrsa_config.f4 = RSA_F4;
126 
127 	argv++;
128 	argc--;
129 	for (;;) {
130 		if (argc <= 0)
131 			break;
132 		if (strcmp(*argv, "-out") == 0) {
133 			if (--argc < 1)
134 				goto bad;
135 			genrsa_config.outfile = *(++argv);
136 		} else if (strcmp(*argv, "-3") == 0)
137 			genrsa_config.f4 = 3;
138 		else if (strcmp(*argv, "-F4") == 0 || strcmp(*argv, "-f4") == 0)
139 			genrsa_config.f4 = RSA_F4;
140 #ifndef OPENSSL_NO_DES
141 		else if (strcmp(*argv, "-des") == 0)
142 			genrsa_config.enc = EVP_des_cbc();
143 		else if (strcmp(*argv, "-des3") == 0)
144 			genrsa_config.enc = EVP_des_ede3_cbc();
145 #endif
146 #ifndef OPENSSL_NO_IDEA
147 		else if (strcmp(*argv, "-idea") == 0)
148 			genrsa_config.enc = EVP_idea_cbc();
149 #endif
150 #ifndef OPENSSL_NO_AES
151 		else if (strcmp(*argv, "-aes128") == 0)
152 			genrsa_config.enc = EVP_aes_128_cbc();
153 		else if (strcmp(*argv, "-aes192") == 0)
154 			genrsa_config.enc = EVP_aes_192_cbc();
155 		else if (strcmp(*argv, "-aes256") == 0)
156 			genrsa_config.enc = EVP_aes_256_cbc();
157 #endif
158 #ifndef OPENSSL_NO_CAMELLIA
159 		else if (strcmp(*argv, "-camellia128") == 0)
160 			genrsa_config.enc = EVP_camellia_128_cbc();
161 		else if (strcmp(*argv, "-camellia192") == 0)
162 			genrsa_config.enc = EVP_camellia_192_cbc();
163 		else if (strcmp(*argv, "-camellia256") == 0)
164 			genrsa_config.enc = EVP_camellia_256_cbc();
165 #endif
166 		else if (strcmp(*argv, "-passout") == 0) {
167 			if (--argc < 1)
168 				goto bad;
169 			genrsa_config.passargout = *(++argv);
170 		} else
171 			break;
172 		argv++;
173 		argc--;
174 	}
175 	if ((argc >= 1) && ((sscanf(*argv, "%d", &num) == 0) || (num < 0))) {
176  bad:
177 		BIO_printf(bio_err, "usage: genrsa [args] [numbits]\n");
178 #ifndef OPENSSL_NO_DES
179 		BIO_printf(bio_err, " -des            encrypt the generated key with DES in cbc mode\n");
180 		BIO_printf(bio_err, " -des3           encrypt the generated key with DES in ede cbc mode (168 bit key)\n");
181 #endif
182 #ifndef OPENSSL_NO_IDEA
183 		BIO_printf(bio_err, " -idea           encrypt the generated key with IDEA in cbc mode\n");
184 #endif
185 #ifndef OPENSSL_NO_AES
186 		BIO_printf(bio_err, " -aes128, -aes192, -aes256\n");
187 		BIO_printf(bio_err, "                 encrypt PEM output with cbc aes\n");
188 #endif
189 #ifndef OPENSSL_NO_CAMELLIA
190 		BIO_printf(bio_err, " -camellia128, -camellia192, -camellia256\n");
191 		BIO_printf(bio_err, "                 encrypt PEM output with cbc camellia\n");
192 #endif
193 		BIO_printf(bio_err, " -out file       output the key to 'file\n");
194 		BIO_printf(bio_err, " -passout arg    output file pass phrase source\n");
195 		BIO_printf(bio_err, " -f4             use F4 (0x10001) for the E value\n");
196 		BIO_printf(bio_err, " -3              use 3 for the E value\n");
197 		goto err;
198 	}
199 
200 	if (!app_passwd(bio_err, NULL, genrsa_config.passargout, NULL, &passout)) {
201 		BIO_printf(bio_err, "Error getting password\n");
202 		goto err;
203 	}
204 
205 	if (genrsa_config.outfile == NULL) {
206 		BIO_set_fp(out, stdout, BIO_NOCLOSE);
207 	} else {
208 		if (BIO_write_filename(out, genrsa_config.outfile) <= 0) {
209 			perror(genrsa_config.outfile);
210 			goto err;
211 		}
212 	}
213 
214 	BIO_printf(bio_err, "Generating RSA private key, %d bit long modulus\n",
215 	    num);
216 	rsa = RSA_new();
217 	if (!rsa)
218 		goto err;
219 
220 	if (!BN_set_word(bn, genrsa_config.f4) || !RSA_generate_key_ex(rsa, num, bn, &cb))
221 		goto err;
222 
223 	/*
224 	 * We need to do the following for when the base number size is <
225 	 * long, esp windows 3.1 :-(.
226 	 */
227 	l = 0L;
228 	for (i = 0; i < rsa->e->top; i++) {
229 #ifndef _LP64
230 		l <<= BN_BITS4;
231 		l <<= BN_BITS4;
232 #endif
233 		l += rsa->e->d[i];
234 	}
235 	BIO_printf(bio_err, "e is %ld (0x%lX)\n", l, l);
236 	{
237 		PW_CB_DATA cb_data;
238 		cb_data.password = passout;
239 		cb_data.prompt_info = genrsa_config.outfile;
240 		if (!PEM_write_bio_RSAPrivateKey(out, rsa, genrsa_config.enc, NULL, 0,
241 			password_callback, &cb_data))
242 			goto err;
243 	}
244 
245 	ret = 0;
246  err:
247 	BN_free(bn);
248 	RSA_free(rsa);
249 	BIO_free_all(out);
250 	free(passout);
251 
252 	if (ret != 0)
253 		ERR_print_errors(bio_err);
254 
255 	return (ret);
256 }
257 
258 static int
259 genrsa_cb(int p, int n, BN_GENCB * cb)
260 {
261 	char c = '*';
262 
263 	if (p == 0)
264 		c = '.';
265 	if (p == 1)
266 		c = '+';
267 	if (p == 2)
268 		c = '*';
269 	if (p == 3)
270 		c = '\n';
271 	BIO_write(cb->arg, &c, 1);
272 	(void) BIO_flush(cb->arg);
273 	return 1;
274 }
275