671242f350d172e106580348e24bab66b0d7e6a5vboxsync//-------------------------------------
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// PNGFILE.C -- Image File Functions
671242f350d172e106580348e24bab66b0d7e6a5vboxsync//-------------------------------------
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// Copyright 2000, Willem van Schaik. For conditions of distribution and
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// use, see the copyright/license/disclaimer notice in png.h
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include <windows.h>
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include <commdlg.h>
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include <stdio.h>
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include <stdlib.h>
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include "png.h"
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include "pngfile.h"
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#include "cexcept.h"
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncdefine_exception_type(const char *);
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncextern struct exception_context the_exception_context[1];
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstruct exception_context the_exception_context[1];
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncpng_const_charp msg;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic OPENFILENAME ofn;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic png_structp png_ptr = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic png_infop info_ptr = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// cexcept interface
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic void
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncpng_cexcept_error(png_structp png_ptr, png_const_charp msg)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if(png_ptr)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#ifndef PNG_NO_CONSOLE_IO
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fprintf(stderr, "libpng error: %s\n", msg);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#endif
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync Throw msg;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// Windows open-file functions
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncvoid PngFileInitialize (HWND hwnd)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync static TCHAR szFilter[] = TEXT ("PNG Files (*.PNG)\0*.png\0")
671242f350d172e106580348e24bab66b0d7e6a5vboxsync TEXT ("All Files (*.*)\0*.*\0\0");
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lStructSize = sizeof (OPENFILENAME);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.hwndOwner = hwnd;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.hInstance = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFilter = szFilter;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrCustomFilter = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.nMaxCustFilter = 0;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.nFilterIndex = 0;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFile = NULL; // Set in Open and Close functions
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.nMaxFile = MAX_PATH;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFileTitle = NULL; // Set in Open and Close functions
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.nMaxFileTitle = MAX_PATH;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrInitialDir = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrTitle = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.Flags = 0; // Set in Open and Close functions
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.nFileOffset = 0;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.nFileExtension = 0;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrDefExt = TEXT ("png");
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lCustData = 0;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpfnHook = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpTemplateName = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncBOOL PngFileOpenDlg (HWND hwnd, PTSTR pstrFileName, PTSTR pstrTitleName)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.hwndOwner = hwnd;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFile = pstrFileName;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFileTitle = pstrTitleName;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.Flags = OFN_HIDEREADONLY;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return GetOpenFileName (&ofn);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncBOOL PngFileSaveDlg (HWND hwnd, PTSTR pstrFileName, PTSTR pstrTitleName)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.hwndOwner = hwnd;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFile = pstrFileName;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.lpstrFileTitle = pstrTitleName;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ofn.Flags = OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return GetSaveFileName (&ofn);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// PNG image handler functions
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncBOOL PngLoadImage (PTSTR pstrFileName, png_byte **ppbImageData,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync int *piWidth, int *piHeight, int *piChannels, png_color *pBkgColor)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync static FILE *pfFile;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_byte pbSig[8];
671242f350d172e106580348e24bab66b0d7e6a5vboxsync int iBitDepth;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync int iColorType;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync double dGamma;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_color_16 *pBackground;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_uint_32 ulChannels;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_uint_32 ulRowBytes;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_byte *pbImageData = *ppbImageData;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync static png_byte **ppbRowPointers = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync int i;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // open the PNG input file
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!pstrFileName)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!(pfFile = fopen(pstrFileName, "rb")))
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // first check the eight byte PNG signature
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fread(pbSig, 1, 8, pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!png_check_sig(pbSig, 8))
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // create the two png(-info) structures
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync (png_error_ptr)png_cexcept_error, (png_error_ptr)NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!png_ptr)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync info_ptr = png_create_info_struct(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!info_ptr)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_destroy_read_struct(&png_ptr, NULL, NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync Try
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // initialize the png structure
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#if !defined(PNG_NO_STDIO)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_init_io(png_ptr, pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#else
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_read_fn(png_ptr, (png_voidp)pfFile, png_read_data);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#endif
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_sig_bytes(png_ptr, 8);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // read all PNG info up to image data
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_read_info(png_ptr, info_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // get width, height, bit-depth and color-type
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_get_IHDR(png_ptr, info_ptr, piWidth, piHeight, &iBitDepth,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync &iColorType, NULL, NULL, NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // expand images of all color-type and bit-depth to 3x8 bit RGB images
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // let the library process things like alpha, transparency, background
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (iBitDepth == 16)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_strip_16(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (iColorType == PNG_COLOR_TYPE_PALETTE)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_expand(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (iBitDepth < 8)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_expand(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (png_get_valid(png_ptr, info_ptr, PNG_INFO_tRNS))
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_expand(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (iColorType == PNG_COLOR_TYPE_GRAY ||
671242f350d172e106580348e24bab66b0d7e6a5vboxsync iColorType == PNG_COLOR_TYPE_GRAY_ALPHA)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_gray_to_rgb(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // set the background color to draw transparent and alpha images over.
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (png_get_bKGD(png_ptr, info_ptr, &pBackground))
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_background(png_ptr, pBackground, PNG_BACKGROUND_GAMMA_FILE, 1, 1.0);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync pBkgColor->red = (byte) pBackground->red;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync pBkgColor->green = (byte) pBackground->green;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync pBkgColor->blue = (byte) pBackground->blue;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync else
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync pBkgColor = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // if required set gamma conversion
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (png_get_gAMA(png_ptr, info_ptr, &dGamma))
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_gamma(png_ptr, (double) 2.2, dGamma);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // after the transformations have been registered update info_ptr data
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_read_update_info(png_ptr, info_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // get again width, height and the new bit-depth and color-type
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_get_IHDR(png_ptr, info_ptr, piWidth, piHeight, &iBitDepth,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync &iColorType, NULL, NULL, NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // row_bytes is the width x number of channels
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ulRowBytes = png_get_rowbytes(png_ptr, info_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ulChannels = png_get_channels(png_ptr, info_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *piChannels = ulChannels;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // now we can allocate memory to store the image
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (pbImageData)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync free (pbImageData);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if ((pbImageData = (png_byte *) malloc(ulRowBytes * (*piHeight)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync * sizeof(png_byte))) == NULL)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_error(png_ptr, "Visual PNG: out of memory");
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // and allocate memory for an array of row-pointers
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if ((ppbRowPointers = (png_bytepp) malloc((*piHeight)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync * sizeof(png_bytep))) == NULL)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_error(png_ptr, "Visual PNG: out of memory");
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // set the individual row-pointers to point at the correct offsets
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync for (i = 0; i < (*piHeight); i++)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ppbRowPointers[i] = pbImageData + i * ulRowBytes;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // now we can go ahead and just read the whole image
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_read_image(png_ptr, ppbRowPointers);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // read the additional chunks in the PNG file (not really needed)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_read_end(png_ptr, NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // and we're done
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync free (ppbRowPointers);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ppbRowPointers = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // yepp, done
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync Catch (msg)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_destroy_read_struct(&png_ptr, &info_ptr, NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync *ppbImageData = pbImageData = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if(ppbRowPointers)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync free (ppbRowPointers);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fclose(pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fclose (pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return TRUE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncBOOL PngSaveImage (PTSTR pstrFileName, png_byte *pDiData,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync int iWidth, int iHeight, png_color bkgColor)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync const int ciBitDepth = 8;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync const int ciChannels = 3;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync static FILE *pfFile;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_uint_32 ulRowBytes;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync static png_byte **ppbRowPointers = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync int i;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // open the PNG output file
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!pstrFileName)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!(pfFile = fopen(pstrFileName, "wb")))
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // prepare the standard PNG structures
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_ptr = png_create_write_struct(PNG_LIBPNG_VER_STRING, NULL,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync (png_error_ptr)png_cexcept_error, (png_error_ptr)NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!png_ptr)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fclose(pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync info_ptr = png_create_info_struct(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (!info_ptr) {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fclose(pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_destroy_write_struct(&png_ptr, (png_infopp) NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync Try
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // initialize the png structure
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#if !defined(PNG_NO_STDIO)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_init_io(png_ptr, pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#else
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_write_fn(png_ptr, (png_voidp)pfFile, png_write_data, png_flush);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#endif
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // we're going to write a very simple 3x8 bit RGB image
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_IHDR(png_ptr, info_ptr, iWidth, iHeight, ciBitDepth,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync PNG_COLOR_TYPE_RGB, PNG_INTERLACE_NONE, PNG_COMPRESSION_TYPE_BASE,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync PNG_FILTER_TYPE_BASE);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // write the file header information
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_write_info(png_ptr, info_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // swap the BGR pixels in the DiData structure to RGB
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_set_bgr(png_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // row_bytes is the width x number of channels
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ulRowBytes = iWidth * ciChannels;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // we can allocate memory for an array of row-pointers
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if ((ppbRowPointers = (png_bytepp) malloc(iHeight * sizeof(png_bytep))) == NULL)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync Throw "Visualpng: Out of memory";
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // set the individual row-pointers to point at the correct offsets
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync for (i = 0; i < iHeight; i++)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ppbRowPointers[i] = pDiData + i * (((ulRowBytes + 3) >> 2) << 2);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // write out the entire image data in one call
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_write_image (png_ptr, ppbRowPointers);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // write the additional chunks to the PNG file (not really needed)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_write_end(png_ptr, info_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // and we're done
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync free (ppbRowPointers);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync ppbRowPointers = NULL;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // clean up after the write, and free any memory allocated
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_destroy_write_struct(&png_ptr, (png_infopp) NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync // yepp, done
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync Catch (msg)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_destroy_write_struct(&png_ptr, (png_infopp) NULL);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if(ppbRowPointers)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync free (ppbRowPointers);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fclose(pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return FALSE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fclose (pfFile);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync return TRUE;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#ifdef PNG_NO_STDIO
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic void
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncpng_read_data(png_structp png_ptr, png_bytep data, png_size_t length)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_size_t check;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync /* fread() returns 0 on error, so it is OK to store this in a png_size_t
671242f350d172e106580348e24bab66b0d7e6a5vboxsync * instead of an int, which is what fread() actually returns.
671242f350d172e106580348e24bab66b0d7e6a5vboxsync */
671242f350d172e106580348e24bab66b0d7e6a5vboxsync check = (png_size_t)fread(data, (png_size_t)1, length,
671242f350d172e106580348e24bab66b0d7e6a5vboxsync (FILE *)png_ptr->io_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (check != length)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_error(png_ptr, "Read Error");
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic void
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncpng_write_data(png_structp png_ptr, png_bytep data, png_size_t length)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_uint_32 check;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync check = fwrite(data, 1, length, (FILE *)(png_ptr->io_ptr));
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (check != length)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync {
671242f350d172e106580348e24bab66b0d7e6a5vboxsync png_error(png_ptr, "Write Error");
671242f350d172e106580348e24bab66b0d7e6a5vboxsync }
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncstatic void
671242f350d172e106580348e24bab66b0d7e6a5vboxsyncpng_flush(png_structp png_ptr)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync{
671242f350d172e106580348e24bab66b0d7e6a5vboxsync FILE *io_ptr;
671242f350d172e106580348e24bab66b0d7e6a5vboxsync io_ptr = (FILE *)CVT_PTR((png_ptr->io_ptr));
671242f350d172e106580348e24bab66b0d7e6a5vboxsync if (io_ptr != NULL)
671242f350d172e106580348e24bab66b0d7e6a5vboxsync fflush(io_ptr);
671242f350d172e106580348e24bab66b0d7e6a5vboxsync}
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync#endif
671242f350d172e106580348e24bab66b0d7e6a5vboxsync
671242f350d172e106580348e24bab66b0d7e6a5vboxsync//-----------------
671242f350d172e106580348e24bab66b0d7e6a5vboxsync// end of source
671242f350d172e106580348e24bab66b0d7e6a5vboxsync//-----------------