2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
13 % Read/Write High Dynamic-Range (HDR) Image File Format %
20 % Copyright 1999-2018 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 % https://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/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/option.h"
54 #include "MagickCore/pixel-accessor.h"
55 #include "MagickCore/property.h"
56 #include "MagickCore/quantum-private.h"
57 #include "MagickCore/static.h"
58 #include "MagickCore/string_.h"
59 #include "MagickCore/module.h"
60 #include "MagickCore/resource_.h"
61 #include "MagickCore/utility.h"
62 #if defined(MAGICKCORE_OPENEXR_DELEGATE)
63 #include <ImfCRgbaFile.h>
66 Typedef declaractions.
68 typedef struct _ExrWindow
80 static MagickBooleanType
81 WriteEXRImage(const ImageInfo *,Image *,ExceptionInfo *);
85 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
93 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
95 % IsEXR() returns MagickTrue if the image format type, identified by the
96 % magick string, is EXR.
98 % The format of the IsEXR method is:
100 % MagickBooleanType IsEXR(const unsigned char *magick,const size_t length)
102 % A description of each parameter follows:
104 % o magick: compare image format pattern against these bytes.
106 % o length: Specifies the length of the magick string.
109 static MagickBooleanType IsEXR(const unsigned char *magick,const size_t length)
113 if (memcmp(magick,"\166\057\061\001",4) == 0)
118 #if defined(MAGICKCORE_OPENEXR_DELEGATE)
120 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
124 % R e a d E X R I m a g e %
128 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
130 % ReadEXRImage reads an image in the high dynamic-range (HDR) file format
131 % developed by Industrial Light & Magic. It allocates the memory necessary
132 % for the new Image structure and returns a pointer to the new image.
134 % The format of the ReadEXRImage method is:
136 % Image *ReadEXRImage(const ImageInfo *image_info,ExceptionInfo *exception)
138 % A description of each parameter follows:
140 % o image_info: the image info.
142 % o exception: return any errors or warnings in this structure.
145 static Image *ReadEXRImage(const ImageInfo *image_info,ExceptionInfo *exception)
182 assert(image_info != (const ImageInfo *) NULL);
183 assert(image_info->signature == MagickCoreSignature);
184 if (image_info->debug != MagickFalse)
185 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
186 image_info->filename);
187 assert(exception != (ExceptionInfo *) NULL);
188 assert(exception->signature == MagickCoreSignature);
189 image=AcquireImage(image_info,exception);
190 status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
191 if (status == MagickFalse)
193 image=DestroyImageList(image);
194 return((Image *) NULL);
196 read_info=CloneImageInfo(image_info);
197 if (IsPathAccessible(read_info->filename) == MagickFalse)
199 (void) AcquireUniqueFilename(read_info->filename);
200 (void) ImageToFile(image,read_info->filename,exception);
202 file=ImfOpenInputFile(read_info->filename);
203 if (file == (ImfInputFile *) NULL)
205 ThrowFileException(exception,BlobError,"UnableToOpenBlob",
207 if (LocaleCompare(image_info->filename,read_info->filename) != 0)
208 (void) RelinquishUniqueFileResource(read_info->filename);
209 read_info=DestroyImageInfo(read_info);
210 image=DestroyImageList(image);
211 return((Image *) NULL);
213 hdr_info=ImfInputHeader(file);
214 ImfHeaderDisplayWindow(hdr_info,&display_window.min_x,&display_window.min_y,
215 &display_window.max_x,&display_window.max_y);
216 image->columns=display_window.max_x-display_window.min_x+1UL;
217 image->rows=display_window.max_y-display_window.min_y+1UL;
218 image->alpha_trait=BlendPixelTrait;
219 SetImageColorspace(image,RGBColorspace,exception);
221 if (image_info->ping != MagickFalse)
223 (void) ImfCloseInputFile(file);
224 if (LocaleCompare(image_info->filename,read_info->filename) != 0)
225 (void) RelinquishUniqueFileResource(read_info->filename);
226 read_info=DestroyImageInfo(read_info);
227 (void) CloseBlob(image);
228 return(GetFirstImageInList(image));
230 status=SetImageExtent(image,image->columns,image->rows,exception);
231 if (status == MagickFalse)
232 return(DestroyImageList(image));
233 ImfHeaderDataWindow(hdr_info,&data_window.min_x,&data_window.min_y,
234 &data_window.max_x,&data_window.max_y);
235 columns=(ssize_t) data_window.max_x-data_window.min_x+1UL;
236 if ((display_window.min_x > data_window.max_x) ||
237 (display_window.min_x+(int) image->columns <= data_window.min_x))
238 scanline=(ImfRgba *) NULL;
241 scanline=(ImfRgba *) AcquireQuantumMemory(columns,sizeof(*scanline));
242 if (scanline == (ImfRgba *) NULL)
244 (void) ImfCloseInputFile(file);
245 if (LocaleCompare(image_info->filename,read_info->filename) != 0)
246 (void) RelinquishUniqueFileResource(read_info->filename);
247 read_info=DestroyImageInfo(read_info);
248 image=DestroyImageList(image);
249 ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
252 for (y=0; y < (ssize_t) image->rows; y++)
257 q=QueueAuthenticPixels(image,0,y,image->columns,1,exception);
258 if (q == (Quantum *) NULL)
260 yy=display_window.min_y+y;
261 if ((yy < data_window.min_y) || (yy > data_window.max_y) ||
262 (scanline == (ImfRgba *) NULL))
264 for (x=0; x < (ssize_t) image->columns; x++)
266 SetPixelViaPixelInfo(image,&image->background_color,q);
267 q+=GetPixelChannels(image);
271 memset(scanline,0,columns*sizeof(*scanline));
272 ImfInputSetFrameBuffer(file,scanline-data_window.min_x-columns*yy,1,
274 ImfInputReadPixels(file,yy,yy);
275 for (x=0; x < (ssize_t) image->columns; x++)
280 xx=display_window.min_x+((int) x-data_window.min_x);
281 if ((xx < 0) || (display_window.min_x+(int) x > data_window.max_x))
282 SetPixelViaPixelInfo(image,&image->background_color,q);
285 SetPixelRed(image,ClampToQuantum((MagickRealType) QuantumRange*
286 ImfHalfToFloat(scanline[xx].r)),q);
287 SetPixelGreen(image,ClampToQuantum((MagickRealType) QuantumRange*
288 ImfHalfToFloat(scanline[xx].g)),q);
289 SetPixelBlue(image,ClampToQuantum((MagickRealType) QuantumRange*
290 ImfHalfToFloat(scanline[xx].b)),q);
291 SetPixelAlpha(image,ClampToQuantum((MagickRealType) QuantumRange*
292 ImfHalfToFloat(scanline[xx].a)),q);
294 q+=GetPixelChannels(image);
296 if (SyncAuthenticPixels(image,exception) == MagickFalse)
299 scanline=(ImfRgba *) RelinquishMagickMemory(scanline);
300 (void) ImfCloseInputFile(file);
301 if (LocaleCompare(image_info->filename,read_info->filename) != 0)
302 (void) RelinquishUniqueFileResource(read_info->filename);
303 read_info=DestroyImageInfo(read_info);
304 (void) CloseBlob(image);
305 return(GetFirstImageInList(image));
310 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
314 % R e g i s t e r E X R I m a g e %
318 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
320 % RegisterEXRImage() adds properties for the EXR image format
321 % to the list of supported formats. The properties include the image format
322 % tag, a method to read and/or write the format, whether the format
323 % supports the saving of more than one frame to the same file or blob,
324 % whether the format supports native in-memory I/O, and a brief
325 % description of the format.
327 % The format of the RegisterEXRImage method is:
329 % size_t RegisterEXRImage(void)
332 ModuleExport size_t RegisterEXRImage(void)
337 entry=AcquireMagickInfo("EXR","EXR","High Dynamic-range (HDR)");
338 #if defined(MAGICKCORE_OPENEXR_DELEGATE)
339 entry->decoder=(DecodeImageHandler *) ReadEXRImage;
340 entry->encoder=(EncodeImageHandler *) WriteEXRImage;
342 entry->magick=(IsImageFormatHandler *) IsEXR;
343 entry->flags^=CoderAdjoinFlag;
344 entry->flags^=CoderBlobSupportFlag;
345 (void) RegisterMagickInfo(entry);
346 return(MagickImageCoderSignature);
350 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
354 % U n r e g i s t e r E X R I m a g e %
358 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
360 % UnregisterEXRImage() removes format registrations made by the
361 % EXR module from the list of supported formats.
363 % The format of the UnregisterEXRImage method is:
365 % UnregisterEXRImage(void)
368 ModuleExport void UnregisterEXRImage(void)
370 (void) UnregisterMagickInfo("EXR");
373 #if defined(MAGICKCORE_OPENEXR_DELEGATE)
375 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
379 % W r i t e E X R I m a g e %
383 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
385 % WriteEXRImage() writes an image to a file the in the high dynamic-range
386 % (HDR) file format developed by Industrial Light & Magic.
388 % The format of the WriteEXRImage method is:
390 % MagickBooleanType WriteEXRImage(const ImageInfo *image_info,
391 % Image *image,ExceptionInfo *exception)
393 % A description of each parameter follows.
395 % o image_info: the image info.
397 % o image: The image.
399 % o exception: return any errors or warnings in this structure.
402 static MagickBooleanType WriteEXRImage(const ImageInfo *image_info,Image *image,
403 ExceptionInfo *exception)
432 register const Quantum
442 Open output image file.
444 assert(image_info != (const ImageInfo *) NULL);
445 assert(image_info->signature == MagickCoreSignature);
446 assert(image != (Image *) NULL);
447 assert(image->signature == MagickCoreSignature);
448 if (image->debug != MagickFalse)
449 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
450 assert(exception != (ExceptionInfo *) NULL);
451 assert(exception->signature == MagickCoreSignature);
452 status=OpenBlob(image_info,image,WriteBinaryBlobMode,exception);
453 if (status == MagickFalse)
455 (void) SetImageColorspace(image,RGBColorspace,exception);
456 write_info=CloneImageInfo(image_info);
457 (void) AcquireUniqueFilename(write_info->filename);
458 hdr_info=ImfNewHeader();
459 ImfHeaderSetDataWindow(hdr_info,0,0,(int) image->columns-1,(int)
461 ImfHeaderSetDisplayWindow(hdr_info,0,0,(int) image->columns-1,(int)
463 compression=IMF_NO_COMPRESSION;
464 if (write_info->compression == ZipSCompression)
465 compression=IMF_ZIPS_COMPRESSION;
466 if (write_info->compression == ZipCompression)
467 compression=IMF_ZIP_COMPRESSION;
468 if (write_info->compression == PizCompression)
469 compression=IMF_PIZ_COMPRESSION;
470 if (write_info->compression == Pxr24Compression)
471 compression=IMF_PXR24_COMPRESSION;
472 #if defined(B44Compression)
473 if (write_info->compression == B44Compression)
474 compression=IMF_B44_COMPRESSION;
476 #if defined(B44ACompression)
477 if (write_info->compression == B44ACompression)
478 compression=IMF_B44A_COMPRESSION;
481 value=GetImageOption(image_info,"exr:color-type");
482 if (value != (const char *) NULL)
484 if (LocaleCompare(value,"RGB") == 0)
485 channels=IMF_WRITE_RGB;
486 else if (LocaleCompare(value,"RGBA") == 0)
487 channels=IMF_WRITE_RGBA;
488 else if (LocaleCompare(value,"YC") == 0)
489 channels=IMF_WRITE_YC;
490 else if (LocaleCompare(value,"YCA") == 0)
491 channels=IMF_WRITE_YCA;
492 else if (LocaleCompare(value,"Y") == 0)
493 channels=IMF_WRITE_Y;
494 else if (LocaleCompare(value,"YA") == 0)
495 channels=IMF_WRITE_YA;
496 else if (LocaleCompare(value,"R") == 0)
497 channels=IMF_WRITE_R;
498 else if (LocaleCompare(value,"G") == 0)
499 channels=IMF_WRITE_G;
500 else if (LocaleCompare(value,"B") == 0)
501 channels=IMF_WRITE_B;
502 else if (LocaleCompare(value,"A") == 0)
503 channels=IMF_WRITE_A;
505 (void) ThrowMagickException(exception,GetMagickModule(),CoderWarning,
506 "ignoring invalid defined exr:color-type","=%s",value);
508 sampling_factor=(const char *) NULL;
510 if (image_info->sampling_factor != (char *) NULL)
511 sampling_factor=image_info->sampling_factor;
512 if (sampling_factor != NULL)
515 Sampling factors, valid values are 1x1 or 2x2.
517 if (sscanf(sampling_factor,"%d:%d:%d",factors,factors+1,factors+2) == 3)
519 if ((factors[0] == factors[1]) && (factors[1] == factors[2]))
522 if ((factors[0] == (2*factors[1])) && (factors[2] == 0))
526 if (sscanf(sampling_factor,"%dx%d",factors,factors+1) == 2)
528 if (factors[0] != factors[1])
531 if ((factors[0] != 1) && (factors[0] != 2))
532 (void) ThrowMagickException(exception,GetMagickModule(),CoderWarning,
533 "ignoring sampling-factor","=%s",sampling_factor);
534 else if (channels != 0)
537 Cross check given color type and subsampling.
539 factors[1]=((channels == IMF_WRITE_YCA) ||
540 (channels == IMF_WRITE_YC)) ? 2 : 1;
541 if (factors[0] != factors[1])
542 (void) ThrowMagickException(exception,GetMagickModule(),
543 CoderWarning,"sampling-factor and color type mismatch","=%s",
550 If no color type given, select it now.
553 channels=image->alpha_trait != UndefinedPixelTrait ? IMF_WRITE_YCA :
556 channels=image->alpha_trait != UndefinedPixelTrait ? IMF_WRITE_RGBA :
559 ImfHeaderSetCompression(hdr_info,compression);
560 ImfHeaderSetLineOrder(hdr_info,IMF_INCREASING_Y);
561 file=ImfOpenOutputFile(write_info->filename,hdr_info,channels);
562 ImfDeleteHeader(hdr_info);
563 if (file == (ImfOutputFile *) NULL)
565 (void) RelinquishUniqueFileResource(write_info->filename);
566 write_info=DestroyImageInfo(write_info);
567 ThrowFileException(exception,BlobError,"UnableToOpenBlob",
571 scanline=(ImfRgba *) AcquireQuantumMemory(image->columns,sizeof(*scanline));
572 if (scanline == (ImfRgba *) NULL)
574 (void) ImfCloseOutputFile(file);
575 (void) RelinquishUniqueFileResource(write_info->filename);
576 write_info=DestroyImageInfo(write_info);
577 ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
579 memset(scanline,0,image->columns*sizeof(*scanline));
580 for (y=0; y < (ssize_t) image->rows; y++)
582 p=GetVirtualPixels(image,0,y,image->columns,1,exception);
583 if (p == (const Quantum *) NULL)
585 for (x=0; x < (ssize_t) image->columns; x++)
587 ImfFloatToHalf(QuantumScale*GetPixelRed(image,p),&half_quantum);
588 scanline[x].r=half_quantum;
589 ImfFloatToHalf(QuantumScale*GetPixelGreen(image,p),&half_quantum);
590 scanline[x].g=half_quantum;
591 ImfFloatToHalf(QuantumScale*GetPixelBlue(image,p),&half_quantum);
592 scanline[x].b=half_quantum;
593 if (image->alpha_trait == UndefinedPixelTrait)
594 ImfFloatToHalf(1.0,&half_quantum);
596 ImfFloatToHalf(QuantumScale*GetPixelAlpha(image,p),&half_quantum);
597 scanline[x].a=half_quantum;
598 p+=GetPixelChannels(image);
600 ImfOutputSetFrameBuffer(file,scanline-(y*image->columns),1,image->columns);
601 ImfOutputWritePixels(file,1);
603 (void) ImfCloseOutputFile(file);
604 scanline=(ImfRgba *) RelinquishMagickMemory(scanline);
605 (void) FileToImage(image,write_info->filename,exception);
606 (void) RelinquishUniqueFileResource(write_info->filename);
607 write_info=DestroyImageInfo(write_info);
608 (void) CloseBlob(image);