compiler/libpng/pngset.c

   1
   2 /* pngset.c - storage of image information into info struct
   3  *
   4  * libpng 1.0.10 - March 30, 2001
   5  * For conditions of distribution and use, see copyright notice in png.h
   6  * Copyright (c) 1998-2001 Glenn Randers-Pehrson
   7  * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
   8  * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
   9  *
  10  * The functions here are used during reads to store data from the file
  11  * into the info struct, and during writes to store application data
  12  * into the info struct for writing into the file.  This abstracts the
  13  * info struct and allows us to change the structure in the future.
  14  */
  15
  16 #define PNG_INTERNAL
  17 #include "png.h"
  18
  19 #if defined(PNG_bKGD_SUPPORTED)
  20 void PNGAPI
  21 png_set_bKGD(png_structp png_ptr, png_infop info_ptr, png_color_16p background)
  22 {
  23    png_debug1(1, "in %s storage function\n", "bKGD");
  24    if (png_ptr == NULL || info_ptr == NULL)
  25       return;
  26
  27    png_memcpy(&(info_ptr->background), background, sizeof(png_color_16));
  28    info_ptr->valid |= PNG_INFO_bKGD;
  29 }
  30 #endif
  31
  32 #if defined(PNG_cHRM_SUPPORTED)
  33 #ifdef PNG_FLOATING_POINT_SUPPORTED
  34 void PNGAPI
  35 png_set_cHRM(png_structp png_ptr, png_infop info_ptr,
  36    double white_x, double white_y, double red_x, double red_y,
  37    double green_x, double green_y, double blue_x, double blue_y)
  38 {
  39    png_debug1(1, "in %s storage function\n", "cHRM");
  40    if (png_ptr == NULL || info_ptr == NULL)
  41       return;
  42
  43    info_ptr->x_white = (float)white_x;
  44    info_ptr->y_white = (float)white_y;
  45    info_ptr->x_red   = (float)red_x;
  46    info_ptr->y_red   = (float)red_y;
  47    info_ptr->x_green = (float)green_x;
  48    info_ptr->y_green = (float)green_y;
  49    info_ptr->x_blue  = (float)blue_x;
  50    info_ptr->y_blue  = (float)blue_y;
  51 #ifdef PNG_FIXED_POINT_SUPPORTED
  52    info_ptr->int_x_white = (png_fixed_point)(white_x*100000.+0.5);
  53    info_ptr->int_y_white = (png_fixed_point)(white_y*100000.+0.5);
  54    info_ptr->int_x_red   = (png_fixed_point)(red_x*100000.+0.5);
  55    info_ptr->int_y_red   = (png_fixed_point)(red_y*100000.+0.5);
  56    info_ptr->int_x_green = (png_fixed_point)(green_x*100000.+0.5);
  57    info_ptr->int_y_green = (png_fixed_point)(green_y*100000.+0.5);
  58    info_ptr->int_x_blue  = (png_fixed_point)(blue_x*100000.+0.5);
  59    info_ptr->int_y_blue  = (png_fixed_point)(blue_y*100000.+0.5);
  60 #endif
  61    info_ptr->valid |= PNG_INFO_cHRM;
  62 }
  63 #endif
  64 #ifdef PNG_FIXED_POINT_SUPPORTED
  65 void PNGAPI
  66 png_set_cHRM_fixed(png_structp png_ptr, png_infop info_ptr,
  67    png_fixed_point white_x, png_fixed_point white_y, png_fixed_point red_x,
  68    png_fixed_point red_y, png_fixed_point green_x, png_fixed_point green_y,
  69    png_fixed_point blue_x, png_fixed_point blue_y)
  70 {
  71    png_debug1(1, "in %s storage function\n", "cHRM");
  72    if (png_ptr == NULL || info_ptr == NULL)
  73       return;
  74
  75    info_ptr->int_x_white = white_x;
  76    info_ptr->int_y_white = white_y;
  77    info_ptr->int_x_red   = red_x;
  78    info_ptr->int_y_red   = red_y;
  79    info_ptr->int_x_green = green_x;
  80    info_ptr->int_y_green = green_y;
  81    info_ptr->int_x_blue  = blue_x;
  82    info_ptr->int_y_blue  = blue_y;
  83 #ifdef PNG_FLOATING_POINT_SUPPORTED
  84    info_ptr->x_white = (float)(white_x/100000.);
  85    info_ptr->y_white = (float)(white_y/100000.);
  86    info_ptr->x_red   = (float)(red_x/100000.);
  87    info_ptr->y_red   = (float)(red_y/100000.);
  88    info_ptr->x_green = (float)(green_x/100000.);
  89    info_ptr->y_green = (float)(green_y/100000.);
  90    info_ptr->x_blue  = (float)(blue_x/100000.);
  91    info_ptr->y_blue  = (float)(blue_y/100000.);
  92 #endif
  93    info_ptr->valid |= PNG_INFO_cHRM;
  94 }
  95 #endif
  96 #endif
  97
  98 #if defined(PNG_gAMA_SUPPORTED)
  99 #ifdef PNG_FLOATING_POINT_SUPPORTED
 100 void PNGAPI
 101 png_set_gAMA(png_structp png_ptr, png_infop info_ptr, double file_gamma)
 102 {
 103    png_debug1(1, "in %s storage function\n", "gAMA");
 104    if (png_ptr == NULL || info_ptr == NULL)
 105       return;
 106
 107    info_ptr->gamma = (float)file_gamma;
 108 #ifdef PNG_FIXED_POINT_SUPPORTED
 109    info_ptr->int_gamma = (int)(file_gamma*100000.+.5);
 110 #endif
 111    info_ptr->valid |= PNG_INFO_gAMA;
 112    if(file_gamma == 0.0)
 113       png_warning(png_ptr, "Setting gamma=0");
 114 }
 115 #endif
 116 void PNGAPI
 117 png_set_gAMA_fixed(png_structp png_ptr, png_infop info_ptr, png_fixed_point
 118    int_gamma)
 119 {
 120    png_debug1(1, "in %s storage function\n", "gAMA");
 121    if (png_ptr == NULL || info_ptr == NULL)
 122       return;
 123
 124 #ifdef PNG_FLOATING_POINT_SUPPORTED
 125    info_ptr->gamma = (float)(int_gamma/100000.);
 126 #endif
 127 #ifdef PNG_FIXED_POINT_SUPPORTED
 128    info_ptr->int_gamma = int_gamma;
 129 #endif
 130    info_ptr->valid |= PNG_INFO_gAMA;
 131    if(int_gamma == 0)
 132       png_warning(png_ptr, "Setting gamma=0");
 133 }
 134 #endif
 135
 136 #if defined(PNG_hIST_SUPPORTED)
 137 void PNGAPI
 138 png_set_hIST(png_structp png_ptr, png_infop info_ptr, png_uint_16p hist)
 139 {
 140    int  i;
 141
 142    png_debug1(1, "in %s storage function\n", "hIST");
 143    if (png_ptr == NULL || info_ptr == NULL)
 144       return;
 145    if (info_ptr->num_palette == 0)
 146        png_warning(png_ptr,
 147                    "Palette size 0, hIST allocation skipped.");
 148
 149 #ifdef PNG_FREE_ME_SUPPORTED
 150    png_free_data(png_ptr, info_ptr, PNG_FREE_HIST, 0);
 151 #endif
 152    png_ptr->hist = (png_uint_16p)png_malloc(png_ptr,
 153       (png_uint_32)(info_ptr->num_palette * sizeof (png_uint_16)));
 154
 155    for (i = 0; i < info_ptr->num_palette; i++)
 156        png_ptr->hist[i] = hist[i];
 157    info_ptr->hist = png_ptr->hist;
 158    info_ptr->valid |= PNG_INFO_hIST;
 159
 160 #ifdef PNG_FREE_ME_SUPPORTED
 161    info_ptr->free_me |= PNG_FREE_HIST;
 162 #else
 163    png_ptr->flags |= PNG_FLAG_FREE_HIST;
 164 #endif
 165 }
 166 #endif
 167
 168 void PNGAPI
 169 png_set_IHDR(png_structp png_ptr, png_infop info_ptr,
 170    png_uint_32 width, png_uint_32 height, int bit_depth,
 171    int color_type, int interlace_type, int compression_type,
 172    int filter_type)
 173 {
 174    int rowbytes_per_pixel;
 175    png_debug1(1, "in %s storage function\n", "IHDR");
 176    if (png_ptr == NULL || info_ptr == NULL)
 177       return;
 178
 179    /* check for width and height valid values */
 180    if (width == 0 || height == 0)
 181       png_error(png_ptr, "Image width or height is zero in IHDR");
 182    if (width > PNG_MAX_UINT || height > PNG_MAX_UINT)
 183       png_error(png_ptr, "Invalid image size in IHDR");
 184
 185    /* check other values */
 186    if (bit_depth != 1 && bit_depth != 2 && bit_depth != 4 &&
 187       bit_depth != 8 && bit_depth != 16)
 188       png_error(png_ptr, "Invalid bit depth in IHDR");
 189
 190    if (color_type < 0 || color_type == 1 ||
 191       color_type == 5 || color_type > 6)
 192       png_error(png_ptr, "Invalid color type in IHDR");
 193
 194    if (((color_type == PNG_COLOR_TYPE_PALETTE) && bit_depth > 8) ||
 195        ((color_type == PNG_COLOR_TYPE_RGB ||
 196          color_type == PNG_COLOR_TYPE_GRAY_ALPHA ||
 197          color_type == PNG_COLOR_TYPE_RGB_ALPHA) && bit_depth < 8))
 198       png_error(png_ptr, "Invalid color type/bit depth combination in IHDR");
 199
 200    if (interlace_type >= PNG_INTERLACE_LAST)
 201       png_error(png_ptr, "Unknown interlace method in IHDR");
 202
 203    if (compression_type != PNG_COMPRESSION_TYPE_BASE)
 204       png_error(png_ptr, "Unknown compression method in IHDR");
 205
 206 #if defined(PNG_MNG_FEATURES_SUPPORTED)
 207    /* Accept filter_method 64 (intrapixel differencing) only if
 208     * 1. Libpng was compiled with PNG_MNG_FEATURES_SUPPORTED and
 209     * 2. Libpng did not read a PNG signature (this filter_method is only
 210     *    used in PNG datastreams that are embedded in MNG datastreams) and
 211     * 3. The application called png_permit_mng_features with a mask that
 212     *    included PNG_FLAG_MNG_FILTER_64 and
 213     * 4. The filter_method is 64 and
 214     * 5. The color_type is RGB or RGBA
 215     */
 216    if((png_ptr->mode&PNG_HAVE_PNG_SIGNATURE)&&png_ptr->mng_features_permitted)
 217       png_warning(png_ptr,"MNG features are not allowed in a PNG datastream\n");
 218    if(filter_type != PNG_FILTER_TYPE_BASE)
 219    {
 220      if(!((png_ptr->mng_features_permitted & PNG_FLAG_MNG_FILTER_64) &&
 221         (filter_type == PNG_INTRAPIXEL_DIFFERENCING) &&
 222         ((png_ptr->mode&PNG_HAVE_PNG_SIGNATURE) == 0) &&
 223         (color_type == PNG_COLOR_TYPE_RGB ||
 224          color_type == PNG_COLOR_TYPE_RGB_ALPHA)))
 225         png_error(png_ptr, "Unknown filter method in IHDR");
 226      if(png_ptr->mode&PNG_HAVE_PNG_SIGNATURE)
 227         png_warning(png_ptr, "Invalid filter method in IHDR");
 228    }
 229 #else
 230    if(filter_type != PNG_FILTER_TYPE_BASE)
 231       png_error(png_ptr, "Unknown filter method in IHDR");
 232 #endif
 233
 234    info_ptr->width = width;
 235    info_ptr->height = height;
 236    info_ptr->bit_depth = (png_byte)bit_depth;
 237    info_ptr->color_type =(png_byte) color_type;
 238    info_ptr->compression_type = (png_byte)compression_type;
 239    info_ptr->filter_type = (png_byte)filter_type;
 240    info_ptr->interlace_type = (png_byte)interlace_type;
 241    if (info_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
 242       info_ptr->channels = 1;
 243    else if (info_ptr->color_type & PNG_COLOR_MASK_COLOR)
 244       info_ptr->channels = 3;
 245    else
 246       info_ptr->channels = 1;
 247    if (info_ptr->color_type & PNG_COLOR_MASK_ALPHA)
 248       info_ptr->channels++;
 249    info_ptr->pixel_depth = (png_byte)(info_ptr->channels * info_ptr->bit_depth);
 250
 251    /* check for overflow */
 252    rowbytes_per_pixel = (info_ptr->pixel_depth + 7) >> 3;
 253    if (( width > PNG_MAX_UINT/rowbytes_per_pixel))
 254    {
 255       png_warning(png_ptr,
 256          "Width too large to process image data; rowbytes will overflow.");
 257       info_ptr->rowbytes = (png_size_t)0;
 258    }
 259    else
 260       info_ptr->rowbytes = (info_ptr->width * info_ptr->pixel_depth + 7) >> 3;
 261 }
 262
 263 #if defined(PNG_oFFs_SUPPORTED)
 264 void PNGAPI
 265 png_set_oFFs(png_structp png_ptr, png_infop info_ptr,
 266    png_int_32 offset_x, png_int_32 offset_y, int unit_type)
 267 {
 268    png_debug1(1, "in %s storage function\n", "oFFs");
 269    if (png_ptr == NULL || info_ptr == NULL)
 270       return;
 271
 272    info_ptr->x_offset = offset_x;
 273    info_ptr->y_offset = offset_y;
 274    info_ptr->offset_unit_type = (png_byte)unit_type;
 275    info_ptr->valid |= PNG_INFO_oFFs;
 276 }
 277 #endif
 278
 279 #if defined(PNG_pCAL_SUPPORTED)
 280 void PNGAPI
 281 png_set_pCAL(png_structp png_ptr, png_infop info_ptr,
 282    png_charp purpose, png_int_32 X0, png_int_32 X1, int type, int nparams,
 283    png_charp units, png_charpp params)
 284 {
 285    png_uint_32 length;
 286    int i;
 287
 288    png_debug1(1, "in %s storage function\n", "pCAL");
 289    if (png_ptr == NULL || info_ptr == NULL)
 290       return;
 291
 292    length = png_strlen(purpose) + 1;
 293    png_debug1(3, "allocating purpose for info (%lu bytes)\n", length);
 294    info_ptr->pcal_purpose = (png_charp)png_malloc(png_ptr, length);
 295    png_memcpy(info_ptr->pcal_purpose, purpose, (png_size_t)length);
 296
 297    png_debug(3, "storing X0, X1, type, and nparams in info\n");
 298    info_ptr->pcal_X0 = X0;
 299    info_ptr->pcal_X1 = X1;
 300    info_ptr->pcal_type = (png_byte)type;
 301    info_ptr->pcal_nparams = (png_byte)nparams;
 302
 303    length = png_strlen(units) + 1;
 304    png_debug1(3, "allocating units for info (%lu bytes)\n", length);
 305    info_ptr->pcal_units = (png_charp)png_malloc(png_ptr, length);
 306    png_memcpy(info_ptr->pcal_units, units, (png_size_t)length);
 307
 308    info_ptr->pcal_params = (png_charpp)png_malloc(png_ptr,
 309       (png_uint_32)((nparams + 1) * sizeof(png_charp)));
 310    info_ptr->pcal_params[nparams] = NULL;
 311
 312    for (i = 0; i < nparams; i++)
 313    {
 314       length = png_strlen(params[i]) + 1;
 315       png_debug2(3, "allocating parameter %d for info (%lu bytes)\n", i, length);
 316       info_ptr->pcal_params[i] = (png_charp)png_malloc(png_ptr, length);
 317       png_memcpy(info_ptr->pcal_params[i], params[i], (png_size_t)length);
 318    }
 319
 320    info_ptr->valid |= PNG_INFO_pCAL;
 321 #ifdef PNG_FREE_ME_SUPPORTED
 322    info_ptr->free_me |= PNG_FREE_PCAL;
 323 #endif
 324 }
 325 #endif
 326
 327 #if defined(PNG_READ_sCAL_SUPPORTED) || defined(PNG_WRITE_sCAL_SUPPORTED)
 328 #ifdef PNG_FLOATING_POINT_SUPPORTED
 329 void PNGAPI
 330 png_set_sCAL(png_structp png_ptr, png_infop info_ptr,
 331              int unit, double width, double height)
 332 {
 333    png_debug1(1, "in %s storage function\n", "sCAL");
 334    if (png_ptr == NULL || info_ptr == NULL)
 335       return;
 336
 337    info_ptr->scal_unit = (png_byte)unit;
 338    info_ptr->scal_pixel_width = width;
 339    info_ptr->scal_pixel_height = height;
 340
 341    info_ptr->valid |= PNG_INFO_sCAL;
 342 }
 343 #else
 344 #ifdef PNG_FIXED_POINT_SUPPORTED
 345 void PNGAPI
 346 png_set_sCAL_s(png_structp png_ptr, png_infop info_ptr,
 347              int unit, png_charp swidth, png_charp sheight)
 348 {
 349    png_uint_32 length;
 350
 351    png_debug1(1, "in %s storage function\n", "sCAL");
 352    if (png_ptr == NULL || info_ptr == NULL)
 353       return;
 354
 355    info_ptr->scal_unit = (png_byte)unit;
 356
 357    length = png_strlen(swidth) + 1;
 358    png_debug1(3, "allocating unit for info (%d bytes)\n", length);
 359    info_ptr->scal_s_width = (png_charp)png_malloc(png_ptr, length);
 360    png_memcpy(info_ptr->scal_s_width, swidth, (png_size_t)length);
 361
 362    length = png_strlen(sheight) + 1;
 363    png_debug1(3, "allocating unit for info (%d bytes)\n", length);
 364    info_ptr->scal_s_width = (png_charp)png_malloc(png_ptr, length);
 365    png_memcpy(info_ptr->scal_s_height, sheight, (png_size_t)length);
 366
 367    info_ptr->valid |= PNG_INFO_sCAL;
 368 #ifdef PNG_FREE_ME_SUPPORTED
 369    info_ptr->free_me |= PNG_FREE_SCAL;
 370 #endif
 371 }
 372 #endif
 373 #endif
 374 #endif
 375
 376 #if defined(PNG_pHYs_SUPPORTED)
 377 void PNGAPI
 378 png_set_pHYs(png_structp png_ptr, png_infop info_ptr,
 379    png_uint_32 res_x, png_uint_32 res_y, int unit_type)
 380 {
 381    png_debug1(1, "in %s storage function\n", "pHYs");
 382    if (png_ptr == NULL || info_ptr == NULL)
 383       return;
 384
 385    info_ptr->x_pixels_per_unit = res_x;
 386    info_ptr->y_pixels_per_unit = res_y;
 387    info_ptr->phys_unit_type = (png_byte)unit_type;
 388    info_ptr->valid |= PNG_INFO_pHYs;
 389 }
 390 #endif
 391
 392 void PNGAPI
 393 png_set_PLTE(png_structp png_ptr, png_infop info_ptr,
 394    png_colorp palette, int num_palette)
 395 {
 396
 397    png_debug1(1, "in %s storage function\n", "PLTE");
 398    if (png_ptr == NULL || info_ptr == NULL)
 399       return;
 400
 401    /*
 402     * It may not actually be necessary to set png_ptr->palette here;
 403     * we do it for backward compatibility with the way the png_handle_tRNS
 404     * function used to do the allocation.
 405     */
 406 #ifdef PNG_FREE_ME_SUPPORTED
 407    png_free_data(png_ptr, info_ptr, PNG_FREE_PLTE, 0);
 408 #endif
 409    png_ptr->palette = (png_colorp)png_zalloc(png_ptr, (uInt)num_palette,
 410       sizeof (png_color));
 411    png_memcpy(png_ptr->palette, palette, num_palette * sizeof (png_color));
 412    info_ptr->palette = png_ptr->palette;
 413    info_ptr->num_palette = png_ptr->num_palette = (png_uint_16)num_palette;
 414
 415 #ifdef PNG_FREE_ME_SUPPORTED
 416    info_ptr->free_me |= PNG_FREE_PLTE;
 417 #else
 418    png_ptr->flags |= PNG_FLAG_FREE_PLTE;
 419 #endif
 420
 421    info_ptr->valid |= PNG_INFO_PLTE;
 422 }
 423
 424 #if defined(PNG_sBIT_SUPPORTED)
 425 void PNGAPI
 426 png_set_sBIT(png_structp png_ptr, png_infop info_ptr,
 427    png_color_8p sig_bit)
 428 {
 429    png_debug1(1, "in %s storage function\n", "sBIT");
 430    if (png_ptr == NULL || info_ptr == NULL)
 431       return;
 432
 433    png_memcpy(&(info_ptr->sig_bit), sig_bit, sizeof (png_color_8));
 434    info_ptr->valid |= PNG_INFO_sBIT;
 435 }
 436 #endif
 437
 438 #if defined(PNG_sRGB_SUPPORTED)
 439 void PNGAPI
 440 png_set_sRGB(png_structp png_ptr, png_infop info_ptr, int intent)
 441 {
 442    png_debug1(1, "in %s storage function\n", "sRGB");
 443    if (png_ptr == NULL || info_ptr == NULL)
 444       return;
 445
 446    info_ptr->srgb_intent = (png_byte)intent;
 447    info_ptr->valid |= PNG_INFO_sRGB;
 448 }
 449
 450 void PNGAPI
 451 png_set_sRGB_gAMA_and_cHRM(png_structp png_ptr, png_infop info_ptr,
 452    int intent)
 453 {
 454 #if defined(PNG_gAMA_SUPPORTED)
 455 #ifdef PNG_FLOATING_POINT_SUPPORTED
 456    float file_gamma;
 457 #endif
 458 #ifdef PNG_FIXED_POINT_SUPPORTED
 459    png_fixed_point int_file_gamma;
 460 #endif
 461 #endif
 462 #if defined(PNG_cHRM_SUPPORTED)
 463 #ifdef PNG_FLOATING_POINT_SUPPORTED
 464    float white_x, white_y, red_x, red_y, green_x, green_y, blue_x, blue_y;
 465 #endif
 466 #ifdef PNG_FIXED_POINT_SUPPORTED
 467    png_fixed_point int_white_x, int_white_y, int_red_x, int_red_y, int_green_x,
 468       int_green_y, int_blue_x, int_blue_y;
 469 #endif
 470 #endif
 471    png_debug1(1, "in %s storage function\n", "sRGB_gAMA_and_cHRM");
 472    if (png_ptr == NULL || info_ptr == NULL)
 473       return;
 474
 475    png_set_sRGB(png_ptr, info_ptr, intent);
 476
 477 #if defined(PNG_gAMA_SUPPORTED)
 478 #ifdef PNG_FLOATING_POINT_SUPPORTED
 479    file_gamma = (float).45455;
 480    png_set_gAMA(png_ptr, info_ptr, file_gamma);
 481 #endif
 482 #ifdef PNG_FIXED_POINT_SUPPORTED
 483    int_file_gamma = 45455L;
 484    png_set_gAMA_fixed(png_ptr, info_ptr, int_file_gamma);
 485 #endif
 486 #endif
 487
 488 #if defined(PNG_cHRM_SUPPORTED)
 489 #ifdef PNG_FIXED_POINT_SUPPORTED
 490    int_white_x = 31270L;
 491    int_white_y = 32900L;
 492    int_red_x   = 64000L;
 493    int_red_y   = 33000L;
 494    int_green_x = 30000L;
 495    int_green_y = 60000L;
 496    int_blue_x  = 15000L;
 497    int_blue_y  =  6000L;
 498
 499    png_set_cHRM_fixed(png_ptr, info_ptr,
 500       int_white_x, int_white_y, int_red_x, int_red_y, int_green_x, int_green_y,
 501       int_blue_x, int_blue_y);
 502 #endif
 503 #ifdef PNG_FLOATING_POINT_SUPPORTED
 504    white_x = (float).3127;
 505    white_y = (float).3290;
 506    red_x   = (float).64;
 507    red_y   = (float).33;
 508    green_x = (float).30;
 509    green_y = (float).60;
 510    blue_x  = (float).15;
 511    blue_y  = (float).06;
 512
 513    png_set_cHRM(png_ptr, info_ptr,
 514       white_x, white_y, red_x, red_y, green_x, green_y, blue_x, blue_y);
 515 #endif
 516 #endif
 517 }
 518 #endif
 519
 520
 521 #if defined(PNG_iCCP_SUPPORTED)
 522 void PNGAPI
 523 png_set_iCCP(png_structp png_ptr, png_infop info_ptr,
 524              png_charp name, int compression_type,
 525              png_charp profile, png_uint_32 proflen)
 526 {
 527    png_charp new_iccp_name;
 528    png_charp new_iccp_profile;
 529
 530    png_debug1(1, "in %s storage function\n", "iCCP");
 531    if (png_ptr == NULL || info_ptr == NULL || name == NULL || profile == NULL)
 532       return;
 533
 534    new_iccp_name = png_malloc(png_ptr, png_strlen(name)+1);
 535    png_strcpy(new_iccp_name, name);
 536    new_iccp_profile = png_malloc(png_ptr, proflen);
 537    png_memcpy(new_iccp_profile, profile, (png_size_t)proflen);
 538
 539    png_free_data(png_ptr, info_ptr, PNG_FREE_ICCP, 0);
 540
 541    info_ptr->iccp_proflen = proflen;
 542    info_ptr->iccp_name = new_iccp_name;
 543    info_ptr->iccp_profile = new_iccp_profile;
 544    /* Compression is always zero but is here so the API and info structure
 545     * does not have to change if we introduce multiple compression types */
 546    info_ptr->iccp_compression = (png_byte)compression_type;
 547 #ifdef PNG_FREE_ME_SUPPORTED
 548    info_ptr->free_me |= PNG_FREE_ICCP;
 549 #endif
 550    info_ptr->valid |= PNG_INFO_iCCP;
 551 }
 552 #endif
 553
 554 #if defined(PNG_TEXT_SUPPORTED)
 555 void PNGAPI
 556 png_set_text(png_structp png_ptr, png_infop info_ptr, png_textp text_ptr,
 557    int num_text)
 558 {
 559    int i;
 560
 561    png_debug1(1, "in %s storage function\n", (png_ptr->chunk_name[0] == '\0' ?
 562       "text" : (png_const_charp)png_ptr->chunk_name));
 563
 564    if (png_ptr == NULL || info_ptr == NULL || num_text == 0)
 565       return;
 566
 567    /* Make sure we have enough space in the "text" array in info_struct
 568     * to hold all of the incoming text_ptr objects.
 569     */
 570    if (info_ptr->num_text + num_text > info_ptr->max_text)
 571    {
 572       if (info_ptr->text != NULL)
 573       {
 574          png_textp old_text;
 575          int old_max;
 576
 577          old_max = info_ptr->max_text;
 578          info_ptr->max_text = info_ptr->num_text + num_text + 8;
 579          old_text = info_ptr->text;
 580          info_ptr->text = (png_textp)png_malloc(png_ptr,
 581             (png_uint_32)(info_ptr->max_text * sizeof (png_text)));
 582          png_memcpy(info_ptr->text, old_text, (png_size_t)(old_max *
 583             sizeof(png_text)));
 584          png_free(png_ptr, old_text);
 585       }
 586       else
 587       {
 588          info_ptr->max_text = num_text + 8;
 589          info_ptr->num_text = 0;
 590          info_ptr->text = (png_textp)png_malloc(png_ptr,
 591             (png_uint_32)(info_ptr->max_text * sizeof (png_text)));
 592 #ifdef PNG_FREE_ME_SUPPORTED
 593          info_ptr->free_me |= PNG_FREE_TEXT;
 594 #endif
 595       }
 596       png_debug1(3, "allocated %d entries for info_ptr->text\n",
 597          info_ptr->max_text);
 598    }
 599    for (i = 0; i < num_text; i++)
 600    {
 601       png_size_t text_length,key_len;
 602       png_size_t lang_len,lang_key_len;
 603       png_textp textp = &(info_ptr->text[info_ptr->num_text]);
 604
 605       if (text_ptr[i].key == (png_charp)NULL)
 606           continue;
 607
 608       key_len = png_strlen(text_ptr[i].key);
 609
 610       if(text_ptr[i].compression <= 0)
 611       {
 612         lang_len = 0;
 613         lang_key_len = 0;
 614       }
 615       else
 616 #ifdef PNG_iTXt_SUPPORTED
 617       {
 618         /* set iTXt data */
 619         if (text_ptr[i].key != (png_charp)NULL)
 620           lang_len = png_strlen(text_ptr[i].lang);
 621         else
 622           lang_len = 0;
 623         if (text_ptr[i].lang_key != (png_charp)NULL)
 624           lang_key_len = png_strlen(text_ptr[i].lang_key);
 625         else
 626           lang_key_len = 0;
 627       }
 628 #else
 629       {
 630         png_warning(png_ptr, "iTXt chunk not supported.");
 631         continue;
 632       }
 633 #endif
 634
 635       if (text_ptr[i].text == (png_charp)NULL || text_ptr[i].text[0] == '\0')
 636       {
 637          text_length = 0;
 638 #ifdef PNG_iTXt_SUPPORTED
 639          if(text_ptr[i].compression > 0)
 640             textp->compression = PNG_ITXT_COMPRESSION_NONE;
 641          else
 642 #endif
 643             textp->compression = PNG_TEXT_COMPRESSION_NONE;
 644       }
 645       else
 646       {
 647          text_length = png_strlen(text_ptr[i].text);
 648          textp->compression = text_ptr[i].compression;
 649       }
 650
 651       textp->key = (png_charp)png_malloc(png_ptr,
 652          (png_uint_32)(key_len + text_length + lang_len + lang_key_len + 4));
 653       png_debug2(2, "Allocated %d bytes at %x in png_set_text\n",
 654          key_len + lang_len + lang_key_len + text_length + 4, (int)textp->key);
 655
 656       png_memcpy(textp->key, text_ptr[i].key,
 657          (png_size_t)(key_len));
 658       *(textp->key+key_len) = '\0';
 659 #ifdef PNG_iTXt_SUPPORTED
 660       if (text_ptr[i].compression > 0)
 661       {
 662          textp->lang=textp->key + key_len + 1;
 663          png_memcpy(textp->lang, text_ptr[i].lang, lang_len);
 664          *(textp->lang+lang_len) = '\0';
 665          textp->lang_key=textp->lang + lang_len + 1;
 666          png_memcpy(textp->lang_key, text_ptr[i].lang_key, lang_key_len);
 667          *(textp->lang_key+lang_key_len) = '\0';
 668          textp->text=textp->lang_key + lang_key_len + 1;
 669       }
 670       else
 671 #endif
 672       {
 673 #ifdef PNG_iTXt_SUPPORTED
 674          textp->lang=(png_charp)NULL;
 675          textp->lang_key=(png_charp)NULL;
 676 #endif
 677          textp->text=textp->key + key_len + 1;
 678       }
 679       if(text_length)
 680          png_memcpy(textp->text, text_ptr[i].text,
 681             (png_size_t)(text_length));
 682       *(textp->text+text_length) = '\0';
 683
 684 #ifdef PNG_iTXt_SUPPORTED
 685       if(textp->compression > 0)
 686       {
 687          textp->text_length = 0;
 688          textp->itxt_length = text_length;
 689       }
 690       else
 691 #endif
 692       {
 693          textp->text_length = text_length;
 694 #ifdef PNG_iTXt_SUPPORTED
 695          textp->itxt_length = 0;
 696 #endif
 697       }
 698       info_ptr->text[info_ptr->num_text]= *textp;
 699       info_ptr->num_text++;
 700       png_debug1(3, "transferred text chunk %d\n", info_ptr->num_text);
 701    }
 702 }
 703 #endif
 704
 705 #if defined(PNG_tIME_SUPPORTED)
 706 void PNGAPI
 707 png_set_tIME(png_structp png_ptr, png_infop info_ptr, png_timep mod_time)
 708 {
 709    png_debug1(1, "in %s storage function\n", "tIME");
 710    if (png_ptr == NULL || info_ptr == NULL ||
 711        (png_ptr->mode & PNG_WROTE_tIME))
 712       return;
 713
 714    png_memcpy(&(info_ptr->mod_time), mod_time, sizeof (png_time));
 715    info_ptr->valid |= PNG_INFO_tIME;
 716 }
 717 #endif
 718
 719 #if defined(PNG_tRNS_SUPPORTED)
 720 void PNGAPI
 721 png_set_tRNS(png_structp png_ptr, png_infop info_ptr,
 722    png_bytep trans, int num_trans, png_color_16p trans_values)
 723 {
 724    png_debug1(1, "in %s storage function\n", "tRNS");
 725    if (png_ptr == NULL || info_ptr == NULL)
 726       return;
 727
 728    if (trans != NULL)
 729    {
 730        /*
 731         * It may not actually be necessary to set png_ptr->trans here;
 732         * we do it for backward compatibility with the way the png_handle_tRNS
 733         * function used to do the allocation.
 734         */
 735 #ifdef PNG_FREE_ME_SUPPORTED
 736        png_free_data(png_ptr, info_ptr, PNG_FREE_TRNS, 0);
 737 #endif
 738        png_ptr->trans = info_ptr->trans = png_malloc(png_ptr, num_trans);
 739        png_memcpy(info_ptr->trans, trans, num_trans);
 740 #ifdef PNG_FREE_ME_SUPPORTED
 741        info_ptr->free_me |= PNG_FREE_TRNS;
 742 #else
 743        png_ptr->flags |= PNG_FLAG_FREE_TRNS;
 744 #endif
 745    }
 746
 747    if (trans_values != NULL)
 748    {
 749       png_memcpy(&(info_ptr->trans_values), trans_values,
 750          sizeof(png_color_16));
 751       if (num_trans == 0)
 752         num_trans = 1;
 753    }
 754    info_ptr->num_trans = (png_uint_16)num_trans;
 755    info_ptr->valid |= PNG_INFO_tRNS;
 756 }
 757 #endif
 758
 759 #if defined(PNG_sPLT_SUPPORTED)
 760 void PNGAPI
 761 png_set_sPLT(png_structp png_ptr,
 762              png_infop info_ptr, png_sPLT_tp entries, int nentries)
 763 {
 764     png_sPLT_tp np;
 765     int i;
 766
 767     np = (png_sPLT_tp)png_malloc(png_ptr,
 768         (info_ptr->splt_palettes_num + nentries) * sizeof(png_sPLT_t));
 769
 770     png_memcpy(np, info_ptr->splt_palettes,
 771            info_ptr->splt_palettes_num * sizeof(png_sPLT_t));
 772     png_free(png_ptr, info_ptr->splt_palettes);
 773     info_ptr->splt_palettes=NULL;
 774
 775     for (i = 0; i < nentries; i++)
 776     {
 777         png_sPLT_tp to = np + info_ptr->splt_palettes_num + i;
 778         png_sPLT_tp from = entries + i;
 779
 780         to->name = (png_charp)png_malloc(png_ptr,
 781                                         png_strlen(from->name) + 1);
 782         png_strcpy(to->name, from->name);
 783         to->entries = (png_sPLT_entryp)png_malloc(png_ptr,
 784                                  from->nentries * sizeof(png_sPLT_t));
 785         png_memcpy(to->entries, from->entries,
 786                from->nentries * sizeof(png_sPLT_t));
 787         to->nentries = from->nentries;
 788         to->depth = from->depth;
 789     }
 790
 791     info_ptr->splt_palettes = np;
 792     info_ptr->splt_palettes_num += nentries;
 793     info_ptr->valid |= PNG_INFO_sPLT;
 794 #ifdef PNG_FREE_ME_SUPPORTED
 795     info_ptr->free_me |= PNG_FREE_SPLT;
 796 #endif
 797 }
 798 #endif /* PNG_sPLT_SUPPORTED */
 799
 800 #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
 801 void PNGAPI
 802 png_set_unknown_chunks(png_structp png_ptr,
 803    png_infop info_ptr, png_unknown_chunkp unknowns, int num_unknowns)
 804 {
 805     png_unknown_chunkp np;
 806     int i;
 807
 808     if (png_ptr == NULL || info_ptr == NULL || num_unknowns == 0)
 809         return;
 810
 811     np = (png_unknown_chunkp)png_malloc(png_ptr,
 812         (info_ptr->unknown_chunks_num + num_unknowns) *
 813         sizeof(png_unknown_chunk));
 814
 815     png_memcpy(np, info_ptr->unknown_chunks,
 816            info_ptr->unknown_chunks_num * sizeof(png_unknown_chunk));
 817     png_free(png_ptr, info_ptr->unknown_chunks);
 818     info_ptr->unknown_chunks=NULL;
 819
 820     for (i = 0; i < num_unknowns; i++)
 821     {
 822         png_unknown_chunkp to = np + info_ptr->unknown_chunks_num + i;
 823         png_unknown_chunkp from = unknowns + i;
 824
 825         png_strcpy((png_charp)to->name, (png_charp)from->name);
 826         to->data = (png_bytep)png_malloc(png_ptr, from->size);
 827         png_memcpy(to->data, from->data, from->size);
 828         to->size = from->size;
 829
 830         /* note our location in the read or write sequence */
 831         to->location = (png_byte)(png_ptr->mode & 0xff);
 832     }
 833
 834     info_ptr->unknown_chunks = np;
 835     info_ptr->unknown_chunks_num += num_unknowns;
 836 #ifdef PNG_FREE_ME_SUPPORTED
 837     info_ptr->free_me |= PNG_FREE_UNKN;
 838 #endif
 839 }
 840 void PNGAPI
 841 png_set_unknown_chunk_location(png_structp png_ptr, png_infop info_ptr,
 842    int chunk, int location)
 843 {
 844    if(png_ptr != NULL && info_ptr != NULL && chunk >= 0 && chunk <
 845          (int)info_ptr->unknown_chunks_num)
 846       info_ptr->unknown_chunks[chunk].location = (png_byte)location;
 847 }
 848 #endif
 849
 850 #if defined(PNG_READ_EMPTY_PLTE_SUPPORTED) || \
 851     defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED)
 852 void PNGAPI
 853 png_permit_empty_plte (png_structp png_ptr, int empty_plte_permitted)
 854 {
 855    /* This function is deprecated in favor of png_permit_mng_features()
 856       and will be removed from libpng-2.0.0 */
 857    png_debug(1, "in png_permit_empty_plte, DEPRECATED.\n");
 858    if (png_ptr == NULL)
 859       return;
 860    png_ptr->mng_features_permitted = (png_byte)
 861      ((png_ptr->mng_features_permitted & (~(PNG_FLAG_MNG_EMPTY_PLTE))) |
 862      ((empty_plte_permitted & PNG_FLAG_MNG_EMPTY_PLTE)));
 863 }
 864 #endif
 865
 866 #if defined(PNG_MNG_FEATURES_SUPPORTED)
 867 png_uint_32 PNGAPI
 868 png_permit_mng_features (png_structp png_ptr, png_uint_32 mng_features)
 869 {
 870    png_debug(1, "in png_permit_mng_features\n");
 871    if (png_ptr == NULL)
 872       return (png_uint_32)0;
 873    png_ptr->mng_features_permitted =
 874      (png_byte)(mng_features & PNG_ALL_MNG_FEATURES);
 875    return (png_uint_32)png_ptr->mng_features_permitted;
 876 }
 877 #endif
 878
 879 #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
 880 void PNGAPI
 881 png_set_keep_unknown_chunks(png_structp png_ptr, int keep, png_bytep
 882    chunk_list, int num_chunks)
 883 {
 884     png_bytep new_list, p;
 885     int i, old_num_chunks;
 886     if (num_chunks == 0)
 887     {
 888       if(keep == HANDLE_CHUNK_ALWAYS || keep == HANDLE_CHUNK_IF_SAFE)
 889         png_ptr->flags |= PNG_FLAG_KEEP_UNKNOWN_CHUNKS;
 890       else
 891         png_ptr->flags &= ~PNG_FLAG_KEEP_UNKNOWN_CHUNKS;
 892
 893       if(keep == HANDLE_CHUNK_ALWAYS)
 894         png_ptr->flags |= PNG_FLAG_KEEP_UNSAFE_CHUNKS;
 895       else
 896         png_ptr->flags &= ~PNG_FLAG_KEEP_UNSAFE_CHUNKS;
 897       return;
 898     }
 899     if (chunk_list == NULL)
 900       return;
 901     old_num_chunks=png_ptr->num_chunk_list;
 902     new_list=png_malloc(png_ptr,5*(num_chunks+old_num_chunks));
 903     if(png_ptr->chunk_list != (png_bytep)NULL)
 904     {
 905        png_memcpy(new_list, png_ptr->chunk_list, 5*old_num_chunks);
 906        png_free(png_ptr, png_ptr->chunk_list);
 907        png_ptr->chunk_list=NULL;
 908     }
 909     png_memcpy(new_list+5*old_num_chunks, chunk_list, 5*num_chunks);
 910     for (p=new_list+5*old_num_chunks+4, i=0; i<num_chunks; i++, p+=5)
 911        *p=(png_byte)keep;
 912     png_ptr->num_chunk_list=old_num_chunks+num_chunks;
 913     png_ptr->chunk_list=new_list;
 914 #ifdef PNG_FREE_ME_SUPPORTED
 915     png_ptr->free_me |= PNG_FREE_LIST;
 916 #endif
 917 }
 918 #endif
 919
 920 #if defined(PNG_READ_USER_CHUNKS_SUPPORTED)
 921 void PNGAPI
 922 png_set_read_user_chunk_fn(png_structp png_ptr, png_voidp user_chunk_ptr,
 923    png_user_chunk_ptr read_user_chunk_fn)
 924 {
 925    png_debug(1, "in png_set_read_user_chunk_fn\n");
 926    png_ptr->read_user_chunk_fn = read_user_chunk_fn;
 927    png_ptr->user_chunk_ptr = user_chunk_ptr;
 928 }
 929 #endif
 930
 931 #if defined(PNG_INFO_IMAGE_SUPPORTED)
 932 void PNGAPI
 933 png_set_rows(png_structp png_ptr, png_infop info_ptr, png_bytepp row_pointers)
 934 {
 935    png_debug1(1, "in %s storage function\n", "rows");
 936
 937    if (png_ptr == NULL || info_ptr == NULL)
 938       return;
 939
 940    if(info_ptr->row_pointers && (info_ptr->row_pointers != row_pointers))
 941       png_free_data(png_ptr, info_ptr, PNG_FREE_ROWS, 0);
 942    info_ptr->row_pointers = row_pointers;
 943    if(row_pointers)
 944       info_ptr->valid |= PNG_INFO_IDAT;
 945 }
 946 #endif
 947
 948 void PNGAPI
 949 png_set_compression_buffer_size(png_structp png_ptr, png_uint_32 size)
 950 {
 951     if(png_ptr->zbuf)
 952        png_free(png_ptr, png_ptr->zbuf);
 953     png_ptr->zbuf_size = (png_size_t)size;
 954     png_ptr->zbuf = (png_bytep)png_malloc(png_ptr, size);
 955     if(!png_ptr->zbuf)
 956        png_error(png_ptr,"Unable to malloc zbuf");
 957     png_ptr->zstream.next_out = png_ptr->zbuf;
 958     png_ptr->zstream.avail_out = (uInt)png_ptr->zbuf_size;
 959 }
 960
 961 void PNGAPI
 962 png_set_invalid(png_structp png_ptr, png_infop info_ptr, int mask)
 963 {
 964    if (png_ptr && info_ptr)
 965       info_ptr->valid &= ~(mask);
 966 }
 967