#include <stdio.h>
#include <string.h>
#include "apps.h"
#include <openssl/crypto.h>
#include <openssl/err.h>
#include <openssl/pem.h>
#include <openssl/x509_vfy.h>
#include <openssl/x509v3.h>
static int save_certs(char *signerfile, STACK_OF(X509) *signers);
#define SMIME_OP 0x10
#define SMIME_IP 0x20
#define SMIME_SIGNERS 0x40
#define SMIME_ENCRYPT (1 | SMIME_OP)
#define SMIME_DECRYPT (2 | SMIME_IP)
#define SMIME_SIGN (3 | SMIME_OP | SMIME_SIGNERS)
#define SMIME_VERIFY (4 | SMIME_IP)
#define SMIME_PK7OUT (5 | SMIME_IP | SMIME_OP)
#define SMIME_RESIGN (6 | SMIME_IP | SMIME_OP | SMIME_SIGNERS)
static struct {
char *CAfile;
char *CApath;
char *certfile;
const EVP_CIPHER *cipher;
char *contfile;
int flags;
char *from;
int indef;
char *infile;
int informat;
char *keyfile;
int keyform;
int operation;
char *outfile;
int outformat;
char *passargin;
char *recipfile;
const EVP_MD *sign_md;
char *signerfile;
STACK_OF(OPENSSL_STRING) *skkeys;
STACK_OF(OPENSSL_STRING) *sksigners;
char *subject;
char *to;
X509_VERIFY_PARAM *vpm;
} cfg;
static const EVP_CIPHER *
get_cipher_by_name(char *name)
{
if (name == NULL || strcmp(name, "") == 0)
return (NULL);
#ifndef OPENSSL_NO_AES
else if (strcmp(name, "aes128") == 0)
return EVP_aes_128_cbc();
else if (strcmp(name, "aes192") == 0)
return EVP_aes_192_cbc();
else if (strcmp(name, "aes256") == 0)
return EVP_aes_256_cbc();
#endif
#ifndef OPENSSL_NO_CAMELLIA
else if (strcmp(name, "camellia128") == 0)
return EVP_camellia_128_cbc();
else if (strcmp(name, "camellia192") == 0)
return EVP_camellia_192_cbc();
else if (strcmp(name, "camellia256") == 0)
return EVP_camellia_256_cbc();
#endif
#ifndef OPENSSL_NO_DES
else if (strcmp(name, "des") == 0)
return EVP_des_cbc();
else if (strcmp(name, "des3") == 0)
return EVP_des_ede3_cbc();
#endif
#ifndef OPENSSL_NO_RC2
else if (!strcmp(name, "rc2-40"))
return EVP_rc2_40_cbc();
else if (!strcmp(name, "rc2-64"))
return EVP_rc2_64_cbc();
else if (!strcmp(name, "rc2-128"))
return EVP_rc2_cbc();
#endif
else
return NULL;
}
static int
smime_opt_cipher(int argc, char **argv, int *argsused)
{
char *name = argv[0];
if (*name++ != '-')
return (1);
if ((cfg.cipher = get_cipher_by_name(name)) == NULL)
if ((cfg.cipher = EVP_get_cipherbyname(name)) == NULL)
return (1);
*argsused = 1;
return (0);
}
static int
smime_opt_inkey(char *arg)
{
if (cfg.keyfile == NULL) {
cfg.keyfile = arg;
return (0);
}
if (cfg.signerfile == NULL) {
BIO_puts(bio_err, "Illegal -inkey without -signer\n");
return (1);
}
if (cfg.sksigners == NULL) {
if ((cfg.sksigners = sk_OPENSSL_STRING_new_null()) == NULL)
return (1);
}
if (!sk_OPENSSL_STRING_push(cfg.sksigners,
cfg.signerfile))
return (1);
cfg.signerfile = NULL;
if (cfg.skkeys == NULL) {
if ((cfg.skkeys = sk_OPENSSL_STRING_new_null()) == NULL)
return (1);
}
if (!sk_OPENSSL_STRING_push(cfg.skkeys, cfg.keyfile))
return (1);
cfg.keyfile = arg;
return (0);
}
static int
smime_opt_md(char *arg)
{
if ((cfg.sign_md = EVP_get_digestbyname(arg)) == NULL) {
BIO_printf(bio_err, "Unknown digest %s\n", arg);
return (1);
}
return (0);
}
static int
smime_opt_signer(char *arg)
{
if (cfg.signerfile == NULL) {
cfg.signerfile = arg;
return (0);
}
if (cfg.sksigners == NULL) {
if ((cfg.sksigners = sk_OPENSSL_STRING_new_null()) == NULL)
return (1);
}
if (!sk_OPENSSL_STRING_push(cfg.sksigners,
cfg.signerfile))
return (1);
if (cfg.keyfile == NULL)
cfg.keyfile = cfg.signerfile;
if (cfg.skkeys == NULL) {
if ((cfg.skkeys = sk_OPENSSL_STRING_new_null()) == NULL)
return (1);
}
if (!sk_OPENSSL_STRING_push(cfg.skkeys, cfg.keyfile))
return (1);
cfg.keyfile = NULL;
cfg.signerfile = arg;
return (0);
}
static int
smime_opt_verify_param(int argc, char **argv, int *argsused)
{
int oargc = argc;
int badarg = 0;
if (!args_verify(&argv, &argc, &badarg, bio_err, &cfg.vpm))
return (1);
if (badarg)
return (1);
*argsused = oargc - argc;
return (0);
}
static const struct option smime_options[] = {
#ifndef OPENSSL_NO_AES
{
.name = "aes128",
.desc = "Encrypt PEM output with CBC AES",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "aes192",
.desc = "Encrypt PEM output with CBC AES",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "aes256",
.desc = "Encrypt PEM output with CBC AES (default)",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
#endif
#ifndef OPENSSL_NO_CAMELLIA
{
.name = "camellia128",
.desc = "Encrypt PEM output with CBC Camellia",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "camellia192",
.desc = "Encrypt PEM output with CBC Camellia",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "camellia256",
.desc = "Encrypt PEM output with CBC Camellia",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
#endif
#ifndef OPENSSL_NO_DES
{
.name = "des",
.desc = "Encrypt with DES",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "des3",
.desc = "Encrypt with triple DES",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
#endif
#ifndef OPENSSL_NO_RC2
{
.name = "rc2-40",
.desc = "Encrypt with RC2-40",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "rc2-64",
.desc = "Encrypt with RC2-64",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{
.name = "rc2-128",
.desc = "Encrypt with RC2-128",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
#endif
{
.name = "CAfile",
.argname = "file",
.desc = "Certificate Authority file",
.type = OPTION_ARG,
.opt.arg = &cfg.CAfile,
},
{
.name = "CApath",
.argname = "path",
.desc = "Certificate Authority path",
.type = OPTION_ARG,
.opt.arg = &cfg.CApath,
},
{
.name = "binary",
.desc = "Do not translate message to text",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_BINARY,
},
{
.name = "certfile",
.argname = "file",
.desc = "Other certificates file",
.type = OPTION_ARG,
.opt.arg = &cfg.certfile,
},
{
.name = "content",
.argname = "file",
.desc = "Supply or override content for detached signature",
.type = OPTION_ARG,
.opt.arg = &cfg.contfile,
},
{
.name = "crlfeol",
.desc = "Use CRLF as EOL termination instead of CR only",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_CRLFEOL,
},
{
.name = "decrypt",
.desc = "Decrypt encrypted message",
.type = OPTION_VALUE,
.opt.value = &cfg.operation,
.value = SMIME_DECRYPT,
},
{
.name = "encrypt",
.desc = "Encrypt message",
.type = OPTION_VALUE,
.opt.value = &cfg.operation,
.value = SMIME_ENCRYPT,
},
{
.name = "from",
.argname = "addr",
.desc = "From address",
.type = OPTION_ARG,
.opt.arg = &cfg.from,
},
{
.name = "in",
.argname = "file",
.desc = "Input file",
.type = OPTION_ARG,
.opt.arg = &cfg.infile,
},
{
.name = "indef",
.desc = "Same as -stream",
.type = OPTION_VALUE,
.opt.value = &cfg.indef,
.value = 1,
},
{
.name = "inform",
.argname = "fmt",
.desc = "Input format (DER, PEM or SMIME (default))",
.type = OPTION_ARG_FORMAT,
.opt.value = &cfg.informat,
},
{
.name = "inkey",
.argname = "file",
.desc = "Input key file",
.type = OPTION_ARG_FUNC,
.opt.argfunc = smime_opt_inkey,
},
{
.name = "keyform",
.argname = "fmt",
.desc = "Input key format (DER or PEM (default))",
.type = OPTION_ARG_FORMAT,
.opt.value = &cfg.keyform,
},
{
.name = "md",
.argname = "digest",
.desc = "Digest to use when signing or resigning",
.type = OPTION_ARG_FUNC,
.opt.argfunc = smime_opt_md,
},
{
.name = "noattr",
.desc = "Do not include any signed attributes",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOATTR,
},
{
.name = "nocerts",
.desc = "Do not include signer's certificate when signing",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOCERTS,
},
{
.name = "nochain",
.desc = "Do not chain verification of signer's certificates",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOCHAIN,
},
{
.name = "nodetach",
.desc = "Use opaque signing",
.type = OPTION_VALUE_AND,
.opt.value = &cfg.flags,
.value = ~PKCS7_DETACHED,
},
{
.name = "noindef",
.desc = "Disable streaming I/O",
.type = OPTION_VALUE,
.opt.value = &cfg.indef,
.value = 0,
},
{
.name = "nointern",
.desc = "Do not search certificates in message for signer",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOINTERN,
},
{
.name = "nooldmime",
.desc = "Output old S/MIME content type",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOOLDMIMETYPE,
},
{
.name = "nosigs",
.desc = "Do not verify message signature",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOSIGS,
},
{
.name = "nosmimecap",
.desc = "Omit the SMIMECapabilities attribute",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOSMIMECAP,
},
{
.name = "noverify",
.desc = "Do not verify signer's certificate",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_NOVERIFY,
},
{
.name = "out",
.argname = "file",
.desc = "Output file",
.type = OPTION_ARG,
.opt.arg = &cfg.outfile,
},
{
.name = "outform",
.argname = "fmt",
.desc = "Output format (DER, PEM or SMIME (default))",
.type = OPTION_ARG_FORMAT,
.opt.value = &cfg.outformat,
},
{
.name = "passin",
.argname = "src",
.desc = "Private key password source",
.type = OPTION_ARG,
.opt.arg = &cfg.passargin,
},
{
.name = "pk7out",
.desc = "Output PKCS#7 structure",
.type = OPTION_VALUE,
.opt.value = &cfg.operation,
.value = SMIME_PK7OUT,
},
{
.name = "recip",
.argname = "file",
.desc = "Recipient certificate file for decryption",
.type = OPTION_ARG,
.opt.arg = &cfg.recipfile,
},
{
.name = "resign",
.desc = "Resign a signed message",
.type = OPTION_VALUE,
.opt.value = &cfg.operation,
.value = SMIME_RESIGN,
},
{
.name = "sign",
.desc = "Sign message",
.type = OPTION_VALUE,
.opt.value = &cfg.operation,
.value = SMIME_SIGN,
},
{
.name = "signer",
.argname = "file",
.desc = "Signer certificate file",
.type = OPTION_ARG_FUNC,
.opt.argfunc = smime_opt_signer,
},
{
.name = "stream",
.desc = "Enable streaming I/O",
.type = OPTION_VALUE,
.opt.value = &cfg.indef,
.value = 1,
},
{
.name = "subject",
.argname = "s",
.desc = "Subject",
.type = OPTION_ARG,
.opt.arg = &cfg.subject,
},
{
.name = "text",
.desc = "Include or delete text MIME headers",
.type = OPTION_VALUE_OR,
.opt.value = &cfg.flags,
.value = PKCS7_TEXT,
},
{
.name = "to",
.argname = "addr",
.desc = "To address",
.type = OPTION_ARG,
.opt.arg = &cfg.to,
},
{
.name = "verify",
.desc = "Verify signed message",
.type = OPTION_VALUE,
.opt.value = &cfg.operation,
.value = SMIME_VERIFY,
},
{
.name = "check_ss_sig",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "crl_check",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "crl_check_all",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "extended_crl",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "ignore_critical",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "issuer_checks",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "policy_check",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = "x509_strict",
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_verify_param,
},
{
.name = NULL,
.type = OPTION_ARGV_FUNC,
.opt.argvfunc = smime_opt_cipher,
},
{ NULL },
};
static const struct option verify_shared_options[] = {
{
.name = "check_ss_sig",
.desc = "Check the root CA self-signed certificate signature",
},
{
.name = "crl_check",
.desc = "Enable CRL checking for the leaf certificate",
},
{
.name = "crl_check_all",
.desc = "Enable CRL checking for the entire certificate chain",
},
{
.name = "extended_crl",
.desc = "Enable extended CRL support",
},
{
.name = "ignore_critical",
.desc = "Disable critical extension checking",
},
{
.name = "issuer_checks",
.desc = "Enable debugging of certificate issuer checks",
},
{
.name = "policy_check",
.desc = "Enable certificate policy checking",
},
{
.name = "x509_strict",
.desc = "Use strict X.509 rules (disables workarounds)",
},
{ NULL },
};
static void
smime_usage(void)
{
fprintf(stderr, "usage: smime "
"[-aes128 | -aes192 | -aes256 | -des |\n"
" -des3 | -rc2-40 | -rc2-64 | -rc2-128] [-binary]\n"
" [-CAfile file] [-CApath directory] [-certfile file]\n"
" [-content file]\n"
" [-decrypt] [-encrypt]\n"
" [-from addr] [-in file] [-indef]\n"
" [-inform der | pem | smime] [-inkey file]\n"
" [-keyform der | pem] [-md digest] [-noattr] [-nocerts]\n"
" [-nochain] [-nodetach] [-noindef] [-nointern] [-nosigs]\n"
" [-nosmimecap] [-noverify] [-out file]\n"
" [-outform der | pem | smime] [-passin arg] [-pk7out]\n"
" [-recip file] [-resign] [-sign]\n"
" [-signer file] [-stream] [-subject s] [-text] [-to addr]\n"
" [-verify] [cert.pem ...]\n\n");
options_usage(smime_options);
fprintf(stderr, "\nVerification options:\n\n");
options_usage(verify_shared_options);
}
int
smime_main(int argc, char **argv)
{
int ret = 0;
char **args;
int argsused = 0;
const char *inmode = "r", *outmode = "w";
PKCS7 *p7 = NULL;
X509_STORE *store = NULL;
X509 *cert = NULL, *recip = NULL, *signer = NULL;
EVP_PKEY *key = NULL;
STACK_OF(X509) *encerts = NULL, *other = NULL;
BIO *in = NULL, *out = NULL, *indata = NULL;
int badarg = 0;
char *passin = NULL;
if (pledge("stdio cpath wpath rpath tty", NULL) == -1) {
perror("pledge");
exit(1);
}
memset(&cfg, 0, sizeof(cfg));
cfg.flags = PKCS7_DETACHED;
cfg.informat = FORMAT_SMIME;
cfg.outformat = FORMAT_SMIME;
cfg.keyform = FORMAT_PEM;
if (options_parse(argc, argv, smime_options, NULL, &argsused) != 0) {
goto argerr;
}
args = argv + argsused;
ret = 1;
if (!(cfg.operation & SMIME_SIGNERS) &&
(cfg.skkeys != NULL || cfg.sksigners != NULL)) {
BIO_puts(bio_err, "Multiple signers or keys not allowed\n");
goto argerr;
}
if (cfg.operation & SMIME_SIGNERS) {
if (cfg.keyfile != NULL &&
cfg.signerfile == NULL) {
BIO_puts(bio_err, "Illegal -inkey without -signer\n");
goto argerr;
}
if (cfg.signerfile != NULL) {
if (cfg.sksigners == NULL) {
if ((cfg.sksigners =
sk_OPENSSL_STRING_new_null()) == NULL)
goto end;
}
if (!sk_OPENSSL_STRING_push(cfg.sksigners,
cfg.signerfile))
goto end;
if (cfg.skkeys == NULL) {
if ((cfg.skkeys =
sk_OPENSSL_STRING_new_null()) == NULL)
goto end;
}
if (cfg.keyfile == NULL)
cfg.keyfile = cfg.signerfile;
if (!sk_OPENSSL_STRING_push(cfg.skkeys,
cfg.keyfile))
goto end;
}
if (cfg.sksigners == NULL) {
BIO_printf(bio_err,
"No signer certificate specified\n");
badarg = 1;
}
cfg.signerfile = NULL;
cfg.keyfile = NULL;
} else if (cfg.operation == SMIME_DECRYPT) {
if (cfg.recipfile == NULL &&
cfg.keyfile == NULL) {
BIO_printf(bio_err,
"No recipient certificate or key specified\n");
badarg = 1;
}
} else if (cfg.operation == SMIME_ENCRYPT) {
if (*args == NULL) {
BIO_printf(bio_err,
"No recipient(s) certificate(s) specified\n");
badarg = 1;
}
} else if (!cfg.operation) {
badarg = 1;
}
if (badarg) {
argerr:
smime_usage();
goto end;
}
if (!app_passwd(bio_err, cfg.passargin, NULL, &passin, NULL)) {
BIO_printf(bio_err, "Error getting password\n");
goto end;
}
ret = 2;
if (!(cfg.operation & SMIME_SIGNERS))
cfg.flags &= ~PKCS7_DETACHED;
if (cfg.operation & SMIME_OP) {
if (cfg.outformat == FORMAT_ASN1)
outmode = "wb";
} else {
if (cfg.flags & PKCS7_BINARY)
outmode = "wb";
}
if (cfg.operation & SMIME_IP) {
if (cfg.informat == FORMAT_ASN1)
inmode = "rb";
} else {
if (cfg.flags & PKCS7_BINARY)
inmode = "rb";
}
if (cfg.operation == SMIME_ENCRYPT) {
if (cfg.cipher == NULL)
cfg.cipher = EVP_aes_256_cbc();
if ((encerts = sk_X509_new_null()) == NULL)
goto end;
while (*args != NULL) {
if ((cert = load_cert(bio_err, *args, FORMAT_PEM,
NULL, "recipient certificate file")) == NULL) {
goto end;
}
if (!sk_X509_push(encerts, cert))
goto end;
cert = NULL;
args++;
}
}
if (cfg.certfile != NULL) {
if ((other = load_certs(bio_err, cfg.certfile,
FORMAT_PEM, NULL, "certificate file")) == NULL) {
ERR_print_errors(bio_err);
goto end;
}
}
if (cfg.recipfile != NULL &&
(cfg.operation == SMIME_DECRYPT)) {
if ((recip = load_cert(bio_err, cfg.recipfile,
FORMAT_PEM, NULL, "recipient certificate file")) == NULL) {
ERR_print_errors(bio_err);
goto end;
}
}
if (cfg.operation == SMIME_DECRYPT) {
if (cfg.keyfile == NULL)
cfg.keyfile = cfg.recipfile;
} else if (cfg.operation == SMIME_SIGN) {
if (cfg.keyfile == NULL)
cfg.keyfile = cfg.signerfile;
} else {
cfg.keyfile = NULL;
}
if (cfg.keyfile != NULL) {
key = load_key(bio_err, cfg.keyfile,
cfg.keyform, 0, passin, "signing key file");
if (key == NULL)
goto end;
}
if (cfg.infile != NULL) {
if ((in = BIO_new_file(cfg.infile, inmode)) == NULL) {
BIO_printf(bio_err,
"Can't open input file %s\n", cfg.infile);
goto end;
}
} else {
if ((in = BIO_new_fp(stdin, BIO_NOCLOSE)) == NULL)
goto end;
}
if (cfg.operation & SMIME_IP) {
if (cfg.informat == FORMAT_SMIME)
p7 = SMIME_read_PKCS7(in, &indata);
else if (cfg.informat == FORMAT_PEM)
p7 = PEM_read_bio_PKCS7(in, NULL, NULL, NULL);
else if (cfg.informat == FORMAT_ASN1)
p7 = d2i_PKCS7_bio(in, NULL);
else {
BIO_printf(bio_err,
"Bad input format for PKCS#7 file\n");
goto end;
}
if (p7 == NULL) {
BIO_printf(bio_err, "Error reading S/MIME message\n");
goto end;
}
if (cfg.contfile != NULL) {
BIO_free(indata);
if ((indata = BIO_new_file(cfg.contfile,
"rb")) == NULL) {
BIO_printf(bio_err,
"Can't read content file %s\n",
cfg.contfile);
goto end;
}
}
}
if (cfg.outfile != NULL) {
if ((out = BIO_new_file(cfg.outfile, outmode)) == NULL) {
BIO_printf(bio_err,
"Can't open output file %s\n",
cfg.outfile);
goto end;
}
} else {
if ((out = BIO_new_fp(stdout, BIO_NOCLOSE)) == NULL)
goto end;
}
if (cfg.operation == SMIME_VERIFY) {
if ((store = setup_verify(bio_err, cfg.CAfile,
cfg.CApath)) == NULL)
goto end;
if (cfg.vpm != NULL) {
if (!X509_STORE_set1_param(store, cfg.vpm))
goto end;
}
}
ret = 3;
if (cfg.operation == SMIME_ENCRYPT) {
if (cfg.indef)
cfg.flags |= PKCS7_STREAM;
p7 = PKCS7_encrypt(encerts, in, cfg.cipher,
cfg.flags);
} else if (cfg.operation & SMIME_SIGNERS) {
int i;
if (cfg.operation == SMIME_SIGN) {
if (cfg.flags & PKCS7_DETACHED) {
if (cfg.outformat == FORMAT_SMIME)
cfg.flags |= PKCS7_STREAM;
} else if (cfg.indef) {
cfg.flags |= PKCS7_STREAM;
}
cfg.flags |= PKCS7_PARTIAL;
p7 = PKCS7_sign(NULL, NULL, other, in,
cfg.flags);
if (p7 == NULL)
goto end;
} else {
cfg.flags |= PKCS7_REUSE_DIGEST;
}
for (i = 0; i < sk_OPENSSL_STRING_num(cfg.sksigners); i++) {
cfg.signerfile =
sk_OPENSSL_STRING_value(cfg.sksigners, i);
cfg.keyfile =
sk_OPENSSL_STRING_value(cfg.skkeys, i);
signer = load_cert(bio_err, cfg.signerfile,
FORMAT_PEM, NULL, "signer certificate");
if (signer == NULL)
goto end;
key = load_key(bio_err, cfg.keyfile,
cfg.keyform, 0, passin,
"signing key file");
if (key == NULL)
goto end;
if (PKCS7_sign_add_signer(p7, signer, key,
cfg.sign_md, cfg.flags) == NULL)
goto end;
X509_free(signer);
signer = NULL;
EVP_PKEY_free(key);
key = NULL;
}
if ((cfg.operation == SMIME_SIGN) &&
!(cfg.flags & PKCS7_STREAM)) {
if (!PKCS7_final(p7, in, cfg.flags))
goto end;
}
}
if (p7 == NULL) {
BIO_printf(bio_err, "Error creating PKCS#7 structure\n");
goto end;
}
ret = 4;
if (cfg.operation == SMIME_DECRYPT) {
if (!PKCS7_decrypt(p7, key, recip, out, cfg.flags)) {
BIO_printf(bio_err,
"Error decrypting PKCS#7 structure\n");
goto end;
}
} else if (cfg.operation == SMIME_VERIFY) {
STACK_OF(X509) *signers;
if (PKCS7_verify(p7, other, store, indata, out,
cfg.flags)) {
BIO_printf(bio_err, "Verification successful\n");
} else {
BIO_printf(bio_err, "Verification failure\n");
goto end;
}
if ((signers = PKCS7_get0_signers(p7, other,
cfg.flags)) == NULL)
goto end;
if (!save_certs(cfg.signerfile, signers)) {
BIO_printf(bio_err, "Error writing signers to %s\n",
cfg.signerfile);
sk_X509_free(signers);
ret = 5;
goto end;
}
sk_X509_free(signers);
} else if (cfg.operation == SMIME_PK7OUT) {
PEM_write_bio_PKCS7(out, p7);
} else {
if (cfg.to != NULL)
BIO_printf(out, "To: %s\n", cfg.to);
if (cfg.from != NULL)
BIO_printf(out, "From: %s\n", cfg.from);
if (cfg.subject != NULL)
BIO_printf(out, "Subject: %s\n", cfg.subject);
if (cfg.outformat == FORMAT_SMIME) {
if (cfg.operation == SMIME_RESIGN) {
if (!SMIME_write_PKCS7(out, p7, indata,
cfg.flags))
goto end;
} else {
if (!SMIME_write_PKCS7(out, p7, in,
cfg.flags))
goto end;
}
} else if (cfg.outformat == FORMAT_PEM) {
if (!PEM_write_bio_PKCS7_stream(out, p7, in,
cfg.flags))
goto end;
} else if (cfg.outformat == FORMAT_ASN1) {
if (!i2d_PKCS7_bio_stream(out, p7, in,
cfg.flags))
goto end;
} else {
BIO_printf(bio_err,
"Bad output format for PKCS#7 file\n");
goto end;
}
}
ret = 0;
end:
if (ret)
ERR_print_errors(bio_err);
sk_X509_pop_free(encerts, X509_free);
sk_X509_pop_free(other, X509_free);
X509_VERIFY_PARAM_free(cfg.vpm);
sk_OPENSSL_STRING_free(cfg.sksigners);
sk_OPENSSL_STRING_free(cfg.skkeys);
X509_STORE_free(store);
X509_free(cert);
X509_free(recip);
X509_free(signer);
EVP_PKEY_free(key);
PKCS7_free(p7);
BIO_free(in);
BIO_free(indata);
BIO_free_all(out);
free(passin);
return (ret);
}
static int
save_certs(char *signerfile, STACK_OF(X509) *signers)
{
int i;
BIO *tmp;
if (signerfile == NULL)
return 1;
tmp = BIO_new_file(signerfile, "w");
if (tmp == NULL)
return 0;
for (i = 0; i < sk_X509_num(signers); i++)
PEM_write_bio_X509(tmp, sk_X509_value(signers, i));
BIO_free(tmp);
return 1;
}
