• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 %                                                                             %
4 %                                                                             %
5 %                                                                             %
6 %                            EEEEE  PPPP   TTTTT                              %
7 %                            E      P   P    T                                %
8 %                            EEE    PPPP     T                                %
9 %                            E      P        T                                %
10 %                            EEEEE  P        T                                %
11 %                                                                             %
12 %                                                                             %
13 %           Read/Write Encapsulated Postscript Format (with preview).         %
14 %                                                                             %
15 %                              Software Design                                %
16 %                                   Cristy                                    %
17 %                                 July 1992                                   %
18 %                                                                             %
19 %                                                                             %
20 %  Copyright 1999-2016 ImageMagick Studio LLC, a non-profit organization      %
21 %  dedicated to making software imaging solutions freely available.           %
22 %                                                                             %
23 %  You may not use this file except in compliance with the License.  You may  %
24 %  obtain a copy of the License at                                            %
25 %                                                                             %
26 %    http://www.imagemagick.org/script/license.php                            %
27 %                                                                             %
28 %  Unless required by applicable law or agreed to in writing, software        %
29 %  distributed under the License is distributed on an "AS IS" BASIS,          %
30 %  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   %
31 %  See the License for the specific language governing permissions and        %
32 %  limitations under the License.                                             %
33 %                                                                             %
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
35 %
36 %
37 */
38 
39 /*
40   Include declarations.
41 */
42 #include "MagickCore/studio.h"
43 #include "MagickCore/blob.h"
44 #include "MagickCore/blob-private.h"
45 #include "MagickCore/color.h"
46 #include "MagickCore/constitute.h"
47 #include "MagickCore/draw.h"
48 #include "MagickCore/exception.h"
49 #include "MagickCore/exception-private.h"
50 #include "MagickCore/delegate.h"
51 #include "MagickCore/geometry.h"
52 #include "MagickCore/histogram.h"
53 #include "MagickCore/image.h"
54 #include "MagickCore/image-private.h"
55 #include "MagickCore/list.h"
56 #include "MagickCore/magick.h"
57 #include "MagickCore/memory_.h"
58 #include "MagickCore/monitor.h"
59 #include "MagickCore/monitor-private.h"
60 #include "MagickCore/quantize.h"
61 #include "MagickCore/resource_.h"
62 #include "MagickCore/resize.h"
63 #include "MagickCore/quantum-private.h"
64 #include "MagickCore/static.h"
65 #include "MagickCore/string_.h"
66 #include "MagickCore/module.h"
67 #include "MagickCore/utility.h"
68 
69 /*
70   Typedef declarations.
71 */
72 typedef struct _EPTInfo
73 {
74   size_t
75     magick;
76 
77   MagickOffsetType
78     postscript_offset,
79     tiff_offset;
80 
81   size_t
82     postscript_length,
83     tiff_length;
84 
85   unsigned char
86     *postscript,
87     *tiff;
88 } EPTInfo;
89 
90 /*
91   Forward declarations.
92 */
93 static MagickBooleanType
94   WriteEPTImage(const ImageInfo *,Image *,ExceptionInfo *);
95 
96 /*
97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
98 %                                                                             %
99 %                                                                             %
100 %                                                                             %
101 %   I s E P T                                                                 %
102 %                                                                             %
103 %                                                                             %
104 %                                                                             %
105 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
106 %
107 %  IsEPT() returns MagickTrue if the image format type, identified by the
108 %  magick string, is EPT.
109 %
110 %  The format of the IsEPT method is:
111 %
112 %      MagickBooleanType IsEPT(const unsigned char *magick,const size_t length)
113 %
114 %  A description of each parameter follows:
115 %
116 %    o magick: compare image format pattern against these bytes.
117 %
118 %    o length: Specifies the length of the magick string.
119 %
120 */
IsEPT(const unsigned char * magick,const size_t length)121 static MagickBooleanType IsEPT(const unsigned char *magick,const size_t length)
122 {
123   if (length < 4)
124     return(MagickFalse);
125   if (memcmp(magick,"\305\320\323\306",4) == 0)
126     return(MagickTrue);
127   return(MagickFalse);
128 }
129 
130 /*
131 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
132 %                                                                             %
133 %                                                                             %
134 %                                                                             %
135 %   R e a d E P T I m a g e                                                   %
136 %                                                                             %
137 %                                                                             %
138 %                                                                             %
139 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
140 %
141 %  ReadEPTImage() reads a binary Postscript image file and returns it.  It
142 %  allocates the memory necessary for the new Image structure and returns a
143 %  pointer to the new image.
144 %
145 %  The format of the ReadEPTImage method is:
146 %
147 %      Image *ReadEPTImage(const ImageInfo *image_info,
148 %        ExceptionInfo *exception)
149 %
150 %  A description of each parameter follows:
151 %
152 %    o image_info: the image info.
153 %
154 %    o exception: return any errors or warnings in this structure.
155 %
156 */
ReadEPTImage(const ImageInfo * image_info,ExceptionInfo * exception)157 static Image *ReadEPTImage(const ImageInfo *image_info,ExceptionInfo *exception)
158 {
159   EPTInfo
160     ept_info;
161 
162   Image
163     *image;
164 
165   ImageInfo
166     *read_info;
167 
168   MagickBooleanType
169     status;
170 
171   MagickOffsetType
172     offset;
173 
174   ssize_t
175     count;
176 
177   /*
178     Open image file.
179   */
180   assert(image_info != (const ImageInfo *) NULL);
181   assert(image_info->signature == MagickCoreSignature);
182   if (image_info->debug != MagickFalse)
183     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
184       image_info->filename);
185   assert(exception != (ExceptionInfo *) NULL);
186   assert(exception->signature == MagickCoreSignature);
187   image=AcquireImage(image_info,exception);
188   status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
189   if (status == MagickFalse)
190     {
191       image=DestroyImageList(image);
192       return((Image *) NULL);
193     }
194   ept_info.magick=ReadBlobLSBLong(image);
195   if (ept_info.magick != 0xc6d3d0c5ul)
196     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
197   ept_info.postscript_offset=(MagickOffsetType) ReadBlobLSBLong(image);
198   ept_info.postscript_length=ReadBlobLSBLong(image);
199   (void) ReadBlobLSBLong(image);
200   (void) ReadBlobLSBLong(image);
201   ept_info.tiff_offset=(MagickOffsetType) ReadBlobLSBLong(image);
202   ept_info.tiff_length=ReadBlobLSBLong(image);
203   (void) ReadBlobLSBShort(image);
204   ept_info.postscript=(unsigned char *) AcquireQuantumMemory(
205     ept_info.postscript_length+1,sizeof(*ept_info.postscript));
206   if (ept_info.postscript == (unsigned char *) NULL)
207     ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
208   (void) ResetMagickMemory(ept_info.postscript,0,(ept_info.postscript_length+1)*
209     sizeof(*ept_info.postscript));
210   ept_info.tiff=(unsigned char *) AcquireQuantumMemory(ept_info.tiff_length+1,
211     sizeof(*ept_info.tiff));
212   if (ept_info.tiff == (unsigned char *) NULL)
213     ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
214   (void) ResetMagickMemory(ept_info.tiff,0,(ept_info.tiff_length+1)*
215     sizeof(*ept_info.tiff));
216   offset=SeekBlob(image,ept_info.tiff_offset,SEEK_SET);
217   if (offset < 30)
218     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
219   count=ReadBlob(image,ept_info.tiff_length,ept_info.tiff);
220   if (count != (ssize_t) (ept_info.tiff_length))
221     (void) ThrowMagickException(exception,GetMagickModule(),CorruptImageWarning,
222       "InsufficientImageDataInFile","`%s'",image->filename);
223   offset=SeekBlob(image,ept_info.postscript_offset,SEEK_SET);
224   if (offset < 30)
225     ThrowReaderException(CorruptImageError,"ImproperImageHeader");
226   count=ReadBlob(image,ept_info.postscript_length,ept_info.postscript);
227   if (count != (ssize_t) (ept_info.postscript_length))
228     (void) ThrowMagickException(exception,GetMagickModule(),CorruptImageWarning,
229       "InsufficientImageDataInFile","`%s'",image->filename);
230   (void) CloseBlob(image);
231   image=DestroyImage(image);
232   read_info=CloneImageInfo(image_info);
233   (void) CopyMagickString(read_info->magick,"EPS",MagickPathExtent);
234   image=BlobToImage(read_info,ept_info.postscript,ept_info.postscript_length,
235     exception);
236   if (image == (Image *) NULL)
237     {
238       (void) CopyMagickString(read_info->magick,"TIFF",MagickPathExtent);
239       image=BlobToImage(read_info,ept_info.tiff,ept_info.tiff_length,exception);
240     }
241   read_info=DestroyImageInfo(read_info);
242   if (image != (Image *) NULL)
243     {
244       (void) CopyMagickString(image->filename,image_info->filename,
245         MagickPathExtent);
246       (void) CopyMagickString(image->magick,"EPT",MagickPathExtent);
247     }
248   ept_info.tiff=(unsigned char *) RelinquishMagickMemory(ept_info.tiff);
249   ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
250     ept_info.postscript);
251   return(image);
252 }
253 
254 /*
255 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
256 %                                                                             %
257 %                                                                             %
258 %                                                                             %
259 %   R e g i s t e r E P T I m a g e                                           %
260 %                                                                             %
261 %                                                                             %
262 %                                                                             %
263 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
264 %
265 %  RegisterEPTImage() adds attributes for the EPT image format to
266 %  the list of supported formats.  The attributes include the image format
267 %  tag, a method to read and/or write the format, whether the format
268 %  supports the saving of more than one frame to the same file or blob,
269 %  whether the format supports native in-memory I/O, and a brief
270 %  description of the format.
271 %
272 %  The format of the RegisterEPTImage method is:
273 %
274 %      size_t RegisterEPTImage(void)
275 %
276 */
RegisterEPTImage(void)277 ModuleExport size_t RegisterEPTImage(void)
278 {
279   MagickInfo
280     *entry;
281 
282   entry=AcquireMagickInfo("EPT","EPT",
283     "Encapsulated PostScript with TIFF preview");
284   entry->decoder=(DecodeImageHandler *) ReadEPTImage;
285   entry->encoder=(EncodeImageHandler *) WriteEPTImage;
286   entry->magick=(IsImageFormatHandler *) IsEPT;
287   entry->flags|=CoderSeekableStreamFlag;
288   entry->flags^=CoderAdjoinFlag;
289   entry->flags^=CoderBlobSupportFlag;
290   (void) RegisterMagickInfo(entry);
291   entry=AcquireMagickInfo("EPT","EPT2",
292     "Encapsulated PostScript Level II with TIFF preview");
293   entry->decoder=(DecodeImageHandler *) ReadEPTImage;
294   entry->encoder=(EncodeImageHandler *) WriteEPTImage;
295   entry->magick=(IsImageFormatHandler *) IsEPT;
296   entry->flags^=CoderAdjoinFlag;
297   entry->flags|=CoderSeekableStreamFlag;
298   entry->flags^=CoderBlobSupportFlag;
299   (void) RegisterMagickInfo(entry);
300   entry=AcquireMagickInfo("EPT","EPT3",
301     "Encapsulated PostScript Level III with TIFF preview");
302   entry->decoder=(DecodeImageHandler *) ReadEPTImage;
303   entry->encoder=(EncodeImageHandler *) WriteEPTImage;
304   entry->magick=(IsImageFormatHandler *) IsEPT;
305   entry->flags|=CoderSeekableStreamFlag;
306   entry->flags^=CoderBlobSupportFlag;
307   (void) RegisterMagickInfo(entry);
308   return(MagickImageCoderSignature);
309 }
310 
311 /*
312 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
313 %                                                                             %
314 %                                                                             %
315 %                                                                             %
316 %   U n r e g i s t e r E P T I m a g e                                       %
317 %                                                                             %
318 %                                                                             %
319 %                                                                             %
320 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
321 %
322 %  UnregisterEPTImage() removes format registrations made by the
323 %  EPT module from the list of supported formats.
324 %
325 %  The format of the UnregisterEPTImage method is:
326 %
327 %      UnregisterEPTImage(void)
328 %
329 */
UnregisterEPTImage(void)330 ModuleExport void UnregisterEPTImage(void)
331 {
332   (void) UnregisterMagickInfo("EPT");
333 }
334 
335 /*
336 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
337 %                                                                             %
338 %                                                                             %
339 %                                                                             %
340 %   W r i t e E P T I m a g e                                                 %
341 %                                                                             %
342 %                                                                             %
343 %                                                                             %
344 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
345 %
346 %  WriteEPTImage() writes an image in the Encapsulated Postscript format
347 %  with a TIFF preview.
348 %
349 %  The format of the WriteEPTImage method is:
350 %
351 %      MagickBooleanType WriteEPTImage(const ImageInfo *image_info,
352 %        Image *image,ExceptionInfo *exception)
353 %
354 %  A description of each parameter follows.
355 %
356 %    o image_info: the image info.
357 %
358 %    o image:  The image.
359 %
360 %    o exception: return any errors or warnings in this structure.
361 %
362 */
WriteEPTImage(const ImageInfo * image_info,Image * image,ExceptionInfo * exception)363 static MagickBooleanType WriteEPTImage(const ImageInfo *image_info,Image *image,
364   ExceptionInfo *exception)
365 {
366   char
367      filename[MagickPathExtent];
368 
369   EPTInfo
370     ept_info;
371 
372   Image
373     *write_image;
374 
375   ImageInfo
376     *write_info;
377 
378   MagickBooleanType
379     status;
380 
381   /*
382     Write EPT image.
383   */
384   assert(image_info != (const ImageInfo *) NULL);
385   assert(image_info->signature == MagickCoreSignature);
386   assert(image != (Image *) NULL);
387   assert(image->signature == MagickCoreSignature);
388   if (image->debug != MagickFalse)
389     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
390   assert(exception != (ExceptionInfo *) NULL);
391   assert(exception->signature == MagickCoreSignature);
392   status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception);
393   if (status == MagickFalse)
394     return(status);
395   write_image=CloneImage(image,0,0,MagickTrue,exception);
396   if (write_image == (Image *) NULL)
397     return(MagickFalse);
398   write_info=CloneImageInfo(image_info);
399   (void) CopyMagickString(write_info->magick,"EPS",MagickPathExtent);
400   if (LocaleCompare(image_info->magick,"EPT2") == 0)
401     (void) CopyMagickString(write_info->magick,"EPS2",MagickPathExtent);
402   if (LocaleCompare(image_info->magick,"EPT3") == 0)
403     (void) CopyMagickString(write_info->magick,"EPS3",MagickPathExtent);
404   (void) ResetMagickMemory(&ept_info,0,sizeof(ept_info));
405   ept_info.magick=0xc6d3d0c5ul;
406   ept_info.postscript=(unsigned char *) ImageToBlob(write_info,write_image,
407     &ept_info.postscript_length,exception);
408   write_image=DestroyImage(write_image);
409   write_info=DestroyImageInfo(write_info);
410   if (ept_info.postscript == (void *) NULL)
411     return(MagickFalse);
412   write_image=CloneImage(image,0,0,MagickTrue,exception);
413   if (write_image == (Image *) NULL)
414     return(MagickFalse);
415   write_info=CloneImageInfo(image_info);
416   *write_info->magick='\0';
417   (void) CopyMagickString(write_info->magick,"TIFF",MagickPathExtent);
418   (void) FormatLocaleString(filename,MagickPathExtent,"tiff:%s",
419     write_info->filename);
420   (void) CopyMagickString(write_info->filename,filename,MagickPathExtent);
421   if ((write_image->columns > 512) || (write_image->rows > 512))
422     {
423       Image
424         *resize_image;
425 
426       resize_image=ResizeImage(write_image,512,512,write_image->filter,
427         exception);
428       if (resize_image != (Image *) NULL)
429         {
430           write_image=DestroyImage(write_image);
431           write_image=resize_image;
432         }
433     }
434   if ((write_image->storage_class == DirectClass) ||
435       (write_image->colors > 256))
436     {
437       QuantizeInfo
438         quantize_info;
439 
440       /*
441         EPT preview requires that the image is colormapped.
442       */
443       GetQuantizeInfo(&quantize_info);
444       quantize_info.dither_method=IdentifyPaletteImage(write_image,
445         exception) == MagickFalse ? RiemersmaDitherMethod : NoDitherMethod;
446       (void) QuantizeImage(&quantize_info,write_image,exception);
447     }
448   write_info->compression=NoCompression;
449   ept_info.tiff=(unsigned char *) ImageToBlob(write_info,write_image,
450     &ept_info.tiff_length,exception);
451   write_image=DestroyImage(write_image);
452   write_info=DestroyImageInfo(write_info);
453   if (ept_info.tiff == (void *) NULL)
454     {
455       ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
456         ept_info.postscript);
457       return(MagickFalse);
458     }
459   /*
460     Write EPT image.
461   */
462   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.magick);
463   (void) WriteBlobLSBLong(image,30);
464   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.postscript_length);
465   (void) WriteBlobLSBLong(image,0);
466   (void) WriteBlobLSBLong(image,0);
467   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.postscript_length+30);
468   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.tiff_length);
469   (void) WriteBlobLSBShort(image,0xffff);
470   (void) WriteBlob(image,ept_info.postscript_length,ept_info.postscript);
471   (void) WriteBlob(image,ept_info.tiff_length,ept_info.tiff);
472   /*
473     Relinquish resources.
474   */
475   ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
476     ept_info.postscript);
477   ept_info.tiff=(unsigned char *) RelinquishMagickMemory(ept_info.tiff);
478   (void) CloseBlob(image);
479   return(MagickTrue);
480 }
481