]> granicus.if.org Git - imagemagick/blob - MagickCore/delegate.c
(no commit message)
[imagemagick] / MagickCore / delegate.c
1 /*
2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
3 %                                                                             %
4 %                                                                             %
5 %           DDDD   EEEEE  L      EEEEE   GGGG   AAA   TTTTT  EEEEE            %
6 %           D   D  E      L      E      G      A   A    T    E                %
7 %           D   D  EEE    L      EEE    G  GG  AAAAA    T    EEE              %
8 %           D   D  E      L      E      G   G  A   A    T    E                %
9 %           DDDD   EEEEE  LLLLL  EEEEE   GGG   A   A    T    EEEEE            %
10 %                                                                             %
11 %                                                                             %
12 %             MagickCore Methods to Read/Write/Invoke Delegates               %
13 %                                                                             %
14 %                             Software Design                                 %
15 %                               John Cristy                                   %
16 %                               October 1998                                  %
17 %                                                                             %
18 %                                                                             %
19 %  Copyright 1999-2012 ImageMagick Studio LLC, a non-profit organization      %
20 %  dedicated to making software imaging solutions freely available.           %
21 %                                                                             %
22 %  You may not use this file except in compliance with the License.  You may  %
23 %  obtain a copy of the License at                                            %
24 %                                                                             %
25 %    http://www.imagemagick.org/script/license.php                            %
26 %                                                                             %
27 %  Unless required by applicable law or agreed to in writing, software        %
28 %  distributed under the License is distributed on an "AS IS" BASIS,          %
29 %  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   %
30 %  See the License for the specific language governing permissions and        %
31 %  limitations under the License.                                             %
32 %                                                                             %
33 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
34 %
35 %  The Delegates methods associate a set of commands with a particular
36 %  image format.  ImageMagick uses delegates for formats it does not handle
37 %  directly.
38 %
39 %  Thanks to Bob Friesenhahn for the initial inspiration and design of the
40 %  delegates methods.
41 %
42 %
43 */
44 \f
45 /*
46   Include declarations.
47 */
48 #include "MagickCore/studio.h"
49 #include "MagickCore/property.h"
50 #include "MagickCore/blob.h"
51 #include "MagickCore/client.h"
52 #include "MagickCore/configure.h"
53 #include "MagickCore/constitute.h"
54 #include "MagickCore/delegate.h"
55 #include "MagickCore/delegate-private.h"
56 #include "MagickCore/exception.h"
57 #include "MagickCore/exception-private.h"
58 #include "MagickCore/hashmap.h"
59 #include "MagickCore/list.h"
60 #include "MagickCore/memory_.h"
61 #include "MagickCore/policy.h"
62 #include "MagickCore/resource_.h"
63 #include "MagickCore/semaphore.h"
64 #include "MagickCore/string_.h"
65 #include "MagickCore/token.h"
66 #include "MagickCore/utility.h"
67 #include "MagickCore/utility-private.h"
68 #include "MagickCore/xml-tree.h"
69 \f
70 /*
71   Define declarations.
72 */
73 #define DelegateFilename  "delegates.xml"
74 \f
75 /*
76   Declare delegate map.
77 */
78 static const char
79   *DelegateMap = (const char *)
80     "<?xml version=\"1.0\" encoding=\"UTF-8\"?>"
81     "<delegatemap>"
82     "  <delegate decode=\"autotrace\" stealth=\"True\" command=\"&quot;autotrace&quot; -output-format svg -output-file &quot;%o&quot; &quot;%i&quot;\"/>"
83     "  <delegate decode=\"avi:decode\" stealth=\"True\" command=\"&quot;mplayer&quot; &quot;%i&quot; -really-quiet -ao null -vo png:z=3\"/>"
84     "  <delegate decode=\"browse\" stealth=\"True\" spawn=\"True\" command=\"&quot;xdg-open&quot; http://www.imagemagick.org/\"/>"
85     "  <delegate decode=\"cgm\" thread-support=\"False\" command=\"&quot;ralcgm&quot; -d ps -oC &lt; &quot;%i&quot; &gt; &quot;%o&quot; 2&gt; &quot;%u&quot;\"/>"
86     "  <delegate decode=\"dng:decode\" command=\"&quot;/usr/bin/ufraw-batch&quot; --silent --wb=camera --black-point=auto --exposure=auto --create-id=also --out-type=ppm16 &quot;--output=%u.pnm&quot; &quot;%i&quot;\"/>"
87     "  <delegate decode=\"edit\" stealth=\"True\" command=\"&quot;xterm&quot; -title &quot;Edit Image Comment&quot; -e vi &quot;%o&quot;\"/>"
88     "  <delegate decode=\"eps\" encode=\"pdf\" mode=\"bi\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pdfwrite&quot; &quot;-sOutputFile=%o&quot; &quot;-f%i&quot;\"/>"
89     "  <delegate decode=\"eps\" encode=\"ps\" mode=\"bi\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pswrite&quot; &quot;-sOutputFile=%o&quot; &quot;-f%i&quot;\"/>"
90     "  <delegate decode=\"fig\" command=\"&quot;fig2dev&quot; -L ps &quot;%i&quot; &quot;%o&quot;\"/>"
91     "  <delegate decode=\"gplt\" command=\"&quot;echo&quot; &quot;set size 1.25,0.62     set terminal postscript portrait color solid; set output &quot;%o&quot;; load &quot;%i&quot;&quot; &gt; &quot;%u&quot;;&quot;gnuplot&quot; &quot;%u&quot;\"/>"
92     "  <delegate decode=\"hpg\" command=\"&quot;hp2xx&quot; -q -m eps -f `basename &quot;%o&quot;` &quot;%i&quot;     mv -f `basename &quot;%o&quot;` &quot;%o&quot;\"/>"
93     "  <delegate decode=\"hpgl\" command=\"if [ -e hp2xx -o -e /usr/bin/hp2xx ]; then     hp2xx -q -m eps -f `basename &quot;%o&quot;` &quot;%i&quot;     mv -f `basename &quot;%o&quot;` &quot;%o   else     echo &quot;You need to install hp2xx to use HPGL files with ImageMagick.&quot;     exit 1   fi\"/>"
94     "  <delegate decode=\"htm\" command=\"&quot;html2ps&quot; -U -o &quot;%o&quot; &quot;%i&quot;\"/>"
95     "  <delegate decode=\"html\" command=\"&quot;html2ps&quot; -U -o &quot;%o&quot; &quot;%i&quot;\"/>"
96     "  <delegate decode=\"https\" command=\"&quot;wget&quot; -q -O &quot;%o&quot; &quot;https:%M&quot;\"/>"
97     "  <delegate decode=\"ilbm\" command=\"&quot;ilbmtoppm&quot; &quot;%i&quot; &gt; &quot;%o&quot;\"/>"
98     "  <delegate decode=\"man\" command=\"&quot;groff&quot; -man -Tps &quot;%i&quot; &gt; &quot;%o&quot;\"/>"
99     "  <delegate decode=\"mpeg:decode\" stealth=\"True\" command=\"&quot;ffmpeg&quot; -i &quot;%i&quot; -vcodec pam -an -f rawvideo -y &quot;%u0.pam&quot; 2;&gt; &quot;%Z&quot;\"/>"
100     "  <delegate decode=\"null\" encode=\"mpeg:encode\" stealth=\"True\" command=\"&quot;ffmpeg&quot; &quot;%M%%d.jpg&quot; &quot;%u.%m&quot; 2;&gt; &quot;%Z&quot;\"/>"
101     "  <delegate decode=\"pcl:color\" stealth=\"True\" command=\"&quot;pcl6&quot; -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=ppmraw&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;%s&quot;\"/>"
102     "  <delegate decode=\"pcl:cmyk\" stealth=\"True\" command=\"&quot;pcl6&quot; -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=bmpsep8&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;%s&quot;\"/>"
103     "  <delegate decode=\"pcl:mono\" stealth=\"True\" command=\"&quot;pcl6&quot; -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pbmraw&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;%s&quot;\"/>"
104     "  <delegate decode=\"pdf\" encode=\"eps\" mode=\"bi\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=epswrite&quot; &quot;-sOutputFile=%o&quot; &quot;-f%i&quot;\"/>"
105     "  <delegate decode=\"pdf\" encode=\"ps\" mode=\"bi\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pswrite&quot; &quot;-sOutputFile=%o&quot; &quot;-f%i&quot;\"/>"
106     "  <delegate decode=\"pnm\" encode=\"ilbm\" mode=\"encode\" command=\"&quot;ppmtoilbm&quot; -24if &quot;%i&quot; &gt; &quot;%o&quot;\"/>"
107     "  <delegate decode=\"pnm\" encode=\"launch\" mode=\"encode\" command=\"&quot;gimp&quot; &quot;%i&quot;\"/>"
108     "  <delegate decode=\"pov\" command=\"&quot;povray&quot; &quot;+i&quot;%i&quot;&quot; -D0 +o&quot;%o&quot; +fn%q +w%w +h%h +a -q9 -kfi&quot;%s&quot; -kff&quot;%n&quot;     &quot;convert&quot; -concatenate &quot;%o*.png&quot; &quot;%o&quot;\"/>"
109     "  <delegate decode=\"ps\" encode=\"eps\" mode=\"bi\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=epswrite&quot; &quot;-sOutputFile=%o&quot; &quot;-f%i&quot;\"/>"
110     "  <delegate decode=\"ps\" encode=\"pdf\" mode=\"bi\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pdfwrite&quot; &quot;-sOutputFile=%o&quot; &quot;-f%i&quot;\"/>"
111     "  <delegate decode=\"ps\" encode=\"print\" mode=\"encode\" command=\"lpr &quot;%i&quot;\"/>"
112     "  <delegate decode=\"ps:alpha\" stealth=\"True\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pngalpha&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;-f%s&quot; &quot;-f%s&quot;\"/>"
113     "  <delegate decode=\"ps:bbox\" stealth=\"True\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=bbox&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;-f%s&quot; &quot;-f%s&quot;\"/>"
114     "  <delegate decode=\"ps:cmyk\" stealth=\"True\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=bmpsep8&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;-f%s&quot; &quot;-f%s&quot;\"/>"
115     "  <delegate decode=\"ps:color\" stealth=\"True\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pnmraw&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;-f%s&quot; &quot;-f%s&quot;\"/>"
116     "  <delegate decode=\"ps:mono\" stealth=\"True\" command=\"&quot;gs&quot; -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=0 &quot;-sDEVICE=pnmraw&quot; -dTextAlphaBits=%u -dGraphicsAlphaBits=%u &quot;-r%s&quot; %s &quot;-sOutputFile=%s&quot; &quot;-f%s&quot; &quot;-f%s&quot;\"/>"
117     "  <delegate decode=\"rgba\" encode=\"rle\" mode=\"encode\" command=\"&quot;rawtorle&quot; -o &quot;%o&quot; -v &quot;%i&quot;\"/>"
118     "  <delegate decode=\"scan\" command=\"&quot;scanimage&quot; -d &quot;%i&quot; &gt; &quot;%o&quot;\"/>"
119     "  <delegate encode=\"show\" spawn=\"True\" command=\"&quot;/usr/local/bin/display&quot; -immutable -delay 0 -window-group %g -title &quot;%l of %f&quot; &quot;temporary:%i&quot;\"/>"
120     "  <delegate decode=\"shtml\" command=\"&quot;html2ps&quot; -U -o &quot;%o&quot; &quot;%i&quot;\"/>"
121     "  <delegate decode=\"svg\" command=\"&quot;rsvg&quot; &quot;%i&quot; &quot;%o&quot;\"/>"
122     "  <delegate decode=\"txt\" encode=\"ps\" mode=\"bi\" command=\"&quot;enscript&quot; -o &quot;%o&quot; &quot;%i&quot;\"/>"
123     "  <delegate encode=\"win\" stealth=\"True\" spawn=\"True\" command=\"&quot;/usr/local/bin/display&quot; -immutable -delay 0 -window-group %g -title &quot;%l of %f&quot; &quot;temporary:%i&quot;\"/>"
124     "  <delegate decode=\"wmf\" command=\"&quot;wmf2eps&quot; -o &quot;%o&quot; &quot;%i&quot;\"/>"
125     "</delegatemap>";
126 \f
127 /*
128   Global declaractions.
129 */
130 static LinkedListInfo
131   *delegate_list = (LinkedListInfo *) NULL;
132
133 static SemaphoreInfo
134   *delegate_semaphore = (SemaphoreInfo *) NULL;
135
136 static volatile MagickBooleanType
137   instantiate_delegate = MagickFalse;
138 \f
139 /*
140   Forward declaractions.
141 */
142 static MagickBooleanType
143   InitializeDelegateList(ExceptionInfo *),
144   LoadDelegateLists(const char *,ExceptionInfo *);
145 \f
146 /*
147 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
148 %                                                                             %
149 %                                                                             %
150 %                                                                             %
151 +   D e l e g a t e C o m p o n e n t T e r m i n u s                         %
152 %                                                                             %
153 %                                                                             %
154 %                                                                             %
155 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
156 %
157 %  DelegateComponentGenesis() instantiates the delegate component.
158 %
159 %  The format of the DelegateComponentGenesis method is:
160 %
161 %      MagickBooleanType DelegateComponentGenesis(void)
162 %
163 */
164 MagickPrivate MagickBooleanType DelegateComponentGenesis(void)
165 {
166   AcquireSemaphoreInfo(&delegate_semaphore);
167   return(MagickTrue);
168 }
169 \f
170 /*
171 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
172 %                                                                             %
173 %                                                                             %
174 %                                                                             %
175 %   D e l e g a t e C o m p o n e n t T e r m i n u s                         %
176 %                                                                             %
177 %                                                                             %
178 %                                                                             %
179 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
180 %
181 %  DelegateComponentTerminus() destroys the delegate component.
182 %
183 %  The format of the DelegateComponentTerminus method is:
184 %
185 %      DelegateComponentTerminus(void)
186 %
187 */
188
189 static void *DestroyDelegate(void *delegate_info)
190 {
191   register DelegateInfo
192     *p;
193
194   p=(DelegateInfo *) delegate_info;
195   if (p->path != (char *) NULL)
196     p->path=DestroyString(p->path);
197   if (p->decode != (char *) NULL)
198     p->decode=DestroyString(p->decode);
199   if (p->encode != (char *) NULL)
200     p->encode=DestroyString(p->encode);
201   if (p->commands != (char *) NULL)
202     p->commands=DestroyString(p->commands);
203   p=(DelegateInfo *) RelinquishMagickMemory(p);
204   return((void *) NULL);
205 }
206
207 MagickPrivate void DelegateComponentTerminus(void)
208 {
209   if (delegate_semaphore == (SemaphoreInfo *) NULL)
210     AcquireSemaphoreInfo(&delegate_semaphore);
211   LockSemaphoreInfo(delegate_semaphore);
212   if (delegate_list != (LinkedListInfo *) NULL)
213     delegate_list=DestroyLinkedList(delegate_list,DestroyDelegate);
214   instantiate_delegate=MagickFalse;
215   UnlockSemaphoreInfo(delegate_semaphore);
216   DestroySemaphoreInfo(&delegate_semaphore);
217 }
218 \f
219 /*
220 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
221 %                                                                             %
222 %                                                                             %
223 %                                                                             %
224 %   G e t D e l e g a t e C o m m a n d                                       %
225 %                                                                             %
226 %                                                                             %
227 %                                                                             %
228 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
229 %
230 %  GetDelegateCommand() replaces any embedded formatting characters with the
231 %  appropriate image attribute and returns the resulting command.
232 %
233 %  The format of the GetDelegateCommand method is:
234 %
235 %      char *GetDelegateCommand(const ImageInfo *image_info,Image *image,
236 %        const char *decode,const char *encode,ExceptionInfo *exception)
237 %
238 %  A description of each parameter follows:
239 %
240 %    o command: Method GetDelegateCommand returns the command associated
241 %      with specified delegate tag.
242 %
243 %    o image_info: the image info.
244 %
245 %    o image: the image.
246 %
247 %    o decode: Specifies the decode delegate we are searching for as a
248 %      character string.
249 %
250 %    o encode: Specifies the encode delegate we are searching for as a
251 %      character string.
252 %
253 %    o exception: return any errors or warnings in this structure.
254 %
255 */
256 MagickExport char *GetDelegateCommand(const ImageInfo *image_info,Image *image,
257   const char *decode,const char *encode,ExceptionInfo *exception)
258 {
259   char
260     *command,
261     **commands;
262
263   const DelegateInfo
264     *delegate_info;
265
266   register ssize_t
267     i;
268
269   assert(image_info != (ImageInfo *) NULL);
270   assert(image_info->signature == MagickSignature);
271   assert(image != (Image *) NULL);
272   assert(image->signature == MagickSignature);
273   if (image->debug != MagickFalse)
274     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
275   delegate_info=GetDelegateInfo(decode,encode,exception);
276   if (delegate_info == (const DelegateInfo *) NULL)
277     {
278       (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
279         "NoTagFound","`%s'",decode ? decode : encode);
280       return((char *) NULL);
281     }
282   commands=StringToList(delegate_info->commands);
283   if (commands == (char **) NULL)
284     {
285       (void) ThrowMagickException(exception,GetMagickModule(),
286         ResourceLimitError,"MemoryAllocationFailed","`%s'",
287         decode ? decode : encode);
288       return((char *) NULL);
289     }
290   command=InterpretImageProperties(image_info,image,commands[0],exception);
291   if (command == (char *) NULL)
292     (void) ThrowMagickException(exception,GetMagickModule(),ResourceLimitError,
293       "MemoryAllocationFailed","`%s'",commands[0]);
294   /*
295     Relinquish resources.
296   */
297   for (i=0; commands[i] != (char *) NULL; i++)
298     commands[i]=DestroyString(commands[i]);
299   commands=(char **) RelinquishMagickMemory(commands);
300   return(command);
301 }
302 \f
303 /*
304 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
305 %                                                                             %
306 %                                                                             %
307 %                                                                             %
308 %   G e t D e l e g a t e C o m m a n d s                                     %
309 %                                                                             %
310 %                                                                             %
311 %                                                                             %
312 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
313 %
314 %  GetDelegateCommands() returns the commands associated with a delegate.
315 %
316 %  The format of the GetDelegateCommands method is:
317 %
318 %      const char *GetDelegateCommands(const DelegateInfo *delegate_info)
319 %
320 %  A description of each parameter follows:
321 %
322 %    o delegate_info:  The delegate info.
323 %
324 */
325 MagickExport const char *GetDelegateCommands(const DelegateInfo *delegate_info)
326 {
327   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
328   assert(delegate_info != (DelegateInfo *) NULL);
329   assert(delegate_info->signature == MagickSignature);
330   return(delegate_info->commands);
331 }
332 \f
333 /*
334 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
335 %                                                                             %
336 %                                                                             %
337 %                                                                             %
338 %   G e t D e l e g a t e I n f o                                             %
339 %                                                                             %
340 %                                                                             %
341 %                                                                             %
342 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
343 %
344 %  GetDelegateInfo() returns any delegates associated with the specified tag.
345 %
346 %  The format of the GetDelegateInfo method is:
347 %
348 %      const DelegateInfo *GetDelegateInfo(const char *decode,
349 %        const char *encode,ExceptionInfo *exception)
350 %
351 %  A description of each parameter follows:
352 %
353 %    o decode: Specifies the decode delegate we are searching for as a
354 %      character string.
355 %
356 %    o encode: Specifies the encode delegate we are searching for as a
357 %      character string.
358 %
359 %    o exception: return any errors or warnings in this structure.
360 %
361 */
362 MagickExport const DelegateInfo *GetDelegateInfo(const char *decode,
363   const char *encode,ExceptionInfo *exception)
364 {
365   register const DelegateInfo
366     *p;
367
368   assert(exception != (ExceptionInfo *) NULL);
369   if ((delegate_list == (LinkedListInfo *) NULL) ||
370       (instantiate_delegate == MagickFalse))
371     if (InitializeDelegateList(exception) == MagickFalse)
372       return((const DelegateInfo *) NULL);
373   if ((delegate_list == (LinkedListInfo *) NULL) ||
374       (IsLinkedListEmpty(delegate_list) != MagickFalse))
375     return((const DelegateInfo *) NULL);
376   if ((LocaleCompare(decode,"*") == 0) && (LocaleCompare(encode,"*") == 0))
377     return((const DelegateInfo *) GetValueFromLinkedList(delegate_list,0));
378   /*
379     Search for named delegate.
380   */
381   LockSemaphoreInfo(delegate_semaphore);
382   ResetLinkedListIterator(delegate_list);
383   p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
384   while (p != (const DelegateInfo *) NULL)
385   {
386     if (p->mode > 0)
387       {
388         if (LocaleCompare(p->decode,decode) == 0)
389           break;
390         p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
391         continue;
392       }
393     if (p->mode < 0)
394       {
395         if (LocaleCompare(p->encode,encode) == 0)
396           break;
397         p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
398         continue;
399       }
400     if (LocaleCompare(decode,p->decode) == 0)
401       if (LocaleCompare(encode,p->encode) == 0)
402         break;
403     if (LocaleCompare(decode,"*") == 0)
404       if (LocaleCompare(encode,p->encode) == 0)
405         break;
406     if (LocaleCompare(decode,p->decode) == 0)
407       if (LocaleCompare(encode,"*") == 0)
408         break;
409     p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
410   }
411   if (p != (const DelegateInfo *) NULL)
412     (void) InsertValueInLinkedList(delegate_list,0,
413       RemoveElementByValueFromLinkedList(delegate_list,p));
414   UnlockSemaphoreInfo(delegate_semaphore);
415   return(p);
416 }
417 \f
418 /*
419 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
420 %                                                                             %
421 %                                                                             %
422 %                                                                             %
423 %   G e t D e l e g a t e I n f o L i s t                                     %
424 %                                                                             %
425 %                                                                             %
426 %                                                                             %
427 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
428 %
429 %  GetDelegateInfoList() returns any delegates that match the specified pattern.
430 %
431 %  The delegate of the GetDelegateInfoList function is:
432 %
433 %      const DelegateInfo **GetDelegateInfoList(const char *pattern,
434 %        size_t *number_delegates,ExceptionInfo *exception)
435 %
436 %  A description of each parameter follows:
437 %
438 %    o pattern: Specifies a pointer to a text string containing a pattern.
439 %
440 %    o number_delegates:  This integer returns the number of delegates in the
441 %      list.
442 %
443 %    o exception: return any errors or warnings in this structure.
444 %
445 */
446
447 #if defined(__cplusplus) || defined(c_plusplus)
448 extern "C" {
449 #endif
450
451 static int DelegateInfoCompare(const void *x,const void *y)
452 {
453   const DelegateInfo
454     **p,
455     **q;
456
457   p=(const DelegateInfo **) x,
458   q=(const DelegateInfo **) y;
459   if (LocaleCompare((*p)->path,(*q)->path) == 0)
460     {
461       if ((*p)->decode == (char *) NULL)
462         if (((*p)->encode != (char *) NULL) &&
463             ((*q)->encode != (char *) NULL))
464           return(strcmp((*p)->encode,(*q)->encode));
465       if (((*p)->decode != (char *) NULL) &&
466           ((*q)->decode != (char *) NULL))
467         return(strcmp((*p)->decode,(*q)->decode));
468     }
469   return(LocaleCompare((*p)->path,(*q)->path));
470 }
471
472 #if defined(__cplusplus) || defined(c_plusplus)
473 }
474 #endif
475
476 MagickExport const DelegateInfo **GetDelegateInfoList(const char *pattern,
477   size_t *number_delegates,ExceptionInfo *exception)
478 {
479   const DelegateInfo
480     **delegates;
481
482   register const DelegateInfo
483     *p;
484
485   register ssize_t
486     i;
487
488   /*
489     Allocate delegate list.
490   */
491   assert(pattern != (char *) NULL);
492   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",pattern);
493   assert(number_delegates != (size_t *) NULL);
494   *number_delegates=0;
495   p=GetDelegateInfo("*","*",exception);
496   if (p == (const DelegateInfo *) NULL)
497     return((const DelegateInfo **) NULL);
498   delegates=(const DelegateInfo **) AcquireQuantumMemory((size_t)
499     GetNumberOfElementsInLinkedList(delegate_list)+1UL,sizeof(*delegates));
500   if (delegates == (const DelegateInfo **) NULL)
501     return((const DelegateInfo **) NULL);
502   /*
503     Generate delegate list.
504   */
505   LockSemaphoreInfo(delegate_semaphore);
506   ResetLinkedListIterator(delegate_list);
507   p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
508   for (i=0; p != (const DelegateInfo *) NULL; )
509   {
510     if ((p->stealth == MagickFalse) &&
511         ((GlobExpression(p->decode,pattern,MagickFalse) != MagickFalse) ||
512          (GlobExpression(p->encode,pattern,MagickFalse) != MagickFalse)))
513       delegates[i++]=p;
514     p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
515   }
516   UnlockSemaphoreInfo(delegate_semaphore);
517   qsort((void *) delegates,(size_t) i,sizeof(*delegates),DelegateInfoCompare);
518   delegates[i]=(DelegateInfo *) NULL;
519   *number_delegates=(size_t) i;
520   return(delegates);
521 }
522 \f
523 /*
524 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
525 %                                                                             %
526 %                                                                             %
527 %                                                                             %
528 %   G e t D e l e g a t e L i s t                                             %
529 %                                                                             %
530 %                                                                             %
531 %                                                                             %
532 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
533 %
534 %  GetDelegateList() returns any image format delegates that match the
535 %  specified  pattern.
536 %
537 %  The format of the GetDelegateList function is:
538 %
539 %      char **GetDelegateList(const char *pattern,
540 %        size_t *number_delegates,ExceptionInfo *exception)
541 %
542 %  A description of each parameter follows:
543 %
544 %    o pattern: Specifies a pointer to a text string containing a pattern.
545 %
546 %    o number_delegates:  This integer returns the number of delegates
547 %      in the list.
548 %
549 %    o exception: return any errors or warnings in this structure.
550 %
551 */
552
553 #if defined(__cplusplus) || defined(c_plusplus)
554 extern "C" {
555 #endif
556
557 static int DelegateCompare(const void *x,const void *y)
558 {
559   register const char
560     **p,
561     **q;
562
563   p=(const char **) x;
564   q=(const char **) y;
565   return(LocaleCompare(*p,*q));
566 }
567
568 #if defined(__cplusplus) || defined(c_plusplus)
569 }
570 #endif
571
572 MagickExport char **GetDelegateList(const char *pattern,
573   size_t *number_delegates,ExceptionInfo *exception)
574 {
575   char
576     **delegates;
577
578   register const DelegateInfo
579     *p;
580
581   register ssize_t
582     i;
583
584   /*
585     Allocate delegate list.
586   */
587   assert(pattern != (char *) NULL);
588   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",pattern);
589   assert(number_delegates != (size_t *) NULL);
590   *number_delegates=0;
591   p=GetDelegateInfo("*","*",exception);
592   if (p == (const DelegateInfo *) NULL)
593     return((char **) NULL);
594   delegates=(char **) AcquireQuantumMemory((size_t)
595     GetNumberOfElementsInLinkedList(delegate_list)+1UL,sizeof(*delegates));
596   if (delegates == (char **) NULL)
597     return((char **) NULL);
598   LockSemaphoreInfo(delegate_semaphore);
599   ResetLinkedListIterator(delegate_list);
600   p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
601   for (i=0; p != (const DelegateInfo *) NULL; )
602   {
603     if ((p->stealth == MagickFalse) &&
604         (GlobExpression(p->decode,pattern,MagickFalse) != MagickFalse))
605       delegates[i++]=ConstantString(p->decode);
606     if ((p->stealth == MagickFalse) &&
607         (GlobExpression(p->encode,pattern,MagickFalse) != MagickFalse))
608       delegates[i++]=ConstantString(p->encode);
609     p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_list);
610   }
611   UnlockSemaphoreInfo(delegate_semaphore);
612   qsort((void *) delegates,(size_t) i,sizeof(*delegates),DelegateCompare);
613   delegates[i]=(char *) NULL;
614   *number_delegates=(size_t) i;
615   return(delegates);
616 }
617 \f
618 /*
619 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
620 %                                                                             %
621 %                                                                             %
622 %                                                                             %
623 %   G e t D e l e g a t e M o d e                                             %
624 %                                                                             %
625 %                                                                             %
626 %                                                                             %
627 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
628 %
629 %  GetDelegateMode() returns the mode of the delegate.
630 %
631 %  The format of the GetDelegateMode method is:
632 %
633 %      ssize_t GetDelegateMode(const DelegateInfo *delegate_info)
634 %
635 %  A description of each parameter follows:
636 %
637 %    o delegate_info:  The delegate info.
638 %
639 */
640 MagickExport ssize_t GetDelegateMode(const DelegateInfo *delegate_info)
641 {
642   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
643   assert(delegate_info != (DelegateInfo *) NULL);
644   assert(delegate_info->signature == MagickSignature);
645   return(delegate_info->mode);
646 }
647 \f
648 /*
649 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
650 %                                                                             %
651 %                                                                             %
652 %                                                                             %
653 +   G e t D e l e g a t e T h r e a d S u p p o r t                           %
654 %                                                                             %
655 %                                                                             %
656 %                                                                             %
657 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
658 %
659 %  GetDelegateThreadSupport() returns MagickTrue if the delegate supports
660 %  threads.
661 %
662 %  The format of the GetDelegateThreadSupport method is:
663 %
664 %      MagickBooleanType GetDelegateThreadSupport(
665 %        const DelegateInfo *delegate_info)
666 %
667 %  A description of each parameter follows:
668 %
669 %    o delegate_info:  The delegate info.
670 %
671 */
672 MagickExport MagickBooleanType GetDelegateThreadSupport(
673   const DelegateInfo *delegate_info)
674 {
675   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
676   assert(delegate_info != (DelegateInfo *) NULL);
677   assert(delegate_info->signature == MagickSignature);
678   return(delegate_info->thread_support);
679 }
680 \f
681 /*
682 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
683 %                                                                             %
684 %                                                                             %
685 %                                                                             %
686 +   I n i t i a l i z e D e l e g a t e L i s t                               %
687 %                                                                             %
688 %                                                                             %
689 %                                                                             %
690 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
691 %
692 %  InitializeDelegateList() initializes the delegate list.
693 %
694 %  The format of the InitializeDelegateList method is:
695 %
696 %      MagickBooleanType InitializeDelegateList(ExceptionInfo *exception)
697 %
698 %  A description of each parameter follows.
699 %
700 %    o exception: return any errors or warnings in this structure.
701 %
702 */
703 static MagickBooleanType InitializeDelegateList(ExceptionInfo *exception)
704 {
705   if ((delegate_list == (LinkedListInfo *) NULL) &&
706       (instantiate_delegate == MagickFalse))
707     {
708       if (delegate_semaphore == (SemaphoreInfo *) NULL)
709         AcquireSemaphoreInfo(&delegate_semaphore);
710       LockSemaphoreInfo(delegate_semaphore);
711       if ((delegate_list == (LinkedListInfo *) NULL) &&
712           (instantiate_delegate == MagickFalse))
713         {
714           (void) LoadDelegateLists(DelegateFilename,exception);
715           instantiate_delegate=MagickTrue;
716         }
717       UnlockSemaphoreInfo(delegate_semaphore);
718     }
719   return(delegate_list != (LinkedListInfo *) NULL ? MagickTrue : MagickFalse);
720 }
721 \f
722 /*
723 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
724 %                                                                             %
725 %                                                                             %
726 %                                                                             %
727 %   I n v o k e D e l e g a t e                                               %
728 %                                                                             %
729 %                                                                             %
730 %                                                                             %
731 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
732 %
733 %  InvokeDelegate replaces any embedded formatting characters with the
734 %  appropriate image attribute and executes the resulting command.  MagickFalse
735 %  is returned if the commands execute with success otherwise MagickTrue.
736 %
737 %  The format of the InvokeDelegate method is:
738 %
739 %      MagickBooleanType InvokeDelegate(ImageInfo *image_info,Image *image,
740 %        const char *decode,const char *encode,ExceptionInfo *exception)
741 %
742 %  A description of each parameter follows:
743 %
744 %    o image_info: the imageInfo.
745 %
746 %    o image: the image.
747 %
748 %    o exception: return any errors or warnings in this structure.
749 %
750 */
751
752 static inline size_t MagickMin(const size_t x,const size_t y)
753 {
754   if (x < y)
755     return(x);
756   return(y);
757 }
758
759 static MagickBooleanType CopyDelegateFile(const char *source,
760   const char *destination)
761 {
762   int
763     destination_file,
764     source_file;
765
766   MagickBooleanType
767     status;
768
769   register size_t
770     i;
771
772   size_t
773     length,
774     quantum;
775
776   ssize_t
777     count;
778
779   struct stat
780     attributes;
781
782   unsigned char
783     *buffer;
784
785   /*
786     Copy source file to destination.
787   */
788   assert(source != (const char *) NULL);
789   assert(destination != (char *) NULL);
790   status=GetPathAttributes(destination,&attributes);
791   if ((status != MagickFalse) && (attributes.st_size != 0))
792     return(MagickTrue);
793   destination_file=open_utf8(destination,O_WRONLY | O_BINARY | O_CREAT,S_MODE);
794   if (destination_file == -1)
795     return(MagickFalse);
796   source_file=open_utf8(source,O_RDONLY | O_BINARY,0);
797   if (source_file == -1)
798     {
799       (void) close(destination_file);
800       return(MagickFalse);
801     }
802   quantum=(size_t) MagickMaxBufferExtent;
803   if ((fstat(source_file,&attributes) == 0) && (attributes.st_size != 0))
804     quantum=MagickMin((size_t) attributes.st_size,MagickMaxBufferExtent);
805   buffer=(unsigned char *) AcquireQuantumMemory(quantum,sizeof(*buffer));
806   if (buffer == (unsigned char *) NULL)
807     {
808       (void) close(source_file);
809       (void) close(destination_file);
810       return(MagickFalse);
811     }
812   length=0;
813   for (i=0; ; i+=count)
814   {
815     count=(ssize_t) read(source_file,buffer,quantum);
816     if (count <= 0)
817       break;
818     length=(size_t) count;
819     count=(ssize_t) write(destination_file,buffer,length);
820     if ((size_t) count != length)
821       break;
822   }
823   (void) close(destination_file);
824   (void) close(source_file);
825   buffer=(unsigned char *) RelinquishMagickMemory(buffer);
826   return(i != 0 ? MagickTrue : MagickFalse);
827 }
828
829 MagickExport MagickBooleanType InvokeDelegate(ImageInfo *image_info,
830   Image *image,const char *decode,const char *encode,ExceptionInfo *exception)
831 {
832   char
833     *command,
834     **commands,
835     input_filename[MaxTextExtent],
836     output_filename[MaxTextExtent];
837
838   const DelegateInfo
839     *delegate_info;
840
841   MagickBooleanType
842     status,
843     temporary;
844
845   register ssize_t
846     i;
847
848   PolicyRights
849     rights;
850
851   /*
852     Get delegate.
853   */
854   assert(image_info != (ImageInfo *) NULL);
855   assert(image_info->signature == MagickSignature);
856   assert(image != (Image *) NULL);
857   assert(image->signature == MagickSignature);
858   if (image->debug != MagickFalse)
859     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
860   rights=ExecutePolicyRights;
861   if (IsRightsAuthorized(DelegatePolicyDomain,rights,decode) == MagickFalse)
862     {
863       errno=EPERM;
864       (void) ThrowMagickException(exception,GetMagickModule(),PolicyError,
865         "NotAuthorized","`%s'",decode);
866       return(MagickFalse);
867     }
868   if (IsRightsAuthorized(DelegatePolicyDomain,rights,encode) == MagickFalse)
869     {
870       errno=EPERM;
871       (void) ThrowMagickException(exception,GetMagickModule(),PolicyError,
872         "NotAuthorized","`%s'",encode);
873       return(MagickFalse);
874     }
875   temporary=(*image->filename == '\0') ? MagickTrue : MagickFalse;
876   if (temporary != MagickFalse)
877     if (AcquireUniqueFilename(image->filename) == MagickFalse)
878       {
879         ThrowFileException(exception,FileOpenError,
880           "UnableToCreateTemporaryFile",image->filename);
881         return(MagickFalse);
882       }
883   delegate_info=GetDelegateInfo(decode,encode,exception);
884   if (delegate_info == (DelegateInfo *) NULL)
885     {
886       if (temporary != MagickFalse)
887         (void) RelinquishUniqueFileResource(image->filename);
888       (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
889         "NoTagFound","`%s'",decode ? decode : encode);
890       return(MagickFalse);
891     }
892   if (*image_info->filename == '\0')
893     {
894       if (AcquireUniqueFilename(image_info->filename) == MagickFalse)
895         {
896           if (temporary != MagickFalse)
897             (void) RelinquishUniqueFileResource(image->filename);
898           ThrowFileException(exception,FileOpenError,
899             "UnableToCreateTemporaryFile",image_info->filename);
900           return(MagickFalse);
901         }
902       image_info->temporary=MagickTrue;
903     }
904   if ((delegate_info->mode != 0) && (((decode != (const char *) NULL) &&
905         (delegate_info->encode != (char *) NULL)) ||
906        ((encode != (const char *) NULL) &&
907         (delegate_info->decode != (char *) NULL))))
908     {
909       char
910         *magick;
911
912       ImageInfo
913         *clone_info;
914
915       register Image
916         *p;
917
918       /*
919         Delegate requires a particular image format.
920       */
921       if (AcquireUniqueFilename(image_info->unique) == MagickFalse)
922         {
923           ThrowFileException(exception,FileOpenError,
924             "UnableToCreateTemporaryFile",image_info->unique);
925           return(MagickFalse);
926         }
927       if (AcquireUniqueFilename(image_info->zero) == MagickFalse)
928         {
929           (void) RelinquishUniqueFileResource(image_info->zero);
930           ThrowFileException(exception,FileOpenError,
931             "UnableToCreateTemporaryFile",image_info->zero);
932           return(MagickFalse);
933         }
934       magick=InterpretImageProperties(image_info,image,decode != (char *) NULL ?
935         delegate_info->encode : delegate_info->decode,exception);
936       if (magick == (char *) NULL)
937         {
938           (void) RelinquishUniqueFileResource(image_info->unique);
939           (void) RelinquishUniqueFileResource(image_info->zero);
940           if (temporary != MagickFalse)
941             (void) RelinquishUniqueFileResource(image->filename);
942           (void) ThrowMagickException(exception,GetMagickModule(),
943             DelegateError,"DelegateFailed","`%s'",decode ? decode : encode);
944           return(MagickFalse);
945         }
946       LocaleUpper(magick);
947       clone_info=CloneImageInfo(image_info);
948       (void) CopyMagickString((char *) clone_info->magick,magick,
949         MaxTextExtent);
950       if (LocaleCompare(magick,"NULL") != 0)
951         (void) CopyMagickString(image->magick,magick,MaxTextExtent);
952       magick=DestroyString(magick);
953       (void) FormatLocaleString(clone_info->filename,MaxTextExtent,"%s:",
954         delegate_info->decode);
955       (void) SetImageInfo(clone_info,(unsigned int) GetImageListLength(image),
956         exception);
957       (void) CopyMagickString(clone_info->filename,image_info->filename,
958         MaxTextExtent);
959       (void) CopyMagickString(image_info->filename,image->filename,
960         MaxTextExtent);
961       for (p=image; p != (Image *) NULL; p=GetNextImageInList(p))
962       {
963         (void) FormatLocaleString(p->filename,MaxTextExtent,"%s:%s",
964           delegate_info->decode,clone_info->filename);
965         status=WriteImage(clone_info,p,exception);
966         if (status == MagickFalse)
967           {
968             (void) RelinquishUniqueFileResource(image_info->unique);
969             (void) RelinquishUniqueFileResource(image_info->zero);
970             if (temporary != MagickFalse)
971               (void) RelinquishUniqueFileResource(image->filename);
972             clone_info=DestroyImageInfo(clone_info);
973             (void) ThrowMagickException(exception,GetMagickModule(),
974               DelegateError,"DelegateFailed","`%s'",decode ? decode : encode);
975             return(MagickFalse);
976           }
977         if (clone_info->adjoin != MagickFalse)
978           break;
979       }
980       (void) RelinquishUniqueFileResource(image_info->unique);
981       (void) RelinquishUniqueFileResource(image_info->zero);
982       clone_info=DestroyImageInfo(clone_info);
983     }
984   /*
985     Invoke delegate.
986   */
987   commands=StringToList(delegate_info->commands);
988   if (commands == (char **) NULL)
989     {
990       if (temporary != MagickFalse)
991         (void) RelinquishUniqueFileResource(image->filename);
992       (void) ThrowMagickException(exception,GetMagickModule(),
993         ResourceLimitError,"MemoryAllocationFailed","`%s'",
994         decode ? decode : encode);
995       return(MagickFalse);
996     }
997   command=(char *) NULL;
998   status=MagickFalse;
999   (void) CopyMagickString(output_filename,image_info->filename,MaxTextExtent);
1000   (void) CopyMagickString(input_filename,image->filename,MaxTextExtent);
1001   for (i=0; commands[i] != (char *) NULL; i++)
1002   {
1003     status=AcquireUniqueSymbolicLink(output_filename,image_info->filename);
1004     if (AcquireUniqueFilename(image_info->unique) == MagickFalse)
1005       {
1006         ThrowFileException(exception,FileOpenError,
1007           "UnableToCreateTemporaryFile",image_info->unique);
1008         break;
1009       }
1010     if (AcquireUniqueFilename(image_info->zero) == MagickFalse)
1011       {
1012         (void) RelinquishUniqueFileResource(image_info->unique);
1013         ThrowFileException(exception,FileOpenError,
1014           "UnableToCreateTemporaryFile",image_info->zero);
1015         break;
1016       }
1017     if (LocaleCompare(decode,"SCAN") != 0)
1018       {
1019         status=AcquireUniqueSymbolicLink(input_filename,image->filename);
1020         if (status == MagickFalse)
1021           {
1022             ThrowFileException(exception,FileOpenError,
1023               "UnableToCreateTemporaryFile",input_filename);
1024             break;
1025           }
1026       }
1027     status=MagickFalse;
1028     command=InterpretImageProperties(image_info,image,commands[i],exception);
1029     if (command != (char *) NULL)
1030       {
1031         /*
1032           Execute delegate.
1033         */
1034         status=SystemCommand(delegate_info->spawn,image_info->verbose,command,
1035           exception) != 0 ? MagickTrue : MagickFalse;
1036         if (delegate_info->spawn != MagickFalse)
1037           (void) sleep(2);    /* FUTURE: A better way is needed! */
1038         command=DestroyString(command);
1039       }
1040     if (LocaleCompare(decode,"SCAN") != 0)
1041       {
1042         if (CopyDelegateFile(image->filename,input_filename) == MagickFalse)
1043           (void) RelinquishUniqueFileResource(input_filename);
1044       }
1045     if (CopyDelegateFile(image_info->filename,output_filename) == MagickFalse)
1046       (void) RelinquishUniqueFileResource(output_filename);
1047     if (image_info->temporary != MagickFalse)
1048       (void) RelinquishUniqueFileResource(image_info->filename);
1049     (void) RelinquishUniqueFileResource(image_info->unique);
1050     (void) RelinquishUniqueFileResource(image_info->zero);
1051     (void) RelinquishUniqueFileResource(image_info->filename);
1052     (void) RelinquishUniqueFileResource(image->filename);
1053     if (status != MagickFalse)
1054       {
1055         (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
1056           "DelegateFailed","`%s'",commands[i]);
1057         break;
1058       }
1059     commands[i]=DestroyString(commands[i]);
1060   }
1061   (void) CopyMagickString(image_info->filename,output_filename,MaxTextExtent);
1062   (void) CopyMagickString(image->filename,input_filename,MaxTextExtent);
1063   /*
1064     Relinquish resources.
1065   */
1066   for ( ; commands[i] != (char *) NULL; i++)
1067     commands[i]=DestroyString(commands[i]);
1068   commands=(char **) RelinquishMagickMemory(commands);
1069   if (temporary != MagickFalse)
1070     (void) RelinquishUniqueFileResource(image->filename);
1071   return(status == MagickFalse ? MagickTrue : MagickFalse);
1072 }
1073 \f
1074 /*
1075 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1076 %                                                                             %
1077 %                                                                             %
1078 %                                                                             %
1079 %  L i s t D e l e g a t e I n f o                                            %
1080 %                                                                             %
1081 %                                                                             %
1082 %                                                                             %
1083 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1084 %
1085 %  ListDelegateInfo() lists the image formats to a file.
1086 %
1087 %  The format of the ListDelegateInfo method is:
1088 %
1089 %      MagickBooleanType ListDelegateInfo(FILE *file,ExceptionInfo *exception)
1090 %
1091 %  A description of each parameter follows.
1092 %
1093 %    o file:  An pointer to a FILE.
1094 %
1095 %    o exception: return any errors or warnings in this structure.
1096 %
1097 */
1098 MagickExport MagickBooleanType ListDelegateInfo(FILE *file,
1099   ExceptionInfo *exception)
1100 {
1101   const DelegateInfo
1102     **delegate_info;
1103
1104   char
1105     **commands,
1106     delegate[MaxTextExtent];
1107
1108   const char
1109     *path;
1110
1111   register ssize_t
1112     i;
1113
1114   size_t
1115     number_delegates;
1116
1117   ssize_t
1118     j;
1119
1120   if (file == (const FILE *) NULL)
1121     file=stdout;
1122   delegate_info=GetDelegateInfoList("*",&number_delegates,exception);
1123   if (delegate_info == (const DelegateInfo **) NULL)
1124     return(MagickFalse);
1125   path=(const char *) NULL;
1126   for (i=0; i < (ssize_t) number_delegates; i++)
1127   {
1128     if (delegate_info[i]->stealth != MagickFalse)
1129       continue;
1130     if ((path == (const char *) NULL) ||
1131         (LocaleCompare(path,delegate_info[i]->path) != 0))
1132       {
1133         if (delegate_info[i]->path != (char *) NULL)
1134           (void) FormatLocaleFile(file,"\nPath: %s\n\n",delegate_info[i]->path);
1135         (void) FormatLocaleFile(file,"Delegate                Command\n");
1136         (void) FormatLocaleFile(file,
1137           "-------------------------------------------------"
1138           "------------------------------\n");
1139       }
1140     path=delegate_info[i]->path;
1141     *delegate='\0';
1142     if (delegate_info[i]->encode != (char *) NULL)
1143       (void) CopyMagickString(delegate,delegate_info[i]->encode,MaxTextExtent);
1144     (void) ConcatenateMagickString(delegate,"        ",MaxTextExtent);
1145     delegate[8]='\0';
1146     commands=StringToList(delegate_info[i]->commands);
1147     if (commands == (char **) NULL)
1148       continue;
1149     (void) FormatLocaleFile(file,"%11s%c=%c%s  ",delegate_info[i]->decode ?
1150       delegate_info[i]->decode : "",delegate_info[i]->mode <= 0 ? '<' : ' ',
1151       delegate_info[i]->mode >= 0 ? '>' : ' ',delegate);
1152     StripString(commands[0]);
1153     (void) FormatLocaleFile(file,"\"%s\"\n",commands[0]);
1154     for (j=1; commands[j] != (char *) NULL; j++)
1155     {
1156       StripString(commands[j]);
1157       (void) FormatLocaleFile(file,"                     \"%s\"\n",commands[j]);
1158     }
1159     for (j=0; commands[j] != (char *) NULL; j++)
1160       commands[j]=DestroyString(commands[j]);
1161     commands=(char **) RelinquishMagickMemory(commands);
1162   }
1163   (void) fflush(file);
1164   delegate_info=(const DelegateInfo **)
1165     RelinquishMagickMemory((void *) delegate_info);
1166   return(MagickTrue);
1167 }
1168 \f
1169 /*
1170 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1171 %                                                                             %
1172 %                                                                             %
1173 %                                                                             %
1174 +   L o a d D e l e g a t e L i s t                                           %
1175 %                                                                             %
1176 %                                                                             %
1177 %                                                                             %
1178 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1179 %
1180 %  LoadDelegateList() loads the delegate configuration file which provides a
1181 %  mapping between delegate attributes and a delegate name.
1182 %
1183 %  The format of the LoadDelegateList method is:
1184 %
1185 %      MagickBooleanType LoadDelegateList(const char *xml,const char *filename,
1186 %        const size_t depth,ExceptionInfo *exception)
1187 %
1188 %  A description of each parameter follows:
1189 %
1190 %    o xml:  The delegate list in XML format.
1191 %
1192 %    o filename:  The delegate list filename.
1193 %
1194 %    o depth: depth of <include /> statements.
1195 %
1196 %    o exception: return any errors or warnings in this structure.
1197 %
1198 */
1199 static MagickBooleanType LoadDelegateList(const char *xml,const char *filename,
1200   const size_t depth,ExceptionInfo *exception)
1201 {
1202   char
1203     keyword[MaxTextExtent],
1204     *token;
1205
1206   const char
1207     *q;
1208
1209   DelegateInfo
1210     *delegate_info;
1211
1212   MagickBooleanType
1213     status;
1214
1215   /*
1216     Load the delegate map file.
1217   */
1218   (void) LogMagickEvent(ConfigureEvent,GetMagickModule(),
1219     "Loading delegate configuration file \"%s\" ...",filename);
1220   if (xml == (const char *) NULL)
1221     return(MagickFalse);
1222   if (delegate_list == (LinkedListInfo *) NULL)
1223     {
1224       delegate_list=NewLinkedList(0);
1225       if (delegate_list == (LinkedListInfo *) NULL)
1226         {
1227           ThrowFileException(exception,ResourceLimitError,
1228             "MemoryAllocationFailed",filename);
1229           return(MagickFalse);
1230         }
1231     }
1232   status=MagickTrue;
1233   delegate_info=(DelegateInfo *) NULL;
1234   token=AcquireString(xml);
1235   for (q=(const char *) xml; *q != '\0'; )
1236   {
1237     /*
1238       Interpret XML.
1239     */
1240     GetMagickToken(q,&q,token);
1241     if (*token == '\0')
1242       break;
1243     (void) CopyMagickString(keyword,token,MaxTextExtent);
1244     if (LocaleNCompare(keyword,"<!DOCTYPE",9) == 0)
1245       {
1246         /*
1247           Doctype element.
1248         */
1249         while ((LocaleNCompare(q,"]>",2) != 0) && (*q != '\0'))
1250           GetMagickToken(q,&q,token);
1251         continue;
1252       }
1253     if (LocaleNCompare(keyword,"<!--",4) == 0)
1254       {
1255         /*
1256           Comment element.
1257         */
1258         while ((LocaleNCompare(q,"->",2) != 0) && (*q != '\0'))
1259           GetMagickToken(q,&q,token);
1260         continue;
1261       }
1262     if (LocaleCompare(keyword,"<include") == 0)
1263       {
1264         /*
1265           Include element.
1266         */
1267         while (((*token != '/') && (*(token+1) != '>')) && (*q != '\0'))
1268         {
1269           (void) CopyMagickString(keyword,token,MaxTextExtent);
1270           GetMagickToken(q,&q,token);
1271           if (*token != '=')
1272             continue;
1273           GetMagickToken(q,&q,token);
1274           if (LocaleCompare(keyword,"file") == 0)
1275             {
1276               if (depth > 200)
1277                 (void) ThrowMagickException(exception,GetMagickModule(),
1278                   ConfigureError,"IncludeElementNestedTooDeeply","`%s'",token);
1279               else
1280                 {
1281                   char
1282                     path[MaxTextExtent],
1283                     *xml;
1284
1285                   GetPathComponent(filename,HeadPath,path);
1286                   if (*path != '\0')
1287                     (void) ConcatenateMagickString(path,DirectorySeparator,
1288                       MaxTextExtent);
1289                   if (*token == *DirectorySeparator)
1290                     (void) CopyMagickString(path,token,MaxTextExtent);
1291                   else
1292                     (void) ConcatenateMagickString(path,token,MaxTextExtent);
1293                   xml=FileToString(path,~0,exception);
1294                   if (xml != (char *) NULL)
1295                     {
1296                       status=LoadDelegateList(xml,path,depth+1,exception);
1297                       xml=(char *) RelinquishMagickMemory(xml);
1298                     }
1299                 }
1300             }
1301         }
1302         continue;
1303       }
1304     if (LocaleCompare(keyword,"<delegate") == 0)
1305       {
1306         /*
1307           Delegate element.
1308         */
1309         delegate_info=(DelegateInfo *) AcquireMagickMemory(
1310           sizeof(*delegate_info));
1311         if (delegate_info == (DelegateInfo *) NULL)
1312           ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
1313         (void) ResetMagickMemory(delegate_info,0,sizeof(*delegate_info));
1314         delegate_info->path=ConstantString(filename);
1315         delegate_info->signature=MagickSignature;
1316         continue;
1317       }
1318     if (delegate_info == (DelegateInfo *) NULL)
1319       continue;
1320     if (LocaleCompare(keyword,"/>") == 0)
1321       {
1322         status=AppendValueToLinkedList(delegate_list,delegate_info);
1323         if (status == MagickFalse)
1324           (void) ThrowMagickException(exception,GetMagickModule(),
1325             ResourceLimitError,"MemoryAllocationFailed","`%s'",
1326             delegate_info->commands);
1327         delegate_info=(DelegateInfo *) NULL;
1328       }
1329     GetMagickToken(q,(const char **) NULL,token);
1330     if (*token != '=')
1331       continue;
1332     GetMagickToken(q,&q,token);
1333     GetMagickToken(q,&q,token);
1334     switch (*keyword)
1335     {
1336       case 'C':
1337       case 'c':
1338       {
1339         if (LocaleCompare((char *) keyword,"command") == 0)
1340           {
1341             char
1342               *commands;
1343
1344             commands=AcquireString(token);
1345 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
1346             if (strchr(commands,'@') != (char *) NULL)
1347               {
1348                 char
1349                   path[MaxTextExtent];
1350
1351                 NTGhostscriptEXE(path,MaxTextExtent);
1352                 (void) SubstituteString((char **) &commands,"@PSDelegate@",
1353                   path);
1354                 (void) SubstituteString((char **) &commands,"\\","/");
1355               }
1356 #endif
1357             (void) SubstituteString((char **) &commands,"&amp;","&");
1358             (void) SubstituteString((char **) &commands,"&quot;","\"");
1359             (void) SubstituteString((char **) &commands,"&gt;",">");
1360             (void) SubstituteString((char **) &commands,"&lt;","<");
1361             delegate_info->commands=commands;
1362             break;
1363           }
1364         break;
1365       }
1366       case 'D':
1367       case 'd':
1368       {
1369         if (LocaleCompare((char *) keyword,"decode") == 0)
1370           {
1371             delegate_info->decode=ConstantString(token);
1372             delegate_info->mode=1;
1373             break;
1374           }
1375         break;
1376       }
1377       case 'E':
1378       case 'e':
1379       {
1380         if (LocaleCompare((char *) keyword,"encode") == 0)
1381           {
1382             delegate_info->encode=ConstantString(token);
1383             delegate_info->mode=(-1);
1384             break;
1385           }
1386         break;
1387       }
1388       case 'M':
1389       case 'm':
1390       {
1391         if (LocaleCompare((char *) keyword,"mode") == 0)
1392           {
1393             delegate_info->mode=1;
1394             if (LocaleCompare(token,"bi") == 0)
1395               delegate_info->mode=0;
1396             else
1397               if (LocaleCompare(token,"encode") == 0)
1398                 delegate_info->mode=(-1);
1399             break;
1400           }
1401         break;
1402       }
1403       case 'S':
1404       case 's':
1405       {
1406         if (LocaleCompare((char *) keyword,"spawn") == 0)
1407           {
1408             delegate_info->spawn=IsStringTrue(token);
1409             break;
1410           }
1411         if (LocaleCompare((char *) keyword,"stealth") == 0)
1412           {
1413             delegate_info->stealth=IsStringTrue(token);
1414             break;
1415           }
1416         break;
1417       }
1418       case 'T':
1419       case 't':
1420       {
1421         if (LocaleCompare((char *) keyword,"thread-support") == 0)
1422           {
1423             delegate_info->thread_support=IsStringTrue(token);
1424             break;
1425           }
1426         break;
1427       }
1428       default:
1429         break;
1430     }
1431   }
1432   token=(char *) RelinquishMagickMemory(token);
1433   return(status);
1434 }
1435 \f
1436 /*
1437 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1438 %                                                                             %
1439 %                                                                             %
1440 %                                                                             %
1441 %  L o a d D e l e g a t e L i s t s                                          %
1442 %                                                                             %
1443 %                                                                             %
1444 %                                                                             %
1445 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1446 %
1447 %  LoadDelegateList() loads one or more delegate configuration file which
1448 %  provides a mapping between delegate attributes and a delegate name.
1449 %
1450 %  The format of the LoadDelegateLists method is:
1451 %
1452 %      MagickBooleanType LoadDelegateLists(const char *filename,
1453 %        ExceptionInfo *exception)
1454 %
1455 %  A description of each parameter follows:
1456 %
1457 %    o filename: the font file name.
1458 %
1459 %    o exception: return any errors or warnings in this structure.
1460 %
1461 */
1462 static MagickBooleanType LoadDelegateLists(const char *filename,
1463   ExceptionInfo *exception)
1464 {
1465 #if defined(MAGICKCORE_ZERO_CONFIGURATION_SUPPORT)
1466   return(LoadDelegateList(DelegateMap,"built-in",0,exception));
1467 #else
1468   const StringInfo
1469     *option;
1470
1471   LinkedListInfo
1472     *options;
1473
1474   MagickStatusType
1475     status;
1476
1477   status=MagickFalse;
1478   options=GetConfigureOptions(filename,exception);
1479   option=(const StringInfo *) GetNextValueInLinkedList(options);
1480   while (option != (const StringInfo *) NULL)
1481   {
1482     status|=LoadDelegateList((const char *) GetStringInfoDatum(option),
1483       GetStringInfoPath(option),0,exception);
1484     option=(const StringInfo *) GetNextValueInLinkedList(options);
1485   }
1486   options=DestroyConfigureOptions(options);
1487   if ((delegate_list == (LinkedListInfo *) NULL) ||
1488       (IsLinkedListEmpty(delegate_list) != MagickFalse))
1489     status|=LoadDelegateList(DelegateMap,"built-in",0,exception);
1490   return(status != 0 ? MagickTrue : MagickFalse);
1491 #endif
1492 }