xref: /minix3/crypto/external/bsd/openssl/dist/demos/cms/cms_sign.c (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
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