1 2/* pngrutil.c - utilities to read a PNG file 3 * 4 * Last changed in libpng 1.6.20 [December 3, 2014] 5 * Copyright (c) 1998-2002,2004,2006-2015 Glenn Randers-Pehrson 6 * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger) 7 * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.) 8 * 9 * This code is released under the libpng license. 10 * For conditions of distribution and use, see the disclaimer 11 * and license in png.h 12 * 13 * This file contains routines that are only called from within 14 * libpng itself during the course of reading an image. 15 */ 16 17#include "pngpriv.h" 18 19#ifdef PNG_READ_SUPPORTED 20 21png_uint_32 PNGAPI 22png_get_uint_31(png_const_structrp png_ptr, png_const_bytep buf) 23{ 24 png_uint_32 uval = png_get_uint_32(buf); 25 26 if (uval > PNG_UINT_31_MAX) 27 png_error(png_ptr, "PNG unsigned integer out of range"); 28 29 return (uval); 30} 31 32#if defined(PNG_READ_gAMA_SUPPORTED) || defined(PNG_READ_cHRM_SUPPORTED) 33/* The following is a variation on the above for use with the fixed 34 * point values used for gAMA and cHRM. Instead of png_error it 35 * issues a warning and returns (-1) - an invalid value because both 36 * gAMA and cHRM use *unsigned* integers for fixed point values. 37 */ 38#define PNG_FIXED_ERROR (-1) 39 40static png_fixed_point /* PRIVATE */ 41png_get_fixed_point(png_structrp png_ptr, png_const_bytep buf) 42{ 43 png_uint_32 uval = png_get_uint_32(buf); 44 45 if (uval <= PNG_UINT_31_MAX) 46 return (png_fixed_point)uval; /* known to be in range */ 47 48 /* The caller can turn off the warning by passing NULL. */ 49 if (png_ptr != NULL) 50 png_warning(png_ptr, "PNG fixed point integer out of range"); 51 52 return PNG_FIXED_ERROR; 53} 54#endif 55 56#ifdef PNG_READ_INT_FUNCTIONS_SUPPORTED 57/* NOTE: the read macros will obscure these definitions, so that if 58 * PNG_USE_READ_MACROS is set the library will not use them internally, 59 * but the APIs will still be available externally. 60 * 61 * The parentheses around "PNGAPI function_name" in the following three 62 * functions are necessary because they allow the macros to co-exist with 63 * these (unused but exported) functions. 64 */ 65 66/* Grab an unsigned 32-bit integer from a buffer in big-endian format. */ 67png_uint_32 (PNGAPI 68png_get_uint_32)(png_const_bytep buf) 69{ 70 png_uint_32 uval = 71 ((png_uint_32)(*(buf )) << 24) + 72 ((png_uint_32)(*(buf + 1)) << 16) + 73 ((png_uint_32)(*(buf + 2)) << 8) + 74 ((png_uint_32)(*(buf + 3)) ) ; 75 76 return uval; 77} 78 79/* Grab a signed 32-bit integer from a buffer in big-endian format. The 80 * data is stored in the PNG file in two's complement format and there 81 * is no guarantee that a 'png_int_32' is exactly 32 bits, therefore 82 * the following code does a two's complement to native conversion. 83 */ 84png_int_32 (PNGAPI 85png_get_int_32)(png_const_bytep buf) 86{ 87 png_uint_32 uval = png_get_uint_32(buf); 88 if ((uval & 0x80000000) == 0) /* non-negative */ 89 return uval; 90 91 uval = (uval ^ 0xffffffff) + 1; /* 2's complement: -x = ~x+1 */ 92 if ((uval & 0x80000000) == 0) /* no overflow */ 93 return -(png_int_32)uval; 94 /* The following has to be safe; this function only gets called on PNG data 95 * and if we get here that data is invalid. 0 is the most safe value and 96 * if not then an attacker would surely just generate a PNG with 0 instead. 97 */ 98 return 0; 99} 100 101/* Grab an unsigned 16-bit integer from a buffer in big-endian format. */ 102png_uint_16 (PNGAPI 103png_get_uint_16)(png_const_bytep buf) 104{ 105 /* ANSI-C requires an int value to accomodate at least 16 bits so this 106 * works and allows the compiler not to worry about possible narrowing 107 * on 32-bit systems. (Pre-ANSI systems did not make integers smaller 108 * than 16 bits either.) 109 */ 110 unsigned int val = 111 ((unsigned int)(*buf) << 8) + 112 ((unsigned int)(*(buf + 1))); 113 114 return (png_uint_16)val; 115} 116 117#endif /* READ_INT_FUNCTIONS */ 118 119/* Read and check the PNG file signature */ 120void /* PRIVATE */ 121png_read_sig(png_structrp png_ptr, png_inforp info_ptr) 122{ 123 png_size_t num_checked, num_to_check; 124 125 /* Exit if the user application does not expect a signature. */ 126 if (png_ptr->sig_bytes >= 8) 127 return; 128 129 num_checked = png_ptr->sig_bytes; 130 num_to_check = 8 - num_checked; 131 132#ifdef PNG_IO_STATE_SUPPORTED 133 png_ptr->io_state = PNG_IO_READING | PNG_IO_SIGNATURE; 134#endif 135 136 /* The signature must be serialized in a single I/O call. */ 137 png_read_data(png_ptr, &(info_ptr->signature[num_checked]), num_to_check); 138 png_ptr->sig_bytes = 8; 139 140 if (png_sig_cmp(info_ptr->signature, num_checked, num_to_check) != 0) 141 { 142 if (num_checked < 4 && 143 png_sig_cmp(info_ptr->signature, num_checked, num_to_check - 4)) 144 png_error(png_ptr, "Not a PNG file"); 145 else 146 png_error(png_ptr, "PNG file corrupted by ASCII conversion"); 147 } 148 if (num_checked < 3) 149 png_ptr->mode |= PNG_HAVE_PNG_SIGNATURE; 150} 151 152/* Read the chunk header (length + type name). 153 * Put the type name into png_ptr->chunk_name, and return the length. 154 */ 155png_uint_32 /* PRIVATE */ 156png_read_chunk_header(png_structrp png_ptr) 157{ 158 png_byte buf[8]; 159 png_uint_32 length; 160 161#ifdef PNG_IO_STATE_SUPPORTED 162 png_ptr->io_state = PNG_IO_READING | PNG_IO_CHUNK_HDR; 163#endif 164 165 /* Read the length and the chunk name. 166 * This must be performed in a single I/O call. 167 */ 168 png_read_data(png_ptr, buf, 8); 169 length = png_get_uint_31(png_ptr, buf); 170 171 /* Put the chunk name into png_ptr->chunk_name. */ 172 png_ptr->chunk_name = PNG_CHUNK_FROM_STRING(buf+4); 173 174 png_debug2(0, "Reading %lx chunk, length = %lu", 175 (unsigned long)png_ptr->chunk_name, (unsigned long)length); 176 177 /* Reset the crc and run it over the chunk name. */ 178 png_reset_crc(png_ptr); 179 png_calculate_crc(png_ptr, buf + 4, 4); 180 181 /* Check to see if chunk name is valid. */ 182 png_check_chunk_name(png_ptr, png_ptr->chunk_name); 183 184#ifdef PNG_IO_STATE_SUPPORTED 185 png_ptr->io_state = PNG_IO_READING | PNG_IO_CHUNK_DATA; 186#endif 187 188 return length; 189} 190 191/* Read data, and (optionally) run it through the CRC. */ 192void /* PRIVATE */ 193png_crc_read(png_structrp png_ptr, png_bytep buf, png_uint_32 length) 194{ 195 if (png_ptr == NULL) 196 return; 197 198 png_read_data(png_ptr, buf, length); 199 png_calculate_crc(png_ptr, buf, length); 200} 201 202/* Optionally skip data and then check the CRC. Depending on whether we 203 * are reading an ancillary or critical chunk, and how the program has set 204 * things up, we may calculate the CRC on the data and print a message. 205 * Returns '1' if there was a CRC error, '0' otherwise. 206 */ 207int /* PRIVATE */ 208png_crc_finish(png_structrp png_ptr, png_uint_32 skip) 209{ 210 /* The size of the local buffer for inflate is a good guess as to a 211 * reasonable size to use for buffering reads from the application. 212 */ 213 while (skip > 0) 214 { 215 png_uint_32 len; 216 png_byte tmpbuf[PNG_INFLATE_BUF_SIZE]; 217 218 len = (sizeof tmpbuf); 219 if (len > skip) 220 len = skip; 221 skip -= len; 222 223 png_crc_read(png_ptr, tmpbuf, len); 224 } 225 226 if (png_crc_error(png_ptr) != 0) 227 { 228 if (PNG_CHUNK_ANCILLARY(png_ptr->chunk_name) != 0 ? 229 (png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_NOWARN) == 0 : 230 (png_ptr->flags & PNG_FLAG_CRC_CRITICAL_USE) != 0) 231 { 232 png_chunk_warning(png_ptr, "CRC error"); 233 } 234 235 else 236 png_chunk_error(png_ptr, "CRC error"); 237 238 return (1); 239 } 240 241 return (0); 242} 243 244/* Compare the CRC stored in the PNG file with that calculated by libpng from 245 * the data it has read thus far. 246 */ 247int /* PRIVATE */ 248png_crc_error(png_structrp png_ptr) 249{ 250 png_byte crc_bytes[4]; 251 png_uint_32 crc; 252 int need_crc = 1; 253 254 if (PNG_CHUNK_ANCILLARY(png_ptr->chunk_name) != 0) 255 { 256 if ((png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_MASK) == 257 (PNG_FLAG_CRC_ANCILLARY_USE | PNG_FLAG_CRC_ANCILLARY_NOWARN)) 258 need_crc = 0; 259 } 260 261 else /* critical */ 262 { 263 if ((png_ptr->flags & PNG_FLAG_CRC_CRITICAL_IGNORE) != 0) 264 need_crc = 0; 265 } 266 267#ifdef PNG_IO_STATE_SUPPORTED 268 png_ptr->io_state = PNG_IO_READING | PNG_IO_CHUNK_CRC; 269#endif 270 271 /* The chunk CRC must be serialized in a single I/O call. */ 272 png_read_data(png_ptr, crc_bytes, 4); 273 274 if (need_crc != 0) 275 { 276 crc = png_get_uint_32(crc_bytes); 277 return ((int)(crc != png_ptr->crc)); 278 } 279 280 else 281 return (0); 282} 283 284#if defined(PNG_READ_iCCP_SUPPORTED) || defined(PNG_READ_iTXt_SUPPORTED) ||\ 285 defined(PNG_READ_pCAL_SUPPORTED) || defined(PNG_READ_sCAL_SUPPORTED) ||\ 286 defined(PNG_READ_sPLT_SUPPORTED) || defined(PNG_READ_tEXt_SUPPORTED) ||\ 287 defined(PNG_READ_zTXt_SUPPORTED) || defined(PNG_SEQUENTIAL_READ_SUPPORTED) 288/* Manage the read buffer; this simply reallocates the buffer if it is not small 289 * enough (or if it is not allocated). The routine returns a pointer to the 290 * buffer; if an error occurs and 'warn' is set the routine returns NULL, else 291 * it will call png_error (via png_malloc) on failure. (warn == 2 means 292 * 'silent'). 293 */ 294static png_bytep 295png_read_buffer(png_structrp png_ptr, png_alloc_size_t new_size, int warn) 296{ 297 png_bytep buffer = png_ptr->read_buffer; 298 299 if (buffer != NULL && new_size > png_ptr->read_buffer_size) 300 { 301 png_ptr->read_buffer = NULL; 302 png_ptr->read_buffer = NULL; 303 png_ptr->read_buffer_size = 0; 304 png_free(png_ptr, buffer); 305 buffer = NULL; 306 } 307 308 if (buffer == NULL) 309 { 310 buffer = png_voidcast(png_bytep, png_malloc_base(png_ptr, new_size)); 311 312 if (buffer != NULL) 313 { 314 png_ptr->read_buffer = buffer; 315 png_ptr->read_buffer_size = new_size; 316 } 317 318 else if (warn < 2) /* else silent */ 319 { 320 if (warn != 0) 321 png_chunk_warning(png_ptr, "insufficient memory to read chunk"); 322 323 else 324 png_chunk_error(png_ptr, "insufficient memory to read chunk"); 325 } 326 } 327 328 return buffer; 329} 330#endif /* READ_iCCP|iTXt|pCAL|sCAL|sPLT|tEXt|zTXt|SEQUENTIAL_READ */ 331 332/* png_inflate_claim: claim the zstream for some nefarious purpose that involves 333 * decompression. Returns Z_OK on success, else a zlib error code. It checks 334 * the owner but, in final release builds, just issues a warning if some other 335 * chunk apparently owns the stream. Prior to release it does a png_error. 336 */ 337static int 338png_inflate_claim(png_structrp png_ptr, png_uint_32 owner) 339{ 340 if (png_ptr->zowner != 0) 341 { 342 char msg[64]; 343 344 PNG_STRING_FROM_CHUNK(msg, png_ptr->zowner); 345 /* So the message that results is "<chunk> using zstream"; this is an 346 * internal error, but is very useful for debugging. i18n requirements 347 * are minimal. 348 */ 349 (void)png_safecat(msg, (sizeof msg), 4, " using zstream"); 350#if PNG_RELEASE_BUILD 351 png_chunk_warning(png_ptr, msg); 352 png_ptr->zowner = 0; 353#else 354 png_chunk_error(png_ptr, msg); 355#endif 356 } 357 358 /* Implementation note: unlike 'png_deflate_claim' this internal function 359 * does not take the size of the data as an argument. Some efficiency could 360 * be gained by using this when it is known *if* the zlib stream itself does 361 * not record the number; however, this is an illusion: the original writer 362 * of the PNG may have selected a lower window size, and we really must 363 * follow that because, for systems with with limited capabilities, we 364 * would otherwise reject the application's attempts to use a smaller window 365 * size (zlib doesn't have an interface to say "this or lower"!). 366 * 367 * inflateReset2 was added to zlib 1.2.4; before this the window could not be 368 * reset, therefore it is necessary to always allocate the maximum window 369 * size with earlier zlibs just in case later compressed chunks need it. 370 */ 371 { 372 int ret; /* zlib return code */ 373#if PNG_ZLIB_VERNUM >= 0x1240 374 375# if defined(PNG_SET_OPTION_SUPPORTED) && defined(PNG_MAXIMUM_INFLATE_WINDOW) 376 int window_bits; 377 378 if (((png_ptr->options >> PNG_MAXIMUM_INFLATE_WINDOW) & 3) == 379 PNG_OPTION_ON) 380 { 381 window_bits = 15; 382 png_ptr->zstream_start = 0; /* fixed window size */ 383 } 384 385 else 386 { 387 window_bits = 0; 388 png_ptr->zstream_start = 1; 389 } 390# else 391# define window_bits 0 392# endif 393#endif 394 395 /* Set this for safety, just in case the previous owner left pointers to 396 * memory allocations. 397 */ 398 png_ptr->zstream.next_in = NULL; 399 png_ptr->zstream.avail_in = 0; 400 png_ptr->zstream.next_out = NULL; 401 png_ptr->zstream.avail_out = 0; 402 403 if ((png_ptr->flags & PNG_FLAG_ZSTREAM_INITIALIZED) != 0) 404 { 405#if PNG_ZLIB_VERNUM < 0x1240 406 ret = inflateReset(&png_ptr->zstream); 407#else 408 ret = inflateReset2(&png_ptr->zstream, window_bits); 409#endif 410 } 411 412 else 413 { 414#if PNG_ZLIB_VERNUM < 0x1240 415 ret = inflateInit(&png_ptr->zstream); 416#else 417 ret = inflateInit2(&png_ptr->zstream, window_bits); 418#endif 419 420 if (ret == Z_OK) 421 png_ptr->flags |= PNG_FLAG_ZSTREAM_INITIALIZED; 422 } 423 424 if (ret == Z_OK) 425 png_ptr->zowner = owner; 426 427 else 428 png_zstream_error(png_ptr, ret); 429 430 return ret; 431 } 432 433#ifdef window_bits 434# undef window_bits 435#endif 436} 437 438#if PNG_ZLIB_VERNUM >= 0x1240 439/* Handle the start of the inflate stream if we called inflateInit2(strm,0); 440 * in this case some zlib versions skip validation of the CINFO field and, in 441 * certain circumstances, libpng may end up displaying an invalid image, in 442 * contrast to implementations that call zlib in the normal way (e.g. libpng 443 * 1.5). 444 */ 445int /* PRIVATE */ 446png_zlib_inflate(png_structrp png_ptr, int flush) 447{ 448 if (png_ptr->zstream_start && png_ptr->zstream.avail_in > 0) 449 { 450 if ((*png_ptr->zstream.next_in >> 4) > 7) 451 { 452 png_ptr->zstream.msg = "invalid window size (libpng)"; 453 return Z_DATA_ERROR; 454 } 455 456 png_ptr->zstream_start = 0; 457 } 458 459 return inflate(&png_ptr->zstream, flush); 460} 461#endif /* Zlib >= 1.2.4 */ 462 463#ifdef PNG_READ_COMPRESSED_TEXT_SUPPORTED 464/* png_inflate now returns zlib error codes including Z_OK and Z_STREAM_END to 465 * allow the caller to do multiple calls if required. If the 'finish' flag is 466 * set Z_FINISH will be passed to the final inflate() call and Z_STREAM_END must 467 * be returned or there has been a problem, otherwise Z_SYNC_FLUSH is used and 468 * Z_OK or Z_STREAM_END will be returned on success. 469 * 470 * The input and output sizes are updated to the actual amounts of data consumed 471 * or written, not the amount available (as in a z_stream). The data pointers 472 * are not changed, so the next input is (data+input_size) and the next 473 * available output is (output+output_size). 474 */ 475static int 476png_inflate(png_structrp png_ptr, png_uint_32 owner, int finish, 477 /* INPUT: */ png_const_bytep input, png_uint_32p input_size_ptr, 478 /* OUTPUT: */ png_bytep output, png_alloc_size_t *output_size_ptr) 479{ 480 if (png_ptr->zowner == owner) /* Else not claimed */ 481 { 482 int ret; 483 png_alloc_size_t avail_out = *output_size_ptr; 484 png_uint_32 avail_in = *input_size_ptr; 485 486 /* zlib can't necessarily handle more than 65535 bytes at once (i.e. it 487 * can't even necessarily handle 65536 bytes) because the type uInt is 488 * "16 bits or more". Consequently it is necessary to chunk the input to 489 * zlib. This code uses ZLIB_IO_MAX, from pngpriv.h, as the maximum (the 490 * maximum value that can be stored in a uInt.) It is possible to set 491 * ZLIB_IO_MAX to a lower value in pngpriv.h and this may sometimes have 492 * a performance advantage, because it reduces the amount of data accessed 493 * at each step and that may give the OS more time to page it in. 494 */ 495 png_ptr->zstream.next_in = PNGZ_INPUT_CAST(input); 496 /* avail_in and avail_out are set below from 'size' */ 497 png_ptr->zstream.avail_in = 0; 498 png_ptr->zstream.avail_out = 0; 499 500 /* Read directly into the output if it is available (this is set to 501 * a local buffer below if output is NULL). 502 */ 503 if (output != NULL) 504 png_ptr->zstream.next_out = output; 505 506 do 507 { 508 uInt avail; 509 Byte local_buffer[PNG_INFLATE_BUF_SIZE]; 510 511 /* zlib INPUT BUFFER */ 512 /* The setting of 'avail_in' used to be outside the loop; by setting it 513 * inside it is possible to chunk the input to zlib and simply rely on 514 * zlib to advance the 'next_in' pointer. This allows arbitrary 515 * amounts of data to be passed through zlib at the unavoidable cost of 516 * requiring a window save (memcpy of up to 32768 output bytes) 517 * every ZLIB_IO_MAX input bytes. 518 */ 519 avail_in += png_ptr->zstream.avail_in; /* not consumed last time */ 520 521 avail = ZLIB_IO_MAX; 522 523 if (avail_in < avail) 524 avail = (uInt)avail_in; /* safe: < than ZLIB_IO_MAX */ 525 526 avail_in -= avail; 527 png_ptr->zstream.avail_in = avail; 528 529 /* zlib OUTPUT BUFFER */ 530 avail_out += png_ptr->zstream.avail_out; /* not written last time */ 531 532 avail = ZLIB_IO_MAX; /* maximum zlib can process */ 533 534 if (output == NULL) 535 { 536 /* Reset the output buffer each time round if output is NULL and 537 * make available the full buffer, up to 'remaining_space' 538 */ 539 png_ptr->zstream.next_out = local_buffer; 540 if ((sizeof local_buffer) < avail) 541 avail = (sizeof local_buffer); 542 } 543 544 if (avail_out < avail) 545 avail = (uInt)avail_out; /* safe: < ZLIB_IO_MAX */ 546 547 png_ptr->zstream.avail_out = avail; 548 avail_out -= avail; 549 550 /* zlib inflate call */ 551 /* In fact 'avail_out' may be 0 at this point, that happens at the end 552 * of the read when the final LZ end code was not passed at the end of 553 * the previous chunk of input data. Tell zlib if we have reached the 554 * end of the output buffer. 555 */ 556 ret = PNG_INFLATE(png_ptr, avail_out > 0 ? Z_NO_FLUSH : 557 (finish ? Z_FINISH : Z_SYNC_FLUSH)); 558 } while (ret == Z_OK); 559 560 /* For safety kill the local buffer pointer now */ 561 if (output == NULL) 562 png_ptr->zstream.next_out = NULL; 563 564 /* Claw back the 'size' and 'remaining_space' byte counts. */ 565 avail_in += png_ptr->zstream.avail_in; 566 avail_out += png_ptr->zstream.avail_out; 567 568 /* Update the input and output sizes; the updated values are the amount 569 * consumed or written, effectively the inverse of what zlib uses. 570 */ 571 if (avail_out > 0) 572 *output_size_ptr -= avail_out; 573 574 if (avail_in > 0) 575 *input_size_ptr -= avail_in; 576 577 /* Ensure png_ptr->zstream.msg is set (even in the success case!) */ 578 png_zstream_error(png_ptr, ret); 579 return ret; 580 } 581 582 else 583 { 584 /* This is a bad internal error. The recovery assigns to the zstream msg 585 * pointer, which is not owned by the caller, but this is safe; it's only 586 * used on errors! 587 */ 588 png_ptr->zstream.msg = PNGZ_MSG_CAST("zstream unclaimed"); 589 return Z_STREAM_ERROR; 590 } 591} 592 593/* 594 * Decompress trailing data in a chunk. The assumption is that read_buffer 595 * points at an allocated area holding the contents of a chunk with a 596 * trailing compressed part. What we get back is an allocated area 597 * holding the original prefix part and an uncompressed version of the 598 * trailing part (the malloc area passed in is freed). 599 */ 600static int 601png_decompress_chunk(png_structrp png_ptr, 602 png_uint_32 chunklength, png_uint_32 prefix_size, 603 png_alloc_size_t *newlength /* must be initialized to the maximum! */, 604 int terminate /*add a '\0' to the end of the uncompressed data*/) 605{ 606 /* TODO: implement different limits for different types of chunk. 607 * 608 * The caller supplies *newlength set to the maximum length of the 609 * uncompressed data, but this routine allocates space for the prefix and 610 * maybe a '\0' terminator too. We have to assume that 'prefix_size' is 611 * limited only by the maximum chunk size. 612 */ 613 png_alloc_size_t limit = PNG_SIZE_MAX; 614 615# ifdef PNG_SET_USER_LIMITS_SUPPORTED 616 if (png_ptr->user_chunk_malloc_max > 0 && 617 png_ptr->user_chunk_malloc_max < limit) 618 limit = png_ptr->user_chunk_malloc_max; 619# elif PNG_USER_CHUNK_MALLOC_MAX > 0 620 if (PNG_USER_CHUNK_MALLOC_MAX < limit) 621 limit = PNG_USER_CHUNK_MALLOC_MAX; 622# endif 623 624 if (limit >= prefix_size + (terminate != 0)) 625 { 626 int ret; 627 628 limit -= prefix_size + (terminate != 0); 629 630 if (limit < *newlength) 631 *newlength = limit; 632 633 /* Now try to claim the stream. */ 634 ret = png_inflate_claim(png_ptr, png_ptr->chunk_name); 635 636 if (ret == Z_OK) 637 { 638 png_uint_32 lzsize = chunklength - prefix_size; 639 640 ret = png_inflate(png_ptr, png_ptr->chunk_name, 1/*finish*/, 641 /* input: */ png_ptr->read_buffer + prefix_size, &lzsize, 642 /* output: */ NULL, newlength); 643 644 if (ret == Z_STREAM_END) 645 { 646 /* Use 'inflateReset' here, not 'inflateReset2' because this 647 * preserves the previously decided window size (otherwise it would 648 * be necessary to store the previous window size.) In practice 649 * this doesn't matter anyway, because png_inflate will call inflate 650 * with Z_FINISH in almost all cases, so the window will not be 651 * maintained. 652 */ 653 if (inflateReset(&png_ptr->zstream) == Z_OK) 654 { 655 /* Because of the limit checks above we know that the new, 656 * expanded, size will fit in a size_t (let alone an 657 * png_alloc_size_t). Use png_malloc_base here to avoid an 658 * extra OOM message. 659 */ 660 png_alloc_size_t new_size = *newlength; 661 png_alloc_size_t buffer_size = prefix_size + new_size + 662 (terminate != 0); 663 png_bytep text = png_voidcast(png_bytep, png_malloc_base(png_ptr, 664 buffer_size)); 665 666 if (text != NULL) 667 { 668 ret = png_inflate(png_ptr, png_ptr->chunk_name, 1/*finish*/, 669 png_ptr->read_buffer + prefix_size, &lzsize, 670 text + prefix_size, newlength); 671 672 if (ret == Z_STREAM_END) 673 { 674 if (new_size == *newlength) 675 { 676 if (terminate != 0) 677 text[prefix_size + *newlength] = 0; 678 679 if (prefix_size > 0) 680 memcpy(text, png_ptr->read_buffer, prefix_size); 681 682 { 683 png_bytep old_ptr = png_ptr->read_buffer; 684 685 png_ptr->read_buffer = text; 686 png_ptr->read_buffer_size = buffer_size; 687 text = old_ptr; /* freed below */ 688 } 689 } 690 691 else 692 { 693 /* The size changed on the second read, there can be no 694 * guarantee that anything is correct at this point. 695 * The 'msg' pointer has been set to "unexpected end of 696 * LZ stream", which is fine, but return an error code 697 * that the caller won't accept. 698 */ 699 ret = PNG_UNEXPECTED_ZLIB_RETURN; 700 } 701 } 702 703 else if (ret == Z_OK) 704 ret = PNG_UNEXPECTED_ZLIB_RETURN; /* for safety */ 705 706 /* Free the text pointer (this is the old read_buffer on 707 * success) 708 */ 709 png_free(png_ptr, text); 710 711 /* This really is very benign, but it's still an error because 712 * the extra space may otherwise be used as a Trojan Horse. 713 */ 714 if (ret == Z_STREAM_END && 715 chunklength - prefix_size != lzsize) 716 png_chunk_benign_error(png_ptr, "extra compressed data"); 717 } 718 719 else 720 { 721 /* Out of memory allocating the buffer */ 722 ret = Z_MEM_ERROR; 723 png_zstream_error(png_ptr, Z_MEM_ERROR); 724 } 725 } 726 727 else 728 { 729 /* inflateReset failed, store the error message */ 730 png_zstream_error(png_ptr, ret); 731 732 if (ret == Z_STREAM_END) 733 ret = PNG_UNEXPECTED_ZLIB_RETURN; 734 } 735 } 736 737 else if (ret == Z_OK) 738 ret = PNG_UNEXPECTED_ZLIB_RETURN; 739 740 /* Release the claimed stream */ 741 png_ptr->zowner = 0; 742 } 743 744 else /* the claim failed */ if (ret == Z_STREAM_END) /* impossible! */ 745 ret = PNG_UNEXPECTED_ZLIB_RETURN; 746 747 return ret; 748 } 749 750 else 751 { 752 /* Application/configuration limits exceeded */ 753 png_zstream_error(png_ptr, Z_MEM_ERROR); 754 return Z_MEM_ERROR; 755 } 756} 757#endif /* READ_COMPRESSED_TEXT */ 758 759#ifdef PNG_READ_iCCP_SUPPORTED 760/* Perform a partial read and decompress, producing 'avail_out' bytes and 761 * reading from the current chunk as required. 762 */ 763static int 764png_inflate_read(png_structrp png_ptr, png_bytep read_buffer, uInt read_size, 765 png_uint_32p chunk_bytes, png_bytep next_out, png_alloc_size_t *out_size, 766 int finish) 767{ 768 if (png_ptr->zowner == png_ptr->chunk_name) 769 { 770 int ret; 771 772 /* next_in and avail_in must have been initialized by the caller. */ 773 png_ptr->zstream.next_out = next_out; 774 png_ptr->zstream.avail_out = 0; /* set in the loop */ 775 776 do 777 { 778 if (png_ptr->zstream.avail_in == 0) 779 { 780 if (read_size > *chunk_bytes) 781 read_size = (uInt)*chunk_bytes; 782 *chunk_bytes -= read_size; 783 784 if (read_size > 0) 785 png_crc_read(png_ptr, read_buffer, read_size); 786 787 png_ptr->zstream.next_in = read_buffer; 788 png_ptr->zstream.avail_in = read_size; 789 } 790 791 if (png_ptr->zstream.avail_out == 0) 792 { 793 uInt avail = ZLIB_IO_MAX; 794 if (avail > *out_size) 795 avail = (uInt)*out_size; 796 *out_size -= avail; 797 798 png_ptr->zstream.avail_out = avail; 799 } 800 801 /* Use Z_SYNC_FLUSH when there is no more chunk data to ensure that all 802 * the available output is produced; this allows reading of truncated 803 * streams. 804 */ 805 ret = PNG_INFLATE(png_ptr, 806 *chunk_bytes > 0 ? Z_NO_FLUSH : (finish ? Z_FINISH : Z_SYNC_FLUSH)); 807 } 808 while (ret == Z_OK && (*out_size > 0 || png_ptr->zstream.avail_out > 0)); 809 810 *out_size += png_ptr->zstream.avail_out; 811 png_ptr->zstream.avail_out = 0; /* Should not be required, but is safe */ 812 813 /* Ensure the error message pointer is always set: */ 814 png_zstream_error(png_ptr, ret); 815 return ret; 816 } 817 818 else 819 { 820 png_ptr->zstream.msg = PNGZ_MSG_CAST("zstream unclaimed"); 821 return Z_STREAM_ERROR; 822 } 823} 824#endif 825 826/* Read and check the IDHR chunk */ 827 828void /* PRIVATE */ 829png_handle_IHDR(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 830{ 831 png_byte buf[13]; 832 png_uint_32 width, height; 833 int bit_depth, color_type, compression_type, filter_type; 834 int interlace_type; 835 836 png_debug(1, "in png_handle_IHDR"); 837 838 if ((png_ptr->mode & PNG_HAVE_IHDR) != 0) 839 png_chunk_error(png_ptr, "out of place"); 840 841 /* Check the length */ 842 if (length != 13) 843 png_chunk_error(png_ptr, "invalid"); 844 845 png_ptr->mode |= PNG_HAVE_IHDR; 846 847 png_crc_read(png_ptr, buf, 13); 848 png_crc_finish(png_ptr, 0); 849 850 width = png_get_uint_31(png_ptr, buf); 851 height = png_get_uint_31(png_ptr, buf + 4); 852 bit_depth = buf[8]; 853 color_type = buf[9]; 854 compression_type = buf[10]; 855 filter_type = buf[11]; 856 interlace_type = buf[12]; 857 858 /* Set internal variables */ 859 png_ptr->width = width; 860 png_ptr->height = height; 861 png_ptr->bit_depth = (png_byte)bit_depth; 862 png_ptr->interlaced = (png_byte)interlace_type; 863 png_ptr->color_type = (png_byte)color_type; 864#ifdef PNG_MNG_FEATURES_SUPPORTED 865 png_ptr->filter_type = (png_byte)filter_type; 866#endif 867 png_ptr->compression_type = (png_byte)compression_type; 868 869 /* Find number of channels */ 870 switch (png_ptr->color_type) 871 { 872 default: /* invalid, png_set_IHDR calls png_error */ 873 case PNG_COLOR_TYPE_GRAY: 874 case PNG_COLOR_TYPE_PALETTE: 875 png_ptr->channels = 1; 876 break; 877 878 case PNG_COLOR_TYPE_RGB: 879 png_ptr->channels = 3; 880 break; 881 882 case PNG_COLOR_TYPE_GRAY_ALPHA: 883 png_ptr->channels = 2; 884 break; 885 886 case PNG_COLOR_TYPE_RGB_ALPHA: 887 png_ptr->channels = 4; 888 break; 889 } 890 891 /* Set up other useful info */ 892 png_ptr->pixel_depth = (png_byte)(png_ptr->bit_depth * png_ptr->channels); 893 png_ptr->rowbytes = PNG_ROWBYTES(png_ptr->pixel_depth, png_ptr->width); 894 png_debug1(3, "bit_depth = %d", png_ptr->bit_depth); 895 png_debug1(3, "channels = %d", png_ptr->channels); 896 png_debug1(3, "rowbytes = %lu", (unsigned long)png_ptr->rowbytes); 897 png_set_IHDR(png_ptr, info_ptr, width, height, bit_depth, 898 color_type, interlace_type, compression_type, filter_type); 899} 900 901/* Read and check the palette */ 902void /* PRIVATE */ 903png_handle_PLTE(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 904{ 905 png_color palette[PNG_MAX_PALETTE_LENGTH]; 906 int max_palette_length, num, i; 907#ifdef PNG_POINTER_INDEXING_SUPPORTED 908 png_colorp pal_ptr; 909#endif 910 911 png_debug(1, "in png_handle_PLTE"); 912 913 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 914 png_chunk_error(png_ptr, "missing IHDR"); 915 916 /* Moved to before the 'after IDAT' check below because otherwise duplicate 917 * PLTE chunks are potentially ignored (the spec says there shall not be more 918 * than one PLTE, the error is not treated as benign, so this check trumps 919 * the requirement that PLTE appears before IDAT.) 920 */ 921 else if ((png_ptr->mode & PNG_HAVE_PLTE) != 0) 922 png_chunk_error(png_ptr, "duplicate"); 923 924 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 925 { 926 /* This is benign because the non-benign error happened before, when an 927 * IDAT was encountered in a color-mapped image with no PLTE. 928 */ 929 png_crc_finish(png_ptr, length); 930 png_chunk_benign_error(png_ptr, "out of place"); 931 return; 932 } 933 934 png_ptr->mode |= PNG_HAVE_PLTE; 935 936 if ((png_ptr->color_type & PNG_COLOR_MASK_COLOR) == 0) 937 { 938 png_crc_finish(png_ptr, length); 939 png_chunk_benign_error(png_ptr, "ignored in grayscale PNG"); 940 return; 941 } 942 943#ifndef PNG_READ_OPT_PLTE_SUPPORTED 944 if (png_ptr->color_type != PNG_COLOR_TYPE_PALETTE) 945 { 946 png_crc_finish(png_ptr, length); 947 return; 948 } 949#endif 950 951 if (length > 3*PNG_MAX_PALETTE_LENGTH || length % 3) 952 { 953 png_crc_finish(png_ptr, length); 954 955 if (png_ptr->color_type != PNG_COLOR_TYPE_PALETTE) 956 png_chunk_benign_error(png_ptr, "invalid"); 957 958 else 959 png_chunk_error(png_ptr, "invalid"); 960 961 return; 962 } 963 964 /* The cast is safe because 'length' is less than 3*PNG_MAX_PALETTE_LENGTH */ 965 num = (int)length / 3; 966 967 /* If the palette has 256 or fewer entries but is too large for the bit 968 * depth, we don't issue an error, to preserve the behavior of previous 969 * libpng versions. We silently truncate the unused extra palette entries 970 * here. 971 */ 972 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 973 max_palette_length = (1 << png_ptr->bit_depth); 974 else 975 max_palette_length = PNG_MAX_PALETTE_LENGTH; 976 977 if (num > max_palette_length) 978 num = max_palette_length; 979 980#ifdef PNG_POINTER_INDEXING_SUPPORTED 981 for (i = 0, pal_ptr = palette; i < num; i++, pal_ptr++) 982 { 983 png_byte buf[3]; 984 985 png_crc_read(png_ptr, buf, 3); 986 pal_ptr->red = buf[0]; 987 pal_ptr->green = buf[1]; 988 pal_ptr->blue = buf[2]; 989 } 990#else 991 for (i = 0; i < num; i++) 992 { 993 png_byte buf[3]; 994 995 png_crc_read(png_ptr, buf, 3); 996 /* Don't depend upon png_color being any order */ 997 palette[i].red = buf[0]; 998 palette[i].green = buf[1]; 999 palette[i].blue = buf[2]; 1000 } 1001#endif 1002 1003 /* If we actually need the PLTE chunk (ie for a paletted image), we do 1004 * whatever the normal CRC configuration tells us. However, if we 1005 * have an RGB image, the PLTE can be considered ancillary, so 1006 * we will act as though it is. 1007 */ 1008#ifndef PNG_READ_OPT_PLTE_SUPPORTED 1009 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 1010#endif 1011 { 1012 png_crc_finish(png_ptr, (int) length - num * 3); 1013 } 1014 1015#ifndef PNG_READ_OPT_PLTE_SUPPORTED 1016 else if (png_crc_error(png_ptr) != 0) /* Only if we have a CRC error */ 1017 { 1018 /* If we don't want to use the data from an ancillary chunk, 1019 * we have two options: an error abort, or a warning and we 1020 * ignore the data in this chunk (which should be OK, since 1021 * it's considered ancillary for a RGB or RGBA image). 1022 * 1023 * IMPLEMENTATION NOTE: this is only here because png_crc_finish uses the 1024 * chunk type to determine whether to check the ancillary or the critical 1025 * flags. 1026 */ 1027 if ((png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_USE) == 0) 1028 { 1029 if ((png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_NOWARN) != 0) 1030 return; 1031 1032 else 1033 png_chunk_error(png_ptr, "CRC error"); 1034 } 1035 1036 /* Otherwise, we (optionally) emit a warning and use the chunk. */ 1037 else if ((png_ptr->flags & PNG_FLAG_CRC_ANCILLARY_NOWARN) == 0) 1038 png_chunk_warning(png_ptr, "CRC error"); 1039 } 1040#endif 1041 1042 /* TODO: png_set_PLTE has the side effect of setting png_ptr->palette to its 1043 * own copy of the palette. This has the side effect that when png_start_row 1044 * is called (this happens after any call to png_read_update_info) the 1045 * info_ptr palette gets changed. This is extremely unexpected and 1046 * confusing. 1047 * 1048 * Fix this by not sharing the palette in this way. 1049 */ 1050 png_set_PLTE(png_ptr, info_ptr, palette, num); 1051 1052 /* The three chunks, bKGD, hIST and tRNS *must* appear after PLTE and before 1053 * IDAT. Prior to 1.6.0 this was not checked; instead the code merely 1054 * checked the apparent validity of a tRNS chunk inserted before PLTE on a 1055 * palette PNG. 1.6.0 attempts to rigorously follow the standard and 1056 * therefore does a benign error if the erroneous condition is detected *and* 1057 * cancels the tRNS if the benign error returns. The alternative is to 1058 * amend the standard since it would be rather hypocritical of the standards 1059 * maintainers to ignore it. 1060 */ 1061#ifdef PNG_READ_tRNS_SUPPORTED 1062 if (png_ptr->num_trans > 0 || 1063 (info_ptr != NULL && (info_ptr->valid & PNG_INFO_tRNS) != 0)) 1064 { 1065 /* Cancel this because otherwise it would be used if the transforms 1066 * require it. Don't cancel the 'valid' flag because this would prevent 1067 * detection of duplicate chunks. 1068 */ 1069 png_ptr->num_trans = 0; 1070 1071 if (info_ptr != NULL) 1072 info_ptr->num_trans = 0; 1073 1074 png_chunk_benign_error(png_ptr, "tRNS must be after"); 1075 } 1076#endif 1077 1078#ifdef PNG_READ_hIST_SUPPORTED 1079 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_hIST) != 0) 1080 png_chunk_benign_error(png_ptr, "hIST must be after"); 1081#endif 1082 1083#ifdef PNG_READ_bKGD_SUPPORTED 1084 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_bKGD) != 0) 1085 png_chunk_benign_error(png_ptr, "bKGD must be after"); 1086#endif 1087} 1088 1089void /* PRIVATE */ 1090png_handle_IEND(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1091{ 1092 png_debug(1, "in png_handle_IEND"); 1093 1094 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0 || 1095 (png_ptr->mode & PNG_HAVE_IDAT) == 0) 1096 png_chunk_error(png_ptr, "out of place"); 1097 1098 png_ptr->mode |= (PNG_AFTER_IDAT | PNG_HAVE_IEND); 1099 1100 png_crc_finish(png_ptr, length); 1101 1102 if (length != 0) 1103 png_chunk_benign_error(png_ptr, "invalid"); 1104 1105 PNG_UNUSED(info_ptr) 1106} 1107 1108#ifdef PNG_READ_gAMA_SUPPORTED 1109void /* PRIVATE */ 1110png_handle_gAMA(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1111{ 1112 png_fixed_point igamma; 1113 png_byte buf[4]; 1114 1115 png_debug(1, "in png_handle_gAMA"); 1116 1117 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1118 png_chunk_error(png_ptr, "missing IHDR"); 1119 1120 else if ((png_ptr->mode & (PNG_HAVE_IDAT|PNG_HAVE_PLTE)) != 0) 1121 { 1122 png_crc_finish(png_ptr, length); 1123 png_chunk_benign_error(png_ptr, "out of place"); 1124 return; 1125 } 1126 1127 if (length != 4) 1128 { 1129 png_crc_finish(png_ptr, length); 1130 png_chunk_benign_error(png_ptr, "invalid"); 1131 return; 1132 } 1133 1134 png_crc_read(png_ptr, buf, 4); 1135 1136 if (png_crc_finish(png_ptr, 0) != 0) 1137 return; 1138 1139 igamma = png_get_fixed_point(NULL, buf); 1140 1141 png_colorspace_set_gamma(png_ptr, &png_ptr->colorspace, igamma); 1142 png_colorspace_sync(png_ptr, info_ptr); 1143} 1144#endif 1145 1146#ifdef PNG_READ_sBIT_SUPPORTED 1147void /* PRIVATE */ 1148png_handle_sBIT(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1149{ 1150 unsigned int truelen, i; 1151 png_byte sample_depth; 1152 png_byte buf[4]; 1153 1154 png_debug(1, "in png_handle_sBIT"); 1155 1156 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1157 png_chunk_error(png_ptr, "missing IHDR"); 1158 1159 else if ((png_ptr->mode & (PNG_HAVE_IDAT|PNG_HAVE_PLTE)) != 0) 1160 { 1161 png_crc_finish(png_ptr, length); 1162 png_chunk_benign_error(png_ptr, "out of place"); 1163 return; 1164 } 1165 1166 if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_sBIT) != 0) 1167 { 1168 png_crc_finish(png_ptr, length); 1169 png_chunk_benign_error(png_ptr, "duplicate"); 1170 return; 1171 } 1172 1173 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 1174 { 1175 truelen = 3; 1176 sample_depth = 8; 1177 } 1178 1179 else 1180 { 1181 truelen = png_ptr->channels; 1182 sample_depth = png_ptr->bit_depth; 1183 } 1184 1185 if (length != truelen || length > 4) 1186 { 1187 png_chunk_benign_error(png_ptr, "invalid"); 1188 png_crc_finish(png_ptr, length); 1189 return; 1190 } 1191 1192 buf[0] = buf[1] = buf[2] = buf[3] = sample_depth; 1193 png_crc_read(png_ptr, buf, truelen); 1194 1195 if (png_crc_finish(png_ptr, 0) != 0) 1196 return; 1197 1198 for (i=0; i<truelen; ++i) 1199 { 1200 if (buf[i] == 0 || buf[i] > sample_depth) 1201 { 1202 png_chunk_benign_error(png_ptr, "invalid"); 1203 return; 1204 } 1205 } 1206 1207 if ((png_ptr->color_type & PNG_COLOR_MASK_COLOR) != 0) 1208 { 1209 png_ptr->sig_bit.red = buf[0]; 1210 png_ptr->sig_bit.green = buf[1]; 1211 png_ptr->sig_bit.blue = buf[2]; 1212 png_ptr->sig_bit.alpha = buf[3]; 1213 } 1214 1215 else 1216 { 1217 png_ptr->sig_bit.gray = buf[0]; 1218 png_ptr->sig_bit.red = buf[0]; 1219 png_ptr->sig_bit.green = buf[0]; 1220 png_ptr->sig_bit.blue = buf[0]; 1221 png_ptr->sig_bit.alpha = buf[1]; 1222 } 1223 1224 png_set_sBIT(png_ptr, info_ptr, &(png_ptr->sig_bit)); 1225} 1226#endif 1227 1228#ifdef PNG_READ_cHRM_SUPPORTED 1229void /* PRIVATE */ 1230png_handle_cHRM(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1231{ 1232 png_byte buf[32]; 1233 png_xy xy; 1234 1235 png_debug(1, "in png_handle_cHRM"); 1236 1237 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1238 png_chunk_error(png_ptr, "missing IHDR"); 1239 1240 else if ((png_ptr->mode & (PNG_HAVE_IDAT|PNG_HAVE_PLTE)) != 0) 1241 { 1242 png_crc_finish(png_ptr, length); 1243 png_chunk_benign_error(png_ptr, "out of place"); 1244 return; 1245 } 1246 1247 if (length != 32) 1248 { 1249 png_crc_finish(png_ptr, length); 1250 png_chunk_benign_error(png_ptr, "invalid"); 1251 return; 1252 } 1253 1254 png_crc_read(png_ptr, buf, 32); 1255 1256 if (png_crc_finish(png_ptr, 0) != 0) 1257 return; 1258 1259 xy.whitex = png_get_fixed_point(NULL, buf); 1260 xy.whitey = png_get_fixed_point(NULL, buf + 4); 1261 xy.redx = png_get_fixed_point(NULL, buf + 8); 1262 xy.redy = png_get_fixed_point(NULL, buf + 12); 1263 xy.greenx = png_get_fixed_point(NULL, buf + 16); 1264 xy.greeny = png_get_fixed_point(NULL, buf + 20); 1265 xy.bluex = png_get_fixed_point(NULL, buf + 24); 1266 xy.bluey = png_get_fixed_point(NULL, buf + 28); 1267 1268 if (xy.whitex == PNG_FIXED_ERROR || 1269 xy.whitey == PNG_FIXED_ERROR || 1270 xy.redx == PNG_FIXED_ERROR || 1271 xy.redy == PNG_FIXED_ERROR || 1272 xy.greenx == PNG_FIXED_ERROR || 1273 xy.greeny == PNG_FIXED_ERROR || 1274 xy.bluex == PNG_FIXED_ERROR || 1275 xy.bluey == PNG_FIXED_ERROR) 1276 { 1277 png_chunk_benign_error(png_ptr, "invalid values"); 1278 return; 1279 } 1280 1281 /* If a colorspace error has already been output skip this chunk */ 1282 if ((png_ptr->colorspace.flags & PNG_COLORSPACE_INVALID) != 0) 1283 return; 1284 1285 if ((png_ptr->colorspace.flags & PNG_COLORSPACE_FROM_cHRM) != 0) 1286 { 1287 png_ptr->colorspace.flags |= PNG_COLORSPACE_INVALID; 1288 png_colorspace_sync(png_ptr, info_ptr); 1289 png_chunk_benign_error(png_ptr, "duplicate"); 1290 return; 1291 } 1292 1293 png_ptr->colorspace.flags |= PNG_COLORSPACE_FROM_cHRM; 1294 (void)png_colorspace_set_chromaticities(png_ptr, &png_ptr->colorspace, &xy, 1295 1/*prefer cHRM values*/); 1296 png_colorspace_sync(png_ptr, info_ptr); 1297} 1298#endif 1299 1300#ifdef PNG_READ_sRGB_SUPPORTED 1301void /* PRIVATE */ 1302png_handle_sRGB(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1303{ 1304 png_byte intent; 1305 1306 png_debug(1, "in png_handle_sRGB"); 1307 1308 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1309 png_chunk_error(png_ptr, "missing IHDR"); 1310 1311 else if ((png_ptr->mode & (PNG_HAVE_IDAT|PNG_HAVE_PLTE)) != 0) 1312 { 1313 png_crc_finish(png_ptr, length); 1314 png_chunk_benign_error(png_ptr, "out of place"); 1315 return; 1316 } 1317 1318 if (length != 1) 1319 { 1320 png_crc_finish(png_ptr, length); 1321 png_chunk_benign_error(png_ptr, "invalid"); 1322 return; 1323 } 1324 1325 png_crc_read(png_ptr, &intent, 1); 1326 1327 if (png_crc_finish(png_ptr, 0) != 0) 1328 return; 1329 1330 /* If a colorspace error has already been output skip this chunk */ 1331 if ((png_ptr->colorspace.flags & PNG_COLORSPACE_INVALID) != 0) 1332 return; 1333 1334 /* Only one sRGB or iCCP chunk is allowed, use the HAVE_INTENT flag to detect 1335 * this. 1336 */ 1337 if ((png_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_INTENT) != 0) 1338 { 1339 png_ptr->colorspace.flags |= PNG_COLORSPACE_INVALID; 1340 png_colorspace_sync(png_ptr, info_ptr); 1341 png_chunk_benign_error(png_ptr, "too many profiles"); 1342 return; 1343 } 1344 1345 (void)png_colorspace_set_sRGB(png_ptr, &png_ptr->colorspace, intent); 1346 png_colorspace_sync(png_ptr, info_ptr); 1347} 1348#endif /* READ_sRGB */ 1349 1350#ifdef PNG_READ_iCCP_SUPPORTED 1351void /* PRIVATE */ 1352png_handle_iCCP(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1353/* Note: this does not properly handle profiles that are > 64K under DOS */ 1354{ 1355 png_const_charp errmsg = NULL; /* error message output, or no error */ 1356 int finished = 0; /* crc checked */ 1357 1358 png_debug(1, "in png_handle_iCCP"); 1359 1360 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1361 png_chunk_error(png_ptr, "missing IHDR"); 1362 1363 else if ((png_ptr->mode & (PNG_HAVE_IDAT|PNG_HAVE_PLTE)) != 0) 1364 { 1365 png_crc_finish(png_ptr, length); 1366 png_chunk_benign_error(png_ptr, "out of place"); 1367 return; 1368 } 1369 1370 /* Consistent with all the above colorspace handling an obviously *invalid* 1371 * chunk is just ignored, so does not invalidate the color space. An 1372 * alternative is to set the 'invalid' flags at the start of this routine 1373 * and only clear them in they were not set before and all the tests pass. 1374 * The minimum 'deflate' stream is assumed to be just the 2 byte header and 1375 * 4 byte checksum. The keyword must be at least one character and there is 1376 * a terminator (0) byte and the compression method. 1377 */ 1378 if (length < 9) 1379 { 1380 png_crc_finish(png_ptr, length); 1381 png_chunk_benign_error(png_ptr, "too short"); 1382 return; 1383 } 1384 1385 /* If a colorspace error has already been output skip this chunk */ 1386 if ((png_ptr->colorspace.flags & PNG_COLORSPACE_INVALID) != 0) 1387 { 1388 png_crc_finish(png_ptr, length); 1389 return; 1390 } 1391 1392 /* Only one sRGB or iCCP chunk is allowed, use the HAVE_INTENT flag to detect 1393 * this. 1394 */ 1395 if ((png_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_INTENT) == 0) 1396 { 1397 uInt read_length, keyword_length; 1398 char keyword[81]; 1399 1400 /* Find the keyword; the keyword plus separator and compression method 1401 * bytes can be at most 81 characters long. 1402 */ 1403 read_length = 81; /* maximum */ 1404 if (read_length > length) 1405 read_length = (uInt)length; 1406 1407 png_crc_read(png_ptr, (png_bytep)keyword, read_length); 1408 length -= read_length; 1409 1410 keyword_length = 0; 1411 while (keyword_length < 80 && keyword_length < read_length && 1412 keyword[keyword_length] != 0) 1413 ++keyword_length; 1414 1415 /* TODO: make the keyword checking common */ 1416 if (keyword_length >= 1 && keyword_length <= 79) 1417 { 1418 /* We only understand '0' compression - deflate - so if we get a 1419 * different value we can't safely decode the chunk. 1420 */ 1421 if (keyword_length+1 < read_length && 1422 keyword[keyword_length+1] == PNG_COMPRESSION_TYPE_BASE) 1423 { 1424 read_length -= keyword_length+2; 1425 1426 if (png_inflate_claim(png_ptr, png_iCCP) == Z_OK) 1427 { 1428 Byte profile_header[132]; 1429 Byte local_buffer[PNG_INFLATE_BUF_SIZE]; 1430 png_alloc_size_t size = (sizeof profile_header); 1431 1432 png_ptr->zstream.next_in = (Bytef*)keyword + (keyword_length+2); 1433 png_ptr->zstream.avail_in = read_length; 1434 (void)png_inflate_read(png_ptr, local_buffer, 1435 (sizeof local_buffer), &length, profile_header, &size, 1436 0/*finish: don't, because the output is too small*/); 1437 1438 if (size == 0) 1439 { 1440 /* We have the ICC profile header; do the basic header checks. 1441 */ 1442 const png_uint_32 profile_length = 1443 png_get_uint_32(profile_header); 1444 1445 if (png_icc_check_length(png_ptr, &png_ptr->colorspace, 1446 keyword, profile_length) != 0) 1447 { 1448 /* The length is apparently ok, so we can check the 132 1449 * byte header. 1450 */ 1451 if (png_icc_check_header(png_ptr, &png_ptr->colorspace, 1452 keyword, profile_length, profile_header, 1453 png_ptr->color_type) != 0) 1454 { 1455 /* Now read the tag table; a variable size buffer is 1456 * needed at this point, allocate one for the whole 1457 * profile. The header check has already validated 1458 * that none of these stuff will overflow. 1459 */ 1460 const png_uint_32 tag_count = png_get_uint_32( 1461 profile_header+128); 1462 png_bytep profile = png_read_buffer(png_ptr, 1463 profile_length, 2/*silent*/); 1464 1465 if (profile != NULL) 1466 { 1467 memcpy(profile, profile_header, 1468 (sizeof profile_header)); 1469 1470 size = 12 * tag_count; 1471 1472 (void)png_inflate_read(png_ptr, local_buffer, 1473 (sizeof local_buffer), &length, 1474 profile + (sizeof profile_header), &size, 0); 1475 1476 /* Still expect a buffer error because we expect 1477 * there to be some tag data! 1478 */ 1479 if (size == 0) 1480 { 1481 if (png_icc_check_tag_table(png_ptr, 1482 &png_ptr->colorspace, keyword, profile_length, 1483 profile) != 0) 1484 { 1485 /* The profile has been validated for basic 1486 * security issues, so read the whole thing in. 1487 */ 1488 size = profile_length - (sizeof profile_header) 1489 - 12 * tag_count; 1490 1491 (void)png_inflate_read(png_ptr, local_buffer, 1492 (sizeof local_buffer), &length, 1493 profile + (sizeof profile_header) + 1494 12 * tag_count, &size, 1/*finish*/); 1495 1496 if (length > 0 && !(png_ptr->flags & 1497 PNG_FLAG_BENIGN_ERRORS_WARN)) 1498 errmsg = "extra compressed data"; 1499 1500 /* But otherwise allow extra data: */ 1501 else if (size == 0) 1502 { 1503 if (length > 0) 1504 { 1505 /* This can be handled completely, so 1506 * keep going. 1507 */ 1508 png_chunk_warning(png_ptr, 1509 "extra compressed data"); 1510 } 1511 1512 png_crc_finish(png_ptr, length); 1513 finished = 1; 1514 1515# ifdef PNG_sRGB_SUPPORTED 1516 /* Check for a match against sRGB */ 1517 png_icc_set_sRGB(png_ptr, 1518 &png_ptr->colorspace, profile, 1519 png_ptr->zstream.adler); 1520# endif 1521 1522 /* Steal the profile for info_ptr. */ 1523 if (info_ptr != NULL) 1524 { 1525 png_free_data(png_ptr, info_ptr, 1526 PNG_FREE_ICCP, 0); 1527 1528 info_ptr->iccp_name = png_voidcast(char*, 1529 png_malloc_base(png_ptr, 1530 keyword_length+1)); 1531 if (info_ptr->iccp_name != NULL) 1532 { 1533 memcpy(info_ptr->iccp_name, keyword, 1534 keyword_length+1); 1535 info_ptr->iccp_proflen = 1536 profile_length; 1537 info_ptr->iccp_profile = profile; 1538 png_ptr->read_buffer = NULL; /*steal*/ 1539 info_ptr->free_me |= PNG_FREE_ICCP; 1540 info_ptr->valid |= PNG_INFO_iCCP; 1541 } 1542 1543 else 1544 { 1545 png_ptr->colorspace.flags |= 1546 PNG_COLORSPACE_INVALID; 1547 errmsg = "out of memory"; 1548 } 1549 } 1550 1551 /* else the profile remains in the read 1552 * buffer which gets reused for subsequent 1553 * chunks. 1554 */ 1555 1556 if (info_ptr != NULL) 1557 png_colorspace_sync(png_ptr, info_ptr); 1558 1559 if (errmsg == NULL) 1560 { 1561 png_ptr->zowner = 0; 1562 return; 1563 } 1564 } 1565 1566 else if (size > 0) 1567 errmsg = "truncated"; 1568 1569#ifndef __COVERITY__ 1570 else 1571 errmsg = png_ptr->zstream.msg; 1572#endif 1573 } 1574 1575 /* else png_icc_check_tag_table output an error */ 1576 } 1577 1578 else /* profile truncated */ 1579 errmsg = png_ptr->zstream.msg; 1580 } 1581 1582 else 1583 errmsg = "out of memory"; 1584 } 1585 1586 /* else png_icc_check_header output an error */ 1587 } 1588 1589 /* else png_icc_check_length output an error */ 1590 } 1591 1592 else /* profile truncated */ 1593 errmsg = png_ptr->zstream.msg; 1594 1595 /* Release the stream */ 1596 png_ptr->zowner = 0; 1597 } 1598 1599 else /* png_inflate_claim failed */ 1600 errmsg = png_ptr->zstream.msg; 1601 } 1602 1603 else 1604 errmsg = "bad compression method"; /* or missing */ 1605 } 1606 1607 else 1608 errmsg = "bad keyword"; 1609 } 1610 1611 else 1612 errmsg = "too many profiles"; 1613 1614 /* Failure: the reason is in 'errmsg' */ 1615 if (finished == 0) 1616 png_crc_finish(png_ptr, length); 1617 1618 png_ptr->colorspace.flags |= PNG_COLORSPACE_INVALID; 1619 png_colorspace_sync(png_ptr, info_ptr); 1620 if (errmsg != NULL) /* else already output */ 1621 png_chunk_benign_error(png_ptr, errmsg); 1622} 1623#endif /* READ_iCCP */ 1624 1625#ifdef PNG_READ_sPLT_SUPPORTED 1626void /* PRIVATE */ 1627png_handle_sPLT(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1628/* Note: this does not properly handle chunks that are > 64K under DOS */ 1629{ 1630 png_bytep entry_start, buffer; 1631 png_sPLT_t new_palette; 1632 png_sPLT_entryp pp; 1633 png_uint_32 data_length; 1634 int entry_size, i; 1635 png_uint_32 skip = 0; 1636 png_uint_32 dl; 1637 png_size_t max_dl; 1638 1639 png_debug(1, "in png_handle_sPLT"); 1640 1641#ifdef PNG_USER_LIMITS_SUPPORTED 1642 if (png_ptr->user_chunk_cache_max != 0) 1643 { 1644 if (png_ptr->user_chunk_cache_max == 1) 1645 { 1646 png_crc_finish(png_ptr, length); 1647 return; 1648 } 1649 1650 if (--png_ptr->user_chunk_cache_max == 1) 1651 { 1652 png_warning(png_ptr, "No space in chunk cache for sPLT"); 1653 png_crc_finish(png_ptr, length); 1654 return; 1655 } 1656 } 1657#endif 1658 1659 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1660 png_chunk_error(png_ptr, "missing IHDR"); 1661 1662 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 1663 { 1664 png_crc_finish(png_ptr, length); 1665 png_chunk_benign_error(png_ptr, "out of place"); 1666 return; 1667 } 1668 1669#ifdef PNG_MAX_MALLOC_64K 1670 if (length > 65535U) 1671 { 1672 png_crc_finish(png_ptr, length); 1673 png_chunk_benign_error(png_ptr, "too large to fit in memory"); 1674 return; 1675 } 1676#endif 1677 1678 buffer = png_read_buffer(png_ptr, length+1, 2/*silent*/); 1679 if (buffer == NULL) 1680 { 1681 png_crc_finish(png_ptr, length); 1682 png_chunk_benign_error(png_ptr, "out of memory"); 1683 return; 1684 } 1685 1686 1687 /* WARNING: this may break if size_t is less than 32 bits; it is assumed 1688 * that the PNG_MAX_MALLOC_64K test is enabled in this case, but this is a 1689 * potential breakage point if the types in pngconf.h aren't exactly right. 1690 */ 1691 png_crc_read(png_ptr, buffer, length); 1692 1693 if (png_crc_finish(png_ptr, skip) != 0) 1694 return; 1695 1696 buffer[length] = 0; 1697 1698 for (entry_start = buffer; *entry_start; entry_start++) 1699 /* Empty loop to find end of name */ ; 1700 1701 ++entry_start; 1702 1703 /* A sample depth should follow the separator, and we should be on it */ 1704 if (length < 2U || entry_start > buffer + (length - 2U)) 1705 { 1706 png_warning(png_ptr, "malformed sPLT chunk"); 1707 return; 1708 } 1709 1710 new_palette.depth = *entry_start++; 1711 entry_size = (new_palette.depth == 8 ? 6 : 10); 1712 /* This must fit in a png_uint_32 because it is derived from the original 1713 * chunk data length. 1714 */ 1715 data_length = length - (png_uint_32)(entry_start - buffer); 1716 1717 /* Integrity-check the data length */ 1718 if ((data_length % entry_size) != 0) 1719 { 1720 png_warning(png_ptr, "sPLT chunk has bad length"); 1721 return; 1722 } 1723 1724 dl = (png_int_32)(data_length / entry_size); 1725 max_dl = PNG_SIZE_MAX / (sizeof (png_sPLT_entry)); 1726 1727 if (dl > max_dl) 1728 { 1729 png_warning(png_ptr, "sPLT chunk too long"); 1730 return; 1731 } 1732 1733 new_palette.nentries = (png_int_32)(data_length / entry_size); 1734 1735 new_palette.entries = (png_sPLT_entryp)png_malloc_warn( 1736 png_ptr, new_palette.nentries * (sizeof (png_sPLT_entry))); 1737 1738 if (new_palette.entries == NULL) 1739 { 1740 png_warning(png_ptr, "sPLT chunk requires too much memory"); 1741 return; 1742 } 1743 1744#ifdef PNG_POINTER_INDEXING_SUPPORTED 1745 for (i = 0; i < new_palette.nentries; i++) 1746 { 1747 pp = new_palette.entries + i; 1748 1749 if (new_palette.depth == 8) 1750 { 1751 pp->red = *entry_start++; 1752 pp->green = *entry_start++; 1753 pp->blue = *entry_start++; 1754 pp->alpha = *entry_start++; 1755 } 1756 1757 else 1758 { 1759 pp->red = png_get_uint_16(entry_start); entry_start += 2; 1760 pp->green = png_get_uint_16(entry_start); entry_start += 2; 1761 pp->blue = png_get_uint_16(entry_start); entry_start += 2; 1762 pp->alpha = png_get_uint_16(entry_start); entry_start += 2; 1763 } 1764 1765 pp->frequency = png_get_uint_16(entry_start); entry_start += 2; 1766 } 1767#else 1768 pp = new_palette.entries; 1769 1770 for (i = 0; i < new_palette.nentries; i++) 1771 { 1772 1773 if (new_palette.depth == 8) 1774 { 1775 pp[i].red = *entry_start++; 1776 pp[i].green = *entry_start++; 1777 pp[i].blue = *entry_start++; 1778 pp[i].alpha = *entry_start++; 1779 } 1780 1781 else 1782 { 1783 pp[i].red = png_get_uint_16(entry_start); entry_start += 2; 1784 pp[i].green = png_get_uint_16(entry_start); entry_start += 2; 1785 pp[i].blue = png_get_uint_16(entry_start); entry_start += 2; 1786 pp[i].alpha = png_get_uint_16(entry_start); entry_start += 2; 1787 } 1788 1789 pp[i].frequency = png_get_uint_16(entry_start); entry_start += 2; 1790 } 1791#endif 1792 1793 /* Discard all chunk data except the name and stash that */ 1794 new_palette.name = (png_charp)buffer; 1795 1796 png_set_sPLT(png_ptr, info_ptr, &new_palette, 1); 1797 1798 png_free(png_ptr, new_palette.entries); 1799} 1800#endif /* READ_sPLT */ 1801 1802#ifdef PNG_READ_tRNS_SUPPORTED 1803void /* PRIVATE */ 1804png_handle_tRNS(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1805{ 1806 png_byte readbuf[PNG_MAX_PALETTE_LENGTH]; 1807 1808 png_debug(1, "in png_handle_tRNS"); 1809 1810 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1811 png_chunk_error(png_ptr, "missing IHDR"); 1812 1813 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 1814 { 1815 png_crc_finish(png_ptr, length); 1816 png_chunk_benign_error(png_ptr, "out of place"); 1817 return; 1818 } 1819 1820 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_tRNS) != 0) 1821 { 1822 png_crc_finish(png_ptr, length); 1823 png_chunk_benign_error(png_ptr, "duplicate"); 1824 return; 1825 } 1826 1827 if (png_ptr->color_type == PNG_COLOR_TYPE_GRAY) 1828 { 1829 png_byte buf[2]; 1830 1831 if (length != 2) 1832 { 1833 png_crc_finish(png_ptr, length); 1834 png_chunk_benign_error(png_ptr, "invalid"); 1835 return; 1836 } 1837 1838 png_crc_read(png_ptr, buf, 2); 1839 png_ptr->num_trans = 1; 1840 png_ptr->trans_color.gray = png_get_uint_16(buf); 1841 } 1842 1843 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB) 1844 { 1845 png_byte buf[6]; 1846 1847 if (length != 6) 1848 { 1849 png_crc_finish(png_ptr, length); 1850 png_chunk_benign_error(png_ptr, "invalid"); 1851 return; 1852 } 1853 1854 png_crc_read(png_ptr, buf, length); 1855 png_ptr->num_trans = 1; 1856 png_ptr->trans_color.red = png_get_uint_16(buf); 1857 png_ptr->trans_color.green = png_get_uint_16(buf + 2); 1858 png_ptr->trans_color.blue = png_get_uint_16(buf + 4); 1859 } 1860 1861 else if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 1862 { 1863 if ((png_ptr->mode & PNG_HAVE_PLTE) == 0) 1864 { 1865 /* TODO: is this actually an error in the ISO spec? */ 1866 png_crc_finish(png_ptr, length); 1867 png_chunk_benign_error(png_ptr, "out of place"); 1868 return; 1869 } 1870 1871 if (length > (unsigned int) png_ptr->num_palette || 1872 length > (unsigned int) PNG_MAX_PALETTE_LENGTH || 1873 length == 0) 1874 { 1875 png_crc_finish(png_ptr, length); 1876 png_chunk_benign_error(png_ptr, "invalid"); 1877 return; 1878 } 1879 1880 png_crc_read(png_ptr, readbuf, length); 1881 png_ptr->num_trans = (png_uint_16)length; 1882 } 1883 1884 else 1885 { 1886 png_crc_finish(png_ptr, length); 1887 png_chunk_benign_error(png_ptr, "invalid with alpha channel"); 1888 return; 1889 } 1890 1891 if (png_crc_finish(png_ptr, 0) != 0) 1892 { 1893 png_ptr->num_trans = 0; 1894 return; 1895 } 1896 1897 /* TODO: this is a horrible side effect in the palette case because the 1898 * png_struct ends up with a pointer to the tRNS buffer owned by the 1899 * png_info. Fix this. 1900 */ 1901 png_set_tRNS(png_ptr, info_ptr, readbuf, png_ptr->num_trans, 1902 &(png_ptr->trans_color)); 1903} 1904#endif 1905 1906#ifdef PNG_READ_bKGD_SUPPORTED 1907void /* PRIVATE */ 1908png_handle_bKGD(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 1909{ 1910 unsigned int truelen; 1911 png_byte buf[6]; 1912 png_color_16 background; 1913 1914 png_debug(1, "in png_handle_bKGD"); 1915 1916 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 1917 png_chunk_error(png_ptr, "missing IHDR"); 1918 1919 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0 || 1920 (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE && 1921 (png_ptr->mode & PNG_HAVE_PLTE) == 0)) 1922 { 1923 png_crc_finish(png_ptr, length); 1924 png_chunk_benign_error(png_ptr, "out of place"); 1925 return; 1926 } 1927 1928 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_bKGD) != 0) 1929 { 1930 png_crc_finish(png_ptr, length); 1931 png_chunk_benign_error(png_ptr, "duplicate"); 1932 return; 1933 } 1934 1935 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 1936 truelen = 1; 1937 1938 else if ((png_ptr->color_type & PNG_COLOR_MASK_COLOR) != 0) 1939 truelen = 6; 1940 1941 else 1942 truelen = 2; 1943 1944 if (length != truelen) 1945 { 1946 png_crc_finish(png_ptr, length); 1947 png_chunk_benign_error(png_ptr, "invalid"); 1948 return; 1949 } 1950 1951 png_crc_read(png_ptr, buf, truelen); 1952 1953 if (png_crc_finish(png_ptr, 0) != 0) 1954 return; 1955 1956 /* We convert the index value into RGB components so that we can allow 1957 * arbitrary RGB values for background when we have transparency, and 1958 * so it is easy to determine the RGB values of the background color 1959 * from the info_ptr struct. 1960 */ 1961 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 1962 { 1963 background.index = buf[0]; 1964 1965 if (info_ptr != NULL && info_ptr->num_palette != 0) 1966 { 1967 if (buf[0] >= info_ptr->num_palette) 1968 { 1969 png_chunk_benign_error(png_ptr, "invalid index"); 1970 return; 1971 } 1972 1973 background.red = (png_uint_16)png_ptr->palette[buf[0]].red; 1974 background.green = (png_uint_16)png_ptr->palette[buf[0]].green; 1975 background.blue = (png_uint_16)png_ptr->palette[buf[0]].blue; 1976 } 1977 1978 else 1979 background.red = background.green = background.blue = 0; 1980 1981 background.gray = 0; 1982 } 1983 1984 else if ((png_ptr->color_type & PNG_COLOR_MASK_COLOR) == 0) /* GRAY */ 1985 { 1986 background.index = 0; 1987 background.red = 1988 background.green = 1989 background.blue = 1990 background.gray = png_get_uint_16(buf); 1991 } 1992 1993 else 1994 { 1995 background.index = 0; 1996 background.red = png_get_uint_16(buf); 1997 background.green = png_get_uint_16(buf + 2); 1998 background.blue = png_get_uint_16(buf + 4); 1999 background.gray = 0; 2000 } 2001 2002 png_set_bKGD(png_ptr, info_ptr, &background); 2003} 2004#endif 2005 2006#ifdef PNG_READ_hIST_SUPPORTED 2007void /* PRIVATE */ 2008png_handle_hIST(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2009{ 2010 unsigned int num, i; 2011 png_uint_16 readbuf[PNG_MAX_PALETTE_LENGTH]; 2012 2013 png_debug(1, "in png_handle_hIST"); 2014 2015 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2016 png_chunk_error(png_ptr, "missing IHDR"); 2017 2018 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0 || 2019 (png_ptr->mode & PNG_HAVE_PLTE) == 0) 2020 { 2021 png_crc_finish(png_ptr, length); 2022 png_chunk_benign_error(png_ptr, "out of place"); 2023 return; 2024 } 2025 2026 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_hIST) != 0) 2027 { 2028 png_crc_finish(png_ptr, length); 2029 png_chunk_benign_error(png_ptr, "duplicate"); 2030 return; 2031 } 2032 2033 num = length / 2 ; 2034 2035 if (num != (unsigned int) png_ptr->num_palette || 2036 num > (unsigned int) PNG_MAX_PALETTE_LENGTH) 2037 { 2038 png_crc_finish(png_ptr, length); 2039 png_chunk_benign_error(png_ptr, "invalid"); 2040 return; 2041 } 2042 2043 for (i = 0; i < num; i++) 2044 { 2045 png_byte buf[2]; 2046 2047 png_crc_read(png_ptr, buf, 2); 2048 readbuf[i] = png_get_uint_16(buf); 2049 } 2050 2051 if (png_crc_finish(png_ptr, 0) != 0) 2052 return; 2053 2054 png_set_hIST(png_ptr, info_ptr, readbuf); 2055} 2056#endif 2057 2058#ifdef PNG_READ_pHYs_SUPPORTED 2059void /* PRIVATE */ 2060png_handle_pHYs(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2061{ 2062 png_byte buf[9]; 2063 png_uint_32 res_x, res_y; 2064 int unit_type; 2065 2066 png_debug(1, "in png_handle_pHYs"); 2067 2068 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2069 png_chunk_error(png_ptr, "missing IHDR"); 2070 2071 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2072 { 2073 png_crc_finish(png_ptr, length); 2074 png_chunk_benign_error(png_ptr, "out of place"); 2075 return; 2076 } 2077 2078 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_pHYs) != 0) 2079 { 2080 png_crc_finish(png_ptr, length); 2081 png_chunk_benign_error(png_ptr, "duplicate"); 2082 return; 2083 } 2084 2085 if (length != 9) 2086 { 2087 png_crc_finish(png_ptr, length); 2088 png_chunk_benign_error(png_ptr, "invalid"); 2089 return; 2090 } 2091 2092 png_crc_read(png_ptr, buf, 9); 2093 2094 if (png_crc_finish(png_ptr, 0) != 0) 2095 return; 2096 2097 res_x = png_get_uint_32(buf); 2098 res_y = png_get_uint_32(buf + 4); 2099 unit_type = buf[8]; 2100 png_set_pHYs(png_ptr, info_ptr, res_x, res_y, unit_type); 2101} 2102#endif 2103 2104#ifdef PNG_READ_oFFs_SUPPORTED 2105void /* PRIVATE */ 2106png_handle_oFFs(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2107{ 2108 png_byte buf[9]; 2109 png_int_32 offset_x, offset_y; 2110 int unit_type; 2111 2112 png_debug(1, "in png_handle_oFFs"); 2113 2114 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2115 png_chunk_error(png_ptr, "missing IHDR"); 2116 2117 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2118 { 2119 png_crc_finish(png_ptr, length); 2120 png_chunk_benign_error(png_ptr, "out of place"); 2121 return; 2122 } 2123 2124 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_oFFs) != 0) 2125 { 2126 png_crc_finish(png_ptr, length); 2127 png_chunk_benign_error(png_ptr, "duplicate"); 2128 return; 2129 } 2130 2131 if (length != 9) 2132 { 2133 png_crc_finish(png_ptr, length); 2134 png_chunk_benign_error(png_ptr, "invalid"); 2135 return; 2136 } 2137 2138 png_crc_read(png_ptr, buf, 9); 2139 2140 if (png_crc_finish(png_ptr, 0) != 0) 2141 return; 2142 2143 offset_x = png_get_int_32(buf); 2144 offset_y = png_get_int_32(buf + 4); 2145 unit_type = buf[8]; 2146 png_set_oFFs(png_ptr, info_ptr, offset_x, offset_y, unit_type); 2147} 2148#endif 2149 2150#ifdef PNG_READ_pCAL_SUPPORTED 2151/* Read the pCAL chunk (described in the PNG Extensions document) */ 2152void /* PRIVATE */ 2153png_handle_pCAL(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2154{ 2155 png_int_32 X0, X1; 2156 png_byte type, nparams; 2157 png_bytep buffer, buf, units, endptr; 2158 png_charpp params; 2159 int i; 2160 2161 png_debug(1, "in png_handle_pCAL"); 2162 2163 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2164 png_chunk_error(png_ptr, "missing IHDR"); 2165 2166 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2167 { 2168 png_crc_finish(png_ptr, length); 2169 png_chunk_benign_error(png_ptr, "out of place"); 2170 return; 2171 } 2172 2173 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_pCAL) != 0) 2174 { 2175 png_crc_finish(png_ptr, length); 2176 png_chunk_benign_error(png_ptr, "duplicate"); 2177 return; 2178 } 2179 2180 png_debug1(2, "Allocating and reading pCAL chunk data (%u bytes)", 2181 length + 1); 2182 2183 buffer = png_read_buffer(png_ptr, length+1, 2/*silent*/); 2184 2185 if (buffer == NULL) 2186 { 2187 png_crc_finish(png_ptr, length); 2188 png_chunk_benign_error(png_ptr, "out of memory"); 2189 return; 2190 } 2191 2192 png_crc_read(png_ptr, buffer, length); 2193 2194 if (png_crc_finish(png_ptr, 0) != 0) 2195 return; 2196 2197 buffer[length] = 0; /* Null terminate the last string */ 2198 2199 png_debug(3, "Finding end of pCAL purpose string"); 2200 for (buf = buffer; *buf; buf++) 2201 /* Empty loop */ ; 2202 2203 endptr = buffer + length; 2204 2205 /* We need to have at least 12 bytes after the purpose string 2206 * in order to get the parameter information. 2207 */ 2208 if (endptr - buf <= 12) 2209 { 2210 png_chunk_benign_error(png_ptr, "invalid"); 2211 return; 2212 } 2213 2214 png_debug(3, "Reading pCAL X0, X1, type, nparams, and units"); 2215 X0 = png_get_int_32((png_bytep)buf+1); 2216 X1 = png_get_int_32((png_bytep)buf+5); 2217 type = buf[9]; 2218 nparams = buf[10]; 2219 units = buf + 11; 2220 2221 png_debug(3, "Checking pCAL equation type and number of parameters"); 2222 /* Check that we have the right number of parameters for known 2223 * equation types. 2224 */ 2225 if ((type == PNG_EQUATION_LINEAR && nparams != 2) || 2226 (type == PNG_EQUATION_BASE_E && nparams != 3) || 2227 (type == PNG_EQUATION_ARBITRARY && nparams != 3) || 2228 (type == PNG_EQUATION_HYPERBOLIC && nparams != 4)) 2229 { 2230 png_chunk_benign_error(png_ptr, "invalid parameter count"); 2231 return; 2232 } 2233 2234 else if (type >= PNG_EQUATION_LAST) 2235 { 2236 png_chunk_benign_error(png_ptr, "unrecognized equation type"); 2237 } 2238 2239 for (buf = units; *buf; buf++) 2240 /* Empty loop to move past the units string. */ ; 2241 2242 png_debug(3, "Allocating pCAL parameters array"); 2243 2244 params = png_voidcast(png_charpp, png_malloc_warn(png_ptr, 2245 nparams * (sizeof (png_charp)))); 2246 2247 if (params == NULL) 2248 { 2249 png_chunk_benign_error(png_ptr, "out of memory"); 2250 return; 2251 } 2252 2253 /* Get pointers to the start of each parameter string. */ 2254 for (i = 0; i < nparams; i++) 2255 { 2256 buf++; /* Skip the null string terminator from previous parameter. */ 2257 2258 png_debug1(3, "Reading pCAL parameter %d", i); 2259 2260 for (params[i] = (png_charp)buf; buf <= endptr && *buf != 0; buf++) 2261 /* Empty loop to move past each parameter string */ ; 2262 2263 /* Make sure we haven't run out of data yet */ 2264 if (buf > endptr) 2265 { 2266 png_free(png_ptr, params); 2267 png_chunk_benign_error(png_ptr, "invalid data"); 2268 return; 2269 } 2270 } 2271 2272 png_set_pCAL(png_ptr, info_ptr, (png_charp)buffer, X0, X1, type, nparams, 2273 (png_charp)units, params); 2274 2275 png_free(png_ptr, params); 2276} 2277#endif 2278 2279#ifdef PNG_READ_sCAL_SUPPORTED 2280/* Read the sCAL chunk */ 2281void /* PRIVATE */ 2282png_handle_sCAL(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2283{ 2284 png_bytep buffer; 2285 png_size_t i; 2286 int state; 2287 2288 png_debug(1, "in png_handle_sCAL"); 2289 2290 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2291 png_chunk_error(png_ptr, "missing IHDR"); 2292 2293 else if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2294 { 2295 png_crc_finish(png_ptr, length); 2296 png_chunk_benign_error(png_ptr, "out of place"); 2297 return; 2298 } 2299 2300 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_sCAL) != 0) 2301 { 2302 png_crc_finish(png_ptr, length); 2303 png_chunk_benign_error(png_ptr, "duplicate"); 2304 return; 2305 } 2306 2307 /* Need unit type, width, \0, height: minimum 4 bytes */ 2308 else if (length < 4) 2309 { 2310 png_crc_finish(png_ptr, length); 2311 png_chunk_benign_error(png_ptr, "invalid"); 2312 return; 2313 } 2314 2315 png_debug1(2, "Allocating and reading sCAL chunk data (%u bytes)", 2316 length + 1); 2317 2318 buffer = png_read_buffer(png_ptr, length+1, 2/*silent*/); 2319 2320 if (buffer == NULL) 2321 { 2322 png_chunk_benign_error(png_ptr, "out of memory"); 2323 png_crc_finish(png_ptr, length); 2324 return; 2325 } 2326 2327 png_crc_read(png_ptr, buffer, length); 2328 buffer[length] = 0; /* Null terminate the last string */ 2329 2330 if (png_crc_finish(png_ptr, 0) != 0) 2331 return; 2332 2333 /* Validate the unit. */ 2334 if (buffer[0] != 1 && buffer[0] != 2) 2335 { 2336 png_chunk_benign_error(png_ptr, "invalid unit"); 2337 return; 2338 } 2339 2340 /* Validate the ASCII numbers, need two ASCII numbers separated by 2341 * a '\0' and they need to fit exactly in the chunk data. 2342 */ 2343 i = 1; 2344 state = 0; 2345 2346 if (png_check_fp_number((png_const_charp)buffer, length, &state, &i) == 0 || 2347 i >= length || buffer[i++] != 0) 2348 png_chunk_benign_error(png_ptr, "bad width format"); 2349 2350 else if (PNG_FP_IS_POSITIVE(state) == 0) 2351 png_chunk_benign_error(png_ptr, "non-positive width"); 2352 2353 else 2354 { 2355 png_size_t heighti = i; 2356 2357 state = 0; 2358 if (png_check_fp_number((png_const_charp)buffer, length, 2359 &state, &i) == 0 || i != length) 2360 png_chunk_benign_error(png_ptr, "bad height format"); 2361 2362 else if (PNG_FP_IS_POSITIVE(state) == 0) 2363 png_chunk_benign_error(png_ptr, "non-positive height"); 2364 2365 else 2366 /* This is the (only) success case. */ 2367 png_set_sCAL_s(png_ptr, info_ptr, buffer[0], 2368 (png_charp)buffer+1, (png_charp)buffer+heighti); 2369 } 2370} 2371#endif 2372 2373#ifdef PNG_READ_tIME_SUPPORTED 2374void /* PRIVATE */ 2375png_handle_tIME(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2376{ 2377 png_byte buf[7]; 2378 png_time mod_time; 2379 2380 png_debug(1, "in png_handle_tIME"); 2381 2382 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2383 png_chunk_error(png_ptr, "missing IHDR"); 2384 2385 else if (info_ptr != NULL && (info_ptr->valid & PNG_INFO_tIME) != 0) 2386 { 2387 png_crc_finish(png_ptr, length); 2388 png_chunk_benign_error(png_ptr, "duplicate"); 2389 return; 2390 } 2391 2392 if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2393 png_ptr->mode |= PNG_AFTER_IDAT; 2394 2395 if (length != 7) 2396 { 2397 png_crc_finish(png_ptr, length); 2398 png_chunk_benign_error(png_ptr, "invalid"); 2399 return; 2400 } 2401 2402 png_crc_read(png_ptr, buf, 7); 2403 2404 if (png_crc_finish(png_ptr, 0) != 0) 2405 return; 2406 2407 mod_time.second = buf[6]; 2408 mod_time.minute = buf[5]; 2409 mod_time.hour = buf[4]; 2410 mod_time.day = buf[3]; 2411 mod_time.month = buf[2]; 2412 mod_time.year = png_get_uint_16(buf); 2413 2414 png_set_tIME(png_ptr, info_ptr, &mod_time); 2415} 2416#endif 2417 2418#ifdef PNG_READ_tEXt_SUPPORTED 2419/* Note: this does not properly handle chunks that are > 64K under DOS */ 2420void /* PRIVATE */ 2421png_handle_tEXt(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2422{ 2423 png_text text_info; 2424 png_bytep buffer; 2425 png_charp key; 2426 png_charp text; 2427 png_uint_32 skip = 0; 2428 2429 png_debug(1, "in png_handle_tEXt"); 2430 2431#ifdef PNG_USER_LIMITS_SUPPORTED 2432 if (png_ptr->user_chunk_cache_max != 0) 2433 { 2434 if (png_ptr->user_chunk_cache_max == 1) 2435 { 2436 png_crc_finish(png_ptr, length); 2437 return; 2438 } 2439 2440 if (--png_ptr->user_chunk_cache_max == 1) 2441 { 2442 png_crc_finish(png_ptr, length); 2443 png_chunk_benign_error(png_ptr, "no space in chunk cache"); 2444 return; 2445 } 2446 } 2447#endif 2448 2449 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2450 png_chunk_error(png_ptr, "missing IHDR"); 2451 2452 if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2453 png_ptr->mode |= PNG_AFTER_IDAT; 2454 2455#ifdef PNG_MAX_MALLOC_64K 2456 if (length > 65535U) 2457 { 2458 png_crc_finish(png_ptr, length); 2459 png_chunk_benign_error(png_ptr, "too large to fit in memory"); 2460 return; 2461 } 2462#endif 2463 2464 buffer = png_read_buffer(png_ptr, length+1, 1/*warn*/); 2465 2466 if (buffer == NULL) 2467 { 2468 png_chunk_benign_error(png_ptr, "out of memory"); 2469 return; 2470 } 2471 2472 png_crc_read(png_ptr, buffer, length); 2473 2474 if (png_crc_finish(png_ptr, skip) != 0) 2475 return; 2476 2477 key = (png_charp)buffer; 2478 key[length] = 0; 2479 2480 for (text = key; *text; text++) 2481 /* Empty loop to find end of key */ ; 2482 2483 if (text != key + length) 2484 text++; 2485 2486 text_info.compression = PNG_TEXT_COMPRESSION_NONE; 2487 text_info.key = key; 2488 text_info.lang = NULL; 2489 text_info.lang_key = NULL; 2490 text_info.itxt_length = 0; 2491 text_info.text = text; 2492 text_info.text_length = strlen(text); 2493 2494 if (png_set_text_2(png_ptr, info_ptr, &text_info, 1) != 0) 2495 png_warning(png_ptr, "Insufficient memory to process text chunk"); 2496} 2497#endif 2498 2499#ifdef PNG_READ_zTXt_SUPPORTED 2500/* Note: this does not correctly handle chunks that are > 64K under DOS */ 2501void /* PRIVATE */ 2502png_handle_zTXt(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2503{ 2504 png_const_charp errmsg = NULL; 2505 png_bytep buffer; 2506 png_uint_32 keyword_length; 2507 2508 png_debug(1, "in png_handle_zTXt"); 2509 2510#ifdef PNG_USER_LIMITS_SUPPORTED 2511 if (png_ptr->user_chunk_cache_max != 0) 2512 { 2513 if (png_ptr->user_chunk_cache_max == 1) 2514 { 2515 png_crc_finish(png_ptr, length); 2516 return; 2517 } 2518 2519 if (--png_ptr->user_chunk_cache_max == 1) 2520 { 2521 png_crc_finish(png_ptr, length); 2522 png_chunk_benign_error(png_ptr, "no space in chunk cache"); 2523 return; 2524 } 2525 } 2526#endif 2527 2528 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2529 png_chunk_error(png_ptr, "missing IHDR"); 2530 2531 if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2532 png_ptr->mode |= PNG_AFTER_IDAT; 2533 2534 buffer = png_read_buffer(png_ptr, length, 2/*silent*/); 2535 2536 if (buffer == NULL) 2537 { 2538 png_crc_finish(png_ptr, length); 2539 png_chunk_benign_error(png_ptr, "out of memory"); 2540 return; 2541 } 2542 2543 png_crc_read(png_ptr, buffer, length); 2544 2545 if (png_crc_finish(png_ptr, 0) != 0) 2546 return; 2547 2548 /* TODO: also check that the keyword contents match the spec! */ 2549 for (keyword_length = 0; 2550 keyword_length < length && buffer[keyword_length] != 0; 2551 ++keyword_length) 2552 /* Empty loop to find end of name */ ; 2553 2554 if (keyword_length > 79 || keyword_length < 1) 2555 errmsg = "bad keyword"; 2556 2557 /* zTXt must have some LZ data after the keyword, although it may expand to 2558 * zero bytes; we need a '\0' at the end of the keyword, the compression type 2559 * then the LZ data: 2560 */ 2561 else if (keyword_length + 3 > length) 2562 errmsg = "truncated"; 2563 2564 else if (buffer[keyword_length+1] != PNG_COMPRESSION_TYPE_BASE) 2565 errmsg = "unknown compression type"; 2566 2567 else 2568 { 2569 png_alloc_size_t uncompressed_length = PNG_SIZE_MAX; 2570 2571 /* TODO: at present png_decompress_chunk imposes a single application 2572 * level memory limit, this should be split to different values for iCCP 2573 * and text chunks. 2574 */ 2575 if (png_decompress_chunk(png_ptr, length, keyword_length+2, 2576 &uncompressed_length, 1/*terminate*/) == Z_STREAM_END) 2577 { 2578 png_text text; 2579 2580 /* It worked; png_ptr->read_buffer now looks like a tEXt chunk except 2581 * for the extra compression type byte and the fact that it isn't 2582 * necessarily '\0' terminated. 2583 */ 2584 buffer = png_ptr->read_buffer; 2585 buffer[uncompressed_length+(keyword_length+2)] = 0; 2586 2587 text.compression = PNG_TEXT_COMPRESSION_zTXt; 2588 text.key = (png_charp)buffer; 2589 text.text = (png_charp)(buffer + keyword_length+2); 2590 text.text_length = uncompressed_length; 2591 text.itxt_length = 0; 2592 text.lang = NULL; 2593 text.lang_key = NULL; 2594 2595 if (png_set_text_2(png_ptr, info_ptr, &text, 1) != 0) 2596 errmsg = "insufficient memory"; 2597 } 2598 2599 else 2600 errmsg = png_ptr->zstream.msg; 2601 } 2602 2603 if (errmsg != NULL) 2604 png_chunk_benign_error(png_ptr, errmsg); 2605} 2606#endif 2607 2608#ifdef PNG_READ_iTXt_SUPPORTED 2609/* Note: this does not correctly handle chunks that are > 64K under DOS */ 2610void /* PRIVATE */ 2611png_handle_iTXt(png_structrp png_ptr, png_inforp info_ptr, png_uint_32 length) 2612{ 2613 png_const_charp errmsg = NULL; 2614 png_bytep buffer; 2615 png_uint_32 prefix_length; 2616 2617 png_debug(1, "in png_handle_iTXt"); 2618 2619#ifdef PNG_USER_LIMITS_SUPPORTED 2620 if (png_ptr->user_chunk_cache_max != 0) 2621 { 2622 if (png_ptr->user_chunk_cache_max == 1) 2623 { 2624 png_crc_finish(png_ptr, length); 2625 return; 2626 } 2627 2628 if (--png_ptr->user_chunk_cache_max == 1) 2629 { 2630 png_crc_finish(png_ptr, length); 2631 png_chunk_benign_error(png_ptr, "no space in chunk cache"); 2632 return; 2633 } 2634 } 2635#endif 2636 2637 if ((png_ptr->mode & PNG_HAVE_IHDR) == 0) 2638 png_chunk_error(png_ptr, "missing IHDR"); 2639 2640 if ((png_ptr->mode & PNG_HAVE_IDAT) != 0) 2641 png_ptr->mode |= PNG_AFTER_IDAT; 2642 2643 buffer = png_read_buffer(png_ptr, length+1, 1/*warn*/); 2644 2645 if (buffer == NULL) 2646 { 2647 png_crc_finish(png_ptr, length); 2648 png_chunk_benign_error(png_ptr, "out of memory"); 2649 return; 2650 } 2651 2652 png_crc_read(png_ptr, buffer, length); 2653 2654 if (png_crc_finish(png_ptr, 0) != 0) 2655 return; 2656 2657 /* First the keyword. */ 2658 for (prefix_length=0; 2659 prefix_length < length && buffer[prefix_length] != 0; 2660 ++prefix_length) 2661 /* Empty loop */ ; 2662 2663 /* Perform a basic check on the keyword length here. */ 2664 if (prefix_length > 79 || prefix_length < 1) 2665 errmsg = "bad keyword"; 2666 2667 /* Expect keyword, compression flag, compression type, language, translated 2668 * keyword (both may be empty but are 0 terminated) then the text, which may 2669 * be empty. 2670 */ 2671 else if (prefix_length + 5 > length) 2672 errmsg = "truncated"; 2673 2674 else if (buffer[prefix_length+1] == 0 || 2675 (buffer[prefix_length+1] == 1 && 2676 buffer[prefix_length+2] == PNG_COMPRESSION_TYPE_BASE)) 2677 { 2678 int compressed = buffer[prefix_length+1] != 0; 2679 png_uint_32 language_offset, translated_keyword_offset; 2680 png_alloc_size_t uncompressed_length = 0; 2681 2682 /* Now the language tag */ 2683 prefix_length += 3; 2684 language_offset = prefix_length; 2685 2686 for (; prefix_length < length && buffer[prefix_length] != 0; 2687 ++prefix_length) 2688 /* Empty loop */ ; 2689 2690 /* WARNING: the length may be invalid here, this is checked below. */ 2691 translated_keyword_offset = ++prefix_length; 2692 2693 for (; prefix_length < length && buffer[prefix_length] != 0; 2694 ++prefix_length) 2695 /* Empty loop */ ; 2696 2697 /* prefix_length should now be at the trailing '\0' of the translated 2698 * keyword, but it may already be over the end. None of this arithmetic 2699 * can overflow because chunks are at most 2^31 bytes long, but on 16-bit 2700 * systems the available allocation may overflow. 2701 */ 2702 ++prefix_length; 2703 2704 if (compressed == 0 && prefix_length <= length) 2705 uncompressed_length = length - prefix_length; 2706 2707 else if (compressed != 0 && prefix_length < length) 2708 { 2709 uncompressed_length = PNG_SIZE_MAX; 2710 2711 /* TODO: at present png_decompress_chunk imposes a single application 2712 * level memory limit, this should be split to different values for 2713 * iCCP and text chunks. 2714 */ 2715 if (png_decompress_chunk(png_ptr, length, prefix_length, 2716 &uncompressed_length, 1/*terminate*/) == Z_STREAM_END) 2717 buffer = png_ptr->read_buffer; 2718 2719 else 2720 errmsg = png_ptr->zstream.msg; 2721 } 2722 2723 else 2724 errmsg = "truncated"; 2725 2726 if (errmsg == NULL) 2727 { 2728 png_text text; 2729 2730 buffer[uncompressed_length+prefix_length] = 0; 2731 2732 if (compressed == 0) 2733 text.compression = PNG_ITXT_COMPRESSION_NONE; 2734 2735 else 2736 text.compression = PNG_ITXT_COMPRESSION_zTXt; 2737 2738 text.key = (png_charp)buffer; 2739 text.lang = (png_charp)buffer + language_offset; 2740 text.lang_key = (png_charp)buffer + translated_keyword_offset; 2741 text.text = (png_charp)buffer + prefix_length; 2742 text.text_length = 0; 2743 text.itxt_length = uncompressed_length; 2744 2745 if (png_set_text_2(png_ptr, info_ptr, &text, 1) != 0) 2746 errmsg = "insufficient memory"; 2747 } 2748 } 2749 2750 else 2751 errmsg = "bad compression info"; 2752 2753 if (errmsg != NULL) 2754 png_chunk_benign_error(png_ptr, errmsg); 2755} 2756#endif 2757 2758#ifdef PNG_READ_UNKNOWN_CHUNKS_SUPPORTED 2759/* Utility function for png_handle_unknown; set up png_ptr::unknown_chunk */ 2760static int 2761png_cache_unknown_chunk(png_structrp png_ptr, png_uint_32 length) 2762{ 2763 png_alloc_size_t limit = PNG_SIZE_MAX; 2764 2765 if (png_ptr->unknown_chunk.data != NULL) 2766 { 2767 png_free(png_ptr, png_ptr->unknown_chunk.data); 2768 png_ptr->unknown_chunk.data = NULL; 2769 } 2770 2771# ifdef PNG_SET_USER_LIMITS_SUPPORTED 2772 if (png_ptr->user_chunk_malloc_max > 0 && 2773 png_ptr->user_chunk_malloc_max < limit) 2774 limit = png_ptr->user_chunk_malloc_max; 2775 2776# elif PNG_USER_CHUNK_MALLOC_MAX > 0 2777 if (PNG_USER_CHUNK_MALLOC_MAX < limit) 2778 limit = PNG_USER_CHUNK_MALLOC_MAX; 2779# endif 2780 2781 if (length <= limit) 2782 { 2783 PNG_CSTRING_FROM_CHUNK(png_ptr->unknown_chunk.name, png_ptr->chunk_name); 2784 /* The following is safe because of the PNG_SIZE_MAX init above */ 2785 png_ptr->unknown_chunk.size = (png_size_t)length/*SAFE*/; 2786 /* 'mode' is a flag array, only the bottom four bits matter here */ 2787 png_ptr->unknown_chunk.location = (png_byte)png_ptr->mode/*SAFE*/; 2788 2789 if (length == 0) 2790 png_ptr->unknown_chunk.data = NULL; 2791 2792 else 2793 { 2794 /* Do a 'warn' here - it is handled below. */ 2795 png_ptr->unknown_chunk.data = png_voidcast(png_bytep, 2796 png_malloc_warn(png_ptr, length)); 2797 } 2798 } 2799 2800 if (png_ptr->unknown_chunk.data == NULL && length > 0) 2801 { 2802 /* This is benign because we clean up correctly */ 2803 png_crc_finish(png_ptr, length); 2804 png_chunk_benign_error(png_ptr, "unknown chunk exceeds memory limits"); 2805 return 0; 2806 } 2807 2808 else 2809 { 2810 if (length > 0) 2811 png_crc_read(png_ptr, png_ptr->unknown_chunk.data, length); 2812 png_crc_finish(png_ptr, 0); 2813 return 1; 2814 } 2815} 2816#endif /* READ_UNKNOWN_CHUNKS */ 2817 2818/* Handle an unknown, or known but disabled, chunk */ 2819void /* PRIVATE */ 2820png_handle_unknown(png_structrp png_ptr, png_inforp info_ptr, 2821 png_uint_32 length, int keep) 2822{ 2823 int handled = 0; /* the chunk was handled */ 2824 2825 png_debug(1, "in png_handle_unknown"); 2826 2827#ifdef PNG_READ_UNKNOWN_CHUNKS_SUPPORTED 2828 /* NOTE: this code is based on the code in libpng-1.4.12 except for fixing 2829 * the bug which meant that setting a non-default behavior for a specific 2830 * chunk would be ignored (the default was always used unless a user 2831 * callback was installed). 2832 * 2833 * 'keep' is the value from the png_chunk_unknown_handling, the setting for 2834 * this specific chunk_name, if PNG_HANDLE_AS_UNKNOWN_SUPPORTED, if not it 2835 * will always be PNG_HANDLE_CHUNK_AS_DEFAULT and it needs to be set here. 2836 * This is just an optimization to avoid multiple calls to the lookup 2837 * function. 2838 */ 2839# ifndef PNG_HANDLE_AS_UNKNOWN_SUPPORTED 2840# ifdef PNG_SET_UNKNOWN_CHUNKS_SUPPORTED 2841 keep = png_chunk_unknown_handling(png_ptr, png_ptr->chunk_name); 2842# endif 2843# endif 2844 2845 /* One of the following methods will read the chunk or skip it (at least one 2846 * of these is always defined because this is the only way to switch on 2847 * PNG_READ_UNKNOWN_CHUNKS_SUPPORTED) 2848 */ 2849# ifdef PNG_READ_USER_CHUNKS_SUPPORTED 2850 /* The user callback takes precedence over the chunk keep value, but the 2851 * keep value is still required to validate a save of a critical chunk. 2852 */ 2853 if (png_ptr->read_user_chunk_fn != NULL) 2854 { 2855 if (png_cache_unknown_chunk(png_ptr, length) != 0) 2856 { 2857 /* Callback to user unknown chunk handler */ 2858 int ret = (*(png_ptr->read_user_chunk_fn))(png_ptr, 2859 &png_ptr->unknown_chunk); 2860 2861 /* ret is: 2862 * negative: An error occurred; png_chunk_error will be called. 2863 * zero: The chunk was not handled, the chunk will be discarded 2864 * unless png_set_keep_unknown_chunks has been used to set 2865 * a 'keep' behavior for this particular chunk, in which 2866 * case that will be used. A critical chunk will cause an 2867 * error at this point unless it is to be saved. 2868 * positive: The chunk was handled, libpng will ignore/discard it. 2869 */ 2870 if (ret < 0) 2871 png_chunk_error(png_ptr, "error in user chunk"); 2872 2873 else if (ret == 0) 2874 { 2875 /* If the keep value is 'default' or 'never' override it, but 2876 * still error out on critical chunks unless the keep value is 2877 * 'always' While this is weird it is the behavior in 1.4.12. 2878 * A possible improvement would be to obey the value set for the 2879 * chunk, but this would be an API change that would probably 2880 * damage some applications. 2881 * 2882 * The png_app_warning below catches the case that matters, where 2883 * the application has not set specific save or ignore for this 2884 * chunk or global save or ignore. 2885 */ 2886 if (keep < PNG_HANDLE_CHUNK_IF_SAFE) 2887 { 2888# ifdef PNG_SET_UNKNOWN_CHUNKS_SUPPORTED 2889 if (png_ptr->unknown_default < PNG_HANDLE_CHUNK_IF_SAFE) 2890 { 2891 png_chunk_warning(png_ptr, "Saving unknown chunk:"); 2892 png_app_warning(png_ptr, 2893 "forcing save of an unhandled chunk;" 2894 " please call png_set_keep_unknown_chunks"); 2895 /* with keep = PNG_HANDLE_CHUNK_IF_SAFE */ 2896 } 2897# endif 2898 keep = PNG_HANDLE_CHUNK_IF_SAFE; 2899 } 2900 } 2901 2902 else /* chunk was handled */ 2903 { 2904 handled = 1; 2905 /* Critical chunks can be safely discarded at this point. */ 2906 keep = PNG_HANDLE_CHUNK_NEVER; 2907 } 2908 } 2909 2910 else 2911 keep = PNG_HANDLE_CHUNK_NEVER; /* insufficient memory */ 2912 } 2913 2914 else 2915 /* Use the SAVE_UNKNOWN_CHUNKS code or skip the chunk */ 2916# endif /* READ_USER_CHUNKS */ 2917 2918# ifdef PNG_SAVE_UNKNOWN_CHUNKS_SUPPORTED 2919 { 2920 /* keep is currently just the per-chunk setting, if there was no 2921 * setting change it to the global default now (not that this may 2922 * still be AS_DEFAULT) then obtain the cache of the chunk if required, 2923 * if not simply skip the chunk. 2924 */ 2925 if (keep == PNG_HANDLE_CHUNK_AS_DEFAULT) 2926 keep = png_ptr->unknown_default; 2927 2928 if (keep == PNG_HANDLE_CHUNK_ALWAYS || 2929 (keep == PNG_HANDLE_CHUNK_IF_SAFE && 2930 PNG_CHUNK_ANCILLARY(png_ptr->chunk_name))) 2931 { 2932 if (png_cache_unknown_chunk(png_ptr, length) == 0) 2933 keep = PNG_HANDLE_CHUNK_NEVER; 2934 } 2935 2936 else 2937 png_crc_finish(png_ptr, length); 2938 } 2939# else 2940# ifndef PNG_READ_USER_CHUNKS_SUPPORTED 2941# error no method to support READ_UNKNOWN_CHUNKS 2942# endif 2943 2944 { 2945 /* If here there is no read callback pointer set and no support is 2946 * compiled in to just save the unknown chunks, so simply skip this 2947 * chunk. If 'keep' is something other than AS_DEFAULT or NEVER then 2948 * the app has erroneously asked for unknown chunk saving when there 2949 * is no support. 2950 */ 2951 if (keep > PNG_HANDLE_CHUNK_NEVER) 2952 png_app_error(png_ptr, "no unknown chunk support available"); 2953 2954 png_crc_finish(png_ptr, length); 2955 } 2956# endif 2957 2958# ifdef PNG_STORE_UNKNOWN_CHUNKS_SUPPORTED 2959 /* Now store the chunk in the chunk list if appropriate, and if the limits 2960 * permit it. 2961 */ 2962 if (keep == PNG_HANDLE_CHUNK_ALWAYS || 2963 (keep == PNG_HANDLE_CHUNK_IF_SAFE && 2964 PNG_CHUNK_ANCILLARY(png_ptr->chunk_name))) 2965 { 2966# ifdef PNG_USER_LIMITS_SUPPORTED 2967 switch (png_ptr->user_chunk_cache_max) 2968 { 2969 case 2: 2970 png_ptr->user_chunk_cache_max = 1; 2971 png_chunk_benign_error(png_ptr, "no space in chunk cache"); 2972 /* FALL THROUGH */ 2973 case 1: 2974 /* NOTE: prior to 1.6.0 this case resulted in an unknown critical 2975 * chunk being skipped, now there will be a hard error below. 2976 */ 2977 break; 2978 2979 default: /* not at limit */ 2980 --(png_ptr->user_chunk_cache_max); 2981 /* FALL THROUGH */ 2982 case 0: /* no limit */ 2983# endif /* USER_LIMITS */ 2984 /* Here when the limit isn't reached or when limits are compiled 2985 * out; store the chunk. 2986 */ 2987 png_set_unknown_chunks(png_ptr, info_ptr, 2988 &png_ptr->unknown_chunk, 1); 2989 handled = 1; 2990# ifdef PNG_USER_LIMITS_SUPPORTED 2991 break; 2992 } 2993# endif 2994 } 2995# else /* no store support: the chunk must be handled by the user callback */ 2996 PNG_UNUSED(info_ptr) 2997# endif 2998 2999 /* Regardless of the error handling below the cached data (if any) can be 3000 * freed now. Notice that the data is not freed if there is a png_error, but 3001 * it will be freed by destroy_read_struct. 3002 */ 3003 if (png_ptr->unknown_chunk.data != NULL) 3004 png_free(png_ptr, png_ptr->unknown_chunk.data); 3005 png_ptr->unknown_chunk.data = NULL; 3006 3007#else /* !PNG_READ_UNKNOWN_CHUNKS_SUPPORTED */ 3008 /* There is no support to read an unknown chunk, so just skip it. */ 3009 png_crc_finish(png_ptr, length); 3010 PNG_UNUSED(info_ptr) 3011 PNG_UNUSED(keep) 3012#endif /* !READ_UNKNOWN_CHUNKS */ 3013 3014 /* Check for unhandled critical chunks */ 3015 if (handled == 0 && PNG_CHUNK_CRITICAL(png_ptr->chunk_name)) 3016 png_chunk_error(png_ptr, "unhandled critical chunk"); 3017} 3018 3019/* This function is called to verify that a chunk name is valid. 3020 * This function can't have the "critical chunk check" incorporated 3021 * into it, since in the future we will need to be able to call user 3022 * functions to handle unknown critical chunks after we check that 3023 * the chunk name itself is valid. 3024 */ 3025 3026/* Bit hacking: the test for an invalid byte in the 4 byte chunk name is: 3027 * 3028 * ((c) < 65 || (c) > 122 || ((c) > 90 && (c) < 97)) 3029 */ 3030 3031void /* PRIVATE */ 3032png_check_chunk_name(png_structrp png_ptr, png_uint_32 chunk_name) 3033{ 3034 int i; 3035 3036 png_debug(1, "in png_check_chunk_name"); 3037 3038 for (i=1; i<=4; ++i) 3039 { 3040 int c = chunk_name & 0xff; 3041 3042 if (c < 65 || c > 122 || (c > 90 && c < 97)) 3043 png_chunk_error(png_ptr, "invalid chunk type"); 3044 3045 chunk_name >>= 8; 3046 } 3047} 3048 3049/* Combines the row recently read in with the existing pixels in the row. This 3050 * routine takes care of alpha and transparency if requested. This routine also 3051 * handles the two methods of progressive display of interlaced images, 3052 * depending on the 'display' value; if 'display' is true then the whole row 3053 * (dp) is filled from the start by replicating the available pixels. If 3054 * 'display' is false only those pixels present in the pass are filled in. 3055 */ 3056void /* PRIVATE */ 3057png_combine_row(png_const_structrp png_ptr, png_bytep dp, int display) 3058{ 3059 unsigned int pixel_depth = png_ptr->transformed_pixel_depth; 3060 png_const_bytep sp = png_ptr->row_buf + 1; 3061 png_alloc_size_t row_width = png_ptr->width; 3062 unsigned int pass = png_ptr->pass; 3063 png_bytep end_ptr = 0; 3064 png_byte end_byte = 0; 3065 unsigned int end_mask; 3066 3067 png_debug(1, "in png_combine_row"); 3068 3069 /* Added in 1.5.6: it should not be possible to enter this routine until at 3070 * least one row has been read from the PNG data and transformed. 3071 */ 3072 if (pixel_depth == 0) 3073 png_error(png_ptr, "internal row logic error"); 3074 3075 /* Added in 1.5.4: the pixel depth should match the information returned by 3076 * any call to png_read_update_info at this point. Do not continue if we got 3077 * this wrong. 3078 */ 3079 if (png_ptr->info_rowbytes != 0 && png_ptr->info_rowbytes != 3080 PNG_ROWBYTES(pixel_depth, row_width)) 3081 png_error(png_ptr, "internal row size calculation error"); 3082 3083 /* Don't expect this to ever happen: */ 3084 if (row_width == 0) 3085 png_error(png_ptr, "internal row width error"); 3086 3087 /* Preserve the last byte in cases where only part of it will be overwritten, 3088 * the multiply below may overflow, we don't care because ANSI-C guarantees 3089 * we get the low bits. 3090 */ 3091 end_mask = (pixel_depth * row_width) & 7; 3092 if (end_mask != 0) 3093 { 3094 /* end_ptr == NULL is a flag to say do nothing */ 3095 end_ptr = dp + PNG_ROWBYTES(pixel_depth, row_width) - 1; 3096 end_byte = *end_ptr; 3097# ifdef PNG_READ_PACKSWAP_SUPPORTED 3098 if ((png_ptr->transformations & PNG_PACKSWAP) != 0) 3099 /* little-endian byte */ 3100 end_mask = 0xff << end_mask; 3101 3102 else /* big-endian byte */ 3103# endif 3104 end_mask = 0xff >> end_mask; 3105 /* end_mask is now the bits to *keep* from the destination row */ 3106 } 3107 3108 /* For non-interlaced images this reduces to a memcpy(). A memcpy() 3109 * will also happen if interlacing isn't supported or if the application 3110 * does not call png_set_interlace_handling(). In the latter cases the 3111 * caller just gets a sequence of the unexpanded rows from each interlace 3112 * pass. 3113 */ 3114#ifdef PNG_READ_INTERLACING_SUPPORTED 3115 if (png_ptr->interlaced != 0 && 3116 (png_ptr->transformations & PNG_INTERLACE) != 0 && 3117 pass < 6 && (display == 0 || 3118 /* The following copies everything for 'display' on passes 0, 2 and 4. */ 3119 (display == 1 && (pass & 1) != 0))) 3120 { 3121 /* Narrow images may have no bits in a pass; the caller should handle 3122 * this, but this test is cheap: 3123 */ 3124 if (row_width <= PNG_PASS_START_COL(pass)) 3125 return; 3126 3127 if (pixel_depth < 8) 3128 { 3129 /* For pixel depths up to 4 bpp the 8-pixel mask can be expanded to fit 3130 * into 32 bits, then a single loop over the bytes using the four byte 3131 * values in the 32-bit mask can be used. For the 'display' option the 3132 * expanded mask may also not require any masking within a byte. To 3133 * make this work the PACKSWAP option must be taken into account - it 3134 * simply requires the pixels to be reversed in each byte. 3135 * 3136 * The 'regular' case requires a mask for each of the first 6 passes, 3137 * the 'display' case does a copy for the even passes in the range 3138 * 0..6. This has already been handled in the test above. 3139 * 3140 * The masks are arranged as four bytes with the first byte to use in 3141 * the lowest bits (little-endian) regardless of the order (PACKSWAP or 3142 * not) of the pixels in each byte. 3143 * 3144 * NOTE: the whole of this logic depends on the caller of this function 3145 * only calling it on rows appropriate to the pass. This function only 3146 * understands the 'x' logic; the 'y' logic is handled by the caller. 3147 * 3148 * The following defines allow generation of compile time constant bit 3149 * masks for each pixel depth and each possibility of swapped or not 3150 * swapped bytes. Pass 'p' is in the range 0..6; 'x', a pixel index, 3151 * is in the range 0..7; and the result is 1 if the pixel is to be 3152 * copied in the pass, 0 if not. 'S' is for the sparkle method, 'B' 3153 * for the block method. 3154 * 3155 * With some compilers a compile time expression of the general form: 3156 * 3157 * (shift >= 32) ? (a >> (shift-32)) : (b >> shift) 3158 * 3159 * Produces warnings with values of 'shift' in the range 33 to 63 3160 * because the right hand side of the ?: expression is evaluated by 3161 * the compiler even though it isn't used. Microsoft Visual C (various 3162 * versions) and the Intel C compiler are known to do this. To avoid 3163 * this the following macros are used in 1.5.6. This is a temporary 3164 * solution to avoid destabilizing the code during the release process. 3165 */ 3166# if PNG_USE_COMPILE_TIME_MASKS 3167# define PNG_LSR(x,s) ((x)>>((s) & 0x1f)) 3168# define PNG_LSL(x,s) ((x)<<((s) & 0x1f)) 3169# else 3170# define PNG_LSR(x,s) ((x)>>(s)) 3171# define PNG_LSL(x,s) ((x)<<(s)) 3172# endif 3173# define S_COPY(p,x) (((p)<4 ? PNG_LSR(0x80088822,(3-(p))*8+(7-(x))) :\ 3174 PNG_LSR(0xaa55ff00,(7-(p))*8+(7-(x)))) & 1) 3175# define B_COPY(p,x) (((p)<4 ? PNG_LSR(0xff0fff33,(3-(p))*8+(7-(x))) :\ 3176 PNG_LSR(0xff55ff00,(7-(p))*8+(7-(x)))) & 1) 3177 3178 /* Return a mask for pass 'p' pixel 'x' at depth 'd'. The mask is 3179 * little endian - the first pixel is at bit 0 - however the extra 3180 * parameter 's' can be set to cause the mask position to be swapped 3181 * within each byte, to match the PNG format. This is done by XOR of 3182 * the shift with 7, 6 or 4 for bit depths 1, 2 and 4. 3183 */ 3184# define PIXEL_MASK(p,x,d,s) \ 3185 (PNG_LSL(((PNG_LSL(1U,(d)))-1),(((x)*(d))^((s)?8-(d):0)))) 3186 3187 /* Hence generate the appropriate 'block' or 'sparkle' pixel copy mask. 3188 */ 3189# define S_MASKx(p,x,d,s) (S_COPY(p,x)?PIXEL_MASK(p,x,d,s):0) 3190# define B_MASKx(p,x,d,s) (B_COPY(p,x)?PIXEL_MASK(p,x,d,s):0) 3191 3192 /* Combine 8 of these to get the full mask. For the 1-bpp and 2-bpp 3193 * cases the result needs replicating, for the 4-bpp case the above 3194 * generates a full 32 bits. 3195 */ 3196# define MASK_EXPAND(m,d) ((m)*((d)==1?0x01010101:((d)==2?0x00010001:1))) 3197 3198# define S_MASK(p,d,s) MASK_EXPAND(S_MASKx(p,0,d,s) + S_MASKx(p,1,d,s) +\ 3199 S_MASKx(p,2,d,s) + S_MASKx(p,3,d,s) + S_MASKx(p,4,d,s) +\ 3200 S_MASKx(p,5,d,s) + S_MASKx(p,6,d,s) + S_MASKx(p,7,d,s), d) 3201 3202# define B_MASK(p,d,s) MASK_EXPAND(B_MASKx(p,0,d,s) + B_MASKx(p,1,d,s) +\ 3203 B_MASKx(p,2,d,s) + B_MASKx(p,3,d,s) + B_MASKx(p,4,d,s) +\ 3204 B_MASKx(p,5,d,s) + B_MASKx(p,6,d,s) + B_MASKx(p,7,d,s), d) 3205 3206#if PNG_USE_COMPILE_TIME_MASKS 3207 /* Utility macros to construct all the masks for a depth/swap 3208 * combination. The 's' parameter says whether the format is PNG 3209 * (big endian bytes) or not. Only the three odd-numbered passes are 3210 * required for the display/block algorithm. 3211 */ 3212# define S_MASKS(d,s) { S_MASK(0,d,s), S_MASK(1,d,s), S_MASK(2,d,s),\ 3213 S_MASK(3,d,s), S_MASK(4,d,s), S_MASK(5,d,s) } 3214 3215# define B_MASKS(d,s) { B_MASK(1,d,s), B_MASK(3,d,s), B_MASK(5,d,s) } 3216 3217# define DEPTH_INDEX(d) ((d)==1?0:((d)==2?1:2)) 3218 3219 /* Hence the pre-compiled masks indexed by PACKSWAP (or not), depth and 3220 * then pass: 3221 */ 3222 static PNG_CONST png_uint_32 row_mask[2/*PACKSWAP*/][3/*depth*/][6] = 3223 { 3224 /* Little-endian byte masks for PACKSWAP */ 3225 { S_MASKS(1,0), S_MASKS(2,0), S_MASKS(4,0) }, 3226 /* Normal (big-endian byte) masks - PNG format */ 3227 { S_MASKS(1,1), S_MASKS(2,1), S_MASKS(4,1) } 3228 }; 3229 3230 /* display_mask has only three entries for the odd passes, so index by 3231 * pass>>1. 3232 */ 3233 static PNG_CONST png_uint_32 display_mask[2][3][3] = 3234 { 3235 /* Little-endian byte masks for PACKSWAP */ 3236 { B_MASKS(1,0), B_MASKS(2,0), B_MASKS(4,0) }, 3237 /* Normal (big-endian byte) masks - PNG format */ 3238 { B_MASKS(1,1), B_MASKS(2,1), B_MASKS(4,1) } 3239 }; 3240 3241# define MASK(pass,depth,display,png)\ 3242 ((display)?display_mask[png][DEPTH_INDEX(depth)][pass>>1]:\ 3243 row_mask[png][DEPTH_INDEX(depth)][pass]) 3244 3245#else /* !PNG_USE_COMPILE_TIME_MASKS */ 3246 /* This is the runtime alternative: it seems unlikely that this will 3247 * ever be either smaller or faster than the compile time approach. 3248 */ 3249# define MASK(pass,depth,display,png)\ 3250 ((display)?B_MASK(pass,depth,png):S_MASK(pass,depth,png)) 3251#endif /* !USE_COMPILE_TIME_MASKS */ 3252 3253 /* Use the appropriate mask to copy the required bits. In some cases 3254 * the byte mask will be 0 or 0xff; optimize these cases. row_width is 3255 * the number of pixels, but the code copies bytes, so it is necessary 3256 * to special case the end. 3257 */ 3258 png_uint_32 pixels_per_byte = 8 / pixel_depth; 3259 png_uint_32 mask; 3260 3261# ifdef PNG_READ_PACKSWAP_SUPPORTED 3262 if ((png_ptr->transformations & PNG_PACKSWAP) != 0) 3263 mask = MASK(pass, pixel_depth, display, 0); 3264 3265 else 3266# endif 3267 mask = MASK(pass, pixel_depth, display, 1); 3268 3269 for (;;) 3270 { 3271 png_uint_32 m; 3272 3273 /* It doesn't matter in the following if png_uint_32 has more than 3274 * 32 bits because the high bits always match those in m<<24; it is, 3275 * however, essential to use OR here, not +, because of this. 3276 */ 3277 m = mask; 3278 mask = (m >> 8) | (m << 24); /* rotate right to good compilers */ 3279 m &= 0xff; 3280 3281 if (m != 0) /* something to copy */ 3282 { 3283 if (m != 0xff) 3284 *dp = (png_byte)((*dp & ~m) | (*sp & m)); 3285 else 3286 *dp = *sp; 3287 } 3288 3289 /* NOTE: this may overwrite the last byte with garbage if the image 3290 * is not an exact number of bytes wide; libpng has always done 3291 * this. 3292 */ 3293 if (row_width <= pixels_per_byte) 3294 break; /* May need to restore part of the last byte */ 3295 3296 row_width -= pixels_per_byte; 3297 ++dp; 3298 ++sp; 3299 } 3300 } 3301 3302 else /* pixel_depth >= 8 */ 3303 { 3304 unsigned int bytes_to_copy, bytes_to_jump; 3305 3306 /* Validate the depth - it must be a multiple of 8 */ 3307 if (pixel_depth & 7) 3308 png_error(png_ptr, "invalid user transform pixel depth"); 3309 3310 pixel_depth >>= 3; /* now in bytes */ 3311 row_width *= pixel_depth; 3312 3313 /* Regardless of pass number the Adam 7 interlace always results in a 3314 * fixed number of pixels to copy then to skip. There may be a 3315 * different number of pixels to skip at the start though. 3316 */ 3317 { 3318 unsigned int offset = PNG_PASS_START_COL(pass) * pixel_depth; 3319 3320 row_width -= offset; 3321 dp += offset; 3322 sp += offset; 3323 } 3324 3325 /* Work out the bytes to copy. */ 3326 if (display != 0) 3327 { 3328 /* When doing the 'block' algorithm the pixel in the pass gets 3329 * replicated to adjacent pixels. This is why the even (0,2,4,6) 3330 * passes are skipped above - the entire expanded row is copied. 3331 */ 3332 bytes_to_copy = (1<<((6-pass)>>1)) * pixel_depth; 3333 3334 /* But don't allow this number to exceed the actual row width. */ 3335 if (bytes_to_copy > row_width) 3336 bytes_to_copy = (unsigned int)/*SAFE*/row_width; 3337 } 3338 3339 else /* normal row; Adam7 only ever gives us one pixel to copy. */ 3340 bytes_to_copy = pixel_depth; 3341 3342 /* In Adam7 there is a constant offset between where the pixels go. */ 3343 bytes_to_jump = PNG_PASS_COL_OFFSET(pass) * pixel_depth; 3344 3345 /* And simply copy these bytes. Some optimization is possible here, 3346 * depending on the value of 'bytes_to_copy'. Special case the low 3347 * byte counts, which we know to be frequent. 3348 * 3349 * Notice that these cases all 'return' rather than 'break' - this 3350 * avoids an unnecessary test on whether to restore the last byte 3351 * below. 3352 */ 3353 switch (bytes_to_copy) 3354 { 3355 case 1: 3356 for (;;) 3357 { 3358 *dp = *sp; 3359 3360 if (row_width <= bytes_to_jump) 3361 return; 3362 3363 dp += bytes_to_jump; 3364 sp += bytes_to_jump; 3365 row_width -= bytes_to_jump; 3366 } 3367 3368 case 2: 3369 /* There is a possibility of a partial copy at the end here; this 3370 * slows the code down somewhat. 3371 */ 3372 do 3373 { 3374 dp[0] = sp[0], dp[1] = sp[1]; 3375 3376 if (row_width <= bytes_to_jump) 3377 return; 3378 3379 sp += bytes_to_jump; 3380 dp += bytes_to_jump; 3381 row_width -= bytes_to_jump; 3382 } 3383 while (row_width > 1); 3384 3385 /* And there can only be one byte left at this point: */ 3386 *dp = *sp; 3387 return; 3388 3389 case 3: 3390 /* This can only be the RGB case, so each copy is exactly one 3391 * pixel and it is not necessary to check for a partial copy. 3392 */ 3393 for (;;) 3394 { 3395 dp[0] = sp[0], dp[1] = sp[1], dp[2] = sp[2]; 3396 3397 if (row_width <= bytes_to_jump) 3398 return; 3399 3400 sp += bytes_to_jump; 3401 dp += bytes_to_jump; 3402 row_width -= bytes_to_jump; 3403 } 3404 3405 default: 3406#if PNG_ALIGN_TYPE != PNG_ALIGN_NONE 3407 /* Check for double byte alignment and, if possible, use a 3408 * 16-bit copy. Don't attempt this for narrow images - ones that 3409 * are less than an interlace panel wide. Don't attempt it for 3410 * wide bytes_to_copy either - use the memcpy there. 3411 */ 3412 if (bytes_to_copy < 16 /*else use memcpy*/ && 3413 png_isaligned(dp, png_uint_16) && 3414 png_isaligned(sp, png_uint_16) && 3415 bytes_to_copy % (sizeof (png_uint_16)) == 0 && 3416 bytes_to_jump % (sizeof (png_uint_16)) == 0) 3417 { 3418 /* Everything is aligned for png_uint_16 copies, but try for 3419 * png_uint_32 first. 3420 */ 3421 if (png_isaligned(dp, png_uint_32) != 0 && 3422 png_isaligned(sp, png_uint_32) != 0 && 3423 bytes_to_copy % (sizeof (png_uint_32)) == 0 && 3424 bytes_to_jump % (sizeof (png_uint_32)) == 0) 3425 { 3426 png_uint_32p dp32 = png_aligncast(png_uint_32p,dp); 3427 png_const_uint_32p sp32 = png_aligncastconst( 3428 png_const_uint_32p, sp); 3429 size_t skip = (bytes_to_jump-bytes_to_copy) / 3430 (sizeof (png_uint_32)); 3431 3432 do 3433 { 3434 size_t c = bytes_to_copy; 3435 do 3436 { 3437 *dp32++ = *sp32++; 3438 c -= (sizeof (png_uint_32)); 3439 } 3440 while (c > 0); 3441 3442 if (row_width <= bytes_to_jump) 3443 return; 3444 3445 dp32 += skip; 3446 sp32 += skip; 3447 row_width -= bytes_to_jump; 3448 } 3449 while (bytes_to_copy <= row_width); 3450 3451 /* Get to here when the row_width truncates the final copy. 3452 * There will be 1-3 bytes left to copy, so don't try the 3453 * 16-bit loop below. 3454 */ 3455 dp = (png_bytep)dp32; 3456 sp = (png_const_bytep)sp32; 3457 do 3458 *dp++ = *sp++; 3459 while (--row_width > 0); 3460 return; 3461 } 3462 3463 /* Else do it in 16-bit quantities, but only if the size is 3464 * not too large. 3465 */ 3466 else 3467 { 3468 png_uint_16p dp16 = png_aligncast(png_uint_16p, dp); 3469 png_const_uint_16p sp16 = png_aligncastconst( 3470 png_const_uint_16p, sp); 3471 size_t skip = (bytes_to_jump-bytes_to_copy) / 3472 (sizeof (png_uint_16)); 3473 3474 do 3475 { 3476 size_t c = bytes_to_copy; 3477 do 3478 { 3479 *dp16++ = *sp16++; 3480 c -= (sizeof (png_uint_16)); 3481 } 3482 while (c > 0); 3483 3484 if (row_width <= bytes_to_jump) 3485 return; 3486 3487 dp16 += skip; 3488 sp16 += skip; 3489 row_width -= bytes_to_jump; 3490 } 3491 while (bytes_to_copy <= row_width); 3492 3493 /* End of row - 1 byte left, bytes_to_copy > row_width: */ 3494 dp = (png_bytep)dp16; 3495 sp = (png_const_bytep)sp16; 3496 do 3497 *dp++ = *sp++; 3498 while (--row_width > 0); 3499 return; 3500 } 3501 } 3502#endif /* ALIGN_TYPE code */ 3503 3504 /* The true default - use a memcpy: */ 3505 for (;;) 3506 { 3507 memcpy(dp, sp, bytes_to_copy); 3508 3509 if (row_width <= bytes_to_jump) 3510 return; 3511 3512 sp += bytes_to_jump; 3513 dp += bytes_to_jump; 3514 row_width -= bytes_to_jump; 3515 if (bytes_to_copy > row_width) 3516 bytes_to_copy = (unsigned int)/*SAFE*/row_width; 3517 } 3518 } 3519 3520 /* NOT REACHED*/ 3521 } /* pixel_depth >= 8 */ 3522 3523 /* Here if pixel_depth < 8 to check 'end_ptr' below. */ 3524 } 3525 else 3526#endif /* READ_INTERLACING */ 3527 3528 /* If here then the switch above wasn't used so just memcpy the whole row 3529 * from the temporary row buffer (notice that this overwrites the end of the 3530 * destination row if it is a partial byte.) 3531 */ 3532 memcpy(dp, sp, PNG_ROWBYTES(pixel_depth, row_width)); 3533 3534 /* Restore the overwritten bits from the last byte if necessary. */ 3535 if (end_ptr != NULL) 3536 *end_ptr = (png_byte)((end_byte & end_mask) | (*end_ptr & ~end_mask)); 3537} 3538 3539#ifdef PNG_READ_INTERLACING_SUPPORTED 3540void /* PRIVATE */ 3541png_do_read_interlace(png_row_infop row_info, png_bytep row, int pass, 3542 png_uint_32 transformations /* Because these may affect the byte layout */) 3543{ 3544 /* Arrays to facilitate easy interlacing - use pass (0 - 6) as index */ 3545 /* Offset to next interlace block */ 3546 static PNG_CONST int png_pass_inc[7] = {8, 8, 4, 4, 2, 2, 1}; 3547 3548 png_debug(1, "in png_do_read_interlace"); 3549 if (row != NULL && row_info != NULL) 3550 { 3551 png_uint_32 final_width; 3552 3553 final_width = row_info->width * png_pass_inc[pass]; 3554 3555 switch (row_info->pixel_depth) 3556 { 3557 case 1: 3558 { 3559 png_bytep sp = row + (png_size_t)((row_info->width - 1) >> 3); 3560 png_bytep dp = row + (png_size_t)((final_width - 1) >> 3); 3561 int sshift, dshift; 3562 int s_start, s_end, s_inc; 3563 int jstop = png_pass_inc[pass]; 3564 png_byte v; 3565 png_uint_32 i; 3566 int j; 3567 3568#ifdef PNG_READ_PACKSWAP_SUPPORTED 3569 if ((transformations & PNG_PACKSWAP) != 0) 3570 { 3571 sshift = (int)((row_info->width + 7) & 0x07); 3572 dshift = (int)((final_width + 7) & 0x07); 3573 s_start = 7; 3574 s_end = 0; 3575 s_inc = -1; 3576 } 3577 3578 else 3579#endif 3580 { 3581 sshift = 7 - (int)((row_info->width + 7) & 0x07); 3582 dshift = 7 - (int)((final_width + 7) & 0x07); 3583 s_start = 0; 3584 s_end = 7; 3585 s_inc = 1; 3586 } 3587 3588 for (i = 0; i < row_info->width; i++) 3589 { 3590 v = (png_byte)((*sp >> sshift) & 0x01); 3591 for (j = 0; j < jstop; j++) 3592 { 3593 unsigned int tmp = *dp & (0x7f7f >> (7 - dshift)); 3594 tmp |= v << dshift; 3595 *dp = (png_byte)(tmp & 0xff); 3596 3597 if (dshift == s_end) 3598 { 3599 dshift = s_start; 3600 dp--; 3601 } 3602 3603 else 3604 dshift += s_inc; 3605 } 3606 3607 if (sshift == s_end) 3608 { 3609 sshift = s_start; 3610 sp--; 3611 } 3612 3613 else 3614 sshift += s_inc; 3615 } 3616 break; 3617 } 3618 3619 case 2: 3620 { 3621 png_bytep sp = row + (png_uint_32)((row_info->width - 1) >> 2); 3622 png_bytep dp = row + (png_uint_32)((final_width - 1) >> 2); 3623 int sshift, dshift; 3624 int s_start, s_end, s_inc; 3625 int jstop = png_pass_inc[pass]; 3626 png_uint_32 i; 3627 3628#ifdef PNG_READ_PACKSWAP_SUPPORTED 3629 if ((transformations & PNG_PACKSWAP) != 0) 3630 { 3631 sshift = (int)(((row_info->width + 3) & 0x03) << 1); 3632 dshift = (int)(((final_width + 3) & 0x03) << 1); 3633 s_start = 6; 3634 s_end = 0; 3635 s_inc = -2; 3636 } 3637 3638 else 3639#endif 3640 { 3641 sshift = (int)((3 - ((row_info->width + 3) & 0x03)) << 1); 3642 dshift = (int)((3 - ((final_width + 3) & 0x03)) << 1); 3643 s_start = 0; 3644 s_end = 6; 3645 s_inc = 2; 3646 } 3647 3648 for (i = 0; i < row_info->width; i++) 3649 { 3650 png_byte v; 3651 int j; 3652 3653 v = (png_byte)((*sp >> sshift) & 0x03); 3654 for (j = 0; j < jstop; j++) 3655 { 3656 unsigned int tmp = *dp & (0x3f3f >> (6 - dshift)); 3657 tmp |= v << dshift; 3658 *dp = (png_byte)(tmp & 0xff); 3659 3660 if (dshift == s_end) 3661 { 3662 dshift = s_start; 3663 dp--; 3664 } 3665 3666 else 3667 dshift += s_inc; 3668 } 3669 3670 if (sshift == s_end) 3671 { 3672 sshift = s_start; 3673 sp--; 3674 } 3675 3676 else 3677 sshift += s_inc; 3678 } 3679 break; 3680 } 3681 3682 case 4: 3683 { 3684 png_bytep sp = row + (png_size_t)((row_info->width - 1) >> 1); 3685 png_bytep dp = row + (png_size_t)((final_width - 1) >> 1); 3686 int sshift, dshift; 3687 int s_start, s_end, s_inc; 3688 png_uint_32 i; 3689 int jstop = png_pass_inc[pass]; 3690 3691#ifdef PNG_READ_PACKSWAP_SUPPORTED 3692 if ((transformations & PNG_PACKSWAP) != 0) 3693 { 3694 sshift = (int)(((row_info->width + 1) & 0x01) << 2); 3695 dshift = (int)(((final_width + 1) & 0x01) << 2); 3696 s_start = 4; 3697 s_end = 0; 3698 s_inc = -4; 3699 } 3700 3701 else 3702#endif 3703 { 3704 sshift = (int)((1 - ((row_info->width + 1) & 0x01)) << 2); 3705 dshift = (int)((1 - ((final_width + 1) & 0x01)) << 2); 3706 s_start = 0; 3707 s_end = 4; 3708 s_inc = 4; 3709 } 3710 3711 for (i = 0; i < row_info->width; i++) 3712 { 3713 png_byte v = (png_byte)((*sp >> sshift) & 0x0f); 3714 int j; 3715 3716 for (j = 0; j < jstop; j++) 3717 { 3718 unsigned int tmp = *dp & (0xf0f >> (4 - dshift)); 3719 tmp |= v << dshift; 3720 *dp = (png_byte)(tmp & 0xff); 3721 3722 if (dshift == s_end) 3723 { 3724 dshift = s_start; 3725 dp--; 3726 } 3727 3728 else 3729 dshift += s_inc; 3730 } 3731 3732 if (sshift == s_end) 3733 { 3734 sshift = s_start; 3735 sp--; 3736 } 3737 3738 else 3739 sshift += s_inc; 3740 } 3741 break; 3742 } 3743 3744 default: 3745 { 3746 png_size_t pixel_bytes = (row_info->pixel_depth >> 3); 3747 3748 png_bytep sp = row + (png_size_t)(row_info->width - 1) 3749 * pixel_bytes; 3750 3751 png_bytep dp = row + (png_size_t)(final_width - 1) * pixel_bytes; 3752 3753 int jstop = png_pass_inc[pass]; 3754 png_uint_32 i; 3755 3756 for (i = 0; i < row_info->width; i++) 3757 { 3758 png_byte v[8]; /* SAFE; pixel_depth does not exceed 64 */ 3759 int j; 3760 3761 memcpy(v, sp, pixel_bytes); 3762 3763 for (j = 0; j < jstop; j++) 3764 { 3765 memcpy(dp, v, pixel_bytes); 3766 dp -= pixel_bytes; 3767 } 3768 3769 sp -= pixel_bytes; 3770 } 3771 break; 3772 } 3773 } 3774 3775 row_info->width = final_width; 3776 row_info->rowbytes = PNG_ROWBYTES(row_info->pixel_depth, final_width); 3777 } 3778#ifndef PNG_READ_PACKSWAP_SUPPORTED 3779 PNG_UNUSED(transformations) /* Silence compiler warning */ 3780#endif 3781} 3782#endif /* READ_INTERLACING */ 3783 3784static void 3785png_read_filter_row_sub(png_row_infop row_info, png_bytep row, 3786 png_const_bytep prev_row) 3787{ 3788 png_size_t i; 3789 png_size_t istop = row_info->rowbytes; 3790 unsigned int bpp = (row_info->pixel_depth + 7) >> 3; 3791 png_bytep rp = row + bpp; 3792 3793 PNG_UNUSED(prev_row) 3794 3795 for (i = bpp; i < istop; i++) 3796 { 3797 *rp = (png_byte)(((int)(*rp) + (int)(*(rp-bpp))) & 0xff); 3798 rp++; 3799 } 3800} 3801 3802static void 3803png_read_filter_row_up(png_row_infop row_info, png_bytep row, 3804 png_const_bytep prev_row) 3805{ 3806 png_size_t i; 3807 png_size_t istop = row_info->rowbytes; 3808 png_bytep rp = row; 3809 png_const_bytep pp = prev_row; 3810 3811 for (i = 0; i < istop; i++) 3812 { 3813 *rp = (png_byte)(((int)(*rp) + (int)(*pp++)) & 0xff); 3814 rp++; 3815 } 3816} 3817 3818static void 3819png_read_filter_row_avg(png_row_infop row_info, png_bytep row, 3820 png_const_bytep prev_row) 3821{ 3822 png_size_t i; 3823 png_bytep rp = row; 3824 png_const_bytep pp = prev_row; 3825 unsigned int bpp = (row_info->pixel_depth + 7) >> 3; 3826 png_size_t istop = row_info->rowbytes - bpp; 3827 3828 for (i = 0; i < bpp; i++) 3829 { 3830 *rp = (png_byte)(((int)(*rp) + 3831 ((int)(*pp++) / 2 )) & 0xff); 3832 3833 rp++; 3834 } 3835 3836 for (i = 0; i < istop; i++) 3837 { 3838 *rp = (png_byte)(((int)(*rp) + 3839 (int)(*pp++ + *(rp-bpp)) / 2 ) & 0xff); 3840 3841 rp++; 3842 } 3843} 3844 3845static void 3846png_read_filter_row_paeth_1byte_pixel(png_row_infop row_info, png_bytep row, 3847 png_const_bytep prev_row) 3848{ 3849 png_bytep rp_end = row + row_info->rowbytes; 3850 int a, c; 3851 3852 /* First pixel/byte */ 3853 c = *prev_row++; 3854 a = *row + c; 3855 *row++ = (png_byte)a; 3856 3857 /* Remainder */ 3858 while (row < rp_end) 3859 { 3860 int b, pa, pb, pc, p; 3861 3862 a &= 0xff; /* From previous iteration or start */ 3863 b = *prev_row++; 3864 3865 p = b - c; 3866 pc = a - c; 3867 3868#ifdef PNG_USE_ABS 3869 pa = abs(p); 3870 pb = abs(pc); 3871 pc = abs(p + pc); 3872#else 3873 pa = p < 0 ? -p : p; 3874 pb = pc < 0 ? -pc : pc; 3875 pc = (p + pc) < 0 ? -(p + pc) : p + pc; 3876#endif 3877 3878 /* Find the best predictor, the least of pa, pb, pc favoring the earlier 3879 * ones in the case of a tie. 3880 */ 3881 if (pb < pa) pa = pb, a = b; 3882 if (pc < pa) a = c; 3883 3884 /* Calculate the current pixel in a, and move the previous row pixel to c 3885 * for the next time round the loop 3886 */ 3887 c = b; 3888 a += *row; 3889 *row++ = (png_byte)a; 3890 } 3891} 3892 3893static void 3894png_read_filter_row_paeth_multibyte_pixel(png_row_infop row_info, png_bytep row, 3895 png_const_bytep prev_row) 3896{ 3897 int bpp = (row_info->pixel_depth + 7) >> 3; 3898 png_bytep rp_end = row + bpp; 3899 3900 /* Process the first pixel in the row completely (this is the same as 'up' 3901 * because there is only one candidate predictor for the first row). 3902 */ 3903 while (row < rp_end) 3904 { 3905 int a = *row + *prev_row++; 3906 *row++ = (png_byte)a; 3907 } 3908 3909 /* Remainder */ 3910 rp_end += row_info->rowbytes - bpp; 3911 3912 while (row < rp_end) 3913 { 3914 int a, b, c, pa, pb, pc, p; 3915 3916 c = *(prev_row - bpp); 3917 a = *(row - bpp); 3918 b = *prev_row++; 3919 3920 p = b - c; 3921 pc = a - c; 3922 3923#ifdef PNG_USE_ABS 3924 pa = abs(p); 3925 pb = abs(pc); 3926 pc = abs(p + pc); 3927#else 3928 pa = p < 0 ? -p : p; 3929 pb = pc < 0 ? -pc : pc; 3930 pc = (p + pc) < 0 ? -(p + pc) : p + pc; 3931#endif 3932 3933 if (pb < pa) pa = pb, a = b; 3934 if (pc < pa) a = c; 3935 3936 a += *row; 3937 *row++ = (png_byte)a; 3938 } 3939} 3940 3941static void 3942png_init_filter_functions(png_structrp pp) 3943 /* This function is called once for every PNG image (except for PNG images 3944 * that only use PNG_FILTER_VALUE_NONE for all rows) to set the 3945 * implementations required to reverse the filtering of PNG rows. Reversing 3946 * the filter is the first transformation performed on the row data. It is 3947 * performed in place, therefore an implementation can be selected based on 3948 * the image pixel format. If the implementation depends on image width then 3949 * take care to ensure that it works correctly if the image is interlaced - 3950 * interlacing causes the actual row width to vary. 3951 */ 3952{ 3953 unsigned int bpp = (pp->pixel_depth + 7) >> 3; 3954 3955 pp->read_filter[PNG_FILTER_VALUE_SUB-1] = png_read_filter_row_sub; 3956 pp->read_filter[PNG_FILTER_VALUE_UP-1] = png_read_filter_row_up; 3957 pp->read_filter[PNG_FILTER_VALUE_AVG-1] = png_read_filter_row_avg; 3958 if (bpp == 1) 3959 pp->read_filter[PNG_FILTER_VALUE_PAETH-1] = 3960 png_read_filter_row_paeth_1byte_pixel; 3961 else 3962 pp->read_filter[PNG_FILTER_VALUE_PAETH-1] = 3963 png_read_filter_row_paeth_multibyte_pixel; 3964 3965#ifdef PNG_FILTER_OPTIMIZATIONS 3966 /* To use this define PNG_FILTER_OPTIMIZATIONS as the name of a function to 3967 * call to install hardware optimizations for the above functions; simply 3968 * replace whatever elements of the pp->read_filter[] array with a hardware 3969 * specific (or, for that matter, generic) optimization. 3970 * 3971 * To see an example of this examine what configure.ac does when 3972 * --enable-arm-neon is specified on the command line. 3973 */ 3974 PNG_FILTER_OPTIMIZATIONS(pp, bpp); 3975#endif 3976} 3977 3978void /* PRIVATE */ 3979png_read_filter_row(png_structrp pp, png_row_infop row_info, png_bytep row, 3980 png_const_bytep prev_row, int filter) 3981{ 3982 /* OPTIMIZATION: DO NOT MODIFY THIS FUNCTION, instead #define 3983 * PNG_FILTER_OPTIMIZATIONS to a function that overrides the generic 3984 * implementations. See png_init_filter_functions above. 3985 */ 3986 if (filter > PNG_FILTER_VALUE_NONE && filter < PNG_FILTER_VALUE_LAST) 3987 { 3988 if (pp->read_filter[0] == NULL) 3989 png_init_filter_functions(pp); 3990 3991 pp->read_filter[filter-1](row_info, row, prev_row); 3992 } 3993} 3994 3995#ifdef PNG_SEQUENTIAL_READ_SUPPORTED 3996void /* PRIVATE */ 3997png_read_IDAT_data(png_structrp png_ptr, png_bytep output, 3998 png_alloc_size_t avail_out) 3999{ 4000 /* Loop reading IDATs and decompressing the result into output[avail_out] */ 4001 png_ptr->zstream.next_out = output; 4002 png_ptr->zstream.avail_out = 0; /* safety: set below */ 4003 4004 if (output == NULL) 4005 avail_out = 0; 4006 4007 do 4008 { 4009 int ret; 4010 png_byte tmpbuf[PNG_INFLATE_BUF_SIZE]; 4011 4012 if (png_ptr->zstream.avail_in == 0) 4013 { 4014 uInt avail_in; 4015 png_bytep buffer; 4016 4017 while (png_ptr->idat_size == 0) 4018 { 4019 png_crc_finish(png_ptr, 0); 4020 4021 png_ptr->idat_size = png_read_chunk_header(png_ptr); 4022 /* This is an error even in the 'check' case because the code just 4023 * consumed a non-IDAT header. 4024 */ 4025 if (png_ptr->chunk_name != png_IDAT) 4026 png_error(png_ptr, "Not enough image data"); 4027 } 4028 4029 avail_in = png_ptr->IDAT_read_size; 4030 4031 if (avail_in > png_ptr->idat_size) 4032 avail_in = (uInt)png_ptr->idat_size; 4033 4034 /* A PNG with a gradually increasing IDAT size will defeat this attempt 4035 * to minimize memory usage by causing lots of re-allocs, but 4036 * realistically doing IDAT_read_size re-allocs is not likely to be a 4037 * big problem. 4038 */ 4039 buffer = png_read_buffer(png_ptr, avail_in, 0/*error*/); 4040 4041 png_crc_read(png_ptr, buffer, avail_in); 4042 png_ptr->idat_size -= avail_in; 4043 4044 png_ptr->zstream.next_in = buffer; 4045 png_ptr->zstream.avail_in = avail_in; 4046 } 4047 4048 /* And set up the output side. */ 4049 if (output != NULL) /* standard read */ 4050 { 4051 uInt out = ZLIB_IO_MAX; 4052 4053 if (out > avail_out) 4054 out = (uInt)avail_out; 4055 4056 avail_out -= out; 4057 png_ptr->zstream.avail_out = out; 4058 } 4059 4060 else /* after last row, checking for end */ 4061 { 4062 png_ptr->zstream.next_out = tmpbuf; 4063 png_ptr->zstream.avail_out = (sizeof tmpbuf); 4064 } 4065 4066 /* Use NO_FLUSH; this gives zlib the maximum opportunity to optimize the 4067 * process. If the LZ stream is truncated the sequential reader will 4068 * terminally damage the stream, above, by reading the chunk header of the 4069 * following chunk (it then exits with png_error). 4070 * 4071 * TODO: deal more elegantly with truncated IDAT lists. 4072 */ 4073 ret = PNG_INFLATE(png_ptr, Z_NO_FLUSH); 4074 4075 /* Take the unconsumed output back. */ 4076 if (output != NULL) 4077 avail_out += png_ptr->zstream.avail_out; 4078 4079 else /* avail_out counts the extra bytes */ 4080 avail_out += (sizeof tmpbuf) - png_ptr->zstream.avail_out; 4081 4082 png_ptr->zstream.avail_out = 0; 4083 4084 if (ret == Z_STREAM_END) 4085 { 4086 /* Do this for safety; we won't read any more into this row. */ 4087 png_ptr->zstream.next_out = NULL; 4088 4089 png_ptr->mode |= PNG_AFTER_IDAT; 4090 png_ptr->flags |= PNG_FLAG_ZSTREAM_ENDED; 4091 4092 if (png_ptr->zstream.avail_in > 0 || png_ptr->idat_size > 0) 4093 png_chunk_benign_error(png_ptr, "Extra compressed data"); 4094 break; 4095 } 4096 4097 if (ret != Z_OK) 4098 { 4099 png_zstream_error(png_ptr, ret); 4100 4101 if (output != NULL) 4102 png_chunk_error(png_ptr, png_ptr->zstream.msg); 4103 4104 else /* checking */ 4105 { 4106 png_chunk_benign_error(png_ptr, png_ptr->zstream.msg); 4107 return; 4108 } 4109 } 4110 } while (avail_out > 0); 4111 4112 if (avail_out > 0) 4113 { 4114 /* The stream ended before the image; this is the same as too few IDATs so 4115 * should be handled the same way. 4116 */ 4117 if (output != NULL) 4118 png_error(png_ptr, "Not enough image data"); 4119 4120 else /* the deflate stream contained extra data */ 4121 png_chunk_benign_error(png_ptr, "Too much image data"); 4122 } 4123} 4124 4125void /* PRIVATE */ 4126png_read_finish_IDAT(png_structrp png_ptr) 4127{ 4128 /* We don't need any more data and the stream should have ended, however the 4129 * LZ end code may actually not have been processed. In this case we must 4130 * read it otherwise stray unread IDAT data or, more likely, an IDAT chunk 4131 * may still remain to be consumed. 4132 */ 4133 if ((png_ptr->flags & PNG_FLAG_ZSTREAM_ENDED) == 0) 4134 { 4135 /* The NULL causes png_read_IDAT_data to swallow any remaining bytes in 4136 * the compressed stream, but the stream may be damaged too, so even after 4137 * this call we may need to terminate the zstream ownership. 4138 */ 4139 png_read_IDAT_data(png_ptr, NULL, 0); 4140 png_ptr->zstream.next_out = NULL; /* safety */ 4141 4142 /* Now clear everything out for safety; the following may not have been 4143 * done. 4144 */ 4145 if ((png_ptr->flags & PNG_FLAG_ZSTREAM_ENDED) == 0) 4146 { 4147 png_ptr->mode |= PNG_AFTER_IDAT; 4148 png_ptr->flags |= PNG_FLAG_ZSTREAM_ENDED; 4149 } 4150 } 4151 4152 /* If the zstream has not been released do it now *and* terminate the reading 4153 * of the final IDAT chunk. 4154 */ 4155 if (png_ptr->zowner == png_IDAT) 4156 { 4157 /* Always do this; the pointers otherwise point into the read buffer. */ 4158 png_ptr->zstream.next_in = NULL; 4159 png_ptr->zstream.avail_in = 0; 4160 4161 /* Now we no longer own the zstream. */ 4162 png_ptr->zowner = 0; 4163 4164 /* The slightly weird semantics of the sequential IDAT reading is that we 4165 * are always in or at the end of an IDAT chunk, so we always need to do a 4166 * crc_finish here. If idat_size is non-zero we also need to read the 4167 * spurious bytes at the end of the chunk now. 4168 */ 4169 (void)png_crc_finish(png_ptr, png_ptr->idat_size); 4170 } 4171} 4172 4173void /* PRIVATE */ 4174png_read_finish_row(png_structrp png_ptr) 4175{ 4176 /* Arrays to facilitate easy interlacing - use pass (0 - 6) as index */ 4177 4178 /* Start of interlace block */ 4179 static PNG_CONST png_byte png_pass_start[7] = {0, 4, 0, 2, 0, 1, 0}; 4180 4181 /* Offset to next interlace block */ 4182 static PNG_CONST png_byte png_pass_inc[7] = {8, 8, 4, 4, 2, 2, 1}; 4183 4184 /* Start of interlace block in the y direction */ 4185 static PNG_CONST png_byte png_pass_ystart[7] = {0, 0, 4, 0, 2, 0, 1}; 4186 4187 /* Offset to next interlace block in the y direction */ 4188 static PNG_CONST png_byte png_pass_yinc[7] = {8, 8, 8, 4, 4, 2, 2}; 4189 4190 png_debug(1, "in png_read_finish_row"); 4191 png_ptr->row_number++; 4192 if (png_ptr->row_number < png_ptr->num_rows) 4193 return; 4194 4195 if (png_ptr->interlaced != 0) 4196 { 4197 png_ptr->row_number = 0; 4198 4199 /* TO DO: don't do this if prev_row isn't needed (requires 4200 * read-ahead of the next row's filter byte. 4201 */ 4202 memset(png_ptr->prev_row, 0, png_ptr->rowbytes + 1); 4203 4204 do 4205 { 4206 png_ptr->pass++; 4207 4208 if (png_ptr->pass >= 7) 4209 break; 4210 4211 png_ptr->iwidth = (png_ptr->width + 4212 png_pass_inc[png_ptr->pass] - 1 - 4213 png_pass_start[png_ptr->pass]) / 4214 png_pass_inc[png_ptr->pass]; 4215 4216 if ((png_ptr->transformations & PNG_INTERLACE) == 0) 4217 { 4218 png_ptr->num_rows = (png_ptr->height + 4219 png_pass_yinc[png_ptr->pass] - 1 - 4220 png_pass_ystart[png_ptr->pass]) / 4221 png_pass_yinc[png_ptr->pass]; 4222 } 4223 4224 else /* if (png_ptr->transformations & PNG_INTERLACE) */ 4225 break; /* libpng deinterlacing sees every row */ 4226 4227 } while (png_ptr->num_rows == 0 || png_ptr->iwidth == 0); 4228 4229 if (png_ptr->pass < 7) 4230 return; 4231 } 4232 4233 /* Here after at the end of the last row of the last pass. */ 4234 png_read_finish_IDAT(png_ptr); 4235} 4236#endif /* SEQUENTIAL_READ */ 4237 4238void /* PRIVATE */ 4239png_read_start_row(png_structrp png_ptr) 4240{ 4241 /* Arrays to facilitate easy interlacing - use pass (0 - 6) as index */ 4242 4243 /* Start of interlace block */ 4244 static PNG_CONST png_byte png_pass_start[7] = {0, 4, 0, 2, 0, 1, 0}; 4245 4246 /* Offset to next interlace block */ 4247 static PNG_CONST png_byte png_pass_inc[7] = {8, 8, 4, 4, 2, 2, 1}; 4248 4249 /* Start of interlace block in the y direction */ 4250 static PNG_CONST png_byte png_pass_ystart[7] = {0, 0, 4, 0, 2, 0, 1}; 4251 4252 /* Offset to next interlace block in the y direction */ 4253 static PNG_CONST png_byte png_pass_yinc[7] = {8, 8, 8, 4, 4, 2, 2}; 4254 4255 int max_pixel_depth; 4256 png_size_t row_bytes; 4257 4258 png_debug(1, "in png_read_start_row"); 4259 4260#ifdef PNG_READ_TRANSFORMS_SUPPORTED 4261 png_init_read_transformations(png_ptr); 4262#endif 4263 if (png_ptr->interlaced != 0) 4264 { 4265 if ((png_ptr->transformations & PNG_INTERLACE) == 0) 4266 png_ptr->num_rows = (png_ptr->height + png_pass_yinc[0] - 1 - 4267 png_pass_ystart[0]) / png_pass_yinc[0]; 4268 4269 else 4270 png_ptr->num_rows = png_ptr->height; 4271 4272 png_ptr->iwidth = (png_ptr->width + 4273 png_pass_inc[png_ptr->pass] - 1 - 4274 png_pass_start[png_ptr->pass]) / 4275 png_pass_inc[png_ptr->pass]; 4276 } 4277 4278 else 4279 { 4280 png_ptr->num_rows = png_ptr->height; 4281 png_ptr->iwidth = png_ptr->width; 4282 } 4283 4284 max_pixel_depth = png_ptr->pixel_depth; 4285 4286 /* WARNING: * png_read_transform_info (pngrtran.c) performs a simpler set of 4287 * calculations to calculate the final pixel depth, then 4288 * png_do_read_transforms actually does the transforms. This means that the 4289 * code which effectively calculates this value is actually repeated in three 4290 * separate places. They must all match. Innocent changes to the order of 4291 * transformations can and will break libpng in a way that causes memory 4292 * overwrites. 4293 * 4294 * TODO: fix this. 4295 */ 4296#ifdef PNG_READ_PACK_SUPPORTED 4297 if ((png_ptr->transformations & PNG_PACK) != 0 && png_ptr->bit_depth < 8) 4298 max_pixel_depth = 8; 4299#endif 4300 4301#ifdef PNG_READ_EXPAND_SUPPORTED 4302 if ((png_ptr->transformations & PNG_EXPAND) != 0) 4303 { 4304 if (png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 4305 { 4306 if (png_ptr->num_trans != 0) 4307 max_pixel_depth = 32; 4308 4309 else 4310 max_pixel_depth = 24; 4311 } 4312 4313 else if (png_ptr->color_type == PNG_COLOR_TYPE_GRAY) 4314 { 4315 if (max_pixel_depth < 8) 4316 max_pixel_depth = 8; 4317 4318 if (png_ptr->num_trans != 0) 4319 max_pixel_depth *= 2; 4320 } 4321 4322 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB) 4323 { 4324 if (png_ptr->num_trans != 0) 4325 { 4326 max_pixel_depth *= 4; 4327 max_pixel_depth /= 3; 4328 } 4329 } 4330 } 4331#endif 4332 4333#ifdef PNG_READ_EXPAND_16_SUPPORTED 4334 if ((png_ptr->transformations & PNG_EXPAND_16) != 0) 4335 { 4336# ifdef PNG_READ_EXPAND_SUPPORTED 4337 /* In fact it is an error if it isn't supported, but checking is 4338 * the safe way. 4339 */ 4340 if ((png_ptr->transformations & PNG_EXPAND) != 0) 4341 { 4342 if (png_ptr->bit_depth < 16) 4343 max_pixel_depth *= 2; 4344 } 4345 else 4346# endif 4347 png_ptr->transformations &= ~PNG_EXPAND_16; 4348 } 4349#endif 4350 4351#ifdef PNG_READ_FILLER_SUPPORTED 4352 if ((png_ptr->transformations & (PNG_FILLER)) != 0) 4353 { 4354 if (png_ptr->color_type == PNG_COLOR_TYPE_GRAY) 4355 { 4356 if (max_pixel_depth <= 8) 4357 max_pixel_depth = 16; 4358 4359 else 4360 max_pixel_depth = 32; 4361 } 4362 4363 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB || 4364 png_ptr->color_type == PNG_COLOR_TYPE_PALETTE) 4365 { 4366 if (max_pixel_depth <= 32) 4367 max_pixel_depth = 32; 4368 4369 else 4370 max_pixel_depth = 64; 4371 } 4372 } 4373#endif 4374 4375#ifdef PNG_READ_GRAY_TO_RGB_SUPPORTED 4376 if ((png_ptr->transformations & PNG_GRAY_TO_RGB) != 0) 4377 { 4378 if ( 4379#ifdef PNG_READ_EXPAND_SUPPORTED 4380 (png_ptr->num_trans != 0 && 4381 (png_ptr->transformations & PNG_EXPAND) != 0) || 4382#endif 4383#ifdef PNG_READ_FILLER_SUPPORTED 4384 (png_ptr->transformations & (PNG_FILLER)) != 0 || 4385#endif 4386 png_ptr->color_type == PNG_COLOR_TYPE_GRAY_ALPHA) 4387 { 4388 if (max_pixel_depth <= 16) 4389 max_pixel_depth = 32; 4390 4391 else 4392 max_pixel_depth = 64; 4393 } 4394 4395 else 4396 { 4397 if (max_pixel_depth <= 8) 4398 { 4399 if (png_ptr->color_type == PNG_COLOR_TYPE_RGB_ALPHA) 4400 max_pixel_depth = 32; 4401 4402 else 4403 max_pixel_depth = 24; 4404 } 4405 4406 else if (png_ptr->color_type == PNG_COLOR_TYPE_RGB_ALPHA) 4407 max_pixel_depth = 64; 4408 4409 else 4410 max_pixel_depth = 48; 4411 } 4412 } 4413#endif 4414 4415#if defined(PNG_READ_USER_TRANSFORM_SUPPORTED) && \ 4416defined(PNG_USER_TRANSFORM_PTR_SUPPORTED) 4417 if ((png_ptr->transformations & PNG_USER_TRANSFORM) != 0) 4418 { 4419 int user_pixel_depth = png_ptr->user_transform_depth * 4420 png_ptr->user_transform_channels; 4421 4422 if (user_pixel_depth > max_pixel_depth) 4423 max_pixel_depth = user_pixel_depth; 4424 } 4425#endif 4426 4427 /* This value is stored in png_struct and double checked in the row read 4428 * code. 4429 */ 4430 png_ptr->maximum_pixel_depth = (png_byte)max_pixel_depth; 4431 png_ptr->transformed_pixel_depth = 0; /* calculated on demand */ 4432 4433 /* Align the width on the next larger 8 pixels. Mainly used 4434 * for interlacing 4435 */ 4436 row_bytes = ((png_ptr->width + 7) & ~((png_uint_32)7)); 4437 /* Calculate the maximum bytes needed, adding a byte and a pixel 4438 * for safety's sake 4439 */ 4440 row_bytes = PNG_ROWBYTES(max_pixel_depth, row_bytes) + 4441 1 + ((max_pixel_depth + 7) >> 3); 4442 4443#ifdef PNG_MAX_MALLOC_64K 4444 if (row_bytes > (png_uint_32)65536L) 4445 png_error(png_ptr, "This image requires a row greater than 64KB"); 4446#endif 4447 4448 if (row_bytes + 48 > png_ptr->old_big_row_buf_size) 4449 { 4450 png_free(png_ptr, png_ptr->big_row_buf); 4451 png_free(png_ptr, png_ptr->big_prev_row); 4452 4453 if (png_ptr->interlaced != 0) 4454 png_ptr->big_row_buf = (png_bytep)png_calloc(png_ptr, 4455 row_bytes + 48); 4456 4457 else 4458 png_ptr->big_row_buf = (png_bytep)png_malloc(png_ptr, row_bytes + 48); 4459 4460 png_ptr->big_prev_row = (png_bytep)png_malloc(png_ptr, row_bytes + 48); 4461 4462#ifdef PNG_ALIGNED_MEMORY_SUPPORTED 4463 /* Use 16-byte aligned memory for row_buf with at least 16 bytes 4464 * of padding before and after row_buf; treat prev_row similarly. 4465 * NOTE: the alignment is to the start of the pixels, one beyond the start 4466 * of the buffer, because of the filter byte. Prior to libpng 1.5.6 this 4467 * was incorrect; the filter byte was aligned, which had the exact 4468 * opposite effect of that intended. 4469 */ 4470 { 4471 png_bytep temp = png_ptr->big_row_buf + 32; 4472 int extra = (int)((temp - (png_bytep)0) & 0x0f); 4473 png_ptr->row_buf = temp - extra - 1/*filter byte*/; 4474 4475 temp = png_ptr->big_prev_row + 32; 4476 extra = (int)((temp - (png_bytep)0) & 0x0f); 4477 png_ptr->prev_row = temp - extra - 1/*filter byte*/; 4478 } 4479 4480#else 4481 /* Use 31 bytes of padding before and 17 bytes after row_buf. */ 4482 png_ptr->row_buf = png_ptr->big_row_buf + 31; 4483 png_ptr->prev_row = png_ptr->big_prev_row + 31; 4484#endif 4485 png_ptr->old_big_row_buf_size = row_bytes + 48; 4486 } 4487 4488#ifdef PNG_MAX_MALLOC_64K 4489 if (png_ptr->rowbytes > 65535) 4490 png_error(png_ptr, "This image requires a row greater than 64KB"); 4491 4492#endif 4493 if (png_ptr->rowbytes > (PNG_SIZE_MAX - 1)) 4494 png_error(png_ptr, "Row has too many bytes to allocate in memory"); 4495 4496 memset(png_ptr->prev_row, 0, png_ptr->rowbytes + 1); 4497 4498 png_debug1(3, "width = %u,", png_ptr->width); 4499 png_debug1(3, "height = %u,", png_ptr->height); 4500 png_debug1(3, "iwidth = %u,", png_ptr->iwidth); 4501 png_debug1(3, "num_rows = %u,", png_ptr->num_rows); 4502 png_debug1(3, "rowbytes = %lu,", (unsigned long)png_ptr->rowbytes); 4503 png_debug1(3, "irowbytes = %lu", 4504 (unsigned long)PNG_ROWBYTES(png_ptr->pixel_depth, png_ptr->iwidth) + 1); 4505 4506 /* The sequential reader needs a buffer for IDAT, but the progressive reader 4507 * does not, so free the read buffer now regardless; the sequential reader 4508 * reallocates it on demand. 4509 */ 4510 if (png_ptr->read_buffer != 0) 4511 { 4512 png_bytep buffer = png_ptr->read_buffer; 4513 4514 png_ptr->read_buffer_size = 0; 4515 png_ptr->read_buffer = NULL; 4516 png_free(png_ptr, buffer); 4517 } 4518 4519 /* Finally claim the zstream for the inflate of the IDAT data, use the bits 4520 * value from the stream (note that this will result in a fatal error if the 4521 * IDAT stream has a bogus deflate header window_bits value, but this should 4522 * not be happening any longer!) 4523 */ 4524 if (png_inflate_claim(png_ptr, png_IDAT) != Z_OK) 4525 png_error(png_ptr, png_ptr->zstream.msg); 4526 4527 png_ptr->flags |= PNG_FLAG_ROW_INIT; 4528} 4529#endif /* READ */ 4530