|  | /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) | 
|  | * All rights reserved. | 
|  | * | 
|  | * This package is an SSL implementation written | 
|  | * by Eric Young (eay@cryptsoft.com). | 
|  | * The implementation was written so as to conform with Netscapes SSL. | 
|  | * | 
|  | * This library is free for commercial and non-commercial use as long as | 
|  | * the following conditions are aheared to.  The following conditions | 
|  | * apply to all code found in this distribution, be it the RC4, RSA, | 
|  | * lhash, DES, etc., code; not just the SSL code.  The SSL documentation | 
|  | * included with this distribution is covered by the same copyright terms | 
|  | * except that the holder is Tim Hudson (tjh@cryptsoft.com). | 
|  | * | 
|  | * Copyright remains Eric Young's, and as such any Copyright notices in | 
|  | * the code are not to be removed. | 
|  | * If this package is used in a product, Eric Young should be given attribution | 
|  | * as the author of the parts of the library used. | 
|  | * This can be in the form of a textual message at program startup or | 
|  | * in documentation (online or textual) provided with the package. | 
|  | * | 
|  | * Redistribution and use in source and binary forms, with or without | 
|  | * modification, are permitted provided that the following conditions | 
|  | * are met: | 
|  | * 1. Redistributions of source code must retain the copyright | 
|  | *    notice, this list of conditions and the following disclaimer. | 
|  | * 2. Redistributions in binary form must reproduce the above copyright | 
|  | *    notice, this list of conditions and the following disclaimer in the | 
|  | *    documentation and/or other materials provided with the distribution. | 
|  | * 3. All advertising materials mentioning features or use of this software | 
|  | *    must display the following acknowledgement: | 
|  | *    "This product includes cryptographic software written by | 
|  | *     Eric Young (eay@cryptsoft.com)" | 
|  | *    The word 'cryptographic' can be left out if the rouines from the library | 
|  | *    being used are not cryptographic related :-). | 
|  | * 4. If you include any Windows specific code (or a derivative thereof) from | 
|  | *    the apps directory (application code) you must include an acknowledgement: | 
|  | *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" | 
|  | * | 
|  | * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND | 
|  | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | 
|  | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | 
|  | * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE | 
|  | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | 
|  | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | 
|  | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | 
|  | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | 
|  | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | 
|  | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | 
|  | * SUCH DAMAGE. | 
|  | * | 
|  | * The licence and distribution terms for any publically available version or | 
|  | * derivative of this code cannot be changed.  i.e. this code cannot simply be | 
|  | * copied and put under another distribution licence | 
|  | * [including the GNU Public Licence.] | 
|  | */ | 
|  | /* ==================================================================== | 
|  | * Copyright (c) 1999-2015 The OpenSSL Project.  All rights reserved. | 
|  | * | 
|  | * Redistribution and use in source and binary forms, with or without | 
|  | * modification, are permitted provided that the following conditions | 
|  | * are met: | 
|  | * | 
|  | * 1. Redistributions of source code must retain the above copyright | 
|  | *    notice, this list of conditions and the following disclaimer. | 
|  | * | 
|  | * 2. Redistributions in binary form must reproduce the above copyright | 
|  | *    notice, this list of conditions and the following disclaimer in | 
|  | *    the documentation and/or other materials provided with the | 
|  | *    distribution. | 
|  | * | 
|  | * 3. All advertising materials mentioning features or use of this | 
|  | *    software must display the following acknowledgment: | 
|  | *    "This product includes software developed by the OpenSSL Project | 
|  | *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" | 
|  | * | 
|  | * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to | 
|  | *    endorse or promote products derived from this software without | 
|  | *    prior written permission. For written permission, please contact | 
|  | *    licensing@OpenSSL.org. | 
|  | * | 
|  | * 5. Products derived from this software may not be called "OpenSSL" | 
|  | *    nor may "OpenSSL" appear in their names without prior written | 
|  | *    permission of the OpenSSL Project. | 
|  | * | 
|  | * 6. Redistributions of any form whatsoever must retain the following | 
|  | *    acknowledgment: | 
|  | *    "This product includes software developed by the OpenSSL Project | 
|  | *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" | 
|  | * | 
|  | * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY | 
|  | * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | 
|  | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR | 
|  | * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR | 
|  | * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | 
|  | * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | 
|  | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; | 
|  | * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | 
|  | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | 
|  | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) | 
|  | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED | 
|  | * OF THE POSSIBILITY OF SUCH DAMAGE. | 
|  | * ==================================================================== | 
|  | */ | 
|  |  | 
|  | #include <stdio.h> | 
|  | #include <stdlib.h> | 
|  | #include <string.h> | 
|  | #include <time.h> | 
|  | #include "apps.h" | 
|  | #include <openssl/err.h> | 
|  | #include <openssl/objects.h> | 
|  | #include <openssl/evp.h> | 
|  | #include <openssl/x509.h> | 
|  | #include <openssl/pkcs7.h> | 
|  | #include <openssl/pem.h> | 
|  |  | 
|  | typedef enum OPTION_choice { | 
|  | OPT_ERR = -1, OPT_EOF = 0, OPT_HELP, | 
|  | OPT_INFORM, OPT_OUTFORM, OPT_IN, OPT_OUT, OPT_NOOUT, | 
|  | OPT_TEXT, OPT_PRINT, OPT_PRINT_CERTS, OPT_ENGINE | 
|  | } OPTION_CHOICE; | 
|  |  | 
|  | OPTIONS pkcs7_options[] = { | 
|  | {"help", OPT_HELP, '-', "Display this summary"}, | 
|  | {"inform", OPT_INFORM, 'F', "Input format - DER or PEM"}, | 
|  | {"in", OPT_IN, '<', "Input file"}, | 
|  | {"outform", OPT_OUTFORM, 'F', "Output format - DER or PEM"}, | 
|  | {"out", OPT_OUT, '>', "Output file"}, | 
|  | {"noout", OPT_NOOUT, '-', "Don't output encoded data"}, | 
|  | {"text", OPT_TEXT, '-', "Print full details of certificates"}, | 
|  | {"print", OPT_PRINT, '-'}, | 
|  | {"print_certs", OPT_PRINT_CERTS, '-', | 
|  | "Print_certs  print any certs or crl in the input"}, | 
|  | #ifndef OPENSSL_NO_ENGINE | 
|  | {"engine", OPT_ENGINE, 's', "Use engine, possibly a hardware device"}, | 
|  | #endif | 
|  | {NULL} | 
|  | }; | 
|  |  | 
|  | int pkcs7_main(int argc, char **argv) | 
|  | { | 
|  | PKCS7 *p7 = NULL; | 
|  | BIO *in = NULL, *out = NULL; | 
|  | int informat = FORMAT_PEM, outformat = FORMAT_PEM; | 
|  | char *infile = NULL, *outfile = NULL, *prog; | 
|  | int i, print_certs = 0, text = 0, noout = 0, p7_print = 0, ret = 1; | 
|  | OPTION_CHOICE o; | 
|  |  | 
|  | prog = opt_init(argc, argv, pkcs7_options); | 
|  | while ((o = opt_next()) != OPT_EOF) { | 
|  | switch (o) { | 
|  | case OPT_EOF: | 
|  | case OPT_ERR: | 
|  | opthelp: | 
|  | BIO_printf(bio_err, "%s: Use -help for summary.\n", prog); | 
|  | goto end; | 
|  | case OPT_HELP: | 
|  | opt_help(pkcs7_options); | 
|  | ret = 0; | 
|  | goto end; | 
|  | case OPT_INFORM: | 
|  | if (!opt_format(opt_arg(), OPT_FMT_PEMDER, &informat)) | 
|  | goto opthelp; | 
|  | break; | 
|  | case OPT_OUTFORM: | 
|  | if (!opt_format(opt_arg(), OPT_FMT_PEMDER, &outformat)) | 
|  | goto opthelp; | 
|  | break; | 
|  | case OPT_IN: | 
|  | infile = opt_arg(); | 
|  | break; | 
|  | case OPT_OUT: | 
|  | outfile = opt_arg(); | 
|  | break; | 
|  | case OPT_NOOUT: | 
|  | noout = 1; | 
|  | break; | 
|  | case OPT_TEXT: | 
|  | text = 1; | 
|  | break; | 
|  | case OPT_PRINT: | 
|  | p7_print = 1; | 
|  | break; | 
|  | case OPT_PRINT_CERTS: | 
|  | print_certs = 1; | 
|  | break; | 
|  | case OPT_ENGINE: | 
|  | (void)setup_engine(opt_arg(), 0); | 
|  | break; | 
|  | } | 
|  | } | 
|  | argc = opt_num_rest(); | 
|  | argv = opt_rest(); | 
|  |  | 
|  | in = bio_open_default(infile, RB(informat)); | 
|  | if (in == NULL) | 
|  | goto end; | 
|  |  | 
|  | if (informat == FORMAT_ASN1) | 
|  | p7 = d2i_PKCS7_bio(in, NULL); | 
|  | else | 
|  | p7 = PEM_read_bio_PKCS7(in, NULL, NULL, NULL); | 
|  | if (p7 == NULL) { | 
|  | BIO_printf(bio_err, "unable to load PKCS7 object\n"); | 
|  | ERR_print_errors(bio_err); | 
|  | goto end; | 
|  | } | 
|  |  | 
|  | out = bio_open_default(outfile, WB(outformat)); | 
|  | if (out == NULL) | 
|  | goto end; | 
|  |  | 
|  | if (p7_print) | 
|  | PKCS7_print_ctx(out, p7, 0, NULL); | 
|  |  | 
|  | if (print_certs) { | 
|  | STACK_OF(X509) *certs = NULL; | 
|  | STACK_OF(X509_CRL) *crls = NULL; | 
|  |  | 
|  | i = OBJ_obj2nid(p7->type); | 
|  | switch (i) { | 
|  | case NID_pkcs7_signed: | 
|  | certs = p7->d.sign->cert; | 
|  | crls = p7->d.sign->crl; | 
|  | break; | 
|  | case NID_pkcs7_signedAndEnveloped: | 
|  | certs = p7->d.signed_and_enveloped->cert; | 
|  | crls = p7->d.signed_and_enveloped->crl; | 
|  | break; | 
|  | default: | 
|  | break; | 
|  | } | 
|  |  | 
|  | if (certs != NULL) { | 
|  | X509 *x; | 
|  |  | 
|  | for (i = 0; i < sk_X509_num(certs); i++) { | 
|  | x = sk_X509_value(certs, i); | 
|  | if (text) | 
|  | X509_print(out, x); | 
|  | else | 
|  | dump_cert_text(out, x); | 
|  |  | 
|  | if (!noout) | 
|  | PEM_write_bio_X509(out, x); | 
|  | BIO_puts(out, "\n"); | 
|  | } | 
|  | } | 
|  | if (crls != NULL) { | 
|  | X509_CRL *crl; | 
|  |  | 
|  | for (i = 0; i < sk_X509_CRL_num(crls); i++) { | 
|  | crl = sk_X509_CRL_value(crls, i); | 
|  |  | 
|  | X509_CRL_print(out, crl); | 
|  |  | 
|  | if (!noout) | 
|  | PEM_write_bio_X509_CRL(out, crl); | 
|  | BIO_puts(out, "\n"); | 
|  | } | 
|  | } | 
|  |  | 
|  | ret = 0; | 
|  | goto end; | 
|  | } | 
|  |  | 
|  | if (!noout) { | 
|  | if (outformat == FORMAT_ASN1) | 
|  | i = i2d_PKCS7_bio(out, p7); | 
|  | else | 
|  | i = PEM_write_bio_PKCS7(out, p7); | 
|  |  | 
|  | if (!i) { | 
|  | BIO_printf(bio_err, "unable to write pkcs7 object\n"); | 
|  | ERR_print_errors(bio_err); | 
|  | goto end; | 
|  | } | 
|  | } | 
|  | ret = 0; | 
|  | end: | 
|  | PKCS7_free(p7); | 
|  | BIO_free(in); | 
|  | BIO_free_all(out); | 
|  | return (ret); | 
|  | } |