开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 界面编程 > 查看源码
pngwrite.c
资源名称：profuis288_freeware.zip　[点击查看]
上传用户：sesekoo
上传日期：2020-07-18
资源大小：21543k
文件大小：50k
源码类别：

界面编程

开发平台：

Visual C++

pngwrite.c：源码内容
  2. /* pngwrite.c - general routines to write a PNG file
  3.  *
  4.  * Last changed in libpng 1.2.31 [August 19, 2008]
  5.  * For conditions of distribution and use, see copyright notice in png.h
  6.  * Copyright (c) 1998-2008 Glenn Randers-Pehrson
  7.  * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
  8.  * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
  9.  */
  11. #if ( ! defined _CRT_SECURE_NO_WARNINGS )
  12. #define _CRT_SECURE_NO_WARNINGS
  13. #endif
  15. /* get internal access to png.h */
  16. #define PNG_INTERNAL
  17. #include "png.h"
  18. #ifdef PNG_WRITE_SUPPORTED
  20. /* Writes all the PNG information.  This is the suggested way to use the
  21.  * library.  If you have a new chunk to add, make a function to write it,
  22.  * and put it in the correct location here.  If you want the chunk written
  23.  * after the image data, put it in png_write_end().  I strongly encourage
  24.  * you to supply a PNG_INFO_ flag, and check info_ptr->valid before writing
  25.  * the chunk, as that will keep the code from breaking if you want to just
  26.  * write a plain PNG file.  If you have long comments, I suggest writing
  27.  * them in png_write_end(), and compressing them.
  28.  */
  29. void PNGAPI
  30. png_write_info_before_PLTE(png_structp png_ptr, png_infop info_ptr)
  31. {
  32.    png_debug(1, "in png_write_info_before_PLTE");
  33.    if (png_ptr == NULL || info_ptr == NULL)
  34.       return;
  35.    if (!(png_ptr->mode & PNG_WROTE_INFO_BEFORE_PLTE))
  36.    {
  37.    png_write_sig(png_ptr); /* write PNG signature */
  38. #if defined(PNG_MNG_FEATURES_SUPPORTED)
  39.    if ((png_ptr->mode&PNG_HAVE_PNG_SIGNATURE)&&(png_ptr->mng_features_permitted))
  40.    {
  41.       png_warning(png_ptr, "MNG features are not allowed in a PNG datastream");
  42.       png_ptr->mng_features_permitted=0;
  43.    }
  44. #endif
  45.    /* write IHDR information. */
  46.    png_write_IHDR(png_ptr, info_ptr->width, info_ptr->height,
  47.       info_ptr->bit_depth, info_ptr->color_type, info_ptr->compression_type,
  48.       info_ptr->filter_type,
  49. #if defined(PNG_WRITE_INTERLACING_SUPPORTED)
  50.       info_ptr->interlace_type);
  51. #else
  52.       0);
  53. #endif
  54.    /* the rest of these check to see if the valid field has the appropriate
  55.       flag set, and if it does, writes the chunk. */
  56. #if defined(PNG_WRITE_gAMA_SUPPORTED)
  57.    if (info_ptr->valid & PNG_INFO_gAMA)
  58.    {
  59. #  ifdef PNG_FLOATING_POINT_SUPPORTED
  60.       png_write_gAMA(png_ptr, info_ptr->gamma);
  61. #else
  62. #ifdef PNG_FIXED_POINT_SUPPORTED
  63.       png_write_gAMA_fixed(png_ptr, info_ptr->int_gamma);
  64. #  endif
  65. #endif
  66.    }
  67. #endif
  68. #if defined(PNG_WRITE_sRGB_SUPPORTED)
  69.    if (info_ptr->valid & PNG_INFO_sRGB)
  70.       png_write_sRGB(png_ptr, (int)info_ptr->srgb_intent);
  71. #endif
  72. #if defined(PNG_WRITE_iCCP_SUPPORTED)
  73.    if (info_ptr->valid & PNG_INFO_iCCP)
  74.       png_write_iCCP(png_ptr, info_ptr->iccp_name, PNG_COMPRESSION_TYPE_BASE,
  75.                      info_ptr->iccp_profile, (int)info_ptr->iccp_proflen);
  76. #endif
  77. #if defined(PNG_WRITE_sBIT_SUPPORTED)
  78.    if (info_ptr->valid & PNG_INFO_sBIT)
  79.       png_write_sBIT(png_ptr, &(info_ptr->sig_bit), info_ptr->color_type);
  80. #endif
  81. #if defined(PNG_WRITE_cHRM_SUPPORTED)
  82.    if (info_ptr->valid & PNG_INFO_cHRM)
  83.    {
  84. #ifdef PNG_FLOATING_POINT_SUPPORTED
  85.       png_write_cHRM(png_ptr,
  86.          info_ptr->x_white, info_ptr->y_white,
  87.          info_ptr->x_red, info_ptr->y_red,
  88.          info_ptr->x_green, info_ptr->y_green,
  89.          info_ptr->x_blue, info_ptr->y_blue);
  90. #else
  91. #  ifdef PNG_FIXED_POINT_SUPPORTED
  92.       png_write_cHRM_fixed(png_ptr,
  93.          info_ptr->int_x_white, info_ptr->int_y_white,
  94.          info_ptr->int_x_red, info_ptr->int_y_red,
  95.          info_ptr->int_x_green, info_ptr->int_y_green,
  96.          info_ptr->int_x_blue, info_ptr->int_y_blue);
  97. #  endif
  98. #endif
  99.    }
  100. #endif
  101. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  102.    if (info_ptr->unknown_chunks_num)
  103.    {
  104.        png_unknown_chunk *up;
  106.        png_debug(5, "writing extra chunks");
  108.        for (up = info_ptr->unknown_chunks;
  109.             up < info_ptr->unknown_chunks + info_ptr->unknown_chunks_num;
  110.             up++)
  111.        {
  112.          int keep=png_handle_as_unknown(png_ptr, up->name);
  113.          if (keep != PNG_HANDLE_CHUNK_NEVER &&
  114.             up->location && !(up->location & PNG_HAVE_PLTE) &&
  115.             !(up->location & PNG_HAVE_IDAT) &&
  116.             ((up->name[3] & 0x20) || keep == PNG_HANDLE_CHUNK_ALWAYS ||
  117.             (png_ptr->flags & PNG_FLAG_KEEP_UNSAFE_CHUNKS)))
  118.          {
  119.             if (up->size == 0)
  120.                png_warning(png_ptr, "Writing zero-length unknown chunk");
  121.             png_write_chunk(png_ptr, up->name, up->data, up->size);
  122.          }
  123.        }
  124.    }
  125. #endif
  126.       png_ptr->mode |= PNG_WROTE_INFO_BEFORE_PLTE;
  127.    }
  128. }
  130. void PNGAPI
  131. png_write_info(png_structp png_ptr, png_infop info_ptr)
  132. {
  133. #if defined(PNG_WRITE_TEXT_SUPPORTED) || defined(PNG_WRITE_sPLT_SUPPORTED)
  134.    int i;
  135. #endif
  137.    png_debug(1, "in png_write_info");
  139.    if (png_ptr == NULL || info_ptr == NULL)
  140.       return;
  142.    png_write_info_before_PLTE(png_ptr, info_ptr);
  144.    if (info_ptr->valid & PNG_INFO_PLTE)
  145.       png_write_PLTE(png_ptr, info_ptr->palette,
  146.          (png_uint_32)info_ptr->num_palette);
  147.    else if (info_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
  148.       png_error(png_ptr, "Valid palette required for paletted images");
  150. #if defined(PNG_WRITE_tRNS_SUPPORTED)
  151.    if (info_ptr->valid & PNG_INFO_tRNS)
  152.       {
  153. #if defined(PNG_WRITE_INVERT_ALPHA_SUPPORTED)
  154.          /* invert the alpha channel (in tRNS) */
  155.          if ((png_ptr->transformations & PNG_INVERT_ALPHA) &&
  156.             info_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
  157.          {
  158.             int j;
  159.             for (j=0; j<(int)info_ptr->num_trans; j++)
  160.                info_ptr->trans[j] = (png_byte)(255 - info_ptr->trans[j]);
  161.          }
  162. #endif
  163.       png_write_tRNS(png_ptr, info_ptr->trans, &(info_ptr->trans_values),
  164.          info_ptr->num_trans, info_ptr->color_type);
  165.       }
  166. #endif
  167. #if defined(PNG_WRITE_bKGD_SUPPORTED)
  168.    if (info_ptr->valid & PNG_INFO_bKGD)
  169.       png_write_bKGD(png_ptr, &(info_ptr->background), info_ptr->color_type);
  170. #endif
  171. #if defined(PNG_WRITE_hIST_SUPPORTED)
  172.    if (info_ptr->valid & PNG_INFO_hIST)
  173.       png_write_hIST(png_ptr, info_ptr->hist, info_ptr->num_palette);
  174. #endif
  175. #if defined(PNG_WRITE_oFFs_SUPPORTED)
  176.    if (info_ptr->valid & PNG_INFO_oFFs)
  177.       png_write_oFFs(png_ptr, info_ptr->x_offset, info_ptr->y_offset,
  178.          info_ptr->offset_unit_type);
  179. #endif
  180. #if defined(PNG_WRITE_pCAL_SUPPORTED)
  181.    if (info_ptr->valid & PNG_INFO_pCAL)
  182.       png_write_pCAL(png_ptr, info_ptr->pcal_purpose, info_ptr->pcal_X0,
  183.          info_ptr->pcal_X1, info_ptr->pcal_type, info_ptr->pcal_nparams,
  184.          info_ptr->pcal_units, info_ptr->pcal_params);
  185. #endif
  186. #if defined(PNG_WRITE_sCAL_SUPPORTED)
  187.    if (info_ptr->valid & PNG_INFO_sCAL)
  188. #if defined(PNG_FLOATING_POINT_SUPPORTED) && !defined(PNG_NO_STDIO)
  189.       png_write_sCAL(png_ptr, (int)info_ptr->scal_unit,
  190.           info_ptr->scal_pixel_width, info_ptr->scal_pixel_height);
  191. #else
  192. #ifdef PNG_FIXED_POINT_SUPPORTED
  193.       png_write_sCAL_s(png_ptr, (int)info_ptr->scal_unit,
  194.           info_ptr->scal_s_width, info_ptr->scal_s_height);
  195. #else
  196.       png_warning(png_ptr,
  197.           "png_write_sCAL not supported; sCAL chunk not written.");
  198. #endif
  199. #endif
  200. #endif
  201. #if defined(PNG_WRITE_pHYs_SUPPORTED)
  202.    if (info_ptr->valid & PNG_INFO_pHYs)
  203.       png_write_pHYs(png_ptr, info_ptr->x_pixels_per_unit,
  204.          info_ptr->y_pixels_per_unit, info_ptr->phys_unit_type);
  205. #endif
  206. #if defined(PNG_WRITE_tIME_SUPPORTED)
  207.    if (info_ptr->valid & PNG_INFO_tIME)
  208.    {
  209.       png_write_tIME(png_ptr, &(info_ptr->mod_time));
  210.       png_ptr->mode |= PNG_WROTE_tIME;
  211.    }
  212. #endif
  213. #if defined(PNG_WRITE_sPLT_SUPPORTED)
  214.    if (info_ptr->valid & PNG_INFO_sPLT)
  215.      for (i = 0; i < (int)info_ptr->splt_palettes_num; i++)
  216.        png_write_sPLT(png_ptr, info_ptr->splt_palettes + i);
  217. #endif
  218. #if defined(PNG_WRITE_TEXT_SUPPORTED)
  219.    /* Check to see if we need to write text chunks */
  220.    for (i = 0; i < info_ptr->num_text; i++)
  221.    {
  222.       png_debug2(2, "Writing header text chunk %d, type %d", i,
  223.          info_ptr->text[i].compression);
  224.       /* an internationalized chunk? */
  225.       if (info_ptr->text[i].compression > 0)
  226.       {
  227. #if defined(PNG_WRITE_iTXt_SUPPORTED)
  228.           /* write international chunk */
  229.           png_write_iTXt(png_ptr,
  230.                          info_ptr->text[i].compression,
  231.                          info_ptr->text[i].key,
  232.                          info_ptr->text[i].lang,
  233.                          info_ptr->text[i].lang_key,
  234.                          info_ptr->text[i].text);
  235. #else
  236.           png_warning(png_ptr, "Unable to write international text");
  237. #endif
  238.           /* Mark this chunk as written */
  239.           info_ptr->text[i].compression = PNG_TEXT_COMPRESSION_NONE_WR;
  240.       }
  241.       /* If we want a compressed text chunk */
  242.       else if (info_ptr->text[i].compression == PNG_TEXT_COMPRESSION_zTXt)
  243.       {
  244. #if defined(PNG_WRITE_zTXt_SUPPORTED)
  245.          /* write compressed chunk */
  246.          png_write_zTXt(png_ptr, info_ptr->text[i].key,
  247.             info_ptr->text[i].text, 0,
  248.             info_ptr->text[i].compression);
  249. #else
  250.          png_warning(png_ptr, "Unable to write compressed text");
  251. #endif
  252.          /* Mark this chunk as written */
  253.          info_ptr->text[i].compression = PNG_TEXT_COMPRESSION_zTXt_WR;
  254.       }
  255.       else if (info_ptr->text[i].compression == PNG_TEXT_COMPRESSION_NONE)
  256.       {
  257. #if defined(PNG_WRITE_tEXt_SUPPORTED)
  258.          /* write uncompressed chunk */
  259.          png_write_tEXt(png_ptr, info_ptr->text[i].key,
  260.                          info_ptr->text[i].text,
  261.                          0);
  262. #else
  263.          png_warning(png_ptr, "Unable to write uncompressed text");
  264. #endif
  265.          /* Mark this chunk as written */
  266.          info_ptr->text[i].compression = PNG_TEXT_COMPRESSION_NONE_WR;
  267.       }
  268.    }
  269. #endif
  270. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  271.    if (info_ptr->unknown_chunks_num)
  272.    {
  273.        png_unknown_chunk *up;
  275.        png_debug(5, "writing extra chunks");
  277.        for (up = info_ptr->unknown_chunks;
  278.             up < info_ptr->unknown_chunks + info_ptr->unknown_chunks_num;
  279.             up++)
  280.        {
  281.          int keep=png_handle_as_unknown(png_ptr, up->name);
  282.          if (keep != PNG_HANDLE_CHUNK_NEVER &&
  283.             up->location && (up->location & PNG_HAVE_PLTE) &&
  284.             !(up->location & PNG_HAVE_IDAT) &&
  285.             ((up->name[3] & 0x20) || keep == PNG_HANDLE_CHUNK_ALWAYS ||
  286.             (png_ptr->flags & PNG_FLAG_KEEP_UNSAFE_CHUNKS)))
  287.          {
  288.             png_write_chunk(png_ptr, up->name, up->data, up->size);
  289.          }
  290.        }
  291.    }
  292. #endif
  293. }
  295. /* Writes the end of the PNG file.  If you don't want to write comments or
  296.  * time information, you can pass NULL for info.  If you already wrote these
  297.  * in png_write_info(), do not write them again here.  If you have long
  298.  * comments, I suggest writing them here, and compressing them.
  299.  */
  300. void PNGAPI
  301. png_write_end(png_structp png_ptr, png_infop info_ptr)
  302. {
  303.    png_debug(1, "in png_write_end");
  304.    if (png_ptr == NULL)
  305.       return;
  306.    if (!(png_ptr->mode & PNG_HAVE_IDAT))
  307.       png_error(png_ptr, "No IDATs written into file");
  309.    /* see if user wants us to write information chunks */
  310.    if (info_ptr != NULL)
  311.    {
  312. #if defined(PNG_WRITE_TEXT_SUPPORTED)
  313.       int i; /* local index variable */
  314. #endif
  315. #if defined(PNG_WRITE_tIME_SUPPORTED)
  316.       /* check to see if user has supplied a time chunk */
  317.       if ((info_ptr->valid & PNG_INFO_tIME) &&
  318.          !(png_ptr->mode & PNG_WROTE_tIME))
  319.          png_write_tIME(png_ptr, &(info_ptr->mod_time));
  320. #endif
  321. #if defined(PNG_WRITE_TEXT_SUPPORTED)
  322.       /* loop through comment chunks */
  323.       for (i = 0; i < info_ptr->num_text; i++)
  324.       {
  325.          png_debug2(2, "Writing trailer text chunk %d, type %d", i,
  326.             info_ptr->text[i].compression);
  327.          /* an internationalized chunk? */
  328.          if (info_ptr->text[i].compression > 0)
  329.          {
  330. #if defined(PNG_WRITE_iTXt_SUPPORTED)
  331.              /* write international chunk */
  332.              png_write_iTXt(png_ptr,
  333.                          info_ptr->text[i].compression,
  334.                          info_ptr->text[i].key,
  335.                          info_ptr->text[i].lang,
  336.                          info_ptr->text[i].lang_key,
  337.                          info_ptr->text[i].text);
  338. #else
  339.              png_warning(png_ptr, "Unable to write international text");
  340. #endif
  341.              /* Mark this chunk as written */
  342.              info_ptr->text[i].compression = PNG_TEXT_COMPRESSION_NONE_WR;
  343.          }
  344.          else if (info_ptr->text[i].compression >= PNG_TEXT_COMPRESSION_zTXt)
  345.          {
  346. #if defined(PNG_WRITE_zTXt_SUPPORTED)
  347.             /* write compressed chunk */
  348.             png_write_zTXt(png_ptr, info_ptr->text[i].key,
  349.                info_ptr->text[i].text, 0,
  350.                info_ptr->text[i].compression);
  351. #else
  352.             png_warning(png_ptr, "Unable to write compressed text");
  353. #endif
  354.             /* Mark this chunk as written */
  355.             info_ptr->text[i].compression = PNG_TEXT_COMPRESSION_zTXt_WR;
  356.          }
  357.          else if (info_ptr->text[i].compression == PNG_TEXT_COMPRESSION_NONE)
  358.          {
  359. #if defined(PNG_WRITE_tEXt_SUPPORTED)
  360.             /* write uncompressed chunk */
  361.             png_write_tEXt(png_ptr, info_ptr->text[i].key,
  362.                info_ptr->text[i].text, 0);
  363. #else
  364.             png_warning(png_ptr, "Unable to write uncompressed text");
  365. #endif
  367.             /* Mark this chunk as written */
  368.             info_ptr->text[i].compression = PNG_TEXT_COMPRESSION_NONE_WR;
  369.          }
  370.       }
  371. #endif
  372. #if defined(PNG_WRITE_UNKNOWN_CHUNKS_SUPPORTED)
  373.    if (info_ptr->unknown_chunks_num)
  374.    {
  375.        png_unknown_chunk *up;
  377.        png_debug(5, "writing extra chunks");
  379.        for (up = info_ptr->unknown_chunks;
  380.             up < info_ptr->unknown_chunks + info_ptr->unknown_chunks_num;
  381.             up++)
  382.        {
  383.          int keep=png_handle_as_unknown(png_ptr, up->name);
  384.          if (keep != PNG_HANDLE_CHUNK_NEVER &&
  385.             up->location && (up->location & PNG_AFTER_IDAT) &&
  386.             ((up->name[3] & 0x20) || keep == PNG_HANDLE_CHUNK_ALWAYS ||
  387.             (png_ptr->flags & PNG_FLAG_KEEP_UNSAFE_CHUNKS)))
  388.          {
  389.             png_write_chunk(png_ptr, up->name, up->data, up->size);
  390.          }
  391.        }
  392.    }
  393. #endif
  394.    }
  396.    png_ptr->mode |= PNG_AFTER_IDAT;
  398.    /* write end of PNG file */
  399.    png_write_IEND(png_ptr);
  400.    /* This flush, added in libpng-1.0.8, removed from libpng-1.0.9beta03,
  401.     * and restored again in libpng-1.2.30, may cause some applications that
  402.     * do not set png_ptr->output_flush_fn to crash.  If your application
  403.     * experiences a problem, please try building libpng with
  404.     * PNG_WRITE_FLUSH_AFTER_IEND_SUPPORTED defined, and report the event to
  405.     * png-mng-implement at lists.sf.net .  This kludge will be removed
  406.     * from libpng-1.4.0.
  407.     */
  408. #if defined(PNG_WRITE_FLUSH_SUPPORTED) && 
  409.     defined(PNG_WRITE_FLUSH_AFTER_IEND_SUPPORTED)
  410.    png_flush(png_ptr);
  411. #endif
  412. }
  414. #if defined(PNG_WRITE_tIME_SUPPORTED)
  415. #if !defined(_WIN32_WCE)
  416. /* "time.h" functions are not supported on WindowsCE */
  417. void PNGAPI
  418. png_convert_from_struct_tm(png_timep ptime, struct tm FAR * ttime)
  419. {
  420.    png_debug(1, "in png_convert_from_struct_tm");
  421.    ptime->year = (png_uint_16)(1900 + ttime->tm_year);
  422.    ptime->month = (png_byte)(ttime->tm_mon + 1);
  423.    ptime->day = (png_byte)ttime->tm_mday;
  424.    ptime->hour = (png_byte)ttime->tm_hour;
  425.    ptime->minute = (png_byte)ttime->tm_min;
  426.    ptime->second = (png_byte)ttime->tm_sec;
  427. }
  429. void PNGAPI
  430. png_convert_from_time_t(png_timep ptime, time_t ttime)
  431. {
  432.    struct tm *tbuf;
  434.    png_debug(1, "in png_convert_from_time_t");
  435.    tbuf = gmtime(&ttime);
  436.    png_convert_from_struct_tm(ptime, tbuf);
  437. }
  438. #endif
  439. #endif
  441. /* Initialize png_ptr structure, and allocate any memory needed */
  442. png_structp PNGAPI
  443. png_create_write_struct(png_const_charp user_png_ver, png_voidp error_ptr,
  444.    png_error_ptr error_fn, png_error_ptr warn_fn)
  445. {
  446. #ifdef PNG_USER_MEM_SUPPORTED
  447.    return (png_create_write_struct_2(user_png_ver, error_ptr, error_fn,
  448.       warn_fn, png_voidp_NULL, png_malloc_ptr_NULL, png_free_ptr_NULL));
  449. }
  451. /* Alternate initialize png_ptr structure, and allocate any memory needed */
  452. png_structp PNGAPI
  453. png_create_write_struct_2(png_const_charp user_png_ver, png_voidp error_ptr,
  454.    png_error_ptr error_fn, png_error_ptr warn_fn, png_voidp mem_ptr,
  455.    png_malloc_ptr malloc_fn, png_free_ptr free_fn)
  456. {
  457. #endif /* PNG_USER_MEM_SUPPORTED */
  458. #ifdef PNG_SETJMP_SUPPORTED
  459.     volatile
  460. #endif
  461.     png_structp png_ptr;
  462. #ifdef PNG_SETJMP_SUPPORTED
  463. #ifdef USE_FAR_KEYWORD
  464.    jmp_buf jmpbuf;
  465. #endif
  466. #endif
  467.    int i;
  468.    png_debug(1, "in png_create_write_struct");
  469. #ifdef PNG_USER_MEM_SUPPORTED
  470.    png_ptr = (png_structp)png_create_struct_2(PNG_STRUCT_PNG,
  471.       (png_malloc_ptr)malloc_fn, (png_voidp)mem_ptr);
  472. #else
  473.    png_ptr = (png_structp)png_create_struct(PNG_STRUCT_PNG);
  474. #endif /* PNG_USER_MEM_SUPPORTED */
  475.    if (png_ptr == NULL)
  476.       return (NULL);
  478.    /* added at libpng-1.2.6 */
  479. #ifdef PNG_SET_USER_LIMITS_SUPPORTED
  480.    png_ptr->user_width_max=PNG_USER_WIDTH_MAX;
  481.    png_ptr->user_height_max=PNG_USER_HEIGHT_MAX;
  482. #endif
  484. #ifdef PNG_SETJMP_SUPPORTED
  485. #ifdef USE_FAR_KEYWORD
  486.    if (setjmp(jmpbuf))
  487. #else
  488.    if (setjmp(png_ptr->jmpbuf))
  489. #endif
  490.    {
  491.       png_free(png_ptr, png_ptr->zbuf);
  492.        png_ptr->zbuf=NULL;
  493.       png_destroy_struct(png_ptr);
  494.       return (NULL);
  495.    }
  496. #ifdef USE_FAR_KEYWORD
  497.    png_memcpy(png_ptr->jmpbuf, jmpbuf, png_sizeof(jmp_buf));
  498. #endif
  499. #endif
  501. #ifdef PNG_USER_MEM_SUPPORTED
  502.    png_set_mem_fn(png_ptr, mem_ptr, malloc_fn, free_fn);
  503. #endif /* PNG_USER_MEM_SUPPORTED */
  504.    png_set_error_fn(png_ptr, error_ptr, error_fn, warn_fn);
  506.    if (user_png_ver)
  507.    {
  508.      i=0;
  509.      do
  510.      {
  511.        if (user_png_ver[i] != png_libpng_ver[i])
  512.           png_ptr->flags |= PNG_FLAG_LIBRARY_MISMATCH;
  513.      } while (png_libpng_ver[i++]);
  514.    }
  516.    if (png_ptr->flags & PNG_FLAG_LIBRARY_MISMATCH)
  517.    {
  518.      /* Libpng 0.90 and later are binary incompatible with libpng 0.89, so
  519.       * we must recompile any applications that use any older library version.
  520.       * For versions after libpng 1.0, we will be compatible, so we need
  521.       * only check the first digit.
  522.       */
  523.      if (user_png_ver == NULL || user_png_ver[0] != png_libpng_ver[0] ||
  524.          (user_png_ver[0] == '1' && user_png_ver[2] != png_libpng_ver[2]) ||
  525.          (user_png_ver[0] == '0' && user_png_ver[2] < '9'))
  526.      {
  527. #if !defined(PNG_NO_STDIO) && !defined(_WIN32_WCE)
  528.         char msg[80];
  529.         if (user_png_ver)
  530.         {
  531.           png_snprintf(msg, 80,
  532.              "Application was compiled with png.h from libpng-%.20s",
  533.              user_png_ver);
  534.           png_warning(png_ptr, msg);
  535.         }
  536.         png_snprintf(msg, 80,
  537.            "Application  is  running with png.c from libpng-%.20s",
  538.            png_libpng_ver);
  539.         png_warning(png_ptr, msg);
  540. #endif
  541. #ifdef PNG_ERROR_NUMBERS_SUPPORTED
  542.         png_ptr->flags=0;
  543. #endif
  544.         png_error(png_ptr,
  545.            "Incompatible libpng version in application and library");
  546.      }
  547.    }
  549.    /* initialize zbuf - compression buffer */
  550.    png_ptr->zbuf_size = PNG_ZBUF_SIZE;
  551.    png_ptr->zbuf = (png_bytep)png_malloc(png_ptr,
  552.       (png_uint_32)png_ptr->zbuf_size);
  554.    png_set_write_fn(png_ptr, png_voidp_NULL, png_rw_ptr_NULL,
  555.       png_flush_ptr_NULL);
  557. #if defined(PNG_WRITE_WEIGHTED_FILTER_SUPPORTED)
  558.    png_set_filter_heuristics(png_ptr, PNG_FILTER_HEURISTIC_DEFAULT,
  559.       1, png_doublep_NULL, png_doublep_NULL);
  560. #endif
  562. #ifdef PNG_SETJMP_SUPPORTED
  563. /* Applications that neglect to set up their own setjmp() and then encounter
  564.    a png_error() will longjmp here.  Since the jmpbuf is then meaningless we
  565.    abort instead of returning. */
  566. #ifdef USE_FAR_KEYWORD
  567.    if (setjmp(jmpbuf))
  568.       PNG_ABORT();
  569.    png_memcpy(png_ptr->jmpbuf, jmpbuf, png_sizeof(jmp_buf));
  570. #else
  571.    if (setjmp(png_ptr->jmpbuf))
  572.       PNG_ABORT();
  573. #endif
  574. #endif
  575.    return (png_ptr);
  576. }
  578. /* Initialize png_ptr structure, and allocate any memory needed */
  579. #if defined(PNG_1_0_X) || defined(PNG_1_2_X)
  580. /* Deprecated. */
  581. #undef png_write_init
  582. void PNGAPI
  583. png_write_init(png_structp png_ptr)
  584. {
  585.    /* We only come here via pre-1.0.7-compiled applications */
  586.    png_write_init_2(png_ptr, "1.0.6 or earlier", 0, 0);
  587. }
  589. void PNGAPI
  590. png_write_init_2(png_structp png_ptr, png_const_charp user_png_ver,
  591.    png_size_t png_struct_size, png_size_t png_info_size)
  592. {
  593.    /* We only come here via pre-1.0.12-compiled applications */
  594.    if (png_ptr == NULL) return;
  595. #if !defined(PNG_NO_STDIO) && !defined(_WIN32_WCE)
  596.    if (png_sizeof(png_struct) > png_struct_size ||
  597.       png_sizeof(png_info) > png_info_size)
  598.    {
  599.       char msg[80];
  600.       png_ptr->warning_fn=NULL;
  601.       if (user_png_ver)
  602.       {
  603.         png_snprintf(msg, 80,
  604.            "Application was compiled with png.h from libpng-%.20s",
  605.            user_png_ver);
  606.         png_warning(png_ptr, msg);
  607.       }
  608.       png_snprintf(msg, 80,
  609.          "Application  is  running with png.c from libpng-%.20s",
  610.          png_libpng_ver);
  611.       png_warning(png_ptr, msg);
  612.    }
  613. #endif
  614.    if (png_sizeof(png_struct) > png_struct_size)
  615.      {
  616.        png_ptr->error_fn=NULL;
  617. #ifdef PNG_ERROR_NUMBERS_SUPPORTED
  618.        png_ptr->flags=0;
  619. #endif
  620.        png_error(png_ptr,
  621.        "The png struct allocated by the application for writing is too small.");
  622.      }
  623.    if (png_sizeof(png_info) > png_info_size)
  624.      {
  625.        png_ptr->error_fn=NULL;
  626. #ifdef PNG_ERROR_NUMBERS_SUPPORTED
  627.        png_ptr->flags=0;
  628. #endif
  629.        png_error(png_ptr,
  630.        "The info struct allocated by the application for writing is too small.");
  631.      }
  632.    png_write_init_3(&png_ptr, user_png_ver, png_struct_size);
  633. }
  634. #endif /* PNG_1_0_X || PNG_1_2_X */
  637. void PNGAPI
  638. png_write_init_3(png_structpp ptr_ptr, png_const_charp user_png_ver,
  639.    png_size_t png_struct_size)
  640. {
  641.    png_structp png_ptr=*ptr_ptr;
  642. #ifdef PNG_SETJMP_SUPPORTED
  643.    jmp_buf tmp_jmp; /* to save current jump buffer */
  644. #endif
  646.    int i = 0;
  648.    if (png_ptr == NULL)
  649.       return;
  651.    do
  652.    {
  653.      if (user_png_ver[i] != png_libpng_ver[i])
  654.      {
  655. #ifdef PNG_LEGACY_SUPPORTED
  656.        png_ptr->flags |= PNG_FLAG_LIBRARY_MISMATCH;
  657. #else
  658.        png_ptr->warning_fn=NULL;
  659.        png_warning(png_ptr,
  660.  "Application uses deprecated png_write_init() and should be recompiled.");
  661.        break;
  662. #endif
  663.      }
  664.    } while (png_libpng_ver[i++]);
  666.    png_debug(1, "in png_write_init_3");
  668. #ifdef PNG_SETJMP_SUPPORTED
  669.    /* save jump buffer and error functions */
  670.    png_memcpy(tmp_jmp, png_ptr->jmpbuf, png_sizeof(jmp_buf));
  671. #endif
  673.    if (png_sizeof(png_struct) > png_struct_size)
  674.      {
  675.        png_destroy_struct(png_ptr);
  676.        png_ptr = (png_structp)png_create_struct(PNG_STRUCT_PNG);
  677.        *ptr_ptr = png_ptr;
  678.      }
  680.    /* reset all variables to 0 */
  681.    png_memset(png_ptr, 0, png_sizeof(png_struct));
  683.    /* added at libpng-1.2.6 */
  684. #ifdef PNG_SET_USER_LIMITS_SUPPORTED
  685.    png_ptr->user_width_max=PNG_USER_WIDTH_MAX;
  686.    png_ptr->user_height_max=PNG_USER_HEIGHT_MAX;
  687. #endif
  689. #ifdef PNG_SETJMP_SUPPORTED
  690.    /* restore jump buffer */
  691.    png_memcpy(png_ptr->jmpbuf, tmp_jmp, png_sizeof(jmp_buf));
  692. #endif
  694.    png_set_write_fn(png_ptr, png_voidp_NULL, png_rw_ptr_NULL,
  695.       png_flush_ptr_NULL);
  697.    /* initialize zbuf - compression buffer */
  698.    png_ptr->zbuf_size = PNG_ZBUF_SIZE;
  699.    png_ptr->zbuf = (png_bytep)png_malloc(png_ptr,
  700.       (png_uint_32)png_ptr->zbuf_size);
  702. #if defined(PNG_WRITE_WEIGHTED_FILTER_SUPPORTED)
  703.    png_set_filter_heuristics(png_ptr, PNG_FILTER_HEURISTIC_DEFAULT,
  704.       1, png_doublep_NULL, png_doublep_NULL);
  705. #endif
  706. }
  708. /* Write a few rows of image data.  If the image is interlaced,
  709.  * either you will have to write the 7 sub images, or, if you
  710.  * have called png_set_interlace_handling(), you will have to
  711.  * "write" the image seven times.
  712.  */
  713. void PNGAPI
  714. png_write_rows(png_structp png_ptr, png_bytepp row,
  715.    png_uint_32 num_rows)
  716. {
  717.    png_uint_32 i; /* row counter */
  718.    png_bytepp rp; /* row pointer */
  720.    png_debug(1, "in png_write_rows");
  722.    if (png_ptr == NULL)
  723.       return;
  725.    /* loop through the rows */
  726.    for (i = 0, rp = row; i < num_rows; i++, rp++)
  727.    {
  728.       png_write_row(png_ptr, *rp);
  729.    }
  730. }
  732. /* Write the image.  You only need to call this function once, even
  733.  * if you are writing an interlaced image.
  734.  */
  735. void PNGAPI
  736. png_write_image(png_structp png_ptr, png_bytepp image)
  737. {
  738.    png_uint_32 i; /* row index */
  739.    int pass, num_pass; /* pass variables */
  740.    png_bytepp rp; /* points to current row */
  742.    if (png_ptr == NULL)
  743.       return;
  745.    png_debug(1, "in png_write_image");
  746. #if defined(PNG_WRITE_INTERLACING_SUPPORTED)
  747.    /* intialize interlace handling.  If image is not interlaced,
  748.       this will set pass to 1 */
  749.    num_pass = png_set_interlace_handling(png_ptr);
  750. #else
  751.    num_pass = 1;
  752. #endif
  753.    /* loop through passes */
  754.    for (pass = 0; pass < num_pass; pass++)
  755.    {
  756.       /* loop through image */
  757.       for (i = 0, rp = image; i < png_ptr->height; i++, rp++)
  758.       {
  759.          png_write_row(png_ptr, *rp);
  760.       }
  761.    }
  762. }
  764. /* called by user to write a row of image data */
  765. void PNGAPI
  766. png_write_row(png_structp png_ptr, png_bytep row)
  767. {
  768.    if (png_ptr == NULL)
  769.       return;
  770.    png_debug2(1, "in png_write_row (row %ld, pass %d)",
  771.       png_ptr->row_number, png_ptr->pass);
  773.    /* initialize transformations and other stuff if first time */
  774.    if (png_ptr->row_number == 0 && png_ptr->pass == 0)
  775.    {
  776.    /* make sure we wrote the header info */
  777.    if (!(png_ptr->mode & PNG_WROTE_INFO_BEFORE_PLTE))
  778.       png_error(png_ptr,
  779.          "png_write_info was never called before png_write_row.");
  781.    /* check for transforms that have been set but were defined out */
  782. #if !defined(PNG_WRITE_INVERT_SUPPORTED) && defined(PNG_READ_INVERT_SUPPORTED)
  783.    if (png_ptr->transformations & PNG_INVERT_MONO)
  784.       png_warning(png_ptr, "PNG_WRITE_INVERT_SUPPORTED is not defined.");
  785. #endif
  786. #if !defined(PNG_WRITE_FILLER_SUPPORTED) && defined(PNG_READ_FILLER_SUPPORTED)
  787.    if (png_ptr->transformations & PNG_FILLER)
  788.       png_warning(png_ptr, "PNG_WRITE_FILLER_SUPPORTED is not defined.");
  789. #endif
  790. #if !defined(PNG_WRITE_PACKSWAP_SUPPORTED) && defined(PNG_READ_PACKSWAP_SUPPORTED)
  791.    if (png_ptr->transformations & PNG_PACKSWAP)
  792.       png_warning(png_ptr, "PNG_WRITE_PACKSWAP_SUPPORTED is not defined.");
  793. #endif
  794. #if !defined(PNG_WRITE_PACK_SUPPORTED) && defined(PNG_READ_PACK_SUPPORTED)
  795.    if (png_ptr->transformations & PNG_PACK)
  796.       png_warning(png_ptr, "PNG_WRITE_PACK_SUPPORTED is not defined.");
  797. #endif
  798. #if !defined(PNG_WRITE_SHIFT_SUPPORTED) && defined(PNG_READ_SHIFT_SUPPORTED)
  799.    if (png_ptr->transformations & PNG_SHIFT)
  800.       png_warning(png_ptr, "PNG_WRITE_SHIFT_SUPPORTED is not defined.");
  801. #endif
  802. #if !defined(PNG_WRITE_BGR_SUPPORTED) && defined(PNG_READ_BGR_SUPPORTED)
  803.    if (png_ptr->transformations & PNG_BGR)
  804.       png_warning(png_ptr, "PNG_WRITE_BGR_SUPPORTED is not defined.");
  805. #endif
  806. #if !defined(PNG_WRITE_SWAP_SUPPORTED) && defined(PNG_READ_SWAP_SUPPORTED)
  807.    if (png_ptr->transformations & PNG_SWAP_BYTES)
  808.       png_warning(png_ptr, "PNG_WRITE_SWAP_SUPPORTED is not defined.");
  809. #endif
  811.       png_write_start_row(png_ptr);
  812.    }
  814. #if defined(PNG_WRITE_INTERLACING_SUPPORTED)
  815.    /* if interlaced and not interested in row, return */
  816.    if (png_ptr->interlaced && (png_ptr->transformations & PNG_INTERLACE))
  817.    {
  818.       switch (png_ptr->pass)
  819.       {
  820.          case 0:
  821.             if (png_ptr->row_number & 0x07)
  822.             {
  823.                png_write_finish_row(png_ptr);
  824.                return;
  825.             }
  826.             break;
  827.          case 1:
  828.             if ((png_ptr->row_number & 0x07) || png_ptr->width < 5)
  829.             {
  830.                png_write_finish_row(png_ptr);
  831.                return;
  832.             }
  833.             break;
  834.          case 2:
  835.             if ((png_ptr->row_number & 0x07) != 4)
  836.             {
  837.                png_write_finish_row(png_ptr);
  838.                return;
  839.             }
  840.             break;
  841.          case 3:
  842.             if ((png_ptr->row_number & 0x03) || png_ptr->width < 3)
  843.             {
  844.                png_write_finish_row(png_ptr);
  845.                return;
  846.             }
  847.             break;
  848.          case 4:
  849.             if ((png_ptr->row_number & 0x03) != 2)
  850.             {
  851.                png_write_finish_row(png_ptr);
  852.                return;
  853.             }
  854.             break;
  855.          case 5:
  856.             if ((png_ptr->row_number & 0x01) || png_ptr->width < 2)
  857.             {
  858.                png_write_finish_row(png_ptr);
  859.                return;
  860.             }
  861.             break;
  862.          case 6:
  863.             if (!(png_ptr->row_number & 0x01))
  864.             {
  865.                png_write_finish_row(png_ptr);
  866.                return;
  867.             }
  868.             break;
  869.       }
  870.    }
  871. #endif
  873.    /* set up row info for transformations */
  874.    png_ptr->row_info.color_type = png_ptr->color_type;
  875.    png_ptr->row_info.width = png_ptr->usr_width;
  876.    png_ptr->row_info.channels = png_ptr->usr_channels;
  877.    png_ptr->row_info.bit_depth = png_ptr->usr_bit_depth;
  878.    png_ptr->row_info.pixel_depth = (png_byte)(png_ptr->row_info.bit_depth *
  879.       png_ptr->row_info.channels);
  881.    png_ptr->row_info.rowbytes = PNG_ROWBYTES(png_ptr->row_info.pixel_depth,
  882.       png_ptr->row_info.width);
  884.    png_debug1(3, "row_info->color_type = %d", png_ptr->row_info.color_type);
  885.    png_debug1(3, "row_info->width = %lu", png_ptr->row_info.width);
  886.    png_debug1(3, "row_info->channels = %d", png_ptr->row_info.channels);
  887.    png_debug1(3, "row_info->bit_depth = %d", png_ptr->row_info.bit_depth);
  888.    png_debug1(3, "row_info->pixel_depth = %d", png_ptr->row_info.pixel_depth);
  889.    png_debug1(3, "row_info->rowbytes = %lu", png_ptr->row_info.rowbytes);
  891.    /* Copy user's row into buffer, leaving room for filter byte. */
  892.    png_memcpy_check(png_ptr, png_ptr->row_buf + 1, row,
  893.       png_ptr->row_info.rowbytes);
  895. #if defined(PNG_WRITE_INTERLACING_SUPPORTED)
  896.    /* handle interlacing */
  897.    if (png_ptr->interlaced && png_ptr->pass < 6 &&
  898.       (png_ptr->transformations & PNG_INTERLACE))
  899.    {
  900.       png_do_write_interlace(&(png_ptr->row_info),
  901.          png_ptr->row_buf + 1, png_ptr->pass);
  902.       /* this should always get caught above, but still ... */
  903.       if (!(png_ptr->row_info.width))
  904.       {
  905.          png_write_finish_row(png_ptr);
  906.          return;
  907.       }
  908.    }
  909. #endif
  911.    /* handle other transformations */
  912.    if (png_ptr->transformations)
  913.       png_do_write_transformations(png_ptr);
  915. #if defined(PNG_MNG_FEATURES_SUPPORTED)
  916.    /* Write filter_method 64 (intrapixel differencing) only if
  917.     * 1. Libpng was compiled with PNG_MNG_FEATURES_SUPPORTED and
  918.     * 2. Libpng did not write a PNG signature (this filter_method is only
  919.     *    used in PNG datastreams that are embedded in MNG datastreams) and
  920.     * 3. The application called png_permit_mng_features with a mask that
  921.     *    included PNG_FLAG_MNG_FILTER_64 and
  922.     * 4. The filter_method is 64 and
  923.     * 5. The color_type is RGB or RGBA
  924.     */
  925.    if ((png_ptr->mng_features_permitted & PNG_FLAG_MNG_FILTER_64) &&
  926.       (png_ptr->filter_type == PNG_INTRAPIXEL_DIFFERENCING))
  927.    {
  928.       /* Intrapixel differencing */
  929.       png_do_write_intrapixel(&(png_ptr->row_info), png_ptr->row_buf + 1);
  930.    }
  931. #endif
  933.    /* Find a filter if necessary, filter the row and write it out. */
  934.    png_write_find_filter(png_ptr, &(png_ptr->row_info));
  936.    if (png_ptr->write_row_fn != NULL)
  937.       (*(png_ptr->write_row_fn))(png_ptr, png_ptr->row_number, png_ptr->pass);
  938. }
  940. #if defined(PNG_WRITE_FLUSH_SUPPORTED)
  941. /* Set the automatic flush interval or 0 to turn flushing off */
  942. void PNGAPI
  943. png_set_flush(png_structp png_ptr, int nrows)
  944. {
  945.    png_debug(1, "in png_set_flush");
  946.    if (png_ptr == NULL)
  947.       return;
  948.    png_ptr->flush_dist = (nrows < 0 ? 0 : nrows);
  949. }
  951. /* flush the current output buffers now */
  952. void PNGAPI
  953. png_write_flush(png_structp png_ptr)
  954. {
  955.    int wrote_IDAT;
  957.    png_debug(1, "in png_write_flush");
  958.    if (png_ptr == NULL)
  959.       return;
  960.    /* We have already written out all of the data */
  961.    if (png_ptr->row_number >= png_ptr->num_rows)
  962.      return;
  964.    do
  965.    {
  966.       int ret;
  968.       /* compress the data */
  969.       ret = deflate(&png_ptr->zstream, Z_SYNC_FLUSH);
  970.       wrote_IDAT = 0;
  972.       /* check for compression errors */
  973.       if (ret != Z_OK)
  974.       {
  975.          if (png_ptr->zstream.msg != NULL)
  976.             png_error(png_ptr, png_ptr->zstream.msg);
  977.          else
  978.             png_error(png_ptr, "zlib error");
  979.       }
  981.       if (!(png_ptr->zstream.avail_out))
  982.       {
  983.          /* write the IDAT and reset the zlib output buffer */
  984.          png_write_IDAT(png_ptr, png_ptr->zbuf,
  985.                         png_ptr->zbuf_size);
  986.          png_ptr->zstream.next_out = png_ptr->zbuf;
  987.          png_ptr->zstream.avail_out = (uInt)png_ptr->zbuf_size;
  988.          wrote_IDAT = 1;
  989.       }
  990.    } while(wrote_IDAT == 1);
  992.    /* If there is any data left to be output, write it into a new IDAT */
  993.    if (png_ptr->zbuf_size != png_ptr->zstream.avail_out)
  994.    {
  995.       /* write the IDAT and reset the zlib output buffer */
  996.       png_write_IDAT(png_ptr, png_ptr->zbuf,
  997.                      png_ptr->zbuf_size - png_ptr->zstream.avail_out);
  998.       png_ptr->zstream.next_out = png_ptr->zbuf;
  999.       png_ptr->zstream.avail_out = (uInt)png_ptr->zbuf_size;
  1000.    }
  1001.    png_ptr->flush_rows = 0;
  1002.    png_flush(png_ptr);
  1003. }
  1004. #endif /* PNG_WRITE_FLUSH_SUPPORTED */
  1006. /* free all memory used by the write */
  1007. void PNGAPI
  1008. png_destroy_write_struct(png_structpp png_ptr_ptr, png_infopp info_ptr_ptr)
  1009. {
  1010.    png_structp png_ptr = NULL;
  1011.    png_infop info_ptr = NULL;
  1012. #ifdef PNG_USER_MEM_SUPPORTED
  1013.    png_free_ptr free_fn = NULL;
  1014.    png_voidp mem_ptr = NULL;
  1015. #endif
  1017.    png_debug(1, "in png_destroy_write_struct");
  1018.    if (png_ptr_ptr != NULL)
  1019.    {
  1020.       png_ptr = *png_ptr_ptr;
  1021. #ifdef PNG_USER_MEM_SUPPORTED
  1022.       free_fn = png_ptr->free_fn;
  1023.       mem_ptr = png_ptr->mem_ptr;
  1024. #endif
  1025.    }
  1027. #ifdef PNG_USER_MEM_SUPPORTED
  1028.    if (png_ptr != NULL)
  1029.    {
  1030.       free_fn = png_ptr->free_fn;
  1031.       mem_ptr = png_ptr->mem_ptr;
  1032.    }
  1033. #endif
  1035.    if (info_ptr_ptr != NULL)
  1036.       info_ptr = *info_ptr_ptr;
  1038.    if (info_ptr != NULL)
  1039.    {
  1040.       if (png_ptr != NULL)
  1041.       {
  1042.         png_free_data(png_ptr, info_ptr, PNG_FREE_ALL, -1);
  1044. #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
  1045.         if (png_ptr->num_chunk_list)
  1046.         {
  1047.            png_free(png_ptr, png_ptr->chunk_list);
  1048.            png_ptr->chunk_list=NULL;
  1049.            png_ptr->num_chunk_list = 0;
  1050.         }
  1051. #endif
  1052.       }
  1054. #ifdef PNG_USER_MEM_SUPPORTED
  1055.       png_destroy_struct_2((png_voidp)info_ptr, (png_free_ptr)free_fn,
  1056.          (png_voidp)mem_ptr);
  1057. #else
  1058.       png_destroy_struct((png_voidp)info_ptr);
  1059. #endif
  1060.       *info_ptr_ptr = NULL;
  1061.    }
  1063.    if (png_ptr != NULL)
  1064.    {
  1065.       png_write_destroy(png_ptr);
  1066. #ifdef PNG_USER_MEM_SUPPORTED
  1067.       png_destroy_struct_2((png_voidp)png_ptr, (png_free_ptr)free_fn,
  1068.          (png_voidp)mem_ptr);
  1069. #else
  1070.       png_destroy_struct((png_voidp)png_ptr);
  1071. #endif
  1072.       *png_ptr_ptr = NULL;
  1073.    }
  1074. }
  1077. /* Free any memory used in png_ptr struct (old method) */
  1078. void /* PRIVATE */
  1079. png_write_destroy(png_structp png_ptr)
  1080. {
  1081. #ifdef PNG_SETJMP_SUPPORTED
  1082.    jmp_buf tmp_jmp; /* save jump buffer */
  1083. #endif
  1084.    png_error_ptr error_fn;
  1085.    png_error_ptr warning_fn;
  1086.    png_voidp error_ptr;
  1087. #ifdef PNG_USER_MEM_SUPPORTED
  1088.    png_free_ptr free_fn;
  1089. #endif
  1091.    png_debug(1, "in png_write_destroy");
  1092.    /* free any memory zlib uses */
  1093.    deflateEnd(&png_ptr->zstream);
  1095.    /* free our memory.  png_free checks NULL for us. */
  1096.    png_free(png_ptr, png_ptr->zbuf);
  1097.    png_free(png_ptr, png_ptr->row_buf);
  1098. #ifndef PNG_NO_WRITE_FILTER
  1099.    png_free(png_ptr, png_ptr->prev_row);
  1100.    png_free(png_ptr, png_ptr->sub_row);
  1101.    png_free(png_ptr, png_ptr->up_row);
  1102.    png_free(png_ptr, png_ptr->avg_row);
  1103.    png_free(png_ptr, png_ptr->paeth_row);
  1104. #endif
  1106. #if defined(PNG_TIME_RFC1123_SUPPORTED)
  1107.    png_free(png_ptr, png_ptr->time_buffer);
  1108. #endif
  1110. #if defined(PNG_WRITE_WEIGHTED_FILTER_SUPPORTED)
  1111.    png_free(png_ptr, png_ptr->prev_filters);
  1112.    png_free(png_ptr, png_ptr->filter_weights);
  1113.    png_free(png_ptr, png_ptr->inv_filter_weights);
  1114.    png_free(png_ptr, png_ptr->filter_costs);
  1115.    png_free(png_ptr, png_ptr->inv_filter_costs);
  1116. #endif
  1118. #ifdef PNG_SETJMP_SUPPORTED
  1119.    /* reset structure */
  1120.    png_memcpy(tmp_jmp, png_ptr->jmpbuf, png_sizeof(jmp_buf));
  1121. #endif
  1123.    error_fn = png_ptr->error_fn;
  1124.    warning_fn = png_ptr->warning_fn;
  1125.    error_ptr = png_ptr->error_ptr;
  1126. #ifdef PNG_USER_MEM_SUPPORTED
  1127.    free_fn = png_ptr->free_fn;
  1128. #endif
  1130.    png_memset(png_ptr, 0, png_sizeof(png_struct));
  1132.    png_ptr->error_fn = error_fn;
  1133.    png_ptr->warning_fn = warning_fn;
  1134.    png_ptr->error_ptr = error_ptr;
  1135. #ifdef PNG_USER_MEM_SUPPORTED
  1136.    png_ptr->free_fn = free_fn;
  1137. #endif
  1139. #ifdef PNG_SETJMP_SUPPORTED
  1140.    png_memcpy(png_ptr->jmpbuf, tmp_jmp, png_sizeof(jmp_buf));
  1141. #endif
  1142. }
  1144. /* Allow the application to select one or more row filters to use. */
  1145. void PNGAPI
  1146. png_set_filter(png_structp png_ptr, int method, int filters)
  1147. {
  1148.    png_debug(1, "in png_set_filter");
  1149.    if (png_ptr == NULL)
  1150.       return;
  1151. #if defined(PNG_MNG_FEATURES_SUPPORTED)
  1152.    if ((png_ptr->mng_features_permitted & PNG_FLAG_MNG_FILTER_64) &&
  1153.       (method == PNG_INTRAPIXEL_DIFFERENCING))
  1154.          method = PNG_FILTER_TYPE_BASE;
  1155. #endif
  1156.    if (method == PNG_FILTER_TYPE_BASE)
  1157.    {
  1158.       switch (filters & (PNG_ALL_FILTERS | 0x07))
  1159.       {
  1160. #ifndef PNG_NO_WRITE_FILTER
  1161.          case 5:
  1162.          case 6:
  1163.          case 7: png_warning(png_ptr, "Unknown row filter for method 0");
  1164. #endif /* PNG_NO_WRITE_FILTER */
  1165.          case PNG_FILTER_VALUE_NONE:
  1166.               png_ptr->do_filter=PNG_FILTER_NONE; break;
  1167. #ifndef PNG_NO_WRITE_FILTER
  1168.          case PNG_FILTER_VALUE_SUB:
  1169.               png_ptr->do_filter=PNG_FILTER_SUB; break;
  1170.          case PNG_FILTER_VALUE_UP:
  1171.               png_ptr->do_filter=PNG_FILTER_UP; break;
  1172.          case PNG_FILTER_VALUE_AVG:
  1173.               png_ptr->do_filter=PNG_FILTER_AVG; break;
  1174.          case PNG_FILTER_VALUE_PAETH:
  1175.               png_ptr->do_filter=PNG_FILTER_PAETH; break;
  1176.          default: png_ptr->do_filter = (png_byte)filters; break;
  1177. #else
  1178.          default: png_warning(png_ptr, "Unknown row filter for method 0");
  1179. #endif /* PNG_NO_WRITE_FILTER */
  1180.       }
  1182.       /* If we have allocated the row_buf, this means we have already started
  1183.        * with the image and we should have allocated all of the filter buffers
  1184.        * that have been selected.  If prev_row isn't already allocated, then
  1185.        * it is too late to start using the filters that need it, since we
  1186.        * will be missing the data in the previous row.  If an application
  1187.        * wants to start and stop using particular filters during compression,
  1188.        * it should start out with all of the filters, and then add and
  1189.        * remove them after the start of compression.
  1190.        */
  1191.       if (png_ptr->row_buf != NULL)
  1192.       {
  1193. #ifndef PNG_NO_WRITE_FILTER
  1194.          if ((png_ptr->do_filter & PNG_FILTER_SUB) && png_ptr->sub_row == NULL)
  1195.          {
  1196.             png_ptr->sub_row = (png_bytep)png_malloc(png_ptr,
  1197.               (png_ptr->rowbytes + 1));
  1198.             png_ptr->sub_row[0] = PNG_FILTER_VALUE_SUB;
  1199.          }
  1201.          if ((png_ptr->do_filter & PNG_FILTER_UP) && png_ptr->up_row == NULL)
  1202.          {
  1203.             if (png_ptr->prev_row == NULL)
  1204.             {
  1205.                png_warning(png_ptr, "Can't add Up filter after starting");
  1206.                png_ptr->do_filter &= ~PNG_FILTER_UP;
  1207.             }
  1208.             else
  1209.             {
  1210.                png_ptr->up_row = (png_bytep)png_malloc(png_ptr,
  1211.                   (png_ptr->rowbytes + 1));
  1212.                png_ptr->up_row[0] = PNG_FILTER_VALUE_UP;
  1213.             }
  1214.          }
  1216.          if ((png_ptr->do_filter & PNG_FILTER_AVG) && png_ptr->avg_row == NULL)
  1217.          {
  1218.             if (png_ptr->prev_row == NULL)
  1219.             {
  1220.                png_warning(png_ptr, "Can't add Average filter after starting");
  1221.                png_ptr->do_filter &= ~PNG_FILTER_AVG;
  1222.             }
  1223.             else
  1224.             {
  1225.                png_ptr->avg_row = (png_bytep)png_malloc(png_ptr,
  1226.                   (png_ptr->rowbytes + 1));
  1227.                png_ptr->avg_row[0] = PNG_FILTER_VALUE_AVG;
  1228.             }
  1229.          }
  1231.          if ((png_ptr->do_filter & PNG_FILTER_PAETH) &&
  1232.              png_ptr->paeth_row == NULL)
  1233.          {
  1234.             if (png_ptr->prev_row == NULL)
  1235.             {
  1236.                png_warning(png_ptr, "Can't add Paeth filter after starting");
  1237.                png_ptr->do_filter &= (png_byte)(~PNG_FILTER_PAETH);
  1238.             }
  1239.             else
  1240.             {
  1241.                png_ptr->paeth_row = (png_bytep)png_malloc(png_ptr,
  1242.                   (png_ptr->rowbytes + 1));
  1243.                png_ptr->paeth_row[0] = PNG_FILTER_VALUE_PAETH;
  1244.             }
  1245.          }
  1247.          if (png_ptr->do_filter == PNG_NO_FILTERS)
  1248. #endif /* PNG_NO_WRITE_FILTER */
  1249.             png_ptr->do_filter = PNG_FILTER_NONE;
  1250.       }
  1251.    }
  1252.    else
  1253.       png_error(png_ptr, "Unknown custom filter method");
  1254. }
  1256. /* This allows us to influence the way in which libpng chooses the "best"
  1257.  * filter for the current scanline.  While the "minimum-sum-of-absolute-
  1258.  * differences metric is relatively fast and effective, there is some
  1259.  * question as to whether it can be improved upon by trying to keep the
  1260.  * filtered data going to zlib more consistent, hopefully resulting in
  1261.  * better compression.
  1262.  */
  1263. #if defined(PNG_WRITE_WEIGHTED_FILTER_SUPPORTED)      /* GRR 970116 */
  1264. void PNGAPI
  1265. png_set_filter_heuristics(png_structp png_ptr, int heuristic_method,
  1266.    int num_weights, png_doublep filter_weights,
  1267.    png_doublep filter_costs)
  1268. {
  1269.    int i;
  1271.    png_debug(1, "in png_set_filter_heuristics");
  1272.    if (png_ptr == NULL)
  1273.       return;
  1274.    if (heuristic_method >= PNG_FILTER_HEURISTIC_LAST)
  1275.    {
  1276.       png_warning(png_ptr, "Unknown filter heuristic method");
  1277.       return;
  1278.    }
  1280.    if (heuristic_method == PNG_FILTER_HEURISTIC_DEFAULT)
  1281.    {
  1282.       heuristic_method = PNG_FILTER_HEURISTIC_UNWEIGHTED;
  1283.    }
  1285.    if (num_weights < 0 || filter_weights == NULL ||
  1286.       heuristic_method == PNG_FILTER_HEURISTIC_UNWEIGHTED)
  1287.    {
  1288.       num_weights = 0;
  1289.    }
  1291.    png_ptr->num_prev_filters = (png_byte)num_weights;
  1292.    png_ptr->heuristic_method = (png_byte)heuristic_method;
  1294.    if (num_weights > 0)
  1295.    {
  1296.       if (png_ptr->prev_filters == NULL)
  1297.       {
  1298.          png_ptr->prev_filters = (png_bytep)png_malloc(png_ptr,
  1299.             (png_uint_32)(png_sizeof(png_byte) * num_weights));
  1301.          /* To make sure that the weighting starts out fairly */
  1302.          for (i = 0; i < num_weights; i++)
  1303.          {
  1304.             png_ptr->prev_filters[i] = 255;
  1305.          }
  1306.       }
  1308.       if (png_ptr->filter_weights == NULL)
  1309.       {
  1310.          png_ptr->filter_weights = (png_uint_16p)png_malloc(png_ptr,
  1311.             (png_uint_32)(png_sizeof(png_uint_16) * num_weights));
  1313.          png_ptr->inv_filter_weights = (png_uint_16p)png_malloc(png_ptr,
  1314.             (png_uint_32)(png_sizeof(png_uint_16) * num_weights));
  1315.          for (i = 0; i < num_weights; i++)
  1316.          {
  1317.             png_ptr->inv_filter_weights[i] =
  1318.             png_ptr->filter_weights[i] = PNG_WEIGHT_FACTOR;
  1319.          }
  1320.       }
  1322.       for (i = 0; i < num_weights; i++)
  1323.       {
  1324.          if (filter_weights[i] < 0.0)
  1325.          {
  1326.             png_ptr->inv_filter_weights[i] =
  1327.             png_ptr->filter_weights[i] = PNG_WEIGHT_FACTOR;
  1328.          }
  1329.          else
  1330.          {
  1331.             png_ptr->inv_filter_weights[i] =
  1332.                (png_uint_16)((double)PNG_WEIGHT_FACTOR*filter_weights[i]+0.5);
  1333.             png_ptr->filter_weights[i] =
  1334.                (png_uint_16)((double)PNG_WEIGHT_FACTOR/filter_weights[i]+0.5);
  1335.          }
  1336.       }
  1337.    }
  1339.    /* If, in the future, there are other filter methods, this would
  1340.     * need to be based on png_ptr->filter.
  1341.     */
  1342.    if (png_ptr->filter_costs == NULL)
  1343.    {
  1344.       png_ptr->filter_costs = (png_uint_16p)png_malloc(png_ptr,
  1345.          (png_uint_32)(png_sizeof(png_uint_16) * PNG_FILTER_VALUE_LAST));
  1347.       png_ptr->inv_filter_costs = (png_uint_16p)png_malloc(png_ptr,
  1348.          (png_uint_32)(png_sizeof(png_uint_16) * PNG_FILTER_VALUE_LAST));
  1350.       for (i = 0; i < PNG_FILTER_VALUE_LAST; i++)
  1351.       {
  1352.          png_ptr->inv_filter_costs[i] =
  1353.          png_ptr->filter_costs[i] = PNG_COST_FACTOR;
  1354.       }
  1355.    }
  1357.    /* Here is where we set the relative costs of the different filters.  We
  1358.     * should take the desired compression level into account when setting
  1359.     * the costs, so that Paeth, for instance, has a high relative cost at low
  1360.     * compression levels, while it has a lower relative cost at higher
  1361.     * compression settings.  The filter types are in order of increasing
  1362.     * relative cost, so it would be possible to do this with an algorithm.
  1363.     */
  1364.    for (i = 0; i < PNG_FILTER_VALUE_LAST; i++)
  1365.    {
  1366.       if (filter_costs == NULL || filter_costs[i] < 0.0)
  1367.       {
  1368.          png_ptr->inv_filter_costs[i] =
  1369.          png_ptr->filter_costs[i] = PNG_COST_FACTOR;
  1370.       }
  1371.       else if (filter_costs[i] >= 1.0)
  1372.       {
  1373.          png_ptr->inv_filter_costs[i] =
  1374.             (png_uint_16)((double)PNG_COST_FACTOR / filter_costs[i] + 0.5);
  1375.          png_ptr->filter_costs[i] =
  1376.             (png_uint_16)((double)PNG_COST_FACTOR * filter_costs[i] + 0.5);
  1377.       }
  1378.    }
  1379. }
  1380. #endif /* PNG_WRITE_WEIGHTED_FILTER_SUPPORTED */
  1382. void PNGAPI
  1383. png_set_compression_level(png_structp png_ptr, int level)
  1384. {
  1385.    png_debug(1, "in png_set_compression_level");
  1386.    if (png_ptr == NULL)
  1387.       return;
  1388.    png_ptr->flags |= PNG_FLAG_ZLIB_CUSTOM_LEVEL;
  1389.    png_ptr->zlib_level = level;
  1390. }
  1392. void PNGAPI
  1393. png_set_compression_mem_level(png_structp png_ptr, int mem_level)
  1394. {
  1395.    png_debug(1, "in png_set_compression_mem_level");
  1396.    if (png_ptr == NULL)
  1397.       return;
  1398.    png_ptr->flags |= PNG_FLAG_ZLIB_CUSTOM_MEM_LEVEL;
  1399.    png_ptr->zlib_mem_level = mem_level;
  1400. }
  1402. void PNGAPI
  1403. png_set_compression_strategy(png_structp png_ptr, int strategy)
  1404. {
  1405.    png_debug(1, "in png_set_compression_strategy");
  1406.    if (png_ptr == NULL)
  1407.       return;
  1408.    png_ptr->flags |= PNG_FLAG_ZLIB_CUSTOM_STRATEGY;
  1409.    png_ptr->zlib_strategy = strategy;
  1410. }
  1412. void PNGAPI
  1413. png_set_compression_window_bits(png_structp png_ptr, int window_bits)
  1414. {
  1415.    if (png_ptr == NULL)
  1416.       return;
  1417.    if (window_bits > 15)
  1418.       png_warning(png_ptr, "Only compression windows <= 32k supported by PNG");
  1419.    else if (window_bits < 8)
  1420.       png_warning(png_ptr, "Only compression windows >= 256 supported by PNG");
  1421. #ifndef WBITS_8_OK
  1422.    /* avoid libpng bug with 256-byte windows */
  1423.    if (window_bits == 8)
  1424.      {
  1425.        png_warning(png_ptr, "Compression window is being reset to 512");
  1426.        window_bits=9;
  1427.      }
  1428. #endif
  1429.    png_ptr->flags |= PNG_FLAG_ZLIB_CUSTOM_WINDOW_BITS;
  1430.    png_ptr->zlib_window_bits = window_bits;
  1431. }
  1433. void PNGAPI
  1434. png_set_compression_method(png_structp png_ptr, int method)
  1435. {
  1436.    png_debug(1, "in png_set_compression_method");
  1437.    if (png_ptr == NULL)
  1438.       return;
  1439.    if (method != 8)
  1440.       png_warning(png_ptr, "Only compression method 8 is supported by PNG");
  1441.    png_ptr->flags |= PNG_FLAG_ZLIB_CUSTOM_METHOD;
  1442.    png_ptr->zlib_method = method;
  1443. }
  1445. void PNGAPI
  1446. png_set_write_status_fn(png_structp png_ptr, png_write_status_ptr write_row_fn)
  1447. {
  1448.    if (png_ptr == NULL)
  1449.       return;
  1450.    png_ptr->write_row_fn = write_row_fn;
  1451. }
  1453. #if defined(PNG_WRITE_USER_TRANSFORM_SUPPORTED)
  1454. void PNGAPI
  1455. png_set_write_user_transform_fn(png_structp png_ptr, png_user_transform_ptr
  1456.    write_user_transform_fn)
  1457. {
  1458.    png_debug(1, "in png_set_write_user_transform_fn");
  1459.    if (png_ptr == NULL)
  1460.       return;
  1461.    png_ptr->transformations |= PNG_USER_TRANSFORM;
  1462.    png_ptr->write_user_transform_fn = write_user_transform_fn;
  1463. }
  1464. #endif
  1467. #if defined(PNG_INFO_IMAGE_SUPPORTED)
  1468. void PNGAPI
  1469. png_write_png(png_structp png_ptr, png_infop info_ptr,
  1470.               int transforms, voidp params)
  1471. {
  1472.    if (png_ptr == NULL || info_ptr == NULL)
  1473.       return;
  1474. #if defined(PNG_WRITE_INVERT_ALPHA_SUPPORTED)
  1475.    /* invert the alpha channel from opacity to transparency */
  1476.    if (transforms & PNG_TRANSFORM_INVERT_ALPHA)
  1477.        png_set_invert_alpha(png_ptr);
  1478. #endif
  1480.    /* Write the file header information. */
  1481.    png_write_info(png_ptr, info_ptr);
  1483.    /* ------ these transformations don't touch the info structure ------- */
  1485. #if defined(PNG_WRITE_INVERT_SUPPORTED)
  1486.    /* invert monochrome pixels */
  1487.    if (transforms & PNG_TRANSFORM_INVERT_MONO)
  1488.        png_set_invert_mono(png_ptr);
  1489. #endif
  1491. #if defined(PNG_WRITE_SHIFT_SUPPORTED)
  1492.    /* Shift the pixels up to a legal bit depth and fill in
  1493.     * as appropriate to correctly scale the image.
  1494.     */
  1495.    if ((transforms & PNG_TRANSFORM_SHIFT)
  1496.                && (info_ptr->valid & PNG_INFO_sBIT))
  1497.        png_set_shift(png_ptr, &info_ptr->sig_bit);
  1498. #endif
  1500. #if defined(PNG_WRITE_PACK_SUPPORTED)
  1501.    /* pack pixels into bytes */
  1502.    if (transforms & PNG_TRANSFORM_PACKING)
  1503.        png_set_packing(png_ptr);
  1504. #endif
  1506. #if defined(PNG_WRITE_SWAP_ALPHA_SUPPORTED)
  1507.    /* swap location of alpha bytes from ARGB to RGBA */
  1508.    if (transforms & PNG_TRANSFORM_SWAP_ALPHA)
  1509.        png_set_swap_alpha(png_ptr);
  1510. #endif
  1512. #if defined(PNG_WRITE_FILLER_SUPPORTED)
  1513.    /* Pack XRGB/RGBX/ARGB/RGBA into * RGB (4 channels -> 3 channels) */
  1514.   if (transforms & PNG_TRANSFORM_STRIP_FILLER_AFTER)
  1515.       png_set_filler(png_ptr, 0, PNG_FILLER_AFTER);
  1516.   else if (transforms & PNG_TRANSFORM_STRIP_FILLER_BEFORE)
  1517.       png_set_filler(png_ptr, 0, PNG_FILLER_BEFORE);
  1518. #endif
  1520. #if defined(PNG_WRITE_BGR_SUPPORTED)
  1521.    /* flip BGR pixels to RGB */
  1522.    if (transforms & PNG_TRANSFORM_BGR)
  1523.        png_set_bgr(png_ptr);
  1524. #endif
  1526. #if defined(PNG_WRITE_SWAP_SUPPORTED)
  1527.    /* swap bytes of 16-bit files to most significant byte first */
  1528.    if (transforms & PNG_TRANSFORM_SWAP_ENDIAN)
  1529.        png_set_swap(png_ptr);
  1530. #endif
  1532. #if defined(PNG_WRITE_PACKSWAP_SUPPORTED)
  1533.    /* swap bits of 1, 2, 4 bit packed pixel formats */
  1534.    if (transforms & PNG_TRANSFORM_PACKSWAP)
  1535.        png_set_packswap(png_ptr);
  1536. #endif
  1538.    /* ----------------------- end of transformations ------------------- */
  1540.    /* write the bits */
  1541.    if (info_ptr->valid & PNG_INFO_IDAT)
  1542.        png_write_image(png_ptr, info_ptr->row_pointers);
  1544.    /* It is REQUIRED to call this to finish writing the rest of the file */
  1545.    png_write_end(png_ptr, info_ptr);
  1547.    transforms = transforms; /* quiet compiler warnings */
  1548.    params = params;
  1549. }
  1550. #endif
  1551. #endif /* PNG_WRITE_SUPPORTED */