packaging: bump to 1.6.21
[platform/upstream/libpng.git] / pngget.c
1
2 /* pngget.c - retrieval of values from info struct
3  *
4  * Last changed in libpng 1.6.17 [March 26, 2015]
5  * Copyright (c) 1998-2002,2004,2006-2015 Glenn Randers-Pehrson
6  * (Version 0.96 Copyright (c) 1996, 1997 Andreas Dilger)
7  * (Version 0.88 Copyright (c) 1995, 1996 Guy Eric Schalnat, Group 42, Inc.)
8  *
9  * This code is released under the libpng license.
10  * For conditions of distribution and use, see the disclaimer
11  * and license in png.h
12  *
13  */
14
15 #include "pngpriv.h"
16
17 #if defined(PNG_READ_SUPPORTED) || defined(PNG_WRITE_SUPPORTED)
18
19 png_uint_32 PNGAPI
20 png_get_valid(png_const_structrp png_ptr, png_const_inforp info_ptr,
21     png_uint_32 flag)
22 {
23    if (png_ptr != NULL && info_ptr != NULL)
24       return(info_ptr->valid & flag);
25
26    return(0);
27 }
28
29 png_size_t PNGAPI
30 png_get_rowbytes(png_const_structrp png_ptr, png_const_inforp info_ptr)
31 {
32    if (png_ptr != NULL && info_ptr != NULL)
33       return(info_ptr->rowbytes);
34
35    return(0);
36 }
37
38 #ifdef PNG_INFO_IMAGE_SUPPORTED
39 png_bytepp PNGAPI
40 png_get_rows(png_const_structrp png_ptr, png_const_inforp info_ptr)
41 {
42    if (png_ptr != NULL && info_ptr != NULL)
43       return(info_ptr->row_pointers);
44
45    return(0);
46 }
47 #endif
48
49 #ifdef PNG_EASY_ACCESS_SUPPORTED
50 /* Easy access to info, added in libpng-0.99 */
51 png_uint_32 PNGAPI
52 png_get_image_width(png_const_structrp png_ptr, png_const_inforp info_ptr)
53 {
54    if (png_ptr != NULL && info_ptr != NULL)
55       return info_ptr->width;
56
57    return (0);
58 }
59
60 png_uint_32 PNGAPI
61 png_get_image_height(png_const_structrp png_ptr, png_const_inforp info_ptr)
62 {
63    if (png_ptr != NULL && info_ptr != NULL)
64       return info_ptr->height;
65
66    return (0);
67 }
68
69 png_byte PNGAPI
70 png_get_bit_depth(png_const_structrp png_ptr, png_const_inforp info_ptr)
71 {
72    if (png_ptr != NULL && info_ptr != NULL)
73       return info_ptr->bit_depth;
74
75    return (0);
76 }
77
78 png_byte PNGAPI
79 png_get_color_type(png_const_structrp png_ptr, png_const_inforp info_ptr)
80 {
81    if (png_ptr != NULL && info_ptr != NULL)
82       return info_ptr->color_type;
83
84    return (0);
85 }
86
87 png_byte PNGAPI
88 png_get_filter_type(png_const_structrp png_ptr, png_const_inforp info_ptr)
89 {
90    if (png_ptr != NULL && info_ptr != NULL)
91       return info_ptr->filter_type;
92
93    return (0);
94 }
95
96 png_byte PNGAPI
97 png_get_interlace_type(png_const_structrp png_ptr, png_const_inforp info_ptr)
98 {
99    if (png_ptr != NULL && info_ptr != NULL)
100       return info_ptr->interlace_type;
101
102    return (0);
103 }
104
105 png_byte PNGAPI
106 png_get_compression_type(png_const_structrp png_ptr, png_const_inforp info_ptr)
107 {
108    if (png_ptr != NULL && info_ptr != NULL)
109       return info_ptr->compression_type;
110
111    return (0);
112 }
113
114 png_uint_32 PNGAPI
115 png_get_x_pixels_per_meter(png_const_structrp png_ptr, png_const_inforp
116    info_ptr)
117 {
118 #ifdef PNG_pHYs_SUPPORTED
119    if (png_ptr != NULL && info_ptr != NULL &&
120        (info_ptr->valid & PNG_INFO_pHYs) != 0)
121       {
122          png_debug1(1, "in %s retrieval function",
123              "png_get_x_pixels_per_meter");
124
125          if (info_ptr->phys_unit_type == PNG_RESOLUTION_METER)
126             return (info_ptr->x_pixels_per_unit);
127       }
128 #else
129    PNG_UNUSED(png_ptr)
130    PNG_UNUSED(info_ptr)
131 #endif
132
133    return (0);
134 }
135
136 png_uint_32 PNGAPI
137 png_get_y_pixels_per_meter(png_const_structrp png_ptr, png_const_inforp
138     info_ptr)
139 {
140 #ifdef PNG_pHYs_SUPPORTED
141    if (png_ptr != NULL && info_ptr != NULL &&
142        (info_ptr->valid & PNG_INFO_pHYs) != 0)
143    {
144       png_debug1(1, "in %s retrieval function",
145           "png_get_y_pixels_per_meter");
146
147       if (info_ptr->phys_unit_type == PNG_RESOLUTION_METER)
148          return (info_ptr->y_pixels_per_unit);
149    }
150 #else
151    PNG_UNUSED(png_ptr)
152    PNG_UNUSED(info_ptr)
153 #endif
154
155    return (0);
156 }
157
158 png_uint_32 PNGAPI
159 png_get_pixels_per_meter(png_const_structrp png_ptr, png_const_inforp info_ptr)
160 {
161 #ifdef PNG_pHYs_SUPPORTED
162    if (png_ptr != NULL && info_ptr != NULL &&
163        (info_ptr->valid & PNG_INFO_pHYs) != 0)
164    {
165       png_debug1(1, "in %s retrieval function", "png_get_pixels_per_meter");
166
167       if (info_ptr->phys_unit_type == PNG_RESOLUTION_METER &&
168           info_ptr->x_pixels_per_unit == info_ptr->y_pixels_per_unit)
169          return (info_ptr->x_pixels_per_unit);
170    }
171 #else
172    PNG_UNUSED(png_ptr)
173    PNG_UNUSED(info_ptr)
174 #endif
175
176    return (0);
177 }
178
179 #ifdef PNG_FLOATING_POINT_SUPPORTED
180 float PNGAPI
181 png_get_pixel_aspect_ratio(png_const_structrp png_ptr, png_const_inforp
182    info_ptr)
183 {
184 #ifdef PNG_READ_pHYs_SUPPORTED
185    if (png_ptr != NULL && info_ptr != NULL &&
186        (info_ptr->valid & PNG_INFO_pHYs) != 0)
187    {
188       png_debug1(1, "in %s retrieval function", "png_get_aspect_ratio");
189
190       if (info_ptr->x_pixels_per_unit != 0)
191          return ((float)((float)info_ptr->y_pixels_per_unit
192              /(float)info_ptr->x_pixels_per_unit));
193    }
194 #else
195    PNG_UNUSED(png_ptr)
196    PNG_UNUSED(info_ptr)
197 #endif
198
199    return ((float)0.0);
200 }
201 #endif
202
203 #ifdef PNG_FIXED_POINT_SUPPORTED
204 png_fixed_point PNGAPI
205 png_get_pixel_aspect_ratio_fixed(png_const_structrp png_ptr,
206     png_const_inforp info_ptr)
207 {
208 #ifdef PNG_READ_pHYs_SUPPORTED
209    if (png_ptr != NULL && info_ptr != NULL &&
210        (info_ptr->valid & PNG_INFO_pHYs) != 0 &&
211        info_ptr->x_pixels_per_unit > 0 && info_ptr->y_pixels_per_unit > 0 &&
212        info_ptr->x_pixels_per_unit <= PNG_UINT_31_MAX &&
213        info_ptr->y_pixels_per_unit <= PNG_UINT_31_MAX)
214    {
215       png_fixed_point res;
216
217       png_debug1(1, "in %s retrieval function", "png_get_aspect_ratio_fixed");
218
219       /* The following casts work because a PNG 4 byte integer only has a valid
220        * range of 0..2^31-1; otherwise the cast might overflow.
221        */
222       if (png_muldiv(&res, (png_int_32)info_ptr->y_pixels_per_unit, PNG_FP_1,
223           (png_int_32)info_ptr->x_pixels_per_unit) != 0)
224          return res;
225    }
226 #else
227    PNG_UNUSED(png_ptr)
228    PNG_UNUSED(info_ptr)
229 #endif
230
231    return 0;
232 }
233 #endif
234
235 png_int_32 PNGAPI
236 png_get_x_offset_microns(png_const_structrp png_ptr, png_const_inforp info_ptr)
237 {
238 #ifdef PNG_oFFs_SUPPORTED
239    if (png_ptr != NULL && info_ptr != NULL &&
240        (info_ptr->valid & PNG_INFO_oFFs) != 0)
241    {
242       png_debug1(1, "in %s retrieval function", "png_get_x_offset_microns");
243
244       if (info_ptr->offset_unit_type == PNG_OFFSET_MICROMETER)
245          return (info_ptr->x_offset);
246    }
247 #else
248    PNG_UNUSED(png_ptr)
249    PNG_UNUSED(info_ptr)
250 #endif
251
252    return (0);
253 }
254
255 png_int_32 PNGAPI
256 png_get_y_offset_microns(png_const_structrp png_ptr, png_const_inforp info_ptr)
257 {
258 #ifdef PNG_oFFs_SUPPORTED
259    if (png_ptr != NULL && info_ptr != NULL &&
260        (info_ptr->valid & PNG_INFO_oFFs) != 0)
261    {
262       png_debug1(1, "in %s retrieval function", "png_get_y_offset_microns");
263
264       if (info_ptr->offset_unit_type == PNG_OFFSET_MICROMETER)
265          return (info_ptr->y_offset);
266    }
267 #else
268    PNG_UNUSED(png_ptr)
269    PNG_UNUSED(info_ptr)
270 #endif
271
272    return (0);
273 }
274
275 png_int_32 PNGAPI
276 png_get_x_offset_pixels(png_const_structrp png_ptr, png_const_inforp info_ptr)
277 {
278 #ifdef PNG_oFFs_SUPPORTED
279    if (png_ptr != NULL && info_ptr != NULL &&
280        (info_ptr->valid & PNG_INFO_oFFs) != 0)
281    {
282       png_debug1(1, "in %s retrieval function", "png_get_x_offset_pixels");
283
284       if (info_ptr->offset_unit_type == PNG_OFFSET_PIXEL)
285          return (info_ptr->x_offset);
286    }
287 #else
288    PNG_UNUSED(png_ptr)
289    PNG_UNUSED(info_ptr)
290 #endif
291
292    return (0);
293 }
294
295 png_int_32 PNGAPI
296 png_get_y_offset_pixels(png_const_structrp png_ptr, png_const_inforp info_ptr)
297 {
298 #ifdef PNG_oFFs_SUPPORTED
299    if (png_ptr != NULL && info_ptr != NULL &&
300        (info_ptr->valid & PNG_INFO_oFFs) != 0)
301    {
302       png_debug1(1, "in %s retrieval function", "png_get_y_offset_pixels");
303
304       if (info_ptr->offset_unit_type == PNG_OFFSET_PIXEL)
305          return (info_ptr->y_offset);
306    }
307 #else
308    PNG_UNUSED(png_ptr)
309    PNG_UNUSED(info_ptr)
310 #endif
311
312    return (0);
313 }
314
315 #ifdef PNG_INCH_CONVERSIONS_SUPPORTED
316 static png_uint_32
317 ppi_from_ppm(png_uint_32 ppm)
318 {
319 #if 0
320    /* The conversion is *(2.54/100), in binary (32 digits):
321     * .00000110100000001001110101001001
322     */
323    png_uint_32 t1001, t1101;
324    ppm >>= 1;                  /* .1 */
325    t1001 = ppm + (ppm >> 3);   /* .1001 */
326    t1101 = t1001 + (ppm >> 1); /* .1101 */
327    ppm >>= 20;                 /* .000000000000000000001 */
328    t1101 += t1101 >> 15;       /* .1101000000000001101 */
329    t1001 >>= 11;               /* .000000000001001 */
330    t1001 += t1001 >> 12;       /* .000000000001001000000001001 */
331    ppm += t1001;               /* .000000000001001000001001001 */
332    ppm += t1101;               /* .110100000001001110101001001 */
333    return (ppm + 16) >> 5;/* .00000110100000001001110101001001 */
334 #else
335    /* The argument is a PNG unsigned integer, so it is not permitted
336     * to be bigger than 2^31.
337     */
338    png_fixed_point result;
339    if (ppm <= PNG_UINT_31_MAX && png_muldiv(&result, (png_int_32)ppm, 127,
340        5000) != 0)
341       return result;
342
343    /* Overflow. */
344    return 0;
345 #endif
346 }
347
348 png_uint_32 PNGAPI
349 png_get_pixels_per_inch(png_const_structrp png_ptr, png_const_inforp info_ptr)
350 {
351    return ppi_from_ppm(png_get_pixels_per_meter(png_ptr, info_ptr));
352 }
353
354 png_uint_32 PNGAPI
355 png_get_x_pixels_per_inch(png_const_structrp png_ptr, png_const_inforp info_ptr)
356 {
357    return ppi_from_ppm(png_get_x_pixels_per_meter(png_ptr, info_ptr));
358 }
359
360 png_uint_32 PNGAPI
361 png_get_y_pixels_per_inch(png_const_structrp png_ptr, png_const_inforp info_ptr)
362 {
363    return ppi_from_ppm(png_get_y_pixels_per_meter(png_ptr, info_ptr));
364 }
365
366 #ifdef PNG_FIXED_POINT_SUPPORTED
367 static png_fixed_point
368 png_fixed_inches_from_microns(png_const_structrp png_ptr, png_int_32 microns)
369 {
370    /* Convert from metres * 1,000,000 to inches * 100,000, meters to
371     * inches is simply *(100/2.54), so we want *(10/2.54) == 500/127.
372     * Notice that this can overflow - a warning is output and 0 is
373     * returned.
374     */
375    return png_muldiv_warn(png_ptr, microns, 500, 127);
376 }
377
378 png_fixed_point PNGAPI
379 png_get_x_offset_inches_fixed(png_const_structrp png_ptr,
380     png_const_inforp info_ptr)
381 {
382    return png_fixed_inches_from_microns(png_ptr,
383        png_get_x_offset_microns(png_ptr, info_ptr));
384 }
385 #endif
386
387 #ifdef PNG_FIXED_POINT_SUPPORTED
388 png_fixed_point PNGAPI
389 png_get_y_offset_inches_fixed(png_const_structrp png_ptr,
390     png_const_inforp info_ptr)
391 {
392    return png_fixed_inches_from_microns(png_ptr,
393        png_get_y_offset_microns(png_ptr, info_ptr));
394 }
395 #endif
396
397 #ifdef PNG_FLOATING_POINT_SUPPORTED
398 float PNGAPI
399 png_get_x_offset_inches(png_const_structrp png_ptr, png_const_inforp info_ptr)
400 {
401    /* To avoid the overflow do the conversion directly in floating
402     * point.
403     */
404    return (float)(png_get_x_offset_microns(png_ptr, info_ptr) * .00003937);
405 }
406 #endif
407
408 #ifdef PNG_FLOATING_POINT_SUPPORTED
409 float PNGAPI
410 png_get_y_offset_inches(png_const_structrp png_ptr, png_const_inforp info_ptr)
411 {
412    /* To avoid the overflow do the conversion directly in floating
413     * point.
414     */
415    return (float)(png_get_y_offset_microns(png_ptr, info_ptr) * .00003937);
416 }
417 #endif
418
419 #ifdef PNG_pHYs_SUPPORTED
420 png_uint_32 PNGAPI
421 png_get_pHYs_dpi(png_const_structrp png_ptr, png_const_inforp info_ptr,
422     png_uint_32 *res_x, png_uint_32 *res_y, int *unit_type)
423 {
424    png_uint_32 retval = 0;
425
426    if (png_ptr != NULL && info_ptr != NULL &&
427        (info_ptr->valid & PNG_INFO_pHYs) != 0)
428    {
429       png_debug1(1, "in %s retrieval function", "pHYs");
430
431       if (res_x != NULL)
432       {
433          *res_x = info_ptr->x_pixels_per_unit;
434          retval |= PNG_INFO_pHYs;
435       }
436
437       if (res_y != NULL)
438       {
439          *res_y = info_ptr->y_pixels_per_unit;
440          retval |= PNG_INFO_pHYs;
441       }
442
443       if (unit_type != NULL)
444       {
445          *unit_type = (int)info_ptr->phys_unit_type;
446          retval |= PNG_INFO_pHYs;
447
448          if (*unit_type == 1)
449          {
450             if (res_x != NULL) *res_x = (png_uint_32)(*res_x * .0254 + .50);
451             if (res_y != NULL) *res_y = (png_uint_32)(*res_y * .0254 + .50);
452          }
453       }
454    }
455
456    return (retval);
457 }
458 #endif /* pHYs */
459 #endif  /* INCH_CONVERSIONS */
460
461 /* png_get_channels really belongs in here, too, but it's been around longer */
462
463 #endif  /* EASY_ACCESS */
464
465
466 png_byte PNGAPI
467 png_get_channels(png_const_structrp png_ptr, png_const_inforp info_ptr)
468 {
469    if (png_ptr != NULL && info_ptr != NULL)
470       return(info_ptr->channels);
471
472    return (0);
473 }
474
475 #ifdef PNG_READ_SUPPORTED
476 png_const_bytep PNGAPI
477 png_get_signature(png_const_structrp png_ptr, png_const_inforp info_ptr)
478 {
479    if (png_ptr != NULL && info_ptr != NULL)
480       return(info_ptr->signature);
481
482    return (NULL);
483 }
484 #endif
485
486 #ifdef PNG_bKGD_SUPPORTED
487 png_uint_32 PNGAPI
488 png_get_bKGD(png_const_structrp png_ptr, png_inforp info_ptr,
489    png_color_16p *background)
490 {
491    if (png_ptr != NULL && info_ptr != NULL &&
492        (info_ptr->valid & PNG_INFO_bKGD) != 0 &&
493        background != NULL)
494    {
495       png_debug1(1, "in %s retrieval function", "bKGD");
496
497       *background = &(info_ptr->background);
498       return (PNG_INFO_bKGD);
499    }
500
501    return (0);
502 }
503 #endif
504
505 #ifdef PNG_cHRM_SUPPORTED
506 /* The XYZ APIs were added in 1.5.5 to take advantage of the code added at the
507  * same time to correct the rgb grayscale coefficient defaults obtained from the
508  * cHRM chunk in 1.5.4
509  */
510 #  ifdef PNG_FLOATING_POINT_SUPPORTED
511 png_uint_32 PNGAPI
512 png_get_cHRM(png_const_structrp png_ptr, png_const_inforp info_ptr,
513     double *white_x, double *white_y, double *red_x, double *red_y,
514     double *green_x, double *green_y, double *blue_x, double *blue_y)
515 {
516    /* Quiet API change: this code used to only return the end points if a cHRM
517     * chunk was present, but the end points can also come from iCCP or sRGB
518     * chunks, so in 1.6.0 the png_get_ APIs return the end points regardless and
519     * the png_set_ APIs merely check that set end points are mutually
520     * consistent.
521     */
522    if (png_ptr != NULL && info_ptr != NULL &&
523       (info_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_ENDPOINTS) != 0)
524    {
525       png_debug1(1, "in %s retrieval function", "cHRM");
526
527       if (white_x != NULL)
528          *white_x = png_float(png_ptr,
529             info_ptr->colorspace.end_points_xy.whitex, "cHRM white X");
530       if (white_y != NULL)
531          *white_y = png_float(png_ptr,
532             info_ptr->colorspace.end_points_xy.whitey, "cHRM white Y");
533       if (red_x != NULL)
534          *red_x = png_float(png_ptr, info_ptr->colorspace.end_points_xy.redx,
535             "cHRM red X");
536       if (red_y != NULL)
537          *red_y = png_float(png_ptr, info_ptr->colorspace.end_points_xy.redy,
538             "cHRM red Y");
539       if (green_x != NULL)
540          *green_x = png_float(png_ptr,
541             info_ptr->colorspace.end_points_xy.greenx, "cHRM green X");
542       if (green_y != NULL)
543          *green_y = png_float(png_ptr,
544             info_ptr->colorspace.end_points_xy.greeny, "cHRM green Y");
545       if (blue_x != NULL)
546          *blue_x = png_float(png_ptr, info_ptr->colorspace.end_points_xy.bluex,
547             "cHRM blue X");
548       if (blue_y != NULL)
549          *blue_y = png_float(png_ptr, info_ptr->colorspace.end_points_xy.bluey,
550             "cHRM blue Y");
551       return (PNG_INFO_cHRM);
552    }
553
554    return (0);
555 }
556
557 png_uint_32 PNGAPI
558 png_get_cHRM_XYZ(png_const_structrp png_ptr, png_const_inforp info_ptr,
559    double *red_X, double *red_Y, double *red_Z, double *green_X,
560    double *green_Y, double *green_Z, double *blue_X, double *blue_Y,
561    double *blue_Z)
562 {
563    if (png_ptr != NULL && info_ptr != NULL &&
564       (info_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_ENDPOINTS) != 0)
565    {
566       png_debug1(1, "in %s retrieval function", "cHRM_XYZ(float)");
567
568       if (red_X != NULL)
569          *red_X = png_float(png_ptr, info_ptr->colorspace.end_points_XYZ.red_X,
570             "cHRM red X");
571       if (red_Y != NULL)
572          *red_Y = png_float(png_ptr, info_ptr->colorspace.end_points_XYZ.red_Y,
573             "cHRM red Y");
574       if (red_Z != NULL)
575          *red_Z = png_float(png_ptr, info_ptr->colorspace.end_points_XYZ.red_Z,
576             "cHRM red Z");
577       if (green_X != NULL)
578          *green_X = png_float(png_ptr,
579             info_ptr->colorspace.end_points_XYZ.green_X, "cHRM green X");
580       if (green_Y != NULL)
581          *green_Y = png_float(png_ptr,
582             info_ptr->colorspace.end_points_XYZ.green_Y, "cHRM green Y");
583       if (green_Z != NULL)
584          *green_Z = png_float(png_ptr,
585             info_ptr->colorspace.end_points_XYZ.green_Z, "cHRM green Z");
586       if (blue_X != NULL)
587          *blue_X = png_float(png_ptr,
588             info_ptr->colorspace.end_points_XYZ.blue_X, "cHRM blue X");
589       if (blue_Y != NULL)
590          *blue_Y = png_float(png_ptr,
591             info_ptr->colorspace.end_points_XYZ.blue_Y, "cHRM blue Y");
592       if (blue_Z != NULL)
593          *blue_Z = png_float(png_ptr,
594             info_ptr->colorspace.end_points_XYZ.blue_Z, "cHRM blue Z");
595       return (PNG_INFO_cHRM);
596    }
597
598    return (0);
599 }
600 #  endif
601
602 #  ifdef PNG_FIXED_POINT_SUPPORTED
603 png_uint_32 PNGAPI
604 png_get_cHRM_XYZ_fixed(png_const_structrp png_ptr, png_const_inforp info_ptr,
605     png_fixed_point *int_red_X, png_fixed_point *int_red_Y,
606     png_fixed_point *int_red_Z, png_fixed_point *int_green_X,
607     png_fixed_point *int_green_Y, png_fixed_point *int_green_Z,
608     png_fixed_point *int_blue_X, png_fixed_point *int_blue_Y,
609     png_fixed_point *int_blue_Z)
610 {
611    if (png_ptr != NULL && info_ptr != NULL &&
612       (info_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_ENDPOINTS) != 0)
613    {
614       png_debug1(1, "in %s retrieval function", "cHRM_XYZ");
615
616       if (int_red_X != NULL)
617          *int_red_X = info_ptr->colorspace.end_points_XYZ.red_X;
618       if (int_red_Y != NULL)
619          *int_red_Y = info_ptr->colorspace.end_points_XYZ.red_Y;
620       if (int_red_Z != NULL)
621          *int_red_Z = info_ptr->colorspace.end_points_XYZ.red_Z;
622       if (int_green_X != NULL)
623          *int_green_X = info_ptr->colorspace.end_points_XYZ.green_X;
624       if (int_green_Y != NULL)
625          *int_green_Y = info_ptr->colorspace.end_points_XYZ.green_Y;
626       if (int_green_Z != NULL)
627          *int_green_Z = info_ptr->colorspace.end_points_XYZ.green_Z;
628       if (int_blue_X != NULL)
629          *int_blue_X = info_ptr->colorspace.end_points_XYZ.blue_X;
630       if (int_blue_Y != NULL)
631          *int_blue_Y = info_ptr->colorspace.end_points_XYZ.blue_Y;
632       if (int_blue_Z != NULL)
633          *int_blue_Z = info_ptr->colorspace.end_points_XYZ.blue_Z;
634       return (PNG_INFO_cHRM);
635    }
636
637    return (0);
638 }
639
640 png_uint_32 PNGAPI
641 png_get_cHRM_fixed(png_const_structrp png_ptr, png_const_inforp info_ptr,
642     png_fixed_point *white_x, png_fixed_point *white_y, png_fixed_point *red_x,
643     png_fixed_point *red_y, png_fixed_point *green_x, png_fixed_point *green_y,
644     png_fixed_point *blue_x, png_fixed_point *blue_y)
645 {
646    png_debug1(1, "in %s retrieval function", "cHRM");
647
648    if (png_ptr != NULL && info_ptr != NULL &&
649       (info_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_ENDPOINTS) != 0)
650    {
651       if (white_x != NULL)
652          *white_x = info_ptr->colorspace.end_points_xy.whitex;
653       if (white_y != NULL)
654          *white_y = info_ptr->colorspace.end_points_xy.whitey;
655       if (red_x != NULL)
656          *red_x = info_ptr->colorspace.end_points_xy.redx;
657       if (red_y != NULL)
658          *red_y = info_ptr->colorspace.end_points_xy.redy;
659       if (green_x != NULL)
660          *green_x = info_ptr->colorspace.end_points_xy.greenx;
661       if (green_y != NULL)
662          *green_y = info_ptr->colorspace.end_points_xy.greeny;
663       if (blue_x != NULL)
664          *blue_x = info_ptr->colorspace.end_points_xy.bluex;
665       if (blue_y != NULL)
666          *blue_y = info_ptr->colorspace.end_points_xy.bluey;
667       return (PNG_INFO_cHRM);
668    }
669
670    return (0);
671 }
672 #  endif
673 #endif
674
675 #ifdef PNG_gAMA_SUPPORTED
676 #  ifdef PNG_FIXED_POINT_SUPPORTED
677 png_uint_32 PNGAPI
678 png_get_gAMA_fixed(png_const_structrp png_ptr, png_const_inforp info_ptr,
679     png_fixed_point *file_gamma)
680 {
681    png_debug1(1, "in %s retrieval function", "gAMA");
682
683    if (png_ptr != NULL && info_ptr != NULL &&
684       (info_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_GAMMA) != 0 &&
685       file_gamma != NULL)
686    {
687       *file_gamma = info_ptr->colorspace.gamma;
688       return (PNG_INFO_gAMA);
689    }
690
691    return (0);
692 }
693 #  endif
694
695 #  ifdef PNG_FLOATING_POINT_SUPPORTED
696 png_uint_32 PNGAPI
697 png_get_gAMA(png_const_structrp png_ptr, png_const_inforp info_ptr,
698     double *file_gamma)
699 {
700    png_debug1(1, "in %s retrieval function", "gAMA(float)");
701
702    if (png_ptr != NULL && info_ptr != NULL &&
703       (info_ptr->colorspace.flags & PNG_COLORSPACE_HAVE_GAMMA) != 0 &&
704       file_gamma != NULL)
705    {
706       *file_gamma = png_float(png_ptr, info_ptr->colorspace.gamma,
707          "png_get_gAMA");
708       return (PNG_INFO_gAMA);
709    }
710
711    return (0);
712 }
713 #  endif
714 #endif
715
716 #ifdef PNG_sRGB_SUPPORTED
717 png_uint_32 PNGAPI
718 png_get_sRGB(png_const_structrp png_ptr, png_const_inforp info_ptr,
719     int *file_srgb_intent)
720 {
721    png_debug1(1, "in %s retrieval function", "sRGB");
722
723    if (png_ptr != NULL && info_ptr != NULL &&
724       (info_ptr->valid & PNG_INFO_sRGB) != 0 && file_srgb_intent != NULL)
725    {
726       *file_srgb_intent = info_ptr->colorspace.rendering_intent;
727       return (PNG_INFO_sRGB);
728    }
729
730    return (0);
731 }
732 #endif
733
734 #ifdef PNG_iCCP_SUPPORTED
735 png_uint_32 PNGAPI
736 png_get_iCCP(png_const_structrp png_ptr, png_inforp info_ptr,
737     png_charpp name, int *compression_type,
738     png_bytepp profile, png_uint_32 *proflen)
739 {
740    png_debug1(1, "in %s retrieval function", "iCCP");
741
742    if (png_ptr != NULL && info_ptr != NULL &&
743        (info_ptr->valid & PNG_INFO_iCCP) != 0 &&
744        name != NULL && compression_type != NULL && profile != NULL &&
745            proflen != NULL)
746    {
747       *name = info_ptr->iccp_name;
748       *profile = info_ptr->iccp_profile;
749       *proflen = png_get_uint_32(info_ptr->iccp_profile);
750       /* This is somewhat irrelevant since the profile data returned has
751        * actually been uncompressed.
752        */
753       *compression_type = PNG_COMPRESSION_TYPE_BASE;
754       return (PNG_INFO_iCCP);
755    }
756
757    return (0);
758 }
759 #endif
760
761 #ifdef PNG_sPLT_SUPPORTED
762 int PNGAPI
763 png_get_sPLT(png_const_structrp png_ptr, png_inforp info_ptr,
764     png_sPLT_tpp spalettes)
765 {
766    if (png_ptr != NULL && info_ptr != NULL && spalettes != NULL)
767    {
768       *spalettes = info_ptr->splt_palettes;
769       return info_ptr->splt_palettes_num;
770    }
771
772    return (0);
773 }
774 #endif
775
776 #ifdef PNG_hIST_SUPPORTED
777 png_uint_32 PNGAPI
778 png_get_hIST(png_const_structrp png_ptr, png_inforp info_ptr,
779     png_uint_16p *hist)
780 {
781    png_debug1(1, "in %s retrieval function", "hIST");
782
783    if (png_ptr != NULL && info_ptr != NULL &&
784        (info_ptr->valid & PNG_INFO_hIST) != 0 && hist != NULL)
785    {
786       *hist = info_ptr->hist;
787       return (PNG_INFO_hIST);
788    }
789
790    return (0);
791 }
792 #endif
793
794 png_uint_32 PNGAPI
795 png_get_IHDR(png_const_structrp png_ptr, png_const_inforp info_ptr,
796     png_uint_32 *width, png_uint_32 *height, int *bit_depth,
797     int *color_type, int *interlace_type, int *compression_type,
798     int *filter_type)
799 {
800    png_debug1(1, "in %s retrieval function", "IHDR");
801
802    if (png_ptr == NULL || info_ptr == NULL)
803       return (0);
804
805    if (width != NULL)
806        *width = info_ptr->width;
807
808    if (height != NULL)
809        *height = info_ptr->height;
810
811    if (bit_depth != NULL)
812        *bit_depth = info_ptr->bit_depth;
813
814    if (color_type != NULL)
815        *color_type = info_ptr->color_type;
816
817    if (compression_type != NULL)
818       *compression_type = info_ptr->compression_type;
819
820    if (filter_type != NULL)
821       *filter_type = info_ptr->filter_type;
822
823    if (interlace_type != NULL)
824       *interlace_type = info_ptr->interlace_type;
825
826    /* This is redundant if we can be sure that the info_ptr values were all
827     * assigned in png_set_IHDR().  We do the check anyhow in case an
828     * application has ignored our advice not to mess with the members
829     * of info_ptr directly.
830     */
831    png_check_IHDR(png_ptr, info_ptr->width, info_ptr->height,
832        info_ptr->bit_depth, info_ptr->color_type, info_ptr->interlace_type,
833        info_ptr->compression_type, info_ptr->filter_type);
834
835    return (1);
836 }
837
838 #ifdef PNG_oFFs_SUPPORTED
839 png_uint_32 PNGAPI
840 png_get_oFFs(png_const_structrp png_ptr, png_const_inforp info_ptr,
841     png_int_32 *offset_x, png_int_32 *offset_y, int *unit_type)
842 {
843    png_debug1(1, "in %s retrieval function", "oFFs");
844
845    if (png_ptr != NULL && info_ptr != NULL &&
846        (info_ptr->valid & PNG_INFO_oFFs) != 0 &&
847        offset_x != NULL && offset_y != NULL && unit_type != NULL)
848    {
849       *offset_x = info_ptr->x_offset;
850       *offset_y = info_ptr->y_offset;
851       *unit_type = (int)info_ptr->offset_unit_type;
852       return (PNG_INFO_oFFs);
853    }
854
855    return (0);
856 }
857 #endif
858
859 #ifdef PNG_pCAL_SUPPORTED
860 png_uint_32 PNGAPI
861 png_get_pCAL(png_const_structrp png_ptr, png_inforp info_ptr,
862     png_charp *purpose, png_int_32 *X0, png_int_32 *X1, int *type, int *nparams,
863     png_charp *units, png_charpp *params)
864 {
865    png_debug1(1, "in %s retrieval function", "pCAL");
866
867    if (png_ptr != NULL && info_ptr != NULL &&
868        (info_ptr->valid & PNG_INFO_pCAL) != 0 &&
869        purpose != NULL && X0 != NULL && X1 != NULL && type != NULL &&
870        nparams != NULL && units != NULL && params != NULL)
871    {
872       *purpose = info_ptr->pcal_purpose;
873       *X0 = info_ptr->pcal_X0;
874       *X1 = info_ptr->pcal_X1;
875       *type = (int)info_ptr->pcal_type;
876       *nparams = (int)info_ptr->pcal_nparams;
877       *units = info_ptr->pcal_units;
878       *params = info_ptr->pcal_params;
879       return (PNG_INFO_pCAL);
880    }
881
882    return (0);
883 }
884 #endif
885
886 #ifdef PNG_sCAL_SUPPORTED
887 #  ifdef PNG_FIXED_POINT_SUPPORTED
888 #    if defined(PNG_FLOATING_ARITHMETIC_SUPPORTED) || \
889          defined(PNG_FLOATING_POINT_SUPPORTED)
890 png_uint_32 PNGAPI
891 png_get_sCAL_fixed(png_const_structrp png_ptr, png_const_inforp info_ptr,
892     int *unit, png_fixed_point *width, png_fixed_point *height)
893 {
894    if (png_ptr != NULL && info_ptr != NULL &&
895        (info_ptr->valid & PNG_INFO_sCAL) != 0)
896    {
897       *unit = info_ptr->scal_unit;
898       /*TODO: make this work without FP support; the API is currently eliminated
899        * if neither floating point APIs nor internal floating point arithmetic
900        * are enabled.
901        */
902       *width = png_fixed(png_ptr, atof(info_ptr->scal_s_width), "sCAL width");
903       *height = png_fixed(png_ptr, atof(info_ptr->scal_s_height),
904          "sCAL height");
905       return (PNG_INFO_sCAL);
906    }
907
908    return(0);
909 }
910 #    endif /* FLOATING_ARITHMETIC */
911 #  endif /* FIXED_POINT */
912 #  ifdef PNG_FLOATING_POINT_SUPPORTED
913 png_uint_32 PNGAPI
914 png_get_sCAL(png_const_structrp png_ptr, png_const_inforp info_ptr,
915     int *unit, double *width, double *height)
916 {
917    if (png_ptr != NULL && info_ptr != NULL &&
918        (info_ptr->valid & PNG_INFO_sCAL) != 0)
919    {
920       *unit = info_ptr->scal_unit;
921       *width = atof(info_ptr->scal_s_width);
922       *height = atof(info_ptr->scal_s_height);
923       return (PNG_INFO_sCAL);
924    }
925
926    return(0);
927 }
928 #  endif /* FLOATING POINT */
929 png_uint_32 PNGAPI
930 png_get_sCAL_s(png_const_structrp png_ptr, png_const_inforp info_ptr,
931     int *unit, png_charpp width, png_charpp height)
932 {
933    if (png_ptr != NULL && info_ptr != NULL &&
934        (info_ptr->valid & PNG_INFO_sCAL) != 0)
935    {
936       *unit = info_ptr->scal_unit;
937       *width = info_ptr->scal_s_width;
938       *height = info_ptr->scal_s_height;
939       return (PNG_INFO_sCAL);
940    }
941
942    return(0);
943 }
944 #endif /* sCAL */
945
946 #ifdef PNG_pHYs_SUPPORTED
947 png_uint_32 PNGAPI
948 png_get_pHYs(png_const_structrp png_ptr, png_const_inforp info_ptr,
949     png_uint_32 *res_x, png_uint_32 *res_y, int *unit_type)
950 {
951    png_uint_32 retval = 0;
952
953    png_debug1(1, "in %s retrieval function", "pHYs");
954
955    if (png_ptr != NULL && info_ptr != NULL &&
956        (info_ptr->valid & PNG_INFO_pHYs) != 0)
957    {
958       if (res_x != NULL)
959       {
960          *res_x = info_ptr->x_pixels_per_unit;
961          retval |= PNG_INFO_pHYs;
962       }
963
964       if (res_y != NULL)
965       {
966          *res_y = info_ptr->y_pixels_per_unit;
967          retval |= PNG_INFO_pHYs;
968       }
969
970       if (unit_type != NULL)
971       {
972          *unit_type = (int)info_ptr->phys_unit_type;
973          retval |= PNG_INFO_pHYs;
974       }
975    }
976
977    return (retval);
978 }
979 #endif /* pHYs */
980
981 png_uint_32 PNGAPI
982 png_get_PLTE(png_const_structrp png_ptr, png_inforp info_ptr,
983     png_colorp *palette, int *num_palette)
984 {
985    png_debug1(1, "in %s retrieval function", "PLTE");
986
987    if (png_ptr != NULL && info_ptr != NULL &&
988        (info_ptr->valid & PNG_INFO_PLTE) != 0 && palette != NULL)
989    {
990       *palette = info_ptr->palette;
991       *num_palette = info_ptr->num_palette;
992       png_debug1(3, "num_palette = %d", *num_palette);
993       return (PNG_INFO_PLTE);
994    }
995
996    return (0);
997 }
998
999 #ifdef PNG_sBIT_SUPPORTED
1000 png_uint_32 PNGAPI
1001 png_get_sBIT(png_const_structrp png_ptr, png_inforp info_ptr,
1002     png_color_8p *sig_bit)
1003 {
1004    png_debug1(1, "in %s retrieval function", "sBIT");
1005
1006    if (png_ptr != NULL && info_ptr != NULL &&
1007        (info_ptr->valid & PNG_INFO_sBIT) != 0 && sig_bit != NULL)
1008    {
1009       *sig_bit = &(info_ptr->sig_bit);
1010       return (PNG_INFO_sBIT);
1011    }
1012
1013    return (0);
1014 }
1015 #endif
1016
1017 #ifdef PNG_TEXT_SUPPORTED
1018 int PNGAPI
1019 png_get_text(png_const_structrp png_ptr, png_inforp info_ptr,
1020     png_textp *text_ptr, int *num_text)
1021 {
1022    if (png_ptr != NULL && info_ptr != NULL && info_ptr->num_text > 0)
1023    {
1024       png_debug1(1, "in 0x%lx retrieval function",
1025          (unsigned long)png_ptr->chunk_name);
1026
1027       if (text_ptr != NULL)
1028          *text_ptr = info_ptr->text;
1029
1030       if (num_text != NULL)
1031          *num_text = info_ptr->num_text;
1032
1033       return info_ptr->num_text;
1034    }
1035
1036    if (num_text != NULL)
1037       *num_text = 0;
1038
1039    return(0);
1040 }
1041 #endif
1042
1043 #ifdef PNG_tIME_SUPPORTED
1044 png_uint_32 PNGAPI
1045 png_get_tIME(png_const_structrp png_ptr, png_inforp info_ptr,
1046     png_timep *mod_time)
1047 {
1048    png_debug1(1, "in %s retrieval function", "tIME");
1049
1050    if (png_ptr != NULL && info_ptr != NULL &&
1051        (info_ptr->valid & PNG_INFO_tIME) != 0 && mod_time != NULL)
1052    {
1053       *mod_time = &(info_ptr->mod_time);
1054       return (PNG_INFO_tIME);
1055    }
1056
1057    return (0);
1058 }
1059 #endif
1060
1061 #ifdef PNG_tRNS_SUPPORTED
1062 png_uint_32 PNGAPI
1063 png_get_tRNS(png_const_structrp png_ptr, png_inforp info_ptr,
1064     png_bytep *trans_alpha, int *num_trans, png_color_16p *trans_color)
1065 {
1066    png_uint_32 retval = 0;
1067    if (png_ptr != NULL && info_ptr != NULL &&
1068        (info_ptr->valid & PNG_INFO_tRNS) != 0)
1069    {
1070       png_debug1(1, "in %s retrieval function", "tRNS");
1071
1072       if (info_ptr->color_type == PNG_COLOR_TYPE_PALETTE)
1073       {
1074          if (trans_alpha != NULL)
1075          {
1076             *trans_alpha = info_ptr->trans_alpha;
1077             retval |= PNG_INFO_tRNS;
1078          }
1079
1080          if (trans_color != NULL)
1081             *trans_color = &(info_ptr->trans_color);
1082       }
1083
1084       else /* if (info_ptr->color_type != PNG_COLOR_TYPE_PALETTE) */
1085       {
1086          if (trans_color != NULL)
1087          {
1088             *trans_color = &(info_ptr->trans_color);
1089             retval |= PNG_INFO_tRNS;
1090          }
1091
1092          if (trans_alpha != NULL)
1093             *trans_alpha = NULL;
1094       }
1095
1096       if (num_trans != NULL)
1097       {
1098          *num_trans = info_ptr->num_trans;
1099          retval |= PNG_INFO_tRNS;
1100       }
1101    }
1102
1103    return (retval);
1104 }
1105 #endif
1106
1107 #ifdef PNG_STORE_UNKNOWN_CHUNKS_SUPPORTED
1108 int PNGAPI
1109 png_get_unknown_chunks(png_const_structrp png_ptr, png_inforp info_ptr,
1110     png_unknown_chunkpp unknowns)
1111 {
1112    if (png_ptr != NULL && info_ptr != NULL && unknowns != NULL)
1113    {
1114       *unknowns = info_ptr->unknown_chunks;
1115       return info_ptr->unknown_chunks_num;
1116    }
1117
1118    return (0);
1119 }
1120 #endif
1121
1122 #ifdef PNG_READ_RGB_TO_GRAY_SUPPORTED
1123 png_byte PNGAPI
1124 png_get_rgb_to_gray_status (png_const_structrp png_ptr)
1125 {
1126    return (png_byte)(png_ptr ? png_ptr->rgb_to_gray_status : 0);
1127 }
1128 #endif
1129
1130 #ifdef PNG_USER_CHUNKS_SUPPORTED
1131 png_voidp PNGAPI
1132 png_get_user_chunk_ptr(png_const_structrp png_ptr)
1133 {
1134    return (png_ptr ? png_ptr->user_chunk_ptr : NULL);
1135 }
1136 #endif
1137
1138 png_size_t PNGAPI
1139 png_get_compression_buffer_size(png_const_structrp png_ptr)
1140 {
1141    if (png_ptr == NULL)
1142       return 0;
1143
1144 #ifdef PNG_WRITE_SUPPORTED
1145       if ((png_ptr->mode & PNG_IS_READ_STRUCT) != 0)
1146 #endif
1147    {
1148 #ifdef PNG_SEQUENTIAL_READ_SUPPORTED
1149          return png_ptr->IDAT_read_size;
1150 #else
1151          return PNG_IDAT_READ_SIZE;
1152 #endif
1153    }
1154
1155 #ifdef PNG_WRITE_SUPPORTED
1156       else
1157          return png_ptr->zbuffer_size;
1158 #endif
1159 }
1160
1161 #ifdef PNG_SET_USER_LIMITS_SUPPORTED
1162 /* These functions were added to libpng 1.2.6 and were enabled
1163  * by default in libpng-1.4.0 */
1164 png_uint_32 PNGAPI
1165 png_get_user_width_max (png_const_structrp png_ptr)
1166 {
1167    return (png_ptr ? png_ptr->user_width_max : 0);
1168 }
1169
1170 png_uint_32 PNGAPI
1171 png_get_user_height_max (png_const_structrp png_ptr)
1172 {
1173    return (png_ptr ? png_ptr->user_height_max : 0);
1174 }
1175
1176 /* This function was added to libpng 1.4.0 */
1177 png_uint_32 PNGAPI
1178 png_get_chunk_cache_max (png_const_structrp png_ptr)
1179 {
1180    return (png_ptr ? png_ptr->user_chunk_cache_max : 0);
1181 }
1182
1183 /* This function was added to libpng 1.4.1 */
1184 png_alloc_size_t PNGAPI
1185 png_get_chunk_malloc_max (png_const_structrp png_ptr)
1186 {
1187    return (png_ptr ? png_ptr->user_chunk_malloc_max : 0);
1188 }
1189 #endif /* SET_USER_LIMITS */
1190
1191 /* These functions were added to libpng 1.4.0 */
1192 #ifdef PNG_IO_STATE_SUPPORTED
1193 png_uint_32 PNGAPI
1194 png_get_io_state (png_const_structrp png_ptr)
1195 {
1196    return png_ptr->io_state;
1197 }
1198
1199 png_uint_32 PNGAPI
1200 png_get_io_chunk_type (png_const_structrp png_ptr)
1201 {
1202    return png_ptr->chunk_name;
1203 }
1204 #endif /* IO_STATE */
1205
1206 #ifdef PNG_CHECK_FOR_INVALID_INDEX_SUPPORTED
1207 #  ifdef PNG_GET_PALETTE_MAX_SUPPORTED
1208 int PNGAPI
1209 png_get_palette_max(png_const_structp png_ptr, png_const_infop info_ptr)
1210 {
1211    if (png_ptr != NULL && info_ptr != NULL)
1212       return png_ptr->num_palette_max;
1213
1214    return (-1);
1215 }
1216 #  endif
1217 #endif
1218
1219 #endif /* READ || WRITE */