Modify S/MIME application so the -signer option writes the signer(s)
[openssl.git] / apps / pem_mail.c
1 /* apps/pem_mail.c */
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 #ifndef NO_RSA
60 #include <stdio.h>
61 #include <openssl/rsa.h>
62 #include <openssl/evp.h>
63 #include <openssl/objects.h>
64 #include <openssl/x509.h>
65 #include <openssl/err.h>
66 #include <openssl/pem.h>
67 #include "apps.h"
68
69 #undef PROG
70 #define PROG    pem_mail_main
71
72 static char *usage[]={
73 "usage: pem_mail args\n",
74 "\n",
75 " -in arg         - input file - default stdin\n",
76 " -out arg        - output file - default stdout\n",
77 " -cert arg       - the certificate to use\n",
78 " -key arg        - the private key to use\n",
79 " -MIC           - sign the message\n",
80 " -enc arg        - encrypt with one of cbc-des\n",
81 NULL
82 };
83
84
85 typedef struct lines_St
86         {
87         char *line;
88         struct lines_st *next;
89         } LINES;
90
91 int main(int argc, char **argv)
92         {
93         FILE *in;
94         RSA *rsa=NULL;
95         EVP_MD_CTX ctx;
96         unsigned int mic=0,i,n;
97         unsigned char buf[1024*15];
98         char *prog,*infile=NULL,*outfile=NULL,*key=NULL;
99         int badops=0;
100
101         apps_startup();
102
103         prog=argv[0];
104         argc--;
105         argv++;
106         while (argc >= 1)
107                 {
108                 if (strcmp(*argv,"-key") == 0)
109                         {
110                         if (--argc < 1) goto bad;
111                         key= *(++argv);
112                         }
113                 else if (strcmp(*argv,"-in") == 0)
114                         {
115                         if (--argc < 1) goto bad;
116                         infile= *(++argv);
117                         }
118                 else if (strcmp(*argv,"-out") == 0)
119                         {
120                         if (--argc < 1) goto bad;
121                         outfile= *(++argv);
122                         }
123                 else if (strcmp(*argv,"-mic") == 0)
124                         mic=1;
125                 else
126                         {
127                         BIO_printf(bio_err,"unknown option %s\n",*argv);
128                         badops=1;
129                         break;
130                         }
131                 argc--;
132                 argv++;
133                 }
134
135         if (badops)
136                 {
137 bad:
138                 BIO_printf(bio_err,"%s [options] <infile >outfile\n",prog);
139                 BIO_printf(bio_err,"where options  are\n");
140                 EXIT(1);
141                 }
142
143         if (key == NULL)
144                 { BIO_printf(bio_err,"you need to specify a key\n"); EXIT(1); }
145         in=fopen(key,"r");
146         if (in == NULL) { perror(key); EXIT(1); }
147         rsa=PEM_read_RSAPrivateKey(in,NULL,NULL);
148         if (rsa == NULL)
149                 {
150                 BIO_printf(bio_err,"unable to load Private Key\n");
151                 ERR_print_errors(bio_err);
152                 EXIT(1);
153                 }
154         fclose(in);
155
156         PEM_SignInit(&ctx,EVP_md5());
157         for (;;)
158                 {
159                 i=fread(buf,1,1024*10,stdin);
160                 if (i <= 0) break;
161                 PEM_SignUpdate(&ctx,buf,i);
162                 }
163         if (!PEM_SignFinal(&ctx,buf,&n,rsa)) goto err;
164         BIO_printf(bio_err,"%s\n",buf);
165         EXIT(0);
166 err:
167         ERR_print_errors(bio_err);
168         EXIT(1);
169         }
170 #endif