1 /* $OpenBSD: bio_ndef.c,v 1.8 2014/06/12 15:49:27 deraadt Exp $ */ 2 /* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL 3 * project. 4 */ 5 /* ==================================================================== 6 * Copyright (c) 2008 The OpenSSL Project. All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in 17 * the documentation and/or other materials provided with the 18 * distribution. 19 * 20 * 3. All advertising materials mentioning features or use of this 21 * software must display the following acknowledgment: 22 * "This product includes software developed by the OpenSSL Project 23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 24 * 25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 26 * endorse or promote products derived from this software without 27 * prior written permission. For written permission, please contact 28 * licensing@OpenSSL.org. 29 * 30 * 5. Products derived from this software may not be called "OpenSSL" 31 * nor may "OpenSSL" appear in their names without prior written 32 * permission of the OpenSSL Project. 33 * 34 * 6. Redistributions of any form whatsoever must retain the following 35 * acknowledgment: 36 * "This product includes software developed by the OpenSSL Project 37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 38 * 39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 50 * OF THE POSSIBILITY OF SUCH DAMAGE. 51 * ==================================================================== 52 * 53 */ 54 55 #include <openssl/asn1.h> 56 #include <openssl/asn1t.h> 57 #include <openssl/bio.h> 58 #include <openssl/err.h> 59 60 #include <stdio.h> 61 62 /* Experimental NDEF ASN1 BIO support routines */ 63 64 /* The usage is quite simple, initialize an ASN1 structure, 65 * get a BIO from it then any data written through the BIO 66 * will end up translated to approptiate format on the fly. 67 * The data is streamed out and does *not* need to be 68 * all held in memory at once. 69 * 70 * When the BIO is flushed the output is finalized and any 71 * signatures etc written out. 72 * 73 * The BIO is a 'proper' BIO and can handle non blocking I/O 74 * correctly. 75 * 76 * The usage is simple. The implementation is *not*... 77 */ 78 79 /* BIO support data stored in the ASN1 BIO ex_arg */ 80 81 typedef struct ndef_aux_st { 82 /* ASN1 structure this BIO refers to */ 83 ASN1_VALUE *val; 84 const ASN1_ITEM *it; 85 /* Top of the BIO chain */ 86 BIO *ndef_bio; 87 /* Output BIO */ 88 BIO *out; 89 /* Boundary where content is inserted */ 90 unsigned char **boundary; 91 /* DER buffer start */ 92 unsigned char *derbuf; 93 } NDEF_SUPPORT; 94 95 static int ndef_prefix(BIO *b, unsigned char **pbuf, int *plen, void *parg); 96 static int ndef_prefix_free(BIO *b, unsigned char **pbuf, int *plen, void *parg); 97 static int ndef_suffix(BIO *b, unsigned char **pbuf, int *plen, void *parg); 98 static int ndef_suffix_free(BIO *b, unsigned char **pbuf, int *plen, void *parg); 99 100 BIO * 101 BIO_new_NDEF(BIO *out, ASN1_VALUE *val, const ASN1_ITEM *it) 102 { 103 NDEF_SUPPORT *ndef_aux = NULL; 104 BIO *asn_bio = NULL; 105 const ASN1_AUX *aux = it->funcs; 106 ASN1_STREAM_ARG sarg; 107 108 if (!aux || !aux->asn1_cb) { 109 ASN1err(ASN1_F_BIO_NEW_NDEF, ASN1_R_STREAMING_NOT_SUPPORTED); 110 return NULL; 111 } 112 ndef_aux = malloc(sizeof(NDEF_SUPPORT)); 113 asn_bio = BIO_new(BIO_f_asn1()); 114 115 /* ASN1 bio needs to be next to output BIO */ 116 117 out = BIO_push(asn_bio, out); 118 119 if (!ndef_aux || !asn_bio || !out) 120 goto err; 121 122 BIO_asn1_set_prefix(asn_bio, ndef_prefix, ndef_prefix_free); 123 BIO_asn1_set_suffix(asn_bio, ndef_suffix, ndef_suffix_free); 124 125 /* Now let callback prepend any digest, cipher etc BIOs 126 * ASN1 structure needs. 127 */ 128 129 sarg.out = out; 130 sarg.ndef_bio = NULL; 131 sarg.boundary = NULL; 132 133 if (aux->asn1_cb(ASN1_OP_STREAM_PRE, &val, it, &sarg) <= 0) 134 goto err; 135 136 ndef_aux->val = val; 137 ndef_aux->it = it; 138 ndef_aux->ndef_bio = sarg.ndef_bio; 139 ndef_aux->boundary = sarg.boundary; 140 ndef_aux->out = out; 141 142 BIO_ctrl(asn_bio, BIO_C_SET_EX_ARG, 0, ndef_aux); 143 144 return sarg.ndef_bio; 145 146 err: 147 if (asn_bio) 148 BIO_free(asn_bio); 149 free(ndef_aux); 150 return NULL; 151 } 152 153 static int 154 ndef_prefix(BIO *b, unsigned char **pbuf, int *plen, void *parg) 155 { 156 NDEF_SUPPORT *ndef_aux; 157 unsigned char *p; 158 int derlen; 159 160 if (!parg) 161 return 0; 162 163 ndef_aux = *(NDEF_SUPPORT **)parg; 164 165 derlen = ASN1_item_ndef_i2d(ndef_aux->val, NULL, ndef_aux->it); 166 p = malloc(derlen); 167 ndef_aux->derbuf = p; 168 *pbuf = p; 169 derlen = ASN1_item_ndef_i2d(ndef_aux->val, &p, ndef_aux->it); 170 171 if (!*ndef_aux->boundary) 172 return 0; 173 174 *plen = *ndef_aux->boundary - *pbuf; 175 176 return 1; 177 } 178 179 static int 180 ndef_prefix_free(BIO *b, unsigned char **pbuf, int *plen, void *parg) 181 { 182 NDEF_SUPPORT *ndef_aux; 183 184 if (!parg) 185 return 0; 186 187 ndef_aux = *(NDEF_SUPPORT **)parg; 188 189 free(ndef_aux->derbuf); 190 191 ndef_aux->derbuf = NULL; 192 *pbuf = NULL; 193 *plen = 0; 194 return 1; 195 } 196 197 static int 198 ndef_suffix_free(BIO *b, unsigned char **pbuf, int *plen, void *parg) 199 { 200 NDEF_SUPPORT **pndef_aux = (NDEF_SUPPORT **)parg; 201 if (!ndef_prefix_free(b, pbuf, plen, parg)) 202 return 0; 203 free(*pndef_aux); 204 *pndef_aux = NULL; 205 return 1; 206 } 207 208 static int 209 ndef_suffix(BIO *b, unsigned char **pbuf, int *plen, void *parg) 210 { 211 NDEF_SUPPORT *ndef_aux; 212 unsigned char *p; 213 int derlen; 214 const ASN1_AUX *aux; 215 ASN1_STREAM_ARG sarg; 216 217 if (!parg) 218 return 0; 219 220 ndef_aux = *(NDEF_SUPPORT **)parg; 221 222 aux = ndef_aux->it->funcs; 223 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) 230 return 0; 231 232 derlen = ASN1_item_ndef_i2d(ndef_aux->val, NULL, ndef_aux->it); 233 p = malloc(derlen); 234 ndef_aux->derbuf = p; 235 *pbuf = p; 236 derlen = ASN1_item_ndef_i2d(ndef_aux->val, &p, ndef_aux->it); 237 238 if (!*ndef_aux->boundary) 239 return 0; 240 *pbuf = *ndef_aux->boundary; 241 *plen = derlen - (*ndef_aux->boundary - ndef_aux->derbuf); 242 243 return 1; 244 } 245