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