comparison ext/libpng-1.2.29/pngrutil.c @ 0:4a0efb7baf70

* Datasets becomes the new trunk and retires after that :-)
author mvbarracuda@33b003aa-7bff-0310-803a-e67f0ece8222
date Sun, 29 Jun 2008 18:44:17 +0000
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:4a0efb7baf70
1
2 /* pngrutil.c - utilities to read a PNG file
3 *
4 * Last changed in libpng 1.2.27 [April 29, 2008]
5 * For conditions of distribution and use, see copyright notice in png.h
6 * Copyright (c) 1998-2008 Glenn Randers-Pehrson
7 * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
8 * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
9 *
10 * This file contains routines that are only called from within
11 * libpng itself during the course of reading an image.
12 */
13
14 #define PNG_INTERNAL
15 #include "png.h"
16
17 #if defined(PNG_READ_SUPPORTED)
18
19 #if defined(_WIN32_WCE) && (_WIN32_WCE<0x500)
20 # define WIN32_WCE_OLD
21 #endif
22
23 #ifdef PNG_FLOATING_POINT_SUPPORTED
24 # if defined(WIN32_WCE_OLD)
25 /* strtod() function is not supported on WindowsCE */
26 __inline double png_strtod(png_structp png_ptr, PNG_CONST char *nptr, char **endptr)
27 {
28 double result = 0;
29 int len;
30 wchar_t *str, *end;
31
32 len = MultiByteToWideChar(CP_ACP, 0, nptr, -1, NULL, 0);
33 str = (wchar_t *)png_malloc(png_ptr, len * sizeof(wchar_t));
34 if ( NULL != str )
35 {
36 MultiByteToWideChar(CP_ACP, 0, nptr, -1, str, len);
37 result = wcstod(str, &end);
38 len = WideCharToMultiByte(CP_ACP, 0, end, -1, NULL, 0, NULL, NULL);
39 *endptr = (char *)nptr + (png_strlen(nptr) - len + 1);
40 png_free(png_ptr, str);
41 }
42 return result;
43 }
44 # else
45 # define png_strtod(p,a,b) strtod(a,b)
46 # endif
47 #endif
48
49 png_uint_32 PNGAPI
50 png_get_uint_31(png_structp png_ptr, png_bytep buf)
51 {
52 png_uint_32 i = png_get_uint_32(buf);
53 if (i > PNG_UINT_31_MAX)
54 png_error(png_ptr, "PNG unsigned integer out of range.");
55 return (i);
56 }
57 #ifndef PNG_READ_BIG_ENDIAN_SUPPORTED
58 /* Grab an unsigned 32-bit integer from a buffer in big-endian format. */
59 png_uint_32 PNGAPI
60 png_get_uint_32(png_bytep buf)
61 {
62 png_uint_32 i = ((png_uint_32)(*buf) << 24) +
63 ((png_uint_32)(*(buf + 1)) << 16) +
64 ((png_uint_32)(*(buf + 2)) << 8) +
65 (png_uint_32)(*(buf + 3));
66
67 return (i);
68 }
69
70 /* Grab a signed 32-bit integer from a buffer in big-endian format. The
71 * data is stored in the PNG file in two's complement format, and it is
72 * assumed that the machine format for signed integers is the same. */
73 png_int_32 PNGAPI
74 png_get_int_32(png_bytep buf)
75 {
76 png_int_32 i = ((png_int_32)(*buf) << 24) +
77 ((png_int_32)(*(buf + 1)) << 16) +
78 ((png_int_32)(*(buf + 2)) << 8) +
79 (png_int_32)(*(buf + 3));
80
81 return (i);
82 }
83
84 /* Grab an unsigned 16-bit integer from a buffer in big-endian format. */
85 png_uint_16 PNGAPI
86 png_get_uint_16(png_bytep buf)
87 {
88 png_uint_16 i = (png_uint_16)(((png_uint_16)(*buf) << 8) +
89 (png_uint_16)(*(buf + 1)));
90
91 return (i);
92 }
93 #endif /* PNG_READ_BIG_ENDIAN_SUPPORTED */
94
95 /* Read data, and (optionally) run it through the CRC. */
96 void /* PRIVATE */
97 png_crc_read(png_structp png_ptr, png_bytep buf, png_size_t length)
98 {
99 if(png_ptr == NULL) return;
100 png_read_data(png_ptr, buf, length);
101 png_calculate_crc(png_ptr, buf, length);
102 }
103
104 /* Optionally skip data and then check the CRC. Depending on whether we
105 are reading a ancillary or critical chunk, and how the program has set
106 things up, we may calculate the CRC on the data and print a message.
107 Returns '1' if there was a CRC error, '0' otherwise. */
108 int /* PRIVATE */
109 png_crc_finish(png_structp png_ptr, png_uint_32 skip)
110 {
111 png_size_t i;
112 png_size_t istop = png_ptr->zbuf_size;
113
114 for (i = (png_size_t)skip; i > istop; i -= istop)
115 {
116 png_crc_read(png_ptr, png_ptr->zbuf, png_ptr->zbuf_size);
117 }
118 if (i)
119 {
120 png_crc_read(png_ptr, png_ptr->zbuf, i);
121 }
122
123 if (png_crc_error(png_ptr))
124 {
125 if (((png_ptr->chunk_name[0] & 0x20) && /* Ancillary */
126 !(png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_NOWARN)) ||
127 (!(png_ptr->chunk_name[0] & 0x20) && /* Critical */
128 (png_ptr->flags & PNG_FLAG_CRC_CRITICAL_USE)))
129 {
130 png_chunk_warning(png_ptr, "CRC error");
131 }
132 else
133 {
134 png_chunk_error(png_ptr, "CRC error");
135 }
136 return (1);
137 }
138
139 return (0);
140 }
141
142 /* Compare the CRC stored in the PNG file with that calculated by libpng from
143 the data it has read thus far. */
144 int /* PRIVATE */
145 png_crc_error(png_structp png_ptr)
146 {
147 png_byte crc_bytes[4];
148 png_uint_32 crc;
149 int need_crc = 1;
150
151 if (png_ptr->chunk_name[0] & 0x20) /* ancillary */
152 {
153 if ((png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_MASK) ==
154 (PNG_FLAG_CRC_ANCILLARY_USE | PNG_FLAG_CRC_ANCILLARY_NOWARN))
155 need_crc = 0;
156 }
157 else /* critical */
158 {
159 if (png_ptr->flags & PNG_FLAG_CRC_CRITICAL_IGNORE)
160 need_crc = 0;
161 }
162
163 png_read_data(png_ptr, crc_bytes, 4);
164
165 if (need_crc)
166 {
167 crc = png_get_uint_32(crc_bytes);
168 return ((int)(crc != png_ptr->crc));
169 }
170 else
171 return (0);
172 }
173
174 #if defined(PNG_READ_zTXt_SUPPORTED) || defined(PNG_READ_iTXt_SUPPORTED) || \
175 defined(PNG_READ_iCCP_SUPPORTED)
176 /*
177 * Decompress trailing data in a chunk. The assumption is that chunkdata
178 * points at an allocated area holding the contents of a chunk with a
179 * trailing compressed part. What we get back is an allocated area
180 * holding the original prefix part and an uncompressed version of the
181 * trailing part (the malloc area passed in is freed).
182 */
183 png_charp /* PRIVATE */
184 png_decompress_chunk(png_structp png_ptr, int comp_type,
185 png_charp chunkdata, png_size_t chunklength,
186 png_size_t prefix_size, png_size_t *newlength)
187 {
188 static PNG_CONST char msg[] = "Error decoding compressed text";
189 png_charp text;
190 png_size_t text_size;
191
192 if (comp_type == PNG_COMPRESSION_TYPE_BASE)
193 {
194 int ret = Z_OK;
195 png_ptr->zstream.next_in = (png_bytep)(chunkdata + prefix_size);
196 png_ptr->zstream.avail_in = (uInt)(chunklength - prefix_size);
197 png_ptr->zstream.next_out = png_ptr->zbuf;
198 png_ptr->zstream.avail_out = (uInt)png_ptr->zbuf_size;
199
200 text_size = 0;
201 text = NULL;
202
203 while (png_ptr->zstream.avail_in)
204 {
205 ret = inflate(&png_ptr->zstream, Z_PARTIAL_FLUSH);
206 if (ret != Z_OK && ret != Z_STREAM_END)
207 {
208 if (png_ptr->zstream.msg != NULL)
209 png_warning(png_ptr, png_ptr->zstream.msg);
210 else
211 png_warning(png_ptr, msg);
212 inflateReset(&png_ptr->zstream);
213 png_ptr->zstream.avail_in = 0;
214
215 if (text == NULL)
216 {
217 text_size = prefix_size + png_sizeof(msg) + 1;
218 text = (png_charp)png_malloc_warn(png_ptr, text_size);
219 if (text == NULL)
220 {
221 png_free(png_ptr,chunkdata);
222 png_error(png_ptr,"Not enough memory to decompress chunk");
223 }
224 png_memcpy(text, chunkdata, prefix_size);
225 }
226
227 text[text_size - 1] = 0x00;
228
229 /* Copy what we can of the error message into the text chunk */
230 text_size = (png_size_t)(chunklength - (text - chunkdata) - 1);
231 text_size = png_sizeof(msg) > text_size ? text_size :
232 png_sizeof(msg);
233 png_memcpy(text + prefix_size, msg, text_size);
234 break;
235 }
236 if (!png_ptr->zstream.avail_out || ret == Z_STREAM_END)
237 {
238 if (text == NULL)
239 {
240 text_size = prefix_size +
241 png_ptr->zbuf_size - png_ptr->zstream.avail_out;
242 text = (png_charp)png_malloc_warn(png_ptr, text_size + 1);
243 if (text == NULL)
244 {
245 png_free(png_ptr,chunkdata);
246 png_error(png_ptr,"Not enough memory to decompress chunk.");
247 }
248 png_memcpy(text + prefix_size, png_ptr->zbuf,
249 text_size - prefix_size);
250 png_memcpy(text, chunkdata, prefix_size);
251 *(text + text_size) = 0x00;
252 }
253 else
254 {
255 png_charp tmp;
256
257 tmp = text;
258 text = (png_charp)png_malloc_warn(png_ptr,
259 (png_uint_32)(text_size +
260 png_ptr->zbuf_size - png_ptr->zstream.avail_out + 1));
261 if (text == NULL)
262 {
263 png_free(png_ptr, tmp);
264 png_free(png_ptr, chunkdata);
265 png_error(png_ptr,"Not enough memory to decompress chunk..");
266 }
267 png_memcpy(text, tmp, text_size);
268 png_free(png_ptr, tmp);
269 png_memcpy(text + text_size, png_ptr->zbuf,
270 (png_ptr->zbuf_size - png_ptr->zstream.avail_out));
271 text_size += png_ptr->zbuf_size - png_ptr->zstream.avail_out;
272 *(text + text_size) = 0x00;
273 }
274 if (ret == Z_STREAM_END)
275 break;
276 else
277 {
278 png_ptr->zstream.next_out = png_ptr->zbuf;
279 png_ptr->zstream.avail_out = (uInt)png_ptr->zbuf_size;
280 }
281 }
282 }
283 if (ret != Z_STREAM_END)
284 {
285 #if !defined(PNG_NO_STDIO) && !defined(_WIN32_WCE)
286 char umsg[52];
287
288 if (ret == Z_BUF_ERROR)
289 png_snprintf(umsg, 52,
290 "Buffer error in compressed datastream in %s chunk",
291 png_ptr->chunk_name);
292 else if (ret == Z_DATA_ERROR)
293 png_snprintf(umsg, 52,
294 "Data error in compressed datastream in %s chunk",
295 png_ptr->chunk_name);
296 else
297 png_snprintf(umsg, 52,
298 "Incomplete compressed datastream in %s chunk",
299 png_ptr->chunk_name);
300 png_warning(png_ptr, umsg);
301 #else
302 png_warning(png_ptr,
303 "Incomplete compressed datastream in chunk other than IDAT");
304 #endif
305 text_size=prefix_size;
306 if (text == NULL)
307 {
308 text = (png_charp)png_malloc_warn(png_ptr, text_size+1);
309 if (text == NULL)
310 {
311 png_free(png_ptr, chunkdata);
312 png_error(png_ptr,"Not enough memory for text.");
313 }
314 png_memcpy(text, chunkdata, prefix_size);
315 }
316 *(text + text_size) = 0x00;
317 }
318
319 inflateReset(&png_ptr->zstream);
320 png_ptr->zstream.avail_in = 0;
321
322 png_free(png_ptr, chunkdata);
323 chunkdata = text;
324 *newlength=text_size;
325 }
326 else /* if (comp_type != PNG_COMPRESSION_TYPE_BASE) */
327 {
328 #if !defined(PNG_NO_STDIO) && !defined(_WIN32_WCE)
329 char umsg[50];
330
331 png_snprintf(umsg, 50,
332 "Unknown zTXt compression type %d", comp_type);
333 png_warning(png_ptr, umsg);
334 #else
335 png_warning(png_ptr, "Unknown zTXt compression type");
336 #endif
337
338 *(chunkdata + prefix_size) = 0x00;
339 *newlength=prefix_size;
340 }
341
342 return chunkdata;
343 }
344 #endif
345
346 /* read and check the IDHR chunk */
347 void /* PRIVATE */
348 png_handle_IHDR(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
349 {
350 png_byte buf[13];
351 png_uint_32 width, height;
352 int bit_depth, color_type, compression_type, filter_type;
353 int interlace_type;
354
355 png_debug(1, "in png_handle_IHDR\n");
356
357 if (png_ptr->mode & PNG_HAVE_IHDR)
358 png_error(png_ptr, "Out of place IHDR");
359
360 /* check the length */
361 if (length != 13)
362 png_error(png_ptr, "Invalid IHDR chunk");
363
364 png_ptr->mode |= PNG_HAVE_IHDR;
365
366 png_crc_read(png_ptr, buf, 13);
367 png_crc_finish(png_ptr, 0);
368
369 width = png_get_uint_31(png_ptr, buf);
370 height = png_get_uint_31(png_ptr, buf + 4);
371 bit_depth = buf[8];
372 color_type = buf[9];
373 compression_type = buf[10];
374 filter_type = buf[11];
375 interlace_type = buf[12];
376
377 /* set internal variables */
378 png_ptr->width = width;
379 png_ptr->height = height;
380 png_ptr->bit_depth = (png_byte)bit_depth;
381 png_ptr->interlaced = (png_byte)interlace_type;
382 png_ptr->color_type = (png_byte)color_type;
383 #if defined(PNG_MNG_FEATURES_SUPPORTED)
384 png_ptr->filter_type = (png_byte)filter_type;
385 #endif
386 png_ptr->compression_type = (png_byte)compression_type;
387
388 /* find number of channels */
389 switch (png_ptr->color_type)
390 {
391 case PNG_COLOR_TYPE_GRAY:
392 case PNG_COLOR_TYPE_PALETTE:
393 png_ptr->channels = 1;
394 break;
395 case PNG_COLOR_TYPE_RGB:
396 png_ptr->channels = 3;
397 break;
398 case PNG_COLOR_TYPE_GRAY_ALPHA:
399 png_ptr->channels = 2;
400 break;
401 case PNG_COLOR_TYPE_RGB_ALPHA:
402 png_ptr->channels = 4;
403 break;
404 }
405
406 /* set up other useful info */
407 png_ptr->pixel_depth = (png_byte)(png_ptr->bit_depth *
408 png_ptr->channels);
409 png_ptr->rowbytes = PNG_ROWBYTES(png_ptr->pixel_depth,png_ptr->width);
410 png_debug1(3,"bit_depth = %d\n", png_ptr->bit_depth);
411 png_debug1(3,"channels = %d\n", png_ptr->channels);
412 png_debug1(3,"rowbytes = %lu\n", png_ptr->rowbytes);
413 png_set_IHDR(png_ptr, info_ptr, width, height, bit_depth,
414 color_type, interlace_type, compression_type, filter_type);
415 }
416
417 /* read and check the palette */
418 void /* PRIVATE */
419 png_handle_PLTE(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
420 {
421 png_color palette[PNG_MAX_PALETTE_LENGTH];
422 int num, i;
423 #ifndef PNG_NO_POINTER_INDEXING
424 png_colorp pal_ptr;
425 #endif
426
427 png_debug(1, "in png_handle_PLTE\n");
428
429 if (!(png_ptr->mode & PNG_HAVE_IHDR))
430 png_error(png_ptr, "Missing IHDR before PLTE");
431 else if (png_ptr->mode & PNG_HAVE_IDAT)
432 {
433 png_warning(png_ptr, "Invalid PLTE after IDAT");
434 png_crc_finish(png_ptr, length);
435 return;
436 }
437 else if (png_ptr->mode & PNG_HAVE_PLTE)
438 png_error(png_ptr, "Duplicate PLTE chunk");
439
440 png_ptr->mode |= PNG_HAVE_PLTE;
441
442 if (!(png_ptr->color_type&PNG_COLOR_MASK_COLOR))
443 {
444 png_warning(png_ptr,
445 "Ignoring PLTE chunk in grayscale PNG");
446 png_crc_finish(png_ptr, length);
447 return;
448 }
449 #if !defined(PNG_READ_OPT_PLTE_SUPPORTED)
450 if (png_ptr->color_type != PNG_COLOR_TYPE_PALETTE)
451 {
452 png_crc_finish(png_ptr, length);
453 return;
454 }
455 #endif
456
457 if (length > 3*PNG_MAX_PALETTE_LENGTH || length % 3)
458 {
459 if (png_ptr->color_type != PNG_COLOR_TYPE_PALETTE)
460 {
461 png_warning(png_ptr, "Invalid palette chunk");
462 png_crc_finish(png_ptr, length);
463 return;
464 }
465 else
466 {
467 png_error(png_ptr, "Invalid palette chunk");
468 }
469 }
470
471 num = (int)length / 3;
472
473 #ifndef PNG_NO_POINTER_INDEXING
474 for (i = 0, pal_ptr = palette; i < num; i++, pal_ptr++)
475 {
476 png_byte buf[3];
477
478 png_crc_read(png_ptr, buf, 3);
479 pal_ptr->red = buf[0];
480 pal_ptr->green = buf[1];
481 pal_ptr->blue = buf[2];
482 }
483 #else
484 for (i = 0; i < num; i++)
485 {
486 png_byte buf[3];
487
488 png_crc_read(png_ptr, buf, 3);
489 /* don't depend upon png_color being any order */
490 palette[i].red = buf[0];
491 palette[i].green = buf[1];
492 palette[i].blue = buf[2];
493 }
494 #endif
495
496 /* If we actually NEED the PLTE chunk (ie for a paletted image), we do
497 whatever the normal CRC configuration tells us. However, if we
498 have an RGB image, the PLTE can be considered ancillary, so
499 we will act as though it is. */
500 #if !defined(PNG_READ_OPT_PLTE_SUPPORTED)
501 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
502 #endif
503 {
504 png_crc_finish(png_ptr, 0);
505 }
506 #if !defined(PNG_READ_OPT_PLTE_SUPPORTED)
507 else if (png_crc_error(png_ptr)) /* Only if we have a CRC error */
508 {
509 /* If we don't want to use the data from an ancillary chunk,
510 we have two options: an error abort, or a warning and we
511 ignore the data in this chunk (which should be OK, since
512 it's considered ancillary for a RGB or RGBA image). */
513 if (!(png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_USE))
514 {
515 if (png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_NOWARN)
516 {
517 png_chunk_error(png_ptr, "CRC error");
518 }
519 else
520 {
521 png_chunk_warning(png_ptr, "CRC error");
522 return;
523 }
524 }
525 /* Otherwise, we (optionally) emit a warning and use the chunk. */
526 else if (!(png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_NOWARN))
527 {
528 png_chunk_warning(png_ptr, "CRC error");
529 }
530 }
531 #endif
532
533 png_set_PLTE(png_ptr, info_ptr, palette, num);
534
535 #if defined(PNG_READ_tRNS_SUPPORTED)
536 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
537 {
538 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_tRNS))
539 {
540 if (png_ptr->num_trans > (png_uint_16)num)
541 {
542 png_warning(png_ptr, "Truncating incorrect tRNS chunk length");
543 png_ptr->num_trans = (png_uint_16)num;
544 }
545 if (info_ptr->num_trans > (png_uint_16)num)
546 {
547 png_warning(png_ptr, "Truncating incorrect info tRNS chunk length");
548 info_ptr->num_trans = (png_uint_16)num;
549 }
550 }
551 }
552 #endif
553
554 }
555
556 void /* PRIVATE */
557 png_handle_IEND(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
558 {
559 png_debug(1, "in png_handle_IEND\n");
560
561 if (!(png_ptr->mode & PNG_HAVE_IHDR) || !(png_ptr->mode & PNG_HAVE_IDAT))
562 {
563 png_error(png_ptr, "No image in file");
564 }
565
566 png_ptr->mode |= (PNG_AFTER_IDAT | PNG_HAVE_IEND);
567
568 if (length != 0)
569 {
570 png_warning(png_ptr, "Incorrect IEND chunk length");
571 }
572 png_crc_finish(png_ptr, length);
573
574 info_ptr =info_ptr; /* quiet compiler warnings about unused info_ptr */
575 }
576
577 #if defined(PNG_READ_gAMA_SUPPORTED)
578 void /* PRIVATE */
579 png_handle_gAMA(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
580 {
581 png_fixed_point igamma;
582 #ifdef PNG_FLOATING_POINT_SUPPORTED
583 float file_gamma;
584 #endif
585 png_byte buf[4];
586
587 png_debug(1, "in png_handle_gAMA\n");
588
589 if (!(png_ptr->mode & PNG_HAVE_IHDR))
590 png_error(png_ptr, "Missing IHDR before gAMA");
591 else if (png_ptr->mode & PNG_HAVE_IDAT)
592 {
593 png_warning(png_ptr, "Invalid gAMA after IDAT");
594 png_crc_finish(png_ptr, length);
595 return;
596 }
597 else if (png_ptr->mode & PNG_HAVE_PLTE)
598 /* Should be an error, but we can cope with it */
599 png_warning(png_ptr, "Out of place gAMA chunk");
600
601 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_gAMA)
602 #if defined(PNG_READ_sRGB_SUPPORTED)
603 && !(info_ptr->valid & PNG_INFO_sRGB)
604 #endif
605 )
606 {
607 png_warning(png_ptr, "Duplicate gAMA chunk");
608 png_crc_finish(png_ptr, length);
609 return;
610 }
611
612 if (length != 4)
613 {
614 png_warning(png_ptr, "Incorrect gAMA chunk length");
615 png_crc_finish(png_ptr, length);
616 return;
617 }
618
619 png_crc_read(png_ptr, buf, 4);
620 if (png_crc_finish(png_ptr, 0))
621 return;
622
623 igamma = (png_fixed_point)png_get_uint_32(buf);
624 /* check for zero gamma */
625 if (igamma == 0)
626 {
627 png_warning(png_ptr,
628 "Ignoring gAMA chunk with gamma=0");
629 return;
630 }
631
632 #if defined(PNG_READ_sRGB_SUPPORTED)
633 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_sRGB))
634 if (PNG_OUT_OF_RANGE(igamma, 45500L, 500))
635 {
636 png_warning(png_ptr,
637 "Ignoring incorrect gAMA value when sRGB is also present");
638 #ifndef PNG_NO_CONSOLE_IO
639 fprintf(stderr, "gamma = (%d/100000)\n", (int)igamma);
640 #endif
641 return;
642 }
643 #endif /* PNG_READ_sRGB_SUPPORTED */
644
645 #ifdef PNG_FLOATING_POINT_SUPPORTED
646 file_gamma = (float)igamma / (float)100000.0;
647 # ifdef PNG_READ_GAMMA_SUPPORTED
648 png_ptr->gamma = file_gamma;
649 # endif
650 png_set_gAMA(png_ptr, info_ptr, file_gamma);
651 #endif
652 #ifdef PNG_FIXED_POINT_SUPPORTED
653 png_set_gAMA_fixed(png_ptr, info_ptr, igamma);
654 #endif
655 }
656 #endif
657
658 #if defined(PNG_READ_sBIT_SUPPORTED)
659 void /* PRIVATE */
660 png_handle_sBIT(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
661 {
662 png_size_t truelen;
663 png_byte buf[4];
664
665 png_debug(1, "in png_handle_sBIT\n");
666
667 buf[0] = buf[1] = buf[2] = buf[3] = 0;
668
669 if (!(png_ptr->mode & PNG_HAVE_IHDR))
670 png_error(png_ptr, "Missing IHDR before sBIT");
671 else if (png_ptr->mode & PNG_HAVE_IDAT)
672 {
673 png_warning(png_ptr, "Invalid sBIT after IDAT");
674 png_crc_finish(png_ptr, length);
675 return;
676 }
677 else if (png_ptr->mode & PNG_HAVE_PLTE)
678 {
679 /* Should be an error, but we can cope with it */
680 png_warning(png_ptr, "Out of place sBIT chunk");
681 }
682 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_sBIT))
683 {
684 png_warning(png_ptr, "Duplicate sBIT chunk");
685 png_crc_finish(png_ptr, length);
686 return;
687 }
688
689 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
690 truelen = 3;
691 else
692 truelen = (png_size_t)png_ptr->channels;
693
694 if (length != truelen || length > 4)
695 {
696 png_warning(png_ptr, "Incorrect sBIT chunk length");
697 png_crc_finish(png_ptr, length);
698 return;
699 }
700
701 png_crc_read(png_ptr, buf, truelen);
702 if (png_crc_finish(png_ptr, 0))
703 return;
704
705 if (png_ptr->color_type & PNG_COLOR_MASK_COLOR)
706 {
707 png_ptr->sig_bit.red = buf[0];
708 png_ptr->sig_bit.green = buf[1];
709 png_ptr->sig_bit.blue = buf[2];
710 png_ptr->sig_bit.alpha = buf[3];
711 }
712 else
713 {
714 png_ptr->sig_bit.gray = buf[0];
715 png_ptr->sig_bit.red = buf[0];
716 png_ptr->sig_bit.green = buf[0];
717 png_ptr->sig_bit.blue = buf[0];
718 png_ptr->sig_bit.alpha = buf[1];
719 }
720 png_set_sBIT(png_ptr, info_ptr, &(png_ptr->sig_bit));
721 }
722 #endif
723
724 #if defined(PNG_READ_cHRM_SUPPORTED)
725 void /* PRIVATE */
726 png_handle_cHRM(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
727 {
728 png_byte buf[4];
729 #ifdef PNG_FLOATING_POINT_SUPPORTED
730 float white_x, white_y, red_x, red_y, green_x, green_y, blue_x, blue_y;
731 #endif
732 png_fixed_point int_x_white, int_y_white, int_x_red, int_y_red, int_x_green,
733 int_y_green, int_x_blue, int_y_blue;
734
735 png_uint_32 uint_x, uint_y;
736
737 png_debug(1, "in png_handle_cHRM\n");
738
739 if (!(png_ptr->mode & PNG_HAVE_IHDR))
740 png_error(png_ptr, "Missing IHDR before cHRM");
741 else if (png_ptr->mode & PNG_HAVE_IDAT)
742 {
743 png_warning(png_ptr, "Invalid cHRM after IDAT");
744 png_crc_finish(png_ptr, length);
745 return;
746 }
747 else if (png_ptr->mode & PNG_HAVE_PLTE)
748 /* Should be an error, but we can cope with it */
749 png_warning(png_ptr, "Missing PLTE before cHRM");
750
751 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_cHRM)
752 #if defined(PNG_READ_sRGB_SUPPORTED)
753 && !(info_ptr->valid & PNG_INFO_sRGB)
754 #endif
755 )
756 {
757 png_warning(png_ptr, "Duplicate cHRM chunk");
758 png_crc_finish(png_ptr, length);
759 return;
760 }
761
762 if (length != 32)
763 {
764 png_warning(png_ptr, "Incorrect cHRM chunk length");
765 png_crc_finish(png_ptr, length);
766 return;
767 }
768
769 png_crc_read(png_ptr, buf, 4);
770 uint_x = png_get_uint_32(buf);
771
772 png_crc_read(png_ptr, buf, 4);
773 uint_y = png_get_uint_32(buf);
774
775 if (uint_x > 80000L || uint_y > 80000L ||
776 uint_x + uint_y > 100000L)
777 {
778 png_warning(png_ptr, "Invalid cHRM white point");
779 png_crc_finish(png_ptr, 24);
780 return;
781 }
782 int_x_white = (png_fixed_point)uint_x;
783 int_y_white = (png_fixed_point)uint_y;
784
785 png_crc_read(png_ptr, buf, 4);
786 uint_x = png_get_uint_32(buf);
787
788 png_crc_read(png_ptr, buf, 4);
789 uint_y = png_get_uint_32(buf);
790
791 if (uint_x + uint_y > 100000L)
792 {
793 png_warning(png_ptr, "Invalid cHRM red point");
794 png_crc_finish(png_ptr, 16);
795 return;
796 }
797 int_x_red = (png_fixed_point)uint_x;
798 int_y_red = (png_fixed_point)uint_y;
799
800 png_crc_read(png_ptr, buf, 4);
801 uint_x = png_get_uint_32(buf);
802
803 png_crc_read(png_ptr, buf, 4);
804 uint_y = png_get_uint_32(buf);
805
806 if (uint_x + uint_y > 100000L)
807 {
808 png_warning(png_ptr, "Invalid cHRM green point");
809 png_crc_finish(png_ptr, 8);
810 return;
811 }
812 int_x_green = (png_fixed_point)uint_x;
813 int_y_green = (png_fixed_point)uint_y;
814
815 png_crc_read(png_ptr, buf, 4);
816 uint_x = png_get_uint_32(buf);
817
818 png_crc_read(png_ptr, buf, 4);
819 uint_y = png_get_uint_32(buf);
820
821 if (uint_x + uint_y > 100000L)
822 {
823 png_warning(png_ptr, "Invalid cHRM blue point");
824 png_crc_finish(png_ptr, 0);
825 return;
826 }
827 int_x_blue = (png_fixed_point)uint_x;
828 int_y_blue = (png_fixed_point)uint_y;
829
830 #ifdef PNG_FLOATING_POINT_SUPPORTED
831 white_x = (float)int_x_white / (float)100000.0;
832 white_y = (float)int_y_white / (float)100000.0;
833 red_x = (float)int_x_red / (float)100000.0;
834 red_y = (float)int_y_red / (float)100000.0;
835 green_x = (float)int_x_green / (float)100000.0;
836 green_y = (float)int_y_green / (float)100000.0;
837 blue_x = (float)int_x_blue / (float)100000.0;
838 blue_y = (float)int_y_blue / (float)100000.0;
839 #endif
840
841 #if defined(PNG_READ_sRGB_SUPPORTED)
842 if ((info_ptr != NULL) && (info_ptr->valid & PNG_INFO_sRGB))
843 {
844 if (PNG_OUT_OF_RANGE(int_x_white, 31270, 1000) ||
845 PNG_OUT_OF_RANGE(int_y_white, 32900, 1000) ||
846 PNG_OUT_OF_RANGE(int_x_red, 64000L, 1000) ||
847 PNG_OUT_OF_RANGE(int_y_red, 33000, 1000) ||
848 PNG_OUT_OF_RANGE(int_x_green, 30000, 1000) ||
849 PNG_OUT_OF_RANGE(int_y_green, 60000L, 1000) ||
850 PNG_OUT_OF_RANGE(int_x_blue, 15000, 1000) ||
851 PNG_OUT_OF_RANGE(int_y_blue, 6000, 1000))
852 {
853 png_warning(png_ptr,
854 "Ignoring incorrect cHRM value when sRGB is also present");
855 #ifndef PNG_NO_CONSOLE_IO
856 #ifdef PNG_FLOATING_POINT_SUPPORTED
857 fprintf(stderr,"wx=%f, wy=%f, rx=%f, ry=%f\n",
858 white_x, white_y, red_x, red_y);
859 fprintf(stderr,"gx=%f, gy=%f, bx=%f, by=%f\n",
860 green_x, green_y, blue_x, blue_y);
861 #else
862 fprintf(stderr,"wx=%ld, wy=%ld, rx=%ld, ry=%ld\n",
863 int_x_white, int_y_white, int_x_red, int_y_red);
864 fprintf(stderr,"gx=%ld, gy=%ld, bx=%ld, by=%ld\n",
865 int_x_green, int_y_green, int_x_blue, int_y_blue);
866 #endif
867 #endif /* PNG_NO_CONSOLE_IO */
868 }
869 png_crc_finish(png_ptr, 0);
870 return;
871 }
872 #endif /* PNG_READ_sRGB_SUPPORTED */
873
874 #ifdef PNG_FLOATING_POINT_SUPPORTED
875 png_set_cHRM(png_ptr, info_ptr,
876 white_x, white_y, red_x, red_y, green_x, green_y, blue_x, blue_y);
877 #endif
878 #ifdef PNG_FIXED_POINT_SUPPORTED
879 png_set_cHRM_fixed(png_ptr, info_ptr,
880 int_x_white, int_y_white, int_x_red, int_y_red, int_x_green,
881 int_y_green, int_x_blue, int_y_blue);
882 #endif
883 if (png_crc_finish(png_ptr, 0))
884 return;
885 }
886 #endif
887
888 #if defined(PNG_READ_sRGB_SUPPORTED)
889 void /* PRIVATE */
890 png_handle_sRGB(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
891 {
892 int intent;
893 png_byte buf[1];
894
895 png_debug(1, "in png_handle_sRGB\n");
896
897 if (!(png_ptr->mode & PNG_HAVE_IHDR))
898 png_error(png_ptr, "Missing IHDR before sRGB");
899 else if (png_ptr->mode & PNG_HAVE_IDAT)
900 {
901 png_warning(png_ptr, "Invalid sRGB after IDAT");
902 png_crc_finish(png_ptr, length);
903 return;
904 }
905 else if (png_ptr->mode & PNG_HAVE_PLTE)
906 /* Should be an error, but we can cope with it */
907 png_warning(png_ptr, "Out of place sRGB chunk");
908
909 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_sRGB))
910 {
911 png_warning(png_ptr, "Duplicate sRGB chunk");
912 png_crc_finish(png_ptr, length);
913 return;
914 }
915
916 if (length != 1)
917 {
918 png_warning(png_ptr, "Incorrect sRGB chunk length");
919 png_crc_finish(png_ptr, length);
920 return;
921 }
922
923 png_crc_read(png_ptr, buf, 1);
924 if (png_crc_finish(png_ptr, 0))
925 return;
926
927 intent = buf[0];
928 /* check for bad intent */
929 if (intent >= PNG_sRGB_INTENT_LAST)
930 {
931 png_warning(png_ptr, "Unknown sRGB intent");
932 return;
933 }
934
935 #if defined(PNG_READ_gAMA_SUPPORTED) && defined(PNG_READ_GAMMA_SUPPORTED)
936 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_gAMA))
937 {
938 png_fixed_point igamma;
939 #ifdef PNG_FIXED_POINT_SUPPORTED
940 igamma=info_ptr->int_gamma;
941 #else
942 # ifdef PNG_FLOATING_POINT_SUPPORTED
943 igamma=(png_fixed_point)(info_ptr->gamma * 100000.);
944 # endif
945 #endif
946 if (PNG_OUT_OF_RANGE(igamma, 45500L, 500))
947 {
948 png_warning(png_ptr,
949 "Ignoring incorrect gAMA value when sRGB is also present");
950 #ifndef PNG_NO_CONSOLE_IO
951 # ifdef PNG_FIXED_POINT_SUPPORTED
952 fprintf(stderr,"incorrect gamma=(%d/100000)\n",(int)png_ptr->int_gamma);
953 # else
954 # ifdef PNG_FLOATING_POINT_SUPPORTED
955 fprintf(stderr,"incorrect gamma=%f\n",png_ptr->gamma);
956 # endif
957 # endif
958 #endif
959 }
960 }
961 #endif /* PNG_READ_gAMA_SUPPORTED */
962
963 #ifdef PNG_READ_cHRM_SUPPORTED
964 #ifdef PNG_FIXED_POINT_SUPPORTED
965 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_cHRM))
966 if (PNG_OUT_OF_RANGE(info_ptr->int_x_white, 31270, 1000) ||
967 PNG_OUT_OF_RANGE(info_ptr->int_y_white, 32900, 1000) ||
968 PNG_OUT_OF_RANGE(info_ptr->int_x_red, 64000L, 1000) ||
969 PNG_OUT_OF_RANGE(info_ptr->int_y_red, 33000, 1000) ||
970 PNG_OUT_OF_RANGE(info_ptr->int_x_green, 30000, 1000) ||
971 PNG_OUT_OF_RANGE(info_ptr->int_y_green, 60000L, 1000) ||
972 PNG_OUT_OF_RANGE(info_ptr->int_x_blue, 15000, 1000) ||
973 PNG_OUT_OF_RANGE(info_ptr->int_y_blue, 6000, 1000))
974 {
975 png_warning(png_ptr,
976 "Ignoring incorrect cHRM value when sRGB is also present");
977 }
978 #endif /* PNG_FIXED_POINT_SUPPORTED */
979 #endif /* PNG_READ_cHRM_SUPPORTED */
980
981 png_set_sRGB_gAMA_and_cHRM(png_ptr, info_ptr, intent);
982 }
983 #endif /* PNG_READ_sRGB_SUPPORTED */
984
985 #if defined(PNG_READ_iCCP_SUPPORTED)
986 void /* PRIVATE */
987 png_handle_iCCP(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
988 /* Note: this does not properly handle chunks that are > 64K under DOS */
989 {
990 png_charp chunkdata;
991 png_byte compression_type;
992 png_bytep pC;
993 png_charp profile;
994 png_uint_32 skip = 0;
995 png_uint_32 profile_size, profile_length;
996 png_size_t slength, prefix_length, data_length;
997
998 png_debug(1, "in png_handle_iCCP\n");
999
1000 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1001 png_error(png_ptr, "Missing IHDR before iCCP");
1002 else if (png_ptr->mode & PNG_HAVE_IDAT)
1003 {
1004 png_warning(png_ptr, "Invalid iCCP after IDAT");
1005 png_crc_finish(png_ptr, length);
1006 return;
1007 }
1008 else if (png_ptr->mode & PNG_HAVE_PLTE)
1009 /* Should be an error, but we can cope with it */
1010 png_warning(png_ptr, "Out of place iCCP chunk");
1011
1012 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_iCCP))
1013 {
1014 png_warning(png_ptr, "Duplicate iCCP chunk");
1015 png_crc_finish(png_ptr, length);
1016 return;
1017 }
1018
1019 #ifdef PNG_MAX_MALLOC_64K
1020 if (length > (png_uint_32)65535L)
1021 {
1022 png_warning(png_ptr, "iCCP chunk too large to fit in memory");
1023 skip = length - (png_uint_32)65535L;
1024 length = (png_uint_32)65535L;
1025 }
1026 #endif
1027
1028 chunkdata = (png_charp)png_malloc(png_ptr, length + 1);
1029 slength = (png_size_t)length;
1030 png_crc_read(png_ptr, (png_bytep)chunkdata, slength);
1031
1032 if (png_crc_finish(png_ptr, skip))
1033 {
1034 png_free(png_ptr, chunkdata);
1035 return;
1036 }
1037
1038 chunkdata[slength] = 0x00;
1039
1040 for (profile = chunkdata; *profile; profile++)
1041 /* empty loop to find end of name */ ;
1042
1043 ++profile;
1044
1045 /* there should be at least one zero (the compression type byte)
1046 following the separator, and we should be on it */
1047 if ( profile >= chunkdata + slength - 1)
1048 {
1049 png_free(png_ptr, chunkdata);
1050 png_warning(png_ptr, "Malformed iCCP chunk");
1051 return;
1052 }
1053
1054 /* compression_type should always be zero */
1055 compression_type = *profile++;
1056 if (compression_type)
1057 {
1058 png_warning(png_ptr, "Ignoring nonzero compression type in iCCP chunk");
1059 compression_type=0x00; /* Reset it to zero (libpng-1.0.6 through 1.0.8
1060 wrote nonzero) */
1061 }
1062
1063 prefix_length = profile - chunkdata;
1064 chunkdata = png_decompress_chunk(png_ptr, compression_type, chunkdata,
1065 slength, prefix_length, &data_length);
1066
1067 profile_length = data_length - prefix_length;
1068
1069 if ( prefix_length > data_length || profile_length < 4)
1070 {
1071 png_free(png_ptr, chunkdata);
1072 png_warning(png_ptr, "Profile size field missing from iCCP chunk");
1073 return;
1074 }
1075
1076 /* Check the profile_size recorded in the first 32 bits of the ICC profile */
1077 pC = (png_bytep)(chunkdata+prefix_length);
1078 profile_size = ((*(pC ))<<24) |
1079 ((*(pC+1))<<16) |
1080 ((*(pC+2))<< 8) |
1081 ((*(pC+3)) );
1082
1083 if(profile_size < profile_length)
1084 profile_length = profile_size;
1085
1086 if(profile_size > profile_length)
1087 {
1088 png_free(png_ptr, chunkdata);
1089 png_warning(png_ptr, "Ignoring truncated iCCP profile.");
1090 return;
1091 }
1092
1093 png_set_iCCP(png_ptr, info_ptr, chunkdata, compression_type,
1094 chunkdata + prefix_length, profile_length);
1095 png_free(png_ptr, chunkdata);
1096 }
1097 #endif /* PNG_READ_iCCP_SUPPORTED */
1098
1099 #if defined(PNG_READ_sPLT_SUPPORTED)
1100 void /* PRIVATE */
1101 png_handle_sPLT(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1102 /* Note: this does not properly handle chunks that are > 64K under DOS */
1103 {
1104 png_bytep chunkdata;
1105 png_bytep entry_start;
1106 png_sPLT_t new_palette;
1107 #ifdef PNG_NO_POINTER_INDEXING
1108 png_sPLT_entryp pp;
1109 #endif
1110 int data_length, entry_size, i;
1111 png_uint_32 skip = 0;
1112 png_size_t slength;
1113
1114 png_debug(1, "in png_handle_sPLT\n");
1115
1116 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1117 png_error(png_ptr, "Missing IHDR before sPLT");
1118 else if (png_ptr->mode & PNG_HAVE_IDAT)
1119 {
1120 png_warning(png_ptr, "Invalid sPLT after IDAT");
1121 png_crc_finish(png_ptr, length);
1122 return;
1123 }
1124
1125 #ifdef PNG_MAX_MALLOC_64K
1126 if (length > (png_uint_32)65535L)
1127 {
1128 png_warning(png_ptr, "sPLT chunk too large to fit in memory");
1129 skip = length - (png_uint_32)65535L;
1130 length = (png_uint_32)65535L;
1131 }
1132 #endif
1133
1134 chunkdata = (png_bytep)png_malloc(png_ptr, length + 1);
1135 slength = (png_size_t)length;
1136 png_crc_read(png_ptr, (png_bytep)chunkdata, slength);
1137
1138 if (png_crc_finish(png_ptr, skip))
1139 {
1140 png_free(png_ptr, chunkdata);
1141 return;
1142 }
1143
1144 chunkdata[slength] = 0x00;
1145
1146 for (entry_start = chunkdata; *entry_start; entry_start++)
1147 /* empty loop to find end of name */ ;
1148 ++entry_start;
1149
1150 /* a sample depth should follow the separator, and we should be on it */
1151 if (entry_start > chunkdata + slength - 2)
1152 {
1153 png_free(png_ptr, chunkdata);
1154 png_warning(png_ptr, "malformed sPLT chunk");
1155 return;
1156 }
1157
1158 new_palette.depth = *entry_start++;
1159 entry_size = (new_palette.depth == 8 ? 6 : 10);
1160 data_length = (slength - (entry_start - chunkdata));
1161
1162 /* integrity-check the data length */
1163 if (data_length % entry_size)
1164 {
1165 png_free(png_ptr, chunkdata);
1166 png_warning(png_ptr, "sPLT chunk has bad length");
1167 return;
1168 }
1169
1170 new_palette.nentries = (png_int_32) ( data_length / entry_size);
1171 if ((png_uint_32) new_palette.nentries > (png_uint_32) (PNG_SIZE_MAX /
1172 png_sizeof(png_sPLT_entry)))
1173 {
1174 png_warning(png_ptr, "sPLT chunk too long");
1175 return;
1176 }
1177 new_palette.entries = (png_sPLT_entryp)png_malloc_warn(
1178 png_ptr, new_palette.nentries * png_sizeof(png_sPLT_entry));
1179 if (new_palette.entries == NULL)
1180 {
1181 png_warning(png_ptr, "sPLT chunk requires too much memory");
1182 return;
1183 }
1184
1185 #ifndef PNG_NO_POINTER_INDEXING
1186 for (i = 0; i < new_palette.nentries; i++)
1187 {
1188 png_sPLT_entryp pp = new_palette.entries + i;
1189
1190 if (new_palette.depth == 8)
1191 {
1192 pp->red = *entry_start++;
1193 pp->green = *entry_start++;
1194 pp->blue = *entry_start++;
1195 pp->alpha = *entry_start++;
1196 }
1197 else
1198 {
1199 pp->red = png_get_uint_16(entry_start); entry_start += 2;
1200 pp->green = png_get_uint_16(entry_start); entry_start += 2;
1201 pp->blue = png_get_uint_16(entry_start); entry_start += 2;
1202 pp->alpha = png_get_uint_16(entry_start); entry_start += 2;
1203 }
1204 pp->frequency = png_get_uint_16(entry_start); entry_start += 2;
1205 }
1206 #else
1207 pp = new_palette.entries;
1208 for (i = 0; i < new_palette.nentries; i++)
1209 {
1210
1211 if (new_palette.depth == 8)
1212 {
1213 pp[i].red = *entry_start++;
1214 pp[i].green = *entry_start++;
1215 pp[i].blue = *entry_start++;
1216 pp[i].alpha = *entry_start++;
1217 }
1218 else
1219 {
1220 pp[i].red = png_get_uint_16(entry_start); entry_start += 2;
1221 pp[i].green = png_get_uint_16(entry_start); entry_start += 2;
1222 pp[i].blue = png_get_uint_16(entry_start); entry_start += 2;
1223 pp[i].alpha = png_get_uint_16(entry_start); entry_start += 2;
1224 }
1225 pp->frequency = png_get_uint_16(entry_start); entry_start += 2;
1226 }
1227 #endif
1228
1229 /* discard all chunk data except the name and stash that */
1230 new_palette.name = (png_charp)chunkdata;
1231
1232 png_set_sPLT(png_ptr, info_ptr, &new_palette, 1);
1233
1234 png_free(png_ptr, chunkdata);
1235 png_free(png_ptr, new_palette.entries);
1236 }
1237 #endif /* PNG_READ_sPLT_SUPPORTED */
1238
1239 #if defined(PNG_READ_tRNS_SUPPORTED)
1240 void /* PRIVATE */
1241 png_handle_tRNS(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1242 {
1243 png_byte readbuf[PNG_MAX_PALETTE_LENGTH];
1244
1245 png_debug(1, "in png_handle_tRNS\n");
1246
1247 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1248 png_error(png_ptr, "Missing IHDR before tRNS");
1249 else if (png_ptr->mode & PNG_HAVE_IDAT)
1250 {
1251 png_warning(png_ptr, "Invalid tRNS after IDAT");
1252 png_crc_finish(png_ptr, length);
1253 return;
1254 }
1255 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_tRNS))
1256 {
1257 png_warning(png_ptr, "Duplicate tRNS chunk");
1258 png_crc_finish(png_ptr, length);
1259 return;
1260 }
1261
1262 if (png_ptr->color_type == PNG_COLOR_TYPE_GRAY)
1263 {
1264 png_byte buf[2];
1265
1266 if (length != 2)
1267 {
1268 png_warning(png_ptr, "Incorrect tRNS chunk length");
1269 png_crc_finish(png_ptr, length);
1270 return;
1271 }
1272
1273 png_crc_read(png_ptr, buf, 2);
1274 png_ptr->num_trans = 1;
1275 png_ptr->trans_values.gray = png_get_uint_16(buf);
1276 }
1277 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB)
1278 {
1279 png_byte buf[6];
1280
1281 if (length != 6)
1282 {
1283 png_warning(png_ptr, "Incorrect tRNS chunk length");
1284 png_crc_finish(png_ptr, length);
1285 return;
1286 }
1287 png_crc_read(png_ptr, buf, (png_size_t)length);
1288 png_ptr->num_trans = 1;
1289 png_ptr->trans_values.red = png_get_uint_16(buf);
1290 png_ptr->trans_values.green = png_get_uint_16(buf + 2);
1291 png_ptr->trans_values.blue = png_get_uint_16(buf + 4);
1292 }
1293 else if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
1294 {
1295 if (!(png_ptr->mode & PNG_HAVE_PLTE))
1296 {
1297 /* Should be an error, but we can cope with it. */
1298 png_warning(png_ptr, "Missing PLTE before tRNS");
1299 }
1300 if (length > (png_uint_32)png_ptr->num_palette ||
1301 length > PNG_MAX_PALETTE_LENGTH)
1302 {
1303 png_warning(png_ptr, "Incorrect tRNS chunk length");
1304 png_crc_finish(png_ptr, length);
1305 return;
1306 }
1307 if (length == 0)
1308 {
1309 png_warning(png_ptr, "Zero length tRNS chunk");
1310 png_crc_finish(png_ptr, length);
1311 return;
1312 }
1313 png_crc_read(png_ptr, readbuf, (png_size_t)length);
1314 png_ptr->num_trans = (png_uint_16)length;
1315 }
1316 else
1317 {
1318 png_warning(png_ptr, "tRNS chunk not allowed with alpha channel");
1319 png_crc_finish(png_ptr, length);
1320 return;
1321 }
1322
1323 if (png_crc_finish(png_ptr, 0))
1324 {
1325 png_ptr->num_trans = 0;
1326 return;
1327 }
1328
1329 png_set_tRNS(png_ptr, info_ptr, readbuf, png_ptr->num_trans,
1330 &(png_ptr->trans_values));
1331 }
1332 #endif
1333
1334 #if defined(PNG_READ_bKGD_SUPPORTED)
1335 void /* PRIVATE */
1336 png_handle_bKGD(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1337 {
1338 png_size_t truelen;
1339 png_byte buf[6];
1340
1341 png_debug(1, "in png_handle_bKGD\n");
1342
1343 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1344 png_error(png_ptr, "Missing IHDR before bKGD");
1345 else if (png_ptr->mode & PNG_HAVE_IDAT)
1346 {
1347 png_warning(png_ptr, "Invalid bKGD after IDAT");
1348 png_crc_finish(png_ptr, length);
1349 return;
1350 }
1351 else if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE &&
1352 !(png_ptr->mode & PNG_HAVE_PLTE))
1353 {
1354 png_warning(png_ptr, "Missing PLTE before bKGD");
1355 png_crc_finish(png_ptr, length);
1356 return;
1357 }
1358 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_bKGD))
1359 {
1360 png_warning(png_ptr, "Duplicate bKGD chunk");
1361 png_crc_finish(png_ptr, length);
1362 return;
1363 }
1364
1365 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
1366 truelen = 1;
1367 else if (png_ptr->color_type & PNG_COLOR_MASK_COLOR)
1368 truelen = 6;
1369 else
1370 truelen = 2;
1371
1372 if (length != truelen)
1373 {
1374 png_warning(png_ptr, "Incorrect bKGD chunk length");
1375 png_crc_finish(png_ptr, length);
1376 return;
1377 }
1378
1379 png_crc_read(png_ptr, buf, truelen);
1380 if (png_crc_finish(png_ptr, 0))
1381 return;
1382
1383 /* We convert the index value into RGB components so that we can allow
1384 * arbitrary RGB values for background when we have transparency, and
1385 * so it is easy to determine the RGB values of the background color
1386 * from the info_ptr struct. */
1387 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
1388 {
1389 png_ptr->background.index = buf[0];
1390 if (info_ptr && info_ptr->num_palette)
1391 {
1392 if(buf[0] > info_ptr->num_palette)
1393 {
1394 png_warning(png_ptr, "Incorrect bKGD chunk index value");
1395 return;
1396 }
1397 png_ptr->background.red =
1398 (png_uint_16)png_ptr->palette[buf[0]].red;
1399 png_ptr->background.green =
1400 (png_uint_16)png_ptr->palette[buf[0]].green;
1401 png_ptr->background.blue =
1402 (png_uint_16)png_ptr->palette[buf[0]].blue;
1403 }
1404 }
1405 else if (!(png_ptr->color_type & PNG_COLOR_MASK_COLOR)) /* GRAY */
1406 {
1407 png_ptr->background.red =
1408 png_ptr->background.green =
1409 png_ptr->background.blue =
1410 png_ptr->background.gray = png_get_uint_16(buf);
1411 }
1412 else
1413 {
1414 png_ptr->background.red = png_get_uint_16(buf);
1415 png_ptr->background.green = png_get_uint_16(buf + 2);
1416 png_ptr->background.blue = png_get_uint_16(buf + 4);
1417 }
1418
1419 png_set_bKGD(png_ptr, info_ptr, &(png_ptr->background));
1420 }
1421 #endif
1422
1423 #if defined(PNG_READ_hIST_SUPPORTED)
1424 void /* PRIVATE */
1425 png_handle_hIST(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1426 {
1427 unsigned int num, i;
1428 png_uint_16 readbuf[PNG_MAX_PALETTE_LENGTH];
1429
1430 png_debug(1, "in png_handle_hIST\n");
1431
1432 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1433 png_error(png_ptr, "Missing IHDR before hIST");
1434 else if (png_ptr->mode & PNG_HAVE_IDAT)
1435 {
1436 png_warning(png_ptr, "Invalid hIST after IDAT");
1437 png_crc_finish(png_ptr, length);
1438 return;
1439 }
1440 else if (!(png_ptr->mode & PNG_HAVE_PLTE))
1441 {
1442 png_warning(png_ptr, "Missing PLTE before hIST");
1443 png_crc_finish(png_ptr, length);
1444 return;
1445 }
1446 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_hIST))
1447 {
1448 png_warning(png_ptr, "Duplicate hIST chunk");
1449 png_crc_finish(png_ptr, length);
1450 return;
1451 }
1452
1453 num = length / 2 ;
1454 if (num != (unsigned int) png_ptr->num_palette || num >
1455 (unsigned int) PNG_MAX_PALETTE_LENGTH)
1456 {
1457 png_warning(png_ptr, "Incorrect hIST chunk length");
1458 png_crc_finish(png_ptr, length);
1459 return;
1460 }
1461
1462 for (i = 0; i < num; i++)
1463 {
1464 png_byte buf[2];
1465
1466 png_crc_read(png_ptr, buf, 2);
1467 readbuf[i] = png_get_uint_16(buf);
1468 }
1469
1470 if (png_crc_finish(png_ptr, 0))
1471 return;
1472
1473 png_set_hIST(png_ptr, info_ptr, readbuf);
1474 }
1475 #endif
1476
1477 #if defined(PNG_READ_pHYs_SUPPORTED)
1478 void /* PRIVATE */
1479 png_handle_pHYs(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1480 {
1481 png_byte buf[9];
1482 png_uint_32 res_x, res_y;
1483 int unit_type;
1484
1485 png_debug(1, "in png_handle_pHYs\n");
1486
1487 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1488 png_error(png_ptr, "Missing IHDR before pHYs");
1489 else if (png_ptr->mode & PNG_HAVE_IDAT)
1490 {
1491 png_warning(png_ptr, "Invalid pHYs after IDAT");
1492 png_crc_finish(png_ptr, length);
1493 return;
1494 }
1495 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_pHYs))
1496 {
1497 png_warning(png_ptr, "Duplicate pHYs chunk");
1498 png_crc_finish(png_ptr, length);
1499 return;
1500 }
1501
1502 if (length != 9)
1503 {
1504 png_warning(png_ptr, "Incorrect pHYs chunk length");
1505 png_crc_finish(png_ptr, length);
1506 return;
1507 }
1508
1509 png_crc_read(png_ptr, buf, 9);
1510 if (png_crc_finish(png_ptr, 0))
1511 return;
1512
1513 res_x = png_get_uint_32(buf);
1514 res_y = png_get_uint_32(buf + 4);
1515 unit_type = buf[8];
1516 png_set_pHYs(png_ptr, info_ptr, res_x, res_y, unit_type);
1517 }
1518 #endif
1519
1520 #if defined(PNG_READ_oFFs_SUPPORTED)
1521 void /* PRIVATE */
1522 png_handle_oFFs(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1523 {
1524 png_byte buf[9];
1525 png_int_32 offset_x, offset_y;
1526 int unit_type;
1527
1528 png_debug(1, "in png_handle_oFFs\n");
1529
1530 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1531 png_error(png_ptr, "Missing IHDR before oFFs");
1532 else if (png_ptr->mode & PNG_HAVE_IDAT)
1533 {
1534 png_warning(png_ptr, "Invalid oFFs after IDAT");
1535 png_crc_finish(png_ptr, length);
1536 return;
1537 }
1538 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_oFFs))
1539 {
1540 png_warning(png_ptr, "Duplicate oFFs chunk");
1541 png_crc_finish(png_ptr, length);
1542 return;
1543 }
1544
1545 if (length != 9)
1546 {
1547 png_warning(png_ptr, "Incorrect oFFs chunk length");
1548 png_crc_finish(png_ptr, length);
1549 return;
1550 }
1551
1552 png_crc_read(png_ptr, buf, 9);
1553 if (png_crc_finish(png_ptr, 0))
1554 return;
1555
1556 offset_x = png_get_int_32(buf);
1557 offset_y = png_get_int_32(buf + 4);
1558 unit_type = buf[8];
1559 png_set_oFFs(png_ptr, info_ptr, offset_x, offset_y, unit_type);
1560 }
1561 #endif
1562
1563 #if defined(PNG_READ_pCAL_SUPPORTED)
1564 /* read the pCAL chunk (described in the PNG Extensions document) */
1565 void /* PRIVATE */
1566 png_handle_pCAL(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1567 {
1568 png_charp purpose;
1569 png_int_32 X0, X1;
1570 png_byte type, nparams;
1571 png_charp buf, units, endptr;
1572 png_charpp params;
1573 png_size_t slength;
1574 int i;
1575
1576 png_debug(1, "in png_handle_pCAL\n");
1577
1578 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1579 png_error(png_ptr, "Missing IHDR before pCAL");
1580 else if (png_ptr->mode & PNG_HAVE_IDAT)
1581 {
1582 png_warning(png_ptr, "Invalid pCAL after IDAT");
1583 png_crc_finish(png_ptr, length);
1584 return;
1585 }
1586 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_pCAL))
1587 {
1588 png_warning(png_ptr, "Duplicate pCAL chunk");
1589 png_crc_finish(png_ptr, length);
1590 return;
1591 }
1592
1593 png_debug1(2, "Allocating and reading pCAL chunk data (%lu bytes)\n",
1594 length + 1);
1595 purpose = (png_charp)png_malloc_warn(png_ptr, length + 1);
1596 if (purpose == NULL)
1597 {
1598 png_warning(png_ptr, "No memory for pCAL purpose.");
1599 return;
1600 }
1601 slength = (png_size_t)length;
1602 png_crc_read(png_ptr, (png_bytep)purpose, slength);
1603
1604 if (png_crc_finish(png_ptr, 0))
1605 {
1606 png_free(png_ptr, purpose);
1607 return;
1608 }
1609
1610 purpose[slength] = 0x00; /* null terminate the last string */
1611
1612 png_debug(3, "Finding end of pCAL purpose string\n");
1613 for (buf = purpose; *buf; buf++)
1614 /* empty loop */ ;
1615
1616 endptr = purpose + slength;
1617
1618 /* We need to have at least 12 bytes after the purpose string
1619 in order to get the parameter information. */
1620 if (endptr <= buf + 12)
1621 {
1622 png_warning(png_ptr, "Invalid pCAL data");
1623 png_free(png_ptr, purpose);
1624 return;
1625 }
1626
1627 png_debug(3, "Reading pCAL X0, X1, type, nparams, and units\n");
1628 X0 = png_get_int_32((png_bytep)buf+1);
1629 X1 = png_get_int_32((png_bytep)buf+5);
1630 type = buf[9];
1631 nparams = buf[10];
1632 units = buf + 11;
1633
1634 png_debug(3, "Checking pCAL equation type and number of parameters\n");
1635 /* Check that we have the right number of parameters for known
1636 equation types. */
1637 if ((type == PNG_EQUATION_LINEAR && nparams != 2) ||
1638 (type == PNG_EQUATION_BASE_E && nparams != 3) ||
1639 (type == PNG_EQUATION_ARBITRARY && nparams != 3) ||
1640 (type == PNG_EQUATION_HYPERBOLIC && nparams != 4))
1641 {
1642 png_warning(png_ptr, "Invalid pCAL parameters for equation type");
1643 png_free(png_ptr, purpose);
1644 return;
1645 }
1646 else if (type >= PNG_EQUATION_LAST)
1647 {
1648 png_warning(png_ptr, "Unrecognized equation type for pCAL chunk");
1649 }
1650
1651 for (buf = units; *buf; buf++)
1652 /* Empty loop to move past the units string. */ ;
1653
1654 png_debug(3, "Allocating pCAL parameters array\n");
1655 params = (png_charpp)png_malloc_warn(png_ptr, (png_uint_32)(nparams
1656 *png_sizeof(png_charp))) ;
1657 if (params == NULL)
1658 {
1659 png_free(png_ptr, purpose);
1660 png_warning(png_ptr, "No memory for pCAL params.");
1661 return;
1662 }
1663
1664 /* Get pointers to the start of each parameter string. */
1665 for (i = 0; i < (int)nparams; i++)
1666 {
1667 buf++; /* Skip the null string terminator from previous parameter. */
1668
1669 png_debug1(3, "Reading pCAL parameter %d\n", i);
1670 for (params[i] = buf; buf <= endptr && *buf != 0x00; buf++)
1671 /* Empty loop to move past each parameter string */ ;
1672
1673 /* Make sure we haven't run out of data yet */
1674 if (buf > endptr)
1675 {
1676 png_warning(png_ptr, "Invalid pCAL data");
1677 png_free(png_ptr, purpose);
1678 png_free(png_ptr, params);
1679 return;
1680 }
1681 }
1682
1683 png_set_pCAL(png_ptr, info_ptr, purpose, X0, X1, type, nparams,
1684 units, params);
1685
1686 png_free(png_ptr, purpose);
1687 png_free(png_ptr, params);
1688 }
1689 #endif
1690
1691 #if defined(PNG_READ_sCAL_SUPPORTED)
1692 /* read the sCAL chunk */
1693 void /* PRIVATE */
1694 png_handle_sCAL(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1695 {
1696 png_charp buffer, ep;
1697 #ifdef PNG_FLOATING_POINT_SUPPORTED
1698 double width, height;
1699 png_charp vp;
1700 #else
1701 #ifdef PNG_FIXED_POINT_SUPPORTED
1702 png_charp swidth, sheight;
1703 #endif
1704 #endif
1705 png_size_t slength;
1706
1707 png_debug(1, "in png_handle_sCAL\n");
1708
1709 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1710 png_error(png_ptr, "Missing IHDR before sCAL");
1711 else if (png_ptr->mode & PNG_HAVE_IDAT)
1712 {
1713 png_warning(png_ptr, "Invalid sCAL after IDAT");
1714 png_crc_finish(png_ptr, length);
1715 return;
1716 }
1717 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_sCAL))
1718 {
1719 png_warning(png_ptr, "Duplicate sCAL chunk");
1720 png_crc_finish(png_ptr, length);
1721 return;
1722 }
1723
1724 png_debug1(2, "Allocating and reading sCAL chunk data (%lu bytes)\n",
1725 length + 1);
1726 buffer = (png_charp)png_malloc_warn(png_ptr, length + 1);
1727 if (buffer == NULL)
1728 {
1729 png_warning(png_ptr, "Out of memory while processing sCAL chunk");
1730 return;
1731 }
1732 slength = (png_size_t)length;
1733 png_crc_read(png_ptr, (png_bytep)buffer, slength);
1734
1735 if (png_crc_finish(png_ptr, 0))
1736 {
1737 png_free(png_ptr, buffer);
1738 return;
1739 }
1740
1741 buffer[slength] = 0x00; /* null terminate the last string */
1742
1743 ep = buffer + 1; /* skip unit byte */
1744
1745 #ifdef PNG_FLOATING_POINT_SUPPORTED
1746 width = png_strtod(png_ptr, ep, &vp);
1747 if (*vp)
1748 {
1749 png_warning(png_ptr, "malformed width string in sCAL chunk");
1750 return;
1751 }
1752 #else
1753 #ifdef PNG_FIXED_POINT_SUPPORTED
1754 swidth = (png_charp)png_malloc_warn(png_ptr, png_strlen(ep) + 1);
1755 if (swidth == NULL)
1756 {
1757 png_warning(png_ptr, "Out of memory while processing sCAL chunk width");
1758 return;
1759 }
1760 png_memcpy(swidth, ep, (png_size_t)png_strlen(ep));
1761 #endif
1762 #endif
1763
1764 for (ep = buffer; *ep; ep++)
1765 /* empty loop */ ;
1766 ep++;
1767
1768 if (buffer + slength < ep)
1769 {
1770 png_warning(png_ptr, "Truncated sCAL chunk");
1771 #if defined(PNG_FIXED_POINT_SUPPORTED) && \
1772 !defined(PNG_FLOATING_POINT_SUPPORTED)
1773 png_free(png_ptr, swidth);
1774 #endif
1775 png_free(png_ptr, buffer);
1776 return;
1777 }
1778
1779 #ifdef PNG_FLOATING_POINT_SUPPORTED
1780 height = png_strtod(png_ptr, ep, &vp);
1781 if (*vp)
1782 {
1783 png_warning(png_ptr, "malformed height string in sCAL chunk");
1784 return;
1785 }
1786 #else
1787 #ifdef PNG_FIXED_POINT_SUPPORTED
1788 sheight = (png_charp)png_malloc_warn(png_ptr, png_strlen(ep) + 1);
1789 if (sheight == NULL)
1790 {
1791 png_warning(png_ptr, "Out of memory while processing sCAL chunk height");
1792 return;
1793 }
1794 png_memcpy(sheight, ep, (png_size_t)png_strlen(ep));
1795 #endif
1796 #endif
1797
1798 if (buffer + slength < ep
1799 #ifdef PNG_FLOATING_POINT_SUPPORTED
1800 || width <= 0. || height <= 0.
1801 #endif
1802 )
1803 {
1804 png_warning(png_ptr, "Invalid sCAL data");
1805 png_free(png_ptr, buffer);
1806 #if defined(PNG_FIXED_POINT_SUPPORTED) && !defined(PNG_FLOATING_POINT_SUPPORTED)
1807 png_free(png_ptr, swidth);
1808 png_free(png_ptr, sheight);
1809 #endif
1810 return;
1811 }
1812
1813
1814 #ifdef PNG_FLOATING_POINT_SUPPORTED
1815 png_set_sCAL(png_ptr, info_ptr, buffer[0], width, height);
1816 #else
1817 #ifdef PNG_FIXED_POINT_SUPPORTED
1818 png_set_sCAL_s(png_ptr, info_ptr, buffer[0], swidth, sheight);
1819 #endif
1820 #endif
1821
1822 png_free(png_ptr, buffer);
1823 #if defined(PNG_FIXED_POINT_SUPPORTED) && !defined(PNG_FLOATING_POINT_SUPPORTED)
1824 png_free(png_ptr, swidth);
1825 png_free(png_ptr, sheight);
1826 #endif
1827 }
1828 #endif
1829
1830 #if defined(PNG_READ_tIME_SUPPORTED)
1831 void /* PRIVATE */
1832 png_handle_tIME(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1833 {
1834 png_byte buf[7];
1835 png_time mod_time;
1836
1837 png_debug(1, "in png_handle_tIME\n");
1838
1839 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1840 png_error(png_ptr, "Out of place tIME chunk");
1841 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_tIME))
1842 {
1843 png_warning(png_ptr, "Duplicate tIME chunk");
1844 png_crc_finish(png_ptr, length);
1845 return;
1846 }
1847
1848 if (png_ptr->mode & PNG_HAVE_IDAT)
1849 png_ptr->mode |= PNG_AFTER_IDAT;
1850
1851 if (length != 7)
1852 {
1853 png_warning(png_ptr, "Incorrect tIME chunk length");
1854 png_crc_finish(png_ptr, length);
1855 return;
1856 }
1857
1858 png_crc_read(png_ptr, buf, 7);
1859 if (png_crc_finish(png_ptr, 0))
1860 return;
1861
1862 mod_time.second = buf[6];
1863 mod_time.minute = buf[5];
1864 mod_time.hour = buf[4];
1865 mod_time.day = buf[3];
1866 mod_time.month = buf[2];
1867 mod_time.year = png_get_uint_16(buf);
1868
1869 png_set_tIME(png_ptr, info_ptr, &mod_time);
1870 }
1871 #endif
1872
1873 #if defined(PNG_READ_tEXt_SUPPORTED)
1874 /* Note: this does not properly handle chunks that are > 64K under DOS */
1875 void /* PRIVATE */
1876 png_handle_tEXt(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1877 {
1878 png_textp text_ptr;
1879 png_charp key;
1880 png_charp text;
1881 png_uint_32 skip = 0;
1882 png_size_t slength;
1883 int ret;
1884
1885 png_debug(1, "in png_handle_tEXt\n");
1886
1887 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1888 png_error(png_ptr, "Missing IHDR before tEXt");
1889
1890 if (png_ptr->mode & PNG_HAVE_IDAT)
1891 png_ptr->mode |= PNG_AFTER_IDAT;
1892
1893 #ifdef PNG_MAX_MALLOC_64K
1894 if (length > (png_uint_32)65535L)
1895 {
1896 png_warning(png_ptr, "tEXt chunk too large to fit in memory");
1897 skip = length - (png_uint_32)65535L;
1898 length = (png_uint_32)65535L;
1899 }
1900 #endif
1901
1902 key = (png_charp)png_malloc_warn(png_ptr, length + 1);
1903 if (key == NULL)
1904 {
1905 png_warning(png_ptr, "No memory to process text chunk.");
1906 return;
1907 }
1908 slength = (png_size_t)length;
1909 png_crc_read(png_ptr, (png_bytep)key, slength);
1910
1911 if (png_crc_finish(png_ptr, skip))
1912 {
1913 png_free(png_ptr, key);
1914 return;
1915 }
1916
1917 key[slength] = 0x00;
1918
1919 for (text = key; *text; text++)
1920 /* empty loop to find end of key */ ;
1921
1922 if (text != key + slength)
1923 text++;
1924
1925 text_ptr = (png_textp)png_malloc_warn(png_ptr,
1926 (png_uint_32)png_sizeof(png_text));
1927 if (text_ptr == NULL)
1928 {
1929 png_warning(png_ptr, "Not enough memory to process text chunk.");
1930 png_free(png_ptr, key);
1931 return;
1932 }
1933 text_ptr->compression = PNG_TEXT_COMPRESSION_NONE;
1934 text_ptr->key = key;
1935 #ifdef PNG_iTXt_SUPPORTED
1936 text_ptr->lang = NULL;
1937 text_ptr->lang_key = NULL;
1938 text_ptr->itxt_length = 0;
1939 #endif
1940 text_ptr->text = text;
1941 text_ptr->text_length = png_strlen(text);
1942
1943 ret=png_set_text_2(png_ptr, info_ptr, text_ptr, 1);
1944
1945 png_free(png_ptr, key);
1946 png_free(png_ptr, text_ptr);
1947 if (ret)
1948 png_warning(png_ptr, "Insufficient memory to process text chunk.");
1949 }
1950 #endif
1951
1952 #if defined(PNG_READ_zTXt_SUPPORTED)
1953 /* note: this does not correctly handle chunks that are > 64K under DOS */
1954 void /* PRIVATE */
1955 png_handle_zTXt(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
1956 {
1957 png_textp text_ptr;
1958 png_charp chunkdata;
1959 png_charp text;
1960 int comp_type;
1961 int ret;
1962 png_size_t slength, prefix_len, data_len;
1963
1964 png_debug(1, "in png_handle_zTXt\n");
1965 if (!(png_ptr->mode & PNG_HAVE_IHDR))
1966 png_error(png_ptr, "Missing IHDR before zTXt");
1967
1968 if (png_ptr->mode & PNG_HAVE_IDAT)
1969 png_ptr->mode |= PNG_AFTER_IDAT;
1970
1971 #ifdef PNG_MAX_MALLOC_64K
1972 /* We will no doubt have problems with chunks even half this size, but
1973 there is no hard and fast rule to tell us where to stop. */
1974 if (length > (png_uint_32)65535L)
1975 {
1976 png_warning(png_ptr,"zTXt chunk too large to fit in memory");
1977 png_crc_finish(png_ptr, length);
1978 return;
1979 }
1980 #endif
1981
1982 chunkdata = (png_charp)png_malloc_warn(png_ptr, length + 1);
1983 if (chunkdata == NULL)
1984 {
1985 png_warning(png_ptr,"Out of memory processing zTXt chunk.");
1986 return;
1987 }
1988 slength = (png_size_t)length;
1989 png_crc_read(png_ptr, (png_bytep)chunkdata, slength);
1990 if (png_crc_finish(png_ptr, 0))
1991 {
1992 png_free(png_ptr, chunkdata);
1993 return;
1994 }
1995
1996 chunkdata[slength] = 0x00;
1997
1998 for (text = chunkdata; *text; text++)
1999 /* empty loop */ ;
2000
2001 /* zTXt must have some text after the chunkdataword */
2002 if (text >= chunkdata + slength - 2)
2003 {
2004 png_warning(png_ptr, "Truncated zTXt chunk");
2005 png_free(png_ptr, chunkdata);
2006 return;
2007 }
2008 else
2009 {
2010 comp_type = *(++text);
2011 if (comp_type != PNG_TEXT_COMPRESSION_zTXt)
2012 {
2013 png_warning(png_ptr, "Unknown compression type in zTXt chunk");
2014 comp_type = PNG_TEXT_COMPRESSION_zTXt;
2015 }
2016 text++; /* skip the compression_method byte */
2017 }
2018 prefix_len = text - chunkdata;
2019
2020 chunkdata = (png_charp)png_decompress_chunk(png_ptr, comp_type, chunkdata,
2021 (png_size_t)length, prefix_len, &data_len);
2022
2023 text_ptr = (png_textp)png_malloc_warn(png_ptr,
2024 (png_uint_32)png_sizeof(png_text));
2025 if (text_ptr == NULL)
2026 {
2027 png_warning(png_ptr,"Not enough memory to process zTXt chunk.");
2028 png_free(png_ptr, chunkdata);
2029 return;
2030 }
2031 text_ptr->compression = comp_type;
2032 text_ptr->key = chunkdata;
2033 #ifdef PNG_iTXt_SUPPORTED
2034 text_ptr->lang = NULL;
2035 text_ptr->lang_key = NULL;
2036 text_ptr->itxt_length = 0;
2037 #endif
2038 text_ptr->text = chunkdata + prefix_len;
2039 text_ptr->text_length = data_len;
2040
2041 ret=png_set_text_2(png_ptr, info_ptr, text_ptr, 1);
2042
2043 png_free(png_ptr, text_ptr);
2044 png_free(png_ptr, chunkdata);
2045 if (ret)
2046 png_error(png_ptr, "Insufficient memory to store zTXt chunk.");
2047 }
2048 #endif
2049
2050 #if defined(PNG_READ_iTXt_SUPPORTED)
2051 /* note: this does not correctly handle chunks that are > 64K under DOS */
2052 void /* PRIVATE */
2053 png_handle_iTXt(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
2054 {
2055 png_textp text_ptr;
2056 png_charp chunkdata;
2057 png_charp key, lang, text, lang_key;
2058 int comp_flag;
2059 int comp_type = 0;
2060 int ret;
2061 png_size_t slength, prefix_len, data_len;
2062
2063 png_debug(1, "in png_handle_iTXt\n");
2064
2065 if (!(png_ptr->mode & PNG_HAVE_IHDR))
2066 png_error(png_ptr, "Missing IHDR before iTXt");
2067
2068 if (png_ptr->mode & PNG_HAVE_IDAT)
2069 png_ptr->mode |= PNG_AFTER_IDAT;
2070
2071 #ifdef PNG_MAX_MALLOC_64K
2072 /* We will no doubt have problems with chunks even half this size, but
2073 there is no hard and fast rule to tell us where to stop. */
2074 if (length > (png_uint_32)65535L)
2075 {
2076 png_warning(png_ptr,"iTXt chunk too large to fit in memory");
2077 png_crc_finish(png_ptr, length);
2078 return;
2079 }
2080 #endif
2081
2082 chunkdata = (png_charp)png_malloc_warn(png_ptr, length + 1);
2083 if (chunkdata == NULL)
2084 {
2085 png_warning(png_ptr, "No memory to process iTXt chunk.");
2086 return;
2087 }
2088 slength = (png_size_t)length;
2089 png_crc_read(png_ptr, (png_bytep)chunkdata, slength);
2090 if (png_crc_finish(png_ptr, 0))
2091 {
2092 png_free(png_ptr, chunkdata);
2093 return;
2094 }
2095
2096 chunkdata[slength] = 0x00;
2097
2098 for (lang = chunkdata; *lang; lang++)
2099 /* empty loop */ ;
2100 lang++; /* skip NUL separator */
2101
2102 /* iTXt must have a language tag (possibly empty), two compression bytes,
2103 translated keyword (possibly empty), and possibly some text after the
2104 keyword */
2105
2106 if (lang >= chunkdata + slength - 3)
2107 {
2108 png_warning(png_ptr, "Truncated iTXt chunk");
2109 png_free(png_ptr, chunkdata);
2110 return;
2111 }
2112 else
2113 {
2114 comp_flag = *lang++;
2115 comp_type = *lang++;
2116 }
2117
2118 for (lang_key = lang; *lang_key; lang_key++)
2119 /* empty loop */ ;
2120 lang_key++; /* skip NUL separator */
2121
2122 if (lang_key >= chunkdata + slength)
2123 {
2124 png_warning(png_ptr, "Truncated iTXt chunk");
2125 png_free(png_ptr, chunkdata);
2126 return;
2127 }
2128
2129 for (text = lang_key; *text; text++)
2130 /* empty loop */ ;
2131 text++; /* skip NUL separator */
2132 if (text >= chunkdata + slength)
2133 {
2134 png_warning(png_ptr, "Malformed iTXt chunk");
2135 png_free(png_ptr, chunkdata);
2136 return;
2137 }
2138
2139 prefix_len = text - chunkdata;
2140
2141 key=chunkdata;
2142 if (comp_flag)
2143 chunkdata = png_decompress_chunk(png_ptr, comp_type, chunkdata,
2144 (size_t)length, prefix_len, &data_len);
2145 else
2146 data_len=png_strlen(chunkdata + prefix_len);
2147 text_ptr = (png_textp)png_malloc_warn(png_ptr,
2148 (png_uint_32)png_sizeof(png_text));
2149 if (text_ptr == NULL)
2150 {
2151 png_warning(png_ptr,"Not enough memory to process iTXt chunk.");
2152 png_free(png_ptr, chunkdata);
2153 return;
2154 }
2155 text_ptr->compression = (int)comp_flag + 1;
2156 text_ptr->lang_key = chunkdata+(lang_key-key);
2157 text_ptr->lang = chunkdata+(lang-key);
2158 text_ptr->itxt_length = data_len;
2159 text_ptr->text_length = 0;
2160 text_ptr->key = chunkdata;
2161 text_ptr->text = chunkdata + prefix_len;
2162
2163 ret=png_set_text_2(png_ptr, info_ptr, text_ptr, 1);
2164
2165 png_free(png_ptr, text_ptr);
2166 png_free(png_ptr, chunkdata);
2167 if (ret)
2168 png_error(png_ptr, "Insufficient memory to store iTXt chunk.");
2169 }
2170 #endif
2171
2172 /* This function is called when we haven't found a handler for a
2173 chunk. If there isn't a problem with the chunk itself (ie bad
2174 chunk name, CRC, or a critical chunk), the chunk is silently ignored
2175 -- unless the PNG_FLAG_UNKNOWN_CHUNKS_SUPPORTED flag is on in which
2176 case it will be saved away to be written out later. */
2177 void /* PRIVATE */
2178 png_handle_unknown(png_structp png_ptr, png_infop info_ptr, png_uint_32 length)
2179 {
2180 png_uint_32 skip = 0;
2181
2182 png_debug(1, "in png_handle_unknown\n");
2183
2184 if (png_ptr->mode & PNG_HAVE_IDAT)
2185 {
2186 #ifdef PNG_USE_LOCAL_ARRAYS
2187 PNG_CONST PNG_IDAT;
2188 #endif
2189 if (png_memcmp(png_ptr->chunk_name, png_IDAT, 4)) /* not an IDAT */
2190 png_ptr->mode |= PNG_AFTER_IDAT;
2191 }
2192
2193 png_check_chunk_name(png_ptr, png_ptr->chunk_name);
2194
2195 if (!(png_ptr->chunk_name[0] & 0x20))
2196 {
2197 #if defined(PNG_READ_UNKNOWN_CHUNKS_SUPPORTED)
2198 if(png_handle_as_unknown(png_ptr, png_ptr->chunk_name) !=
2199 PNG_HANDLE_CHUNK_ALWAYS
2200 #if defined(PNG_READ_USER_CHUNKS_SUPPORTED)
2201 && png_ptr->read_user_chunk_fn == NULL
2202 #endif
2203 )
2204 #endif
2205 png_chunk_error(png_ptr, "unknown critical chunk");
2206 }
2207
2208 #if defined(PNG_READ_UNKNOWN_CHUNKS_SUPPORTED)
2209 if ((png_ptr->flags & PNG_FLAG_KEEP_UNKNOWN_CHUNKS) ||
2210 (png_ptr->read_user_chunk_fn != NULL))
2211 {
2212 #ifdef PNG_MAX_MALLOC_64K
2213 if (length > (png_uint_32)65535L)
2214 {
2215 png_warning(png_ptr, "unknown chunk too large to fit in memory");
2216 skip = length - (png_uint_32)65535L;
2217 length = (png_uint_32)65535L;
2218 }
2219 #endif
2220 png_memcpy((png_charp)png_ptr->unknown_chunk.name,
2221 (png_charp)png_ptr->chunk_name,
2222 png_sizeof(png_ptr->unknown_chunk.name));
2223 png_ptr->unknown_chunk.name[png_sizeof(png_ptr->unknown_chunk.name)-1] = '\0';
2224 png_ptr->unknown_chunk.size = (png_size_t)length;
2225 if (length == 0)
2226 png_ptr->unknown_chunk.data = NULL;
2227 else
2228 {
2229 png_ptr->unknown_chunk.data = (png_bytep)png_malloc(png_ptr, length);
2230 png_crc_read(png_ptr, (png_bytep)png_ptr->unknown_chunk.data, length);
2231 }
2232 #if defined(PNG_READ_USER_CHUNKS_SUPPORTED)
2233 if(png_ptr->read_user_chunk_fn != NULL)
2234 {
2235 /* callback to user unknown chunk handler */
2236 int ret;
2237 ret = (*(png_ptr->read_user_chunk_fn))
2238 (png_ptr, &png_ptr->unknown_chunk);
2239 if (ret < 0)
2240 png_chunk_error(png_ptr, "error in user chunk");
2241 if (ret == 0)
2242 {
2243 if (!(png_ptr->chunk_name[0] & 0x20))
2244 if(png_handle_as_unknown(png_ptr, png_ptr->chunk_name) !=
2245 PNG_HANDLE_CHUNK_ALWAYS)
2246 png_chunk_error(png_ptr, "unknown critical chunk");
2247 png_set_unknown_chunks(png_ptr, info_ptr,
2248 &png_ptr->unknown_chunk, 1);
2249 }
2250 }
2251 else
2252 #endif
2253 png_set_unknown_chunks(png_ptr, info_ptr, &png_ptr->unknown_chunk, 1);
2254 png_free(png_ptr, png_ptr->unknown_chunk.data);
2255 png_ptr->unknown_chunk.data = NULL;
2256 }
2257 else
2258 #endif
2259 skip = length;
2260
2261 png_crc_finish(png_ptr, skip);
2262
2263 #if !defined(PNG_READ_USER_CHUNKS_SUPPORTED)
2264 info_ptr = info_ptr; /* quiet compiler warnings about unused info_ptr */
2265 #endif
2266 }
2267
2268 /* This function is called to verify that a chunk name is valid.
2269 This function can't have the "critical chunk check" incorporated
2270 into it, since in the future we will need to be able to call user
2271 functions to handle unknown critical chunks after we check that
2272 the chunk name itself is valid. */
2273
2274 #define isnonalpha(c) ((c) < 65 || (c) > 122 || ((c) > 90 && (c) < 97))
2275
2276 void /* PRIVATE */
2277 png_check_chunk_name(png_structp png_ptr, png_bytep chunk_name)
2278 {
2279 png_debug(1, "in png_check_chunk_name\n");
2280 if (isnonalpha(chunk_name[0]) || isnonalpha(chunk_name[1]) ||
2281 isnonalpha(chunk_name[2]) || isnonalpha(chunk_name[3]))
2282 {
2283 png_chunk_error(png_ptr, "invalid chunk type");
2284 }
2285 }
2286
2287 /* Combines the row recently read in with the existing pixels in the
2288 row. This routine takes care of alpha and transparency if requested.
2289 This routine also handles the two methods of progressive display
2290 of interlaced images, depending on the mask value.
2291 The mask value describes which pixels are to be combined with
2292 the row. The pattern always repeats every 8 pixels, so just 8
2293 bits are needed. A one indicates the pixel is to be combined,
2294 a zero indicates the pixel is to be skipped. This is in addition
2295 to any alpha or transparency value associated with the pixel. If
2296 you want all pixels to be combined, pass 0xff (255) in mask. */
2297
2298 void /* PRIVATE */
2299 png_combine_row(png_structp png_ptr, png_bytep row, int mask)
2300 {
2301 png_debug(1,"in png_combine_row\n");
2302 if (mask == 0xff)
2303 {
2304 png_memcpy(row, png_ptr->row_buf + 1,
2305 PNG_ROWBYTES(png_ptr->row_info.pixel_depth, png_ptr->width));
2306 }
2307 else
2308 {
2309 switch (png_ptr->row_info.pixel_depth)
2310 {
2311 case 1:
2312 {
2313 png_bytep sp = png_ptr->row_buf + 1;
2314 png_bytep dp = row;
2315 int s_inc, s_start, s_end;
2316 int m = 0x80;
2317 int shift;
2318 png_uint_32 i;
2319 png_uint_32 row_width = png_ptr->width;
2320
2321 #if defined(PNG_READ_PACKSWAP_SUPPORTED)
2322 if (png_ptr->transformations & PNG_PACKSWAP)
2323 {
2324 s_start = 0;
2325 s_end = 7;
2326 s_inc = 1;
2327 }
2328 else
2329 #endif
2330 {
2331 s_start = 7;
2332 s_end = 0;
2333 s_inc = -1;
2334 }
2335
2336 shift = s_start;
2337
2338 for (i = 0; i < row_width; i++)
2339 {
2340 if (m & mask)
2341 {
2342 int value;
2343
2344 value = (*sp >> shift) & 0x01;
2345 *dp &= (png_byte)((0x7f7f >> (7 - shift)) & 0xff);
2346 *dp |= (png_byte)(value << shift);
2347 }
2348
2349 if (shift == s_end)
2350 {
2351 shift = s_start;
2352 sp++;
2353 dp++;
2354 }
2355 else
2356 shift += s_inc;
2357
2358 if (m == 1)
2359 m = 0x80;
2360 else
2361 m >>= 1;
2362 }
2363 break;
2364 }
2365 case 2:
2366 {
2367 png_bytep sp = png_ptr->row_buf + 1;
2368 png_bytep dp = row;
2369 int s_start, s_end, s_inc;
2370 int m = 0x80;
2371 int shift;
2372 png_uint_32 i;
2373 png_uint_32 row_width = png_ptr->width;
2374 int value;
2375
2376 #if defined(PNG_READ_PACKSWAP_SUPPORTED)
2377 if (png_ptr->transformations & PNG_PACKSWAP)
2378 {
2379 s_start = 0;
2380 s_end = 6;
2381 s_inc = 2;
2382 }
2383 else
2384 #endif
2385 {
2386 s_start = 6;
2387 s_end = 0;
2388 s_inc = -2;
2389 }
2390
2391 shift = s_start;
2392
2393 for (i = 0; i < row_width; i++)
2394 {
2395 if (m & mask)
2396 {
2397 value = (*sp >> shift) & 0x03;
2398 *dp &= (png_byte)((0x3f3f >> (6 - shift)) & 0xff);
2399 *dp |= (png_byte)(value << shift);
2400 }
2401
2402 if (shift == s_end)
2403 {
2404 shift = s_start;
2405 sp++;
2406 dp++;
2407 }
2408 else
2409 shift += s_inc;
2410 if (m == 1)
2411 m = 0x80;
2412 else
2413 m >>= 1;
2414 }
2415 break;
2416 }
2417 case 4:
2418 {
2419 png_bytep sp = png_ptr->row_buf + 1;
2420 png_bytep dp = row;
2421 int s_start, s_end, s_inc;
2422 int m = 0x80;
2423 int shift;
2424 png_uint_32 i;
2425 png_uint_32 row_width = png_ptr->width;
2426 int value;
2427
2428 #if defined(PNG_READ_PACKSWAP_SUPPORTED)
2429 if (png_ptr->transformations & PNG_PACKSWAP)
2430 {
2431 s_start = 0;
2432 s_end = 4;
2433 s_inc = 4;
2434 }
2435 else
2436 #endif
2437 {
2438 s_start = 4;
2439 s_end = 0;
2440 s_inc = -4;
2441 }
2442 shift = s_start;
2443
2444 for (i = 0; i < row_width; i++)
2445 {
2446 if (m & mask)
2447 {
2448 value = (*sp >> shift) & 0xf;
2449 *dp &= (png_byte)((0xf0f >> (4 - shift)) & 0xff);
2450 *dp |= (png_byte)(value << shift);
2451 }
2452
2453 if (shift == s_end)
2454 {
2455 shift = s_start;
2456 sp++;
2457 dp++;
2458 }
2459 else
2460 shift += s_inc;
2461 if (m == 1)
2462 m = 0x80;
2463 else
2464 m >>= 1;
2465 }
2466 break;
2467 }
2468 default:
2469 {
2470 png_bytep sp = png_ptr->row_buf + 1;
2471 png_bytep dp = row;
2472 png_size_t pixel_bytes = (png_ptr->row_info.pixel_depth >> 3);
2473 png_uint_32 i;
2474 png_uint_32 row_width = png_ptr->width;
2475 png_byte m = 0x80;
2476
2477
2478 for (i = 0; i < row_width; i++)
2479 {
2480 if (m & mask)
2481 {
2482 png_memcpy(dp, sp, pixel_bytes);
2483 }
2484
2485 sp += pixel_bytes;
2486 dp += pixel_bytes;
2487
2488 if (m == 1)
2489 m = 0x80;
2490 else
2491 m >>= 1;
2492 }
2493 break;
2494 }
2495 }
2496 }
2497 }
2498
2499 #ifdef PNG_READ_INTERLACING_SUPPORTED
2500 /* OLD pre-1.0.9 interface:
2501 void png_do_read_interlace(png_row_infop row_info, png_bytep row, int pass,
2502 png_uint_32 transformations)
2503 */
2504 void /* PRIVATE */
2505 png_do_read_interlace(png_structp png_ptr)
2506 {
2507 png_row_infop row_info = &(png_ptr->row_info);
2508 png_bytep row = png_ptr->row_buf + 1;
2509 int pass = png_ptr->pass;
2510 png_uint_32 transformations = png_ptr->transformations;
2511 #ifdef PNG_USE_LOCAL_ARRAYS
2512 /* arrays to facilitate easy interlacing - use pass (0 - 6) as index */
2513 /* offset to next interlace block */
2514 PNG_CONST int png_pass_inc[7] = {8, 8, 4, 4, 2, 2, 1};
2515 #endif
2516
2517 png_debug(1,"in png_do_read_interlace\n");
2518 if (row != NULL && row_info != NULL)
2519 {
2520 png_uint_32 final_width;
2521
2522 final_width = row_info->width * png_pass_inc[pass];
2523
2524 switch (row_info->pixel_depth)
2525 {
2526 case 1:
2527 {
2528 png_bytep sp = row + (png_size_t)((row_info->width - 1) >> 3);
2529 png_bytep dp = row + (png_size_t)((final_width - 1) >> 3);
2530 int sshift, dshift;
2531 int s_start, s_end, s_inc;
2532 int jstop = png_pass_inc[pass];
2533 png_byte v;
2534 png_uint_32 i;
2535 int j;
2536
2537 #if defined(PNG_READ_PACKSWAP_SUPPORTED)
2538 if (transformations & PNG_PACKSWAP)
2539 {
2540 sshift = (int)((row_info->width + 7) & 0x07);
2541 dshift = (int)((final_width + 7) & 0x07);
2542 s_start = 7;
2543 s_end = 0;
2544 s_inc = -1;
2545 }
2546 else
2547 #endif
2548 {
2549 sshift = 7 - (int)((row_info->width + 7) & 0x07);
2550 dshift = 7 - (int)((final_width + 7) & 0x07);
2551 s_start = 0;
2552 s_end = 7;
2553 s_inc = 1;
2554 }
2555
2556 for (i = 0; i < row_info->width; i++)
2557 {
2558 v = (png_byte)((*sp >> sshift) & 0x01);
2559 for (j = 0; j < jstop; j++)
2560 {
2561 *dp &= (png_byte)((0x7f7f >> (7 - dshift)) & 0xff);
2562 *dp |= (png_byte)(v << dshift);
2563 if (dshift == s_end)
2564 {
2565 dshift = s_start;
2566 dp--;
2567 }
2568 else
2569 dshift += s_inc;
2570 }
2571 if (sshift == s_end)
2572 {
2573 sshift = s_start;
2574 sp--;
2575 }
2576 else
2577 sshift += s_inc;
2578 }
2579 break;
2580 }
2581 case 2:
2582 {
2583 png_bytep sp = row + (png_uint_32)((row_info->width - 1) >> 2);
2584 png_bytep dp = row + (png_uint_32)((final_width - 1) >> 2);
2585 int sshift, dshift;
2586 int s_start, s_end, s_inc;
2587 int jstop = png_pass_inc[pass];
2588 png_uint_32 i;
2589
2590 #if defined(PNG_READ_PACKSWAP_SUPPORTED)
2591 if (transformations & PNG_PACKSWAP)
2592 {
2593 sshift = (int)(((row_info->width + 3) & 0x03) << 1);
2594 dshift = (int)(((final_width + 3) & 0x03) << 1);
2595 s_start = 6;
2596 s_end = 0;
2597 s_inc = -2;
2598 }
2599 else
2600 #endif
2601 {
2602 sshift = (int)((3 - ((row_info->width + 3) & 0x03)) << 1);
2603 dshift = (int)((3 - ((final_width + 3) & 0x03)) << 1);
2604 s_start = 0;
2605 s_end = 6;
2606 s_inc = 2;
2607 }
2608
2609 for (i = 0; i < row_info->width; i++)
2610 {
2611 png_byte v;
2612 int j;
2613
2614 v = (png_byte)((*sp >> sshift) & 0x03);
2615 for (j = 0; j < jstop; j++)
2616 {
2617 *dp &= (png_byte)((0x3f3f >> (6 - dshift)) & 0xff);
2618 *dp |= (png_byte)(v << dshift);
2619 if (dshift == s_end)
2620 {
2621 dshift = s_start;
2622 dp--;
2623 }
2624 else
2625 dshift += s_inc;
2626 }
2627 if (sshift == s_end)
2628 {
2629 sshift = s_start;
2630 sp--;
2631 }
2632 else
2633 sshift += s_inc;
2634 }
2635 break;
2636 }
2637 case 4:
2638 {
2639 png_bytep sp = row + (png_size_t)((row_info->width - 1) >> 1);
2640 png_bytep dp = row + (png_size_t)((final_width - 1) >> 1);
2641 int sshift, dshift;
2642 int s_start, s_end, s_inc;
2643 png_uint_32 i;
2644 int jstop = png_pass_inc[pass];
2645
2646 #if defined(PNG_READ_PACKSWAP_SUPPORTED)
2647 if (transformations & PNG_PACKSWAP)
2648 {
2649 sshift = (int)(((row_info->width + 1) & 0x01) << 2);
2650 dshift = (int)(((final_width + 1) & 0x01) << 2);
2651 s_start = 4;
2652 s_end = 0;
2653 s_inc = -4;
2654 }
2655 else
2656 #endif
2657 {
2658 sshift = (int)((1 - ((row_info->width + 1) & 0x01)) << 2);
2659 dshift = (int)((1 - ((final_width + 1) & 0x01)) << 2);
2660 s_start = 0;
2661 s_end = 4;
2662 s_inc = 4;
2663 }
2664
2665 for (i = 0; i < row_info->width; i++)
2666 {
2667 png_byte v = (png_byte)((*sp >> sshift) & 0xf);
2668 int j;
2669
2670 for (j = 0; j < jstop; j++)
2671 {
2672 *dp &= (png_byte)((0xf0f >> (4 - dshift)) & 0xff);
2673 *dp |= (png_byte)(v << dshift);
2674 if (dshift == s_end)
2675 {
2676 dshift = s_start;
2677 dp--;
2678 }
2679 else
2680 dshift += s_inc;
2681 }
2682 if (sshift == s_end)
2683 {
2684 sshift = s_start;
2685 sp--;
2686 }
2687 else
2688 sshift += s_inc;
2689 }
2690 break;
2691 }
2692 default:
2693 {
2694 png_size_t pixel_bytes = (row_info->pixel_depth >> 3);
2695 png_bytep sp = row + (png_size_t)(row_info->width - 1) * pixel_bytes;
2696 png_bytep dp = row + (png_size_t)(final_width - 1) * pixel_bytes;
2697
2698 int jstop = png_pass_inc[pass];
2699 png_uint_32 i;
2700
2701 for (i = 0; i < row_info->width; i++)
2702 {
2703 png_byte v[8];
2704 int j;
2705
2706 png_memcpy(v, sp, pixel_bytes);
2707 for (j = 0; j < jstop; j++)
2708 {
2709 png_memcpy(dp, v, pixel_bytes);
2710 dp -= pixel_bytes;
2711 }
2712 sp -= pixel_bytes;
2713 }
2714 break;
2715 }
2716 }
2717 row_info->width = final_width;
2718 row_info->rowbytes = PNG_ROWBYTES(row_info->pixel_depth,final_width);
2719 }
2720 #if !defined(PNG_READ_PACKSWAP_SUPPORTED)
2721 transformations = transformations; /* silence compiler warning */
2722 #endif
2723 }
2724 #endif /* PNG_READ_INTERLACING_SUPPORTED */
2725
2726 void /* PRIVATE */
2727 png_read_filter_row(png_structp png_ptr, png_row_infop row_info, png_bytep row,
2728 png_bytep prev_row, int filter)
2729 {
2730 png_debug(1, "in png_read_filter_row\n");
2731 png_debug2(2,"row = %lu, filter = %d\n", png_ptr->row_number, filter);
2732 switch (filter)
2733 {
2734 case PNG_FILTER_VALUE_NONE:
2735 break;
2736 case PNG_FILTER_VALUE_SUB:
2737 {
2738 png_uint_32 i;
2739 png_uint_32 istop = row_info->rowbytes;
2740 png_uint_32 bpp = (row_info->pixel_depth + 7) >> 3;
2741 png_bytep rp = row + bpp;
2742 png_bytep lp = row;
2743
2744 for (i = bpp; i < istop; i++)
2745 {
2746 *rp = (png_byte)(((int)(*rp) + (int)(*lp++)) & 0xff);
2747 rp++;
2748 }
2749 break;
2750 }
2751 case PNG_FILTER_VALUE_UP:
2752 {
2753 png_uint_32 i;
2754 png_uint_32 istop = row_info->rowbytes;
2755 png_bytep rp = row;
2756 png_bytep pp = prev_row;
2757
2758 for (i = 0; i < istop; i++)
2759 {
2760 *rp = (png_byte)(((int)(*rp) + (int)(*pp++)) & 0xff);
2761 rp++;
2762 }
2763 break;
2764 }
2765 case PNG_FILTER_VALUE_AVG:
2766 {
2767 png_uint_32 i;
2768 png_bytep rp = row;
2769 png_bytep pp = prev_row;
2770 png_bytep lp = row;
2771 png_uint_32 bpp = (row_info->pixel_depth + 7) >> 3;
2772 png_uint_32 istop = row_info->rowbytes - bpp;
2773
2774 for (i = 0; i < bpp; i++)
2775 {
2776 *rp = (png_byte)(((int)(*rp) +
2777 ((int)(*pp++) / 2 )) & 0xff);
2778 rp++;
2779 }
2780
2781 for (i = 0; i < istop; i++)
2782 {
2783 *rp = (png_byte)(((int)(*rp) +
2784 (int)(*pp++ + *lp++) / 2 ) & 0xff);
2785 rp++;
2786 }
2787 break;
2788 }
2789 case PNG_FILTER_VALUE_PAETH:
2790 {
2791 png_uint_32 i;
2792 png_bytep rp = row;
2793 png_bytep pp = prev_row;
2794 png_bytep lp = row;
2795 png_bytep cp = prev_row;
2796 png_uint_32 bpp = (row_info->pixel_depth + 7) >> 3;
2797 png_uint_32 istop=row_info->rowbytes - bpp;
2798
2799 for (i = 0; i < bpp; i++)
2800 {
2801 *rp = (png_byte)(((int)(*rp) + (int)(*pp++)) & 0xff);
2802 rp++;
2803 }
2804
2805 for (i = 0; i < istop; i++) /* use leftover rp,pp */
2806 {
2807 int a, b, c, pa, pb, pc, p;
2808
2809 a = *lp++;
2810 b = *pp++;
2811 c = *cp++;
2812
2813 p = b - c;
2814 pc = a - c;
2815
2816 #ifdef PNG_USE_ABS
2817 pa = abs(p);
2818 pb = abs(pc);
2819 pc = abs(p + pc);
2820 #else
2821 pa = p < 0 ? -p : p;
2822 pb = pc < 0 ? -pc : pc;
2823 pc = (p + pc) < 0 ? -(p + pc) : p + pc;
2824 #endif
2825
2826 /*
2827 if (pa <= pb && pa <= pc)
2828 p = a;
2829 else if (pb <= pc)
2830 p = b;
2831 else
2832 p = c;
2833 */
2834
2835 p = (pa <= pb && pa <=pc) ? a : (pb <= pc) ? b : c;
2836
2837 *rp = (png_byte)(((int)(*rp) + p) & 0xff);
2838 rp++;
2839 }
2840 break;
2841 }
2842 default:
2843 png_warning(png_ptr, "Ignoring bad adaptive filter type");
2844 *row=0;
2845 break;
2846 }
2847 }
2848
2849 void /* PRIVATE */
2850 png_read_finish_row(png_structp png_ptr)
2851 {
2852 #ifdef PNG_USE_LOCAL_ARRAYS
2853 #ifdef PNG_READ_INTERLACING_SUPPORTED
2854 /* arrays to facilitate easy interlacing - use pass (0 - 6) as index */
2855
2856 /* start of interlace block */
2857 PNG_CONST int png_pass_start[7] = {0, 4, 0, 2, 0, 1, 0};
2858
2859 /* offset to next interlace block */
2860 PNG_CONST int png_pass_inc[7] = {8, 8, 4, 4, 2, 2, 1};
2861
2862 /* start of interlace block in the y direction */
2863 PNG_CONST int png_pass_ystart[7] = {0, 0, 4, 0, 2, 0, 1};
2864
2865 /* offset to next interlace block in the y direction */
2866 PNG_CONST int png_pass_yinc[7] = {8, 8, 8, 4, 4, 2, 2};
2867 #endif /* PNG_READ_INTERLACING_SUPPORTED */
2868 #endif
2869
2870 png_debug(1, "in png_read_finish_row\n");
2871 png_ptr->row_number++;
2872 if (png_ptr->row_number < png_ptr->num_rows)
2873 return;
2874
2875 #ifdef PNG_READ_INTERLACING_SUPPORTED
2876 if (png_ptr->interlaced)
2877 {
2878 png_ptr->row_number = 0;
2879 png_memset_check(png_ptr, png_ptr->prev_row, 0,
2880 png_ptr->rowbytes + 1);
2881 do
2882 {
2883 png_ptr->pass++;
2884 if (png_ptr->pass >= 7)
2885 break;
2886 png_ptr->iwidth = (png_ptr->width +
2887 png_pass_inc[png_ptr->pass] - 1 -
2888 png_pass_start[png_ptr->pass]) /
2889 png_pass_inc[png_ptr->pass];
2890
2891 png_ptr->irowbytes = PNG_ROWBYTES(png_ptr->pixel_depth,
2892 png_ptr->iwidth) + 1;
2893
2894 if (!(png_ptr->transformations & PNG_INTERLACE))
2895 {
2896 png_ptr->num_rows = (png_ptr->height +
2897 png_pass_yinc[png_ptr->pass] - 1 -
2898 png_pass_ystart[png_ptr->pass]) /
2899 png_pass_yinc[png_ptr->pass];
2900 if (!(png_ptr->num_rows))
2901 continue;
2902 }
2903 else /* if (png_ptr->transformations & PNG_INTERLACE) */
2904 break;
2905 } while (png_ptr->iwidth == 0);
2906
2907 if (png_ptr->pass < 7)
2908 return;
2909 }
2910 #endif /* PNG_READ_INTERLACING_SUPPORTED */
2911
2912 if (!(png_ptr->flags & PNG_FLAG_ZLIB_FINISHED))
2913 {
2914 #ifdef PNG_USE_LOCAL_ARRAYS
2915 PNG_CONST PNG_IDAT;
2916 #endif
2917 char extra;
2918 int ret;
2919
2920 png_ptr->zstream.next_out = (Byte *)&extra;
2921 png_ptr->zstream.avail_out = (uInt)1;
2922 for(;;)
2923 {
2924 if (!(png_ptr->zstream.avail_in))
2925 {
2926 while (!png_ptr->idat_size)
2927 {
2928 png_byte chunk_length[4];
2929
2930 png_crc_finish(png_ptr, 0);
2931
2932 png_read_data(png_ptr, chunk_length, 4);
2933 png_ptr->idat_size = png_get_uint_31(png_ptr, chunk_length);
2934 png_reset_crc(png_ptr);
2935 png_crc_read(png_ptr, png_ptr->chunk_name, 4);
2936 if (png_memcmp(png_ptr->chunk_name, png_IDAT, 4))
2937 png_error(png_ptr, "Not enough image data");
2938
2939 }
2940 png_ptr->zstream.avail_in = (uInt)png_ptr->zbuf_size;
2941 png_ptr->zstream.next_in = png_ptr->zbuf;
2942 if (png_ptr->zbuf_size > png_ptr->idat_size)
2943 png_ptr->zstream.avail_in = (uInt)png_ptr->idat_size;
2944 png_crc_read(png_ptr, png_ptr->zbuf, png_ptr->zstream.avail_in);
2945 png_ptr->idat_size -= png_ptr->zstream.avail_in;
2946 }
2947 ret = inflate(&png_ptr->zstream, Z_PARTIAL_FLUSH);
2948 if (ret == Z_STREAM_END)
2949 {
2950 if (!(png_ptr->zstream.avail_out) || png_ptr->zstream.avail_in ||
2951 png_ptr->idat_size)
2952 png_warning(png_ptr, "Extra compressed data");
2953 png_ptr->mode |= PNG_AFTER_IDAT;
2954 png_ptr->flags |= PNG_FLAG_ZLIB_FINISHED;
2955 break;
2956 }
2957 if (ret != Z_OK)
2958 png_error(png_ptr, png_ptr->zstream.msg ? png_ptr->zstream.msg :
2959 "Decompression Error");
2960
2961 if (!(png_ptr->zstream.avail_out))
2962 {
2963 png_warning(png_ptr, "Extra compressed data.");
2964 png_ptr->mode |= PNG_AFTER_IDAT;
2965 png_ptr->flags |= PNG_FLAG_ZLIB_FINISHED;
2966 break;
2967 }
2968
2969 }
2970 png_ptr->zstream.avail_out = 0;
2971 }
2972
2973 if (png_ptr->idat_size || png_ptr->zstream.avail_in)
2974 png_warning(png_ptr, "Extra compression data");
2975
2976 inflateReset(&png_ptr->zstream);
2977
2978 png_ptr->mode |= PNG_AFTER_IDAT;
2979 }
2980
2981 void /* PRIVATE */
2982 png_read_start_row(png_structp png_ptr)
2983 {
2984 #ifdef PNG_USE_LOCAL_ARRAYS
2985 #ifdef PNG_READ_INTERLACING_SUPPORTED
2986 /* arrays to facilitate easy interlacing - use pass (0 - 6) as index */
2987
2988 /* start of interlace block */
2989 PNG_CONST int png_pass_start[7] = {0, 4, 0, 2, 0, 1, 0};
2990
2991 /* offset to next interlace block */
2992 PNG_CONST int png_pass_inc[7] = {8, 8, 4, 4, 2, 2, 1};
2993
2994 /* start of interlace block in the y direction */
2995 PNG_CONST int png_pass_ystart[7] = {0, 0, 4, 0, 2, 0, 1};
2996
2997 /* offset to next interlace block in the y direction */
2998 PNG_CONST int png_pass_yinc[7] = {8, 8, 8, 4, 4, 2, 2};
2999 #endif
3000 #endif
3001
3002 int max_pixel_depth;
3003 png_uint_32 row_bytes;
3004
3005 png_debug(1, "in png_read_start_row\n");
3006 png_ptr->zstream.avail_in = 0;
3007 png_init_read_transformations(png_ptr);
3008 #ifdef PNG_READ_INTERLACING_SUPPORTED
3009 if (png_ptr->interlaced)
3010 {
3011 if (!(png_ptr->transformations & PNG_INTERLACE))
3012 png_ptr->num_rows = (png_ptr->height + png_pass_yinc[0] - 1 -
3013 png_pass_ystart[0]) / png_pass_yinc[0];
3014 else
3015 png_ptr->num_rows = png_ptr->height;
3016
3017 png_ptr->iwidth = (png_ptr->width +
3018 png_pass_inc[png_ptr->pass] - 1 -
3019 png_pass_start[png_ptr->pass]) /
3020 png_pass_inc[png_ptr->pass];
3021
3022 row_bytes = PNG_ROWBYTES(png_ptr->pixel_depth,png_ptr->iwidth) + 1;
3023
3024 png_ptr->irowbytes = (png_size_t)row_bytes;
3025 if((png_uint_32)png_ptr->irowbytes != row_bytes)
3026 png_error(png_ptr, "Rowbytes overflow in png_read_start_row");
3027 }
3028 else
3029 #endif /* PNG_READ_INTERLACING_SUPPORTED */
3030 {
3031 png_ptr->num_rows = png_ptr->height;
3032 png_ptr->iwidth = png_ptr->width;
3033 png_ptr->irowbytes = png_ptr->rowbytes + 1;
3034 }
3035 max_pixel_depth = png_ptr->pixel_depth;
3036
3037 #if defined(PNG_READ_PACK_SUPPORTED)
3038 if ((png_ptr->transformations & PNG_PACK) && png_ptr->bit_depth < 8)
3039 max_pixel_depth = 8;
3040 #endif
3041
3042 #if defined(PNG_READ_EXPAND_SUPPORTED)
3043 if (png_ptr->transformations & PNG_EXPAND)
3044 {
3045 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
3046 {
3047 if (png_ptr->num_trans)
3048 max_pixel_depth = 32;
3049 else
3050 max_pixel_depth = 24;
3051 }
3052 else if (png_ptr->color_type == PNG_COLOR_TYPE_GRAY)
3053 {
3054 if (max_pixel_depth < 8)
3055 max_pixel_depth = 8;
3056 if (png_ptr->num_trans)
3057 max_pixel_depth *= 2;
3058 }
3059 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB)
3060 {
3061 if (png_ptr->num_trans)
3062 {
3063 max_pixel_depth *= 4;
3064 max_pixel_depth /= 3;
3065 }
3066 }
3067 }
3068 #endif
3069
3070 #if defined(PNG_READ_FILLER_SUPPORTED)
3071 if (png_ptr->transformations & (PNG_FILLER))
3072 {
3073 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
3074 max_pixel_depth = 32;
3075 else if (png_ptr->color_type == PNG_COLOR_TYPE_GRAY)
3076 {
3077 if (max_pixel_depth <= 8)
3078 max_pixel_depth = 16;
3079 else
3080 max_pixel_depth = 32;
3081 }
3082 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB)
3083 {
3084 if (max_pixel_depth <= 32)
3085 max_pixel_depth = 32;
3086 else
3087 max_pixel_depth = 64;
3088 }
3089 }
3090 #endif
3091
3092 #if defined(PNG_READ_GRAY_TO_RGB_SUPPORTED)
3093 if (png_ptr->transformations & PNG_GRAY_TO_RGB)
3094 {
3095 if (
3096 #if defined(PNG_READ_EXPAND_SUPPORTED)
3097 (png_ptr->num_trans && (png_ptr->transformations & PNG_EXPAND)) ||
3098 #endif
3099 #if defined(PNG_READ_FILLER_SUPPORTED)
3100 (png_ptr->transformations & (PNG_FILLER)) ||
3101 #endif
3102 png_ptr->color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
3103 {
3104 if (max_pixel_depth <= 16)
3105 max_pixel_depth = 32;
3106 else
3107 max_pixel_depth = 64;
3108 }
3109 else
3110 {
3111 if (max_pixel_depth <= 8)
3112 {
3113 if (png_ptr->color_type == PNG_COLOR_TYPE_RGB_ALPHA)
3114 max_pixel_depth = 32;
3115 else
3116 max_pixel_depth = 24;
3117 }
3118 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB_ALPHA)
3119 max_pixel_depth = 64;
3120 else
3121 max_pixel_depth = 48;
3122 }
3123 }
3124 #endif
3125
3126 #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED) && \
3127 defined(PNG_USER_TRANSFORM_PTR_SUPPORTED)
3128 if(png_ptr->transformations & PNG_USER_TRANSFORM)
3129 {
3130 int user_pixel_depth=png_ptr->user_transform_depth*
3131 png_ptr->user_transform_channels;
3132 if(user_pixel_depth > max_pixel_depth)
3133 max_pixel_depth=user_pixel_depth;
3134 }
3135 #endif
3136
3137 /* align the width on the next larger 8 pixels. Mainly used
3138 for interlacing */
3139 row_bytes = ((png_ptr->width + 7) & ~((png_uint_32)7));
3140 /* calculate the maximum bytes needed, adding a byte and a pixel
3141 for safety's sake */
3142 row_bytes = PNG_ROWBYTES(max_pixel_depth,row_bytes) +
3143 1 + ((max_pixel_depth + 7) >> 3);
3144 #ifdef PNG_MAX_MALLOC_64K
3145 if (row_bytes > (png_uint_32)65536L)
3146 png_error(png_ptr, "This image requires a row greater than 64KB");
3147 #endif
3148
3149 if(row_bytes + 64 > png_ptr->old_big_row_buf_size)
3150 {
3151 png_free(png_ptr,png_ptr->big_row_buf);
3152 png_ptr->big_row_buf = (png_bytep)png_malloc(png_ptr, row_bytes+64);
3153 png_ptr->row_buf = png_ptr->big_row_buf+32;
3154 png_ptr->old_big_row_buf_size = row_bytes+64;
3155 }
3156
3157 #ifdef PNG_MAX_MALLOC_64K
3158 if ((png_uint_32)png_ptr->rowbytes + 1 > (png_uint_32)65536L)
3159 png_error(png_ptr, "This image requires a row greater than 64KB");
3160 #endif
3161 if ((png_uint_32)png_ptr->rowbytes > (png_uint_32)(PNG_SIZE_MAX - 1))
3162 png_error(png_ptr, "Row has too many bytes to allocate in memory.");
3163
3164 if(png_ptr->rowbytes+1 > png_ptr->old_prev_row_size)
3165 {
3166 png_free(png_ptr,png_ptr->prev_row);
3167 png_ptr->prev_row = (png_bytep)png_malloc(png_ptr, (png_uint_32)(
3168 png_ptr->rowbytes + 1));
3169 png_ptr->old_prev_row_size = png_ptr->rowbytes+1;
3170 }
3171
3172 png_memset_check(png_ptr, png_ptr->prev_row, 0, png_ptr->rowbytes + 1);
3173
3174 png_debug1(3, "width = %lu,\n", png_ptr->width);
3175 png_debug1(3, "height = %lu,\n", png_ptr->height);
3176 png_debug1(3, "iwidth = %lu,\n", png_ptr->iwidth);
3177 png_debug1(3, "num_rows = %lu\n", png_ptr->num_rows);
3178 png_debug1(3, "rowbytes = %lu,\n", png_ptr->rowbytes);
3179 png_debug1(3, "irowbytes = %lu,\n", png_ptr->irowbytes);
3180
3181 png_ptr->flags |= PNG_FLAG_ROW_INIT;
3182 }
3183 #endif /* PNG_READ_SUPPORTED */