1ebfedea0SLionel Sambuc /* Simple S/MIME signing example */
2ebfedea0SLionel Sambuc #include <openssl/pem.h>
3ebfedea0SLionel Sambuc #include <openssl/cms.h>
4ebfedea0SLionel Sambuc #include <openssl/err.h>
5ebfedea0SLionel Sambuc
main(int argc,char ** argv)6ebfedea0SLionel Sambuc int main(int argc, char **argv)
7ebfedea0SLionel Sambuc {
8ebfedea0SLionel Sambuc BIO *in = NULL, *out = NULL, *tbio = NULL;
9ebfedea0SLionel Sambuc X509 *scert = NULL;
10ebfedea0SLionel Sambuc EVP_PKEY *skey = NULL;
11ebfedea0SLionel Sambuc CMS_ContentInfo *cms = NULL;
12ebfedea0SLionel Sambuc int ret = 1;
13ebfedea0SLionel Sambuc
14*0a6a1f1dSLionel Sambuc /*
15*0a6a1f1dSLionel Sambuc * For simple S/MIME signing use CMS_DETACHED. On OpenSSL 1.0.0 only: for
16*0a6a1f1dSLionel Sambuc * streaming detached set CMS_DETACHED|CMS_STREAM for streaming
17*0a6a1f1dSLionel Sambuc * non-detached set CMS_STREAM
18ebfedea0SLionel Sambuc */
19ebfedea0SLionel Sambuc int flags = CMS_DETACHED | CMS_STREAM;
20ebfedea0SLionel Sambuc
21ebfedea0SLionel Sambuc OpenSSL_add_all_algorithms();
22ebfedea0SLionel Sambuc ERR_load_crypto_strings();
23ebfedea0SLionel Sambuc
24ebfedea0SLionel Sambuc /* Read in signer certificate and private key */
25ebfedea0SLionel Sambuc tbio = BIO_new_file("signer.pem", "r");
26ebfedea0SLionel Sambuc
27ebfedea0SLionel Sambuc if (!tbio)
28ebfedea0SLionel Sambuc goto err;
29ebfedea0SLionel Sambuc
30ebfedea0SLionel Sambuc scert = PEM_read_bio_X509(tbio, NULL, 0, NULL);
31ebfedea0SLionel Sambuc
32ebfedea0SLionel Sambuc BIO_reset(tbio);
33ebfedea0SLionel Sambuc
34ebfedea0SLionel Sambuc skey = PEM_read_bio_PrivateKey(tbio, NULL, 0, NULL);
35ebfedea0SLionel Sambuc
36ebfedea0SLionel Sambuc if (!scert || !skey)
37ebfedea0SLionel Sambuc goto err;
38ebfedea0SLionel Sambuc
39ebfedea0SLionel Sambuc /* Open content being signed */
40ebfedea0SLionel Sambuc
41ebfedea0SLionel Sambuc in = BIO_new_file("sign.txt", "r");
42ebfedea0SLionel Sambuc
43ebfedea0SLionel Sambuc if (!in)
44ebfedea0SLionel Sambuc goto err;
45ebfedea0SLionel Sambuc
46ebfedea0SLionel Sambuc /* Sign content */
47ebfedea0SLionel Sambuc cms = CMS_sign(scert, skey, NULL, in, flags);
48ebfedea0SLionel Sambuc
49ebfedea0SLionel Sambuc if (!cms)
50ebfedea0SLionel Sambuc goto err;
51ebfedea0SLionel Sambuc
52ebfedea0SLionel Sambuc out = BIO_new_file("smout.txt", "w");
53ebfedea0SLionel Sambuc if (!out)
54ebfedea0SLionel Sambuc goto err;
55ebfedea0SLionel Sambuc
56ebfedea0SLionel Sambuc if (!(flags & CMS_STREAM))
57ebfedea0SLionel Sambuc BIO_reset(in);
58ebfedea0SLionel Sambuc
59ebfedea0SLionel Sambuc /* Write out S/MIME message */
60ebfedea0SLionel Sambuc if (!SMIME_write_CMS(out, cms, in, flags))
61ebfedea0SLionel Sambuc goto err;
62ebfedea0SLionel Sambuc
63ebfedea0SLionel Sambuc ret = 0;
64ebfedea0SLionel Sambuc
65ebfedea0SLionel Sambuc err:
66ebfedea0SLionel Sambuc
67*0a6a1f1dSLionel Sambuc if (ret) {
68ebfedea0SLionel Sambuc fprintf(stderr, "Error Signing Data\n");
69ebfedea0SLionel Sambuc ERR_print_errors_fp(stderr);
70ebfedea0SLionel Sambuc }
71ebfedea0SLionel Sambuc
72ebfedea0SLionel Sambuc if (cms)
73ebfedea0SLionel Sambuc CMS_ContentInfo_free(cms);
74ebfedea0SLionel Sambuc if (scert)
75ebfedea0SLionel Sambuc X509_free(scert);
76ebfedea0SLionel Sambuc if (skey)
77ebfedea0SLionel Sambuc EVP_PKEY_free(skey);
78ebfedea0SLionel Sambuc
79ebfedea0SLionel Sambuc if (in)
80ebfedea0SLionel Sambuc BIO_free(in);
81ebfedea0SLionel Sambuc if (out)
82ebfedea0SLionel Sambuc BIO_free(out);
83ebfedea0SLionel Sambuc if (tbio)
84ebfedea0SLionel Sambuc BIO_free(tbio);
85ebfedea0SLionel Sambuc
86ebfedea0SLionel Sambuc return ret;
87ebfedea0SLionel Sambuc
88ebfedea0SLionel Sambuc }
89