2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
13 % Read Seattle Film Works Image Format %
20 % Copyright 1999-2017 ImageMagick Studio LLC, a non-profit organization %
21 % dedicated to making software imaging solutions freely available. %
23 % You may not use this file except in compliance with the License. You may %
24 % obtain a copy of the License at %
26 % http://www.imagemagick.org/script/license.php %
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. %
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
42 #include "MagickCore/studio.h"
43 #include "MagickCore/blob.h"
44 #include "MagickCore/blob-private.h"
45 #include "MagickCore/constitute.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/monitor.h"
54 #include "MagickCore/monitor-private.h"
55 #include "MagickCore/resource_.h"
56 #include "MagickCore/quantum-private.h"
57 #include "MagickCore/static.h"
58 #include "MagickCore/string_.h"
59 #include "MagickCore/module.h"
62 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
70 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
72 % IsPWP() returns MagickTrue if the image format type, identified by the
73 % magick string, is PWP.
75 % The format of the IsPWP method is:
77 % MagickBooleanType IsPWP(const unsigned char *magick,const size_t length)
79 % A description of each parameter follows:
81 % o magick: compare image format pattern against these bytes.
83 % o length: Specifies the length of the magick string.
87 static MagickBooleanType IsPWP(const unsigned char *magick,const size_t length)
91 if (LocaleNCompare((char *) magick,"SFW95",5) == 0)
97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
101 % R e a d P W P I m a g e %
105 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
107 % ReadPWPImage() reads a Seattle Film Works multi-image file and returns
108 % it. It allocates the memory necessary for the new Image structure and
109 % returns a pointer to the new image.
111 % The format of the ReadPWPImage method is:
113 % Image *ReadPWPImage(const ImageInfo *image_info,ExceptionInfo *exception)
115 % A description of each parameter follows:
117 % o image_info: the image info.
119 % o exception: return any errors or warnings in this structure.
122 static Image *ReadPWPImage(const ImageInfo *image_info,ExceptionInfo *exception)
156 magick[MagickPathExtent];
161 assert(image_info != (const ImageInfo *) NULL);
162 assert(image_info->signature == MagickCoreSignature);
163 if (image_info->debug != MagickFalse)
164 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
165 image_info->filename);
166 assert(exception != (ExceptionInfo *) NULL);
167 assert(exception->signature == MagickCoreSignature);
168 pwp_image=AcquireImage(image_info,exception);
170 status=OpenBlob(image_info,pwp_image,ReadBinaryBlobMode,exception);
171 if (status == MagickFalse)
172 return((Image *) NULL);
173 count=ReadBlob(pwp_image,5,magick);
174 if ((count != 5) || (LocaleNCompare((char *) magick,"SFW95",5) != 0))
175 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
176 read_info=CloneImageInfo(image_info);
177 (void) SetImageInfoProgressMonitor(read_info,(MagickProgressMonitor) NULL,
179 SetImageInfoBlob(read_info,(void *) NULL,0);
180 unique_file=AcquireUniqueFileResource(read_info->filename);
183 for (c=ReadBlobByte(pwp_image); c != EOF; c=ReadBlobByte(pwp_image))
185 for (i=0; i < 17; i++)
186 magick[i]=magick[i+1];
187 magick[17]=(unsigned char) c;
188 if (LocaleNCompare((char *) (magick+12),"SFW94A",6) == 0)
193 if (LocaleNCompare((char *) (magick+12),"SFW94A",6) != 0)
195 (void) RelinquishUniqueFileResource(read_info->filename);
196 ThrowReaderException(CorruptImageError,"ImproperImageHeader");
199 Dump SFW image to a temporary file.
202 if (unique_file != -1)
203 file=fdopen(unique_file,"wb");
204 if ((unique_file == -1) || (file == (FILE *) NULL))
206 (void) RelinquishUniqueFileResource(read_info->filename);
207 ThrowFileException(exception,FileOpenError,"UnableToWriteFile",
209 image=DestroyImageList(image);
210 return((Image *) NULL);
212 length=fwrite("SFW94A",1,6,file);
214 filesize=65535UL*magick[2]+256L*magick[1]+magick[0];
215 for (i=0; i < (ssize_t) filesize; i++)
217 c=ReadBlobByte(pwp_image);
218 (void) fputc(c,file);
221 next_image=ReadImage(read_info,exception);
222 if (next_image == (Image *) NULL)
224 (void) FormatLocaleString(next_image->filename,MagickPathExtent,
225 "slide_%02ld.sfw",(long) next_image->scene);
226 if (image == (Image *) NULL)
231 Link image into image list.
233 for (p=image; p->next != (Image *) NULL; p=GetNextImageInList(p)) ;
234 next_image->previous=p;
235 next_image->scene=p->scene+1;
238 if (image_info->number_scenes != 0)
239 if (next_image->scene >= (image_info->scene+image_info->number_scenes-1))
241 status=SetImageProgress(image,LoadImagesTag,TellBlob(pwp_image),
242 GetBlobSize(pwp_image));
243 if (status == MagickFalse)
246 if (unique_file != -1)
247 (void) close(unique_file);
248 (void) RelinquishUniqueFileResource(read_info->filename);
249 read_info=DestroyImageInfo(read_info);
250 if (EOFBlob(image) != MagickFalse)
255 message=GetExceptionMessage(errno);
256 (void) ThrowMagickException(exception,GetMagickModule(),CorruptImageError,
257 "UnexpectedEndOfFile","`%s': %s",image->filename,message);
258 message=DestroyString(message);
260 (void) CloseBlob(image);
261 return(GetFirstImageInList(image));
265 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
269 % R e g i s t e r P W P I m a g e %
273 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
275 % RegisterPWPImage() adds attributes for the PWP image format to
276 % the list of supported formats. The attributes include the image format
277 % tag, a method to read and/or write the format, whether the format
278 % supports the saving of more than one frame to the same file or blob,
279 % whether the format supports native in-memory I/O, and a brief
280 % description of the format.
282 % The format of the RegisterPWPImage method is:
284 % size_t RegisterPWPImage(void)
287 ModuleExport size_t RegisterPWPImage(void)
292 entry=AcquireMagickInfo("PWP","PWP","Seattle Film Works");
293 entry->decoder=(DecodeImageHandler *) ReadPWPImage;
294 entry->magick=(IsImageFormatHandler *) IsPWP;
295 (void) RegisterMagickInfo(entry);
296 return(MagickImageCoderSignature);
300 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
304 % U n r e g i s t e r P W P I m a g e %
308 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
310 % UnregisterPWPImage() removes format registrations made by the
311 % PWP module from the list of supported formats.
313 % The format of the UnregisterPWPImage method is:
315 % UnregisterPWPImage(void)
318 ModuleExport void UnregisterPWPImage(void)
320 (void) UnregisterMagickInfo("PWP");