3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL
6 /* ====================================================================
7 * Copyright (c) 2008 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 * ====================================================================
56 #include <openssl/asn1.h>
57 #include <openssl/asn1t.h>
58 #include <openssl/bio.h>
59 #include <openssl/err.h>
63 /* Experimental NDEF ASN1 BIO support routines */
66 * The usage is quite simple, initialize an ASN1 structure, get a BIO from it
67 * then any data written through the BIO will end up translated to
68 * approptiate format on the fly. The data is streamed out and does *not*
69 * need to be all held in memory at once. When the BIO is flushed the output
70 * is finalized and any signatures etc written out. The BIO is a 'proper'
71 * BIO and can handle non blocking I/O correctly. The usage is simple. The
72 * implementation is *not*...
75 /* BIO support data stored in the ASN1 BIO ex_arg */
77 typedef struct ndef_aux_st {
78 /* ASN1 structure this BIO refers to */
81 /* Top of the BIO chain */
85 /* Boundary where content is inserted */
86 unsigned char **boundary;
87 /* DER buffer start */
88 unsigned char *derbuf;
91 static int ndef_prefix(BIO *b, unsigned char **pbuf, int *plen, void *parg);
92 static int ndef_prefix_free(BIO *b, unsigned char **pbuf, int *plen,
94 static int ndef_suffix(BIO *b, unsigned char **pbuf, int *plen, void *parg);
95 static int ndef_suffix_free(BIO *b, unsigned char **pbuf, int *plen,
98 BIO *BIO_new_NDEF(BIO *out, ASN1_VALUE *val, const ASN1_ITEM *it)
100 NDEF_SUPPORT *ndef_aux = NULL;
102 const ASN1_AUX *aux = it->funcs;
103 ASN1_STREAM_ARG sarg;
105 if (!aux || !aux->asn1_cb) {
106 ASN1err(ASN1_F_BIO_NEW_NDEF, ASN1_R_STREAMING_NOT_SUPPORTED);
109 ndef_aux = OPENSSL_malloc(sizeof(NDEF_SUPPORT));
110 asn_bio = BIO_new(BIO_f_asn1());
112 /* ASN1 bio needs to be next to output BIO */
114 out = BIO_push(asn_bio, out);
116 if (!ndef_aux || !asn_bio || !out)
119 BIO_asn1_set_prefix(asn_bio, ndef_prefix, ndef_prefix_free);
120 BIO_asn1_set_suffix(asn_bio, ndef_suffix, ndef_suffix_free);
123 * Now let callback prepend any digest, cipher etc BIOs ASN1 structure
128 sarg.ndef_bio = NULL;
129 sarg.boundary = NULL;
131 if (aux->asn1_cb(ASN1_OP_STREAM_PRE, &val, it, &sarg) <= 0)
136 ndef_aux->ndef_bio = sarg.ndef_bio;
137 ndef_aux->boundary = sarg.boundary;
140 BIO_ctrl(asn_bio, BIO_C_SET_EX_ARG, 0, ndef_aux);
142 return sarg.ndef_bio;
147 OPENSSL_free(ndef_aux);
151 static int ndef_prefix(BIO *b, unsigned char **pbuf, int *plen, void *parg)
153 NDEF_SUPPORT *ndef_aux;
160 ndef_aux = *(NDEF_SUPPORT **)parg;
162 derlen = ASN1_item_ndef_i2d(ndef_aux->val, NULL, ndef_aux->it);
163 p = OPENSSL_malloc(derlen);
167 ndef_aux->derbuf = p;
169 derlen = ASN1_item_ndef_i2d(ndef_aux->val, &p, ndef_aux->it);
171 if (!*ndef_aux->boundary)
174 *plen = *ndef_aux->boundary - *pbuf;
179 static int ndef_prefix_free(BIO *b, unsigned char **pbuf, int *plen,
182 NDEF_SUPPORT *ndef_aux;
187 ndef_aux = *(NDEF_SUPPORT **)parg;
189 if (ndef_aux->derbuf)
190 OPENSSL_free(ndef_aux->derbuf);
192 ndef_aux->derbuf = NULL;
198 static int ndef_suffix_free(BIO *b, unsigned char **pbuf, int *plen,
201 NDEF_SUPPORT **pndef_aux = (NDEF_SUPPORT **)parg;
202 if (!ndef_prefix_free(b, pbuf, plen, parg))
204 OPENSSL_free(*pndef_aux);
209 static int ndef_suffix(BIO *b, unsigned char **pbuf, int *plen, void *parg)
211 NDEF_SUPPORT *ndef_aux;
215 ASN1_STREAM_ARG sarg;
220 ndef_aux = *(NDEF_SUPPORT **)parg;
222 aux = ndef_aux->it->funcs;
224 /* Finalize structures */
225 sarg.ndef_bio = ndef_aux->ndef_bio;
226 sarg.out = ndef_aux->out;
227 sarg.boundary = ndef_aux->boundary;
228 if (aux->asn1_cb(ASN1_OP_STREAM_POST,
229 &ndef_aux->val, ndef_aux->it, &sarg) <= 0)
232 derlen = ASN1_item_ndef_i2d(ndef_aux->val, NULL, ndef_aux->it);
233 p = OPENSSL_malloc(derlen);
237 ndef_aux->derbuf = p;
239 derlen = ASN1_item_ndef_i2d(ndef_aux->val, &p, ndef_aux->it);
241 if (!*ndef_aux->boundary)
243 *pbuf = *ndef_aux->boundary;
244 *plen = derlen - (*ndef_aux->boundary - ndef_aux->derbuf);