/src/gdal/frmts/gtiff/libtiff/tif_dirread.c
Line | Count | Source |
1 | | /* |
2 | | * Copyright (c) 1988-1997 Sam Leffler |
3 | | * Copyright (c) 1991-1997 Silicon Graphics, Inc. |
4 | | * |
5 | | * Permission to use, copy, modify, distribute, and sell this software and |
6 | | * its documentation for any purpose is hereby granted without fee, provided |
7 | | * that (i) the above copyright notices and this permission notice appear in |
8 | | * all copies of the software and related documentation, and (ii) the names of |
9 | | * Sam Leffler and Silicon Graphics may not be used in any advertising or |
10 | | * publicity relating to the software without the specific, prior written |
11 | | * permission of Sam Leffler and Silicon Graphics. |
12 | | * |
13 | | * THE SOFTWARE IS PROVIDED "AS-IS" AND WITHOUT WARRANTY OF ANY KIND, |
14 | | * EXPRESS, IMPLIED OR OTHERWISE, INCLUDING WITHOUT LIMITATION, ANY |
15 | | * WARRANTY OF MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. |
16 | | * |
17 | | * IN NO EVENT SHALL SAM LEFFLER OR SILICON GRAPHICS BE LIABLE FOR |
18 | | * ANY SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY KIND, |
19 | | * OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, |
20 | | * WHETHER OR NOT ADVISED OF THE POSSIBILITY OF DAMAGE, AND ON ANY THEORY OF |
21 | | * LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE |
22 | | * OF THIS SOFTWARE. |
23 | | */ |
24 | | |
25 | | /* |
26 | | * TIFF Library. |
27 | | * |
28 | | * Directory Read Support Routines. |
29 | | */ |
30 | | |
31 | | /* Suggested pending improvements: |
32 | | * - add a field 'field_info' to the TIFFDirEntry structure, and set that with |
33 | | * the pointer to the appropriate TIFFField structure early on in |
34 | | * TIFFReadDirectory, so as to eliminate current possibly repetitive lookup. |
35 | | */ |
36 | | |
37 | | #include "tiffconf.h" |
38 | | #include "tiffiop.h" |
39 | | #include <float.h> |
40 | | #include <limits.h> |
41 | | #include <stdlib.h> |
42 | | #include <string.h> |
43 | | |
44 | 0 | #define FAILED_FII ((uint32_t)-1) |
45 | | |
46 | | #ifdef HAVE_IEEEFP |
47 | | #define TIFFCvtIEEEFloatToNative(tif, n, fp) |
48 | | #define TIFFCvtIEEEDoubleToNative(tif, n, dp) |
49 | | #else |
50 | | /* If your machine does not support IEEE floating point then you will need to |
51 | | * add support to tif_machdep.c to convert between the native format and |
52 | | * IEEE format. */ |
53 | | extern void TIFFCvtIEEEFloatToNative(TIFF *, uint32_t, float *); |
54 | | extern void TIFFCvtIEEEDoubleToNative(TIFF *, uint32_t, double *); |
55 | | #endif |
56 | | |
57 | | enum TIFFReadDirEntryErr |
58 | | { |
59 | | TIFFReadDirEntryErrOk = 0, |
60 | | TIFFReadDirEntryErrCount = 1, |
61 | | TIFFReadDirEntryErrType = 2, |
62 | | TIFFReadDirEntryErrIo = 3, |
63 | | TIFFReadDirEntryErrRange = 4, |
64 | | TIFFReadDirEntryErrPsdif = 5, |
65 | | TIFFReadDirEntryErrSizesan = 6, |
66 | | TIFFReadDirEntryErrAlloc = 7, |
67 | | }; |
68 | | |
69 | | static enum TIFFReadDirEntryErr |
70 | | TIFFReadDirEntryByte(TIFF *tif, TIFFDirEntry *direntry, uint8_t *value); |
71 | | static enum TIFFReadDirEntryErr |
72 | | TIFFReadDirEntrySbyte(TIFF *tif, TIFFDirEntry *direntry, int8_t *value); |
73 | | static enum TIFFReadDirEntryErr |
74 | | TIFFReadDirEntryShort(TIFF *tif, TIFFDirEntry *direntry, uint16_t *value); |
75 | | static enum TIFFReadDirEntryErr |
76 | | TIFFReadDirEntrySshort(TIFF *tif, TIFFDirEntry *direntry, int16_t *value); |
77 | | static enum TIFFReadDirEntryErr |
78 | | TIFFReadDirEntryLong(TIFF *tif, TIFFDirEntry *direntry, uint32_t *value); |
79 | | static enum TIFFReadDirEntryErr |
80 | | TIFFReadDirEntrySlong(TIFF *tif, TIFFDirEntry *direntry, int32_t *value); |
81 | | static enum TIFFReadDirEntryErr |
82 | | TIFFReadDirEntryLong8(TIFF *tif, TIFFDirEntry *direntry, uint64_t *value); |
83 | | static enum TIFFReadDirEntryErr |
84 | | TIFFReadDirEntrySlong8(TIFF *tif, TIFFDirEntry *direntry, int64_t *value); |
85 | | static enum TIFFReadDirEntryErr |
86 | | TIFFReadDirEntryFloat(TIFF *tif, TIFFDirEntry *direntry, float *value); |
87 | | static enum TIFFReadDirEntryErr |
88 | | TIFFReadDirEntryDouble(TIFF *tif, TIFFDirEntry *direntry, double *value); |
89 | | static enum TIFFReadDirEntryErr |
90 | | TIFFReadDirEntryIfd8(TIFF *tif, TIFFDirEntry *direntry, uint64_t *value); |
91 | | |
92 | | static enum TIFFReadDirEntryErr |
93 | | TIFFReadDirEntryArray(TIFF *tif, TIFFDirEntry *direntry, uint32_t *count, |
94 | | uint32_t desttypesize, void **value); |
95 | | static enum TIFFReadDirEntryErr |
96 | | TIFFReadDirEntryByteArray(TIFF *tif, TIFFDirEntry *direntry, uint8_t **value); |
97 | | static enum TIFFReadDirEntryErr |
98 | | TIFFReadDirEntrySbyteArray(TIFF *tif, TIFFDirEntry *direntry, int8_t **value); |
99 | | static enum TIFFReadDirEntryErr |
100 | | TIFFReadDirEntryShortArray(TIFF *tif, TIFFDirEntry *direntry, uint16_t **value); |
101 | | static enum TIFFReadDirEntryErr |
102 | | TIFFReadDirEntrySshortArray(TIFF *tif, TIFFDirEntry *direntry, int16_t **value); |
103 | | static enum TIFFReadDirEntryErr |
104 | | TIFFReadDirEntryLongArray(TIFF *tif, TIFFDirEntry *direntry, uint32_t **value); |
105 | | static enum TIFFReadDirEntryErr |
106 | | TIFFReadDirEntrySlongArray(TIFF *tif, TIFFDirEntry *direntry, int32_t **value); |
107 | | static enum TIFFReadDirEntryErr |
108 | | TIFFReadDirEntryLong8Array(TIFF *tif, TIFFDirEntry *direntry, uint64_t **value); |
109 | | static enum TIFFReadDirEntryErr |
110 | | TIFFReadDirEntrySlong8Array(TIFF *tif, TIFFDirEntry *direntry, int64_t **value); |
111 | | static enum TIFFReadDirEntryErr |
112 | | TIFFReadDirEntryFloatArray(TIFF *tif, TIFFDirEntry *direntry, float **value); |
113 | | static enum TIFFReadDirEntryErr |
114 | | TIFFReadDirEntryDoubleArray(TIFF *tif, TIFFDirEntry *direntry, double **value); |
115 | | static enum TIFFReadDirEntryErr |
116 | | TIFFReadDirEntryIfd8Array(TIFF *tif, TIFFDirEntry *direntry, uint64_t **value); |
117 | | |
118 | | static enum TIFFReadDirEntryErr |
119 | | TIFFReadDirEntryPersampleShort(TIFF *tif, TIFFDirEntry *direntry, |
120 | | uint16_t *value); |
121 | | |
122 | | static void TIFFReadDirEntryCheckedByte(TIFF *tif, TIFFDirEntry *direntry, |
123 | | uint8_t *value); |
124 | | static void TIFFReadDirEntryCheckedSbyte(TIFF *tif, TIFFDirEntry *direntry, |
125 | | int8_t *value); |
126 | | static void TIFFReadDirEntryCheckedShort(TIFF *tif, TIFFDirEntry *direntry, |
127 | | uint16_t *value); |
128 | | static void TIFFReadDirEntryCheckedSshort(TIFF *tif, TIFFDirEntry *direntry, |
129 | | int16_t *value); |
130 | | static void TIFFReadDirEntryCheckedLong(TIFF *tif, TIFFDirEntry *direntry, |
131 | | uint32_t *value); |
132 | | static void TIFFReadDirEntryCheckedSlong(TIFF *tif, TIFFDirEntry *direntry, |
133 | | int32_t *value); |
134 | | static enum TIFFReadDirEntryErr |
135 | | TIFFReadDirEntryCheckedLong8(TIFF *tif, TIFFDirEntry *direntry, |
136 | | uint64_t *value); |
137 | | static enum TIFFReadDirEntryErr |
138 | | TIFFReadDirEntryCheckedSlong8(TIFF *tif, TIFFDirEntry *direntry, |
139 | | int64_t *value); |
140 | | static enum TIFFReadDirEntryErr |
141 | | TIFFReadDirEntryCheckedRational(TIFF *tif, TIFFDirEntry *direntry, |
142 | | double *value); |
143 | | static enum TIFFReadDirEntryErr |
144 | | TIFFReadDirEntryCheckedSrational(TIFF *tif, TIFFDirEntry *direntry, |
145 | | double *value); |
146 | | static void TIFFReadDirEntryCheckedFloat(TIFF *tif, TIFFDirEntry *direntry, |
147 | | float *value); |
148 | | static enum TIFFReadDirEntryErr |
149 | | TIFFReadDirEntryCheckedDouble(TIFF *tif, TIFFDirEntry *direntry, double *value); |
150 | | #if 0 |
151 | | static enum TIFFReadDirEntryErr |
152 | | TIFFReadDirEntryCheckedRationalDirect(TIFF *tif, TIFFDirEntry *direntry, |
153 | | TIFFRational_t *value); |
154 | | #endif |
155 | | static enum TIFFReadDirEntryErr |
156 | | TIFFReadDirEntryCheckRangeByteSbyte(int8_t value); |
157 | | static enum TIFFReadDirEntryErr |
158 | | TIFFReadDirEntryCheckRangeByteShort(uint16_t value); |
159 | | static enum TIFFReadDirEntryErr |
160 | | TIFFReadDirEntryCheckRangeByteSshort(int16_t value); |
161 | | static enum TIFFReadDirEntryErr |
162 | | TIFFReadDirEntryCheckRangeByteLong(uint32_t value); |
163 | | static enum TIFFReadDirEntryErr |
164 | | TIFFReadDirEntryCheckRangeByteSlong(int32_t value); |
165 | | static enum TIFFReadDirEntryErr |
166 | | TIFFReadDirEntryCheckRangeByteLong8(uint64_t value); |
167 | | static enum TIFFReadDirEntryErr |
168 | | TIFFReadDirEntryCheckRangeByteSlong8(int64_t value); |
169 | | |
170 | | static enum TIFFReadDirEntryErr |
171 | | TIFFReadDirEntryCheckRangeSbyteByte(uint8_t value); |
172 | | static enum TIFFReadDirEntryErr |
173 | | TIFFReadDirEntryCheckRangeSbyteShort(uint16_t value); |
174 | | static enum TIFFReadDirEntryErr |
175 | | TIFFReadDirEntryCheckRangeSbyteSshort(int16_t value); |
176 | | static enum TIFFReadDirEntryErr |
177 | | TIFFReadDirEntryCheckRangeSbyteLong(uint32_t value); |
178 | | static enum TIFFReadDirEntryErr |
179 | | TIFFReadDirEntryCheckRangeSbyteSlong(int32_t value); |
180 | | static enum TIFFReadDirEntryErr |
181 | | TIFFReadDirEntryCheckRangeSbyteLong8(uint64_t value); |
182 | | static enum TIFFReadDirEntryErr |
183 | | TIFFReadDirEntryCheckRangeSbyteSlong8(int64_t value); |
184 | | |
185 | | static enum TIFFReadDirEntryErr |
186 | | TIFFReadDirEntryCheckRangeShortSbyte(int8_t value); |
187 | | static enum TIFFReadDirEntryErr |
188 | | TIFFReadDirEntryCheckRangeShortSshort(int16_t value); |
189 | | static enum TIFFReadDirEntryErr |
190 | | TIFFReadDirEntryCheckRangeShortLong(uint32_t value); |
191 | | static enum TIFFReadDirEntryErr |
192 | | TIFFReadDirEntryCheckRangeShortSlong(int32_t value); |
193 | | static enum TIFFReadDirEntryErr |
194 | | TIFFReadDirEntryCheckRangeShortLong8(uint64_t value); |
195 | | static enum TIFFReadDirEntryErr |
196 | | TIFFReadDirEntryCheckRangeShortSlong8(int64_t value); |
197 | | |
198 | | static enum TIFFReadDirEntryErr |
199 | | TIFFReadDirEntryCheckRangeSshortShort(uint16_t value); |
200 | | static enum TIFFReadDirEntryErr |
201 | | TIFFReadDirEntryCheckRangeSshortLong(uint32_t value); |
202 | | static enum TIFFReadDirEntryErr |
203 | | TIFFReadDirEntryCheckRangeSshortSlong(int32_t value); |
204 | | static enum TIFFReadDirEntryErr |
205 | | TIFFReadDirEntryCheckRangeSshortLong8(uint64_t value); |
206 | | static enum TIFFReadDirEntryErr |
207 | | TIFFReadDirEntryCheckRangeSshortSlong8(int64_t value); |
208 | | |
209 | | static enum TIFFReadDirEntryErr |
210 | | TIFFReadDirEntryCheckRangeLongSbyte(int8_t value); |
211 | | static enum TIFFReadDirEntryErr |
212 | | TIFFReadDirEntryCheckRangeLongSshort(int16_t value); |
213 | | static enum TIFFReadDirEntryErr |
214 | | TIFFReadDirEntryCheckRangeLongSlong(int32_t value); |
215 | | static enum TIFFReadDirEntryErr |
216 | | TIFFReadDirEntryCheckRangeLongLong8(uint64_t value); |
217 | | static enum TIFFReadDirEntryErr |
218 | | TIFFReadDirEntryCheckRangeLongSlong8(int64_t value); |
219 | | |
220 | | static enum TIFFReadDirEntryErr |
221 | | TIFFReadDirEntryCheckRangeSlongLong(uint32_t value); |
222 | | static enum TIFFReadDirEntryErr |
223 | | TIFFReadDirEntryCheckRangeSlongLong8(uint64_t value); |
224 | | static enum TIFFReadDirEntryErr |
225 | | TIFFReadDirEntryCheckRangeSlongSlong8(int64_t value); |
226 | | |
227 | | static enum TIFFReadDirEntryErr |
228 | | TIFFReadDirEntryCheckRangeLong8Sbyte(int8_t value); |
229 | | static enum TIFFReadDirEntryErr |
230 | | TIFFReadDirEntryCheckRangeLong8Sshort(int16_t value); |
231 | | static enum TIFFReadDirEntryErr |
232 | | TIFFReadDirEntryCheckRangeLong8Slong(int32_t value); |
233 | | static enum TIFFReadDirEntryErr |
234 | | TIFFReadDirEntryCheckRangeLong8Slong8(int64_t value); |
235 | | |
236 | | static enum TIFFReadDirEntryErr |
237 | | TIFFReadDirEntryCheckRangeSlong8Long8(uint64_t value); |
238 | | |
239 | | static enum TIFFReadDirEntryErr TIFFReadDirEntryData(TIFF *tif, uint64_t offset, |
240 | | tmsize_t size, void *dest); |
241 | | static void TIFFReadDirEntryOutputErr(TIFF *tif, enum TIFFReadDirEntryErr err, |
242 | | const char *module, const char *tagname, |
243 | | int recover); |
244 | | |
245 | | static void TIFFReadDirectoryCheckOrder(TIFF *tif, TIFFDirEntry *dir, |
246 | | uint16_t dircount); |
247 | | static TIFFDirEntry *TIFFReadDirectoryFindEntry(TIFF *tif, TIFFDirEntry *dir, |
248 | | uint16_t dircount, |
249 | | uint16_t tagid); |
250 | | static void TIFFReadDirectoryFindFieldInfo(TIFF *tif, uint16_t tagid, |
251 | | uint32_t *fii); |
252 | | |
253 | | static int EstimateStripByteCounts(TIFF *tif, TIFFDirEntry *dir, |
254 | | uint16_t dircount); |
255 | | static void MissingRequired(TIFF *, const char *); |
256 | | static int CheckDirCount(TIFF *, TIFFDirEntry *, uint32_t); |
257 | | static uint16_t TIFFFetchDirectory(TIFF *tif, uint64_t diroff, |
258 | | TIFFDirEntry **pdir, uint64_t *nextdiroff); |
259 | | static int TIFFFetchNormalTag(TIFF *, TIFFDirEntry *, int recover); |
260 | | static int TIFFFetchStripThing(TIFF *tif, TIFFDirEntry *dir, uint32_t nstrips, |
261 | | uint64_t **lpp); |
262 | | static int TIFFFetchSubjectDistance(TIFF *, TIFFDirEntry *); |
263 | | static void ChopUpSingleUncompressedStrip(TIFF *); |
264 | | static void TryChopUpUncompressedBigTiff(TIFF *); |
265 | | static uint64_t TIFFReadUInt64(const uint8_t *value); |
266 | | static int _TIFFGetMaxColorChannels(uint16_t photometric); |
267 | | |
268 | | static int _TIFFFillStrilesInternal(TIFF *tif, int loadStripByteCount); |
269 | | |
270 | | typedef union _UInt64Aligned_t |
271 | | { |
272 | | double d; |
273 | | uint64_t l; |
274 | | uint32_t i[2]; |
275 | | uint16_t s[4]; |
276 | | uint8_t c[8]; |
277 | | } UInt64Aligned_t; |
278 | | |
279 | | /* |
280 | | Unaligned safe copy of a uint64_t value from an octet array. |
281 | | */ |
282 | | static uint64_t TIFFReadUInt64(const uint8_t *value) |
283 | 0 | { |
284 | 0 | UInt64Aligned_t result; |
285 | |
|
286 | 0 | result.c[0] = value[0]; |
287 | 0 | result.c[1] = value[1]; |
288 | 0 | result.c[2] = value[2]; |
289 | 0 | result.c[3] = value[3]; |
290 | 0 | result.c[4] = value[4]; |
291 | 0 | result.c[5] = value[5]; |
292 | 0 | result.c[6] = value[6]; |
293 | 0 | result.c[7] = value[7]; |
294 | |
|
295 | 0 | return result.l; |
296 | 0 | } |
297 | | |
298 | | static enum TIFFReadDirEntryErr |
299 | | TIFFReadDirEntryByte(TIFF *tif, TIFFDirEntry *direntry, uint8_t *value) |
300 | 0 | { |
301 | 0 | enum TIFFReadDirEntryErr err; |
302 | 0 | if (direntry->tdir_count != 1) |
303 | 0 | return (TIFFReadDirEntryErrCount); |
304 | 0 | switch (direntry->tdir_type) |
305 | 0 | { |
306 | 0 | case TIFF_BYTE: |
307 | 0 | case TIFF_UNDEFINED: /* Support to read TIFF_UNDEFINED with |
308 | | field_readcount==1 */ |
309 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, value); |
310 | 0 | return (TIFFReadDirEntryErrOk); |
311 | 0 | case TIFF_SBYTE: |
312 | 0 | { |
313 | 0 | int8_t m; |
314 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
315 | 0 | err = TIFFReadDirEntryCheckRangeByteSbyte(m); |
316 | 0 | if (err != TIFFReadDirEntryErrOk) |
317 | 0 | return (err); |
318 | 0 | *value = (uint8_t)m; |
319 | 0 | return (TIFFReadDirEntryErrOk); |
320 | 0 | } |
321 | 0 | case TIFF_SHORT: |
322 | 0 | { |
323 | 0 | uint16_t m; |
324 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
325 | 0 | err = TIFFReadDirEntryCheckRangeByteShort(m); |
326 | 0 | if (err != TIFFReadDirEntryErrOk) |
327 | 0 | return (err); |
328 | 0 | *value = (uint8_t)m; |
329 | 0 | return (TIFFReadDirEntryErrOk); |
330 | 0 | } |
331 | 0 | case TIFF_SSHORT: |
332 | 0 | { |
333 | 0 | int16_t m; |
334 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
335 | 0 | err = TIFFReadDirEntryCheckRangeByteSshort(m); |
336 | 0 | if (err != TIFFReadDirEntryErrOk) |
337 | 0 | return (err); |
338 | 0 | *value = (uint8_t)m; |
339 | 0 | return (TIFFReadDirEntryErrOk); |
340 | 0 | } |
341 | 0 | case TIFF_LONG: |
342 | 0 | { |
343 | 0 | uint32_t m; |
344 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
345 | 0 | err = TIFFReadDirEntryCheckRangeByteLong(m); |
346 | 0 | if (err != TIFFReadDirEntryErrOk) |
347 | 0 | return (err); |
348 | 0 | *value = (uint8_t)m; |
349 | 0 | return (TIFFReadDirEntryErrOk); |
350 | 0 | } |
351 | 0 | case TIFF_SLONG: |
352 | 0 | { |
353 | 0 | int32_t m; |
354 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
355 | 0 | err = TIFFReadDirEntryCheckRangeByteSlong(m); |
356 | 0 | if (err != TIFFReadDirEntryErrOk) |
357 | 0 | return (err); |
358 | 0 | *value = (uint8_t)m; |
359 | 0 | return (TIFFReadDirEntryErrOk); |
360 | 0 | } |
361 | 0 | case TIFF_LONG8: |
362 | 0 | { |
363 | 0 | uint64_t m; |
364 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
365 | 0 | if (err != TIFFReadDirEntryErrOk) |
366 | 0 | return (err); |
367 | 0 | err = TIFFReadDirEntryCheckRangeByteLong8(m); |
368 | 0 | if (err != TIFFReadDirEntryErrOk) |
369 | 0 | return (err); |
370 | 0 | *value = (uint8_t)m; |
371 | 0 | return (TIFFReadDirEntryErrOk); |
372 | 0 | } |
373 | 0 | case TIFF_SLONG8: |
374 | 0 | { |
375 | 0 | int64_t m; |
376 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
377 | 0 | if (err != TIFFReadDirEntryErrOk) |
378 | 0 | return (err); |
379 | 0 | err = TIFFReadDirEntryCheckRangeByteSlong8(m); |
380 | 0 | if (err != TIFFReadDirEntryErrOk) |
381 | 0 | return (err); |
382 | 0 | *value = (uint8_t)m; |
383 | 0 | return (TIFFReadDirEntryErrOk); |
384 | 0 | } |
385 | 0 | default: |
386 | 0 | return (TIFFReadDirEntryErrType); |
387 | 0 | } |
388 | 0 | } |
389 | | |
390 | | static enum TIFFReadDirEntryErr |
391 | | TIFFReadDirEntrySbyte(TIFF *tif, TIFFDirEntry *direntry, int8_t *value) |
392 | 0 | { |
393 | 0 | enum TIFFReadDirEntryErr err; |
394 | 0 | if (direntry->tdir_count != 1) |
395 | 0 | return (TIFFReadDirEntryErrCount); |
396 | 0 | switch (direntry->tdir_type) |
397 | 0 | { |
398 | 0 | case TIFF_BYTE: |
399 | 0 | case TIFF_UNDEFINED: /* Support to read TIFF_UNDEFINED with |
400 | | field_readcount==1 */ |
401 | 0 | { |
402 | 0 | uint8_t m; |
403 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
404 | 0 | err = TIFFReadDirEntryCheckRangeSbyteByte(m); |
405 | 0 | if (err != TIFFReadDirEntryErrOk) |
406 | 0 | return (err); |
407 | 0 | *value = (int8_t)m; |
408 | 0 | return (TIFFReadDirEntryErrOk); |
409 | 0 | } |
410 | 0 | case TIFF_SBYTE: |
411 | 0 | { |
412 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, value); |
413 | 0 | return (TIFFReadDirEntryErrOk); |
414 | 0 | } |
415 | 0 | case TIFF_SHORT: |
416 | 0 | { |
417 | 0 | uint16_t m; |
418 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
419 | 0 | err = TIFFReadDirEntryCheckRangeSbyteShort(m); |
420 | 0 | if (err != TIFFReadDirEntryErrOk) |
421 | 0 | return (err); |
422 | 0 | *value = (int8_t)m; |
423 | 0 | return (TIFFReadDirEntryErrOk); |
424 | 0 | } |
425 | 0 | case TIFF_SSHORT: |
426 | 0 | { |
427 | 0 | int16_t m; |
428 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
429 | 0 | err = TIFFReadDirEntryCheckRangeSbyteSshort(m); |
430 | 0 | if (err != TIFFReadDirEntryErrOk) |
431 | 0 | return (err); |
432 | 0 | *value = (int8_t)m; |
433 | 0 | return (TIFFReadDirEntryErrOk); |
434 | 0 | } |
435 | 0 | case TIFF_LONG: |
436 | 0 | { |
437 | 0 | uint32_t m; |
438 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
439 | 0 | err = TIFFReadDirEntryCheckRangeSbyteLong(m); |
440 | 0 | if (err != TIFFReadDirEntryErrOk) |
441 | 0 | return (err); |
442 | 0 | *value = (int8_t)m; |
443 | 0 | return (TIFFReadDirEntryErrOk); |
444 | 0 | } |
445 | 0 | case TIFF_SLONG: |
446 | 0 | { |
447 | 0 | int32_t m; |
448 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
449 | 0 | err = TIFFReadDirEntryCheckRangeSbyteSlong(m); |
450 | 0 | if (err != TIFFReadDirEntryErrOk) |
451 | 0 | return (err); |
452 | 0 | *value = (int8_t)m; |
453 | 0 | return (TIFFReadDirEntryErrOk); |
454 | 0 | } |
455 | 0 | case TIFF_LONG8: |
456 | 0 | { |
457 | 0 | uint64_t m; |
458 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
459 | 0 | if (err != TIFFReadDirEntryErrOk) |
460 | 0 | return (err); |
461 | 0 | err = TIFFReadDirEntryCheckRangeSbyteLong8(m); |
462 | 0 | if (err != TIFFReadDirEntryErrOk) |
463 | 0 | return (err); |
464 | 0 | *value = (int8_t)m; |
465 | 0 | return (TIFFReadDirEntryErrOk); |
466 | 0 | } |
467 | 0 | case TIFF_SLONG8: |
468 | 0 | { |
469 | 0 | int64_t m; |
470 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
471 | 0 | if (err != TIFFReadDirEntryErrOk) |
472 | 0 | return (err); |
473 | 0 | err = TIFFReadDirEntryCheckRangeSbyteSlong8(m); |
474 | 0 | if (err != TIFFReadDirEntryErrOk) |
475 | 0 | return (err); |
476 | 0 | *value = (int8_t)m; |
477 | 0 | return (TIFFReadDirEntryErrOk); |
478 | 0 | } |
479 | 0 | default: |
480 | 0 | return (TIFFReadDirEntryErrType); |
481 | 0 | } |
482 | 0 | } /*-- TIFFReadDirEntrySbyte() --*/ |
483 | | |
484 | | static enum TIFFReadDirEntryErr |
485 | | TIFFReadDirEntryShort(TIFF *tif, TIFFDirEntry *direntry, uint16_t *value) |
486 | 0 | { |
487 | 0 | enum TIFFReadDirEntryErr err; |
488 | 0 | if (direntry->tdir_count != 1) |
489 | 0 | return (TIFFReadDirEntryErrCount); |
490 | 0 | switch (direntry->tdir_type) |
491 | 0 | { |
492 | 0 | case TIFF_BYTE: |
493 | 0 | { |
494 | 0 | uint8_t m; |
495 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
496 | 0 | *value = (uint16_t)m; |
497 | 0 | return (TIFFReadDirEntryErrOk); |
498 | 0 | } |
499 | 0 | case TIFF_SBYTE: |
500 | 0 | { |
501 | 0 | int8_t m; |
502 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
503 | 0 | err = TIFFReadDirEntryCheckRangeShortSbyte(m); |
504 | 0 | if (err != TIFFReadDirEntryErrOk) |
505 | 0 | return (err); |
506 | 0 | *value = (uint16_t)m; |
507 | 0 | return (TIFFReadDirEntryErrOk); |
508 | 0 | } |
509 | 0 | case TIFF_SHORT: |
510 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, value); |
511 | 0 | return (TIFFReadDirEntryErrOk); |
512 | 0 | case TIFF_SSHORT: |
513 | 0 | { |
514 | 0 | int16_t m; |
515 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
516 | 0 | err = TIFFReadDirEntryCheckRangeShortSshort(m); |
517 | 0 | if (err != TIFFReadDirEntryErrOk) |
518 | 0 | return (err); |
519 | 0 | *value = (uint16_t)m; |
520 | 0 | return (TIFFReadDirEntryErrOk); |
521 | 0 | } |
522 | 0 | case TIFF_LONG: |
523 | 0 | { |
524 | 0 | uint32_t m; |
525 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
526 | 0 | err = TIFFReadDirEntryCheckRangeShortLong(m); |
527 | 0 | if (err != TIFFReadDirEntryErrOk) |
528 | 0 | return (err); |
529 | 0 | *value = (uint16_t)m; |
530 | 0 | return (TIFFReadDirEntryErrOk); |
531 | 0 | } |
532 | 0 | case TIFF_SLONG: |
533 | 0 | { |
534 | 0 | int32_t m; |
535 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
536 | 0 | err = TIFFReadDirEntryCheckRangeShortSlong(m); |
537 | 0 | if (err != TIFFReadDirEntryErrOk) |
538 | 0 | return (err); |
539 | 0 | *value = (uint16_t)m; |
540 | 0 | return (TIFFReadDirEntryErrOk); |
541 | 0 | } |
542 | 0 | case TIFF_LONG8: |
543 | 0 | { |
544 | 0 | uint64_t m; |
545 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
546 | 0 | if (err != TIFFReadDirEntryErrOk) |
547 | 0 | return (err); |
548 | 0 | err = TIFFReadDirEntryCheckRangeShortLong8(m); |
549 | 0 | if (err != TIFFReadDirEntryErrOk) |
550 | 0 | return (err); |
551 | 0 | *value = (uint16_t)m; |
552 | 0 | return (TIFFReadDirEntryErrOk); |
553 | 0 | } |
554 | 0 | case TIFF_SLONG8: |
555 | 0 | { |
556 | 0 | int64_t m; |
557 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
558 | 0 | if (err != TIFFReadDirEntryErrOk) |
559 | 0 | return (err); |
560 | 0 | err = TIFFReadDirEntryCheckRangeShortSlong8(m); |
561 | 0 | if (err != TIFFReadDirEntryErrOk) |
562 | 0 | return (err); |
563 | 0 | *value = (uint16_t)m; |
564 | 0 | return (TIFFReadDirEntryErrOk); |
565 | 0 | } |
566 | 0 | default: |
567 | 0 | return (TIFFReadDirEntryErrType); |
568 | 0 | } |
569 | 0 | } /*-- TIFFReadDirEntryShort() --*/ |
570 | | |
571 | | static enum TIFFReadDirEntryErr |
572 | | TIFFReadDirEntrySshort(TIFF *tif, TIFFDirEntry *direntry, int16_t *value) |
573 | 0 | { |
574 | 0 | enum TIFFReadDirEntryErr err; |
575 | 0 | if (direntry->tdir_count != 1) |
576 | 0 | return (TIFFReadDirEntryErrCount); |
577 | 0 | switch (direntry->tdir_type) |
578 | 0 | { |
579 | 0 | case TIFF_BYTE: |
580 | 0 | { |
581 | 0 | uint8_t m; |
582 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
583 | 0 | *value = (int16_t)m; |
584 | 0 | return (TIFFReadDirEntryErrOk); |
585 | 0 | } |
586 | 0 | case TIFF_SBYTE: |
587 | 0 | { |
588 | 0 | int8_t m; |
589 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
590 | 0 | *value = (int16_t)m; |
591 | 0 | return (TIFFReadDirEntryErrOk); |
592 | 0 | } |
593 | 0 | case TIFF_SHORT: |
594 | 0 | { |
595 | 0 | uint16_t m; |
596 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
597 | 0 | err = TIFFReadDirEntryCheckRangeSshortShort(m); |
598 | 0 | if (err != TIFFReadDirEntryErrOk) |
599 | 0 | return (err); |
600 | 0 | *value = (uint16_t)m; |
601 | 0 | return (TIFFReadDirEntryErrOk); |
602 | 0 | } |
603 | 0 | case TIFF_SSHORT: |
604 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, value); |
605 | 0 | return (TIFFReadDirEntryErrOk); |
606 | 0 | case TIFF_LONG: |
607 | 0 | { |
608 | 0 | uint32_t m; |
609 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
610 | 0 | err = TIFFReadDirEntryCheckRangeSshortLong(m); |
611 | 0 | if (err != TIFFReadDirEntryErrOk) |
612 | 0 | return (err); |
613 | 0 | *value = (int16_t)m; |
614 | 0 | return (TIFFReadDirEntryErrOk); |
615 | 0 | } |
616 | 0 | case TIFF_SLONG: |
617 | 0 | { |
618 | 0 | int32_t m; |
619 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
620 | 0 | err = TIFFReadDirEntryCheckRangeSshortSlong(m); |
621 | 0 | if (err != TIFFReadDirEntryErrOk) |
622 | 0 | return (err); |
623 | 0 | *value = (int16_t)m; |
624 | 0 | return (TIFFReadDirEntryErrOk); |
625 | 0 | } |
626 | 0 | case TIFF_LONG8: |
627 | 0 | { |
628 | 0 | uint64_t m; |
629 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
630 | 0 | if (err != TIFFReadDirEntryErrOk) |
631 | 0 | return (err); |
632 | 0 | err = TIFFReadDirEntryCheckRangeSshortLong8(m); |
633 | 0 | if (err != TIFFReadDirEntryErrOk) |
634 | 0 | return (err); |
635 | 0 | *value = (int16_t)m; |
636 | 0 | return (TIFFReadDirEntryErrOk); |
637 | 0 | } |
638 | 0 | case TIFF_SLONG8: |
639 | 0 | { |
640 | 0 | int64_t m; |
641 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
642 | 0 | if (err != TIFFReadDirEntryErrOk) |
643 | 0 | return (err); |
644 | 0 | err = TIFFReadDirEntryCheckRangeSshortSlong8(m); |
645 | 0 | if (err != TIFFReadDirEntryErrOk) |
646 | 0 | return (err); |
647 | 0 | *value = (int16_t)m; |
648 | 0 | return (TIFFReadDirEntryErrOk); |
649 | 0 | } |
650 | 0 | default: |
651 | 0 | return (TIFFReadDirEntryErrType); |
652 | 0 | } |
653 | 0 | } /*-- TIFFReadDirEntrySshort() --*/ |
654 | | |
655 | | static enum TIFFReadDirEntryErr |
656 | | TIFFReadDirEntryLong(TIFF *tif, TIFFDirEntry *direntry, uint32_t *value) |
657 | 0 | { |
658 | 0 | enum TIFFReadDirEntryErr err; |
659 | 0 | if (direntry->tdir_count != 1) |
660 | 0 | return (TIFFReadDirEntryErrCount); |
661 | 0 | switch (direntry->tdir_type) |
662 | 0 | { |
663 | 0 | case TIFF_BYTE: |
664 | 0 | { |
665 | 0 | uint8_t m; |
666 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
667 | 0 | *value = (uint32_t)m; |
668 | 0 | return (TIFFReadDirEntryErrOk); |
669 | 0 | } |
670 | 0 | case TIFF_SBYTE: |
671 | 0 | { |
672 | 0 | int8_t m; |
673 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
674 | 0 | err = TIFFReadDirEntryCheckRangeLongSbyte(m); |
675 | 0 | if (err != TIFFReadDirEntryErrOk) |
676 | 0 | return (err); |
677 | 0 | *value = (uint32_t)m; |
678 | 0 | return (TIFFReadDirEntryErrOk); |
679 | 0 | } |
680 | 0 | case TIFF_SHORT: |
681 | 0 | { |
682 | 0 | uint16_t m; |
683 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
684 | 0 | *value = (uint32_t)m; |
685 | 0 | return (TIFFReadDirEntryErrOk); |
686 | 0 | } |
687 | 0 | case TIFF_SSHORT: |
688 | 0 | { |
689 | 0 | int16_t m; |
690 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
691 | 0 | err = TIFFReadDirEntryCheckRangeLongSshort(m); |
692 | 0 | if (err != TIFFReadDirEntryErrOk) |
693 | 0 | return (err); |
694 | 0 | *value = (uint32_t)m; |
695 | 0 | return (TIFFReadDirEntryErrOk); |
696 | 0 | } |
697 | 0 | case TIFF_LONG: |
698 | 0 | case TIFF_IFD: |
699 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, value); |
700 | 0 | return (TIFFReadDirEntryErrOk); |
701 | 0 | case TIFF_SLONG: |
702 | 0 | { |
703 | 0 | int32_t m; |
704 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
705 | 0 | err = TIFFReadDirEntryCheckRangeLongSlong(m); |
706 | 0 | if (err != TIFFReadDirEntryErrOk) |
707 | 0 | return (err); |
708 | 0 | *value = (uint32_t)m; |
709 | 0 | return (TIFFReadDirEntryErrOk); |
710 | 0 | } |
711 | 0 | case TIFF_LONG8: |
712 | 0 | case TIFF_IFD8: |
713 | 0 | { |
714 | 0 | uint64_t m; |
715 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
716 | 0 | if (err != TIFFReadDirEntryErrOk) |
717 | 0 | return (err); |
718 | 0 | err = TIFFReadDirEntryCheckRangeLongLong8(m); |
719 | 0 | if (err != TIFFReadDirEntryErrOk) |
720 | 0 | return (err); |
721 | 0 | *value = (uint32_t)m; |
722 | 0 | return (TIFFReadDirEntryErrOk); |
723 | 0 | } |
724 | 0 | case TIFF_SLONG8: |
725 | 0 | { |
726 | 0 | int64_t m; |
727 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
728 | 0 | if (err != TIFFReadDirEntryErrOk) |
729 | 0 | return (err); |
730 | 0 | err = TIFFReadDirEntryCheckRangeLongSlong8(m); |
731 | 0 | if (err != TIFFReadDirEntryErrOk) |
732 | 0 | return (err); |
733 | 0 | *value = (uint32_t)m; |
734 | 0 | return (TIFFReadDirEntryErrOk); |
735 | 0 | } |
736 | 0 | default: |
737 | 0 | return (TIFFReadDirEntryErrType); |
738 | 0 | } |
739 | 0 | } /*-- TIFFReadDirEntryLong() --*/ |
740 | | |
741 | | static enum TIFFReadDirEntryErr |
742 | | TIFFReadDirEntrySlong(TIFF *tif, TIFFDirEntry *direntry, int32_t *value) |
743 | 0 | { |
744 | 0 | enum TIFFReadDirEntryErr err; |
745 | 0 | if (direntry->tdir_count != 1) |
746 | 0 | return (TIFFReadDirEntryErrCount); |
747 | 0 | switch (direntry->tdir_type) |
748 | 0 | { |
749 | 0 | case TIFF_BYTE: |
750 | 0 | { |
751 | 0 | uint8_t m; |
752 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
753 | 0 | *value = (int32_t)m; |
754 | 0 | return (TIFFReadDirEntryErrOk); |
755 | 0 | } |
756 | 0 | case TIFF_SBYTE: |
757 | 0 | { |
758 | 0 | int8_t m; |
759 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
760 | 0 | *value = (int32_t)m; |
761 | 0 | return (TIFFReadDirEntryErrOk); |
762 | 0 | } |
763 | 0 | case TIFF_SHORT: |
764 | 0 | { |
765 | 0 | uint16_t m; |
766 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
767 | 0 | *value = (int32_t)m; |
768 | 0 | return (TIFFReadDirEntryErrOk); |
769 | 0 | } |
770 | 0 | case TIFF_SSHORT: |
771 | 0 | { |
772 | 0 | int16_t m; |
773 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
774 | 0 | *value = (int32_t)m; |
775 | 0 | return (TIFFReadDirEntryErrOk); |
776 | 0 | } |
777 | 0 | case TIFF_LONG: |
778 | 0 | { |
779 | 0 | uint32_t m; |
780 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
781 | 0 | err = TIFFReadDirEntryCheckRangeSlongLong(m); |
782 | 0 | if (err != TIFFReadDirEntryErrOk) |
783 | 0 | return (err); |
784 | 0 | *value = (int32_t)m; |
785 | 0 | return (TIFFReadDirEntryErrOk); |
786 | 0 | } |
787 | 0 | case TIFF_SLONG: |
788 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, value); |
789 | 0 | return (TIFFReadDirEntryErrOk); |
790 | 0 | case TIFF_LONG8: |
791 | 0 | { |
792 | 0 | uint64_t m; |
793 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
794 | 0 | if (err != TIFFReadDirEntryErrOk) |
795 | 0 | return (err); |
796 | 0 | err = TIFFReadDirEntryCheckRangeSlongLong8(m); |
797 | 0 | if (err != TIFFReadDirEntryErrOk) |
798 | 0 | return (err); |
799 | 0 | *value = (int32_t)m; |
800 | 0 | return (TIFFReadDirEntryErrOk); |
801 | 0 | } |
802 | 0 | case TIFF_SLONG8: |
803 | 0 | { |
804 | 0 | int64_t m; |
805 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
806 | 0 | if (err != TIFFReadDirEntryErrOk) |
807 | 0 | return (err); |
808 | 0 | err = TIFFReadDirEntryCheckRangeSlongSlong8(m); |
809 | 0 | if (err != TIFFReadDirEntryErrOk) |
810 | 0 | return (err); |
811 | 0 | *value = (int32_t)m; |
812 | 0 | return (TIFFReadDirEntryErrOk); |
813 | 0 | } |
814 | 0 | default: |
815 | 0 | return (TIFFReadDirEntryErrType); |
816 | 0 | } |
817 | 0 | } /*-- TIFFReadDirEntrySlong() --*/ |
818 | | |
819 | | static enum TIFFReadDirEntryErr |
820 | | TIFFReadDirEntryLong8(TIFF *tif, TIFFDirEntry *direntry, uint64_t *value) |
821 | 0 | { |
822 | 0 | enum TIFFReadDirEntryErr err; |
823 | 0 | if (direntry->tdir_count != 1) |
824 | 0 | return (TIFFReadDirEntryErrCount); |
825 | 0 | switch (direntry->tdir_type) |
826 | 0 | { |
827 | 0 | case TIFF_BYTE: |
828 | 0 | { |
829 | 0 | uint8_t m; |
830 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
831 | 0 | *value = (uint64_t)m; |
832 | 0 | return (TIFFReadDirEntryErrOk); |
833 | 0 | } |
834 | 0 | case TIFF_SBYTE: |
835 | 0 | { |
836 | 0 | int8_t m; |
837 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
838 | 0 | err = TIFFReadDirEntryCheckRangeLong8Sbyte(m); |
839 | 0 | if (err != TIFFReadDirEntryErrOk) |
840 | 0 | return (err); |
841 | 0 | *value = (uint64_t)m; |
842 | 0 | return (TIFFReadDirEntryErrOk); |
843 | 0 | } |
844 | 0 | case TIFF_SHORT: |
845 | 0 | { |
846 | 0 | uint16_t m; |
847 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
848 | 0 | *value = (uint64_t)m; |
849 | 0 | return (TIFFReadDirEntryErrOk); |
850 | 0 | } |
851 | 0 | case TIFF_SSHORT: |
852 | 0 | { |
853 | 0 | int16_t m; |
854 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
855 | 0 | err = TIFFReadDirEntryCheckRangeLong8Sshort(m); |
856 | 0 | if (err != TIFFReadDirEntryErrOk) |
857 | 0 | return (err); |
858 | 0 | *value = (uint64_t)m; |
859 | 0 | return (TIFFReadDirEntryErrOk); |
860 | 0 | } |
861 | 0 | case TIFF_LONG: |
862 | 0 | case TIFF_IFD: |
863 | 0 | { |
864 | 0 | uint32_t m; |
865 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
866 | 0 | *value = (uint64_t)m; |
867 | 0 | return (TIFFReadDirEntryErrOk); |
868 | 0 | } |
869 | 0 | case TIFF_SLONG: |
870 | 0 | { |
871 | 0 | int32_t m; |
872 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
873 | 0 | err = TIFFReadDirEntryCheckRangeLong8Slong(m); |
874 | 0 | if (err != TIFFReadDirEntryErrOk) |
875 | 0 | return (err); |
876 | 0 | *value = (uint64_t)m; |
877 | 0 | return (TIFFReadDirEntryErrOk); |
878 | 0 | } |
879 | 0 | case TIFF_LONG8: |
880 | 0 | case TIFF_IFD8: |
881 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, value); |
882 | 0 | return (err); |
883 | 0 | case TIFF_SLONG8: |
884 | 0 | { |
885 | 0 | int64_t m; |
886 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
887 | 0 | if (err != TIFFReadDirEntryErrOk) |
888 | 0 | return (err); |
889 | 0 | err = TIFFReadDirEntryCheckRangeLong8Slong8(m); |
890 | 0 | if (err != TIFFReadDirEntryErrOk) |
891 | 0 | return (err); |
892 | 0 | *value = (uint64_t)m; |
893 | 0 | return (TIFFReadDirEntryErrOk); |
894 | 0 | } |
895 | 0 | default: |
896 | 0 | return (TIFFReadDirEntryErrType); |
897 | 0 | } |
898 | 0 | } /*-- TIFFReadDirEntryLong8() --*/ |
899 | | |
900 | | static enum TIFFReadDirEntryErr |
901 | | TIFFReadDirEntrySlong8(TIFF *tif, TIFFDirEntry *direntry, int64_t *value) |
902 | 0 | { |
903 | 0 | enum TIFFReadDirEntryErr err; |
904 | 0 | if (direntry->tdir_count != 1) |
905 | 0 | return (TIFFReadDirEntryErrCount); |
906 | 0 | switch (direntry->tdir_type) |
907 | 0 | { |
908 | 0 | case TIFF_BYTE: |
909 | 0 | { |
910 | 0 | uint8_t m; |
911 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
912 | 0 | *value = (int64_t)m; |
913 | 0 | return (TIFFReadDirEntryErrOk); |
914 | 0 | } |
915 | 0 | case TIFF_SBYTE: |
916 | 0 | { |
917 | 0 | int8_t m; |
918 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
919 | 0 | *value = (int64_t)m; |
920 | 0 | return (TIFFReadDirEntryErrOk); |
921 | 0 | } |
922 | 0 | case TIFF_SHORT: |
923 | 0 | { |
924 | 0 | uint16_t m; |
925 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
926 | 0 | *value = (int64_t)m; |
927 | 0 | return (TIFFReadDirEntryErrOk); |
928 | 0 | } |
929 | 0 | case TIFF_SSHORT: |
930 | 0 | { |
931 | 0 | int16_t m; |
932 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
933 | 0 | *value = (int64_t)m; |
934 | 0 | return (TIFFReadDirEntryErrOk); |
935 | 0 | } |
936 | 0 | case TIFF_LONG: |
937 | 0 | { |
938 | 0 | uint32_t m; |
939 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
940 | 0 | *value = (int64_t)m; |
941 | 0 | return (TIFFReadDirEntryErrOk); |
942 | 0 | } |
943 | 0 | case TIFF_SLONG: |
944 | 0 | { |
945 | 0 | int32_t m; |
946 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
947 | 0 | *value = (int64_t)m; |
948 | 0 | return (TIFFReadDirEntryErrOk); |
949 | 0 | } |
950 | 0 | case TIFF_LONG8: |
951 | 0 | { |
952 | 0 | uint64_t m; |
953 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
954 | 0 | if (err != TIFFReadDirEntryErrOk) |
955 | 0 | return (err); |
956 | 0 | err = TIFFReadDirEntryCheckRangeSlong8Long8(m); |
957 | 0 | if (err != TIFFReadDirEntryErrOk) |
958 | 0 | return (err); |
959 | 0 | *value = (int64_t)m; |
960 | 0 | return (TIFFReadDirEntryErrOk); |
961 | 0 | } |
962 | 0 | case TIFF_SLONG8: |
963 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, value); |
964 | 0 | return (err); |
965 | 0 | default: |
966 | 0 | return (TIFFReadDirEntryErrType); |
967 | 0 | } |
968 | 0 | } /*-- TIFFReadDirEntrySlong8() --*/ |
969 | | |
970 | | static enum TIFFReadDirEntryErr |
971 | | TIFFReadDirEntryFloat(TIFF *tif, TIFFDirEntry *direntry, float *value) |
972 | 0 | { |
973 | 0 | enum TIFFReadDirEntryErr err; |
974 | 0 | if (direntry->tdir_count != 1) |
975 | 0 | return (TIFFReadDirEntryErrCount); |
976 | 0 | switch (direntry->tdir_type) |
977 | 0 | { |
978 | 0 | case TIFF_BYTE: |
979 | 0 | { |
980 | 0 | uint8_t m; |
981 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
982 | 0 | *value = (float)m; |
983 | 0 | return (TIFFReadDirEntryErrOk); |
984 | 0 | } |
985 | 0 | case TIFF_SBYTE: |
986 | 0 | { |
987 | 0 | int8_t m; |
988 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
989 | 0 | *value = (float)m; |
990 | 0 | return (TIFFReadDirEntryErrOk); |
991 | 0 | } |
992 | 0 | case TIFF_SHORT: |
993 | 0 | { |
994 | 0 | uint16_t m; |
995 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
996 | 0 | *value = (float)m; |
997 | 0 | return (TIFFReadDirEntryErrOk); |
998 | 0 | } |
999 | 0 | case TIFF_SSHORT: |
1000 | 0 | { |
1001 | 0 | int16_t m; |
1002 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
1003 | 0 | *value = (float)m; |
1004 | 0 | return (TIFFReadDirEntryErrOk); |
1005 | 0 | } |
1006 | 0 | case TIFF_LONG: |
1007 | 0 | { |
1008 | 0 | uint32_t m; |
1009 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
1010 | 0 | *value = (float)m; |
1011 | 0 | return (TIFFReadDirEntryErrOk); |
1012 | 0 | } |
1013 | 0 | case TIFF_SLONG: |
1014 | 0 | { |
1015 | 0 | int32_t m; |
1016 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
1017 | 0 | *value = (float)m; |
1018 | 0 | return (TIFFReadDirEntryErrOk); |
1019 | 0 | } |
1020 | 0 | case TIFF_LONG8: |
1021 | 0 | { |
1022 | 0 | uint64_t m; |
1023 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
1024 | 0 | if (err != TIFFReadDirEntryErrOk) |
1025 | 0 | return (err); |
1026 | 0 | *value = (float)m; |
1027 | 0 | return (TIFFReadDirEntryErrOk); |
1028 | 0 | } |
1029 | 0 | case TIFF_SLONG8: |
1030 | 0 | { |
1031 | 0 | int64_t m; |
1032 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
1033 | 0 | if (err != TIFFReadDirEntryErrOk) |
1034 | 0 | return (err); |
1035 | 0 | *value = (float)m; |
1036 | 0 | return (TIFFReadDirEntryErrOk); |
1037 | 0 | } |
1038 | 0 | case TIFF_RATIONAL: |
1039 | 0 | { |
1040 | 0 | double m; |
1041 | 0 | err = TIFFReadDirEntryCheckedRational(tif, direntry, &m); |
1042 | 0 | if (err != TIFFReadDirEntryErrOk) |
1043 | 0 | return (err); |
1044 | 0 | *value = (float)m; |
1045 | 0 | return (TIFFReadDirEntryErrOk); |
1046 | 0 | } |
1047 | 0 | case TIFF_SRATIONAL: |
1048 | 0 | { |
1049 | 0 | double m; |
1050 | 0 | err = TIFFReadDirEntryCheckedSrational(tif, direntry, &m); |
1051 | 0 | if (err != TIFFReadDirEntryErrOk) |
1052 | 0 | return (err); |
1053 | 0 | *value = (float)m; |
1054 | 0 | return (TIFFReadDirEntryErrOk); |
1055 | 0 | } |
1056 | 0 | case TIFF_FLOAT: |
1057 | 0 | TIFFReadDirEntryCheckedFloat(tif, direntry, value); |
1058 | 0 | return (TIFFReadDirEntryErrOk); |
1059 | 0 | case TIFF_DOUBLE: |
1060 | 0 | { |
1061 | 0 | double m; |
1062 | 0 | err = TIFFReadDirEntryCheckedDouble(tif, direntry, &m); |
1063 | 0 | if (err != TIFFReadDirEntryErrOk) |
1064 | 0 | return (err); |
1065 | 0 | if ((m > FLT_MAX) || (m < -FLT_MAX)) |
1066 | 0 | return (TIFFReadDirEntryErrRange); |
1067 | 0 | *value = (float)m; |
1068 | 0 | return (TIFFReadDirEntryErrOk); |
1069 | 0 | } |
1070 | 0 | default: |
1071 | 0 | return (TIFFReadDirEntryErrType); |
1072 | 0 | } |
1073 | 0 | } |
1074 | | |
1075 | | static enum TIFFReadDirEntryErr |
1076 | | TIFFReadDirEntryDouble(TIFF *tif, TIFFDirEntry *direntry, double *value) |
1077 | 0 | { |
1078 | 0 | enum TIFFReadDirEntryErr err; |
1079 | 0 | if (direntry->tdir_count != 1) |
1080 | 0 | return (TIFFReadDirEntryErrCount); |
1081 | 0 | switch (direntry->tdir_type) |
1082 | 0 | { |
1083 | 0 | case TIFF_BYTE: |
1084 | 0 | { |
1085 | 0 | uint8_t m; |
1086 | 0 | TIFFReadDirEntryCheckedByte(tif, direntry, &m); |
1087 | 0 | *value = (double)m; |
1088 | 0 | return (TIFFReadDirEntryErrOk); |
1089 | 0 | } |
1090 | 0 | case TIFF_SBYTE: |
1091 | 0 | { |
1092 | 0 | int8_t m; |
1093 | 0 | TIFFReadDirEntryCheckedSbyte(tif, direntry, &m); |
1094 | 0 | *value = (double)m; |
1095 | 0 | return (TIFFReadDirEntryErrOk); |
1096 | 0 | } |
1097 | 0 | case TIFF_SHORT: |
1098 | 0 | { |
1099 | 0 | uint16_t m; |
1100 | 0 | TIFFReadDirEntryCheckedShort(tif, direntry, &m); |
1101 | 0 | *value = (double)m; |
1102 | 0 | return (TIFFReadDirEntryErrOk); |
1103 | 0 | } |
1104 | 0 | case TIFF_SSHORT: |
1105 | 0 | { |
1106 | 0 | int16_t m; |
1107 | 0 | TIFFReadDirEntryCheckedSshort(tif, direntry, &m); |
1108 | 0 | *value = (double)m; |
1109 | 0 | return (TIFFReadDirEntryErrOk); |
1110 | 0 | } |
1111 | 0 | case TIFF_LONG: |
1112 | 0 | { |
1113 | 0 | uint32_t m; |
1114 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
1115 | 0 | *value = (double)m; |
1116 | 0 | return (TIFFReadDirEntryErrOk); |
1117 | 0 | } |
1118 | 0 | case TIFF_SLONG: |
1119 | 0 | { |
1120 | 0 | int32_t m; |
1121 | 0 | TIFFReadDirEntryCheckedSlong(tif, direntry, &m); |
1122 | 0 | *value = (double)m; |
1123 | 0 | return (TIFFReadDirEntryErrOk); |
1124 | 0 | } |
1125 | 0 | case TIFF_LONG8: |
1126 | 0 | { |
1127 | 0 | uint64_t m; |
1128 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, &m); |
1129 | 0 | if (err != TIFFReadDirEntryErrOk) |
1130 | 0 | return (err); |
1131 | 0 | *value = (double)m; |
1132 | 0 | return (TIFFReadDirEntryErrOk); |
1133 | 0 | } |
1134 | 0 | case TIFF_SLONG8: |
1135 | 0 | { |
1136 | 0 | int64_t m; |
1137 | 0 | err = TIFFReadDirEntryCheckedSlong8(tif, direntry, &m); |
1138 | 0 | if (err != TIFFReadDirEntryErrOk) |
1139 | 0 | return (err); |
1140 | 0 | *value = (double)m; |
1141 | 0 | return (TIFFReadDirEntryErrOk); |
1142 | 0 | } |
1143 | 0 | case TIFF_RATIONAL: |
1144 | 0 | err = TIFFReadDirEntryCheckedRational(tif, direntry, value); |
1145 | 0 | return (err); |
1146 | 0 | case TIFF_SRATIONAL: |
1147 | 0 | err = TIFFReadDirEntryCheckedSrational(tif, direntry, value); |
1148 | 0 | return (err); |
1149 | 0 | case TIFF_FLOAT: |
1150 | 0 | { |
1151 | 0 | float m; |
1152 | 0 | TIFFReadDirEntryCheckedFloat(tif, direntry, &m); |
1153 | 0 | *value = (double)m; |
1154 | 0 | return (TIFFReadDirEntryErrOk); |
1155 | 0 | } |
1156 | 0 | case TIFF_DOUBLE: |
1157 | 0 | err = TIFFReadDirEntryCheckedDouble(tif, direntry, value); |
1158 | 0 | return (err); |
1159 | 0 | default: |
1160 | 0 | return (TIFFReadDirEntryErrType); |
1161 | 0 | } |
1162 | 0 | } |
1163 | | |
1164 | | static enum TIFFReadDirEntryErr |
1165 | | TIFFReadDirEntryIfd8(TIFF *tif, TIFFDirEntry *direntry, uint64_t *value) |
1166 | 0 | { |
1167 | 0 | enum TIFFReadDirEntryErr err; |
1168 | 0 | if (direntry->tdir_count != 1) |
1169 | 0 | return (TIFFReadDirEntryErrCount); |
1170 | 0 | switch (direntry->tdir_type) |
1171 | 0 | { |
1172 | 0 | case TIFF_LONG: |
1173 | 0 | case TIFF_IFD: |
1174 | 0 | { |
1175 | 0 | uint32_t m; |
1176 | 0 | TIFFReadDirEntryCheckedLong(tif, direntry, &m); |
1177 | 0 | *value = (uint64_t)m; |
1178 | 0 | return (TIFFReadDirEntryErrOk); |
1179 | 0 | } |
1180 | 0 | case TIFF_LONG8: |
1181 | 0 | case TIFF_IFD8: |
1182 | 0 | err = TIFFReadDirEntryCheckedLong8(tif, direntry, value); |
1183 | 0 | return (err); |
1184 | 0 | default: |
1185 | 0 | return (TIFFReadDirEntryErrType); |
1186 | 0 | } |
1187 | 0 | } |
1188 | | |
1189 | 0 | #define INITIAL_THRESHOLD (1024 * 1024) |
1190 | 0 | #define THRESHOLD_MULTIPLIER 10 |
1191 | | #define MAX_THRESHOLD \ |
1192 | 0 | (THRESHOLD_MULTIPLIER * THRESHOLD_MULTIPLIER * THRESHOLD_MULTIPLIER * \ |
1193 | 0 | INITIAL_THRESHOLD) |
1194 | | |
1195 | | static enum TIFFReadDirEntryErr TIFFReadDirEntryDataAndRealloc(TIFF *tif, |
1196 | | uint64_t offset, |
1197 | | tmsize_t size, |
1198 | | void **pdest) |
1199 | 0 | { |
1200 | 0 | #if SIZEOF_SIZE_T == 8 |
1201 | 0 | tmsize_t threshold = INITIAL_THRESHOLD; |
1202 | 0 | #endif |
1203 | 0 | tmsize_t already_read = 0; |
1204 | |
|
1205 | 0 | assert(!isMapped(tif)); |
1206 | |
|
1207 | 0 | if (!SeekOK(tif, offset)) |
1208 | 0 | return (TIFFReadDirEntryErrIo); |
1209 | | |
1210 | | /* On 64 bit processes, read first a maximum of 1 MB, then 10 MB, etc */ |
1211 | | /* so as to avoid allocating too much memory in case the file is too */ |
1212 | | /* short. We could ask for the file size, but this might be */ |
1213 | | /* expensive with some I/O layers (think of reading a gzipped file) */ |
1214 | | /* Restrict to 64 bit processes, so as to avoid reallocs() */ |
1215 | | /* on 32 bit processes where virtual memory is scarce. */ |
1216 | 0 | while (already_read < size) |
1217 | 0 | { |
1218 | 0 | void *new_dest; |
1219 | 0 | tmsize_t bytes_read; |
1220 | 0 | tmsize_t to_read = size - already_read; |
1221 | 0 | #if SIZEOF_SIZE_T == 8 |
1222 | 0 | if (to_read >= threshold && threshold < MAX_THRESHOLD) |
1223 | 0 | { |
1224 | 0 | to_read = threshold; |
1225 | 0 | threshold *= THRESHOLD_MULTIPLIER; |
1226 | 0 | } |
1227 | 0 | #endif |
1228 | |
|
1229 | 0 | new_dest = |
1230 | 0 | (uint8_t *)_TIFFreallocExt(tif, *pdest, already_read + to_read); |
1231 | 0 | if (new_dest == NULL) |
1232 | 0 | { |
1233 | 0 | TIFFErrorExtR(tif, tif->tif_name, |
1234 | 0 | "Failed to allocate memory for %s " |
1235 | 0 | "(%" TIFF_SSIZE_FORMAT |
1236 | 0 | " elements of %" TIFF_SSIZE_FORMAT " bytes each)", |
1237 | 0 | "TIFFReadDirEntryArray", (tmsize_t)1, |
1238 | 0 | already_read + to_read); |
1239 | 0 | return TIFFReadDirEntryErrAlloc; |
1240 | 0 | } |
1241 | 0 | *pdest = new_dest; |
1242 | |
|
1243 | 0 | bytes_read = TIFFReadFile(tif, (char *)*pdest + already_read, to_read); |
1244 | 0 | already_read += bytes_read; |
1245 | 0 | if (bytes_read != to_read) |
1246 | 0 | { |
1247 | 0 | return TIFFReadDirEntryErrIo; |
1248 | 0 | } |
1249 | 0 | } |
1250 | 0 | return TIFFReadDirEntryErrOk; |
1251 | 0 | } |
1252 | | |
1253 | | /* Caution: if raising that value, make sure int32 / uint32 overflows can't |
1254 | | * occur elsewhere */ |
1255 | 0 | #define MAX_SIZE_TAG_DATA 2147483647U |
1256 | | |
1257 | | static enum TIFFReadDirEntryErr |
1258 | | TIFFReadDirEntryArrayWithLimit(TIFF *tif, TIFFDirEntry *direntry, |
1259 | | uint32_t *count, uint32_t desttypesize, |
1260 | | void **value, uint64_t maxcount) |
1261 | 0 | { |
1262 | 0 | int typesize; |
1263 | 0 | uint32_t datasize; |
1264 | 0 | void *data; |
1265 | 0 | uint64_t target_count64; |
1266 | 0 | int original_datasize_clamped; |
1267 | 0 | typesize = TIFFDataWidth((TIFFDataType)direntry->tdir_type); |
1268 | |
|
1269 | 0 | target_count64 = |
1270 | 0 | (direntry->tdir_count > maxcount) ? maxcount : direntry->tdir_count; |
1271 | |
|
1272 | 0 | if ((target_count64 == 0) || (typesize == 0)) |
1273 | 0 | { |
1274 | 0 | *value = 0; |
1275 | 0 | return (TIFFReadDirEntryErrOk); |
1276 | 0 | } |
1277 | 0 | (void)desttypesize; |
1278 | | |
1279 | | /* We just want to know if the original tag size is more than 4 bytes |
1280 | | * (classic TIFF) or 8 bytes (BigTIFF) |
1281 | | */ |
1282 | 0 | original_datasize_clamped = |
1283 | 0 | ((direntry->tdir_count > 10) ? 10 : (int)direntry->tdir_count) * |
1284 | 0 | typesize; |
1285 | | |
1286 | | /* |
1287 | | * As a sanity check, make sure we have no more than a 2GB tag array |
1288 | | * in either the current data type or the dest data type. This also |
1289 | | * avoids problems with overflow of tmsize_t on 32bit systems. |
1290 | | */ |
1291 | 0 | if ((uint64_t)(MAX_SIZE_TAG_DATA / typesize) < target_count64) |
1292 | 0 | return (TIFFReadDirEntryErrSizesan); |
1293 | 0 | if ((uint64_t)(MAX_SIZE_TAG_DATA / desttypesize) < target_count64) |
1294 | 0 | return (TIFFReadDirEntryErrSizesan); |
1295 | | |
1296 | 0 | *count = (uint32_t)target_count64; |
1297 | 0 | datasize = (*count) * typesize; |
1298 | 0 | assert((tmsize_t)datasize > 0); |
1299 | |
|
1300 | 0 | if (datasize > 100 * 1024 * 1024) |
1301 | 0 | { |
1302 | | /* Before allocating a huge amount of memory for corrupted files, check |
1303 | | * if size of requested memory is not greater than file size. |
1304 | | */ |
1305 | 0 | const uint64_t filesize = TIFFGetFileSize(tif); |
1306 | 0 | if (datasize > filesize) |
1307 | 0 | { |
1308 | 0 | TIFFWarningExtR(tif, "ReadDirEntryArray", |
1309 | 0 | "Requested memory size for tag %d (0x%x) %" PRIu32 |
1310 | 0 | " is greater than filesize %" PRIu64 |
1311 | 0 | ". Memory not allocated, tag not read", |
1312 | 0 | direntry->tdir_tag, direntry->tdir_tag, datasize, |
1313 | 0 | filesize); |
1314 | 0 | return (TIFFReadDirEntryErrAlloc); |
1315 | 0 | } |
1316 | 0 | } |
1317 | | |
1318 | 0 | if (isMapped(tif) && datasize > (uint64_t)tif->tif_size) |
1319 | 0 | return TIFFReadDirEntryErrIo; |
1320 | | |
1321 | 0 | if (!isMapped(tif) && (((tif->tif_flags & TIFF_BIGTIFF) && datasize > 8) || |
1322 | 0 | (!(tif->tif_flags & TIFF_BIGTIFF) && datasize > 4))) |
1323 | 0 | { |
1324 | 0 | data = NULL; |
1325 | 0 | } |
1326 | 0 | else |
1327 | 0 | { |
1328 | 0 | data = _TIFFCheckMalloc(tif, *count, typesize, "ReadDirEntryArray"); |
1329 | 0 | if (data == 0) |
1330 | 0 | return (TIFFReadDirEntryErrAlloc); |
1331 | 0 | } |
1332 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
1333 | 0 | { |
1334 | | /* Only the condition on original_datasize_clamped. The second |
1335 | | * one is implied, but Coverity Scan cannot see it. */ |
1336 | 0 | if (original_datasize_clamped <= 4 && datasize <= 4) |
1337 | 0 | _TIFFmemcpy(data, &direntry->tdir_offset, datasize); |
1338 | 0 | else |
1339 | 0 | { |
1340 | 0 | enum TIFFReadDirEntryErr err; |
1341 | 0 | uint32_t offset = direntry->tdir_offset.toff_long; |
1342 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1343 | 0 | TIFFSwabLong(&offset); |
1344 | 0 | if (isMapped(tif)) |
1345 | 0 | err = TIFFReadDirEntryData(tif, (uint64_t)offset, |
1346 | 0 | (tmsize_t)datasize, data); |
1347 | 0 | else |
1348 | 0 | err = TIFFReadDirEntryDataAndRealloc(tif, (uint64_t)offset, |
1349 | 0 | (tmsize_t)datasize, &data); |
1350 | 0 | if (err != TIFFReadDirEntryErrOk) |
1351 | 0 | { |
1352 | 0 | _TIFFfreeExt(tif, data); |
1353 | 0 | return (err); |
1354 | 0 | } |
1355 | 0 | } |
1356 | 0 | } |
1357 | 0 | else |
1358 | 0 | { |
1359 | | /* See above comment for the Classic TIFF case */ |
1360 | 0 | if (original_datasize_clamped <= 8 && datasize <= 8) |
1361 | 0 | _TIFFmemcpy(data, &direntry->tdir_offset, datasize); |
1362 | 0 | else |
1363 | 0 | { |
1364 | 0 | enum TIFFReadDirEntryErr err; |
1365 | 0 | uint64_t offset = direntry->tdir_offset.toff_long8; |
1366 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1367 | 0 | TIFFSwabLong8(&offset); |
1368 | 0 | if (isMapped(tif)) |
1369 | 0 | err = TIFFReadDirEntryData(tif, (uint64_t)offset, |
1370 | 0 | (tmsize_t)datasize, data); |
1371 | 0 | else |
1372 | 0 | err = TIFFReadDirEntryDataAndRealloc(tif, (uint64_t)offset, |
1373 | 0 | (tmsize_t)datasize, &data); |
1374 | 0 | if (err != TIFFReadDirEntryErrOk) |
1375 | 0 | { |
1376 | 0 | _TIFFfreeExt(tif, data); |
1377 | 0 | return (err); |
1378 | 0 | } |
1379 | 0 | } |
1380 | 0 | } |
1381 | 0 | *value = data; |
1382 | 0 | return (TIFFReadDirEntryErrOk); |
1383 | 0 | } |
1384 | | |
1385 | | static enum TIFFReadDirEntryErr |
1386 | | TIFFReadDirEntryArray(TIFF *tif, TIFFDirEntry *direntry, uint32_t *count, |
1387 | | uint32_t desttypesize, void **value) |
1388 | 0 | { |
1389 | 0 | return TIFFReadDirEntryArrayWithLimit(tif, direntry, count, desttypesize, |
1390 | 0 | value, ~((uint64_t)0)); |
1391 | 0 | } |
1392 | | |
1393 | | static enum TIFFReadDirEntryErr |
1394 | | TIFFReadDirEntryByteArray(TIFF *tif, TIFFDirEntry *direntry, uint8_t **value) |
1395 | 0 | { |
1396 | 0 | enum TIFFReadDirEntryErr err; |
1397 | 0 | uint32_t count; |
1398 | 0 | void *origdata; |
1399 | 0 | uint8_t *data; |
1400 | 0 | switch (direntry->tdir_type) |
1401 | 0 | { |
1402 | 0 | case TIFF_ASCII: |
1403 | 0 | case TIFF_UNDEFINED: |
1404 | 0 | case TIFF_BYTE: |
1405 | 0 | case TIFF_SBYTE: |
1406 | 0 | case TIFF_SHORT: |
1407 | 0 | case TIFF_SSHORT: |
1408 | 0 | case TIFF_LONG: |
1409 | 0 | case TIFF_SLONG: |
1410 | 0 | case TIFF_LONG8: |
1411 | 0 | case TIFF_SLONG8: |
1412 | 0 | break; |
1413 | 0 | default: |
1414 | 0 | return (TIFFReadDirEntryErrType); |
1415 | 0 | } |
1416 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 1, &origdata); |
1417 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
1418 | 0 | { |
1419 | 0 | *value = 0; |
1420 | 0 | return (err); |
1421 | 0 | } |
1422 | 0 | switch (direntry->tdir_type) |
1423 | 0 | { |
1424 | 0 | case TIFF_ASCII: |
1425 | 0 | case TIFF_UNDEFINED: |
1426 | 0 | case TIFF_BYTE: |
1427 | 0 | *value = (uint8_t *)origdata; |
1428 | 0 | return (TIFFReadDirEntryErrOk); |
1429 | 0 | case TIFF_SBYTE: |
1430 | 0 | { |
1431 | 0 | int8_t *m; |
1432 | 0 | uint32_t n; |
1433 | 0 | m = (int8_t *)origdata; |
1434 | 0 | for (n = 0; n < count; n++) |
1435 | 0 | { |
1436 | 0 | err = TIFFReadDirEntryCheckRangeByteSbyte(*m); |
1437 | 0 | if (err != TIFFReadDirEntryErrOk) |
1438 | 0 | { |
1439 | 0 | _TIFFfreeExt(tif, origdata); |
1440 | 0 | return (err); |
1441 | 0 | } |
1442 | 0 | m++; |
1443 | 0 | } |
1444 | 0 | *value = (uint8_t *)origdata; |
1445 | 0 | return (TIFFReadDirEntryErrOk); |
1446 | 0 | } |
1447 | 0 | default: |
1448 | 0 | break; |
1449 | 0 | } |
1450 | 0 | data = (uint8_t *)_TIFFmallocExt(tif, count); |
1451 | 0 | if (data == 0) |
1452 | 0 | { |
1453 | 0 | _TIFFfreeExt(tif, origdata); |
1454 | 0 | return (TIFFReadDirEntryErrAlloc); |
1455 | 0 | } |
1456 | 0 | switch (direntry->tdir_type) |
1457 | 0 | { |
1458 | 0 | case TIFF_SHORT: |
1459 | 0 | { |
1460 | 0 | uint16_t *ma; |
1461 | 0 | uint8_t *mb; |
1462 | 0 | uint32_t n; |
1463 | 0 | ma = (uint16_t *)origdata; |
1464 | 0 | mb = data; |
1465 | 0 | for (n = 0; n < count; n++) |
1466 | 0 | { |
1467 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1468 | 0 | TIFFSwabShort(ma); |
1469 | 0 | err = TIFFReadDirEntryCheckRangeByteShort(*ma); |
1470 | 0 | if (err != TIFFReadDirEntryErrOk) |
1471 | 0 | break; |
1472 | 0 | *mb++ = (uint8_t)(*ma++); |
1473 | 0 | } |
1474 | 0 | } |
1475 | 0 | break; |
1476 | 0 | case TIFF_SSHORT: |
1477 | 0 | { |
1478 | 0 | int16_t *ma; |
1479 | 0 | uint8_t *mb; |
1480 | 0 | uint32_t n; |
1481 | 0 | ma = (int16_t *)origdata; |
1482 | 0 | mb = data; |
1483 | 0 | for (n = 0; n < count; n++) |
1484 | 0 | { |
1485 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1486 | 0 | TIFFSwabShort((uint16_t *)ma); |
1487 | 0 | err = TIFFReadDirEntryCheckRangeByteSshort(*ma); |
1488 | 0 | if (err != TIFFReadDirEntryErrOk) |
1489 | 0 | break; |
1490 | 0 | *mb++ = (uint8_t)(*ma++); |
1491 | 0 | } |
1492 | 0 | } |
1493 | 0 | break; |
1494 | 0 | case TIFF_LONG: |
1495 | 0 | { |
1496 | 0 | uint32_t *ma; |
1497 | 0 | uint8_t *mb; |
1498 | 0 | uint32_t n; |
1499 | 0 | ma = (uint32_t *)origdata; |
1500 | 0 | mb = data; |
1501 | 0 | for (n = 0; n < count; n++) |
1502 | 0 | { |
1503 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1504 | 0 | TIFFSwabLong(ma); |
1505 | 0 | err = TIFFReadDirEntryCheckRangeByteLong(*ma); |
1506 | 0 | if (err != TIFFReadDirEntryErrOk) |
1507 | 0 | break; |
1508 | 0 | *mb++ = (uint8_t)(*ma++); |
1509 | 0 | } |
1510 | 0 | } |
1511 | 0 | break; |
1512 | 0 | case TIFF_SLONG: |
1513 | 0 | { |
1514 | 0 | int32_t *ma; |
1515 | 0 | uint8_t *mb; |
1516 | 0 | uint32_t n; |
1517 | 0 | ma = (int32_t *)origdata; |
1518 | 0 | mb = data; |
1519 | 0 | for (n = 0; n < count; n++) |
1520 | 0 | { |
1521 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1522 | 0 | TIFFSwabLong((uint32_t *)ma); |
1523 | 0 | err = TIFFReadDirEntryCheckRangeByteSlong(*ma); |
1524 | 0 | if (err != TIFFReadDirEntryErrOk) |
1525 | 0 | break; |
1526 | 0 | *mb++ = (uint8_t)(*ma++); |
1527 | 0 | } |
1528 | 0 | } |
1529 | 0 | break; |
1530 | 0 | case TIFF_LONG8: |
1531 | 0 | { |
1532 | 0 | uint64_t *ma; |
1533 | 0 | uint8_t *mb; |
1534 | 0 | uint32_t n; |
1535 | 0 | ma = (uint64_t *)origdata; |
1536 | 0 | mb = data; |
1537 | 0 | for (n = 0; n < count; n++) |
1538 | 0 | { |
1539 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1540 | 0 | TIFFSwabLong8(ma); |
1541 | 0 | err = TIFFReadDirEntryCheckRangeByteLong8(*ma); |
1542 | 0 | if (err != TIFFReadDirEntryErrOk) |
1543 | 0 | break; |
1544 | 0 | *mb++ = (uint8_t)(*ma++); |
1545 | 0 | } |
1546 | 0 | } |
1547 | 0 | break; |
1548 | 0 | case TIFF_SLONG8: |
1549 | 0 | { |
1550 | 0 | int64_t *ma; |
1551 | 0 | uint8_t *mb; |
1552 | 0 | uint32_t n; |
1553 | 0 | ma = (int64_t *)origdata; |
1554 | 0 | mb = data; |
1555 | 0 | for (n = 0; n < count; n++) |
1556 | 0 | { |
1557 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1558 | 0 | TIFFSwabLong8((uint64_t *)ma); |
1559 | 0 | err = TIFFReadDirEntryCheckRangeByteSlong8(*ma); |
1560 | 0 | if (err != TIFFReadDirEntryErrOk) |
1561 | 0 | break; |
1562 | 0 | *mb++ = (uint8_t)(*ma++); |
1563 | 0 | } |
1564 | 0 | } |
1565 | 0 | break; |
1566 | 0 | default: |
1567 | 0 | break; |
1568 | 0 | } |
1569 | 0 | _TIFFfreeExt(tif, origdata); |
1570 | 0 | if (err != TIFFReadDirEntryErrOk) |
1571 | 0 | { |
1572 | 0 | _TIFFfreeExt(tif, data); |
1573 | 0 | return (err); |
1574 | 0 | } |
1575 | 0 | *value = data; |
1576 | 0 | return (TIFFReadDirEntryErrOk); |
1577 | 0 | } |
1578 | | |
1579 | | static enum TIFFReadDirEntryErr |
1580 | | TIFFReadDirEntrySbyteArray(TIFF *tif, TIFFDirEntry *direntry, int8_t **value) |
1581 | 0 | { |
1582 | 0 | enum TIFFReadDirEntryErr err; |
1583 | 0 | uint32_t count; |
1584 | 0 | void *origdata; |
1585 | 0 | int8_t *data; |
1586 | 0 | switch (direntry->tdir_type) |
1587 | 0 | { |
1588 | 0 | case TIFF_UNDEFINED: |
1589 | 0 | case TIFF_BYTE: |
1590 | 0 | case TIFF_SBYTE: |
1591 | 0 | case TIFF_SHORT: |
1592 | 0 | case TIFF_SSHORT: |
1593 | 0 | case TIFF_LONG: |
1594 | 0 | case TIFF_SLONG: |
1595 | 0 | case TIFF_LONG8: |
1596 | 0 | case TIFF_SLONG8: |
1597 | 0 | break; |
1598 | 0 | default: |
1599 | 0 | return (TIFFReadDirEntryErrType); |
1600 | 0 | } |
1601 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 1, &origdata); |
1602 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
1603 | 0 | { |
1604 | 0 | *value = 0; |
1605 | 0 | return (err); |
1606 | 0 | } |
1607 | 0 | switch (direntry->tdir_type) |
1608 | 0 | { |
1609 | 0 | case TIFF_UNDEFINED: |
1610 | 0 | case TIFF_BYTE: |
1611 | 0 | { |
1612 | 0 | uint8_t *m; |
1613 | 0 | uint32_t n; |
1614 | 0 | m = (uint8_t *)origdata; |
1615 | 0 | for (n = 0; n < count; n++) |
1616 | 0 | { |
1617 | 0 | err = TIFFReadDirEntryCheckRangeSbyteByte(*m); |
1618 | 0 | if (err != TIFFReadDirEntryErrOk) |
1619 | 0 | { |
1620 | 0 | _TIFFfreeExt(tif, origdata); |
1621 | 0 | return (err); |
1622 | 0 | } |
1623 | 0 | m++; |
1624 | 0 | } |
1625 | 0 | *value = (int8_t *)origdata; |
1626 | 0 | return (TIFFReadDirEntryErrOk); |
1627 | 0 | } |
1628 | 0 | case TIFF_SBYTE: |
1629 | 0 | *value = (int8_t *)origdata; |
1630 | 0 | return (TIFFReadDirEntryErrOk); |
1631 | 0 | default: |
1632 | 0 | break; |
1633 | 0 | } |
1634 | 0 | data = (int8_t *)_TIFFmallocExt(tif, count); |
1635 | 0 | if (data == 0) |
1636 | 0 | { |
1637 | 0 | _TIFFfreeExt(tif, origdata); |
1638 | 0 | return (TIFFReadDirEntryErrAlloc); |
1639 | 0 | } |
1640 | 0 | switch (direntry->tdir_type) |
1641 | 0 | { |
1642 | 0 | case TIFF_SHORT: |
1643 | 0 | { |
1644 | 0 | uint16_t *ma; |
1645 | 0 | int8_t *mb; |
1646 | 0 | uint32_t n; |
1647 | 0 | ma = (uint16_t *)origdata; |
1648 | 0 | mb = data; |
1649 | 0 | for (n = 0; n < count; n++) |
1650 | 0 | { |
1651 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1652 | 0 | TIFFSwabShort(ma); |
1653 | 0 | err = TIFFReadDirEntryCheckRangeSbyteShort(*ma); |
1654 | 0 | if (err != TIFFReadDirEntryErrOk) |
1655 | 0 | break; |
1656 | 0 | *mb++ = (int8_t)(*ma++); |
1657 | 0 | } |
1658 | 0 | } |
1659 | 0 | break; |
1660 | 0 | case TIFF_SSHORT: |
1661 | 0 | { |
1662 | 0 | int16_t *ma; |
1663 | 0 | int8_t *mb; |
1664 | 0 | uint32_t n; |
1665 | 0 | ma = (int16_t *)origdata; |
1666 | 0 | mb = data; |
1667 | 0 | for (n = 0; n < count; n++) |
1668 | 0 | { |
1669 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1670 | 0 | TIFFSwabShort((uint16_t *)ma); |
1671 | 0 | err = TIFFReadDirEntryCheckRangeSbyteSshort(*ma); |
1672 | 0 | if (err != TIFFReadDirEntryErrOk) |
1673 | 0 | break; |
1674 | 0 | *mb++ = (int8_t)(*ma++); |
1675 | 0 | } |
1676 | 0 | } |
1677 | 0 | break; |
1678 | 0 | case TIFF_LONG: |
1679 | 0 | { |
1680 | 0 | uint32_t *ma; |
1681 | 0 | int8_t *mb; |
1682 | 0 | uint32_t n; |
1683 | 0 | ma = (uint32_t *)origdata; |
1684 | 0 | mb = data; |
1685 | 0 | for (n = 0; n < count; n++) |
1686 | 0 | { |
1687 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1688 | 0 | TIFFSwabLong(ma); |
1689 | 0 | err = TIFFReadDirEntryCheckRangeSbyteLong(*ma); |
1690 | 0 | if (err != TIFFReadDirEntryErrOk) |
1691 | 0 | break; |
1692 | 0 | *mb++ = (int8_t)(*ma++); |
1693 | 0 | } |
1694 | 0 | } |
1695 | 0 | break; |
1696 | 0 | case TIFF_SLONG: |
1697 | 0 | { |
1698 | 0 | int32_t *ma; |
1699 | 0 | int8_t *mb; |
1700 | 0 | uint32_t n; |
1701 | 0 | ma = (int32_t *)origdata; |
1702 | 0 | mb = data; |
1703 | 0 | for (n = 0; n < count; n++) |
1704 | 0 | { |
1705 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1706 | 0 | TIFFSwabLong((uint32_t *)ma); |
1707 | 0 | err = TIFFReadDirEntryCheckRangeSbyteSlong(*ma); |
1708 | 0 | if (err != TIFFReadDirEntryErrOk) |
1709 | 0 | break; |
1710 | 0 | *mb++ = (int8_t)(*ma++); |
1711 | 0 | } |
1712 | 0 | } |
1713 | 0 | break; |
1714 | 0 | case TIFF_LONG8: |
1715 | 0 | { |
1716 | 0 | uint64_t *ma; |
1717 | 0 | int8_t *mb; |
1718 | 0 | uint32_t n; |
1719 | 0 | ma = (uint64_t *)origdata; |
1720 | 0 | mb = data; |
1721 | 0 | for (n = 0; n < count; n++) |
1722 | 0 | { |
1723 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1724 | 0 | TIFFSwabLong8(ma); |
1725 | 0 | err = TIFFReadDirEntryCheckRangeSbyteLong8(*ma); |
1726 | 0 | if (err != TIFFReadDirEntryErrOk) |
1727 | 0 | break; |
1728 | 0 | *mb++ = (int8_t)(*ma++); |
1729 | 0 | } |
1730 | 0 | } |
1731 | 0 | break; |
1732 | 0 | case TIFF_SLONG8: |
1733 | 0 | { |
1734 | 0 | int64_t *ma; |
1735 | 0 | int8_t *mb; |
1736 | 0 | uint32_t n; |
1737 | 0 | ma = (int64_t *)origdata; |
1738 | 0 | mb = data; |
1739 | 0 | for (n = 0; n < count; n++) |
1740 | 0 | { |
1741 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1742 | 0 | TIFFSwabLong8((uint64_t *)ma); |
1743 | 0 | err = TIFFReadDirEntryCheckRangeSbyteSlong8(*ma); |
1744 | 0 | if (err != TIFFReadDirEntryErrOk) |
1745 | 0 | break; |
1746 | 0 | *mb++ = (int8_t)(*ma++); |
1747 | 0 | } |
1748 | 0 | } |
1749 | 0 | break; |
1750 | 0 | default: |
1751 | 0 | break; |
1752 | 0 | } |
1753 | 0 | _TIFFfreeExt(tif, origdata); |
1754 | 0 | if (err != TIFFReadDirEntryErrOk) |
1755 | 0 | { |
1756 | 0 | _TIFFfreeExt(tif, data); |
1757 | 0 | return (err); |
1758 | 0 | } |
1759 | 0 | *value = data; |
1760 | 0 | return (TIFFReadDirEntryErrOk); |
1761 | 0 | } |
1762 | | |
1763 | | static enum TIFFReadDirEntryErr |
1764 | | TIFFReadDirEntryShortArray(TIFF *tif, TIFFDirEntry *direntry, uint16_t **value) |
1765 | 0 | { |
1766 | 0 | enum TIFFReadDirEntryErr err; |
1767 | 0 | uint32_t count; |
1768 | 0 | void *origdata; |
1769 | 0 | uint16_t *data; |
1770 | 0 | switch (direntry->tdir_type) |
1771 | 0 | { |
1772 | 0 | case TIFF_BYTE: |
1773 | 0 | case TIFF_SBYTE: |
1774 | 0 | case TIFF_SHORT: |
1775 | 0 | case TIFF_SSHORT: |
1776 | 0 | case TIFF_LONG: |
1777 | 0 | case TIFF_SLONG: |
1778 | 0 | case TIFF_LONG8: |
1779 | 0 | case TIFF_SLONG8: |
1780 | 0 | break; |
1781 | 0 | default: |
1782 | 0 | return (TIFFReadDirEntryErrType); |
1783 | 0 | } |
1784 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 2, &origdata); |
1785 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
1786 | 0 | { |
1787 | 0 | *value = 0; |
1788 | 0 | return (err); |
1789 | 0 | } |
1790 | 0 | switch (direntry->tdir_type) |
1791 | 0 | { |
1792 | 0 | case TIFF_SHORT: |
1793 | 0 | *value = (uint16_t *)origdata; |
1794 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1795 | 0 | TIFFSwabArrayOfShort(*value, count); |
1796 | 0 | return (TIFFReadDirEntryErrOk); |
1797 | 0 | case TIFF_SSHORT: |
1798 | 0 | { |
1799 | 0 | int16_t *m; |
1800 | 0 | uint32_t n; |
1801 | 0 | m = (int16_t *)origdata; |
1802 | 0 | for (n = 0; n < count; n++) |
1803 | 0 | { |
1804 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1805 | 0 | TIFFSwabShort((uint16_t *)m); |
1806 | 0 | err = TIFFReadDirEntryCheckRangeShortSshort(*m); |
1807 | 0 | if (err != TIFFReadDirEntryErrOk) |
1808 | 0 | { |
1809 | 0 | _TIFFfreeExt(tif, origdata); |
1810 | 0 | return (err); |
1811 | 0 | } |
1812 | 0 | m++; |
1813 | 0 | } |
1814 | 0 | *value = (uint16_t *)origdata; |
1815 | 0 | return (TIFFReadDirEntryErrOk); |
1816 | 0 | } |
1817 | 0 | default: |
1818 | 0 | break; |
1819 | 0 | } |
1820 | 0 | data = (uint16_t *)_TIFFmallocExt(tif, count * 2); |
1821 | 0 | if (data == 0) |
1822 | 0 | { |
1823 | 0 | _TIFFfreeExt(tif, origdata); |
1824 | 0 | return (TIFFReadDirEntryErrAlloc); |
1825 | 0 | } |
1826 | 0 | switch (direntry->tdir_type) |
1827 | 0 | { |
1828 | 0 | case TIFF_BYTE: |
1829 | 0 | { |
1830 | 0 | uint8_t *ma; |
1831 | 0 | uint16_t *mb; |
1832 | 0 | uint32_t n; |
1833 | 0 | ma = (uint8_t *)origdata; |
1834 | 0 | mb = data; |
1835 | 0 | for (n = 0; n < count; n++) |
1836 | 0 | *mb++ = (uint16_t)(*ma++); |
1837 | 0 | } |
1838 | 0 | break; |
1839 | 0 | case TIFF_SBYTE: |
1840 | 0 | { |
1841 | 0 | int8_t *ma; |
1842 | 0 | uint16_t *mb; |
1843 | 0 | uint32_t n; |
1844 | 0 | ma = (int8_t *)origdata; |
1845 | 0 | mb = data; |
1846 | 0 | for (n = 0; n < count; n++) |
1847 | 0 | { |
1848 | 0 | err = TIFFReadDirEntryCheckRangeShortSbyte(*ma); |
1849 | 0 | if (err != TIFFReadDirEntryErrOk) |
1850 | 0 | break; |
1851 | 0 | *mb++ = (uint16_t)(*ma++); |
1852 | 0 | } |
1853 | 0 | } |
1854 | 0 | break; |
1855 | 0 | case TIFF_LONG: |
1856 | 0 | { |
1857 | 0 | uint32_t *ma; |
1858 | 0 | uint16_t *mb; |
1859 | 0 | uint32_t n; |
1860 | 0 | ma = (uint32_t *)origdata; |
1861 | 0 | mb = data; |
1862 | 0 | for (n = 0; n < count; n++) |
1863 | 0 | { |
1864 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1865 | 0 | TIFFSwabLong(ma); |
1866 | 0 | err = TIFFReadDirEntryCheckRangeShortLong(*ma); |
1867 | 0 | if (err != TIFFReadDirEntryErrOk) |
1868 | 0 | break; |
1869 | 0 | *mb++ = (uint16_t)(*ma++); |
1870 | 0 | } |
1871 | 0 | } |
1872 | 0 | break; |
1873 | 0 | case TIFF_SLONG: |
1874 | 0 | { |
1875 | 0 | int32_t *ma; |
1876 | 0 | uint16_t *mb; |
1877 | 0 | uint32_t n; |
1878 | 0 | ma = (int32_t *)origdata; |
1879 | 0 | mb = data; |
1880 | 0 | for (n = 0; n < count; n++) |
1881 | 0 | { |
1882 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1883 | 0 | TIFFSwabLong((uint32_t *)ma); |
1884 | 0 | err = TIFFReadDirEntryCheckRangeShortSlong(*ma); |
1885 | 0 | if (err != TIFFReadDirEntryErrOk) |
1886 | 0 | break; |
1887 | 0 | *mb++ = (uint16_t)(*ma++); |
1888 | 0 | } |
1889 | 0 | } |
1890 | 0 | break; |
1891 | 0 | case TIFF_LONG8: |
1892 | 0 | { |
1893 | 0 | uint64_t *ma; |
1894 | 0 | uint16_t *mb; |
1895 | 0 | uint32_t n; |
1896 | 0 | ma = (uint64_t *)origdata; |
1897 | 0 | mb = data; |
1898 | 0 | for (n = 0; n < count; n++) |
1899 | 0 | { |
1900 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1901 | 0 | TIFFSwabLong8(ma); |
1902 | 0 | err = TIFFReadDirEntryCheckRangeShortLong8(*ma); |
1903 | 0 | if (err != TIFFReadDirEntryErrOk) |
1904 | 0 | break; |
1905 | 0 | *mb++ = (uint16_t)(*ma++); |
1906 | 0 | } |
1907 | 0 | } |
1908 | 0 | break; |
1909 | 0 | case TIFF_SLONG8: |
1910 | 0 | { |
1911 | 0 | int64_t *ma; |
1912 | 0 | uint16_t *mb; |
1913 | 0 | uint32_t n; |
1914 | 0 | ma = (int64_t *)origdata; |
1915 | 0 | mb = data; |
1916 | 0 | for (n = 0; n < count; n++) |
1917 | 0 | { |
1918 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1919 | 0 | TIFFSwabLong8((uint64_t *)ma); |
1920 | 0 | err = TIFFReadDirEntryCheckRangeShortSlong8(*ma); |
1921 | 0 | if (err != TIFFReadDirEntryErrOk) |
1922 | 0 | break; |
1923 | 0 | *mb++ = (uint16_t)(*ma++); |
1924 | 0 | } |
1925 | 0 | } |
1926 | 0 | break; |
1927 | 0 | default: |
1928 | 0 | break; |
1929 | 0 | } |
1930 | 0 | _TIFFfreeExt(tif, origdata); |
1931 | 0 | if (err != TIFFReadDirEntryErrOk) |
1932 | 0 | { |
1933 | 0 | _TIFFfreeExt(tif, data); |
1934 | 0 | return (err); |
1935 | 0 | } |
1936 | 0 | *value = data; |
1937 | 0 | return (TIFFReadDirEntryErrOk); |
1938 | 0 | } |
1939 | | |
1940 | | static enum TIFFReadDirEntryErr |
1941 | | TIFFReadDirEntrySshortArray(TIFF *tif, TIFFDirEntry *direntry, int16_t **value) |
1942 | 0 | { |
1943 | 0 | enum TIFFReadDirEntryErr err; |
1944 | 0 | uint32_t count; |
1945 | 0 | void *origdata; |
1946 | 0 | int16_t *data; |
1947 | 0 | switch (direntry->tdir_type) |
1948 | 0 | { |
1949 | 0 | case TIFF_BYTE: |
1950 | 0 | case TIFF_SBYTE: |
1951 | 0 | case TIFF_SHORT: |
1952 | 0 | case TIFF_SSHORT: |
1953 | 0 | case TIFF_LONG: |
1954 | 0 | case TIFF_SLONG: |
1955 | 0 | case TIFF_LONG8: |
1956 | 0 | case TIFF_SLONG8: |
1957 | 0 | break; |
1958 | 0 | default: |
1959 | 0 | return (TIFFReadDirEntryErrType); |
1960 | 0 | } |
1961 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 2, &origdata); |
1962 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
1963 | 0 | { |
1964 | 0 | *value = 0; |
1965 | 0 | return (err); |
1966 | 0 | } |
1967 | 0 | switch (direntry->tdir_type) |
1968 | 0 | { |
1969 | 0 | case TIFF_SHORT: |
1970 | 0 | { |
1971 | 0 | uint16_t *m; |
1972 | 0 | uint32_t n; |
1973 | 0 | m = (uint16_t *)origdata; |
1974 | 0 | for (n = 0; n < count; n++) |
1975 | 0 | { |
1976 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1977 | 0 | TIFFSwabShort(m); |
1978 | 0 | err = TIFFReadDirEntryCheckRangeSshortShort(*m); |
1979 | 0 | if (err != TIFFReadDirEntryErrOk) |
1980 | 0 | { |
1981 | 0 | _TIFFfreeExt(tif, origdata); |
1982 | 0 | return (err); |
1983 | 0 | } |
1984 | 0 | m++; |
1985 | 0 | } |
1986 | 0 | *value = (int16_t *)origdata; |
1987 | 0 | return (TIFFReadDirEntryErrOk); |
1988 | 0 | } |
1989 | 0 | case TIFF_SSHORT: |
1990 | 0 | *value = (int16_t *)origdata; |
1991 | 0 | if (tif->tif_flags & TIFF_SWAB) |
1992 | 0 | TIFFSwabArrayOfShort((uint16_t *)(*value), count); |
1993 | 0 | return (TIFFReadDirEntryErrOk); |
1994 | 0 | default: |
1995 | 0 | break; |
1996 | 0 | } |
1997 | 0 | data = (int16_t *)_TIFFmallocExt(tif, count * 2); |
1998 | 0 | if (data == 0) |
1999 | 0 | { |
2000 | 0 | _TIFFfreeExt(tif, origdata); |
2001 | 0 | return (TIFFReadDirEntryErrAlloc); |
2002 | 0 | } |
2003 | 0 | switch (direntry->tdir_type) |
2004 | 0 | { |
2005 | 0 | case TIFF_BYTE: |
2006 | 0 | { |
2007 | 0 | uint8_t *ma; |
2008 | 0 | int16_t *mb; |
2009 | 0 | uint32_t n; |
2010 | 0 | ma = (uint8_t *)origdata; |
2011 | 0 | mb = data; |
2012 | 0 | for (n = 0; n < count; n++) |
2013 | 0 | *mb++ = (int16_t)(*ma++); |
2014 | 0 | } |
2015 | 0 | break; |
2016 | 0 | case TIFF_SBYTE: |
2017 | 0 | { |
2018 | 0 | int8_t *ma; |
2019 | 0 | int16_t *mb; |
2020 | 0 | uint32_t n; |
2021 | 0 | ma = (int8_t *)origdata; |
2022 | 0 | mb = data; |
2023 | 0 | for (n = 0; n < count; n++) |
2024 | 0 | *mb++ = (int16_t)(*ma++); |
2025 | 0 | } |
2026 | 0 | break; |
2027 | 0 | case TIFF_LONG: |
2028 | 0 | { |
2029 | 0 | uint32_t *ma; |
2030 | 0 | int16_t *mb; |
2031 | 0 | uint32_t n; |
2032 | 0 | ma = (uint32_t *)origdata; |
2033 | 0 | mb = data; |
2034 | 0 | for (n = 0; n < count; n++) |
2035 | 0 | { |
2036 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2037 | 0 | TIFFSwabLong(ma); |
2038 | 0 | err = TIFFReadDirEntryCheckRangeSshortLong(*ma); |
2039 | 0 | if (err != TIFFReadDirEntryErrOk) |
2040 | 0 | break; |
2041 | 0 | *mb++ = (int16_t)(*ma++); |
2042 | 0 | } |
2043 | 0 | } |
2044 | 0 | break; |
2045 | 0 | case TIFF_SLONG: |
2046 | 0 | { |
2047 | 0 | int32_t *ma; |
2048 | 0 | int16_t *mb; |
2049 | 0 | uint32_t n; |
2050 | 0 | ma = (int32_t *)origdata; |
2051 | 0 | mb = data; |
2052 | 0 | for (n = 0; n < count; n++) |
2053 | 0 | { |
2054 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2055 | 0 | TIFFSwabLong((uint32_t *)ma); |
2056 | 0 | err = TIFFReadDirEntryCheckRangeSshortSlong(*ma); |
2057 | 0 | if (err != TIFFReadDirEntryErrOk) |
2058 | 0 | break; |
2059 | 0 | *mb++ = (int16_t)(*ma++); |
2060 | 0 | } |
2061 | 0 | } |
2062 | 0 | break; |
2063 | 0 | case TIFF_LONG8: |
2064 | 0 | { |
2065 | 0 | uint64_t *ma; |
2066 | 0 | int16_t *mb; |
2067 | 0 | uint32_t n; |
2068 | 0 | ma = (uint64_t *)origdata; |
2069 | 0 | mb = data; |
2070 | 0 | for (n = 0; n < count; n++) |
2071 | 0 | { |
2072 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2073 | 0 | TIFFSwabLong8(ma); |
2074 | 0 | err = TIFFReadDirEntryCheckRangeSshortLong8(*ma); |
2075 | 0 | if (err != TIFFReadDirEntryErrOk) |
2076 | 0 | break; |
2077 | 0 | *mb++ = (int16_t)(*ma++); |
2078 | 0 | } |
2079 | 0 | } |
2080 | 0 | break; |
2081 | 0 | case TIFF_SLONG8: |
2082 | 0 | { |
2083 | 0 | int64_t *ma; |
2084 | 0 | int16_t *mb; |
2085 | 0 | uint32_t n; |
2086 | 0 | ma = (int64_t *)origdata; |
2087 | 0 | mb = data; |
2088 | 0 | for (n = 0; n < count; n++) |
2089 | 0 | { |
2090 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2091 | 0 | TIFFSwabLong8((uint64_t *)ma); |
2092 | 0 | err = TIFFReadDirEntryCheckRangeSshortSlong8(*ma); |
2093 | 0 | if (err != TIFFReadDirEntryErrOk) |
2094 | 0 | break; |
2095 | 0 | *mb++ = (int16_t)(*ma++); |
2096 | 0 | } |
2097 | 0 | } |
2098 | 0 | break; |
2099 | 0 | default: |
2100 | 0 | break; |
2101 | 0 | } |
2102 | 0 | _TIFFfreeExt(tif, origdata); |
2103 | 0 | if (err != TIFFReadDirEntryErrOk) |
2104 | 0 | { |
2105 | 0 | _TIFFfreeExt(tif, data); |
2106 | 0 | return (err); |
2107 | 0 | } |
2108 | 0 | *value = data; |
2109 | 0 | return (TIFFReadDirEntryErrOk); |
2110 | 0 | } |
2111 | | |
2112 | | static enum TIFFReadDirEntryErr |
2113 | | TIFFReadDirEntryLongArray(TIFF *tif, TIFFDirEntry *direntry, uint32_t **value) |
2114 | 0 | { |
2115 | 0 | enum TIFFReadDirEntryErr err; |
2116 | 0 | uint32_t count; |
2117 | 0 | void *origdata; |
2118 | 0 | uint32_t *data; |
2119 | 0 | switch (direntry->tdir_type) |
2120 | 0 | { |
2121 | 0 | case TIFF_BYTE: |
2122 | 0 | case TIFF_SBYTE: |
2123 | 0 | case TIFF_SHORT: |
2124 | 0 | case TIFF_SSHORT: |
2125 | 0 | case TIFF_LONG: |
2126 | 0 | case TIFF_SLONG: |
2127 | 0 | case TIFF_LONG8: |
2128 | 0 | case TIFF_SLONG8: |
2129 | 0 | case TIFF_IFD: |
2130 | 0 | case TIFF_IFD8: |
2131 | 0 | break; |
2132 | 0 | default: |
2133 | 0 | return (TIFFReadDirEntryErrType); |
2134 | 0 | } |
2135 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 4, &origdata); |
2136 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
2137 | 0 | { |
2138 | 0 | *value = 0; |
2139 | 0 | return (err); |
2140 | 0 | } |
2141 | 0 | switch (direntry->tdir_type) |
2142 | 0 | { |
2143 | 0 | case TIFF_LONG: |
2144 | 0 | case TIFF_IFD: |
2145 | 0 | *value = (uint32_t *)origdata; |
2146 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2147 | 0 | TIFFSwabArrayOfLong(*value, count); |
2148 | 0 | return (TIFFReadDirEntryErrOk); |
2149 | 0 | case TIFF_SLONG: |
2150 | 0 | { |
2151 | 0 | int32_t *m; |
2152 | 0 | uint32_t n; |
2153 | 0 | m = (int32_t *)origdata; |
2154 | 0 | for (n = 0; n < count; n++) |
2155 | 0 | { |
2156 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2157 | 0 | TIFFSwabLong((uint32_t *)m); |
2158 | 0 | err = TIFFReadDirEntryCheckRangeLongSlong(*m); |
2159 | 0 | if (err != TIFFReadDirEntryErrOk) |
2160 | 0 | { |
2161 | 0 | _TIFFfreeExt(tif, origdata); |
2162 | 0 | return (err); |
2163 | 0 | } |
2164 | 0 | m++; |
2165 | 0 | } |
2166 | 0 | *value = (uint32_t *)origdata; |
2167 | 0 | return (TIFFReadDirEntryErrOk); |
2168 | 0 | } |
2169 | 0 | default: |
2170 | 0 | break; |
2171 | 0 | } |
2172 | 0 | data = (uint32_t *)_TIFFmallocExt(tif, count * 4); |
2173 | 0 | if (data == 0) |
2174 | 0 | { |
2175 | 0 | _TIFFfreeExt(tif, origdata); |
2176 | 0 | return (TIFFReadDirEntryErrAlloc); |
2177 | 0 | } |
2178 | 0 | switch (direntry->tdir_type) |
2179 | 0 | { |
2180 | 0 | case TIFF_BYTE: |
2181 | 0 | { |
2182 | 0 | uint8_t *ma; |
2183 | 0 | uint32_t *mb; |
2184 | 0 | uint32_t n; |
2185 | 0 | ma = (uint8_t *)origdata; |
2186 | 0 | mb = data; |
2187 | 0 | for (n = 0; n < count; n++) |
2188 | 0 | *mb++ = (uint32_t)(*ma++); |
2189 | 0 | } |
2190 | 0 | break; |
2191 | 0 | case TIFF_SBYTE: |
2192 | 0 | { |
2193 | 0 | int8_t *ma; |
2194 | 0 | uint32_t *mb; |
2195 | 0 | uint32_t n; |
2196 | 0 | ma = (int8_t *)origdata; |
2197 | 0 | mb = data; |
2198 | 0 | for (n = 0; n < count; n++) |
2199 | 0 | { |
2200 | 0 | err = TIFFReadDirEntryCheckRangeLongSbyte(*ma); |
2201 | 0 | if (err != TIFFReadDirEntryErrOk) |
2202 | 0 | break; |
2203 | 0 | *mb++ = (uint32_t)(*ma++); |
2204 | 0 | } |
2205 | 0 | } |
2206 | 0 | break; |
2207 | 0 | case TIFF_SHORT: |
2208 | 0 | { |
2209 | 0 | uint16_t *ma; |
2210 | 0 | uint32_t *mb; |
2211 | 0 | uint32_t n; |
2212 | 0 | ma = (uint16_t *)origdata; |
2213 | 0 | mb = data; |
2214 | 0 | for (n = 0; n < count; n++) |
2215 | 0 | { |
2216 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2217 | 0 | TIFFSwabShort(ma); |
2218 | 0 | *mb++ = (uint32_t)(*ma++); |
2219 | 0 | } |
2220 | 0 | } |
2221 | 0 | break; |
2222 | 0 | case TIFF_SSHORT: |
2223 | 0 | { |
2224 | 0 | int16_t *ma; |
2225 | 0 | uint32_t *mb; |
2226 | 0 | uint32_t n; |
2227 | 0 | ma = (int16_t *)origdata; |
2228 | 0 | mb = data; |
2229 | 0 | for (n = 0; n < count; n++) |
2230 | 0 | { |
2231 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2232 | 0 | TIFFSwabShort((uint16_t *)ma); |
2233 | 0 | err = TIFFReadDirEntryCheckRangeLongSshort(*ma); |
2234 | 0 | if (err != TIFFReadDirEntryErrOk) |
2235 | 0 | break; |
2236 | 0 | *mb++ = (uint32_t)(*ma++); |
2237 | 0 | } |
2238 | 0 | } |
2239 | 0 | break; |
2240 | 0 | case TIFF_LONG8: |
2241 | 0 | case TIFF_IFD8: |
2242 | 0 | { |
2243 | 0 | uint64_t *ma; |
2244 | 0 | uint32_t *mb; |
2245 | 0 | uint32_t n; |
2246 | 0 | ma = (uint64_t *)origdata; |
2247 | 0 | mb = data; |
2248 | 0 | for (n = 0; n < count; n++) |
2249 | 0 | { |
2250 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2251 | 0 | TIFFSwabLong8(ma); |
2252 | 0 | err = TIFFReadDirEntryCheckRangeLongLong8(*ma); |
2253 | 0 | if (err != TIFFReadDirEntryErrOk) |
2254 | 0 | break; |
2255 | 0 | *mb++ = (uint32_t)(*ma++); |
2256 | 0 | } |
2257 | 0 | } |
2258 | 0 | break; |
2259 | 0 | case TIFF_SLONG8: |
2260 | 0 | { |
2261 | 0 | int64_t *ma; |
2262 | 0 | uint32_t *mb; |
2263 | 0 | uint32_t n; |
2264 | 0 | ma = (int64_t *)origdata; |
2265 | 0 | mb = data; |
2266 | 0 | for (n = 0; n < count; n++) |
2267 | 0 | { |
2268 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2269 | 0 | TIFFSwabLong8((uint64_t *)ma); |
2270 | 0 | err = TIFFReadDirEntryCheckRangeLongSlong8(*ma); |
2271 | 0 | if (err != TIFFReadDirEntryErrOk) |
2272 | 0 | break; |
2273 | 0 | *mb++ = (uint32_t)(*ma++); |
2274 | 0 | } |
2275 | 0 | } |
2276 | 0 | break; |
2277 | 0 | default: |
2278 | 0 | break; |
2279 | 0 | } |
2280 | 0 | _TIFFfreeExt(tif, origdata); |
2281 | 0 | if (err != TIFFReadDirEntryErrOk) |
2282 | 0 | { |
2283 | 0 | _TIFFfreeExt(tif, data); |
2284 | 0 | return (err); |
2285 | 0 | } |
2286 | 0 | *value = data; |
2287 | 0 | return (TIFFReadDirEntryErrOk); |
2288 | 0 | } |
2289 | | |
2290 | | static enum TIFFReadDirEntryErr |
2291 | | TIFFReadDirEntrySlongArray(TIFF *tif, TIFFDirEntry *direntry, int32_t **value) |
2292 | 0 | { |
2293 | 0 | enum TIFFReadDirEntryErr err; |
2294 | 0 | uint32_t count; |
2295 | 0 | void *origdata; |
2296 | 0 | int32_t *data; |
2297 | 0 | switch (direntry->tdir_type) |
2298 | 0 | { |
2299 | 0 | case TIFF_BYTE: |
2300 | 0 | case TIFF_SBYTE: |
2301 | 0 | case TIFF_SHORT: |
2302 | 0 | case TIFF_SSHORT: |
2303 | 0 | case TIFF_LONG: |
2304 | 0 | case TIFF_SLONG: |
2305 | 0 | case TIFF_LONG8: |
2306 | 0 | case TIFF_SLONG8: |
2307 | 0 | break; |
2308 | 0 | default: |
2309 | 0 | return (TIFFReadDirEntryErrType); |
2310 | 0 | } |
2311 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 4, &origdata); |
2312 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
2313 | 0 | { |
2314 | 0 | *value = 0; |
2315 | 0 | return (err); |
2316 | 0 | } |
2317 | 0 | switch (direntry->tdir_type) |
2318 | 0 | { |
2319 | 0 | case TIFF_LONG: |
2320 | 0 | { |
2321 | 0 | uint32_t *m; |
2322 | 0 | uint32_t n; |
2323 | 0 | m = (uint32_t *)origdata; |
2324 | 0 | for (n = 0; n < count; n++) |
2325 | 0 | { |
2326 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2327 | 0 | TIFFSwabLong((uint32_t *)m); |
2328 | 0 | err = TIFFReadDirEntryCheckRangeSlongLong(*m); |
2329 | 0 | if (err != TIFFReadDirEntryErrOk) |
2330 | 0 | { |
2331 | 0 | _TIFFfreeExt(tif, origdata); |
2332 | 0 | return (err); |
2333 | 0 | } |
2334 | 0 | m++; |
2335 | 0 | } |
2336 | 0 | *value = (int32_t *)origdata; |
2337 | 0 | return (TIFFReadDirEntryErrOk); |
2338 | 0 | } |
2339 | 0 | case TIFF_SLONG: |
2340 | 0 | *value = (int32_t *)origdata; |
2341 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2342 | 0 | TIFFSwabArrayOfLong((uint32_t *)(*value), count); |
2343 | 0 | return (TIFFReadDirEntryErrOk); |
2344 | 0 | default: |
2345 | 0 | break; |
2346 | 0 | } |
2347 | 0 | data = (int32_t *)_TIFFmallocExt(tif, count * 4); |
2348 | 0 | if (data == 0) |
2349 | 0 | { |
2350 | 0 | _TIFFfreeExt(tif, origdata); |
2351 | 0 | return (TIFFReadDirEntryErrAlloc); |
2352 | 0 | } |
2353 | 0 | switch (direntry->tdir_type) |
2354 | 0 | { |
2355 | 0 | case TIFF_BYTE: |
2356 | 0 | { |
2357 | 0 | uint8_t *ma; |
2358 | 0 | int32_t *mb; |
2359 | 0 | uint32_t n; |
2360 | 0 | ma = (uint8_t *)origdata; |
2361 | 0 | mb = data; |
2362 | 0 | for (n = 0; n < count; n++) |
2363 | 0 | *mb++ = (int32_t)(*ma++); |
2364 | 0 | } |
2365 | 0 | break; |
2366 | 0 | case TIFF_SBYTE: |
2367 | 0 | { |
2368 | 0 | int8_t *ma; |
2369 | 0 | int32_t *mb; |
2370 | 0 | uint32_t n; |
2371 | 0 | ma = (int8_t *)origdata; |
2372 | 0 | mb = data; |
2373 | 0 | for (n = 0; n < count; n++) |
2374 | 0 | *mb++ = (int32_t)(*ma++); |
2375 | 0 | } |
2376 | 0 | break; |
2377 | 0 | case TIFF_SHORT: |
2378 | 0 | { |
2379 | 0 | uint16_t *ma; |
2380 | 0 | int32_t *mb; |
2381 | 0 | uint32_t n; |
2382 | 0 | ma = (uint16_t *)origdata; |
2383 | 0 | mb = data; |
2384 | 0 | for (n = 0; n < count; n++) |
2385 | 0 | { |
2386 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2387 | 0 | TIFFSwabShort(ma); |
2388 | 0 | *mb++ = (int32_t)(*ma++); |
2389 | 0 | } |
2390 | 0 | } |
2391 | 0 | break; |
2392 | 0 | case TIFF_SSHORT: |
2393 | 0 | { |
2394 | 0 | int16_t *ma; |
2395 | 0 | int32_t *mb; |
2396 | 0 | uint32_t n; |
2397 | 0 | ma = (int16_t *)origdata; |
2398 | 0 | mb = data; |
2399 | 0 | for (n = 0; n < count; n++) |
2400 | 0 | { |
2401 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2402 | 0 | TIFFSwabShort((uint16_t *)ma); |
2403 | 0 | *mb++ = (int32_t)(*ma++); |
2404 | 0 | } |
2405 | 0 | } |
2406 | 0 | break; |
2407 | 0 | case TIFF_LONG8: |
2408 | 0 | { |
2409 | 0 | uint64_t *ma; |
2410 | 0 | int32_t *mb; |
2411 | 0 | uint32_t n; |
2412 | 0 | ma = (uint64_t *)origdata; |
2413 | 0 | mb = data; |
2414 | 0 | for (n = 0; n < count; n++) |
2415 | 0 | { |
2416 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2417 | 0 | TIFFSwabLong8(ma); |
2418 | 0 | err = TIFFReadDirEntryCheckRangeSlongLong8(*ma); |
2419 | 0 | if (err != TIFFReadDirEntryErrOk) |
2420 | 0 | break; |
2421 | 0 | *mb++ = (int32_t)(*ma++); |
2422 | 0 | } |
2423 | 0 | } |
2424 | 0 | break; |
2425 | 0 | case TIFF_SLONG8: |
2426 | 0 | { |
2427 | 0 | int64_t *ma; |
2428 | 0 | int32_t *mb; |
2429 | 0 | uint32_t n; |
2430 | 0 | ma = (int64_t *)origdata; |
2431 | 0 | mb = data; |
2432 | 0 | for (n = 0; n < count; n++) |
2433 | 0 | { |
2434 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2435 | 0 | TIFFSwabLong8((uint64_t *)ma); |
2436 | 0 | err = TIFFReadDirEntryCheckRangeSlongSlong8(*ma); |
2437 | 0 | if (err != TIFFReadDirEntryErrOk) |
2438 | 0 | break; |
2439 | 0 | *mb++ = (int32_t)(*ma++); |
2440 | 0 | } |
2441 | 0 | } |
2442 | 0 | break; |
2443 | 0 | default: |
2444 | 0 | break; |
2445 | 0 | } |
2446 | 0 | _TIFFfreeExt(tif, origdata); |
2447 | 0 | if (err != TIFFReadDirEntryErrOk) |
2448 | 0 | { |
2449 | 0 | _TIFFfreeExt(tif, data); |
2450 | 0 | return (err); |
2451 | 0 | } |
2452 | 0 | *value = data; |
2453 | 0 | return (TIFFReadDirEntryErrOk); |
2454 | 0 | } |
2455 | | |
2456 | | static enum TIFFReadDirEntryErr |
2457 | | TIFFReadDirEntryLong8ArrayWithLimit(TIFF *tif, TIFFDirEntry *direntry, |
2458 | | uint64_t **value, uint64_t maxcount) |
2459 | 0 | { |
2460 | 0 | enum TIFFReadDirEntryErr err; |
2461 | 0 | uint32_t count; |
2462 | 0 | void *origdata; |
2463 | 0 | uint64_t *data; |
2464 | 0 | switch (direntry->tdir_type) |
2465 | 0 | { |
2466 | 0 | case TIFF_BYTE: |
2467 | 0 | case TIFF_SBYTE: |
2468 | 0 | case TIFF_SHORT: |
2469 | 0 | case TIFF_SSHORT: |
2470 | 0 | case TIFF_LONG: |
2471 | 0 | case TIFF_SLONG: |
2472 | 0 | case TIFF_LONG8: |
2473 | 0 | case TIFF_SLONG8: |
2474 | 0 | case TIFF_IFD: |
2475 | 0 | case TIFF_IFD8: |
2476 | 0 | break; |
2477 | 0 | default: |
2478 | 0 | return (TIFFReadDirEntryErrType); |
2479 | 0 | } |
2480 | 0 | err = TIFFReadDirEntryArrayWithLimit(tif, direntry, &count, 8, &origdata, |
2481 | 0 | maxcount); |
2482 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
2483 | 0 | { |
2484 | 0 | *value = 0; |
2485 | 0 | return (err); |
2486 | 0 | } |
2487 | 0 | switch (direntry->tdir_type) |
2488 | 0 | { |
2489 | 0 | case TIFF_LONG8: |
2490 | 0 | case TIFF_IFD8: |
2491 | 0 | *value = (uint64_t *)origdata; |
2492 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2493 | 0 | TIFFSwabArrayOfLong8(*value, count); |
2494 | 0 | return (TIFFReadDirEntryErrOk); |
2495 | 0 | case TIFF_SLONG8: |
2496 | 0 | { |
2497 | 0 | int64_t *m; |
2498 | 0 | uint32_t n; |
2499 | 0 | m = (int64_t *)origdata; |
2500 | 0 | for (n = 0; n < count; n++) |
2501 | 0 | { |
2502 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2503 | 0 | TIFFSwabLong8((uint64_t *)m); |
2504 | 0 | err = TIFFReadDirEntryCheckRangeLong8Slong8(*m); |
2505 | 0 | if (err != TIFFReadDirEntryErrOk) |
2506 | 0 | { |
2507 | 0 | _TIFFfreeExt(tif, origdata); |
2508 | 0 | return (err); |
2509 | 0 | } |
2510 | 0 | m++; |
2511 | 0 | } |
2512 | 0 | *value = (uint64_t *)origdata; |
2513 | 0 | return (TIFFReadDirEntryErrOk); |
2514 | 0 | } |
2515 | 0 | default: |
2516 | 0 | break; |
2517 | 0 | } |
2518 | 0 | data = (uint64_t *)_TIFFmallocExt(tif, count * 8); |
2519 | 0 | if (data == 0) |
2520 | 0 | { |
2521 | 0 | _TIFFfreeExt(tif, origdata); |
2522 | 0 | return (TIFFReadDirEntryErrAlloc); |
2523 | 0 | } |
2524 | 0 | switch (direntry->tdir_type) |
2525 | 0 | { |
2526 | 0 | case TIFF_BYTE: |
2527 | 0 | { |
2528 | 0 | uint8_t *ma; |
2529 | 0 | uint64_t *mb; |
2530 | 0 | uint32_t n; |
2531 | 0 | ma = (uint8_t *)origdata; |
2532 | 0 | mb = data; |
2533 | 0 | for (n = 0; n < count; n++) |
2534 | 0 | *mb++ = (uint64_t)(*ma++); |
2535 | 0 | } |
2536 | 0 | break; |
2537 | 0 | case TIFF_SBYTE: |
2538 | 0 | { |
2539 | 0 | int8_t *ma; |
2540 | 0 | uint64_t *mb; |
2541 | 0 | uint32_t n; |
2542 | 0 | ma = (int8_t *)origdata; |
2543 | 0 | mb = data; |
2544 | 0 | for (n = 0; n < count; n++) |
2545 | 0 | { |
2546 | 0 | err = TIFFReadDirEntryCheckRangeLong8Sbyte(*ma); |
2547 | 0 | if (err != TIFFReadDirEntryErrOk) |
2548 | 0 | break; |
2549 | 0 | *mb++ = (uint64_t)(*ma++); |
2550 | 0 | } |
2551 | 0 | } |
2552 | 0 | break; |
2553 | 0 | case TIFF_SHORT: |
2554 | 0 | { |
2555 | 0 | uint16_t *ma; |
2556 | 0 | uint64_t *mb; |
2557 | 0 | uint32_t n; |
2558 | 0 | ma = (uint16_t *)origdata; |
2559 | 0 | mb = data; |
2560 | 0 | for (n = 0; n < count; n++) |
2561 | 0 | { |
2562 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2563 | 0 | TIFFSwabShort(ma); |
2564 | 0 | *mb++ = (uint64_t)(*ma++); |
2565 | 0 | } |
2566 | 0 | } |
2567 | 0 | break; |
2568 | 0 | case TIFF_SSHORT: |
2569 | 0 | { |
2570 | 0 | int16_t *ma; |
2571 | 0 | uint64_t *mb; |
2572 | 0 | uint32_t n; |
2573 | 0 | ma = (int16_t *)origdata; |
2574 | 0 | mb = data; |
2575 | 0 | for (n = 0; n < count; n++) |
2576 | 0 | { |
2577 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2578 | 0 | TIFFSwabShort((uint16_t *)ma); |
2579 | 0 | err = TIFFReadDirEntryCheckRangeLong8Sshort(*ma); |
2580 | 0 | if (err != TIFFReadDirEntryErrOk) |
2581 | 0 | break; |
2582 | 0 | *mb++ = (uint64_t)(*ma++); |
2583 | 0 | } |
2584 | 0 | } |
2585 | 0 | break; |
2586 | 0 | case TIFF_LONG: |
2587 | 0 | case TIFF_IFD: |
2588 | 0 | { |
2589 | 0 | uint32_t *ma; |
2590 | 0 | uint64_t *mb; |
2591 | 0 | uint32_t n; |
2592 | 0 | ma = (uint32_t *)origdata; |
2593 | 0 | mb = data; |
2594 | 0 | for (n = 0; n < count; n++) |
2595 | 0 | { |
2596 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2597 | 0 | TIFFSwabLong(ma); |
2598 | 0 | *mb++ = (uint64_t)(*ma++); |
2599 | 0 | } |
2600 | 0 | } |
2601 | 0 | break; |
2602 | 0 | case TIFF_SLONG: |
2603 | 0 | { |
2604 | 0 | int32_t *ma; |
2605 | 0 | uint64_t *mb; |
2606 | 0 | uint32_t n; |
2607 | 0 | ma = (int32_t *)origdata; |
2608 | 0 | mb = data; |
2609 | 0 | for (n = 0; n < count; n++) |
2610 | 0 | { |
2611 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2612 | 0 | TIFFSwabLong((uint32_t *)ma); |
2613 | 0 | err = TIFFReadDirEntryCheckRangeLong8Slong(*ma); |
2614 | 0 | if (err != TIFFReadDirEntryErrOk) |
2615 | 0 | break; |
2616 | 0 | *mb++ = (uint64_t)(*ma++); |
2617 | 0 | } |
2618 | 0 | } |
2619 | 0 | break; |
2620 | 0 | default: |
2621 | 0 | break; |
2622 | 0 | } |
2623 | 0 | _TIFFfreeExt(tif, origdata); |
2624 | 0 | if (err != TIFFReadDirEntryErrOk) |
2625 | 0 | { |
2626 | 0 | _TIFFfreeExt(tif, data); |
2627 | 0 | return (err); |
2628 | 0 | } |
2629 | 0 | *value = data; |
2630 | 0 | return (TIFFReadDirEntryErrOk); |
2631 | 0 | } |
2632 | | |
2633 | | static enum TIFFReadDirEntryErr |
2634 | | TIFFReadDirEntryLong8Array(TIFF *tif, TIFFDirEntry *direntry, uint64_t **value) |
2635 | 0 | { |
2636 | 0 | return TIFFReadDirEntryLong8ArrayWithLimit(tif, direntry, value, |
2637 | 0 | ~((uint64_t)0)); |
2638 | 0 | } |
2639 | | |
2640 | | static enum TIFFReadDirEntryErr |
2641 | | TIFFReadDirEntrySlong8Array(TIFF *tif, TIFFDirEntry *direntry, int64_t **value) |
2642 | 0 | { |
2643 | 0 | enum TIFFReadDirEntryErr err; |
2644 | 0 | uint32_t count; |
2645 | 0 | void *origdata; |
2646 | 0 | int64_t *data; |
2647 | 0 | switch (direntry->tdir_type) |
2648 | 0 | { |
2649 | 0 | case TIFF_BYTE: |
2650 | 0 | case TIFF_SBYTE: |
2651 | 0 | case TIFF_SHORT: |
2652 | 0 | case TIFF_SSHORT: |
2653 | 0 | case TIFF_LONG: |
2654 | 0 | case TIFF_SLONG: |
2655 | 0 | case TIFF_LONG8: |
2656 | 0 | case TIFF_SLONG8: |
2657 | 0 | break; |
2658 | 0 | default: |
2659 | 0 | return (TIFFReadDirEntryErrType); |
2660 | 0 | } |
2661 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 8, &origdata); |
2662 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
2663 | 0 | { |
2664 | 0 | *value = 0; |
2665 | 0 | return (err); |
2666 | 0 | } |
2667 | 0 | switch (direntry->tdir_type) |
2668 | 0 | { |
2669 | 0 | case TIFF_LONG8: |
2670 | 0 | { |
2671 | 0 | uint64_t *m; |
2672 | 0 | uint32_t n; |
2673 | 0 | m = (uint64_t *)origdata; |
2674 | 0 | for (n = 0; n < count; n++) |
2675 | 0 | { |
2676 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2677 | 0 | TIFFSwabLong8(m); |
2678 | 0 | err = TIFFReadDirEntryCheckRangeSlong8Long8(*m); |
2679 | 0 | if (err != TIFFReadDirEntryErrOk) |
2680 | 0 | { |
2681 | 0 | _TIFFfreeExt(tif, origdata); |
2682 | 0 | return (err); |
2683 | 0 | } |
2684 | 0 | m++; |
2685 | 0 | } |
2686 | 0 | *value = (int64_t *)origdata; |
2687 | 0 | return (TIFFReadDirEntryErrOk); |
2688 | 0 | } |
2689 | 0 | case TIFF_SLONG8: |
2690 | 0 | *value = (int64_t *)origdata; |
2691 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2692 | 0 | TIFFSwabArrayOfLong8((uint64_t *)(*value), count); |
2693 | 0 | return (TIFFReadDirEntryErrOk); |
2694 | 0 | default: |
2695 | 0 | break; |
2696 | 0 | } |
2697 | 0 | data = (int64_t *)_TIFFmallocExt(tif, count * 8); |
2698 | 0 | if (data == 0) |
2699 | 0 | { |
2700 | 0 | _TIFFfreeExt(tif, origdata); |
2701 | 0 | return (TIFFReadDirEntryErrAlloc); |
2702 | 0 | } |
2703 | 0 | switch (direntry->tdir_type) |
2704 | 0 | { |
2705 | 0 | case TIFF_BYTE: |
2706 | 0 | { |
2707 | 0 | uint8_t *ma; |
2708 | 0 | int64_t *mb; |
2709 | 0 | uint32_t n; |
2710 | 0 | ma = (uint8_t *)origdata; |
2711 | 0 | mb = data; |
2712 | 0 | for (n = 0; n < count; n++) |
2713 | 0 | *mb++ = (int64_t)(*ma++); |
2714 | 0 | } |
2715 | 0 | break; |
2716 | 0 | case TIFF_SBYTE: |
2717 | 0 | { |
2718 | 0 | int8_t *ma; |
2719 | 0 | int64_t *mb; |
2720 | 0 | uint32_t n; |
2721 | 0 | ma = (int8_t *)origdata; |
2722 | 0 | mb = data; |
2723 | 0 | for (n = 0; n < count; n++) |
2724 | 0 | *mb++ = (int64_t)(*ma++); |
2725 | 0 | } |
2726 | 0 | break; |
2727 | 0 | case TIFF_SHORT: |
2728 | 0 | { |
2729 | 0 | uint16_t *ma; |
2730 | 0 | int64_t *mb; |
2731 | 0 | uint32_t n; |
2732 | 0 | ma = (uint16_t *)origdata; |
2733 | 0 | mb = data; |
2734 | 0 | for (n = 0; n < count; n++) |
2735 | 0 | { |
2736 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2737 | 0 | TIFFSwabShort(ma); |
2738 | 0 | *mb++ = (int64_t)(*ma++); |
2739 | 0 | } |
2740 | 0 | } |
2741 | 0 | break; |
2742 | 0 | case TIFF_SSHORT: |
2743 | 0 | { |
2744 | 0 | int16_t *ma; |
2745 | 0 | int64_t *mb; |
2746 | 0 | uint32_t n; |
2747 | 0 | ma = (int16_t *)origdata; |
2748 | 0 | mb = data; |
2749 | 0 | for (n = 0; n < count; n++) |
2750 | 0 | { |
2751 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2752 | 0 | TIFFSwabShort((uint16_t *)ma); |
2753 | 0 | *mb++ = (int64_t)(*ma++); |
2754 | 0 | } |
2755 | 0 | } |
2756 | 0 | break; |
2757 | 0 | case TIFF_LONG: |
2758 | 0 | { |
2759 | 0 | uint32_t *ma; |
2760 | 0 | int64_t *mb; |
2761 | 0 | uint32_t n; |
2762 | 0 | ma = (uint32_t *)origdata; |
2763 | 0 | mb = data; |
2764 | 0 | for (n = 0; n < count; n++) |
2765 | 0 | { |
2766 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2767 | 0 | TIFFSwabLong(ma); |
2768 | 0 | *mb++ = (int64_t)(*ma++); |
2769 | 0 | } |
2770 | 0 | } |
2771 | 0 | break; |
2772 | 0 | case TIFF_SLONG: |
2773 | 0 | { |
2774 | 0 | int32_t *ma; |
2775 | 0 | int64_t *mb; |
2776 | 0 | uint32_t n; |
2777 | 0 | ma = (int32_t *)origdata; |
2778 | 0 | mb = data; |
2779 | 0 | for (n = 0; n < count; n++) |
2780 | 0 | { |
2781 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2782 | 0 | TIFFSwabLong((uint32_t *)ma); |
2783 | 0 | *mb++ = (int64_t)(*ma++); |
2784 | 0 | } |
2785 | 0 | } |
2786 | 0 | break; |
2787 | 0 | default: |
2788 | 0 | break; |
2789 | 0 | } |
2790 | 0 | _TIFFfreeExt(tif, origdata); |
2791 | 0 | *value = data; |
2792 | 0 | return (TIFFReadDirEntryErrOk); |
2793 | 0 | } |
2794 | | |
2795 | | static enum TIFFReadDirEntryErr |
2796 | | TIFFReadDirEntryFloatArray(TIFF *tif, TIFFDirEntry *direntry, float **value) |
2797 | 0 | { |
2798 | 0 | enum TIFFReadDirEntryErr err; |
2799 | 0 | uint32_t count; |
2800 | 0 | void *origdata; |
2801 | 0 | float *data; |
2802 | 0 | switch (direntry->tdir_type) |
2803 | 0 | { |
2804 | 0 | case TIFF_BYTE: |
2805 | 0 | case TIFF_SBYTE: |
2806 | 0 | case TIFF_SHORT: |
2807 | 0 | case TIFF_SSHORT: |
2808 | 0 | case TIFF_LONG: |
2809 | 0 | case TIFF_SLONG: |
2810 | 0 | case TIFF_LONG8: |
2811 | 0 | case TIFF_SLONG8: |
2812 | 0 | case TIFF_RATIONAL: |
2813 | 0 | case TIFF_SRATIONAL: |
2814 | 0 | case TIFF_FLOAT: |
2815 | 0 | case TIFF_DOUBLE: |
2816 | 0 | break; |
2817 | 0 | default: |
2818 | 0 | return (TIFFReadDirEntryErrType); |
2819 | 0 | } |
2820 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 4, &origdata); |
2821 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
2822 | 0 | { |
2823 | 0 | *value = 0; |
2824 | 0 | return (err); |
2825 | 0 | } |
2826 | 0 | switch (direntry->tdir_type) |
2827 | 0 | { |
2828 | 0 | case TIFF_FLOAT: |
2829 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2830 | 0 | TIFFSwabArrayOfLong((uint32_t *)origdata, count); |
2831 | 0 | TIFFCvtIEEEFloatToNative(tif, count, (float *)origdata); |
2832 | 0 | *value = (float *)origdata; |
2833 | 0 | return (TIFFReadDirEntryErrOk); |
2834 | 0 | default: |
2835 | 0 | break; |
2836 | 0 | } |
2837 | 0 | data = (float *)_TIFFmallocExt(tif, count * sizeof(float)); |
2838 | 0 | if (data == 0) |
2839 | 0 | { |
2840 | 0 | _TIFFfreeExt(tif, origdata); |
2841 | 0 | return (TIFFReadDirEntryErrAlloc); |
2842 | 0 | } |
2843 | 0 | switch (direntry->tdir_type) |
2844 | 0 | { |
2845 | 0 | case TIFF_BYTE: |
2846 | 0 | { |
2847 | 0 | uint8_t *ma; |
2848 | 0 | float *mb; |
2849 | 0 | uint32_t n; |
2850 | 0 | ma = (uint8_t *)origdata; |
2851 | 0 | mb = data; |
2852 | 0 | for (n = 0; n < count; n++) |
2853 | 0 | *mb++ = (float)(*ma++); |
2854 | 0 | } |
2855 | 0 | break; |
2856 | 0 | case TIFF_SBYTE: |
2857 | 0 | { |
2858 | 0 | int8_t *ma; |
2859 | 0 | float *mb; |
2860 | 0 | uint32_t n; |
2861 | 0 | ma = (int8_t *)origdata; |
2862 | 0 | mb = data; |
2863 | 0 | for (n = 0; n < count; n++) |
2864 | 0 | *mb++ = (float)(*ma++); |
2865 | 0 | } |
2866 | 0 | break; |
2867 | 0 | case TIFF_SHORT: |
2868 | 0 | { |
2869 | 0 | uint16_t *ma; |
2870 | 0 | float *mb; |
2871 | 0 | uint32_t n; |
2872 | 0 | ma = (uint16_t *)origdata; |
2873 | 0 | mb = data; |
2874 | 0 | for (n = 0; n < count; n++) |
2875 | 0 | { |
2876 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2877 | 0 | TIFFSwabShort(ma); |
2878 | 0 | *mb++ = (float)(*ma++); |
2879 | 0 | } |
2880 | 0 | } |
2881 | 0 | break; |
2882 | 0 | case TIFF_SSHORT: |
2883 | 0 | { |
2884 | 0 | int16_t *ma; |
2885 | 0 | float *mb; |
2886 | 0 | uint32_t n; |
2887 | 0 | ma = (int16_t *)origdata; |
2888 | 0 | mb = data; |
2889 | 0 | for (n = 0; n < count; n++) |
2890 | 0 | { |
2891 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2892 | 0 | TIFFSwabShort((uint16_t *)ma); |
2893 | 0 | *mb++ = (float)(*ma++); |
2894 | 0 | } |
2895 | 0 | } |
2896 | 0 | break; |
2897 | 0 | case TIFF_LONG: |
2898 | 0 | { |
2899 | 0 | uint32_t *ma; |
2900 | 0 | float *mb; |
2901 | 0 | uint32_t n; |
2902 | 0 | ma = (uint32_t *)origdata; |
2903 | 0 | mb = data; |
2904 | 0 | for (n = 0; n < count; n++) |
2905 | 0 | { |
2906 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2907 | 0 | TIFFSwabLong(ma); |
2908 | 0 | *mb++ = (float)(*ma++); |
2909 | 0 | } |
2910 | 0 | } |
2911 | 0 | break; |
2912 | 0 | case TIFF_SLONG: |
2913 | 0 | { |
2914 | 0 | int32_t *ma; |
2915 | 0 | float *mb; |
2916 | 0 | uint32_t n; |
2917 | 0 | ma = (int32_t *)origdata; |
2918 | 0 | mb = data; |
2919 | 0 | for (n = 0; n < count; n++) |
2920 | 0 | { |
2921 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2922 | 0 | TIFFSwabLong((uint32_t *)ma); |
2923 | 0 | *mb++ = (float)(*ma++); |
2924 | 0 | } |
2925 | 0 | } |
2926 | 0 | break; |
2927 | 0 | case TIFF_LONG8: |
2928 | 0 | { |
2929 | 0 | uint64_t *ma; |
2930 | 0 | float *mb; |
2931 | 0 | uint32_t n; |
2932 | 0 | ma = (uint64_t *)origdata; |
2933 | 0 | mb = data; |
2934 | 0 | for (n = 0; n < count; n++) |
2935 | 0 | { |
2936 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2937 | 0 | TIFFSwabLong8(ma); |
2938 | 0 | *mb++ = (float)(*ma++); |
2939 | 0 | } |
2940 | 0 | } |
2941 | 0 | break; |
2942 | 0 | case TIFF_SLONG8: |
2943 | 0 | { |
2944 | 0 | int64_t *ma; |
2945 | 0 | float *mb; |
2946 | 0 | uint32_t n; |
2947 | 0 | ma = (int64_t *)origdata; |
2948 | 0 | mb = data; |
2949 | 0 | for (n = 0; n < count; n++) |
2950 | 0 | { |
2951 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2952 | 0 | TIFFSwabLong8((uint64_t *)ma); |
2953 | 0 | *mb++ = (float)(*ma++); |
2954 | 0 | } |
2955 | 0 | } |
2956 | 0 | break; |
2957 | 0 | case TIFF_RATIONAL: |
2958 | 0 | { |
2959 | 0 | uint32_t *ma; |
2960 | 0 | uint32_t maa; |
2961 | 0 | uint32_t mab; |
2962 | 0 | float *mb; |
2963 | 0 | uint32_t n; |
2964 | 0 | ma = (uint32_t *)origdata; |
2965 | 0 | mb = data; |
2966 | 0 | for (n = 0; n < count; n++) |
2967 | 0 | { |
2968 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2969 | 0 | TIFFSwabLong(ma); |
2970 | 0 | maa = *ma++; |
2971 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2972 | 0 | TIFFSwabLong(ma); |
2973 | 0 | mab = *ma++; |
2974 | 0 | if (mab == 0) |
2975 | 0 | *mb++ = 0.0; |
2976 | 0 | else |
2977 | 0 | *mb++ = (float)maa / (float)mab; |
2978 | 0 | } |
2979 | 0 | } |
2980 | 0 | break; |
2981 | 0 | case TIFF_SRATIONAL: |
2982 | 0 | { |
2983 | 0 | uint32_t *ma; |
2984 | 0 | int32_t maa; |
2985 | 0 | uint32_t mab; |
2986 | 0 | float *mb; |
2987 | 0 | uint32_t n; |
2988 | 0 | ma = (uint32_t *)origdata; |
2989 | 0 | mb = data; |
2990 | 0 | for (n = 0; n < count; n++) |
2991 | 0 | { |
2992 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2993 | 0 | TIFFSwabLong(ma); |
2994 | 0 | maa = *(int32_t *)ma; |
2995 | 0 | ma++; |
2996 | 0 | if (tif->tif_flags & TIFF_SWAB) |
2997 | 0 | TIFFSwabLong(ma); |
2998 | 0 | mab = *ma++; |
2999 | 0 | if (mab == 0) |
3000 | 0 | *mb++ = 0.0; |
3001 | 0 | else |
3002 | 0 | *mb++ = (float)maa / (float)mab; |
3003 | 0 | } |
3004 | 0 | } |
3005 | 0 | break; |
3006 | 0 | case TIFF_DOUBLE: |
3007 | 0 | { |
3008 | 0 | double *ma; |
3009 | 0 | float *mb; |
3010 | 0 | uint32_t n; |
3011 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3012 | 0 | TIFFSwabArrayOfLong8((uint64_t *)origdata, count); |
3013 | 0 | TIFFCvtIEEEDoubleToNative(tif, count, (double *)origdata); |
3014 | 0 | ma = (double *)origdata; |
3015 | 0 | mb = data; |
3016 | 0 | for (n = 0; n < count; n++) |
3017 | 0 | { |
3018 | 0 | double val = *ma++; |
3019 | 0 | if (val > FLT_MAX) |
3020 | 0 | val = FLT_MAX; |
3021 | 0 | else if (val < -FLT_MAX) |
3022 | 0 | val = -FLT_MAX; |
3023 | 0 | *mb++ = (float)val; |
3024 | 0 | } |
3025 | 0 | } |
3026 | 0 | break; |
3027 | 0 | default: |
3028 | 0 | break; |
3029 | 0 | } |
3030 | 0 | _TIFFfreeExt(tif, origdata); |
3031 | 0 | *value = data; |
3032 | 0 | return (TIFFReadDirEntryErrOk); |
3033 | 0 | } |
3034 | | |
3035 | | static enum TIFFReadDirEntryErr |
3036 | | TIFFReadDirEntryDoubleArray(TIFF *tif, TIFFDirEntry *direntry, double **value) |
3037 | 0 | { |
3038 | 0 | enum TIFFReadDirEntryErr err; |
3039 | 0 | uint32_t count; |
3040 | 0 | void *origdata; |
3041 | 0 | double *data; |
3042 | 0 | switch (direntry->tdir_type) |
3043 | 0 | { |
3044 | 0 | case TIFF_BYTE: |
3045 | 0 | case TIFF_SBYTE: |
3046 | 0 | case TIFF_SHORT: |
3047 | 0 | case TIFF_SSHORT: |
3048 | 0 | case TIFF_LONG: |
3049 | 0 | case TIFF_SLONG: |
3050 | 0 | case TIFF_LONG8: |
3051 | 0 | case TIFF_SLONG8: |
3052 | 0 | case TIFF_RATIONAL: |
3053 | 0 | case TIFF_SRATIONAL: |
3054 | 0 | case TIFF_FLOAT: |
3055 | 0 | case TIFF_DOUBLE: |
3056 | 0 | break; |
3057 | 0 | default: |
3058 | 0 | return (TIFFReadDirEntryErrType); |
3059 | 0 | } |
3060 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 8, &origdata); |
3061 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
3062 | 0 | { |
3063 | 0 | *value = 0; |
3064 | 0 | return (err); |
3065 | 0 | } |
3066 | 0 | switch (direntry->tdir_type) |
3067 | 0 | { |
3068 | 0 | case TIFF_DOUBLE: |
3069 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3070 | 0 | TIFFSwabArrayOfLong8((uint64_t *)origdata, count); |
3071 | 0 | TIFFCvtIEEEDoubleToNative(tif, count, (double *)origdata); |
3072 | 0 | *value = (double *)origdata; |
3073 | 0 | return (TIFFReadDirEntryErrOk); |
3074 | 0 | default: |
3075 | 0 | break; |
3076 | 0 | } |
3077 | 0 | data = (double *)_TIFFmallocExt(tif, count * sizeof(double)); |
3078 | 0 | if (data == 0) |
3079 | 0 | { |
3080 | 0 | _TIFFfreeExt(tif, origdata); |
3081 | 0 | return (TIFFReadDirEntryErrAlloc); |
3082 | 0 | } |
3083 | 0 | switch (direntry->tdir_type) |
3084 | 0 | { |
3085 | 0 | case TIFF_BYTE: |
3086 | 0 | { |
3087 | 0 | uint8_t *ma; |
3088 | 0 | double *mb; |
3089 | 0 | uint32_t n; |
3090 | 0 | ma = (uint8_t *)origdata; |
3091 | 0 | mb = data; |
3092 | 0 | for (n = 0; n < count; n++) |
3093 | 0 | *mb++ = (double)(*ma++); |
3094 | 0 | } |
3095 | 0 | break; |
3096 | 0 | case TIFF_SBYTE: |
3097 | 0 | { |
3098 | 0 | int8_t *ma; |
3099 | 0 | double *mb; |
3100 | 0 | uint32_t n; |
3101 | 0 | ma = (int8_t *)origdata; |
3102 | 0 | mb = data; |
3103 | 0 | for (n = 0; n < count; n++) |
3104 | 0 | *mb++ = (double)(*ma++); |
3105 | 0 | } |
3106 | 0 | break; |
3107 | 0 | case TIFF_SHORT: |
3108 | 0 | { |
3109 | 0 | uint16_t *ma; |
3110 | 0 | double *mb; |
3111 | 0 | uint32_t n; |
3112 | 0 | ma = (uint16_t *)origdata; |
3113 | 0 | mb = data; |
3114 | 0 | for (n = 0; n < count; n++) |
3115 | 0 | { |
3116 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3117 | 0 | TIFFSwabShort(ma); |
3118 | 0 | *mb++ = (double)(*ma++); |
3119 | 0 | } |
3120 | 0 | } |
3121 | 0 | break; |
3122 | 0 | case TIFF_SSHORT: |
3123 | 0 | { |
3124 | 0 | int16_t *ma; |
3125 | 0 | double *mb; |
3126 | 0 | uint32_t n; |
3127 | 0 | ma = (int16_t *)origdata; |
3128 | 0 | mb = data; |
3129 | 0 | for (n = 0; n < count; n++) |
3130 | 0 | { |
3131 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3132 | 0 | TIFFSwabShort((uint16_t *)ma); |
3133 | 0 | *mb++ = (double)(*ma++); |
3134 | 0 | } |
3135 | 0 | } |
3136 | 0 | break; |
3137 | 0 | case TIFF_LONG: |
3138 | 0 | { |
3139 | 0 | uint32_t *ma; |
3140 | 0 | double *mb; |
3141 | 0 | uint32_t n; |
3142 | 0 | ma = (uint32_t *)origdata; |
3143 | 0 | mb = data; |
3144 | 0 | for (n = 0; n < count; n++) |
3145 | 0 | { |
3146 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3147 | 0 | TIFFSwabLong(ma); |
3148 | 0 | *mb++ = (double)(*ma++); |
3149 | 0 | } |
3150 | 0 | } |
3151 | 0 | break; |
3152 | 0 | case TIFF_SLONG: |
3153 | 0 | { |
3154 | 0 | int32_t *ma; |
3155 | 0 | double *mb; |
3156 | 0 | uint32_t n; |
3157 | 0 | ma = (int32_t *)origdata; |
3158 | 0 | mb = data; |
3159 | 0 | for (n = 0; n < count; n++) |
3160 | 0 | { |
3161 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3162 | 0 | TIFFSwabLong((uint32_t *)ma); |
3163 | 0 | *mb++ = (double)(*ma++); |
3164 | 0 | } |
3165 | 0 | } |
3166 | 0 | break; |
3167 | 0 | case TIFF_LONG8: |
3168 | 0 | { |
3169 | 0 | uint64_t *ma; |
3170 | 0 | double *mb; |
3171 | 0 | uint32_t n; |
3172 | 0 | ma = (uint64_t *)origdata; |
3173 | 0 | mb = data; |
3174 | 0 | for (n = 0; n < count; n++) |
3175 | 0 | { |
3176 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3177 | 0 | TIFFSwabLong8(ma); |
3178 | 0 | *mb++ = (double)(*ma++); |
3179 | 0 | } |
3180 | 0 | } |
3181 | 0 | break; |
3182 | 0 | case TIFF_SLONG8: |
3183 | 0 | { |
3184 | 0 | int64_t *ma; |
3185 | 0 | double *mb; |
3186 | 0 | uint32_t n; |
3187 | 0 | ma = (int64_t *)origdata; |
3188 | 0 | mb = data; |
3189 | 0 | for (n = 0; n < count; n++) |
3190 | 0 | { |
3191 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3192 | 0 | TIFFSwabLong8((uint64_t *)ma); |
3193 | 0 | *mb++ = (double)(*ma++); |
3194 | 0 | } |
3195 | 0 | } |
3196 | 0 | break; |
3197 | 0 | case TIFF_RATIONAL: |
3198 | 0 | { |
3199 | 0 | uint32_t *ma; |
3200 | 0 | uint32_t maa; |
3201 | 0 | uint32_t mab; |
3202 | 0 | double *mb; |
3203 | 0 | uint32_t n; |
3204 | 0 | ma = (uint32_t *)origdata; |
3205 | 0 | mb = data; |
3206 | 0 | for (n = 0; n < count; n++) |
3207 | 0 | { |
3208 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3209 | 0 | TIFFSwabLong(ma); |
3210 | 0 | maa = *ma++; |
3211 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3212 | 0 | TIFFSwabLong(ma); |
3213 | 0 | mab = *ma++; |
3214 | 0 | if (mab == 0) |
3215 | 0 | *mb++ = 0.0; |
3216 | 0 | else |
3217 | 0 | *mb++ = (double)maa / (double)mab; |
3218 | 0 | } |
3219 | 0 | } |
3220 | 0 | break; |
3221 | 0 | case TIFF_SRATIONAL: |
3222 | 0 | { |
3223 | 0 | uint32_t *ma; |
3224 | 0 | int32_t maa; |
3225 | 0 | uint32_t mab; |
3226 | 0 | double *mb; |
3227 | 0 | uint32_t n; |
3228 | 0 | ma = (uint32_t *)origdata; |
3229 | 0 | mb = data; |
3230 | 0 | for (n = 0; n < count; n++) |
3231 | 0 | { |
3232 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3233 | 0 | TIFFSwabLong(ma); |
3234 | 0 | maa = *(int32_t *)ma; |
3235 | 0 | ma++; |
3236 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3237 | 0 | TIFFSwabLong(ma); |
3238 | 0 | mab = *ma++; |
3239 | 0 | if (mab == 0) |
3240 | 0 | *mb++ = 0.0; |
3241 | 0 | else |
3242 | 0 | *mb++ = (double)maa / (double)mab; |
3243 | 0 | } |
3244 | 0 | } |
3245 | 0 | break; |
3246 | 0 | case TIFF_FLOAT: |
3247 | 0 | { |
3248 | 0 | float *ma; |
3249 | 0 | double *mb; |
3250 | 0 | uint32_t n; |
3251 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3252 | 0 | TIFFSwabArrayOfLong((uint32_t *)origdata, count); |
3253 | 0 | TIFFCvtIEEEFloatToNative(tif, count, (float *)origdata); |
3254 | 0 | ma = (float *)origdata; |
3255 | 0 | mb = data; |
3256 | 0 | for (n = 0; n < count; n++) |
3257 | 0 | *mb++ = (double)(*ma++); |
3258 | 0 | } |
3259 | 0 | break; |
3260 | 0 | default: |
3261 | 0 | break; |
3262 | 0 | } |
3263 | 0 | _TIFFfreeExt(tif, origdata); |
3264 | 0 | *value = data; |
3265 | 0 | return (TIFFReadDirEntryErrOk); |
3266 | 0 | } |
3267 | | |
3268 | | static enum TIFFReadDirEntryErr |
3269 | | TIFFReadDirEntryIfd8Array(TIFF *tif, TIFFDirEntry *direntry, uint64_t **value) |
3270 | 0 | { |
3271 | 0 | enum TIFFReadDirEntryErr err; |
3272 | 0 | uint32_t count; |
3273 | 0 | void *origdata; |
3274 | 0 | uint64_t *data; |
3275 | 0 | switch (direntry->tdir_type) |
3276 | 0 | { |
3277 | 0 | case TIFF_LONG: |
3278 | 0 | case TIFF_LONG8: |
3279 | 0 | case TIFF_IFD: |
3280 | 0 | case TIFF_IFD8: |
3281 | 0 | break; |
3282 | 0 | default: |
3283 | 0 | return (TIFFReadDirEntryErrType); |
3284 | 0 | } |
3285 | 0 | err = TIFFReadDirEntryArray(tif, direntry, &count, 8, &origdata); |
3286 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
3287 | 0 | { |
3288 | 0 | *value = 0; |
3289 | 0 | return (err); |
3290 | 0 | } |
3291 | 0 | switch (direntry->tdir_type) |
3292 | 0 | { |
3293 | 0 | case TIFF_LONG8: |
3294 | 0 | case TIFF_IFD8: |
3295 | 0 | *value = (uint64_t *)origdata; |
3296 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3297 | 0 | TIFFSwabArrayOfLong8(*value, count); |
3298 | 0 | return (TIFFReadDirEntryErrOk); |
3299 | 0 | default: |
3300 | 0 | break; |
3301 | 0 | } |
3302 | 0 | data = (uint64_t *)_TIFFmallocExt(tif, count * 8); |
3303 | 0 | if (data == 0) |
3304 | 0 | { |
3305 | 0 | _TIFFfreeExt(tif, origdata); |
3306 | 0 | return (TIFFReadDirEntryErrAlloc); |
3307 | 0 | } |
3308 | 0 | switch (direntry->tdir_type) |
3309 | 0 | { |
3310 | 0 | case TIFF_LONG: |
3311 | 0 | case TIFF_IFD: |
3312 | 0 | { |
3313 | 0 | uint32_t *ma; |
3314 | 0 | uint64_t *mb; |
3315 | 0 | uint32_t n; |
3316 | 0 | ma = (uint32_t *)origdata; |
3317 | 0 | mb = data; |
3318 | 0 | for (n = 0; n < count; n++) |
3319 | 0 | { |
3320 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3321 | 0 | TIFFSwabLong(ma); |
3322 | 0 | *mb++ = (uint64_t)(*ma++); |
3323 | 0 | } |
3324 | 0 | } |
3325 | 0 | break; |
3326 | 0 | default: |
3327 | 0 | break; |
3328 | 0 | } |
3329 | 0 | _TIFFfreeExt(tif, origdata); |
3330 | 0 | *value = data; |
3331 | 0 | return (TIFFReadDirEntryErrOk); |
3332 | 0 | } |
3333 | | |
3334 | | static enum TIFFReadDirEntryErr |
3335 | | TIFFReadDirEntryPersampleShort(TIFF *tif, TIFFDirEntry *direntry, |
3336 | | uint16_t *value) |
3337 | 0 | { |
3338 | 0 | enum TIFFReadDirEntryErr err; |
3339 | 0 | uint16_t *m; |
3340 | 0 | uint16_t *na; |
3341 | 0 | uint16_t nb; |
3342 | 0 | if (direntry->tdir_count != (uint64_t)tif->tif_dir.td_samplesperpixel) |
3343 | 0 | { |
3344 | 0 | const TIFFField *fip = TIFFFieldWithTag(tif, direntry->tdir_tag); |
3345 | 0 | if (direntry->tdir_count == 0) |
3346 | 0 | { |
3347 | 0 | return TIFFReadDirEntryErrCount; |
3348 | 0 | } |
3349 | 0 | else if (direntry->tdir_count < |
3350 | 0 | (uint64_t)tif->tif_dir.td_samplesperpixel) |
3351 | 0 | { |
3352 | 0 | TIFFWarningExtR( |
3353 | 0 | tif, "TIFFReadDirEntryPersampleShort", |
3354 | 0 | "Tag %s entry count is %" PRIu64 |
3355 | 0 | " , whereas it should be SamplesPerPixel=%d. Assuming that " |
3356 | 0 | "missing entries are all at the value of the first one", |
3357 | 0 | fip ? fip->field_name : "unknown tagname", direntry->tdir_count, |
3358 | 0 | tif->tif_dir.td_samplesperpixel); |
3359 | 0 | } |
3360 | 0 | else |
3361 | 0 | { |
3362 | 0 | TIFFWarningExtR(tif, "TIFFReadDirEntryPersampleShort", |
3363 | 0 | "Tag %s entry count is %" PRIu64 |
3364 | 0 | " , whereas it should be SamplesPerPixel=%d. " |
3365 | 0 | "Ignoring extra entries", |
3366 | 0 | fip ? fip->field_name : "unknown tagname", |
3367 | 0 | direntry->tdir_count, |
3368 | 0 | tif->tif_dir.td_samplesperpixel); |
3369 | 0 | } |
3370 | 0 | } |
3371 | 0 | err = TIFFReadDirEntryShortArray(tif, direntry, &m); |
3372 | 0 | if (err != TIFFReadDirEntryErrOk || m == NULL) |
3373 | 0 | return (err); |
3374 | 0 | na = m; |
3375 | 0 | nb = tif->tif_dir.td_samplesperpixel; |
3376 | 0 | if (direntry->tdir_count < nb) |
3377 | 0 | nb = (uint16_t)direntry->tdir_count; |
3378 | 0 | *value = *na++; |
3379 | 0 | nb--; |
3380 | 0 | while (nb > 0) |
3381 | 0 | { |
3382 | 0 | if (*na++ != *value) |
3383 | 0 | { |
3384 | 0 | err = TIFFReadDirEntryErrPsdif; |
3385 | 0 | break; |
3386 | 0 | } |
3387 | 0 | nb--; |
3388 | 0 | } |
3389 | 0 | _TIFFfreeExt(tif, m); |
3390 | 0 | return (err); |
3391 | 0 | } |
3392 | | |
3393 | | static void TIFFReadDirEntryCheckedByte(TIFF *tif, TIFFDirEntry *direntry, |
3394 | | uint8_t *value) |
3395 | 0 | { |
3396 | 0 | (void)tif; |
3397 | 0 | *value = *(uint8_t *)(&direntry->tdir_offset); |
3398 | 0 | } |
3399 | | |
3400 | | static void TIFFReadDirEntryCheckedSbyte(TIFF *tif, TIFFDirEntry *direntry, |
3401 | | int8_t *value) |
3402 | 0 | { |
3403 | 0 | (void)tif; |
3404 | 0 | *value = *(int8_t *)(&direntry->tdir_offset); |
3405 | 0 | } |
3406 | | |
3407 | | static void TIFFReadDirEntryCheckedShort(TIFF *tif, TIFFDirEntry *direntry, |
3408 | | uint16_t *value) |
3409 | 0 | { |
3410 | 0 | *value = direntry->tdir_offset.toff_short; |
3411 | | /* *value=*(uint16_t*)(&direntry->tdir_offset); */ |
3412 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3413 | 0 | TIFFSwabShort(value); |
3414 | 0 | } |
3415 | | |
3416 | | static void TIFFReadDirEntryCheckedSshort(TIFF *tif, TIFFDirEntry *direntry, |
3417 | | int16_t *value) |
3418 | 0 | { |
3419 | 0 | *value = *(int16_t *)(&direntry->tdir_offset); |
3420 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3421 | 0 | TIFFSwabShort((uint16_t *)value); |
3422 | 0 | } |
3423 | | |
3424 | | static void TIFFReadDirEntryCheckedLong(TIFF *tif, TIFFDirEntry *direntry, |
3425 | | uint32_t *value) |
3426 | 0 | { |
3427 | 0 | *value = *(uint32_t *)(&direntry->tdir_offset); |
3428 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3429 | 0 | TIFFSwabLong(value); |
3430 | 0 | } |
3431 | | |
3432 | | static void TIFFReadDirEntryCheckedSlong(TIFF *tif, TIFFDirEntry *direntry, |
3433 | | int32_t *value) |
3434 | 0 | { |
3435 | 0 | *value = *(int32_t *)(&direntry->tdir_offset); |
3436 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3437 | 0 | TIFFSwabLong((uint32_t *)value); |
3438 | 0 | } |
3439 | | |
3440 | | static enum TIFFReadDirEntryErr |
3441 | | TIFFReadDirEntryCheckedLong8(TIFF *tif, TIFFDirEntry *direntry, uint64_t *value) |
3442 | 0 | { |
3443 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
3444 | 0 | { |
3445 | 0 | enum TIFFReadDirEntryErr err; |
3446 | 0 | uint32_t offset = direntry->tdir_offset.toff_long; |
3447 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3448 | 0 | TIFFSwabLong(&offset); |
3449 | 0 | err = TIFFReadDirEntryData(tif, offset, 8, value); |
3450 | 0 | if (err != TIFFReadDirEntryErrOk) |
3451 | 0 | return (err); |
3452 | 0 | } |
3453 | 0 | else |
3454 | 0 | *value = direntry->tdir_offset.toff_long8; |
3455 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3456 | 0 | TIFFSwabLong8(value); |
3457 | 0 | return (TIFFReadDirEntryErrOk); |
3458 | 0 | } |
3459 | | |
3460 | | static enum TIFFReadDirEntryErr |
3461 | | TIFFReadDirEntryCheckedSlong8(TIFF *tif, TIFFDirEntry *direntry, int64_t *value) |
3462 | 0 | { |
3463 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
3464 | 0 | { |
3465 | 0 | enum TIFFReadDirEntryErr err; |
3466 | 0 | uint32_t offset = direntry->tdir_offset.toff_long; |
3467 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3468 | 0 | TIFFSwabLong(&offset); |
3469 | 0 | err = TIFFReadDirEntryData(tif, offset, 8, value); |
3470 | 0 | if (err != TIFFReadDirEntryErrOk) |
3471 | 0 | return (err); |
3472 | 0 | } |
3473 | 0 | else |
3474 | 0 | *value = *(int64_t *)(&direntry->tdir_offset); |
3475 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3476 | 0 | TIFFSwabLong8((uint64_t *)value); |
3477 | 0 | return (TIFFReadDirEntryErrOk); |
3478 | 0 | } |
3479 | | |
3480 | | static enum TIFFReadDirEntryErr |
3481 | | TIFFReadDirEntryCheckedRational(TIFF *tif, TIFFDirEntry *direntry, |
3482 | | double *value) |
3483 | 0 | { |
3484 | 0 | UInt64Aligned_t m; |
3485 | |
|
3486 | 0 | assert(sizeof(double) == 8); |
3487 | 0 | assert(sizeof(uint64_t) == 8); |
3488 | 0 | assert(sizeof(uint32_t) == 4); |
3489 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
3490 | 0 | { |
3491 | 0 | enum TIFFReadDirEntryErr err; |
3492 | 0 | uint32_t offset = direntry->tdir_offset.toff_long; |
3493 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3494 | 0 | TIFFSwabLong(&offset); |
3495 | 0 | err = TIFFReadDirEntryData(tif, offset, 8, m.i); |
3496 | 0 | if (err != TIFFReadDirEntryErrOk) |
3497 | 0 | return (err); |
3498 | 0 | } |
3499 | 0 | else |
3500 | 0 | m.l = direntry->tdir_offset.toff_long8; |
3501 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3502 | 0 | TIFFSwabArrayOfLong(m.i, 2); |
3503 | | /* Not completely sure what we should do when m.i[1]==0, but some */ |
3504 | | /* sanitizers do not like division by 0.0: */ |
3505 | | /* http://bugzilla.maptools.org/show_bug.cgi?id=2644 */ |
3506 | 0 | if (m.i[0] == 0 || m.i[1] == 0) |
3507 | 0 | *value = 0.0; |
3508 | 0 | else |
3509 | 0 | *value = (double)m.i[0] / (double)m.i[1]; |
3510 | 0 | return (TIFFReadDirEntryErrOk); |
3511 | 0 | } |
3512 | | |
3513 | | static enum TIFFReadDirEntryErr |
3514 | | TIFFReadDirEntryCheckedSrational(TIFF *tif, TIFFDirEntry *direntry, |
3515 | | double *value) |
3516 | 0 | { |
3517 | 0 | UInt64Aligned_t m; |
3518 | 0 | assert(sizeof(double) == 8); |
3519 | 0 | assert(sizeof(uint64_t) == 8); |
3520 | 0 | assert(sizeof(int32_t) == 4); |
3521 | 0 | assert(sizeof(uint32_t) == 4); |
3522 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
3523 | 0 | { |
3524 | 0 | enum TIFFReadDirEntryErr err; |
3525 | 0 | uint32_t offset = direntry->tdir_offset.toff_long; |
3526 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3527 | 0 | TIFFSwabLong(&offset); |
3528 | 0 | err = TIFFReadDirEntryData(tif, offset, 8, m.i); |
3529 | 0 | if (err != TIFFReadDirEntryErrOk) |
3530 | 0 | return (err); |
3531 | 0 | } |
3532 | 0 | else |
3533 | 0 | m.l = direntry->tdir_offset.toff_long8; |
3534 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3535 | 0 | TIFFSwabArrayOfLong(m.i, 2); |
3536 | | /* Not completely sure what we should do when m.i[1]==0, but some */ |
3537 | | /* sanitizers do not like division by 0.0: */ |
3538 | | /* http://bugzilla.maptools.org/show_bug.cgi?id=2644 */ |
3539 | 0 | if ((int32_t)m.i[0] == 0 || m.i[1] == 0) |
3540 | 0 | *value = 0.0; |
3541 | 0 | else |
3542 | 0 | *value = (double)((int32_t)m.i[0]) / (double)m.i[1]; |
3543 | 0 | return (TIFFReadDirEntryErrOk); |
3544 | 0 | } |
3545 | | |
3546 | | #if 0 |
3547 | | static enum TIFFReadDirEntryErr |
3548 | | TIFFReadDirEntryCheckedRationalDirect(TIFF *tif, TIFFDirEntry *direntry, |
3549 | | TIFFRational_t *value) |
3550 | | { /*--: SetGetRATIONAL_directly:_CustomTag: Read rational (and signed rationals) |
3551 | | directly --*/ |
3552 | | UInt64Aligned_t m; |
3553 | | |
3554 | | assert(sizeof(double) == 8); |
3555 | | assert(sizeof(uint64_t) == 8); |
3556 | | assert(sizeof(uint32_t) == 4); |
3557 | | |
3558 | | if (direntry->tdir_count != 1) |
3559 | | return (TIFFReadDirEntryErrCount); |
3560 | | |
3561 | | if (direntry->tdir_type != TIFF_RATIONAL && |
3562 | | direntry->tdir_type != TIFF_SRATIONAL) |
3563 | | return (TIFFReadDirEntryErrType); |
3564 | | |
3565 | | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
3566 | | { |
3567 | | enum TIFFReadDirEntryErr err; |
3568 | | uint32_t offset = direntry->tdir_offset.toff_long; |
3569 | | if (tif->tif_flags & TIFF_SWAB) |
3570 | | TIFFSwabLong(&offset); |
3571 | | err = TIFFReadDirEntryData(tif, offset, 8, m.i); |
3572 | | if (err != TIFFReadDirEntryErrOk) |
3573 | | return (err); |
3574 | | } |
3575 | | else |
3576 | | { |
3577 | | m.l = direntry->tdir_offset.toff_long8; |
3578 | | } |
3579 | | |
3580 | | if (tif->tif_flags & TIFF_SWAB) |
3581 | | TIFFSwabArrayOfLong(m.i, 2); |
3582 | | |
3583 | | value->uNum = m.i[0]; |
3584 | | value->uDenom = m.i[1]; |
3585 | | return (TIFFReadDirEntryErrOk); |
3586 | | } /*-- TIFFReadDirEntryCheckedRationalDirect() --*/ |
3587 | | #endif |
3588 | | |
3589 | | static void TIFFReadDirEntryCheckedFloat(TIFF *tif, TIFFDirEntry *direntry, |
3590 | | float *value) |
3591 | 0 | { |
3592 | 0 | union |
3593 | 0 | { |
3594 | 0 | float f; |
3595 | 0 | uint32_t i; |
3596 | 0 | } float_union; |
3597 | 0 | assert(sizeof(float) == 4); |
3598 | 0 | assert(sizeof(uint32_t) == 4); |
3599 | 0 | assert(sizeof(float_union) == 4); |
3600 | 0 | float_union.i = *(uint32_t *)(&direntry->tdir_offset); |
3601 | 0 | *value = float_union.f; |
3602 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3603 | 0 | TIFFSwabLong((uint32_t *)value); |
3604 | 0 | } |
3605 | | |
3606 | | static enum TIFFReadDirEntryErr |
3607 | | TIFFReadDirEntryCheckedDouble(TIFF *tif, TIFFDirEntry *direntry, double *value) |
3608 | 0 | { |
3609 | 0 | assert(sizeof(double) == 8); |
3610 | 0 | assert(sizeof(uint64_t) == 8); |
3611 | 0 | assert(sizeof(UInt64Aligned_t) == 8); |
3612 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
3613 | 0 | { |
3614 | 0 | enum TIFFReadDirEntryErr err; |
3615 | 0 | uint32_t offset = direntry->tdir_offset.toff_long; |
3616 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3617 | 0 | TIFFSwabLong(&offset); |
3618 | 0 | err = TIFFReadDirEntryData(tif, offset, 8, value); |
3619 | 0 | if (err != TIFFReadDirEntryErrOk) |
3620 | 0 | return (err); |
3621 | 0 | } |
3622 | 0 | else |
3623 | 0 | { |
3624 | 0 | UInt64Aligned_t uint64_union; |
3625 | 0 | uint64_union.l = direntry->tdir_offset.toff_long8; |
3626 | 0 | *value = uint64_union.d; |
3627 | 0 | } |
3628 | 0 | if (tif->tif_flags & TIFF_SWAB) |
3629 | 0 | TIFFSwabLong8((uint64_t *)value); |
3630 | 0 | return (TIFFReadDirEntryErrOk); |
3631 | 0 | } |
3632 | | |
3633 | | static enum TIFFReadDirEntryErr |
3634 | | TIFFReadDirEntryCheckRangeByteSbyte(int8_t value) |
3635 | 0 | { |
3636 | 0 | if (value < 0) |
3637 | 0 | return (TIFFReadDirEntryErrRange); |
3638 | 0 | else |
3639 | 0 | return (TIFFReadDirEntryErrOk); |
3640 | 0 | } |
3641 | | |
3642 | | static enum TIFFReadDirEntryErr |
3643 | | TIFFReadDirEntryCheckRangeByteShort(uint16_t value) |
3644 | 0 | { |
3645 | 0 | if (value > 0xFF) |
3646 | 0 | return (TIFFReadDirEntryErrRange); |
3647 | 0 | else |
3648 | 0 | return (TIFFReadDirEntryErrOk); |
3649 | 0 | } |
3650 | | |
3651 | | static enum TIFFReadDirEntryErr |
3652 | | TIFFReadDirEntryCheckRangeByteSshort(int16_t value) |
3653 | 0 | { |
3654 | 0 | if ((value < 0) || (value > 0xFF)) |
3655 | 0 | return (TIFFReadDirEntryErrRange); |
3656 | 0 | else |
3657 | 0 | return (TIFFReadDirEntryErrOk); |
3658 | 0 | } |
3659 | | |
3660 | | static enum TIFFReadDirEntryErr |
3661 | | TIFFReadDirEntryCheckRangeByteLong(uint32_t value) |
3662 | 0 | { |
3663 | 0 | if (value > 0xFF) |
3664 | 0 | return (TIFFReadDirEntryErrRange); |
3665 | 0 | else |
3666 | 0 | return (TIFFReadDirEntryErrOk); |
3667 | 0 | } |
3668 | | |
3669 | | static enum TIFFReadDirEntryErr |
3670 | | TIFFReadDirEntryCheckRangeByteSlong(int32_t value) |
3671 | 0 | { |
3672 | 0 | if ((value < 0) || (value > 0xFF)) |
3673 | 0 | return (TIFFReadDirEntryErrRange); |
3674 | 0 | else |
3675 | 0 | return (TIFFReadDirEntryErrOk); |
3676 | 0 | } |
3677 | | |
3678 | | static enum TIFFReadDirEntryErr |
3679 | | TIFFReadDirEntryCheckRangeByteLong8(uint64_t value) |
3680 | 0 | { |
3681 | 0 | if (value > 0xFF) |
3682 | 0 | return (TIFFReadDirEntryErrRange); |
3683 | 0 | else |
3684 | 0 | return (TIFFReadDirEntryErrOk); |
3685 | 0 | } |
3686 | | |
3687 | | static enum TIFFReadDirEntryErr |
3688 | | TIFFReadDirEntryCheckRangeByteSlong8(int64_t value) |
3689 | 0 | { |
3690 | 0 | if ((value < 0) || (value > 0xFF)) |
3691 | 0 | return (TIFFReadDirEntryErrRange); |
3692 | 0 | else |
3693 | 0 | return (TIFFReadDirEntryErrOk); |
3694 | 0 | } |
3695 | | |
3696 | | static enum TIFFReadDirEntryErr |
3697 | | TIFFReadDirEntryCheckRangeSbyteByte(uint8_t value) |
3698 | 0 | { |
3699 | 0 | if (value > 0x7F) |
3700 | 0 | return (TIFFReadDirEntryErrRange); |
3701 | 0 | else |
3702 | 0 | return (TIFFReadDirEntryErrOk); |
3703 | 0 | } |
3704 | | |
3705 | | static enum TIFFReadDirEntryErr |
3706 | | TIFFReadDirEntryCheckRangeSbyteShort(uint16_t value) |
3707 | 0 | { |
3708 | 0 | if (value > 0x7F) |
3709 | 0 | return (TIFFReadDirEntryErrRange); |
3710 | 0 | else |
3711 | 0 | return (TIFFReadDirEntryErrOk); |
3712 | 0 | } |
3713 | | |
3714 | | static enum TIFFReadDirEntryErr |
3715 | | TIFFReadDirEntryCheckRangeSbyteSshort(int16_t value) |
3716 | 0 | { |
3717 | 0 | if ((value < -0x80) || (value > 0x7F)) |
3718 | 0 | return (TIFFReadDirEntryErrRange); |
3719 | 0 | else |
3720 | 0 | return (TIFFReadDirEntryErrOk); |
3721 | 0 | } |
3722 | | |
3723 | | static enum TIFFReadDirEntryErr |
3724 | | TIFFReadDirEntryCheckRangeSbyteLong(uint32_t value) |
3725 | 0 | { |
3726 | 0 | if (value > 0x7F) |
3727 | 0 | return (TIFFReadDirEntryErrRange); |
3728 | 0 | else |
3729 | 0 | return (TIFFReadDirEntryErrOk); |
3730 | 0 | } |
3731 | | |
3732 | | static enum TIFFReadDirEntryErr |
3733 | | TIFFReadDirEntryCheckRangeSbyteSlong(int32_t value) |
3734 | 0 | { |
3735 | 0 | if ((value < -0x80) || (value > 0x7F)) |
3736 | 0 | return (TIFFReadDirEntryErrRange); |
3737 | 0 | else |
3738 | 0 | return (TIFFReadDirEntryErrOk); |
3739 | 0 | } |
3740 | | |
3741 | | static enum TIFFReadDirEntryErr |
3742 | | TIFFReadDirEntryCheckRangeSbyteLong8(uint64_t value) |
3743 | 0 | { |
3744 | 0 | if (value > 0x7F) |
3745 | 0 | return (TIFFReadDirEntryErrRange); |
3746 | 0 | else |
3747 | 0 | return (TIFFReadDirEntryErrOk); |
3748 | 0 | } |
3749 | | |
3750 | | static enum TIFFReadDirEntryErr |
3751 | | TIFFReadDirEntryCheckRangeSbyteSlong8(int64_t value) |
3752 | 0 | { |
3753 | 0 | if ((value < -0x80) || (value > 0x7F)) |
3754 | 0 | return (TIFFReadDirEntryErrRange); |
3755 | 0 | else |
3756 | 0 | return (TIFFReadDirEntryErrOk); |
3757 | 0 | } |
3758 | | |
3759 | | static enum TIFFReadDirEntryErr |
3760 | | TIFFReadDirEntryCheckRangeShortSbyte(int8_t value) |
3761 | 0 | { |
3762 | 0 | if (value < 0) |
3763 | 0 | return (TIFFReadDirEntryErrRange); |
3764 | 0 | else |
3765 | 0 | return (TIFFReadDirEntryErrOk); |
3766 | 0 | } |
3767 | | |
3768 | | static enum TIFFReadDirEntryErr |
3769 | | TIFFReadDirEntryCheckRangeShortSshort(int16_t value) |
3770 | 0 | { |
3771 | 0 | if (value < 0) |
3772 | 0 | return (TIFFReadDirEntryErrRange); |
3773 | 0 | else |
3774 | 0 | return (TIFFReadDirEntryErrOk); |
3775 | 0 | } |
3776 | | |
3777 | | static enum TIFFReadDirEntryErr |
3778 | | TIFFReadDirEntryCheckRangeShortLong(uint32_t value) |
3779 | 0 | { |
3780 | 0 | if (value > 0xFFFF) |
3781 | 0 | return (TIFFReadDirEntryErrRange); |
3782 | 0 | else |
3783 | 0 | return (TIFFReadDirEntryErrOk); |
3784 | 0 | } |
3785 | | |
3786 | | static enum TIFFReadDirEntryErr |
3787 | | TIFFReadDirEntryCheckRangeShortSlong(int32_t value) |
3788 | 0 | { |
3789 | 0 | if ((value < 0) || (value > 0xFFFF)) |
3790 | 0 | return (TIFFReadDirEntryErrRange); |
3791 | 0 | else |
3792 | 0 | return (TIFFReadDirEntryErrOk); |
3793 | 0 | } |
3794 | | |
3795 | | static enum TIFFReadDirEntryErr |
3796 | | TIFFReadDirEntryCheckRangeShortLong8(uint64_t value) |
3797 | 0 | { |
3798 | 0 | if (value > 0xFFFF) |
3799 | 0 | return (TIFFReadDirEntryErrRange); |
3800 | 0 | else |
3801 | 0 | return (TIFFReadDirEntryErrOk); |
3802 | 0 | } |
3803 | | |
3804 | | static enum TIFFReadDirEntryErr |
3805 | | TIFFReadDirEntryCheckRangeShortSlong8(int64_t value) |
3806 | 0 | { |
3807 | 0 | if ((value < 0) || (value > 0xFFFF)) |
3808 | 0 | return (TIFFReadDirEntryErrRange); |
3809 | 0 | else |
3810 | 0 | return (TIFFReadDirEntryErrOk); |
3811 | 0 | } |
3812 | | |
3813 | | static enum TIFFReadDirEntryErr |
3814 | | TIFFReadDirEntryCheckRangeSshortShort(uint16_t value) |
3815 | 0 | { |
3816 | 0 | if (value > 0x7FFF) |
3817 | 0 | return (TIFFReadDirEntryErrRange); |
3818 | 0 | else |
3819 | 0 | return (TIFFReadDirEntryErrOk); |
3820 | 0 | } |
3821 | | |
3822 | | static enum TIFFReadDirEntryErr |
3823 | | TIFFReadDirEntryCheckRangeSshortLong(uint32_t value) |
3824 | 0 | { |
3825 | 0 | if (value > 0x7FFF) |
3826 | 0 | return (TIFFReadDirEntryErrRange); |
3827 | 0 | else |
3828 | 0 | return (TIFFReadDirEntryErrOk); |
3829 | 0 | } |
3830 | | |
3831 | | static enum TIFFReadDirEntryErr |
3832 | | TIFFReadDirEntryCheckRangeSshortSlong(int32_t value) |
3833 | 0 | { |
3834 | 0 | if ((value < -0x8000) || (value > 0x7FFF)) |
3835 | 0 | return (TIFFReadDirEntryErrRange); |
3836 | 0 | else |
3837 | 0 | return (TIFFReadDirEntryErrOk); |
3838 | 0 | } |
3839 | | |
3840 | | static enum TIFFReadDirEntryErr |
3841 | | TIFFReadDirEntryCheckRangeSshortLong8(uint64_t value) |
3842 | 0 | { |
3843 | 0 | if (value > 0x7FFF) |
3844 | 0 | return (TIFFReadDirEntryErrRange); |
3845 | 0 | else |
3846 | 0 | return (TIFFReadDirEntryErrOk); |
3847 | 0 | } |
3848 | | |
3849 | | static enum TIFFReadDirEntryErr |
3850 | | TIFFReadDirEntryCheckRangeSshortSlong8(int64_t value) |
3851 | 0 | { |
3852 | 0 | if ((value < -0x8000) || (value > 0x7FFF)) |
3853 | 0 | return (TIFFReadDirEntryErrRange); |
3854 | 0 | else |
3855 | 0 | return (TIFFReadDirEntryErrOk); |
3856 | 0 | } |
3857 | | |
3858 | | static enum TIFFReadDirEntryErr |
3859 | | TIFFReadDirEntryCheckRangeLongSbyte(int8_t value) |
3860 | 0 | { |
3861 | 0 | if (value < 0) |
3862 | 0 | return (TIFFReadDirEntryErrRange); |
3863 | 0 | else |
3864 | 0 | return (TIFFReadDirEntryErrOk); |
3865 | 0 | } |
3866 | | |
3867 | | static enum TIFFReadDirEntryErr |
3868 | | TIFFReadDirEntryCheckRangeLongSshort(int16_t value) |
3869 | 0 | { |
3870 | 0 | if (value < 0) |
3871 | 0 | return (TIFFReadDirEntryErrRange); |
3872 | 0 | else |
3873 | 0 | return (TIFFReadDirEntryErrOk); |
3874 | 0 | } |
3875 | | |
3876 | | static enum TIFFReadDirEntryErr |
3877 | | TIFFReadDirEntryCheckRangeLongSlong(int32_t value) |
3878 | 0 | { |
3879 | 0 | if (value < 0) |
3880 | 0 | return (TIFFReadDirEntryErrRange); |
3881 | 0 | else |
3882 | 0 | return (TIFFReadDirEntryErrOk); |
3883 | 0 | } |
3884 | | |
3885 | | static enum TIFFReadDirEntryErr |
3886 | | TIFFReadDirEntryCheckRangeLongLong8(uint64_t value) |
3887 | 0 | { |
3888 | 0 | if (value > UINT32_MAX) |
3889 | 0 | return (TIFFReadDirEntryErrRange); |
3890 | 0 | else |
3891 | 0 | return (TIFFReadDirEntryErrOk); |
3892 | 0 | } |
3893 | | |
3894 | | static enum TIFFReadDirEntryErr |
3895 | | TIFFReadDirEntryCheckRangeLongSlong8(int64_t value) |
3896 | 0 | { |
3897 | 0 | if ((value < 0) || (value > (int64_t)UINT32_MAX)) |
3898 | 0 | return (TIFFReadDirEntryErrRange); |
3899 | 0 | else |
3900 | 0 | return (TIFFReadDirEntryErrOk); |
3901 | 0 | } |
3902 | | |
3903 | | static enum TIFFReadDirEntryErr |
3904 | | TIFFReadDirEntryCheckRangeSlongLong(uint32_t value) |
3905 | 0 | { |
3906 | 0 | if (value > 0x7FFFFFFFUL) |
3907 | 0 | return (TIFFReadDirEntryErrRange); |
3908 | 0 | else |
3909 | 0 | return (TIFFReadDirEntryErrOk); |
3910 | 0 | } |
3911 | | |
3912 | | /* Check that the 8-byte unsigned value can fit in a 4-byte unsigned range */ |
3913 | | static enum TIFFReadDirEntryErr |
3914 | | TIFFReadDirEntryCheckRangeSlongLong8(uint64_t value) |
3915 | 0 | { |
3916 | 0 | if (value > 0x7FFFFFFF) |
3917 | 0 | return (TIFFReadDirEntryErrRange); |
3918 | 0 | else |
3919 | 0 | return (TIFFReadDirEntryErrOk); |
3920 | 0 | } |
3921 | | |
3922 | | /* Check that the 8-byte signed value can fit in a 4-byte signed range */ |
3923 | | static enum TIFFReadDirEntryErr |
3924 | | TIFFReadDirEntryCheckRangeSlongSlong8(int64_t value) |
3925 | 0 | { |
3926 | 0 | if ((value < 0 - ((int64_t)0x7FFFFFFF + 1)) || (value > 0x7FFFFFFF)) |
3927 | 0 | return (TIFFReadDirEntryErrRange); |
3928 | 0 | else |
3929 | 0 | return (TIFFReadDirEntryErrOk); |
3930 | 0 | } |
3931 | | |
3932 | | static enum TIFFReadDirEntryErr |
3933 | | TIFFReadDirEntryCheckRangeLong8Sbyte(int8_t value) |
3934 | 0 | { |
3935 | 0 | if (value < 0) |
3936 | 0 | return (TIFFReadDirEntryErrRange); |
3937 | 0 | else |
3938 | 0 | return (TIFFReadDirEntryErrOk); |
3939 | 0 | } |
3940 | | |
3941 | | static enum TIFFReadDirEntryErr |
3942 | | TIFFReadDirEntryCheckRangeLong8Sshort(int16_t value) |
3943 | 0 | { |
3944 | 0 | if (value < 0) |
3945 | 0 | return (TIFFReadDirEntryErrRange); |
3946 | 0 | else |
3947 | 0 | return (TIFFReadDirEntryErrOk); |
3948 | 0 | } |
3949 | | |
3950 | | static enum TIFFReadDirEntryErr |
3951 | | TIFFReadDirEntryCheckRangeLong8Slong(int32_t value) |
3952 | 0 | { |
3953 | 0 | if (value < 0) |
3954 | 0 | return (TIFFReadDirEntryErrRange); |
3955 | 0 | else |
3956 | 0 | return (TIFFReadDirEntryErrOk); |
3957 | 0 | } |
3958 | | |
3959 | | static enum TIFFReadDirEntryErr |
3960 | | TIFFReadDirEntryCheckRangeLong8Slong8(int64_t value) |
3961 | 0 | { |
3962 | 0 | if (value < 0) |
3963 | 0 | return (TIFFReadDirEntryErrRange); |
3964 | 0 | else |
3965 | 0 | return (TIFFReadDirEntryErrOk); |
3966 | 0 | } |
3967 | | |
3968 | | static enum TIFFReadDirEntryErr |
3969 | | TIFFReadDirEntryCheckRangeSlong8Long8(uint64_t value) |
3970 | 0 | { |
3971 | 0 | if (value > INT64_MAX) |
3972 | 0 | return (TIFFReadDirEntryErrRange); |
3973 | 0 | else |
3974 | 0 | return (TIFFReadDirEntryErrOk); |
3975 | 0 | } |
3976 | | |
3977 | | static enum TIFFReadDirEntryErr TIFFReadDirEntryData(TIFF *tif, uint64_t offset, |
3978 | | tmsize_t size, void *dest) |
3979 | 0 | { |
3980 | 0 | assert(size > 0); |
3981 | 0 | if (!isMapped(tif)) |
3982 | 0 | { |
3983 | 0 | if (!SeekOK(tif, offset)) |
3984 | 0 | return (TIFFReadDirEntryErrIo); |
3985 | 0 | if (!ReadOK(tif, dest, size)) |
3986 | 0 | return (TIFFReadDirEntryErrIo); |
3987 | 0 | } |
3988 | 0 | else |
3989 | 0 | { |
3990 | 0 | size_t ma, mb; |
3991 | 0 | ma = (size_t)offset; |
3992 | 0 | if ((uint64_t)ma != offset || ma > (~(size_t)0) - (size_t)size) |
3993 | 0 | { |
3994 | 0 | return TIFFReadDirEntryErrIo; |
3995 | 0 | } |
3996 | 0 | mb = ma + size; |
3997 | 0 | if (mb > (uint64_t)tif->tif_size) |
3998 | 0 | return (TIFFReadDirEntryErrIo); |
3999 | 0 | _TIFFmemcpy(dest, tif->tif_base + ma, size); |
4000 | 0 | } |
4001 | 0 | return (TIFFReadDirEntryErrOk); |
4002 | 0 | } |
4003 | | |
4004 | | static void TIFFReadDirEntryOutputErr(TIFF *tif, enum TIFFReadDirEntryErr err, |
4005 | | const char *module, const char *tagname, |
4006 | | int recover) |
4007 | 0 | { |
4008 | 0 | if (!recover) |
4009 | 0 | { |
4010 | 0 | switch (err) |
4011 | 0 | { |
4012 | 0 | case TIFFReadDirEntryErrCount: |
4013 | 0 | TIFFErrorExtR(tif, module, "Incorrect count for \"%s\"", |
4014 | 0 | tagname); |
4015 | 0 | break; |
4016 | 0 | case TIFFReadDirEntryErrType: |
4017 | 0 | TIFFErrorExtR(tif, module, "Incompatible type for \"%s\"", |
4018 | 0 | tagname); |
4019 | 0 | break; |
4020 | 0 | case TIFFReadDirEntryErrIo: |
4021 | 0 | TIFFErrorExtR(tif, module, "IO error during reading of \"%s\"", |
4022 | 0 | tagname); |
4023 | 0 | break; |
4024 | 0 | case TIFFReadDirEntryErrRange: |
4025 | 0 | TIFFErrorExtR(tif, module, "Incorrect value for \"%s\"", |
4026 | 0 | tagname); |
4027 | 0 | break; |
4028 | 0 | case TIFFReadDirEntryErrPsdif: |
4029 | 0 | TIFFErrorExtR( |
4030 | 0 | tif, module, |
4031 | 0 | "Cannot handle different values per sample for \"%s\"", |
4032 | 0 | tagname); |
4033 | 0 | break; |
4034 | 0 | case TIFFReadDirEntryErrSizesan: |
4035 | 0 | TIFFErrorExtR(tif, module, |
4036 | 0 | "Sanity check on size of \"%s\" value failed", |
4037 | 0 | tagname); |
4038 | 0 | break; |
4039 | 0 | case TIFFReadDirEntryErrAlloc: |
4040 | 0 | TIFFErrorExtR(tif, module, "Out of memory reading of \"%s\"", |
4041 | 0 | tagname); |
4042 | 0 | break; |
4043 | 0 | case TIFFReadDirEntryErrOk: |
4044 | 0 | default: |
4045 | 0 | assert(0); /* we should never get here */ |
4046 | 0 | break; |
4047 | 0 | } |
4048 | 0 | } |
4049 | 0 | else |
4050 | 0 | { |
4051 | 0 | switch (err) |
4052 | 0 | { |
4053 | 0 | case TIFFReadDirEntryErrCount: |
4054 | 0 | TIFFWarningExtR(tif, module, |
4055 | 0 | "Incorrect count for \"%s\"; tag ignored", |
4056 | 0 | tagname); |
4057 | 0 | break; |
4058 | 0 | case TIFFReadDirEntryErrType: |
4059 | 0 | TIFFWarningExtR(tif, module, |
4060 | 0 | "Incompatible type for \"%s\"; tag ignored", |
4061 | 0 | tagname); |
4062 | 0 | break; |
4063 | 0 | case TIFFReadDirEntryErrIo: |
4064 | 0 | TIFFWarningExtR( |
4065 | 0 | tif, module, |
4066 | 0 | "IO error during reading of \"%s\"; tag ignored", tagname); |
4067 | 0 | break; |
4068 | 0 | case TIFFReadDirEntryErrRange: |
4069 | 0 | TIFFWarningExtR(tif, module, |
4070 | 0 | "Incorrect value for \"%s\"; tag ignored", |
4071 | 0 | tagname); |
4072 | 0 | break; |
4073 | 0 | case TIFFReadDirEntryErrPsdif: |
4074 | 0 | TIFFWarningExtR(tif, module, |
4075 | 0 | "Cannot handle different values per sample for " |
4076 | 0 | "\"%s\"; tag ignored", |
4077 | 0 | tagname); |
4078 | 0 | break; |
4079 | 0 | case TIFFReadDirEntryErrSizesan: |
4080 | 0 | TIFFWarningExtR( |
4081 | 0 | tif, module, |
4082 | 0 | "Sanity check on size of \"%s\" value failed; tag ignored", |
4083 | 0 | tagname); |
4084 | 0 | break; |
4085 | 0 | case TIFFReadDirEntryErrAlloc: |
4086 | 0 | TIFFWarningExtR(tif, module, |
4087 | 0 | "Out of memory reading of \"%s\"; tag ignored", |
4088 | 0 | tagname); |
4089 | 0 | break; |
4090 | 0 | case TIFFReadDirEntryErrOk: |
4091 | 0 | default: |
4092 | 0 | assert(0); /* we should never get here */ |
4093 | 0 | break; |
4094 | 0 | } |
4095 | 0 | } |
4096 | 0 | } |
4097 | | |
4098 | | /* |
4099 | | * Return the maximum number of color channels specified for a given photometric |
4100 | | * type. 0 is returned if photometric type isn't supported or no default value |
4101 | | * is defined by the specification. |
4102 | | */ |
4103 | | static int _TIFFGetMaxColorChannels(uint16_t photometric) |
4104 | 0 | { |
4105 | 0 | switch (photometric) |
4106 | 0 | { |
4107 | 0 | case PHOTOMETRIC_PALETTE: |
4108 | 0 | case PHOTOMETRIC_MINISWHITE: |
4109 | 0 | case PHOTOMETRIC_MINISBLACK: |
4110 | 0 | return 1; |
4111 | 0 | case PHOTOMETRIC_YCBCR: |
4112 | 0 | case PHOTOMETRIC_RGB: |
4113 | 0 | case PHOTOMETRIC_CIELAB: |
4114 | 0 | case PHOTOMETRIC_LOGLUV: |
4115 | 0 | case PHOTOMETRIC_ITULAB: |
4116 | 0 | case PHOTOMETRIC_ICCLAB: |
4117 | 0 | return 3; |
4118 | 0 | case PHOTOMETRIC_SEPARATED: |
4119 | 0 | case PHOTOMETRIC_MASK: |
4120 | 0 | return 4; |
4121 | 0 | case PHOTOMETRIC_LOGL: |
4122 | 0 | case PHOTOMETRIC_CFA: |
4123 | 0 | default: |
4124 | 0 | return 0; |
4125 | 0 | } |
4126 | 0 | } |
4127 | | |
4128 | | static int ByteCountLooksBad(TIFF *tif) |
4129 | 0 | { |
4130 | | /* |
4131 | | * Assume we have wrong StripByteCount value (in case |
4132 | | * of single strip) in following cases: |
4133 | | * - it is equal to zero along with StripOffset; |
4134 | | * - it is larger than file itself (in case of uncompressed |
4135 | | * image); |
4136 | | * - it is smaller than the size of the bytes per row |
4137 | | * multiplied on the number of rows. The last case should |
4138 | | * not be checked in the case of writing new image, |
4139 | | * because we may do not know the exact strip size |
4140 | | * until the whole image will be written and directory |
4141 | | * dumped out. |
4142 | | */ |
4143 | 0 | uint64_t bytecount = TIFFGetStrileByteCount(tif, 0); |
4144 | 0 | uint64_t offset = TIFFGetStrileOffset(tif, 0); |
4145 | 0 | uint64_t filesize; |
4146 | |
|
4147 | 0 | if (offset == 0) |
4148 | 0 | return 0; |
4149 | 0 | if (bytecount == 0) |
4150 | 0 | return 1; |
4151 | 0 | if (tif->tif_dir.td_compression != COMPRESSION_NONE) |
4152 | 0 | return 0; |
4153 | 0 | filesize = TIFFGetFileSize(tif); |
4154 | 0 | if (offset <= filesize && bytecount > filesize - offset) |
4155 | 0 | return 1; |
4156 | 0 | if (tif->tif_mode == O_RDONLY) |
4157 | 0 | { |
4158 | 0 | uint64_t scanlinesize = TIFFScanlineSize64(tif); |
4159 | 0 | if (tif->tif_dir.td_imagelength > 0 && |
4160 | 0 | scanlinesize > UINT64_MAX / tif->tif_dir.td_imagelength) |
4161 | 0 | { |
4162 | 0 | return 1; |
4163 | 0 | } |
4164 | 0 | if (bytecount < scanlinesize * tif->tif_dir.td_imagelength) |
4165 | 0 | return 1; |
4166 | 0 | } |
4167 | 0 | return 0; |
4168 | 0 | } |
4169 | | |
4170 | | /* |
4171 | | * To evaluate the IFD data size when reading, save the offset and data size of |
4172 | | * all data that does not fit into the IFD entries themselves. |
4173 | | */ |
4174 | | static bool EvaluateIFDdatasizeReading(TIFF *tif, TIFFDirEntry *dp) |
4175 | 0 | { |
4176 | 0 | const uint64_t data_width = TIFFDataWidth((TIFFDataType)dp->tdir_type); |
4177 | 0 | if (data_width != 0 && dp->tdir_count > UINT64_MAX / data_width) |
4178 | 0 | { |
4179 | 0 | TIFFErrorExtR(tif, "EvaluateIFDdatasizeReading", |
4180 | 0 | "Too large IFD data size"); |
4181 | 0 | return false; |
4182 | 0 | } |
4183 | 0 | const uint64_t datalength = dp->tdir_count * data_width; |
4184 | 0 | if (datalength > ((tif->tif_flags & TIFF_BIGTIFF) ? 0x8U : 0x4U)) |
4185 | 0 | { |
4186 | 0 | if (tif->tif_dir.td_dirdatasize_read > UINT64_MAX - datalength) |
4187 | 0 | { |
4188 | 0 | TIFFErrorExtR(tif, "EvaluateIFDdatasizeReading", |
4189 | 0 | "Too large IFD data size"); |
4190 | 0 | return false; |
4191 | 0 | } |
4192 | 0 | tif->tif_dir.td_dirdatasize_read += datalength; |
4193 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
4194 | 0 | { |
4195 | | /* The offset of TIFFDirEntry are not swapped when read in. That has |
4196 | | * to be done when used. */ |
4197 | 0 | uint32_t offset = dp->tdir_offset.toff_long; |
4198 | 0 | if (tif->tif_flags & TIFF_SWAB) |
4199 | 0 | TIFFSwabLong(&offset); |
4200 | 0 | tif->tif_dir |
4201 | 0 | .td_dirdatasize_offsets[tif->tif_dir.td_dirdatasize_Noffsets] |
4202 | 0 | .offset = (uint64_t)offset; |
4203 | 0 | } |
4204 | 0 | else |
4205 | 0 | { |
4206 | 0 | tif->tif_dir |
4207 | 0 | .td_dirdatasize_offsets[tif->tif_dir.td_dirdatasize_Noffsets] |
4208 | 0 | .offset = dp->tdir_offset.toff_long8; |
4209 | 0 | if (tif->tif_flags & TIFF_SWAB) |
4210 | 0 | TIFFSwabLong8( |
4211 | 0 | &tif->tif_dir |
4212 | 0 | .td_dirdatasize_offsets[tif->tif_dir |
4213 | 0 | .td_dirdatasize_Noffsets] |
4214 | 0 | .offset); |
4215 | 0 | } |
4216 | 0 | tif->tif_dir |
4217 | 0 | .td_dirdatasize_offsets[tif->tif_dir.td_dirdatasize_Noffsets] |
4218 | 0 | .length = datalength; |
4219 | 0 | tif->tif_dir.td_dirdatasize_Noffsets++; |
4220 | 0 | } |
4221 | 0 | return true; |
4222 | 0 | } |
4223 | | |
4224 | | /* |
4225 | | * Compare function for qsort() sorting TIFFEntryOffsetAndLength array entries. |
4226 | | */ |
4227 | | static int cmpTIFFEntryOffsetAndLength(const void *a, const void *b) |
4228 | 0 | { |
4229 | 0 | const TIFFEntryOffsetAndLength *ta = (const TIFFEntryOffsetAndLength *)a; |
4230 | 0 | const TIFFEntryOffsetAndLength *tb = (const TIFFEntryOffsetAndLength *)b; |
4231 | | /* Compare offsets */ |
4232 | 0 | if (ta->offset > tb->offset) |
4233 | 0 | return 1; |
4234 | 0 | else if (ta->offset < tb->offset) |
4235 | 0 | return -1; |
4236 | 0 | else |
4237 | 0 | return 0; |
4238 | 0 | } |
4239 | | |
4240 | | /* |
4241 | | * Determine the IFD data size after reading an IFD from the file that can be |
4242 | | * overwritten and saving it in tif_dir.td_dirdatasize_read. This data size |
4243 | | * includes the IFD entries themselves as well as the data that does not fit |
4244 | | * directly into the IFD entries but is located directly after the IFD entries |
4245 | | * in the file. |
4246 | | */ |
4247 | | static void CalcFinalIFDdatasizeReading(TIFF *tif, uint16_t dircount) |
4248 | 0 | { |
4249 | | /* IFD data size is only needed if file-writing is enabled. |
4250 | | * This also avoids the seek() to EOF to determine the file size, which |
4251 | | * causes the stdin-streaming-friendly mode of libtiff for GDAL to fail. */ |
4252 | 0 | if (tif->tif_mode == O_RDONLY) |
4253 | 0 | return; |
4254 | | |
4255 | | /* Sort TIFFEntryOffsetAndLength array in ascending order. */ |
4256 | 0 | qsort(tif->tif_dir.td_dirdatasize_offsets, |
4257 | 0 | tif->tif_dir.td_dirdatasize_Noffsets, |
4258 | 0 | sizeof(TIFFEntryOffsetAndLength), cmpTIFFEntryOffsetAndLength); |
4259 | | |
4260 | | /* Get offset of end of IFD entry space. */ |
4261 | 0 | uint64_t IFDendoffset; |
4262 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
4263 | 0 | IFDendoffset = tif->tif_diroff + 2 + dircount * 12 + 4; |
4264 | 0 | else |
4265 | 0 | IFDendoffset = tif->tif_diroff + 8 + dircount * 20 + 8; |
4266 | | |
4267 | | /* Check which offsets are right behind IFD entries. However, LibTIFF |
4268 | | * increments the writing address for every external data to an even offset. |
4269 | | * Thus gaps of 1 byte can occur. */ |
4270 | 0 | uint64_t size = 0; |
4271 | 0 | uint64_t offset; |
4272 | 0 | uint32_t i; |
4273 | 0 | for (i = 0; i < tif->tif_dir.td_dirdatasize_Noffsets; i++) |
4274 | 0 | { |
4275 | 0 | offset = tif->tif_dir.td_dirdatasize_offsets[i].offset; |
4276 | 0 | if (offset == IFDendoffset) |
4277 | 0 | { |
4278 | 0 | size += tif->tif_dir.td_dirdatasize_offsets[i].length; |
4279 | 0 | IFDendoffset += tif->tif_dir.td_dirdatasize_offsets[i].length; |
4280 | 0 | } |
4281 | 0 | else if (offset == IFDendoffset + 1) |
4282 | 0 | { |
4283 | | /* Add gap byte after previous IFD data set. */ |
4284 | 0 | size += tif->tif_dir.td_dirdatasize_offsets[i].length + 1; |
4285 | 0 | IFDendoffset += tif->tif_dir.td_dirdatasize_offsets[i].length; |
4286 | 0 | } |
4287 | 0 | else |
4288 | 0 | { |
4289 | | /* Further data is no more continuously after IFD */ |
4290 | 0 | break; |
4291 | 0 | } |
4292 | 0 | } |
4293 | | /* Check for gap byte of some easy cases. This should cover 90% of cases. |
4294 | | * Otherwise, IFD will be re-written even it might be safely overwritten. */ |
4295 | 0 | if (tif->tif_nextdiroff != 0) |
4296 | 0 | { |
4297 | 0 | if (tif->tif_nextdiroff == IFDendoffset + 1) |
4298 | 0 | size++; |
4299 | 0 | } |
4300 | 0 | else |
4301 | 0 | { |
4302 | | /* Check for IFD data ends at EOF. Then IFD can always be safely |
4303 | | * overwritten. */ |
4304 | 0 | offset = TIFFSeekFile(tif, 0, SEEK_END); |
4305 | 0 | if (offset == IFDendoffset) |
4306 | 0 | { |
4307 | 0 | tif->tif_dir.td_dirdatasize_read = UINT64_MAX; |
4308 | 0 | return; |
4309 | 0 | } |
4310 | 0 | } |
4311 | | |
4312 | | /* Finally, add the size of the IFD tag entries themselves. */ |
4313 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
4314 | 0 | tif->tif_dir.td_dirdatasize_read = 2 + dircount * 12 + 4 + size; |
4315 | 0 | else |
4316 | 0 | tif->tif_dir.td_dirdatasize_read = 8 + dircount * 20 + 8 + size; |
4317 | 0 | } /*-- CalcFinalIFDdatasizeReading() --*/ |
4318 | | |
4319 | | /* |
4320 | | * Read the next TIFF directory from a file and convert it to the internal |
4321 | | * format. We read directories sequentially. |
4322 | | */ |
4323 | | int TIFFReadDirectory(TIFF *tif) |
4324 | 0 | { |
4325 | 0 | static const char module[] = "TIFFReadDirectory"; |
4326 | 0 | TIFFDirEntry *dir; |
4327 | 0 | uint16_t dircount; |
4328 | 0 | TIFFDirEntry *dp; |
4329 | 0 | uint16_t di; |
4330 | 0 | const TIFFField *fip; |
4331 | 0 | uint32_t fii = FAILED_FII; |
4332 | 0 | toff_t nextdiroff; |
4333 | 0 | int bitspersample_read = FALSE; |
4334 | 0 | int color_channels; |
4335 | |
|
4336 | 0 | if (tif->tif_nextdiroff == 0) |
4337 | 0 | { |
4338 | | /* In this special case, tif_diroff needs also to be set to 0. |
4339 | | * This is behind the last IFD, thus no checking or reading necessary. |
4340 | | */ |
4341 | 0 | tif->tif_diroff = tif->tif_nextdiroff; |
4342 | 0 | return 0; |
4343 | 0 | } |
4344 | | |
4345 | 0 | nextdiroff = tif->tif_nextdiroff; |
4346 | | /* tif_curdir++ and tif_nextdiroff should only be updated after SUCCESSFUL |
4347 | | * reading of the directory. Otherwise, invalid IFD offsets could corrupt |
4348 | | * the IFD list. */ |
4349 | 0 | if (!_TIFFCheckDirNumberAndOffset(tif, |
4350 | 0 | tif->tif_curdir == |
4351 | 0 | TIFF_NON_EXISTENT_DIR_NUMBER |
4352 | 0 | ? 0 |
4353 | 0 | : tif->tif_curdir + 1, |
4354 | 0 | nextdiroff)) |
4355 | 0 | { |
4356 | 0 | return 0; /* bad offset (IFD looping or more than TIFF_MAX_DIR_COUNT |
4357 | | IFDs) */ |
4358 | 0 | } |
4359 | 0 | dircount = TIFFFetchDirectory(tif, nextdiroff, &dir, &tif->tif_nextdiroff); |
4360 | 0 | if (!dircount) |
4361 | 0 | { |
4362 | 0 | TIFFErrorExtR(tif, module, |
4363 | 0 | "Failed to read directory at offset %" PRIu64, |
4364 | 0 | nextdiroff); |
4365 | 0 | return 0; |
4366 | 0 | } |
4367 | | /* Set global values after a valid directory has been fetched. |
4368 | | * tif_diroff is already set to nextdiroff in TIFFFetchDirectory() in the |
4369 | | * beginning. */ |
4370 | 0 | if (tif->tif_curdir == TIFF_NON_EXISTENT_DIR_NUMBER) |
4371 | 0 | tif->tif_curdir = 0; |
4372 | 0 | else |
4373 | 0 | tif->tif_curdir++; |
4374 | |
|
4375 | 0 | TIFFReadDirectoryCheckOrder(tif, dir, dircount); |
4376 | | |
4377 | | /* |
4378 | | * Mark duplicates of any tag to be ignored (bugzilla 1994) |
4379 | | * to avoid certain pathological problems. |
4380 | | */ |
4381 | 0 | { |
4382 | 0 | TIFFDirEntry *ma; |
4383 | 0 | uint16_t mb; |
4384 | 0 | for (ma = dir, mb = 0; mb < dircount; ma++, mb++) |
4385 | 0 | { |
4386 | 0 | TIFFDirEntry *na; |
4387 | 0 | uint16_t nb; |
4388 | 0 | for (na = ma + 1, nb = mb + 1; nb < dircount; na++, nb++) |
4389 | 0 | { |
4390 | 0 | if (ma->tdir_tag == na->tdir_tag) |
4391 | 0 | { |
4392 | 0 | na->tdir_ignore = TRUE; |
4393 | 0 | } |
4394 | 0 | } |
4395 | 0 | } |
4396 | 0 | } |
4397 | |
|
4398 | 0 | tif->tif_flags &= ~TIFF_BEENWRITING; /* reset before new dir */ |
4399 | 0 | tif->tif_flags &= ~TIFF_BUF4WRITE; /* reset before new dir */ |
4400 | 0 | tif->tif_flags &= ~TIFF_CHOPPEDUPARRAYS; |
4401 | | |
4402 | | /* When changing directory, in deferred strile loading mode, we must also |
4403 | | * unset the TIFF_LAZYSTRILELOAD_DONE bit if it was initially set, |
4404 | | * to make sure the strile offset/bytecount are read again (when they fit |
4405 | | * in the tag data area). |
4406 | | */ |
4407 | 0 | tif->tif_flags &= ~TIFF_LAZYSTRILELOAD_DONE; |
4408 | | |
4409 | | /* free any old stuff and reinit */ |
4410 | 0 | TIFFFreeDirectory(tif); |
4411 | 0 | TIFFDefaultDirectory(tif); |
4412 | | |
4413 | | /* After setup a fresh directory indicate that now active IFD is also |
4414 | | * present on file, even if its entries could not be read successfully |
4415 | | * below. */ |
4416 | 0 | tif->tif_dir.td_iswrittentofile = TRUE; |
4417 | | |
4418 | | /* Allocate arrays for offset values outside IFD entry for IFD data size |
4419 | | * checking. Note: Counter are reset within TIFFFreeDirectory(). */ |
4420 | 0 | tif->tif_dir.td_dirdatasize_offsets = |
4421 | 0 | (TIFFEntryOffsetAndLength *)_TIFFmallocExt( |
4422 | 0 | tif, dircount * sizeof(TIFFEntryOffsetAndLength)); |
4423 | 0 | if (tif->tif_dir.td_dirdatasize_offsets == NULL) |
4424 | 0 | { |
4425 | 0 | TIFFErrorExtR( |
4426 | 0 | tif, module, |
4427 | 0 | "Failed to allocate memory for counting IFD data size at reading"); |
4428 | 0 | goto bad; |
4429 | 0 | } |
4430 | | /* |
4431 | | * Electronic Arts writes gray-scale TIFF files |
4432 | | * without a PlanarConfiguration directory entry. |
4433 | | * Thus we setup a default value here, even though |
4434 | | * the TIFF spec says there is no default value. |
4435 | | * After PlanarConfiguration is preset in TIFFDefaultDirectory() |
4436 | | * the following setting is not needed, but does not harm either. |
4437 | | */ |
4438 | 0 | TIFFSetField(tif, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG); |
4439 | | /* |
4440 | | * Setup default value and then make a pass over |
4441 | | * the fields to check type and tag information, |
4442 | | * and to extract info required to size data |
4443 | | * structures. A second pass is made afterwards |
4444 | | * to read in everything not taken in the first pass. |
4445 | | * But we must process the Compression tag first |
4446 | | * in order to merge in codec-private tag definitions (otherwise |
4447 | | * we may get complaints about unknown tags). However, the |
4448 | | * Compression tag may be dependent on the SamplesPerPixel |
4449 | | * tag value because older TIFF specs permitted Compression |
4450 | | * to be written as a SamplesPerPixel-count tag entry. |
4451 | | * Thus if we don't first figure out the correct SamplesPerPixel |
4452 | | * tag value then we may end up ignoring the Compression tag |
4453 | | * value because it has an incorrect count value (if the |
4454 | | * true value of SamplesPerPixel is not 1). |
4455 | | */ |
4456 | 0 | dp = |
4457 | 0 | TIFFReadDirectoryFindEntry(tif, dir, dircount, TIFFTAG_SAMPLESPERPIXEL); |
4458 | 0 | if (dp) |
4459 | 0 | { |
4460 | 0 | if (!TIFFFetchNormalTag(tif, dp, 0)) |
4461 | 0 | goto bad; |
4462 | 0 | dp->tdir_ignore = TRUE; |
4463 | 0 | } |
4464 | 0 | dp = TIFFReadDirectoryFindEntry(tif, dir, dircount, TIFFTAG_COMPRESSION); |
4465 | 0 | if (dp) |
4466 | 0 | { |
4467 | | /* |
4468 | | * The 5.0 spec says the Compression tag has one value, while |
4469 | | * earlier specs say it has one value per sample. Because of |
4470 | | * this, we accept the tag if one value is supplied with either |
4471 | | * count. |
4472 | | */ |
4473 | 0 | uint16_t value; |
4474 | 0 | enum TIFFReadDirEntryErr err; |
4475 | 0 | err = TIFFReadDirEntryShort(tif, dp, &value); |
4476 | 0 | if (err == TIFFReadDirEntryErrCount) |
4477 | 0 | err = TIFFReadDirEntryPersampleShort(tif, dp, &value); |
4478 | 0 | if (err != TIFFReadDirEntryErrOk) |
4479 | 0 | { |
4480 | 0 | TIFFReadDirEntryOutputErr(tif, err, module, "Compression", 0); |
4481 | 0 | goto bad; |
4482 | 0 | } |
4483 | 0 | if (!TIFFSetField(tif, TIFFTAG_COMPRESSION, value)) |
4484 | 0 | goto bad; |
4485 | 0 | dp->tdir_ignore = TRUE; |
4486 | 0 | } |
4487 | 0 | else |
4488 | 0 | { |
4489 | 0 | if (!TIFFSetField(tif, TIFFTAG_COMPRESSION, COMPRESSION_NONE)) |
4490 | 0 | goto bad; |
4491 | 0 | } |
4492 | | /* |
4493 | | * First real pass over the directory. |
4494 | | */ |
4495 | 0 | for (di = 0, dp = dir; di < dircount; di++, dp++) |
4496 | 0 | { |
4497 | 0 | if (!dp->tdir_ignore) |
4498 | 0 | { |
4499 | 0 | TIFFReadDirectoryFindFieldInfo(tif, dp->tdir_tag, &fii); |
4500 | 0 | if (fii == FAILED_FII) |
4501 | 0 | { |
4502 | 0 | if (tif->tif_warn_about_unknown_tags) |
4503 | 0 | { |
4504 | 0 | TIFFWarningExtR(tif, module, |
4505 | 0 | "Unknown field with tag %" PRIu16 |
4506 | 0 | " (0x%" PRIx16 ") encountered", |
4507 | 0 | dp->tdir_tag, dp->tdir_tag); |
4508 | 0 | } |
4509 | | /* the following knowingly leaks the |
4510 | | anonymous field structure */ |
4511 | 0 | const TIFFField *fld = _TIFFCreateAnonField( |
4512 | 0 | tif, dp->tdir_tag, (TIFFDataType)dp->tdir_type); |
4513 | 0 | if (fld == NULL || !_TIFFMergeFields(tif, fld, 1)) |
4514 | 0 | { |
4515 | 0 | TIFFWarningExtR( |
4516 | 0 | tif, module, |
4517 | 0 | "Registering anonymous field with tag %" PRIu16 |
4518 | 0 | " (0x%" PRIx16 ") failed", |
4519 | 0 | dp->tdir_tag, dp->tdir_tag); |
4520 | 0 | dp->tdir_ignore = TRUE; |
4521 | 0 | } |
4522 | 0 | else |
4523 | 0 | { |
4524 | 0 | TIFFReadDirectoryFindFieldInfo(tif, dp->tdir_tag, &fii); |
4525 | 0 | assert(fii != FAILED_FII); |
4526 | 0 | } |
4527 | 0 | } |
4528 | 0 | } |
4529 | 0 | if (!dp->tdir_ignore) |
4530 | 0 | { |
4531 | 0 | fip = tif->tif_fields[fii]; |
4532 | 0 | if (fip->field_bit == FIELD_IGNORE) |
4533 | 0 | dp->tdir_ignore = TRUE; |
4534 | 0 | else |
4535 | 0 | { |
4536 | 0 | switch (dp->tdir_tag) |
4537 | 0 | { |
4538 | 0 | case TIFFTAG_STRIPOFFSETS: |
4539 | 0 | case TIFFTAG_STRIPBYTECOUNTS: |
4540 | 0 | case TIFFTAG_TILEOFFSETS: |
4541 | 0 | case TIFFTAG_TILEBYTECOUNTS: |
4542 | 0 | TIFFSetFieldBit(tif, fip->field_bit); |
4543 | 0 | break; |
4544 | 0 | case TIFFTAG_IMAGEWIDTH: |
4545 | 0 | case TIFFTAG_IMAGELENGTH: |
4546 | 0 | case TIFFTAG_IMAGEDEPTH: |
4547 | 0 | case TIFFTAG_TILELENGTH: |
4548 | 0 | case TIFFTAG_TILEWIDTH: |
4549 | 0 | case TIFFTAG_TILEDEPTH: |
4550 | 0 | case TIFFTAG_PLANARCONFIG: |
4551 | 0 | case TIFFTAG_ROWSPERSTRIP: |
4552 | 0 | case TIFFTAG_EXTRASAMPLES: |
4553 | 0 | if (!TIFFFetchNormalTag(tif, dp, 0)) |
4554 | 0 | goto bad; |
4555 | 0 | dp->tdir_ignore = TRUE; |
4556 | 0 | break; |
4557 | 0 | default: |
4558 | 0 | if (!_TIFFCheckFieldIsValidForCodec(tif, dp->tdir_tag)) |
4559 | 0 | dp->tdir_ignore = TRUE; |
4560 | 0 | break; |
4561 | 0 | } |
4562 | 0 | } |
4563 | 0 | } |
4564 | 0 | } |
4565 | | /* |
4566 | | * XXX: OJPEG hack. |
4567 | | * If a) compression is OJPEG, b) planarconfig tag says it's separate, |
4568 | | * c) strip offsets/bytecounts tag are both present and |
4569 | | * d) both contain exactly one value, then we consistently find |
4570 | | * that the buggy implementation of the buggy compression scheme |
4571 | | * matches contig planarconfig best. So we 'fix-up' the tag here |
4572 | | */ |
4573 | 0 | if ((tif->tif_dir.td_compression == COMPRESSION_OJPEG) && |
4574 | 0 | (tif->tif_dir.td_planarconfig == PLANARCONFIG_SEPARATE)) |
4575 | 0 | { |
4576 | 0 | if (!_TIFFFillStriles(tif)) |
4577 | 0 | goto bad; |
4578 | 0 | dp = TIFFReadDirectoryFindEntry(tif, dir, dircount, |
4579 | 0 | TIFFTAG_STRIPOFFSETS); |
4580 | 0 | if ((dp != 0) && (dp->tdir_count == 1)) |
4581 | 0 | { |
4582 | 0 | dp = TIFFReadDirectoryFindEntry(tif, dir, dircount, |
4583 | 0 | TIFFTAG_STRIPBYTECOUNTS); |
4584 | 0 | if ((dp != 0) && (dp->tdir_count == 1)) |
4585 | 0 | { |
4586 | 0 | tif->tif_dir.td_planarconfig = PLANARCONFIG_CONTIG; |
4587 | 0 | TIFFWarningExtR(tif, module, |
4588 | 0 | "Planarconfig tag value assumed incorrect, " |
4589 | 0 | "assuming data is contig instead of chunky"); |
4590 | 0 | } |
4591 | 0 | } |
4592 | 0 | } |
4593 | | /* |
4594 | | * Allocate directory structure and setup defaults. |
4595 | | */ |
4596 | 0 | if (!TIFFFieldSet(tif, FIELD_IMAGEDIMENSIONS)) |
4597 | 0 | { |
4598 | 0 | MissingRequired(tif, "ImageLength"); |
4599 | 0 | goto bad; |
4600 | 0 | } |
4601 | | |
4602 | | /* |
4603 | | * Second pass: extract other information. |
4604 | | */ |
4605 | 0 | for (di = 0, dp = dir; di < dircount; di++, dp++) |
4606 | 0 | { |
4607 | 0 | if (!dp->tdir_ignore) |
4608 | 0 | { |
4609 | 0 | switch (dp->tdir_tag) |
4610 | 0 | { |
4611 | 0 | case TIFFTAG_MINSAMPLEVALUE: |
4612 | 0 | case TIFFTAG_MAXSAMPLEVALUE: |
4613 | 0 | case TIFFTAG_BITSPERSAMPLE: |
4614 | 0 | case TIFFTAG_DATATYPE: |
4615 | 0 | case TIFFTAG_SAMPLEFORMAT: |
4616 | | /* |
4617 | | * The MinSampleValue, MaxSampleValue, BitsPerSample |
4618 | | * DataType and SampleFormat tags are supposed to be |
4619 | | * written as one value/sample, but some vendors |
4620 | | * incorrectly write one value only -- so we accept |
4621 | | * that as well (yuck). Other vendors write correct |
4622 | | * value for NumberOfSamples, but incorrect one for |
4623 | | * BitsPerSample and friends, and we will read this |
4624 | | * too. |
4625 | | */ |
4626 | 0 | { |
4627 | 0 | uint16_t value; |
4628 | 0 | enum TIFFReadDirEntryErr err; |
4629 | 0 | err = TIFFReadDirEntryShort(tif, dp, &value); |
4630 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
4631 | 0 | goto bad; |
4632 | 0 | if (err == TIFFReadDirEntryErrCount) |
4633 | 0 | err = |
4634 | 0 | TIFFReadDirEntryPersampleShort(tif, dp, &value); |
4635 | 0 | if (err != TIFFReadDirEntryErrOk) |
4636 | 0 | { |
4637 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4638 | 0 | TIFFReadDirEntryOutputErr( |
4639 | 0 | tif, err, module, |
4640 | 0 | fip ? fip->field_name : "unknown tagname", 0); |
4641 | 0 | goto bad; |
4642 | 0 | } |
4643 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, value)) |
4644 | 0 | goto bad; |
4645 | 0 | if (dp->tdir_tag == TIFFTAG_BITSPERSAMPLE) |
4646 | 0 | bitspersample_read = TRUE; |
4647 | 0 | } |
4648 | 0 | break; |
4649 | 0 | case TIFFTAG_SMINSAMPLEVALUE: |
4650 | 0 | case TIFFTAG_SMAXSAMPLEVALUE: |
4651 | 0 | { |
4652 | |
|
4653 | 0 | double *data = NULL; |
4654 | 0 | enum TIFFReadDirEntryErr err; |
4655 | 0 | uint32_t saved_flags; |
4656 | 0 | int m; |
4657 | 0 | if (dp->tdir_count != |
4658 | 0 | (uint64_t)tif->tif_dir.td_samplesperpixel) |
4659 | 0 | err = TIFFReadDirEntryErrCount; |
4660 | 0 | else |
4661 | 0 | err = TIFFReadDirEntryDoubleArray(tif, dp, &data); |
4662 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
4663 | 0 | goto bad; |
4664 | 0 | if (err != TIFFReadDirEntryErrOk) |
4665 | 0 | { |
4666 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4667 | 0 | TIFFReadDirEntryOutputErr( |
4668 | 0 | tif, err, module, |
4669 | 0 | fip ? fip->field_name : "unknown tagname", 0); |
4670 | 0 | goto bad; |
4671 | 0 | } |
4672 | 0 | saved_flags = tif->tif_flags; |
4673 | 0 | tif->tif_flags |= TIFF_PERSAMPLE; |
4674 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
4675 | 0 | tif->tif_flags = saved_flags; |
4676 | 0 | _TIFFfreeExt(tif, data); |
4677 | 0 | if (!m) |
4678 | 0 | goto bad; |
4679 | 0 | } |
4680 | 0 | break; |
4681 | 0 | case TIFFTAG_STRIPOFFSETS: |
4682 | 0 | case TIFFTAG_TILEOFFSETS: |
4683 | 0 | { |
4684 | 0 | switch (dp->tdir_type) |
4685 | 0 | { |
4686 | 0 | case TIFF_SHORT: |
4687 | 0 | case TIFF_LONG: |
4688 | 0 | case TIFF_LONG8: |
4689 | 0 | break; |
4690 | 0 | default: |
4691 | | /* Warn except if directory typically created with |
4692 | | * TIFFDeferStrileArrayWriting() */ |
4693 | 0 | if (!(tif->tif_mode == O_RDWR && |
4694 | 0 | dp->tdir_count == 0 && dp->tdir_type == 0 && |
4695 | 0 | dp->tdir_offset.toff_long8 == 0)) |
4696 | 0 | { |
4697 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4698 | 0 | TIFFWarningExtR( |
4699 | 0 | tif, module, "Invalid data type for tag %s", |
4700 | 0 | fip ? fip->field_name : "unknown tagname"); |
4701 | 0 | } |
4702 | 0 | break; |
4703 | 0 | } |
4704 | 0 | _TIFFmemcpy(&(tif->tif_dir.td_stripoffset_entry), dp, |
4705 | 0 | sizeof(TIFFDirEntry)); |
4706 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
4707 | 0 | goto bad; |
4708 | 0 | } |
4709 | 0 | break; |
4710 | 0 | case TIFFTAG_STRIPBYTECOUNTS: |
4711 | 0 | case TIFFTAG_TILEBYTECOUNTS: |
4712 | 0 | { |
4713 | 0 | switch (dp->tdir_type) |
4714 | 0 | { |
4715 | 0 | case TIFF_SHORT: |
4716 | 0 | case TIFF_LONG: |
4717 | 0 | case TIFF_LONG8: |
4718 | 0 | break; |
4719 | 0 | default: |
4720 | | /* Warn except if directory typically created with |
4721 | | * TIFFDeferStrileArrayWriting() */ |
4722 | 0 | if (!(tif->tif_mode == O_RDWR && |
4723 | 0 | dp->tdir_count == 0 && dp->tdir_type == 0 && |
4724 | 0 | dp->tdir_offset.toff_long8 == 0)) |
4725 | 0 | { |
4726 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4727 | 0 | TIFFWarningExtR( |
4728 | 0 | tif, module, "Invalid data type for tag %s", |
4729 | 0 | fip ? fip->field_name : "unknown tagname"); |
4730 | 0 | } |
4731 | 0 | break; |
4732 | 0 | } |
4733 | 0 | _TIFFmemcpy(&(tif->tif_dir.td_stripbytecount_entry), dp, |
4734 | 0 | sizeof(TIFFDirEntry)); |
4735 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
4736 | 0 | goto bad; |
4737 | 0 | } |
4738 | 0 | break; |
4739 | 0 | case TIFFTAG_COLORMAP: |
4740 | 0 | case TIFFTAG_TRANSFERFUNCTION: |
4741 | 0 | { |
4742 | 0 | enum TIFFReadDirEntryErr err; |
4743 | 0 | uint32_t countpersample; |
4744 | 0 | uint32_t countrequired; |
4745 | 0 | uint32_t incrementpersample; |
4746 | 0 | uint16_t *value = NULL; |
4747 | | /* It would be dangerous to instantiate those tag values */ |
4748 | | /* since if td_bitspersample has not yet been read (due to |
4749 | | */ |
4750 | | /* unordered tags), it could be read afterwards with a */ |
4751 | | /* values greater than the default one (1), which may cause |
4752 | | */ |
4753 | | /* crashes in user code */ |
4754 | 0 | if (!bitspersample_read) |
4755 | 0 | { |
4756 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4757 | 0 | TIFFWarningExtR( |
4758 | 0 | tif, module, |
4759 | 0 | "Ignoring %s since BitsPerSample tag not found", |
4760 | 0 | fip ? fip->field_name : "unknown tagname"); |
4761 | 0 | continue; |
4762 | 0 | } |
4763 | | /* ColorMap or TransferFunction for high bit */ |
4764 | | /* depths do not make much sense and could be */ |
4765 | | /* used as a denial of service vector */ |
4766 | 0 | if (tif->tif_dir.td_bitspersample > 24) |
4767 | 0 | { |
4768 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4769 | 0 | TIFFWarningExtR( |
4770 | 0 | tif, module, |
4771 | 0 | "Ignoring %s because BitsPerSample=%" PRIu16 ">24", |
4772 | 0 | fip ? fip->field_name : "unknown tagname", |
4773 | 0 | tif->tif_dir.td_bitspersample); |
4774 | 0 | continue; |
4775 | 0 | } |
4776 | 0 | countpersample = (1U << tif->tif_dir.td_bitspersample); |
4777 | 0 | if ((dp->tdir_tag == TIFFTAG_TRANSFERFUNCTION) && |
4778 | 0 | (dp->tdir_count == (uint64_t)countpersample)) |
4779 | 0 | { |
4780 | 0 | countrequired = countpersample; |
4781 | 0 | incrementpersample = 0; |
4782 | 0 | } |
4783 | 0 | else |
4784 | 0 | { |
4785 | 0 | countrequired = 3 * countpersample; |
4786 | 0 | incrementpersample = countpersample; |
4787 | 0 | } |
4788 | 0 | if (dp->tdir_count != (uint64_t)countrequired) |
4789 | 0 | err = TIFFReadDirEntryErrCount; |
4790 | 0 | else |
4791 | 0 | err = TIFFReadDirEntryShortArray(tif, dp, &value); |
4792 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
4793 | 0 | goto bad; |
4794 | 0 | if (err != TIFFReadDirEntryErrOk) |
4795 | 0 | { |
4796 | 0 | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4797 | 0 | TIFFReadDirEntryOutputErr( |
4798 | 0 | tif, err, module, |
4799 | 0 | fip ? fip->field_name : "unknown tagname", 1); |
4800 | 0 | } |
4801 | 0 | else |
4802 | 0 | { |
4803 | 0 | TIFFSetField(tif, dp->tdir_tag, value, |
4804 | 0 | value + incrementpersample, |
4805 | 0 | value + 2 * incrementpersample); |
4806 | 0 | _TIFFfreeExt(tif, value); |
4807 | 0 | } |
4808 | 0 | } |
4809 | 0 | break; |
4810 | | /* BEGIN REV 4.0 COMPATIBILITY */ |
4811 | 0 | case TIFFTAG_OSUBFILETYPE: |
4812 | 0 | { |
4813 | 0 | uint16_t valueo; |
4814 | 0 | uint32_t value; |
4815 | 0 | if (TIFFReadDirEntryShort(tif, dp, &valueo) == |
4816 | 0 | TIFFReadDirEntryErrOk) |
4817 | 0 | { |
4818 | 0 | switch (valueo) |
4819 | 0 | { |
4820 | 0 | case OFILETYPE_REDUCEDIMAGE: |
4821 | 0 | value = FILETYPE_REDUCEDIMAGE; |
4822 | 0 | break; |
4823 | 0 | case OFILETYPE_PAGE: |
4824 | 0 | value = FILETYPE_PAGE; |
4825 | 0 | break; |
4826 | 0 | default: |
4827 | 0 | value = 0; |
4828 | 0 | break; |
4829 | 0 | } |
4830 | 0 | if (value != 0) |
4831 | 0 | TIFFSetField(tif, TIFFTAG_SUBFILETYPE, value); |
4832 | 0 | } |
4833 | 0 | } |
4834 | 0 | break; |
4835 | | /* END REV 4.0 COMPATIBILITY */ |
4836 | | #if 0 |
4837 | | case TIFFTAG_EP_BATTERYLEVEL: |
4838 | | /* TIFFTAG_EP_BATTERYLEVEL can be RATIONAL or ASCII. |
4839 | | * LibTiff defines it as ASCII and converts RATIONAL to an |
4840 | | * ASCII string. */ |
4841 | | switch (dp->tdir_type) |
4842 | | { |
4843 | | case TIFF_RATIONAL: |
4844 | | { |
4845 | | /* Read rational and convert to ASCII*/ |
4846 | | enum TIFFReadDirEntryErr err; |
4847 | | TIFFRational_t rValue; |
4848 | | err = TIFFReadDirEntryCheckedRationalDirect( |
4849 | | tif, dp, &rValue); |
4850 | | if (err != TIFFReadDirEntryErrOk) |
4851 | | { |
4852 | | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4853 | | TIFFReadDirEntryOutputErr( |
4854 | | tif, err, module, |
4855 | | fip ? fip->field_name : "unknown tagname", |
4856 | | 1); |
4857 | | } |
4858 | | else |
4859 | | { |
4860 | | char szAux[32]; |
4861 | | snprintf(szAux, sizeof(szAux) - 1, "%d/%d", |
4862 | | rValue.uNum, rValue.uDenom); |
4863 | | TIFFSetField(tif, dp->tdir_tag, szAux); |
4864 | | } |
4865 | | } |
4866 | | break; |
4867 | | case TIFF_ASCII: |
4868 | | (void)TIFFFetchNormalTag(tif, dp, TRUE); |
4869 | | break; |
4870 | | default: |
4871 | | fip = TIFFFieldWithTag(tif, dp->tdir_tag); |
4872 | | TIFFWarningExtR(tif, module, |
4873 | | "Invalid data type for tag %s. " |
4874 | | "ASCII or RATIONAL expected", |
4875 | | fip ? fip->field_name |
4876 | | : "unknown tagname"); |
4877 | | break; |
4878 | | } |
4879 | | break; |
4880 | | #endif |
4881 | 0 | default: |
4882 | 0 | (void)TIFFFetchNormalTag(tif, dp, TRUE); |
4883 | 0 | break; |
4884 | 0 | } /* -- switch (dp->tdir_tag) -- */ |
4885 | 0 | } /* -- if (!dp->tdir_ignore) */ |
4886 | 0 | } /* -- for-loop -- */ |
4887 | | |
4888 | | /* Evaluate final IFD data size. */ |
4889 | 0 | CalcFinalIFDdatasizeReading(tif, dircount); |
4890 | | |
4891 | | /* |
4892 | | * OJPEG hack: |
4893 | | * - If a) compression is OJPEG, and b) photometric tag is missing, |
4894 | | * then we consistently find that photometric should be YCbCr |
4895 | | * - If a) compression is OJPEG, and b) photometric tag says it's RGB, |
4896 | | * then we consistently find that the buggy implementation of the |
4897 | | * buggy compression scheme matches photometric YCbCr instead. |
4898 | | * - If a) compression is OJPEG, and b) bitspersample tag is missing, |
4899 | | * then we consistently find bitspersample should be 8. |
4900 | | * - If a) compression is OJPEG, b) samplesperpixel tag is missing, |
4901 | | * and c) photometric is RGB or YCbCr, then we consistently find |
4902 | | * samplesperpixel should be 3 |
4903 | | * - If a) compression is OJPEG, b) samplesperpixel tag is missing, |
4904 | | * and c) photometric is MINISWHITE or MINISBLACK, then we consistently |
4905 | | * find samplesperpixel should be 3 |
4906 | | */ |
4907 | 0 | if (tif->tif_dir.td_compression == COMPRESSION_OJPEG) |
4908 | 0 | { |
4909 | 0 | if (!TIFFFieldSet(tif, FIELD_PHOTOMETRIC)) |
4910 | 0 | { |
4911 | 0 | TIFFWarningExtR( |
4912 | 0 | tif, module, |
4913 | 0 | "Photometric tag is missing, assuming data is YCbCr"); |
4914 | 0 | if (!TIFFSetField(tif, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_YCBCR)) |
4915 | 0 | goto bad; |
4916 | 0 | } |
4917 | 0 | else if (tif->tif_dir.td_photometric == PHOTOMETRIC_RGB) |
4918 | 0 | { |
4919 | 0 | tif->tif_dir.td_photometric = PHOTOMETRIC_YCBCR; |
4920 | 0 | TIFFWarningExtR(tif, module, |
4921 | 0 | "Photometric tag value assumed incorrect, " |
4922 | 0 | "assuming data is YCbCr instead of RGB"); |
4923 | 0 | } |
4924 | 0 | if (!TIFFFieldSet(tif, FIELD_BITSPERSAMPLE)) |
4925 | 0 | { |
4926 | 0 | TIFFWarningExtR( |
4927 | 0 | tif, module, |
4928 | 0 | "BitsPerSample tag is missing, assuming 8 bits per sample"); |
4929 | 0 | if (!TIFFSetField(tif, TIFFTAG_BITSPERSAMPLE, 8)) |
4930 | 0 | goto bad; |
4931 | 0 | } |
4932 | 0 | if (!TIFFFieldSet(tif, FIELD_SAMPLESPERPIXEL)) |
4933 | 0 | { |
4934 | 0 | if (tif->tif_dir.td_photometric == PHOTOMETRIC_RGB) |
4935 | 0 | { |
4936 | 0 | TIFFWarningExtR(tif, module, |
4937 | 0 | "SamplesPerPixel tag is missing, " |
4938 | 0 | "assuming correct SamplesPerPixel value is 3"); |
4939 | 0 | if (!TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 3)) |
4940 | 0 | goto bad; |
4941 | 0 | } |
4942 | 0 | if (tif->tif_dir.td_photometric == PHOTOMETRIC_YCBCR) |
4943 | 0 | { |
4944 | 0 | TIFFWarningExtR(tif, module, |
4945 | 0 | "SamplesPerPixel tag is missing, " |
4946 | 0 | "applying correct SamplesPerPixel value of 3"); |
4947 | 0 | if (!TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 3)) |
4948 | 0 | goto bad; |
4949 | 0 | } |
4950 | 0 | else if ((tif->tif_dir.td_photometric == PHOTOMETRIC_MINISWHITE) || |
4951 | 0 | (tif->tif_dir.td_photometric == PHOTOMETRIC_MINISBLACK)) |
4952 | 0 | { |
4953 | | /* |
4954 | | * SamplesPerPixel tag is missing, but is not required |
4955 | | * by spec. Assume correct SamplesPerPixel value of 1. |
4956 | | */ |
4957 | 0 | if (!TIFFSetField(tif, TIFFTAG_SAMPLESPERPIXEL, 1)) |
4958 | 0 | goto bad; |
4959 | 0 | } |
4960 | 0 | } |
4961 | 0 | } |
4962 | | |
4963 | | /* |
4964 | | * Setup appropriate structures (by strip or by tile) |
4965 | | * We do that only after the above OJPEG hack which alters SamplesPerPixel |
4966 | | * and thus influences the number of strips in the separate planarconfig. |
4967 | | */ |
4968 | 0 | if (!TIFFFieldSet(tif, FIELD_TILEDIMENSIONS)) |
4969 | 0 | { |
4970 | 0 | tif->tif_dir.td_nstrips = TIFFNumberOfStrips(tif); |
4971 | 0 | tif->tif_dir.td_tilewidth = tif->tif_dir.td_imagewidth; |
4972 | 0 | tif->tif_dir.td_tilelength = tif->tif_dir.td_rowsperstrip; |
4973 | 0 | tif->tif_dir.td_tiledepth = tif->tif_dir.td_imagedepth; |
4974 | 0 | tif->tif_flags &= ~TIFF_ISTILED; |
4975 | 0 | } |
4976 | 0 | else |
4977 | 0 | { |
4978 | 0 | tif->tif_dir.td_nstrips = TIFFNumberOfTiles(tif); |
4979 | 0 | tif->tif_flags |= TIFF_ISTILED; |
4980 | 0 | } |
4981 | 0 | if (!tif->tif_dir.td_nstrips) |
4982 | 0 | { |
4983 | 0 | TIFFErrorExtR(tif, module, "Cannot handle zero number of %s", |
4984 | 0 | isTiled(tif) ? "tiles" : "strips"); |
4985 | 0 | goto bad; |
4986 | 0 | } |
4987 | 0 | tif->tif_dir.td_stripsperimage = tif->tif_dir.td_nstrips; |
4988 | 0 | if (tif->tif_dir.td_planarconfig == PLANARCONFIG_SEPARATE) |
4989 | 0 | tif->tif_dir.td_stripsperimage /= tif->tif_dir.td_samplesperpixel; |
4990 | 0 | if (!TIFFFieldSet(tif, FIELD_STRIPOFFSETS)) |
4991 | 0 | { |
4992 | 0 | #ifdef OJPEG_SUPPORT |
4993 | 0 | if ((tif->tif_dir.td_compression == COMPRESSION_OJPEG) && |
4994 | 0 | (isTiled(tif) == 0) && (tif->tif_dir.td_nstrips == 1)) |
4995 | 0 | { |
4996 | | /* |
4997 | | * XXX: OJPEG hack. |
4998 | | * If a) compression is OJPEG, b) it's not a tiled TIFF, |
4999 | | * and c) the number of strips is 1, |
5000 | | * then we tolerate the absence of stripoffsets tag, |
5001 | | * because, presumably, all required data is in the |
5002 | | * JpegInterchangeFormat stream. |
5003 | | */ |
5004 | 0 | TIFFSetFieldBit(tif, FIELD_STRIPOFFSETS); |
5005 | 0 | } |
5006 | 0 | else |
5007 | 0 | #endif |
5008 | 0 | { |
5009 | 0 | MissingRequired(tif, isTiled(tif) ? "TileOffsets" : "StripOffsets"); |
5010 | 0 | goto bad; |
5011 | 0 | } |
5012 | 0 | } |
5013 | | |
5014 | 0 | if (tif->tif_mode == O_RDWR && |
5015 | 0 | tif->tif_dir.td_stripoffset_entry.tdir_tag != 0 && |
5016 | 0 | tif->tif_dir.td_stripoffset_entry.tdir_count == 0 && |
5017 | 0 | tif->tif_dir.td_stripoffset_entry.tdir_type == 0 && |
5018 | 0 | tif->tif_dir.td_stripoffset_entry.tdir_offset.toff_long8 == 0 && |
5019 | 0 | tif->tif_dir.td_stripbytecount_entry.tdir_tag != 0 && |
5020 | 0 | tif->tif_dir.td_stripbytecount_entry.tdir_count == 0 && |
5021 | 0 | tif->tif_dir.td_stripbytecount_entry.tdir_type == 0 && |
5022 | 0 | tif->tif_dir.td_stripbytecount_entry.tdir_offset.toff_long8 == 0) |
5023 | 0 | { |
5024 | | /* Directory typically created with TIFFDeferStrileArrayWriting() */ |
5025 | 0 | TIFFSetupStrips(tif); |
5026 | 0 | } |
5027 | 0 | else if (!(tif->tif_flags & TIFF_DEFERSTRILELOAD)) |
5028 | 0 | { |
5029 | 0 | if (tif->tif_dir.td_stripoffset_entry.tdir_tag != 0) |
5030 | 0 | { |
5031 | 0 | if (!TIFFFetchStripThing(tif, &(tif->tif_dir.td_stripoffset_entry), |
5032 | 0 | tif->tif_dir.td_nstrips, |
5033 | 0 | &tif->tif_dir.td_stripoffset_p)) |
5034 | 0 | { |
5035 | 0 | goto bad; |
5036 | 0 | } |
5037 | 0 | } |
5038 | 0 | if (tif->tif_dir.td_stripbytecount_entry.tdir_tag != 0) |
5039 | 0 | { |
5040 | 0 | if (!TIFFFetchStripThing( |
5041 | 0 | tif, &(tif->tif_dir.td_stripbytecount_entry), |
5042 | 0 | tif->tif_dir.td_nstrips, &tif->tif_dir.td_stripbytecount_p)) |
5043 | 0 | { |
5044 | 0 | goto bad; |
5045 | 0 | } |
5046 | 0 | } |
5047 | 0 | } |
5048 | | |
5049 | | /* |
5050 | | * Make sure all non-color channels are extrasamples. |
5051 | | * If it's not the case, define them as such. |
5052 | | */ |
5053 | 0 | color_channels = _TIFFGetMaxColorChannels(tif->tif_dir.td_photometric); |
5054 | 0 | if (color_channels && |
5055 | 0 | tif->tif_dir.td_samplesperpixel - tif->tif_dir.td_extrasamples > |
5056 | 0 | color_channels) |
5057 | 0 | { |
5058 | 0 | uint16_t old_extrasamples; |
5059 | 0 | uint16_t *new_sampleinfo; |
5060 | |
|
5061 | 0 | TIFFWarningExtR( |
5062 | 0 | tif, module, |
5063 | 0 | "Sum of Photometric type-related " |
5064 | 0 | "color channels and ExtraSamples doesn't match SamplesPerPixel. " |
5065 | 0 | "Defining non-color channels as ExtraSamples."); |
5066 | |
|
5067 | 0 | old_extrasamples = tif->tif_dir.td_extrasamples; |
5068 | 0 | tif->tif_dir.td_extrasamples = |
5069 | 0 | (uint16_t)(tif->tif_dir.td_samplesperpixel - color_channels); |
5070 | | |
5071 | | // sampleinfo should contain information relative to these new extra |
5072 | | // samples |
5073 | 0 | new_sampleinfo = (uint16_t *)_TIFFcallocExt( |
5074 | 0 | tif, tif->tif_dir.td_extrasamples, sizeof(uint16_t)); |
5075 | 0 | if (!new_sampleinfo) |
5076 | 0 | { |
5077 | 0 | TIFFErrorExtR(tif, module, |
5078 | 0 | "Failed to allocate memory for " |
5079 | 0 | "temporary new sampleinfo array " |
5080 | 0 | "(%" PRIu16 " 16 bit elements)", |
5081 | 0 | tif->tif_dir.td_extrasamples); |
5082 | 0 | goto bad; |
5083 | 0 | } |
5084 | | |
5085 | 0 | if (old_extrasamples > 0) |
5086 | 0 | memcpy(new_sampleinfo, tif->tif_dir.td_sampleinfo, |
5087 | 0 | old_extrasamples * sizeof(uint16_t)); |
5088 | 0 | _TIFFsetShortArrayExt(tif, &tif->tif_dir.td_sampleinfo, new_sampleinfo, |
5089 | 0 | tif->tif_dir.td_extrasamples); |
5090 | 0 | _TIFFfreeExt(tif, new_sampleinfo); |
5091 | 0 | } |
5092 | | |
5093 | | /* |
5094 | | * Verify Palette image has a Colormap. |
5095 | | */ |
5096 | 0 | if (tif->tif_dir.td_photometric == PHOTOMETRIC_PALETTE && |
5097 | 0 | !TIFFFieldSet(tif, FIELD_COLORMAP)) |
5098 | 0 | { |
5099 | 0 | if (tif->tif_dir.td_bitspersample >= 8 && |
5100 | 0 | tif->tif_dir.td_samplesperpixel == 3) |
5101 | 0 | tif->tif_dir.td_photometric = PHOTOMETRIC_RGB; |
5102 | 0 | else if (tif->tif_dir.td_bitspersample >= 8) |
5103 | 0 | tif->tif_dir.td_photometric = PHOTOMETRIC_MINISBLACK; |
5104 | 0 | else |
5105 | 0 | { |
5106 | 0 | MissingRequired(tif, "Colormap"); |
5107 | 0 | goto bad; |
5108 | 0 | } |
5109 | 0 | } |
5110 | | /* |
5111 | | * OJPEG hack: |
5112 | | * We do no further messing with strip/tile offsets/bytecounts in OJPEG |
5113 | | * TIFFs |
5114 | | */ |
5115 | 0 | if (tif->tif_dir.td_compression != COMPRESSION_OJPEG) |
5116 | 0 | { |
5117 | | /* |
5118 | | * Attempt to deal with a missing StripByteCounts tag. |
5119 | | */ |
5120 | 0 | if (!TIFFFieldSet(tif, FIELD_STRIPBYTECOUNTS)) |
5121 | 0 | { |
5122 | | /* |
5123 | | * Some manufacturers violate the spec by not giving |
5124 | | * the size of the strips. In this case, assume there |
5125 | | * is one uncompressed strip of data. |
5126 | | */ |
5127 | 0 | if ((tif->tif_dir.td_planarconfig == PLANARCONFIG_CONTIG && |
5128 | 0 | tif->tif_dir.td_nstrips > 1) || |
5129 | 0 | (tif->tif_dir.td_planarconfig == PLANARCONFIG_SEPARATE && |
5130 | 0 | tif->tif_dir.td_nstrips != |
5131 | 0 | (uint32_t)tif->tif_dir.td_samplesperpixel)) |
5132 | 0 | { |
5133 | 0 | MissingRequired(tif, "StripByteCounts"); |
5134 | 0 | goto bad; |
5135 | 0 | } |
5136 | 0 | TIFFWarningExtR( |
5137 | 0 | tif, module, |
5138 | 0 | "TIFF directory is missing required " |
5139 | 0 | "\"StripByteCounts\" field, calculating from imagelength"); |
5140 | 0 | if (EstimateStripByteCounts(tif, dir, dircount) < 0) |
5141 | 0 | goto bad; |
5142 | 0 | } |
5143 | 0 | else if (tif->tif_dir.td_nstrips == 1 && |
5144 | 0 | !(tif->tif_flags & TIFF_ISTILED) && ByteCountLooksBad(tif)) |
5145 | 0 | { |
5146 | | /* |
5147 | | * XXX: Plexus (and others) sometimes give a value of |
5148 | | * zero for a tag when they don't know what the |
5149 | | * correct value is! Try and handle the simple case |
5150 | | * of estimating the size of a one strip image. |
5151 | | */ |
5152 | 0 | TIFFWarningExtR(tif, module, |
5153 | 0 | "Bogus \"StripByteCounts\" field, ignoring and " |
5154 | 0 | "calculating from imagelength"); |
5155 | 0 | if (EstimateStripByteCounts(tif, dir, dircount) < 0) |
5156 | 0 | goto bad; |
5157 | 0 | } |
5158 | 0 | else if (!(tif->tif_flags & TIFF_DEFERSTRILELOAD) && |
5159 | 0 | tif->tif_dir.td_planarconfig == PLANARCONFIG_CONTIG && |
5160 | 0 | tif->tif_dir.td_nstrips > 2 && |
5161 | 0 | tif->tif_dir.td_compression == COMPRESSION_NONE && |
5162 | 0 | TIFFGetStrileByteCount(tif, 0) != |
5163 | 0 | TIFFGetStrileByteCount(tif, 1) && |
5164 | 0 | TIFFGetStrileByteCount(tif, 0) != 0 && |
5165 | 0 | TIFFGetStrileByteCount(tif, 1) != 0) |
5166 | 0 | { |
5167 | | /* |
5168 | | * XXX: Some vendors fill StripByteCount array with |
5169 | | * absolutely wrong values (it can be equal to |
5170 | | * StripOffset array, for example). Catch this case |
5171 | | * here. |
5172 | | * |
5173 | | * We avoid this check if deferring strile loading |
5174 | | * as it would always force us to load the strip/tile |
5175 | | * information. |
5176 | | */ |
5177 | 0 | TIFFWarningExtR(tif, module, |
5178 | 0 | "Wrong \"StripByteCounts\" field, ignoring and " |
5179 | 0 | "calculating from imagelength"); |
5180 | 0 | if (EstimateStripByteCounts(tif, dir, dircount) < 0) |
5181 | 0 | goto bad; |
5182 | 0 | } |
5183 | 0 | } |
5184 | 0 | if (dir) |
5185 | 0 | { |
5186 | 0 | _TIFFfreeExt(tif, dir); |
5187 | 0 | dir = NULL; |
5188 | 0 | } |
5189 | 0 | if (!TIFFFieldSet(tif, FIELD_MAXSAMPLEVALUE)) |
5190 | 0 | { |
5191 | 0 | if (tif->tif_dir.td_bitspersample >= 16) |
5192 | 0 | tif->tif_dir.td_maxsamplevalue = 0xFFFF; |
5193 | 0 | else |
5194 | 0 | tif->tif_dir.td_maxsamplevalue = |
5195 | 0 | (uint16_t)((1L << tif->tif_dir.td_bitspersample) - 1); |
5196 | 0 | } |
5197 | |
|
5198 | | #ifdef STRIPBYTECOUNTSORTED_UNUSED |
5199 | | /* |
5200 | | * XXX: We can optimize checking for the strip bounds using the sorted |
5201 | | * bytecounts array. See also comments for TIFFAppendToStrip() |
5202 | | * function in tif_write.c. |
5203 | | */ |
5204 | | if (!(tif->tif_flags & TIFF_DEFERSTRILELOAD) && tif->tif_dir.td_nstrips > 1) |
5205 | | { |
5206 | | uint32_t strip; |
5207 | | |
5208 | | tif->tif_dir.td_stripbytecountsorted = 1; |
5209 | | for (strip = 1; strip < tif->tif_dir.td_nstrips; strip++) |
5210 | | { |
5211 | | if (TIFFGetStrileOffset(tif, strip - 1) > |
5212 | | TIFFGetStrileOffset(tif, strip)) |
5213 | | { |
5214 | | tif->tif_dir.td_stripbytecountsorted = 0; |
5215 | | break; |
5216 | | } |
5217 | | } |
5218 | | } |
5219 | | #endif |
5220 | | |
5221 | | /* |
5222 | | * An opportunity for compression mode dependent tag fixup |
5223 | | */ |
5224 | 0 | (*tif->tif_fixuptags)(tif); |
5225 | | |
5226 | | /* |
5227 | | * Some manufacturers make life difficult by writing |
5228 | | * large amounts of uncompressed data as a single strip. |
5229 | | * This is contrary to the recommendations of the spec. |
5230 | | * The following makes an attempt at breaking such images |
5231 | | * into strips closer to the recommended 8k bytes. A |
5232 | | * side effect, however, is that the RowsPerStrip tag |
5233 | | * value may be changed. |
5234 | | */ |
5235 | 0 | if ((tif->tif_dir.td_planarconfig == PLANARCONFIG_CONTIG) && |
5236 | 0 | (tif->tif_dir.td_nstrips == 1) && |
5237 | 0 | (tif->tif_dir.td_compression == COMPRESSION_NONE) && |
5238 | 0 | ((tif->tif_flags & (TIFF_STRIPCHOP | TIFF_ISTILED)) == TIFF_STRIPCHOP)) |
5239 | 0 | { |
5240 | 0 | ChopUpSingleUncompressedStrip(tif); |
5241 | 0 | } |
5242 | | |
5243 | | /* There are also uncompressed striped files with strips larger than */ |
5244 | | /* 2 GB, which make them unfriendly with a lot of code. If possible, */ |
5245 | | /* try to expose smaller "virtual" strips. */ |
5246 | 0 | if (tif->tif_dir.td_planarconfig == PLANARCONFIG_CONTIG && |
5247 | 0 | tif->tif_dir.td_compression == COMPRESSION_NONE && |
5248 | 0 | (tif->tif_flags & (TIFF_STRIPCHOP | TIFF_ISTILED)) == TIFF_STRIPCHOP && |
5249 | 0 | TIFFStripSize64(tif) > 0x7FFFFFFFUL) |
5250 | 0 | { |
5251 | 0 | TryChopUpUncompressedBigTiff(tif); |
5252 | 0 | } |
5253 | | |
5254 | | /* |
5255 | | * Clear the dirty directory flag. |
5256 | | */ |
5257 | 0 | tif->tif_flags &= ~TIFF_DIRTYDIRECT; |
5258 | 0 | tif->tif_flags &= ~TIFF_DIRTYSTRIP; |
5259 | | |
5260 | | /* |
5261 | | * Reinitialize i/o since we are starting on a new directory. |
5262 | | */ |
5263 | 0 | tif->tif_row = (uint32_t)-1; |
5264 | 0 | tif->tif_curstrip = (uint32_t)-1; |
5265 | 0 | tif->tif_col = (uint32_t)-1; |
5266 | 0 | tif->tif_curtile = (uint32_t)-1; |
5267 | 0 | tif->tif_tilesize = (tmsize_t)-1; |
5268 | |
|
5269 | 0 | tif->tif_scanlinesize = TIFFScanlineSize(tif); |
5270 | 0 | if (!tif->tif_scanlinesize) |
5271 | 0 | { |
5272 | 0 | TIFFErrorExtR(tif, module, "Cannot handle zero scanline size"); |
5273 | 0 | return (0); |
5274 | 0 | } |
5275 | | |
5276 | 0 | if (isTiled(tif)) |
5277 | 0 | { |
5278 | 0 | tif->tif_tilesize = TIFFTileSize(tif); |
5279 | 0 | if (!tif->tif_tilesize) |
5280 | 0 | { |
5281 | 0 | TIFFErrorExtR(tif, module, "Cannot handle zero tile size"); |
5282 | 0 | return (0); |
5283 | 0 | } |
5284 | 0 | } |
5285 | 0 | else |
5286 | 0 | { |
5287 | 0 | if (!TIFFStripSize(tif)) |
5288 | 0 | { |
5289 | 0 | TIFFErrorExtR(tif, module, "Cannot handle zero strip size"); |
5290 | 0 | return (0); |
5291 | 0 | } |
5292 | 0 | } |
5293 | 0 | return (1); |
5294 | 0 | bad: |
5295 | 0 | if (dir) |
5296 | 0 | _TIFFfreeExt(tif, dir); |
5297 | 0 | return (0); |
5298 | 0 | } /*-- TIFFReadDirectory() --*/ |
5299 | | |
5300 | | static void TIFFReadDirectoryCheckOrder(TIFF *tif, TIFFDirEntry *dir, |
5301 | | uint16_t dircount) |
5302 | 0 | { |
5303 | 0 | static const char module[] = "TIFFReadDirectoryCheckOrder"; |
5304 | 0 | uint32_t m; |
5305 | 0 | uint16_t n; |
5306 | 0 | TIFFDirEntry *o; |
5307 | 0 | m = 0; |
5308 | 0 | for (n = 0, o = dir; n < dircount; n++, o++) |
5309 | 0 | { |
5310 | 0 | if (o->tdir_tag < m) |
5311 | 0 | { |
5312 | 0 | TIFFWarningExtR(tif, module, |
5313 | 0 | "Invalid TIFF directory; tags are not sorted in " |
5314 | 0 | "ascending order"); |
5315 | 0 | break; |
5316 | 0 | } |
5317 | 0 | m = o->tdir_tag + 1; |
5318 | 0 | } |
5319 | 0 | } |
5320 | | |
5321 | | static TIFFDirEntry *TIFFReadDirectoryFindEntry(TIFF *tif, TIFFDirEntry *dir, |
5322 | | uint16_t dircount, |
5323 | | uint16_t tagid) |
5324 | 0 | { |
5325 | 0 | TIFFDirEntry *m; |
5326 | 0 | uint16_t n; |
5327 | 0 | (void)tif; |
5328 | 0 | for (m = dir, n = 0; n < dircount; m++, n++) |
5329 | 0 | { |
5330 | 0 | if (m->tdir_tag == tagid) |
5331 | 0 | return (m); |
5332 | 0 | } |
5333 | 0 | return (0); |
5334 | 0 | } |
5335 | | |
5336 | | static void TIFFReadDirectoryFindFieldInfo(TIFF *tif, uint16_t tagid, |
5337 | | uint32_t *fii) |
5338 | 0 | { |
5339 | 0 | int32_t ma, mb, mc; |
5340 | 0 | ma = -1; |
5341 | 0 | mc = (int32_t)tif->tif_nfields; |
5342 | 0 | while (1) |
5343 | 0 | { |
5344 | 0 | if (ma + 1 == mc) |
5345 | 0 | { |
5346 | 0 | *fii = FAILED_FII; |
5347 | 0 | return; |
5348 | 0 | } |
5349 | 0 | mb = (ma + mc) / 2; |
5350 | 0 | if (tif->tif_fields[mb]->field_tag == (uint32_t)tagid) |
5351 | 0 | break; |
5352 | 0 | if (tif->tif_fields[mb]->field_tag < (uint32_t)tagid) |
5353 | 0 | ma = mb; |
5354 | 0 | else |
5355 | 0 | mc = mb; |
5356 | 0 | } |
5357 | 0 | while (1) |
5358 | 0 | { |
5359 | 0 | if (mb == 0) |
5360 | 0 | break; |
5361 | 0 | if (tif->tif_fields[mb - 1]->field_tag != (uint32_t)tagid) |
5362 | 0 | break; |
5363 | 0 | mb--; |
5364 | 0 | } |
5365 | 0 | *fii = mb; |
5366 | 0 | } |
5367 | | |
5368 | | /* |
5369 | | * Read custom directory from the arbitrary offset. |
5370 | | * The code is very similar to TIFFReadDirectory(). |
5371 | | */ |
5372 | | int TIFFReadCustomDirectory(TIFF *tif, toff_t diroff, |
5373 | | const TIFFFieldArray *infoarray) |
5374 | 0 | { |
5375 | 0 | static const char module[] = "TIFFReadCustomDirectory"; |
5376 | 0 | TIFFDirEntry *dir; |
5377 | 0 | uint16_t dircount; |
5378 | 0 | TIFFDirEntry *dp; |
5379 | 0 | uint16_t di; |
5380 | 0 | const TIFFField *fip; |
5381 | 0 | uint32_t fii; |
5382 | |
|
5383 | 0 | assert(infoarray != NULL); |
5384 | 0 | dircount = TIFFFetchDirectory(tif, diroff, &dir, NULL); |
5385 | 0 | if (!dircount) |
5386 | 0 | { |
5387 | 0 | TIFFErrorExtR(tif, module, |
5388 | 0 | "Failed to read custom directory at offset %" PRIu64, |
5389 | 0 | diroff); |
5390 | 0 | return 0; |
5391 | 0 | } |
5392 | 0 | TIFFReadDirectoryCheckOrder(tif, dir, dircount); |
5393 | | |
5394 | | /* |
5395 | | * Mark duplicates of any tag to be ignored (bugzilla 1994) |
5396 | | * to avoid certain pathological problems. |
5397 | | */ |
5398 | 0 | { |
5399 | 0 | TIFFDirEntry *ma; |
5400 | 0 | uint16_t mb; |
5401 | 0 | for (ma = dir, mb = 0; mb < dircount; ma++, mb++) |
5402 | 0 | { |
5403 | 0 | TIFFDirEntry *na; |
5404 | 0 | uint16_t nb; |
5405 | 0 | for (na = ma + 1, nb = mb + 1; nb < dircount; na++, nb++) |
5406 | 0 | { |
5407 | 0 | if (ma->tdir_tag == na->tdir_tag) |
5408 | 0 | { |
5409 | 0 | na->tdir_ignore = TRUE; |
5410 | 0 | } |
5411 | 0 | } |
5412 | 0 | } |
5413 | 0 | } |
5414 | | |
5415 | | /* Free any old stuff and reinit. */ |
5416 | 0 | TIFFFreeDirectory(tif); |
5417 | | /* Even if custom directories do not need the default settings of a standard |
5418 | | * IFD, the pointer to the TIFFSetField() and TIFFGetField() (i.e. |
5419 | | * tif->tif_tagmethods.vsetfield and tif->tif_tagmethods.vgetfield) need to |
5420 | | * be initialized, which is done in TIFFDefaultDirectory(). |
5421 | | * After that, the field array for the custom tags needs to be setup again. |
5422 | | */ |
5423 | 0 | TIFFDefaultDirectory(tif); |
5424 | 0 | _TIFFSetupFields(tif, infoarray); |
5425 | | |
5426 | | /* Allocate arrays for offset values outside IFD entry for IFD data size |
5427 | | * checking. Note: Counter are reset within TIFFFreeDirectory(). */ |
5428 | 0 | tif->tif_dir.td_dirdatasize_offsets = |
5429 | 0 | (TIFFEntryOffsetAndLength *)_TIFFmallocExt( |
5430 | 0 | tif, dircount * sizeof(TIFFEntryOffsetAndLength)); |
5431 | 0 | if (tif->tif_dir.td_dirdatasize_offsets == NULL) |
5432 | 0 | { |
5433 | 0 | TIFFErrorExtR( |
5434 | 0 | tif, module, |
5435 | 0 | "Failed to allocate memory for counting IFD data size at reading"); |
5436 | 0 | if (dir) |
5437 | 0 | _TIFFfreeExt(tif, dir); |
5438 | 0 | return 0; |
5439 | 0 | } |
5440 | | |
5441 | 0 | for (di = 0, dp = dir; di < dircount; di++, dp++) |
5442 | 0 | { |
5443 | 0 | TIFFReadDirectoryFindFieldInfo(tif, dp->tdir_tag, &fii); |
5444 | 0 | if (fii == FAILED_FII) |
5445 | 0 | { |
5446 | 0 | if (tif->tif_warn_about_unknown_tags) |
5447 | 0 | { |
5448 | 0 | TIFFWarningExtR(tif, module, |
5449 | 0 | "Unknown field with tag %" PRIu16 " (0x%" PRIx16 |
5450 | 0 | ") encountered", |
5451 | 0 | dp->tdir_tag, dp->tdir_tag); |
5452 | 0 | } |
5453 | 0 | const TIFFField *fld = _TIFFCreateAnonField( |
5454 | 0 | tif, dp->tdir_tag, (TIFFDataType)dp->tdir_type); |
5455 | 0 | if (fld == NULL || !_TIFFMergeFields(tif, fld, 1)) |
5456 | 0 | { |
5457 | 0 | if (tif->tif_warn_about_unknown_tags) |
5458 | 0 | { |
5459 | 0 | TIFFWarningExtR( |
5460 | 0 | tif, module, |
5461 | 0 | "Registering anonymous field with tag %" PRIu16 |
5462 | 0 | " (0x%" PRIx16 ") failed", |
5463 | 0 | dp->tdir_tag, dp->tdir_tag); |
5464 | 0 | } |
5465 | 0 | dp->tdir_ignore = TRUE; |
5466 | 0 | } |
5467 | 0 | else |
5468 | 0 | { |
5469 | 0 | TIFFReadDirectoryFindFieldInfo(tif, dp->tdir_tag, &fii); |
5470 | 0 | assert(fii != FAILED_FII); |
5471 | 0 | } |
5472 | 0 | } |
5473 | 0 | if (!dp->tdir_ignore) |
5474 | 0 | { |
5475 | 0 | fip = tif->tif_fields[fii]; |
5476 | 0 | if (fip->field_bit == FIELD_IGNORE) |
5477 | 0 | dp->tdir_ignore = TRUE; |
5478 | 0 | else |
5479 | 0 | { |
5480 | | /* check data type */ |
5481 | 0 | while ((fip->field_type != TIFF_ANY) && |
5482 | 0 | (fip->field_type != dp->tdir_type)) |
5483 | 0 | { |
5484 | 0 | fii++; |
5485 | 0 | if ((fii == tif->tif_nfields) || |
5486 | 0 | (tif->tif_fields[fii]->field_tag != |
5487 | 0 | (uint32_t)dp->tdir_tag)) |
5488 | 0 | { |
5489 | 0 | fii = 0xFFFF; |
5490 | 0 | break; |
5491 | 0 | } |
5492 | 0 | fip = tif->tif_fields[fii]; |
5493 | 0 | } |
5494 | 0 | if (fii == 0xFFFF) |
5495 | 0 | { |
5496 | 0 | TIFFWarningExtR(tif, module, |
5497 | 0 | "Wrong data type %" PRIu16 |
5498 | 0 | " for \"%s\"; tag ignored", |
5499 | 0 | dp->tdir_type, fip->field_name); |
5500 | 0 | dp->tdir_ignore = TRUE; |
5501 | 0 | } |
5502 | 0 | else |
5503 | 0 | { |
5504 | | /* check count if known in advance */ |
5505 | 0 | if ((fip->field_readcount != TIFF_VARIABLE) && |
5506 | 0 | (fip->field_readcount != TIFF_VARIABLE2)) |
5507 | 0 | { |
5508 | 0 | uint32_t expected; |
5509 | 0 | if (fip->field_readcount == TIFF_SPP) |
5510 | 0 | expected = |
5511 | 0 | (uint32_t)tif->tif_dir.td_samplesperpixel; |
5512 | 0 | else |
5513 | 0 | expected = (uint32_t)fip->field_readcount; |
5514 | 0 | if (!CheckDirCount(tif, dp, expected)) |
5515 | 0 | dp->tdir_ignore = TRUE; |
5516 | 0 | } |
5517 | 0 | } |
5518 | 0 | } |
5519 | 0 | if (!dp->tdir_ignore) |
5520 | 0 | { |
5521 | 0 | switch (dp->tdir_tag) |
5522 | 0 | { |
5523 | 0 | case EXIFTAG_SUBJECTDISTANCE: |
5524 | 0 | if (!TIFFFieldIsAnonymous(fip)) |
5525 | 0 | { |
5526 | | /* should only be called on a Exif directory */ |
5527 | | /* when exifFields[] is active */ |
5528 | 0 | (void)TIFFFetchSubjectDistance(tif, dp); |
5529 | 0 | } |
5530 | 0 | else |
5531 | 0 | { |
5532 | 0 | (void)TIFFFetchNormalTag(tif, dp, TRUE); |
5533 | 0 | } |
5534 | 0 | break; |
5535 | 0 | default: |
5536 | 0 | (void)TIFFFetchNormalTag(tif, dp, TRUE); |
5537 | 0 | break; |
5538 | 0 | } |
5539 | 0 | } /*-- if (!dp->tdir_ignore) */ |
5540 | 0 | } |
5541 | 0 | } |
5542 | | /* Evaluate final IFD data size. */ |
5543 | 0 | CalcFinalIFDdatasizeReading(tif, dircount); |
5544 | | |
5545 | | /* To be able to return from SubIFD or custom-IFD to main-IFD */ |
5546 | 0 | tif->tif_setdirectory_force_absolute = TRUE; |
5547 | 0 | if (dir) |
5548 | 0 | _TIFFfreeExt(tif, dir); |
5549 | 0 | return 1; |
5550 | 0 | } |
5551 | | |
5552 | | /* |
5553 | | * EXIF is important special case of custom IFD, so we have a special |
5554 | | * function to read it. |
5555 | | */ |
5556 | | int TIFFReadEXIFDirectory(TIFF *tif, toff_t diroff) |
5557 | 0 | { |
5558 | 0 | return TIFFReadCustomDirectory(tif, diroff, _TIFFGetExifFields()); |
5559 | 0 | } |
5560 | | |
5561 | | /* |
5562 | | *--: EXIF-GPS custom directory reading as another special case of custom IFD. |
5563 | | */ |
5564 | | int TIFFReadGPSDirectory(TIFF *tif, toff_t diroff) |
5565 | 0 | { |
5566 | 0 | return TIFFReadCustomDirectory(tif, diroff, _TIFFGetGpsFields()); |
5567 | 0 | } |
5568 | | |
5569 | | static int EstimateStripByteCounts(TIFF *tif, TIFFDirEntry *dir, |
5570 | | uint16_t dircount) |
5571 | 0 | { |
5572 | 0 | static const char module[] = "EstimateStripByteCounts"; |
5573 | |
|
5574 | 0 | TIFFDirEntry *dp; |
5575 | 0 | TIFFDirectory *td = &tif->tif_dir; |
5576 | 0 | uint32_t strip; |
5577 | | |
5578 | | /* Do not try to load stripbytecount as we will compute it */ |
5579 | 0 | if (!_TIFFFillStrilesInternal(tif, 0)) |
5580 | 0 | return -1; |
5581 | | |
5582 | 0 | const uint64_t allocsize = (uint64_t)td->td_nstrips * sizeof(uint64_t); |
5583 | 0 | uint64_t filesize = 0; |
5584 | 0 | if (allocsize > 100 * 1024 * 1024) |
5585 | 0 | { |
5586 | | /* Before allocating a huge amount of memory for corrupted files, check |
5587 | | * if size of requested memory is not greater than file size. */ |
5588 | 0 | filesize = TIFFGetFileSize(tif); |
5589 | 0 | if (allocsize > filesize) |
5590 | 0 | { |
5591 | 0 | TIFFWarningExtR( |
5592 | 0 | tif, module, |
5593 | 0 | "Requested memory size for StripByteCounts of %" PRIu64 |
5594 | 0 | " is greater than filesize %" PRIu64 ". Memory not allocated", |
5595 | 0 | allocsize, filesize); |
5596 | 0 | return -1; |
5597 | 0 | } |
5598 | 0 | } |
5599 | | |
5600 | 0 | if (td->td_stripbytecount_p) |
5601 | 0 | _TIFFfreeExt(tif, td->td_stripbytecount_p); |
5602 | 0 | td->td_stripbytecount_p = (uint64_t *)_TIFFCheckMalloc( |
5603 | 0 | tif, td->td_nstrips, sizeof(uint64_t), "for \"StripByteCounts\" array"); |
5604 | 0 | if (td->td_stripbytecount_p == NULL) |
5605 | 0 | return -1; |
5606 | | |
5607 | 0 | if (td->td_compression != COMPRESSION_NONE) |
5608 | 0 | { |
5609 | 0 | uint64_t space; |
5610 | 0 | uint16_t n; |
5611 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
5612 | 0 | space = sizeof(TIFFHeaderClassic) + 2 + dircount * 12 + 4; |
5613 | 0 | else |
5614 | 0 | space = sizeof(TIFFHeaderBig) + 8 + dircount * 20 + 8; |
5615 | | /* calculate amount of space used by indirect values */ |
5616 | 0 | for (dp = dir, n = dircount; n > 0; n--, dp++) |
5617 | 0 | { |
5618 | 0 | uint32_t typewidth; |
5619 | 0 | uint64_t datasize; |
5620 | 0 | typewidth = TIFFDataWidth((TIFFDataType)dp->tdir_type); |
5621 | 0 | if (typewidth == 0) |
5622 | 0 | { |
5623 | 0 | TIFFErrorExtR( |
5624 | 0 | tif, module, |
5625 | 0 | "Cannot determine size of unknown tag type %" PRIu16, |
5626 | 0 | dp->tdir_type); |
5627 | 0 | return -1; |
5628 | 0 | } |
5629 | 0 | if (dp->tdir_count > UINT64_MAX / typewidth) |
5630 | 0 | return -1; |
5631 | 0 | datasize = (uint64_t)typewidth * dp->tdir_count; |
5632 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
5633 | 0 | { |
5634 | 0 | if (datasize <= 4) |
5635 | 0 | datasize = 0; |
5636 | 0 | } |
5637 | 0 | else |
5638 | 0 | { |
5639 | 0 | if (datasize <= 8) |
5640 | 0 | datasize = 0; |
5641 | 0 | } |
5642 | 0 | if (space > UINT64_MAX - datasize) |
5643 | 0 | return -1; |
5644 | 0 | space += datasize; |
5645 | 0 | } |
5646 | 0 | if (filesize == 0) |
5647 | 0 | filesize = TIFFGetFileSize(tif); |
5648 | 0 | if (filesize < space) |
5649 | | /* we should perhaps return in error ? */ |
5650 | 0 | space = filesize; |
5651 | 0 | else |
5652 | 0 | space = filesize - space; |
5653 | 0 | if (td->td_planarconfig == PLANARCONFIG_SEPARATE) |
5654 | 0 | space /= td->td_samplesperpixel; |
5655 | 0 | for (strip = 0; strip < td->td_nstrips; strip++) |
5656 | 0 | td->td_stripbytecount_p[strip] = space; |
5657 | | /* |
5658 | | * This gross hack handles the case were the offset to |
5659 | | * the last strip is past the place where we think the strip |
5660 | | * should begin. Since a strip of data must be contiguous, |
5661 | | * it's safe to assume that we've overestimated the amount |
5662 | | * of data in the strip and trim this number back accordingly. |
5663 | | */ |
5664 | 0 | strip--; |
5665 | 0 | if (td->td_stripoffset_p[strip] > |
5666 | 0 | UINT64_MAX - td->td_stripbytecount_p[strip]) |
5667 | 0 | return -1; |
5668 | 0 | if (td->td_stripoffset_p[strip] + td->td_stripbytecount_p[strip] > |
5669 | 0 | filesize) |
5670 | 0 | { |
5671 | 0 | if (td->td_stripoffset_p[strip] >= filesize) |
5672 | 0 | { |
5673 | | /* Not sure what we should in that case... */ |
5674 | 0 | td->td_stripbytecount_p[strip] = 0; |
5675 | 0 | } |
5676 | 0 | else |
5677 | 0 | { |
5678 | 0 | td->td_stripbytecount_p[strip] = |
5679 | 0 | filesize - td->td_stripoffset_p[strip]; |
5680 | 0 | } |
5681 | 0 | } |
5682 | 0 | } |
5683 | 0 | else if (isTiled(tif)) |
5684 | 0 | { |
5685 | 0 | uint64_t bytespertile = TIFFTileSize64(tif); |
5686 | |
|
5687 | 0 | for (strip = 0; strip < td->td_nstrips; strip++) |
5688 | 0 | td->td_stripbytecount_p[strip] = bytespertile; |
5689 | 0 | } |
5690 | 0 | else |
5691 | 0 | { |
5692 | 0 | uint64_t rowbytes = TIFFScanlineSize64(tif); |
5693 | 0 | uint32_t rowsperstrip = td->td_imagelength / td->td_stripsperimage; |
5694 | 0 | for (strip = 0; strip < td->td_nstrips; strip++) |
5695 | 0 | { |
5696 | 0 | if (rowbytes > 0 && rowsperstrip > UINT64_MAX / rowbytes) |
5697 | 0 | return -1; |
5698 | 0 | td->td_stripbytecount_p[strip] = rowbytes * rowsperstrip; |
5699 | 0 | } |
5700 | 0 | } |
5701 | 0 | TIFFSetFieldBit(tif, FIELD_STRIPBYTECOUNTS); |
5702 | 0 | if (!TIFFFieldSet(tif, FIELD_ROWSPERSTRIP)) |
5703 | 0 | td->td_rowsperstrip = td->td_imagelength; |
5704 | 0 | return 1; |
5705 | 0 | } |
5706 | | |
5707 | | static void MissingRequired(TIFF *tif, const char *tagname) |
5708 | 0 | { |
5709 | 0 | static const char module[] = "MissingRequired"; |
5710 | |
|
5711 | 0 | TIFFErrorExtR(tif, module, |
5712 | 0 | "TIFF directory is missing required \"%s\" field", tagname); |
5713 | 0 | } |
5714 | | |
5715 | | static unsigned long hashFuncOffsetToNumber(const void *elt) |
5716 | 0 | { |
5717 | 0 | const TIFFOffsetAndDirNumber *offsetAndDirNumber = |
5718 | 0 | (const TIFFOffsetAndDirNumber *)elt; |
5719 | 0 | const uint32_t hash = (uint32_t)(offsetAndDirNumber->offset >> 32) ^ |
5720 | 0 | ((uint32_t)offsetAndDirNumber->offset & 0xFFFFFFFFU); |
5721 | 0 | return hash; |
5722 | 0 | } |
5723 | | |
5724 | | static bool equalFuncOffsetToNumber(const void *elt1, const void *elt2) |
5725 | 0 | { |
5726 | 0 | const TIFFOffsetAndDirNumber *offsetAndDirNumber1 = |
5727 | 0 | (const TIFFOffsetAndDirNumber *)elt1; |
5728 | 0 | const TIFFOffsetAndDirNumber *offsetAndDirNumber2 = |
5729 | 0 | (const TIFFOffsetAndDirNumber *)elt2; |
5730 | 0 | return offsetAndDirNumber1->offset == offsetAndDirNumber2->offset; |
5731 | 0 | } |
5732 | | |
5733 | | static unsigned long hashFuncNumberToOffset(const void *elt) |
5734 | 0 | { |
5735 | 0 | const TIFFOffsetAndDirNumber *offsetAndDirNumber = |
5736 | 0 | (const TIFFOffsetAndDirNumber *)elt; |
5737 | 0 | return offsetAndDirNumber->dirNumber; |
5738 | 0 | } |
5739 | | |
5740 | | static bool equalFuncNumberToOffset(const void *elt1, const void *elt2) |
5741 | 0 | { |
5742 | 0 | const TIFFOffsetAndDirNumber *offsetAndDirNumber1 = |
5743 | 0 | (const TIFFOffsetAndDirNumber *)elt1; |
5744 | 0 | const TIFFOffsetAndDirNumber *offsetAndDirNumber2 = |
5745 | 0 | (const TIFFOffsetAndDirNumber *)elt2; |
5746 | 0 | return offsetAndDirNumber1->dirNumber == offsetAndDirNumber2->dirNumber; |
5747 | 0 | } |
5748 | | |
5749 | | /* |
5750 | | * Check the directory number and offset against the list of already seen |
5751 | | * directory numbers and offsets. This is a trick to prevent IFD looping. |
5752 | | * The one can create TIFF file with looped directory pointers. We will |
5753 | | * maintain a list of already seen directories and check every IFD offset |
5754 | | * and its IFD number against that list. However, the offset of an IFD number |
5755 | | * can change - e.g. when writing updates to file. |
5756 | | * Returns 1 if all is ok; 0 if last directory or IFD loop is encountered, |
5757 | | * or an error has occurred. |
5758 | | */ |
5759 | | int _TIFFCheckDirNumberAndOffset(TIFF *tif, tdir_t dirn, uint64_t diroff) |
5760 | 0 | { |
5761 | 0 | if (diroff == 0) /* no more directories */ |
5762 | 0 | return 0; |
5763 | | |
5764 | 0 | if (tif->tif_map_dir_offset_to_number == NULL) |
5765 | 0 | { |
5766 | 0 | tif->tif_map_dir_offset_to_number = TIFFHashSetNew( |
5767 | 0 | hashFuncOffsetToNumber, equalFuncOffsetToNumber, free); |
5768 | 0 | if (tif->tif_map_dir_offset_to_number == NULL) |
5769 | 0 | { |
5770 | 0 | TIFFErrorExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5771 | 0 | "Not enough memory"); |
5772 | 0 | return 1; |
5773 | 0 | } |
5774 | 0 | } |
5775 | | |
5776 | 0 | if (tif->tif_map_dir_number_to_offset == NULL) |
5777 | 0 | { |
5778 | | /* No free callback for this map, as it shares the same items as |
5779 | | * tif->tif_map_dir_offset_to_number. */ |
5780 | 0 | tif->tif_map_dir_number_to_offset = TIFFHashSetNew( |
5781 | 0 | hashFuncNumberToOffset, equalFuncNumberToOffset, NULL); |
5782 | 0 | if (tif->tif_map_dir_number_to_offset == NULL) |
5783 | 0 | { |
5784 | 0 | TIFFErrorExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5785 | 0 | "Not enough memory"); |
5786 | 0 | return 1; |
5787 | 0 | } |
5788 | 0 | } |
5789 | | |
5790 | | /* Check if offset is already in the list: |
5791 | | * - yes: check, if offset is at the same IFD number - if not, it is an IFD |
5792 | | * loop |
5793 | | * - no: add to list or update offset at that IFD number |
5794 | | */ |
5795 | 0 | TIFFOffsetAndDirNumber entry; |
5796 | 0 | entry.offset = diroff; |
5797 | 0 | entry.dirNumber = dirn; |
5798 | |
|
5799 | 0 | TIFFOffsetAndDirNumber *foundEntry = |
5800 | 0 | (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5801 | 0 | tif->tif_map_dir_offset_to_number, &entry); |
5802 | 0 | if (foundEntry) |
5803 | 0 | { |
5804 | 0 | if (foundEntry->dirNumber == dirn) |
5805 | 0 | { |
5806 | 0 | return 1; |
5807 | 0 | } |
5808 | 0 | else |
5809 | 0 | { |
5810 | 0 | TIFFWarningExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5811 | 0 | "TIFF directory %d has IFD looping to directory %u " |
5812 | 0 | "at offset 0x%" PRIx64 " (%" PRIu64 ")", |
5813 | 0 | (int)dirn - 1, foundEntry->dirNumber, diroff, |
5814 | 0 | diroff); |
5815 | 0 | return 0; |
5816 | 0 | } |
5817 | 0 | } |
5818 | | |
5819 | | /* Check if offset of an IFD has been changed and update offset of that IFD |
5820 | | * number. */ |
5821 | 0 | foundEntry = (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5822 | 0 | tif->tif_map_dir_number_to_offset, &entry); |
5823 | 0 | if (foundEntry) |
5824 | 0 | { |
5825 | 0 | if (foundEntry->offset != diroff) |
5826 | 0 | { |
5827 | 0 | TIFFOffsetAndDirNumber entryOld; |
5828 | 0 | entryOld.offset = foundEntry->offset; |
5829 | 0 | entryOld.dirNumber = dirn; |
5830 | | /* We must remove first from tif_map_dir_number_to_offset as the */ |
5831 | | /* entry is owned (and thus freed) by */ |
5832 | | /* tif_map_dir_offset_to_number */ |
5833 | 0 | TIFFOffsetAndDirNumber *foundEntryOld = |
5834 | 0 | (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5835 | 0 | tif->tif_map_dir_number_to_offset, &entryOld); |
5836 | 0 | if (foundEntryOld) |
5837 | 0 | { |
5838 | 0 | TIFFHashSetRemove(tif->tif_map_dir_number_to_offset, |
5839 | 0 | foundEntryOld); |
5840 | 0 | } |
5841 | 0 | foundEntryOld = (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5842 | 0 | tif->tif_map_dir_offset_to_number, &entryOld); |
5843 | 0 | if (foundEntryOld) |
5844 | 0 | { |
5845 | 0 | TIFFHashSetRemove(tif->tif_map_dir_offset_to_number, |
5846 | 0 | foundEntryOld); |
5847 | 0 | } |
5848 | |
|
5849 | 0 | TIFFOffsetAndDirNumber *entryPtr = (TIFFOffsetAndDirNumber *)malloc( |
5850 | 0 | sizeof(TIFFOffsetAndDirNumber)); |
5851 | 0 | if (entryPtr == NULL) |
5852 | 0 | { |
5853 | 0 | return 0; |
5854 | 0 | } |
5855 | | |
5856 | | /* Add IFD offset and dirn to IFD directory list */ |
5857 | 0 | *entryPtr = entry; |
5858 | |
|
5859 | 0 | if (!TIFFHashSetInsert(tif->tif_map_dir_offset_to_number, entryPtr)) |
5860 | 0 | { |
5861 | 0 | TIFFErrorExtR( |
5862 | 0 | tif, "_TIFFCheckDirNumberAndOffset", |
5863 | 0 | "Insertion in tif_map_dir_offset_to_number failed"); |
5864 | 0 | return 0; |
5865 | 0 | } |
5866 | 0 | if (!TIFFHashSetInsert(tif->tif_map_dir_number_to_offset, entryPtr)) |
5867 | 0 | { |
5868 | 0 | TIFFErrorExtR( |
5869 | 0 | tif, "_TIFFCheckDirNumberAndOffset", |
5870 | 0 | "Insertion in tif_map_dir_number_to_offset failed"); |
5871 | 0 | return 0; |
5872 | 0 | } |
5873 | 0 | } |
5874 | 0 | return 1; |
5875 | 0 | } |
5876 | | |
5877 | | /* Arbitrary (hopefully big enough) limit */ |
5878 | 0 | if (TIFFHashSetSize(tif->tif_map_dir_offset_to_number) >= |
5879 | 0 | TIFF_MAX_DIR_COUNT) |
5880 | 0 | { |
5881 | 0 | TIFFErrorExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5882 | 0 | "Cannot handle more than %u TIFF directories", |
5883 | 0 | (unsigned)TIFF_MAX_DIR_COUNT); |
5884 | 0 | return 0; |
5885 | 0 | } |
5886 | | |
5887 | 0 | TIFFOffsetAndDirNumber *entryPtr = |
5888 | 0 | (TIFFOffsetAndDirNumber *)malloc(sizeof(TIFFOffsetAndDirNumber)); |
5889 | 0 | if (entryPtr == NULL) |
5890 | 0 | { |
5891 | 0 | TIFFErrorExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5892 | 0 | "malloc(sizeof(TIFFOffsetAndDirNumber)) failed"); |
5893 | 0 | return 0; |
5894 | 0 | } |
5895 | | |
5896 | | /* Add IFD offset and dirn to IFD directory list */ |
5897 | 0 | *entryPtr = entry; |
5898 | |
|
5899 | 0 | if (!TIFFHashSetInsert(tif->tif_map_dir_offset_to_number, entryPtr)) |
5900 | 0 | { |
5901 | 0 | TIFFErrorExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5902 | 0 | "Insertion in tif_map_dir_offset_to_number failed"); |
5903 | 0 | return 0; |
5904 | 0 | } |
5905 | 0 | if (!TIFFHashSetInsert(tif->tif_map_dir_number_to_offset, entryPtr)) |
5906 | 0 | { |
5907 | 0 | TIFFErrorExtR(tif, "_TIFFCheckDirNumberAndOffset", |
5908 | 0 | "Insertion in tif_map_dir_number_to_offset failed"); |
5909 | 0 | return 0; |
5910 | 0 | } |
5911 | | |
5912 | 0 | return 1; |
5913 | 0 | } /* --- _TIFFCheckDirNumberAndOffset() ---*/ |
5914 | | |
5915 | | /* |
5916 | | * Retrieve the matching IFD directory number of a given IFD offset |
5917 | | * from the list of directories already seen. |
5918 | | * Returns 1 if the offset was in the list and the directory number |
5919 | | * can be returned. |
5920 | | * Otherwise returns 0 or if an error occurred. |
5921 | | */ |
5922 | | int _TIFFGetDirNumberFromOffset(TIFF *tif, uint64_t diroff, tdir_t *dirn) |
5923 | 0 | { |
5924 | 0 | if (diroff == 0) /* no more directories */ |
5925 | 0 | return 0; |
5926 | | |
5927 | | /* Check if offset is already in the list and return matching directory |
5928 | | * number. Otherwise update IFD list using TIFFNumberOfDirectories() and |
5929 | | * search again in IFD list. |
5930 | | */ |
5931 | 0 | if (tif->tif_map_dir_offset_to_number == NULL) |
5932 | 0 | return 0; |
5933 | 0 | TIFFOffsetAndDirNumber entry; |
5934 | 0 | entry.offset = diroff; |
5935 | 0 | entry.dirNumber = 0; /* not used */ |
5936 | |
|
5937 | 0 | TIFFOffsetAndDirNumber *foundEntry = |
5938 | 0 | (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5939 | 0 | tif->tif_map_dir_offset_to_number, &entry); |
5940 | 0 | if (foundEntry) |
5941 | 0 | { |
5942 | 0 | *dirn = foundEntry->dirNumber; |
5943 | 0 | return 1; |
5944 | 0 | } |
5945 | | |
5946 | | /* This updates the directory list for all main-IFDs in the file. */ |
5947 | 0 | TIFFNumberOfDirectories(tif); |
5948 | |
|
5949 | 0 | foundEntry = (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5950 | 0 | tif->tif_map_dir_offset_to_number, &entry); |
5951 | 0 | if (foundEntry) |
5952 | 0 | { |
5953 | 0 | *dirn = foundEntry->dirNumber; |
5954 | 0 | return 1; |
5955 | 0 | } |
5956 | | |
5957 | 0 | return 0; |
5958 | 0 | } /*--- _TIFFGetDirNumberFromOffset() ---*/ |
5959 | | |
5960 | | /* |
5961 | | * Retrieve the matching IFD directory offset of a given IFD number |
5962 | | * from the list of directories already seen. |
5963 | | * Returns 1 if the offset was in the list of already seen IFDs and the |
5964 | | * directory offset can be returned. The directory list is not updated. |
5965 | | * Otherwise returns 0 or if an error occurred. |
5966 | | */ |
5967 | | int _TIFFGetOffsetFromDirNumber(TIFF *tif, tdir_t dirn, uint64_t *diroff) |
5968 | 0 | { |
5969 | |
|
5970 | 0 | if (tif->tif_map_dir_number_to_offset == NULL) |
5971 | 0 | return 0; |
5972 | 0 | TIFFOffsetAndDirNumber entry; |
5973 | 0 | entry.offset = 0; /* not used */ |
5974 | 0 | entry.dirNumber = dirn; |
5975 | |
|
5976 | 0 | TIFFOffsetAndDirNumber *foundEntry = |
5977 | 0 | (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
5978 | 0 | tif->tif_map_dir_number_to_offset, &entry); |
5979 | 0 | if (foundEntry) |
5980 | 0 | { |
5981 | 0 | *diroff = foundEntry->offset; |
5982 | 0 | return 1; |
5983 | 0 | } |
5984 | | |
5985 | 0 | return 0; |
5986 | 0 | } /*--- _TIFFGetOffsetFromDirNumber() ---*/ |
5987 | | |
5988 | | /* |
5989 | | * Remove an entry from the directory list of already seen directories |
5990 | | * by directory offset. |
5991 | | * If an entry is to be removed from the list, it is also okay if the entry |
5992 | | * is not in the list or the list does not exist. |
5993 | | */ |
5994 | | int _TIFFRemoveEntryFromDirectoryListByOffset(TIFF *tif, uint64_t diroff) |
5995 | 0 | { |
5996 | 0 | if (tif->tif_map_dir_offset_to_number == NULL) |
5997 | 0 | return 1; |
5998 | | |
5999 | 0 | TIFFOffsetAndDirNumber entryOld; |
6000 | 0 | entryOld.offset = diroff; |
6001 | 0 | entryOld.dirNumber = 0; |
6002 | | /* We must remove first from tif_map_dir_number_to_offset as the |
6003 | | * entry is owned (and thus freed) by tif_map_dir_offset_to_number. |
6004 | | * However, we need firstly to find the directory number from offset. */ |
6005 | |
|
6006 | 0 | TIFFOffsetAndDirNumber *foundEntryOldOff = |
6007 | 0 | (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
6008 | 0 | tif->tif_map_dir_offset_to_number, &entryOld); |
6009 | 0 | if (foundEntryOldOff) |
6010 | 0 | { |
6011 | 0 | entryOld.dirNumber = foundEntryOldOff->dirNumber; |
6012 | 0 | if (tif->tif_map_dir_number_to_offset != NULL) |
6013 | 0 | { |
6014 | 0 | TIFFOffsetAndDirNumber *foundEntryOldDir = |
6015 | 0 | (TIFFOffsetAndDirNumber *)TIFFHashSetLookup( |
6016 | 0 | tif->tif_map_dir_number_to_offset, &entryOld); |
6017 | 0 | if (foundEntryOldDir) |
6018 | 0 | { |
6019 | 0 | TIFFHashSetRemove(tif->tif_map_dir_number_to_offset, |
6020 | 0 | foundEntryOldDir); |
6021 | 0 | TIFFHashSetRemove(tif->tif_map_dir_offset_to_number, |
6022 | 0 | foundEntryOldOff); |
6023 | 0 | return 1; |
6024 | 0 | } |
6025 | 0 | } |
6026 | 0 | else |
6027 | 0 | { |
6028 | 0 | TIFFErrorExtR(tif, "_TIFFRemoveEntryFromDirectoryListByOffset", |
6029 | 0 | "Unexpectedly tif_map_dir_number_to_offset is " |
6030 | 0 | "missing but tif_map_dir_offset_to_number exists."); |
6031 | 0 | return 0; |
6032 | 0 | } |
6033 | 0 | } |
6034 | 0 | return 1; |
6035 | 0 | } /*--- _TIFFRemoveEntryFromDirectoryListByOffset() ---*/ |
6036 | | |
6037 | | /* |
6038 | | * Check the count field of a directory entry against a known value. The |
6039 | | * caller is expected to skip/ignore the tag if there is a mismatch. |
6040 | | */ |
6041 | | static int CheckDirCount(TIFF *tif, TIFFDirEntry *dir, uint32_t count) |
6042 | 0 | { |
6043 | 0 | if ((uint64_t)count > dir->tdir_count) |
6044 | 0 | { |
6045 | 0 | const TIFFField *fip = TIFFFieldWithTag(tif, dir->tdir_tag); |
6046 | 0 | TIFFWarningExtR(tif, tif->tif_name, |
6047 | 0 | "incorrect count for field \"%s\" (%" PRIu64 |
6048 | 0 | ", expecting %" PRIu32 "); tag ignored", |
6049 | 0 | fip ? fip->field_name : "unknown tagname", |
6050 | 0 | dir->tdir_count, count); |
6051 | 0 | return (0); |
6052 | 0 | } |
6053 | 0 | else if ((uint64_t)count < dir->tdir_count) |
6054 | 0 | { |
6055 | 0 | const TIFFField *fip = TIFFFieldWithTag(tif, dir->tdir_tag); |
6056 | 0 | TIFFWarningExtR(tif, tif->tif_name, |
6057 | 0 | "incorrect count for field \"%s\" (%" PRIu64 |
6058 | 0 | ", expecting %" PRIu32 "); tag trimmed", |
6059 | 0 | fip ? fip->field_name : "unknown tagname", |
6060 | 0 | dir->tdir_count, count); |
6061 | 0 | dir->tdir_count = count; |
6062 | 0 | return (1); |
6063 | 0 | } |
6064 | 0 | return (1); |
6065 | 0 | } |
6066 | | |
6067 | | /* |
6068 | | * Read IFD structure from the specified offset. If the pointer to |
6069 | | * nextdiroff variable has been specified, read it too. Function returns a |
6070 | | * number of fields in the directory or 0 if failed. |
6071 | | */ |
6072 | | static uint16_t TIFFFetchDirectory(TIFF *tif, uint64_t diroff, |
6073 | | TIFFDirEntry **pdir, uint64_t *nextdiroff) |
6074 | 0 | { |
6075 | 0 | static const char module[] = "TIFFFetchDirectory"; |
6076 | |
|
6077 | 0 | void *origdir; |
6078 | 0 | uint16_t dircount16; |
6079 | 0 | uint32_t dirsize; |
6080 | 0 | TIFFDirEntry *dir; |
6081 | 0 | uint8_t *ma; |
6082 | 0 | TIFFDirEntry *mb; |
6083 | 0 | uint16_t n; |
6084 | |
|
6085 | 0 | assert(pdir); |
6086 | |
|
6087 | 0 | tif->tif_diroff = diroff; |
6088 | 0 | if (nextdiroff) |
6089 | 0 | *nextdiroff = 0; |
6090 | 0 | if (!isMapped(tif)) |
6091 | 0 | { |
6092 | 0 | if (!SeekOK(tif, tif->tif_diroff)) |
6093 | 0 | { |
6094 | 0 | TIFFErrorExtR(tif, module, |
6095 | 0 | "%s: Seek error accessing TIFF directory", |
6096 | 0 | tif->tif_name); |
6097 | 0 | return 0; |
6098 | 0 | } |
6099 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
6100 | 0 | { |
6101 | 0 | if (!ReadOK(tif, &dircount16, sizeof(uint16_t))) |
6102 | 0 | { |
6103 | 0 | TIFFErrorExtR(tif, module, |
6104 | 0 | "%s: Can not read TIFF directory count", |
6105 | 0 | tif->tif_name); |
6106 | 0 | return 0; |
6107 | 0 | } |
6108 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6109 | 0 | TIFFSwabShort(&dircount16); |
6110 | 0 | if (dircount16 > 4096) |
6111 | 0 | { |
6112 | 0 | TIFFErrorExtR(tif, module, |
6113 | 0 | "Sanity check on directory count failed, this is " |
6114 | 0 | "probably not a valid IFD offset"); |
6115 | 0 | return 0; |
6116 | 0 | } |
6117 | 0 | dirsize = 12; |
6118 | 0 | } |
6119 | 0 | else |
6120 | 0 | { |
6121 | 0 | uint64_t dircount64; |
6122 | 0 | if (!ReadOK(tif, &dircount64, sizeof(uint64_t))) |
6123 | 0 | { |
6124 | 0 | TIFFErrorExtR(tif, module, |
6125 | 0 | "%s: Can not read TIFF directory count", |
6126 | 0 | tif->tif_name); |
6127 | 0 | return 0; |
6128 | 0 | } |
6129 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6130 | 0 | TIFFSwabLong8(&dircount64); |
6131 | 0 | if (dircount64 > 4096) |
6132 | 0 | { |
6133 | 0 | TIFFErrorExtR(tif, module, |
6134 | 0 | "Sanity check on directory count failed, this is " |
6135 | 0 | "probably not a valid IFD offset"); |
6136 | 0 | return 0; |
6137 | 0 | } |
6138 | 0 | dircount16 = (uint16_t)dircount64; |
6139 | 0 | dirsize = 20; |
6140 | 0 | } |
6141 | 0 | origdir = _TIFFCheckMalloc(tif, dircount16, dirsize, |
6142 | 0 | "to read TIFF directory"); |
6143 | 0 | if (origdir == NULL) |
6144 | 0 | return 0; |
6145 | 0 | if (!ReadOK(tif, origdir, (tmsize_t)(dircount16 * dirsize))) |
6146 | 0 | { |
6147 | 0 | TIFFErrorExtR(tif, module, "%.100s: Can not read TIFF directory", |
6148 | 0 | tif->tif_name); |
6149 | 0 | _TIFFfreeExt(tif, origdir); |
6150 | 0 | return 0; |
6151 | 0 | } |
6152 | | /* |
6153 | | * Read offset to next directory for sequential scans if |
6154 | | * needed. |
6155 | | */ |
6156 | 0 | if (nextdiroff) |
6157 | 0 | { |
6158 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
6159 | 0 | { |
6160 | 0 | uint32_t nextdiroff32; |
6161 | 0 | if (!ReadOK(tif, &nextdiroff32, sizeof(uint32_t))) |
6162 | 0 | nextdiroff32 = 0; |
6163 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6164 | 0 | TIFFSwabLong(&nextdiroff32); |
6165 | 0 | *nextdiroff = nextdiroff32; |
6166 | 0 | } |
6167 | 0 | else |
6168 | 0 | { |
6169 | 0 | if (!ReadOK(tif, nextdiroff, sizeof(uint64_t))) |
6170 | 0 | *nextdiroff = 0; |
6171 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6172 | 0 | TIFFSwabLong8(nextdiroff); |
6173 | 0 | } |
6174 | 0 | } |
6175 | 0 | } |
6176 | 0 | else |
6177 | 0 | { |
6178 | 0 | tmsize_t m; |
6179 | 0 | tmsize_t off; |
6180 | 0 | if (tif->tif_diroff > (uint64_t)INT64_MAX) |
6181 | 0 | { |
6182 | 0 | TIFFErrorExtR(tif, module, "Can not read TIFF directory count"); |
6183 | 0 | return (0); |
6184 | 0 | } |
6185 | 0 | off = (tmsize_t)tif->tif_diroff; |
6186 | | |
6187 | | /* |
6188 | | * Check for integer overflow when validating the dir_off, |
6189 | | * otherwise a very high offset may cause an OOB read and |
6190 | | * crash the client. Make two comparisons instead of |
6191 | | * |
6192 | | * off + sizeof(uint16_t) > tif->tif_size |
6193 | | * |
6194 | | * to avoid overflow. |
6195 | | */ |
6196 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
6197 | 0 | { |
6198 | 0 | m = off + sizeof(uint16_t); |
6199 | 0 | if ((m < off) || (m < (tmsize_t)sizeof(uint16_t)) || |
6200 | 0 | (m > tif->tif_size)) |
6201 | 0 | { |
6202 | 0 | TIFFErrorExtR(tif, module, "Can not read TIFF directory count"); |
6203 | 0 | return 0; |
6204 | 0 | } |
6205 | 0 | else |
6206 | 0 | { |
6207 | 0 | _TIFFmemcpy(&dircount16, tif->tif_base + off, sizeof(uint16_t)); |
6208 | 0 | } |
6209 | 0 | off += sizeof(uint16_t); |
6210 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6211 | 0 | TIFFSwabShort(&dircount16); |
6212 | 0 | if (dircount16 > 4096) |
6213 | 0 | { |
6214 | 0 | TIFFErrorExtR(tif, module, |
6215 | 0 | "Sanity check on directory count failed, this is " |
6216 | 0 | "probably not a valid IFD offset"); |
6217 | 0 | return 0; |
6218 | 0 | } |
6219 | 0 | dirsize = 12; |
6220 | 0 | } |
6221 | 0 | else |
6222 | 0 | { |
6223 | 0 | uint64_t dircount64; |
6224 | 0 | m = off + sizeof(uint64_t); |
6225 | 0 | if ((m < off) || (m < (tmsize_t)sizeof(uint64_t)) || |
6226 | 0 | (m > tif->tif_size)) |
6227 | 0 | { |
6228 | 0 | TIFFErrorExtR(tif, module, "Can not read TIFF directory count"); |
6229 | 0 | return 0; |
6230 | 0 | } |
6231 | 0 | else |
6232 | 0 | { |
6233 | 0 | _TIFFmemcpy(&dircount64, tif->tif_base + off, sizeof(uint64_t)); |
6234 | 0 | } |
6235 | 0 | off += sizeof(uint64_t); |
6236 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6237 | 0 | TIFFSwabLong8(&dircount64); |
6238 | 0 | if (dircount64 > 4096) |
6239 | 0 | { |
6240 | 0 | TIFFErrorExtR(tif, module, |
6241 | 0 | "Sanity check on directory count failed, this is " |
6242 | 0 | "probably not a valid IFD offset"); |
6243 | 0 | return 0; |
6244 | 0 | } |
6245 | 0 | dircount16 = (uint16_t)dircount64; |
6246 | 0 | dirsize = 20; |
6247 | 0 | } |
6248 | 0 | if (dircount16 == 0) |
6249 | 0 | { |
6250 | 0 | TIFFErrorExtR(tif, module, |
6251 | 0 | "Sanity check on directory count failed, zero tag " |
6252 | 0 | "directories not supported"); |
6253 | 0 | return 0; |
6254 | 0 | } |
6255 | | /* Before allocating a huge amount of memory for corrupted files, check |
6256 | | * if size of requested memory is not greater than file size. */ |
6257 | 0 | uint64_t filesize = TIFFGetFileSize(tif); |
6258 | 0 | uint64_t allocsize = (uint64_t)dircount16 * dirsize; |
6259 | 0 | if (allocsize > filesize) |
6260 | 0 | { |
6261 | 0 | TIFFWarningExtR( |
6262 | 0 | tif, module, |
6263 | 0 | "Requested memory size for TIFF directory of %" PRIu64 |
6264 | 0 | " is greater than filesize %" PRIu64 |
6265 | 0 | ". Memory not allocated, TIFF directory not read", |
6266 | 0 | allocsize, filesize); |
6267 | 0 | return 0; |
6268 | 0 | } |
6269 | 0 | origdir = _TIFFCheckMalloc(tif, dircount16, dirsize, |
6270 | 0 | "to read TIFF directory"); |
6271 | 0 | if (origdir == NULL) |
6272 | 0 | return 0; |
6273 | 0 | m = off + dircount16 * dirsize; |
6274 | 0 | if ((m < off) || (m < (tmsize_t)(dircount16 * dirsize)) || |
6275 | 0 | (m > tif->tif_size)) |
6276 | 0 | { |
6277 | 0 | TIFFErrorExtR(tif, module, "Can not read TIFF directory"); |
6278 | 0 | _TIFFfreeExt(tif, origdir); |
6279 | 0 | return 0; |
6280 | 0 | } |
6281 | 0 | else |
6282 | 0 | { |
6283 | 0 | _TIFFmemcpy(origdir, tif->tif_base + off, dircount16 * dirsize); |
6284 | 0 | } |
6285 | 0 | if (nextdiroff) |
6286 | 0 | { |
6287 | 0 | off += dircount16 * dirsize; |
6288 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
6289 | 0 | { |
6290 | 0 | uint32_t nextdiroff32; |
6291 | 0 | m = off + sizeof(uint32_t); |
6292 | 0 | if ((m < off) || (m < (tmsize_t)sizeof(uint32_t)) || |
6293 | 0 | (m > tif->tif_size)) |
6294 | 0 | nextdiroff32 = 0; |
6295 | 0 | else |
6296 | 0 | _TIFFmemcpy(&nextdiroff32, tif->tif_base + off, |
6297 | 0 | sizeof(uint32_t)); |
6298 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6299 | 0 | TIFFSwabLong(&nextdiroff32); |
6300 | 0 | *nextdiroff = nextdiroff32; |
6301 | 0 | } |
6302 | 0 | else |
6303 | 0 | { |
6304 | 0 | m = off + sizeof(uint64_t); |
6305 | 0 | if ((m < off) || (m < (tmsize_t)sizeof(uint64_t)) || |
6306 | 0 | (m > tif->tif_size)) |
6307 | 0 | *nextdiroff = 0; |
6308 | 0 | else |
6309 | 0 | _TIFFmemcpy(nextdiroff, tif->tif_base + off, |
6310 | 0 | sizeof(uint64_t)); |
6311 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6312 | 0 | TIFFSwabLong8(nextdiroff); |
6313 | 0 | } |
6314 | 0 | } |
6315 | 0 | } |
6316 | | /* No check against filesize needed here because "dir" should have same size |
6317 | | * than "origdir" checked above. */ |
6318 | 0 | dir = (TIFFDirEntry *)_TIFFCheckMalloc( |
6319 | 0 | tif, dircount16, sizeof(TIFFDirEntry), "to read TIFF directory"); |
6320 | 0 | if (dir == 0) |
6321 | 0 | { |
6322 | 0 | _TIFFfreeExt(tif, origdir); |
6323 | 0 | return 0; |
6324 | 0 | } |
6325 | 0 | ma = (uint8_t *)origdir; |
6326 | 0 | mb = dir; |
6327 | 0 | for (n = 0; n < dircount16; n++) |
6328 | 0 | { |
6329 | 0 | mb->tdir_ignore = FALSE; |
6330 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6331 | 0 | TIFFSwabShort((uint16_t *)ma); |
6332 | 0 | mb->tdir_tag = *(uint16_t *)ma; |
6333 | 0 | ma += sizeof(uint16_t); |
6334 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6335 | 0 | TIFFSwabShort((uint16_t *)ma); |
6336 | 0 | mb->tdir_type = *(uint16_t *)ma; |
6337 | 0 | ma += sizeof(uint16_t); |
6338 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
6339 | 0 | { |
6340 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6341 | 0 | TIFFSwabLong((uint32_t *)ma); |
6342 | 0 | mb->tdir_count = (uint64_t)(*(uint32_t *)ma); |
6343 | 0 | ma += sizeof(uint32_t); |
6344 | 0 | mb->tdir_offset.toff_long8 = 0; |
6345 | 0 | *(uint32_t *)(&mb->tdir_offset) = *(uint32_t *)ma; |
6346 | 0 | ma += sizeof(uint32_t); |
6347 | 0 | } |
6348 | 0 | else |
6349 | 0 | { |
6350 | 0 | if (tif->tif_flags & TIFF_SWAB) |
6351 | 0 | TIFFSwabLong8((uint64_t *)ma); |
6352 | 0 | mb->tdir_count = TIFFReadUInt64(ma); |
6353 | 0 | ma += sizeof(uint64_t); |
6354 | 0 | mb->tdir_offset.toff_long8 = TIFFReadUInt64(ma); |
6355 | 0 | ma += sizeof(uint64_t); |
6356 | 0 | } |
6357 | 0 | mb++; |
6358 | 0 | } |
6359 | 0 | _TIFFfreeExt(tif, origdir); |
6360 | 0 | *pdir = dir; |
6361 | 0 | return dircount16; |
6362 | 0 | } |
6363 | | |
6364 | | /* |
6365 | | * Fetch a tag that is not handled by special case code. |
6366 | | */ |
6367 | | static int TIFFFetchNormalTag(TIFF *tif, TIFFDirEntry *dp, int recover) |
6368 | 0 | { |
6369 | 0 | static const char module[] = "TIFFFetchNormalTag"; |
6370 | 0 | enum TIFFReadDirEntryErr err; |
6371 | 0 | uint32_t fii; |
6372 | 0 | const TIFFField *fip = NULL; |
6373 | 0 | TIFFReadDirectoryFindFieldInfo(tif, dp->tdir_tag, &fii); |
6374 | 0 | if (fii == FAILED_FII) |
6375 | 0 | { |
6376 | 0 | TIFFErrorExtR(tif, "TIFFFetchNormalTag", |
6377 | 0 | "No definition found for tag %" PRIu16, dp->tdir_tag); |
6378 | 0 | return 0; |
6379 | 0 | } |
6380 | 0 | fip = tif->tif_fields[fii]; |
6381 | 0 | assert(fip != NULL); /* should not happen */ |
6382 | 0 | assert(fip->set_get_field_type != |
6383 | 0 | TIFF_SETGET_OTHER); /* if so, we shouldn't arrive here but deal with |
6384 | | this in specialized code */ |
6385 | 0 | assert(fip->set_get_field_type != |
6386 | 0 | TIFF_SETGET_INT); /* if so, we shouldn't arrive here as this is only |
6387 | | the case for pseudo-tags */ |
6388 | 0 | err = TIFFReadDirEntryErrOk; |
6389 | 0 | switch (fip->set_get_field_type) |
6390 | 0 | { |
6391 | 0 | case TIFF_SETGET_UNDEFINED: |
6392 | 0 | TIFFErrorExtR( |
6393 | 0 | tif, "TIFFFetchNormalTag", |
6394 | 0 | "Defined set_get_field_type of custom tag %u (%s) is " |
6395 | 0 | "TIFF_SETGET_UNDEFINED and thus tag is not read from file", |
6396 | 0 | fip->field_tag, fip->field_name); |
6397 | 0 | break; |
6398 | 0 | case TIFF_SETGET_ASCII: |
6399 | 0 | { |
6400 | 0 | uint8_t *data; |
6401 | 0 | assert(fip->field_passcount == 0); |
6402 | 0 | err = TIFFReadDirEntryByteArray(tif, dp, &data); |
6403 | 0 | if (err == TIFFReadDirEntryErrOk) |
6404 | 0 | { |
6405 | 0 | size_t mb = 0; |
6406 | 0 | int n; |
6407 | 0 | if (data != NULL) |
6408 | 0 | { |
6409 | 0 | if (dp->tdir_count > 0 && data[dp->tdir_count - 1] == 0) |
6410 | 0 | { |
6411 | | /* optimization: if data is known to be 0 terminated, we |
6412 | | * can use strlen() */ |
6413 | 0 | mb = strlen((const char *)data); |
6414 | 0 | } |
6415 | 0 | else |
6416 | 0 | { |
6417 | | /* general case. equivalent to non-portable */ |
6418 | | /* mb = strnlen((const char*)data, |
6419 | | * (uint32_t)dp->tdir_count); */ |
6420 | 0 | uint8_t *ma = data; |
6421 | 0 | while (mb < (uint32_t)dp->tdir_count) |
6422 | 0 | { |
6423 | 0 | if (*ma == 0) |
6424 | 0 | break; |
6425 | 0 | ma++; |
6426 | 0 | mb++; |
6427 | 0 | } |
6428 | 0 | } |
6429 | 0 | } |
6430 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6431 | 0 | { |
6432 | 0 | if (data != NULL) |
6433 | 0 | _TIFFfreeExt(tif, data); |
6434 | 0 | return (0); |
6435 | 0 | } |
6436 | 0 | if (mb + 1 < (uint32_t)dp->tdir_count) |
6437 | 0 | TIFFWarningExtR( |
6438 | 0 | tif, module, |
6439 | 0 | "ASCII value for tag \"%s\" contains null byte in " |
6440 | 0 | "value; value incorrectly truncated during reading due " |
6441 | 0 | "to implementation limitations", |
6442 | 0 | fip->field_name); |
6443 | 0 | else if (mb + 1 > (uint32_t)dp->tdir_count) |
6444 | 0 | { |
6445 | 0 | TIFFWarningExtR(tif, module, |
6446 | 0 | "ASCII value for tag \"%s\" does not end " |
6447 | 0 | "in null byte. Forcing it to be null", |
6448 | 0 | fip->field_name); |
6449 | | /* TIFFReadDirEntryArrayWithLimit() ensures this can't be |
6450 | | * larger than MAX_SIZE_TAG_DATA */ |
6451 | 0 | assert((uint32_t)dp->tdir_count + 1 == dp->tdir_count + 1); |
6452 | 0 | uint8_t *o = (uint8_t *)_TIFFmallocExt( |
6453 | 0 | tif, (uint32_t)dp->tdir_count + 1); |
6454 | 0 | if (o == NULL) |
6455 | 0 | { |
6456 | 0 | if (data != NULL) |
6457 | 0 | _TIFFfreeExt(tif, data); |
6458 | 0 | return (0); |
6459 | 0 | } |
6460 | 0 | if (dp->tdir_count > 0) |
6461 | 0 | { |
6462 | 0 | _TIFFmemcpy(o, data, (uint32_t)dp->tdir_count); |
6463 | 0 | } |
6464 | 0 | o[(uint32_t)dp->tdir_count] = 0; |
6465 | 0 | if (data != 0) |
6466 | 0 | _TIFFfreeExt(tif, data); |
6467 | 0 | data = o; |
6468 | 0 | } |
6469 | 0 | n = TIFFSetField(tif, dp->tdir_tag, data); |
6470 | 0 | if (data != 0) |
6471 | 0 | _TIFFfreeExt(tif, data); |
6472 | 0 | if (!n) |
6473 | 0 | return (0); |
6474 | 0 | } |
6475 | 0 | } |
6476 | 0 | break; |
6477 | 0 | case TIFF_SETGET_UINT8: |
6478 | 0 | { |
6479 | 0 | uint8_t data = 0; |
6480 | 0 | assert(fip->field_readcount == 1); |
6481 | 0 | assert(fip->field_passcount == 0); |
6482 | 0 | err = TIFFReadDirEntryByte(tif, dp, &data); |
6483 | 0 | if (err == TIFFReadDirEntryErrOk) |
6484 | 0 | { |
6485 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6486 | 0 | return (0); |
6487 | 0 | } |
6488 | 0 | } |
6489 | 0 | break; |
6490 | 0 | case TIFF_SETGET_SINT8: |
6491 | 0 | { |
6492 | 0 | int8_t data = 0; |
6493 | 0 | assert(fip->field_readcount == 1); |
6494 | 0 | assert(fip->field_passcount == 0); |
6495 | 0 | err = TIFFReadDirEntrySbyte(tif, dp, &data); |
6496 | 0 | if (err == TIFFReadDirEntryErrOk) |
6497 | 0 | { |
6498 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6499 | 0 | return (0); |
6500 | 0 | } |
6501 | 0 | } |
6502 | 0 | break; |
6503 | 0 | case TIFF_SETGET_UINT16: |
6504 | 0 | { |
6505 | 0 | uint16_t data; |
6506 | 0 | assert(fip->field_readcount == 1); |
6507 | 0 | assert(fip->field_passcount == 0); |
6508 | 0 | err = TIFFReadDirEntryShort(tif, dp, &data); |
6509 | 0 | if (err == TIFFReadDirEntryErrOk) |
6510 | 0 | { |
6511 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6512 | 0 | return (0); |
6513 | 0 | } |
6514 | 0 | } |
6515 | 0 | break; |
6516 | 0 | case TIFF_SETGET_SINT16: |
6517 | 0 | { |
6518 | 0 | int16_t data; |
6519 | 0 | assert(fip->field_readcount == 1); |
6520 | 0 | assert(fip->field_passcount == 0); |
6521 | 0 | err = TIFFReadDirEntrySshort(tif, dp, &data); |
6522 | 0 | if (err == TIFFReadDirEntryErrOk) |
6523 | 0 | { |
6524 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6525 | 0 | return (0); |
6526 | 0 | } |
6527 | 0 | } |
6528 | 0 | break; |
6529 | 0 | case TIFF_SETGET_UINT32: |
6530 | 0 | { |
6531 | 0 | uint32_t data; |
6532 | 0 | assert(fip->field_readcount == 1); |
6533 | 0 | assert(fip->field_passcount == 0); |
6534 | 0 | err = TIFFReadDirEntryLong(tif, dp, &data); |
6535 | 0 | if (err == TIFFReadDirEntryErrOk) |
6536 | 0 | { |
6537 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6538 | 0 | return (0); |
6539 | 0 | } |
6540 | 0 | } |
6541 | 0 | break; |
6542 | 0 | case TIFF_SETGET_SINT32: |
6543 | 0 | { |
6544 | 0 | int32_t data; |
6545 | 0 | assert(fip->field_readcount == 1); |
6546 | 0 | assert(fip->field_passcount == 0); |
6547 | 0 | err = TIFFReadDirEntrySlong(tif, dp, &data); |
6548 | 0 | if (err == TIFFReadDirEntryErrOk) |
6549 | 0 | { |
6550 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6551 | 0 | return (0); |
6552 | 0 | } |
6553 | 0 | } |
6554 | 0 | break; |
6555 | 0 | case TIFF_SETGET_UINT64: |
6556 | 0 | { |
6557 | 0 | uint64_t data; |
6558 | 0 | assert(fip->field_readcount == 1); |
6559 | 0 | assert(fip->field_passcount == 0); |
6560 | 0 | err = TIFFReadDirEntryLong8(tif, dp, &data); |
6561 | 0 | if (err == TIFFReadDirEntryErrOk) |
6562 | 0 | { |
6563 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6564 | 0 | return 0; |
6565 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6566 | 0 | return (0); |
6567 | 0 | } |
6568 | 0 | } |
6569 | 0 | break; |
6570 | 0 | case TIFF_SETGET_SINT64: |
6571 | 0 | { |
6572 | 0 | int64_t data; |
6573 | 0 | assert(fip->field_readcount == 1); |
6574 | 0 | assert(fip->field_passcount == 0); |
6575 | 0 | err = TIFFReadDirEntrySlong8(tif, dp, &data); |
6576 | 0 | if (err == TIFFReadDirEntryErrOk) |
6577 | 0 | { |
6578 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6579 | 0 | return 0; |
6580 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6581 | 0 | return (0); |
6582 | 0 | } |
6583 | 0 | } |
6584 | 0 | break; |
6585 | 0 | case TIFF_SETGET_FLOAT: |
6586 | 0 | { |
6587 | 0 | float data; |
6588 | 0 | assert(fip->field_readcount == 1); |
6589 | 0 | assert(fip->field_passcount == 0); |
6590 | 0 | err = TIFFReadDirEntryFloat(tif, dp, &data); |
6591 | 0 | if (err == TIFFReadDirEntryErrOk) |
6592 | 0 | { |
6593 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6594 | 0 | return 0; |
6595 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6596 | 0 | return (0); |
6597 | 0 | } |
6598 | 0 | } |
6599 | 0 | break; |
6600 | 0 | case TIFF_SETGET_DOUBLE: |
6601 | 0 | { |
6602 | 0 | double data; |
6603 | 0 | assert(fip->field_readcount == 1); |
6604 | 0 | assert(fip->field_passcount == 0); |
6605 | 0 | err = TIFFReadDirEntryDouble(tif, dp, &data); |
6606 | 0 | if (err == TIFFReadDirEntryErrOk) |
6607 | 0 | { |
6608 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6609 | 0 | return 0; |
6610 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6611 | 0 | return (0); |
6612 | 0 | } |
6613 | 0 | } |
6614 | 0 | break; |
6615 | 0 | case TIFF_SETGET_IFD8: |
6616 | 0 | { |
6617 | 0 | uint64_t data; |
6618 | 0 | assert(fip->field_readcount == 1); |
6619 | 0 | assert(fip->field_passcount == 0); |
6620 | 0 | err = TIFFReadDirEntryIfd8(tif, dp, &data); |
6621 | 0 | if (err == TIFFReadDirEntryErrOk) |
6622 | 0 | { |
6623 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6624 | 0 | return 0; |
6625 | 0 | if (!TIFFSetField(tif, dp->tdir_tag, data)) |
6626 | 0 | return (0); |
6627 | 0 | } |
6628 | 0 | } |
6629 | 0 | break; |
6630 | 0 | case TIFF_SETGET_UINT16_PAIR: |
6631 | 0 | { |
6632 | 0 | uint16_t *data; |
6633 | 0 | assert(fip->field_readcount == 2); |
6634 | 0 | assert(fip->field_passcount == 0); |
6635 | 0 | if (dp->tdir_count != 2) |
6636 | 0 | { |
6637 | 0 | TIFFWarningExtR(tif, module, |
6638 | 0 | "incorrect count for field \"%s\", expected 2, " |
6639 | 0 | "got %" PRIu64, |
6640 | 0 | fip->field_name, dp->tdir_count); |
6641 | 0 | return (0); |
6642 | 0 | } |
6643 | 0 | err = TIFFReadDirEntryShortArray(tif, dp, &data); |
6644 | 0 | if (err == TIFFReadDirEntryErrOk) |
6645 | 0 | { |
6646 | 0 | int m; |
6647 | 0 | assert(data); /* avoid CLang static Analyzer false positive */ |
6648 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data[0], data[1]); |
6649 | 0 | _TIFFfreeExt(tif, data); |
6650 | 0 | if (!m) |
6651 | 0 | return (0); |
6652 | 0 | } |
6653 | 0 | } |
6654 | 0 | break; |
6655 | 0 | case TIFF_SETGET_C0_UINT8: |
6656 | 0 | { |
6657 | 0 | uint8_t *data; |
6658 | 0 | assert(fip->field_readcount >= 1); |
6659 | 0 | assert(fip->field_passcount == 0); |
6660 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6661 | 0 | { |
6662 | 0 | TIFFWarningExtR(tif, module, |
6663 | 0 | "incorrect count for field \"%s\", expected " |
6664 | 0 | "%d, got %" PRIu64, |
6665 | 0 | fip->field_name, (int)fip->field_readcount, |
6666 | 0 | dp->tdir_count); |
6667 | 0 | return (0); |
6668 | 0 | } |
6669 | 0 | else |
6670 | 0 | { |
6671 | 0 | err = TIFFReadDirEntryByteArray(tif, dp, &data); |
6672 | 0 | if (err == TIFFReadDirEntryErrOk) |
6673 | 0 | { |
6674 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6675 | 0 | { |
6676 | 0 | if (data != 0) |
6677 | 0 | _TIFFfreeExt(tif, data); |
6678 | 0 | return 0; |
6679 | 0 | } |
6680 | 0 | int m; |
6681 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6682 | 0 | if (data != 0) |
6683 | 0 | _TIFFfreeExt(tif, data); |
6684 | 0 | if (!m) |
6685 | 0 | return (0); |
6686 | 0 | } |
6687 | 0 | } |
6688 | 0 | } |
6689 | 0 | break; |
6690 | 0 | case TIFF_SETGET_C0_SINT8: |
6691 | 0 | { |
6692 | 0 | int8_t *data; |
6693 | 0 | assert(fip->field_readcount >= 1); |
6694 | 0 | assert(fip->field_passcount == 0); |
6695 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6696 | 0 | { |
6697 | 0 | TIFFWarningExtR(tif, module, |
6698 | 0 | "incorrect count for field \"%s\", expected " |
6699 | 0 | "%d, got %" PRIu64, |
6700 | 0 | fip->field_name, (int)fip->field_readcount, |
6701 | 0 | dp->tdir_count); |
6702 | 0 | return (0); |
6703 | 0 | } |
6704 | 0 | else |
6705 | 0 | { |
6706 | 0 | err = TIFFReadDirEntrySbyteArray(tif, dp, &data); |
6707 | 0 | if (err == TIFFReadDirEntryErrOk) |
6708 | 0 | { |
6709 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6710 | 0 | { |
6711 | 0 | if (data != 0) |
6712 | 0 | _TIFFfreeExt(tif, data); |
6713 | 0 | return 0; |
6714 | 0 | } |
6715 | 0 | int m; |
6716 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6717 | 0 | if (data != 0) |
6718 | 0 | _TIFFfreeExt(tif, data); |
6719 | 0 | if (!m) |
6720 | 0 | return (0); |
6721 | 0 | } |
6722 | 0 | } |
6723 | 0 | } |
6724 | 0 | break; |
6725 | 0 | case TIFF_SETGET_C0_UINT16: |
6726 | 0 | { |
6727 | 0 | uint16_t *data; |
6728 | 0 | assert(fip->field_readcount >= 1); |
6729 | 0 | assert(fip->field_passcount == 0); |
6730 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6731 | 0 | { |
6732 | 0 | TIFFWarningExtR(tif, module, |
6733 | 0 | "incorrect count for field \"%s\", expected " |
6734 | 0 | "%d, got %" PRIu64, |
6735 | 0 | fip->field_name, (int)fip->field_readcount, |
6736 | 0 | dp->tdir_count); |
6737 | 0 | return (0); |
6738 | 0 | } |
6739 | 0 | else |
6740 | 0 | { |
6741 | 0 | err = TIFFReadDirEntryShortArray(tif, dp, &data); |
6742 | 0 | if (err == TIFFReadDirEntryErrOk) |
6743 | 0 | { |
6744 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6745 | 0 | { |
6746 | 0 | if (data != 0) |
6747 | 0 | _TIFFfreeExt(tif, data); |
6748 | 0 | return 0; |
6749 | 0 | } |
6750 | 0 | int m; |
6751 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6752 | 0 | if (data != 0) |
6753 | 0 | _TIFFfreeExt(tif, data); |
6754 | 0 | if (!m) |
6755 | 0 | return (0); |
6756 | 0 | } |
6757 | 0 | } |
6758 | 0 | } |
6759 | 0 | break; |
6760 | 0 | case TIFF_SETGET_C0_SINT16: |
6761 | 0 | { |
6762 | 0 | int16_t *data; |
6763 | 0 | assert(fip->field_readcount >= 1); |
6764 | 0 | assert(fip->field_passcount == 0); |
6765 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6766 | 0 | { |
6767 | 0 | TIFFWarningExtR(tif, module, |
6768 | 0 | "incorrect count for field \"%s\", expected " |
6769 | 0 | "%d, got %" PRIu64, |
6770 | 0 | fip->field_name, (int)fip->field_readcount, |
6771 | 0 | dp->tdir_count); |
6772 | 0 | return (0); |
6773 | 0 | } |
6774 | 0 | else |
6775 | 0 | { |
6776 | 0 | err = TIFFReadDirEntrySshortArray(tif, dp, &data); |
6777 | 0 | if (err == TIFFReadDirEntryErrOk) |
6778 | 0 | { |
6779 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6780 | 0 | { |
6781 | 0 | if (data != 0) |
6782 | 0 | _TIFFfreeExt(tif, data); |
6783 | 0 | return 0; |
6784 | 0 | } |
6785 | 0 | int m; |
6786 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6787 | 0 | if (data != 0) |
6788 | 0 | _TIFFfreeExt(tif, data); |
6789 | 0 | if (!m) |
6790 | 0 | return (0); |
6791 | 0 | } |
6792 | 0 | } |
6793 | 0 | } |
6794 | 0 | break; |
6795 | 0 | case TIFF_SETGET_C0_UINT32: |
6796 | 0 | { |
6797 | 0 | uint32_t *data; |
6798 | 0 | assert(fip->field_readcount >= 1); |
6799 | 0 | assert(fip->field_passcount == 0); |
6800 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6801 | 0 | { |
6802 | 0 | TIFFWarningExtR(tif, module, |
6803 | 0 | "incorrect count for field \"%s\", expected " |
6804 | 0 | "%d, got %" PRIu64, |
6805 | 0 | fip->field_name, (int)fip->field_readcount, |
6806 | 0 | dp->tdir_count); |
6807 | 0 | return (0); |
6808 | 0 | } |
6809 | 0 | else |
6810 | 0 | { |
6811 | 0 | err = TIFFReadDirEntryLongArray(tif, dp, &data); |
6812 | 0 | if (err == TIFFReadDirEntryErrOk) |
6813 | 0 | { |
6814 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6815 | 0 | { |
6816 | 0 | if (data != 0) |
6817 | 0 | _TIFFfreeExt(tif, data); |
6818 | 0 | return 0; |
6819 | 0 | } |
6820 | 0 | int m; |
6821 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6822 | 0 | if (data != 0) |
6823 | 0 | _TIFFfreeExt(tif, data); |
6824 | 0 | if (!m) |
6825 | 0 | return (0); |
6826 | 0 | } |
6827 | 0 | } |
6828 | 0 | } |
6829 | 0 | break; |
6830 | 0 | case TIFF_SETGET_C0_SINT32: |
6831 | 0 | { |
6832 | 0 | int32_t *data; |
6833 | 0 | assert(fip->field_readcount >= 1); |
6834 | 0 | assert(fip->field_passcount == 0); |
6835 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6836 | 0 | { |
6837 | 0 | TIFFWarningExtR(tif, module, |
6838 | 0 | "incorrect count for field \"%s\", expected " |
6839 | 0 | "%d, got %" PRIu64, |
6840 | 0 | fip->field_name, (int)fip->field_readcount, |
6841 | 0 | dp->tdir_count); |
6842 | 0 | return (0); |
6843 | 0 | } |
6844 | 0 | else |
6845 | 0 | { |
6846 | 0 | err = TIFFReadDirEntrySlongArray(tif, dp, &data); |
6847 | 0 | if (err == TIFFReadDirEntryErrOk) |
6848 | 0 | { |
6849 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6850 | 0 | { |
6851 | 0 | if (data != 0) |
6852 | 0 | _TIFFfreeExt(tif, data); |
6853 | 0 | return 0; |
6854 | 0 | } |
6855 | 0 | int m; |
6856 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6857 | 0 | if (data != 0) |
6858 | 0 | _TIFFfreeExt(tif, data); |
6859 | 0 | if (!m) |
6860 | 0 | return (0); |
6861 | 0 | } |
6862 | 0 | } |
6863 | 0 | } |
6864 | 0 | break; |
6865 | 0 | case TIFF_SETGET_C0_UINT64: |
6866 | 0 | { |
6867 | 0 | uint64_t *data; |
6868 | 0 | assert(fip->field_readcount >= 1); |
6869 | 0 | assert(fip->field_passcount == 0); |
6870 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6871 | 0 | { |
6872 | 0 | TIFFWarningExtR(tif, module, |
6873 | 0 | "incorrect count for field \"%s\", expected " |
6874 | 0 | "%d, got %" PRIu64, |
6875 | 0 | fip->field_name, (int)fip->field_readcount, |
6876 | 0 | dp->tdir_count); |
6877 | 0 | return (0); |
6878 | 0 | } |
6879 | 0 | else |
6880 | 0 | { |
6881 | 0 | err = TIFFReadDirEntryLong8Array(tif, dp, &data); |
6882 | 0 | if (err == TIFFReadDirEntryErrOk) |
6883 | 0 | { |
6884 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6885 | 0 | { |
6886 | 0 | if (data != 0) |
6887 | 0 | _TIFFfreeExt(tif, data); |
6888 | 0 | return 0; |
6889 | 0 | } |
6890 | 0 | int m; |
6891 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6892 | 0 | if (data != 0) |
6893 | 0 | _TIFFfreeExt(tif, data); |
6894 | 0 | if (!m) |
6895 | 0 | return (0); |
6896 | 0 | } |
6897 | 0 | } |
6898 | 0 | } |
6899 | 0 | break; |
6900 | 0 | case TIFF_SETGET_C0_SINT64: |
6901 | 0 | { |
6902 | 0 | int64_t *data; |
6903 | 0 | assert(fip->field_readcount >= 1); |
6904 | 0 | assert(fip->field_passcount == 0); |
6905 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6906 | 0 | { |
6907 | 0 | TIFFWarningExtR(tif, module, |
6908 | 0 | "incorrect count for field \"%s\", expected " |
6909 | 0 | "%d, got %" PRIu64, |
6910 | 0 | fip->field_name, (int)fip->field_readcount, |
6911 | 0 | dp->tdir_count); |
6912 | 0 | return (0); |
6913 | 0 | } |
6914 | 0 | else |
6915 | 0 | { |
6916 | 0 | err = TIFFReadDirEntrySlong8Array(tif, dp, &data); |
6917 | 0 | if (err == TIFFReadDirEntryErrOk) |
6918 | 0 | { |
6919 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6920 | 0 | { |
6921 | 0 | if (data != 0) |
6922 | 0 | _TIFFfreeExt(tif, data); |
6923 | 0 | return 0; |
6924 | 0 | } |
6925 | 0 | int m; |
6926 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6927 | 0 | if (data != 0) |
6928 | 0 | _TIFFfreeExt(tif, data); |
6929 | 0 | if (!m) |
6930 | 0 | return (0); |
6931 | 0 | } |
6932 | 0 | } |
6933 | 0 | } |
6934 | 0 | break; |
6935 | 0 | case TIFF_SETGET_C0_FLOAT: |
6936 | 0 | { |
6937 | 0 | float *data; |
6938 | 0 | assert(fip->field_readcount >= 1); |
6939 | 0 | assert(fip->field_passcount == 0); |
6940 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6941 | 0 | { |
6942 | 0 | TIFFWarningExtR(tif, module, |
6943 | 0 | "incorrect count for field \"%s\", expected " |
6944 | 0 | "%d, got %" PRIu64, |
6945 | 0 | fip->field_name, (int)fip->field_readcount, |
6946 | 0 | dp->tdir_count); |
6947 | 0 | return (0); |
6948 | 0 | } |
6949 | 0 | else |
6950 | 0 | { |
6951 | 0 | err = TIFFReadDirEntryFloatArray(tif, dp, &data); |
6952 | 0 | if (err == TIFFReadDirEntryErrOk) |
6953 | 0 | { |
6954 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6955 | 0 | { |
6956 | 0 | if (data != 0) |
6957 | 0 | _TIFFfreeExt(tif, data); |
6958 | 0 | return 0; |
6959 | 0 | } |
6960 | 0 | int m; |
6961 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6962 | 0 | if (data != 0) |
6963 | 0 | _TIFFfreeExt(tif, data); |
6964 | 0 | if (!m) |
6965 | 0 | return (0); |
6966 | 0 | } |
6967 | 0 | } |
6968 | 0 | } |
6969 | 0 | break; |
6970 | | /*--: Rational2Double: Extend for Double Arrays and Rational-Arrays read |
6971 | | * into Double-Arrays. */ |
6972 | 0 | case TIFF_SETGET_C0_DOUBLE: |
6973 | 0 | { |
6974 | 0 | double *data; |
6975 | 0 | assert(fip->field_readcount >= 1); |
6976 | 0 | assert(fip->field_passcount == 0); |
6977 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
6978 | 0 | { |
6979 | 0 | TIFFWarningExtR(tif, module, |
6980 | 0 | "incorrect count for field \"%s\", expected " |
6981 | 0 | "%d, got %" PRIu64, |
6982 | 0 | fip->field_name, (int)fip->field_readcount, |
6983 | 0 | dp->tdir_count); |
6984 | 0 | return (0); |
6985 | 0 | } |
6986 | 0 | else |
6987 | 0 | { |
6988 | 0 | err = TIFFReadDirEntryDoubleArray(tif, dp, &data); |
6989 | 0 | if (err == TIFFReadDirEntryErrOk) |
6990 | 0 | { |
6991 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
6992 | 0 | { |
6993 | 0 | if (data != 0) |
6994 | 0 | _TIFFfreeExt(tif, data); |
6995 | 0 | return 0; |
6996 | 0 | } |
6997 | 0 | int m; |
6998 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
6999 | 0 | if (data != 0) |
7000 | 0 | _TIFFfreeExt(tif, data); |
7001 | 0 | if (!m) |
7002 | 0 | return (0); |
7003 | 0 | } |
7004 | 0 | } |
7005 | 0 | } |
7006 | 0 | break; |
7007 | 0 | case TIFF_SETGET_C0_IFD8: |
7008 | 0 | { |
7009 | 0 | uint64_t *data; |
7010 | 0 | assert(fip->field_readcount >= 1); |
7011 | 0 | assert(fip->field_passcount == 0); |
7012 | 0 | if (dp->tdir_count != (uint64_t)fip->field_readcount) |
7013 | 0 | { |
7014 | 0 | TIFFWarningExtR(tif, module, |
7015 | 0 | "incorrect count for field \"%s\", expected " |
7016 | 0 | "%d, got %" PRIu64, |
7017 | 0 | fip->field_name, (int)fip->field_readcount, |
7018 | 0 | dp->tdir_count); |
7019 | 0 | return (0); |
7020 | 0 | } |
7021 | 0 | else |
7022 | 0 | { |
7023 | 0 | err = TIFFReadDirEntryIfd8Array(tif, dp, &data); |
7024 | 0 | if (err == TIFFReadDirEntryErrOk) |
7025 | 0 | { |
7026 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7027 | 0 | { |
7028 | 0 | if (data != 0) |
7029 | 0 | _TIFFfreeExt(tif, data); |
7030 | 0 | return 0; |
7031 | 0 | } |
7032 | 0 | int m; |
7033 | 0 | m = TIFFSetField(tif, dp->tdir_tag, data); |
7034 | 0 | if (data != 0) |
7035 | 0 | _TIFFfreeExt(tif, data); |
7036 | 0 | if (!m) |
7037 | 0 | return (0); |
7038 | 0 | } |
7039 | 0 | } |
7040 | 0 | } |
7041 | 0 | break; |
7042 | 0 | case TIFF_SETGET_C16_ASCII: |
7043 | 0 | { |
7044 | 0 | uint8_t *data; |
7045 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7046 | 0 | assert(fip->field_passcount == 1); |
7047 | 0 | if (dp->tdir_count > 0xFFFF) |
7048 | 0 | err = TIFFReadDirEntryErrCount; |
7049 | 0 | else |
7050 | 0 | { |
7051 | 0 | err = TIFFReadDirEntryByteArray(tif, dp, &data); |
7052 | 0 | if (err == TIFFReadDirEntryErrOk) |
7053 | 0 | { |
7054 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7055 | 0 | { |
7056 | 0 | if (data != 0) |
7057 | 0 | _TIFFfreeExt(tif, data); |
7058 | 0 | return 0; |
7059 | 0 | } |
7060 | 0 | int m; |
7061 | 0 | if (data != 0 && dp->tdir_count > 0 && |
7062 | 0 | data[dp->tdir_count - 1] != '\0') |
7063 | 0 | { |
7064 | 0 | TIFFWarningExtR(tif, module, |
7065 | 0 | "ASCII value for ASCII array tag " |
7066 | 0 | "\"%s\" does not end in null " |
7067 | 0 | "byte. Forcing it to be null", |
7068 | 0 | fip->field_name); |
7069 | | /* Enlarge buffer and add terminating null. */ |
7070 | 0 | uint8_t *o = (uint8_t *)_TIFFmallocExt( |
7071 | 0 | tif, (uint32_t)dp->tdir_count + 1); |
7072 | 0 | if (o == NULL) |
7073 | 0 | { |
7074 | 0 | if (data != NULL) |
7075 | 0 | _TIFFfreeExt(tif, data); |
7076 | 0 | return (0); |
7077 | 0 | } |
7078 | 0 | if (dp->tdir_count > 0) |
7079 | 0 | { |
7080 | 0 | _TIFFmemcpy(o, data, (uint32_t)dp->tdir_count); |
7081 | 0 | } |
7082 | 0 | o[(uint32_t)dp->tdir_count] = 0; |
7083 | 0 | dp->tdir_count++; /* Increment for added null. */ |
7084 | 0 | if (data != 0) |
7085 | 0 | _TIFFfreeExt(tif, data); |
7086 | 0 | data = o; |
7087 | 0 | } |
7088 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7089 | 0 | (uint16_t)(dp->tdir_count), data); |
7090 | 0 | if (data != 0) |
7091 | 0 | _TIFFfreeExt(tif, data); |
7092 | 0 | if (!m) |
7093 | 0 | return (0); |
7094 | 0 | } |
7095 | 0 | } |
7096 | 0 | } |
7097 | 0 | break; |
7098 | 0 | case TIFF_SETGET_C16_UINT8: |
7099 | 0 | { |
7100 | 0 | uint8_t *data; |
7101 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7102 | 0 | assert(fip->field_passcount == 1); |
7103 | 0 | if (dp->tdir_count > 0xFFFF) |
7104 | 0 | err = TIFFReadDirEntryErrCount; |
7105 | 0 | else |
7106 | 0 | { |
7107 | 0 | err = TIFFReadDirEntryByteArray(tif, dp, &data); |
7108 | 0 | if (err == TIFFReadDirEntryErrOk) |
7109 | 0 | { |
7110 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7111 | 0 | { |
7112 | 0 | if (data != 0) |
7113 | 0 | _TIFFfreeExt(tif, data); |
7114 | 0 | return 0; |
7115 | 0 | } |
7116 | 0 | int m; |
7117 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7118 | 0 | (uint16_t)(dp->tdir_count), data); |
7119 | 0 | if (data != 0) |
7120 | 0 | _TIFFfreeExt(tif, data); |
7121 | 0 | if (!m) |
7122 | 0 | return (0); |
7123 | 0 | } |
7124 | 0 | } |
7125 | 0 | } |
7126 | 0 | break; |
7127 | 0 | case TIFF_SETGET_C16_SINT8: |
7128 | 0 | { |
7129 | 0 | int8_t *data; |
7130 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7131 | 0 | assert(fip->field_passcount == 1); |
7132 | 0 | if (dp->tdir_count > 0xFFFF) |
7133 | 0 | err = TIFFReadDirEntryErrCount; |
7134 | 0 | else |
7135 | 0 | { |
7136 | 0 | err = TIFFReadDirEntrySbyteArray(tif, dp, &data); |
7137 | 0 | if (err == TIFFReadDirEntryErrOk) |
7138 | 0 | { |
7139 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7140 | 0 | { |
7141 | 0 | if (data != 0) |
7142 | 0 | _TIFFfreeExt(tif, data); |
7143 | 0 | return 0; |
7144 | 0 | } |
7145 | 0 | int m; |
7146 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7147 | 0 | (uint16_t)(dp->tdir_count), data); |
7148 | 0 | if (data != 0) |
7149 | 0 | _TIFFfreeExt(tif, data); |
7150 | 0 | if (!m) |
7151 | 0 | return (0); |
7152 | 0 | } |
7153 | 0 | } |
7154 | 0 | } |
7155 | 0 | break; |
7156 | 0 | case TIFF_SETGET_C16_UINT16: |
7157 | 0 | { |
7158 | 0 | uint16_t *data; |
7159 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7160 | 0 | assert(fip->field_passcount == 1); |
7161 | 0 | if (dp->tdir_count > 0xFFFF) |
7162 | 0 | err = TIFFReadDirEntryErrCount; |
7163 | 0 | else |
7164 | 0 | { |
7165 | 0 | err = TIFFReadDirEntryShortArray(tif, dp, &data); |
7166 | 0 | if (err == TIFFReadDirEntryErrOk) |
7167 | 0 | { |
7168 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7169 | 0 | { |
7170 | 0 | if (data != 0) |
7171 | 0 | _TIFFfreeExt(tif, data); |
7172 | 0 | return 0; |
7173 | 0 | } |
7174 | 0 | int m; |
7175 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7176 | 0 | (uint16_t)(dp->tdir_count), data); |
7177 | 0 | if (data != 0) |
7178 | 0 | _TIFFfreeExt(tif, data); |
7179 | 0 | if (!m) |
7180 | 0 | return (0); |
7181 | 0 | } |
7182 | 0 | } |
7183 | 0 | } |
7184 | 0 | break; |
7185 | 0 | case TIFF_SETGET_C16_SINT16: |
7186 | 0 | { |
7187 | 0 | int16_t *data; |
7188 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7189 | 0 | assert(fip->field_passcount == 1); |
7190 | 0 | if (dp->tdir_count > 0xFFFF) |
7191 | 0 | err = TIFFReadDirEntryErrCount; |
7192 | 0 | else |
7193 | 0 | { |
7194 | 0 | err = TIFFReadDirEntrySshortArray(tif, dp, &data); |
7195 | 0 | if (err == TIFFReadDirEntryErrOk) |
7196 | 0 | { |
7197 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7198 | 0 | { |
7199 | 0 | if (data != 0) |
7200 | 0 | _TIFFfreeExt(tif, data); |
7201 | 0 | return 0; |
7202 | 0 | } |
7203 | 0 | int m; |
7204 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7205 | 0 | (uint16_t)(dp->tdir_count), data); |
7206 | 0 | if (data != 0) |
7207 | 0 | _TIFFfreeExt(tif, data); |
7208 | 0 | if (!m) |
7209 | 0 | return (0); |
7210 | 0 | } |
7211 | 0 | } |
7212 | 0 | } |
7213 | 0 | break; |
7214 | 0 | case TIFF_SETGET_C16_UINT32: |
7215 | 0 | { |
7216 | 0 | uint32_t *data; |
7217 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7218 | 0 | assert(fip->field_passcount == 1); |
7219 | 0 | if (dp->tdir_count > 0xFFFF) |
7220 | 0 | err = TIFFReadDirEntryErrCount; |
7221 | 0 | else |
7222 | 0 | { |
7223 | 0 | err = TIFFReadDirEntryLongArray(tif, dp, &data); |
7224 | 0 | if (err == TIFFReadDirEntryErrOk) |
7225 | 0 | { |
7226 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7227 | 0 | { |
7228 | 0 | if (data != 0) |
7229 | 0 | _TIFFfreeExt(tif, data); |
7230 | 0 | return 0; |
7231 | 0 | } |
7232 | 0 | int m; |
7233 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7234 | 0 | (uint16_t)(dp->tdir_count), data); |
7235 | 0 | if (data != 0) |
7236 | 0 | _TIFFfreeExt(tif, data); |
7237 | 0 | if (!m) |
7238 | 0 | return (0); |
7239 | 0 | } |
7240 | 0 | } |
7241 | 0 | } |
7242 | 0 | break; |
7243 | 0 | case TIFF_SETGET_C16_SINT32: |
7244 | 0 | { |
7245 | 0 | int32_t *data; |
7246 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7247 | 0 | assert(fip->field_passcount == 1); |
7248 | 0 | if (dp->tdir_count > 0xFFFF) |
7249 | 0 | err = TIFFReadDirEntryErrCount; |
7250 | 0 | else |
7251 | 0 | { |
7252 | 0 | err = TIFFReadDirEntrySlongArray(tif, dp, &data); |
7253 | 0 | if (err == TIFFReadDirEntryErrOk) |
7254 | 0 | { |
7255 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7256 | 0 | { |
7257 | 0 | if (data != 0) |
7258 | 0 | _TIFFfreeExt(tif, data); |
7259 | 0 | return 0; |
7260 | 0 | } |
7261 | 0 | int m; |
7262 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7263 | 0 | (uint16_t)(dp->tdir_count), data); |
7264 | 0 | if (data != 0) |
7265 | 0 | _TIFFfreeExt(tif, data); |
7266 | 0 | if (!m) |
7267 | 0 | return (0); |
7268 | 0 | } |
7269 | 0 | } |
7270 | 0 | } |
7271 | 0 | break; |
7272 | 0 | case TIFF_SETGET_C16_UINT64: |
7273 | 0 | { |
7274 | 0 | uint64_t *data; |
7275 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7276 | 0 | assert(fip->field_passcount == 1); |
7277 | 0 | if (dp->tdir_count > 0xFFFF) |
7278 | 0 | err = TIFFReadDirEntryErrCount; |
7279 | 0 | else |
7280 | 0 | { |
7281 | 0 | err = TIFFReadDirEntryLong8Array(tif, dp, &data); |
7282 | 0 | if (err == TIFFReadDirEntryErrOk) |
7283 | 0 | { |
7284 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7285 | 0 | { |
7286 | 0 | if (data != 0) |
7287 | 0 | _TIFFfreeExt(tif, data); |
7288 | 0 | return 0; |
7289 | 0 | } |
7290 | 0 | int m; |
7291 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7292 | 0 | (uint16_t)(dp->tdir_count), data); |
7293 | 0 | if (data != 0) |
7294 | 0 | _TIFFfreeExt(tif, data); |
7295 | 0 | if (!m) |
7296 | 0 | return (0); |
7297 | 0 | } |
7298 | 0 | } |
7299 | 0 | } |
7300 | 0 | break; |
7301 | 0 | case TIFF_SETGET_C16_SINT64: |
7302 | 0 | { |
7303 | 0 | int64_t *data; |
7304 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7305 | 0 | assert(fip->field_passcount == 1); |
7306 | 0 | if (dp->tdir_count > 0xFFFF) |
7307 | 0 | err = TIFFReadDirEntryErrCount; |
7308 | 0 | else |
7309 | 0 | { |
7310 | 0 | err = TIFFReadDirEntrySlong8Array(tif, dp, &data); |
7311 | 0 | if (err == TIFFReadDirEntryErrOk) |
7312 | 0 | { |
7313 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7314 | 0 | { |
7315 | 0 | if (data != 0) |
7316 | 0 | _TIFFfreeExt(tif, data); |
7317 | 0 | return 0; |
7318 | 0 | } |
7319 | 0 | int m; |
7320 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7321 | 0 | (uint16_t)(dp->tdir_count), data); |
7322 | 0 | if (data != 0) |
7323 | 0 | _TIFFfreeExt(tif, data); |
7324 | 0 | if (!m) |
7325 | 0 | return (0); |
7326 | 0 | } |
7327 | 0 | } |
7328 | 0 | } |
7329 | 0 | break; |
7330 | 0 | case TIFF_SETGET_C16_FLOAT: |
7331 | 0 | { |
7332 | 0 | float *data; |
7333 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7334 | 0 | assert(fip->field_passcount == 1); |
7335 | 0 | if (dp->tdir_count > 0xFFFF) |
7336 | 0 | err = TIFFReadDirEntryErrCount; |
7337 | 0 | else |
7338 | 0 | { |
7339 | 0 | err = TIFFReadDirEntryFloatArray(tif, dp, &data); |
7340 | 0 | if (err == TIFFReadDirEntryErrOk) |
7341 | 0 | { |
7342 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7343 | 0 | { |
7344 | 0 | if (data != 0) |
7345 | 0 | _TIFFfreeExt(tif, data); |
7346 | 0 | return 0; |
7347 | 0 | } |
7348 | 0 | int m; |
7349 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7350 | 0 | (uint16_t)(dp->tdir_count), data); |
7351 | 0 | if (data != 0) |
7352 | 0 | _TIFFfreeExt(tif, data); |
7353 | 0 | if (!m) |
7354 | 0 | return (0); |
7355 | 0 | } |
7356 | 0 | } |
7357 | 0 | } |
7358 | 0 | break; |
7359 | 0 | case TIFF_SETGET_C16_DOUBLE: |
7360 | 0 | { |
7361 | 0 | double *data; |
7362 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7363 | 0 | assert(fip->field_passcount == 1); |
7364 | 0 | if (dp->tdir_count > 0xFFFF) |
7365 | 0 | err = TIFFReadDirEntryErrCount; |
7366 | 0 | else |
7367 | 0 | { |
7368 | 0 | err = TIFFReadDirEntryDoubleArray(tif, dp, &data); |
7369 | 0 | if (err == TIFFReadDirEntryErrOk) |
7370 | 0 | { |
7371 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7372 | 0 | { |
7373 | 0 | if (data != 0) |
7374 | 0 | _TIFFfreeExt(tif, data); |
7375 | 0 | return 0; |
7376 | 0 | } |
7377 | 0 | int m; |
7378 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7379 | 0 | (uint16_t)(dp->tdir_count), data); |
7380 | 0 | if (data != 0) |
7381 | 0 | _TIFFfreeExt(tif, data); |
7382 | 0 | if (!m) |
7383 | 0 | return (0); |
7384 | 0 | } |
7385 | 0 | } |
7386 | 0 | } |
7387 | 0 | break; |
7388 | 0 | case TIFF_SETGET_C16_IFD8: |
7389 | 0 | { |
7390 | 0 | uint64_t *data; |
7391 | 0 | assert(fip->field_readcount == TIFF_VARIABLE); |
7392 | 0 | assert(fip->field_passcount == 1); |
7393 | 0 | if (dp->tdir_count > 0xFFFF) |
7394 | 0 | err = TIFFReadDirEntryErrCount; |
7395 | 0 | else |
7396 | 0 | { |
7397 | 0 | err = TIFFReadDirEntryIfd8Array(tif, dp, &data); |
7398 | 0 | if (err == TIFFReadDirEntryErrOk) |
7399 | 0 | { |
7400 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7401 | 0 | { |
7402 | 0 | if (data != 0) |
7403 | 0 | _TIFFfreeExt(tif, data); |
7404 | 0 | return 0; |
7405 | 0 | } |
7406 | 0 | int m; |
7407 | 0 | m = TIFFSetField(tif, dp->tdir_tag, |
7408 | 0 | (uint16_t)(dp->tdir_count), data); |
7409 | 0 | if (data != 0) |
7410 | 0 | _TIFFfreeExt(tif, data); |
7411 | 0 | if (!m) |
7412 | 0 | return (0); |
7413 | 0 | } |
7414 | 0 | } |
7415 | 0 | } |
7416 | 0 | break; |
7417 | 0 | case TIFF_SETGET_C32_ASCII: |
7418 | 0 | { |
7419 | 0 | uint8_t *data; |
7420 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7421 | 0 | assert(fip->field_passcount == 1); |
7422 | 0 | err = TIFFReadDirEntryByteArray(tif, dp, &data); |
7423 | 0 | if (err == TIFFReadDirEntryErrOk) |
7424 | 0 | { |
7425 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7426 | 0 | { |
7427 | 0 | if (data != 0) |
7428 | 0 | _TIFFfreeExt(tif, data); |
7429 | 0 | return 0; |
7430 | 0 | } |
7431 | 0 | int m; |
7432 | 0 | if (data != 0 && dp->tdir_count > 0 && |
7433 | 0 | data[dp->tdir_count - 1] != '\0') |
7434 | 0 | { |
7435 | 0 | TIFFWarningExtR( |
7436 | 0 | tif, module, |
7437 | 0 | "ASCII value for ASCII array tag \"%s\" does not end " |
7438 | 0 | "in null byte. Forcing it to be null", |
7439 | 0 | fip->field_name); |
7440 | | /* Enlarge buffer and add terminating null. */ |
7441 | 0 | uint8_t *o = (uint8_t *)_TIFFmallocExt( |
7442 | 0 | tif, (uint32_t)dp->tdir_count + 1); |
7443 | 0 | if (o == NULL) |
7444 | 0 | { |
7445 | 0 | if (data != NULL) |
7446 | 0 | _TIFFfreeExt(tif, data); |
7447 | 0 | return (0); |
7448 | 0 | } |
7449 | 0 | if (dp->tdir_count > 0) |
7450 | 0 | { |
7451 | 0 | _TIFFmemcpy(o, data, (uint32_t)dp->tdir_count); |
7452 | 0 | } |
7453 | 0 | o[(uint32_t)dp->tdir_count] = 0; |
7454 | 0 | dp->tdir_count++; /* Increment for added null. */ |
7455 | 0 | if (data != 0) |
7456 | 0 | _TIFFfreeExt(tif, data); |
7457 | 0 | data = o; |
7458 | 0 | } |
7459 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7460 | 0 | data); |
7461 | 0 | if (data != 0) |
7462 | 0 | _TIFFfreeExt(tif, data); |
7463 | 0 | if (!m) |
7464 | 0 | return (0); |
7465 | 0 | } |
7466 | 0 | } |
7467 | 0 | break; |
7468 | 0 | case TIFF_SETGET_C32_UINT8: |
7469 | 0 | { |
7470 | 0 | uint8_t *data; |
7471 | 0 | uint32_t count = 0; |
7472 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7473 | 0 | assert(fip->field_passcount == 1); |
7474 | 0 | if (fip->field_tag == TIFFTAG_RICHTIFFIPTC && |
7475 | 0 | dp->tdir_type == TIFF_LONG) |
7476 | 0 | { |
7477 | | /* Adobe's software (wrongly) writes RichTIFFIPTC tag with |
7478 | | * data type LONG instead of UNDEFINED. Work around this |
7479 | | * frequently found issue */ |
7480 | 0 | void *origdata; |
7481 | 0 | err = TIFFReadDirEntryArray(tif, dp, &count, 4, &origdata); |
7482 | 0 | if ((err != TIFFReadDirEntryErrOk) || (origdata == 0)) |
7483 | 0 | { |
7484 | 0 | data = NULL; |
7485 | 0 | } |
7486 | 0 | else |
7487 | 0 | { |
7488 | 0 | if (tif->tif_flags & TIFF_SWAB) |
7489 | 0 | TIFFSwabArrayOfLong((uint32_t *)origdata, count); |
7490 | 0 | data = (uint8_t *)origdata; |
7491 | 0 | count = (uint32_t)(count * 4); |
7492 | 0 | } |
7493 | 0 | } |
7494 | 0 | else |
7495 | 0 | { |
7496 | 0 | err = TIFFReadDirEntryByteArray(tif, dp, &data); |
7497 | 0 | count = (uint32_t)(dp->tdir_count); |
7498 | 0 | } |
7499 | 0 | if (err == TIFFReadDirEntryErrOk) |
7500 | 0 | { |
7501 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7502 | 0 | { |
7503 | 0 | if (data != 0) |
7504 | 0 | _TIFFfreeExt(tif, data); |
7505 | 0 | return 0; |
7506 | 0 | } |
7507 | 0 | int m; |
7508 | 0 | m = TIFFSetField(tif, dp->tdir_tag, count, data); |
7509 | 0 | if (data != 0) |
7510 | 0 | _TIFFfreeExt(tif, data); |
7511 | 0 | if (!m) |
7512 | 0 | return (0); |
7513 | 0 | } |
7514 | 0 | } |
7515 | 0 | break; |
7516 | 0 | case TIFF_SETGET_C32_SINT8: |
7517 | 0 | { |
7518 | 0 | int8_t *data = NULL; |
7519 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7520 | 0 | assert(fip->field_passcount == 1); |
7521 | 0 | err = TIFFReadDirEntrySbyteArray(tif, dp, &data); |
7522 | 0 | if (err == TIFFReadDirEntryErrOk) |
7523 | 0 | { |
7524 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7525 | 0 | { |
7526 | 0 | if (data != 0) |
7527 | 0 | _TIFFfreeExt(tif, data); |
7528 | 0 | return 0; |
7529 | 0 | } |
7530 | 0 | int m; |
7531 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7532 | 0 | data); |
7533 | 0 | if (data != 0) |
7534 | 0 | _TIFFfreeExt(tif, data); |
7535 | 0 | if (!m) |
7536 | 0 | return (0); |
7537 | 0 | } |
7538 | 0 | } |
7539 | 0 | break; |
7540 | 0 | case TIFF_SETGET_C32_UINT16: |
7541 | 0 | { |
7542 | 0 | uint16_t *data; |
7543 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7544 | 0 | assert(fip->field_passcount == 1); |
7545 | 0 | err = TIFFReadDirEntryShortArray(tif, dp, &data); |
7546 | 0 | if (err == TIFFReadDirEntryErrOk) |
7547 | 0 | { |
7548 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7549 | 0 | { |
7550 | 0 | if (data != 0) |
7551 | 0 | _TIFFfreeExt(tif, data); |
7552 | 0 | return 0; |
7553 | 0 | } |
7554 | 0 | int m; |
7555 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7556 | 0 | data); |
7557 | 0 | if (data != 0) |
7558 | 0 | _TIFFfreeExt(tif, data); |
7559 | 0 | if (!m) |
7560 | 0 | return (0); |
7561 | 0 | } |
7562 | 0 | } |
7563 | 0 | break; |
7564 | 0 | case TIFF_SETGET_C32_SINT16: |
7565 | 0 | { |
7566 | 0 | int16_t *data = NULL; |
7567 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7568 | 0 | assert(fip->field_passcount == 1); |
7569 | 0 | err = TIFFReadDirEntrySshortArray(tif, dp, &data); |
7570 | 0 | if (err == TIFFReadDirEntryErrOk) |
7571 | 0 | { |
7572 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7573 | 0 | { |
7574 | 0 | if (data != 0) |
7575 | 0 | _TIFFfreeExt(tif, data); |
7576 | 0 | return 0; |
7577 | 0 | } |
7578 | 0 | int m; |
7579 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7580 | 0 | data); |
7581 | 0 | if (data != 0) |
7582 | 0 | _TIFFfreeExt(tif, data); |
7583 | 0 | if (!m) |
7584 | 0 | return (0); |
7585 | 0 | } |
7586 | 0 | } |
7587 | 0 | break; |
7588 | 0 | case TIFF_SETGET_C32_UINT32: |
7589 | 0 | { |
7590 | 0 | uint32_t *data; |
7591 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7592 | 0 | assert(fip->field_passcount == 1); |
7593 | 0 | err = TIFFReadDirEntryLongArray(tif, dp, &data); |
7594 | 0 | if (err == TIFFReadDirEntryErrOk) |
7595 | 0 | { |
7596 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7597 | 0 | { |
7598 | 0 | if (data != 0) |
7599 | 0 | _TIFFfreeExt(tif, data); |
7600 | 0 | return 0; |
7601 | 0 | } |
7602 | 0 | int m; |
7603 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7604 | 0 | data); |
7605 | 0 | if (data != 0) |
7606 | 0 | _TIFFfreeExt(tif, data); |
7607 | 0 | if (!m) |
7608 | 0 | return (0); |
7609 | 0 | } |
7610 | 0 | } |
7611 | 0 | break; |
7612 | 0 | case TIFF_SETGET_C32_SINT32: |
7613 | 0 | { |
7614 | 0 | int32_t *data = NULL; |
7615 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7616 | 0 | assert(fip->field_passcount == 1); |
7617 | 0 | err = TIFFReadDirEntrySlongArray(tif, dp, &data); |
7618 | 0 | if (err == TIFFReadDirEntryErrOk) |
7619 | 0 | { |
7620 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7621 | 0 | { |
7622 | 0 | if (data != 0) |
7623 | 0 | _TIFFfreeExt(tif, data); |
7624 | 0 | return 0; |
7625 | 0 | } |
7626 | 0 | int m; |
7627 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7628 | 0 | data); |
7629 | 0 | if (data != 0) |
7630 | 0 | _TIFFfreeExt(tif, data); |
7631 | 0 | if (!m) |
7632 | 0 | return (0); |
7633 | 0 | } |
7634 | 0 | } |
7635 | 0 | break; |
7636 | 0 | case TIFF_SETGET_C32_UINT64: |
7637 | 0 | { |
7638 | 0 | uint64_t *data; |
7639 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7640 | 0 | assert(fip->field_passcount == 1); |
7641 | 0 | err = TIFFReadDirEntryLong8Array(tif, dp, &data); |
7642 | 0 | if (err == TIFFReadDirEntryErrOk) |
7643 | 0 | { |
7644 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7645 | 0 | { |
7646 | 0 | if (data != 0) |
7647 | 0 | _TIFFfreeExt(tif, data); |
7648 | 0 | return 0; |
7649 | 0 | } |
7650 | 0 | int m; |
7651 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7652 | 0 | data); |
7653 | 0 | if (data != 0) |
7654 | 0 | _TIFFfreeExt(tif, data); |
7655 | 0 | if (!m) |
7656 | 0 | return (0); |
7657 | 0 | } |
7658 | 0 | } |
7659 | 0 | break; |
7660 | 0 | case TIFF_SETGET_C32_SINT64: |
7661 | 0 | { |
7662 | 0 | int64_t *data = NULL; |
7663 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7664 | 0 | assert(fip->field_passcount == 1); |
7665 | 0 | err = TIFFReadDirEntrySlong8Array(tif, dp, &data); |
7666 | 0 | if (err == TIFFReadDirEntryErrOk) |
7667 | 0 | { |
7668 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7669 | 0 | { |
7670 | 0 | if (data != 0) |
7671 | 0 | _TIFFfreeExt(tif, data); |
7672 | 0 | return 0; |
7673 | 0 | } |
7674 | 0 | int m; |
7675 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7676 | 0 | data); |
7677 | 0 | if (data != 0) |
7678 | 0 | _TIFFfreeExt(tif, data); |
7679 | 0 | if (!m) |
7680 | 0 | return (0); |
7681 | 0 | } |
7682 | 0 | } |
7683 | 0 | break; |
7684 | 0 | case TIFF_SETGET_C32_FLOAT: |
7685 | 0 | { |
7686 | 0 | float *data; |
7687 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7688 | 0 | assert(fip->field_passcount == 1); |
7689 | 0 | err = TIFFReadDirEntryFloatArray(tif, dp, &data); |
7690 | 0 | if (err == TIFFReadDirEntryErrOk) |
7691 | 0 | { |
7692 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7693 | 0 | { |
7694 | 0 | if (data != 0) |
7695 | 0 | _TIFFfreeExt(tif, data); |
7696 | 0 | return 0; |
7697 | 0 | } |
7698 | 0 | int m; |
7699 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7700 | 0 | data); |
7701 | 0 | if (data != 0) |
7702 | 0 | _TIFFfreeExt(tif, data); |
7703 | 0 | if (!m) |
7704 | 0 | return (0); |
7705 | 0 | } |
7706 | 0 | } |
7707 | 0 | break; |
7708 | 0 | case TIFF_SETGET_C32_DOUBLE: |
7709 | 0 | { |
7710 | 0 | double *data; |
7711 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7712 | 0 | assert(fip->field_passcount == 1); |
7713 | 0 | err = TIFFReadDirEntryDoubleArray(tif, dp, &data); |
7714 | 0 | if (err == TIFFReadDirEntryErrOk) |
7715 | 0 | { |
7716 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7717 | 0 | { |
7718 | 0 | if (data != 0) |
7719 | 0 | _TIFFfreeExt(tif, data); |
7720 | 0 | return 0; |
7721 | 0 | } |
7722 | 0 | int m; |
7723 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7724 | 0 | data); |
7725 | 0 | if (data != 0) |
7726 | 0 | _TIFFfreeExt(tif, data); |
7727 | 0 | if (!m) |
7728 | 0 | return (0); |
7729 | 0 | } |
7730 | 0 | } |
7731 | 0 | break; |
7732 | 0 | case TIFF_SETGET_C32_IFD8: |
7733 | 0 | { |
7734 | 0 | uint64_t *data; |
7735 | 0 | assert(fip->field_readcount == TIFF_VARIABLE2); |
7736 | 0 | assert(fip->field_passcount == 1); |
7737 | 0 | err = TIFFReadDirEntryIfd8Array(tif, dp, &data); |
7738 | 0 | if (err == TIFFReadDirEntryErrOk) |
7739 | 0 | { |
7740 | 0 | if (!EvaluateIFDdatasizeReading(tif, dp)) |
7741 | 0 | { |
7742 | 0 | if (data != 0) |
7743 | 0 | _TIFFfreeExt(tif, data); |
7744 | 0 | return 0; |
7745 | 0 | } |
7746 | 0 | int m; |
7747 | 0 | m = TIFFSetField(tif, dp->tdir_tag, (uint32_t)(dp->tdir_count), |
7748 | 0 | data); |
7749 | 0 | if (data != 0) |
7750 | 0 | _TIFFfreeExt(tif, data); |
7751 | 0 | if (!m) |
7752 | 0 | return (0); |
7753 | 0 | } |
7754 | 0 | } |
7755 | 0 | break; |
7756 | 0 | case TIFF_SETGET_INT: |
7757 | 0 | case TIFF_SETGET_C0_ASCII: |
7758 | 0 | case TIFF_SETGET_OTHER: |
7759 | 0 | assert(0); /* these should not arrive here */ |
7760 | 0 | break; |
7761 | 0 | default: |
7762 | 0 | assert(0); /* we should never get here */ |
7763 | 0 | break; |
7764 | 0 | } |
7765 | 0 | if (err != TIFFReadDirEntryErrOk) |
7766 | 0 | { |
7767 | 0 | TIFFReadDirEntryOutputErr(tif, err, module, fip->field_name, recover); |
7768 | 0 | return (0); |
7769 | 0 | } |
7770 | 0 | return (1); |
7771 | 0 | } |
7772 | | |
7773 | | /* |
7774 | | * Fetch a set of offsets or lengths. |
7775 | | * While this routine says "strips", in fact it's also used for tiles. |
7776 | | */ |
7777 | | static int TIFFFetchStripThing(TIFF *tif, TIFFDirEntry *dir, uint32_t nstrips, |
7778 | | uint64_t **lpp) |
7779 | 0 | { |
7780 | 0 | static const char module[] = "TIFFFetchStripThing"; |
7781 | 0 | enum TIFFReadDirEntryErr err; |
7782 | 0 | uint64_t *data; |
7783 | 0 | err = TIFFReadDirEntryLong8ArrayWithLimit(tif, dir, &data, nstrips); |
7784 | 0 | if (err != TIFFReadDirEntryErrOk) |
7785 | 0 | { |
7786 | 0 | const TIFFField *fip = TIFFFieldWithTag(tif, dir->tdir_tag); |
7787 | 0 | TIFFReadDirEntryOutputErr(tif, err, module, |
7788 | 0 | fip ? fip->field_name : "unknown tagname", 0); |
7789 | 0 | return (0); |
7790 | 0 | } |
7791 | 0 | if (dir->tdir_count < (uint64_t)nstrips) |
7792 | 0 | { |
7793 | 0 | uint64_t *resizeddata; |
7794 | 0 | const TIFFField *fip = TIFFFieldWithTag(tif, dir->tdir_tag); |
7795 | 0 | const char *pszMax = getenv("LIBTIFF_STRILE_ARRAY_MAX_RESIZE_COUNT"); |
7796 | 0 | uint32_t max_nstrips = 1000000; |
7797 | 0 | if (pszMax) |
7798 | 0 | max_nstrips = (uint32_t)atoi(pszMax); |
7799 | 0 | TIFFReadDirEntryOutputErr(tif, TIFFReadDirEntryErrCount, module, |
7800 | 0 | fip ? fip->field_name : "unknown tagname", |
7801 | 0 | (nstrips <= max_nstrips)); |
7802 | |
|
7803 | 0 | if (nstrips > max_nstrips) |
7804 | 0 | { |
7805 | 0 | _TIFFfreeExt(tif, data); |
7806 | 0 | return (0); |
7807 | 0 | } |
7808 | | |
7809 | 0 | const uint64_t allocsize = (uint64_t)nstrips * sizeof(uint64_t); |
7810 | 0 | if (allocsize > 100 * 1024 * 1024) |
7811 | 0 | { |
7812 | | /* Before allocating a huge amount of memory for corrupted files, |
7813 | | * check if size of requested memory is not greater than file size. |
7814 | | */ |
7815 | 0 | const uint64_t filesize = TIFFGetFileSize(tif); |
7816 | 0 | if (allocsize > filesize) |
7817 | 0 | { |
7818 | 0 | TIFFWarningExtR( |
7819 | 0 | tif, module, |
7820 | 0 | "Requested memory size for StripArray of %" PRIu64 |
7821 | 0 | " is greater than filesize %" PRIu64 |
7822 | 0 | ". Memory not allocated", |
7823 | 0 | allocsize, filesize); |
7824 | 0 | _TIFFfreeExt(tif, data); |
7825 | 0 | return (0); |
7826 | 0 | } |
7827 | 0 | } |
7828 | 0 | resizeddata = (uint64_t *)_TIFFCheckMalloc( |
7829 | 0 | tif, nstrips, sizeof(uint64_t), "for strip array"); |
7830 | 0 | if (resizeddata == 0) |
7831 | 0 | { |
7832 | 0 | _TIFFfreeExt(tif, data); |
7833 | 0 | return (0); |
7834 | 0 | } |
7835 | 0 | if (dir->tdir_count) |
7836 | 0 | _TIFFmemcpy(resizeddata, data, |
7837 | 0 | (uint32_t)dir->tdir_count * sizeof(uint64_t)); |
7838 | 0 | _TIFFmemset(resizeddata + (uint32_t)dir->tdir_count, 0, |
7839 | 0 | (nstrips - (uint32_t)dir->tdir_count) * sizeof(uint64_t)); |
7840 | 0 | _TIFFfreeExt(tif, data); |
7841 | 0 | data = resizeddata; |
7842 | 0 | } |
7843 | 0 | *lpp = data; |
7844 | 0 | return (1); |
7845 | 0 | } |
7846 | | |
7847 | | /* |
7848 | | * Fetch and set the SubjectDistance EXIF tag. |
7849 | | */ |
7850 | | static int TIFFFetchSubjectDistance(TIFF *tif, TIFFDirEntry *dir) |
7851 | 0 | { |
7852 | 0 | static const char module[] = "TIFFFetchSubjectDistance"; |
7853 | 0 | enum TIFFReadDirEntryErr err; |
7854 | 0 | UInt64Aligned_t m; |
7855 | 0 | m.l = 0; |
7856 | 0 | assert(sizeof(double) == 8); |
7857 | 0 | assert(sizeof(uint64_t) == 8); |
7858 | 0 | assert(sizeof(uint32_t) == 4); |
7859 | 0 | if (dir->tdir_count != 1) |
7860 | 0 | err = TIFFReadDirEntryErrCount; |
7861 | 0 | else if (dir->tdir_type != TIFF_RATIONAL) |
7862 | 0 | err = TIFFReadDirEntryErrType; |
7863 | 0 | else |
7864 | 0 | { |
7865 | 0 | if (!(tif->tif_flags & TIFF_BIGTIFF)) |
7866 | 0 | { |
7867 | 0 | uint32_t offset; |
7868 | 0 | offset = *(uint32_t *)(&dir->tdir_offset); |
7869 | 0 | if (tif->tif_flags & TIFF_SWAB) |
7870 | 0 | TIFFSwabLong(&offset); |
7871 | 0 | err = TIFFReadDirEntryData(tif, offset, 8, m.i); |
7872 | 0 | } |
7873 | 0 | else |
7874 | 0 | { |
7875 | 0 | m.l = dir->tdir_offset.toff_long8; |
7876 | 0 | err = TIFFReadDirEntryErrOk; |
7877 | 0 | } |
7878 | 0 | } |
7879 | 0 | if (err == TIFFReadDirEntryErrOk) |
7880 | 0 | { |
7881 | 0 | double n; |
7882 | 0 | if (tif->tif_flags & TIFF_SWAB) |
7883 | 0 | TIFFSwabArrayOfLong(m.i, 2); |
7884 | 0 | if (m.i[0] == 0) |
7885 | 0 | n = 0.0; |
7886 | 0 | else if (m.i[0] == 0xFFFFFFFF || m.i[1] == 0) |
7887 | | /* |
7888 | | * XXX: Numerator 0xFFFFFFFF means that we have infinite |
7889 | | * distance. Indicate that with a negative floating point |
7890 | | * SubjectDistance value. |
7891 | | */ |
7892 | 0 | n = -1.0; |
7893 | 0 | else |
7894 | 0 | n = (double)m.i[0] / (double)m.i[1]; |
7895 | 0 | return (TIFFSetField(tif, dir->tdir_tag, n)); |
7896 | 0 | } |
7897 | 0 | else |
7898 | 0 | { |
7899 | 0 | TIFFReadDirEntryOutputErr(tif, err, module, "SubjectDistance", TRUE); |
7900 | 0 | return (0); |
7901 | 0 | } |
7902 | 0 | } |
7903 | | |
7904 | | static void allocChoppedUpStripArrays(TIFF *tif, uint32_t nstrips, |
7905 | | uint64_t stripbytes, |
7906 | | uint32_t rowsperstrip) |
7907 | 0 | { |
7908 | 0 | TIFFDirectory *td = &tif->tif_dir; |
7909 | 0 | uint64_t bytecount; |
7910 | 0 | uint64_t offset; |
7911 | 0 | uint64_t last_offset; |
7912 | 0 | uint64_t last_bytecount; |
7913 | 0 | uint32_t i; |
7914 | 0 | uint64_t *newcounts; |
7915 | 0 | uint64_t *newoffsets; |
7916 | |
|
7917 | 0 | offset = TIFFGetStrileOffset(tif, 0); |
7918 | 0 | last_offset = TIFFGetStrileOffset(tif, td->td_nstrips - 1); |
7919 | 0 | last_bytecount = TIFFGetStrileByteCount(tif, td->td_nstrips - 1); |
7920 | 0 | if (last_offset > UINT64_MAX - last_bytecount || |
7921 | 0 | last_offset + last_bytecount < offset) |
7922 | 0 | { |
7923 | 0 | return; |
7924 | 0 | } |
7925 | 0 | bytecount = last_offset + last_bytecount - offset; |
7926 | | |
7927 | | /* Before allocating a huge amount of memory for corrupted files, check if |
7928 | | * size of StripByteCount and StripOffset tags is not greater than |
7929 | | * file size. |
7930 | | */ |
7931 | 0 | const uint64_t allocsize = (uint64_t)nstrips * sizeof(uint64_t) * 2; |
7932 | 0 | if (allocsize > 100 * 1024 * 1024) |
7933 | 0 | { |
7934 | 0 | const uint64_t filesize = TIFFGetFileSize(tif); |
7935 | 0 | if (allocsize > filesize) |
7936 | 0 | { |
7937 | 0 | TIFFWarningExtR(tif, "allocChoppedUpStripArrays", |
7938 | 0 | "Requested memory size for StripByteCount and " |
7939 | 0 | "StripOffsets %" PRIu64 |
7940 | 0 | " is greater than filesize %" PRIu64 |
7941 | 0 | ". Memory not allocated", |
7942 | 0 | allocsize, filesize); |
7943 | 0 | return; |
7944 | 0 | } |
7945 | 0 | } |
7946 | | |
7947 | 0 | newcounts = |
7948 | 0 | (uint64_t *)_TIFFCheckMalloc(tif, nstrips, sizeof(uint64_t), |
7949 | 0 | "for chopped \"StripByteCounts\" array"); |
7950 | 0 | newoffsets = (uint64_t *)_TIFFCheckMalloc( |
7951 | 0 | tif, nstrips, sizeof(uint64_t), "for chopped \"StripOffsets\" array"); |
7952 | 0 | if (newcounts == NULL || newoffsets == NULL) |
7953 | 0 | { |
7954 | | /* |
7955 | | * Unable to allocate new strip information, give up and use |
7956 | | * the original one strip information. |
7957 | | */ |
7958 | 0 | if (newcounts != NULL) |
7959 | 0 | _TIFFfreeExt(tif, newcounts); |
7960 | 0 | if (newoffsets != NULL) |
7961 | 0 | _TIFFfreeExt(tif, newoffsets); |
7962 | 0 | return; |
7963 | 0 | } |
7964 | | |
7965 | | /* |
7966 | | * Fill the strip information arrays with new bytecounts and offsets |
7967 | | * that reflect the broken-up format. |
7968 | | */ |
7969 | 0 | for (i = 0; i < nstrips; i++) |
7970 | 0 | { |
7971 | 0 | if (stripbytes > bytecount) |
7972 | 0 | stripbytes = bytecount; |
7973 | 0 | newcounts[i] = stripbytes; |
7974 | 0 | newoffsets[i] = stripbytes ? offset : 0; |
7975 | 0 | offset += stripbytes; |
7976 | 0 | bytecount -= stripbytes; |
7977 | 0 | } |
7978 | | |
7979 | | /* |
7980 | | * Replace old single strip info with multi-strip info. |
7981 | | */ |
7982 | 0 | td->td_stripsperimage = td->td_nstrips = nstrips; |
7983 | 0 | TIFFSetField(tif, TIFFTAG_ROWSPERSTRIP, rowsperstrip); |
7984 | |
|
7985 | 0 | _TIFFfreeExt(tif, td->td_stripbytecount_p); |
7986 | 0 | _TIFFfreeExt(tif, td->td_stripoffset_p); |
7987 | 0 | td->td_stripbytecount_p = newcounts; |
7988 | 0 | td->td_stripoffset_p = newoffsets; |
7989 | | #ifdef STRIPBYTECOUNTSORTED_UNUSED |
7990 | | td->td_stripbytecountsorted = 1; |
7991 | | #endif |
7992 | 0 | tif->tif_flags |= TIFF_CHOPPEDUPARRAYS; |
7993 | 0 | } |
7994 | | |
7995 | | /* |
7996 | | * Replace a single strip (tile) of uncompressed data by multiple strips |
7997 | | * (tiles), each approximately STRIP_SIZE_DEFAULT bytes. This is useful for |
7998 | | * dealing with large images or for dealing with machines with a limited |
7999 | | * amount memory. |
8000 | | */ |
8001 | | static void ChopUpSingleUncompressedStrip(TIFF *tif) |
8002 | 0 | { |
8003 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8004 | 0 | uint64_t bytecount; |
8005 | 0 | uint64_t offset; |
8006 | 0 | uint32_t rowblock; |
8007 | 0 | uint64_t rowblockbytes; |
8008 | 0 | uint64_t stripbytes; |
8009 | 0 | uint32_t nstrips; |
8010 | 0 | uint32_t rowsperstrip; |
8011 | |
|
8012 | 0 | bytecount = TIFFGetStrileByteCount(tif, 0); |
8013 | | /* On a newly created file, just re-opened to be filled, we */ |
8014 | | /* don't want strip chop to trigger as it is going to cause issues */ |
8015 | | /* later ( StripOffsets and StripByteCounts improperly filled) . */ |
8016 | 0 | if (bytecount == 0 && tif->tif_mode != O_RDONLY) |
8017 | 0 | return; |
8018 | 0 | offset = TIFFGetStrileByteCount(tif, 0); |
8019 | 0 | assert(td->td_planarconfig == PLANARCONFIG_CONTIG); |
8020 | 0 | if ((td->td_photometric == PHOTOMETRIC_YCBCR) && (!isUpSampled(tif))) |
8021 | 0 | rowblock = td->td_ycbcrsubsampling[1]; |
8022 | 0 | else |
8023 | 0 | rowblock = 1; |
8024 | 0 | rowblockbytes = TIFFVTileSize64(tif, rowblock); |
8025 | | /* |
8026 | | * Make the rows hold at least one scanline, but fill specified amount |
8027 | | * of data if possible. |
8028 | | */ |
8029 | 0 | if (rowblockbytes > STRIP_SIZE_DEFAULT) |
8030 | 0 | { |
8031 | 0 | stripbytes = rowblockbytes; |
8032 | 0 | rowsperstrip = rowblock; |
8033 | 0 | } |
8034 | 0 | else if (rowblockbytes > 0) |
8035 | 0 | { |
8036 | 0 | uint32_t rowblocksperstrip; |
8037 | 0 | rowblocksperstrip = (uint32_t)(STRIP_SIZE_DEFAULT / rowblockbytes); |
8038 | 0 | rowsperstrip = rowblocksperstrip * rowblock; |
8039 | 0 | stripbytes = rowblocksperstrip * rowblockbytes; |
8040 | 0 | } |
8041 | 0 | else |
8042 | 0 | return; |
8043 | | |
8044 | | /* |
8045 | | * never increase the number of rows per strip |
8046 | | */ |
8047 | 0 | if (rowsperstrip >= td->td_rowsperstrip || rowsperstrip == 0) |
8048 | 0 | return; |
8049 | 0 | nstrips = TIFFhowmany_32(td->td_imagelength, rowsperstrip); |
8050 | 0 | if (nstrips == 0) |
8051 | 0 | return; |
8052 | | |
8053 | | /* If we are going to allocate a lot of memory, make sure that the */ |
8054 | | /* file is as big as needed */ |
8055 | 0 | if (tif->tif_mode == O_RDONLY && nstrips > 1000000 && |
8056 | 0 | (offset >= TIFFGetFileSize(tif) || |
8057 | 0 | stripbytes > (TIFFGetFileSize(tif) - offset) / (nstrips - 1))) |
8058 | 0 | { |
8059 | 0 | return; |
8060 | 0 | } |
8061 | | |
8062 | 0 | allocChoppedUpStripArrays(tif, nstrips, stripbytes, rowsperstrip); |
8063 | 0 | } |
8064 | | |
8065 | | /* |
8066 | | * Replace a file with contiguous strips > 2 GB of uncompressed data by |
8067 | | * multiple smaller strips. This is useful for |
8068 | | * dealing with large images or for dealing with machines with a limited |
8069 | | * amount memory. |
8070 | | */ |
8071 | | static void TryChopUpUncompressedBigTiff(TIFF *tif) |
8072 | 0 | { |
8073 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8074 | 0 | uint32_t rowblock; |
8075 | 0 | uint64_t rowblockbytes; |
8076 | 0 | uint32_t i; |
8077 | 0 | uint64_t stripsize; |
8078 | 0 | uint32_t rowblocksperstrip; |
8079 | 0 | uint32_t rowsperstrip; |
8080 | 0 | uint64_t stripbytes; |
8081 | 0 | uint32_t nstrips; |
8082 | |
|
8083 | 0 | stripsize = TIFFStripSize64(tif); |
8084 | |
|
8085 | 0 | assert(tif->tif_dir.td_planarconfig == PLANARCONFIG_CONTIG); |
8086 | 0 | assert(tif->tif_dir.td_compression == COMPRESSION_NONE); |
8087 | 0 | assert((tif->tif_flags & (TIFF_STRIPCHOP | TIFF_ISTILED)) == |
8088 | 0 | TIFF_STRIPCHOP); |
8089 | 0 | assert(stripsize > 0x7FFFFFFFUL); |
8090 | | |
8091 | | /* On a newly created file, just re-opened to be filled, we */ |
8092 | | /* don't want strip chop to trigger as it is going to cause issues */ |
8093 | | /* later ( StripOffsets and StripByteCounts improperly filled) . */ |
8094 | 0 | if (TIFFGetStrileByteCount(tif, 0) == 0 && tif->tif_mode != O_RDONLY) |
8095 | 0 | return; |
8096 | | |
8097 | 0 | if ((td->td_photometric == PHOTOMETRIC_YCBCR) && (!isUpSampled(tif))) |
8098 | 0 | rowblock = td->td_ycbcrsubsampling[1]; |
8099 | 0 | else |
8100 | 0 | rowblock = 1; |
8101 | 0 | rowblockbytes = TIFFVStripSize64(tif, rowblock); |
8102 | 0 | if (rowblockbytes == 0 || rowblockbytes > 0x7FFFFFFFUL) |
8103 | 0 | { |
8104 | | /* In case of file with gigantic width */ |
8105 | 0 | return; |
8106 | 0 | } |
8107 | | |
8108 | | /* Check that the strips are contiguous and of the expected size */ |
8109 | 0 | for (i = 0; i < td->td_nstrips; i++) |
8110 | 0 | { |
8111 | 0 | if (i == td->td_nstrips - 1) |
8112 | 0 | { |
8113 | 0 | if (TIFFGetStrileByteCount(tif, i) < |
8114 | 0 | TIFFVStripSize64(tif, |
8115 | 0 | td->td_imagelength - i * td->td_rowsperstrip)) |
8116 | 0 | { |
8117 | 0 | return; |
8118 | 0 | } |
8119 | 0 | } |
8120 | 0 | else |
8121 | 0 | { |
8122 | 0 | if (TIFFGetStrileByteCount(tif, i) != stripsize) |
8123 | 0 | { |
8124 | 0 | return; |
8125 | 0 | } |
8126 | 0 | if (i > 0 && TIFFGetStrileOffset(tif, i) != |
8127 | 0 | TIFFGetStrileOffset(tif, i - 1) + |
8128 | 0 | TIFFGetStrileByteCount(tif, i - 1)) |
8129 | 0 | { |
8130 | 0 | return; |
8131 | 0 | } |
8132 | 0 | } |
8133 | 0 | } |
8134 | | |
8135 | | /* Aim for 512 MB strips (that will still be manageable by 32 bit builds */ |
8136 | 0 | rowblocksperstrip = (uint32_t)(512 * 1024 * 1024 / rowblockbytes); |
8137 | 0 | if (rowblocksperstrip == 0) |
8138 | 0 | rowblocksperstrip = 1; |
8139 | 0 | rowsperstrip = rowblocksperstrip * rowblock; |
8140 | 0 | stripbytes = rowblocksperstrip * rowblockbytes; |
8141 | 0 | assert(stripbytes <= 0x7FFFFFFFUL); |
8142 | |
|
8143 | 0 | if (rowsperstrip == 0) |
8144 | 0 | return; |
8145 | 0 | nstrips = TIFFhowmany_32(td->td_imagelength, rowsperstrip); |
8146 | 0 | if (nstrips == 0) |
8147 | 0 | return; |
8148 | | |
8149 | | /* If we are going to allocate a lot of memory, make sure that the */ |
8150 | | /* file is as big as needed */ |
8151 | 0 | if (tif->tif_mode == O_RDONLY && nstrips > 1000000) |
8152 | 0 | { |
8153 | 0 | uint64_t last_offset = TIFFGetStrileOffset(tif, td->td_nstrips - 1); |
8154 | 0 | uint64_t filesize = TIFFGetFileSize(tif); |
8155 | 0 | uint64_t last_bytecount = |
8156 | 0 | TIFFGetStrileByteCount(tif, td->td_nstrips - 1); |
8157 | 0 | if (last_offset > filesize || last_bytecount > filesize - last_offset) |
8158 | 0 | { |
8159 | 0 | return; |
8160 | 0 | } |
8161 | 0 | } |
8162 | | |
8163 | 0 | allocChoppedUpStripArrays(tif, nstrips, stripbytes, rowsperstrip); |
8164 | 0 | } |
8165 | | |
8166 | | TIFF_NOSANITIZE_UNSIGNED_INT_OVERFLOW |
8167 | | static uint64_t _TIFFUnsanitizedAddUInt64AndInt(uint64_t a, int b) |
8168 | 0 | { |
8169 | 0 | return a + b; |
8170 | 0 | } |
8171 | | |
8172 | | /* Read the value of [Strip|Tile]Offset or [Strip|Tile]ByteCount around |
8173 | | * strip/tile of number strile. Also fetch the neighbouring values using a |
8174 | | * 4096 byte page size. |
8175 | | */ |
8176 | | static int _TIFFPartialReadStripArray(TIFF *tif, TIFFDirEntry *dirent, |
8177 | | int strile, uint64_t *panVals) |
8178 | 0 | { |
8179 | 0 | static const char module[] = "_TIFFPartialReadStripArray"; |
8180 | 0 | #define IO_CACHE_PAGE_SIZE 4096 |
8181 | |
|
8182 | 0 | size_t sizeofval; |
8183 | 0 | const int bSwab = (tif->tif_flags & TIFF_SWAB) != 0; |
8184 | 0 | int sizeofvalint; |
8185 | 0 | uint64_t nBaseOffset; |
8186 | 0 | uint64_t nOffset; |
8187 | 0 | uint64_t nOffsetStartPage; |
8188 | 0 | uint64_t nOffsetEndPage; |
8189 | 0 | tmsize_t nToRead; |
8190 | 0 | tmsize_t nRead; |
8191 | 0 | uint64_t nLastStripOffset; |
8192 | 0 | int iStartBefore; |
8193 | 0 | int i; |
8194 | 0 | const uint32_t arraySize = tif->tif_dir.td_stripoffsetbyteallocsize; |
8195 | 0 | unsigned char buffer[2 * IO_CACHE_PAGE_SIZE]; |
8196 | |
|
8197 | 0 | assert(dirent->tdir_count > 4); |
8198 | |
|
8199 | 0 | if (dirent->tdir_type == TIFF_SHORT) |
8200 | 0 | { |
8201 | 0 | sizeofval = sizeof(uint16_t); |
8202 | 0 | } |
8203 | 0 | else if (dirent->tdir_type == TIFF_LONG) |
8204 | 0 | { |
8205 | 0 | sizeofval = sizeof(uint32_t); |
8206 | 0 | } |
8207 | 0 | else if (dirent->tdir_type == TIFF_LONG8) |
8208 | 0 | { |
8209 | 0 | sizeofval = sizeof(uint64_t); |
8210 | 0 | } |
8211 | 0 | else if (dirent->tdir_type == TIFF_SLONG8) |
8212 | 0 | { |
8213 | | /* Non conformant but used by some images as in */ |
8214 | | /* https://github.com/OSGeo/gdal/issues/2165 */ |
8215 | 0 | sizeofval = sizeof(int64_t); |
8216 | 0 | } |
8217 | 0 | else |
8218 | 0 | { |
8219 | 0 | TIFFErrorExtR(tif, module, |
8220 | 0 | "Invalid type for [Strip|Tile][Offset/ByteCount] tag"); |
8221 | 0 | panVals[strile] = 0; |
8222 | 0 | return 0; |
8223 | 0 | } |
8224 | 0 | sizeofvalint = (int)(sizeofval); |
8225 | |
|
8226 | 0 | if (tif->tif_flags & TIFF_BIGTIFF) |
8227 | 0 | { |
8228 | 0 | uint64_t offset = dirent->tdir_offset.toff_long8; |
8229 | 0 | if (bSwab) |
8230 | 0 | TIFFSwabLong8(&offset); |
8231 | 0 | nBaseOffset = offset; |
8232 | 0 | } |
8233 | 0 | else |
8234 | 0 | { |
8235 | 0 | uint32_t offset = dirent->tdir_offset.toff_long; |
8236 | 0 | if (bSwab) |
8237 | 0 | TIFFSwabLong(&offset); |
8238 | 0 | nBaseOffset = offset; |
8239 | 0 | } |
8240 | | /* To avoid later unsigned integer overflows */ |
8241 | 0 | if (nBaseOffset > (uint64_t)INT64_MAX) |
8242 | 0 | { |
8243 | 0 | TIFFErrorExtR(tif, module, "Cannot read offset/size for strile %d", |
8244 | 0 | strile); |
8245 | 0 | panVals[strile] = 0; |
8246 | 0 | return 0; |
8247 | 0 | } |
8248 | 0 | nOffset = nBaseOffset + sizeofval * strile; |
8249 | 0 | nOffsetStartPage = (nOffset / IO_CACHE_PAGE_SIZE) * IO_CACHE_PAGE_SIZE; |
8250 | 0 | nOffsetEndPage = nOffsetStartPage + IO_CACHE_PAGE_SIZE; |
8251 | |
|
8252 | 0 | if (nOffset + sizeofval > nOffsetEndPage) |
8253 | 0 | nOffsetEndPage += IO_CACHE_PAGE_SIZE; |
8254 | 0 | #undef IO_CACHE_PAGE_SIZE |
8255 | |
|
8256 | 0 | nLastStripOffset = nBaseOffset + arraySize * sizeofval; |
8257 | 0 | if (nLastStripOffset < nOffsetEndPage) |
8258 | 0 | nOffsetEndPage = nLastStripOffset; |
8259 | 0 | if (nOffsetStartPage >= nOffsetEndPage) |
8260 | 0 | { |
8261 | 0 | TIFFErrorExtR(tif, module, "Cannot read offset/size for strile %d", |
8262 | 0 | strile); |
8263 | 0 | panVals[strile] = 0; |
8264 | 0 | return 0; |
8265 | 0 | } |
8266 | 0 | if (!SeekOK(tif, nOffsetStartPage)) |
8267 | 0 | { |
8268 | 0 | panVals[strile] = 0; |
8269 | 0 | return 0; |
8270 | 0 | } |
8271 | | |
8272 | 0 | nToRead = (tmsize_t)(nOffsetEndPage - nOffsetStartPage); |
8273 | 0 | nRead = TIFFReadFile(tif, buffer, nToRead); |
8274 | 0 | if (nRead < nToRead) |
8275 | 0 | { |
8276 | 0 | TIFFErrorExtR(tif, module, |
8277 | 0 | "Cannot read offset/size for strile around ~%d", strile); |
8278 | 0 | return 0; |
8279 | 0 | } |
8280 | 0 | iStartBefore = -(int)((nOffset - nOffsetStartPage) / sizeofval); |
8281 | 0 | if (strile + iStartBefore < 0) |
8282 | 0 | iStartBefore = -strile; |
8283 | 0 | for (i = iStartBefore; |
8284 | 0 | (uint32_t)(strile + i) < arraySize && |
8285 | 0 | _TIFFUnsanitizedAddUInt64AndInt(nOffset, (i + 1) * sizeofvalint) <= |
8286 | 0 | nOffsetEndPage; |
8287 | 0 | ++i) |
8288 | 0 | { |
8289 | 0 | if (dirent->tdir_type == TIFF_SHORT) |
8290 | 0 | { |
8291 | 0 | uint16_t val; |
8292 | 0 | memcpy(&val, |
8293 | 0 | buffer + (nOffset - nOffsetStartPage) + i * sizeofvalint, |
8294 | 0 | sizeof(val)); |
8295 | 0 | if (bSwab) |
8296 | 0 | TIFFSwabShort(&val); |
8297 | 0 | panVals[strile + i] = val; |
8298 | 0 | } |
8299 | 0 | else if (dirent->tdir_type == TIFF_LONG) |
8300 | 0 | { |
8301 | 0 | uint32_t val; |
8302 | 0 | memcpy(&val, |
8303 | 0 | buffer + (nOffset - nOffsetStartPage) + i * sizeofvalint, |
8304 | 0 | sizeof(val)); |
8305 | 0 | if (bSwab) |
8306 | 0 | TIFFSwabLong(&val); |
8307 | 0 | panVals[strile + i] = val; |
8308 | 0 | } |
8309 | 0 | else if (dirent->tdir_type == TIFF_LONG8) |
8310 | 0 | { |
8311 | 0 | uint64_t val; |
8312 | 0 | memcpy(&val, |
8313 | 0 | buffer + (nOffset - nOffsetStartPage) + i * sizeofvalint, |
8314 | 0 | sizeof(val)); |
8315 | 0 | if (bSwab) |
8316 | 0 | TIFFSwabLong8(&val); |
8317 | 0 | panVals[strile + i] = val; |
8318 | 0 | } |
8319 | 0 | else /* if( dirent->tdir_type == TIFF_SLONG8 ) */ |
8320 | 0 | { |
8321 | | /* Non conformant data type */ |
8322 | 0 | int64_t val; |
8323 | 0 | memcpy(&val, |
8324 | 0 | buffer + (nOffset - nOffsetStartPage) + i * sizeofvalint, |
8325 | 0 | sizeof(val)); |
8326 | 0 | if (bSwab) |
8327 | 0 | TIFFSwabLong8((uint64_t *)&val); |
8328 | 0 | panVals[strile + i] = (uint64_t)val; |
8329 | 0 | } |
8330 | 0 | } |
8331 | 0 | return 1; |
8332 | 0 | } |
8333 | | |
8334 | | static int _TIFFFetchStrileValue(TIFF *tif, uint32_t strile, |
8335 | | TIFFDirEntry *dirent, uint64_t **parray) |
8336 | 0 | { |
8337 | 0 | static const char module[] = "_TIFFFetchStrileValue"; |
8338 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8339 | 0 | if (strile >= dirent->tdir_count) |
8340 | 0 | { |
8341 | 0 | return 0; |
8342 | 0 | } |
8343 | 0 | if (strile >= td->td_stripoffsetbyteallocsize) |
8344 | 0 | { |
8345 | 0 | uint32_t nStripArrayAllocBefore = td->td_stripoffsetbyteallocsize; |
8346 | 0 | uint32_t nStripArrayAllocNew; |
8347 | 0 | uint64_t nArraySize64; |
8348 | 0 | size_t nArraySize; |
8349 | 0 | uint64_t *offsetArray; |
8350 | 0 | uint64_t *bytecountArray; |
8351 | |
|
8352 | 0 | if (strile > 1000000) |
8353 | 0 | { |
8354 | 0 | uint64_t filesize = TIFFGetFileSize(tif); |
8355 | | /* Avoid excessive memory allocation attempt */ |
8356 | | /* For such a big blockid we need at least a TIFF_LONG per strile */ |
8357 | | /* for the offset array. */ |
8358 | 0 | if (strile > filesize / sizeof(uint32_t)) |
8359 | 0 | { |
8360 | 0 | TIFFErrorExtR(tif, module, "File too short"); |
8361 | 0 | return 0; |
8362 | 0 | } |
8363 | 0 | } |
8364 | | |
8365 | 0 | if (td->td_stripoffsetbyteallocsize == 0 && |
8366 | 0 | td->td_nstrips < 1024 * 1024) |
8367 | 0 | { |
8368 | 0 | nStripArrayAllocNew = td->td_nstrips; |
8369 | 0 | } |
8370 | 0 | else |
8371 | 0 | { |
8372 | 0 | #define TIFF_MAX(a, b) (((a) > (b)) ? (a) : (b)) |
8373 | 0 | #define TIFF_MIN(a, b) (((a) < (b)) ? (a) : (b)) |
8374 | 0 | nStripArrayAllocNew = TIFF_MAX(strile + 1, 1024U * 512U); |
8375 | 0 | if (nStripArrayAllocNew < 0xFFFFFFFFU / 2) |
8376 | 0 | nStripArrayAllocNew *= 2; |
8377 | 0 | nStripArrayAllocNew = TIFF_MIN(nStripArrayAllocNew, td->td_nstrips); |
8378 | 0 | } |
8379 | 0 | assert(strile < nStripArrayAllocNew); |
8380 | 0 | nArraySize64 = (uint64_t)sizeof(uint64_t) * nStripArrayAllocNew; |
8381 | 0 | nArraySize = (size_t)(nArraySize64); |
8382 | | #if SIZEOF_SIZE_T == 4 |
8383 | | if (nArraySize != nArraySize64) |
8384 | | { |
8385 | | TIFFErrorExtR(tif, module, |
8386 | | "Cannot allocate strip offset and bytecount arrays"); |
8387 | | return 0; |
8388 | | } |
8389 | | #endif |
8390 | 0 | offsetArray = (uint64_t *)(_TIFFreallocExt(tif, td->td_stripoffset_p, |
8391 | 0 | nArraySize)); |
8392 | 0 | bytecountArray = (uint64_t *)(_TIFFreallocExt( |
8393 | 0 | tif, td->td_stripbytecount_p, nArraySize)); |
8394 | 0 | if (offsetArray) |
8395 | 0 | td->td_stripoffset_p = offsetArray; |
8396 | 0 | if (bytecountArray) |
8397 | 0 | td->td_stripbytecount_p = bytecountArray; |
8398 | 0 | if (offsetArray && bytecountArray) |
8399 | 0 | { |
8400 | 0 | td->td_stripoffsetbyteallocsize = nStripArrayAllocNew; |
8401 | | /* Initialize new entries to ~0 / -1 */ |
8402 | | /* coverity[overrun-buffer-arg] */ |
8403 | 0 | memset(td->td_stripoffset_p + nStripArrayAllocBefore, 0xFF, |
8404 | 0 | (td->td_stripoffsetbyteallocsize - nStripArrayAllocBefore) * |
8405 | 0 | sizeof(uint64_t)); |
8406 | | /* coverity[overrun-buffer-arg] */ |
8407 | 0 | memset(td->td_stripbytecount_p + nStripArrayAllocBefore, 0xFF, |
8408 | 0 | (td->td_stripoffsetbyteallocsize - nStripArrayAllocBefore) * |
8409 | 0 | sizeof(uint64_t)); |
8410 | 0 | } |
8411 | 0 | else |
8412 | 0 | { |
8413 | 0 | TIFFErrorExtR(tif, module, |
8414 | 0 | "Cannot allocate strip offset and bytecount arrays"); |
8415 | 0 | _TIFFfreeExt(tif, td->td_stripoffset_p); |
8416 | 0 | td->td_stripoffset_p = NULL; |
8417 | 0 | _TIFFfreeExt(tif, td->td_stripbytecount_p); |
8418 | 0 | td->td_stripbytecount_p = NULL; |
8419 | 0 | td->td_stripoffsetbyteallocsize = 0; |
8420 | 0 | } |
8421 | 0 | } |
8422 | 0 | if (*parray == NULL || strile >= td->td_stripoffsetbyteallocsize) |
8423 | 0 | return 0; |
8424 | | |
8425 | 0 | if (~((*parray)[strile]) == 0) |
8426 | 0 | { |
8427 | 0 | if (!_TIFFPartialReadStripArray(tif, dirent, strile, *parray)) |
8428 | 0 | { |
8429 | 0 | (*parray)[strile] = 0; |
8430 | 0 | return 0; |
8431 | 0 | } |
8432 | 0 | } |
8433 | | |
8434 | 0 | return 1; |
8435 | 0 | } |
8436 | | |
8437 | | static uint64_t _TIFFGetStrileOffsetOrByteCountValue(TIFF *tif, uint32_t strile, |
8438 | | TIFFDirEntry *dirent, |
8439 | | uint64_t **parray, |
8440 | | int *pbErr) |
8441 | 0 | { |
8442 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8443 | 0 | if (pbErr) |
8444 | 0 | *pbErr = 0; |
8445 | | |
8446 | | /* Check that StripOffsets and StripByteCounts tags have the same number |
8447 | | * of declared entries. Otherwise we might take the "dirent->tdir_count <= |
8448 | | * 4" code path for one of them, and the other code path for the other one, |
8449 | | * which will lead to inconsistencies and potential out-of-bounds reads. |
8450 | | */ |
8451 | 0 | if (td->td_stripoffset_entry.tdir_count != |
8452 | 0 | td->td_stripbytecount_entry.tdir_count) |
8453 | 0 | { |
8454 | 0 | if (pbErr) |
8455 | 0 | *pbErr = 1; |
8456 | 0 | return 0; |
8457 | 0 | } |
8458 | | |
8459 | 0 | if ((tif->tif_flags & TIFF_DEFERSTRILELOAD) && |
8460 | 0 | !(tif->tif_flags & TIFF_CHOPPEDUPARRAYS)) |
8461 | 0 | { |
8462 | 0 | if (!(tif->tif_flags & TIFF_LAZYSTRILELOAD_ASKED) || |
8463 | | /* If the values may fit in the toff_long/toff_long8 member */ |
8464 | | /* then use _TIFFFillStriles to simplify _TIFFFetchStrileValue */ |
8465 | 0 | dirent->tdir_count <= 4) |
8466 | 0 | { |
8467 | 0 | if (!_TIFFFillStriles(tif)) |
8468 | 0 | { |
8469 | 0 | if (pbErr) |
8470 | 0 | *pbErr = 1; |
8471 | | /* Do not return, as we want this function to always */ |
8472 | | /* return the same value if called several times with */ |
8473 | | /* the same arguments */ |
8474 | 0 | } |
8475 | 0 | } |
8476 | 0 | else |
8477 | 0 | { |
8478 | 0 | if (!_TIFFFetchStrileValue(tif, strile, dirent, parray)) |
8479 | 0 | { |
8480 | 0 | if (pbErr) |
8481 | 0 | *pbErr = 1; |
8482 | 0 | return 0; |
8483 | 0 | } |
8484 | 0 | } |
8485 | 0 | } |
8486 | 0 | if (*parray == NULL || strile >= td->td_nstrips) |
8487 | 0 | { |
8488 | 0 | if (pbErr) |
8489 | 0 | *pbErr = 1; |
8490 | 0 | return 0; |
8491 | 0 | } |
8492 | 0 | return (*parray)[strile]; |
8493 | 0 | } |
8494 | | |
8495 | | /* Return the value of the TileOffsets/StripOffsets array for the specified |
8496 | | * tile/strile */ |
8497 | | uint64_t TIFFGetStrileOffset(TIFF *tif, uint32_t strile) |
8498 | 0 | { |
8499 | 0 | return TIFFGetStrileOffsetWithErr(tif, strile, NULL); |
8500 | 0 | } |
8501 | | |
8502 | | /* Return the value of the TileOffsets/StripOffsets array for the specified |
8503 | | * tile/strile */ |
8504 | | uint64_t TIFFGetStrileOffsetWithErr(TIFF *tif, uint32_t strile, int *pbErr) |
8505 | 0 | { |
8506 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8507 | 0 | return _TIFFGetStrileOffsetOrByteCountValue(tif, strile, |
8508 | 0 | &(td->td_stripoffset_entry), |
8509 | 0 | &(td->td_stripoffset_p), pbErr); |
8510 | 0 | } |
8511 | | |
8512 | | /* Return the value of the TileByteCounts/StripByteCounts array for the |
8513 | | * specified tile/strile */ |
8514 | | uint64_t TIFFGetStrileByteCount(TIFF *tif, uint32_t strile) |
8515 | 0 | { |
8516 | 0 | return TIFFGetStrileByteCountWithErr(tif, strile, NULL); |
8517 | 0 | } |
8518 | | |
8519 | | /* Return the value of the TileByteCounts/StripByteCounts array for the |
8520 | | * specified tile/strile */ |
8521 | | uint64_t TIFFGetStrileByteCountWithErr(TIFF *tif, uint32_t strile, int *pbErr) |
8522 | 0 | { |
8523 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8524 | 0 | return _TIFFGetStrileOffsetOrByteCountValue( |
8525 | 0 | tif, strile, &(td->td_stripbytecount_entry), &(td->td_stripbytecount_p), |
8526 | 0 | pbErr); |
8527 | 0 | } |
8528 | | |
8529 | 0 | int _TIFFFillStriles(TIFF *tif) { return _TIFFFillStrilesInternal(tif, 1); } |
8530 | | |
8531 | | static int _TIFFFillStrilesInternal(TIFF *tif, int loadStripByteCount) |
8532 | 0 | { |
8533 | 0 | TIFFDirectory *td = &tif->tif_dir; |
8534 | 0 | int return_value = 1; |
8535 | | |
8536 | | /* Do not do anything if TIFF_DEFERSTRILELOAD is not set */ |
8537 | 0 | if (!(tif->tif_flags & TIFF_DEFERSTRILELOAD) || |
8538 | 0 | (tif->tif_flags & TIFF_CHOPPEDUPARRAYS) != 0) |
8539 | 0 | return 1; |
8540 | | |
8541 | 0 | if ((tif->tif_flags & TIFF_LAZYSTRILELOAD_ASKED) && |
8542 | 0 | !(tif->tif_flags & TIFF_LAZYSTRILELOAD_DONE)) |
8543 | 0 | { |
8544 | | /* In case of lazy loading, reload completely the arrays */ |
8545 | 0 | _TIFFfreeExt(tif, td->td_stripoffset_p); |
8546 | 0 | _TIFFfreeExt(tif, td->td_stripbytecount_p); |
8547 | 0 | td->td_stripoffset_p = NULL; |
8548 | 0 | td->td_stripbytecount_p = NULL; |
8549 | 0 | td->td_stripoffsetbyteallocsize = 0; |
8550 | 0 | tif->tif_flags |= TIFF_LAZYSTRILELOAD_DONE; |
8551 | 0 | } |
8552 | | |
8553 | | /* If stripoffset array is already loaded, exit with success */ |
8554 | 0 | if (td->td_stripoffset_p != NULL) |
8555 | 0 | return 1; |
8556 | | |
8557 | | /* If tdir_count was canceled, then we already got there, but in error */ |
8558 | 0 | if (td->td_stripoffset_entry.tdir_count == 0) |
8559 | 0 | return 0; |
8560 | | |
8561 | 0 | if (!TIFFFetchStripThing(tif, &(td->td_stripoffset_entry), td->td_nstrips, |
8562 | 0 | &td->td_stripoffset_p)) |
8563 | 0 | { |
8564 | 0 | return_value = 0; |
8565 | 0 | } |
8566 | |
|
8567 | 0 | if (loadStripByteCount && |
8568 | 0 | !TIFFFetchStripThing(tif, &(td->td_stripbytecount_entry), |
8569 | 0 | td->td_nstrips, &td->td_stripbytecount_p)) |
8570 | 0 | { |
8571 | 0 | return_value = 0; |
8572 | 0 | } |
8573 | |
|
8574 | 0 | _TIFFmemset(&(td->td_stripoffset_entry), 0, sizeof(TIFFDirEntry)); |
8575 | 0 | _TIFFmemset(&(td->td_stripbytecount_entry), 0, sizeof(TIFFDirEntry)); |
8576 | |
|
8577 | | #ifdef STRIPBYTECOUNTSORTED_UNUSED |
8578 | | if (tif->tif_dir.td_nstrips > 1 && return_value == 1) |
8579 | | { |
8580 | | uint32_t strip; |
8581 | | |
8582 | | tif->tif_dir.td_stripbytecountsorted = 1; |
8583 | | for (strip = 1; strip < tif->tif_dir.td_nstrips; strip++) |
8584 | | { |
8585 | | if (tif->tif_dir.td_stripoffset_p[strip - 1] > |
8586 | | tif->tif_dir.td_stripoffset_p[strip]) |
8587 | | { |
8588 | | tif->tif_dir.td_stripbytecountsorted = 0; |
8589 | | break; |
8590 | | } |
8591 | | } |
8592 | | } |
8593 | | #endif |
8594 | |
|
8595 | 0 | return return_value; |
8596 | 0 | } |