1 /* crypto/asn1/a_d2i_fp.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3 * All rights reserved.
4 *
5 * This package is an SSL implementation written
6 * by Eric Young (eay@cryptsoft.com).
7 * The implementation was written so as to conform with Netscapes SSL.
8 *
9 * This library is free for commercial and non-commercial use as long as
10 * the following conditions are aheared to. The following conditions
11 * apply to all code found in this distribution, be it the RC4, RSA,
12 * lhash, DES, etc., code; not just the SSL code. The SSL documentation
13 * included with this distribution is covered by the same copyright terms
14 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15 *
16 * Copyright remains Eric Young's, and as such any Copyright notices in
17 * the code are not to be removed.
18 * If this package is used in a product, Eric Young should be given attribution
19 * as the author of the parts of the library used.
20 * This can be in the form of a textual message at program startup or
21 * in documentation (online or textual) provided with the package.
22 *
23 * Redistribution and use in source and binary forms, with or without
24 * modification, are permitted provided that the following conditions
25 * are met:
26 * 1. Redistributions of source code must retain the copyright
27 * notice, this list of conditions and the following disclaimer.
28 * 2. Redistributions in binary form must reproduce the above copyright
29 * notice, this list of conditions and the following disclaimer in the
30 * documentation and/or other materials provided with the distribution.
31 * 3. All advertising materials mentioning features or use of this software
32 * must display the following acknowledgement:
33 * "This product includes cryptographic software written by
34 * Eric Young (eay@cryptsoft.com)"
35 * The word 'cryptographic' can be left out if the rouines from the library
36 * being used are not cryptographic related :-).
37 * 4. If you include any Windows specific code (or a derivative thereof) from
38 * the apps directory (application code) you must include an acknowledgement:
39 * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40 *
41 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51 * SUCH DAMAGE.
52 *
53 * The licence and distribution terms for any publically available version or
54 * derivative of this code cannot be changed. i.e. this code cannot simply be
55 * copied and put under another distribution licence
56 * [including the GNU Public Licence.]
57 */
58
59 #include <stdio.h>
60 #include "cryptlib.h"
61 #include <openssl/buffer.h>
62 #include <openssl/asn1_mac.h>
63
64 static int asn1_d2i_read_bio(BIO *in, BUF_MEM **pb);
65
66 #ifndef NO_OLD_ASN1
67 #ifndef OPENSSL_NO_FP_API
68
ASN1_d2i_fp(void * (* xnew)(void),d2i_of_void * d2i,FILE * in,void ** x)69 void *ASN1_d2i_fp(void *(*xnew)(void), d2i_of_void *d2i, FILE *in, void **x)
70 {
71 BIO *b;
72 void *ret;
73
74 if ((b=BIO_new(BIO_s_file())) == NULL)
75 {
76 ASN1err(ASN1_F_ASN1_D2I_FP,ERR_R_BUF_LIB);
77 return(NULL);
78 }
79 BIO_set_fp(b,in,BIO_NOCLOSE);
80 ret=ASN1_d2i_bio(xnew,d2i,b,x);
81 BIO_free(b);
82 return(ret);
83 }
84 #endif
85
ASN1_d2i_bio(void * (* xnew)(void),d2i_of_void * d2i,BIO * in,void ** x)86 void *ASN1_d2i_bio(void *(*xnew)(void), d2i_of_void *d2i, BIO *in, void **x)
87 {
88 BUF_MEM *b = NULL;
89 const unsigned char *p;
90 void *ret=NULL;
91 int len;
92
93 len = asn1_d2i_read_bio(in, &b);
94 if(len < 0) goto err;
95
96 p=(unsigned char *)b->data;
97 ret=d2i(x,&p,len);
98 err:
99 if (b != NULL) BUF_MEM_free(b);
100 return(ret);
101 }
102
103 #endif
104
ASN1_item_d2i_bio(const ASN1_ITEM * it,BIO * in,void * x)105 void *ASN1_item_d2i_bio(const ASN1_ITEM *it, BIO *in, void *x)
106 {
107 BUF_MEM *b = NULL;
108 const unsigned char *p;
109 void *ret=NULL;
110 int len;
111
112 len = asn1_d2i_read_bio(in, &b);
113 if(len < 0) goto err;
114
115 p=(const unsigned char *)b->data;
116 ret=ASN1_item_d2i(x,&p,len, it);
117 err:
118 if (b != NULL) BUF_MEM_free(b);
119 return(ret);
120 }
121
122 #ifndef OPENSSL_NO_FP_API
ASN1_item_d2i_fp(const ASN1_ITEM * it,FILE * in,void * x)123 void *ASN1_item_d2i_fp(const ASN1_ITEM *it, FILE *in, void *x)
124 {
125 BIO *b;
126 char *ret;
127
128 if ((b=BIO_new(BIO_s_file())) == NULL)
129 {
130 ASN1err(ASN1_F_ASN1_ITEM_D2I_FP,ERR_R_BUF_LIB);
131 return(NULL);
132 }
133 BIO_set_fp(b,in,BIO_NOCLOSE);
134 ret=ASN1_item_d2i_bio(it,b,x);
135 BIO_free(b);
136 return(ret);
137 }
138 #endif
139
140 #define HEADER_SIZE 8
asn1_d2i_read_bio(BIO * in,BUF_MEM ** pb)141 static int asn1_d2i_read_bio(BIO *in, BUF_MEM **pb)
142 {
143 BUF_MEM *b;
144 unsigned char *p;
145 int i;
146 int ret=-1;
147 ASN1_const_CTX c;
148 int want=HEADER_SIZE;
149 int eos=0;
150 #if defined(__GNUC__) && defined(__ia64)
151 /* pathetic compiler bug in all known versions as of Nov. 2002 */
152 long off=0;
153 #else
154 int off=0;
155 #endif
156 int len=0;
157
158 b=BUF_MEM_new();
159 if (b == NULL)
160 {
161 ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ERR_R_MALLOC_FAILURE);
162 return -1;
163 }
164
165 ERR_clear_error();
166 for (;;)
167 {
168 if (want >= (len-off))
169 {
170 want-=(len-off);
171
172 if (!BUF_MEM_grow_clean(b,len+want))
173 {
174 ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ERR_R_MALLOC_FAILURE);
175 goto err;
176 }
177 i=BIO_read(in,&(b->data[len]),want);
178 if ((i < 0) && ((len-off) == 0))
179 {
180 ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ASN1_R_NOT_ENOUGH_DATA);
181 goto err;
182 }
183 if (i > 0)
184 len+=i;
185 }
186 /* else data already loaded */
187
188 p=(unsigned char *)&(b->data[off]);
189 c.p=p;
190 c.inf=ASN1_get_object(&(c.p),&(c.slen),&(c.tag),&(c.xclass),
191 len-off);
192 if (c.inf & 0x80)
193 {
194 unsigned long e;
195
196 e=ERR_GET_REASON(ERR_peek_error());
197 if (e != ASN1_R_TOO_LONG)
198 goto err;
199 else
200 ERR_clear_error(); /* clear error */
201 }
202 i=c.p-p;/* header length */
203 off+=i; /* end of data */
204
205 if (c.inf & 1)
206 {
207 /* no data body so go round again */
208 eos++;
209 want=HEADER_SIZE;
210 }
211 else if (eos && (c.slen == 0) && (c.tag == V_ASN1_EOC))
212 {
213 /* eos value, so go back and read another header */
214 eos--;
215 if (eos <= 0)
216 break;
217 else
218 want=HEADER_SIZE;
219 }
220 else
221 {
222 /* suck in c.slen bytes of data */
223 want=(int)c.slen;
224 if (want > (len-off))
225 {
226 want-=(len-off);
227 if (!BUF_MEM_grow_clean(b,len+want))
228 {
229 ASN1err(ASN1_F_ASN1_D2I_READ_BIO,ERR_R_MALLOC_FAILURE);
230 goto err;
231 }
232 while (want > 0)
233 {
234 i=BIO_read(in,&(b->data[len]),want);
235 if (i <= 0)
236 {
237 ASN1err(ASN1_F_ASN1_D2I_READ_BIO,
238 ASN1_R_NOT_ENOUGH_DATA);
239 goto err;
240 }
241 len+=i;
242 want -= i;
243 }
244 }
245 off+=(int)c.slen;
246 if (eos <= 0)
247 {
248 break;
249 }
250 else
251 want=HEADER_SIZE;
252 }
253 }
254
255 *pb = b;
256 return off;
257 err:
258 if (b != NULL) BUF_MEM_free(b);
259 return(ret);
260 }
261