1 /*
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 % %
4 % %
5 % %
6 % SSSSS CCCC TTTTT %
7 % SS C T %
8 % SSS C T %
9 % SS C T %
10 % SSSSS CCCC T %
11 % %
12 % %
13 % Read Scitex HandShake Image Format %
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/cache.h"
46 #include "MagickCore/exception.h"
47 #include "MagickCore/exception-private.h"
48 #include "MagickCore/image.h"
49 #include "MagickCore/image-private.h"
50 #include "MagickCore/list.h"
51 #include "MagickCore/magick.h"
52 #include "MagickCore/memory_.h"
53 #include "MagickCore/module.h"
54 #include "MagickCore/monitor.h"
55 #include "MagickCore/monitor-private.h"
56 #include "MagickCore/pixel-accessor.h"
57 #include "MagickCore/quantum-private.h"
58 #include "MagickCore/static.h"
59 #include "MagickCore/string_.h"
60 #include "MagickCore/string-private.h"
61
62 /*
63 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
64 % %
65 % %
66 % %
67 % I s S C T %
68 % %
69 % %
70 % %
71 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
72 %
73 % IsSCT() returns MagickTrue if the image format type, identified by the
74 % magick string, is SCT.
75 %
76 % The format of the IsSCT method is:
77 %
78 % MagickBooleanType IsSCT(const unsigned char *magick,const size_t length)
79 %
80 % A description of each parameter follows:
81 %
82 % o magick: compare image format pattern against these bytes.
83 %
84 % o length: Specifies the length of the magick string.
85 %
86 */
IsSCT(const unsigned char * magick,const size_t length)87 static MagickBooleanType IsSCT(const unsigned char *magick,const size_t length)
88 {
89 if (length < 2)
90 return(MagickFalse);
91 if (LocaleNCompare((const char *) magick,"CT",2) == 0)
92 return(MagickTrue);
93 return(MagickFalse);
94 }
95
96 /*
97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
98 % %
99 % %
100 % %
101 % R e a d S C T I m a g e %
102 % %
103 % %
104 % %
105 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
106 %
107 % ReadSCTImage() reads a Scitex image file and returns it. It allocates
108 % the memory necessary for the new Image structure and returns a pointer to
109 % the new image.
110 %
111 % The format of the ReadSCTImage method is:
112 %
113 % Image *ReadSCTImage(const ImageInfo *image_info,ExceptionInfo *exception)
114 %
115 % A description of each parameter follows:
116 %
117 % o image_info: the image info.
118 %
119 % o exception: return any errors or warnings in this structure.
120 %
121 */
ReadSCTImage(const ImageInfo * image_info,ExceptionInfo * exception)122 static Image *ReadSCTImage(const ImageInfo *image_info,ExceptionInfo *exception)
123 {
124 char
125 magick[2];
126
127 Image
128 *image;
129
130 MagickBooleanType
131 status;
132
133 double
134 height,
135 width;
136
137 int
138 c;
139
140 Quantum
141 pixel;
142
143 register ssize_t
144 i,
145 x;
146
147 register Quantum
148 *q;
149
150 ssize_t
151 count,
152 y;
153
154 unsigned char
155 buffer[768];
156
157 size_t
158 separations,
159 separations_mask,
160 units;
161
162 /*
163 Open image file.
164 */
165 assert(image_info != (const ImageInfo *) NULL);
166 assert(image_info->signature == MagickCoreSignature);
167 if (image_info->debug != MagickFalse)
168 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
169 image_info->filename);
170 assert(exception != (ExceptionInfo *) NULL);
171 assert(exception->signature == MagickCoreSignature);
172 image=AcquireImage(image_info,exception);
173 status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
174 if (status == MagickFalse)
175 {
176 image=DestroyImageList(image);
177 return((Image *) NULL);
178 }
179 /*
180 Read control block.
181 */
182 memset(magick,0,sizeof(magick));
183 memset(buffer,0,sizeof(buffer));
184 count=ReadBlob(image,80,buffer);
185 (void) count;
186 count=ReadBlob(image,2,(unsigned char *) magick);
187 if ((LocaleNCompare((char *) magick,"CT",2) != 0) &&
188 (LocaleNCompare((char *) magick,"LW",2) != 0) &&
189 (LocaleNCompare((char *) magick,"BM",2) != 0) &&
190 (LocaleNCompare((char *) magick,"PG",2) != 0) &&
191 (LocaleNCompare((char *) magick,"TX",2) != 0))
192 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
193 if ((LocaleNCompare((char *) magick,"LW",2) == 0) ||
194 (LocaleNCompare((char *) magick,"BM",2) == 0) ||
195 (LocaleNCompare((char *) magick,"PG",2) == 0) ||
196 (LocaleNCompare((char *) magick,"TX",2) == 0))
197 ThrowReaderException(CoderError,"OnlyContinuousTonePictureSupported");
198 count=ReadBlob(image,174,buffer);
199 count=ReadBlob(image,768,buffer);
200 /*
201 Read paramter block.
202 */
203 units=1UL*ReadBlobByte(image);
204 if (units == 0)
205 image->units=PixelsPerCentimeterResolution;
206 separations=1UL*ReadBlobByte(image);
207 separations_mask=ReadBlobMSBShort(image);
208 count=ReadBlob(image,14,buffer);
209 buffer[14]='\0';
210 height=StringToDouble((char *) buffer,(char **) NULL);
211 count=ReadBlob(image,14,buffer);
212 width=StringToDouble((char *) buffer,(char **) NULL);
213 count=ReadBlob(image,12,buffer);
214 buffer[12]='\0';
215 image->rows=StringToUnsignedLong((char *) buffer);
216 count=ReadBlob(image,12,buffer);
217 image->columns=StringToUnsignedLong((char *) buffer);
218 count=ReadBlob(image,200,buffer);
219 count=ReadBlob(image,768,buffer);
220 if (separations_mask == 0x0f)
221 SetImageColorspace(image,CMYKColorspace,exception);
222 if ((image->columns < 1) || (image->rows < 1) ||
223 (width < MagickEpsilon) || (height < MagickEpsilon))
224 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
225 image->resolution.x=1.0*image->columns/width;
226 image->resolution.y=1.0*image->rows/height;
227 if (image_info->ping != MagickFalse)
228 {
229 (void) CloseBlob(image);
230 return(GetFirstImageInList(image));
231 }
232 status=SetImageExtent(image,image->columns,image->rows,exception);
233 if (status == MagickFalse)
234 return(DestroyImageList(image));
235 /*
236 Convert SCT raster image to pixel packets.
237 */
238 c=0;
239 for (y=0; y < (ssize_t) image->rows; y++)
240 {
241 for (i=0; i < (ssize_t) separations; i++)
242 {
243 q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
244 if (q == (Quantum *) NULL)
245 break;
246 for (x=0; x < (ssize_t) image->columns; x++)
247 {
248 c=ReadBlobByte(image);
249 if (c == EOF)
250 break;
251 pixel=(Quantum) ScaleCharToQuantum((unsigned char) c);
252 if (image->colorspace == CMYKColorspace)
253 pixel=(Quantum) (QuantumRange-pixel);
254 switch (i)
255 {
256 case 0:
257 {
258 SetPixelRed(image,pixel,q);
259 SetPixelGreen(image,pixel,q);
260 SetPixelBlue(image,pixel,q);
261 break;
262 }
263 case 1:
264 {
265 SetPixelGreen(image,pixel,q);
266 break;
267 }
268 case 2:
269 {
270 SetPixelBlue(image,pixel,q);
271 break;
272 }
273 case 3:
274 {
275 if (image->colorspace == CMYKColorspace)
276 SetPixelBlack(image,pixel,q);
277 break;
278 }
279 }
280 q+=GetPixelChannels(image);
281 }
282 if (x < (ssize_t) image->columns)
283 break;
284 if (SyncAuthenticPixels(image,exception) == MagickFalse)
285 break;
286 if ((image->columns % 2) != 0)
287 (void) ReadBlobByte(image); /* pad */
288 }
289 if (i < (ssize_t) separations)
290 break;
291 status=SetImageProgress(image,LoadImageTag,(MagickOffsetType) y,
292 image->rows);
293 if (status == MagickFalse)
294 break;
295 }
296 if (EOFBlob(image) != MagickFalse)
297 ThrowFileException(exception,CorruptImageError,"UnexpectedEndOfFile",
298 image->filename);
299 (void) CloseBlob(image);
300 return(GetFirstImageInList(image));
301 }
302
303 /*
304 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
305 % %
306 % %
307 % %
308 % R e g i s t e r S C T I m a g e %
309 % %
310 % %
311 % %
312 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
313 %
314 % RegisterSCTImage() adds attributes for the SCT image format to
315 % the list of supported formats. The attributes include the image format
316 % tag, a method to read and/or write the format, whether the format
317 % supports the saving of more than one frame to the same file or blob,
318 % whether the format supports native in-memory I/O, and a brief
319 % description of the format.
320 %
321 % The format of the RegisterSCTImage method is:
322 %
323 % size_t RegisterSCTImage(void)
324 %
325 */
RegisterSCTImage(void)326 ModuleExport size_t RegisterSCTImage(void)
327 {
328 MagickInfo
329 *entry;
330
331 entry=AcquireMagickInfo("SCT","SCT","Scitex HandShake");
332 entry->decoder=(DecodeImageHandler *) ReadSCTImage;
333 entry->magick=(IsImageFormatHandler *) IsSCT;
334 entry->flags^=CoderAdjoinFlag;
335 (void) RegisterMagickInfo(entry);
336 return(MagickImageCoderSignature);
337 }
338
339 /*
340 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
341 % %
342 % %
343 % %
344 % U n r e g i s t e r S C T I m a g e %
345 % %
346 % %
347 % %
348 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
349 %
350 % UnregisterSCTImage() removes format registrations made by the
351 % SCT module from the list of supported formats.
352 %
353 % The format of the UnregisterSCTImage method is:
354 %
355 % UnregisterSCTImage(void)
356 %
357 */
UnregisterSCTImage(void)358 ModuleExport void UnregisterSCTImage(void)
359 {
360 (void) UnregisterMagickInfo("SCT");
361 }
362