xref: /dragonfly/crypto/libressl/apps/openssl/pkcs7.c (revision cca6fc5243d2098262ea81f83ad5b28d3b800f4a)
1 /* $OpenBSD: pkcs7.c,v 1.11 2019/07/14 03:30:46 guenther 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 <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
62 #include <time.h>
63 
64 #include "apps.h"
65 
66 #include <openssl/err.h>
67 #include <openssl/evp.h>
68 #include <openssl/objects.h>
69 #include <openssl/pem.h>
70 #include <openssl/pkcs7.h>
71 #include <openssl/x509.h>
72 
73 static struct {
74           char *infile;
75           int informat;
76           int noout;
77           char *outfile;
78           int outformat;
79           int p7_print;
80           int print_certs;
81           int text;
82 } pkcs7_config;
83 
84 static const struct option pkcs7_options[] = {
85           {
86                     .name = "in",
87                     .argname = "file",
88                     .desc = "Input file (default stdin)",
89                     .type = OPTION_ARG,
90                     .opt.arg = &pkcs7_config.infile,
91           },
92           {
93                     .name = "inform",
94                     .argname = "format",
95                     .desc = "Input format (DER or PEM (default))",
96                     .type = OPTION_ARG_FORMAT,
97                     .opt.value = &pkcs7_config.informat,
98           },
99           {
100                     .name = "noout",
101                     .desc = "Do not output encoded version of PKCS#7 structure",
102                     .type = OPTION_FLAG,
103                     .opt.flag = &pkcs7_config.noout,
104           },
105           {
106                     .name = "out",
107                     .argname = "file",
108                     .desc = "Output file (default stdout)",
109                     .type = OPTION_ARG,
110                     .opt.arg = &pkcs7_config.outfile,
111           },
112           {
113                     .name = "outform",
114                     .argname = "format",
115                     .desc = "Output format (DER or PEM (default))",
116                     .type = OPTION_ARG_FORMAT,
117                     .opt.value = &pkcs7_config.outformat,
118           },
119           {
120                     .name = "print",
121                     .desc = "Output ASN.1 representation of PKCS#7 structure",
122                     .type = OPTION_FLAG,
123                     .opt.flag = &pkcs7_config.p7_print,
124           },
125           {
126                     .name = "print_certs",
127                     .desc = "Print out any certificates or CRLs contained in file",
128                     .type = OPTION_FLAG,
129                     .opt.flag = &pkcs7_config.print_certs,
130           },
131           {
132                     .name = "text",
133                     .desc = "Print out full certificate details",
134                     .type = OPTION_FLAG,
135                     .opt.flag = &pkcs7_config.text,
136           },
137           { NULL },
138 };
139 
140 static void
pkcs7_usage()141 pkcs7_usage()
142 {
143           fprintf(stderr, "usage: pkcs7 [-in file] "
144               "[-inform DER | PEM] [-noout]\n"
145               "    [-out file] [-outform DER | PEM] [-print_certs] [-text]\n\n");
146         options_usage(pkcs7_options);
147 }
148 
149 int
pkcs7_main(int argc,char ** argv)150 pkcs7_main(int argc, char **argv)
151 {
152           PKCS7 *p7 = NULL;
153           BIO *in = NULL, *out = NULL;
154           int ret = 1;
155           int i;
156 
157           if (single_execution) {
158                     if (pledge("stdio cpath wpath rpath", NULL) == -1) {
159                               perror("pledge");
160                               exit(1);
161                     }
162           }
163 
164           memset(&pkcs7_config, 0, sizeof(pkcs7_config));
165 
166           pkcs7_config.informat = FORMAT_PEM;
167           pkcs7_config.outformat = FORMAT_PEM;
168 
169           if (options_parse(argc, argv, pkcs7_options, NULL, NULL) != 0) {
170                     pkcs7_usage();
171                     goto end;
172           }
173 
174           in = BIO_new(BIO_s_file());
175           out = BIO_new(BIO_s_file());
176           if ((in == NULL) || (out == NULL)) {
177                     ERR_print_errors(bio_err);
178                     goto end;
179           }
180           if (pkcs7_config.infile == NULL)
181                     BIO_set_fp(in, stdin, BIO_NOCLOSE);
182           else {
183                     if (BIO_read_filename(in, pkcs7_config.infile) <= 0) {
184                               perror(pkcs7_config.infile);
185                               goto end;
186                     }
187           }
188 
189           if (pkcs7_config.informat == FORMAT_ASN1)
190                     p7 = d2i_PKCS7_bio(in, NULL);
191           else if (pkcs7_config.informat == FORMAT_PEM)
192                     p7 = PEM_read_bio_PKCS7(in, NULL, NULL, NULL);
193           else {
194                     BIO_printf(bio_err, "bad input format specified for pkcs7 object\n");
195                     goto end;
196           }
197           if (p7 == NULL) {
198                     BIO_printf(bio_err, "unable to load PKCS7 object\n");
199                     ERR_print_errors(bio_err);
200                     goto end;
201           }
202           if (pkcs7_config.outfile == NULL) {
203                     BIO_set_fp(out, stdout, BIO_NOCLOSE);
204           } else {
205                     if (BIO_write_filename(out, pkcs7_config.outfile) <= 0) {
206                               perror(pkcs7_config.outfile);
207                               goto end;
208                     }
209           }
210 
211           if (pkcs7_config.p7_print)
212                     PKCS7_print_ctx(out, p7, 0, NULL);
213 
214           if (pkcs7_config.print_certs) {
215                     STACK_OF(X509) * certs = NULL;
216                     STACK_OF(X509_CRL) * crls = NULL;
217 
218                     i = OBJ_obj2nid(p7->type);
219                     switch (i) {
220                     case NID_pkcs7_signed:
221                               certs = p7->d.sign->cert;
222                               crls = p7->d.sign->crl;
223                               break;
224                     case NID_pkcs7_signedAndEnveloped:
225                               certs = p7->d.signed_and_enveloped->cert;
226                               crls = p7->d.signed_and_enveloped->crl;
227                               break;
228                     default:
229                               break;
230                     }
231 
232                     if (certs != NULL) {
233                               X509 *x;
234 
235                               for (i = 0; i < sk_X509_num(certs); i++) {
236                                         x = sk_X509_value(certs, i);
237                                         if (pkcs7_config.text)
238                                                   X509_print(out, x);
239                                         else
240                                                   dump_cert_text(out, x);
241 
242                                         if (!pkcs7_config.noout)
243                                                   PEM_write_bio_X509(out, x);
244                                         BIO_puts(out, "\n");
245                               }
246                     }
247                     if (crls != NULL) {
248                               X509_CRL *crl;
249 
250                               for (i = 0; i < sk_X509_CRL_num(crls); i++) {
251                                         crl = sk_X509_CRL_value(crls, i);
252 
253                                         X509_CRL_print(out, crl);
254 
255                                         if (!pkcs7_config.noout)
256                                                   PEM_write_bio_X509_CRL(out, crl);
257                                         BIO_puts(out, "\n");
258                               }
259                     }
260                     ret = 0;
261                     goto end;
262           }
263           if (!pkcs7_config.noout) {
264                     if (pkcs7_config.outformat == FORMAT_ASN1)
265                               i = i2d_PKCS7_bio(out, p7);
266                     else if (pkcs7_config.outformat == FORMAT_PEM)
267                               i = PEM_write_bio_PKCS7(out, p7);
268                     else {
269                               BIO_printf(bio_err, "bad output format specified for outfile\n");
270                               goto end;
271                     }
272 
273                     if (!i) {
274                               BIO_printf(bio_err, "unable to write pkcs7 object\n");
275                               ERR_print_errors(bio_err);
276                               goto end;
277                     }
278           }
279           ret = 0;
280  end:
281           if (p7 != NULL)
282                     PKCS7_free(p7);
283           if (in != NULL)
284                     BIO_free(in);
285           if (out != NULL)
286                     BIO_free_all(out);
287 
288           return (ret);
289 }
290