2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
13 % Read/Write Portable Network Graphics Image Format %
17 % Glenn Randers-Pehrson %
21 % Copyright 1999-2011 ImageMagick Studio LLC, a non-profit organization %
22 % dedicated to making software imaging solutions freely available. %
24 % You may not use this file except in compliance with the License. You may %
25 % obtain a copy of the License at %
27 % http://www.imagemagick.org/script/license.php %
29 % Unless required by applicable law or agreed to in writing, software %
30 % distributed under the License is distributed on an "AS IS" BASIS, %
31 % WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. %
32 % See the License for the specific language governing permissions and %
33 % limitations under the License. %
35 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
44 #include "magick/studio.h"
45 #include "magick/artifact.h"
46 #include "magick/attribute.h"
47 #include "magick/blob.h"
48 #include "magick/blob-private.h"
49 #include "magick/cache.h"
50 #include "magick/color.h"
51 #include "magick/color-private.h"
52 #include "magick/colormap.h"
53 #include "magick/colorspace.h"
54 #include "magick/constitute.h"
55 #include "magick/enhance.h"
56 #include "magick/exception.h"
57 #include "magick/exception-private.h"
58 #include "magick/geometry.h"
59 #include "magick/histogram.h"
60 #include "magick/image.h"
61 #include "magick/image-private.h"
62 #include "magick/layer.h"
63 #include "magick/list.h"
64 #include "magick/log.h"
65 #include "magick/magick.h"
66 #include "magick/memory_.h"
67 #include "magick/module.h"
68 #include "magick/monitor.h"
69 #include "magick/monitor-private.h"
70 #include "magick/option.h"
71 #include "magick/quantum-private.h"
72 #include "magick/profile.h"
73 #include "magick/property.h"
74 #include "magick/resource_.h"
75 #include "magick/semaphore.h"
76 #include "magick/quantum-private.h"
77 #include "magick/static.h"
78 #include "magick/statistic.h"
79 #include "magick/string_.h"
80 #include "magick/string-private.h"
81 #include "magick/transform.h"
82 #include "magick/utility.h"
83 #if defined(MAGICKCORE_PNG_DELEGATE)
85 /* Suppress libpng pedantic warnings that were added in
86 * libpng-1.2.41 and libpng-1.4.0. If you are working on
87 * migration to libpng-1.5, remove these defines and then
88 * fix any code that generates warnings.
90 /* #define PNG_DEPRECATED Use of this function is deprecated */
91 /* #define PNG_USE_RESULT The result of this function must be checked */
92 /* #define PNG_NORETURN This function does not return */
93 /* #define PNG_ALLOCATED The result of the function is new memory */
94 /* #define PNG_DEPSTRUCT Access to this struct member is deprecated */
99 /* ImageMagick differences */
100 #define first_scene scene
102 #if PNG_LIBPNG_VER > 10011
104 Optional declarations. Define or undefine them as you like.
106 /* #define PNG_DEBUG -- turning this on breaks VisualC compiling */
109 Features under construction. Define these to work on them.
111 #undef MNG_OBJECT_BUFFERS
112 #undef MNG_BASI_SUPPORTED
113 #define MNG_COALESCE_LAYERS /* In 5.4.4, this interfered with MMAP'ed files. */
114 #define MNG_INSERT_LAYERS /* Troublesome, but seem to work as of 5.4.4 */
115 #if defined(MAGICKCORE_JPEG_DELEGATE)
116 # define JNG_SUPPORTED /* Not finished as of 5.5.2. See "To do" comments. */
118 #if !defined(RGBColorMatchExact)
119 #define IsPNGColorEqual(color,target) \
120 (((color).red == (target).red) && \
121 ((color).green == (target).green) && \
122 ((color).blue == (target).blue))
126 Establish thread safety.
127 setjmp/longjmp is claimed to be safe on these platforms:
128 setjmp/longjmp is alleged to be unsafe on these platforms:
130 #ifndef SETJMP_IS_THREAD_SAFE
131 #define PNG_SETJMP_NOT_THREAD_SAFE
134 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
136 *ping_semaphore = (SemaphoreInfo *) NULL;
140 This temporary until I set up malloc'ed object attributes array.
141 Recompile with MNG_MAX_OBJECTS=65536L to avoid this limit but
144 #define MNG_MAX_OBJECTS 256
147 If this not defined, spec is interpreted strictly. If it is
148 defined, an attempt will be made to recover from some errors,
150 o global PLTE too short
155 Don't try to define PNG_MNG_FEATURES_SUPPORTED here. Make sure
156 it's defined in libpng/pngconf.h, version 1.0.9 or later. It won't work
157 with earlier versions of libpng. From libpng-1.0.3a to libpng-1.0.8,
158 PNG_READ|WRITE_EMPTY_PLTE were used but those have been deprecated in
159 libpng in favor of PNG_MNG_FEATURES_SUPPORTED, so we set them here.
160 PNG_MNG_FEATURES_SUPPORTED is disabled by default in libpng-1.0.9 and
161 will be enabled by default in libpng-1.2.0.
163 #ifdef PNG_MNG_FEATURES_SUPPORTED
164 # ifndef PNG_READ_EMPTY_PLTE_SUPPORTED
165 # define PNG_READ_EMPTY_PLTE_SUPPORTED
167 # ifndef PNG_WRITE_EMPTY_PLTE_SUPPORTED
168 # define PNG_WRITE_EMPTY_PLTE_SUPPORTED
173 Maximum valid size_t in PNG/MNG chunks is (2^31)-1
174 This macro is only defined in libpng-1.0.3 and later.
175 Previously it was PNG_MAX_UINT but that was deprecated in libpng-1.2.6
177 #ifndef PNG_UINT_31_MAX
178 #define PNG_UINT_31_MAX (png_uint_32) 0x7fffffffL
182 Constant strings for known chunk types. If you need to add a chunk,
183 add a string holding the name here. To make the code more
184 portable, we use ASCII numbers like this, not characters.
187 static png_byte FARDATA mng_MHDR[5]={ 77, 72, 68, 82, (png_byte) '\0'};
188 static png_byte FARDATA mng_BACK[5]={ 66, 65, 67, 75, (png_byte) '\0'};
189 static png_byte FARDATA mng_BASI[5]={ 66, 65, 83, 73, (png_byte) '\0'};
190 static png_byte FARDATA mng_CLIP[5]={ 67, 76, 73, 80, (png_byte) '\0'};
191 static png_byte FARDATA mng_CLON[5]={ 67, 76, 79, 78, (png_byte) '\0'};
192 static png_byte FARDATA mng_DEFI[5]={ 68, 69, 70, 73, (png_byte) '\0'};
193 static png_byte FARDATA mng_DHDR[5]={ 68, 72, 68, 82, (png_byte) '\0'};
194 static png_byte FARDATA mng_DISC[5]={ 68, 73, 83, 67, (png_byte) '\0'};
195 static png_byte FARDATA mng_ENDL[5]={ 69, 78, 68, 76, (png_byte) '\0'};
196 static png_byte FARDATA mng_FRAM[5]={ 70, 82, 65, 77, (png_byte) '\0'};
197 static png_byte FARDATA mng_IEND[5]={ 73, 69, 78, 68, (png_byte) '\0'};
198 static png_byte FARDATA mng_IHDR[5]={ 73, 72, 68, 82, (png_byte) '\0'};
199 static png_byte FARDATA mng_JHDR[5]={ 74, 72, 68, 82, (png_byte) '\0'};
200 static png_byte FARDATA mng_LOOP[5]={ 76, 79, 79, 80, (png_byte) '\0'};
201 static png_byte FARDATA mng_MAGN[5]={ 77, 65, 71, 78, (png_byte) '\0'};
202 static png_byte FARDATA mng_MEND[5]={ 77, 69, 78, 68, (png_byte) '\0'};
203 static png_byte FARDATA mng_MOVE[5]={ 77, 79, 86, 69, (png_byte) '\0'};
204 static png_byte FARDATA mng_PAST[5]={ 80, 65, 83, 84, (png_byte) '\0'};
205 static png_byte FARDATA mng_PLTE[5]={ 80, 76, 84, 69, (png_byte) '\0'};
206 static png_byte FARDATA mng_SAVE[5]={ 83, 65, 86, 69, (png_byte) '\0'};
207 static png_byte FARDATA mng_SEEK[5]={ 83, 69, 69, 75, (png_byte) '\0'};
208 static png_byte FARDATA mng_SHOW[5]={ 83, 72, 79, 87, (png_byte) '\0'};
209 static png_byte FARDATA mng_TERM[5]={ 84, 69, 82, 77, (png_byte) '\0'};
210 static png_byte FARDATA mng_bKGD[5]={ 98, 75, 71, 68, (png_byte) '\0'};
211 static png_byte FARDATA mng_cHRM[5]={ 99, 72, 82, 77, (png_byte) '\0'};
212 static png_byte FARDATA mng_gAMA[5]={103, 65, 77, 65, (png_byte) '\0'};
213 static png_byte FARDATA mng_iCCP[5]={105, 67, 67, 80, (png_byte) '\0'};
214 static png_byte FARDATA mng_nEED[5]={110, 69, 69, 68, (png_byte) '\0'};
215 static png_byte FARDATA mng_pHYg[5]={112, 72, 89, 103, (png_byte) '\0'};
216 static png_byte FARDATA mng_vpAg[5]={118, 112, 65, 103, (png_byte) '\0'};
217 static png_byte FARDATA mng_pHYs[5]={112, 72, 89, 115, (png_byte) '\0'};
218 static png_byte FARDATA mng_sBIT[5]={115, 66, 73, 84, (png_byte) '\0'};
219 static png_byte FARDATA mng_sRGB[5]={115, 82, 71, 66, (png_byte) '\0'};
220 static png_byte FARDATA mng_tRNS[5]={116, 82, 78, 83, (png_byte) '\0'};
222 #if defined(JNG_SUPPORTED)
223 static png_byte FARDATA mng_IDAT[5]={ 73, 68, 65, 84, (png_byte) '\0'};
224 static png_byte FARDATA mng_JDAT[5]={ 74, 68, 65, 84, (png_byte) '\0'};
225 static png_byte FARDATA mng_JDAA[5]={ 74, 68, 65, 65, (png_byte) '\0'};
226 static png_byte FARDATA mng_JdAA[5]={ 74, 100, 65, 65, (png_byte) '\0'};
227 static png_byte FARDATA mng_JSEP[5]={ 74, 83, 69, 80, (png_byte) '\0'};
228 static png_byte FARDATA mng_oFFs[5]={111, 70, 70, 115, (png_byte) '\0'};
232 Other known chunks that are not yet supported by ImageMagick:
233 static png_byte FARDATA mng_hIST[5]={104, 73, 83, 84, (png_byte) '\0'};
234 static png_byte FARDATA mng_iCCP[5]={105, 67, 67, 80, (png_byte) '\0'};
235 static png_byte FARDATA mng_iTXt[5]={105, 84, 88, 116, (png_byte) '\0'};
236 static png_byte FARDATA mng_sPLT[5]={115, 80, 76, 84, (png_byte) '\0'};
237 static png_byte FARDATA mng_sTER[5]={115, 84, 69, 82, (png_byte) '\0'};
238 static png_byte FARDATA mng_tEXt[5]={116, 69, 88, 116, (png_byte) '\0'};
239 static png_byte FARDATA mng_tIME[5]={116, 73, 77, 69, (png_byte) '\0'};
240 static png_byte FARDATA mng_zTXt[5]={122, 84, 88, 116, (png_byte) '\0'};
243 typedef struct _MngBox
252 typedef struct _MngPair
259 #ifdef MNG_OBJECT_BUFFERS
260 typedef struct _MngBuffer
292 typedef struct _MngInfo
295 #ifdef MNG_OBJECT_BUFFERS
297 *ob[MNG_MAX_OBJECTS];
308 #ifndef PNG_READ_EMPTY_PLTE_SUPPORTED
309 bytes_in_read_buffer,
315 #if defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED) || \
316 defined(PNG_MNG_FEATURES_SUPPORTED)
328 have_saved_bkgd_index,
329 have_write_global_chrm,
330 have_write_global_gama,
331 have_write_global_plte,
332 have_write_global_srgb,
346 x_off[MNG_MAX_OBJECTS],
347 y_off[MNG_MAX_OBJECTS];
353 object_clip[MNG_MAX_OBJECTS];
356 /* These flags could be combined into one byte */
357 exists[MNG_MAX_OBJECTS],
358 frozen[MNG_MAX_OBJECTS],
360 invisible[MNG_MAX_OBJECTS],
361 viewable[MNG_MAX_OBJECTS];
373 #ifndef PNG_READ_EMPTY_PLTE_SUPPORTED
391 global_x_pixels_per_unit,
392 global_y_pixels_per_unit,
402 global_phys_unit_type,
421 #ifdef MNG_BASI_SUPPORTED
429 basi_compression_method,
431 basi_interlace_method,
454 /* Added at version 6.6.6-7 */
461 /* ping_exclude_iTXt, */
468 ping_exclude_zCCP, /* hex-encoded iCCP */
475 Forward declarations.
477 static MagickBooleanType
478 WritePNGImage(const ImageInfo *,Image *);
480 static MagickBooleanType
481 WriteMNGImage(const ImageInfo *,Image *);
483 #if defined(JNG_SUPPORTED)
484 static MagickBooleanType
485 WriteJNGImage(const ImageInfo *,Image *);
488 #if PNG_LIBPNG_VER > 10011
491 #if (MAGICKCORE_QUANTUM_DEPTH >= 16)
492 static MagickBooleanType
493 LosslessReduceDepthOK(Image *image)
496 ok_to_reduce=MagickFalse;
498 /* Reduce bit depth if it can be reduced losslessly from 16 to 8.
499 * Note that the method GetImageDepth doesn't check background
500 * and doesn't handle PseudoClass specially. Also it uses
501 * multiplication and division by 257 instead of shifting, so
505 if (image->depth == 16)
512 (((((size_t) image->background_color.red >> 8) & 0xff)
513 == ((size_t) image->background_color.red & 0xff)) &&
514 ((((size_t) image->background_color.green >> 8) & 0xff)
515 == ((size_t) image->background_color.green & 0xff)) &&
516 ((((size_t) image->background_color.blue >> 8) & 0xff)
517 == ((size_t) image->background_color.blue & 0xff))) ? MagickTrue :
520 if (ok_to_reduce != MagickFalse && image->storage_class == PseudoClass)
524 for (indx=0; indx < (ssize_t) image->colors; indx++)
526 ok_to_reduce=(((((size_t) image->colormap[indx].red >>
528 == ((size_t) image->colormap[indx].red & 0xff)) &&
529 ((((size_t) image->colormap[indx].green >> 8) & 0xff)
530 == ((size_t) image->colormap[indx].green & 0xff)) &&
531 ((((size_t) image->colormap[indx].blue >> 8) & 0xff)
532 == ((size_t) image->colormap[indx].blue & 0xff)) &&
533 (image->matte == MagickFalse ||
534 (((size_t) image->colormap[indx].opacity >> 8) & 0xff)
535 == ((size_t) image->colormap[indx].opacity & 0xff))) ?
536 MagickTrue : MagickFalse;
537 if (ok_to_reduce == MagickFalse)
542 if ((ok_to_reduce != MagickFalse) &&
543 (image->storage_class != PseudoClass))
551 for (y=0; y < (ssize_t) image->rows; y++)
553 p=GetVirtualPixels(image,0,y,image->columns,1,&image->exception);
555 if (p == (const PixelPacket *) NULL)
557 ok_to_reduce = MagickFalse;
561 for (x=(ssize_t) image->columns-1; x >= 0; x--)
564 (((size_t) p->red >> 8) & 0xff) ==
565 ((size_t) p->red & 0xff)) &&
566 ((((size_t) p->green >> 8) & 0xff) ==
567 ((size_t) p->green & 0xff)) &&
568 ((((size_t) p->blue >> 8) & 0xff) ==
569 ((size_t) p->blue & 0xff)) &&
570 (((image->matte == MagickFalse ||
571 (((size_t) p->opacity >> 8) & 0xff) ==
572 ((size_t) p->opacity & 0xff))))) ? MagickTrue : MagickFalse;
574 if (ok_to_reduce == MagickFalse)
584 if (ok_to_reduce != MagickFalse)
586 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
587 " OK to reduce PNG bit depth to 8 without loss of info");
591 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
592 " Not OK to reduce PNG bit depth to 8 without loss of info");
598 #endif /* MAGICKCORE_QUANTUM_DEPTH >= 16 */
601 Magick_RenderingIntent_to_PNG_RenderingIntent(const RenderingIntent intent)
605 case PerceptualIntent:
611 case SaturationIntent:
622 static RenderingIntent
623 Magick_RenderingIntent_from_PNG_RenderingIntent(const int ping_intent)
628 return PerceptualIntent;
631 return RelativeIntent;
634 return SaturationIntent;
637 return AbsoluteIntent;
640 return UndefinedIntent;
644 static inline ssize_t MagickMax(const ssize_t x,const ssize_t y)
652 static inline ssize_t MagickMin(const ssize_t x,const ssize_t y)
662 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
666 % I m a g e I s G r a y %
670 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
672 % Like IsGrayImage except does not change DirectClass to PseudoClass %
674 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
676 static MagickBooleanType ImageIsGray(Image *image)
678 register const PixelPacket
686 assert(image != (Image *) NULL);
687 assert(image->signature == MagickSignature);
688 if (image->debug != MagickFalse)
689 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
691 if (image->storage_class == PseudoClass)
693 for (i=0; i < (ssize_t) image->colors; i++)
694 if (IsGray(image->colormap+i) == MagickFalse)
698 for (y=0; y < (ssize_t) image->rows; y++)
700 p=GetVirtualPixels(image,0,y,image->columns,1,&image->exception);
701 if (p == (const PixelPacket *) NULL)
703 for (x=(ssize_t) image->columns-1; x >= 0; x--)
705 if (IsGray(p) == MagickFalse)
712 #endif /* PNG_LIBPNG_VER > 10011 */
713 #endif /* MAGICKCORE_PNG_DELEGATE */
716 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
724 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
726 % IsMNG() returns MagickTrue if the image format type, identified by the
727 % magick string, is MNG.
729 % The format of the IsMNG method is:
731 % MagickBooleanType IsMNG(const unsigned char *magick,const size_t length)
733 % A description of each parameter follows:
735 % o magick: compare image format pattern against these bytes.
737 % o length: Specifies the length of the magick string.
741 static MagickBooleanType IsMNG(const unsigned char *magick,const size_t length)
746 if (memcmp(magick,"\212MNG\r\n\032\n",8) == 0)
753 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
761 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
763 % IsJNG() returns MagickTrue if the image format type, identified by the
764 % magick string, is JNG.
766 % The format of the IsJNG method is:
768 % MagickBooleanType IsJNG(const unsigned char *magick,const size_t length)
770 % A description of each parameter follows:
772 % o magick: compare image format pattern against these bytes.
774 % o length: Specifies the length of the magick string.
778 static MagickBooleanType IsJNG(const unsigned char *magick,const size_t length)
783 if (memcmp(magick,"\213JNG\r\n\032\n",8) == 0)
790 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
798 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
800 % IsPNG() returns MagickTrue if the image format type, identified by the
801 % magick string, is PNG.
803 % The format of the IsPNG method is:
805 % MagickBooleanType IsPNG(const unsigned char *magick,const size_t length)
807 % A description of each parameter follows:
809 % o magick: compare image format pattern against these bytes.
811 % o length: Specifies the length of the magick string.
814 static MagickBooleanType IsPNG(const unsigned char *magick,const size_t length)
819 if (memcmp(magick,"\211PNG\r\n\032\n",8) == 0)
825 #if defined(MAGICKCORE_PNG_DELEGATE)
826 #if defined(__cplusplus) || defined(c_plusplus)
830 #if (PNG_LIBPNG_VER > 10011)
831 static size_t WriteBlobMSBULong(Image *image,const size_t value)
836 assert(image != (Image *) NULL);
837 assert(image->signature == MagickSignature);
838 buffer[0]=(unsigned char) (value >> 24);
839 buffer[1]=(unsigned char) (value >> 16);
840 buffer[2]=(unsigned char) (value >> 8);
841 buffer[3]=(unsigned char) value;
842 return((size_t) WriteBlob(image,4,buffer));
845 static void PNGLong(png_bytep p,png_uint_32 value)
847 *p++=(png_byte) ((value >> 24) & 0xff);
848 *p++=(png_byte) ((value >> 16) & 0xff);
849 *p++=(png_byte) ((value >> 8) & 0xff);
850 *p++=(png_byte) (value & 0xff);
853 #if defined(JNG_SUPPORTED)
854 static void PNGsLong(png_bytep p,png_int_32 value)
856 *p++=(png_byte) ((value >> 24) & 0xff);
857 *p++=(png_byte) ((value >> 16) & 0xff);
858 *p++=(png_byte) ((value >> 8) & 0xff);
859 *p++=(png_byte) (value & 0xff);
863 static void PNGShort(png_bytep p,png_uint_16 value)
865 *p++=(png_byte) ((value >> 8) & 0xff);
866 *p++=(png_byte) (value & 0xff);
869 static void PNGType(png_bytep p,png_bytep type)
871 (void) CopyMagickMemory(p,type,4*sizeof(png_byte));
874 static void LogPNGChunk(MagickBooleanType logging, png_bytep type,
877 if (logging != MagickFalse)
878 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
879 " Writing %c%c%c%c chunk, length: %.20g",
880 type[0],type[1],type[2],type[3],(double) length);
882 #endif /* PNG_LIBPNG_VER > 10011 */
884 #if defined(__cplusplus) || defined(c_plusplus)
888 #if PNG_LIBPNG_VER > 10011
890 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
894 % R e a d P N G I m a g e %
898 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
900 % ReadPNGImage() reads a Portable Network Graphics (PNG) or
901 % Multiple-image Network Graphics (MNG) image file and returns it. It
902 % allocates the memory necessary for the new Image structure and returns a
903 % pointer to the new image or set of images.
905 % MNG support written by Glenn Randers-Pehrson, glennrp@image...
907 % The format of the ReadPNGImage method is:
909 % Image *ReadPNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
911 % A description of each parameter follows:
913 % o image_info: the image info.
915 % o exception: return any errors or warnings in this structure.
917 % To do, more or less in chronological order (as of version 5.5.2,
918 % November 26, 2002 -- glennrp -- see also "To do" under WriteMNGImage):
920 % Get 16-bit cheap transparency working.
922 % (At this point, PNG decoding is supposed to be in full MNG-LC compliance)
924 % Preserve all unknown and not-yet-handled known chunks found in input
925 % PNG file and copy them into output PNG files according to the PNG
928 % (At this point, PNG encoding should be in full MNG compliance)
930 % Provide options for choice of background to use when the MNG BACK
931 % chunk is not present or is not mandatory (i.e., leave transparent,
932 % user specified, MNG BACK, PNG bKGD)
934 % Implement LOOP/ENDL [done, but could do discretionary loops more
935 % efficiently by linking in the duplicate frames.].
937 % Decode and act on the MHDR simplicity profile (offer option to reject
938 % files or attempt to process them anyway when the profile isn't LC or VLC).
940 % Upgrade to full MNG without Delta-PNG.
942 % o BACK [done a while ago except for background image ID]
943 % o MOVE [done 15 May 1999]
944 % o CLIP [done 15 May 1999]
945 % o DISC [done 19 May 1999]
946 % o SAVE [partially done 19 May 1999 (marks objects frozen)]
947 % o SEEK [partially done 19 May 1999 (discard function only)]
951 % o MNG-level tEXt/iTXt/zTXt
956 % o iTXt (wait for libpng implementation).
958 % Use the scene signature to discover when an identical scene is
959 % being reused, and just point to the original image->exception instead
960 % of storing another set of pixels. This not specific to MNG
961 % but could be applied generally.
963 % Upgrade to full MNG with Delta-PNG.
967 % We will not attempt to read files containing the CgBI chunk.
968 % They are really Xcode files meant for display on the iPhone.
969 % These are not valid PNG files and it is impossible to recover
970 % the orginal PNG from files that have been converted to Xcode-PNG,
971 % since irretrievable loss of color data has occurred due to the
972 % use of premultiplied alpha.
975 #if defined(__cplusplus) || defined(c_plusplus)
980 This the function that does the actual reading of data. It is
981 the same as the one supplied in libpng, except that it receives the
982 datastream from the ReadBlob() function instead of standard input.
984 static void png_get_data(png_structp png_ptr,png_bytep data,png_size_t length)
989 image=(Image *) png_get_io_ptr(png_ptr);
995 check=(png_size_t) ReadBlob(image,(size_t) length,data);
1001 (void) FormatMagickString(msg,MaxTextExtent,
1002 "Expected %.20g bytes; found %.20g bytes",(double) length,
1004 png_warning(png_ptr,msg);
1005 png_error(png_ptr,"Read Exception");
1010 #if !defined(PNG_READ_EMPTY_PLTE_SUPPORTED) && \
1011 !defined(PNG_MNG_FEATURES_SUPPORTED)
1012 /* We use mng_get_data() instead of png_get_data() if we have a libpng
1013 * older than libpng-1.0.3a, which was the first to allow the empty
1014 * PLTE, or a newer libpng in which PNG_MNG_FEATURES_SUPPORTED was
1015 * ifdef'ed out. Earlier versions would crash if the bKGD chunk was
1016 * encountered after an empty PLTE, so we have to look ahead for bKGD
1017 * chunks and remove them from the datastream that is passed to libpng,
1018 * and store their contents for later use.
1020 static void mng_get_data(png_structp png_ptr,png_bytep data,png_size_t length)
1035 mng_info=(MngInfo *) png_get_io_ptr(png_ptr);
1036 image=(Image *) mng_info->image;
1037 while (mng_info->bytes_in_read_buffer && length)
1039 data[i]=mng_info->read_buffer[i];
1040 mng_info->bytes_in_read_buffer--;
1046 check=(png_size_t) ReadBlob(image,(size_t) length,(char *) data);
1048 if (check != length)
1049 png_error(png_ptr,"Read Exception");
1053 if ((data[0] == 0) && (data[1] == 0) && (data[2] == 0) &&
1056 check=(png_size_t) ReadBlob(image,(size_t) length,
1057 (char *) mng_info->read_buffer);
1058 mng_info->read_buffer[4]=0;
1059 mng_info->bytes_in_read_buffer=4;
1060 if (memcmp(mng_info->read_buffer,mng_PLTE,4) == 0)
1061 mng_info->found_empty_plte=MagickTrue;
1062 if (memcmp(mng_info->read_buffer,mng_IEND,4) == 0)
1064 mng_info->found_empty_plte=MagickFalse;
1065 mng_info->have_saved_bkgd_index=MagickFalse;
1069 if ((data[0] == 0) && (data[1] == 0) && (data[2] == 0) &&
1072 check=(png_size_t) ReadBlob(image,(size_t) length,
1073 (char *) mng_info->read_buffer);
1074 mng_info->read_buffer[4]=0;
1075 mng_info->bytes_in_read_buffer=4;
1076 if (memcmp(mng_info->read_buffer,mng_bKGD,4) == 0)
1077 if (mng_info->found_empty_plte)
1080 Skip the bKGD data byte and CRC.
1083 ReadBlob(image,5,(char *) mng_info->read_buffer);
1084 check=(png_size_t) ReadBlob(image,(size_t) length,
1085 (char *) mng_info->read_buffer);
1086 mng_info->saved_bkgd_index=mng_info->read_buffer[0];
1087 mng_info->have_saved_bkgd_index=MagickTrue;
1088 mng_info->bytes_in_read_buffer=0;
1096 static void png_put_data(png_structp png_ptr,png_bytep data,png_size_t length)
1101 image=(Image *) png_get_io_ptr(png_ptr);
1107 check=(png_size_t) WriteBlob(image,(size_t) length,data);
1109 if (check != length)
1110 png_error(png_ptr,"WriteBlob Failed");
1114 static void png_flush_data(png_structp png_ptr)
1119 #ifdef PNG_WRITE_EMPTY_PLTE_SUPPORTED
1120 static int PalettesAreEqual(Image *a,Image *b)
1125 if ((a == (Image *) NULL) || (b == (Image *) NULL))
1126 return((int) MagickFalse);
1128 if (a->storage_class != PseudoClass || b->storage_class != PseudoClass)
1129 return((int) MagickFalse);
1131 if (a->colors != b->colors)
1132 return((int) MagickFalse);
1134 for (i=0; i < (ssize_t) a->colors; i++)
1136 if ((a->colormap[i].red != b->colormap[i].red) ||
1137 (a->colormap[i].green != b->colormap[i].green) ||
1138 (a->colormap[i].blue != b->colormap[i].blue))
1139 return((int) MagickFalse);
1142 return((int) MagickTrue);
1146 static void MngInfoDiscardObject(MngInfo *mng_info,int i)
1148 if (i && (i < MNG_MAX_OBJECTS) && (mng_info != (MngInfo *) NULL) &&
1149 mng_info->exists[i] && !mng_info->frozen[i])
1151 #ifdef MNG_OBJECT_BUFFERS
1152 if (mng_info->ob[i] != (MngBuffer *) NULL)
1154 if (mng_info->ob[i]->reference_count > 0)
1155 mng_info->ob[i]->reference_count--;
1157 if (mng_info->ob[i]->reference_count == 0)
1159 if (mng_info->ob[i]->image != (Image *) NULL)
1160 mng_info->ob[i]->image=DestroyImage(mng_info->ob[i]->image);
1162 mng_info->ob[i]=DestroyString(mng_info->ob[i]);
1165 mng_info->ob[i]=(MngBuffer *) NULL;
1167 mng_info->exists[i]=MagickFalse;
1168 mng_info->invisible[i]=MagickFalse;
1169 mng_info->viewable[i]=MagickFalse;
1170 mng_info->frozen[i]=MagickFalse;
1171 mng_info->x_off[i]=0;
1172 mng_info->y_off[i]=0;
1173 mng_info->object_clip[i].left=0;
1174 mng_info->object_clip[i].right=(ssize_t) PNG_UINT_31_MAX;
1175 mng_info->object_clip[i].top=0;
1176 mng_info->object_clip[i].bottom=(ssize_t) PNG_UINT_31_MAX;
1180 static void MngInfoFreeStruct(MngInfo *mng_info,
1181 MagickBooleanType *have_mng_structure)
1183 if (*have_mng_structure != MagickFalse && (mng_info != (MngInfo *) NULL))
1188 for (i=1; i < MNG_MAX_OBJECTS; i++)
1189 MngInfoDiscardObject(mng_info,i);
1191 if (mng_info->global_plte != (png_colorp) NULL)
1192 mng_info->global_plte=(png_colorp)
1193 RelinquishMagickMemory(mng_info->global_plte);
1195 mng_info=(MngInfo *) RelinquishMagickMemory(mng_info);
1196 *have_mng_structure=MagickFalse;
1200 static MngBox mng_minimum_box(MngBox box1,MngBox box2)
1206 if (box.left < box2.left)
1209 if (box.top < box2.top)
1212 if (box.right > box2.right)
1213 box.right=box2.right;
1215 if (box.bottom > box2.bottom)
1216 box.bottom=box2.bottom;
1221 static MngBox mng_read_box(MngBox previous_box,char delta_type,unsigned char *p)
1227 Read clipping boundaries from DEFI, CLIP, FRAM, or PAST chunk.
1229 box.left=(ssize_t) ((p[0] << 24) | (p[1] << 16) | (p[2] << 8) | p[3]);
1230 box.right=(ssize_t) ((p[4] << 24) | (p[5] << 16) | (p[6] << 8) | p[7]);
1231 box.top=(ssize_t) ((p[8] << 24) | (p[9] << 16) | (p[10] << 8) | p[11]);
1232 box.bottom=(ssize_t) ((p[12] << 24) | (p[13] << 16) | (p[14] << 8) | p[15]);
1233 if (delta_type != 0)
1235 box.left+=previous_box.left;
1236 box.right+=previous_box.right;
1237 box.top+=previous_box.top;
1238 box.bottom+=previous_box.bottom;
1244 static MngPair mng_read_pair(MngPair previous_pair,int delta_type,
1250 Read two ssize_ts from CLON, MOVE or PAST chunk
1252 pair.a=(long) ((p[0] << 24) | (p[1] << 16) | (p[2] << 8) | p[3]);
1253 pair.b=(long) ((p[4] << 24) | (p[5] << 16) | (p[6] << 8) | p[7]);
1255 if (delta_type != 0)
1257 pair.a+=previous_pair.a;
1258 pair.b+=previous_pair.b;
1264 static long mng_get_long(unsigned char *p)
1266 return((long) ((p[0] << 24) | (p[1] << 16) | (p[2] << 8) | p[3]));
1269 static void MagickPNGErrorHandler(png_struct *ping,png_const_charp message)
1274 image=(Image *) png_get_error_ptr(ping);
1276 if (image->debug != MagickFalse)
1277 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1278 " libpng-%s error: %s", PNG_LIBPNG_VER_STRING,message);
1280 (void) ThrowMagickException(&image->exception,GetMagickModule(),CoderError,
1281 message,"`%s'",image->filename);
1283 #if (PNG_LIBPNG_VER < 10500)
1284 /* A warning about deprecated use of jmpbuf here is unavoidable if you
1285 * are building with libpng-1.4.x and can be ignored.
1287 longjmp(ping->jmpbuf,1);
1289 png_longjmp(ping,1);
1293 static void MagickPNGWarningHandler(png_struct *ping,png_const_charp message)
1298 if (LocaleCompare(message, "Missing PLTE before tRNS") == 0)
1299 png_error(ping, message);
1301 image=(Image *) png_get_error_ptr(ping);
1302 if (image->debug != MagickFalse)
1303 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1304 " libpng-%s warning: %s", PNG_LIBPNG_VER_STRING,message);
1306 (void) ThrowMagickException(&image->exception,GetMagickModule(),CoderWarning,
1307 message,"`%s'",image->filename);
1310 #ifdef PNG_USER_MEM_SUPPORTED
1311 static png_voidp Magick_png_malloc(png_structp png_ptr,png_uint_32 size)
1313 #if (PNG_LIBPNG_VER < 10011)
1318 ret=((png_voidp) AcquireMagickMemory((size_t) size));
1321 png_error("Insufficient memory.");
1326 return((png_voidp) AcquireMagickMemory((size_t) size));
1331 Free a pointer. It is removed from the list at the same time.
1333 static png_free_ptr Magick_png_free(png_structp png_ptr,png_voidp ptr)
1336 ptr=RelinquishMagickMemory(ptr);
1337 return((png_free_ptr) NULL);
1341 #if defined(__cplusplus) || defined(c_plusplus)
1346 Magick_png_read_raw_profile(Image *image, const ImageInfo *image_info,
1347 png_textp text,int ii)
1352 register unsigned char
1366 unhex[103]={0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,
1367 0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,
1368 0,0,0,0,0,0,0,0,0,1, 2,3,4,5,6,7,8,9,0,0,
1369 0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,
1370 0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,10,11,12,
1374 /* look for newline */
1378 /* look for length */
1379 while (*sp == '\0' || *sp == ' ' || *sp == '\n')
1382 length=(png_uint_32) StringToLong(sp);
1384 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1385 " length: %lu",(unsigned long) length);
1387 while (*sp != ' ' && *sp != '\n')
1390 /* allocate space */
1393 (void) ThrowMagickException(&image->exception,GetMagickModule(),
1394 CoderWarning,"UnableToCopyProfile","`%s'","invalid profile length");
1395 return(MagickFalse);
1398 profile=AcquireStringInfo(length);
1400 if (profile == (StringInfo *) NULL)
1402 (void) ThrowMagickException(&image->exception,GetMagickModule(),
1403 ResourceLimitError,"MemoryAllocationFailed","`%s'",
1404 "unable to copy profile");
1405 return(MagickFalse);
1408 /* copy profile, skipping white space and column 1 "=" signs */
1409 dp=GetStringInfoDatum(profile);
1412 for (i=0; i < (ssize_t) nibbles; i++)
1414 while (*sp < '0' || (*sp > '9' && *sp < 'a') || *sp > 'f')
1418 (void) ThrowMagickException(&image->exception,GetMagickModule(),
1419 CoderWarning,"UnableToCopyProfile","`%s'","ran out of data");
1420 profile=DestroyStringInfo(profile);
1421 return(MagickFalse);
1427 *dp=(unsigned char) (16*unhex[(int) *sp++]);
1430 (*dp++)+=unhex[(int) *sp++];
1433 We have already read "Raw profile type.
1435 (void) SetImageProfile(image,&text[ii].key[17],profile);
1436 profile=DestroyStringInfo(profile);
1438 if (image_info->verbose)
1439 (void) printf(" Found a generic profile, type %s\n",&text[ii].key[17]);
1444 #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
1445 static int read_vpag_chunk_callback(png_struct *ping, png_unknown_chunkp chunk)
1451 /* The unknown chunk structure contains the chunk data:
1456 Note that libpng has already taken care of the CRC handling.
1460 if (chunk->name[0] != 118 || chunk->name[1] != 112 ||
1461 chunk->name[2] != 65 ||chunk-> name[3] != 103)
1462 return(0); /* Did not recognize */
1464 /* recognized vpAg */
1466 if (chunk->size != 9)
1467 return(-1); /* Error return */
1469 if (chunk->data[8] != 0)
1470 return(0); /* ImageMagick requires pixel units */
1472 image=(Image *) png_get_user_chunk_ptr(ping);
1474 image->page.width=(size_t) ((chunk->data[0] << 24) |
1475 (chunk->data[1] << 16) | (chunk->data[2] << 8) | chunk->data[3]);
1477 image->page.height=(size_t) ((chunk->data[4] << 24) |
1478 (chunk->data[5] << 16) | (chunk->data[6] << 8) | chunk->data[7]);
1480 /* Return one of the following: */
1481 /* return(-n); chunk had an error */
1482 /* return(0); did not recognize */
1483 /* return(n); success */
1491 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1495 % R e a d O n e P N G I m a g e %
1499 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1501 % ReadOnePNGImage() reads a Portable Network Graphics (PNG) image file
1502 % (minus the 8-byte signature) and returns it. It allocates the memory
1503 % necessary for the new Image structure and returns a pointer to the new
1506 % The format of the ReadOnePNGImage method is:
1508 % Image *ReadOnePNGImage(MngInfo *mng_info, const ImageInfo *image_info,
1509 % ExceptionInfo *exception)
1511 % A description of each parameter follows:
1513 % o mng_info: Specifies a pointer to a MngInfo structure.
1515 % o image_info: the image info.
1517 % o exception: return any errors or warnings in this structure.
1520 static Image *ReadOnePNGImage(MngInfo *mng_info,
1521 const ImageInfo *image_info, ExceptionInfo *exception)
1523 /* Read one PNG image */
1534 ping_interlace_method,
1535 ping_compression_method,
1577 register unsigned char
1580 register IndexPacket
1587 register PixelPacket
1594 #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
1595 png_byte unused_chunks[]=
1597 104, 73, 83, 84, (png_byte) '\0', /* hIST */
1598 105, 84, 88, 116, (png_byte) '\0', /* iTXt */
1599 112, 67, 65, 76, (png_byte) '\0', /* pCAL */
1600 115, 67, 65, 76, (png_byte) '\0', /* sCAL */
1601 115, 80, 76, 84, (png_byte) '\0', /* sPLT */
1602 116, 73, 77, 69, (png_byte) '\0', /* tIME */
1606 logging=LogMagickEvent(CoderEvent,GetMagickModule(),
1607 " Enter ReadOnePNGImage()");
1609 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
1610 LockSemaphoreInfo(ping_semaphore);
1613 #if (PNG_LIBPNG_VER < 10200)
1614 if (image_info->verbose)
1615 printf("Your PNG library (libpng-%s) is rather old.\n",
1616 PNG_LIBPNG_VER_STRING);
1619 #if (PNG_LIBPNG_VER >= 10400)
1620 # ifndef PNG_TRANSFORM_GRAY_TO_RGB /* Added at libpng-1.4.0beta67 */
1621 if (image_info->verbose)
1623 printf("Your PNG library (libpng-%s) is an old beta version.\n",
1624 PNG_LIBPNG_VER_STRING);
1625 printf("Please update it.\n");
1631 quantum_info = (QuantumInfo *) NULL;
1632 image=mng_info->image;
1634 if (logging != MagickFalse)
1635 (void)LogMagickEvent(CoderEvent,GetMagickModule(),
1636 " image->matte=%d",(int) image->matte);
1638 /* Set to an out-of-range color unless tRNS chunk is present */
1639 transparent_color.red=65537;
1640 transparent_color.green=65537;
1641 transparent_color.blue=65537;
1642 transparent_color.opacity=65537;
1645 Allocate the PNG structures
1647 #ifdef PNG_USER_MEM_SUPPORTED
1648 ping=png_create_read_struct_2(PNG_LIBPNG_VER_STRING, image,
1649 MagickPNGErrorHandler,MagickPNGWarningHandler, NULL,
1650 (png_malloc_ptr) Magick_png_malloc,(png_free_ptr) Magick_png_free);
1652 ping=png_create_read_struct(PNG_LIBPNG_VER_STRING,image,
1653 MagickPNGErrorHandler,MagickPNGWarningHandler);
1655 if (ping == (png_struct *) NULL)
1656 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
1658 ping_info=png_create_info_struct(ping);
1660 if (ping_info == (png_info *) NULL)
1662 png_destroy_read_struct(&ping,(png_info **) NULL,(png_info **) NULL);
1663 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
1666 end_info=png_create_info_struct(ping);
1668 if (end_info == (png_info *) NULL)
1670 png_destroy_read_struct(&ping,&ping_info,(png_info **) NULL);
1671 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
1674 ping_pixels=(unsigned char *) NULL;
1676 if (setjmp(png_jmpbuf(ping)))
1679 PNG image is corrupt.
1681 png_destroy_read_struct(&ping,&ping_info,&end_info);
1682 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
1683 UnlockSemaphoreInfo(ping_semaphore);
1685 if (logging != MagickFalse)
1686 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1687 " exit ReadOnePNGImage() with error.");
1689 if (image != (Image *) NULL)
1691 InheritException(exception,&image->exception);
1695 return(GetFirstImageInList(image));
1698 Prepare PNG for reading.
1701 mng_info->image_found++;
1702 png_set_sig_bytes(ping,8);
1704 if (LocaleCompare(image_info->magick,"MNG") == 0)
1706 #if defined(PNG_MNG_FEATURES_SUPPORTED)
1707 (void) png_permit_mng_features(ping,PNG_ALL_MNG_FEATURES);
1708 png_set_read_fn(ping,image,png_get_data);
1710 #if defined(PNG_READ_EMPTY_PLTE_SUPPORTED)
1711 png_permit_empty_plte(ping,MagickTrue);
1712 png_set_read_fn(ping,image,png_get_data);
1714 mng_info->image=image;
1715 mng_info->bytes_in_read_buffer=0;
1716 mng_info->found_empty_plte=MagickFalse;
1717 mng_info->have_saved_bkgd_index=MagickFalse;
1718 png_set_read_fn(ping,mng_info,mng_get_data);
1724 png_set_read_fn(ping,image,png_get_data);
1726 #if defined(PNG_UNKNOWN_CHUNKS_SUPPORTED)
1727 /* Ignore unused chunks and all unknown chunks except for vpAg */
1728 png_set_keep_unknown_chunks(ping, 1, NULL, 0);
1729 png_set_keep_unknown_chunks(ping, 2, mng_vpAg, 1);
1730 png_set_keep_unknown_chunks(ping, 1, unused_chunks,
1731 (int)sizeof(unused_chunks)/5);
1732 /* Callback for other unknown chunks */
1733 png_set_read_user_chunk_fn(ping, image, read_vpag_chunk_callback);
1736 #if (PNG_LIBPNG_VER < 10400)
1737 # if defined(PNG_USE_PNGGCCRD) && defined(PNG_ASSEMBLER_CODE_SUPPORTED) && \
1738 (PNG_LIBPNG_VER >= 10200) && (PNG_LIBPNG_VER < 10220) && defined(__i386__)
1739 /* Disable thread-unsafe features of pnggccrd */
1740 if (png_access_version_number() >= 10200)
1742 png_uint_32 mmx_disable_mask=0;
1743 png_uint_32 asm_flags;
1745 mmx_disable_mask |= ( PNG_ASM_FLAG_MMX_READ_COMBINE_ROW \
1746 | PNG_ASM_FLAG_MMX_READ_FILTER_SUB \
1747 | PNG_ASM_FLAG_MMX_READ_FILTER_AVG \
1748 | PNG_ASM_FLAG_MMX_READ_FILTER_PAETH );
1749 asm_flags=png_get_asm_flags(ping);
1750 png_set_asm_flags(ping, asm_flags & ~mmx_disable_mask);
1755 png_read_info(ping,ping_info);
1757 png_get_IHDR(ping,ping_info,&ping_width,&ping_height,
1758 &ping_bit_depth,&ping_color_type,
1759 &ping_interlace_method,&ping_compression_method,
1760 &ping_filter_method);
1762 (void) png_get_tRNS(ping, ping_info, &ping_trans_alpha, &ping_num_trans,
1765 (void) png_get_bKGD(ping, ping_info, &ping_background);
1767 if (ping_bit_depth < 8)
1769 if (((int) ping_color_type == PNG_COLOR_TYPE_PALETTE))
1771 png_set_packing(ping);
1776 image->depth=ping_bit_depth;
1777 image->depth=GetImageQuantumDepth(image,MagickFalse);
1778 image->interlace=ping_interlace_method != 0 ? PNGInterlace : NoInterlace;
1779 if (logging != MagickFalse)
1781 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1782 " PNG width: %.20g, height: %.20g",
1783 (double) ping_width, (double) ping_height);
1785 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1786 " PNG color_type: %d, bit_depth: %d",
1787 ping_color_type, ping_bit_depth);
1789 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1790 " PNG compression_method: %d",
1791 ping_compression_method);
1793 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1794 " PNG interlace_method: %d, filter_method: %d",
1795 ping_interlace_method,ping_filter_method);
1798 #ifdef PNG_READ_iCCP_SUPPORTED
1799 if (png_get_valid(ping,ping_info,PNG_INFO_iCCP))
1804 #if (PNG_LIBPNG_VER < 10500)
1818 (void) png_get_iCCP(ping,ping_info,&name,(int *) &compression,&info,
1821 if (profile_length != 0)
1826 if (logging != MagickFalse)
1827 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1828 " Reading PNG iCCP chunk.");
1829 profile=AcquireStringInfo(profile_length);
1830 SetStringInfoDatum(profile,(const unsigned char *) info);
1831 (void) SetImageProfile(image,"icc",profile);
1832 profile=DestroyStringInfo(profile);
1836 #if defined(PNG_READ_sRGB_SUPPORTED)
1841 if (mng_info->have_global_srgb)
1842 image->rendering_intent=Magick_RenderingIntent_from_PNG_RenderingIntent
1843 (mng_info->global_srgb_intent);
1845 if (png_get_sRGB(ping,ping_info,&intent))
1847 image->rendering_intent=Magick_RenderingIntent_from_PNG_RenderingIntent
1850 if (logging != MagickFalse)
1851 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1852 " Reading PNG sRGB chunk: rendering_intent: %d",intent);
1860 if (!png_get_gAMA(ping,ping_info,&file_gamma))
1861 if (mng_info->have_global_gama)
1862 png_set_gAMA(ping,ping_info,mng_info->global_gamma);
1864 if (png_get_gAMA(ping,ping_info,&file_gamma))
1866 image->gamma=(float) file_gamma;
1867 if (logging != MagickFalse)
1868 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1869 " Reading PNG gAMA chunk: gamma: %f",file_gamma);
1872 if (!png_get_valid(ping,ping_info,PNG_INFO_cHRM))
1874 if (mng_info->have_global_chrm != MagickFalse)
1876 (void) png_set_cHRM(ping,ping_info,
1877 mng_info->global_chrm.white_point.x,
1878 mng_info->global_chrm.white_point.y,
1879 mng_info->global_chrm.red_primary.x,
1880 mng_info->global_chrm.red_primary.y,
1881 mng_info->global_chrm.green_primary.x,
1882 mng_info->global_chrm.green_primary.y,
1883 mng_info->global_chrm.blue_primary.x,
1884 mng_info->global_chrm.blue_primary.y);
1888 if (png_get_valid(ping,ping_info,PNG_INFO_cHRM))
1890 (void) png_get_cHRM(ping,ping_info,
1891 &image->chromaticity.white_point.x,
1892 &image->chromaticity.white_point.y,
1893 &image->chromaticity.red_primary.x,
1894 &image->chromaticity.red_primary.y,
1895 &image->chromaticity.green_primary.x,
1896 &image->chromaticity.green_primary.y,
1897 &image->chromaticity.blue_primary.x,
1898 &image->chromaticity.blue_primary.y);
1900 if (logging != MagickFalse)
1901 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1902 " Reading PNG cHRM chunk.");
1905 if (image->rendering_intent != UndefinedIntent)
1907 png_set_sRGB(ping,ping_info,
1908 Magick_RenderingIntent_to_PNG_RenderingIntent
1909 (image->rendering_intent));
1910 png_set_gAMA(ping,ping_info,0.45455f);
1911 png_set_cHRM(ping,ping_info,
1912 0.6400f, 0.3300f, 0.3000f, 0.6000f,
1913 0.1500f, 0.0600f, 0.3127f, 0.3290f);
1915 #if defined(PNG_oFFs_SUPPORTED)
1916 if (png_get_valid(ping,ping_info,PNG_INFO_oFFs))
1918 image->page.x=(ssize_t) png_get_x_offset_pixels(ping, ping_info);
1919 image->page.y=(ssize_t) png_get_y_offset_pixels(ping, ping_info);
1921 if (logging != MagickFalse)
1922 if (image->page.x || image->page.y)
1923 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1924 " Reading PNG oFFs chunk: x: %.20g, y: %.20g.",(double)
1925 image->page.x,(double) image->page.y);
1928 #if defined(PNG_pHYs_SUPPORTED)
1929 if (!png_get_valid(ping,ping_info,PNG_INFO_pHYs))
1931 if (mng_info->have_global_phys)
1933 png_set_pHYs(ping,ping_info,
1934 mng_info->global_x_pixels_per_unit,
1935 mng_info->global_y_pixels_per_unit,
1936 mng_info->global_phys_unit_type);
1940 if (png_get_valid(ping,ping_info,PNG_INFO_pHYs))
1950 Set image resolution.
1952 (void) png_get_pHYs(ping,ping_info,&x_resolution,&y_resolution,
1954 image->x_resolution=(double) x_resolution;
1955 image->y_resolution=(double) y_resolution;
1957 if (unit_type == PNG_RESOLUTION_METER)
1959 image->units=PixelsPerCentimeterResolution;
1960 image->x_resolution=(double) x_resolution/100.0;
1961 image->y_resolution=(double) y_resolution/100.0;
1964 if (logging != MagickFalse)
1965 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
1966 " Reading PNG pHYs chunk: xres: %.20g, yres: %.20g, units: %d.",
1967 (double) x_resolution,(double) y_resolution,unit_type);
1970 if (png_get_valid(ping,ping_info,PNG_INFO_PLTE))
1978 (void) png_get_PLTE(ping,ping_info,&palette,&number_colors);
1980 if ((number_colors == 0) &&
1981 ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE))
1983 if (mng_info->global_plte_length)
1985 png_set_PLTE(ping,ping_info,mng_info->global_plte,
1986 (int) mng_info->global_plte_length);
1988 if (!png_get_valid(ping,ping_info,PNG_INFO_tRNS))
1989 if (mng_info->global_trns_length)
1991 if (mng_info->global_trns_length >
1992 mng_info->global_plte_length)
1993 (void) ThrowMagickException(&image->exception,
1994 GetMagickModule(),CoderError,
1995 "global tRNS has more entries than global PLTE",
1996 "`%s'",image_info->filename);
1997 png_set_tRNS(ping,ping_info,mng_info->global_trns,
1998 (int) mng_info->global_trns_length,NULL);
2000 #if defined(PNG_READ_bKGD_SUPPORTED)
2002 #ifndef PNG_READ_EMPTY_PLTE_SUPPORTED
2003 mng_info->have_saved_bkgd_index ||
2005 png_get_valid(ping,ping_info,PNG_INFO_bKGD))
2010 #ifndef PNG_READ_EMPTY_PLTE_SUPPORTED
2011 if (mng_info->have_saved_bkgd_index)
2012 background.index=mng_info->saved_bkgd_index;
2014 if (png_get_valid(ping, ping_info, PNG_INFO_bKGD))
2015 background.index=ping_background->index;
2017 background.red=(png_uint_16)
2018 mng_info->global_plte[background.index].red;
2020 background.green=(png_uint_16)
2021 mng_info->global_plte[background.index].green;
2023 background.blue=(png_uint_16)
2024 mng_info->global_plte[background.index].blue;
2026 png_set_bKGD(ping,ping_info,&background);
2031 (void) ThrowMagickException(&image->exception,GetMagickModule(),
2032 CoderError,"No global PLTE in file","`%s'",
2033 image_info->filename);
2037 #if defined(PNG_READ_bKGD_SUPPORTED)
2038 if (mng_info->have_global_bkgd &&
2039 (!png_get_valid(ping,ping_info,PNG_INFO_bKGD)))
2040 image->background_color=mng_info->mng_global_bkgd;
2042 if (png_get_valid(ping,ping_info,PNG_INFO_bKGD))
2045 Set image background color.
2047 if (logging != MagickFalse)
2048 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2049 " Reading PNG bKGD chunk.");
2051 if (ping_bit_depth == MAGICKCORE_QUANTUM_DEPTH)
2053 image->background_color.red=ping_background->red;
2054 image->background_color.green=ping_background->green;
2055 image->background_color.blue=ping_background->blue;
2058 else /* Scale background components to 16-bit */
2063 if (logging != MagickFalse)
2064 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2065 " raw ping_background=(%d,%d,%d).",ping_background->red,
2066 ping_background->green,ping_background->blue);
2070 if (ping_bit_depth == 1)
2073 else if (ping_bit_depth == 2)
2076 else if (ping_bit_depth == 4)
2079 if (ping_bit_depth <= 8)
2082 ping_background->red *= bkgd_scale;
2083 ping_background->green *= bkgd_scale;
2084 ping_background->blue *= bkgd_scale;
2086 if (logging != MagickFalse)
2088 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2089 " bkgd_scale=%d.",bkgd_scale);
2091 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2092 " ping_background=(%d,%d,%d).",ping_background->red,
2093 ping_background->green,ping_background->blue);
2096 image->background_color.red=
2097 ScaleShortToQuantum(ping_background->red);
2099 image->background_color.green=
2100 ScaleShortToQuantum(ping_background->green);
2102 image->background_color.blue=
2103 ScaleShortToQuantum(ping_background->blue);
2105 image->background_color.opacity=OpaqueOpacity;
2107 if (logging != MagickFalse)
2108 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2109 " image->background_color=(%.20g,%.20g,%.20g).",
2110 (double) image->background_color.red,
2111 (double) image->background_color.green,
2112 (double) image->background_color.blue);
2117 if (png_get_valid(ping,ping_info,PNG_INFO_tRNS))
2120 Image has a tRNS chunk.
2128 if (logging != MagickFalse)
2129 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2130 " Reading PNG tRNS chunk.");
2132 max_sample = (int) ((one << ping_bit_depth) - 1);
2134 if ((ping_color_type == PNG_COLOR_TYPE_GRAY &&
2135 (int)ping_trans_color->gray > max_sample) ||
2136 (ping_color_type == PNG_COLOR_TYPE_RGB &&
2137 ((int)ping_trans_color->red > max_sample ||
2138 (int)ping_trans_color->green > max_sample ||
2139 (int)ping_trans_color->blue > max_sample)))
2141 if (logging != MagickFalse)
2142 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2143 " Ignoring PNG tRNS chunk with out-of-range sample.");
2144 png_free_data(ping, ping_info, PNG_FREE_TRNS, 0);
2145 png_set_invalid(ping,ping_info,PNG_INFO_tRNS);
2146 image->matte=MagickFalse;
2153 scale_to_short = 65535L/((1UL << ping_bit_depth)-1);
2155 /* Scale transparent_color to short */
2156 transparent_color.red= scale_to_short*ping_trans_color->red;
2157 transparent_color.green= scale_to_short*ping_trans_color->green;
2158 transparent_color.blue= scale_to_short*ping_trans_color->blue;
2159 transparent_color.opacity= scale_to_short*ping_trans_color->gray;
2161 if (ping_color_type == PNG_COLOR_TYPE_GRAY)
2163 if (logging != MagickFalse)
2165 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2166 " Raw tRNS graylevel is %d.",ping_trans_color->gray);
2168 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2169 " scaled graylevel is %d.",transparent_color.opacity);
2171 transparent_color.red=transparent_color.opacity;
2172 transparent_color.green=transparent_color.opacity;
2173 transparent_color.blue=transparent_color.opacity;
2177 #if defined(PNG_READ_sBIT_SUPPORTED)
2178 if (mng_info->have_global_sbit)
2180 if (!png_get_valid(ping,ping_info,PNG_INFO_sBIT))
2181 png_set_sBIT(ping,ping_info,&mng_info->global_sbit);
2184 num_passes=png_set_interlace_handling(ping);
2186 png_read_update_info(ping,ping_info);
2188 ping_rowbytes=png_get_rowbytes(ping,ping_info);
2191 Initialize image structure.
2193 mng_info->image_box.left=0;
2194 mng_info->image_box.right=(ssize_t) ping_width;
2195 mng_info->image_box.top=0;
2196 mng_info->image_box.bottom=(ssize_t) ping_height;
2197 if (mng_info->mng_type == 0)
2199 mng_info->mng_width=ping_width;
2200 mng_info->mng_height=ping_height;
2201 mng_info->frame=mng_info->image_box;
2202 mng_info->clip=mng_info->image_box;
2207 image->page.y=mng_info->y_off[mng_info->object_id];
2210 image->compression=ZipCompression;
2211 image->columns=ping_width;
2212 image->rows=ping_height;
2213 if (((int) ping_color_type == PNG_COLOR_TYPE_PALETTE) ||
2214 ((int) ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA) ||
2215 ((int) ping_color_type == PNG_COLOR_TYPE_GRAY))
2220 image->storage_class=PseudoClass;
2222 image->colors=one << ping_bit_depth;
2223 #if (MAGICKCORE_QUANTUM_DEPTH == 8)
2224 if (image->colors > 256)
2227 if (image->colors > 65536L)
2228 image->colors=65536L;
2230 if ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE)
2238 (void) png_get_PLTE(ping,ping_info,&palette,&number_colors);
2239 image->colors=(size_t) number_colors;
2241 if (logging != MagickFalse)
2242 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2243 " Reading PNG PLTE chunk: number_colors: %d.",number_colors);
2247 if (image->storage_class == PseudoClass)
2250 Initialize image colormap.
2252 if (AcquireImageColormap(image,image->colors) == MagickFalse)
2253 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
2255 if ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE)
2263 (void) png_get_PLTE(ping,ping_info,&palette,&number_colors);
2265 for (i=0; i < (ssize_t) image->colors; i++)
2267 image->colormap[i].red=ScaleCharToQuantum(palette[i].red);
2268 image->colormap[i].green=ScaleCharToQuantum(palette[i].green);
2269 image->colormap[i].blue=ScaleCharToQuantum(palette[i].blue);
2278 scale=(QuantumRange/((1UL << ping_bit_depth)-1));
2283 for (i=0; i < (ssize_t) image->colors; i++)
2285 image->colormap[i].red=(Quantum) (i*scale);
2286 image->colormap[i].green=(Quantum) (i*scale);
2287 image->colormap[i].blue=(Quantum) (i*scale);
2292 Read image scanlines.
2294 if (image->delay != 0)
2295 mng_info->scenes_found++;
2297 if ((mng_info->mng_type == 0 && (image->ping != MagickFalse)) || (
2298 (image_info->number_scenes != 0) && (mng_info->scenes_found > (ssize_t)
2299 (image_info->first_scene+image_info->number_scenes))))
2301 if (logging != MagickFalse)
2302 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2303 " Skipping PNG image data for scene %.20g",(double)
2304 mng_info->scenes_found-1);
2305 png_destroy_read_struct(&ping,&ping_info,&end_info);
2306 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
2307 UnlockSemaphoreInfo(ping_semaphore);
2309 if (logging != MagickFalse)
2310 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2311 " exit ReadOnePNGImage().");
2316 if (logging != MagickFalse)
2317 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2318 " Reading PNG IDAT chunk(s)");
2321 ping_pixels=(unsigned char *) AcquireQuantumMemory(image->rows,
2322 ping_rowbytes*sizeof(*ping_pixels));
2325 ping_pixels=(unsigned char *) AcquireQuantumMemory(ping_rowbytes,
2326 sizeof(*ping_pixels));
2328 if (ping_pixels == (unsigned char *) NULL)
2329 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
2331 if (logging != MagickFalse)
2332 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2333 " Converting PNG pixels to pixel packets");
2335 Convert PNG pixels to pixel packets.
2337 if (setjmp(png_jmpbuf(ping)))
2340 PNG image is corrupt.
2342 png_destroy_read_struct(&ping,&ping_info,&end_info);
2343 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
2344 UnlockSemaphoreInfo(ping_semaphore);
2346 if (quantum_info != (QuantumInfo *) NULL)
2347 quantum_info = DestroyQuantumInfo(quantum_info);
2349 if (ping_pixels != (unsigned char *) NULL)
2350 ping_pixels=(unsigned char *) RelinquishMagickMemory(ping_pixels);
2352 if (logging != MagickFalse)
2353 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2354 " exit ReadOnePNGImage() with error.");
2356 if (image != (Image *) NULL)
2358 InheritException(exception,&image->exception);
2362 return(GetFirstImageInList(image));
2365 quantum_info=AcquireQuantumInfo(image_info,image);
2367 if (quantum_info == (QuantumInfo *) NULL)
2368 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
2373 found_transparent_pixel;
2375 found_transparent_pixel=MagickFalse;
2377 if (image->storage_class == DirectClass)
2379 for (pass=0; pass < num_passes; pass++)
2382 Convert image to DirectClass pixel packets.
2384 #if (MAGICKCORE_QUANTUM_DEPTH == 8)
2388 depth=(ssize_t) ping_bit_depth;
2390 image->matte=(((int) ping_color_type == PNG_COLOR_TYPE_RGB_ALPHA) ||
2391 ((int) ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA) ||
2392 (png_get_valid(ping,ping_info,PNG_INFO_tRNS))) ?
2393 MagickTrue : MagickFalse;
2395 for (y=0; y < (ssize_t) image->rows; y++)
2398 row_offset=ping_rowbytes*y;
2403 png_read_row(ping,ping_pixels+row_offset,NULL);
2404 q=QueueAuthenticPixels(image,0,y,image->columns,1,exception);
2406 if (q == (PixelPacket *) NULL)
2409 #if (0 && (MAGICKCORE_QUANTUM_DEPTH == 8) && !defined(MAGICKCORE_HDRI_SUPPORT))
2410 /* code deleted from version 6.6.6-8 */
2411 #else /* (MAGICKCORE_QUANTUM_DEPTH != 8) */
2413 if ((int) ping_color_type == PNG_COLOR_TYPE_GRAY)
2414 (void) ImportQuantumPixels(image,(CacheView *) NULL,quantum_info,
2415 GrayQuantum,ping_pixels+row_offset,exception);
2417 else if ((int) ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
2418 (void) ImportQuantumPixels(image,(CacheView *) NULL,quantum_info,
2419 GrayAlphaQuantum,ping_pixels+row_offset,exception);
2421 else if ((int) ping_color_type == PNG_COLOR_TYPE_RGB_ALPHA)
2422 (void) ImportQuantumPixels(image,(CacheView *) NULL,quantum_info,
2423 RGBAQuantum,ping_pixels+row_offset,exception);
2425 else if ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE)
2426 (void) ImportQuantumPixels(image,(CacheView *) NULL,quantum_info,
2427 IndexQuantum,ping_pixels+row_offset,exception);
2429 else /* ping_color_type == PNG_COLOR_TYPE_RGB */
2430 (void) ImportQuantumPixels(image,(CacheView *) NULL,quantum_info,
2431 RGBQuantum,ping_pixels+row_offset,exception);
2433 if (found_transparent_pixel == MagickFalse)
2435 /* Is there a transparent pixel in the row? */
2436 if (y== 0 && logging != MagickFalse)
2437 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2438 " Looking for cheap transparent pixel");
2440 for (x=(ssize_t) image->columns-1; x >= 0; x--)
2442 if ((ping_color_type == PNG_COLOR_TYPE_RGBA ||
2443 ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA) &&
2444 (q->opacity != OpaqueOpacity))
2446 if (logging != MagickFalse)
2447 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2450 found_transparent_pixel = MagickTrue;
2453 if ((ping_color_type == PNG_COLOR_TYPE_RGB ||
2454 ping_color_type == PNG_COLOR_TYPE_GRAY) &&
2455 (ScaleQuantumToShort(q->red) == transparent_color.red &&
2456 ScaleQuantumToShort(q->green) == transparent_color.green &&
2457 ScaleQuantumToShort(q->blue) == transparent_color.blue))
2459 if (logging != MagickFalse)
2460 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2462 found_transparent_pixel = MagickTrue;
2469 if ((image->previous == (Image *) NULL) && (num_passes == 1))
2471 status=SetImageProgress(image,LoadImageTag,(MagickOffsetType) y,
2474 if (status == MagickFalse)
2477 if (SyncAuthenticPixels(image,exception) == MagickFalse)
2481 if ((image->previous == (Image *) NULL) && (num_passes != 1))
2483 status=SetImageProgress(image,LoadImageTag,pass,num_passes);
2484 if (status == MagickFalse)
2490 else /* image->storage_class != DirectClass */
2492 for (pass=0; pass < num_passes; pass++)
2501 Convert grayscale image to PseudoClass pixel packets.
2503 image->matte=ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA ?
2504 MagickTrue : MagickFalse;
2506 quantum_scanline=(Quantum *) AcquireQuantumMemory(image->columns,
2507 (image->matte ? 2 : 1)*sizeof(*quantum_scanline));
2509 if (quantum_scanline == (Quantum *) NULL)
2510 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
2512 for (y=0; y < (ssize_t) image->rows; y++)
2515 row_offset=ping_rowbytes*y;
2520 png_read_row(ping,ping_pixels+row_offset,NULL);
2521 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
2523 if (q == (PixelPacket *) NULL)
2526 indexes=GetAuthenticIndexQueue(image);
2527 p=ping_pixels+row_offset;
2530 switch (ping_bit_depth)
2537 for (x=(ssize_t) image->columns-7; x > 0; x-=8)
2539 for (bit=7; bit >= 0; bit--)
2540 *r++=(Quantum) ((*p) & (0x01 << bit) ? 0x01 : 0x00);
2544 if ((image->columns % 8) != 0)
2546 for (bit=7; bit >= (ssize_t) (8-(image->columns % 8)); bit--)
2547 *r++=(Quantum) ((*p) & (0x01 << bit) ? 0x01 : 0x00);
2555 for (x=(ssize_t) image->columns-3; x > 0; x-=4)
2557 *r++=(*p >> 6) & 0x03;
2558 *r++=(*p >> 4) & 0x03;
2559 *r++=(*p >> 2) & 0x03;
2563 if ((image->columns % 4) != 0)
2565 for (i=3; i >= (ssize_t) (4-(image->columns % 4)); i--)
2566 *r++=(Quantum) ((*p >> (i*2)) & 0x03);
2574 for (x=(ssize_t) image->columns-1; x > 0; x-=2)
2576 *r++=(*p >> 4) & 0x0f;
2580 if ((image->columns % 2) != 0)
2581 *r++=(*p++ >> 4) & 0x0f;
2588 if (ping_color_type == 4)
2589 for (x=(ssize_t) image->columns-1; x >= 0; x--)
2592 /* In image.h, OpaqueOpacity is 0
2593 * TransparentOpacity is QuantumRange
2594 * In a PNG datastream, Opaque is QuantumRange
2595 * and Transparent is 0.
2597 q->opacity=ScaleCharToQuantum((unsigned char) (255-(*p++)));
2598 if (q->opacity != OpaqueOpacity)
2599 found_transparent_pixel = MagickTrue;
2604 for (x=(ssize_t) image->columns-1; x >= 0; x--)
2612 for (x=(ssize_t) image->columns-1; x >= 0; x--)
2614 #if (MAGICKCORE_QUANTUM_DEPTH == 16)
2618 if (image->colors > 256)
2626 *r=(Quantum) quantum;
2629 if (ping_color_type == 4)
2631 quantum=((*p++) << 8);
2633 q->opacity=(Quantum) (QuantumRange-quantum);
2634 if (q->opacity != OpaqueOpacity)
2635 found_transparent_pixel = MagickTrue;
2639 #if (MAGICKCORE_QUANTUM_DEPTH == 32)
2643 if (image->colors > 256)
2654 if (ping_color_type == 4)
2656 q->opacity=(*p << 8) | *(p+1);
2658 q->opacity=(Quantum) GetAlphaPixelComponent(q);
2659 if (q->opacity != OpaqueOpacity)
2660 found_transparent_pixel = MagickTrue;
2665 #else /* MAGICKCORE_QUANTUM_DEPTH == 8 */
2667 p++; /* strip low byte */
2669 if (ping_color_type == 4)
2671 q->opacity=(Quantum) (QuantumRange-(*p++));
2672 if (q->opacity != OpaqueOpacity)
2673 found_transparent_pixel = MagickTrue;
2688 Transfer image scanline.
2692 for (x=0; x < (ssize_t) image->columns; x++)
2693 indexes[x]=(IndexPacket) (*r++);
2695 if (SyncAuthenticPixels(image,exception) == MagickFalse)
2698 if ((image->previous == (Image *) NULL) && (num_passes == 1))
2700 status=SetImageProgress(image,LoadImageTag,(MagickOffsetType) y,
2703 if (status == MagickFalse)
2708 if ((image->previous == (Image *) NULL) && (num_passes != 1))
2710 status=SetImageProgress(image,LoadImageTag,pass,num_passes);
2712 if (status == MagickFalse)
2716 quantum_scanline=(Quantum *) RelinquishMagickMemory(quantum_scanline);
2719 image->matte=found_transparent_pixel;
2721 if (logging != MagickFalse)
2723 if (found_transparent_pixel != MagickFalse)
2724 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2725 " Found transparent pixel");
2728 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2729 " No transparent pixel was found");
2731 ping_color_type&=0x03;
2736 if (quantum_info != (QuantumInfo *) NULL)
2737 quantum_info=DestroyQuantumInfo(quantum_info);
2739 if (image->storage_class == PseudoClass)
2745 image->matte=MagickFalse;
2746 (void) SyncImage(image);
2750 png_read_end(ping,ping_info);
2752 if (image_info->number_scenes != 0 && mng_info->scenes_found-1 <
2753 (ssize_t) image_info->first_scene && image->delay != 0)
2755 png_destroy_read_struct(&ping,&ping_info,&end_info);
2756 ping_pixels=(unsigned char *) RelinquishMagickMemory(ping_pixels);
2758 (void) SetImageBackgroundColor(image);
2759 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
2760 UnlockSemaphoreInfo(ping_semaphore);
2762 if (logging != MagickFalse)
2763 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2764 " exit ReadOnePNGImage() early.");
2768 if (png_get_valid(ping,ping_info,PNG_INFO_tRNS))
2774 Image has a transparent background.
2776 storage_class=image->storage_class;
2777 image->matte=MagickTrue;
2779 /* Balfour fix from imagemagick discourse server, 5 Feb 2010 */
2781 if (storage_class == PseudoClass)
2783 if ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE)
2785 for (x=0; x < ping_num_trans; x++)
2787 image->colormap[x].opacity =
2788 ScaleCharToQuantum((unsigned char)(255-ping_trans_alpha[x]));
2792 else if (ping_color_type == PNG_COLOR_TYPE_GRAY)
2794 for (x=0; x < (int) image->colors; x++)
2796 if (ScaleQuantumToShort(image->colormap[x].red) ==
2797 transparent_color.opacity)
2799 image->colormap[x].opacity = (Quantum) TransparentOpacity;
2803 (void) SyncImage(image);
2806 #if 1 /* Should have already been done above, but glennrp problem P10
2811 for (y=0; y < (ssize_t) image->rows; y++)
2813 image->storage_class=storage_class;
2814 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
2816 if (q == (PixelPacket *) NULL)
2819 indexes=GetAuthenticIndexQueue(image);
2821 /* Caution: on a Q8 build, this does not distinguish between
2822 * 16-bit colors that differ only in the low byte
2824 for (x=(ssize_t) image->columns-1; x >= 0; x--)
2826 if (ScaleQuantumToShort(q->red) == transparent_color.red &&
2827 ScaleQuantumToShort(q->green) == transparent_color.green &&
2828 ScaleQuantumToShort(q->blue) == transparent_color.blue)
2830 q->opacity=(Quantum) TransparentOpacity;
2833 #if 0 /* I have not found a case where this is needed. */
2836 q->opacity=(Quantum) OpaqueOpacity;
2843 if (SyncAuthenticPixels(image,exception) == MagickFalse)
2849 image->storage_class=DirectClass;
2852 if ((ping_color_type == PNG_COLOR_TYPE_GRAY) ||
2853 (ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA))
2854 image->colorspace=GRAYColorspace;
2856 if (png_get_text(ping,ping_info,&text,&num_text) != 0)
2857 for (i=0; i < (ssize_t) num_text; i++)
2859 /* Check for a profile */
2861 if (logging != MagickFalse)
2862 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2863 " Reading PNG text chunk");
2865 if (memcmp(text[i].key, "Raw profile type ",17) == 0)
2866 (void) Magick_png_read_raw_profile(image,image_info,text,(int) i);
2873 length=text[i].text_length;
2874 value=(char *) AcquireQuantumMemory(length+MaxTextExtent,
2876 if (value == (char *) NULL)
2878 (void) ThrowMagickException(&image->exception,GetMagickModule(),
2879 ResourceLimitError,"MemoryAllocationFailed","`%s'",
2884 (void) ConcatenateMagickString(value,text[i].text,length+2);
2885 (void) SetImageProperty(image,text[i].key,value);
2887 if (logging != MagickFalse)
2889 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2890 " length: %lu",(unsigned long) length);
2891 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
2892 " Keyword: %s",text[i].key);
2895 value=DestroyString(value);
2899 #ifdef MNG_OBJECT_BUFFERS
2901 Store the object if necessary.
2903 if (object_id && !mng_info->frozen[object_id])
2905 if (mng_info->ob[object_id] == (MngBuffer *) NULL)
2908 create a new object buffer.
2910 mng_info->ob[object_id]=(MngBuffer *)
2911 AcquireMagickMemory(sizeof(MngBuffer));
2913 if (mng_info->ob[object_id] != (MngBuffer *) NULL)
2915 mng_info->ob[object_id]->image=(Image *) NULL;
2916 mng_info->ob[object_id]->reference_count=1;
2920 if ((mng_info->ob[object_id] == (MngBuffer *) NULL) ||
2921 mng_info->ob[object_id]->frozen)
2923 if (mng_info->ob[object_id] == (MngBuffer *) NULL)
2924 (void) ThrowMagickException(&image->exception,GetMagickModule(),
2925 ResourceLimitError,"MemoryAllocationFailed","`%s'",
2928 if (mng_info->ob[object_id]->frozen)
2929 (void) ThrowMagickException(&image->exception,GetMagickModule(),
2930 ResourceLimitError,"Cannot overwrite frozen MNG object buffer",
2931 "`%s'",image->filename);
2937 if (mng_info->ob[object_id]->image != (Image *) NULL)
2938 mng_info->ob[object_id]->image=DestroyImage
2939 (mng_info->ob[object_id]->image);
2941 mng_info->ob[object_id]->image=CloneImage(image,0,0,MagickTrue,
2944 if (mng_info->ob[object_id]->image != (Image *) NULL)
2945 mng_info->ob[object_id]->image->file=(FILE *) NULL;
2948 (void) ThrowMagickException(&image->exception,GetMagickModule(),
2949 ResourceLimitError,"Cloning image for object buffer failed",
2950 "`%s'",image->filename);
2952 if (ping_width > 250000L || ping_height > 250000L)
2953 png_error(ping,"PNG Image dimensions are too large.");
2955 mng_info->ob[object_id]->width=ping_width;
2956 mng_info->ob[object_id]->height=ping_height;
2957 mng_info->ob[object_id]->color_type=ping_color_type;
2958 mng_info->ob[object_id]->sample_depth=ping_bit_depth;
2959 mng_info->ob[object_id]->interlace_method=ping_interlace_method;
2960 mng_info->ob[object_id]->compression_method=
2961 ping_compression_method;
2962 mng_info->ob[object_id]->filter_method=ping_filter_method;
2964 if (png_get_valid(ping,ping_info,PNG_INFO_PLTE))
2973 Copy the PLTE to the object buffer.
2975 png_get_PLTE(ping,ping_info,&plte,&number_colors);
2976 mng_info->ob[object_id]->plte_length=number_colors;
2978 for (i=0; i < number_colors; i++)
2980 mng_info->ob[object_id]->plte[i]=plte[i];
2985 mng_info->ob[object_id]->plte_length=0;
2990 Relinquish resources.
2992 png_destroy_read_struct(&ping,&ping_info,&end_info);
2994 ping_pixels=(unsigned char *) RelinquishMagickMemory(ping_pixels);
2995 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
2996 UnlockSemaphoreInfo(ping_semaphore);
2999 if (logging != MagickFalse)
3000 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3001 " exit ReadOnePNGImage()");
3005 /* end of reading one PNG image */
3008 static Image *ReadPNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
3023 magic_number[MaxTextExtent];
3031 assert(image_info != (const ImageInfo *) NULL);
3032 assert(image_info->signature == MagickSignature);
3034 if (image_info->debug != MagickFalse)
3035 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
3036 image_info->filename);
3038 assert(exception != (ExceptionInfo *) NULL);
3039 assert(exception->signature == MagickSignature);
3040 logging=LogMagickEvent(CoderEvent,GetMagickModule(),"Enter ReadPNGImage()");
3041 image=AcquireImage(image_info);
3042 mng_info=(MngInfo *) NULL;
3043 status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
3045 if (status == MagickFalse)
3046 ThrowReaderException(FileOpenError,"UnableToOpenFile");
3049 Verify PNG signature.
3051 count=ReadBlob(image,8,(unsigned char *) magic_number);
3053 if (count < 8 || memcmp(magic_number,"\211PNG\r\n\032\n",8) != 0)
3054 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
3057 Allocate a MngInfo structure.
3059 have_mng_structure=MagickFalse;
3060 mng_info=(MngInfo *) AcquireMagickMemory(sizeof(MngInfo));
3062 if (mng_info == (MngInfo *) NULL)
3063 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
3066 Initialize members of the MngInfo structure.
3068 (void) ResetMagickMemory(mng_info,0,sizeof(MngInfo));
3069 mng_info->image=image;
3070 have_mng_structure=MagickTrue;
3073 image=ReadOnePNGImage(mng_info,image_info,exception);
3074 MngInfoFreeStruct(mng_info,&have_mng_structure);
3076 if (image == (Image *) NULL)
3078 if (previous != (Image *) NULL)
3080 if (previous->signature != MagickSignature)
3081 ThrowReaderException(CorruptImageError,"CorruptImage");
3083 (void) CloseBlob(previous);
3084 (void) DestroyImageList(previous);
3087 if (logging != MagickFalse)
3088 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3089 "exit ReadPNGImage() with error");
3091 return((Image *) NULL);
3094 (void) CloseBlob(image);
3096 if ((image->columns == 0) || (image->rows == 0))
3098 if (logging != MagickFalse)
3099 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3100 "exit ReadPNGImage() with error.");
3102 ThrowReaderException(CorruptImageError,"CorruptImage");
3105 if (LocaleCompare(image_info->magick,"PNG8") == 0)
3107 (void) SetImageType(image,PaletteType);
3109 if (image->matte != MagickFalse)
3111 /* To do: Reduce to binary transparency */
3115 if (LocaleCompare(image_info->magick,"PNG24") == 0)
3117 (void) SetImageType(image,TrueColorType);
3118 image->matte=MagickFalse;
3121 if (LocaleCompare(image_info->magick,"PNG32") == 0)
3122 (void) SetImageType(image,TrueColorMatteType);
3124 if (logging != MagickFalse)
3125 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3126 " page.w: %.20g, page.h: %.20g,page.x: %.20g, page.y: %.20g.",
3127 (double) image->page.width,(double) image->page.height,
3128 (double) image->page.x,(double) image->page.y);
3130 if (logging != MagickFalse)
3131 (void) LogMagickEvent(CoderEvent,GetMagickModule(),"exit ReadPNGImage()");
3138 #if defined(JNG_SUPPORTED)
3140 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3144 % R e a d O n e J N G I m a g e %
3148 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3150 % ReadOneJNGImage() reads a JPEG Network Graphics (JNG) image file
3151 % (minus the 8-byte signature) and returns it. It allocates the memory
3152 % necessary for the new Image structure and returns a pointer to the new
3155 % JNG support written by Glenn Randers-Pehrson, glennrp@image...
3157 % The format of the ReadOneJNGImage method is:
3159 % Image *ReadOneJNGImage(MngInfo *mng_info, const ImageInfo *image_info,
3160 % ExceptionInfo *exception)
3162 % A description of each parameter follows:
3164 % o mng_info: Specifies a pointer to a MngInfo structure.
3166 % o image_info: the image info.
3168 % o exception: return any errors or warnings in this structure.
3171 static Image *ReadOneJNGImage(MngInfo *mng_info,
3172 const ImageInfo *image_info, ExceptionInfo *exception)
3199 jng_image_sample_depth,
3200 jng_image_compression_method,
3201 jng_image_interlace_method,
3202 jng_alpha_sample_depth,
3203 jng_alpha_compression_method,
3204 jng_alpha_filter_method,
3205 jng_alpha_interlace_method;
3207 register const PixelPacket
3214 register PixelPacket
3217 register unsigned char
3228 jng_alpha_compression_method=0;
3229 jng_alpha_sample_depth=8;
3233 alpha_image=(Image *) NULL;
3234 color_image=(Image *) NULL;
3235 alpha_image_info=(ImageInfo *) NULL;
3236 color_image_info=(ImageInfo *) NULL;
3238 logging=LogMagickEvent(CoderEvent,GetMagickModule(),
3239 " Enter ReadOneJNGImage()");
3241 image=mng_info->image;
3243 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
3246 Allocate next image structure.
3248 if (logging != MagickFalse)
3249 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3250 " AcquireNextImage()");
3252 AcquireNextImage(image_info,image);
3254 if (GetNextImageInList(image) == (Image *) NULL)
3255 return((Image *) NULL);
3257 image=SyncNextImageInList(image);
3259 mng_info->image=image;
3262 Signature bytes have already been read.
3265 read_JSEP=MagickFalse;
3266 reading_idat=MagickFalse;
3267 skip_to_iend=MagickFalse;
3271 type[MaxTextExtent];
3280 Read a new JNG chunk.
3282 status=SetImageProgress(image,LoadImagesTag,TellBlob(image),
3283 2*GetBlobSize(image));
3285 if (status == MagickFalse)
3289 (void) ConcatenateMagickString(type,"errr",MaxTextExtent);
3290 length=ReadBlobMSBLong(image);
3291 count=(unsigned int) ReadBlob(image,4,(unsigned char *) type);
3293 if (logging != MagickFalse)
3294 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3295 " Reading JNG chunk type %c%c%c%c, length: %.20g",
3296 type[0],type[1],type[2],type[3],(double) length);
3298 if (length > PNG_UINT_31_MAX || count == 0)
3299 ThrowReaderException(CorruptImageError,"CorruptImage");
3302 chunk=(unsigned char *) NULL;
3306 chunk=(unsigned char *) AcquireQuantumMemory(length,sizeof(*chunk));
3308 if (chunk == (unsigned char *) NULL)
3309 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
3311 for (i=0; i < (ssize_t) length; i++)
3312 chunk[i]=(unsigned char) ReadBlobByte(image);
3317 (void) ReadBlobMSBLong(image); /* read crc word */
3322 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3327 if (memcmp(type,mng_JHDR,4) == 0)
3331 jng_width=(size_t) ((p[0] << 24) | (p[1] << 16) |
3332 (p[2] << 8) | p[3]);
3333 jng_height=(size_t) ((p[4] << 24) | (p[5] << 16) |
3334 (p[6] << 8) | p[7]);
3335 jng_color_type=p[8];
3336 jng_image_sample_depth=p[9];
3337 jng_image_compression_method=p[10];
3338 jng_image_interlace_method=p[11];
3340 image->interlace=jng_image_interlace_method != 0 ? PNGInterlace :
3343 jng_alpha_sample_depth=p[12];
3344 jng_alpha_compression_method=p[13];
3345 jng_alpha_filter_method=p[14];
3346 jng_alpha_interlace_method=p[15];
3348 if (logging != MagickFalse)
3350 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3351 " jng_width: %16lu",(unsigned long) jng_width);
3353 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3354 " jng_width: %16lu",(unsigned long) jng_height);
3356 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3357 " jng_color_type: %16d",jng_color_type);
3359 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3360 " jng_image_sample_depth: %3d",
3361 jng_image_sample_depth);
3363 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3364 " jng_image_compression_method:%3d",
3365 jng_image_compression_method);
3367 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3368 " jng_image_interlace_method: %3d",
3369 jng_image_interlace_method);
3371 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3372 " jng_alpha_sample_depth: %3d",
3373 jng_alpha_sample_depth);
3375 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3376 " jng_alpha_compression_method:%3d",
3377 jng_alpha_compression_method);
3379 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3380 " jng_alpha_filter_method: %3d",
3381 jng_alpha_filter_method);
3383 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3384 " jng_alpha_interlace_method: %3d",
3385 jng_alpha_interlace_method);
3390 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3396 if ((reading_idat == MagickFalse) && (read_JSEP == MagickFalse) &&
3397 ((memcmp(type,mng_JDAT,4) == 0) || (memcmp(type,mng_JdAA,4) == 0) ||
3398 (memcmp(type,mng_IDAT,4) == 0) || (memcmp(type,mng_JDAA,4) == 0)))
3401 o create color_image
3402 o open color_blob, attached to color_image
3403 o if (color type has alpha)
3404 open alpha_blob, attached to alpha_image
3407 color_image_info=(ImageInfo *)AcquireMagickMemory(sizeof(ImageInfo));
3409 if (color_image_info == (ImageInfo *) NULL)
3410 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
3412 GetImageInfo(color_image_info);
3413 color_image=AcquireImage(color_image_info);
3415 if (color_image == (Image *) NULL)
3416 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
3418 if (logging != MagickFalse)
3419 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3420 " Creating color_blob.");
3422 (void) AcquireUniqueFilename(color_image->filename);
3423 status=OpenBlob(color_image_info,color_image,WriteBinaryBlobMode,
3426 if (status == MagickFalse)
3427 return((Image *) NULL);
3429 if ((image_info->ping == MagickFalse) && (jng_color_type >= 12))
3431 alpha_image_info=(ImageInfo *)
3432 AcquireMagickMemory(sizeof(ImageInfo));
3434 if (alpha_image_info == (ImageInfo *) NULL)
3435 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
3437 GetImageInfo(alpha_image_info);
3438 alpha_image=AcquireImage(alpha_image_info);
3440 if (alpha_image == (Image *) NULL)
3442 alpha_image=DestroyImage(alpha_image);
3443 ThrowReaderException(ResourceLimitError,
3444 "MemoryAllocationFailed");
3447 if (logging != MagickFalse)
3448 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3449 " Creating alpha_blob.");
3451 (void) AcquireUniqueFilename(alpha_image->filename);
3452 status=OpenBlob(alpha_image_info,alpha_image,WriteBinaryBlobMode,
3455 if (status == MagickFalse)
3456 return((Image *) NULL);
3458 if (jng_alpha_compression_method == 0)
3463 if (logging != MagickFalse)
3464 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3465 " Writing IHDR chunk to alpha_blob.");
3467 (void) WriteBlob(alpha_image,8,(const unsigned char *)
3468 "\211PNG\r\n\032\n");
3470 (void) WriteBlobMSBULong(alpha_image,13L);
3471 PNGType(data,mng_IHDR);
3472 LogPNGChunk(logging,mng_IHDR,13L);
3473 PNGLong(data+4,jng_width);
3474 PNGLong(data+8,jng_height);
3475 data[12]=jng_alpha_sample_depth;
3476 data[13]=0; /* color_type gray */
3477 data[14]=0; /* compression method 0 */
3478 data[15]=0; /* filter_method 0 */
3479 data[16]=0; /* interlace_method 0 */
3480 (void) WriteBlob(alpha_image,17,data);
3481 (void) WriteBlobMSBULong(alpha_image,crc32(0,data,17));
3484 reading_idat=MagickTrue;
3487 if (memcmp(type,mng_JDAT,4) == 0)
3489 /* Copy chunk to color_image->blob */
3491 if (logging != MagickFalse)
3492 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3493 " Copying JDAT chunk data to color_blob.");
3495 (void) WriteBlob(color_image,length,chunk);
3498 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3503 if (memcmp(type,mng_IDAT,4) == 0)
3508 /* Copy IDAT header and chunk data to alpha_image->blob */
3510 if (image_info->ping == MagickFalse)
3512 if (logging != MagickFalse)
3513 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3514 " Copying IDAT chunk data to alpha_blob.");
3516 (void) WriteBlobMSBULong(alpha_image,(size_t) length);
3517 PNGType(data,mng_IDAT);
3518 LogPNGChunk(logging,mng_IDAT,length);
3519 (void) WriteBlob(alpha_image,4,data);
3520 (void) WriteBlob(alpha_image,length,chunk);
3521 (void) WriteBlobMSBULong(alpha_image,
3522 crc32(crc32(0,data,4),chunk,(uInt) length));
3526 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3531 if ((memcmp(type,mng_JDAA,4) == 0) || (memcmp(type,mng_JdAA,4) == 0))
3533 /* Copy chunk data to alpha_image->blob */
3535 if (image_info->ping == MagickFalse)
3537 if (logging != MagickFalse)
3538 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3539 " Copying JDAA chunk data to alpha_blob.");
3541 (void) WriteBlob(alpha_image,length,chunk);
3545 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3550 if (memcmp(type,mng_JSEP,4) == 0)
3552 read_JSEP=MagickTrue;
3555 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3560 if (memcmp(type,mng_bKGD,4) == 0)
3564 image->background_color.red=ScaleCharToQuantum(p[1]);
3565 image->background_color.green=image->background_color.red;
3566 image->background_color.blue=image->background_color.red;
3571 image->background_color.red=ScaleCharToQuantum(p[1]);
3572 image->background_color.green=ScaleCharToQuantum(p[3]);
3573 image->background_color.blue=ScaleCharToQuantum(p[5]);
3576 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3580 if (memcmp(type,mng_gAMA,4) == 0)
3583 image->gamma=((float) mng_get_long(p))*0.00001;
3585 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3589 if (memcmp(type,mng_cHRM,4) == 0)
3593 image->chromaticity.white_point.x=0.00001*mng_get_long(p);
3594 image->chromaticity.white_point.y=0.00001*mng_get_long(&p[4]);
3595 image->chromaticity.red_primary.x=0.00001*mng_get_long(&p[8]);
3596 image->chromaticity.red_primary.y=0.00001*mng_get_long(&p[12]);
3597 image->chromaticity.green_primary.x=0.00001*mng_get_long(&p[16]);
3598 image->chromaticity.green_primary.y=0.00001*mng_get_long(&p[20]);
3599 image->chromaticity.blue_primary.x=0.00001*mng_get_long(&p[24]);
3600 image->chromaticity.blue_primary.y=0.00001*mng_get_long(&p[28]);
3603 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3607 if (memcmp(type,mng_sRGB,4) == 0)
3611 image->rendering_intent=
3612 Magick_RenderingIntent_from_PNG_RenderingIntent(p[0]);
3613 image->gamma=0.45455f;
3614 image->chromaticity.red_primary.x=0.6400f;
3615 image->chromaticity.red_primary.y=0.3300f;
3616 image->chromaticity.green_primary.x=0.3000f;
3617 image->chromaticity.green_primary.y=0.6000f;
3618 image->chromaticity.blue_primary.x=0.1500f;
3619 image->chromaticity.blue_primary.y=0.0600f;
3620 image->chromaticity.white_point.x=0.3127f;
3621 image->chromaticity.white_point.y=0.3290f;
3624 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3628 if (memcmp(type,mng_oFFs,4) == 0)
3632 image->page.x=(ssize_t) mng_get_long(p);
3633 image->page.y=(ssize_t) mng_get_long(&p[4]);
3635 if ((int) p[8] != 0)
3637 image->page.x/=10000;
3638 image->page.y/=10000;
3643 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3648 if (memcmp(type,mng_pHYs,4) == 0)
3652 image->x_resolution=(double) mng_get_long(p);
3653 image->y_resolution=(double) mng_get_long(&p[4]);
3654 if ((int) p[8] == PNG_RESOLUTION_METER)
3656 image->units=PixelsPerCentimeterResolution;
3657 image->x_resolution=image->x_resolution/100.0f;
3658 image->y_resolution=image->y_resolution/100.0f;
3662 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3667 if (memcmp(type,mng_iCCP,4) == 0)
3671 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3678 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
3680 if (memcmp(type,mng_IEND,4))
3690 Finish up reading image data:
3692 o read main image from color_blob.
3696 o if (color_type has alpha)
3697 if alpha_encoding is PNG
3698 read secondary image from alpha_blob via ReadPNG
3699 if alpha_encoding is JPEG
3700 read secondary image from alpha_blob via ReadJPEG
3704 o copy intensity of secondary image into
3705 opacity samples of main image.
3707 o destroy the secondary image.
3710 (void) CloseBlob(color_image);
3712 if (logging != MagickFalse)
3713 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3714 " Reading jng_image from color_blob.");
3716 (void) FormatMagickString(color_image_info->filename,MaxTextExtent,"%s",
3717 color_image->filename);
3719 color_image_info->ping=MagickFalse; /* To do: avoid this */
3720 jng_image=ReadImage(color_image_info,exception);
3722 if (jng_image == (Image *) NULL)
3723 return((Image *) NULL);
3725 (void) RelinquishUniqueFileResource(color_image->filename);
3726 color_image=DestroyImage(color_image);
3727 color_image_info=DestroyImageInfo(color_image_info);
3729 if (jng_image == (Image *) NULL)
3730 return((Image *) NULL);
3732 if (logging != MagickFalse)
3733 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3734 " Copying jng_image pixels to main image.");
3736 image->rows=jng_height;
3737 image->columns=jng_width;
3738 length=image->columns*sizeof(PixelPacket);
3740 for (y=0; y < (ssize_t) image->rows; y++)
3742 s=GetVirtualPixels(jng_image,0,y,image->columns,1,&image->exception);
3743 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
3744 (void) CopyMagickMemory(q,s,length);
3746 if (SyncAuthenticPixels(image,exception) == MagickFalse)
3750 jng_image=DestroyImage(jng_image);
3752 if (image_info->ping == MagickFalse)
3754 if (jng_color_type >= 12)
3756 if (jng_alpha_compression_method == 0)
3760 (void) WriteBlobMSBULong(alpha_image,0x00000000L);
3761 PNGType(data,mng_IEND);
3762 LogPNGChunk(logging,mng_IEND,0L);
3763 (void) WriteBlob(alpha_image,4,data);
3764 (void) WriteBlobMSBULong(alpha_image,crc32(0,data,4));
3767 (void) CloseBlob(alpha_image);
3769 if (logging != MagickFalse)
3770 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3771 " Reading opacity from alpha_blob.");
3773 (void) FormatMagickString(alpha_image_info->filename,MaxTextExtent,
3774 "%s",alpha_image->filename);
3776 jng_image=ReadImage(alpha_image_info,exception);
3778 if (jng_image != (Image *) NULL)
3779 for (y=0; y < (ssize_t) image->rows; y++)
3781 s=GetVirtualPixels(jng_image,0,y,image->columns,1,
3783 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
3785 if (image->matte != MagickFalse)
3786 for (x=(ssize_t) image->columns; x != 0; x--,q++,s++)
3787 q->opacity=(Quantum) QuantumRange-s->red;
3790 for (x=(ssize_t) image->columns; x != 0; x--,q++,s++)
3792 q->opacity=(Quantum) QuantumRange-s->red;
3793 if (q->opacity != OpaqueOpacity)
3794 image->matte=MagickTrue;
3797 if (SyncAuthenticPixels(image,exception) == MagickFalse)
3800 (void) RelinquishUniqueFileResource(alpha_image->filename);
3801 alpha_image=DestroyImage(alpha_image);
3802 alpha_image_info=DestroyImageInfo(alpha_image_info);
3803 if (jng_image != (Image *) NULL)
3804 jng_image=DestroyImage(jng_image);
3808 /* Read the JNG image. */
3810 if (mng_info->mng_type == 0)
3812 mng_info->mng_width=jng_width;
3813 mng_info->mng_height=jng_height;
3816 if (image->page.width == 0 && image->page.height == 0)
3818 image->page.width=jng_width;
3819 image->page.height=jng_height;
3822 if (image->page.x == 0 && image->page.y == 0)
3824 image->page.x=mng_info->x_off[mng_info->object_id];
3825 image->page.y=mng_info->y_off[mng_info->object_id];
3830 image->page.y=mng_info->y_off[mng_info->object_id];
3833 mng_info->image_found++;
3834 status=SetImageProgress(image,LoadImagesTag,2*TellBlob(image),
3835 2*GetBlobSize(image));
3837 if (logging != MagickFalse)
3838 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3839 " exit ReadOneJNGImage()");
3845 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3849 % R e a d J N G I m a g e %
3853 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3855 % ReadJNGImage() reads a JPEG Network Graphics (JNG) image file
3856 % (including the 8-byte signature) and returns it. It allocates the memory
3857 % necessary for the new Image structure and returns a pointer to the new
3860 % JNG support written by Glenn Randers-Pehrson, glennrp@image...
3862 % The format of the ReadJNGImage method is:
3864 % Image *ReadJNGImage(const ImageInfo *image_info, ExceptionInfo
3867 % A description of each parameter follows:
3869 % o image_info: the image info.
3871 % o exception: return any errors or warnings in this structure.
3875 static Image *ReadJNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
3890 magic_number[MaxTextExtent];
3898 assert(image_info != (const ImageInfo *) NULL);
3899 assert(image_info->signature == MagickSignature);
3900 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image_info->filename);
3901 assert(exception != (ExceptionInfo *) NULL);
3902 assert(exception->signature == MagickSignature);
3903 logging=LogMagickEvent(CoderEvent,GetMagickModule(),"Enter ReadJNGImage()");
3904 image=AcquireImage(image_info);
3905 mng_info=(MngInfo *) NULL;
3906 status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
3908 if (status == MagickFalse)
3909 return((Image *) NULL);
3911 if (LocaleCompare(image_info->magick,"JNG") != 0)
3912 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
3914 /* Verify JNG signature. */
3916 count=(size_t) ReadBlob(image,8,(unsigned char *) magic_number);
3918 if (count < 8 || memcmp(magic_number,"\213JNG\r\n\032\n",8) != 0)
3919 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
3921 /* Allocate a MngInfo structure. */
3923 have_mng_structure=MagickFalse;
3924 mng_info=(MngInfo *) AcquireMagickMemory(sizeof(*mng_info));
3926 if (mng_info == (MngInfo *) NULL)
3927 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
3929 /* Initialize members of the MngInfo structure. */
3931 (void) ResetMagickMemory(mng_info,0,sizeof(MngInfo));
3932 have_mng_structure=MagickTrue;
3934 mng_info->image=image;
3936 image=ReadOneJNGImage(mng_info,image_info,exception);
3937 MngInfoFreeStruct(mng_info,&have_mng_structure);
3939 if (image == (Image *) NULL)
3941 if (IsImageObject(previous) != MagickFalse)
3943 (void) CloseBlob(previous);
3944 (void) DestroyImageList(previous);
3947 if (logging != MagickFalse)
3948 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3949 "exit ReadJNGImage() with error");
3951 return((Image *) NULL);
3953 (void) CloseBlob(image);
3955 if (image->columns == 0 || image->rows == 0)
3957 if (logging != MagickFalse)
3958 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
3959 "exit ReadJNGImage() with error");
3961 ThrowReaderException(CorruptImageError,"CorruptImage");
3964 if (logging != MagickFalse)
3965 (void) LogMagickEvent(CoderEvent,GetMagickModule(),"exit ReadJNGImage()");
3971 static Image *ReadMNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
3974 page_geometry[MaxTextExtent];
4007 #if defined(MNG_INSERT_LAYERS)
4009 mng_background_color;
4012 register unsigned char
4027 #if defined(MNG_INSERT_LAYERS)
4032 volatile unsigned int
4033 #ifdef MNG_OBJECT_BUFFERS
4034 mng_background_object=0,
4036 mng_type=0; /* 0: PNG or JNG; 1: MNG; 2: MNG-LC; 3: MNG-VLC */
4039 default_frame_timeout,
4041 #if defined(MNG_INSERT_LAYERS)
4047 /* These delays are all measured in image ticks_per_second,
4048 * not in MNG ticks_per_second
4051 default_frame_delay,
4055 #if defined(MNG_INSERT_LAYERS)
4064 previous_fb.bottom=0;
4066 previous_fb.right=0;
4068 default_fb.bottom=0;
4072 /* Open image file. */
4074 assert(image_info != (const ImageInfo *) NULL);
4075 assert(image_info->signature == MagickSignature);
4076 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image_info->filename);
4077 assert(exception != (ExceptionInfo *) NULL);
4078 assert(exception->signature == MagickSignature);
4079 logging=LogMagickEvent(CoderEvent,GetMagickModule(),"Enter ReadMNGImage()");
4080 image=AcquireImage(image_info);
4081 mng_info=(MngInfo *) NULL;
4082 status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
4084 if (status == MagickFalse)
4085 return((Image *) NULL);
4087 first_mng_object=MagickFalse;
4089 have_mng_structure=MagickFalse;
4091 /* Allocate a MngInfo structure. */
4093 mng_info=(MngInfo *) AcquireMagickMemory(sizeof(MngInfo));
4095 if (mng_info == (MngInfo *) NULL)
4096 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
4098 /* Initialize members of the MngInfo structure. */
4100 (void) ResetMagickMemory(mng_info,0,sizeof(MngInfo));
4101 mng_info->image=image;
4102 have_mng_structure=MagickTrue;
4104 if (LocaleCompare(image_info->magick,"MNG") == 0)
4107 magic_number[MaxTextExtent];
4109 /* Verify MNG signature. */
4110 count=(size_t) ReadBlob(image,8,(unsigned char *) magic_number);
4111 if (memcmp(magic_number,"\212MNG\r\n\032\n",8) != 0)
4112 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
4114 /* Initialize some nonzero members of the MngInfo structure. */
4115 for (i=0; i < MNG_MAX_OBJECTS; i++)
4117 mng_info->object_clip[i].right=(ssize_t) PNG_UINT_31_MAX;
4118 mng_info->object_clip[i].bottom=(ssize_t) PNG_UINT_31_MAX;
4120 mng_info->exists[0]=MagickTrue;
4123 first_mng_object=MagickTrue;
4125 #if defined(MNG_INSERT_LAYERS)
4126 insert_layers=MagickFalse; /* should be False when converting or mogrifying */
4128 default_frame_delay=0;
4129 default_frame_timeout=0;
4132 mng_info->ticks_per_second=1UL*image->ticks_per_second;
4134 skip_to_iend=MagickFalse;
4135 term_chunk_found=MagickFalse;
4136 mng_info->framing_mode=1;
4137 #if defined(MNG_INSERT_LAYERS)
4138 mandatory_back=MagickFalse;
4140 #if defined(MNG_INSERT_LAYERS)
4141 mng_background_color=image->background_color;
4143 default_fb=mng_info->frame;
4144 previous_fb=mng_info->frame;
4148 type[MaxTextExtent];
4150 if (LocaleCompare(image_info->magick,"MNG") == 0)
4159 (void) ConcatenateMagickString(type,"errr",MaxTextExtent);
4160 length=ReadBlobMSBLong(image);
4161 count=(size_t) ReadBlob(image,4,(unsigned char *) type);
4163 if (logging != MagickFalse)
4164 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4165 " Reading MNG chunk type %c%c%c%c, length: %.20g",
4166 type[0],type[1],type[2],type[3],(double) length);
4168 if (length > PNG_UINT_31_MAX)
4172 ThrowReaderException(CorruptImageError,"CorruptImage");
4175 chunk=(unsigned char *) NULL;
4179 chunk=(unsigned char *) AcquireQuantumMemory(length,sizeof(*chunk));
4181 if (chunk == (unsigned char *) NULL)
4182 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
4184 for (i=0; i < (ssize_t) length; i++)
4185 chunk[i]=(unsigned char) ReadBlobByte(image);
4190 (void) ReadBlobMSBLong(image); /* read crc word */
4192 #if !defined(JNG_SUPPORTED)
4193 if (memcmp(type,mng_JHDR,4) == 0)
4195 skip_to_iend=MagickTrue;
4197 if (mng_info->jhdr_warning == 0)
4198 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4199 CoderError,"JNGCompressNotSupported","`%s'",image->filename);
4201 mng_info->jhdr_warning++;
4204 if (memcmp(type,mng_DHDR,4) == 0)
4206 skip_to_iend=MagickTrue;
4208 if (mng_info->dhdr_warning == 0)
4209 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4210 CoderError,"DeltaPNGNotSupported","`%s'",image->filename);
4212 mng_info->dhdr_warning++;
4214 if (memcmp(type,mng_MEND,4) == 0)
4219 if (memcmp(type,mng_IEND,4) == 0)
4220 skip_to_iend=MagickFalse;
4223 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4225 if (logging != MagickFalse)
4226 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4232 if (memcmp(type,mng_MHDR,4) == 0)
4234 mng_info->mng_width=(size_t) ((p[0] << 24) | (p[1] << 16) |
4235 (p[2] << 8) | p[3]);
4237 mng_info->mng_height=(size_t) ((p[4] << 24) | (p[5] << 16) |
4238 (p[6] << 8) | p[7]);
4240 if (logging != MagickFalse)
4242 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4243 " MNG width: %.20g",(double) mng_info->mng_width);
4244 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4245 " MNG height: %.20g",(double) mng_info->mng_height);
4249 mng_info->ticks_per_second=(size_t) mng_get_long(p);
4251 if (mng_info->ticks_per_second == 0)
4252 default_frame_delay=0;
4255 default_frame_delay=1UL*image->ticks_per_second/
4256 mng_info->ticks_per_second;
4258 frame_delay=default_frame_delay;
4264 simplicity=(size_t) mng_get_long(p);
4267 mng_type=1; /* Full MNG */
4269 if ((simplicity != 0) && ((simplicity | 11) == 11))
4270 mng_type=2; /* LC */
4272 if ((simplicity != 0) && ((simplicity | 9) == 9))
4273 mng_type=3; /* VLC */
4275 #if defined(MNG_INSERT_LAYERS)
4277 insert_layers=MagickTrue;
4279 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
4281 /* Allocate next image structure. */
4282 AcquireNextImage(image_info,image);
4284 if (GetNextImageInList(image) == (Image *) NULL)
4285 return((Image *) NULL);
4287 image=SyncNextImageInList(image);
4288 mng_info->image=image;
4291 if ((mng_info->mng_width > 65535L) ||
4292 (mng_info->mng_height > 65535L))
4293 ThrowReaderException(ImageError,"WidthOrHeightExceedsLimit");
4295 (void) FormatMagickString(page_geometry,MaxTextExtent,
4296 "%.20gx%.20g+0+0",(double) mng_info->mng_width,(double)
4297 mng_info->mng_height);
4299 mng_info->frame.left=0;
4300 mng_info->frame.right=(ssize_t) mng_info->mng_width;
4301 mng_info->frame.top=0;
4302 mng_info->frame.bottom=(ssize_t) mng_info->mng_height;
4303 mng_info->clip=default_fb=previous_fb=mng_info->frame;
4305 for (i=0; i < MNG_MAX_OBJECTS; i++)
4306 mng_info->object_clip[i]=mng_info->frame;
4308 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4312 if (memcmp(type,mng_TERM,4) == 0)
4323 final_delay=(png_uint_32) mng_get_long(&p[2]);
4324 mng_iterations=(png_uint_32) mng_get_long(&p[6]);
4326 if (mng_iterations == PNG_UINT_31_MAX)
4329 image->iterations=mng_iterations;
4330 term_chunk_found=MagickTrue;
4333 if (logging != MagickFalse)
4335 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4336 " repeat=%d",repeat);
4338 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4339 " final_delay=%.20g",(double) final_delay);
4341 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4342 " image->iterations=%.20g",(double) image->iterations);
4345 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4348 if (memcmp(type,mng_DEFI,4) == 0)
4351 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4352 CoderError,"DEFI chunk found in MNG-VLC datastream","`%s'",
4355 object_id=(p[0] << 8) | p[1];
4357 if (mng_type == 2 && object_id != 0)
4358 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4359 CoderError,"Nonzero object_id in MNG-LC datastream","`%s'",
4362 if (object_id > MNG_MAX_OBJECTS)
4365 Instead ofsuing a warning we should allocate a larger
4366 MngInfo structure and continue.
4368 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4369 CoderError,"object id too large","`%s'",image->filename);
4370 object_id=MNG_MAX_OBJECTS;
4373 if (mng_info->exists[object_id])
4374 if (mng_info->frozen[object_id])
4376 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4377 (void) ThrowMagickException(&image->exception,
4378 GetMagickModule(),CoderError,
4379 "DEFI cannot redefine a frozen MNG object","`%s'",
4384 mng_info->exists[object_id]=MagickTrue;
4387 mng_info->invisible[object_id]=p[2];
4390 Extract object offset info.
4394 mng_info->x_off[object_id]=(ssize_t) ((p[4] << 24) |
4395 (p[5] << 16) | (p[6] << 8) | p[7]);
4397 mng_info->y_off[object_id]=(ssize_t) ((p[8] << 24) |
4398 (p[9] << 16) | (p[10] << 8) | p[11]);
4400 if (logging != MagickFalse)
4402 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4403 " x_off[%d]: %.20g",object_id,(double)
4404 mng_info->x_off[object_id]);
4406 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4407 " y_off[%d]: %.20g",object_id,(double)
4408 mng_info->y_off[object_id]);
4413 Extract object clipping info.
4416 mng_info->object_clip[object_id]=mng_read_box(mng_info->frame,0,
4419 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4422 if (memcmp(type,mng_bKGD,4) == 0)
4424 mng_info->have_global_bkgd=MagickFalse;
4428 mng_info->mng_global_bkgd.red=
4429 ScaleShortToQuantum((unsigned short) ((p[0] << 8) | p[1]));
4431 mng_info->mng_global_bkgd.green=
4432 ScaleShortToQuantum((unsigned short) ((p[2] << 8) | p[3]));
4434 mng_info->mng_global_bkgd.blue=
4435 ScaleShortToQuantum((unsigned short) ((p[4] << 8) | p[5]));
4437 mng_info->have_global_bkgd=MagickTrue;
4440 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4443 if (memcmp(type,mng_BACK,4) == 0)
4445 #if defined(MNG_INSERT_LAYERS)
4447 mandatory_back=p[6];
4452 if (mandatory_back && length > 5)
4454 mng_background_color.red=
4455 ScaleShortToQuantum((unsigned short) ((p[0] << 8) | p[1]));
4457 mng_background_color.green=
4458 ScaleShortToQuantum((unsigned short) ((p[2] << 8) | p[3]));
4460 mng_background_color.blue=
4461 ScaleShortToQuantum((unsigned short) ((p[4] << 8) | p[5]));
4463 mng_background_color.opacity=OpaqueOpacity;
4466 #ifdef MNG_OBJECT_BUFFERS
4468 mng_background_object=(p[7] << 8) | p[8];
4471 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4475 if (memcmp(type,mng_PLTE,4) == 0)
4477 /* Read global PLTE. */
4479 if (length && (length < 769))
4481 if (mng_info->global_plte == (png_colorp) NULL)
4482 mng_info->global_plte=(png_colorp) AcquireQuantumMemory(256,
4483 sizeof(*mng_info->global_plte));
4485 for (i=0; i < (ssize_t) (length/3); i++)
4487 mng_info->global_plte[i].red=p[3*i];
4488 mng_info->global_plte[i].green=p[3*i+1];
4489 mng_info->global_plte[i].blue=p[3*i+2];
4492 mng_info->global_plte_length=(unsigned int) (length/3);
4495 for ( ; i < 256; i++)
4497 mng_info->global_plte[i].red=i;
4498 mng_info->global_plte[i].green=i;
4499 mng_info->global_plte[i].blue=i;
4503 mng_info->global_plte_length=256;
4506 mng_info->global_plte_length=0;
4508 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4512 if (memcmp(type,mng_tRNS,4) == 0)
4514 /* read global tRNS */
4517 for (i=0; i < (ssize_t) length; i++)
4518 mng_info->global_trns[i]=p[i];
4521 for ( ; i < 256; i++)
4522 mng_info->global_trns[i]=255;
4524 mng_info->global_trns_length=(unsigned int) length;
4525 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4528 if (memcmp(type,mng_gAMA,4) == 0)
4535 igamma=mng_get_long(p);
4536 mng_info->global_gamma=((float) igamma)*0.00001;
4537 mng_info->have_global_gama=MagickTrue;
4541 mng_info->have_global_gama=MagickFalse;
4543 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4547 if (memcmp(type,mng_cHRM,4) == 0)
4549 /* Read global cHRM */
4553 mng_info->global_chrm.white_point.x=0.00001*mng_get_long(p);
4554 mng_info->global_chrm.white_point.y=0.00001*mng_get_long(&p[4]);
4555 mng_info->global_chrm.red_primary.x=0.00001*mng_get_long(&p[8]);
4556 mng_info->global_chrm.red_primary.y=0.00001*
4557 mng_get_long(&p[12]);
4558 mng_info->global_chrm.green_primary.x=0.00001*
4559 mng_get_long(&p[16]);
4560 mng_info->global_chrm.green_primary.y=0.00001*
4561 mng_get_long(&p[20]);
4562 mng_info->global_chrm.blue_primary.x=0.00001*
4563 mng_get_long(&p[24]);
4564 mng_info->global_chrm.blue_primary.y=0.00001*
4565 mng_get_long(&p[28]);
4566 mng_info->have_global_chrm=MagickTrue;
4569 mng_info->have_global_chrm=MagickFalse;
4571 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4575 if (memcmp(type,mng_sRGB,4) == 0)
4582 mng_info->global_srgb_intent=
4583 Magick_RenderingIntent_from_PNG_RenderingIntent(p[0]);
4584 mng_info->have_global_srgb=MagickTrue;
4587 mng_info->have_global_srgb=MagickFalse;
4589 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4593 if (memcmp(type,mng_iCCP,4) == 0)
4601 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4606 if (memcmp(type,mng_FRAM,4) == 0)
4609 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4610 CoderError,"FRAM chunk found in MNG-VLC datastream","`%s'",
4613 if ((mng_info->framing_mode == 2) || (mng_info->framing_mode == 4))
4614 image->delay=frame_delay;
4616 frame_delay=default_frame_delay;
4617 frame_timeout=default_frame_timeout;
4622 mng_info->framing_mode=p[0];
4624 if (logging != MagickFalse)
4625 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4626 " Framing_mode=%d",mng_info->framing_mode);
4630 /* Note the delay and frame clipping boundaries. */
4632 p++; /* framing mode */
4634 while (*p && ((p-chunk) < (ssize_t) length))
4635 p++; /* frame name */
4637 p++; /* frame name terminator */
4639 if ((p-chunk) < (ssize_t) (length-4))
4646 change_delay=(*p++);
4647 change_timeout=(*p++);
4648 change_clipping=(*p++);
4649 p++; /* change_sync */
4653 frame_delay=1UL*image->ticks_per_second*
4656 if (mng_info->ticks_per_second != 0)
4657 frame_delay/=mng_info->ticks_per_second;
4660 frame_delay=PNG_UINT_31_MAX;
4662 if (change_delay == 2)
4663 default_frame_delay=frame_delay;
4667 if (logging != MagickFalse)
4668 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4669 " Framing_delay=%.20g",(double) frame_delay);
4674 frame_timeout=1UL*image->ticks_per_second*
4677 if (mng_info->ticks_per_second != 0)
4678 frame_timeout/=mng_info->ticks_per_second;
4681 frame_timeout=PNG_UINT_31_MAX;
4683 if (change_delay == 2)
4684 default_frame_timeout=frame_timeout;
4688 if (logging != MagickFalse)
4689 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4690 " Framing_timeout=%.20g",(double) frame_timeout);
4693 if (change_clipping)
4695 fb=mng_read_box(previous_fb,(char) p[0],&p[1]);
4699 if (logging != MagickFalse)
4700 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4701 " Frame_clip: L=%.20g R=%.20g T=%.20g B=%.20g",
4702 (double) fb.left,(double) fb.right,(double) fb.top,
4703 (double) fb.bottom);
4705 if (change_clipping == 2)
4711 mng_info->clip=mng_minimum_box(fb,mng_info->frame);
4713 subframe_width=(size_t) (mng_info->clip.right
4714 -mng_info->clip.left);
4716 subframe_height=(size_t) (mng_info->clip.bottom
4717 -mng_info->clip.top);
4719 Insert a background layer behind the frame if framing_mode is 4.
4721 #if defined(MNG_INSERT_LAYERS)
4722 if (logging != MagickFalse)
4723 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4724 " subframe_width=%.20g, subframe_height=%.20g",(double)
4725 subframe_width,(double) subframe_height);
4727 if (insert_layers && (mng_info->framing_mode == 4) &&
4728 (subframe_width) && (subframe_height))
4730 /* Allocate next image structure. */
4731 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
4733 AcquireNextImage(image_info,image);
4735 if (GetNextImageInList(image) == (Image *) NULL)
4737 image=DestroyImageList(image);
4738 MngInfoFreeStruct(mng_info,&have_mng_structure);
4739 return((Image *) NULL);
4742 image=SyncNextImageInList(image);
4745 mng_info->image=image;
4747 if (term_chunk_found)
4749 image->start_loop=MagickTrue;
4750 image->iterations=mng_iterations;
4751 term_chunk_found=MagickFalse;
4755 image->start_loop=MagickFalse;
4757 image->columns=subframe_width;
4758 image->rows=subframe_height;
4759 image->page.width=subframe_width;
4760 image->page.height=subframe_height;
4761 image->page.x=mng_info->clip.left;
4762 image->page.y=mng_info->clip.top;
4763 image->background_color=mng_background_color;
4764 image->matte=MagickFalse;
4766 (void) SetImageBackgroundColor(image);
4768 if (logging != MagickFalse)
4769 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4770 " Insert backgd layer, L=%.20g, R=%.20g T=%.20g, B=%.20g",
4771 (double) mng_info->clip.left,(double) mng_info->clip.right,
4772 (double) mng_info->clip.top,(double) mng_info->clip.bottom);
4775 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4778 if (memcmp(type,mng_CLIP,4) == 0)
4787 first_object=(p[0] << 8) | p[1];
4788 last_object=(p[2] << 8) | p[3];
4790 for (i=(int) first_object; i <= (int) last_object; i++)
4792 if (mng_info->exists[i] && !mng_info->frozen[i])
4797 box=mng_info->object_clip[i];
4798 mng_info->object_clip[i]=mng_read_box(box,(char) p[4],&p[5]);
4802 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4805 if (memcmp(type,mng_SAVE,4) == 0)
4807 for (i=1; i < MNG_MAX_OBJECTS; i++)
4808 if (mng_info->exists[i])
4810 mng_info->frozen[i]=MagickTrue;
4811 #ifdef MNG_OBJECT_BUFFERS
4812 if (mng_info->ob[i] != (MngBuffer *) NULL)
4813 mng_info->ob[i]->frozen=MagickTrue;
4818 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4823 if ((memcmp(type,mng_DISC,4) == 0) || (memcmp(type,mng_SEEK,4) == 0))
4825 /* Read DISC or SEEK. */
4827 if ((length == 0) || !memcmp(type,mng_SEEK,4))
4829 for (i=1; i < MNG_MAX_OBJECTS; i++)
4830 MngInfoDiscardObject(mng_info,i);
4838 for (j=0; j < (ssize_t) length; j+=2)
4840 i=p[j] << 8 | p[j+1];
4841 MngInfoDiscardObject(mng_info,i);
4846 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4851 if (memcmp(type,mng_MOVE,4) == 0)
4859 first_object=(p[0] << 8) | p[1];
4860 last_object=(p[2] << 8) | p[3];
4861 for (i=(ssize_t) first_object; i <= (ssize_t) last_object; i++)
4863 if (mng_info->exists[i] && !mng_info->frozen[i])
4871 old_pair.a=mng_info->x_off[i];
4872 old_pair.b=mng_info->y_off[i];
4873 new_pair=mng_read_pair(old_pair,(int) p[4],&p[5]);
4874 mng_info->x_off[i]=new_pair.a;
4875 mng_info->y_off[i]=new_pair.b;
4879 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4883 if (memcmp(type,mng_LOOP,4) == 0)
4885 ssize_t loop_iters=1;
4886 loop_level=chunk[0];
4887 mng_info->loop_active[loop_level]=1; /* mark loop active */
4889 /* Record starting point. */
4890 loop_iters=mng_get_long(&chunk[1]);
4892 if (logging != MagickFalse)
4893 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4894 " LOOP level %.20g has %.20g iterations ",(double) loop_level,
4895 (double) loop_iters);
4897 if (loop_iters == 0)
4898 skipping_loop=loop_level;
4902 mng_info->loop_jump[loop_level]=TellBlob(image);
4903 mng_info->loop_count[loop_level]=loop_iters;
4906 mng_info->loop_iteration[loop_level]=0;
4907 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4911 if (memcmp(type,mng_ENDL,4) == 0)
4913 loop_level=chunk[0];
4915 if (skipping_loop > 0)
4917 if (skipping_loop == loop_level)
4920 Found end of zero-iteration loop.
4923 mng_info->loop_active[loop_level]=0;
4929 if (mng_info->loop_active[loop_level] == 1)
4931 mng_info->loop_count[loop_level]--;
4932 mng_info->loop_iteration[loop_level]++;
4934 if (logging != MagickFalse)
4935 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
4936 " ENDL: LOOP level %.20g has %.20g remaining iters ",
4937 (double) loop_level,(double)
4938 mng_info->loop_count[loop_level]);
4940 if (mng_info->loop_count[loop_level] != 0)
4942 offset=SeekBlob(image,mng_info->loop_jump[loop_level],
4946 ThrowReaderException(CorruptImageError,
4947 "ImproperImageHeader");
4958 mng_info->loop_active[loop_level]=0;
4960 for (i=0; i < loop_level; i++)
4961 if (mng_info->loop_active[i] == 1)
4962 last_level=(short) i;
4963 loop_level=last_level;
4968 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
4972 if (memcmp(type,mng_CLON,4) == 0)
4974 if (mng_info->clon_warning == 0)
4975 (void) ThrowMagickException(&image->exception,GetMagickModule(),
4976 CoderError,"CLON is not implemented yet","`%s'",
4979 mng_info->clon_warning++;
4982 if (memcmp(type,mng_MAGN,4) == 0)
4997 magn_first=(p[0] << 8) | p[1];
5003 magn_last=(p[2] << 8) | p[3];
5006 magn_last=magn_first;
5007 #ifndef MNG_OBJECT_BUFFERS
5008 if (magn_first || magn_last)
5009 if (mng_info->magn_warning == 0)
5011 (void) ThrowMagickException(&image->exception,
5012 GetMagickModule(),CoderError,
5013 "MAGN is not implemented yet for nonzero objects",
5014 "`%s'",image->filename);
5016 mng_info->magn_warning++;
5026 magn_mx=(p[5] << 8) | p[6];
5035 magn_my=(p[7] << 8) | p[8];
5044 magn_ml=(p[9] << 8) | p[10];
5053 magn_mr=(p[11] << 8) | p[12];
5062 magn_mt=(p[13] << 8) | p[14];
5071 magn_mb=(p[15] << 8) | p[16];
5083 magn_methy=magn_methx;
5086 if (magn_methx > 5 || magn_methy > 5)
5087 if (mng_info->magn_warning == 0)
5089 (void) ThrowMagickException(&image->exception,
5090 GetMagickModule(),CoderError,
5091 "Unknown MAGN method in MNG datastream","`%s'",
5094 mng_info->magn_warning++;
5096 #ifdef MNG_OBJECT_BUFFERS
5097 /* Magnify existing objects in the range magn_first to magn_last */
5099 if (magn_first == 0 || magn_last == 0)
5101 /* Save the magnification factors for object 0 */
5102 mng_info->magn_mb=magn_mb;
5103 mng_info->magn_ml=magn_ml;
5104 mng_info->magn_mr=magn_mr;
5105 mng_info->magn_mt=magn_mt;
5106 mng_info->magn_mx=magn_mx;
5107 mng_info->magn_my=magn_my;
5108 mng_info->magn_methx=magn_methx;
5109 mng_info->magn_methy=magn_methy;
5113 if (memcmp(type,mng_PAST,4) == 0)
5115 if (mng_info->past_warning == 0)
5116 (void) ThrowMagickException(&image->exception,GetMagickModule(),
5117 CoderError,"PAST is not implemented yet","`%s'",
5120 mng_info->past_warning++;
5123 if (memcmp(type,mng_SHOW,4) == 0)
5125 if (mng_info->show_warning == 0)
5126 (void) ThrowMagickException(&image->exception,GetMagickModule(),
5127 CoderError,"SHOW is not implemented yet","`%s'",
5130 mng_info->show_warning++;
5133 if (memcmp(type,mng_sBIT,4) == 0)
5136 mng_info->have_global_sbit=MagickFalse;
5140 mng_info->global_sbit.gray=p[0];
5141 mng_info->global_sbit.red=p[0];
5142 mng_info->global_sbit.green=p[1];
5143 mng_info->global_sbit.blue=p[2];
5144 mng_info->global_sbit.alpha=p[3];
5145 mng_info->have_global_sbit=MagickTrue;
5148 if (memcmp(type,mng_pHYs,4) == 0)
5152 mng_info->global_x_pixels_per_unit=
5153 (size_t) mng_get_long(p);
5154 mng_info->global_y_pixels_per_unit=
5155 (size_t) mng_get_long(&p[4]);
5156 mng_info->global_phys_unit_type=p[8];
5157 mng_info->have_global_phys=MagickTrue;
5161 mng_info->have_global_phys=MagickFalse;
5163 if (memcmp(type,mng_pHYg,4) == 0)
5165 if (mng_info->phyg_warning == 0)
5166 (void) ThrowMagickException(&image->exception,GetMagickModule(),
5167 CoderError,"pHYg is not implemented.","`%s'",image->filename);
5169 mng_info->phyg_warning++;
5171 if (memcmp(type,mng_BASI,4) == 0)
5173 skip_to_iend=MagickTrue;
5175 if (mng_info->basi_warning == 0)
5176 (void) ThrowMagickException(&image->exception,GetMagickModule(),
5177 CoderError,"BASI is not implemented yet","`%s'",
5180 mng_info->basi_warning++;
5181 #ifdef MNG_BASI_SUPPORTED
5182 basi_width=(size_t) ((p[0] << 24) | (p[1] << 16) |
5183 (p[2] << 8) | p[3]);
5184 basi_height=(size_t) ((p[4] << 24) | (p[5] << 16) |
5185 (p[6] << 8) | p[7]);
5186 basi_color_type=p[8];
5187 basi_compression_method=p[9];
5188 basi_filter_type=p[10];
5189 basi_interlace_method=p[11];
5191 basi_red=(p[12] << 8) & p[13];
5197 basi_green=(p[14] << 8) & p[15];
5203 basi_blue=(p[16] << 8) & p[17];
5209 basi_alpha=(p[18] << 8) & p[19];
5213 if (basi_sample_depth == 16)
5220 basi_viewable=p[20];
5226 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
5230 if (memcmp(type,mng_IHDR,4)
5231 #if defined(JNG_SUPPORTED)
5232 && memcmp(type,mng_JHDR,4)
5236 /* Not an IHDR or JHDR chunk */
5238 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
5243 if (logging != MagickFalse)
5244 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5245 " Processing %c%c%c%c chunk",type[0],type[1],type[2],type[3]);
5247 mng_info->exists[object_id]=MagickTrue;
5248 mng_info->viewable[object_id]=MagickTrue;
5250 if (mng_info->invisible[object_id])
5252 if (logging != MagickFalse)
5253 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5254 " Skipping invisible object");
5256 skip_to_iend=MagickTrue;
5257 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
5260 #if defined(MNG_INSERT_LAYERS)
5262 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
5264 image_width=(size_t) mng_get_long(p);
5265 image_height=(size_t) mng_get_long(&p[4]);
5267 chunk=(unsigned char *) RelinquishMagickMemory(chunk);
5270 Insert a transparent background layer behind the entire animation
5271 if it is not full screen.
5273 #if defined(MNG_INSERT_LAYERS)
5274 if (insert_layers && mng_type && first_mng_object)
5276 if ((mng_info->clip.left > 0) || (mng_info->clip.top > 0) ||
5277 (image_width < mng_info->mng_width) ||
5278 (mng_info->clip.right < (ssize_t) mng_info->mng_width) ||
5279 (image_height < mng_info->mng_height) ||
5280 (mng_info->clip.bottom < (ssize_t) mng_info->mng_height))
5282 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
5285 Allocate next image structure.
5287 AcquireNextImage(image_info,image);
5289 if (GetNextImageInList(image) == (Image *) NULL)
5291 image=DestroyImageList(image);
5292 MngInfoFreeStruct(mng_info,&have_mng_structure);
5293 return((Image *) NULL);
5296 image=SyncNextImageInList(image);
5298 mng_info->image=image;
5300 if (term_chunk_found)
5302 image->start_loop=MagickTrue;
5303 image->iterations=mng_iterations;
5304 term_chunk_found=MagickFalse;
5308 image->start_loop=MagickFalse;
5310 /* Make a background rectangle. */
5313 image->columns=mng_info->mng_width;
5314 image->rows=mng_info->mng_height;
5315 image->page.width=mng_info->mng_width;
5316 image->page.height=mng_info->mng_height;
5319 image->background_color=mng_background_color;
5320 (void) SetImageBackgroundColor(image);
5321 if (logging != MagickFalse)
5322 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5323 " Inserted transparent background layer, W=%.20g, H=%.20g",
5324 (double) mng_info->mng_width,(double) mng_info->mng_height);
5328 Insert a background layer behind the upcoming image if
5329 framing_mode is 3, and we haven't already inserted one.
5331 if (insert_layers && (mng_info->framing_mode == 3) &&
5332 (subframe_width) && (subframe_height) && (simplicity == 0 ||
5333 (simplicity & 0x08)))
5335 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
5338 Allocate next image structure.
5340 AcquireNextImage(image_info,image);
5342 if (GetNextImageInList(image) == (Image *) NULL)
5344 image=DestroyImageList(image);
5345 MngInfoFreeStruct(mng_info,&have_mng_structure);
5346 return((Image *) NULL);
5349 image=SyncNextImageInList(image);
5352 mng_info->image=image;
5354 if (term_chunk_found)
5356 image->start_loop=MagickTrue;
5357 image->iterations=mng_iterations;
5358 term_chunk_found=MagickFalse;
5362 image->start_loop=MagickFalse;
5365 image->columns=subframe_width;
5366 image->rows=subframe_height;
5367 image->page.width=subframe_width;
5368 image->page.height=subframe_height;
5369 image->page.x=mng_info->clip.left;
5370 image->page.y=mng_info->clip.top;
5371 image->background_color=mng_background_color;
5372 image->matte=MagickFalse;
5373 (void) SetImageBackgroundColor(image);
5375 if (logging != MagickFalse)
5376 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5377 " Insert background layer, L=%.20g, R=%.20g T=%.20g, B=%.20g",
5378 (double) mng_info->clip.left,(double) mng_info->clip.right,
5379 (double) mng_info->clip.top,(double) mng_info->clip.bottom);
5381 #endif /* MNG_INSERT_LAYERS */
5382 first_mng_object=MagickFalse;
5384 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
5387 Allocate next image structure.
5389 AcquireNextImage(image_info,image);
5391 if (GetNextImageInList(image) == (Image *) NULL)
5393 image=DestroyImageList(image);
5394 MngInfoFreeStruct(mng_info,&have_mng_structure);
5395 return((Image *) NULL);
5398 image=SyncNextImageInList(image);
5400 mng_info->image=image;
5401 status=SetImageProgress(image,LoadImagesTag,TellBlob(image),
5402 GetBlobSize(image));
5404 if (status == MagickFalse)
5407 if (term_chunk_found)
5409 image->start_loop=MagickTrue;
5410 term_chunk_found=MagickFalse;
5414 image->start_loop=MagickFalse;
5416 if (mng_info->framing_mode == 1 || mng_info->framing_mode == 3)
5418 image->delay=frame_delay;
5419 frame_delay=default_frame_delay;
5425 image->page.width=mng_info->mng_width;
5426 image->page.height=mng_info->mng_height;
5427 image->page.x=mng_info->x_off[object_id];
5428 image->page.y=mng_info->y_off[object_id];
5429 image->iterations=mng_iterations;
5432 Seek back to the beginning of the IHDR or JHDR chunk's length field.
5435 if (logging != MagickFalse)
5436 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5437 " Seeking back to beginning of %c%c%c%c chunk",type[0],type[1],
5440 offset=SeekBlob(image,-((ssize_t) length+12),SEEK_CUR);
5443 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
5447 mng_info->image=image;
5448 mng_info->mng_type=mng_type;
5449 mng_info->object_id=object_id;
5451 if (memcmp(type,mng_IHDR,4) == 0)
5452 image=ReadOnePNGImage(mng_info,image_info,exception);
5454 #if defined(JNG_SUPPORTED)
5456 image=ReadOneJNGImage(mng_info,image_info,exception);
5459 if (image == (Image *) NULL)
5461 if (IsImageObject(previous) != MagickFalse)
5463 (void) DestroyImageList(previous);
5464 (void) CloseBlob(previous);
5467 MngInfoFreeStruct(mng_info,&have_mng_structure);
5468 return((Image *) NULL);
5471 if (image->columns == 0 || image->rows == 0)
5473 (void) CloseBlob(image);
5474 image=DestroyImageList(image);
5475 MngInfoFreeStruct(mng_info,&have_mng_structure);
5476 return((Image *) NULL);
5479 mng_info->image=image;
5486 if (mng_info->magn_methx || mng_info->magn_methy)
5492 if (logging != MagickFalse)
5493 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5494 " Processing MNG MAGN chunk");
5496 if (mng_info->magn_methx == 1)
5498 magnified_width=mng_info->magn_ml;
5500 if (image->columns > 1)
5501 magnified_width += mng_info->magn_mr;
5503 if (image->columns > 2)
5504 magnified_width += (png_uint_32)
5505 ((image->columns-2)*(mng_info->magn_mx));
5510 magnified_width=(png_uint_32) image->columns;
5512 if (image->columns > 1)
5513 magnified_width += mng_info->magn_ml-1;
5515 if (image->columns > 2)
5516 magnified_width += mng_info->magn_mr-1;
5518 if (image->columns > 3)
5519 magnified_width += (png_uint_32)
5520 ((image->columns-3)*(mng_info->magn_mx-1));
5523 if (mng_info->magn_methy == 1)
5525 magnified_height=mng_info->magn_mt;
5527 if (image->rows > 1)
5528 magnified_height += mng_info->magn_mb;
5530 if (image->rows > 2)
5531 magnified_height += (png_uint_32)
5532 ((image->rows-2)*(mng_info->magn_my));
5537 magnified_height=(png_uint_32) image->rows;
5539 if (image->rows > 1)
5540 magnified_height += mng_info->magn_mt-1;
5542 if (image->rows > 2)
5543 magnified_height += mng_info->magn_mb-1;
5545 if (image->rows > 3)
5546 magnified_height += (png_uint_32)
5547 ((image->rows-3)*(mng_info->magn_my-1));
5550 if (magnified_height > image->rows ||
5551 magnified_width > image->columns)
5566 register PixelPacket
5578 /* Allocate next image structure. */
5580 if (logging != MagickFalse)
5581 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5582 " Allocate magnified image");
5584 AcquireNextImage(image_info,image);
5586 if (GetNextImageInList(image) == (Image *) NULL)
5588 image=DestroyImageList(image);
5589 MngInfoFreeStruct(mng_info,&have_mng_structure);
5590 return((Image *) NULL);
5593 large_image=SyncNextImageInList(image);
5595 large_image->columns=magnified_width;
5596 large_image->rows=magnified_height;
5598 magn_methx=mng_info->magn_methx;
5599 magn_methy=mng_info->magn_methy;
5601 #if (MAGICKCORE_QUANTUM_DEPTH == 32)
5602 #define QM unsigned short
5603 if (magn_methx != 1 || magn_methy != 1)
5606 Scale pixels to unsigned shorts to prevent
5607 overflow of intermediate values of interpolations
5609 for (y=0; y < (ssize_t) image->rows; y++)
5611 q=GetAuthenticPixels(image,0,y,image->columns,1,
5614 for (x=(ssize_t) image->columns-1; x >= 0; x--)
5616 q->red=ScaleQuantumToShort(q->red);
5617 q->green=ScaleQuantumToShort(q->green);
5618 q->blue=ScaleQuantumToShort(q->blue);
5619 q->opacity=ScaleQuantumToShort(q->opacity);
5623 if (SyncAuthenticPixels(image,exception) == MagickFalse)
5631 if (image->matte != MagickFalse)
5632 (void) SetImageBackgroundColor(large_image);
5636 large_image->background_color.opacity=OpaqueOpacity;
5637 (void) SetImageBackgroundColor(large_image);
5639 if (magn_methx == 4)
5642 if (magn_methx == 5)
5645 if (magn_methy == 4)
5648 if (magn_methy == 5)
5652 /* magnify the rows into the right side of the large image */
5654 if (logging != MagickFalse)
5655 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5656 " Magnify the rows to %.20g",(double) large_image->rows);
5657 m=(ssize_t) mng_info->magn_mt;
5659 length=(size_t) image->columns;
5660 next=(PixelPacket *) AcquireQuantumMemory(length,sizeof(*next));
5661 prev=(PixelPacket *) AcquireQuantumMemory(length,sizeof(*prev));
5663 if ((prev == (PixelPacket *) NULL) ||
5664 (next == (PixelPacket *) NULL))
5666 image=DestroyImageList(image);
5667 MngInfoFreeStruct(mng_info,&have_mng_structure);
5668 ThrowReaderException(ResourceLimitError,
5669 "MemoryAllocationFailed");
5672 n=GetAuthenticPixels(image,0,0,image->columns,1,exception);
5673 (void) CopyMagickMemory(next,n,length);
5675 for (y=0; y < (ssize_t) image->rows; y++)
5678 m=(ssize_t) mng_info->magn_mt;
5680 else if (magn_methy > 1 && y == (ssize_t) image->rows-2)
5681 m=(ssize_t) mng_info->magn_mb;
5683 else if (magn_methy <= 1 && y == (ssize_t) image->rows-1)
5684 m=(ssize_t) mng_info->magn_mb;
5686 else if (magn_methy > 1 && y == (ssize_t) image->rows-1)
5690 m=(ssize_t) mng_info->magn_my;
5696 if (y < (ssize_t) image->rows-1)
5698 n=GetAuthenticPixels(image,0,y+1,image->columns,1,
5700 (void) CopyMagickMemory(next,n,length);
5703 for (i=0; i < m; i++, yy++)
5705 register PixelPacket
5708 assert(yy < (ssize_t) large_image->rows);
5711 q=GetAuthenticPixels(large_image,0,yy,large_image->columns,
5713 q+=(large_image->columns-image->columns);
5715 for (x=(ssize_t) image->columns-1; x >= 0; x--)
5717 /* To do: get color as function of indexes[x] */
5719 if (image->storage_class == PseudoClass)
5724 if (magn_methy <= 1)
5726 *q=(*pixels); /* replicate previous */
5729 else if (magn_methy == 2 || magn_methy == 4)
5737 (*q).red=(QM) (((ssize_t) (2*i*((*n).red
5738 -(*pixels).red)+m))/((ssize_t) (m*2))
5740 (*q).green=(QM) (((ssize_t) (2*i*((*n).green
5741 -(*pixels).green)+m))/((ssize_t) (m*2))
5743 (*q).blue=(QM) (((ssize_t) (2*i*((*n).blue
5744 -(*pixels).blue)+m))/((ssize_t) (m*2))
5747 if (image->matte != MagickFalse)
5748 (*q).opacity=(QM) (((ssize_t)
5750 -(*pixels).opacity)+m))
5751 /((ssize_t) (m*2))+(*pixels).opacity);
5754 if (magn_methy == 4)
5756 /* Replicate nearest */
5757 if (i <= ((m+1) << 1))
5758 (*q).opacity=(*pixels).opacity+0;
5760 (*q).opacity=(*n).opacity+0;
5764 else /* if (magn_methy == 3 || magn_methy == 5) */
5766 /* Replicate nearest */
5767 if (i <= ((m+1) << 1))
5773 if (magn_methy == 5)
5775 (*q).opacity=(QM) (((ssize_t) (2*i*((*n).opacity
5776 -(*pixels).opacity)+m))/((ssize_t) (m*2))
5777 +(*pixels).opacity);
5785 if (SyncAuthenticPixels(large_image,exception) == 0)
5791 prev=(PixelPacket *) RelinquishMagickMemory(prev);
5792 next=(PixelPacket *) RelinquishMagickMemory(next);
5794 length=image->columns;
5796 if (logging != MagickFalse)
5797 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5798 " Delete original image");
5800 DeleteImageFromList(&image);
5804 mng_info->image=image;
5806 /* magnify the columns */
5807 if (logging != MagickFalse)
5808 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5809 " Magnify the columns to %.20g",(double) image->columns);
5811 for (y=0; y < (ssize_t) image->rows; y++)
5813 register PixelPacket
5816 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
5817 pixels=q+(image->columns-length);
5820 for (x=(ssize_t) (image->columns-length);
5821 x < (ssize_t) image->columns; x++)
5823 if (x == (ssize_t) (image->columns-length))
5824 m=(ssize_t) mng_info->magn_ml;
5826 else if (magn_methx > 1 && x == (ssize_t) image->columns-2)
5827 m=(ssize_t) mng_info->magn_mr;
5829 else if (magn_methx <= 1 && x == (ssize_t) image->columns-1)
5830 m=(ssize_t) mng_info->magn_mr;
5832 else if (magn_methx > 1 && x == (ssize_t) image->columns-1)
5836 m=(ssize_t) mng_info->magn_mx;
5838 for (i=0; i < m; i++)
5840 if (magn_methx <= 1)
5842 /* replicate previous */
5846 else if (magn_methx == 2 || magn_methx == 4)
5854 (*q).red=(QM) ((2*i*((*n).red
5856 /((ssize_t) (m*2))+(*pixels).red);
5857 (*q).green=(QM) ((2*i*((*n).green
5859 +m)/((ssize_t) (m*2))+(*pixels).green);
5860 (*q).blue=(QM) ((2*i*((*n).blue
5862 /((ssize_t) (m*2))+(*pixels).blue);
5863 if (image->matte != MagickFalse)
5864 (*q).opacity=(QM) ((2*i*((*n).opacity
5865 -(*pixels).opacity)+m)/((ssize_t) (m*2))
5866 +(*pixels).opacity);
5869 if (magn_methx == 4)
5871 /* Replicate nearest */
5872 if (i <= ((m+1) << 1))
5873 (*q).opacity=(*pixels).opacity+0;
5875 (*q).opacity=(*n).opacity+0;
5879 else /* if (magn_methx == 3 || magn_methx == 5) */
5881 /* Replicate nearest */
5882 if (i <= ((m+1) << 1))
5888 if (magn_methx == 5)
5891 (*q).opacity=(QM) ((2*i*((*n).opacity
5892 -(*pixels).opacity)+m) /((ssize_t) (m*2))
5893 +(*pixels).opacity);
5902 if (SyncAuthenticPixels(image,exception) == MagickFalse)
5905 #if (MAGICKCORE_QUANTUM_DEPTH == 32)
5906 if (magn_methx != 1 || magn_methy != 1)
5909 Rescale pixels to Quantum
5911 for (y=0; y < (ssize_t) image->rows; y++)
5913 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
5915 for (x=(ssize_t) image->columns-1; x >= 0; x--)
5917 q->red=ScaleShortToQuantum(q->red);
5918 q->green=ScaleShortToQuantum(q->green);
5919 q->blue=ScaleShortToQuantum(q->blue);
5920 q->opacity=ScaleShortToQuantum(q->opacity);
5924 if (SyncAuthenticPixels(image,exception) == MagickFalse)
5929 if (logging != MagickFalse)
5930 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5931 " Finished MAGN processing");
5936 Crop_box is with respect to the upper left corner of the MNG.
5938 crop_box.left=mng_info->image_box.left+mng_info->x_off[object_id];
5939 crop_box.right=mng_info->image_box.right+mng_info->x_off[object_id];
5940 crop_box.top=mng_info->image_box.top+mng_info->y_off[object_id];
5941 crop_box.bottom=mng_info->image_box.bottom+mng_info->y_off[object_id];
5942 crop_box=mng_minimum_box(crop_box,mng_info->clip);
5943 crop_box=mng_minimum_box(crop_box,mng_info->frame);
5944 crop_box=mng_minimum_box(crop_box,mng_info->object_clip[object_id]);
5945 if ((crop_box.left != (mng_info->image_box.left
5946 +mng_info->x_off[object_id])) ||
5947 (crop_box.right != (mng_info->image_box.right
5948 +mng_info->x_off[object_id])) ||
5949 (crop_box.top != (mng_info->image_box.top
5950 +mng_info->y_off[object_id])) ||
5951 (crop_box.bottom != (mng_info->image_box.bottom
5952 +mng_info->y_off[object_id])))
5954 if (logging != MagickFalse)
5955 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
5956 " Crop the PNG image");
5958 if ((crop_box.left < crop_box.right) &&
5959 (crop_box.top < crop_box.bottom))
5968 Crop_info is with respect to the upper left corner of
5971 crop_info.x=(crop_box.left-mng_info->x_off[object_id]);
5972 crop_info.y=(crop_box.top-mng_info->y_off[object_id]);
5973 crop_info.width=(size_t) (crop_box.right-crop_box.left);
5974 crop_info.height=(size_t) (crop_box.bottom-crop_box.top);
5975 image->page.width=image->columns;
5976 image->page.height=image->rows;
5979 im=CropImage(image,&crop_info,exception);
5981 if (im != (Image *) NULL)
5983 image->columns=im->columns;
5984 image->rows=im->rows;
5985 im=DestroyImage(im);
5986 image->page.width=image->columns;
5987 image->page.height=image->rows;
5988 image->page.x=crop_box.left;
5989 image->page.y=crop_box.top;
5996 No pixels in crop area. The MNG spec still requires
5997 a layer, though, so make a single transparent pixel in
5998 the top left corner.
6003 (void) SetImageBackgroundColor(image);
6004 image->page.width=1;
6005 image->page.height=1;
6010 #ifndef PNG_READ_EMPTY_PLTE_SUPPORTED
6011 image=mng_info->image;
6015 #if (MAGICKCORE_QUANTUM_DEPTH > 16)
6016 /* PNG does not handle depths greater than 16 so reduce it even
6019 if (image->depth > 16)
6023 #if (MAGICKCORE_QUANTUM_DEPTH >= 16)
6024 if (LosslessReduceDepthOK(image) != MagickFalse)
6028 GetImageException(image,exception);
6030 if (image_info->number_scenes != 0)
6032 if (mng_info->scenes_found >
6033 (ssize_t) (image_info->first_scene+image_info->number_scenes))
6037 if (logging != MagickFalse)
6038 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6039 " Finished reading image datastream.");
6041 } while (LocaleCompare(image_info->magick,"MNG") == 0);
6043 (void) CloseBlob(image);
6045 if (logging != MagickFalse)
6046 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6047 " Finished reading all image datastreams.");
6049 #if defined(MNG_INSERT_LAYERS)
6050 if (insert_layers && !mng_info->image_found && (mng_info->mng_width) &&
6051 (mng_info->mng_height))
6054 Insert a background layer if nothing else was found.
6056 if (logging != MagickFalse)
6057 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6058 " No images found. Inserting a background layer.");
6060 if (GetAuthenticPixelQueue(image) != (PixelPacket *) NULL)
6063 Allocate next image structure.
6065 AcquireNextImage(image_info,image);
6066 if (GetNextImageInList(image) == (Image *) NULL)
6068 image=DestroyImageList(image);
6069 MngInfoFreeStruct(mng_info,&have_mng_structure);
6071 if (logging != MagickFalse)
6072 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6073 " Allocation failed, returning NULL.");
6075 return((Image *) NULL);
6077 image=SyncNextImageInList(image);
6079 image->columns=mng_info->mng_width;
6080 image->rows=mng_info->mng_height;
6081 image->page.width=mng_info->mng_width;
6082 image->page.height=mng_info->mng_height;
6085 image->background_color=mng_background_color;
6086 image->matte=MagickFalse;
6088 if (image_info->ping == MagickFalse)
6089 (void) SetImageBackgroundColor(image);
6091 mng_info->image_found++;
6094 image->iterations=mng_iterations;
6096 if (mng_iterations == 1)
6097 image->start_loop=MagickTrue;
6099 while (GetPreviousImageInList(image) != (Image *) NULL)
6102 if (image_count > 10*mng_info->image_found)
6104 if (logging != MagickFalse)
6105 (void) LogMagickEvent(CoderEvent,GetMagickModule()," No beginning");
6107 (void) ThrowMagickException(&image->exception,GetMagickModule(),
6108 CoderError,"Linked list is corrupted, beginning of list not found",
6109 "`%s'",image_info->filename);
6111 return((Image *) NULL);
6114 image=GetPreviousImageInList(image);
6116 if (GetNextImageInList(image) == (Image *) NULL)
6118 if (logging != MagickFalse)
6119 (void) LogMagickEvent(CoderEvent,GetMagickModule()," Corrupt list");
6121 (void) ThrowMagickException(&image->exception,GetMagickModule(),
6122 CoderError,"Linked list is corrupted; next_image is NULL","`%s'",
6123 image_info->filename);
6127 if (mng_info->ticks_per_second && mng_info->image_found > 1 &&
6128 GetNextImageInList(image) ==
6131 if (logging != MagickFalse)
6132 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6133 " First image null");
6135 (void) ThrowMagickException(&image->exception,GetMagickModule(),
6136 CoderError,"image->next for first image is NULL but shouldn't be.",
6137 "`%s'",image_info->filename);
6140 if (mng_info->image_found == 0)
6142 if (logging != MagickFalse)
6143 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6144 " No visible images found.");
6146 (void) ThrowMagickException(&image->exception,GetMagickModule(),
6147 CoderError,"No visible images in file","`%s'",image_info->filename);
6149 if (image != (Image *) NULL)
6150 image=DestroyImageList(image);
6152 MngInfoFreeStruct(mng_info,&have_mng_structure);
6153 return((Image *) NULL);
6156 if (mng_info->ticks_per_second)
6157 final_delay=1UL*MagickMax(image->ticks_per_second,1L)*
6158 final_delay/mng_info->ticks_per_second;
6161 image->start_loop=MagickTrue;
6163 /* Find final nonzero image delay */
6164 final_image_delay=0;
6166 while (GetNextImageInList(image) != (Image *) NULL)
6169 final_image_delay=image->delay;
6171 image=GetNextImageInList(image);
6174 if (final_delay < final_image_delay)
6175 final_delay=final_image_delay;
6177 image->delay=final_delay;
6179 if (logging != MagickFalse)
6180 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6181 " image->delay=%.20g, final_delay=%.20g",(double) image->delay,
6182 (double) final_delay);
6184 if (logging != MagickFalse)
6190 image=GetFirstImageInList(image);
6192 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6193 " Before coalesce:");
6195 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6196 " scene 0 delay=%.20g",(double) image->delay);
6198 while (GetNextImageInList(image) != (Image *) NULL)
6200 image=GetNextImageInList(image);
6201 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6202 " scene %.20g delay=%.20g",(double) scene++,(double) image->delay);
6206 image=GetFirstImageInList(image);
6207 #ifdef MNG_COALESCE_LAYERS
6217 if (logging != MagickFalse)
6218 (void) LogMagickEvent(CoderEvent,GetMagickModule()," Coalesce Images");
6221 next_image=CoalesceImages(image,&image->exception);
6223 if (next_image == (Image *) NULL)
6224 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
6226 image=DestroyImageList(image);
6229 for (next=image; next != (Image *) NULL; next=next_image)
6231 next->page.width=mng_info->mng_width;
6232 next->page.height=mng_info->mng_height;
6235 next->scene=scene++;
6236 next_image=GetNextImageInList(next);
6238 if (next_image == (Image *) NULL)
6241 if (next->delay == 0)
6244 next_image->previous=GetPreviousImageInList(next);
6245 if (GetPreviousImageInList(next) == (Image *) NULL)
6248 next->previous->next=next_image;
6249 next=DestroyImage(next);
6255 while (GetNextImageInList(image) != (Image *) NULL)
6256 image=GetNextImageInList(image);
6258 image->dispose=BackgroundDispose;
6260 if (logging != MagickFalse)
6266 image=GetFirstImageInList(image);
6268 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6269 " After coalesce:");
6271 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6272 " scene 0 delay=%.20g dispose=%.20g",(double) image->delay,
6273 (double) image->dispose);
6275 while (GetNextImageInList(image) != (Image *) NULL)
6277 image=GetNextImageInList(image);
6279 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6280 " scene %.20g delay=%.20g dispose=%.20g",(double) scene++,
6281 (double) image->delay,(double) image->dispose);
6285 image=GetFirstImageInList(image);
6286 MngInfoFreeStruct(mng_info,&have_mng_structure);
6287 have_mng_structure=MagickFalse;
6289 if (logging != MagickFalse)
6290 (void) LogMagickEvent(CoderEvent,GetMagickModule(),"exit ReadMNGImage()");
6292 return(GetFirstImageInList(image));
6294 #else /* PNG_LIBPNG_VER > 10011 */
6295 static Image *ReadPNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
6297 printf("Your PNG library is too old: You have libpng-%s\n",
6298 PNG_LIBPNG_VER_STRING);
6300 (void) ThrowMagickException(exception,GetMagickModule(),CoderError,
6301 "PNG library is too old","`%s'",image_info->filename);
6303 return(Image *) NULL;
6306 static Image *ReadMNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
6308 return(ReadPNGImage(image_info,exception));
6310 #endif /* PNG_LIBPNG_VER > 10011 */
6314 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6318 % R e g i s t e r P N G I m a g e %
6322 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6324 % RegisterPNGImage() adds properties for the PNG image format to
6325 % the list of supported formats. The properties include the image format
6326 % tag, a method to read and/or write the format, whether the format
6327 % supports the saving of more than one frame to the same file or blob,
6328 % whether the format supports native in-memory I/O, and a brief
6329 % description of the format.
6331 % The format of the RegisterPNGImage method is:
6333 % size_t RegisterPNGImage(void)
6336 ModuleExport size_t RegisterPNGImage(void)
6339 version[MaxTextExtent];
6347 "See http://www.libpng.org/ for details about the PNG format."
6352 "See http://www.libpng.org/pub/mng/ for details about the JNG\n"
6358 "See http://www.libpng.org/pub/mng/ for details about the MNG\n"
6364 #if defined(PNG_LIBPNG_VER_STRING)
6365 (void) ConcatenateMagickString(version,"libpng ",MaxTextExtent);
6366 (void) ConcatenateMagickString(version,PNG_LIBPNG_VER_STRING,MaxTextExtent);
6368 if (LocaleCompare(PNG_LIBPNG_VER_STRING,png_get_header_ver(NULL)) != 0)
6370 (void) ConcatenateMagickString(version,",",MaxTextExtent);
6371 (void) ConcatenateMagickString(version,png_get_libpng_ver(NULL),
6376 entry=SetMagickInfo("MNG");
6377 entry->seekable_stream=MagickTrue; /* To do: eliminate this. */
6379 #if defined(MAGICKCORE_PNG_DELEGATE)
6380 entry->decoder=(DecodeImageHandler *) ReadMNGImage;
6381 entry->encoder=(EncodeImageHandler *) WriteMNGImage;
6384 entry->magick=(IsImageFormatHandler *) IsMNG;
6385 entry->description=ConstantString("Multiple-image Network Graphics");
6387 if (*version != '\0')
6388 entry->version=ConstantString(version);
6390 entry->module=ConstantString("PNG");
6391 entry->note=ConstantString(MNGNote);
6392 (void) RegisterMagickInfo(entry);
6394 entry=SetMagickInfo("PNG");
6396 #if defined(MAGICKCORE_PNG_DELEGATE)
6397 entry->decoder=(DecodeImageHandler *) ReadPNGImage;
6398 entry->encoder=(EncodeImageHandler *) WritePNGImage;
6401 entry->magick=(IsImageFormatHandler *) IsPNG;
6402 entry->adjoin=MagickFalse;
6403 entry->description=ConstantString("Portable Network Graphics");
6404 entry->module=ConstantString("PNG");
6406 if (*version != '\0')
6407 entry->version=ConstantString(version);
6409 entry->note=ConstantString(PNGNote);
6410 (void) RegisterMagickInfo(entry);
6412 entry=SetMagickInfo("PNG8");
6414 #if defined(MAGICKCORE_PNG_DELEGATE)
6415 entry->decoder=(DecodeImageHandler *) ReadPNGImage;
6416 entry->encoder=(EncodeImageHandler *) WritePNGImage;
6419 entry->magick=(IsImageFormatHandler *) IsPNG;
6420 entry->adjoin=MagickFalse;
6421 entry->description=ConstantString(
6422 "8-bit indexed with optional binary transparency");
6423 entry->module=ConstantString("PNG");
6424 (void) RegisterMagickInfo(entry);
6426 entry=SetMagickInfo("PNG24");
6429 #if defined(ZLIB_VERSION)
6430 (void) ConcatenateMagickString(version,"zlib ",MaxTextExtent);
6431 (void) ConcatenateMagickString(version,ZLIB_VERSION,MaxTextExtent);
6433 if (LocaleCompare(ZLIB_VERSION,zlib_version) != 0)
6435 (void) ConcatenateMagickString(version,",",MaxTextExtent);
6436 (void) ConcatenateMagickString(version,zlib_version,MaxTextExtent);
6440 if (*version != '\0')
6441 entry->version=ConstantString(version);
6443 #if defined(MAGICKCORE_PNG_DELEGATE)
6444 entry->decoder=(DecodeImageHandler *) ReadPNGImage;
6445 entry->encoder=(EncodeImageHandler *) WritePNGImage;
6448 entry->magick=(IsImageFormatHandler *) IsPNG;
6449 entry->adjoin=MagickFalse;
6450 entry->description=ConstantString("opaque 24-bit RGB");
6451 entry->module=ConstantString("PNG");
6452 (void) RegisterMagickInfo(entry);
6454 entry=SetMagickInfo("PNG32");
6456 #if defined(MAGICKCORE_PNG_DELEGATE)
6457 entry->decoder=(DecodeImageHandler *) ReadPNGImage;
6458 entry->encoder=(EncodeImageHandler *) WritePNGImage;
6461 entry->magick=(IsImageFormatHandler *) IsPNG;
6462 entry->adjoin=MagickFalse;
6463 entry->description=ConstantString("opaque or transparent 32-bit RGBA");
6464 entry->module=ConstantString("PNG");
6465 (void) RegisterMagickInfo(entry);
6467 entry=SetMagickInfo("JNG");
6469 #if defined(JNG_SUPPORTED)
6470 #if defined(MAGICKCORE_PNG_DELEGATE)
6471 entry->decoder=(DecodeImageHandler *) ReadJNGImage;
6472 entry->encoder=(EncodeImageHandler *) WriteJNGImage;
6476 entry->magick=(IsImageFormatHandler *) IsJNG;
6477 entry->adjoin=MagickFalse;
6478 entry->description=ConstantString("JPEG Network Graphics");
6479 entry->module=ConstantString("PNG");
6480 entry->note=ConstantString(JNGNote);
6481 (void) RegisterMagickInfo(entry);
6483 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
6484 ping_semaphore=AllocateSemaphoreInfo();
6487 return(MagickImageCoderSignature);
6491 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6495 % U n r e g i s t e r P N G I m a g e %
6499 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6501 % UnregisterPNGImage() removes format registrations made by the
6502 % PNG module from the list of supported formats.
6504 % The format of the UnregisterPNGImage method is:
6506 % UnregisterPNGImage(void)
6509 ModuleExport void UnregisterPNGImage(void)
6511 (void) UnregisterMagickInfo("MNG");
6512 (void) UnregisterMagickInfo("PNG");
6513 (void) UnregisterMagickInfo("PNG8");
6514 (void) UnregisterMagickInfo("PNG24");
6515 (void) UnregisterMagickInfo("PNG32");
6516 (void) UnregisterMagickInfo("JNG");
6518 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
6519 if (ping_semaphore != (SemaphoreInfo *) NULL)
6520 DestroySemaphoreInfo(&ping_semaphore);
6524 #if defined(MAGICKCORE_PNG_DELEGATE)
6525 #if PNG_LIBPNG_VER > 10011
6527 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6531 % W r i t e M N G I m a g e %
6535 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6537 % WriteMNGImage() writes an image in the Portable Network Graphics
6538 % Group's "Multiple-image Network Graphics" encoded image format.
6540 % MNG support written by Glenn Randers-Pehrson, glennrp@image...
6542 % The format of the WriteMNGImage method is:
6544 % MagickBooleanType WriteMNGImage(const ImageInfo *image_info,Image *image)
6546 % A description of each parameter follows.
6548 % o image_info: the image info.
6550 % o image: The image.
6553 % To do (as of version 5.5.2, November 26, 2002 -- glennrp -- see also
6554 % "To do" under ReadPNGImage):
6556 % Preserve all unknown and not-yet-handled known chunks found in input
6557 % PNG file and copy them into output PNG files according to the PNG
6560 % Write the iCCP chunk at MNG level when (icc profile length > 0)
6562 % Improve selection of color type (use indexed-colour or indexed-colour
6563 % with tRNS when 256 or fewer unique RGBA values are present).
6565 % Figure out what to do with "dispose=<restore-to-previous>" (dispose == 3)
6566 % This will be complicated if we limit ourselves to generating MNG-LC
6567 % files. For now we ignore disposal method 3 and simply overlay the next
6570 % Check for identical PLTE's or PLTE/tRNS combinations and use a
6571 % global MNG PLTE or PLTE/tRNS combination when appropriate.
6572 % [mostly done 15 June 1999 but still need to take care of tRNS]
6574 % Check for identical sRGB and replace with a global sRGB (and remove
6575 % gAMA/cHRM if sRGB is found; check for identical gAMA/cHRM and
6576 % replace with global gAMA/cHRM (or with sRGB if appropriate; replace
6577 % local gAMA/cHRM with local sRGB if appropriate).
6579 % Check for identical sBIT chunks and write global ones.
6581 % Provide option to skip writing the signature tEXt chunks.
6583 % Use signatures to detect identical objects and reuse the first
6584 % instance of such objects instead of writing duplicate objects.
6586 % Use a smaller-than-32k value of compression window size when
6589 % Encode JNG datastreams. Mostly done as of 5.5.2; need to write
6590 % ancillary text chunks and save profiles.
6592 % Provide an option to force LC files (to ensure exact framing rate)
6595 % Provide an option to force VLC files instead of LC, even when offsets
6596 % are present. This will involve expanding the embedded images with a
6597 % transparent region at the top and/or left.
6601 Magick_png_write_raw_profile(const ImageInfo *image_info,png_struct *ping,
6602 png_info *ping_info, unsigned char *profile_type, unsigned char
6603 *profile_description, unsigned char *profile_data, png_uint_32 length)
6622 hex[16]={'0','1','2','3','4','5','6','7','8','9','a','b','c','d','e','f'};
6624 if (LocaleNCompare((char *) profile_type+1, "ng-chunk-",9) == 0)
6627 if (image_info->verbose)
6629 (void) printf("writing raw profile: type=%s, length=%.20g\n",
6630 (char *) profile_type, (double) length);
6633 text=(png_textp) png_malloc(ping,(png_uint_32) sizeof(png_text));
6634 description_length=(png_uint_32) strlen((const char *) profile_description);
6635 allocated_length=(png_uint_32) (length*2 + (length >> 5) + 20
6636 + description_length);
6637 text[0].text=(png_charp) png_malloc(ping,allocated_length);
6638 text[0].key=(png_charp) png_malloc(ping, (png_uint_32) 80);
6639 text[0].key[0]='\0';
6640 (void) ConcatenateMagickString(text[0].key,
6641 "Raw profile type ",MaxTextExtent);
6642 (void) ConcatenateMagickString(text[0].key,(const char *) profile_type,62);
6646 (void) CopyMagickString(dp,(const char *) profile_description,
6648 dp+=description_length;
6650 (void) FormatMagickString(dp,allocated_length-
6651 (png_size_t) (dp-text[0].text),"%8lu ",(unsigned long) length);
6654 for (i=0; i < (ssize_t) length; i++)
6658 *(dp++)=(char) hex[((*sp >> 4) & 0x0f)];
6659 *(dp++)=(char) hex[((*sp++ ) & 0x0f)];
6664 text[0].text_length=(png_size_t) (dp-text[0].text);
6665 text[0].compression=image_info->compression == NoCompression ||
6666 (image_info->compression == UndefinedCompression &&
6667 text[0].text_length < 128) ? -1 : 0;
6669 if (text[0].text_length <= allocated_length)
6670 png_set_text(ping,ping_info,text,1);
6672 png_free(ping,text[0].text);
6673 png_free(ping,text[0].key);
6674 png_free(ping,text);
6677 static MagickBooleanType Magick_png_write_chunk_from_profile(Image *image,
6678 const char *string, MagickBooleanType logging)
6691 ResetImageProfileIterator(image);
6693 for (name=GetNextImageProfile(image); name != (const char *) NULL; )
6695 profile=GetImageProfile(image,name);
6697 if (profile != (const StringInfo *) NULL)
6702 if (LocaleNCompare(name,string,11) == 0)
6704 if (logging != MagickFalse)
6705 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6706 " Found %s profile",name);
6708 ping_profile=CloneStringInfo(profile);
6709 data=GetStringInfoDatum(ping_profile),
6710 length=(png_uint_32) GetStringInfoLength(ping_profile);
6715 (void) WriteBlobMSBULong(image,length-5); /* data length */
6716 (void) WriteBlob(image,length-1,data+1);
6717 (void) WriteBlobMSBULong(image,crc32(0,data+1,(uInt) length-1));
6718 ping_profile=DestroyStringInfo(ping_profile);
6722 name=GetNextImageProfile(image);
6729 /* Write one PNG image */
6730 static MagickBooleanType WriteOnePNGImage(MngInfo *mng_info,
6731 const ImageInfo *IMimage_info,Image *IMimage)
6755 ping_trans_alpha[256];
6783 ping_have_cheap_transparency,
6793 /* ping_exclude_EXIF, */
6796 /* ping_exclude_iTXt, */
6801 /* ping_exclude_tRNS, */
6803 ping_exclude_zCCP, /* hex-encoded iCCP */
6806 ping_need_colortype_warning,
6824 ping_interlace_method,
6825 ping_compression_method,
6842 number_semitransparent,
6844 ping_pHYs_unit_type;
6847 ping_pHYs_x_resolution,
6848 ping_pHYs_y_resolution;
6850 logging=LogMagickEvent(CoderEvent,GetMagickModule(),
6851 " Enter WriteOnePNGImage()");
6853 image = CloneImage(IMimage,0,0,MagickFalse,&IMimage->exception);
6854 image_info=(ImageInfo *) CloneImageInfo(IMimage_info);
6856 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
6857 LockSemaphoreInfo(ping_semaphore);
6860 /* Initialize some stuff */
6863 ping_interlace_method=0,
6864 ping_compression_method=0,
6865 ping_filter_method=0,
6868 ping_background.red = 0;
6869 ping_background.green = 0;
6870 ping_background.blue = 0;
6871 ping_background.gray = 0;
6872 ping_background.index = 0;
6874 ping_trans_color.red=0;
6875 ping_trans_color.green=0;
6876 ping_trans_color.blue=0;
6877 ping_trans_color.gray=0;
6879 ping_pHYs_unit_type = 0;
6880 ping_pHYs_x_resolution = 0;
6881 ping_pHYs_y_resolution = 0;
6883 ping_have_blob=MagickFalse;
6884 ping_have_color=MagickTrue;
6885 ping_have_non_bw=MagickTrue;
6886 ping_have_PLTE=MagickFalse;
6887 ping_have_bKGD=MagickFalse;
6888 ping_have_pHYs=MagickFalse;
6889 ping_have_tRNS=MagickFalse;
6891 ping_exclude_bKGD=mng_info->ping_exclude_bKGD;
6892 ping_exclude_cHRM=mng_info->ping_exclude_cHRM;
6893 /* ping_exclude_EXIF=mng_info->ping_exclude_EXIF; */
6894 ping_exclude_gAMA=mng_info->ping_exclude_gAMA;
6895 ping_exclude_cHRM=mng_info->ping_exclude_cHRM;
6896 ping_exclude_iCCP=mng_info->ping_exclude_iCCP;
6897 /* ping_exclude_iTXt=mng_info->ping_exclude_iTXt; */
6898 ping_exclude_oFFs=mng_info->ping_exclude_oFFs;
6899 ping_exclude_pHYs=mng_info->ping_exclude_pHYs;
6900 ping_exclude_sRGB=mng_info->ping_exclude_sRGB;
6901 ping_exclude_tEXt=mng_info->ping_exclude_tEXt;
6902 /* ping_exclude_tRNS=mng_info->ping_exclude_tRNS; */
6903 ping_exclude_vpAg=mng_info->ping_exclude_vpAg;
6904 ping_exclude_zCCP=mng_info->ping_exclude_zCCP; /* hex-encoded iCCP in zTXt */
6905 ping_exclude_zTXt=mng_info->ping_exclude_zTXt;
6907 ping_need_colortype_warning = MagickFalse;
6910 number_semitransparent = 0;
6911 number_transparent = 0;
6913 if (logging != MagickFalse)
6915 if (image->storage_class == UndefinedClass)
6916 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6917 " storage_class=UndefinedClass");
6918 if (image->storage_class == DirectClass)
6919 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6920 " storage_class=DirectClass");
6921 if (image->storage_class == PseudoClass)
6922 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6923 " storage_class=PseudoClass");
6926 if (image->colorspace != RGBColorspace)
6927 (void) TransformImageColorspace(image,RGBColorspace);
6930 Sometimes we get PseudoClass images whose RGB values don't match
6931 the colors in the colormap. This code syncs the RGB values.
6933 if (image->depth <= 8 && image->taint && image->storage_class == PseudoClass)
6934 (void) SyncImage(image);
6936 #if (MAGICKCORE_QUANTUM_DEPTH == 8)
6937 if (image->depth > 8)
6939 if (logging != MagickFalse)
6940 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
6941 " Reducing PNG bit depth to 8 since this is a Q8 build.");
6948 #if (MAGICKCORE_QUANTUM_DEPTH > 16)
6949 /* PNG does not handle depths greater than 16 so reduce it even
6952 if (image->depth > 16)
6956 #if (MAGICKCORE_QUANTUM_DEPTH >= 16)
6957 if (image->depth == 16 && mng_info->write_png_depth != 16)
6958 if (mng_info->write_png8 || LosslessReduceDepthOK(image) != MagickFalse)
6962 /* Normally we run this just once, but in the case of writing PNG8
6963 * we reduce the transparency to binary and run again, then reduce
6964 * the colors to a simple 3-3-2 palette and run once more.
6970 * Sometimes we get DirectClass images that have 256 colors or fewer.
6971 * This code will build a colormap.
6973 * Also, sometimes we get PseudoClass images with an out-of-date
6974 * colormap. This code will replace the colormap with a new one.
6975 * Sometimes we get PseudoClass images that have more than 256 colors.
6976 * This code will delete the colormap and change the image to
6979 * If image->matte is MagickFalse, we ignore the opacity channel
6980 * even though it sometimes contains left-over non-opaque values.
6982 * Also we gather some information (number of opaque, transparent,
6983 * and semitransparent pixels, and whether the image has any non-gray
6984 * pixels or only black-and-white pixels) that we might need later.
6986 * Even if the user wants to force GrayAlpha or RGBA (colortype 4 or 6)
6987 * we need to check for bogus non-opaque values, at least.
6990 #if (MAGICKCORE_QUANTUM_DEPTH == 8)
6991 # define PNGK 0 /* Shift */
6992 # define PNGM 1 /* Scale */
6993 #elif (MAGICKCORE_QUANTUM_DEPTH == 16)
6995 # define PNGM 0x0101
6998 # define PNGM 0x01010101
7009 semitransparent[260],
7012 register IndexPacket
7015 register const PixelPacket
7019 register PixelPacket
7022 if (logging != MagickFalse)
7023 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7024 " Enter BUILD_PALETTE:");
7026 if (logging != MagickFalse)
7028 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7029 " image->columns=%.20g",(double) image->columns);
7030 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7031 " image->rows=%.20g",(double) image->rows);
7032 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7033 " image->matte=%.20g",(double) image->matte);
7034 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7035 " image->depth=%.20g",(double) image->depth);
7037 if (image->storage_class == PseudoClass && image->colormap != NULL)
7039 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7040 " Original colormap:");
7041 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7042 " i (red,green,blue,opacity)");
7044 for (i=0; i < 256; i++)
7046 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7047 " %d (%d,%d,%d,%d)",
7049 (int) image->colormap[i].red,
7050 (int) image->colormap[i].green,
7051 (int) image->colormap[i].blue,
7052 (int) image->colormap[i].opacity);
7055 for (i=image->colors - 10; i < (ssize_t) image->colors; i++)
7059 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7060 " %d (%d,%d,%d,%d)",
7062 (int) image->colormap[i].red,
7063 (int) image->colormap[i].green,
7064 (int) image->colormap[i].blue,
7065 (int) image->colormap[i].opacity);
7070 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7071 " image->colors=%d",(int) image->colors);
7073 if (image->colors == 0)
7074 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7075 " (zero means unknown)");
7077 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7078 " Regenerate the colormap");
7081 exception=(&image->exception);
7085 number_semitransparent = 0;
7086 number_transparent = 0;
7088 for (y=0; y < (ssize_t) image->rows; y++)
7090 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
7092 if (q == (PixelPacket *) NULL)
7095 for (x=0; x < (ssize_t) image->columns; x++)
7097 if (image->matte == MagickFalse || q->opacity == OpaqueOpacity)
7099 if (number_opaque < 259)
7101 if (number_opaque == 0)
7104 opaque[0].opacity=OpaqueOpacity;
7108 for (i=0; i< (ssize_t) number_opaque; i++)
7110 if (IsColorEqual(opaque+i, (PixelPacket *) q))
7114 if (i == (ssize_t) number_opaque &&
7115 number_opaque < 259)
7119 opaque[i].opacity = OpaqueOpacity;
7123 else if (q->opacity == TransparentOpacity)
7125 if (number_transparent < 259)
7127 if (number_transparent == 0)
7130 ping_trans_color.red=(unsigned short)(q->red);
7131 ping_trans_color.green=(unsigned short) (q->green);
7132 ping_trans_color.blue=(unsigned short) (q->blue);
7133 ping_trans_color.gray=(unsigned short) (q->blue);
7134 number_transparent = 1;
7137 for (i=0; i< (ssize_t) number_transparent; i++)
7139 if (IsColorEqual(transparent+i, (PixelPacket *) q))
7143 if (i == (ssize_t) number_transparent &&
7144 number_transparent < 259)
7146 number_transparent++;
7147 transparent[i] = *q;
7153 if (number_semitransparent < 259)
7155 if (number_semitransparent == 0)
7157 semitransparent[0]=*q;
7158 number_semitransparent = 1;
7161 for (i=0; i< (ssize_t) number_semitransparent; i++)
7163 if (IsColorEqual(semitransparent+i,
7164 (PixelPacket *) q) &&
7165 q->opacity == semitransparent[i].opacity)
7169 if (i == (ssize_t) number_semitransparent &&
7170 number_semitransparent < 259)
7172 number_semitransparent++;
7173 semitransparent[i] = *q;
7181 if (ping_exclude_bKGD == MagickFalse)
7183 /* Add the background color to the palette, if it
7184 * isn't already there.
7186 for (i=0; i<number_opaque; i++)
7188 if (IsColorEqual(opaque+i,
7189 &image->background_color))
7193 if (number_opaque < 259 && i == number_opaque)
7195 opaque[i]=image->background_color;
7196 opaque[i].opacity = OpaqueOpacity;
7201 image_colors=number_opaque+number_transparent+number_semitransparent;
7203 if (logging != MagickFalse)
7205 if (image_colors > 256)
7206 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7207 " image has more than 256 colors");
7210 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7211 " image has %d colors",image_colors);
7214 if (mng_info->write_png_colortype != 7) /* We won't need this info */
7216 ping_have_color=MagickFalse;
7217 ping_have_non_bw=MagickFalse;
7219 if(image_colors > 256)
7221 for (y=0; y < (ssize_t) image->rows; y++)
7223 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
7225 if (q == (PixelPacket *) NULL)
7228 /* Worst case is black-and-white; we are looking at every
7232 if (ping_have_color == MagickFalse)
7235 for (x=0; x < (ssize_t) image->columns; x++)
7237 if (s->red != s->green || s->red != s->blue)
7239 ping_have_color=MagickTrue;
7240 ping_have_non_bw=MagickTrue;
7247 if (ping_have_non_bw == MagickFalse)
7250 for (x=0; x < (ssize_t) image->columns; x++)
7252 if (s->red != 0 && s->red != QuantumRange)
7254 ping_have_non_bw=MagickTrue;
7263 if (image_colors < 257)
7269 * Initialize image colormap.
7272 if (logging != MagickFalse)
7273 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7274 " Sort the new colormap");
7276 /* Sort palette, transparent first */;
7280 for (i=0; i<number_transparent; i++)
7281 colormap[n++] = transparent[i];
7283 for (i=0; i<number_semitransparent; i++)
7284 colormap[n++] = semitransparent[i];
7286 for (i=0; i<number_opaque; i++)
7287 colormap[n++] = opaque[i];
7290 /* image_colors < 257; search the colormap instead of the pixels
7291 * to get ping_have_color and ping_have_non_bw
7295 if (ping_have_color == MagickFalse)
7297 if (colormap[i].red != colormap[i].green ||
7298 colormap[i].red != colormap[i].blue)
7300 ping_have_color=MagickTrue;
7301 ping_have_non_bw=MagickTrue;
7306 if (ping_have_non_bw == MagickFalse)
7308 if (colormap[i].red != 0 && colormap[i].red != QuantumRange)
7309 ping_have_non_bw=MagickTrue;
7313 if ((mng_info->ping_exclude_tRNS == MagickFalse ||
7314 (number_transparent == 0 && number_semitransparent == 0)) &&
7315 (((mng_info->write_png_colortype-1) ==
7316 PNG_COLOR_TYPE_PALETTE) ||
7317 (mng_info->write_png_colortype == 0)))
7319 if (logging != MagickFalse)
7321 if (n != (ssize_t) image_colors)
7322 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7323 " image_colors (%d) and n (%d) don't match",
7326 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7327 " AcquireImageColormap");
7330 image->colors = image_colors;
7332 if (AcquireImageColormap(image,image_colors) ==
7334 ThrowWriterException(ResourceLimitError,
7335 "MemoryAllocationFailed");
7337 for (i=0; i< (ssize_t) image_colors; i++)
7338 image->colormap[i] = colormap[i];
7340 if (logging != MagickFalse)
7342 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7343 " image->colors=%d (%d)",
7344 (int) image->colors, image_colors);
7346 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7347 " Update the pixel indexes");
7350 /* Sync the pixel indices with the new colormap */
7352 for (y=0; y < (ssize_t) image->rows; y++)
7354 q=GetAuthenticPixels(image,0,y,image->columns,1,
7357 if (q == (PixelPacket *) NULL)
7360 indexes=GetAuthenticIndexQueue(image);
7362 for (x=0; x < (ssize_t) image->columns; x++)
7364 for (i=0; i< (ssize_t) image_colors; i++)
7366 if ((image->matte == MagickFalse ||
7367 image->colormap[i].opacity == q->opacity) &&
7368 (IsColorEqual(&image->colormap[i],
7369 (PixelPacket *) q)))
7371 indexes[x]=(IndexPacket) i;
7378 if (SyncAuthenticPixels(image,exception) == MagickFalse)
7384 if (logging != MagickFalse)
7386 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7387 " image->colors=%d", (int) image->colors);
7389 if (image->colormap != NULL)
7391 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7392 " i (red,green,blue,opacity)");
7394 for (i=0; i < (ssize_t) image->colors; i++)
7396 if (i < 300 || i >= image->colors - 10)
7398 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7399 " %d (%d,%d,%d,%d)",
7401 (int) image->colormap[i].red,
7402 (int) image->colormap[i].green,
7403 (int) image->colormap[i].blue,
7404 (int) image->colormap[i].opacity);
7409 if (number_transparent < 257)
7410 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7411 " number_transparent = %d",
7412 number_transparent);
7415 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7416 " number_transparent > 256");
7418 if (number_opaque < 257)
7419 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7420 " number_opaque = %d",
7424 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7425 " number_opaque > 256");
7427 if (number_semitransparent < 257)
7428 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7429 " number_semitransparent = %d",
7430 number_semitransparent);
7433 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7434 " number_semitransparent > 256");
7436 if (ping_have_non_bw == MagickFalse)
7437 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7438 " All pixels and the background are black or white");
7440 else if (ping_have_color == MagickFalse)
7441 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7442 " All pixels and the background are gray");
7445 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7446 " At least one pixel or the background is non-gray");
7448 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7449 " Exit BUILD_PALETTE:");
7452 if (mng_info->write_png8 == MagickFalse)
7455 /* Make any reductions necessary for the PNG8 format */
7456 if (image_colors <= 256 &&
7457 image_colors != 0 && image->colormap != NULL &&
7458 number_semitransparent == 0 &&
7459 number_transparent <= 1)
7462 /* PNG8 can't have semitransparent colors so we threshold the
7463 * opacity to 0 or OpaqueOpacity
7465 if (number_semitransparent != 0)
7467 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7468 " Thresholding the alpha channel to binary");
7470 for (y=0; y < (ssize_t) image->rows; y++)
7472 r=GetAuthenticPixels(image,0,y,image->columns,1,
7475 if (r == (PixelPacket *) NULL)
7478 for (x=0; x < (ssize_t) image->columns; x++)
7480 r->opacity = r->opacity > OpaqueOpacity/2 ? 0 :
7485 if (SyncAuthenticPixels(image,exception) == MagickFalse)
7488 if (image_colors != 0 && image_colors <= 256 &&
7489 image->colormap != NULL)
7490 for (i=0; i<image_colors; i++)
7491 image->colormap[i].opacity =
7492 image->colormap[i].opacity > OpaqueOpacity/2 ? 0 :
7498 /* PNG8 can't have more than 256 colors so we quantize the pixels and
7499 * background color to the 3-3-2 palette.
7502 if (image_colors == 0 || image_colors > 256)
7504 if (logging != MagickFalse)
7505 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7506 " Quantizing the background color to 3-3-2");
7508 image->background_color.red=
7510 image->background_color.red) >> PNGK) & 0xe0) ) |
7512 image->background_color.red) >> PNGK) & 0xe0) >> 3) |
7514 image->background_color.red) >> PNGK) & 0xc0) >> 6)) * PNGM;
7515 image->background_color.green=
7517 image->background_color.green) >> PNGK) & 0xe0) ) |
7519 image->background_color.green) >> PNGK) & 0xe0) >> 3) |
7521 image->background_color.green) >> PNGK) & 0xc0) >> 6)) * PNGM;
7522 image->background_color.blue=
7524 image->background_color.blue) >> PNGK) & 0xc0) ) |
7526 image->background_color.blue) >> PNGK) & 0xc0) >> 2) |
7528 image->background_color.blue) >> PNGK) & 0xc0) >> 4) |
7530 image->background_color.blue) >> PNGK) & 0xc0) >> 6)) * PNGM;
7532 if (logging != MagickFalse)
7533 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7534 " Quantizing the pixel colors to 3-3-2");
7536 if (image->colormap == NULL)
7538 for (y=0; y < (ssize_t) image->rows; y++)
7540 r=GetAuthenticPixels(image,0,y,image->columns,1,
7543 if (r == (PixelPacket *) NULL)
7546 for (x=0; x < (ssize_t) image->columns; x++)
7549 ((((((size_t) r->red) >> PNGK) & 0xe0) ) |
7550 (((((size_t) r->red) >> PNGK) & 0xe0) >> 3) |
7551 (((((size_t) r->red) >> PNGK) & 0xc0) >> 6)) * PNGM;
7553 ((((((size_t) r->green) >> PNGK) & 0xe0) ) |
7554 (((((size_t) r->green) >> PNGK) & 0xe0) >> 3) |
7555 (((((size_t) r->green) >> PNGK) & 0xc0) >> 6)) * PNGM;
7557 ((((((size_t) r->blue) >> PNGK) & 0xc0) ) |
7558 (((((size_t) r->blue) >> PNGK) & 0xc0) >> 2) |
7559 (((((size_t) r->blue) >> PNGK) & 0xc0) >> 4) |
7560 (((((size_t) r->blue) >> PNGK) & 0xc0) >> 6)) * PNGM;
7564 if (SyncAuthenticPixels(image,exception) == MagickFalse)
7569 else /* Should not reach this; colormap already exists and
7572 if (logging != MagickFalse)
7573 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7574 " Quantizing the colormap to 3-3-2");
7575 for (i=0; i<image_colors; i++)
7577 image->colormap[i].red=
7579 image->colormap[i].red) >> PNGK) & 0xe0) ) |
7581 image->colormap[i].red) >> PNGK) & 0xe0) >> 3) |
7583 image->colormap[i].red) >> PNGK) & 0xc0) >> 6)) * PNGM;
7584 image->colormap[i].green=
7586 image->colormap[i].green) >> PNGK) & 0xe0) ) |
7588 image->colormap[i].green) >> PNGK) & 0xe0) >> 3) |
7590 image->colormap[i].green) >> PNGK) & 0xc0) >> 6)) * PNGM;
7591 image->colormap[i].blue=
7593 image->colormap[i].blue) >> PNGK) & 0xc0) ) |
7595 image->colormap[i].blue) >> PNGK) & 0xc0) >> 2) |
7597 image->colormap[i].blue) >> PNGK) & 0xc0) >> 4) |
7599 image->colormap[i].blue) >> PNGK) & 0xc0) >> 6)) * PNGM;
7606 /* END OF BUILD_PALETTE */
7608 /* If we are excluding the tRNS chunk and there is transparency,
7609 * then we must write a Gray-Alpha (color-type 4) or RGBA (color-type 6)
7612 if (mng_info->ping_exclude_tRNS != MagickFalse &&
7613 (number_transparent != 0 || number_semitransparent != 0))
7615 int colortype=mng_info->write_png_colortype;
7617 if (ping_have_color == MagickFalse)
7618 mng_info->write_png_colortype = 5;
7621 mng_info->write_png_colortype = 7;
7623 if (colortype != 0 &&
7624 mng_info->write_png_colortype != (ssize_t) colortype)
7625 ping_need_colortype_warning=MagickTrue;
7629 /* See if cheap transparency is possible. It is only possible
7630 * when there is a single transparent color, no semitransparent
7631 * color, and no opaque color that has the same RGB components
7632 * as the transparent color. We only need this information if
7633 * we are writing a PNG with colortype 0 or 2, and we have not
7634 * excluded the tRNS chunk.
7636 if (number_transparent == 1 &&
7637 mng_info->write_png_colortype < 4)
7639 ping_have_cheap_transparency = MagickTrue;
7641 if (number_semitransparent != 0)
7642 ping_have_cheap_transparency = MagickFalse;
7644 else if (image_colors == 0 || image_colors > 256 ||
7645 image->colormap == NULL)
7650 register const PixelPacket
7653 exception=(&image->exception);
7655 for (y=0; y < (ssize_t) image->rows; y++)
7657 q=GetVirtualPixels(image,0,y,image->columns,1, exception);
7659 if (q == (PixelPacket *) NULL)
7662 for (x=0; x < (ssize_t) image->columns; x++)
7664 if (q->opacity != TransparentOpacity &&
7665 (unsigned short) q->red == ping_trans_color.red &&
7666 (unsigned short) q->green == ping_trans_color.green &&
7667 (unsigned short) q->blue == ping_trans_color.blue)
7669 ping_have_cheap_transparency = MagickFalse;
7676 if (ping_have_cheap_transparency == MagickFalse)
7682 /* Assuming that image->colormap[0] is the one transparent color
7683 * and that all others are opaque.
7685 if (image_colors > 1)
7686 for (i=1; i<image_colors; i++)
7687 if (image->colormap[i].red == image->colormap[0].red &&
7688 image->colormap[i].green == image->colormap[0].green &&
7689 image->colormap[i].blue == image->colormap[0].blue)
7691 ping_have_cheap_transparency = MagickFalse;
7696 if (logging != MagickFalse)
7698 if (ping_have_cheap_transparency == MagickFalse)
7699 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7700 " Cheap transparency is not possible.");
7703 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7704 " Cheap transparency is possible.");
7708 ping_have_cheap_transparency = MagickFalse;
7710 image_depth=image->depth;
7712 quantum_info = (QuantumInfo *) NULL;
7714 image_colors=(int) image->colors;
7715 image_matte=image->matte;
7717 mng_info->IsPalette=image->storage_class == PseudoClass &&
7718 image_colors <= 256 && image->colormap != NULL;
7720 if ((mng_info->write_png_colortype == 4 || mng_info->write_png8) &&
7721 (image->colors == 0 || image->colormap == NULL))
7723 image_info=DestroyImageInfo(image_info);
7724 image=DestroyImage(image);
7725 (void) ThrowMagickException(&IMimage->exception,
7726 GetMagickModule(),CoderError,
7727 "Cannot write PNG8 or color-type 3; colormap is NULL",
7728 "`%s'",IMimage->filename);
7729 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
7730 UnlockSemaphoreInfo(ping_semaphore);
7732 return(MagickFalse);
7736 Allocate the PNG structures
7738 #ifdef PNG_USER_MEM_SUPPORTED
7739 ping=png_create_write_struct_2(PNG_LIBPNG_VER_STRING,image,
7740 MagickPNGErrorHandler,MagickPNGWarningHandler,(void *) NULL,
7741 (png_malloc_ptr) Magick_png_malloc,(png_free_ptr) Magick_png_free);
7744 ping=png_create_write_struct(PNG_LIBPNG_VER_STRING,image,
7745 MagickPNGErrorHandler,MagickPNGWarningHandler);
7748 if (ping == (png_struct *) NULL)
7749 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
7751 ping_info=png_create_info_struct(ping);
7753 if (ping_info == (png_info *) NULL)
7755 png_destroy_write_struct(&ping,(png_info **) NULL);
7756 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
7759 png_set_write_fn(ping,image,png_put_data,png_flush_data);
7760 ping_pixels=(unsigned char *) NULL;
7762 if (setjmp(png_jmpbuf(ping)))
7768 if (image_info->verbose)
7769 (void) printf("PNG write has failed.\n");
7771 png_destroy_write_struct(&ping,&ping_info);
7772 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
7773 UnlockSemaphoreInfo(ping_semaphore);
7775 if (ping_have_blob != MagickFalse)
7776 (void) CloseBlob(image);
7777 image_info=DestroyImageInfo(image_info);
7778 image=DestroyImage(image);
7779 return(MagickFalse);
7782 Prepare PNG for writing.
7784 #if defined(PNG_MNG_FEATURES_SUPPORTED)
7785 if (mng_info->write_mng)
7786 (void) png_permit_mng_features(ping,PNG_ALL_MNG_FEATURES);
7789 # ifdef PNG_WRITE_EMPTY_PLTE_SUPPORTED
7790 if (mng_info->write_mng)
7791 png_permit_empty_plte(ping,MagickTrue);
7798 ping_width=(png_uint_32) image->columns;
7799 ping_height=(png_uint_32) image->rows;
7801 if (mng_info->write_png8 || mng_info->write_png24 || mng_info->write_png32)
7804 if (mng_info->write_png_depth != 0)
7805 image_depth=mng_info->write_png_depth;
7807 /* Adjust requested depth to next higher valid depth if necessary */
7808 if (image_depth > 8)
7811 if ((image_depth > 4) && (image_depth < 8))
7814 if (image_depth == 3)
7817 if (logging != MagickFalse)
7819 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7820 " width=%.20g",(double) ping_width);
7821 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7822 " height=%.20g",(double) ping_height);
7823 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7824 " image_matte=%.20g",(double) image->matte);
7825 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7826 " image->depth=%.20g",(double) image->depth);
7827 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7828 " Tentative ping_bit_depth=%.20g",(double) image_depth);
7831 save_image_depth=image_depth;
7832 ping_bit_depth=(png_byte) save_image_depth;
7835 #if defined(PNG_pHYs_SUPPORTED)
7836 if (ping_exclude_pHYs == MagickFalse)
7838 if ((image->x_resolution != 0) && (image->y_resolution != 0) &&
7839 (!mng_info->write_mng || !mng_info->equal_physs))
7841 if (logging != MagickFalse)
7842 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7843 " Setting up pHYs chunk");
7845 if (image->units == PixelsPerInchResolution)
7847 ping_pHYs_unit_type=PNG_RESOLUTION_METER;
7848 ping_pHYs_x_resolution=(png_uint_32) (100.0*image->x_resolution/2.54);
7849 ping_pHYs_y_resolution=(png_uint_32) (100.0*image->y_resolution/2.54);
7852 else if (image->units == PixelsPerCentimeterResolution)
7854 ping_pHYs_unit_type=PNG_RESOLUTION_METER;
7855 ping_pHYs_x_resolution=(png_uint_32) (100.0*image->x_resolution);
7856 ping_pHYs_y_resolution=(png_uint_32) (100.0*image->y_resolution);
7861 ping_pHYs_unit_type=PNG_RESOLUTION_UNKNOWN;
7862 ping_pHYs_x_resolution=(png_uint_32) image->x_resolution;
7863 ping_pHYs_y_resolution=(png_uint_32) image->y_resolution;
7866 ping_have_pHYs = MagickTrue;
7871 if (ping_exclude_bKGD == MagickFalse)
7873 if ((!mng_info->adjoin || !mng_info->equal_backgrounds))
7879 if (ping_bit_depth == 8)
7882 if (ping_bit_depth == 4)
7885 if (ping_bit_depth == 2)
7888 if (ping_bit_depth == 1)
7891 ping_background.red=(png_uint_16)
7892 (ScaleQuantumToShort(image->background_color.red) & mask);
7894 ping_background.green=(png_uint_16)
7895 (ScaleQuantumToShort(image->background_color.green) & mask);
7897 ping_background.blue=(png_uint_16)
7898 (ScaleQuantumToShort(image->background_color.blue) & mask);
7901 if (logging != MagickFalse)
7903 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7904 " Setting up bKGD chunk (1)");
7906 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7907 " ping_bit_depth=%d",ping_bit_depth);
7910 ping_have_bKGD = MagickTrue;
7914 Select the color type.
7919 if (mng_info->IsPalette && mng_info->write_png8)
7922 /* To do: make this a function cause it's used twice, except
7923 for reducing the sample depth from 8. */
7925 number_colors=image_colors;
7927 ping_have_tRNS=MagickFalse;
7932 ping_color_type=(png_byte) PNG_COLOR_TYPE_PALETTE;
7934 if (logging != MagickFalse)
7935 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7936 " Setting up PLTE chunk with %d colors (%d)",
7937 number_colors, image_colors);
7939 for (i=0; i < (ssize_t) number_colors; i++)
7941 palette[i].red=ScaleQuantumToChar(image->colormap[i].red);
7942 palette[i].green=ScaleQuantumToChar(image->colormap[i].green);
7943 palette[i].blue=ScaleQuantumToChar(image->colormap[i].blue);
7944 if (logging != MagickFalse)
7945 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
7946 #if MAGICKCORE_QUANTUM_DEPTH == 8
7947 " %3ld (%3d,%3d,%3d)",
7949 " %5ld (%5d,%5d,%5d)",
7951 (long) i,palette[i].red,palette[i].green,palette[i].blue);
7955 ping_have_PLTE=MagickTrue;
7956 image_depth=ping_bit_depth;
7959 if (matte != MagickFalse)
7962 Identify which colormap entry is transparent.
7964 assert(number_colors <= 256);
7965 assert(image->colormap != NULL);
7967 for (i=0; i < (ssize_t) number_transparent; i++)
7968 ping_trans_alpha[i]=0;
7971 ping_num_trans=(unsigned short) (number_transparent +
7972 number_semitransparent);
7974 if (ping_num_trans == 0)
7975 ping_have_tRNS=MagickFalse;
7978 ping_have_tRNS=MagickTrue;
7981 if (ping_exclude_bKGD == MagickFalse)
7984 * Identify which colormap entry is the background color.
7987 for (i=0; i < (ssize_t) MagickMax(1L*number_colors-1L,1L); i++)
7988 if (IsPNGColorEqual(ping_background,image->colormap[i]))
7991 ping_background.index=(png_byte) i;
7993 } /* end of write_png8 */
7995 else if (mng_info->write_png24)
7997 image_matte=MagickFalse;
7998 ping_color_type=(png_byte) PNG_COLOR_TYPE_RGB;
8001 else if (mng_info->write_png32)
8003 image_matte=MagickTrue;
8004 ping_color_type=(png_byte) PNG_COLOR_TYPE_RGB_ALPHA;
8007 else /* mng_info->write_pngNN not specified */
8009 image_depth=ping_bit_depth;
8011 if (mng_info->write_png_colortype != 0)
8013 ping_color_type=(png_byte) mng_info->write_png_colortype-1;
8015 if (ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA ||
8016 ping_color_type == PNG_COLOR_TYPE_RGB_ALPHA)
8017 image_matte=MagickTrue;
8020 image_matte=MagickFalse;
8023 else /* write_ping_colortype not specified */
8025 if (logging != MagickFalse)
8026 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8027 " Selecting PNG colortype:");
8029 ping_color_type=(png_byte) ((matte != MagickFalse)?
8030 PNG_COLOR_TYPE_RGB_ALPHA:PNG_COLOR_TYPE_RGB);
8032 if (image_info->type == TrueColorType)
8034 ping_color_type=(png_byte) PNG_COLOR_TYPE_RGB;
8035 image_matte=MagickFalse;
8038 if (image_info->type == TrueColorMatteType)
8040 ping_color_type=(png_byte) PNG_COLOR_TYPE_RGB_ALPHA;
8041 image_matte=MagickTrue;
8044 if (image_info->type == PaletteType ||
8045 image_info->type == PaletteMatteType)
8046 ping_color_type=(png_byte) PNG_COLOR_TYPE_PALETTE;
8048 if (image_info->type == UndefinedType ||
8049 image_info->type == OptimizeType)
8051 if (ping_have_color == MagickFalse)
8053 if (image_matte == MagickFalse)
8055 ping_color_type=(png_byte) PNG_COLOR_TYPE_GRAY;
8056 image_matte=MagickFalse;
8061 ping_color_type=(png_byte) PNG_COLOR_TYPE_GRAY_ALPHA;
8062 image_matte=MagickTrue;
8067 if (image_matte == MagickFalse)
8069 ping_color_type=(png_byte) PNG_COLOR_TYPE_RGB;
8070 image_matte=MagickFalse;
8075 ping_color_type=(png_byte) PNG_COLOR_TYPE_RGBA;
8076 image_matte=MagickTrue;
8083 if (logging != MagickFalse)
8084 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8085 " Selected PNG colortype=%d",ping_color_type);
8087 if (ping_bit_depth < 8)
8089 if (ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA ||
8090 ping_color_type == PNG_COLOR_TYPE_RGB ||
8091 ping_color_type == PNG_COLOR_TYPE_RGB_ALPHA)
8095 old_bit_depth=ping_bit_depth;
8097 if (ping_color_type == PNG_COLOR_TYPE_GRAY)
8099 if (image->matte == MagickFalse && ping_have_non_bw == MagickFalse)
8103 if (ping_color_type == PNG_COLOR_TYPE_PALETTE)
8108 if (image->colors == 0)
8111 (void) ThrowMagickException(&image->exception,
8112 GetMagickModule(),CoderError,
8113 "image has 0 colors", "`%s'","");
8116 while ((int) (one << ping_bit_depth) < (ssize_t) image_colors)
8117 ping_bit_depth <<= 1;
8120 if (logging != MagickFalse)
8122 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8123 " Number of colors: %.20g",(double) image_colors);
8125 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8126 " Tentative PNG bit depth: %d",ping_bit_depth);
8129 if (ping_bit_depth < (int) mng_info->write_png_depth)
8130 ping_bit_depth = mng_info->write_png_depth;
8133 image_depth=ping_bit_depth;
8135 if (logging != MagickFalse)
8137 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8138 " Tentative PNG color type: %.20g",(double) ping_color_type);
8140 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8141 " image_info->type: %.20g",(double) image_info->type);
8143 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8144 " image_depth: %.20g",(double) image_depth);
8146 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8148 " image->depth: %.20g",(double) image->depth);
8150 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8151 " ping_bit_depth: %.20g",(double) ping_bit_depth);
8154 if (matte != MagickFalse)
8156 if (mng_info->IsPalette)
8158 ping_color_type=PNG_COLOR_TYPE_GRAY_ALPHA;
8160 if (ping_have_color != MagickFalse)
8161 ping_color_type=PNG_COLOR_TYPE_RGBA;
8164 * Determine if there is any transparent color.
8166 if (number_transparent + number_semitransparent == 0)
8169 No transparent pixels are present. Change 4 or 6 to 0 or 2.
8172 image_matte=MagickFalse;
8173 ping_color_type&=0x03;
8183 if (ping_bit_depth == 8)
8186 if (ping_bit_depth == 4)
8189 if (ping_bit_depth == 2)
8192 if (ping_bit_depth == 1)
8195 ping_trans_color.red=(png_uint_16)
8196 (ScaleQuantumToShort(image->colormap[0].red) & mask);
8198 ping_trans_color.green=(png_uint_16)
8199 (ScaleQuantumToShort(image->colormap[0].green) & mask);
8201 ping_trans_color.blue=(png_uint_16)
8202 (ScaleQuantumToShort(image->colormap[0].blue) & mask);
8204 ping_trans_color.gray=(png_uint_16)
8205 (ScaleQuantumToShort(PixelIntensityToQuantum(
8206 image->colormap)) & mask);
8208 ping_trans_color.index=(png_byte) 0;
8210 ping_have_tRNS=MagickTrue;
8213 if (ping_have_tRNS != MagickFalse)
8216 * Determine if there is one and only one transparent color
8217 * and if so if it is fully transparent.
8219 if (ping_have_cheap_transparency == MagickFalse)
8220 ping_have_tRNS=MagickFalse;
8223 if (ping_have_tRNS != MagickFalse)
8225 ping_color_type &= 0x03; /* changes 4 or 6 to 0 or 2 */
8227 if (image_depth == 8)
8229 ping_trans_color.red&=0xff;
8230 ping_trans_color.green&=0xff;
8231 ping_trans_color.blue&=0xff;
8232 ping_trans_color.gray&=0xff;
8238 if (image_depth == 8)
8240 ping_trans_color.red&=0xff;
8241 ping_trans_color.green&=0xff;
8242 ping_trans_color.blue&=0xff;
8243 ping_trans_color.gray&=0xff;
8250 if (ping_have_tRNS != MagickFalse)
8251 image_matte=MagickFalse;
8253 if ((mng_info->IsPalette) &&
8254 mng_info->write_png_colortype-1 != PNG_COLOR_TYPE_PALETTE &&
8255 ping_have_color == MagickFalse &&
8256 (image_matte == MagickFalse || image_depth >= 8))
8260 if (image_matte != MagickFalse)
8261 ping_color_type=PNG_COLOR_TYPE_GRAY_ALPHA;
8265 ping_color_type=PNG_COLOR_TYPE_GRAY;
8267 if (save_image_depth == 16 && image_depth == 8)
8269 if (logging != MagickFalse)
8271 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8272 " Scaling ping_trans_color (0)");
8274 ping_trans_color.gray*=0x0101;
8278 if (image_depth > MAGICKCORE_QUANTUM_DEPTH)
8279 image_depth=MAGICKCORE_QUANTUM_DEPTH;
8281 if (image_colors == 0 || image_colors-1 > MaxColormapSize)
8282 image_colors=(int) (one << image_depth);
8284 if (image_depth > 8)
8290 if ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE)
8292 if(!mng_info->write_png_depth)
8296 while ((int) (one << ping_bit_depth)
8297 < (ssize_t) image_colors)
8298 ping_bit_depth <<= 1;
8302 #if 1 /* To do: Enable this when low bit-depth grayscale is working */
8303 else if (ping_color_type ==
8304 PNG_COLOR_TYPE_GRAY && image_colors < 17 &&
8305 mng_info->IsPalette)
8308 /* Check if grayscale is reducible */
8310 depth_4_ok=MagickTrue,
8311 depth_2_ok=MagickTrue,
8312 depth_1_ok=MagickTrue;
8314 for (i=0; i < (ssize_t) image_colors; i++)
8319 intensity=ScaleQuantumToChar(image->colormap[i].red);
8321 if ((intensity & 0x0f) != ((intensity & 0xf0) >> 4))
8322 depth_4_ok=depth_2_ok=depth_1_ok=MagickFalse;
8324 else if ((intensity & 0x03) != ((intensity & 0x0c) >> 2))
8325 depth_2_ok=depth_1_ok=MagickFalse;
8327 else if ((intensity & 0x01) != ((intensity & 0x02) >> 1))
8328 depth_1_ok=MagickFalse;
8331 if (depth_1_ok && mng_info->write_png_depth <= 1)
8334 #if 0 /* To do: Enable this when bit depths 2 and 4 are working. */
8335 else if (depth_2_ok && mng_info->write_png_depth <= 2)
8338 else if (depth_4_ok && mng_info->write_png_depth <= 4)
8345 image_depth=ping_bit_depth;
8350 if (mng_info->IsPalette)
8352 number_colors=image_colors;
8354 if (image_depth <= 8)
8359 ping_color_type=(png_byte) PNG_COLOR_TYPE_PALETTE;
8361 if (mng_info->have_write_global_plte && matte == MagickFalse)
8363 png_set_PLTE(ping,ping_info,NULL,0);
8365 if (logging != MagickFalse)
8366 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8367 " Setting up empty PLTE chunk");
8372 for (i=0; i < (ssize_t) number_colors; i++)
8374 palette[i].red=ScaleQuantumToChar(image->colormap[i].red);
8375 palette[i].green=ScaleQuantumToChar(image->colormap[i].green);
8376 palette[i].blue=ScaleQuantumToChar(image->colormap[i].blue);
8379 if (logging != MagickFalse)
8380 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8381 " Setting up PLTE chunk with %d colors",
8384 ping_have_PLTE=MagickTrue;
8387 /* color_type is PNG_COLOR_TYPE_PALETTE */
8388 if (mng_info->write_png_depth == 0)
8396 while ((one << ping_bit_depth) < number_colors)
8397 ping_bit_depth <<= 1;
8402 if (matte != MagickFalse)
8405 * Set up trans_colors array.
8407 assert(number_colors <= 256);
8409 ping_num_trans=(unsigned short) (number_transparent +
8410 number_semitransparent);
8412 if (ping_num_trans == 0)
8413 ping_have_tRNS=MagickFalse;
8417 if (logging != MagickFalse)
8419 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8420 " Scaling ping_trans_color (1)");
8422 ping_have_tRNS=MagickTrue;
8424 for (i=0; i < ping_num_trans; i++)
8426 ping_trans_alpha[i]= (png_byte) (255-
8427 ScaleQuantumToChar(image->colormap[i].opacity));
8437 if (image_depth < 8)
8440 if ((save_image_depth == 16) && (image_depth == 8))
8442 if (logging != MagickFalse)
8444 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8445 " Scaling ping_trans_color from (%d,%d,%d)",
8446 (int) ping_trans_color.red,
8447 (int) ping_trans_color.green,
8448 (int) ping_trans_color.blue);
8451 ping_trans_color.red*=0x0101;
8452 ping_trans_color.green*=0x0101;
8453 ping_trans_color.blue*=0x0101;
8454 ping_trans_color.gray*=0x0101;
8456 if (logging != MagickFalse)
8458 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8460 (int) ping_trans_color.red,
8461 (int) ping_trans_color.green,
8462 (int) ping_trans_color.blue);
8467 if (ping_bit_depth < (ssize_t) mng_info->write_png_depth)
8468 ping_bit_depth = (ssize_t) mng_info->write_png_depth;
8471 Adjust background and transparency samples in sub-8-bit grayscale files.
8473 if (ping_bit_depth < 8 && ping_color_type ==
8474 PNG_COLOR_TYPE_GRAY)
8482 maxval=(png_uint_16) ((one << ping_bit_depth)-1);
8484 if (ping_exclude_bKGD == MagickFalse)
8487 ping_background.gray=(png_uint_16)
8488 (QuantumScale*(maxval*(PixelIntensity(&image->background_color))));
8490 if (logging != MagickFalse)
8491 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8492 " Setting up bKGD chunk (2)");
8494 ping_have_bKGD = MagickTrue;
8497 ping_trans_color.gray=(png_uint_16) (QuantumScale*(maxval*
8498 ping_trans_color.gray));
8501 if (ping_exclude_bKGD == MagickFalse)
8503 if (mng_info->IsPalette && (int) ping_color_type == PNG_COLOR_TYPE_PALETTE)
8506 Identify which colormap entry is the background color.
8509 number_colors=image_colors;
8511 for (i=0; i < (ssize_t) MagickMax(1L*number_colors,1L); i++)
8512 if (IsPNGColorEqual(image->background_color,image->colormap[i]))
8515 ping_background.index=(png_byte) i;
8517 if (logging != MagickFalse)
8519 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8520 " Setting up bKGD chunk with index=%d",(int) i);
8523 if (i < (ssize_t) number_colors)
8525 ping_have_bKGD = MagickTrue;
8527 if (logging != MagickFalse)
8529 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8530 " background =(%d,%d,%d)",
8531 (int) ping_background.red,
8532 (int) ping_background.green,
8533 (int) ping_background.blue);
8537 else /* Can't happen */
8539 if (logging != MagickFalse)
8540 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8541 " No room in PLTE to add bKGD color");
8542 ping_have_bKGD = MagickFalse;
8547 if (logging != MagickFalse)
8548 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8549 " PNG color type: %d",ping_color_type);
8551 Initialize compression level and filtering.
8553 if (logging != MagickFalse)
8555 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8556 " Setting up deflate compression");
8558 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8559 " Compression buffer size: 32768");
8562 png_set_compression_buffer_size(ping,32768L);
8564 if (logging != MagickFalse)
8565 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8566 " Compression mem level: 9");
8568 png_set_compression_mem_level(ping, 9);
8570 quality=image->quality == UndefinedCompressionQuality ? 75UL :
8578 level=(int) MagickMin((ssize_t) quality/10,9);
8580 if (logging != MagickFalse)
8581 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8582 " Compression level: %d",level);
8584 png_set_compression_level(ping,level);
8589 if (logging != MagickFalse)
8590 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8591 " Compression strategy: Z_HUFFMAN_ONLY");
8593 png_set_compression_strategy(ping, Z_HUFFMAN_ONLY);
8596 if (logging != MagickFalse)
8597 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8598 " Setting up filtering");
8600 #if defined(PNG_MNG_FEATURES_SUPPORTED) && defined(PNG_INTRAPIXEL_DIFFERENCING)
8601 /* This became available in libpng-1.0.9. Output must be a MNG. */
8602 if (mng_info->write_mng && ((quality % 10) == 7))
8604 if (logging != MagickFalse)
8605 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8606 " Filter_type: PNG_INTRAPIXEL_DIFFERENCING");
8608 ping_filter_method=PNG_INTRAPIXEL_DIFFERENCING;
8612 if (logging != MagickFalse)
8613 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8621 if ((quality % 10) > 5)
8622 base_filter=PNG_ALL_FILTERS;
8625 if ((quality % 10) != 5)
8626 base_filter=(int) quality % 10;
8629 if (((int) ping_color_type == PNG_COLOR_TYPE_GRAY) ||
8630 ((int) ping_color_type == PNG_COLOR_TYPE_PALETTE) ||
8632 base_filter=PNG_NO_FILTERS;
8635 base_filter=PNG_ALL_FILTERS;
8637 if (logging != MagickFalse)
8639 if (base_filter == PNG_ALL_FILTERS)
8640 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8641 " Base filter method: ADAPTIVE");
8643 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8644 " Base filter method: NONE");
8647 png_set_filter(ping,PNG_FILTER_TYPE_BASE,base_filter);
8650 if (ping_exclude_iCCP == MagickFalse || ping_exclude_zCCP == MagickFalse)
8652 ResetImageProfileIterator(image);
8653 for (name=GetNextImageProfile(image); name != (const char *) NULL; )
8655 profile=GetImageProfile(image,name);
8657 if (profile != (StringInfo *) NULL)
8659 #ifdef PNG_WRITE_iCCP_SUPPORTED
8660 if ((LocaleCompare(name,"ICC") == 0) ||
8661 (LocaleCompare(name,"ICM") == 0))
8664 if (ping_exclude_iCCP == MagickFalse)
8666 png_set_iCCP(ping,ping_info,(const png_charp) name,0,
8667 #if (PNG_LIBPNG_VER < 10500)
8668 (png_charp) GetStringInfoDatum(profile),
8670 (png_const_bytep) GetStringInfoDatum(profile),
8672 (png_uint_32) GetStringInfoLength(profile));
8678 if (ping_exclude_zCCP == MagickFalse)
8680 Magick_png_write_raw_profile(image_info,ping,ping_info,
8681 (unsigned char *) name,(unsigned char *) name,
8682 GetStringInfoDatum(profile),
8683 (png_uint_32) GetStringInfoLength(profile));
8687 if (logging != MagickFalse)
8688 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8689 " Setting up text chunk with %s profile",name);
8691 name=GetNextImageProfile(image);
8695 #if defined(PNG_WRITE_sRGB_SUPPORTED)
8696 if ((mng_info->have_write_global_srgb == 0) &&
8697 ((image->rendering_intent != UndefinedIntent) ||
8698 (image->colorspace == sRGBColorspace)))
8700 if (ping_exclude_sRGB == MagickFalse)
8703 Note image rendering intent.
8705 if (logging != MagickFalse)
8706 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8707 " Setting up sRGB chunk");
8709 (void) png_set_sRGB(ping,ping_info,(
8710 Magick_RenderingIntent_to_PNG_RenderingIntent(
8711 image->rendering_intent)));
8713 if (ping_exclude_gAMA == MagickFalse)
8714 png_set_gAMA(ping,ping_info,0.45455);
8718 if ((!mng_info->write_mng) || (!png_get_valid(ping,ping_info,PNG_INFO_sRGB)))
8721 if (ping_exclude_gAMA == MagickFalse &&
8722 (ping_exclude_sRGB == MagickFalse ||
8723 (image->gamma < .45 || image->gamma > .46)))
8725 if ((mng_info->have_write_global_gama == 0) && (image->gamma != 0.0))
8729 To do: check for cHRM+gAMA == sRGB, and write sRGB instead.
8731 if (logging != MagickFalse)
8732 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8733 " Setting up gAMA chunk");
8735 png_set_gAMA(ping,ping_info,image->gamma);
8739 if (ping_exclude_cHRM == MagickFalse)
8741 if ((mng_info->have_write_global_chrm == 0) &&
8742 (image->chromaticity.red_primary.x != 0.0))
8745 Note image chromaticity.
8746 To do: check for cHRM+gAMA == sRGB, and write sRGB instead.
8754 wp=image->chromaticity.white_point;
8755 rp=image->chromaticity.red_primary;
8756 gp=image->chromaticity.green_primary;
8757 bp=image->chromaticity.blue_primary;
8759 if (logging != MagickFalse)
8760 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8761 " Setting up cHRM chunk");
8763 png_set_cHRM(ping,ping_info,wp.x,wp.y,rp.x,rp.y,gp.x,gp.y,
8769 ping_interlace_method=image_info->interlace != NoInterlace;
8771 if (mng_info->write_mng)
8772 png_set_sig_bytes(ping,8);
8774 /* Bail out if cannot meet defined PNG:bit-depth or PNG:color-type */
8776 if (mng_info->write_png_colortype != 0)
8778 if (mng_info->write_png_colortype-1 == PNG_COLOR_TYPE_GRAY)
8779 if (ping_have_color != MagickFalse)
8781 ping_color_type = PNG_COLOR_TYPE_RGB;
8783 if (ping_bit_depth < 8)
8787 if (mng_info->write_png_colortype-1 == PNG_COLOR_TYPE_GRAY_ALPHA)
8788 if (ping_have_color != MagickFalse)
8789 ping_color_type = PNG_COLOR_TYPE_RGB_ALPHA;
8792 if (ping_need_colortype_warning != MagickFalse ||
8793 ((mng_info->write_png_depth &&
8794 (int) mng_info->write_png_depth != ping_bit_depth) ||
8795 (mng_info->write_png_colortype &&
8796 ((int) mng_info->write_png_colortype-1 != ping_color_type &&
8797 mng_info->write_png_colortype != 7 &&
8798 !(mng_info->write_png_colortype == 5 && ping_color_type == 0)))))
8800 if (logging != MagickFalse)
8802 if (ping_need_colortype_warning != MagickFalse)
8804 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8805 " Image has transparency but tRNS chunk was excluded");
8808 if (mng_info->write_png_depth)
8810 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8811 " Defined PNG:bit-depth=%u, Computed depth=%u",
8812 mng_info->write_png_depth,
8816 if (mng_info->write_png_colortype)
8818 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8819 " Defined PNG:color-type=%u, Computed color type=%u",
8820 mng_info->write_png_colortype-1,
8826 "Cannot write image with defined PNG:bit-depth or PNG:color-type.");
8829 if (image_matte != MagickFalse && image->matte == MagickFalse)
8831 /* Add an opaque matte channel */
8832 image->matte = MagickTrue;
8833 (void) SetImageOpacity(image,0);
8835 if (logging != MagickFalse)
8836 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8837 " Added an opaque matte channel");
8840 if (number_transparent != 0 || number_semitransparent != 0)
8842 if (ping_color_type < 4)
8844 ping_have_tRNS=MagickTrue;
8845 if (logging != MagickFalse)
8846 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8847 " Setting ping_have_tRNS=MagickTrue.");
8851 if (logging != MagickFalse)
8852 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8853 " Writing PNG header chunks");
8855 png_set_IHDR(ping,ping_info,ping_width,ping_height,
8856 ping_bit_depth,ping_color_type,
8857 ping_interlace_method,ping_compression_method,
8858 ping_filter_method);
8860 if (ping_color_type == 3 && ping_have_PLTE != MagickFalse)
8862 png_set_PLTE(ping,ping_info,palette,number_colors);
8864 if (logging != MagickFalse)
8866 for (i=0; i< (ssize_t) number_colors; i++)
8868 if (i < ping_num_trans)
8869 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8870 " PLTE[%d] = (%d,%d,%d), tRNS[%d] = (%d)",
8872 (int) palette[i].red,
8873 (int) palette[i].green,
8874 (int) palette[i].blue,
8876 (int) ping_trans_alpha[i]);
8878 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8879 " PLTE[%d] = (%d,%d,%d)",
8881 (int) palette[i].red,
8882 (int) palette[i].green,
8883 (int) palette[i].blue);
8888 if (ping_exclude_bKGD == MagickFalse)
8890 if (ping_have_bKGD != MagickFalse)
8891 png_set_bKGD(ping,ping_info,&ping_background);
8894 if (ping_exclude_pHYs == MagickFalse)
8896 if (ping_have_pHYs != MagickFalse)
8898 png_set_pHYs(ping,ping_info,
8899 ping_pHYs_x_resolution,
8900 ping_pHYs_y_resolution,
8901 ping_pHYs_unit_type);
8905 #if defined(PNG_oFFs_SUPPORTED)
8906 if (ping_exclude_oFFs == MagickFalse)
8908 if (image->page.x || image->page.y)
8910 png_set_oFFs(ping,ping_info,(png_int_32) image->page.x,
8911 (png_int_32) image->page.y, 0);
8913 if (logging != MagickFalse)
8914 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8915 " Setting up oFFs chunk with x=%d, y=%d, units=0",
8916 (int) image->page.x, (int) image->page.y);
8921 if (mng_info->need_blob != MagickFalse)
8923 if (OpenBlob(image_info,image,WriteBinaryBlobMode,&image->exception) ==
8925 png_error(ping,"WriteBlob Failed");
8927 ping_have_blob=MagickTrue;
8930 png_write_info_before_PLTE(ping, ping_info);
8932 if (ping_have_tRNS != MagickFalse && ping_color_type < 4)
8934 if (logging != MagickFalse)
8936 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8937 " Calling png_set_tRNS with num_trans=%d",ping_num_trans);
8940 if (ping_color_type == 3)
8941 (void) png_set_tRNS(ping, ping_info,
8948 (void) png_set_tRNS(ping, ping_info,
8953 if (logging != MagickFalse)
8955 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
8956 " tRNS color =(%d,%d,%d)",
8957 (int) ping_trans_color.red,
8958 (int) ping_trans_color.green,
8959 (int) ping_trans_color.blue);
8964 /* write any png-chunk-b profiles */
8965 (void) Magick_png_write_chunk_from_profile(image,"PNG-chunk-b",logging);
8967 png_write_info(ping,ping_info);
8969 /* write any PNG-chunk-m profiles */
8970 (void) Magick_png_write_chunk_from_profile(image,"PNG-chunk-m",logging);
8972 if (ping_exclude_vpAg == MagickFalse)
8974 if ((image->page.width != 0 && image->page.width != image->columns) ||
8975 (image->page.height != 0 && image->page.height != image->rows))
8980 (void) WriteBlobMSBULong(image,9L); /* data length=8 */
8981 PNGType(chunk,mng_vpAg);
8982 LogPNGChunk(logging,mng_vpAg,9L);
8983 PNGLong(chunk+4,(png_uint_32) image->page.width);
8984 PNGLong(chunk+8,(png_uint_32) image->page.height);
8985 chunk[12]=0; /* unit = pixels */
8986 (void) WriteBlob(image,13,chunk);
8987 (void) WriteBlobMSBULong(image,crc32(0,chunk,13));
8991 #if (PNG_LIBPNG_VER == 10206)
8992 /* avoid libpng-1.2.6 bug by setting PNG_HAVE_IDAT flag */
8993 #define PNG_HAVE_IDAT 0x04
8994 ping->mode |= PNG_HAVE_IDAT;
8995 #undef PNG_HAVE_IDAT
8998 png_set_packing(ping);
9002 rowbytes=image->columns;
9003 if (image_depth > 8)
9005 switch (ping_color_type)
9007 case PNG_COLOR_TYPE_RGB:
9011 case PNG_COLOR_TYPE_GRAY_ALPHA:
9015 case PNG_COLOR_TYPE_RGBA:
9023 if (logging != MagickFalse)
9025 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9026 " Writing PNG image data");
9028 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9029 " Allocating %.20g bytes of memory for pixels",(double) rowbytes);
9031 ping_pixels=(unsigned char *) AcquireQuantumMemory(rowbytes,
9032 sizeof(*ping_pixels));
9034 if (ping_pixels == (unsigned char *) NULL)
9035 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
9038 Initialize image scanlines.
9040 if (setjmp(png_jmpbuf(ping)))
9046 if (image_info->verbose)
9047 (void) printf("PNG write has failed.\n");
9049 png_destroy_write_struct(&ping,&ping_info);
9050 if (quantum_info != (QuantumInfo *) NULL)
9051 quantum_info=DestroyQuantumInfo(quantum_info);
9052 if (ping_pixels != (unsigned char *) NULL)
9053 ping_pixels=(unsigned char *) RelinquishMagickMemory(ping_pixels);
9054 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
9055 UnlockSemaphoreInfo(ping_semaphore);
9057 if (ping_have_blob != MagickFalse)
9058 (void) CloseBlob(image);
9059 image_info=DestroyImageInfo(image_info);
9060 image=DestroyImage(image);
9061 return(MagickFalse);
9063 quantum_info=AcquireQuantumInfo(image_info,image);
9064 if (quantum_info == (QuantumInfo *) NULL)
9065 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
9066 quantum_info->format=UndefinedQuantumFormat;
9067 quantum_info->depth=image_depth;
9068 num_passes=png_set_interlace_handling(ping);
9070 if ((!mng_info->write_png8 && !mng_info->write_png24 &&
9071 !mng_info->write_png32) &&
9072 (mng_info->IsPalette ||
9073 (image_info->type == BilevelType)) &&
9074 image_matte == MagickFalse &&
9075 ping_have_non_bw == MagickFalse)
9077 /* Palette, Bilevel, or Opaque Monochrome */
9078 register const PixelPacket
9081 quantum_info->depth=8;
9082 for (pass=0; pass < num_passes; pass++)
9085 Convert PseudoClass image to a PNG monochrome image.
9087 for (y=0; y < (ssize_t) image->rows; y++)
9089 if (logging != MagickFalse && y == 0)
9090 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9091 " Writing row of pixels (0)");
9093 p=GetVirtualPixels(image,0,y,image->columns,1,&image->exception);
9095 if (p == (const PixelPacket *) NULL)
9098 if (mng_info->IsPalette)
9100 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9101 quantum_info,GrayQuantum,ping_pixels,&image->exception);
9102 if (mng_info->write_png_colortype-1 == PNG_COLOR_TYPE_PALETTE &&
9103 mng_info->write_png_depth &&
9104 mng_info->write_png_depth != old_bit_depth)
9106 /* Undo pixel scaling */
9107 for (i=0; i < (ssize_t) image->columns; i++)
9108 *(ping_pixels+i)=(unsigned char) (*(ping_pixels+i)
9109 >> (8-old_bit_depth));
9115 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9116 quantum_info,RedQuantum,ping_pixels,&image->exception);
9119 if (mng_info->write_png_colortype-1 != PNG_COLOR_TYPE_PALETTE)
9120 for (i=0; i < (ssize_t) image->columns; i++)
9121 *(ping_pixels+i)=(unsigned char) ((*(ping_pixels+i) > 127) ?
9124 if (logging != MagickFalse && y == 0)
9125 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9126 " Writing row of pixels (1)");
9128 png_write_row(ping,ping_pixels);
9130 if (image->previous == (Image *) NULL)
9132 status=SetImageProgress(image,LoadImageTag,pass,num_passes);
9133 if (status == MagickFalse)
9139 else /* Not Palette, Bilevel, or Opaque Monochrome */
9141 if ((!mng_info->write_png8 && !mng_info->write_png24 &&
9142 !mng_info->write_png32) &&
9143 (image_matte != MagickFalse ||
9144 (ping_bit_depth >= MAGICKCORE_QUANTUM_DEPTH)) &&
9145 (mng_info->IsPalette) && ping_have_color == MagickFalse)
9147 register const PixelPacket
9150 for (pass=0; pass < num_passes; pass++)
9153 for (y=0; y < (ssize_t) image->rows; y++)
9155 p=GetVirtualPixels(image,0,y,image->columns,1,&image->exception);
9157 if (p == (const PixelPacket *) NULL)
9160 if (ping_color_type == PNG_COLOR_TYPE_GRAY)
9162 if (mng_info->IsPalette)
9163 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9164 quantum_info,GrayQuantum,ping_pixels,&image->exception);
9167 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9168 quantum_info,RedQuantum,ping_pixels,&image->exception);
9170 if (logging != MagickFalse && y == 0)
9171 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9172 " Writing GRAY PNG pixels (2)");
9175 else /* PNG_COLOR_TYPE_GRAY_ALPHA */
9177 if (logging != MagickFalse && y == 0)
9178 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9179 " Writing GRAY_ALPHA PNG pixels (2)");
9181 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9182 quantum_info,GrayAlphaQuantum,ping_pixels,&image->exception);
9185 if (logging != MagickFalse && y == 0)
9186 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9187 " Writing row of pixels (2)");
9189 png_write_row(ping,ping_pixels);
9192 if (image->previous == (Image *) NULL)
9194 status=SetImageProgress(image,LoadImageTag,pass,num_passes);
9195 if (status == MagickFalse)
9203 register const PixelPacket
9206 for (pass=0; pass < num_passes; pass++)
9208 if ((image_depth > 8) || (mng_info->write_png24 ||
9209 mng_info->write_png32 ||
9210 (!mng_info->write_png8 && !mng_info->IsPalette)))
9212 for (y=0; y < (ssize_t) image->rows; y++)
9214 p=GetVirtualPixels(image,0,y,image->columns,1,
9217 if (p == (const PixelPacket *) NULL)
9220 if (ping_color_type == PNG_COLOR_TYPE_GRAY)
9222 if (image->storage_class == DirectClass)
9223 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9224 quantum_info,RedQuantum,ping_pixels,&image->exception);
9227 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9228 quantum_info,GrayQuantum,ping_pixels,&image->exception);
9231 else if (ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
9233 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9234 quantum_info,GrayAlphaQuantum,ping_pixels,
9237 if (logging != MagickFalse && y == 0)
9238 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9239 " Writing GRAY_ALPHA PNG pixels (3)");
9242 else if (image_matte != MagickFalse)
9243 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9244 quantum_info,RGBAQuantum,ping_pixels,&image->exception);
9247 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9248 quantum_info,RGBQuantum,ping_pixels,&image->exception);
9250 if (logging != MagickFalse && y == 0)
9251 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9252 " Writing row of pixels (3)");
9254 png_write_row(ping,ping_pixels);
9259 /* not ((image_depth > 8) || (mng_info->write_png24 ||
9260 mng_info->write_png32 ||
9261 (!mng_info->write_png8 && !mng_info->IsPalette))) */
9263 if ((ping_color_type != PNG_COLOR_TYPE_GRAY) &&
9264 (ping_color_type != PNG_COLOR_TYPE_GRAY_ALPHA))
9266 if (logging != MagickFalse)
9267 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9268 " pass %d, Image Is not GRAY or GRAY_ALPHA",pass);
9270 quantum_info->depth=8;
9274 for (y=0; y < (ssize_t) image->rows; y++)
9276 if (logging != MagickFalse && y == 0)
9277 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9278 " pass %d, Image Is RGB, 16-bit GRAY, or GRAY_ALPHA",pass);
9280 p=GetVirtualPixels(image,0,y,image->columns,1,
9283 if (p == (const PixelPacket *) NULL)
9286 if (ping_color_type == PNG_COLOR_TYPE_GRAY)
9287 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9288 quantum_info,GrayQuantum,ping_pixels,&image->exception);
9290 else if (ping_color_type == PNG_COLOR_TYPE_GRAY_ALPHA)
9292 if (logging != MagickFalse && y == 0)
9293 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9294 " Writing GRAY_ALPHA PNG pixels (4)");
9296 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9297 quantum_info,GrayAlphaQuantum,ping_pixels,
9305 * This is failing to account for 1, 2, 4-bit depths
9306 * The call to png_set_packing() above is supposed to
9307 * take care of those.
9310 /* GrayQuantum does not work here */
9311 (void) ExportQuantumPixels(image,(const CacheView *) NULL,
9312 quantum_info,IndexQuantum,ping_pixels,&image->exception);
9314 if (logging != MagickFalse && y <= 2)
9316 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9317 " Writing row of pixels (4)");
9319 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9320 " ping_pixels[0]=%d,ping_pixels[1]=%d",
9321 (int)ping_pixels[0],(int)ping_pixels[1]);
9324 png_write_row(ping,ping_pixels);
9328 if (image->previous == (Image *) NULL)
9330 status=SetImageProgress(image,LoadImageTag,pass,num_passes);
9331 if (status == MagickFalse)
9338 if (quantum_info != (QuantumInfo *) NULL)
9339 quantum_info=DestroyQuantumInfo(quantum_info);
9341 if (logging != MagickFalse)
9343 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9344 " Wrote PNG image data");
9346 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9347 " Width: %.20g",(double) ping_width);
9349 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9350 " Height: %.20g",(double) ping_height);
9352 if (mng_info->write_png_depth)
9354 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9355 " Defined PNG:bit-depth: %d",mng_info->write_png_depth);
9358 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9359 " PNG bit-depth written: %d",ping_bit_depth);
9361 if (mng_info->write_png_colortype)
9363 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9364 " Defined PNG:color-type: %d",mng_info->write_png_colortype-1);
9367 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9368 " PNG color-type written: %d",ping_color_type);
9370 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9371 " PNG Interlace method: %d",ping_interlace_method);
9374 Generate text chunks.
9376 if (ping_exclude_tEXt == MagickFalse && ping_exclude_zTXt == MagickFalse)
9378 ResetImagePropertyIterator(image);
9379 property=GetNextImageProperty(image);
9380 while (property != (const char *) NULL)
9385 value=GetImageProperty(image,property);
9386 if (value != (const char *) NULL)
9388 text=(png_textp) png_malloc(ping,(png_uint_32) sizeof(png_text));
9389 text[0].key=(char *) property;
9390 text[0].text=(char *) value;
9391 text[0].text_length=strlen(value);
9393 if (ping_exclude_tEXt != MagickFalse)
9394 text[0].compression=PNG_TEXT_COMPRESSION_zTXt;
9396 else if (ping_exclude_zTXt != MagickFalse)
9397 text[0].compression=PNG_TEXT_COMPRESSION_NONE;
9401 text[0].compression=image_info->compression == NoCompression ||
9402 (image_info->compression == UndefinedCompression &&
9403 text[0].text_length < 128) ? PNG_TEXT_COMPRESSION_NONE :
9404 PNG_TEXT_COMPRESSION_zTXt ;
9407 if (logging != MagickFalse)
9409 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9410 " Setting up text chunk");
9412 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9413 " keyword: %s",text[0].key);
9416 png_set_text(ping,ping_info,text,1);
9417 png_free(ping,text);
9419 property=GetNextImageProperty(image);
9423 /* write any PNG-chunk-e profiles */
9424 (void) Magick_png_write_chunk_from_profile(image,"PNG-chunk-e",logging);
9426 if (logging != MagickFalse)
9427 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9428 " Writing PNG end info");
9430 png_write_end(ping,ping_info);
9432 if (mng_info->need_fram && (int) image->dispose == BackgroundDispose)
9434 if (mng_info->page.x || mng_info->page.y ||
9435 (ping_width != mng_info->page.width) ||
9436 (ping_height != mng_info->page.height))
9442 Write FRAM 4 with clipping boundaries followed by FRAM 1.
9444 (void) WriteBlobMSBULong(image,27L); /* data length=27 */
9445 PNGType(chunk,mng_FRAM);
9446 LogPNGChunk(logging,mng_FRAM,27L);
9448 chunk[5]=0; /* frame name separator (no name) */
9449 chunk[6]=1; /* flag for changing delay, for next frame only */
9450 chunk[7]=0; /* flag for changing frame timeout */
9451 chunk[8]=1; /* flag for changing frame clipping for next frame */
9452 chunk[9]=0; /* flag for changing frame sync_id */
9453 PNGLong(chunk+10,(png_uint_32) (0L)); /* temporary 0 delay */
9454 chunk[14]=0; /* clipping boundaries delta type */
9455 PNGLong(chunk+15,(png_uint_32) (mng_info->page.x)); /* left cb */
9457 (png_uint_32) (mng_info->page.x + ping_width));
9458 PNGLong(chunk+23,(png_uint_32) (mng_info->page.y)); /* top cb */
9460 (png_uint_32) (mng_info->page.y + ping_height));
9461 (void) WriteBlob(image,31,chunk);
9462 (void) WriteBlobMSBULong(image,crc32(0,chunk,31));
9463 mng_info->old_framing_mode=4;
9464 mng_info->framing_mode=1;
9468 mng_info->framing_mode=3;
9470 if (mng_info->write_mng && !mng_info->need_fram &&
9471 ((int) image->dispose == 3))
9472 (void) ThrowMagickException(&image->exception,GetMagickModule(),
9473 CoderError,"Cannot convert GIF with disposal method 3 to MNG-LC",
9474 "`%s'",image->filename);
9480 png_destroy_write_struct(&ping,&ping_info);
9482 ping_pixels=(unsigned char *) RelinquishMagickMemory(ping_pixels);
9484 #if defined(PNG_SETJMP_NOT_THREAD_SAFE)
9485 UnlockSemaphoreInfo(ping_semaphore);
9488 if (ping_have_blob != MagickFalse)
9489 (void) CloseBlob(image);
9491 image_info=DestroyImageInfo(image_info);
9492 image=DestroyImage(image);
9494 /* Store bit depth actually written */
9495 s[0]=(char) ping_bit_depth;
9498 (void) SetImageProperty(IMimage,"png:bit-depth-written",s);
9500 if (logging != MagickFalse)
9501 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9502 " exit WriteOnePNGImage()");
9505 /* End write one PNG image */
9509 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
9513 % W r i t e P N G I m a g e %
9517 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
9519 % WritePNGImage() writes a Portable Network Graphics (PNG) or
9520 % Multiple-image Network Graphics (MNG) image file.
9522 % MNG support written by Glenn Randers-Pehrson, glennrp@image...
9524 % The format of the WritePNGImage method is:
9526 % MagickBooleanType WritePNGImage(const ImageInfo *image_info,Image *image)
9528 % A description of each parameter follows:
9530 % o image_info: the image info.
9532 % o image: The image.
9534 % Returns MagickTrue on success, MagickFalse on failure.
9536 % Communicating with the PNG encoder:
9538 % While the datastream written is always in PNG format and normally would
9539 % be given the "png" file extension, this method also writes the following
9540 % pseudo-formats which are subsets of PNG:
9542 % o PNG8: An 8-bit indexed PNG datastream is written. If the image has
9543 % a depth greater than 8, the depth is reduced. If transparency
9544 % is present, the tRNS chunk must only have values 0 and 255
9545 % (i.e., transparency is binary: fully opaque or fully
9546 % transparent). If other values are present they will be
9547 % 50%-thresholded to binary transparency. If more than 256
9548 % colors are present, they will be quantized to the 3-3-2
9549 % palette. If you want better quantization or dithering of
9550 % the colors or alpha, you need to do it before calling the
9551 % PNG encoder. The pixels contain 8-bit indices even if
9552 % they could be represented with 1, 2, or 4 bits. Grayscale
9553 % images will be written as indexed PNG files even though the
9554 % PNG grayscale type might be slightly more efficient. Please
9555 % note that writing to the PNG8 format may result in loss
9556 % of color and alpha data.
9558 % o PNG24: An 8-bit per sample RGB PNG datastream is written. The tRNS
9559 % chunk can be present to convey binary transparency by naming
9560 % one of the colors as transparent. The only loss incurred
9561 % is reduction of sample depth to 8. If the image has more
9562 % than one transparent color, has semitransparent pixels, or
9563 % has an opaque pixel with the same RGB components as the
9564 % transparent color, an image is not written.
9566 % o PNG32: An 8-bit per sample RGBA PNG is written. Partial
9567 % transparency is permitted, i.e., the alpha sample for
9568 % each pixel can have any value from 0 to 255. The alpha
9569 % channel is present even if the image is fully opaque.
9570 % The only loss in data is the reduction of the sample depth
9573 % o -define: For more precise control of the PNG output, you can use the
9574 % Image options "png:bit-depth" and "png:color-type". These
9575 % can be set from the commandline with "-define" and also
9576 % from the application programming interfaces. The options
9577 % are case-independent and are converted to lowercase before
9578 % being passed to this encoder.
9580 % png:color-type can be 0, 2, 3, 4, or 6.
9582 % When png:color-type is 0 (Grayscale), png:bit-depth can
9583 % be 1, 2, 4, 8, or 16.
9585 % When png:color-type is 2 (RGB), png:bit-depth can
9588 % When png:color-type is 3 (Indexed), png:bit-depth can
9589 % be 1, 2, 4, or 8. This refers to the number of bits
9590 % used to store the index. The color samples always have
9591 % bit-depth 8 in indexed PNG files.
9593 % When png:color-type is 4 (Gray-Matte) or 6 (RGB-Matte),
9594 % png:bit-depth can be 8 or 16.
9596 % If the image cannot be written without loss with the requested bit-depth
9597 % and color-type, a PNG file will not be written, and the encoder will
9598 % return MagickFalse.
9600 % Since image encoders should not be responsible for the "heavy lifting",
9601 % the user should make sure that ImageMagick has already reduced the
9602 % image depth and number of colors and limit transparency to binary
9603 % transparency prior to attempting to write the image with depth, color,
9604 % or transparency limitations.
9606 % TODO: Enforce the previous paragraph.
9608 % Note that another definition, "png:bit-depth-written" exists, but it
9609 % is not intended for external use. It is only used internally by the
9610 % PNG encoder to inform the JNG encoder of the depth of the alpha channel.
9612 % It is possible to request that the PNG encoder write previously-formatted
9613 % ancillary chunks in the output PNG file, using the "-profile" commandline
9614 % option as shown below or by setting the profile via a programming
9617 % -profile PNG-chunk-x:<file>
9619 % where x is a location flag and <file> is a file containing the chunk
9620 % name in the first 4 bytes, then a colon (":"), followed by the chunk data.
9621 % This encoder will compute the chunk length and CRC, so those must not
9622 % be included in the file.
9624 % "x" can be "b" (before PLTE), "m" (middle, i.e., between PLTE and IDAT),
9625 % or "e" (end, i.e., after IDAT). If you want to write multiple chunks
9626 % of the same type, then add a short unique string after the "x" to prevent
9627 % subsequent profiles from overwriting the preceding ones, e.g.,
9629 % -profile PNG-chunk-b01:file01 -profile PNG-chunk-b02:file02
9631 % As of version 6.6.6 the following optimizations are always done:
9633 % o 32-bit depth is reduced to 16.
9634 % o 16-bit depth is reduced to 8 if all pixels contain samples whose
9635 % high byte and low byte are identical.
9636 % o Palette is sorted to remove unused entries and to put a
9637 % transparent color first, if BUILD_PNG_PALETTE is defined.
9638 % o Opaque matte channel is removed when writing an indexed PNG.
9639 % o Grayscale images are reduced to 1, 2, or 4 bit depth if
9640 % this can be done without loss and a larger bit depth N was not
9641 % requested via the "-define PNG:bit-depth=N" option.
9642 % o If matte channel is present but only one transparent color is
9643 % present, RGB+tRNS is written instead of RGBA
9644 % o Opaque matte channel is removed (or added, if color-type 4 or 6
9645 % was requested when converting an opaque image).
9647 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
9649 static MagickBooleanType WritePNGImage(const ImageInfo *image_info,
9671 assert(image_info != (const ImageInfo *) NULL);
9672 assert(image_info->signature == MagickSignature);
9673 assert(image != (Image *) NULL);
9674 assert(image->signature == MagickSignature);
9675 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
9676 logging=LogMagickEvent(CoderEvent,GetMagickModule(),"Enter WritePNGImage()");
9678 Allocate a MngInfo structure.
9680 have_mng_structure=MagickFalse;
9681 mng_info=(MngInfo *) AcquireMagickMemory(sizeof(MngInfo));
9683 if (mng_info == (MngInfo *) NULL)
9684 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
9687 Initialize members of the MngInfo structure.
9689 (void) ResetMagickMemory(mng_info,0,sizeof(MngInfo));
9690 mng_info->image=image;
9691 mng_info->equal_backgrounds=MagickTrue;
9692 have_mng_structure=MagickTrue;
9694 /* See if user has requested a specific PNG subformat */
9696 mng_info->write_png8=LocaleCompare(image_info->magick,"PNG8") == 0;
9697 mng_info->write_png24=LocaleCompare(image_info->magick,"PNG24") == 0;
9698 mng_info->write_png32=LocaleCompare(image_info->magick,"PNG32") == 0;
9700 if (mng_info->write_png8)
9702 mng_info->write_png_colortype = /* 3 */ 4;
9703 mng_info->write_png_depth = 8;
9707 if (mng_info->write_png24)
9709 mng_info->write_png_colortype = /* 2 */ 3;
9710 mng_info->write_png_depth = 8;
9713 if (image->matte == MagickTrue)
9714 (void) SetImageType(image,TrueColorMatteType);
9717 (void) SetImageType(image,TrueColorType);
9719 (void) SyncImage(image);
9722 if (mng_info->write_png32)
9724 mng_info->write_png_colortype = /* 6 */ 7;
9725 mng_info->write_png_depth = 8;
9728 if (image->matte == MagickTrue)
9729 (void) SetImageType(image,TrueColorMatteType);
9732 (void) SetImageType(image,TrueColorType);
9734 (void) SyncImage(image);
9737 value=GetImageOption(image_info,"png:bit-depth");
9739 if (value != (char *) NULL)
9741 if (LocaleCompare(value,"1") == 0)
9742 mng_info->write_png_depth = 1;
9744 else if (LocaleCompare(value,"2") == 0)
9745 mng_info->write_png_depth = 2;
9747 else if (LocaleCompare(value,"4") == 0)
9748 mng_info->write_png_depth = 4;
9750 else if (LocaleCompare(value,"8") == 0)
9751 mng_info->write_png_depth = 8;
9753 else if (LocaleCompare(value,"16") == 0)
9754 mng_info->write_png_depth = 16;
9757 (void) ThrowMagickException(&image->exception,
9758 GetMagickModule(),CoderWarning,
9759 "ignoring invalid defined png:bit-depth",
9762 if (logging != MagickFalse)
9763 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9764 " png:bit-depth=%d was defined.\n",mng_info->write_png_depth);
9767 value=GetImageOption(image_info,"png:color-type");
9769 if (value != (char *) NULL)
9771 /* We must store colortype+1 because 0 is a valid colortype */
9772 if (LocaleCompare(value,"0") == 0)
9773 mng_info->write_png_colortype = 1;
9775 else if (LocaleCompare(value,"2") == 0)
9776 mng_info->write_png_colortype = 3;
9778 else if (LocaleCompare(value,"3") == 0)
9779 mng_info->write_png_colortype = 4;
9781 else if (LocaleCompare(value,"4") == 0)
9782 mng_info->write_png_colortype = 5;
9784 else if (LocaleCompare(value,"6") == 0)
9785 mng_info->write_png_colortype = 7;
9788 (void) ThrowMagickException(&image->exception,
9789 GetMagickModule(),CoderWarning,
9790 "ignoring invalid defined png:color-type",
9793 if (logging != MagickFalse)
9794 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9795 " png:color-type=%d was defined.\n",mng_info->write_png_colortype-1);
9798 /* Check for chunks to be excluded:
9800 * The default is to not exclude any known chunks except for any
9801 * listed in the "unused_chunks" array, above.
9803 * Chunks can be listed for exclusion via a "PNG:exclude-chunk"
9804 * define (in the image properties or in the image artifacts)
9805 * or via a mng_info member. For convenience, in addition
9806 * to or instead of a comma-separated list of chunks, the
9807 * "exclude-chunk" string can be simply "all" or "none".
9809 * The exclude-chunk define takes priority over the mng_info.
9811 * A "PNG:include-chunk" define takes priority over both the
9812 * mng_info and the "PNG:exclude-chunk" define. Like the
9813 * "exclude-chunk" string, it can define "all" or "none" as
9814 * well as a comma-separated list. Chunks that are unknown to
9815 * ImageMagick are always excluded, regardless of their "copy-safe"
9816 * status according to the PNG specification, and even if they
9817 * appear in the "include-chunk" list.
9819 * Finally, all chunks listed in the "unused_chunks" array are
9820 * automatically excluded, regardless of the other instructions
9823 * if you exclude sRGB but not gAMA (recommended), then sRGB chunk
9824 * will not be written and the gAMA chunk will only be written if it
9825 * is not between .45 and .46, or approximately (1.0/2.2).
9827 * If you exclude tRNS and the image has transparency, the colortype
9828 * is forced to be 4 or 6 (GRAY_ALPHA or RGB_ALPHA).
9830 * The -strip option causes StripImage() to set the png:include-chunk
9831 * artifact to "none,gama".
9834 mng_info->ping_exclude_bKGD=MagickFalse;
9835 mng_info->ping_exclude_cHRM=MagickFalse;
9836 mng_info->ping_exclude_EXIF=MagickFalse; /* hex-encoded EXIF in zTXt */
9837 mng_info->ping_exclude_gAMA=MagickFalse;
9838 mng_info->ping_exclude_cHRM=MagickFalse;
9839 mng_info->ping_exclude_iCCP=MagickFalse;
9840 /* mng_info->ping_exclude_iTXt=MagickFalse; */
9841 mng_info->ping_exclude_oFFs=MagickFalse;
9842 mng_info->ping_exclude_pHYs=MagickFalse;
9843 mng_info->ping_exclude_sRGB=MagickFalse;
9844 mng_info->ping_exclude_tEXt=MagickFalse;
9845 mng_info->ping_exclude_tRNS=MagickFalse;
9846 mng_info->ping_exclude_vpAg=MagickFalse;
9847 mng_info->ping_exclude_zCCP=MagickFalse; /* hex-encoded iCCP in zTXt */
9848 mng_info->ping_exclude_zTXt=MagickFalse;
9850 excluding=MagickFalse;
9852 for (source=0; source<1; source++)
9856 value=GetImageArtifact(image,"png:exclude-chunk");
9859 value=GetImageArtifact(image,"png:exclude-chunks");
9863 value=GetImageOption(image_info,"png:exclude-chunk");
9866 value=GetImageOption(image_info,"png:exclude-chunks");
9875 excluding=MagickTrue;
9877 if (logging != MagickFalse)
9880 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9881 " png:exclude-chunk=%s found in image artifacts.\n", value);
9883 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
9884 " png:exclude-chunk=%s found in image properties.\n", value);
9889 for (i=0; i<(int) last; i+=5)
9892 if (LocaleNCompare(value+i,"all",3) == 0)
9894 mng_info->ping_exclude_bKGD=MagickTrue;
9895 mng_info->ping_exclude_cHRM=MagickTrue;
9896 mng_info->ping_exclude_EXIF=MagickTrue;
9897 mng_info->ping_exclude_gAMA=MagickTrue;
9898 mng_info->ping_exclude_iCCP=MagickTrue;
9899 /* mng_info->ping_exclude_iTXt=MagickTrue; */
9900 mng_info->ping_exclude_oFFs=MagickTrue;
9901 mng_info->ping_exclude_pHYs=MagickTrue;
9902 mng_info->ping_exclude_sRGB=MagickTrue;
9903 mng_info->ping_exclude_tEXt=MagickTrue;
9904 mng_info->ping_exclude_tRNS=MagickTrue;
9905 mng_info->ping_exclude_vpAg=MagickTrue;
9906 mng_info->ping_exclude_zCCP=MagickTrue;
9907 mng_info->ping_exclude_zTXt=MagickTrue;
9911 if (LocaleNCompare(value+i,"none",4) == 0)
9913 mng_info->ping_exclude_bKGD=MagickFalse;
9914 mng_info->ping_exclude_cHRM=MagickFalse;
9915 mng_info->ping_exclude_EXIF=MagickFalse;
9916 mng_info->ping_exclude_gAMA=MagickFalse;
9917 mng_info->ping_exclude_iCCP=MagickFalse;
9918 /* mng_info->ping_exclude_iTXt=MagickFalse; */
9919 mng_info->ping_exclude_oFFs=MagickFalse;
9920 mng_info->ping_exclude_pHYs=MagickFalse;
9921 mng_info->ping_exclude_sRGB=MagickFalse;
9922 mng_info->ping_exclude_tEXt=MagickFalse;
9923 mng_info->ping_exclude_tRNS=MagickFalse;
9924 mng_info->ping_exclude_vpAg=MagickFalse;
9925 mng_info->ping_exclude_zCCP=MagickFalse;
9926 mng_info->ping_exclude_zTXt=MagickFalse;
9929 if (LocaleNCompare(value+i,"bkgd",4) == 0)
9930 mng_info->ping_exclude_bKGD=MagickTrue;
9932 if (LocaleNCompare(value+i,"chrm",4) == 0)
9933 mng_info->ping_exclude_cHRM=MagickTrue;
9935 if (LocaleNCompare(value+i,"exif",4) == 0)
9936 mng_info->ping_exclude_EXIF=MagickTrue;
9938 if (LocaleNCompare(value+i,"gama",4) == 0)
9939 mng_info->ping_exclude_gAMA=MagickTrue;
9941 if (LocaleNCompare(value+i,"iccp",4) == 0)
9942 mng_info->ping_exclude_iCCP=MagickTrue;
9945 if (LocaleNCompare(value+i,"itxt",4) == 0)
9946 mng_info->ping_exclude_iTXt=MagickTrue;
9949 if (LocaleNCompare(value+i,"gama",4) == 0)
9950 mng_info->ping_exclude_gAMA=MagickTrue;
9952 if (LocaleNCompare(value+i,"offs",4) == 0)
9953 mng_info->ping_exclude_oFFs=MagickTrue;
9955 if (LocaleNCompare(value+i,"phys",4) == 0)
9956 mng_info->ping_exclude_pHYs=MagickTrue;
9958 if (LocaleNCompare(value+i,"srgb",4) == 0)
9959 mng_info->ping_exclude_sRGB=MagickTrue;
9961 if (LocaleNCompare(value+i,"text",4) == 0)
9962 mng_info->ping_exclude_tEXt=MagickTrue;
9964 if (LocaleNCompare(value+i,"trns",4) == 0)
9965 mng_info->ping_exclude_tRNS=MagickTrue;
9967 if (LocaleNCompare(value+i,"vpag",4) == 0)
9968 mng_info->ping_exclude_vpAg=MagickTrue;
9970 if (LocaleNCompare(value+i,"zccp",4) == 0)
9971 mng_info->ping_exclude_zCCP=MagickTrue;
9973 if (LocaleNCompare(value+i,"ztxt",4) == 0)
9974 mng_info->ping_exclude_zTXt=MagickTrue;
9980 for (source=0; source<1; source++)
9984 value=GetImageArtifact(image,"png:include-chunk");
9987 value=GetImageArtifact(image,"png:include-chunks");
9991 value=GetImageOption(image_info,"png:include-chunk");
9994 value=GetImageOption(image_info,"png:include-chunks");
10002 excluding=MagickTrue;
10004 if (logging != MagickFalse)
10007 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10008 " png:include-chunk=%s found in image artifacts.\n", value);
10010 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10011 " png:include-chunk=%s found in image properties.\n", value);
10014 last=strlen(value);
10016 for (i=0; i<(int) last; i+=5)
10018 if (LocaleNCompare(value+i,"all",3) == 0)
10020 mng_info->ping_exclude_bKGD=MagickFalse;
10021 mng_info->ping_exclude_cHRM=MagickFalse;
10022 mng_info->ping_exclude_EXIF=MagickFalse;
10023 mng_info->ping_exclude_gAMA=MagickFalse;
10024 mng_info->ping_exclude_iCCP=MagickFalse;
10025 /* mng_info->ping_exclude_iTXt=MagickFalse; */
10026 mng_info->ping_exclude_oFFs=MagickFalse;
10027 mng_info->ping_exclude_pHYs=MagickFalse;
10028 mng_info->ping_exclude_sRGB=MagickFalse;
10029 mng_info->ping_exclude_tEXt=MagickFalse;
10030 mng_info->ping_exclude_tRNS=MagickFalse;
10031 mng_info->ping_exclude_vpAg=MagickFalse;
10032 mng_info->ping_exclude_zCCP=MagickFalse;
10033 mng_info->ping_exclude_zTXt=MagickFalse;
10037 if (LocaleNCompare(value+i,"none",4) == 0)
10039 mng_info->ping_exclude_bKGD=MagickTrue;
10040 mng_info->ping_exclude_cHRM=MagickTrue;
10041 mng_info->ping_exclude_EXIF=MagickTrue;
10042 mng_info->ping_exclude_gAMA=MagickTrue;
10043 mng_info->ping_exclude_iCCP=MagickTrue;
10044 /* mng_info->ping_exclude_iTXt=MagickTrue; */
10045 mng_info->ping_exclude_oFFs=MagickTrue;
10046 mng_info->ping_exclude_pHYs=MagickTrue;
10047 mng_info->ping_exclude_sRGB=MagickTrue;
10048 mng_info->ping_exclude_tEXt=MagickTrue;
10049 mng_info->ping_exclude_tRNS=MagickTrue;
10050 mng_info->ping_exclude_vpAg=MagickTrue;
10051 mng_info->ping_exclude_zCCP=MagickTrue;
10052 mng_info->ping_exclude_zTXt=MagickTrue;
10055 if (LocaleNCompare(value+i,"bkgd",4) == 0)
10056 mng_info->ping_exclude_bKGD=MagickFalse;
10058 if (LocaleNCompare(value+i,"chrm",4) == 0)
10059 mng_info->ping_exclude_cHRM=MagickFalse;
10061 if (LocaleNCompare(value+i,"exif",4) == 0)
10062 mng_info->ping_exclude_EXIF=MagickFalse;
10064 if (LocaleNCompare(value+i,"gama",4) == 0)
10065 mng_info->ping_exclude_gAMA=MagickFalse;
10067 if (LocaleNCompare(value+i,"iccp",4) == 0)
10068 mng_info->ping_exclude_iCCP=MagickFalse;
10071 if (LocaleNCompare(value+i,"itxt",4) == 0)
10072 mng_info->ping_exclude_iTXt=MagickFalse;
10075 if (LocaleNCompare(value+i,"gama",4) == 0)
10076 mng_info->ping_exclude_gAMA=MagickFalse;
10078 if (LocaleNCompare(value+i,"offs",4) == 0)
10079 mng_info->ping_exclude_oFFs=MagickFalse;
10081 if (LocaleNCompare(value+i,"phys",4) == 0)
10082 mng_info->ping_exclude_pHYs=MagickFalse;
10084 if (LocaleNCompare(value+i,"srgb",4) == 0)
10085 mng_info->ping_exclude_sRGB=MagickFalse;
10087 if (LocaleNCompare(value+i,"text",4) == 0)
10088 mng_info->ping_exclude_tEXt=MagickFalse;
10090 if (LocaleNCompare(value+i,"trns",4) == 0)
10091 mng_info->ping_exclude_tRNS=MagickFalse;
10093 if (LocaleNCompare(value+i,"vpag",4) == 0)
10094 mng_info->ping_exclude_vpAg=MagickFalse;
10096 if (LocaleNCompare(value+i,"zccp",4) == 0)
10097 mng_info->ping_exclude_zCCP=MagickFalse;
10099 if (LocaleNCompare(value+i,"ztxt",4) == 0)
10100 mng_info->ping_exclude_zTXt=MagickFalse;
10106 if (excluding != MagickFalse && logging != MagickFalse)
10108 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10109 " Chunks to be excluded from the output PNG:");
10110 if (mng_info->ping_exclude_bKGD != MagickFalse)
10111 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10113 if (mng_info->ping_exclude_cHRM != MagickFalse)
10114 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10116 if (mng_info->ping_exclude_EXIF != MagickFalse)
10117 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10119 if (mng_info->ping_exclude_gAMA != MagickFalse)
10120 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10122 if (mng_info->ping_exclude_iCCP != MagickFalse)
10123 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10126 if (mng_info->ping_exclude_iTXt != MagickFalse)
10127 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10130 if (mng_info->ping_exclude_oFFs != MagickFalse)
10131 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10133 if (mng_info->ping_exclude_pHYs != MagickFalse)
10134 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10136 if (mng_info->ping_exclude_sRGB != MagickFalse)
10137 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10139 if (mng_info->ping_exclude_tEXt != MagickFalse)
10140 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10142 if (mng_info->ping_exclude_tRNS != MagickFalse)
10143 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10145 if (mng_info->ping_exclude_vpAg != MagickFalse)
10146 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10148 if (mng_info->ping_exclude_zCCP != MagickFalse)
10149 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10151 if (mng_info->ping_exclude_zTXt != MagickFalse)
10152 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10156 mng_info->need_blob = MagickTrue;
10158 status=WriteOnePNGImage(mng_info,image_info,image);
10160 MngInfoFreeStruct(mng_info,&have_mng_structure);
10162 if (logging != MagickFalse)
10163 (void) LogMagickEvent(CoderEvent,GetMagickModule(),"exit WritePNGImage()");
10168 #if defined(JNG_SUPPORTED)
10170 /* Write one JNG image */
10171 static MagickBooleanType WriteOneJNGImage(MngInfo *mng_info,
10172 const ImageInfo *image_info,Image *image)
10193 jng_alpha_compression_method,
10194 jng_alpha_sample_depth,
10201 logging=LogMagickEvent(CoderEvent,GetMagickModule(),
10202 " Enter WriteOneJNGImage()");
10204 blob=(unsigned char *) NULL;
10205 jpeg_image=(Image *) NULL;
10206 jpeg_image_info=(ImageInfo *) NULL;
10209 transparent=image_info->type==GrayscaleMatteType ||
10210 image_info->type==TrueColorMatteType;
10212 jng_alpha_sample_depth=0;
10213 jng_quality=image_info->quality == 0UL ? 75UL : image_info->quality;
10214 jng_alpha_compression_method=0;
10216 if (image->matte != MagickFalse)
10218 /* if any pixels are transparent */
10219 transparent=MagickTrue;
10220 if (image_info->compression==JPEGCompression)
10221 jng_alpha_compression_method=8;
10228 /* Create JPEG blob, image, and image_info */
10229 if (logging != MagickFalse)
10230 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10231 " Creating jpeg_image_info for opacity.");
10233 jpeg_image_info=(ImageInfo *) CloneImageInfo(image_info);
10235 if (jpeg_image_info == (ImageInfo *) NULL)
10236 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
10238 if (logging != MagickFalse)
10239 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10240 " Creating jpeg_image.");
10242 jpeg_image=CloneImage(image,0,0,MagickTrue,&image->exception);
10244 if (jpeg_image == (Image *) NULL)
10245 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
10247 (void) CopyMagickString(jpeg_image->magick,"JPEG",MaxTextExtent);
10248 status=SeparateImageChannel(jpeg_image,OpacityChannel);
10249 status=NegateImage(jpeg_image,MagickFalse);
10250 jpeg_image->matte=MagickFalse;
10252 if (jng_quality >= 1000)
10253 jpeg_image_info->quality=jng_quality/1000;
10256 jpeg_image_info->quality=jng_quality;
10258 jpeg_image_info->type=GrayscaleType;
10259 (void) SetImageType(jpeg_image,GrayscaleType);
10260 (void) AcquireUniqueFilename(jpeg_image->filename);
10261 (void) FormatMagickString(jpeg_image_info->filename,MaxTextExtent,
10262 "%s",jpeg_image->filename);
10265 /* To do: check bit depth of PNG alpha channel */
10267 /* Check if image is grayscale. */
10268 if (image_info->type != TrueColorMatteType && image_info->type !=
10269 TrueColorType && ImageIsGray(image))
10274 if (jng_alpha_compression_method==0)
10279 /* Encode opacity as a grayscale PNG blob */
10280 status=OpenBlob(jpeg_image_info,jpeg_image,WriteBinaryBlobMode,
10281 &image->exception);
10282 if (logging != MagickFalse)
10283 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10284 " Creating PNG blob.");
10287 (void) CopyMagickString(jpeg_image_info->magick,"PNG",MaxTextExtent);
10288 (void) CopyMagickString(jpeg_image->magick,"PNG",MaxTextExtent);
10289 jpeg_image_info->interlace=NoInterlace;
10291 blob=ImageToBlob(jpeg_image_info,jpeg_image,&length,
10292 &image->exception);
10294 /* Retrieve sample depth used */
10295 value=GetImageProperty(jpeg_image,"png:bit-depth-written");
10296 if (value != (char *) NULL)
10297 jng_alpha_sample_depth= (unsigned int) value[0];
10301 /* Encode opacity as a grayscale JPEG blob */
10303 status=OpenBlob(jpeg_image_info,jpeg_image,WriteBinaryBlobMode,
10304 &image->exception);
10306 (void) CopyMagickString(jpeg_image_info->magick,"JPEG",MaxTextExtent);
10307 (void) CopyMagickString(jpeg_image->magick,"JPEG",MaxTextExtent);
10308 jpeg_image_info->interlace=NoInterlace;
10309 if (logging != MagickFalse)
10310 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10311 " Creating blob.");
10312 blob=ImageToBlob(jpeg_image_info,jpeg_image,&length,
10313 &image->exception);
10314 jng_alpha_sample_depth=8;
10316 if (logging != MagickFalse)
10317 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10318 " Successfully read jpeg_image into a blob, length=%.20g.",
10322 /* Destroy JPEG image and image_info */
10323 jpeg_image=DestroyImage(jpeg_image);
10324 (void) RelinquishUniqueFileResource(jpeg_image_info->filename);
10325 jpeg_image_info=DestroyImageInfo(jpeg_image_info);
10328 /* Write JHDR chunk */
10329 (void) WriteBlobMSBULong(image,16L); /* chunk data length=16 */
10330 PNGType(chunk,mng_JHDR);
10331 LogPNGChunk(logging,mng_JHDR,16L);
10332 PNGLong(chunk+4,(png_uint_32) image->columns);
10333 PNGLong(chunk+8,(png_uint_32) image->rows);
10334 chunk[12]=jng_color_type;
10335 chunk[13]=8; /* sample depth */
10336 chunk[14]=8; /*jng_image_compression_method */
10337 chunk[15]=(unsigned char) (image_info->interlace == NoInterlace ? 0 : 8);
10338 chunk[16]=jng_alpha_sample_depth;
10339 chunk[17]=jng_alpha_compression_method;
10340 chunk[18]=0; /*jng_alpha_filter_method */
10341 chunk[19]=0; /*jng_alpha_interlace_method */
10342 (void) WriteBlob(image,20,chunk);
10343 (void) WriteBlobMSBULong(image,crc32(0,chunk,20));
10344 if (logging != MagickFalse)
10346 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10347 " JNG width:%15lu",(unsigned long) image->columns);
10349 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10350 " JNG height:%14lu",(unsigned long) image->rows);
10352 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10353 " JNG color type:%10d",jng_color_type);
10355 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10356 " JNG sample depth:%8d",8);
10358 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10359 " JNG compression:%9d",8);
10361 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10362 " JNG interlace:%11d",0);
10364 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10365 " JNG alpha depth:%9d",jng_alpha_sample_depth);
10367 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10368 " JNG alpha compression:%3d",jng_alpha_compression_method);
10370 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10371 " JNG alpha filter:%8d",0);
10373 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10374 " JNG alpha interlace:%5d",0);
10377 /* Write any JNG-chunk-b profiles */
10378 (void) Magick_png_write_chunk_from_profile(image,"JNG-chunk-b",logging);
10381 Write leading ancillary chunks
10387 Write JNG bKGD chunk
10398 if (jng_color_type == 8 || jng_color_type == 12)
10402 (void) WriteBlobMSBULong(image,(size_t) (num_bytes-4L));
10403 PNGType(chunk,mng_bKGD);
10404 LogPNGChunk(logging,mng_bKGD,(size_t) (num_bytes-4L));
10405 red=ScaleQuantumToChar(image->background_color.red);
10406 green=ScaleQuantumToChar(image->background_color.green);
10407 blue=ScaleQuantumToChar(image->background_color.blue);
10414 (void) WriteBlob(image,(size_t) num_bytes,chunk);
10415 (void) WriteBlobMSBULong(image,crc32(0,chunk,(uInt) num_bytes));
10418 if ((image->colorspace == sRGBColorspace || image->rendering_intent))
10421 Write JNG sRGB chunk
10423 (void) WriteBlobMSBULong(image,1L);
10424 PNGType(chunk,mng_sRGB);
10425 LogPNGChunk(logging,mng_sRGB,1L);
10427 if (image->rendering_intent != UndefinedIntent)
10428 chunk[4]=(unsigned char)
10429 Magick_RenderingIntent_to_PNG_RenderingIntent(
10430 (image->rendering_intent));
10433 chunk[4]=(unsigned char)
10434 Magick_RenderingIntent_to_PNG_RenderingIntent(
10435 (PerceptualIntent));
10437 (void) WriteBlob(image,5,chunk);
10438 (void) WriteBlobMSBULong(image,crc32(0,chunk,5));
10442 if (image->gamma != 0.0)
10445 Write JNG gAMA chunk
10447 (void) WriteBlobMSBULong(image,4L);
10448 PNGType(chunk,mng_gAMA);
10449 LogPNGChunk(logging,mng_gAMA,4L);
10450 PNGLong(chunk+4,(png_uint_32) (100000*image->gamma+0.5));
10451 (void) WriteBlob(image,8,chunk);
10452 (void) WriteBlobMSBULong(image,crc32(0,chunk,8));
10455 if ((mng_info->equal_chrms == MagickFalse) &&
10456 (image->chromaticity.red_primary.x != 0.0))
10462 Write JNG cHRM chunk
10464 (void) WriteBlobMSBULong(image,32L);
10465 PNGType(chunk,mng_cHRM);
10466 LogPNGChunk(logging,mng_cHRM,32L);
10467 primary=image->chromaticity.white_point;
10468 PNGLong(chunk+4,(png_uint_32) (100000*primary.x+0.5));
10469 PNGLong(chunk+8,(png_uint_32) (100000*primary.y+0.5));
10470 primary=image->chromaticity.red_primary;
10471 PNGLong(chunk+12,(png_uint_32) (100000*primary.x+0.5));
10472 PNGLong(chunk+16,(png_uint_32) (100000*primary.y+0.5));
10473 primary=image->chromaticity.green_primary;
10474 PNGLong(chunk+20,(png_uint_32) (100000*primary.x+0.5));
10475 PNGLong(chunk+24,(png_uint_32) (100000*primary.y+0.5));
10476 primary=image->chromaticity.blue_primary;
10477 PNGLong(chunk+28,(png_uint_32) (100000*primary.x+0.5));
10478 PNGLong(chunk+32,(png_uint_32) (100000*primary.y+0.5));
10479 (void) WriteBlob(image,36,chunk);
10480 (void) WriteBlobMSBULong(image,crc32(0,chunk,36));
10484 if (image->x_resolution && image->y_resolution && !mng_info->equal_physs)
10487 Write JNG pHYs chunk
10489 (void) WriteBlobMSBULong(image,9L);
10490 PNGType(chunk,mng_pHYs);
10491 LogPNGChunk(logging,mng_pHYs,9L);
10492 if (image->units == PixelsPerInchResolution)
10494 PNGLong(chunk+4,(png_uint_32)
10495 (image->x_resolution*100.0/2.54+0.5));
10497 PNGLong(chunk+8,(png_uint_32)
10498 (image->y_resolution*100.0/2.54+0.5));
10505 if (image->units == PixelsPerCentimeterResolution)
10507 PNGLong(chunk+4,(png_uint_32)
10508 (image->x_resolution*100.0+0.5));
10510 PNGLong(chunk+8,(png_uint_32)
10511 (image->y_resolution*100.0+0.5));
10518 PNGLong(chunk+4,(png_uint_32) (image->x_resolution+0.5));
10519 PNGLong(chunk+8,(png_uint_32) (image->y_resolution+0.5));
10523 (void) WriteBlob(image,13,chunk);
10524 (void) WriteBlobMSBULong(image,crc32(0,chunk,13));
10527 if (mng_info->write_mng == 0 && (image->page.x || image->page.y))
10530 Write JNG oFFs chunk
10532 (void) WriteBlobMSBULong(image,9L);
10533 PNGType(chunk,mng_oFFs);
10534 LogPNGChunk(logging,mng_oFFs,9L);
10535 PNGsLong(chunk+4,(ssize_t) (image->page.x));
10536 PNGsLong(chunk+8,(ssize_t) (image->page.y));
10538 (void) WriteBlob(image,13,chunk);
10539 (void) WriteBlobMSBULong(image,crc32(0,chunk,13));
10541 if (mng_info->write_mng == 0 && (image->page.width || image->page.height))
10543 (void) WriteBlobMSBULong(image,9L); /* data length=8 */
10544 PNGType(chunk,mng_vpAg);
10545 LogPNGChunk(logging,mng_vpAg,9L);
10546 PNGLong(chunk+4,(png_uint_32) image->page.width);
10547 PNGLong(chunk+8,(png_uint_32) image->page.height);
10548 chunk[12]=0; /* unit = pixels */
10549 (void) WriteBlob(image,13,chunk);
10550 (void) WriteBlobMSBULong(image,crc32(0,chunk,13));
10556 if (jng_alpha_compression_method==0)
10564 /* Write IDAT chunk header */
10565 if (logging != MagickFalse)
10566 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10567 " Write IDAT chunks from blob, length=%.20g.",(double)
10570 /* Copy IDAT chunks */
10573 for (i=8; i<(ssize_t) length; i+=len+12)
10575 len=(*p<<24)|((*(p+1))<<16)|((*(p+2))<<8)|(*(p+3));
10578 if (*(p)==73 && *(p+1)==68 && *(p+2)==65 && *(p+3)==84) /* IDAT */
10580 /* Found an IDAT chunk. */
10581 (void) WriteBlobMSBULong(image,(size_t) len);
10582 LogPNGChunk(logging,mng_IDAT,(size_t) len);
10583 (void) WriteBlob(image,(size_t) len+4,p);
10584 (void) WriteBlobMSBULong(image,
10585 crc32(0,p,(uInt) len+4));
10590 if (logging != MagickFalse)
10591 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10592 " Skipping %c%c%c%c chunk, length=%.20g.",
10593 *(p),*(p+1),*(p+2),*(p+3),(double) len);
10600 /* Write JDAA chunk header */
10601 if (logging != MagickFalse)
10602 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10603 " Write JDAA chunk, length=%.20g.",(double) length);
10604 (void) WriteBlobMSBULong(image,(size_t) length);
10605 PNGType(chunk,mng_JDAA);
10606 LogPNGChunk(logging,mng_JDAA,length);
10607 /* Write JDAT chunk(s) data */
10608 (void) WriteBlob(image,4,chunk);
10609 (void) WriteBlob(image,length,blob);
10610 (void) WriteBlobMSBULong(image,crc32(crc32(0,chunk,4),blob,
10613 blob=(unsigned char *) RelinquishMagickMemory(blob);
10616 /* Encode image as a JPEG blob */
10617 if (logging != MagickFalse)
10618 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10619 " Creating jpeg_image_info.");
10620 jpeg_image_info=(ImageInfo *) CloneImageInfo(image_info);
10621 if (jpeg_image_info == (ImageInfo *) NULL)
10622 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
10624 if (logging != MagickFalse)
10625 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10626 " Creating jpeg_image.");
10628 jpeg_image=CloneImage(image,0,0,MagickTrue,&image->exception);
10629 if (jpeg_image == (Image *) NULL)
10630 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
10631 (void) CopyMagickString(jpeg_image->magick,"JPEG",MaxTextExtent);
10633 (void) AcquireUniqueFilename(jpeg_image->filename);
10634 (void) FormatMagickString(jpeg_image_info->filename,MaxTextExtent,"%s",
10635 jpeg_image->filename);
10637 status=OpenBlob(jpeg_image_info,jpeg_image,WriteBinaryBlobMode,
10638 &image->exception);
10640 if (logging != MagickFalse)
10641 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10642 " Created jpeg_image, %.20g x %.20g.",(double) jpeg_image->columns,
10643 (double) jpeg_image->rows);
10645 if (jng_color_type == 8 || jng_color_type == 12)
10646 jpeg_image_info->type=GrayscaleType;
10648 jpeg_image_info->quality=jng_quality % 1000;
10649 (void) CopyMagickString(jpeg_image_info->magick,"JPEG",MaxTextExtent);
10650 (void) CopyMagickString(jpeg_image->magick,"JPEG",MaxTextExtent);
10652 if (logging != MagickFalse)
10653 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10654 " Creating blob.");
10656 blob=ImageToBlob(jpeg_image_info,jpeg_image,&length,&image->exception);
10658 if (logging != MagickFalse)
10660 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10661 " Successfully read jpeg_image into a blob, length=%.20g.",
10664 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10665 " Write JDAT chunk, length=%.20g.",(double) length);
10668 /* Write JDAT chunk(s) */
10669 (void) WriteBlobMSBULong(image,(size_t) length);
10670 PNGType(chunk,mng_JDAT);
10671 LogPNGChunk(logging,mng_JDAT,length);
10672 (void) WriteBlob(image,4,chunk);
10673 (void) WriteBlob(image,length,blob);
10674 (void) WriteBlobMSBULong(image,crc32(crc32(0,chunk,4),blob,(uInt) length));
10676 jpeg_image=DestroyImage(jpeg_image);
10677 (void) RelinquishUniqueFileResource(jpeg_image_info->filename);
10678 jpeg_image_info=DestroyImageInfo(jpeg_image_info);
10679 blob=(unsigned char *) RelinquishMagickMemory(blob);
10681 /* Write any JNG-chunk-e profiles */
10682 (void) Magick_png_write_chunk_from_profile(image,"JNG-chunk-e",logging);
10684 /* Write IEND chunk */
10685 (void) WriteBlobMSBULong(image,0L);
10686 PNGType(chunk,mng_IEND);
10687 LogPNGChunk(logging,mng_IEND,0);
10688 (void) WriteBlob(image,4,chunk);
10689 (void) WriteBlobMSBULong(image,crc32(0,chunk,4));
10691 if (logging != MagickFalse)
10692 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10693 " exit WriteOneJNGImage()");
10700 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
10704 % W r i t e J N G I m a g e %
10708 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
10710 % WriteJNGImage() writes a JPEG Network Graphics (JNG) image file.
10712 % JNG support written by Glenn Randers-Pehrson, glennrp@image...
10714 % The format of the WriteJNGImage method is:
10716 % MagickBooleanType WriteJNGImage(const ImageInfo *image_info,Image *image)
10718 % A description of each parameter follows:
10720 % o image_info: the image info.
10722 % o image: The image.
10724 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
10726 static MagickBooleanType WriteJNGImage(const ImageInfo *image_info,Image *image)
10729 have_mng_structure,
10739 assert(image_info != (const ImageInfo *) NULL);
10740 assert(image_info->signature == MagickSignature);
10741 assert(image != (Image *) NULL);
10742 assert(image->signature == MagickSignature);
10743 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
10744 logging=LogMagickEvent(CoderEvent,GetMagickModule(),"Enter WriteJNGImage()");
10745 status=OpenBlob(image_info,image,WriteBinaryBlobMode,&image->exception);
10746 if (status == MagickFalse)
10750 Allocate a MngInfo structure.
10752 have_mng_structure=MagickFalse;
10753 mng_info=(MngInfo *) AcquireMagickMemory(sizeof(MngInfo));
10754 if (mng_info == (MngInfo *) NULL)
10755 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
10757 Initialize members of the MngInfo structure.
10759 (void) ResetMagickMemory(mng_info,0,sizeof(MngInfo));
10760 mng_info->image=image;
10761 have_mng_structure=MagickTrue;
10763 (void) WriteBlob(image,8,(const unsigned char *) "\213JNG\r\n\032\n");
10765 status=WriteOneJNGImage(mng_info,image_info,image);
10766 (void) CloseBlob(image);
10768 (void) CatchImageException(image);
10769 MngInfoFreeStruct(mng_info,&have_mng_structure);
10770 if (logging != MagickFalse)
10771 (void) LogMagickEvent(CoderEvent,GetMagickModule(),"exit WriteJNGImage()");
10778 static MagickBooleanType WriteMNGImage(const ImageInfo *image_info,Image *image)
10787 have_mng_structure,
10790 volatile MagickBooleanType
10802 #if defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED) || \
10803 defined(PNG_MNG_FEATURES_SUPPORTED)
10806 all_images_are_gray,
10816 volatile unsigned int
10827 #if (PNG_LIBPNG_VER < 10200)
10828 if (image_info->verbose)
10829 printf("Your PNG library (libpng-%s) is rather old.\n",
10830 PNG_LIBPNG_VER_STRING);
10836 assert(image_info != (const ImageInfo *) NULL);
10837 assert(image_info->signature == MagickSignature);
10838 assert(image != (Image *) NULL);
10839 assert(image->signature == MagickSignature);
10840 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
10841 logging=LogMagickEvent(CoderEvent,GetMagickModule(),"Enter WriteMNGImage()");
10842 status=OpenBlob(image_info,image,WriteBinaryBlobMode,&image->exception);
10843 if (status == MagickFalse)
10847 Allocate a MngInfo structure.
10849 have_mng_structure=MagickFalse;
10850 mng_info=(MngInfo *) AcquireMagickMemory(sizeof(MngInfo));
10851 if (mng_info == (MngInfo *) NULL)
10852 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
10854 Initialize members of the MngInfo structure.
10856 (void) ResetMagickMemory(mng_info,0,sizeof(MngInfo));
10857 mng_info->image=image;
10858 have_mng_structure=MagickTrue;
10859 write_mng=LocaleCompare(image_info->magick,"MNG") == 0;
10862 * See if user has requested a specific PNG subformat to be used
10863 * for all of the PNGs in the MNG being written, e.g.,
10865 * convert *.png png8:animation.mng
10867 * To do: check -define png:bit_depth and png:color_type as well,
10868 * or perhaps use mng:bit_depth and mng:color_type instead for
10872 mng_info->write_png8=LocaleCompare(image_info->magick,"PNG8") == 0;
10873 mng_info->write_png24=LocaleCompare(image_info->magick,"PNG24") == 0;
10874 mng_info->write_png32=LocaleCompare(image_info->magick,"PNG32") == 0;
10876 write_jng=MagickFalse;
10877 if (image_info->compression == JPEGCompression)
10878 write_jng=MagickTrue;
10880 mng_info->adjoin=image_info->adjoin &&
10881 (GetNextImageInList(image) != (Image *) NULL) && write_mng;
10883 if (logging != MagickFalse)
10885 /* Log some info about the input */
10889 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10890 " Checking input image(s)");
10892 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10893 " Image_info depth: %.20g",(double) image_info->depth);
10895 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10896 " Type: %d",image_info->type);
10899 for (p=image; p != (Image *) NULL; p=GetNextImageInList(p))
10901 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10902 " Scene: %.20g",(double) scene++);
10904 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10905 " Image depth: %.20g",(double) p->depth);
10908 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10912 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10915 if (p->storage_class == PseudoClass)
10916 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10917 " Storage class: PseudoClass");
10920 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10921 " Storage class: DirectClass");
10924 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10925 " Number of colors: %.20g",(double) p->colors);
10928 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
10929 " Number of colors: unspecified");
10931 if (mng_info->adjoin == MagickFalse)
10936 use_global_plte=MagickFalse;
10937 all_images_are_gray=MagickFalse;
10938 #ifdef PNG_WRITE_EMPTY_PLTE_SUPPORTED
10939 need_local_plte=MagickTrue;
10941 need_defi=MagickFalse;
10942 need_matte=MagickFalse;
10943 mng_info->framing_mode=1;
10944 mng_info->old_framing_mode=1;
10947 if (image_info->page != (char *) NULL)
10950 Determine image bounding box.
10952 SetGeometry(image,&mng_info->page);
10953 (void) ParseMetaGeometry(image_info->page,&mng_info->page.x,
10954 &mng_info->page.y,&mng_info->page.width,&mng_info->page.height);
10966 mng_info->page=image->page;
10967 need_geom=MagickTrue;
10968 if (mng_info->page.width || mng_info->page.height)
10969 need_geom=MagickFalse;
10971 Check all the scenes.
10973 initial_delay=image->delay;
10974 need_iterations=MagickFalse;
10975 mng_info->equal_chrms=image->chromaticity.red_primary.x != 0.0;
10976 mng_info->equal_physs=MagickTrue,
10977 mng_info->equal_gammas=MagickTrue;
10978 mng_info->equal_srgbs=MagickTrue;
10979 mng_info->equal_backgrounds=MagickTrue;
10981 #if defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED) || \
10982 defined(PNG_MNG_FEATURES_SUPPORTED)
10983 all_images_are_gray=MagickTrue;
10984 mng_info->equal_palettes=MagickFalse;
10985 need_local_plte=MagickFalse;
10987 for (next_image=image; next_image != (Image *) NULL; )
10991 if ((next_image->columns+next_image->page.x) > mng_info->page.width)
10992 mng_info->page.width=next_image->columns+next_image->page.x;
10994 if ((next_image->rows+next_image->page.y) > mng_info->page.height)
10995 mng_info->page.height=next_image->rows+next_image->page.y;
10998 if (next_image->page.x || next_image->page.y)
10999 need_defi=MagickTrue;
11001 if (next_image->matte)
11002 need_matte=MagickTrue;
11004 if ((int) next_image->dispose >= BackgroundDispose)
11005 if (next_image->matte || next_image->page.x || next_image->page.y ||
11006 ((next_image->columns < mng_info->page.width) &&
11007 (next_image->rows < mng_info->page.height)))
11008 mng_info->need_fram=MagickTrue;
11010 if (next_image->iterations)
11011 need_iterations=MagickTrue;
11013 final_delay=next_image->delay;
11015 if (final_delay != initial_delay || final_delay > 1UL*
11016 next_image->ticks_per_second)
11017 mng_info->need_fram=1;
11019 #if defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED) || \
11020 defined(PNG_MNG_FEATURES_SUPPORTED)
11022 check for global palette possibility.
11024 if (image->matte != MagickFalse)
11025 need_local_plte=MagickTrue;
11027 if (need_local_plte == 0)
11029 if (ImageIsGray(image) == MagickFalse)
11030 all_images_are_gray=MagickFalse;
11031 mng_info->equal_palettes=PalettesAreEqual(image,next_image);
11032 if (use_global_plte == 0)
11033 use_global_plte=mng_info->equal_palettes;
11034 need_local_plte=!mng_info->equal_palettes;
11037 if (GetNextImageInList(next_image) != (Image *) NULL)
11039 if (next_image->background_color.red !=
11040 next_image->next->background_color.red ||
11041 next_image->background_color.green !=
11042 next_image->next->background_color.green ||
11043 next_image->background_color.blue !=
11044 next_image->next->background_color.blue)
11045 mng_info->equal_backgrounds=MagickFalse;
11047 if (next_image->gamma != next_image->next->gamma)
11048 mng_info->equal_gammas=MagickFalse;
11050 if (next_image->rendering_intent !=
11051 next_image->next->rendering_intent)
11052 mng_info->equal_srgbs=MagickFalse;
11054 if ((next_image->units != next_image->next->units) ||
11055 (next_image->x_resolution != next_image->next->x_resolution) ||
11056 (next_image->y_resolution != next_image->next->y_resolution))
11057 mng_info->equal_physs=MagickFalse;
11059 if (mng_info->equal_chrms)
11061 if (next_image->chromaticity.red_primary.x !=
11062 next_image->next->chromaticity.red_primary.x ||
11063 next_image->chromaticity.red_primary.y !=
11064 next_image->next->chromaticity.red_primary.y ||
11065 next_image->chromaticity.green_primary.x !=
11066 next_image->next->chromaticity.green_primary.x ||
11067 next_image->chromaticity.green_primary.y !=
11068 next_image->next->chromaticity.green_primary.y ||
11069 next_image->chromaticity.blue_primary.x !=
11070 next_image->next->chromaticity.blue_primary.x ||
11071 next_image->chromaticity.blue_primary.y !=
11072 next_image->next->chromaticity.blue_primary.y ||
11073 next_image->chromaticity.white_point.x !=
11074 next_image->next->chromaticity.white_point.x ||
11075 next_image->chromaticity.white_point.y !=
11076 next_image->next->chromaticity.white_point.y)
11077 mng_info->equal_chrms=MagickFalse;
11081 next_image=GetNextImageInList(next_image);
11083 if (image_count < 2)
11085 mng_info->equal_backgrounds=MagickFalse;
11086 mng_info->equal_chrms=MagickFalse;
11087 mng_info->equal_gammas=MagickFalse;
11088 mng_info->equal_srgbs=MagickFalse;
11089 mng_info->equal_physs=MagickFalse;
11090 use_global_plte=MagickFalse;
11091 #ifdef PNG_WRITE_EMPTY_PLTE_SUPPORTED
11092 need_local_plte=MagickTrue;
11094 need_iterations=MagickFalse;
11097 if (mng_info->need_fram == MagickFalse)
11100 Only certain framing rates 100/n are exactly representable without
11101 the FRAM chunk but we'll allow some slop in VLC files
11103 if (final_delay == 0)
11105 if (need_iterations != MagickFalse)
11108 It's probably a GIF with loop; don't run it *too* fast.
11110 if (mng_info->adjoin)
11113 (void) ThrowMagickException(&image->exception,
11114 GetMagickModule(),CoderWarning,
11115 "input has zero delay between all frames; assuming",
11120 mng_info->ticks_per_second=0;
11122 if (final_delay != 0)
11123 mng_info->ticks_per_second=(png_uint_32)
11124 (image->ticks_per_second/final_delay);
11125 if (final_delay > 50)
11126 mng_info->ticks_per_second=2;
11128 if (final_delay > 75)
11129 mng_info->ticks_per_second=1;
11131 if (final_delay > 125)
11132 mng_info->need_fram=MagickTrue;
11134 if (need_defi && final_delay > 2 && (final_delay != 4) &&
11135 (final_delay != 5) && (final_delay != 10) && (final_delay != 20) &&
11136 (final_delay != 25) && (final_delay != 50) && (final_delay !=
11137 1UL*image->ticks_per_second))
11138 mng_info->need_fram=MagickTrue; /* make it exact; cannot be VLC */
11141 if (mng_info->need_fram != MagickFalse)
11142 mng_info->ticks_per_second=1UL*image->ticks_per_second;
11144 If pseudocolor, we should also check to see if all the
11145 palettes are identical and write a global PLTE if they are.
11149 Write the MNG version 1.0 signature and MHDR chunk.
11151 (void) WriteBlob(image,8,(const unsigned char *) "\212MNG\r\n\032\n");
11152 (void) WriteBlobMSBULong(image,28L); /* chunk data length=28 */
11153 PNGType(chunk,mng_MHDR);
11154 LogPNGChunk(logging,mng_MHDR,28L);
11155 PNGLong(chunk+4,(png_uint_32) mng_info->page.width);
11156 PNGLong(chunk+8,(png_uint_32) mng_info->page.height);
11157 PNGLong(chunk+12,mng_info->ticks_per_second);
11158 PNGLong(chunk+16,0L); /* layer count=unknown */
11159 PNGLong(chunk+20,0L); /* frame count=unknown */
11160 PNGLong(chunk+24,0L); /* play time=unknown */
11165 if (need_defi || mng_info->need_fram || use_global_plte)
11166 PNGLong(chunk+28,27L); /* simplicity=LC+JNG */
11169 PNGLong(chunk+28,25L); /* simplicity=VLC+JNG */
11174 if (need_defi || mng_info->need_fram || use_global_plte)
11175 PNGLong(chunk+28,19L); /* simplicity=LC+JNG, no transparency */
11178 PNGLong(chunk+28,17L); /* simplicity=VLC+JNG, no transparency */
11186 if (need_defi || mng_info->need_fram || use_global_plte)
11187 PNGLong(chunk+28,11L); /* simplicity=LC */
11190 PNGLong(chunk+28,9L); /* simplicity=VLC */
11195 if (need_defi || mng_info->need_fram || use_global_plte)
11196 PNGLong(chunk+28,3L); /* simplicity=LC, no transparency */
11199 PNGLong(chunk+28,1L); /* simplicity=VLC, no transparency */
11202 (void) WriteBlob(image,32,chunk);
11203 (void) WriteBlobMSBULong(image,crc32(0,chunk,32));
11204 option=GetImageOption(image_info,"mng:need-cacheoff");
11205 if (option != (const char *) NULL)
11211 Write "nEED CACHEOFF" to turn playback caching off for streaming MNG.
11213 PNGType(chunk,mng_nEED);
11214 length=CopyMagickString((char *) chunk+4,"CACHEOFF",20);
11215 (void) WriteBlobMSBULong(image,(size_t) length);
11216 LogPNGChunk(logging,mng_nEED,(size_t) length);
11218 (void) WriteBlob(image,length,chunk);
11219 (void) WriteBlobMSBULong(image,crc32(0,chunk,(uInt) length));
11221 if ((GetPreviousImageInList(image) == (Image *) NULL) &&
11222 (GetNextImageInList(image) != (Image *) NULL) &&
11223 (image->iterations != 1))
11226 Write MNG TERM chunk
11228 (void) WriteBlobMSBULong(image,10L); /* data length=10 */
11229 PNGType(chunk,mng_TERM);
11230 LogPNGChunk(logging,mng_TERM,10L);
11231 chunk[4]=3; /* repeat animation */
11232 chunk[5]=0; /* show last frame when done */
11233 PNGLong(chunk+6,(png_uint_32) (mng_info->ticks_per_second*
11234 final_delay/MagickMax(image->ticks_per_second,1)));
11236 if (image->iterations == 0)
11237 PNGLong(chunk+10,PNG_UINT_31_MAX);
11240 PNGLong(chunk+10,(png_uint_32) image->iterations);
11242 if (logging != MagickFalse)
11244 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
11245 " TERM delay: %.20g",(double) (mng_info->ticks_per_second*
11246 final_delay/MagickMax(image->ticks_per_second,1)));
11248 if (image->iterations == 0)
11249 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
11250 " TERM iterations: %.20g",(double) PNG_UINT_31_MAX);
11253 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
11254 " Image iterations: %.20g",(double) image->iterations);
11256 (void) WriteBlob(image,14,chunk);
11257 (void) WriteBlobMSBULong(image,crc32(0,chunk,14));
11260 To do: check for cHRM+gAMA == sRGB, and write sRGB instead.
11262 if ((image->colorspace == sRGBColorspace || image->rendering_intent) &&
11263 mng_info->equal_srgbs)
11266 Write MNG sRGB chunk
11268 (void) WriteBlobMSBULong(image,1L);
11269 PNGType(chunk,mng_sRGB);
11270 LogPNGChunk(logging,mng_sRGB,1L);
11272 if (image->rendering_intent != UndefinedIntent)
11273 chunk[4]=(unsigned char)
11274 Magick_RenderingIntent_to_PNG_RenderingIntent(
11275 (image->rendering_intent));
11278 chunk[4]=(unsigned char)
11279 Magick_RenderingIntent_to_PNG_RenderingIntent(
11280 (PerceptualIntent));
11282 (void) WriteBlob(image,5,chunk);
11283 (void) WriteBlobMSBULong(image,crc32(0,chunk,5));
11284 mng_info->have_write_global_srgb=MagickTrue;
11289 if (image->gamma && mng_info->equal_gammas)
11292 Write MNG gAMA chunk
11294 (void) WriteBlobMSBULong(image,4L);
11295 PNGType(chunk,mng_gAMA);
11296 LogPNGChunk(logging,mng_gAMA,4L);
11297 PNGLong(chunk+4,(png_uint_32) (100000*image->gamma+0.5));
11298 (void) WriteBlob(image,8,chunk);
11299 (void) WriteBlobMSBULong(image,crc32(0,chunk,8));
11300 mng_info->have_write_global_gama=MagickTrue;
11302 if (mng_info->equal_chrms)
11308 Write MNG cHRM chunk
11310 (void) WriteBlobMSBULong(image,32L);
11311 PNGType(chunk,mng_cHRM);
11312 LogPNGChunk(logging,mng_cHRM,32L);
11313 primary=image->chromaticity.white_point;
11314 PNGLong(chunk+4,(png_uint_32) (100000*primary.x+0.5));
11315 PNGLong(chunk+8,(png_uint_32) (100000*primary.y+0.5));
11316 primary=image->chromaticity.red_primary;
11317 PNGLong(chunk+12,(png_uint_32) (100000*primary.x+0.5));
11318 PNGLong(chunk+16,(png_uint_32) (100000*primary.y+0.5));
11319 primary=image->chromaticity.green_primary;
11320 PNGLong(chunk+20,(png_uint_32) (100000*primary.x+0.5));
11321 PNGLong(chunk+24,(png_uint_32) (100000*primary.y+0.5));
11322 primary=image->chromaticity.blue_primary;
11323 PNGLong(chunk+28,(png_uint_32) (100000*primary.x+0.5));
11324 PNGLong(chunk+32,(png_uint_32) (100000*primary.y+0.5));
11325 (void) WriteBlob(image,36,chunk);
11326 (void) WriteBlobMSBULong(image,crc32(0,chunk,36));
11327 mng_info->have_write_global_chrm=MagickTrue;
11330 if (image->x_resolution && image->y_resolution && mng_info->equal_physs)
11333 Write MNG pHYs chunk
11335 (void) WriteBlobMSBULong(image,9L);
11336 PNGType(chunk,mng_pHYs);
11337 LogPNGChunk(logging,mng_pHYs,9L);
11339 if (image->units == PixelsPerInchResolution)
11341 PNGLong(chunk+4,(png_uint_32)
11342 (image->x_resolution*100.0/2.54+0.5));
11344 PNGLong(chunk+8,(png_uint_32)
11345 (image->y_resolution*100.0/2.54+0.5));
11352 if (image->units == PixelsPerCentimeterResolution)
11354 PNGLong(chunk+4,(png_uint_32)
11355 (image->x_resolution*100.0+0.5));
11357 PNGLong(chunk+8,(png_uint_32)
11358 (image->y_resolution*100.0+0.5));
11365 PNGLong(chunk+4,(png_uint_32) (image->x_resolution+0.5));
11366 PNGLong(chunk+8,(png_uint_32) (image->y_resolution+0.5));
11370 (void) WriteBlob(image,13,chunk);
11371 (void) WriteBlobMSBULong(image,crc32(0,chunk,13));
11374 Write MNG BACK chunk and global bKGD chunk, if the image is transparent
11375 or does not cover the entire frame.
11377 if (write_mng && (image->matte || image->page.x > 0 ||
11378 image->page.y > 0 || (image->page.width &&
11379 (image->page.width+image->page.x < mng_info->page.width))
11380 || (image->page.height && (image->page.height+image->page.y
11381 < mng_info->page.height))))
11383 (void) WriteBlobMSBULong(image,6L);
11384 PNGType(chunk,mng_BACK);
11385 LogPNGChunk(logging,mng_BACK,6L);
11386 red=ScaleQuantumToShort(image->background_color.red);
11387 green=ScaleQuantumToShort(image->background_color.green);
11388 blue=ScaleQuantumToShort(image->background_color.blue);
11389 PNGShort(chunk+4,red);
11390 PNGShort(chunk+6,green);
11391 PNGShort(chunk+8,blue);
11392 (void) WriteBlob(image,10,chunk);
11393 (void) WriteBlobMSBULong(image,crc32(0,chunk,10));
11394 if (mng_info->equal_backgrounds)
11396 (void) WriteBlobMSBULong(image,6L);
11397 PNGType(chunk,mng_bKGD);
11398 LogPNGChunk(logging,mng_bKGD,6L);
11399 (void) WriteBlob(image,10,chunk);
11400 (void) WriteBlobMSBULong(image,crc32(0,chunk,10));
11404 #ifdef PNG_WRITE_EMPTY_PLTE_SUPPORTED
11405 if ((need_local_plte == MagickFalse) &&
11406 (image->storage_class == PseudoClass) &&
11407 (all_images_are_gray == MagickFalse))
11413 Write MNG PLTE chunk
11415 data_length=3*image->colors;
11416 (void) WriteBlobMSBULong(image,data_length);
11417 PNGType(chunk,mng_PLTE);
11418 LogPNGChunk(logging,mng_PLTE,data_length);
11420 for (i=0; i < (ssize_t) image->colors; i++)
11422 chunk[4+i*3]=ScaleQuantumToChar(image->colormap[i].red) & 0xff;
11423 chunk[5+i*3]=ScaleQuantumToChar(image->colormap[i].green) & 0xff;
11424 chunk[6+i*3]=ScaleQuantumToChar(image->colormap[i].blue) & 0xff;
11427 (void) WriteBlob(image,data_length+4,chunk);
11428 (void) WriteBlobMSBULong(image,crc32(0,chunk,(uInt) (data_length+4)));
11429 mng_info->have_write_global_plte=MagickTrue;
11435 #if defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED) || \
11436 defined(PNG_MNG_FEATURES_SUPPORTED)
11437 mng_info->equal_palettes=MagickFalse;
11441 if (mng_info->adjoin)
11443 #if defined(PNG_WRITE_EMPTY_PLTE_SUPPORTED) || \
11444 defined(PNG_MNG_FEATURES_SUPPORTED)
11446 If we aren't using a global palette for the entire MNG, check to
11447 see if we can use one for two or more consecutive images.
11449 if (need_local_plte && use_global_plte && !all_images_are_gray)
11451 if (mng_info->IsPalette)
11454 When equal_palettes is true, this image has the same palette
11455 as the previous PseudoClass image
11457 mng_info->have_write_global_plte=mng_info->equal_palettes;
11458 mng_info->equal_palettes=PalettesAreEqual(image,image->next);
11459 if (mng_info->equal_palettes && !mng_info->have_write_global_plte)
11462 Write MNG PLTE chunk
11467 data_length=3*image->colors;
11468 (void) WriteBlobMSBULong(image,data_length);
11469 PNGType(chunk,mng_PLTE);
11470 LogPNGChunk(logging,mng_PLTE,data_length);
11472 for (i=0; i < (ssize_t) image->colors; i++)
11474 chunk[4+i*3]=ScaleQuantumToChar(image->colormap[i].red);
11475 chunk[5+i*3]=ScaleQuantumToChar(image->colormap[i].green);
11476 chunk[6+i*3]=ScaleQuantumToChar(image->colormap[i].blue);
11479 (void) WriteBlob(image,data_length+4,chunk);
11480 (void) WriteBlobMSBULong(image,crc32(0,chunk,
11481 (uInt) (data_length+4)));
11482 mng_info->have_write_global_plte=MagickTrue;
11486 mng_info->have_write_global_plte=MagickFalse;
11497 previous_x=mng_info->page.x;
11498 previous_y=mng_info->page.y;
11505 mng_info->page=image->page;
11506 if ((mng_info->page.x != previous_x) ||
11507 (mng_info->page.y != previous_y))
11509 (void) WriteBlobMSBULong(image,12L); /* data length=12 */
11510 PNGType(chunk,mng_DEFI);
11511 LogPNGChunk(logging,mng_DEFI,12L);
11512 chunk[4]=0; /* object 0 MSB */
11513 chunk[5]=0; /* object 0 LSB */
11514 chunk[6]=0; /* visible */
11515 chunk[7]=0; /* abstract */
11516 PNGLong(chunk+8,(png_uint_32) mng_info->page.x);
11517 PNGLong(chunk+12,(png_uint_32) mng_info->page.y);
11518 (void) WriteBlob(image,16,chunk);
11519 (void) WriteBlobMSBULong(image,crc32(0,chunk,16));
11524 mng_info->write_mng=write_mng;
11526 if ((int) image->dispose >= 3)
11527 mng_info->framing_mode=3;
11529 if (mng_info->need_fram && mng_info->adjoin &&
11530 ((image->delay != mng_info->delay) ||
11531 (mng_info->framing_mode != mng_info->old_framing_mode)))
11533 if (image->delay == mng_info->delay)
11536 Write a MNG FRAM chunk with the new framing mode.
11538 (void) WriteBlobMSBULong(image,1L); /* data length=1 */
11539 PNGType(chunk,mng_FRAM);
11540 LogPNGChunk(logging,mng_FRAM,1L);
11541 chunk[4]=(unsigned char) mng_info->framing_mode;
11542 (void) WriteBlob(image,5,chunk);
11543 (void) WriteBlobMSBULong(image,crc32(0,chunk,5));
11548 Write a MNG FRAM chunk with the delay.
11550 (void) WriteBlobMSBULong(image,10L); /* data length=10 */
11551 PNGType(chunk,mng_FRAM);
11552 LogPNGChunk(logging,mng_FRAM,10L);
11553 chunk[4]=(unsigned char) mng_info->framing_mode;
11554 chunk[5]=0; /* frame name separator (no name) */
11555 chunk[6]=2; /* flag for changing default delay */
11556 chunk[7]=0; /* flag for changing frame timeout */
11557 chunk[8]=0; /* flag for changing frame clipping */
11558 chunk[9]=0; /* flag for changing frame sync_id */
11559 PNGLong(chunk+10,(png_uint_32)
11560 ((mng_info->ticks_per_second*
11561 image->delay)/MagickMax(image->ticks_per_second,1)));
11562 (void) WriteBlob(image,14,chunk);
11563 (void) WriteBlobMSBULong(image,crc32(0,chunk,14));
11564 mng_info->delay=(png_uint_32) image->delay;
11566 mng_info->old_framing_mode=mng_info->framing_mode;
11569 #if defined(JNG_SUPPORTED)
11570 if (image_info->compression == JPEGCompression)
11575 if (logging != MagickFalse)
11576 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
11577 " Writing JNG object.");
11578 /* To do: specify the desired alpha compression method. */
11579 write_info=CloneImageInfo(image_info);
11580 write_info->compression=UndefinedCompression;
11581 status=WriteOneJNGImage(mng_info,write_info,image);
11582 write_info=DestroyImageInfo(write_info);
11587 if (logging != MagickFalse)
11588 (void) LogMagickEvent(CoderEvent,GetMagickModule(),
11589 " Writing PNG object.");
11591 mng_info->need_blob = MagickFalse;
11593 /* We don't want any ancillary chunks written */
11594 mng_info->ping_exclude_bKGD=MagickTrue;
11595 mng_info->ping_exclude_cHRM=MagickTrue;
11596 mng_info->ping_exclude_EXIF=MagickTrue;
11597 mng_info->ping_exclude_gAMA=MagickTrue;
11598 mng_info->ping_exclude_cHRM=MagickTrue;
11599 mng_info->ping_exclude_iCCP=MagickTrue;
11600 /* mng_info->ping_exclude_iTXt=MagickTrue; */
11601 mng_info->ping_exclude_oFFs=MagickTrue;
11602 mng_info->ping_exclude_pHYs=MagickTrue;
11603 mng_info->ping_exclude_sRGB=MagickTrue;
11604 mng_info->ping_exclude_tEXt=MagickTrue;
11605 mng_info->ping_exclude_tRNS=MagickTrue;
11606 mng_info->ping_exclude_vpAg=MagickTrue;
11607 mng_info->ping_exclude_zCCP=MagickTrue;
11608 mng_info->ping_exclude_zTXt=MagickTrue;
11610 status=WriteOnePNGImage(mng_info,image_info,image);
11613 if (status == MagickFalse)
11615 MngInfoFreeStruct(mng_info,&have_mng_structure);
11616 (void) CloseBlob(image);
11617 return(MagickFalse);
11619 (void) CatchImageException(image);
11620 if (GetNextImageInList(image) == (Image *) NULL)
11622 image=SyncNextImageInList(image);
11623 status=SetImageProgress(image,SaveImagesTag,scene++,
11624 GetImageListLength(image));
11626 if (status == MagickFalse)
11629 } while (mng_info->adjoin);
11633 while (GetPreviousImageInList(image) != (Image *) NULL)
11634 image=GetPreviousImageInList(image);
11636 Write the MEND chunk.
11638 (void) WriteBlobMSBULong(image,0x00000000L);
11639 PNGType(chunk,mng_MEND);
11640 LogPNGChunk(logging,mng_MEND,0L);
11641 (void) WriteBlob(image,4,chunk);
11642 (void) WriteBlobMSBULong(image,crc32(0,chunk,4));
11645 Relinquish resources.
11647 (void) CloseBlob(image);
11648 MngInfoFreeStruct(mng_info,&have_mng_structure);
11650 if (logging != MagickFalse)
11651 (void) LogMagickEvent(CoderEvent,GetMagickModule(),"exit WriteMNGImage()");
11653 return(MagickTrue);
11655 #else /* PNG_LIBPNG_VER > 10011 */
11657 static MagickBooleanType WritePNGImage(const ImageInfo *image_info,Image *image)
11660 printf("Your PNG library is too old: You have libpng-%s\n",
11661 PNG_LIBPNG_VER_STRING);
11663 ThrowBinaryException(CoderError,"PNG library is too old",
11664 image_info->filename);
11667 static MagickBooleanType WriteMNGImage(const ImageInfo *image_info,Image *image)
11669 return(WritePNGImage(image_info,image));
11671 #endif /* PNG_LIBPNG_VER > 10011 */