• 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-2019 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 %    https://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   if (ept_info.postscript_length > GetBlobSize(image))
200     ThrowReaderException(CorruptImageError,"InsufficientImageDataInFile");
201   (void) ReadBlobLSBLong(image);
202   (void) ReadBlobLSBLong(image);
203   ept_info.tiff_offset=(MagickOffsetType) ReadBlobLSBLong(image);
204   ept_info.tiff_length=ReadBlobLSBLong(image);
205   if (ept_info.tiff_length > GetBlobSize(image))
206     ThrowReaderException(CorruptImageError,"InsufficientImageDataInFile");
207   (void) ReadBlobLSBShort(image);
208   ept_info.postscript=(unsigned char *) AcquireQuantumMemory(
209     ept_info.postscript_length+1,sizeof(*ept_info.postscript));
210   if (ept_info.postscript == (unsigned char *) NULL)
211     ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
212   (void) memset(ept_info.postscript,0,(ept_info.postscript_length+1)*
213     sizeof(*ept_info.postscript));
214   ept_info.tiff=(unsigned char *) AcquireQuantumMemory(ept_info.tiff_length+1,
215     sizeof(*ept_info.tiff));
216   if (ept_info.tiff == (unsigned char *) NULL)
217     {
218       ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
219         ept_info.postscript);
220       ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
221     }
222   (void) memset(ept_info.tiff,0,(ept_info.tiff_length+1)*
223     sizeof(*ept_info.tiff));
224   offset=SeekBlob(image,ept_info.tiff_offset,SEEK_SET);
225   if ((ept_info.tiff_length != 0) && (offset < 30))
226     {
227       ept_info.tiff=(unsigned char *) RelinquishMagickMemory(ept_info.tiff);
228       ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
229         ept_info.postscript);
230       ThrowReaderException(CorruptImageError,"ImproperImageHeader");
231     }
232   count=ReadBlob(image,ept_info.tiff_length,ept_info.tiff);
233   if (count != (ssize_t) (ept_info.tiff_length))
234     (void) ThrowMagickException(exception,GetMagickModule(),CorruptImageWarning,
235       "InsufficientImageDataInFile","`%s'",image->filename);
236   offset=SeekBlob(image,ept_info.postscript_offset,SEEK_SET);
237   if ((ept_info.postscript_length != 0) && (offset < 30))
238     {
239       ept_info.tiff=(unsigned char *) RelinquishMagickMemory(ept_info.tiff);
240       ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
241         ept_info.postscript);
242       ThrowReaderException(CorruptImageError,"ImproperImageHeader");
243     }
244   count=ReadBlob(image,ept_info.postscript_length,ept_info.postscript);
245   if (count != (ssize_t) (ept_info.postscript_length))
246     (void) ThrowMagickException(exception,GetMagickModule(),CorruptImageWarning,
247       "InsufficientImageDataInFile","`%s'",image->filename);
248   (void) CloseBlob(image);
249   image=DestroyImage(image);
250   read_info=CloneImageInfo(image_info);
251   (void) CopyMagickString(read_info->magick,"EPS",MagickPathExtent);
252   image=BlobToImage(read_info,ept_info.postscript,ept_info.postscript_length,
253     exception);
254   if (image == (Image *) NULL)
255     {
256       (void) CopyMagickString(read_info->magick,"TIFF",MagickPathExtent);
257       image=BlobToImage(read_info,ept_info.tiff,ept_info.tiff_length,exception);
258     }
259   read_info=DestroyImageInfo(read_info);
260   if (image != (Image *) NULL)
261     {
262       (void) CopyMagickString(image->filename,image_info->filename,
263         MagickPathExtent);
264       (void) CopyMagickString(image->magick,"EPT",MagickPathExtent);
265     }
266   ept_info.tiff=(unsigned char *) RelinquishMagickMemory(ept_info.tiff);
267   ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
268     ept_info.postscript);
269   return(image);
270 }
271 
272 /*
273 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
274 %                                                                             %
275 %                                                                             %
276 %                                                                             %
277 %   R e g i s t e r E P T I m a g e                                           %
278 %                                                                             %
279 %                                                                             %
280 %                                                                             %
281 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
282 %
283 %  RegisterEPTImage() adds attributes for the EPT image format to
284 %  the list of supported formats.  The attributes include the image format
285 %  tag, a method to read and/or write the format, whether the format
286 %  supports the saving of more than one frame to the same file or blob,
287 %  whether the format supports native in-memory I/O, and a brief
288 %  description of the format.
289 %
290 %  The format of the RegisterEPTImage method is:
291 %
292 %      size_t RegisterEPTImage(void)
293 %
294 */
RegisterEPTImage(void)295 ModuleExport size_t RegisterEPTImage(void)
296 {
297   MagickInfo
298     *entry;
299 
300   entry=AcquireMagickInfo("EPT","EPT",
301     "Encapsulated PostScript with TIFF preview");
302   entry->decoder=(DecodeImageHandler *) ReadEPTImage;
303   entry->encoder=(EncodeImageHandler *) WriteEPTImage;
304   entry->magick=(IsImageFormatHandler *) IsEPT;
305   entry->flags|=CoderDecoderSeekableStreamFlag;
306   entry->flags^=CoderAdjoinFlag;
307   entry->flags^=CoderBlobSupportFlag;
308   (void) RegisterMagickInfo(entry);
309   entry=AcquireMagickInfo("EPT","EPT2",
310     "Encapsulated PostScript Level II with TIFF preview");
311   entry->decoder=(DecodeImageHandler *) ReadEPTImage;
312   entry->encoder=(EncodeImageHandler *) WriteEPTImage;
313   entry->magick=(IsImageFormatHandler *) IsEPT;
314   entry->flags^=CoderAdjoinFlag;
315   entry->flags|=CoderDecoderSeekableStreamFlag;
316   entry->flags^=CoderBlobSupportFlag;
317   (void) RegisterMagickInfo(entry);
318   entry=AcquireMagickInfo("EPT","EPT3",
319     "Encapsulated PostScript Level III with TIFF preview");
320   entry->decoder=(DecodeImageHandler *) ReadEPTImage;
321   entry->encoder=(EncodeImageHandler *) WriteEPTImage;
322   entry->magick=(IsImageFormatHandler *) IsEPT;
323   entry->flags|=CoderDecoderSeekableStreamFlag;
324   entry->flags^=CoderBlobSupportFlag;
325   (void) RegisterMagickInfo(entry);
326   return(MagickImageCoderSignature);
327 }
328 
329 /*
330 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
331 %                                                                             %
332 %                                                                             %
333 %                                                                             %
334 %   U n r e g i s t e r E P T I m a g e                                       %
335 %                                                                             %
336 %                                                                             %
337 %                                                                             %
338 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
339 %
340 %  UnregisterEPTImage() removes format registrations made by the
341 %  EPT module from the list of supported formats.
342 %
343 %  The format of the UnregisterEPTImage method is:
344 %
345 %      UnregisterEPTImage(void)
346 %
347 */
UnregisterEPTImage(void)348 ModuleExport void UnregisterEPTImage(void)
349 {
350   (void) UnregisterMagickInfo("EPT");
351 }
352 
353 /*
354 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
355 %                                                                             %
356 %                                                                             %
357 %                                                                             %
358 %   W r i t e E P T I m a g e                                                 %
359 %                                                                             %
360 %                                                                             %
361 %                                                                             %
362 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
363 %
364 %  WriteEPTImage() writes an image in the Encapsulated Postscript format
365 %  with a TIFF preview.
366 %
367 %  The format of the WriteEPTImage method is:
368 %
369 %      MagickBooleanType WriteEPTImage(const ImageInfo *image_info,
370 %        Image *image,ExceptionInfo *exception)
371 %
372 %  A description of each parameter follows.
373 %
374 %    o image_info: the image info.
375 %
376 %    o image:  The image.
377 %
378 %    o exception: return any errors or warnings in this structure.
379 %
380 */
WriteEPTImage(const ImageInfo * image_info,Image * image,ExceptionInfo * exception)381 static MagickBooleanType WriteEPTImage(const ImageInfo *image_info,Image *image,
382   ExceptionInfo *exception)
383 {
384   char
385     filename[MagickPathExtent];
386 
387   EPTInfo
388     ept_info;
389 
390   Image
391     *write_image;
392 
393   ImageInfo
394     *write_info;
395 
396   MagickBooleanType
397     status;
398 
399   /*
400     Write EPT image.
401   */
402   assert(image_info != (const ImageInfo *) NULL);
403   assert(image_info->signature == MagickCoreSignature);
404   assert(image != (Image *) NULL);
405   assert(image->signature == MagickCoreSignature);
406   if (image->debug != MagickFalse)
407     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
408   assert(exception != (ExceptionInfo *) NULL);
409   assert(exception->signature == MagickCoreSignature);
410   status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception);
411   if (status == MagickFalse)
412     return(status);
413   write_image=CloneImage(image,0,0,MagickTrue,exception);
414   if (write_image == (Image *) NULL)
415     return(MagickFalse);
416   write_info=CloneImageInfo(image_info);
417   (void) CopyMagickString(write_info->filename,"EPS:",MagickPathExtent);
418   (void) CopyMagickString(write_info->magick,"EPS",MagickPathExtent);
419   if (LocaleCompare(image_info->magick,"EPT2") == 0)
420     {
421       (void) CopyMagickString(write_info->filename,"EPS2:",MagickPathExtent);
422       (void) CopyMagickString(write_info->magick,"EPS2",MagickPathExtent);
423     }
424   if (LocaleCompare(image_info->magick,"EPT3") == 0)
425     {
426       (void) CopyMagickString(write_info->filename,"EPS3:",MagickPathExtent);
427       (void) CopyMagickString(write_info->magick,"EPS3",MagickPathExtent);
428     }
429   (void) memset(&ept_info,0,sizeof(ept_info));
430   ept_info.magick=0xc6d3d0c5ul;
431   ept_info.postscript=(unsigned char *) ImageToBlob(write_info,write_image,
432     &ept_info.postscript_length,exception);
433   write_image=DestroyImage(write_image);
434   write_info=DestroyImageInfo(write_info);
435   if (ept_info.postscript == (void *) NULL)
436     return(MagickFalse);
437   write_image=CloneImage(image,0,0,MagickTrue,exception);
438   if (write_image == (Image *) NULL)
439     return(MagickFalse);
440   write_info=CloneImageInfo(image_info);
441   (void) CopyMagickString(write_info->magick,"TIFF",MagickPathExtent);
442   (void) FormatLocaleString(filename,MagickPathExtent,"tiff:%s",
443     write_info->filename);
444   (void) CopyMagickString(write_info->filename,filename,MagickPathExtent);
445   if ((write_image->columns > 512) || (write_image->rows > 512))
446     {
447       Image
448         *resize_image;
449 
450       resize_image=ResizeImage(write_image,512,512,write_image->filter,
451         exception);
452       if (resize_image != (Image *) NULL)
453         {
454           write_image=DestroyImage(write_image);
455           write_image=resize_image;
456         }
457     }
458   if ((write_image->storage_class == DirectClass) ||
459       (write_image->colors > 256))
460     {
461       QuantizeInfo
462         quantize_info;
463 
464       /*
465         EPT preview requires that the image is colormapped.
466       */
467       GetQuantizeInfo(&quantize_info);
468       quantize_info.dither_method=IdentifyPaletteImage(write_image,
469         exception) == MagickFalse ? RiemersmaDitherMethod : NoDitherMethod;
470       (void) QuantizeImage(&quantize_info,write_image,exception);
471     }
472   write_info->compression=NoCompression;
473   ept_info.tiff=(unsigned char *) ImageToBlob(write_info,write_image,
474     &ept_info.tiff_length,exception);
475   write_image=DestroyImage(write_image);
476   write_info=DestroyImageInfo(write_info);
477   if (ept_info.tiff == (void *) NULL)
478     {
479       ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
480         ept_info.postscript);
481       return(MagickFalse);
482     }
483   /*
484     Write EPT image.
485   */
486   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.magick);
487   (void) WriteBlobLSBLong(image,30);
488   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.postscript_length);
489   (void) WriteBlobLSBLong(image,0);
490   (void) WriteBlobLSBLong(image,0);
491   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.postscript_length+30);
492   (void) WriteBlobLSBLong(image,(unsigned int) ept_info.tiff_length);
493   (void) WriteBlobLSBShort(image,0xffff);
494   (void) WriteBlob(image,ept_info.postscript_length,ept_info.postscript);
495   (void) WriteBlob(image,ept_info.tiff_length,ept_info.tiff);
496   /*
497     Relinquish resources.
498   */
499   ept_info.postscript=(unsigned char *) RelinquishMagickMemory(
500     ept_info.postscript);
501   ept_info.tiff=(unsigned char *) RelinquishMagickMemory(ept_info.tiff);
502   (void) CloseBlob(image);
503   return(MagickTrue);
504 }
505