Line data Source code
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 <limits.h>
61 : #include "cryptlib.h"
62 : #include <openssl/buffer.h>
63 : #include <openssl/asn1_mac.h>
64 :
65 : static int asn1_d2i_read_bio(BIO *in, BUF_MEM **pb);
66 :
67 : #ifndef NO_OLD_ASN1
68 : # ifndef OPENSSL_NO_FP_API
69 :
70 0 : void *ASN1_d2i_fp(void *(*xnew) (void), d2i_of_void *d2i, FILE *in, void **x)
71 : {
72 : BIO *b;
73 : void *ret;
74 :
75 0 : if ((b = BIO_new(BIO_s_file())) == NULL) {
76 0 : ASN1err(ASN1_F_ASN1_D2I_FP, ERR_R_BUF_LIB);
77 0 : return (NULL);
78 : }
79 0 : BIO_set_fp(b, in, BIO_NOCLOSE);
80 0 : ret = ASN1_d2i_bio(xnew, d2i, b, x);
81 0 : BIO_free(b);
82 0 : return (ret);
83 : }
84 : # endif
85 :
86 0 : void *ASN1_d2i_bio(void *(*xnew) (void), d2i_of_void *d2i, BIO *in, void **x)
87 : {
88 0 : BUF_MEM *b = NULL;
89 : const unsigned char *p;
90 : void *ret = NULL;
91 : int len;
92 :
93 0 : len = asn1_d2i_read_bio(in, &b);
94 0 : if (len < 0)
95 : goto err;
96 :
97 0 : p = (unsigned char *)b->data;
98 0 : ret = d2i(x, &p, len);
99 : err:
100 0 : if (b != NULL)
101 0 : BUF_MEM_free(b);
102 0 : return (ret);
103 : }
104 :
105 : #endif
106 :
107 0 : void *ASN1_item_d2i_bio(const ASN1_ITEM *it, BIO *in, void *x)
108 : {
109 0 : BUF_MEM *b = NULL;
110 : const unsigned char *p;
111 : void *ret = NULL;
112 : int len;
113 :
114 0 : len = asn1_d2i_read_bio(in, &b);
115 0 : if (len < 0)
116 : goto err;
117 :
118 0 : p = (const unsigned char *)b->data;
119 0 : ret = ASN1_item_d2i(x, &p, len, it);
120 : err:
121 0 : if (b != NULL)
122 0 : BUF_MEM_free(b);
123 0 : return (ret);
124 : }
125 :
126 : #ifndef OPENSSL_NO_FP_API
127 0 : void *ASN1_item_d2i_fp(const ASN1_ITEM *it, FILE *in, void *x)
128 : {
129 : BIO *b;
130 : char *ret;
131 :
132 0 : if ((b = BIO_new(BIO_s_file())) == NULL) {
133 0 : ASN1err(ASN1_F_ASN1_ITEM_D2I_FP, ERR_R_BUF_LIB);
134 0 : return (NULL);
135 : }
136 0 : BIO_set_fp(b, in, BIO_NOCLOSE);
137 0 : ret = ASN1_item_d2i_bio(it, b, x);
138 0 : BIO_free(b);
139 0 : return (ret);
140 : }
141 : #endif
142 :
143 : #define HEADER_SIZE 8
144 0 : static int asn1_d2i_read_bio(BIO *in, BUF_MEM **pb)
145 : {
146 : BUF_MEM *b;
147 : unsigned char *p;
148 : int i;
149 : ASN1_const_CTX c;
150 : size_t want = HEADER_SIZE;
151 : int eos = 0;
152 : size_t off = 0;
153 : size_t len = 0;
154 :
155 0 : b = BUF_MEM_new();
156 0 : if (b == NULL) {
157 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ERR_R_MALLOC_FAILURE);
158 0 : return -1;
159 : }
160 :
161 0 : ERR_clear_error();
162 : for (;;) {
163 0 : if (want >= (len - off)) {
164 0 : want -= (len - off);
165 :
166 0 : if (len + want < len || !BUF_MEM_grow_clean(b, len + want)) {
167 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ERR_R_MALLOC_FAILURE);
168 0 : goto err;
169 : }
170 0 : i = BIO_read(in, &(b->data[len]), want);
171 0 : if ((i < 0) && ((len - off) == 0)) {
172 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ASN1_R_NOT_ENOUGH_DATA);
173 0 : goto err;
174 : }
175 0 : if (i > 0) {
176 0 : if (len + i < len) {
177 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ASN1_R_TOO_LONG);
178 0 : goto err;
179 : }
180 : len += i;
181 : }
182 : }
183 : /* else data already loaded */
184 :
185 0 : p = (unsigned char *)&(b->data[off]);
186 0 : c.p = p;
187 0 : c.inf = ASN1_get_object(&(c.p), &(c.slen), &(c.tag), &(c.xclass),
188 0 : len - off);
189 0 : if (c.inf & 0x80) {
190 : unsigned long e;
191 :
192 0 : e = ERR_GET_REASON(ERR_peek_error());
193 0 : if (e != ASN1_R_TOO_LONG)
194 : goto err;
195 : else
196 0 : ERR_clear_error(); /* clear error */
197 : }
198 0 : i = c.p - p; /* header length */
199 0 : off += i; /* end of data */
200 :
201 0 : if (c.inf & 1) {
202 : /* no data body so go round again */
203 0 : eos++;
204 0 : if (eos < 0) {
205 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ASN1_R_HEADER_TOO_LONG);
206 0 : goto err;
207 : }
208 : want = HEADER_SIZE;
209 0 : } else if (eos && (c.slen == 0) && (c.tag == V_ASN1_EOC)) {
210 : /* eos value, so go back and read another header */
211 0 : eos--;
212 0 : if (eos <= 0)
213 : break;
214 : else
215 : want = HEADER_SIZE;
216 : } else {
217 : /* suck in c.slen bytes of data */
218 0 : want = c.slen;
219 0 : if (want > (len - off)) {
220 0 : want -= (len - off);
221 0 : if (want > INT_MAX /* BIO_read takes an int length */ ||
222 0 : len + want < len) {
223 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ASN1_R_TOO_LONG);
224 0 : goto err;
225 : }
226 0 : if (!BUF_MEM_grow_clean(b, len + want)) {
227 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ERR_R_MALLOC_FAILURE);
228 0 : goto err;
229 : }
230 0 : while (want > 0) {
231 0 : i = BIO_read(in, &(b->data[len]), want);
232 0 : if (i <= 0) {
233 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO,
234 : ASN1_R_NOT_ENOUGH_DATA);
235 0 : goto err;
236 : }
237 : /*
238 : * This can't overflow because |len+want| didn't
239 : * overflow.
240 : */
241 0 : len += i;
242 0 : want -= i;
243 : }
244 : }
245 0 : if (off + c.slen < off) {
246 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ASN1_R_TOO_LONG);
247 0 : goto err;
248 : }
249 : off += c.slen;
250 0 : if (eos <= 0) {
251 : break;
252 : } else
253 : want = HEADER_SIZE;
254 : }
255 : }
256 :
257 0 : if (off > INT_MAX) {
258 0 : ASN1err(ASN1_F_ASN1_D2I_READ_BIO, ASN1_R_TOO_LONG);
259 0 : goto err;
260 : }
261 :
262 0 : *pb = b;
263 0 : return off;
264 : err:
265 0 : if (b != NULL)
266 0 : BUF_MEM_free(b);
267 : return -1;
268 : }
|