]> granicus.if.org Git - imagemagick/blob - coders/dng.c
...
[imagemagick] / coders / dng.c
1 /*
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 %                                                                             %
4 %                                                                             %
5 %                                                                             %
6 %                            DDDD   N   N   GGGG                              %
7 %                            D   D  NN  N  GS                                 %
8 %                            D   D  N N N  G  GG                              %
9 %                            D   D  N  NN  G   G                              %
10 %                            DDDD   N   N   GGGG                              %
11 %                                                                             %
12 %                                                                             %
13 %                  Read the Digital Negative Image Format                     %
14 %                                                                             %
15 %                              Software Design                                %
16 %                                   Cristy                                    %
17 %                                 July 1999                                   %
18 %                                                                             %
19 %                                                                             %
20 %  Copyright 1999-2017 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://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   Include declarations.
40 */
41 #include "MagickCore/studio.h"
42 #include "MagickCore/blob.h"
43 #include "MagickCore/blob-private.h"
44 #include "MagickCore/constitute.h"
45 #include "MagickCore/delegate.h"
46 #include "MagickCore/exception.h"
47 #include "MagickCore/exception-private.h"
48 #include "MagickCore/geometry.h"
49 #include "MagickCore/image.h"
50 #include "MagickCore/image-private.h"
51 #include "MagickCore/layer.h"
52 #include "MagickCore/list.h"
53 #include "MagickCore/log.h"
54 #include "MagickCore/magick.h"
55 #include "MagickCore/memory_.h"
56 #include "MagickCore/opencl.h"
57 #include "MagickCore/resource_.h"
58 #include "MagickCore/quantum-private.h"
59 #include "MagickCore/static.h"
60 #include "MagickCore/string_.h"
61 #include "MagickCore/module.h"
62 #include "MagickCore/transform.h"
63 #include "MagickCore/utility.h"
64 #include "MagickCore/xml-tree.h"
65 #include "MagickCore/xml-tree-private.h"
66 \f
67 /*
68 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
69 %                                                                             %
70 %                                                                             %
71 %                                                                             %
72 %   R e a d D N G I m a g e                                                   %
73 %                                                                             %
74 %                                                                             %
75 %                                                                             %
76 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
77 %
78 %  ReadDNGImage() reads an binary file in the Digital Negative format and
79 %  returns it.  It allocates the memory necessary for the new Image structure
80 %  and returns a pointer to the new image. 
81 %
82 %  The format of the ReadDNGImage method is:
83 %
84 %      Image *ReadDNGImage(const ImageInfo *image_info,
85 %        ExceptionInfo *exception)
86 %
87 %  A description of each parameter follows:
88 %
89 %    o image_info: the image info.
90 %
91 %    o exception: return any errors or warnings in this structure.
92 %
93 */
94
95 #if defined(MAGICKCORE_WINDOWS_SUPPORT) && defined(MAGICKCORE_OPENCL_SUPPORT)
96 static void InitializeDcrawOpenCL(ExceptionInfo *exception)
97 {
98   MagickBooleanType
99     opencl_disabled;
100
101   MagickCLDevice
102     *devices;
103
104   size_t
105     length;
106
107   ssize_t
108     i;
109
110   (void) SetEnvironmentVariable("DCR_CL_PLATFORM",NULL);
111   (void) SetEnvironmentVariable("DCR_CL_DEVICE",NULL);
112   (void) SetEnvironmentVariable("DCR_CL_DISABLED",NULL);
113   if (GetOpenCLEnabled() == MagickFalse)
114     {
115       (void) SetEnvironmentVariable("DCR_CL_DISABLED","1");
116       return;
117     }
118   devices=GetOpenCLDevices(&length,exception);
119   if (devices == (MagickCLDevice *) NULL)
120     return;
121   for (i=0; i < (ssize_t) length; i++)
122   {
123     const char
124       *name;
125
126     MagickCLDevice
127       device;
128
129     device=devices[i];
130     if (GetOpenCLDeviceEnabled(device) == MagickFalse)
131       continue;
132     name=GetOpenCLDeviceVendorName(device);
133     if (name != (const char *) NULL)
134       (void) SetEnvironmentVariable("DCR_CL_PLATFORM",name);
135     name=GetOpenCLDeviceName(device);
136     if (name != (const char *) NULL)
137       (void) SetEnvironmentVariable("DCR_CL_DEVICE",name);
138     return;
139   }
140 }
141 #else
142 static void InitializeDcrawOpenCL(ExceptionInfo *magick_unused(exception))
143 {
144   magick_unreferenced(exception);
145 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
146   (void) SetEnvironmentVariable("DCR_CL_DISABLED","1");
147 #endif
148 }
149 #endif
150
151 static Image *ReadDNGImage(const ImageInfo *image_info,ExceptionInfo *exception)
152 {
153   ExceptionInfo
154     *sans_exception;
155
156   Image
157     *image;
158
159   ImageInfo
160     *read_info;
161
162   MagickBooleanType
163     status;
164
165   /*
166     Open image file.
167   */
168   assert(image_info != (const ImageInfo *) NULL);
169   assert(image_info->signature == MagickCoreSignature);
170   if (image_info->debug != MagickFalse)
171     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
172       image_info->filename);
173   assert(exception != (ExceptionInfo *) NULL);
174   assert(exception->signature == MagickCoreSignature);
175   image=AcquireImage(image_info,exception);
176   status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
177   if (status == MagickFalse)
178     {
179       image=DestroyImageList(image);
180       return((Image *) NULL);
181     }
182   (void) CloseBlob(image);
183   (void) DestroyImageList(image);
184   /*
185     Convert DNG to PPM with delegate.
186   */
187   InitializeDcrawOpenCL(exception);
188   image=AcquireImage(image_info,exception);
189   read_info=CloneImageInfo(image_info);
190   SetImageInfoBlob(read_info,(void *) NULL,0);
191   (void) InvokeDelegate(read_info,image,"dng:decode",(char *) NULL,exception);
192   image=DestroyImage(image);
193   (void) FormatLocaleString(read_info->filename,MagickPathExtent,"%s.png",
194     read_info->unique);
195   sans_exception=AcquireExceptionInfo();
196   image=ReadImage(read_info,sans_exception);
197   sans_exception=DestroyExceptionInfo(sans_exception);
198   if (image == (Image *) NULL)
199     {
200       (void) FormatLocaleString(read_info->filename,MagickPathExtent,"%s.ppm",
201         read_info->unique);
202       image=ReadImage(read_info,exception);
203     }
204   (void) RelinquishUniqueFileResource(read_info->filename);
205   if (image != (Image *) NULL)
206     {
207       char
208         filename[MagickPathExtent],
209         *xml;
210
211       ExceptionInfo
212         *sans;
213
214       (void) CopyMagickString(image->magick,read_info->magick,MagickPathExtent);
215       (void) FormatLocaleString(filename,MagickPathExtent,"%s.ufraw",
216         read_info->unique);
217       sans=AcquireExceptionInfo();
218       xml=FileToString(filename,MagickPathExtent,sans);
219       (void) RelinquishUniqueFileResource(filename);
220       if (xml != (char *) NULL)
221         {
222           XMLTreeInfo
223             *ufraw;
224
225           /*
226             Inject 
227           */
228           ufraw=NewXMLTree(xml,sans);
229           if (ufraw != (XMLTreeInfo *) NULL)
230             {
231               char
232                 *content,
233                 property[MagickPathExtent];
234
235               const char
236                 *tag;
237
238               XMLTreeInfo
239                 *next;
240
241               if (image->properties == (void *) NULL)
242                 ((Image *) image)->properties=NewSplayTree(
243                   CompareSplayTreeString,RelinquishMagickMemory,
244                   RelinquishMagickMemory);
245               next=GetXMLTreeChild(ufraw,(const char *) NULL);
246               while (next != (XMLTreeInfo *) NULL)
247               {
248                 tag=GetXMLTreeTag(next);
249                 if (tag == (char *) NULL)
250                   tag="unknown";
251                 (void) FormatLocaleString(property,MagickPathExtent,"dng:%s",tag);
252                 content=ConstantString(GetXMLTreeContent(next)); 
253                 StripString(content);
254                 if ((LocaleCompare(tag,"log") != 0) &&
255                     (LocaleCompare(tag,"InputFilename") != 0) &&
256                     (LocaleCompare(tag,"OutputFilename") != 0) &&
257                     (LocaleCompare(tag,"OutputType") != 0) &&
258                     (strlen(content) != 0))
259                   (void) AddValueToSplayTree((SplayTreeInfo *)
260                     ((Image *) image)->properties,ConstantString(property),
261                     content);
262                 next=GetXMLTreeSibling(next);
263               }
264               ufraw=DestroyXMLTree(ufraw);
265             }
266           xml=DestroyString(xml);
267         }
268       sans=DestroyExceptionInfo(sans);
269     }
270   read_info=DestroyImageInfo(read_info);
271   return(image);
272 }
273 \f
274 /*
275 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
276 %                                                                             %
277 %                                                                             %
278 %                                                                             %
279 %   R e g i s t e r D N G I m a g e                                           %
280 %                                                                             %
281 %                                                                             %
282 %                                                                             %
283 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
284 %
285 %  RegisterDNGImage() adds attributes for the DNG image format to
286 %  the list of supported formats.  The attributes include the image format
287 %  tag, a method to read and/or write the format, whether the format
288 %  supports the saving of more than one frame to the same file or blob,
289 %  whether the format supports native in-memory I/O, and a brief
290 %  description of the format.
291 %
292 %  The format of the RegisterDNGImage method is:
293 %
294 %      size_t RegisterDNGImage(void)
295 %
296 */
297 ModuleExport size_t RegisterDNGImage(void)
298 {
299   MagickInfo
300     *entry;
301
302   entry=AcquireMagickInfo("DNG","3FR","Hasselblad CFV/H3D39II");
303   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
304   entry->flags^=CoderBlobSupportFlag;
305   entry->format_type=ExplicitFormatType;
306   (void) RegisterMagickInfo(entry);
307   entry=AcquireMagickInfo("DNG","ARW","Sony Alpha Raw Image Format");
308   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
309   entry->flags^=CoderBlobSupportFlag;
310   entry->format_type=ExplicitFormatType;
311   (void) RegisterMagickInfo(entry);
312   entry=AcquireMagickInfo("DNG","DNG","Digital Negative");
313   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
314   entry->flags^=CoderBlobSupportFlag;
315   entry->format_type=ExplicitFormatType;
316   (void) RegisterMagickInfo(entry);
317   entry=AcquireMagickInfo("DNG","CR2","Canon Digital Camera Raw Image Format");
318   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
319   entry->flags^=CoderBlobSupportFlag;
320   entry->format_type=ExplicitFormatType;
321   (void) RegisterMagickInfo(entry);
322   entry=AcquireMagickInfo("DNG","CRW","Canon Digital Camera Raw Image Format");
323   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
324   entry->flags^=CoderBlobSupportFlag;
325   entry->format_type=ExplicitFormatType;
326   (void) RegisterMagickInfo(entry);
327   entry=AcquireMagickInfo("DNG","DCR","Kodak Digital Camera Raw Image File");
328   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
329   entry->flags^=CoderBlobSupportFlag;
330   entry->format_type=ExplicitFormatType;
331   (void) RegisterMagickInfo(entry);
332   entry=AcquireMagickInfo("DNG","ERF","Epson RAW Format");
333   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
334   entry->flags^=CoderBlobSupportFlag;
335   entry->format_type=ExplicitFormatType;
336   (void) RegisterMagickInfo(entry);
337   entry=AcquireMagickInfo("DNG","IIQ","Phase One Raw Image Format");
338   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
339   entry->flags^=CoderBlobSupportFlag;
340   entry->format_type=ExplicitFormatType;
341   (void) RegisterMagickInfo(entry);
342   entry=AcquireMagickInfo("DNG","KDC","Kodak Digital Camera Raw Image Format");
343   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
344   entry->flags^=CoderBlobSupportFlag;
345   entry->format_type=ExplicitFormatType;
346   (void) RegisterMagickInfo(entry);
347   entry=AcquireMagickInfo("DNG","K25","Kodak Digital Camera Raw Image Format");
348   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
349   entry->flags^=CoderBlobSupportFlag;
350   entry->format_type=ExplicitFormatType;
351   (void) RegisterMagickInfo(entry);
352   entry=AcquireMagickInfo("DNG","MEF","Mamiya Raw Image File");
353   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
354   entry->flags^=CoderBlobSupportFlag;
355   entry->format_type=ExplicitFormatType;
356   (void) RegisterMagickInfo(entry);
357   entry=AcquireMagickInfo("DNG","MRW","Sony (Minolta) Raw Image File");
358   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
359   entry->flags^=CoderBlobSupportFlag;
360   entry->format_type=ExplicitFormatType;
361   (void) RegisterMagickInfo(entry);
362   entry=AcquireMagickInfo("DNG","NEF","Nikon Digital SLR Camera Raw Image File");
363   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
364   entry->flags^=CoderBlobSupportFlag;
365   entry->format_type=ExplicitFormatType;
366   (void) RegisterMagickInfo(entry);
367   entry=AcquireMagickInfo("DNG","NRW","Nikon Digital SLR Camera Raw Image File");
368   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
369   entry->flags^=CoderBlobSupportFlag;
370   entry->format_type=ExplicitFormatType;
371   (void) RegisterMagickInfo(entry);
372   entry=AcquireMagickInfo("DNG","ORF","Olympus Digital Camera Raw Image File");
373   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
374   entry->flags^=CoderBlobSupportFlag;
375   entry->format_type=ExplicitFormatType;
376   (void) RegisterMagickInfo(entry);
377   entry=AcquireMagickInfo("DNG","PEF","Pentax Electronic File");
378   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
379   entry->flags^=CoderBlobSupportFlag;
380   entry->format_type=ExplicitFormatType;
381   (void) RegisterMagickInfo(entry);
382   entry=AcquireMagickInfo("DNG","RAF","Fuji CCD-RAW Graphic File");
383   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
384   entry->flags^=CoderBlobSupportFlag;
385   entry->format_type=ExplicitFormatType;
386   (void) RegisterMagickInfo(entry);
387   entry=AcquireMagickInfo("DNG","RAW","Raw");
388   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
389   entry->flags^=CoderBlobSupportFlag;
390   entry->format_type=ExplicitFormatType;
391   (void) RegisterMagickInfo(entry);
392   entry=AcquireMagickInfo("DNG","RMF","Raw Media Format");
393   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
394   entry->flags^=CoderBlobSupportFlag;
395   entry->format_type=ExplicitFormatType;
396   (void) RegisterMagickInfo(entry);
397   entry=AcquireMagickInfo("DNG","RW2","Panasonic Lumix Raw Image");
398   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
399   entry->flags^=CoderBlobSupportFlag;
400   entry->format_type=ExplicitFormatType;
401   (void) RegisterMagickInfo(entry);
402   entry=AcquireMagickInfo("DNG","SRF","Sony Raw Format");
403   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
404   entry->flags^=CoderBlobSupportFlag;
405   entry->format_type=ExplicitFormatType;
406   (void) RegisterMagickInfo(entry);
407   entry=AcquireMagickInfo("DNG","SR2","Sony Raw Format 2");
408   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
409   entry->flags^=CoderBlobSupportFlag;
410   entry->format_type=ExplicitFormatType;
411   (void) RegisterMagickInfo(entry);
412   entry=AcquireMagickInfo("DNG","X3F","Sigma Camera RAW Picture File");
413   entry->decoder=(DecodeImageHandler *) ReadDNGImage;
414   entry->flags^=CoderBlobSupportFlag;
415   entry->format_type=ExplicitFormatType;
416   (void) RegisterMagickInfo(entry);
417   return(MagickImageCoderSignature);
418 }
419 \f
420 /*
421 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
422 %                                                                             %
423 %                                                                             %
424 %                                                                             %
425 %   U n r e g i s t e r D N G I m a g e                                       %
426 %                                                                             %
427 %                                                                             %
428 %                                                                             %
429 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
430 %
431 %  UnregisterDNGImage() removes format registrations made by the
432 %  BIM module from the list of supported formats.
433 %
434 %  The format of the UnregisterBIMImage method is:
435 %
436 %      UnregisterDNGImage(void)
437 %
438 */
439 ModuleExport void UnregisterDNGImage(void)
440 {
441   (void) UnregisterMagickInfo("X3F");
442   (void) UnregisterMagickInfo("SR2");
443   (void) UnregisterMagickInfo("SRF");
444   (void) UnregisterMagickInfo("RW2");
445   (void) UnregisterMagickInfo("RMF");
446   (void) UnregisterMagickInfo("RAF");
447   (void) UnregisterMagickInfo("PEF");
448   (void) UnregisterMagickInfo("ORF");
449   (void) UnregisterMagickInfo("NRW");
450   (void) UnregisterMagickInfo("NEF");
451   (void) UnregisterMagickInfo("MRW");
452   (void) UnregisterMagickInfo("MEF");
453   (void) UnregisterMagickInfo("K25");
454   (void) UnregisterMagickInfo("KDC");
455   (void) UnregisterMagickInfo("IIQ");
456   (void) UnregisterMagickInfo("ERF");
457   (void) UnregisterMagickInfo("DCR");
458   (void) UnregisterMagickInfo("CRW");
459   (void) UnregisterMagickInfo("CR2");
460   (void) UnregisterMagickInfo("DNG");
461   (void) UnregisterMagickInfo("ARW");
462   (void) UnregisterMagickInfo("3FR");
463 }