xref: /onnv-gate/usr/src/common/openssl/crypto/asn1/asn_pack.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /* asn_pack.c */
2*0Sstevel@tonic-gate /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
3*0Sstevel@tonic-gate  * project 1999.
4*0Sstevel@tonic-gate  */
5*0Sstevel@tonic-gate /* ====================================================================
6*0Sstevel@tonic-gate  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
7*0Sstevel@tonic-gate  *
8*0Sstevel@tonic-gate  * Redistribution and use in source and binary forms, with or without
9*0Sstevel@tonic-gate  * modification, are permitted provided that the following conditions
10*0Sstevel@tonic-gate  * are met:
11*0Sstevel@tonic-gate  *
12*0Sstevel@tonic-gate  * 1. Redistributions of source code must retain the above copyright
13*0Sstevel@tonic-gate  *    notice, this list of conditions and the following disclaimer.
14*0Sstevel@tonic-gate  *
15*0Sstevel@tonic-gate  * 2. Redistributions in binary form must reproduce the above copyright
16*0Sstevel@tonic-gate  *    notice, this list of conditions and the following disclaimer in
17*0Sstevel@tonic-gate  *    the documentation and/or other materials provided with the
18*0Sstevel@tonic-gate  *    distribution.
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * 3. All advertising materials mentioning features or use of this
21*0Sstevel@tonic-gate  *    software must display the following acknowledgment:
22*0Sstevel@tonic-gate  *    "This product includes software developed by the OpenSSL Project
23*0Sstevel@tonic-gate  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24*0Sstevel@tonic-gate  *
25*0Sstevel@tonic-gate  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26*0Sstevel@tonic-gate  *    endorse or promote products derived from this software without
27*0Sstevel@tonic-gate  *    prior written permission. For written permission, please contact
28*0Sstevel@tonic-gate  *    licensing@OpenSSL.org.
29*0Sstevel@tonic-gate  *
30*0Sstevel@tonic-gate  * 5. Products derived from this software may not be called "OpenSSL"
31*0Sstevel@tonic-gate  *    nor may "OpenSSL" appear in their names without prior written
32*0Sstevel@tonic-gate  *    permission of the OpenSSL Project.
33*0Sstevel@tonic-gate  *
34*0Sstevel@tonic-gate  * 6. Redistributions of any form whatsoever must retain the following
35*0Sstevel@tonic-gate  *    acknowledgment:
36*0Sstevel@tonic-gate  *    "This product includes software developed by the OpenSSL Project
37*0Sstevel@tonic-gate  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38*0Sstevel@tonic-gate  *
39*0Sstevel@tonic-gate  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40*0Sstevel@tonic-gate  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41*0Sstevel@tonic-gate  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42*0Sstevel@tonic-gate  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43*0Sstevel@tonic-gate  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44*0Sstevel@tonic-gate  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45*0Sstevel@tonic-gate  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46*0Sstevel@tonic-gate  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47*0Sstevel@tonic-gate  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48*0Sstevel@tonic-gate  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49*0Sstevel@tonic-gate  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50*0Sstevel@tonic-gate  * OF THE POSSIBILITY OF SUCH DAMAGE.
51*0Sstevel@tonic-gate  * ====================================================================
52*0Sstevel@tonic-gate  *
53*0Sstevel@tonic-gate  * This product includes cryptographic software written by Eric Young
54*0Sstevel@tonic-gate  * (eay@cryptsoft.com).  This product includes software written by Tim
55*0Sstevel@tonic-gate  * Hudson (tjh@cryptsoft.com).
56*0Sstevel@tonic-gate  *
57*0Sstevel@tonic-gate  */
58*0Sstevel@tonic-gate 
59*0Sstevel@tonic-gate #include <stdio.h>
60*0Sstevel@tonic-gate #include "cryptlib.h"
61*0Sstevel@tonic-gate #include <openssl/asn1.h>
62*0Sstevel@tonic-gate 
63*0Sstevel@tonic-gate #ifndef NO_ASN1_OLD
64*0Sstevel@tonic-gate 
65*0Sstevel@tonic-gate /* ASN1 packing and unpacking functions */
66*0Sstevel@tonic-gate 
67*0Sstevel@tonic-gate /* Turn an ASN1 encoded SEQUENCE OF into a STACK of structures */
68*0Sstevel@tonic-gate 
69*0Sstevel@tonic-gate STACK *ASN1_seq_unpack(unsigned char *buf, int len, char *(*d2i)(),
70*0Sstevel@tonic-gate 	     void (*free_func)(void *))
71*0Sstevel@tonic-gate {
72*0Sstevel@tonic-gate     STACK *sk;
73*0Sstevel@tonic-gate     unsigned char *pbuf;
74*0Sstevel@tonic-gate     pbuf =  buf;
75*0Sstevel@tonic-gate     if (!(sk = d2i_ASN1_SET(NULL, &pbuf, len, d2i, free_func,
76*0Sstevel@tonic-gate 					V_ASN1_SEQUENCE, V_ASN1_UNIVERSAL)))
77*0Sstevel@tonic-gate 		 ASN1err(ASN1_F_ASN1_SEQ_UNPACK,ASN1_R_DECODE_ERROR);
78*0Sstevel@tonic-gate     return sk;
79*0Sstevel@tonic-gate }
80*0Sstevel@tonic-gate 
81*0Sstevel@tonic-gate /* Turn a STACK structures into an ASN1 encoded SEQUENCE OF structure in a
82*0Sstevel@tonic-gate  * OPENSSL_malloc'ed buffer
83*0Sstevel@tonic-gate  */
84*0Sstevel@tonic-gate 
85*0Sstevel@tonic-gate unsigned char *ASN1_seq_pack(STACK *safes, int (*i2d)(), unsigned char **buf,
86*0Sstevel@tonic-gate 	     int *len)
87*0Sstevel@tonic-gate {
88*0Sstevel@tonic-gate 	int safelen;
89*0Sstevel@tonic-gate 	unsigned char *safe, *p;
90*0Sstevel@tonic-gate 	if (!(safelen = i2d_ASN1_SET(safes, NULL, i2d, V_ASN1_SEQUENCE,
91*0Sstevel@tonic-gate 					      V_ASN1_UNIVERSAL, IS_SEQUENCE))) {
92*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_SEQ_PACK,ASN1_R_ENCODE_ERROR);
93*0Sstevel@tonic-gate 		return NULL;
94*0Sstevel@tonic-gate 	}
95*0Sstevel@tonic-gate 	if (!(safe = OPENSSL_malloc (safelen))) {
96*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_SEQ_PACK,ERR_R_MALLOC_FAILURE);
97*0Sstevel@tonic-gate 		return NULL;
98*0Sstevel@tonic-gate 	}
99*0Sstevel@tonic-gate 	p = safe;
100*0Sstevel@tonic-gate 	i2d_ASN1_SET(safes, &p, i2d, V_ASN1_SEQUENCE, V_ASN1_UNIVERSAL,
101*0Sstevel@tonic-gate 								 IS_SEQUENCE);
102*0Sstevel@tonic-gate 	if (len) *len = safelen;
103*0Sstevel@tonic-gate 	if (buf) *buf = safe;
104*0Sstevel@tonic-gate 	return safe;
105*0Sstevel@tonic-gate }
106*0Sstevel@tonic-gate 
107*0Sstevel@tonic-gate /* Extract an ASN1 object from an ASN1_STRING */
108*0Sstevel@tonic-gate 
109*0Sstevel@tonic-gate void *ASN1_unpack_string (ASN1_STRING *oct, char *(*d2i)())
110*0Sstevel@tonic-gate {
111*0Sstevel@tonic-gate 	unsigned char *p;
112*0Sstevel@tonic-gate 	char *ret;
113*0Sstevel@tonic-gate 
114*0Sstevel@tonic-gate 	p = oct->data;
115*0Sstevel@tonic-gate 	if(!(ret = d2i(NULL, &p, oct->length)))
116*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_UNPACK_STRING,ASN1_R_DECODE_ERROR);
117*0Sstevel@tonic-gate 	return ret;
118*0Sstevel@tonic-gate }
119*0Sstevel@tonic-gate 
120*0Sstevel@tonic-gate /* Pack an ASN1 object into an ASN1_STRING */
121*0Sstevel@tonic-gate 
122*0Sstevel@tonic-gate ASN1_STRING *ASN1_pack_string(void *obj, int (*i2d)(), ASN1_STRING **oct)
123*0Sstevel@tonic-gate {
124*0Sstevel@tonic-gate 	unsigned char *p;
125*0Sstevel@tonic-gate 	ASN1_STRING *octmp;
126*0Sstevel@tonic-gate 
127*0Sstevel@tonic-gate 	if (!oct || !*oct) {
128*0Sstevel@tonic-gate 		if (!(octmp = ASN1_STRING_new ())) {
129*0Sstevel@tonic-gate 			ASN1err(ASN1_F_ASN1_PACK_STRING,ERR_R_MALLOC_FAILURE);
130*0Sstevel@tonic-gate 			return NULL;
131*0Sstevel@tonic-gate 		}
132*0Sstevel@tonic-gate 		if (oct) *oct = octmp;
133*0Sstevel@tonic-gate 	} else octmp = *oct;
134*0Sstevel@tonic-gate 
135*0Sstevel@tonic-gate 	if (!(octmp->length = i2d(obj, NULL))) {
136*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_PACK_STRING,ASN1_R_ENCODE_ERROR);
137*0Sstevel@tonic-gate 		return NULL;
138*0Sstevel@tonic-gate 	}
139*0Sstevel@tonic-gate 	if (!(p = OPENSSL_malloc (octmp->length))) {
140*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_PACK_STRING,ERR_R_MALLOC_FAILURE);
141*0Sstevel@tonic-gate 		return NULL;
142*0Sstevel@tonic-gate 	}
143*0Sstevel@tonic-gate 	octmp->data = p;
144*0Sstevel@tonic-gate 	i2d (obj, &p);
145*0Sstevel@tonic-gate 	return octmp;
146*0Sstevel@tonic-gate }
147*0Sstevel@tonic-gate 
148*0Sstevel@tonic-gate #endif
149*0Sstevel@tonic-gate 
150*0Sstevel@tonic-gate /* ASN1_ITEM versions of the above */
151*0Sstevel@tonic-gate 
152*0Sstevel@tonic-gate ASN1_STRING *ASN1_item_pack(void *obj, const ASN1_ITEM *it, ASN1_STRING **oct)
153*0Sstevel@tonic-gate {
154*0Sstevel@tonic-gate 	ASN1_STRING *octmp;
155*0Sstevel@tonic-gate 
156*0Sstevel@tonic-gate 	if (!oct || !*oct) {
157*0Sstevel@tonic-gate 		if (!(octmp = ASN1_STRING_new ())) {
158*0Sstevel@tonic-gate 			ASN1err(ASN1_F_ASN1_PACK_STRING,ERR_R_MALLOC_FAILURE);
159*0Sstevel@tonic-gate 			return NULL;
160*0Sstevel@tonic-gate 		}
161*0Sstevel@tonic-gate 		if (oct) *oct = octmp;
162*0Sstevel@tonic-gate 	} else octmp = *oct;
163*0Sstevel@tonic-gate 
164*0Sstevel@tonic-gate 	if(octmp->data) {
165*0Sstevel@tonic-gate 		OPENSSL_free(octmp->data);
166*0Sstevel@tonic-gate 		octmp->data = NULL;
167*0Sstevel@tonic-gate 	}
168*0Sstevel@tonic-gate 
169*0Sstevel@tonic-gate 	if (!(octmp->length = ASN1_item_i2d(obj, &octmp->data, it))) {
170*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_PACK_STRING,ASN1_R_ENCODE_ERROR);
171*0Sstevel@tonic-gate 		return NULL;
172*0Sstevel@tonic-gate 	}
173*0Sstevel@tonic-gate 	if (!octmp->data) {
174*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_PACK_STRING,ERR_R_MALLOC_FAILURE);
175*0Sstevel@tonic-gate 		return NULL;
176*0Sstevel@tonic-gate 	}
177*0Sstevel@tonic-gate 	return octmp;
178*0Sstevel@tonic-gate }
179*0Sstevel@tonic-gate 
180*0Sstevel@tonic-gate /* Extract an ASN1 object from an ASN1_STRING */
181*0Sstevel@tonic-gate 
182*0Sstevel@tonic-gate void *ASN1_item_unpack(ASN1_STRING *oct, const ASN1_ITEM *it)
183*0Sstevel@tonic-gate {
184*0Sstevel@tonic-gate 	unsigned char *p;
185*0Sstevel@tonic-gate 	void *ret;
186*0Sstevel@tonic-gate 
187*0Sstevel@tonic-gate 	p = oct->data;
188*0Sstevel@tonic-gate 	if(!(ret = ASN1_item_d2i(NULL, &p, oct->length, it)))
189*0Sstevel@tonic-gate 		ASN1err(ASN1_F_ASN1_UNPACK_STRING,ASN1_R_DECODE_ERROR);
190*0Sstevel@tonic-gate 	return ret;
191*0Sstevel@tonic-gate }
192