1 /*
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 % %
4 % %
5 % %
6 % H H AAA L DDDD %
7 % H H A A L D D %
8 % HHHHH AAAAA L D D %
9 % H H A A L D D %
10 % H H A A LLLLL DDDD %
11 % %
12 % %
13 % Create Identity Hald CLUT 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/colorspace.h"
47 #include "MagickCore/exception.h"
48 #include "MagickCore/exception-private.h"
49 #include "MagickCore/image.h"
50 #include "MagickCore/image-private.h"
51 #include "MagickCore/list.h"
52 #include "MagickCore/magick.h"
53 #include "MagickCore/memory_.h"
54 #include "MagickCore/module.h"
55 #include "MagickCore/monitor.h"
56 #include "MagickCore/monitor-private.h"
57 #include "MagickCore/pixel-accessor.h"
58 #include "MagickCore/quantum-private.h"
59 #include "MagickCore/resource_.h"
60 #include "MagickCore/static.h"
61 #include "MagickCore/string_.h"
62 #include "MagickCore/string-private.h"
63 #include "MagickCore/thread-private.h"
64
65 /*
66 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
67 % %
68 % %
69 % %
70 % R e a d H A L D I m a g e %
71 % %
72 % %
73 % %
74 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
75 %
76 % ReadHALDImage() creates a Hald color lookup table image and returns it. It
77 % allocates the memory necessary for the new Image structure and returns a
78 % pointer to the new image.
79 %
80 % The format of the ReadHALDImage method is:
81 %
82 % Image *ReadHALDImage(const ImageInfo *image_info,
83 % ExceptionInfo *exception)
84 %
85 % A description of each parameter follows:
86 %
87 % o image_info: the image info.
88 %
89 % o exception: return any errors or warnings in this structure.
90 %
91 */
ReadHALDImage(const ImageInfo * image_info,ExceptionInfo * exception)92 static Image *ReadHALDImage(const ImageInfo *image_info,
93 ExceptionInfo *exception)
94 {
95 Image
96 *image;
97
98 MagickBooleanType
99 status;
100
101 size_t
102 cube_size,
103 level;
104
105 ssize_t
106 i,
107 y;
108
109 /*
110 Create HALD color lookup table image.
111 */
112 assert(image_info != (const ImageInfo *) NULL);
113 assert(image_info->signature == MagickCoreSignature);
114 if (image_info->debug != MagickFalse)
115 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
116 image_info->filename);
117 assert(exception != (ExceptionInfo *) NULL);
118 assert(exception->signature == MagickCoreSignature);
119 image=AcquireImage(image_info,exception);
120 level=0;
121 if (*image_info->filename != '\0')
122 level=StringToUnsignedLong(image_info->filename);
123 if (image_info->scene != 0)
124 level=image_info->scene;
125 if ((level < 2) || (level > 256))
126 level=8;
127 status=MagickTrue;
128 cube_size=level*level;
129 image->columns=(size_t) (level*cube_size);
130 image->rows=(size_t) (level*cube_size);
131 status=SetImageExtent(image,image->columns,image->rows,exception);
132 if (status == MagickFalse)
133 return(DestroyImageList(image));
134 for (y=0; y < (ssize_t) image->rows; y+=(ssize_t) level)
135 {
136 ssize_t
137 blue,
138 green,
139 red;
140
141 register Quantum
142 *magick_restrict q;
143
144 if (status == MagickFalse)
145 continue;
146 q=QueueAuthenticPixels(image,0,y,image->columns,(size_t) level,exception);
147 if (q == (Quantum *) NULL)
148 {
149 status=MagickFalse;
150 continue;
151 }
152 blue=y/(ssize_t) level;
153 for (green=0; green < (ssize_t) cube_size; green++)
154 {
155 for (red=0; red < (ssize_t) cube_size; red++)
156 {
157 SetPixelRed(image,ClampToQuantum(QuantumRange*red/(cube_size-1.0)),q);
158 SetPixelGreen(image,ClampToQuantum(QuantumRange*green/(cube_size-1.0)),
159 q);
160 SetPixelBlue(image,ClampToQuantum(QuantumRange*blue/(cube_size-1.0)),q);
161 SetPixelAlpha(image,OpaqueAlpha,q);
162 q+=GetPixelChannels(image);
163 }
164 }
165 if (SyncAuthenticPixels(image,exception) == MagickFalse)
166 status=MagickFalse;
167 }
168 (void) CloseBlob(image);
169 if (status == MagickFalse)
170 return(DestroyImageList(image));
171 if (image_info->scene != 0)
172 for (i=0; i < (ssize_t) image_info->scene; i++)
173 AppendImageToList(&image,CloneImage(image,0,0,MagickTrue,exception));
174 return(GetFirstImageInList(image));
175 }
176
177 /*
178 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
179 % %
180 % %
181 % %
182 % R e g i s t e r H A L D I m a g e %
183 % %
184 % %
185 % %
186 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
187 %
188 % RegisterHALDImage() adds attributes for the Hald color lookup table image
189 % format to the list of supported formats. The attributes include the image
190 % format tag, a method to read and/or write the format, whether the format
191 % supports the saving of more than one frame to the same file or blob, whether
192 % the format supports native in-memory I/O, and a brief description of the
193 % format.
194 %
195 % The format of the RegisterHALDImage method is:
196 %
197 % size_t RegisterHALDImage(void)
198 %
199 */
RegisterHALDImage(void)200 ModuleExport size_t RegisterHALDImage(void)
201 {
202 MagickInfo
203 *entry;
204
205 entry=AcquireMagickInfo("HALD","HALD",
206 "Identity Hald color lookup table image");
207 entry->decoder=(DecodeImageHandler *) ReadHALDImage;
208 entry->flags^=CoderAdjoinFlag;
209 entry->format_type=ImplicitFormatType;
210 entry->flags|=CoderRawSupportFlag;
211 entry->flags|=CoderEndianSupportFlag;
212 (void) RegisterMagickInfo(entry);
213 return(MagickImageCoderSignature);
214 }
215
216 /*
217 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
218 % %
219 % %
220 % %
221 % U n r e g i s t e r H A L D I m a g e %
222 % %
223 % %
224 % %
225 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
226 %
227 % UnregisterHALDImage() removes format registrations made by the
228 % HALD module from the list of supported formats.
229 %
230 % The format of the UnregisterHALDImage method is:
231 %
232 % UnregisterHALDImage(void)
233 %
234 */
UnregisterHALDImage(void)235 ModuleExport void UnregisterHALDImage(void)
236 {
237 (void) UnregisterMagickInfo("HALD");
238 }
239