pk7_mime.c revision 296465
1/* pk7_mime.c */
2/*
3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
4 * project.
5 */
6/* ====================================================================
7 * Copyright (c) 1999-2005 The OpenSSL Project.  All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 *
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 *
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
19 *    distribution.
20 *
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/)"
25 *
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.
30 *
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.
34 *
35 * 6. Redistributions of any form whatsoever must retain the following
36 *    acknowledgment:
37 *    "This product includes software developed by the OpenSSL Project
38 *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39 *
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 * ====================================================================
53 *
54 */
55
56#include <stdio.h>
57#include <ctype.h>
58#include "cryptlib.h"
59#include <openssl/rand.h>
60#include <openssl/x509.h>
61#include <openssl/asn1.h>
62
63/* PKCS#7 wrappers round generalised MIME routines */
64
65PKCS7 *SMIME_read_PKCS7(BIO *bio, BIO **bcont)
66{
67    return (PKCS7 *)SMIME_read_ASN1(bio, bcont, ASN1_ITEM_rptr(PKCS7));
68}
69
70/* Callback for int_smime_write_ASN1 */
71
72static int pk7_output_data(BIO *out, BIO *data, ASN1_VALUE *val, int flags,
73                           const ASN1_ITEM *it)
74{
75    PKCS7 *p7 = (PKCS7 *)val;
76    BIO *tmpbio, *p7bio;
77
78    if (!(flags & SMIME_DETACHED)) {
79        SMIME_crlf_copy(data, out, flags);
80        return 1;
81    }
82
83    /* Let PKCS7 code prepend any needed BIOs */
84
85    p7bio = PKCS7_dataInit(p7, out);
86
87    if (!p7bio)
88        return 0;
89
90    /* Copy data across, passing through filter BIOs for processing */
91    SMIME_crlf_copy(data, p7bio, flags);
92
93    /* Finalize structure */
94    if (PKCS7_dataFinal(p7, p7bio) <= 0)
95        goto err;
96
97 err:
98
99    /* Now remove any digests prepended to the BIO */
100
101    while (p7bio != out) {
102        tmpbio = BIO_pop(p7bio);
103        BIO_free(p7bio);
104        p7bio = tmpbio;
105    }
106
107    return 1;
108
109}
110
111int SMIME_write_PKCS7(BIO *bio, PKCS7 *p7, BIO *data, int flags)
112{
113    STACK_OF(X509_ALGOR) *mdalgs;
114    int ctype_nid = OBJ_obj2nid(p7->type);
115    if (ctype_nid == NID_pkcs7_signed)
116        mdalgs = p7->d.sign->md_algs;
117    else
118        mdalgs = NULL;
119
120    return int_smime_write_ASN1(bio, (ASN1_VALUE *)p7, data, flags,
121                                ctype_nid, NID_undef, mdalgs,
122                                pk7_output_data, ASN1_ITEM_rptr(PKCS7));
123}
124