pngtest.c
上传用户:sesekoo
上传日期:2020-07-18
资源大小:21543k
文件大小:51k
源码类别:

界面编程

开发平台:

Visual C++

  1. /* pngtest.c - a simple test program to test libpng
  2.  *
  3.  * Last changed in libpng 1.2.32 [September 18, 2008]
  4.  * For conditions of distribution and use, see copyright notice in png.h
  5.  * Copyright (c) 1998-2008 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 program reads in a PNG image, writes it out again, and then
  10.  * compares the two files.  If the files are identical, this shows that
  11.  * the basic chunk handling, filtering, and (de)compression code is working
  12.  * properly.  It does not currently test all of the transforms, although
  13.  * it probably should.
  14.  *
  15.  * The program will report "FAIL" in certain legitimate cases:
  16.  * 1) when the compression level or filter selection method is changed.
  17.  * 2) when the maximum IDAT size (PNG_ZBUF_SIZE in pngconf.h) is not 8192.
  18.  * 3) unknown unsafe-to-copy ancillary chunks or unknown critical chunks
  19.  *    exist in the input file.
  20.  * 4) others not listed here...
  21.  * In these cases, it is best to check with another tool such as "pngcheck"
  22.  * to see what the differences between the two files are.
  23.  *
  24.  * If a filename is given on the command-line, then this file is used
  25.  * for the input, rather than the default "pngtest.png".  This allows
  26.  * testing a wide variety of files easily.  You can also test a number
  27.  * of files at once by typing "pngtest -m file1.png file2.png ..."
  28.  */
  29. #include "png.h"
  30. #if defined(_WIN32_WCE)
  31. #  if _WIN32_WCE < 211
  32.      __error__ (f|w)printf functions are not supported on old WindowsCE.;
  33. #  endif
  34. #  include <windows.h>
  35. #  include <stdlib.h>
  36. #  define READFILE(file, data, length, check) 
  37.      if (ReadFile(file, data, length, &check, NULL)) check = 0
  38. #  define WRITEFILE(file, data, length, check)) 
  39.      if (WriteFile(file, data, length, &check, NULL)) check = 0
  40. #  define FCLOSE(file) CloseHandle(file)
  41. #else
  42. #  include <stdio.h>
  43. #  include <stdlib.h>
  44. #  define READFILE(file, data, length, check) 
  45.      check=(png_size_t)fread(data, (png_size_t)1, length, file)
  46. #  define WRITEFILE(file, data, length, check) 
  47.      check=(png_size_t)fwrite(data, (png_size_t)1, length, file)
  48. #  define FCLOSE(file) fclose(file)
  49. #endif
  50. #if defined(PNG_NO_STDIO)
  51. #  if defined(_WIN32_WCE)
  52.      typedef HANDLE                png_FILE_p;
  53. #  else
  54.      typedef FILE                * png_FILE_p;
  55. #  endif
  56. #endif
  57. /* Makes pngtest verbose so we can find problems (needs to be before png.h) */
  58. #ifndef PNG_DEBUG
  59. #  define PNG_DEBUG 0
  60. #endif
  61. #if !PNG_DEBUG
  62. #  define SINGLE_ROWBUF_ALLOC  /* makes buffer overruns easier to nail */
  63. #endif
  64. /* Turn on CPU timing
  65. #define PNGTEST_TIMING
  66. */
  67. #ifdef PNG_NO_FLOATING_POINT_SUPPORTED
  68. #undef PNGTEST_TIMING
  69. #endif
  70. #ifdef PNGTEST_TIMING
  71. static float t_start, t_stop, t_decode, t_encode, t_misc;
  72. #include <time.h>
  73. #endif
  74. #if defined(PNG_TIME_RFC1123_SUPPORTED)
  75. #define PNG_tIME_STRING_LENGTH 29
  76. static int tIME_chunk_present = 0;
  77. static char tIME_string[PNG_tIME_STRING_LENGTH] = "tIME chunk is not present";
  78. #endif
  79. static int verbose = 0;
  80. int test_one_file PNGARG((PNG_CONST char *inname, PNG_CONST char *outname));
  81. #ifdef __TURBOC__
  82. #include <mem.h>
  83. #endif
  84. /* defined so I can write to a file on gui/windowing platforms */
  85. /*  #define STDERR stderr  */
  86. #define STDERR stdout   /* for DOS */
  87. /* In case a system header (e.g., on AIX) defined jmpbuf */
  88. #ifdef jmpbuf
  89. #  undef jmpbuf
  90. #endif
  91. /* Define png_jmpbuf() in case we are using a pre-1.0.6 version of libpng */
  92. #ifndef png_jmpbuf
  93. #  define png_jmpbuf(png_ptr) png_ptr->jmpbuf
  94. #endif
  95. /* example of using row callbacks to make a simple progress meter */
  96. static int status_pass = 1;
  97. static int status_dots_requested = 0;
  98. static int status_dots = 1;
  99. void
  100. #ifdef PNG_1_0_X
  101. PNGAPI
  102. #endif
  103. read_row_callback(png_structp png_ptr, png_uint_32 row_number, int pass);
  104. void
  105. #ifdef PNG_1_0_X
  106. PNGAPI
  107. #endif
  108. read_row_callback(png_structp png_ptr, png_uint_32 row_number, int pass)
  109. {
  110.     if (png_ptr == NULL || row_number > PNG_UINT_31_MAX) return;
  111.     if (status_pass != pass)
  112.     {
  113.        fprintf(stdout, "n Pass %d: ", pass);
  114.        status_pass = pass;
  115.        status_dots = 31;
  116.     }
  117.     status_dots--;
  118.     if (status_dots == 0)
  119.     {
  120.        fprintf(stdout, "n         ");
  121.        status_dots=30;
  122.     }
  123.     fprintf(stdout, "r");
  124. }
  125. void
  126. #ifdef PNG_1_0_X
  127. PNGAPI
  128. #endif
  129. write_row_callback(png_structp png_ptr, png_uint_32 row_number, int pass);
  130. void
  131. #ifdef PNG_1_0_X
  132. PNGAPI
  133. #endif
  134. write_row_callback(png_structp png_ptr, png_uint_32 row_number, int pass)
  135. {
  136.     if (png_ptr == NULL || row_number > PNG_UINT_31_MAX || pass > 7) return;
  137.     fprintf(stdout, "w");
  138. }
  139. #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED)
  140. /* Example of using user transform callback (we don't transform anything,
  141.    but merely examine the row filters.  We set this to 256 rather than
  142.    5 in case illegal filter values are present.) */
  143. static png_uint_32 filters_used[256];
  144. void
  145. #ifdef PNG_1_0_X
  146. PNGAPI
  147. #endif
  148. count_filters(png_structp png_ptr, png_row_infop row_info, png_bytep data);
  149. void
  150. #ifdef PNG_1_0_X
  151. PNGAPI
  152. #endif
  153. count_filters(png_structp png_ptr, png_row_infop row_info, png_bytep data)
  154. {
  155.     if (png_ptr != NULL && row_info != NULL)
  156.       ++filters_used[*(data - 1)];
  157. }
  158. #endif
  159. #if defined(PNG_WRITE_USER_TRANSFORM_SUPPORTED)
  160. /* example of using user transform callback (we don't transform anything,
  161.    but merely count the zero samples) */
  162. static png_uint_32 zero_samples;
  163. void
  164. #ifdef PNG_1_0_X
  165. PNGAPI
  166. #endif
  167. count_zero_samples(png_structp png_ptr, png_row_infop row_info, png_bytep data);
  168. void
  169. #ifdef PNG_1_0_X
  170. PNGAPI
  171. #endif
  172. count_zero_samples(png_structp png_ptr, png_row_infop row_info, png_bytep data)
  173. {
  174.    png_bytep dp = data;
  175.    if (png_ptr == NULL)return;
  176.    /* contents of row_info:
  177.     *  png_uint_32 width      width of row
  178.     *  png_uint_32 rowbytes   number of bytes in row
  179.     *  png_byte color_type    color type of pixels
  180.     *  png_byte bit_depth     bit depth of samples
  181.     *  png_byte channels      number of channels (1-4)
  182.     *  png_byte pixel_depth   bits per pixel (depth*channels)
  183.     */
  184.     /* counts the number of zero samples (or zero pixels if color_type is 3 */
  185.     if (row_info->color_type == 0 || row_info->color_type == 3)
  186.     {
  187.        int pos = 0;
  188.        png_uint_32 n, nstop;
  189.        for (n = 0, nstop=row_info->width; n<nstop; n++)
  190.        {
  191.           if (row_info->bit_depth == 1)
  192.           {
  193.              if (((*dp << pos++ ) & 0x80) == 0) zero_samples++;
  194.              if (pos == 8)
  195.              {
  196.                 pos = 0;
  197.                 dp++;
  198.              }
  199.           }
  200.           if (row_info->bit_depth == 2)
  201.           {
  202.              if (((*dp << (pos+=2)) & 0xc0) == 0) zero_samples++;
  203.              if (pos == 8)
  204.              {
  205.                 pos = 0;
  206.                 dp++;
  207.              }
  208.           }
  209.           if (row_info->bit_depth == 4)
  210.           {
  211.              if (((*dp << (pos+=4)) & 0xf0) == 0) zero_samples++;
  212.              if (pos == 8)
  213.              {
  214.                 pos = 0;
  215.                 dp++;
  216.              }
  217.           }
  218.           if (row_info->bit_depth == 8)
  219.              if (*dp++ == 0) zero_samples++;
  220.           if (row_info->bit_depth == 16)
  221.           {
  222.              if ((*dp | *(dp+1)) == 0) zero_samples++;
  223.              dp+=2;
  224.           }
  225.        }
  226.     }
  227.     else /* other color types */
  228.     {
  229.        png_uint_32 n, nstop;
  230.        int channel;
  231.        int color_channels = row_info->channels;
  232.        if (row_info->color_type > 3)color_channels--;
  233.        for (n = 0, nstop=row_info->width; n<nstop; n++)
  234.        {
  235.           for (channel = 0; channel < color_channels; channel++)
  236.           {
  237.              if (row_info->bit_depth == 8)
  238.                 if (*dp++ == 0) zero_samples++;
  239.              if (row_info->bit_depth == 16)
  240.              {
  241.                 if ((*dp | *(dp+1)) == 0) zero_samples++;
  242.                 dp+=2;
  243.              }
  244.           }
  245.           if (row_info->color_type > 3)
  246.           {
  247.              dp++;
  248.              if (row_info->bit_depth == 16)dp++;
  249.           }
  250.        }
  251.     }
  252. }
  253. #endif /* PNG_WRITE_USER_TRANSFORM_SUPPORTED */
  254. static int wrote_question = 0;
  255. #if defined(PNG_NO_STDIO)
  256. /* START of code to validate stdio-free compilation */
  257. /* These copies of the default read/write functions come from pngrio.c and */
  258. /* pngwio.c.  They allow "don't include stdio" testing of the library. */
  259. /* This is the function that does the actual reading of data.  If you are
  260.    not reading from a standard C stream, you should create a replacement
  261.    read_data function and use it at run time with png_set_read_fn(), rather
  262.    than changing the library. */
  263. #ifndef USE_FAR_KEYWORD
  264. static void
  265. pngtest_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
  266. {
  267.    png_size_t check;
  268.    /* fread() returns 0 on error, so it is OK to store this in a png_size_t
  269.     * instead of an int, which is what fread() actually returns.
  270.     */
  271.    READFILE((png_FILE_p)png_ptr->io_ptr, data, length, check);
  272.    if (check != length)
  273.    {
  274.       png_error(png_ptr, "Read Error!");
  275.    }
  276. }
  277. #else
  278. /* this is the model-independent version. Since the standard I/O library
  279.    can't handle far buffers in the medium and small models, we have to copy
  280.    the data.
  281. */
  282. #define NEAR_BUF_SIZE 1024
  283. #define MIN(a,b) (a <= b ? a : b)
  284. static void
  285. pngtest_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
  286. {
  287.    int check;
  288.    png_byte *n_data;
  289.    png_FILE_p io_ptr;
  290.    /* Check if data really is near. If so, use usual code. */
  291.    n_data = (png_byte *)CVT_PTR_NOCHECK(data);
  292.    io_ptr = (png_FILE_p)CVT_PTR(png_ptr->io_ptr);
  293.    if ((png_bytep)n_data == data)
  294.    {
  295.       READFILE(io_ptr, n_data, length, check);
  296.    }
  297.    else
  298.    {
  299.       png_byte buf[NEAR_BUF_SIZE];
  300.       png_size_t read, remaining, err;
  301.       check = 0;
  302.       remaining = length;
  303.       do
  304.       {
  305.          read = MIN(NEAR_BUF_SIZE, remaining);
  306.          READFILE(io_ptr, buf, 1, err);
  307.          png_memcpy(data, buf, read); /* copy far buffer to near buffer */
  308.          if (err != read)
  309.             break;
  310.          else
  311.             check += err;
  312.          data += read;
  313.          remaining -= read;
  314.       }
  315.       while (remaining != 0);
  316.    }
  317.    if (check != length)
  318.    {
  319.       png_error(png_ptr, "read Error");
  320.    }
  321. }
  322. #endif /* USE_FAR_KEYWORD */
  323. #if defined(PNG_WRITE_FLUSH_SUPPORTED)
  324. static void
  325. pngtest_flush(png_structp png_ptr)
  326. {
  327. #if !defined(_WIN32_WCE)
  328.    png_FILE_p io_ptr;
  329.    io_ptr = (png_FILE_p)CVT_PTR((png_ptr->io_ptr));
  330.    if (io_ptr != NULL)
  331.       fflush(io_ptr);
  332. #endif
  333. }
  334. #endif
  335. /* This is the function that does the actual writing of data.  If you are
  336.    not writing to a standard C stream, you should create a replacement
  337.    write_data function and use it at run time with png_set_write_fn(), rather
  338.    than changing the library. */
  339. #ifndef USE_FAR_KEYWORD
  340. static void
  341. pngtest_write_data(png_structp png_ptr, png_bytep data, png_size_t length)
  342. {
  343.    png_uint_32 check;
  344.    WRITEFILE((png_FILE_p)png_ptr->io_ptr,  data, length, check);
  345.    if (check != length)
  346.    {
  347.       png_error(png_ptr, "Write Error");
  348.    }
  349. }
  350. #else
  351. /* this is the model-independent version. Since the standard I/O library
  352.    can't handle far buffers in the medium and small models, we have to copy
  353.    the data.
  354. */
  355. #define NEAR_BUF_SIZE 1024
  356. #define MIN(a,b) (a <= b ? a : b)
  357. static void
  358. pngtest_write_data(png_structp png_ptr, png_bytep data, png_size_t length)
  359. {
  360.    png_uint_32 check;
  361.    png_byte *near_data;  /* Needs to be "png_byte *" instead of "png_bytep" */
  362.    png_FILE_p io_ptr;
  363.    /* Check if data really is near. If so, use usual code. */
  364.    near_data = (png_byte *)CVT_PTR_NOCHECK(data);
  365.    io_ptr = (png_FILE_p)CVT_PTR(png_ptr->io_ptr);
  366.    if ((png_bytep)near_data == data)
  367.    {
  368.       WRITEFILE(io_ptr, near_data, length, check);
  369.    }
  370.    else
  371.    {
  372.       png_byte buf[NEAR_BUF_SIZE];
  373.       png_size_t written, remaining, err;
  374.       check = 0;
  375.       remaining = length;
  376.       do
  377.       {
  378.          written = MIN(NEAR_BUF_SIZE, remaining);
  379.          png_memcpy(buf, data, written); /* copy far buffer to near buffer */
  380.          WRITEFILE(io_ptr, buf, written, err);
  381.          if (err != written)
  382.             break;
  383.          else
  384.             check += err;
  385.          data += written;
  386.          remaining -= written;
  387.       }
  388.       while (remaining != 0);
  389.    }
  390.    if (check != length)
  391.    {
  392.       png_error(png_ptr, "Write Error");
  393.    }
  394. }
  395. #endif /* USE_FAR_KEYWORD */
  396. /* This function is called when there is a warning, but the library thinks
  397.  * it can continue anyway.  Replacement functions don't have to do anything
  398.  * here if you don't want to.  In the default configuration, png_ptr is
  399.  * not used, but it is passed in case it may be useful.
  400.  */
  401. static void
  402. pngtest_warning(png_structp png_ptr, png_const_charp message)
  403. {
  404.    PNG_CONST char *name = "UNKNOWN (ERROR!)";
  405.    if (png_ptr != NULL && png_ptr->error_ptr != NULL)
  406.       name = png_ptr->error_ptr;
  407.    fprintf(STDERR, "%s: libpng warning: %sn", name, message);
  408. }
  409. /* This is the default error handling function.  Note that replacements for
  410.  * this function MUST NOT RETURN, or the program will likely crash.  This
  411.  * function is used by default, or if the program supplies NULL for the
  412.  * error function pointer in png_set_error_fn().
  413.  */
  414. static void
  415. pngtest_error(png_structp png_ptr, png_const_charp message)
  416. {
  417.    pngtest_warning(png_ptr, message);
  418.    /* We can return because png_error calls the default handler, which is
  419.     * actually OK in this case. */
  420. }
  421. #endif /* PNG_NO_STDIO */
  422. /* END of code to validate stdio-free compilation */
  423. /* START of code to validate memory allocation and deallocation */
  424. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  425. /* Allocate memory.  For reasonable files, size should never exceed
  426.    64K.  However, zlib may allocate more then 64K if you don't tell
  427.    it not to.  See zconf.h and png.h for more information.  zlib does
  428.    need to allocate exactly 64K, so whatever you call here must
  429.    have the ability to do that.
  430.    This piece of code can be compiled to validate max 64K allocations
  431.    by setting MAXSEG_64K in zlib zconf.h *or* PNG_MAX_MALLOC_64K. */
  432. typedef struct memory_information
  433. {
  434.    png_uint_32               size;
  435.    png_voidp                 pointer;
  436.    struct memory_information FAR *next;
  437. } memory_information;
  438. typedef memory_information FAR *memory_infop;
  439. static memory_infop pinformation = NULL;
  440. static int current_allocation = 0;
  441. static int maximum_allocation = 0;
  442. static int total_allocation = 0;
  443. static int num_allocations = 0;
  444. png_voidp png_debug_malloc PNGARG((png_structp png_ptr, png_uint_32 size));
  445. void png_debug_free PNGARG((png_structp png_ptr, png_voidp ptr));
  446. png_voidp
  447. png_debug_malloc(png_structp png_ptr, png_uint_32 size)
  448. {
  449.    /* png_malloc has already tested for NULL; png_create_struct calls
  450.       png_debug_malloc directly, with png_ptr == NULL which is OK */
  451.    if (size == 0)
  452.       return (NULL);
  453.    /* This calls the library allocator twice, once to get the requested
  454.       buffer and once to get a new free list entry. */
  455.    {
  456.       /* Disable malloc_fn and free_fn */
  457.       memory_infop pinfo;
  458.       png_set_mem_fn(png_ptr, NULL, NULL, NULL);
  459.       pinfo = (memory_infop)png_malloc(png_ptr,
  460.          (png_uint_32)png_sizeof(*pinfo));
  461.       pinfo->size = size;
  462.       current_allocation += size;
  463.       total_allocation += size;
  464.       num_allocations ++;
  465.       if (current_allocation > maximum_allocation)
  466.          maximum_allocation = current_allocation;
  467.       pinfo->pointer = (png_voidp)png_malloc(png_ptr, size);
  468.       /* Restore malloc_fn and free_fn */
  469.       png_set_mem_fn(png_ptr,
  470.           png_voidp_NULL, (png_malloc_ptr)png_debug_malloc,
  471.           (png_free_ptr)png_debug_free);
  472.       if (size != 0 && pinfo->pointer == NULL)
  473.       {
  474.          current_allocation -= size;
  475.          total_allocation -= size;
  476.          png_error(png_ptr,
  477.            "out of memory in pngtest->png_debug_malloc.");
  478.       }
  479.       pinfo->next = pinformation;
  480.       pinformation = pinfo;
  481.       /* Make sure the caller isn't assuming zeroed memory. */
  482.       png_memset(pinfo->pointer, 0xdd, pinfo->size);
  483.       if (verbose)
  484.          printf("png_malloc %lu bytes at %xn", (unsigned long)size,
  485.             pinfo->pointer);
  486.       return (png_voidp)(pinfo->pointer);
  487.    }
  488. }
  489. /* Free a pointer.  It is removed from the list at the same time. */
  490. void
  491. png_debug_free(png_structp png_ptr, png_voidp ptr)
  492. {
  493.    if (png_ptr == NULL)
  494.       fprintf(STDERR, "NULL pointer to png_debug_free.n");
  495.    if (ptr == 0)
  496.    {
  497. #if 0 /* This happens all the time. */
  498.       fprintf(STDERR, "WARNING: freeing NULL pointern");
  499. #endif
  500.       return;
  501.    }
  502.    /* Unlink the element from the list. */
  503.    {
  504.       memory_infop FAR *ppinfo = &pinformation;
  505.       for (;;)
  506.       {
  507.          memory_infop pinfo = *ppinfo;
  508.          if (pinfo->pointer == ptr)
  509.          {
  510.             *ppinfo = pinfo->next;
  511.             current_allocation -= pinfo->size;
  512.             if (current_allocation < 0)
  513.                fprintf(STDERR, "Duplicate free of memoryn");
  514.             /* We must free the list element too, but first kill
  515.                the memory that is to be freed. */
  516.             png_memset(ptr, 0x55, pinfo->size);
  517.             png_free_default(png_ptr, pinfo);
  518.             pinfo = NULL;
  519.             break;
  520.          }
  521.          if (pinfo->next == NULL)
  522.          {
  523.             fprintf(STDERR, "Pointer %x not foundn", (unsigned int)ptr);
  524.             break;
  525.          }
  526.          ppinfo = &pinfo->next;
  527.       }
  528.    }
  529.    /* Finally free the data. */
  530.    if (verbose)
  531.       printf("Freeing %xn", ptr);
  532.    png_free_default(png_ptr, ptr);
  533.    ptr = NULL;
  534. }
  535. #endif /* PNG_USER_MEM_SUPPORTED && PNG_DEBUG */
  536. /* END of code to test memory allocation/deallocation */
  537. /* Demonstration of user chunk support of the sTER and vpAg chunks */
  538. #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
  539. /* (sTER is a public chunk not yet understood by libpng.  vpAg is a private
  540. chunk used in ImageMagick to store "virtual page" size).  */
  541. static png_uint_32 user_chunk_data[4];
  542.     /* 0: sTER mode + 1
  543.      * 1: vpAg width
  544.      * 2: vpAg height
  545.      * 3: vpAg units
  546.      */
  547. static int read_user_chunk_callback(png_struct *png_ptr,
  548.    png_unknown_chunkp chunk)
  549. {
  550.   png_uint_32
  551.     *user_chunk_data;
  552.   /* Return one of the following: */
  553.      /* return (-n);  chunk had an error */
  554.      /* return (0);  did not recognize */
  555.      /* return (n);  success */
  556.   /* The unknown chunk structure contains the chunk data:
  557.    * png_byte name[5];
  558.    * png_byte *data;
  559.    * png_size_t size;
  560.    *
  561.    *  Note that libpng has already taken care of the CRC handling.
  562.    */
  563.   if (chunk->name[0] == 115 && chunk->name[1] ==  84 &&     /* s  T */
  564.       chunk->name[2] ==  69 && chunk->name[3] ==  82)       /* E  R */
  565.      {
  566.        /* Found sTER chunk */
  567.        if (chunk->size != 1)
  568.          return (-1); /* Error return */
  569.        if (chunk->data[0] != 0 && chunk->data[0] != 1)
  570.           return (-1);  /* Invalid mode */
  571.        user_chunk_data=(png_uint_32 *) png_get_user_chunk_ptr(png_ptr);
  572.        user_chunk_data[0]=chunk->data[0]+1;
  573.        return (1);
  574.      }
  575.   if (chunk->name[0] != 118 || chunk->name[1] != 112 ||    /* v  p */
  576.       chunk->name[2] !=  65 || chunk->name[3] != 103)      /* A  g */
  577.     return (0); /* Did not recognize */
  578.   /* Found ImageMagick vpAg chunk */
  579.   if (chunk->size != 9)
  580.     return (-1); /* Error return */
  581.   user_chunk_data=(png_uint_32 *) png_get_user_chunk_ptr(png_ptr);
  582.   user_chunk_data[1]=png_get_uint_31(png_ptr, chunk->data);
  583.   user_chunk_data[2]=png_get_uint_31(png_ptr, chunk->data + 4);
  584.   user_chunk_data[3]=(png_uint_32)chunk->data[8];
  585.   return (1);
  586. }
  587. #endif
  588. /* END of code to demonstrate user chunk support */
  589. /* Test one file */
  590. int
  591. test_one_file(PNG_CONST char *inname, PNG_CONST char *outname)
  592. {
  593.    static png_FILE_p fpin;
  594.    static png_FILE_p fpout;  /* "static" prevents setjmp corruption */
  595.    png_structp read_ptr;
  596.    png_infop read_info_ptr, end_info_ptr;
  597. #ifdef PNG_WRITE_SUPPORTED
  598.    png_structp write_ptr;
  599.    png_infop write_info_ptr;
  600.    png_infop write_end_info_ptr;
  601. #else
  602.    png_structp write_ptr = NULL;
  603.    png_infop write_info_ptr = NULL;
  604.    png_infop write_end_info_ptr = NULL;
  605. #endif
  606.    png_bytep row_buf;
  607.    png_uint_32 y;
  608.    png_uint_32 width, height;
  609.    int num_pass, pass;
  610.    int bit_depth, color_type;
  611. #ifdef PNG_SETJMP_SUPPORTED
  612. #ifdef USE_FAR_KEYWORD
  613.    jmp_buf jmpbuf;
  614. #endif
  615. #endif
  616. #if defined(_WIN32_WCE)
  617.    TCHAR path[MAX_PATH];
  618. #endif
  619.    char inbuf[256], outbuf[256];
  620.    row_buf = NULL;
  621. #if defined(_WIN32_WCE)
  622.    MultiByteToWideChar(CP_ACP, 0, inname, -1, path, MAX_PATH);
  623.    if ((fpin = CreateFile(path, GENERIC_READ, 0, NULL, OPEN_EXISTING, 0, NULL)) == INVALID_HANDLE_VALUE)
  624. #else
  625.    if ((fpin = fopen(inname, "rb")) == NULL)
  626. #endif
  627.    {
  628.       fprintf(STDERR, "Could not find input file %sn", inname);
  629.       return (1);
  630.    }
  631. #if defined(_WIN32_WCE)
  632.    MultiByteToWideChar(CP_ACP, 0, outname, -1, path, MAX_PATH);
  633.    if ((fpout = CreateFile(path, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL)) == INVALID_HANDLE_VALUE)
  634. #else
  635.    if ((fpout = fopen(outname, "wb")) == NULL)
  636. #endif
  637.    {
  638.       fprintf(STDERR, "Could not open output file %sn", outname);
  639.       FCLOSE(fpin);
  640.       return (1);
  641.    }
  642.    png_debug(0, "Allocating read and write structures");
  643. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  644.    read_ptr =
  645.       png_create_read_struct_2(PNG_LIBPNG_VER_STRING, png_voidp_NULL,
  646.       png_error_ptr_NULL, png_error_ptr_NULL, png_voidp_NULL,
  647.       (png_malloc_ptr)png_debug_malloc, (png_free_ptr)png_debug_free);
  648. #else
  649.    read_ptr =
  650.       png_create_read_struct(PNG_LIBPNG_VER_STRING, png_voidp_NULL,
  651.       png_error_ptr_NULL, png_error_ptr_NULL);
  652. #endif
  653. #if defined(PNG_NO_STDIO)
  654.    png_set_error_fn(read_ptr, (png_voidp)inname, pngtest_error,
  655.        pngtest_warning);
  656. #endif
  657. #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
  658.   user_chunk_data[0] = 0;
  659.   user_chunk_data[1] = 0;
  660.   user_chunk_data[2] = 0;
  661.   user_chunk_data[3] = 0;
  662.   png_set_read_user_chunk_fn(read_ptr, user_chunk_data,
  663.     read_user_chunk_callback);
  664. #endif
  665. #ifdef PNG_WRITE_SUPPORTED
  666. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  667.    write_ptr =
  668.       png_create_write_struct_2(PNG_LIBPNG_VER_STRING, png_voidp_NULL,
  669.       png_error_ptr_NULL, png_error_ptr_NULL, png_voidp_NULL,
  670.       (png_malloc_ptr)png_debug_malloc, (png_free_ptr)png_debug_free);
  671. #else
  672.    write_ptr =
  673.       png_create_write_struct(PNG_LIBPNG_VER_STRING, png_voidp_NULL,
  674.       png_error_ptr_NULL, png_error_ptr_NULL);
  675. #endif
  676. #if defined(PNG_NO_STDIO)
  677.    png_set_error_fn(write_ptr, (png_voidp)inname, pngtest_error,
  678.        pngtest_warning);
  679. #endif
  680. #endif
  681.    png_debug(0, "Allocating read_info, write_info and end_info structures");
  682.    read_info_ptr = png_create_info_struct(read_ptr);
  683.    end_info_ptr = png_create_info_struct(read_ptr);
  684. #ifdef PNG_WRITE_SUPPORTED
  685.    write_info_ptr = png_create_info_struct(write_ptr);
  686.    write_end_info_ptr = png_create_info_struct(write_ptr);
  687. #endif
  688. #ifdef PNG_SETJMP_SUPPORTED
  689.    png_debug(0, "Setting jmpbuf for read struct");
  690. #ifdef USE_FAR_KEYWORD
  691.    if (setjmp(jmpbuf))
  692. #else
  693.    if (setjmp(png_jmpbuf(read_ptr)))
  694. #endif
  695.    {
  696.       fprintf(STDERR, "%s -> %s: libpng read errorn", inname, outname);
  697.       png_free(read_ptr, row_buf);
  698.       row_buf = NULL;
  699.       png_destroy_read_struct(&read_ptr, &read_info_ptr, &end_info_ptr);
  700. #ifdef PNG_WRITE_SUPPORTED
  701.       png_destroy_info_struct(write_ptr, &write_end_info_ptr);
  702.       png_destroy_write_struct(&write_ptr, &write_info_ptr);
  703. #endif
  704.       FCLOSE(fpin);
  705.       FCLOSE(fpout);
  706.       return (1);
  707.    }
  708. #ifdef USE_FAR_KEYWORD
  709.    png_memcpy(png_jmpbuf(read_ptr), jmpbuf, png_sizeof(jmp_buf));
  710. #endif
  711. #ifdef PNG_WRITE_SUPPORTED
  712.    png_debug(0, "Setting jmpbuf for write struct");
  713. #ifdef USE_FAR_KEYWORD
  714.    if (setjmp(jmpbuf))
  715. #else
  716.    if (setjmp(png_jmpbuf(write_ptr)))
  717. #endif
  718.    {
  719.       fprintf(STDERR, "%s -> %s: libpng write errorn", inname, outname);
  720.       png_destroy_read_struct(&read_ptr, &read_info_ptr, &end_info_ptr);
  721.       png_destroy_info_struct(write_ptr, &write_end_info_ptr);
  722. #ifdef PNG_WRITE_SUPPORTED
  723.       png_destroy_write_struct(&write_ptr, &write_info_ptr);
  724. #endif
  725.       FCLOSE(fpin);
  726.       FCLOSE(fpout);
  727.       return (1);
  728.    }
  729. #ifdef USE_FAR_KEYWORD
  730.    png_memcpy(png_jmpbuf(write_ptr), jmpbuf, png_sizeof(jmp_buf));
  731. #endif
  732. #endif
  733. #endif
  734.    png_debug(0, "Initializing input and output streams");
  735. #if !defined(PNG_NO_STDIO)
  736.    png_init_io(read_ptr, fpin);
  737. #  ifdef PNG_WRITE_SUPPORTED
  738.    png_init_io(write_ptr, fpout);
  739. #  endif
  740. #else
  741.    png_set_read_fn(read_ptr, (png_voidp)fpin, pngtest_read_data);
  742. #  ifdef PNG_WRITE_SUPPORTED
  743.    png_set_write_fn(write_ptr, (png_voidp)fpout,  pngtest_write_data,
  744. #    if defined(PNG_WRITE_FLUSH_SUPPORTED)
  745.       pngtest_flush);
  746. #    else
  747.       NULL);
  748. #    endif
  749. #  endif
  750. #endif
  751.    if (status_dots_requested == 1)
  752.    {
  753. #ifdef PNG_WRITE_SUPPORTED
  754.       png_set_write_status_fn(write_ptr, write_row_callback);
  755. #endif
  756.       png_set_read_status_fn(read_ptr, read_row_callback);
  757.    }
  758.    else
  759.    {
  760. #ifdef PNG_WRITE_SUPPORTED
  761.       png_set_write_status_fn(write_ptr, png_write_status_ptr_NULL);
  762. #endif
  763.       png_set_read_status_fn(read_ptr, png_read_status_ptr_NULL);
  764.    }
  765. #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED)
  766.    {
  767.      int i;
  768.      for (i = 0; i<256; i++)
  769.         filters_used[i] = 0;
  770.      png_set_read_user_transform_fn(read_ptr, count_filters);
  771.    }
  772. #endif
  773. #if defined(PNG_WRITE_USER_TRANSFORM_SUPPORTED)
  774.    zero_samples = 0;
  775.    png_set_write_user_transform_fn(write_ptr, count_zero_samples);
  776. #endif
  777. #if defined(PNG_READ_UNKNOWN_CHUNKS_SUPPORTED)
  778. #  ifndef PNG_HANDLE_CHUNK_ALWAYS
  779. #    define PNG_HANDLE_CHUNK_ALWAYS       3
  780. #  endif
  781.    png_set_keep_unknown_chunks(read_ptr, PNG_HANDLE_CHUNK_ALWAYS,
  782.       png_bytep_NULL, 0);
  783. #endif
  784. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  785. #  ifndef PNG_HANDLE_CHUNK_IF_SAFE
  786. #    define PNG_HANDLE_CHUNK_IF_SAFE      2
  787. #  endif
  788.    png_set_keep_unknown_chunks(write_ptr, PNG_HANDLE_CHUNK_IF_SAFE,
  789.       png_bytep_NULL, 0);
  790. #endif
  791.    png_debug(0, "Reading info struct");
  792.    png_read_info(read_ptr, read_info_ptr);
  793.    png_debug(0, "Transferring info struct");
  794.    {
  795.       int interlace_type, compression_type, filter_type;
  796.       if (png_get_IHDR(read_ptr, read_info_ptr, &width, &height, &bit_depth,
  797.           &color_type, &interlace_type, &compression_type, &filter_type))
  798.       {
  799.          png_set_IHDR(write_ptr, write_info_ptr, width, height, bit_depth,
  800. #if defined(PNG_WRITE_INTERLACING_SUPPORTED)
  801.             color_type, interlace_type, compression_type, filter_type);
  802. #else
  803.             color_type, PNG_INTERLACE_NONE, compression_type, filter_type);
  804. #endif
  805.       }
  806.    }
  807. #if defined(PNG_FIXED_POINT_SUPPORTED)
  808. #if defined(PNG_cHRM_SUPPORTED)
  809.    {
  810.       png_fixed_point white_x, white_y, red_x, red_y, green_x, green_y, blue_x,
  811.          blue_y;
  812.       if (png_get_cHRM_fixed(read_ptr, read_info_ptr, &white_x, &white_y, &red_x,
  813.          &red_y, &green_x, &green_y, &blue_x, &blue_y))
  814.       {
  815.          png_set_cHRM_fixed(write_ptr, write_info_ptr, white_x, white_y, red_x,
  816.             red_y, green_x, green_y, blue_x, blue_y);
  817.       }
  818.    }
  819. #endif
  820. #if defined(PNG_gAMA_SUPPORTED)
  821.    {
  822.       png_fixed_point gamma;
  823.       if (png_get_gAMA_fixed(read_ptr, read_info_ptr, &gamma))
  824.       {
  825.          png_set_gAMA_fixed(write_ptr, write_info_ptr, gamma);
  826.       }
  827.    }
  828. #endif
  829. #else /* Use floating point versions */
  830. #if defined(PNG_FLOATING_POINT_SUPPORTED)
  831. #if defined(PNG_cHRM_SUPPORTED)
  832.    {
  833.       double white_x, white_y, red_x, red_y, green_x, green_y, blue_x,
  834.          blue_y;
  835.       if (png_get_cHRM(read_ptr, read_info_ptr, &white_x, &white_y, &red_x,
  836.          &red_y, &green_x, &green_y, &blue_x, &blue_y))
  837.       {
  838.          png_set_cHRM(write_ptr, write_info_ptr, white_x, white_y, red_x,
  839.             red_y, green_x, green_y, blue_x, blue_y);
  840.       }
  841.    }
  842. #endif
  843. #if defined(PNG_gAMA_SUPPORTED)
  844.    {
  845.       double gamma;
  846.       if (png_get_gAMA(read_ptr, read_info_ptr, &gamma))
  847.       {
  848.          png_set_gAMA(write_ptr, write_info_ptr, gamma);
  849.       }
  850.    }
  851. #endif
  852. #endif /* floating point */
  853. #endif /* fixed point */
  854. #if defined(PNG_iCCP_SUPPORTED)
  855.    {
  856.       png_charp name;
  857.       png_charp profile;
  858.       png_uint_32 proflen;
  859.       int compression_type;
  860.       if (png_get_iCCP(read_ptr, read_info_ptr, &name, &compression_type,
  861.                       &profile, &proflen))
  862.       {
  863.          png_set_iCCP(write_ptr, write_info_ptr, name, compression_type,
  864.                       profile, proflen);
  865.       }
  866.    }
  867. #endif
  868. #if defined(PNG_sRGB_SUPPORTED)
  869.    {
  870.       int intent;
  871.       if (png_get_sRGB(read_ptr, read_info_ptr, &intent))
  872.       {
  873.          png_set_sRGB(write_ptr, write_info_ptr, intent);
  874.       }
  875.    }
  876. #endif
  877.    {
  878.       png_colorp palette;
  879.       int num_palette;
  880.       if (png_get_PLTE(read_ptr, read_info_ptr, &palette, &num_palette))
  881.       {
  882.          png_set_PLTE(write_ptr, write_info_ptr, palette, num_palette);
  883.       }
  884.    }
  885. #if defined(PNG_bKGD_SUPPORTED)
  886.    {
  887.       png_color_16p background;
  888.       if (png_get_bKGD(read_ptr, read_info_ptr, &background))
  889.       {
  890.          png_set_bKGD(write_ptr, write_info_ptr, background);
  891.       }
  892.    }
  893. #endif
  894. #if defined(PNG_hIST_SUPPORTED)
  895.    {
  896.       png_uint_16p hist;
  897.       if (png_get_hIST(read_ptr, read_info_ptr, &hist))
  898.       {
  899.          png_set_hIST(write_ptr, write_info_ptr, hist);
  900.       }
  901.    }
  902. #endif
  903. #if defined(PNG_oFFs_SUPPORTED)
  904.    {
  905.       png_int_32 offset_x, offset_y;
  906.       int unit_type;
  907.       if (png_get_oFFs(read_ptr, read_info_ptr, &offset_x, &offset_y,
  908.          &unit_type))
  909.       {
  910.          png_set_oFFs(write_ptr, write_info_ptr, offset_x, offset_y, unit_type);
  911.       }
  912.    }
  913. #endif
  914. #if defined(PNG_pCAL_SUPPORTED)
  915.    {
  916.       png_charp purpose, units;
  917.       png_charpp params;
  918.       png_int_32 X0, X1;
  919.       int type, nparams;
  920.       if (png_get_pCAL(read_ptr, read_info_ptr, &purpose, &X0, &X1, &type,
  921.          &nparams, &units, &params))
  922.       {
  923.          png_set_pCAL(write_ptr, write_info_ptr, purpose, X0, X1, type,
  924.             nparams, units, params);
  925.       }
  926.    }
  927. #endif
  928. #if defined(PNG_pHYs_SUPPORTED)
  929.    {
  930.       png_uint_32 res_x, res_y;
  931.       int unit_type;
  932.       if (png_get_pHYs(read_ptr, read_info_ptr, &res_x, &res_y, &unit_type))
  933.       {
  934.          png_set_pHYs(write_ptr, write_info_ptr, res_x, res_y, unit_type);
  935.       }
  936.    }
  937. #endif
  938. #if defined(PNG_sBIT_SUPPORTED)
  939.    {
  940.       png_color_8p sig_bit;
  941.       if (png_get_sBIT(read_ptr, read_info_ptr, &sig_bit))
  942.       {
  943.          png_set_sBIT(write_ptr, write_info_ptr, sig_bit);
  944.       }
  945.    }
  946. #endif
  947. #if defined(PNG_sCAL_SUPPORTED)
  948. #ifdef PNG_FLOATING_POINT_SUPPORTED
  949.    {
  950.       int unit;
  951.       double scal_width, scal_height;
  952.       if (png_get_sCAL(read_ptr, read_info_ptr, &unit, &scal_width,
  953.          &scal_height))
  954.       {
  955.          png_set_sCAL(write_ptr, write_info_ptr, unit, scal_width, scal_height);
  956.       }
  957.    }
  958. #else
  959. #ifdef PNG_FIXED_POINT_SUPPORTED
  960.    {
  961.       int unit;
  962.       png_charp scal_width, scal_height;
  963.       if (png_get_sCAL_s(read_ptr, read_info_ptr, &unit, &scal_width,
  964.           &scal_height))
  965.       {
  966.          png_set_sCAL_s(write_ptr, write_info_ptr, unit, scal_width, scal_height);
  967.       }
  968.    }
  969. #endif
  970. #endif
  971. #endif
  972. #if defined(PNG_TEXT_SUPPORTED)
  973.    {
  974.       png_textp text_ptr;
  975.       int num_text;
  976.       if (png_get_text(read_ptr, read_info_ptr, &text_ptr, &num_text) > 0)
  977.       {
  978.          png_debug1(0, "Handling %d iTXt/tEXt/zTXt chunks", num_text);
  979.          png_set_text(write_ptr, write_info_ptr, text_ptr, num_text);
  980.       }
  981.    }
  982. #endif
  983. #if defined(PNG_tIME_SUPPORTED)
  984.    {
  985.       png_timep mod_time;
  986.       if (png_get_tIME(read_ptr, read_info_ptr, &mod_time))
  987.       {
  988.          png_set_tIME(write_ptr, write_info_ptr, mod_time);
  989. #if defined(PNG_TIME_RFC1123_SUPPORTED)
  990.          /* we have to use png_memcpy instead of "=" because the string
  991.             pointed to by png_convert_to_rfc1123() gets free'ed before
  992.             we use it */
  993.          png_memcpy(tIME_string,
  994.                     png_convert_to_rfc1123(read_ptr, mod_time),
  995.                     png_sizeof(tIME_string));
  996.          tIME_string[png_sizeof(tIME_string) - 1] = '';
  997.          tIME_chunk_present++;
  998. #endif /* PNG_TIME_RFC1123_SUPPORTED */
  999.       }
  1000.    }
  1001. #endif
  1002. #if defined(PNG_tRNS_SUPPORTED)
  1003.    {
  1004.       png_bytep trans;
  1005.       int num_trans;
  1006.       png_color_16p trans_values;
  1007.       if (png_get_tRNS(read_ptr, read_info_ptr, &trans, &num_trans,
  1008.          &trans_values))
  1009.       {
  1010.          int sample_max = (1 << read_info_ptr->bit_depth);
  1011.          /* libpng doesn't reject a tRNS chunk with out-of-range samples */
  1012.          if (!((read_info_ptr->color_type == PNG_COLOR_TYPE_GRAY &&
  1013.             (int)trans_values->gray > sample_max) ||
  1014.             (read_info_ptr->color_type == PNG_COLOR_TYPE_RGB &&
  1015.             ((int)trans_values->red > sample_max ||
  1016.             (int)trans_values->green > sample_max ||
  1017.             (int)trans_values->blue > sample_max))))
  1018.            png_set_tRNS(write_ptr, write_info_ptr, trans, num_trans,
  1019.               trans_values);
  1020.       }
  1021.    }
  1022. #endif
  1023. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  1024.    {
  1025.       png_unknown_chunkp unknowns;
  1026.       int num_unknowns = (int)png_get_unknown_chunks(read_ptr, read_info_ptr,
  1027.          &unknowns);
  1028.       if (num_unknowns)
  1029.       {
  1030.          png_size_t i;
  1031.          png_set_unknown_chunks(write_ptr, write_info_ptr, unknowns,
  1032.            num_unknowns);
  1033.          /* copy the locations from the read_info_ptr.  The automatically
  1034.             generated locations in write_info_ptr are wrong because we
  1035.             haven't written anything yet */
  1036.          for (i = 0; i < (png_size_t)num_unknowns; i++)
  1037.            png_set_unknown_chunk_location(write_ptr, write_info_ptr, i,
  1038.              unknowns[i].location);
  1039.       }
  1040.    }
  1041. #endif
  1042. #ifdef PNG_WRITE_SUPPORTED
  1043.    png_debug(0, "Writing info struct");
  1044. /* If we wanted, we could write info in two steps:
  1045.    png_write_info_before_PLTE(write_ptr, write_info_ptr);
  1046.  */
  1047.    png_write_info(write_ptr, write_info_ptr);
  1048. #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
  1049.    if (user_chunk_data[0] != 0)
  1050.    {
  1051.      png_byte png_sTER[5] = {115,  84,  69,  82, ''};
  1052.      unsigned char
  1053.        ster_chunk_data[1];
  1054.      if (verbose)
  1055.         fprintf(STDERR, "stereo mode = %lun",
  1056.           (unsigned long)(user_chunk_data[0] - 1));
  1057.      ster_chunk_data[0]=(unsigned char)(user_chunk_data[0] - 1);
  1058.      png_write_chunk(write_ptr, png_sTER, ster_chunk_data, 1);
  1059.    }
  1060.    if (user_chunk_data[1] != 0 || user_chunk_data[2] != 0)
  1061.    {
  1062.      png_byte png_vpAg[5] = {118, 112,  65, 103, ''};
  1063.      unsigned char
  1064.        vpag_chunk_data[9];
  1065.      if (verbose)
  1066.         fprintf(STDERR, "vpAg = %lu x %lu, units=%lun",
  1067.           (unsigned long)user_chunk_data[1],
  1068.           (unsigned long)user_chunk_data[2],
  1069.           (unsigned long)user_chunk_data[3]);
  1070.      png_save_uint_32(vpag_chunk_data, user_chunk_data[1]);
  1071.      png_save_uint_32(vpag_chunk_data + 4, user_chunk_data[2]);
  1072.      vpag_chunk_data[8] = (unsigned char)(user_chunk_data[3] & 0xff);
  1073.      png_write_chunk(write_ptr, png_vpAg, vpag_chunk_data, 9);
  1074.    }
  1075. #endif
  1076. #endif
  1077. #ifdef SINGLE_ROWBUF_ALLOC
  1078.    png_debug(0, "Allocating row buffer...");
  1079.    row_buf = (png_bytep)png_malloc(read_ptr,
  1080.       png_get_rowbytes(read_ptr, read_info_ptr));
  1081.    png_debug1(0, "0x%08lx", (unsigned long)row_buf);
  1082. #endif /* SINGLE_ROWBUF_ALLOC */
  1083.    png_debug(0, "Writing row data");
  1084. #if defined(PNG_READ_INTERLACING_SUPPORTED) || 
  1085.   defined(PNG_WRITE_INTERLACING_SUPPORTED)
  1086.    num_pass = png_set_interlace_handling(read_ptr);
  1087. #  ifdef PNG_WRITE_SUPPORTED
  1088.    png_set_interlace_handling(write_ptr);
  1089. #  endif
  1090. #else
  1091.    num_pass = 1;
  1092. #endif
  1093. #ifdef PNGTEST_TIMING
  1094.    t_stop = (float)clock();
  1095.    t_misc += (t_stop - t_start);
  1096.    t_start = t_stop;
  1097. #endif
  1098.    for (pass = 0; pass < num_pass; pass++)
  1099.    {
  1100.       png_debug1(0, "Writing row data for pass %d", pass);
  1101.       for (y = 0; y < height; y++)
  1102.       {
  1103. #ifndef SINGLE_ROWBUF_ALLOC
  1104.          png_debug2(0, "nAllocating row buffer (pass %d, y = %ld)...", pass, y);
  1105.          row_buf = (png_bytep)png_malloc(read_ptr,
  1106.             png_get_rowbytes(read_ptr, read_info_ptr));
  1107.          png_debug2(0, "0x%08lx (%ld bytes)", (unsigned long)row_buf,
  1108.             png_get_rowbytes(read_ptr, read_info_ptr));
  1109. #endif /* !SINGLE_ROWBUF_ALLOC */
  1110.          png_read_rows(read_ptr, (png_bytepp)&row_buf, png_bytepp_NULL, 1);
  1111. #ifdef PNG_WRITE_SUPPORTED
  1112. #ifdef PNGTEST_TIMING
  1113.          t_stop = (float)clock();
  1114.          t_decode += (t_stop - t_start);
  1115.          t_start = t_stop;
  1116. #endif
  1117.          png_write_rows(write_ptr, (png_bytepp)&row_buf, 1);
  1118. #ifdef PNGTEST_TIMING
  1119.          t_stop = (float)clock();
  1120.          t_encode += (t_stop - t_start);
  1121.          t_start = t_stop;
  1122. #endif
  1123. #endif /* PNG_WRITE_SUPPORTED */
  1124. #ifndef SINGLE_ROWBUF_ALLOC
  1125.          png_debug2(0, "Freeing row buffer (pass %d, y = %ld)", pass, y);
  1126.          png_free(read_ptr, row_buf);
  1127.          row_buf = NULL;
  1128. #endif /* !SINGLE_ROWBUF_ALLOC */
  1129.       }
  1130.    }
  1131. #if defined(PNG_READ_UNKNOWN_CHUNKS_SUPPORTED)
  1132.    png_free_data(read_ptr, read_info_ptr, PNG_FREE_UNKN, -1);
  1133. #endif
  1134. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  1135.    png_free_data(write_ptr, write_info_ptr, PNG_FREE_UNKN, -1);
  1136. #endif
  1137.    png_debug(0, "Reading and writing end_info data");
  1138.    png_read_end(read_ptr, end_info_ptr);
  1139. #if defined(PNG_TEXT_SUPPORTED)
  1140.    {
  1141.       png_textp text_ptr;
  1142.       int num_text;
  1143.       if (png_get_text(read_ptr, end_info_ptr, &text_ptr, &num_text) > 0)
  1144.       {
  1145.          png_debug1(0, "Handling %d iTXt/tEXt/zTXt chunks", num_text);
  1146.          png_set_text(write_ptr, write_end_info_ptr, text_ptr, num_text);
  1147.       }
  1148.    }
  1149. #endif
  1150. #if defined(PNG_tIME_SUPPORTED)
  1151.    {
  1152.       png_timep mod_time;
  1153.       if (png_get_tIME(read_ptr, end_info_ptr, &mod_time))
  1154.       {
  1155.          png_set_tIME(write_ptr, write_end_info_ptr, mod_time);
  1156. #if defined(PNG_TIME_RFC1123_SUPPORTED)
  1157.          /* we have to use png_memcpy instead of "=" because the string
  1158.             pointed to by png_convert_to_rfc1123() gets free'ed before
  1159.             we use it */
  1160.          png_memcpy(tIME_string,
  1161.                     png_convert_to_rfc1123(read_ptr, mod_time),
  1162.                     png_sizeof(tIME_string));
  1163.          tIME_string[png_sizeof(tIME_string) - 1] = '';
  1164.          tIME_chunk_present++;
  1165. #endif /* PNG_TIME_RFC1123_SUPPORTED */
  1166.       }
  1167.    }
  1168. #endif
  1169. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  1170.    {
  1171.       png_unknown_chunkp unknowns;
  1172.       int num_unknowns;
  1173.       num_unknowns = (int)png_get_unknown_chunks(read_ptr, end_info_ptr,
  1174.          &unknowns);
  1175.       if (num_unknowns)
  1176.       {
  1177.          png_size_t i;
  1178.          png_set_unknown_chunks(write_ptr, write_end_info_ptr, unknowns,
  1179.            num_unknowns);
  1180.          /* copy the locations from the read_info_ptr.  The automatically
  1181.             generated locations in write_end_info_ptr are wrong because we
  1182.             haven't written the end_info yet */
  1183.          for (i = 0; i < (png_size_t)num_unknowns; i++)
  1184.            png_set_unknown_chunk_location(write_ptr, write_end_info_ptr, i,
  1185.              unknowns[i].location);
  1186.       }
  1187.    }
  1188. #endif
  1189. #ifdef PNG_WRITE_SUPPORTED
  1190.    png_write_end(write_ptr, write_end_info_ptr);
  1191. #endif
  1192. #ifdef PNG_EASY_ACCESS_SUPPORTED
  1193.    if (verbose)
  1194.    {
  1195.       png_uint_32 iwidth, iheight;
  1196.       iwidth = png_get_image_width(write_ptr, write_info_ptr);
  1197.       iheight = png_get_image_height(write_ptr, write_info_ptr);
  1198.       fprintf(STDERR, "Image width = %lu, height = %lun",
  1199.          (unsigned long)iwidth, (unsigned long)iheight);
  1200.    }
  1201. #endif
  1202.    png_debug(0, "Destroying data structs");
  1203. #ifdef SINGLE_ROWBUF_ALLOC
  1204.    png_debug(1, "destroying row_buf for read_ptr");
  1205.    png_free(read_ptr, row_buf);
  1206.    row_buf = NULL;
  1207. #endif /* SINGLE_ROWBUF_ALLOC */
  1208.    png_debug(1, "destroying read_ptr, read_info_ptr, end_info_ptr");
  1209.    png_destroy_read_struct(&read_ptr, &read_info_ptr, &end_info_ptr);
  1210. #ifdef PNG_WRITE_SUPPORTED
  1211.    png_debug(1, "destroying write_end_info_ptr");
  1212.    png_destroy_info_struct(write_ptr, &write_end_info_ptr);
  1213.    png_debug(1, "destroying write_ptr, write_info_ptr");
  1214.    png_destroy_write_struct(&write_ptr, &write_info_ptr);
  1215. #endif
  1216.    png_debug(0, "Destruction complete.");
  1217.    FCLOSE(fpin);
  1218.    FCLOSE(fpout);
  1219.    png_debug(0, "Opening files for comparison");
  1220. #if defined(_WIN32_WCE)
  1221.    MultiByteToWideChar(CP_ACP, 0, inname, -1, path, MAX_PATH);
  1222.    if ((fpin = CreateFile(path, GENERIC_READ, 0, NULL, OPEN_EXISTING, 0, NULL)) == INVALID_HANDLE_VALUE)
  1223. #else
  1224.    if ((fpin = fopen(inname, "rb")) == NULL)
  1225. #endif
  1226.    {
  1227.       fprintf(STDERR, "Could not find file %sn", inname);
  1228.       return (1);
  1229.    }
  1230. #if defined(_WIN32_WCE)
  1231.    MultiByteToWideChar(CP_ACP, 0, outname, -1, path, MAX_PATH);
  1232.    if ((fpout = CreateFile(path, GENERIC_READ, 0, NULL, OPEN_EXISTING, 0, NULL)) == INVALID_HANDLE_VALUE)
  1233. #else
  1234.    if ((fpout = fopen(outname, "rb")) == NULL)
  1235. #endif
  1236.    {
  1237.       fprintf(STDERR, "Could not find file %sn", outname);
  1238.       FCLOSE(fpin);
  1239.       return (1);
  1240.    }
  1241.    for (;;)
  1242.    {
  1243.       png_size_t num_in, num_out;
  1244.          READFILE(fpin, inbuf, 1, num_in);
  1245.          READFILE(fpout, outbuf, 1, num_out);
  1246.       if (num_in != num_out)
  1247.       {
  1248.          fprintf(STDERR, "nFiles %s and %s are of a different sizen",
  1249.                  inname, outname);
  1250.          if (wrote_question == 0)
  1251.          {
  1252.             fprintf(STDERR,
  1253.          "   Was %s written with the same maximum IDAT chunk size (%d bytes),",
  1254.               inname, PNG_ZBUF_SIZE);
  1255.             fprintf(STDERR,
  1256.               "n   filtering heuristic (libpng default), compression");
  1257.             fprintf(STDERR,
  1258.               " level (zlib default),n   and zlib version (%s)?nn",
  1259.               ZLIB_VERSION);
  1260.             wrote_question = 1;
  1261.          }
  1262.          FCLOSE(fpin);
  1263.          FCLOSE(fpout);
  1264.          return (0);
  1265.       }
  1266.       if (!num_in)
  1267.          break;
  1268.       if (png_memcmp(inbuf, outbuf, num_in))
  1269.       {
  1270.          fprintf(STDERR, "nFiles %s and %s are differentn", inname, outname);
  1271.          if (wrote_question == 0)
  1272.          {
  1273.             fprintf(STDERR,
  1274.          "   Was %s written with the same maximum IDAT chunk size (%d bytes),",
  1275.                  inname, PNG_ZBUF_SIZE);
  1276.             fprintf(STDERR,
  1277.               "n   filtering heuristic (libpng default), compression");
  1278.             fprintf(STDERR,
  1279.               " level (zlib default),n   and zlib version (%s)?nn",
  1280.               ZLIB_VERSION);
  1281.             wrote_question = 1;
  1282.          }
  1283.          FCLOSE(fpin);
  1284.          FCLOSE(fpout);
  1285.          return (0);
  1286.       }
  1287.    }
  1288.    FCLOSE(fpin);
  1289.    FCLOSE(fpout);
  1290.    return (0);
  1291. }
  1292. /* input and output filenames */
  1293. #ifdef RISCOS
  1294. static PNG_CONST char *inname = "pngtest/png";
  1295. static PNG_CONST char *outname = "pngout/png";
  1296. #else
  1297. static PNG_CONST char *inname = "pngtest.png";
  1298. static PNG_CONST char *outname = "pngout.png";
  1299. #endif
  1300. int
  1301. main(int argc, char *argv[])
  1302. {
  1303.    int multiple = 0;
  1304.    int ierror = 0;
  1305.    fprintf(STDERR, "Testing libpng version %sn", PNG_LIBPNG_VER_STRING);
  1306.    fprintf(STDERR, "   with zlib   version %sn", ZLIB_VERSION);
  1307.    fprintf(STDERR, "%s", png_get_copyright(NULL));
  1308.    /* Show the version of libpng used in building the library */
  1309.    fprintf(STDERR, " library (%lu):%s",
  1310.       (unsigned long)png_access_version_number(),
  1311.       png_get_header_version(NULL));
  1312.    /* Show the version of libpng used in building the application */
  1313.    fprintf(STDERR, " pngtest (%lu):%s", (unsigned long)PNG_LIBPNG_VER,
  1314.       PNG_HEADER_VERSION_STRING);
  1315.    fprintf(STDERR, " sizeof(png_struct)=%ld, sizeof(png_info)=%ldn",
  1316.                     (long)png_sizeof(png_struct), (long)png_sizeof(png_info));
  1317.    /* Do some consistency checking on the memory allocation settings, I'm
  1318.       not sure this matters, but it is nice to know, the first of these
  1319.       tests should be impossible because of the way the macros are set
  1320.       in pngconf.h */
  1321. #if defined(MAXSEG_64K) && !defined(PNG_MAX_MALLOC_64K)
  1322.       fprintf(STDERR, " NOTE: Zlib compiled for max 64k, libpng notn");
  1323. #endif
  1324.    /* I think the following can happen. */
  1325. #if !defined(MAXSEG_64K) && defined(PNG_MAX_MALLOC_64K)
  1326.       fprintf(STDERR, " NOTE: libpng compiled for max 64k, zlib notn");
  1327. #endif
  1328.    if (strcmp(png_libpng_ver, PNG_LIBPNG_VER_STRING))
  1329.    {
  1330.       fprintf(STDERR,
  1331.          "Warning: versions are different between png.h and png.cn");
  1332.       fprintf(STDERR, "  png.h version: %sn", PNG_LIBPNG_VER_STRING);
  1333.       fprintf(STDERR, "  png.c version: %snn", png_libpng_ver);
  1334.       ++ierror;
  1335.    }
  1336.    if (argc > 1)
  1337.    {
  1338.       if (strcmp(argv[1], "-m") == 0)
  1339.       {
  1340.          multiple = 1;
  1341.          status_dots_requested = 0;
  1342.       }
  1343.       else if (strcmp(argv[1], "-mv") == 0 ||
  1344.                strcmp(argv[1], "-vm") == 0 )
  1345.       {
  1346.          multiple = 1;
  1347.          verbose = 1;
  1348.          status_dots_requested = 1;
  1349.       }
  1350.       else if (strcmp(argv[1], "-v") == 0)
  1351.       {
  1352.          verbose = 1;
  1353.          status_dots_requested = 1;
  1354.          inname = argv[2];
  1355.       }
  1356.       else
  1357.       {
  1358.          inname = argv[1];
  1359.          status_dots_requested = 0;
  1360.       }
  1361.    }
  1362.    if (!multiple && argc == 3 + verbose)
  1363.      outname = argv[2 + verbose];
  1364.    if ((!multiple && argc > 3 + verbose) || (multiple && argc < 2))
  1365.    {
  1366.      fprintf(STDERR,
  1367.        "usage: %s [infile.png] [outfile.png]nt%s -m {infile.png}n",
  1368.         argv[0], argv[0]);
  1369.      fprintf(STDERR,
  1370.        "  reads/writes one PNG file (without -m) or multiple files (-m)n");
  1371.      fprintf(STDERR,
  1372.        "  with -m %s is used as a temporary filen", outname);
  1373.      exit(1);
  1374.    }
  1375.    if (multiple)
  1376.    {
  1377.       int i;
  1378. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  1379.       int allocation_now = current_allocation;
  1380. #endif
  1381.       for (i=2; i<argc; ++i)
  1382.       {
  1383. #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED)
  1384.          int k;
  1385. #endif
  1386.          int kerror;
  1387.          fprintf(STDERR, "Testing %s:", argv[i]);
  1388.          kerror = test_one_file(argv[i], outname);
  1389.          if (kerror == 0)
  1390.          {
  1391. #if defined(PNG_WRITE_USER_TRANSFORM_SUPPORTED)
  1392.             fprintf(STDERR, "n PASS (%lu zero samples)n",
  1393.                (unsigned long)zero_samples);
  1394. #else
  1395.             fprintf(STDERR, " PASSn");
  1396. #endif
  1397. #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED)
  1398.             for (k = 0; k<256; k++)
  1399.                if (filters_used[k])
  1400.                   fprintf(STDERR, " Filter %d was used %lu timesn",
  1401.                      k, (unsigned long)filters_used[k]);
  1402. #endif
  1403. #if defined(PNG_TIME_RFC1123_SUPPORTED)
  1404.          if (tIME_chunk_present != 0)
  1405.             fprintf(STDERR, " tIME = %sn", tIME_string);
  1406.          tIME_chunk_present = 0;
  1407. #endif /* PNG_TIME_RFC1123_SUPPORTED */
  1408.          }
  1409.          else
  1410.          {
  1411.             fprintf(STDERR, " FAILn");
  1412.             ierror += kerror;
  1413.          }
  1414. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  1415.          if (allocation_now != current_allocation)
  1416.             fprintf(STDERR, "MEMORY ERROR: %d bytes lostn",
  1417.                current_allocation - allocation_now);
  1418.          if (current_allocation != 0)
  1419.          {
  1420.             memory_infop pinfo = pinformation;
  1421.             fprintf(STDERR, "MEMORY ERROR: %d bytes still allocatedn",
  1422.                current_allocation);
  1423.             while (pinfo != NULL)
  1424.             {
  1425.                fprintf(STDERR, " %lu bytes at %xn",
  1426.                  (unsigned long)pinfo->size,
  1427.                  (unsigned int) pinfo->pointer);
  1428.                pinfo = pinfo->next;
  1429.             }
  1430.          }
  1431. #endif
  1432.       }
  1433. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  1434.          fprintf(STDERR, " Current memory allocation: %10d bytesn",
  1435.             current_allocation);
  1436.          fprintf(STDERR, " Maximum memory allocation: %10d bytesn",
  1437.             maximum_allocation);
  1438.          fprintf(STDERR, " Total   memory allocation: %10d bytesn",
  1439.             total_allocation);
  1440.          fprintf(STDERR, "     Number of allocations: %10dn",
  1441.             num_allocations);
  1442. #endif
  1443.    }
  1444.    else
  1445.    {
  1446.       int i;
  1447.       for (i = 0; i<3; ++i)
  1448.       {
  1449.          int kerror;
  1450. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  1451.          int allocation_now = current_allocation;
  1452. #endif
  1453.          if (i == 1) status_dots_requested = 1;
  1454.          else if (verbose == 0)status_dots_requested = 0;
  1455.          if (i == 0 || verbose == 1 || ierror != 0)
  1456.             fprintf(STDERR, "Testing %s:", inname);
  1457.          kerror = test_one_file(inname, outname);
  1458.          if (kerror == 0)
  1459.          {
  1460.             if (verbose == 1 || i == 2)
  1461.             {
  1462. #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED)
  1463.                 int k;
  1464. #endif
  1465. #if defined(PNG_WRITE_USER_TRANSFORM_SUPPORTED)
  1466.                 fprintf(STDERR, "n PASS (%lu zero samples)n",
  1467.                    (unsigned long)zero_samples);
  1468. #else
  1469.                 fprintf(STDERR, " PASSn");
  1470. #endif
  1471. #if defined(PNG_READ_USER_TRANSFORM_SUPPORTED)
  1472.                 for (k = 0; k<256; k++)
  1473.                    if (filters_used[k])
  1474.                       fprintf(STDERR, " Filter %d was used %lu timesn",
  1475.                          k,
  1476.                          (unsigned long)filters_used[k]);
  1477. #endif
  1478. #if defined(PNG_TIME_RFC1123_SUPPORTED)
  1479.              if (tIME_chunk_present != 0)
  1480.                 fprintf(STDERR, " tIME = %sn", tIME_string);
  1481. #endif /* PNG_TIME_RFC1123_SUPPORTED */
  1482.             }
  1483.          }
  1484.          else
  1485.          {
  1486.             if (verbose == 0 && i != 2)
  1487.                fprintf(STDERR, "Testing %s:", inname);
  1488.             fprintf(STDERR, " FAILn");
  1489.             ierror += kerror;
  1490.          }
  1491. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  1492.          if (allocation_now != current_allocation)
  1493.              fprintf(STDERR, "MEMORY ERROR: %d bytes lostn",
  1494.                current_allocation - allocation_now);
  1495.          if (current_allocation != 0)
  1496.          {
  1497.              memory_infop pinfo = pinformation;
  1498.              fprintf(STDERR, "MEMORY ERROR: %d bytes still allocatedn",
  1499.                 current_allocation);
  1500.              while (pinfo != NULL)
  1501.              {
  1502.                 fprintf(STDERR, " %lu bytes at %xn",
  1503.                    (unsigned long)pinfo->size, (unsigned int)pinfo->pointer);
  1504.                 pinfo = pinfo->next;
  1505.              }
  1506.           }
  1507. #endif
  1508.        }
  1509. #if defined(PNG_USER_MEM_SUPPORTED) && PNG_DEBUG
  1510.        fprintf(STDERR, " Current memory allocation: %10d bytesn",
  1511.           current_allocation);
  1512.        fprintf(STDERR, " Maximum memory allocation: %10d bytesn",
  1513.           maximum_allocation);
  1514.        fprintf(STDERR, " Total   memory allocation: %10d bytesn",
  1515.           total_allocation);
  1516.        fprintf(STDERR, "     Number of allocations: %10dn",
  1517.             num_allocations);
  1518. #endif
  1519.    }
  1520. #ifdef PNGTEST_TIMING
  1521.    t_stop = (float)clock();
  1522.    t_misc += (t_stop - t_start);
  1523.    t_start = t_stop;
  1524.    fprintf(STDERR, " CPU time used = %.3f seconds",
  1525.       (t_misc+t_decode+t_encode)/(float)CLOCKS_PER_SEC);
  1526.    fprintf(STDERR, " (decoding %.3f,n",
  1527.       t_decode/(float)CLOCKS_PER_SEC);
  1528.    fprintf(STDERR, "        encoding %.3f ,",
  1529.       t_encode/(float)CLOCKS_PER_SEC);
  1530.    fprintf(STDERR, " other %.3f seconds)nn",
  1531.       t_misc/(float)CLOCKS_PER_SEC);
  1532. #endif
  1533.    if (ierror == 0)
  1534.       fprintf(STDERR, "libpng passes testn");
  1535.    else
  1536.       fprintf(STDERR, "libpng FAILS testn");
  1537.    return (int)(ierror != 0);
  1538. }
  1539. /* Generate a compiler error if there is an old png.h in the search path. */
  1540. typedef version_1_2_34 your_png_h_is_not_version_1_2_34;