Annotation of src/usr.bin/openssl/rsa.c, Revision 1.12
1.12 ! inoguchi 1: /* $OpenBSD: rsa.c,v 1.11 2019/02/05 12:45:47 inoguchi Exp $ */
1.1 jsing 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: #include <stdio.h>
62: #include <stdlib.h>
63: #include <string.h>
64: #include <time.h>
65:
66: #include "apps.h"
1.4 deraadt 67: #include "progs.h"
1.1 jsing 68:
69: #include <openssl/bio.h>
70: #include <openssl/bn.h>
71: #include <openssl/err.h>
72: #include <openssl/evp.h>
73: #include <openssl/pem.h>
74: #include <openssl/rsa.h>
75: #include <openssl/x509.h>
76:
1.3 doug 77: static struct {
78: int check;
79: const EVP_CIPHER *enc;
80: char *infile;
81: int informat;
82: int modulus;
83: int noout;
84: char *outfile;
85: int outformat;
86: char *passargin;
87: char *passargout;
88: int pubin;
89: int pubout;
90: int pvk_encr;
91: int sgckey;
92: int text;
93: } rsa_config;
94:
95: static int
96: rsa_opt_cipher(int argc, char **argv, int *argsused)
97: {
98: char *name = argv[0];
99:
100: if (*name++ != '-')
101: return (1);
102:
103: if ((rsa_config.enc = EVP_get_cipherbyname(name)) == NULL) {
104: fprintf(stderr, "Invalid cipher '%s'\n", name);
105: return (1);
106: }
107:
108: *argsused = 1;
109: return (0);
110: }
111:
112: static struct option rsa_options[] = {
113: {
114: .name = "check",
115: .desc = "Check consistency of RSA private key",
116: .type = OPTION_FLAG,
117: .opt.flag = &rsa_config.check,
118: },
119: {
120: .name = "in",
121: .argname = "file",
122: .desc = "Input file (default stdin)",
123: .type = OPTION_ARG,
124: .opt.arg = &rsa_config.infile,
125: },
126: {
127: .name = "inform",
128: .argname = "format",
129: .desc = "Input format (DER, NET or PEM (default))",
130: .type = OPTION_ARG_FORMAT,
131: .opt.value = &rsa_config.informat,
132: },
133: {
134: .name = "modulus",
135: .desc = "Print the RSA key modulus",
136: .type = OPTION_FLAG,
137: .opt.flag = &rsa_config.modulus,
138: },
139: {
140: .name = "noout",
141: .desc = "Do not print encoded version of the key",
142: .type = OPTION_FLAG,
143: .opt.flag = &rsa_config.noout,
144: },
145: {
146: .name = "out",
147: .argname = "file",
148: .desc = "Output file (default stdout)",
149: .type = OPTION_ARG,
150: .opt.arg = &rsa_config.outfile,
151: },
152: {
153: .name = "outform",
154: .argname = "format",
155: .desc = "Output format (DER, NET or PEM (default PEM))",
156: .type = OPTION_ARG_FORMAT,
157: .opt.value = &rsa_config.outformat,
158: },
159: {
160: .name = "passin",
161: .argname = "src",
162: .desc = "Input file passphrase source",
163: .type = OPTION_ARG,
164: .opt.arg = &rsa_config.passargin,
165: },
166: {
167: .name = "passout",
168: .argname = "src",
169: .desc = "Output file passphrase source",
170: .type = OPTION_ARG,
171: .opt.arg = &rsa_config.passargout,
172: },
173: {
174: .name = "pubin",
175: .desc = "Expect a public key (default private key)",
176: .type = OPTION_VALUE,
177: .value = 1,
178: .opt.value = &rsa_config.pubin,
179: },
180: {
181: .name = "pubout",
182: .desc = "Output a public key (default private key)",
183: .type = OPTION_VALUE,
184: .value = 1,
185: .opt.value = &rsa_config.pubout,
186: },
187: {
188: .name = "pvk-none",
189: .type = OPTION_VALUE,
190: .value = 0,
191: .opt.value = &rsa_config.pvk_encr,
192: },
193: {
194: .name = "pvk-strong",
195: .type = OPTION_VALUE,
196: .value = 2,
197: .opt.value = &rsa_config.pvk_encr,
198: },
199: {
200: .name = "pvk-weak",
201: .type = OPTION_VALUE,
202: .value = 1,
203: .opt.value = &rsa_config.pvk_encr,
204: },
205: {
206: .name = "RSAPublicKey_in",
207: .type = OPTION_VALUE,
208: .value = 2,
209: .opt.value = &rsa_config.pubin,
210: },
211: {
212: .name = "RSAPublicKey_out",
213: .type = OPTION_VALUE,
214: .value = 2,
215: .opt.value = &rsa_config.pubout,
216: },
217: {
218: .name = "sgckey",
219: .desc = "Use modified NET algorithm for IIS and SGC keys",
220: .type = OPTION_FLAG,
221: .opt.flag = &rsa_config.sgckey,
222: },
223: {
224: .name = "text",
225: .desc = "Print in plain text in addition to encoded",
226: .type = OPTION_FLAG,
227: .opt.flag = &rsa_config.text,
228: },
229: {
230: .name = NULL,
231: .type = OPTION_ARGV_FUNC,
232: .opt.argvfunc = rsa_opt_cipher,
233: },
234: { NULL }
235: };
236:
237: static void
238: rsa_usage()
239: {
240: fprintf(stderr,
1.5 bcook 241: "usage: rsa [-ciphername] [-check] [-in file] "
1.3 doug 242: "[-inform fmt]\n"
243: " [-modulus] [-noout] [-out file] [-outform fmt] "
244: "[-passin src]\n"
245: " [-passout src] [-pubin] [-pubout] [-sgckey] [-text]\n\n");
246: options_usage(rsa_options);
247: fprintf(stderr, "\n");
248:
249: fprintf(stderr, "Valid ciphername values:\n\n");
1.12 ! inoguchi 250: OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_CIPHER_METH, show_cipher, NULL);
1.3 doug 251: fprintf(stderr, "\n");
252: }
1.1 jsing 253:
254: int
255: rsa_main(int argc, char **argv)
256: {
257: int ret = 1;
258: RSA *rsa = NULL;
1.3 doug 259: int i;
1.1 jsing 260: BIO *out = NULL;
261: char *passin = NULL, *passout = NULL;
1.6 doug 262:
263: if (single_execution) {
1.9 deraadt 264: if (pledge("stdio cpath wpath rpath tty", NULL) == -1) {
1.6 doug 265: perror("pledge");
1.8 doug 266: exit(1);
267: }
1.6 doug 268: }
1.1 jsing 269:
1.3 doug 270: memset(&rsa_config, 0, sizeof(rsa_config));
271: rsa_config.pvk_encr = 2;
272: rsa_config.informat = FORMAT_PEM;
273: rsa_config.outformat = FORMAT_PEM;
1.1 jsing 274:
1.3 doug 275: if (options_parse(argc, argv, rsa_options, NULL, NULL) != 0) {
276: rsa_usage();
1.1 jsing 277: goto end;
278: }
279:
1.3 doug 280: if (!app_passwd(bio_err, rsa_config.passargin, rsa_config.passargout,
281: &passin, &passout)) {
1.1 jsing 282: BIO_printf(bio_err, "Error getting passwords\n");
283: goto end;
284: }
1.3 doug 285: if (rsa_config.check && rsa_config.pubin) {
1.1 jsing 286: BIO_printf(bio_err, "Only private keys can be checked\n");
287: goto end;
288: }
289: out = BIO_new(BIO_s_file());
290:
291: {
292: EVP_PKEY *pkey;
293:
1.3 doug 294: if (rsa_config.pubin) {
1.1 jsing 295: int tmpformat = -1;
1.3 doug 296: if (rsa_config.pubin == 2) {
297: if (rsa_config.informat == FORMAT_PEM)
1.1 jsing 298: tmpformat = FORMAT_PEMRSA;
1.3 doug 299: else if (rsa_config.informat == FORMAT_ASN1)
1.1 jsing 300: tmpformat = FORMAT_ASN1RSA;
1.3 doug 301: } else if (rsa_config.informat == FORMAT_NETSCAPE &&
302: rsa_config.sgckey)
1.1 jsing 303: tmpformat = FORMAT_IISSGC;
304: else
1.3 doug 305: tmpformat = rsa_config.informat;
1.1 jsing 306:
1.3 doug 307: pkey = load_pubkey(bio_err, rsa_config.infile,
1.5 bcook 308: tmpformat, 1, passin, "Public Key");
1.1 jsing 309: } else
1.3 doug 310: pkey = load_key(bio_err, rsa_config.infile,
311: (rsa_config.informat == FORMAT_NETSCAPE &&
312: rsa_config.sgckey ? FORMAT_IISSGC :
1.5 bcook 313: rsa_config.informat), 1, passin, "Private Key");
1.1 jsing 314:
315: if (pkey != NULL)
316: rsa = EVP_PKEY_get1_RSA(pkey);
317: EVP_PKEY_free(pkey);
318: }
319:
320: if (rsa == NULL) {
321: ERR_print_errors(bio_err);
322: goto end;
323: }
1.3 doug 324: if (rsa_config.outfile == NULL) {
1.1 jsing 325: BIO_set_fp(out, stdout, BIO_NOCLOSE);
326: } else {
1.3 doug 327: if (BIO_write_filename(out, rsa_config.outfile) <= 0) {
328: perror(rsa_config.outfile);
1.1 jsing 329: goto end;
330: }
331: }
332:
1.3 doug 333: if (rsa_config.text)
1.1 jsing 334: if (!RSA_print(out, rsa, 0)) {
1.3 doug 335: perror(rsa_config.outfile);
1.1 jsing 336: ERR_print_errors(bio_err);
337: goto end;
338: }
1.3 doug 339: if (rsa_config.modulus) {
1.1 jsing 340: BIO_printf(out, "Modulus=");
341: BN_print(out, rsa->n);
342: BIO_printf(out, "\n");
343: }
1.3 doug 344: if (rsa_config.check) {
1.1 jsing 345: int r = RSA_check_key(rsa);
346:
347: if (r == 1)
348: BIO_printf(out, "RSA key ok\n");
349: else if (r == 0) {
350: unsigned long err;
351:
352: while ((err = ERR_peek_error()) != 0 &&
353: ERR_GET_LIB(err) == ERR_LIB_RSA &&
354: ERR_GET_FUNC(err) == RSA_F_RSA_CHECK_KEY &&
355: ERR_GET_REASON(err) != ERR_R_MALLOC_FAILURE) {
1.3 doug 356: BIO_printf(out, "RSA key error: %s\n",
357: ERR_reason_error_string(err));
1.1 jsing 358: ERR_get_error(); /* remove e from error
359: * stack */
360: }
361: }
362: if (r == -1 || ERR_peek_error() != 0) { /* should happen only if
363: * r == -1 */
364: ERR_print_errors(bio_err);
365: goto end;
366: }
367: }
1.3 doug 368: if (rsa_config.noout) {
1.1 jsing 369: ret = 0;
370: goto end;
371: }
372: BIO_printf(bio_err, "writing RSA key\n");
1.3 doug 373: if (rsa_config.outformat == FORMAT_ASN1) {
374: if (rsa_config.pubout || rsa_config.pubin) {
375: if (rsa_config.pubout == 2)
1.1 jsing 376: i = i2d_RSAPublicKey_bio(out, rsa);
377: else
378: i = i2d_RSA_PUBKEY_bio(out, rsa);
379: } else
380: i = i2d_RSAPrivateKey_bio(out, rsa);
381: }
382: #ifndef OPENSSL_NO_RC4
1.3 doug 383: else if (rsa_config.outformat == FORMAT_NETSCAPE) {
1.1 jsing 384: unsigned char *p, *pp;
385: int size;
386:
387: i = 1;
1.3 doug 388: size = i2d_RSA_NET(rsa, NULL, NULL, rsa_config.sgckey);
1.1 jsing 389: if ((p = malloc(size)) == NULL) {
390: BIO_printf(bio_err, "Memory allocation failure\n");
391: goto end;
392: }
393: pp = p;
1.3 doug 394: i2d_RSA_NET(rsa, &p, NULL, rsa_config.sgckey);
1.1 jsing 395: BIO_write(out, (char *) pp, size);
396: free(pp);
397: }
398: #endif
1.3 doug 399: else if (rsa_config.outformat == FORMAT_PEM) {
400: if (rsa_config.pubout || rsa_config.pubin) {
401: if (rsa_config.pubout == 2)
1.1 jsing 402: i = PEM_write_bio_RSAPublicKey(out, rsa);
403: else
404: i = PEM_write_bio_RSA_PUBKEY(out, rsa);
405: } else
406: i = PEM_write_bio_RSAPrivateKey(out, rsa,
1.3 doug 407: rsa_config.enc, NULL, 0, NULL, passout);
1.1 jsing 408: #if !defined(OPENSSL_NO_DSA) && !defined(OPENSSL_NO_RC4)
1.3 doug 409: } else if (rsa_config.outformat == FORMAT_MSBLOB ||
410: rsa_config.outformat == FORMAT_PVK) {
1.1 jsing 411: EVP_PKEY *pk;
412: pk = EVP_PKEY_new();
413: EVP_PKEY_set1_RSA(pk, rsa);
1.3 doug 414: if (rsa_config.outformat == FORMAT_PVK)
415: i = i2b_PVK_bio(out, pk, rsa_config.pvk_encr, 0,
416: passout);
417: else if (rsa_config.pubin || rsa_config.pubout)
1.1 jsing 418: i = i2b_PublicKey_bio(out, pk);
419: else
420: i = i2b_PrivateKey_bio(out, pk);
421: EVP_PKEY_free(pk);
422: #endif
423: } else {
1.3 doug 424: BIO_printf(bio_err,
425: "bad output format specified for outfile\n");
1.1 jsing 426: goto end;
427: }
428: if (i <= 0) {
429: BIO_printf(bio_err, "unable to write key\n");
430: ERR_print_errors(bio_err);
431: } else
432: ret = 0;
1.3 doug 433:
1.10 jsing 434: end:
1.3 doug 435: BIO_free_all(out);
436: RSA_free(rsa);
1.1 jsing 437: free(passin);
438: free(passout);
439:
440: return (ret);
441: }