xref: /freebsd/crypto/openssl/apps/rsautl.c (revision 3fc36ee018bb836bd1796067cf4ef8683f166ebc)
1 /* rsautl.c */
2 /*
3  * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
4  * 2000.
5  */
6 /* ====================================================================
7  * Copyright (c) 2000 The OpenSSL Project.  All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  *
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  *
16  * 2. Redistributions in binary form must reproduce the above copyright
17  *    notice, this list of conditions and the following disclaimer in
18  *    the documentation and/or other materials provided with the
19  *    distribution.
20  *
21  * 3. All advertising materials mentioning features or use of this
22  *    software must display the following acknowledgment:
23  *    "This product includes software developed by the OpenSSL Project
24  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25  *
26  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27  *    endorse or promote products derived from this software without
28  *    prior written permission. For written permission, please contact
29  *    licensing@OpenSSL.org.
30  *
31  * 5. Products derived from this software may not be called "OpenSSL"
32  *    nor may "OpenSSL" appear in their names without prior written
33  *    permission of the OpenSSL Project.
34  *
35  * 6. Redistributions of any form whatsoever must retain the following
36  *    acknowledgment:
37  *    "This product includes software developed by the OpenSSL Project
38  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39  *
40  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
44  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51  * OF THE POSSIBILITY OF SUCH DAMAGE.
52  * ====================================================================
53  *
54  * This product includes cryptographic software written by Eric Young
55  * (eay@cryptsoft.com).  This product includes software written by Tim
56  * Hudson (tjh@cryptsoft.com).
57  *
58  */
59 
60 #include <openssl/opensslconf.h>
61 #ifndef OPENSSL_NO_RSA
62 
63 # include "apps.h"
64 # include <string.h>
65 # include <openssl/err.h>
66 # include <openssl/pem.h>
67 # include <openssl/rsa.h>
68 
69 # define RSA_SIGN        1
70 # define RSA_VERIFY      2
71 # define RSA_ENCRYPT     3
72 # define RSA_DECRYPT     4
73 
74 # define KEY_PRIVKEY     1
75 # define KEY_PUBKEY      2
76 # define KEY_CERT        3
77 
78 static void usage(void);
79 
80 # undef PROG
81 
82 # define PROG rsautl_main
83 
84 int MAIN(int argc, char **);
85 
86 int MAIN(int argc, char **argv)
87 {
88     ENGINE *e = NULL;
89     BIO *in = NULL, *out = NULL;
90     char *infile = NULL, *outfile = NULL;
91 # ifndef OPENSSL_NO_ENGINE
92     char *engine = NULL;
93 # endif
94     char *keyfile = NULL;
95     char rsa_mode = RSA_VERIFY, key_type = KEY_PRIVKEY;
96     int keyform = FORMAT_PEM;
97     char need_priv = 0, badarg = 0, rev = 0;
98     char hexdump = 0, asn1parse = 0;
99     X509 *x;
100     EVP_PKEY *pkey = NULL;
101     RSA *rsa = NULL;
102     unsigned char *rsa_in = NULL, *rsa_out = NULL, pad;
103     char *passargin = NULL, *passin = NULL;
104     int rsa_inlen, rsa_outlen = 0;
105     int keysize;
106 
107     int ret = 1;
108 
109     argc--;
110     argv++;
111 
112     if (!bio_err)
113         bio_err = BIO_new_fp(stderr, BIO_NOCLOSE);
114 
115     if (!load_config(bio_err, NULL))
116         goto end;
117     ERR_load_crypto_strings();
118     OpenSSL_add_all_algorithms();
119     pad = RSA_PKCS1_PADDING;
120 
121     while (argc >= 1) {
122         if (!strcmp(*argv, "-in")) {
123             if (--argc < 1)
124                 badarg = 1;
125             else
126                 infile = *(++argv);
127         } else if (!strcmp(*argv, "-out")) {
128             if (--argc < 1)
129                 badarg = 1;
130             else
131                 outfile = *(++argv);
132         } else if (!strcmp(*argv, "-inkey")) {
133             if (--argc < 1)
134                 badarg = 1;
135             else
136                 keyfile = *(++argv);
137         } else if (!strcmp(*argv, "-passin")) {
138             if (--argc < 1)
139                 badarg = 1;
140             else
141                 passargin = *(++argv);
142         } else if (strcmp(*argv, "-keyform") == 0) {
143             if (--argc < 1)
144                 badarg = 1;
145             else
146                 keyform = str2fmt(*(++argv));
147 # ifndef OPENSSL_NO_ENGINE
148         } else if (!strcmp(*argv, "-engine")) {
149             if (--argc < 1)
150                 badarg = 1;
151             else
152                 engine = *(++argv);
153 # endif
154         } else if (!strcmp(*argv, "-pubin")) {
155             key_type = KEY_PUBKEY;
156         } else if (!strcmp(*argv, "-certin")) {
157             key_type = KEY_CERT;
158         } else if (!strcmp(*argv, "-asn1parse"))
159             asn1parse = 1;
160         else if (!strcmp(*argv, "-hexdump"))
161             hexdump = 1;
162         else if (!strcmp(*argv, "-raw"))
163             pad = RSA_NO_PADDING;
164         else if (!strcmp(*argv, "-oaep"))
165             pad = RSA_PKCS1_OAEP_PADDING;
166         else if (!strcmp(*argv, "-ssl"))
167             pad = RSA_SSLV23_PADDING;
168         else if (!strcmp(*argv, "-pkcs"))
169             pad = RSA_PKCS1_PADDING;
170         else if (!strcmp(*argv, "-x931"))
171             pad = RSA_X931_PADDING;
172         else if (!strcmp(*argv, "-sign")) {
173             rsa_mode = RSA_SIGN;
174             need_priv = 1;
175         } else if (!strcmp(*argv, "-verify"))
176             rsa_mode = RSA_VERIFY;
177         else if (!strcmp(*argv, "-rev"))
178             rev = 1;
179         else if (!strcmp(*argv, "-encrypt"))
180             rsa_mode = RSA_ENCRYPT;
181         else if (!strcmp(*argv, "-decrypt")) {
182             rsa_mode = RSA_DECRYPT;
183             need_priv = 1;
184         } else
185             badarg = 1;
186         if (badarg) {
187             usage();
188             goto end;
189         }
190         argc--;
191         argv++;
192     }
193 
194     if (need_priv && (key_type != KEY_PRIVKEY)) {
195         BIO_printf(bio_err, "A private key is needed for this operation\n");
196         goto end;
197     }
198 # ifndef OPENSSL_NO_ENGINE
199     e = setup_engine(bio_err, engine, 0);
200 # endif
201     if (!app_passwd(bio_err, passargin, NULL, &passin, NULL)) {
202         BIO_printf(bio_err, "Error getting password\n");
203         goto end;
204     }
205 
206 /* FIXME: seed PRNG only if needed */
207     app_RAND_load_file(NULL, bio_err, 0);
208 
209     switch (key_type) {
210     case KEY_PRIVKEY:
211         pkey = load_key(bio_err, keyfile, keyform, 0,
212                         passin, e, "Private Key");
213         break;
214 
215     case KEY_PUBKEY:
216         pkey = load_pubkey(bio_err, keyfile, keyform, 0,
217                            NULL, e, "Public Key");
218         break;
219 
220     case KEY_CERT:
221         x = load_cert(bio_err, keyfile, keyform, NULL, e, "Certificate");
222         if (x) {
223             pkey = X509_get_pubkey(x);
224             X509_free(x);
225         }
226         break;
227     }
228 
229     if (!pkey) {
230         return 1;
231     }
232 
233     rsa = EVP_PKEY_get1_RSA(pkey);
234     EVP_PKEY_free(pkey);
235 
236     if (!rsa) {
237         BIO_printf(bio_err, "Error getting RSA key\n");
238         ERR_print_errors(bio_err);
239         goto end;
240     }
241 
242     if (infile) {
243         if (!(in = BIO_new_file(infile, "rb"))) {
244             BIO_printf(bio_err, "Error Reading Input File\n");
245             ERR_print_errors(bio_err);
246             goto end;
247         }
248     } else
249         in = BIO_new_fp(stdin, BIO_NOCLOSE);
250 
251     if (outfile) {
252         if (!(out = BIO_new_file(outfile, "wb"))) {
253             BIO_printf(bio_err, "Error Writing Output File\n");
254             ERR_print_errors(bio_err);
255             goto end;
256         }
257     } else {
258         out = BIO_new_fp(stdout, BIO_NOCLOSE);
259 # ifdef OPENSSL_SYS_VMS
260         {
261             BIO *tmpbio = BIO_new(BIO_f_linebuffer());
262             out = BIO_push(tmpbio, out);
263         }
264 # endif
265     }
266 
267     keysize = RSA_size(rsa);
268 
269     rsa_in = OPENSSL_malloc(keysize * 2);
270     rsa_out = OPENSSL_malloc(keysize);
271     if (!rsa_in || !rsa_out) {
272         BIO_printf(bio_err, "Out of memory\n");
273         ERR_print_errors(bio_err);
274         goto end;
275     }
276 
277     /* Read the input data */
278     rsa_inlen = BIO_read(in, rsa_in, keysize * 2);
279     if (rsa_inlen < 0) {
280         BIO_printf(bio_err, "Error reading input Data\n");
281         exit(1);
282     }
283     if (rev) {
284         int i;
285         unsigned char ctmp;
286         for (i = 0; i < rsa_inlen / 2; i++) {
287             ctmp = rsa_in[i];
288             rsa_in[i] = rsa_in[rsa_inlen - 1 - i];
289             rsa_in[rsa_inlen - 1 - i] = ctmp;
290         }
291     }
292     switch (rsa_mode) {
293 
294     case RSA_VERIFY:
295         rsa_outlen = RSA_public_decrypt(rsa_inlen, rsa_in, rsa_out, rsa, pad);
296         break;
297 
298     case RSA_SIGN:
299         rsa_outlen =
300             RSA_private_encrypt(rsa_inlen, rsa_in, rsa_out, rsa, pad);
301         break;
302 
303     case RSA_ENCRYPT:
304         rsa_outlen = RSA_public_encrypt(rsa_inlen, rsa_in, rsa_out, rsa, pad);
305         break;
306 
307     case RSA_DECRYPT:
308         rsa_outlen =
309             RSA_private_decrypt(rsa_inlen, rsa_in, rsa_out, rsa, pad);
310         break;
311 
312     }
313 
314     if (rsa_outlen < 0) {
315         BIO_printf(bio_err, "RSA operation error\n");
316         ERR_print_errors(bio_err);
317         goto end;
318     }
319     ret = 0;
320     if (asn1parse) {
321         if (!ASN1_parse_dump(out, rsa_out, rsa_outlen, 1, -1)) {
322             ERR_print_errors(bio_err);
323         }
324     } else if (hexdump)
325         BIO_dump(out, (char *)rsa_out, rsa_outlen);
326     else
327         BIO_write(out, rsa_out, rsa_outlen);
328  end:
329     RSA_free(rsa);
330     BIO_free(in);
331     BIO_free_all(out);
332     if (rsa_in)
333         OPENSSL_free(rsa_in);
334     if (rsa_out)
335         OPENSSL_free(rsa_out);
336     if (passin)
337         OPENSSL_free(passin);
338     return ret;
339 }
340 
341 static void usage()
342 {
343     BIO_printf(bio_err, "Usage: rsautl [options]\n");
344     BIO_printf(bio_err, "-in file        input file\n");
345     BIO_printf(bio_err, "-out file       output file\n");
346     BIO_printf(bio_err, "-inkey file     input key\n");
347     BIO_printf(bio_err, "-keyform arg    private key format - default PEM\n");
348     BIO_printf(bio_err, "-pubin          input is an RSA public\n");
349     BIO_printf(bio_err,
350                "-certin         input is a certificate carrying an RSA public key\n");
351     BIO_printf(bio_err, "-ssl            use SSL v2 padding\n");
352     BIO_printf(bio_err, "-raw            use no padding\n");
353     BIO_printf(bio_err,
354                "-pkcs           use PKCS#1 v1.5 padding (default)\n");
355     BIO_printf(bio_err, "-oaep           use PKCS#1 OAEP\n");
356     BIO_printf(bio_err, "-sign           sign with private key\n");
357     BIO_printf(bio_err, "-verify         verify with public key\n");
358     BIO_printf(bio_err, "-encrypt        encrypt with public key\n");
359     BIO_printf(bio_err, "-decrypt        decrypt with private key\n");
360     BIO_printf(bio_err, "-hexdump        hex dump output\n");
361 # ifndef OPENSSL_NO_ENGINE
362     BIO_printf(bio_err,
363                "-engine e       use engine e, possibly a hardware device.\n");
364     BIO_printf(bio_err, "-passin arg    pass phrase source\n");
365 # endif
366 
367 }
368 
369 #else                           /* !OPENSSL_NO_RSA */
370 
371 # if PEDANTIC
372 static void *dummy = &dummy;
373 # endif
374 
375 #endif
376