vrshoot

annotate libs/libpng/pngget.c @ 0:b2f14e535253

initial commit
author John Tsiombikas <nuclear@member.fsf.org>
date Sat, 01 Feb 2014 19:58:19 +0200
parents
children
rev   line source
nuclear@0 1
nuclear@0 2 /* pngget.c - retrieval of values from info struct
nuclear@0 3 *
nuclear@0 4 * Last changed in libpng 1.2.30 [August 15, 2008]
nuclear@0 5 * For conditions of distribution and use, see copyright notice in png.h
nuclear@0 6 * Copyright (c) 1998-2008 Glenn Randers-Pehrson
nuclear@0 7 * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
nuclear@0 8 * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
nuclear@0 9 */
nuclear@0 10
nuclear@0 11 #define PNG_INTERNAL
nuclear@0 12 #include "png.h"
nuclear@0 13 #if defined(PNG_READ_SUPPORTED) || defined(PNG_WRITE_SUPPORTED)
nuclear@0 14
nuclear@0 15 png_uint_32 PNGAPI
nuclear@0 16 png_get_valid(png_structp png_ptr, png_infop info_ptr, png_uint_32 flag)
nuclear@0 17 {
nuclear@0 18 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 19 return(info_ptr->valid & flag);
nuclear@0 20 else
nuclear@0 21 return(0);
nuclear@0 22 }
nuclear@0 23
nuclear@0 24 png_uint_32 PNGAPI
nuclear@0 25 png_get_rowbytes(png_structp png_ptr, png_infop info_ptr)
nuclear@0 26 {
nuclear@0 27 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 28 return(info_ptr->rowbytes);
nuclear@0 29 else
nuclear@0 30 return(0);
nuclear@0 31 }
nuclear@0 32
nuclear@0 33 #if defined(PNG_INFO_IMAGE_SUPPORTED)
nuclear@0 34 png_bytepp PNGAPI
nuclear@0 35 png_get_rows(png_structp png_ptr, png_infop info_ptr)
nuclear@0 36 {
nuclear@0 37 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 38 return(info_ptr->row_pointers);
nuclear@0 39 else
nuclear@0 40 return(0);
nuclear@0 41 }
nuclear@0 42 #endif
nuclear@0 43
nuclear@0 44 #ifdef PNG_EASY_ACCESS_SUPPORTED
nuclear@0 45 /* easy access to info, added in libpng-0.99 */
nuclear@0 46 png_uint_32 PNGAPI
nuclear@0 47 png_get_image_width(png_structp png_ptr, png_infop info_ptr)
nuclear@0 48 {
nuclear@0 49 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 50 {
nuclear@0 51 return info_ptr->width;
nuclear@0 52 }
nuclear@0 53 return (0);
nuclear@0 54 }
nuclear@0 55
nuclear@0 56 png_uint_32 PNGAPI
nuclear@0 57 png_get_image_height(png_structp png_ptr, png_infop info_ptr)
nuclear@0 58 {
nuclear@0 59 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 60 {
nuclear@0 61 return info_ptr->height;
nuclear@0 62 }
nuclear@0 63 return (0);
nuclear@0 64 }
nuclear@0 65
nuclear@0 66 png_byte PNGAPI
nuclear@0 67 png_get_bit_depth(png_structp png_ptr, png_infop info_ptr)
nuclear@0 68 {
nuclear@0 69 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 70 {
nuclear@0 71 return info_ptr->bit_depth;
nuclear@0 72 }
nuclear@0 73 return (0);
nuclear@0 74 }
nuclear@0 75
nuclear@0 76 png_byte PNGAPI
nuclear@0 77 png_get_color_type(png_structp png_ptr, png_infop info_ptr)
nuclear@0 78 {
nuclear@0 79 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 80 {
nuclear@0 81 return info_ptr->color_type;
nuclear@0 82 }
nuclear@0 83 return (0);
nuclear@0 84 }
nuclear@0 85
nuclear@0 86 png_byte PNGAPI
nuclear@0 87 png_get_filter_type(png_structp png_ptr, png_infop info_ptr)
nuclear@0 88 {
nuclear@0 89 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 90 {
nuclear@0 91 return info_ptr->filter_type;
nuclear@0 92 }
nuclear@0 93 return (0);
nuclear@0 94 }
nuclear@0 95
nuclear@0 96 png_byte PNGAPI
nuclear@0 97 png_get_interlace_type(png_structp png_ptr, png_infop info_ptr)
nuclear@0 98 {
nuclear@0 99 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 100 {
nuclear@0 101 return info_ptr->interlace_type;
nuclear@0 102 }
nuclear@0 103 return (0);
nuclear@0 104 }
nuclear@0 105
nuclear@0 106 png_byte PNGAPI
nuclear@0 107 png_get_compression_type(png_structp png_ptr, png_infop info_ptr)
nuclear@0 108 {
nuclear@0 109 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 110 {
nuclear@0 111 return info_ptr->compression_type;
nuclear@0 112 }
nuclear@0 113 return (0);
nuclear@0 114 }
nuclear@0 115
nuclear@0 116 png_uint_32 PNGAPI
nuclear@0 117 png_get_x_pixels_per_meter(png_structp png_ptr, png_infop info_ptr)
nuclear@0 118 {
nuclear@0 119 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 120 #if defined(PNG_pHYs_SUPPORTED)
nuclear@0 121 if (info_ptr->valid & PNG_INFO_pHYs)
nuclear@0 122 {
nuclear@0 123 png_debug1(1, "in %s retrieval function\n", "png_get_x_pixels_per_meter");
nuclear@0 124 if (info_ptr->phys_unit_type != PNG_RESOLUTION_METER)
nuclear@0 125 return (0);
nuclear@0 126 else return (info_ptr->x_pixels_per_unit);
nuclear@0 127 }
nuclear@0 128 #else
nuclear@0 129 return (0);
nuclear@0 130 #endif
nuclear@0 131 return (0);
nuclear@0 132 }
nuclear@0 133
nuclear@0 134 png_uint_32 PNGAPI
nuclear@0 135 png_get_y_pixels_per_meter(png_structp png_ptr, png_infop info_ptr)
nuclear@0 136 {
nuclear@0 137 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 138 #if defined(PNG_pHYs_SUPPORTED)
nuclear@0 139 if (info_ptr->valid & PNG_INFO_pHYs)
nuclear@0 140 {
nuclear@0 141 png_debug1(1, "in %s retrieval function\n", "png_get_y_pixels_per_meter");
nuclear@0 142 if (info_ptr->phys_unit_type != PNG_RESOLUTION_METER)
nuclear@0 143 return (0);
nuclear@0 144 else return (info_ptr->y_pixels_per_unit);
nuclear@0 145 }
nuclear@0 146 #else
nuclear@0 147 return (0);
nuclear@0 148 #endif
nuclear@0 149 return (0);
nuclear@0 150 }
nuclear@0 151
nuclear@0 152 png_uint_32 PNGAPI
nuclear@0 153 png_get_pixels_per_meter(png_structp png_ptr, png_infop info_ptr)
nuclear@0 154 {
nuclear@0 155 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 156 #if defined(PNG_pHYs_SUPPORTED)
nuclear@0 157 if (info_ptr->valid & PNG_INFO_pHYs)
nuclear@0 158 {
nuclear@0 159 png_debug1(1, "in %s retrieval function\n", "png_get_pixels_per_meter");
nuclear@0 160 if (info_ptr->phys_unit_type != PNG_RESOLUTION_METER ||
nuclear@0 161 info_ptr->x_pixels_per_unit != info_ptr->y_pixels_per_unit)
nuclear@0 162 return (0);
nuclear@0 163 else return (info_ptr->x_pixels_per_unit);
nuclear@0 164 }
nuclear@0 165 #else
nuclear@0 166 return (0);
nuclear@0 167 #endif
nuclear@0 168 return (0);
nuclear@0 169 }
nuclear@0 170
nuclear@0 171 #ifdef PNG_FLOATING_POINT_SUPPORTED
nuclear@0 172 float PNGAPI
nuclear@0 173 png_get_pixel_aspect_ratio(png_structp png_ptr, png_infop info_ptr)
nuclear@0 174 {
nuclear@0 175 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 176 #if defined(PNG_pHYs_SUPPORTED)
nuclear@0 177 if (info_ptr->valid & PNG_INFO_pHYs)
nuclear@0 178 {
nuclear@0 179 png_debug1(1, "in %s retrieval function\n", "png_get_aspect_ratio");
nuclear@0 180 if (info_ptr->x_pixels_per_unit == 0)
nuclear@0 181 return ((float)0.0);
nuclear@0 182 else
nuclear@0 183 return ((float)((float)info_ptr->y_pixels_per_unit
nuclear@0 184 /(float)info_ptr->x_pixels_per_unit));
nuclear@0 185 }
nuclear@0 186 #else
nuclear@0 187 return (0.0);
nuclear@0 188 #endif
nuclear@0 189 return ((float)0.0);
nuclear@0 190 }
nuclear@0 191 #endif
nuclear@0 192
nuclear@0 193 png_int_32 PNGAPI
nuclear@0 194 png_get_x_offset_microns(png_structp png_ptr, png_infop info_ptr)
nuclear@0 195 {
nuclear@0 196 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 197 #if defined(PNG_oFFs_SUPPORTED)
nuclear@0 198 if (info_ptr->valid & PNG_INFO_oFFs)
nuclear@0 199 {
nuclear@0 200 png_debug1(1, "in %s retrieval function\n", "png_get_x_offset_microns");
nuclear@0 201 if (info_ptr->offset_unit_type != PNG_OFFSET_MICROMETER)
nuclear@0 202 return (0);
nuclear@0 203 else return (info_ptr->x_offset);
nuclear@0 204 }
nuclear@0 205 #else
nuclear@0 206 return (0);
nuclear@0 207 #endif
nuclear@0 208 return (0);
nuclear@0 209 }
nuclear@0 210
nuclear@0 211 png_int_32 PNGAPI
nuclear@0 212 png_get_y_offset_microns(png_structp png_ptr, png_infop info_ptr)
nuclear@0 213 {
nuclear@0 214 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 215 #if defined(PNG_oFFs_SUPPORTED)
nuclear@0 216 if (info_ptr->valid & PNG_INFO_oFFs)
nuclear@0 217 {
nuclear@0 218 png_debug1(1, "in %s retrieval function\n", "png_get_y_offset_microns");
nuclear@0 219 if (info_ptr->offset_unit_type != PNG_OFFSET_MICROMETER)
nuclear@0 220 return (0);
nuclear@0 221 else return (info_ptr->y_offset);
nuclear@0 222 }
nuclear@0 223 #else
nuclear@0 224 return (0);
nuclear@0 225 #endif
nuclear@0 226 return (0);
nuclear@0 227 }
nuclear@0 228
nuclear@0 229 png_int_32 PNGAPI
nuclear@0 230 png_get_x_offset_pixels(png_structp png_ptr, png_infop info_ptr)
nuclear@0 231 {
nuclear@0 232 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 233 #if defined(PNG_oFFs_SUPPORTED)
nuclear@0 234 if (info_ptr->valid & PNG_INFO_oFFs)
nuclear@0 235 {
nuclear@0 236 png_debug1(1, "in %s retrieval function\n", "png_get_x_offset_microns");
nuclear@0 237 if (info_ptr->offset_unit_type != PNG_OFFSET_PIXEL)
nuclear@0 238 return (0);
nuclear@0 239 else return (info_ptr->x_offset);
nuclear@0 240 }
nuclear@0 241 #else
nuclear@0 242 return (0);
nuclear@0 243 #endif
nuclear@0 244 return (0);
nuclear@0 245 }
nuclear@0 246
nuclear@0 247 png_int_32 PNGAPI
nuclear@0 248 png_get_y_offset_pixels(png_structp png_ptr, png_infop info_ptr)
nuclear@0 249 {
nuclear@0 250 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 251 #if defined(PNG_oFFs_SUPPORTED)
nuclear@0 252 if (info_ptr->valid & PNG_INFO_oFFs)
nuclear@0 253 {
nuclear@0 254 png_debug1(1, "in %s retrieval function\n", "png_get_y_offset_microns");
nuclear@0 255 if (info_ptr->offset_unit_type != PNG_OFFSET_PIXEL)
nuclear@0 256 return (0);
nuclear@0 257 else return (info_ptr->y_offset);
nuclear@0 258 }
nuclear@0 259 #else
nuclear@0 260 return (0);
nuclear@0 261 #endif
nuclear@0 262 return (0);
nuclear@0 263 }
nuclear@0 264
nuclear@0 265 #if defined(PNG_INCH_CONVERSIONS) && defined(PNG_FLOATING_POINT_SUPPORTED)
nuclear@0 266 png_uint_32 PNGAPI
nuclear@0 267 png_get_pixels_per_inch(png_structp png_ptr, png_infop info_ptr)
nuclear@0 268 {
nuclear@0 269 return ((png_uint_32)((float)png_get_pixels_per_meter(png_ptr, info_ptr)
nuclear@0 270 *.0254 +.5));
nuclear@0 271 }
nuclear@0 272
nuclear@0 273 png_uint_32 PNGAPI
nuclear@0 274 png_get_x_pixels_per_inch(png_structp png_ptr, png_infop info_ptr)
nuclear@0 275 {
nuclear@0 276 return ((png_uint_32)((float)png_get_x_pixels_per_meter(png_ptr, info_ptr)
nuclear@0 277 *.0254 +.5));
nuclear@0 278 }
nuclear@0 279
nuclear@0 280 png_uint_32 PNGAPI
nuclear@0 281 png_get_y_pixels_per_inch(png_structp png_ptr, png_infop info_ptr)
nuclear@0 282 {
nuclear@0 283 return ((png_uint_32)((float)png_get_y_pixels_per_meter(png_ptr, info_ptr)
nuclear@0 284 *.0254 +.5));
nuclear@0 285 }
nuclear@0 286
nuclear@0 287 float PNGAPI
nuclear@0 288 png_get_x_offset_inches(png_structp png_ptr, png_infop info_ptr)
nuclear@0 289 {
nuclear@0 290 return ((float)png_get_x_offset_microns(png_ptr, info_ptr)
nuclear@0 291 *.00003937);
nuclear@0 292 }
nuclear@0 293
nuclear@0 294 float PNGAPI
nuclear@0 295 png_get_y_offset_inches(png_structp png_ptr, png_infop info_ptr)
nuclear@0 296 {
nuclear@0 297 return ((float)png_get_y_offset_microns(png_ptr, info_ptr)
nuclear@0 298 *.00003937);
nuclear@0 299 }
nuclear@0 300
nuclear@0 301 #if defined(PNG_pHYs_SUPPORTED)
nuclear@0 302 png_uint_32 PNGAPI
nuclear@0 303 png_get_pHYs_dpi(png_structp png_ptr, png_infop info_ptr,
nuclear@0 304 png_uint_32 *res_x, png_uint_32 *res_y, int *unit_type)
nuclear@0 305 {
nuclear@0 306 png_uint_32 retval = 0;
nuclear@0 307
nuclear@0 308 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_pHYs))
nuclear@0 309 {
nuclear@0 310 png_debug1(1, "in %s retrieval function\n", "pHYs");
nuclear@0 311 if (res_x != NULL)
nuclear@0 312 {
nuclear@0 313 *res_x = info_ptr->x_pixels_per_unit;
nuclear@0 314 retval |= PNG_INFO_pHYs;
nuclear@0 315 }
nuclear@0 316 if (res_y != NULL)
nuclear@0 317 {
nuclear@0 318 *res_y = info_ptr->y_pixels_per_unit;
nuclear@0 319 retval |= PNG_INFO_pHYs;
nuclear@0 320 }
nuclear@0 321 if (unit_type != NULL)
nuclear@0 322 {
nuclear@0 323 *unit_type = (int)info_ptr->phys_unit_type;
nuclear@0 324 retval |= PNG_INFO_pHYs;
nuclear@0 325 if (*unit_type == 1)
nuclear@0 326 {
nuclear@0 327 if (res_x != NULL) *res_x = (png_uint_32)(*res_x * .0254 + .50);
nuclear@0 328 if (res_y != NULL) *res_y = (png_uint_32)(*res_y * .0254 + .50);
nuclear@0 329 }
nuclear@0 330 }
nuclear@0 331 }
nuclear@0 332 return (retval);
nuclear@0 333 }
nuclear@0 334 #endif /* PNG_pHYs_SUPPORTED */
nuclear@0 335 #endif /* PNG_INCH_CONVERSIONS && PNG_FLOATING_POINT_SUPPORTED */
nuclear@0 336
nuclear@0 337 /* png_get_channels really belongs in here, too, but it's been around longer */
nuclear@0 338
nuclear@0 339 #endif /* PNG_EASY_ACCESS_SUPPORTED */
nuclear@0 340
nuclear@0 341 png_byte PNGAPI
nuclear@0 342 png_get_channels(png_structp png_ptr, png_infop info_ptr)
nuclear@0 343 {
nuclear@0 344 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 345 return(info_ptr->channels);
nuclear@0 346 else
nuclear@0 347 return (0);
nuclear@0 348 }
nuclear@0 349
nuclear@0 350 png_bytep PNGAPI
nuclear@0 351 png_get_signature(png_structp png_ptr, png_infop info_ptr)
nuclear@0 352 {
nuclear@0 353 if (png_ptr != NULL && info_ptr != NULL)
nuclear@0 354 return(info_ptr->signature);
nuclear@0 355 else
nuclear@0 356 return (NULL);
nuclear@0 357 }
nuclear@0 358
nuclear@0 359 #if defined(PNG_bKGD_SUPPORTED)
nuclear@0 360 png_uint_32 PNGAPI
nuclear@0 361 png_get_bKGD(png_structp png_ptr, png_infop info_ptr,
nuclear@0 362 png_color_16p *background)
nuclear@0 363 {
nuclear@0 364 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_bKGD)
nuclear@0 365 && background != NULL)
nuclear@0 366 {
nuclear@0 367 png_debug1(1, "in %s retrieval function\n", "bKGD");
nuclear@0 368 *background = &(info_ptr->background);
nuclear@0 369 return (PNG_INFO_bKGD);
nuclear@0 370 }
nuclear@0 371 return (0);
nuclear@0 372 }
nuclear@0 373 #endif
nuclear@0 374
nuclear@0 375 #if defined(PNG_cHRM_SUPPORTED)
nuclear@0 376 #ifdef PNG_FLOATING_POINT_SUPPORTED
nuclear@0 377 png_uint_32 PNGAPI
nuclear@0 378 png_get_cHRM(png_structp png_ptr, png_infop info_ptr,
nuclear@0 379 double *white_x, double *white_y, double *red_x, double *red_y,
nuclear@0 380 double *green_x, double *green_y, double *blue_x, double *blue_y)
nuclear@0 381 {
nuclear@0 382 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_cHRM))
nuclear@0 383 {
nuclear@0 384 png_debug1(1, "in %s retrieval function\n", "cHRM");
nuclear@0 385 if (white_x != NULL)
nuclear@0 386 *white_x = (double)info_ptr->x_white;
nuclear@0 387 if (white_y != NULL)
nuclear@0 388 *white_y = (double)info_ptr->y_white;
nuclear@0 389 if (red_x != NULL)
nuclear@0 390 *red_x = (double)info_ptr->x_red;
nuclear@0 391 if (red_y != NULL)
nuclear@0 392 *red_y = (double)info_ptr->y_red;
nuclear@0 393 if (green_x != NULL)
nuclear@0 394 *green_x = (double)info_ptr->x_green;
nuclear@0 395 if (green_y != NULL)
nuclear@0 396 *green_y = (double)info_ptr->y_green;
nuclear@0 397 if (blue_x != NULL)
nuclear@0 398 *blue_x = (double)info_ptr->x_blue;
nuclear@0 399 if (blue_y != NULL)
nuclear@0 400 *blue_y = (double)info_ptr->y_blue;
nuclear@0 401 return (PNG_INFO_cHRM);
nuclear@0 402 }
nuclear@0 403 return (0);
nuclear@0 404 }
nuclear@0 405 #endif
nuclear@0 406 #ifdef PNG_FIXED_POINT_SUPPORTED
nuclear@0 407 png_uint_32 PNGAPI
nuclear@0 408 png_get_cHRM_fixed(png_structp png_ptr, png_infop info_ptr,
nuclear@0 409 png_fixed_point *white_x, png_fixed_point *white_y, png_fixed_point *red_x,
nuclear@0 410 png_fixed_point *red_y, png_fixed_point *green_x, png_fixed_point *green_y,
nuclear@0 411 png_fixed_point *blue_x, png_fixed_point *blue_y)
nuclear@0 412 {
nuclear@0 413 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_cHRM))
nuclear@0 414 {
nuclear@0 415 png_debug1(1, "in %s retrieval function\n", "cHRM");
nuclear@0 416 if (white_x != NULL)
nuclear@0 417 *white_x = info_ptr->int_x_white;
nuclear@0 418 if (white_y != NULL)
nuclear@0 419 *white_y = info_ptr->int_y_white;
nuclear@0 420 if (red_x != NULL)
nuclear@0 421 *red_x = info_ptr->int_x_red;
nuclear@0 422 if (red_y != NULL)
nuclear@0 423 *red_y = info_ptr->int_y_red;
nuclear@0 424 if (green_x != NULL)
nuclear@0 425 *green_x = info_ptr->int_x_green;
nuclear@0 426 if (green_y != NULL)
nuclear@0 427 *green_y = info_ptr->int_y_green;
nuclear@0 428 if (blue_x != NULL)
nuclear@0 429 *blue_x = info_ptr->int_x_blue;
nuclear@0 430 if (blue_y != NULL)
nuclear@0 431 *blue_y = info_ptr->int_y_blue;
nuclear@0 432 return (PNG_INFO_cHRM);
nuclear@0 433 }
nuclear@0 434 return (0);
nuclear@0 435 }
nuclear@0 436 #endif
nuclear@0 437 #endif
nuclear@0 438
nuclear@0 439 #if defined(PNG_gAMA_SUPPORTED)
nuclear@0 440 #ifdef PNG_FLOATING_POINT_SUPPORTED
nuclear@0 441 png_uint_32 PNGAPI
nuclear@0 442 png_get_gAMA(png_structp png_ptr, png_infop info_ptr, double *file_gamma)
nuclear@0 443 {
nuclear@0 444 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_gAMA)
nuclear@0 445 && file_gamma != NULL)
nuclear@0 446 {
nuclear@0 447 png_debug1(1, "in %s retrieval function\n", "gAMA");
nuclear@0 448 *file_gamma = (double)info_ptr->gamma;
nuclear@0 449 return (PNG_INFO_gAMA);
nuclear@0 450 }
nuclear@0 451 return (0);
nuclear@0 452 }
nuclear@0 453 #endif
nuclear@0 454 #ifdef PNG_FIXED_POINT_SUPPORTED
nuclear@0 455 png_uint_32 PNGAPI
nuclear@0 456 png_get_gAMA_fixed(png_structp png_ptr, png_infop info_ptr,
nuclear@0 457 png_fixed_point *int_file_gamma)
nuclear@0 458 {
nuclear@0 459 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_gAMA)
nuclear@0 460 && int_file_gamma != NULL)
nuclear@0 461 {
nuclear@0 462 png_debug1(1, "in %s retrieval function\n", "gAMA");
nuclear@0 463 *int_file_gamma = info_ptr->int_gamma;
nuclear@0 464 return (PNG_INFO_gAMA);
nuclear@0 465 }
nuclear@0 466 return (0);
nuclear@0 467 }
nuclear@0 468 #endif
nuclear@0 469 #endif
nuclear@0 470
nuclear@0 471 #if defined(PNG_sRGB_SUPPORTED)
nuclear@0 472 png_uint_32 PNGAPI
nuclear@0 473 png_get_sRGB(png_structp png_ptr, png_infop info_ptr, int *file_srgb_intent)
nuclear@0 474 {
nuclear@0 475 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_sRGB)
nuclear@0 476 && file_srgb_intent != NULL)
nuclear@0 477 {
nuclear@0 478 png_debug1(1, "in %s retrieval function\n", "sRGB");
nuclear@0 479 *file_srgb_intent = (int)info_ptr->srgb_intent;
nuclear@0 480 return (PNG_INFO_sRGB);
nuclear@0 481 }
nuclear@0 482 return (0);
nuclear@0 483 }
nuclear@0 484 #endif
nuclear@0 485
nuclear@0 486 #if defined(PNG_iCCP_SUPPORTED)
nuclear@0 487 png_uint_32 PNGAPI
nuclear@0 488 png_get_iCCP(png_structp png_ptr, png_infop info_ptr,
nuclear@0 489 png_charpp name, int *compression_type,
nuclear@0 490 png_charpp profile, png_uint_32 *proflen)
nuclear@0 491 {
nuclear@0 492 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_iCCP)
nuclear@0 493 && name != NULL && profile != NULL && proflen != NULL)
nuclear@0 494 {
nuclear@0 495 png_debug1(1, "in %s retrieval function\n", "iCCP");
nuclear@0 496 *name = info_ptr->iccp_name;
nuclear@0 497 *profile = info_ptr->iccp_profile;
nuclear@0 498 /* compression_type is a dummy so the API won't have to change
nuclear@0 499 if we introduce multiple compression types later. */
nuclear@0 500 *proflen = (int)info_ptr->iccp_proflen;
nuclear@0 501 *compression_type = (int)info_ptr->iccp_compression;
nuclear@0 502 return (PNG_INFO_iCCP);
nuclear@0 503 }
nuclear@0 504 return (0);
nuclear@0 505 }
nuclear@0 506 #endif
nuclear@0 507
nuclear@0 508 #if defined(PNG_sPLT_SUPPORTED)
nuclear@0 509 png_uint_32 PNGAPI
nuclear@0 510 png_get_sPLT(png_structp png_ptr, png_infop info_ptr,
nuclear@0 511 png_sPLT_tpp spalettes)
nuclear@0 512 {
nuclear@0 513 if (png_ptr != NULL && info_ptr != NULL && spalettes != NULL)
nuclear@0 514 {
nuclear@0 515 *spalettes = info_ptr->splt_palettes;
nuclear@0 516 return ((png_uint_32)info_ptr->splt_palettes_num);
nuclear@0 517 }
nuclear@0 518 return (0);
nuclear@0 519 }
nuclear@0 520 #endif
nuclear@0 521
nuclear@0 522 #if defined(PNG_hIST_SUPPORTED)
nuclear@0 523 png_uint_32 PNGAPI
nuclear@0 524 png_get_hIST(png_structp png_ptr, png_infop info_ptr, png_uint_16p *hist)
nuclear@0 525 {
nuclear@0 526 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_hIST)
nuclear@0 527 && hist != NULL)
nuclear@0 528 {
nuclear@0 529 png_debug1(1, "in %s retrieval function\n", "hIST");
nuclear@0 530 *hist = info_ptr->hist;
nuclear@0 531 return (PNG_INFO_hIST);
nuclear@0 532 }
nuclear@0 533 return (0);
nuclear@0 534 }
nuclear@0 535 #endif
nuclear@0 536
nuclear@0 537 png_uint_32 PNGAPI
nuclear@0 538 png_get_IHDR(png_structp png_ptr, png_infop info_ptr,
nuclear@0 539 png_uint_32 *width, png_uint_32 *height, int *bit_depth,
nuclear@0 540 int *color_type, int *interlace_type, int *compression_type,
nuclear@0 541 int *filter_type)
nuclear@0 542
nuclear@0 543 {
nuclear@0 544 if (png_ptr != NULL && info_ptr != NULL && width != NULL && height != NULL &&
nuclear@0 545 bit_depth != NULL && color_type != NULL)
nuclear@0 546 {
nuclear@0 547 png_debug1(1, "in %s retrieval function\n", "IHDR");
nuclear@0 548 *width = info_ptr->width;
nuclear@0 549 *height = info_ptr->height;
nuclear@0 550 *bit_depth = info_ptr->bit_depth;
nuclear@0 551 if (info_ptr->bit_depth < 1 || info_ptr->bit_depth > 16)
nuclear@0 552 png_error(png_ptr, "Invalid bit depth");
nuclear@0 553 *color_type = info_ptr->color_type;
nuclear@0 554 if (info_ptr->color_type > 6)
nuclear@0 555 png_error(png_ptr, "Invalid color type");
nuclear@0 556 if (compression_type != NULL)
nuclear@0 557 *compression_type = info_ptr->compression_type;
nuclear@0 558 if (filter_type != NULL)
nuclear@0 559 *filter_type = info_ptr->filter_type;
nuclear@0 560 if (interlace_type != NULL)
nuclear@0 561 *interlace_type = info_ptr->interlace_type;
nuclear@0 562
nuclear@0 563 /* check for potential overflow of rowbytes */
nuclear@0 564 if (*width == 0 || *width > PNG_UINT_31_MAX)
nuclear@0 565 png_error(png_ptr, "Invalid image width");
nuclear@0 566 if (*height == 0 || *height > PNG_UINT_31_MAX)
nuclear@0 567 png_error(png_ptr, "Invalid image height");
nuclear@0 568 if (info_ptr->width > (PNG_UINT_32_MAX
nuclear@0 569 >> 3) /* 8-byte RGBA pixels */
nuclear@0 570 - 64 /* bigrowbuf hack */
nuclear@0 571 - 1 /* filter byte */
nuclear@0 572 - 7*8 /* rounding of width to multiple of 8 pixels */
nuclear@0 573 - 8) /* extra max_pixel_depth pad */
nuclear@0 574 {
nuclear@0 575 png_warning(png_ptr,
nuclear@0 576 "Width too large for libpng to process image data.");
nuclear@0 577 }
nuclear@0 578 return (1);
nuclear@0 579 }
nuclear@0 580 return (0);
nuclear@0 581 }
nuclear@0 582
nuclear@0 583 #if defined(PNG_oFFs_SUPPORTED)
nuclear@0 584 png_uint_32 PNGAPI
nuclear@0 585 png_get_oFFs(png_structp png_ptr, png_infop info_ptr,
nuclear@0 586 png_int_32 *offset_x, png_int_32 *offset_y, int *unit_type)
nuclear@0 587 {
nuclear@0 588 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_oFFs)
nuclear@0 589 && offset_x != NULL && offset_y != NULL && unit_type != NULL)
nuclear@0 590 {
nuclear@0 591 png_debug1(1, "in %s retrieval function\n", "oFFs");
nuclear@0 592 *offset_x = info_ptr->x_offset;
nuclear@0 593 *offset_y = info_ptr->y_offset;
nuclear@0 594 *unit_type = (int)info_ptr->offset_unit_type;
nuclear@0 595 return (PNG_INFO_oFFs);
nuclear@0 596 }
nuclear@0 597 return (0);
nuclear@0 598 }
nuclear@0 599 #endif
nuclear@0 600
nuclear@0 601 #if defined(PNG_pCAL_SUPPORTED)
nuclear@0 602 png_uint_32 PNGAPI
nuclear@0 603 png_get_pCAL(png_structp png_ptr, png_infop info_ptr,
nuclear@0 604 png_charp *purpose, png_int_32 *X0, png_int_32 *X1, int *type, int *nparams,
nuclear@0 605 png_charp *units, png_charpp *params)
nuclear@0 606 {
nuclear@0 607 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_pCAL)
nuclear@0 608 && purpose != NULL && X0 != NULL && X1 != NULL && type != NULL &&
nuclear@0 609 nparams != NULL && units != NULL && params != NULL)
nuclear@0 610 {
nuclear@0 611 png_debug1(1, "in %s retrieval function\n", "pCAL");
nuclear@0 612 *purpose = info_ptr->pcal_purpose;
nuclear@0 613 *X0 = info_ptr->pcal_X0;
nuclear@0 614 *X1 = info_ptr->pcal_X1;
nuclear@0 615 *type = (int)info_ptr->pcal_type;
nuclear@0 616 *nparams = (int)info_ptr->pcal_nparams;
nuclear@0 617 *units = info_ptr->pcal_units;
nuclear@0 618 *params = info_ptr->pcal_params;
nuclear@0 619 return (PNG_INFO_pCAL);
nuclear@0 620 }
nuclear@0 621 return (0);
nuclear@0 622 }
nuclear@0 623 #endif
nuclear@0 624
nuclear@0 625 #if defined(PNG_sCAL_SUPPORTED)
nuclear@0 626 #ifdef PNG_FLOATING_POINT_SUPPORTED
nuclear@0 627 png_uint_32 PNGAPI
nuclear@0 628 png_get_sCAL(png_structp png_ptr, png_infop info_ptr,
nuclear@0 629 int *unit, double *width, double *height)
nuclear@0 630 {
nuclear@0 631 if (png_ptr != NULL && info_ptr != NULL &&
nuclear@0 632 (info_ptr->valid & PNG_INFO_sCAL))
nuclear@0 633 {
nuclear@0 634 *unit = info_ptr->scal_unit;
nuclear@0 635 *width = info_ptr->scal_pixel_width;
nuclear@0 636 *height = info_ptr->scal_pixel_height;
nuclear@0 637 return (PNG_INFO_sCAL);
nuclear@0 638 }
nuclear@0 639 return(0);
nuclear@0 640 }
nuclear@0 641 #else
nuclear@0 642 #ifdef PNG_FIXED_POINT_SUPPORTED
nuclear@0 643 png_uint_32 PNGAPI
nuclear@0 644 png_get_sCAL_s(png_structp png_ptr, png_infop info_ptr,
nuclear@0 645 int *unit, png_charpp width, png_charpp height)
nuclear@0 646 {
nuclear@0 647 if (png_ptr != NULL && info_ptr != NULL &&
nuclear@0 648 (info_ptr->valid & PNG_INFO_sCAL))
nuclear@0 649 {
nuclear@0 650 *unit = info_ptr->scal_unit;
nuclear@0 651 *width = info_ptr->scal_s_width;
nuclear@0 652 *height = info_ptr->scal_s_height;
nuclear@0 653 return (PNG_INFO_sCAL);
nuclear@0 654 }
nuclear@0 655 return(0);
nuclear@0 656 }
nuclear@0 657 #endif
nuclear@0 658 #endif
nuclear@0 659 #endif
nuclear@0 660
nuclear@0 661 #if defined(PNG_pHYs_SUPPORTED)
nuclear@0 662 png_uint_32 PNGAPI
nuclear@0 663 png_get_pHYs(png_structp png_ptr, png_infop info_ptr,
nuclear@0 664 png_uint_32 *res_x, png_uint_32 *res_y, int *unit_type)
nuclear@0 665 {
nuclear@0 666 png_uint_32 retval = 0;
nuclear@0 667
nuclear@0 668 if (png_ptr != NULL && info_ptr != NULL &&
nuclear@0 669 (info_ptr->valid & PNG_INFO_pHYs))
nuclear@0 670 {
nuclear@0 671 png_debug1(1, "in %s retrieval function\n", "pHYs");
nuclear@0 672 if (res_x != NULL)
nuclear@0 673 {
nuclear@0 674 *res_x = info_ptr->x_pixels_per_unit;
nuclear@0 675 retval |= PNG_INFO_pHYs;
nuclear@0 676 }
nuclear@0 677 if (res_y != NULL)
nuclear@0 678 {
nuclear@0 679 *res_y = info_ptr->y_pixels_per_unit;
nuclear@0 680 retval |= PNG_INFO_pHYs;
nuclear@0 681 }
nuclear@0 682 if (unit_type != NULL)
nuclear@0 683 {
nuclear@0 684 *unit_type = (int)info_ptr->phys_unit_type;
nuclear@0 685 retval |= PNG_INFO_pHYs;
nuclear@0 686 }
nuclear@0 687 }
nuclear@0 688 return (retval);
nuclear@0 689 }
nuclear@0 690 #endif
nuclear@0 691
nuclear@0 692 png_uint_32 PNGAPI
nuclear@0 693 png_get_PLTE(png_structp png_ptr, png_infop info_ptr, png_colorp *palette,
nuclear@0 694 int *num_palette)
nuclear@0 695 {
nuclear@0 696 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_PLTE)
nuclear@0 697 && palette != NULL)
nuclear@0 698 {
nuclear@0 699 png_debug1(1, "in %s retrieval function\n", "PLTE");
nuclear@0 700 *palette = info_ptr->palette;
nuclear@0 701 *num_palette = info_ptr->num_palette;
nuclear@0 702 png_debug1(3, "num_palette = %d\n", *num_palette);
nuclear@0 703 return (PNG_INFO_PLTE);
nuclear@0 704 }
nuclear@0 705 return (0);
nuclear@0 706 }
nuclear@0 707
nuclear@0 708 #if defined(PNG_sBIT_SUPPORTED)
nuclear@0 709 png_uint_32 PNGAPI
nuclear@0 710 png_get_sBIT(png_structp png_ptr, png_infop info_ptr, png_color_8p *sig_bit)
nuclear@0 711 {
nuclear@0 712 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_sBIT)
nuclear@0 713 && sig_bit != NULL)
nuclear@0 714 {
nuclear@0 715 png_debug1(1, "in %s retrieval function\n", "sBIT");
nuclear@0 716 *sig_bit = &(info_ptr->sig_bit);
nuclear@0 717 return (PNG_INFO_sBIT);
nuclear@0 718 }
nuclear@0 719 return (0);
nuclear@0 720 }
nuclear@0 721 #endif
nuclear@0 722
nuclear@0 723 #if defined(PNG_TEXT_SUPPORTED)
nuclear@0 724 png_uint_32 PNGAPI
nuclear@0 725 png_get_text(png_structp png_ptr, png_infop info_ptr, png_textp *text_ptr,
nuclear@0 726 int *num_text)
nuclear@0 727 {
nuclear@0 728 if (png_ptr != NULL && info_ptr != NULL && info_ptr->num_text > 0)
nuclear@0 729 {
nuclear@0 730 png_debug1(1, "in %s retrieval function\n",
nuclear@0 731 (png_ptr->chunk_name[0] == '\0' ? "text"
nuclear@0 732 : (png_const_charp)png_ptr->chunk_name));
nuclear@0 733 if (text_ptr != NULL)
nuclear@0 734 *text_ptr = info_ptr->text;
nuclear@0 735 if (num_text != NULL)
nuclear@0 736 *num_text = info_ptr->num_text;
nuclear@0 737 return ((png_uint_32)info_ptr->num_text);
nuclear@0 738 }
nuclear@0 739 if (num_text != NULL)
nuclear@0 740 *num_text = 0;
nuclear@0 741 return(0);
nuclear@0 742 }
nuclear@0 743 #endif
nuclear@0 744
nuclear@0 745 #if defined(PNG_tIME_SUPPORTED)
nuclear@0 746 png_uint_32 PNGAPI
nuclear@0 747 png_get_tIME(png_structp png_ptr, png_infop info_ptr, png_timep *mod_time)
nuclear@0 748 {
nuclear@0 749 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_tIME)
nuclear@0 750 && mod_time != NULL)
nuclear@0 751 {
nuclear@0 752 png_debug1(1, "in %s retrieval function\n", "tIME");
nuclear@0 753 *mod_time = &(info_ptr->mod_time);
nuclear@0 754 return (PNG_INFO_tIME);
nuclear@0 755 }
nuclear@0 756 return (0);
nuclear@0 757 }
nuclear@0 758 #endif
nuclear@0 759
nuclear@0 760 #if defined(PNG_tRNS_SUPPORTED)
nuclear@0 761 png_uint_32 PNGAPI
nuclear@0 762 png_get_tRNS(png_structp png_ptr, png_infop info_ptr,
nuclear@0 763 png_bytep *trans, int *num_trans, png_color_16p *trans_values)
nuclear@0 764 {
nuclear@0 765 png_uint_32 retval = 0;
nuclear@0 766 if (png_ptr != NULL && info_ptr != NULL && (info_ptr->valid & PNG_INFO_tRNS))
nuclear@0 767 {
nuclear@0 768 png_debug1(1, "in %s retrieval function\n", "tRNS");
nuclear@0 769 if (info_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
nuclear@0 770 {
nuclear@0 771 if (trans != NULL)
nuclear@0 772 {
nuclear@0 773 *trans = info_ptr->trans;
nuclear@0 774 retval |= PNG_INFO_tRNS;
nuclear@0 775 }
nuclear@0 776 if (trans_values != NULL)
nuclear@0 777 *trans_values = &(info_ptr->trans_values);
nuclear@0 778 }
nuclear@0 779 else /* if (info_ptr->color_type != PNG_COLOR_TYPE_PALETTE) */
nuclear@0 780 {
nuclear@0 781 if (trans_values != NULL)
nuclear@0 782 {
nuclear@0 783 *trans_values = &(info_ptr->trans_values);
nuclear@0 784 retval |= PNG_INFO_tRNS;
nuclear@0 785 }
nuclear@0 786 if (trans != NULL)
nuclear@0 787 *trans = NULL;
nuclear@0 788 }
nuclear@0 789 if (num_trans != NULL)
nuclear@0 790 {
nuclear@0 791 *num_trans = info_ptr->num_trans;
nuclear@0 792 retval |= PNG_INFO_tRNS;
nuclear@0 793 }
nuclear@0 794 }
nuclear@0 795 return (retval);
nuclear@0 796 }
nuclear@0 797 #endif
nuclear@0 798
nuclear@0 799 #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
nuclear@0 800 png_uint_32 PNGAPI
nuclear@0 801 png_get_unknown_chunks(png_structp png_ptr, png_infop info_ptr,
nuclear@0 802 png_unknown_chunkpp unknowns)
nuclear@0 803 {
nuclear@0 804 if (png_ptr != NULL && info_ptr != NULL && unknowns != NULL)
nuclear@0 805 {
nuclear@0 806 *unknowns = info_ptr->unknown_chunks;
nuclear@0 807 return ((png_uint_32)info_ptr->unknown_chunks_num);
nuclear@0 808 }
nuclear@0 809 return (0);
nuclear@0 810 }
nuclear@0 811 #endif
nuclear@0 812
nuclear@0 813 #if defined(PNG_READ_RGB_TO_GRAY_SUPPORTED)
nuclear@0 814 png_byte PNGAPI
nuclear@0 815 png_get_rgb_to_gray_status (png_structp png_ptr)
nuclear@0 816 {
nuclear@0 817 return (png_byte)(png_ptr? png_ptr->rgb_to_gray_status : 0);
nuclear@0 818 }
nuclear@0 819 #endif
nuclear@0 820
nuclear@0 821 #if defined(PNG_USER_CHUNKS_SUPPORTED)
nuclear@0 822 png_voidp PNGAPI
nuclear@0 823 png_get_user_chunk_ptr(png_structp png_ptr)
nuclear@0 824 {
nuclear@0 825 return (png_ptr? png_ptr->user_chunk_ptr : NULL);
nuclear@0 826 }
nuclear@0 827 #endif
nuclear@0 828
nuclear@0 829 #ifdef PNG_WRITE_SUPPORTED
nuclear@0 830 png_uint_32 PNGAPI
nuclear@0 831 png_get_compression_buffer_size(png_structp png_ptr)
nuclear@0 832 {
nuclear@0 833 return (png_uint_32)(png_ptr? png_ptr->zbuf_size : 0L);
nuclear@0 834 }
nuclear@0 835 #endif
nuclear@0 836
nuclear@0 837 #ifdef PNG_ASSEMBLER_CODE_SUPPORTED
nuclear@0 838 #ifndef PNG_1_0_X
nuclear@0 839 /* this function was added to libpng 1.2.0 and should exist by default */
nuclear@0 840 png_uint_32 PNGAPI
nuclear@0 841 png_get_asm_flags (png_structp png_ptr)
nuclear@0 842 {
nuclear@0 843 /* obsolete, to be removed from libpng-1.4.0 */
nuclear@0 844 return (png_ptr? 0L: 0L);
nuclear@0 845 }
nuclear@0 846
nuclear@0 847 /* this function was added to libpng 1.2.0 and should exist by default */
nuclear@0 848 png_uint_32 PNGAPI
nuclear@0 849 png_get_asm_flagmask (int flag_select)
nuclear@0 850 {
nuclear@0 851 /* obsolete, to be removed from libpng-1.4.0 */
nuclear@0 852 flag_select=flag_select;
nuclear@0 853 return 0L;
nuclear@0 854 }
nuclear@0 855
nuclear@0 856 /* GRR: could add this: && defined(PNG_MMX_CODE_SUPPORTED) */
nuclear@0 857 /* this function was added to libpng 1.2.0 */
nuclear@0 858 png_uint_32 PNGAPI
nuclear@0 859 png_get_mmx_flagmask (int flag_select, int *compilerID)
nuclear@0 860 {
nuclear@0 861 /* obsolete, to be removed from libpng-1.4.0 */
nuclear@0 862 flag_select=flag_select;
nuclear@0 863 *compilerID = -1; /* unknown (i.e., no asm/MMX code compiled) */
nuclear@0 864 return 0L;
nuclear@0 865 }
nuclear@0 866
nuclear@0 867 /* this function was added to libpng 1.2.0 */
nuclear@0 868 png_byte PNGAPI
nuclear@0 869 png_get_mmx_bitdepth_threshold (png_structp png_ptr)
nuclear@0 870 {
nuclear@0 871 /* obsolete, to be removed from libpng-1.4.0 */
nuclear@0 872 return (png_ptr? 0: 0);
nuclear@0 873 }
nuclear@0 874
nuclear@0 875 /* this function was added to libpng 1.2.0 */
nuclear@0 876 png_uint_32 PNGAPI
nuclear@0 877 png_get_mmx_rowbytes_threshold (png_structp png_ptr)
nuclear@0 878 {
nuclear@0 879 /* obsolete, to be removed from libpng-1.4.0 */
nuclear@0 880 return (png_ptr? 0L: 0L);
nuclear@0 881 }
nuclear@0 882 #endif /* ?PNG_1_0_X */
nuclear@0 883 #endif /* ?PNG_ASSEMBLER_CODE_SUPPORTED */
nuclear@0 884
nuclear@0 885 #ifdef PNG_SET_USER_LIMITS_SUPPORTED
nuclear@0 886 /* these functions were added to libpng 1.2.6 */
nuclear@0 887 png_uint_32 PNGAPI
nuclear@0 888 png_get_user_width_max (png_structp png_ptr)
nuclear@0 889 {
nuclear@0 890 return (png_ptr? png_ptr->user_width_max : 0);
nuclear@0 891 }
nuclear@0 892 png_uint_32 PNGAPI
nuclear@0 893 png_get_user_height_max (png_structp png_ptr)
nuclear@0 894 {
nuclear@0 895 return (png_ptr? png_ptr->user_height_max : 0);
nuclear@0 896 }
nuclear@0 897 #endif /* ?PNG_SET_USER_LIMITS_SUPPORTED */
nuclear@0 898
nuclear@0 899
nuclear@0 900 #endif /* PNG_READ_SUPPORTED || PNG_WRITE_SUPPORTED */