155714Skris/* asn_pack.c */ 2194206Ssimon/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL 355714Skris * project 1999. 455714Skris */ 555714Skris/* ==================================================================== 655714Skris * Copyright (c) 1999 The OpenSSL Project. All rights reserved. 755714Skris * 855714Skris * Redistribution and use in source and binary forms, with or without 955714Skris * modification, are permitted provided that the following conditions 1055714Skris * are met: 1155714Skris * 1255714Skris * 1. Redistributions of source code must retain the above copyright 1355714Skris * notice, this list of conditions and the following disclaimer. 1455714Skris * 1555714Skris * 2. Redistributions in binary form must reproduce the above copyright 1655714Skris * notice, this list of conditions and the following disclaimer in 1755714Skris * the documentation and/or other materials provided with the 1855714Skris * distribution. 1955714Skris * 2055714Skris * 3. All advertising materials mentioning features or use of this 2155714Skris * software must display the following acknowledgment: 2255714Skris * "This product includes software developed by the OpenSSL Project 2355714Skris * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 2455714Skris * 2555714Skris * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 2655714Skris * endorse or promote products derived from this software without 2755714Skris * prior written permission. For written permission, please contact 2855714Skris * licensing@OpenSSL.org. 2955714Skris * 3055714Skris * 5. Products derived from this software may not be called "OpenSSL" 3155714Skris * nor may "OpenSSL" appear in their names without prior written 3255714Skris * permission of the OpenSSL Project. 3355714Skris * 3455714Skris * 6. Redistributions of any form whatsoever must retain the following 3555714Skris * acknowledgment: 3655714Skris * "This product includes software developed by the OpenSSL Project 3755714Skris * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 3855714Skris * 3955714Skris * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 4055714Skris * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 4155714Skris * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 4255714Skris * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 4355714Skris * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 4455714Skris * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 4555714Skris * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 4655714Skris * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 4755714Skris * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 4855714Skris * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 4955714Skris * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 5055714Skris * OF THE POSSIBILITY OF SUCH DAMAGE. 5155714Skris * ==================================================================== 5255714Skris * 5355714Skris * This product includes cryptographic software written by Eric Young 5455714Skris * (eay@cryptsoft.com). This product includes software written by Tim 5555714Skris * Hudson (tjh@cryptsoft.com). 5655714Skris * 5755714Skris */ 5855714Skris 5955714Skris#include <stdio.h> 6055714Skris#include "cryptlib.h" 6155714Skris#include <openssl/asn1.h> 6255714Skris 63109998Smarkm#ifndef NO_ASN1_OLD 64109998Smarkm 6555714Skris/* ASN1 packing and unpacking functions */ 6655714Skris 6755714Skris/* Turn an ASN1 encoded SEQUENCE OF into a STACK of structures */ 6855714Skris 69238405SjkimSTACK_OF(OPENSSL_BLOCK) *ASN1_seq_unpack(const unsigned char *buf, int len, 70238405Sjkim d2i_of_void *d2i, void (*free_func)(OPENSSL_BLOCK)) 7155714Skris{ 72238405Sjkim STACK_OF(OPENSSL_BLOCK) *sk; 73160814Ssimon const unsigned char *pbuf; 7455714Skris pbuf = buf; 7555714Skris if (!(sk = d2i_ASN1_SET(NULL, &pbuf, len, d2i, free_func, 7655714Skris V_ASN1_SEQUENCE, V_ASN1_UNIVERSAL))) 7755714Skris ASN1err(ASN1_F_ASN1_SEQ_UNPACK,ASN1_R_DECODE_ERROR); 7855714Skris return sk; 7955714Skris} 8055714Skris 8155714Skris/* Turn a STACK structures into an ASN1 encoded SEQUENCE OF structure in a 8268651Skris * OPENSSL_malloc'ed buffer 8355714Skris */ 8455714Skris 85238405Sjkimunsigned char *ASN1_seq_pack(STACK_OF(OPENSSL_BLOCK) *safes, i2d_of_void *i2d, 86160814Ssimon unsigned char **buf, int *len) 8755714Skris{ 8855714Skris int safelen; 8955714Skris unsigned char *safe, *p; 9055714Skris if (!(safelen = i2d_ASN1_SET(safes, NULL, i2d, V_ASN1_SEQUENCE, 9155714Skris V_ASN1_UNIVERSAL, IS_SEQUENCE))) { 9255714Skris ASN1err(ASN1_F_ASN1_SEQ_PACK,ASN1_R_ENCODE_ERROR); 9355714Skris return NULL; 9455714Skris } 9568651Skris if (!(safe = OPENSSL_malloc (safelen))) { 9655714Skris ASN1err(ASN1_F_ASN1_SEQ_PACK,ERR_R_MALLOC_FAILURE); 9755714Skris return NULL; 9855714Skris } 9955714Skris p = safe; 10055714Skris i2d_ASN1_SET(safes, &p, i2d, V_ASN1_SEQUENCE, V_ASN1_UNIVERSAL, 10155714Skris IS_SEQUENCE); 10255714Skris if (len) *len = safelen; 10355714Skris if (buf) *buf = safe; 10455714Skris return safe; 10555714Skris} 10655714Skris 10755714Skris/* Extract an ASN1 object from an ASN1_STRING */ 10855714Skris 109160814Ssimonvoid *ASN1_unpack_string(ASN1_STRING *oct, d2i_of_void *d2i) 11055714Skris{ 111160814Ssimon const unsigned char *p; 11255714Skris char *ret; 11355714Skris 11455714Skris p = oct->data; 11555714Skris if(!(ret = d2i(NULL, &p, oct->length))) 11655714Skris ASN1err(ASN1_F_ASN1_UNPACK_STRING,ASN1_R_DECODE_ERROR); 11755714Skris return ret; 11855714Skris} 11955714Skris 12055714Skris/* Pack an ASN1 object into an ASN1_STRING */ 12155714Skris 122160814SsimonASN1_STRING *ASN1_pack_string(void *obj, i2d_of_void *i2d, ASN1_STRING **oct) 12355714Skris{ 12455714Skris unsigned char *p; 12555714Skris ASN1_STRING *octmp; 12655714Skris 12755714Skris if (!oct || !*oct) { 12855714Skris if (!(octmp = ASN1_STRING_new ())) { 12955714Skris ASN1err(ASN1_F_ASN1_PACK_STRING,ERR_R_MALLOC_FAILURE); 13055714Skris return NULL; 13155714Skris } 13255714Skris if (oct) *oct = octmp; 13355714Skris } else octmp = *oct; 13455714Skris 13555714Skris if (!(octmp->length = i2d(obj, NULL))) { 13655714Skris ASN1err(ASN1_F_ASN1_PACK_STRING,ASN1_R_ENCODE_ERROR); 137279264Sdelphij goto err; 13855714Skris } 13968651Skris if (!(p = OPENSSL_malloc (octmp->length))) { 14055714Skris ASN1err(ASN1_F_ASN1_PACK_STRING,ERR_R_MALLOC_FAILURE); 141279264Sdelphij goto err; 14255714Skris } 14355714Skris octmp->data = p; 14455714Skris i2d (obj, &p); 14555714Skris return octmp; 146279264Sdelphij err: 147279264Sdelphij if (!oct || !*oct) 148279264Sdelphij { 149279264Sdelphij ASN1_STRING_free(octmp); 150279264Sdelphij if (oct) 151279264Sdelphij *oct = NULL; 152279264Sdelphij } 153279264Sdelphij return NULL; 15455714Skris} 15555714Skris 156109998Smarkm#endif 157109998Smarkm 158109998Smarkm/* ASN1_ITEM versions of the above */ 159109998Smarkm 160109998SmarkmASN1_STRING *ASN1_item_pack(void *obj, const ASN1_ITEM *it, ASN1_STRING **oct) 161109998Smarkm{ 162109998Smarkm ASN1_STRING *octmp; 163109998Smarkm 164109998Smarkm if (!oct || !*oct) { 165109998Smarkm if (!(octmp = ASN1_STRING_new ())) { 166160814Ssimon ASN1err(ASN1_F_ASN1_ITEM_PACK,ERR_R_MALLOC_FAILURE); 167109998Smarkm return NULL; 168109998Smarkm } 169109998Smarkm if (oct) *oct = octmp; 170109998Smarkm } else octmp = *oct; 171109998Smarkm 172109998Smarkm if(octmp->data) { 173109998Smarkm OPENSSL_free(octmp->data); 174109998Smarkm octmp->data = NULL; 175109998Smarkm } 176109998Smarkm 177109998Smarkm if (!(octmp->length = ASN1_item_i2d(obj, &octmp->data, it))) { 178160814Ssimon ASN1err(ASN1_F_ASN1_ITEM_PACK,ASN1_R_ENCODE_ERROR); 179109998Smarkm return NULL; 180109998Smarkm } 181109998Smarkm if (!octmp->data) { 182160814Ssimon ASN1err(ASN1_F_ASN1_ITEM_PACK,ERR_R_MALLOC_FAILURE); 183109998Smarkm return NULL; 184109998Smarkm } 185109998Smarkm return octmp; 186109998Smarkm} 187109998Smarkm 188109998Smarkm/* Extract an ASN1 object from an ASN1_STRING */ 189109998Smarkm 190109998Smarkmvoid *ASN1_item_unpack(ASN1_STRING *oct, const ASN1_ITEM *it) 191109998Smarkm{ 192160814Ssimon const unsigned char *p; 193109998Smarkm void *ret; 194109998Smarkm 195109998Smarkm p = oct->data; 196109998Smarkm if(!(ret = ASN1_item_d2i(NULL, &p, oct->length, it))) 197160814Ssimon ASN1err(ASN1_F_ASN1_ITEM_UNPACK,ASN1_R_DECODE_ERROR); 198109998Smarkm return ret; 199109998Smarkm} 200