Home | History | Annotate | Download | only in gregbook
      1 /*---------------------------------------------------------------------------
      2 
      3    rpng2 - progressive-model PNG display program                 readpng2.c
      4 
      5   ---------------------------------------------------------------------------
      6 
      7       Copyright (c) 1998-2007 Greg Roelofs.  All rights reserved.
      8 
      9       This software is provided "as is," without warranty of any kind,
     10       express or implied.  In no event shall the author or contributors
     11       be held liable for any damages arising in any way from the use of
     12       this software.
     13 
     14       The contents of this file are DUAL-LICENSED.  You may modify and/or
     15       redistribute this software according to the terms of one of the
     16       following two licenses (at your option):
     17 
     18 
     19       LICENSE 1 ("BSD-like with advertising clause"):
     20 
     21       Permission is granted to anyone to use this software for any purpose,
     22       including commercial applications, and to alter it and redistribute
     23       it freely, subject to the following restrictions:
     24 
     25       1. Redistributions of source code must retain the above copyright
     26          notice, disclaimer, and this list of conditions.
     27       2. Redistributions in binary form must reproduce the above copyright
     28          notice, disclaimer, and this list of conditions in the documenta-
     29          tion and/or other materials provided with the distribution.
     30       3. All advertising materials mentioning features or use of this
     31          software must display the following acknowledgment:
     32 
     33             This product includes software developed by Greg Roelofs
     34             and contributors for the book, "PNG: The Definitive Guide,"
     35             published by O'Reilly and Associates.
     36 
     37 
     38       LICENSE 2 (GNU GPL v2 or later):
     39 
     40       This program is free software; you can redistribute it and/or modify
     41       it under the terms of the GNU General Public License as published by
     42       the Free Software Foundation; either version 2 of the License, or
     43       (at your option) any later version.
     44 
     45       This program is distributed in the hope that it will be useful,
     46       but WITHOUT ANY WARRANTY; without even the implied warranty of
     47       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     48       GNU General Public License for more details.
     49 
     50       You should have received a copy of the GNU General Public License
     51       along with this program; if not, write to the Free Software Foundation,
     52       Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
     53 
     54   ---------------------------------------------------------------------------*/
     55 
     56 
     57 #include <stdlib.h>     /* for exit() prototype */
     58 
     59 #include "png.h"        /* libpng header; includes zlib.h and setjmp.h */
     60 #include "readpng2.h"   /* typedefs, common macros, public prototypes */
     61 
     62 
     63 /* local prototypes */
     64 
     65 static void readpng2_info_callback(png_structp png_ptr, png_infop info_ptr);
     66 static void readpng2_row_callback(png_structp png_ptr, png_bytep new_row,
     67                                  png_uint_32 row_num, int pass);
     68 static void readpng2_end_callback(png_structp png_ptr, png_infop info_ptr);
     69 static void readpng2_error_handler(png_structp png_ptr, png_const_charp msg);
     70 
     71 
     72 
     73 
     74 void readpng2_version_info(void)
     75 {
     76 #if defined(PNG_ASSEMBLER_CODE_SUPPORTED) && \
     77     (defined(__i386__) || defined(_M_IX86) || defined(__x86_64__)) && \
     78     defined(PNG_LIBPNG_VER) && (PNG_LIBPNG_VER >= 10200)
     79     /*
     80      * WARNING:  This preprocessor approach means that the following code
     81      *           cannot be used with a libpng DLL older than 1.2.0--the
     82      *           compiled-in symbols for the new functions will not exist.
     83      *           (Could use dlopen() and dlsym() on Unix and corresponding
     84      *           calls for Windows, but not portable...)
     85      */
     86     {
     87         int mmxsupport = png_mmx_support();
     88         if (mmxsupport < 0)
     89             fprintf(stderr, "   Compiled with libpng %s; using libpng %s "
     90               "without MMX support.\n", PNG_LIBPNG_VER_STRING, png_libpng_ver);
     91         else {
     92             int compilerID;
     93             png_uint_32 mmx_mask = png_get_mmx_flagmask(
     94               PNG_SELECT_READ | PNG_SELECT_WRITE, &compilerID);
     95 
     96             fprintf(stderr, "   Compiled with libpng %s; using libpng %s "
     97               "with MMX support\n   (%s version).", PNG_LIBPNG_VER_STRING,
     98               png_libpng_ver, compilerID == 1? "MSVC++" :
     99               (compilerID == 2? "GNU C" : "unknown"));
    100             fprintf(stderr, "  Processor (x86%s) %s MMX instructions.\n",
    101 #if defined(__x86_64__)
    102               "_64",
    103 #else
    104               "",
    105 #endif
    106               mmxsupport? "supports" : "does not support");
    107             if (mmxsupport > 0) {
    108                 int num_optims = 0;
    109 
    110                 fprintf(stderr,
    111                   "      Potential MMX optimizations supported by libpng:\n");
    112                 if (mmx_mask & PNG_ASM_FLAG_MMX_READ_FILTER_SUB)
    113                     ++num_optims;
    114                 if (mmx_mask & PNG_ASM_FLAG_MMX_READ_FILTER_UP)
    115                     ++num_optims;
    116                 if (mmx_mask & PNG_ASM_FLAG_MMX_READ_FILTER_AVG)
    117                     ++num_optims;
    118                 if (mmx_mask & PNG_ASM_FLAG_MMX_READ_FILTER_PAETH)
    119                     ++num_optims;
    120                 if (num_optims)
    121                     fprintf(stderr,
    122                       "         decoding %s row filters (reading)\n",
    123                       (num_optims == 4)? "all non-trivial" : "some");
    124                 if (mmx_mask & PNG_ASM_FLAG_MMX_READ_COMBINE_ROW) {
    125                     fprintf(stderr, "         combining rows (reading)\n");
    126                     ++num_optims;
    127                 }
    128                 if (mmx_mask & PNG_ASM_FLAG_MMX_READ_INTERLACE) {
    129                     fprintf(stderr,
    130                       "         expanding interlacing (reading)\n");
    131                     ++num_optims;
    132                 }
    133                 mmx_mask &= ~( PNG_ASM_FLAG_MMX_READ_COMBINE_ROW  \
    134                              | PNG_ASM_FLAG_MMX_READ_INTERLACE    \
    135                              | PNG_ASM_FLAG_MMX_READ_FILTER_SUB   \
    136                              | PNG_ASM_FLAG_MMX_READ_FILTER_UP    \
    137                              | PNG_ASM_FLAG_MMX_READ_FILTER_AVG   \
    138                              | PNG_ASM_FLAG_MMX_READ_FILTER_PAETH );
    139                 if (mmx_mask) {
    140                     fprintf(stderr, "         other (unknown)\n");
    141                     ++num_optims;
    142                 }
    143                 if (num_optims == 0)
    144                     fprintf(stderr, "         (none)\n");
    145             }
    146         }
    147     }
    148 #else
    149     fprintf(stderr, "   Compiled with libpng %s; using libpng %s "
    150       "without MMX support.\n", PNG_LIBPNG_VER_STRING, png_libpng_ver);
    151 #endif
    152 
    153     fprintf(stderr, "   Compiled with zlib %s; using zlib %s.\n",
    154       ZLIB_VERSION, zlib_version);
    155 }
    156 
    157 
    158 
    159 
    160 int readpng2_check_sig(uch *sig, int num)
    161 {
    162     return !png_sig_cmp(sig, 0, num);
    163 }
    164 
    165 
    166 
    167 
    168 /* returns 0 for success, 2 for libpng problem, 4 for out of memory */
    169 
    170 int readpng2_init(mainprog_info *mainprog_ptr)
    171 {
    172     png_structp  png_ptr;       /* note:  temporary variables! */
    173     png_infop  info_ptr;
    174 
    175 
    176     /* could also replace libpng warning-handler (final NULL), but no need: */
    177 
    178     png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, mainprog_ptr,
    179       readpng2_error_handler, NULL);
    180     if (!png_ptr)
    181         return 4;   /* out of memory */
    182 
    183     info_ptr = png_create_info_struct(png_ptr);
    184     if (!info_ptr) {
    185         png_destroy_read_struct(&png_ptr, NULL, NULL);
    186         return 4;   /* out of memory */
    187     }
    188 
    189 
    190     /* we could create a second info struct here (end_info), but it's only
    191      * useful if we want to keep pre- and post-IDAT chunk info separated
    192      * (mainly for PNG-aware image editors and converters) */
    193 
    194 
    195     /* setjmp() must be called in every function that calls a PNG-reading
    196      * libpng function, unless an alternate error handler was installed--
    197      * but compatible error handlers must either use longjmp() themselves
    198      * (as in this program) or exit immediately, so here we are: */
    199 
    200     if (setjmp(mainprog_ptr->jmpbuf)) {
    201         png_destroy_read_struct(&png_ptr, &info_ptr, NULL);
    202         return 2;
    203     }
    204 
    205 
    206 #ifdef PNG_UNKNOWN_CHUNKS_SUPPORTED
    207     /* prepare the reader to ignore all recognized chunks whose data won't be
    208      * used, i.e., all chunks recognized by libpng except for IHDR, PLTE, IDAT,
    209      * IEND, tRNS, bKGD, gAMA, and sRGB (small performance improvement) */
    210     {
    211         /* These byte strings were copied from png.h.  If a future libpng
    212          * version recognizes more chunks, add them to this list.  If a
    213          * future version of readpng2.c recognizes more chunks, delete them
    214          * from this list. */
    215         static const png_byte chunks_to_ignore[] = {
    216              99,  72,  82,  77, '\0',  /* cHRM */
    217             104,  73,  83,  84, '\0',  /* hIST */
    218             105,  67,  67,  80, '\0',  /* iCCP */
    219             105,  84,  88, 116, '\0',  /* iTXt */
    220             111,  70,  70, 115, '\0',  /* oFFs */
    221             112,  67,  65,  76, '\0',  /* pCAL */
    222             112,  72,  89, 115, '\0',  /* pHYs */
    223             115,  66,  73,  84, '\0',  /* sBIT */
    224             115,  67,  65,  76, '\0',  /* sCAL */
    225             115,  80,  76,  84, '\0',  /* sPLT */
    226             115,  84,  69,  82, '\0',  /* sTER */
    227             116,  69,  88, 116, '\0',  /* tEXt */
    228             116,  73,  77,  69, '\0',  /* tIME */
    229             122,  84,  88, 116, '\0'   /* zTXt */
    230         };
    231 
    232         png_set_keep_unknown_chunks(png_ptr, 1 /* PNG_HANDLE_CHUNK_NEVER */,
    233           chunks_to_ignore, sizeof(chunks_to_ignore)/5);
    234     }
    235 #endif /* PNG_UNKNOWN_CHUNKS_SUPPORTED */
    236 
    237 
    238     /* instead of doing png_init_io() here, now we set up our callback
    239      * functions for progressive decoding */
    240 
    241     png_set_progressive_read_fn(png_ptr, mainprog_ptr,
    242       readpng2_info_callback, readpng2_row_callback, readpng2_end_callback);
    243 
    244 
    245     /*
    246      * may as well enable or disable MMX routines here, if supported;
    247      *
    248      * to enable all:  mask = png_get_mmx_flagmask (
    249      *                   PNG_SELECT_READ | PNG_SELECT_WRITE, &compilerID);
    250      *                 flags = png_get_asm_flags (png_ptr);
    251      *                 flags |= mask;
    252      *                 png_set_asm_flags (png_ptr, flags);
    253      *
    254      * to disable all:  mask = png_get_mmx_flagmask (
    255      *                   PNG_SELECT_READ | PNG_SELECT_WRITE, &compilerID);
    256      *                  flags = png_get_asm_flags (png_ptr);
    257      *                  flags &= ~mask;
    258      *                  png_set_asm_flags (png_ptr, flags);
    259      */
    260 
    261 #if (defined(__i386__) || defined(_M_IX86) || defined(__x86_64__)) && \
    262     defined(PNG_LIBPNG_VER) && (PNG_LIBPNG_VER >= 10200)
    263     /*
    264      * WARNING:  This preprocessor approach means that the following code
    265      *           cannot be used with a libpng DLL older than 1.2.0--the
    266      *           compiled-in symbols for the new functions will not exist.
    267      *           (Could use dlopen() and dlsym() on Unix and corresponding
    268      *           calls for Windows, but not portable...)
    269      */
    270     {
    271 #ifdef PNG_ASSEMBLER_CODE_SUPPORTED
    272         png_uint_32 mmx_disable_mask = 0;
    273         png_uint_32 asm_flags, mmx_mask;
    274         int compilerID;
    275 
    276         if (mainprog_ptr->nommxfilters)
    277             mmx_disable_mask |= ( PNG_ASM_FLAG_MMX_READ_FILTER_SUB   \
    278                                 | PNG_ASM_FLAG_MMX_READ_FILTER_UP    \
    279                                 | PNG_ASM_FLAG_MMX_READ_FILTER_AVG   \
    280                                 | PNG_ASM_FLAG_MMX_READ_FILTER_PAETH );
    281         if (mainprog_ptr->nommxcombine)
    282             mmx_disable_mask |= PNG_ASM_FLAG_MMX_READ_COMBINE_ROW;
    283         if (mainprog_ptr->nommxinterlace)
    284             mmx_disable_mask |= PNG_ASM_FLAG_MMX_READ_INTERLACE;
    285         asm_flags = png_get_asm_flags(png_ptr);
    286         png_set_asm_flags(png_ptr, asm_flags & ~mmx_disable_mask);
    287 
    288 
    289         /* Now query libpng's asm settings, just for yuks.  Note that this
    290          * differs from the querying of its *potential* MMX capabilities
    291          * in readpng2_version_info(); this is true runtime verification. */
    292 
    293         asm_flags = png_get_asm_flags(png_ptr);
    294         mmx_mask = png_get_mmx_flagmask(PNG_SELECT_READ | PNG_SELECT_WRITE,
    295           &compilerID);
    296         if (asm_flags & PNG_ASM_FLAG_MMX_SUPPORT_COMPILED)
    297             fprintf(stderr,
    298               "  MMX support (%s version) is compiled into libpng\n",
    299               compilerID == 1? "MSVC++" :
    300               (compilerID == 2? "GNU C" : "unknown"));
    301         else
    302             fprintf(stderr, "  MMX support is not compiled into libpng\n");
    303         fprintf(stderr, "  MMX instructions are %ssupported by CPU\n",
    304           (asm_flags & PNG_ASM_FLAG_MMX_SUPPORT_IN_CPU)? "" : "not ");
    305         fprintf(stderr, "  MMX read support for combining rows is %sabled\n",
    306           (asm_flags & PNG_ASM_FLAG_MMX_READ_COMBINE_ROW)? "en" : "dis");
    307         fprintf(stderr,
    308           "  MMX read support for expanding interlacing is %sabled\n",
    309           (asm_flags & PNG_ASM_FLAG_MMX_READ_INTERLACE)? "en" : "dis");
    310         fprintf(stderr, "  MMX read support for \"sub\" filter is %sabled\n",
    311           (asm_flags & PNG_ASM_FLAG_MMX_READ_FILTER_SUB)? "en" : "dis");
    312         fprintf(stderr, "  MMX read support for \"up\" filter is %sabled\n",
    313           (asm_flags & PNG_ASM_FLAG_MMX_READ_FILTER_UP)? "en" : "dis");
    314         fprintf(stderr, "  MMX read support for \"avg\" filter is %sabled\n",
    315           (asm_flags & PNG_ASM_FLAG_MMX_READ_FILTER_AVG)? "en" : "dis");
    316         fprintf(stderr, "  MMX read support for \"Paeth\" filter is %sabled\n",
    317           (asm_flags & PNG_ASM_FLAG_MMX_READ_FILTER_PAETH)? "en" : "dis");
    318         asm_flags &= (mmx_mask & ~( PNG_ASM_FLAG_MMX_READ_COMBINE_ROW  \
    319                                   | PNG_ASM_FLAG_MMX_READ_INTERLACE    \
    320                                   | PNG_ASM_FLAG_MMX_READ_FILTER_SUB   \
    321                                   | PNG_ASM_FLAG_MMX_READ_FILTER_UP    \
    322                                   | PNG_ASM_FLAG_MMX_READ_FILTER_AVG   \
    323                                   | PNG_ASM_FLAG_MMX_READ_FILTER_PAETH ));
    324         if (asm_flags)
    325             fprintf(stderr,
    326               "  additional MMX support is also enabled (0x%02lx)\n",
    327               asm_flags);
    328 #else  /* !PNG_ASSEMBLER_CODE_SUPPORTED */
    329         fprintf(stderr, "  MMX querying is disabled in libpng.\n");
    330 #endif /* ?PNG_ASSEMBLER_CODE_SUPPORTED */
    331     }
    332 #endif
    333 
    334 
    335     /* make sure we save our pointers for use in readpng2_decode_data() */
    336 
    337     mainprog_ptr->png_ptr = png_ptr;
    338     mainprog_ptr->info_ptr = info_ptr;
    339 
    340 
    341     /* and that's all there is to initialization */
    342 
    343     return 0;
    344 }
    345 
    346 
    347 
    348 
    349 /* returns 0 for success, 2 for libpng (longjmp) problem */
    350 
    351 int readpng2_decode_data(mainprog_info *mainprog_ptr, uch *rawbuf, ulg length)
    352 {
    353     png_structp png_ptr = (png_structp)mainprog_ptr->png_ptr;
    354     png_infop info_ptr = (png_infop)mainprog_ptr->info_ptr;
    355 
    356 
    357     /* setjmp() must be called in every function that calls a PNG-reading
    358      * libpng function */
    359 
    360     if (setjmp(mainprog_ptr->jmpbuf)) {
    361         png_destroy_read_struct(&png_ptr, &info_ptr, NULL);
    362         mainprog_ptr->png_ptr = NULL;
    363         mainprog_ptr->info_ptr = NULL;
    364         return 2;
    365     }
    366 
    367 
    368     /* hand off the next chunk of input data to libpng for decoding */
    369 
    370     png_process_data(png_ptr, info_ptr, rawbuf, length);
    371 
    372     return 0;
    373 }
    374 
    375 
    376 
    377 
    378 static void readpng2_info_callback(png_structp png_ptr, png_infop info_ptr)
    379 {
    380     mainprog_info  *mainprog_ptr;
    381     int  color_type, bit_depth;
    382     png_uint_32 width, height;
    383     double  gamma;
    384 
    385 
    386     /* setjmp() doesn't make sense here, because we'd either have to exit(),
    387      * longjmp() ourselves, or return control to libpng, which doesn't want
    388      * to see us again.  By not doing anything here, libpng will instead jump
    389      * to readpng2_decode_data(), which can return an error value to the main
    390      * program. */
    391 
    392 
    393     /* retrieve the pointer to our special-purpose struct, using the png_ptr
    394      * that libpng passed back to us (i.e., not a global this time--there's
    395      * no real difference for a single image, but for a multithreaded browser
    396      * decoding several PNG images at the same time, one needs to avoid mixing
    397      * up different images' structs) */
    398 
    399     mainprog_ptr = png_get_progressive_ptr(png_ptr);
    400 
    401     if (mainprog_ptr == NULL) {         /* we be hosed */
    402         fprintf(stderr,
    403           "readpng2 error:  main struct not recoverable in info_callback.\n");
    404         fflush(stderr);
    405         return;
    406         /*
    407          * Alternatively, we could call our error-handler just like libpng
    408          * does, which would effectively terminate the program.  Since this
    409          * can only happen if png_ptr gets redirected somewhere odd or the
    410          * main PNG struct gets wiped, we're probably toast anyway.  (If
    411          * png_ptr itself is NULL, we would not have been called.)
    412          */
    413     }
    414 
    415 
    416     /* this is just like in the non-progressive case */
    417 
    418     png_get_IHDR(png_ptr, info_ptr, &width, &height, &bit_depth, &color_type,
    419        NULL, NULL, NULL);
    420     mainprog_ptr->width = (ulg)width;
    421     mainprog_ptr->height = (ulg)height;
    422 
    423 
    424     /* since we know we've read all of the PNG file's "header" (i.e., up
    425      * to IDAT), we can check for a background color here */
    426 
    427     if (mainprog_ptr->need_bgcolor &&
    428         png_get_valid(png_ptr, info_ptr, PNG_INFO_bKGD))
    429     {
    430         png_color_16p pBackground;
    431 
    432         /* it is not obvious from the libpng documentation, but this function
    433          * takes a pointer to a pointer, and it always returns valid red,
    434          * green and blue values, regardless of color_type: */
    435         png_get_bKGD(png_ptr, info_ptr, &pBackground);
    436 
    437         /* however, it always returns the raw bKGD data, regardless of any
    438          * bit-depth transformations, so check depth and adjust if necessary */
    439         if (bit_depth == 16) {
    440             mainprog_ptr->bg_red   = pBackground->red   >> 8;
    441             mainprog_ptr->bg_green = pBackground->green >> 8;
    442             mainprog_ptr->bg_blue  = pBackground->blue  >> 8;
    443         } else if (color_type == PNG_COLOR_TYPE_GRAY && bit_depth < 8) {
    444             if (bit_depth == 1)
    445                 mainprog_ptr->bg_red = mainprog_ptr->bg_green =
    446                   mainprog_ptr->bg_blue = pBackground->gray? 255 : 0;
    447             else if (bit_depth == 2)
    448                 mainprog_ptr->bg_red = mainprog_ptr->bg_green =
    449                   mainprog_ptr->bg_blue = (255/3) * pBackground->gray;
    450             else /* bit_depth == 4 */
    451                 mainprog_ptr->bg_red = mainprog_ptr->bg_green =
    452                   mainprog_ptr->bg_blue = (255/15) * pBackground->gray;
    453         } else {
    454             mainprog_ptr->bg_red   = (uch)pBackground->red;
    455             mainprog_ptr->bg_green = (uch)pBackground->green;
    456             mainprog_ptr->bg_blue  = (uch)pBackground->blue;
    457         }
    458     }
    459 
    460 
    461     /* as before, let libpng expand palette images to RGB, low-bit-depth
    462      * grayscale images to 8 bits, transparency chunks to full alpha channel;
    463      * strip 16-bit-per-sample images to 8 bits per sample; and convert
    464      * grayscale to RGB[A] */
    465 
    466     if (color_type == PNG_COLOR_TYPE_PALETTE)
    467         png_set_expand(png_ptr);
    468     if (color_type == PNG_COLOR_TYPE_GRAY && bit_depth < 8)
    469         png_set_expand(png_ptr);
    470     if (png_get_valid(png_ptr, info_ptr, PNG_INFO_tRNS))
    471         png_set_expand(png_ptr);
    472     if (bit_depth == 16)
    473         png_set_strip_16(png_ptr);
    474     if (color_type == PNG_COLOR_TYPE_GRAY ||
    475         color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
    476         png_set_gray_to_rgb(png_ptr);
    477 
    478 
    479     /* Unlike the basic viewer, which was designed to operate on local files,
    480      * this program is intended to simulate a web browser--even though we
    481      * actually read from a local file, too.  But because we are pretending
    482      * that most of the images originate on the Internet, we follow the recom-
    483      * mendation of the sRGB proposal and treat unlabelled images (no gAMA
    484      * chunk) as existing in the sRGB color space.  That is, we assume that
    485      * such images have a file gamma of 0.45455, which corresponds to a PC-like
    486      * display system.  This change in assumptions will have no effect on a
    487      * PC-like system, but on a Mac, SGI, NeXT or other system with a non-
    488      * identity lookup table, it will darken unlabelled images, which effec-
    489      * tively favors images from PC-like systems over those originating on
    490      * the local platform.  Note that mainprog_ptr->display_exponent is the
    491      * "gamma" value for the entire display system, i.e., the product of
    492      * LUT_exponent and CRT_exponent. */
    493 
    494     if (png_get_gAMA(png_ptr, info_ptr, &gamma))
    495         png_set_gamma(png_ptr, mainprog_ptr->display_exponent, gamma);
    496     else
    497         png_set_gamma(png_ptr, mainprog_ptr->display_exponent, 0.45455);
    498 
    499 
    500     /* we'll let libpng expand interlaced images, too */
    501 
    502     mainprog_ptr->passes = png_set_interlace_handling(png_ptr);
    503 
    504 
    505     /* all transformations have been registered; now update info_ptr data and
    506      * then get rowbytes and channels */
    507 
    508     png_read_update_info(png_ptr, info_ptr);
    509 
    510     mainprog_ptr->rowbytes = (int)png_get_rowbytes(png_ptr, info_ptr);
    511     mainprog_ptr->channels = png_get_channels(png_ptr, info_ptr);
    512 
    513 
    514     /* Call the main program to allocate memory for the image buffer and
    515      * initialize windows and whatnot.  (The old-style function-pointer
    516      * invocation is used for compatibility with a few supposedly ANSI
    517      * compilers that nevertheless barf on "fn_ptr()"-style syntax.) */
    518 
    519     (*mainprog_ptr->mainprog_init)();
    520 
    521 
    522     /* and that takes care of initialization */
    523 
    524     return;
    525 }
    526 
    527 
    528 
    529 
    530 
    531 static void readpng2_row_callback(png_structp png_ptr, png_bytep new_row,
    532                                   png_uint_32 row_num, int pass)
    533 {
    534     mainprog_info  *mainprog_ptr;
    535 
    536 
    537     /* first check whether the row differs from the previous pass; if not,
    538      * nothing to combine or display */
    539 
    540     if (!new_row)
    541         return;
    542 
    543 
    544     /* retrieve the pointer to our special-purpose struct so we can access
    545      * the old rows and image-display callback function */
    546 
    547     mainprog_ptr = png_get_progressive_ptr(png_ptr);
    548 
    549 
    550     /* save the pass number for optional use by the front end */
    551 
    552     mainprog_ptr->pass = pass;
    553 
    554 
    555     /* have libpng either combine the new row data with the existing row data
    556      * from previous passes (if interlaced) or else just copy the new row
    557      * into the main program's image buffer */
    558 
    559     png_progressive_combine_row(png_ptr, mainprog_ptr->row_pointers[row_num],
    560       new_row);
    561 
    562 
    563     /* finally, call the display routine in the main program with the number
    564      * of the row we just updated */
    565 
    566     (*mainprog_ptr->mainprog_display_row)(row_num);
    567 
    568 
    569     /* and we're ready for more */
    570 
    571     return;
    572 }
    573 
    574 
    575 
    576 
    577 
    578 static void readpng2_end_callback(png_structp png_ptr, png_infop info_ptr)
    579 {
    580     mainprog_info  *mainprog_ptr;
    581 
    582 
    583     /* retrieve the pointer to our special-purpose struct */
    584 
    585     mainprog_ptr = png_get_progressive_ptr(png_ptr);
    586 
    587 
    588     /* let the main program know that it should flush any buffered image
    589      * data to the display now and set a "done" flag or whatever, but note
    590      * that it SHOULD NOT DESTROY THE PNG STRUCTS YET--in other words, do
    591      * NOT call readpng2_cleanup() either here or in the finish_display()
    592      * routine; wait until control returns to the main program via
    593      * readpng2_decode_data() */
    594 
    595     (*mainprog_ptr->mainprog_finish_display)();
    596 
    597 
    598     /* all done */
    599 
    600     return;
    601 }
    602 
    603 
    604 
    605 
    606 
    607 void readpng2_cleanup(mainprog_info *mainprog_ptr)
    608 {
    609     png_structp png_ptr = (png_structp)mainprog_ptr->png_ptr;
    610     png_infop info_ptr = (png_infop)mainprog_ptr->info_ptr;
    611 
    612     if (png_ptr && info_ptr)
    613         png_destroy_read_struct(&png_ptr, &info_ptr, NULL);
    614 
    615     mainprog_ptr->png_ptr = NULL;
    616     mainprog_ptr->info_ptr = NULL;
    617 }
    618 
    619 
    620 
    621 
    622 
    623 static void readpng2_error_handler(png_structp png_ptr, png_const_charp msg)
    624 {
    625     mainprog_info  *mainprog_ptr;
    626 
    627     /* This function, aside from the extra step of retrieving the "error
    628      * pointer" (below) and the fact that it exists within the application
    629      * rather than within libpng, is essentially identical to libpng's
    630      * default error handler.  The second point is critical:  since both
    631      * setjmp() and longjmp() are called from the same code, they are
    632      * guaranteed to have compatible notions of how big a jmp_buf is,
    633      * regardless of whether _BSD_SOURCE or anything else has (or has not)
    634      * been defined. */
    635 
    636     fprintf(stderr, "readpng2 libpng error: %s\n", msg);
    637     fflush(stderr);
    638 
    639     mainprog_ptr = png_get_error_ptr(png_ptr);
    640     if (mainprog_ptr == NULL) {         /* we are completely hosed now */
    641         fprintf(stderr,
    642           "readpng2 severe error:  jmpbuf not recoverable; terminating.\n");
    643         fflush(stderr);
    644         exit(99);
    645     }
    646 
    647     longjmp(mainprog_ptr->jmpbuf, 1);
    648 }
    649