1 /* asn_pack.c */ 2 /* 3 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project 4 * 1999. 5 */ 6 /* ==================================================================== 7 * Copyright (c) 1999 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 * 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). 57 * 58 */ 59 60 #include <stdio.h> 61 #include "cryptlib.h" 62 #include <openssl/asn1.h> 63 64 #ifndef NO_ASN1_OLD 65 66 /* ASN1 packing and unpacking functions */ 67 68 /* Turn an ASN1 encoded SEQUENCE OF into a STACK of structures */ 69 70 STACK_OF(OPENSSL_BLOCK) *ASN1_seq_unpack(const unsigned char *buf, int len, 71 d2i_of_void *d2i, 72 void (*free_func) (OPENSSL_BLOCK)) 73 { 74 STACK_OF(OPENSSL_BLOCK) *sk; 75 const unsigned char *pbuf; 76 pbuf = buf; 77 if (!(sk = d2i_ASN1_SET(NULL, &pbuf, len, d2i, free_func, 78 V_ASN1_SEQUENCE, V_ASN1_UNIVERSAL))) 79 ASN1err(ASN1_F_ASN1_SEQ_UNPACK, ASN1_R_DECODE_ERROR); 80 return sk; 81 } 82 83 /* 84 * Turn a STACK structures into an ASN1 encoded SEQUENCE OF structure in a 85 * OPENSSL_malloc'ed buffer 86 */ 87 88 unsigned char *ASN1_seq_pack(STACK_OF(OPENSSL_BLOCK) *safes, i2d_of_void *i2d, 89 unsigned char **buf, int *len) 90 { 91 int safelen; 92 unsigned char *safe, *p; 93 if (!(safelen = i2d_ASN1_SET(safes, NULL, i2d, V_ASN1_SEQUENCE, 94 V_ASN1_UNIVERSAL, IS_SEQUENCE))) { 95 ASN1err(ASN1_F_ASN1_SEQ_PACK, ASN1_R_ENCODE_ERROR); 96 return NULL; 97 } 98 if (!(safe = OPENSSL_malloc(safelen))) { 99 ASN1err(ASN1_F_ASN1_SEQ_PACK, ERR_R_MALLOC_FAILURE); 100 return NULL; 101 } 102 p = safe; 103 i2d_ASN1_SET(safes, &p, i2d, V_ASN1_SEQUENCE, V_ASN1_UNIVERSAL, 104 IS_SEQUENCE); 105 if (len) 106 *len = safelen; 107 if (buf) 108 *buf = safe; 109 return safe; 110 } 111 112 /* Extract an ASN1 object from an ASN1_STRING */ 113 114 void *ASN1_unpack_string(ASN1_STRING *oct, d2i_of_void *d2i) 115 { 116 const unsigned char *p; 117 char *ret; 118 119 p = oct->data; 120 if (!(ret = d2i(NULL, &p, oct->length))) 121 ASN1err(ASN1_F_ASN1_UNPACK_STRING, ASN1_R_DECODE_ERROR); 122 return ret; 123 } 124 125 /* Pack an ASN1 object into an ASN1_STRING */ 126 127 ASN1_STRING *ASN1_pack_string(void *obj, i2d_of_void *i2d, ASN1_STRING **oct) 128 { 129 unsigned char *p; 130 ASN1_STRING *octmp; 131 132 if (!oct || !*oct) { 133 if (!(octmp = ASN1_STRING_new())) { 134 ASN1err(ASN1_F_ASN1_PACK_STRING, ERR_R_MALLOC_FAILURE); 135 return NULL; 136 } 137 if (oct) 138 *oct = octmp; 139 } else 140 octmp = *oct; 141 142 if (!(octmp->length = i2d(obj, NULL))) { 143 ASN1err(ASN1_F_ASN1_PACK_STRING, ASN1_R_ENCODE_ERROR); 144 goto err; 145 } 146 if (!(p = OPENSSL_malloc(octmp->length))) { 147 ASN1err(ASN1_F_ASN1_PACK_STRING, ERR_R_MALLOC_FAILURE); 148 goto err; 149 } 150 octmp->data = p; 151 i2d(obj, &p); 152 return octmp; 153 err: 154 if (!oct || !*oct) { 155 ASN1_STRING_free(octmp); 156 if (oct) 157 *oct = NULL; 158 } 159 return NULL; 160 } 161 162 #endif 163 164 /* ASN1_ITEM versions of the above */ 165 166 ASN1_STRING *ASN1_item_pack(void *obj, const ASN1_ITEM *it, ASN1_STRING **oct) 167 { 168 ASN1_STRING *octmp; 169 170 if (!oct || !*oct) { 171 if (!(octmp = ASN1_STRING_new())) { 172 ASN1err(ASN1_F_ASN1_ITEM_PACK, ERR_R_MALLOC_FAILURE); 173 return NULL; 174 } 175 if (oct) 176 *oct = octmp; 177 } else 178 octmp = *oct; 179 180 if (octmp->data) { 181 OPENSSL_free(octmp->data); 182 octmp->data = NULL; 183 } 184 185 if (!(octmp->length = ASN1_item_i2d(obj, &octmp->data, it))) { 186 ASN1err(ASN1_F_ASN1_ITEM_PACK, ASN1_R_ENCODE_ERROR); 187 return NULL; 188 } 189 if (!octmp->data) { 190 ASN1err(ASN1_F_ASN1_ITEM_PACK, ERR_R_MALLOC_FAILURE); 191 return NULL; 192 } 193 return octmp; 194 } 195 196 /* Extract an ASN1 object from an ASN1_STRING */ 197 198 void *ASN1_item_unpack(ASN1_STRING *oct, const ASN1_ITEM *it) 199 { 200 const unsigned char *p; 201 void *ret; 202 203 p = oct->data; 204 if (!(ret = ASN1_item_d2i(NULL, &p, oct->length, it))) 205 ASN1err(ASN1_F_ASN1_ITEM_UNPACK, ASN1_R_DECODE_ERROR); 206 return ret; 207 } 208