3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
6 /* ====================================================================
7 * Copyright (c) 1999-2004 The OpenSSL Project. All rights reserved.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in
18 * the documentation and/or other materials provided with the
21 * 3. All advertising materials mentioning features or use of this
22 * software must display the following acknowledgment:
23 * "This product includes software developed by the OpenSSL Project
24 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
26 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
27 * endorse or promote products derived from this software without
28 * prior written permission. For written permission, please contact
29 * licensing@OpenSSL.org.
31 * 5. Products derived from this software may not be called "OpenSSL"
32 * nor may "OpenSSL" appear in their names without prior written
33 * permission of the OpenSSL Project.
35 * 6. Redistributions of any form whatsoever must retain the following
37 * "This product includes software developed by the OpenSSL Project
38 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
40 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
41 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
43 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
44 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
45 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
46 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
47 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
49 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
50 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
51 * OF THE POSSIBILITY OF SUCH DAMAGE.
52 * ====================================================================
54 * This product includes cryptographic software written by Eric Young
55 * (eay@cryptsoft.com). This product includes software written by Tim
56 * Hudson (tjh@cryptsoft.com).
60 /* Simple PKCS#7 processing functions */
64 #include <openssl/x509.h>
65 #include <openssl/x509v3.h>
67 static int pkcs7_copy_existing_digest(PKCS7
*p7
, PKCS7_SIGNER_INFO
*si
);
69 PKCS7
*PKCS7_sign(X509
*signcert
, EVP_PKEY
*pkey
, STACK_OF(X509
) *certs
,
75 if (!(p7
= PKCS7_new())) {
76 PKCS7err(PKCS7_F_PKCS7_SIGN
, ERR_R_MALLOC_FAILURE
);
80 if (!PKCS7_set_type(p7
, NID_pkcs7_signed
))
83 if (!PKCS7_content_new(p7
, NID_pkcs7_data
))
86 if (pkey
&& !PKCS7_sign_add_signer(p7
, signcert
, pkey
, NULL
, flags
)) {
87 PKCS7err(PKCS7_F_PKCS7_SIGN
, PKCS7_R_PKCS7_ADD_SIGNER_ERROR
);
91 if (!(flags
& PKCS7_NOCERTS
)) {
92 for (i
= 0; i
< sk_X509_num(certs
); i
++) {
93 if (!PKCS7_add_certificate(p7
, sk_X509_value(certs
, i
)))
98 if (flags
& PKCS7_DETACHED
)
99 PKCS7_set_detached(p7
, 1);
101 if (flags
& (PKCS7_STREAM
| PKCS7_PARTIAL
))
104 if (PKCS7_final(p7
, data
, flags
))
112 int PKCS7_final(PKCS7
*p7
, BIO
*data
, int flags
)
116 if (!(p7bio
= PKCS7_dataInit(p7
, NULL
))) {
117 PKCS7err(PKCS7_F_PKCS7_FINAL
, ERR_R_MALLOC_FAILURE
);
121 SMIME_crlf_copy(data
, p7bio
, flags
);
123 (void)BIO_flush(p7bio
);
125 if (!PKCS7_dataFinal(p7
, p7bio
)) {
126 PKCS7err(PKCS7_F_PKCS7_FINAL
, PKCS7_R_PKCS7_DATASIGN
);
139 /* Check to see if a cipher exists and if so add S/MIME capabilities */
141 static int add_cipher_smcap(STACK_OF(X509_ALGOR
) *sk
, int nid
, int arg
)
143 if (EVP_get_cipherbynid(nid
))
144 return PKCS7_simple_smimecap(sk
, nid
, arg
);
148 static int add_digest_smcap(STACK_OF(X509_ALGOR
) *sk
, int nid
, int arg
)
150 if (EVP_get_digestbynid(nid
))
151 return PKCS7_simple_smimecap(sk
, nid
, arg
);
155 PKCS7_SIGNER_INFO
*PKCS7_sign_add_signer(PKCS7
*p7
, X509
*signcert
,
156 EVP_PKEY
*pkey
, const EVP_MD
*md
,
159 PKCS7_SIGNER_INFO
*si
= NULL
;
160 STACK_OF(X509_ALGOR
) *smcap
= NULL
;
161 if (!X509_check_private_key(signcert
, pkey
)) {
162 PKCS7err(PKCS7_F_PKCS7_SIGN_ADD_SIGNER
,
163 PKCS7_R_PRIVATE_KEY_DOES_NOT_MATCH_CERTIFICATE
);
167 if (!(si
= PKCS7_add_signature(p7
, signcert
, pkey
, md
))) {
168 PKCS7err(PKCS7_F_PKCS7_SIGN_ADD_SIGNER
,
169 PKCS7_R_PKCS7_ADD_SIGNATURE_ERROR
);
173 if (!(flags
& PKCS7_NOCERTS
)) {
174 if (!PKCS7_add_certificate(p7
, signcert
))
178 if (!(flags
& PKCS7_NOATTR
)) {
179 if (!PKCS7_add_attrib_content_type(si
, NULL
))
181 /* Add SMIMECapabilities */
182 if (!(flags
& PKCS7_NOSMIMECAP
)) {
183 if (!(smcap
= sk_X509_ALGOR_new_null())) {
184 PKCS7err(PKCS7_F_PKCS7_SIGN_ADD_SIGNER
, ERR_R_MALLOC_FAILURE
);
187 if (!add_cipher_smcap(smcap
, NID_aes_256_cbc
, -1)
188 || !add_digest_smcap(smcap
, NID_id_GostR3411_94
, -1)
189 || !add_cipher_smcap(smcap
, NID_id_Gost28147_89
, -1)
190 || !add_cipher_smcap(smcap
, NID_aes_192_cbc
, -1)
191 || !add_cipher_smcap(smcap
, NID_aes_128_cbc
, -1)
192 || !add_cipher_smcap(smcap
, NID_des_ede3_cbc
, -1)
193 || !add_cipher_smcap(smcap
, NID_rc2_cbc
, 128)
194 || !add_cipher_smcap(smcap
, NID_rc2_cbc
, 64)
195 || !add_cipher_smcap(smcap
, NID_des_cbc
, -1)
196 || !add_cipher_smcap(smcap
, NID_rc2_cbc
, 40)
197 || !PKCS7_add_attrib_smimecap(si
, smcap
))
199 sk_X509_ALGOR_pop_free(smcap
, X509_ALGOR_free
);
202 if (flags
& PKCS7_REUSE_DIGEST
) {
203 if (!pkcs7_copy_existing_digest(p7
, si
))
205 if (!(flags
& PKCS7_PARTIAL
) && !PKCS7_SIGNER_INFO_sign(si
))
212 sk_X509_ALGOR_pop_free(smcap
, X509_ALGOR_free
);
217 * Search for a digest matching SignerInfo digest type and if found copy
221 static int pkcs7_copy_existing_digest(PKCS7
*p7
, PKCS7_SIGNER_INFO
*si
)
224 STACK_OF(PKCS7_SIGNER_INFO
) *sinfos
;
225 PKCS7_SIGNER_INFO
*sitmp
;
226 ASN1_OCTET_STRING
*osdig
= NULL
;
227 sinfos
= PKCS7_get_signer_info(p7
);
228 for (i
= 0; i
< sk_PKCS7_SIGNER_INFO_num(sinfos
); i
++) {
229 sitmp
= sk_PKCS7_SIGNER_INFO_value(sinfos
, i
);
232 if (sk_X509_ATTRIBUTE_num(sitmp
->auth_attr
) <= 0)
234 if (!OBJ_cmp(si
->digest_alg
->algorithm
, sitmp
->digest_alg
->algorithm
)) {
235 osdig
= PKCS7_digest_from_attributes(sitmp
->auth_attr
);
242 return PKCS7_add1_attrib_digest(si
, osdig
->data
, osdig
->length
);
244 PKCS7err(PKCS7_F_PKCS7_COPY_EXISTING_DIGEST
,
245 PKCS7_R_NO_MATCHING_DIGEST_TYPE_FOUND
);
249 int PKCS7_verify(PKCS7
*p7
, STACK_OF(X509
) *certs
, X509_STORE
*store
,
250 BIO
*indata
, BIO
*out
, int flags
)
252 STACK_OF(X509
) *signers
;
254 STACK_OF(PKCS7_SIGNER_INFO
) *sinfos
;
255 PKCS7_SIGNER_INFO
*si
;
256 X509_STORE_CTX cert_ctx
;
258 int i
, j
= 0, k
, ret
= 0;
263 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_INVALID_NULL_POINTER
);
267 if (!PKCS7_type_is_signed(p7
)) {
268 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_WRONG_CONTENT_TYPE
);
272 /* Check for no data and no content: no data to verify signature */
273 if (PKCS7_get_detached(p7
) && !indata
) {
274 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_NO_CONTENT
);
279 * Very old Netscape illegally included empty content with
280 * a detached signature. To not support that, enable the
283 #ifdef OPENSSL_DONT_SUPPORT_OLD_NETSCAPE
284 /* Check for data and content: two sets of data */
285 if (!PKCS7_get_detached(p7
) && indata
) {
286 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_CONTENT_AND_DATA_PRESENT
);
291 sinfos
= PKCS7_get_signer_info(p7
);
293 if (!sinfos
|| !sk_PKCS7_SIGNER_INFO_num(sinfos
)) {
294 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_NO_SIGNATURES_ON_DATA
);
298 signers
= PKCS7_get0_signers(p7
, certs
, flags
);
303 /* Now verify the certificates */
305 if (!(flags
& PKCS7_NOVERIFY
))
306 for (k
= 0; k
< sk_X509_num(signers
); k
++) {
307 signer
= sk_X509_value(signers
, k
);
308 if (!(flags
& PKCS7_NOCHAIN
)) {
309 if (!X509_STORE_CTX_init(&cert_ctx
, store
, signer
,
311 PKCS7err(PKCS7_F_PKCS7_VERIFY
, ERR_R_X509_LIB
);
312 sk_X509_free(signers
);
315 X509_STORE_CTX_set_default(&cert_ctx
, "smime_sign");
316 } else if (!X509_STORE_CTX_init(&cert_ctx
, store
, signer
, NULL
)) {
317 PKCS7err(PKCS7_F_PKCS7_VERIFY
, ERR_R_X509_LIB
);
318 sk_X509_free(signers
);
321 if (!(flags
& PKCS7_NOCRL
))
322 X509_STORE_CTX_set0_crls(&cert_ctx
, p7
->d
.sign
->crl
);
323 i
= X509_verify_cert(&cert_ctx
);
325 j
= X509_STORE_CTX_get_error(&cert_ctx
);
326 X509_STORE_CTX_cleanup(&cert_ctx
);
328 PKCS7err(PKCS7_F_PKCS7_VERIFY
,
329 PKCS7_R_CERTIFICATE_VERIFY_ERROR
);
330 ERR_add_error_data(2, "Verify error:",
331 X509_verify_cert_error_string(j
));
332 sk_X509_free(signers
);
335 /* Check for revocation status here */
339 * Performance optimization: if the content is a memory BIO then store
340 * its contents in a temporary read only memory BIO. This avoids
341 * potentially large numbers of slow copies of data which will occur when
342 * reading from a read write memory BIO when signatures are calculated.
345 if (indata
&& (BIO_method_type(indata
) == BIO_TYPE_MEM
)) {
348 len
= BIO_get_mem_data(indata
, &ptr
);
349 tmpin
= BIO_new_mem_buf(ptr
, len
);
351 PKCS7err(PKCS7_F_PKCS7_VERIFY
, ERR_R_MALLOC_FAILURE
);
357 if (!(p7bio
= PKCS7_dataInit(p7
, tmpin
)))
360 if (flags
& PKCS7_TEXT
) {
361 if (!(tmpout
= BIO_new(BIO_s_mem()))) {
362 PKCS7err(PKCS7_F_PKCS7_VERIFY
, ERR_R_MALLOC_FAILURE
);
365 BIO_set_mem_eof_return(tmpout
, 0);
369 /* We now have to 'read' from p7bio to calculate digests etc. */
371 i
= BIO_read(p7bio
, buf
, sizeof(buf
));
375 BIO_write(tmpout
, buf
, i
);
378 if (flags
& PKCS7_TEXT
) {
379 if (!SMIME_text(tmpout
, out
)) {
380 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_SMIME_TEXT_ERROR
);
387 /* Now Verify All Signatures */
388 if (!(flags
& PKCS7_NOSIGS
))
389 for (i
= 0; i
< sk_PKCS7_SIGNER_INFO_num(sinfos
); i
++) {
390 si
= sk_PKCS7_SIGNER_INFO_value(sinfos
, i
);
391 signer
= sk_X509_value(signers
, i
);
392 j
= PKCS7_signatureVerify(p7bio
, p7
, si
, signer
);
394 PKCS7err(PKCS7_F_PKCS7_VERIFY
, PKCS7_R_SIGNATURE_FAILURE
);
403 if (tmpin
== indata
) {
409 sk_X509_free(signers
);
414 STACK_OF(X509
) *PKCS7_get0_signers(PKCS7
*p7
, STACK_OF(X509
) *certs
,
417 STACK_OF(X509
) *signers
;
418 STACK_OF(PKCS7_SIGNER_INFO
) *sinfos
;
419 PKCS7_SIGNER_INFO
*si
;
420 PKCS7_ISSUER_AND_SERIAL
*ias
;
425 PKCS7err(PKCS7_F_PKCS7_GET0_SIGNERS
, PKCS7_R_INVALID_NULL_POINTER
);
429 if (!PKCS7_type_is_signed(p7
)) {
430 PKCS7err(PKCS7_F_PKCS7_GET0_SIGNERS
, PKCS7_R_WRONG_CONTENT_TYPE
);
434 /* Collect all the signers together */
436 sinfos
= PKCS7_get_signer_info(p7
);
438 if (sk_PKCS7_SIGNER_INFO_num(sinfos
) <= 0) {
439 PKCS7err(PKCS7_F_PKCS7_GET0_SIGNERS
, PKCS7_R_NO_SIGNERS
);
443 if (!(signers
= sk_X509_new_null())) {
444 PKCS7err(PKCS7_F_PKCS7_GET0_SIGNERS
, ERR_R_MALLOC_FAILURE
);
448 for (i
= 0; i
< sk_PKCS7_SIGNER_INFO_num(sinfos
); i
++) {
449 si
= sk_PKCS7_SIGNER_INFO_value(sinfos
, i
);
450 ias
= si
->issuer_and_serial
;
452 /* If any certificates passed they take priority */
454 signer
= X509_find_by_issuer_and_serial(certs
,
455 ias
->issuer
, ias
->serial
);
456 if (!signer
&& !(flags
& PKCS7_NOINTERN
)
459 X509_find_by_issuer_and_serial(p7
->d
.sign
->cert
,
460 ias
->issuer
, ias
->serial
);
462 PKCS7err(PKCS7_F_PKCS7_GET0_SIGNERS
,
463 PKCS7_R_SIGNER_CERTIFICATE_NOT_FOUND
);
464 sk_X509_free(signers
);
468 if (!sk_X509_push(signers
, signer
)) {
469 sk_X509_free(signers
);
476 /* Build a complete PKCS#7 enveloped data */
478 PKCS7
*PKCS7_encrypt(STACK_OF(X509
) *certs
, BIO
*in
, const EVP_CIPHER
*cipher
,
485 if (!(p7
= PKCS7_new())) {
486 PKCS7err(PKCS7_F_PKCS7_ENCRYPT
, ERR_R_MALLOC_FAILURE
);
490 if (!PKCS7_set_type(p7
, NID_pkcs7_enveloped
))
492 if (!PKCS7_set_cipher(p7
, cipher
)) {
493 PKCS7err(PKCS7_F_PKCS7_ENCRYPT
, PKCS7_R_ERROR_SETTING_CIPHER
);
497 for (i
= 0; i
< sk_X509_num(certs
); i
++) {
498 x509
= sk_X509_value(certs
, i
);
499 if (!PKCS7_add_recipient(p7
, x509
)) {
500 PKCS7err(PKCS7_F_PKCS7_ENCRYPT
, PKCS7_R_ERROR_ADDING_RECIPIENT
);
505 if (flags
& PKCS7_STREAM
)
508 if (PKCS7_final(p7
, in
, flags
))
519 int PKCS7_decrypt(PKCS7
*p7
, EVP_PKEY
*pkey
, X509
*cert
, BIO
*data
, int flags
)
526 PKCS7err(PKCS7_F_PKCS7_DECRYPT
, PKCS7_R_INVALID_NULL_POINTER
);
530 if (!PKCS7_type_is_enveloped(p7
)) {
531 PKCS7err(PKCS7_F_PKCS7_DECRYPT
, PKCS7_R_WRONG_CONTENT_TYPE
);
535 if (cert
&& !X509_check_private_key(cert
, pkey
)) {
536 PKCS7err(PKCS7_F_PKCS7_DECRYPT
,
537 PKCS7_R_PRIVATE_KEY_DOES_NOT_MATCH_CERTIFICATE
);
541 if (!(tmpmem
= PKCS7_dataDecode(p7
, pkey
, NULL
, cert
))) {
542 PKCS7err(PKCS7_F_PKCS7_DECRYPT
, PKCS7_R_DECRYPT_ERROR
);
546 if (flags
& PKCS7_TEXT
) {
548 /* Encrypt BIOs can't do BIO_gets() so add a buffer BIO */
549 if (!(tmpbuf
= BIO_new(BIO_f_buffer()))) {
550 PKCS7err(PKCS7_F_PKCS7_DECRYPT
, ERR_R_MALLOC_FAILURE
);
551 BIO_free_all(tmpmem
);
554 if (!(bread
= BIO_push(tmpbuf
, tmpmem
))) {
555 PKCS7err(PKCS7_F_PKCS7_DECRYPT
, ERR_R_MALLOC_FAILURE
);
556 BIO_free_all(tmpbuf
);
557 BIO_free_all(tmpmem
);
560 ret
= SMIME_text(bread
, data
);
561 if (ret
> 0 && BIO_method_type(tmpmem
) == BIO_TYPE_CIPHER
) {
562 if (!BIO_get_cipher_status(tmpmem
))
569 i
= BIO_read(tmpmem
, buf
, sizeof(buf
));
572 if (BIO_method_type(tmpmem
) == BIO_TYPE_CIPHER
) {
573 if (!BIO_get_cipher_status(tmpmem
))
579 if (BIO_write(data
, buf
, i
) != i
) {
584 BIO_free_all(tmpmem
);