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 % Cristy %
16 % October 1998 %
17 % %
18 % %
19 % Copyright 1999-2016 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
45 /*
46 Include declarations.
47 */
48 #include "MagickCore/studio.h"
49 #include "MagickCore/artifact.h"
50 #include "MagickCore/attribute.h"
51 #include "MagickCore/blob.h"
52 #include "MagickCore/client.h"
53 #include "MagickCore/configure.h"
54 #include "MagickCore/constitute.h"
55 #include "MagickCore/delegate.h"
56 #include "MagickCore/delegate-private.h"
57 #include "MagickCore/exception.h"
58 #include "MagickCore/exception-private.h"
59 #include "MagickCore/fx-private.h"
60 #include "MagickCore/image-private.h"
61 #include "MagickCore/linked-list.h"
62 #include "MagickCore/list.h"
63 #include "MagickCore/memory_.h"
64 #include "MagickCore/nt-base-private.h"
65 #include "MagickCore/option.h"
66 #include "MagickCore/policy.h"
67 #include "MagickCore/property.h"
68 #include "MagickCore/resource_.h"
69 #include "MagickCore/semaphore.h"
70 #include "MagickCore/signature.h"
71 #include "MagickCore/string_.h"
72 #include "MagickCore/token.h"
73 #include "MagickCore/token-private.h"
74 #include "MagickCore/utility.h"
75 #include "MagickCore/utility-private.h"
76 #include "MagickCore/xml-tree.h"
77 #include "MagickCore/xml-tree-private.h"
78
79 /*
80 Define declarations.
81 */
82 #define DelegateFilename "delegates.xml"
83
84 /*
85 Declare delegate map.
86 */
87 static const char
88 *DelegateMap = (const char *)
89 "<?xml version=\"1.0\" encoding=\"UTF-8\"?>"
90 "<delegatemap>"
91 " <delegate decode=\"autotrace\" stealth=\"True\" command=\""autotrace" -output-format svg -output-file "%o" "%i"\"/>"
92 " <delegate decode=\"avi:decode\" stealth=\"True\" command=\""mplayer" "%i" -really-quiet -ao null -vo png:z=3\"/>"
93 " <delegate decode=\"browse\" stealth=\"True\" spawn=\"True\" command=\""xdg-open" http://www.imagemagick.org/; rm "%i"\"/>"
94 " <delegate decode=\"cgm\" thread-support=\"False\" command=\""ralcgm" -d ps -oC < "%i" > "%o" 2> "%u"\"/>"
95 " <delegate decode=\"dng:decode\" command=\""ufraw-batch" --silent --create-id=also --out-type=png --out-depth=16 "--output=%u.png" "%i"\"/>"
96 " <delegate decode=\"edit\" stealth=\"True\" command=\""xterm" -title "Edit Image Comment" -e vi "%o"\"/>"
97 " <delegate decode=\"eps\" encode=\"pdf\" mode=\"bi\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=pdfwrite" "-sOutputFile=%o" "-f%i"\"/>"
98 " <delegate decode=\"eps\" encode=\"ps\" mode=\"bi\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=ps2write" "-sOutputFile=%o" "-f%i"\"/>"
99 " <delegate decode=\"fig\" command=\""fig2dev" -L ps "%i" "%o"\"/>"
100 " <delegate decode=\"hpg\" command=\""hp2xx" -q -m eps -f `basename "%o"` "%i" mv -f `basename "%o"` "%o"\"/>"
101 " <delegate decode=\"hpgl\" command=\""hp2xx" -q -m eps -f `basename "%o"` "%i" mv -f `basename "%o"` "%o"\"/>"
102 " <delegate decode=\"htm\" command=\""html2ps" -U -o "%o" "%i"\"/>"
103 " <delegate decode=\"html\" command=\""html2ps" -U -o "%o" "%i"\"/>"
104 " <delegate decode=\"https\" command=\""curl" -s -k -L -o "%o" "https:%M"\"/>"
105 " <delegate decode=\"ilbm\" command=\""ilbmtoppm" "%i" > "%o"\"/>"
106 " <delegate decode=\"man\" command=\""groff" -man -Tps "%i" > "%o"\"/>"
107 " <delegate decode=\"mpeg:decode\" stealth=\"True\" command=\""ffmpeg" -nostdin -v -1 -vframes %S -i "%i" -vcodec pam -an -f rawvideo -y "%u.pam" 2> "%Z"\"/>"
108 " <delegate decode=\"null\" encode=\"mpeg:encode\" stealth=\"True\" command=\""ffmpeg" -nostdin -v -1 -mbd rd -trellis 2 -cmp 2 -subcmp 2 -g 300 -i "%M%%d.jpg" "%u.%m" 2> "%Z"\"/>"
109 " <delegate decode=\"pcl:color\" stealth=\"True\" command=\""pcl6" -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=ppmraw" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "%s"\"/>"
110 " <delegate decode=\"pcl:cmyk\" stealth=\"True\" command=\""pcl6" -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=bmpsep8" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "%s"\"/>"
111 " <delegate decode=\"pcl:mono\" stealth=\"True\" command=\""pcl6" -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=pbmraw" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "%s"\"/>"
112 " <delegate decode=\"pdf\" encode=\"eps\" mode=\"bi\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=eps2write" "-sOutputFile=%o" "-f%i"\"/>"
113 " <delegate decode=\"pdf\" encode=\"ps\" mode=\"bi\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=ps2write" "-sOutputFile=%o" "-f%i"\"/>"
114 " <delegate decode=\"pnm\" encode=\"ilbm\" mode=\"encode\" command=\""ppmtoilbm" -24if "%i" > "%o"\"/>"
115 " <delegate decode=\"pnm\" encode=\"launch\" mode=\"encode\" command=\""gimp" "%i"\"/>"
116 " <delegate decode=\"pov\" command=\""povray" "+i"%i"" -D0 +o"%o" +fn%q +w%w +h%h +a -q9 -kfi"%s" -kff"%n" "convert" -concatenate "%o*.png" "%o"\"/>"
117 " <delegate decode=\"ps\" encode=\"eps\" mode=\"bi\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=eps2write" "-sOutputFile=%o" "-f%i"\"/>"
118 " <delegate decode=\"ps\" encode=\"pdf\" mode=\"bi\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=pdfwrite" "-sOutputFile=%o" "-f%i"\"/>"
119 " <delegate decode=\"ps\" encode=\"print\" mode=\"encode\" command=\"lpr "%i"\"/>"
120 " <delegate decode=\"ps:alpha\" stealth=\"True\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=pngalpha" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "-f%s" "-f%s"\"/>"
121 " <delegate decode=\"ps:bbox\" stealth=\"True\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=bbox" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "-f%s" "-f%s"\"/>"
122 " <delegate decode=\"ps:cmyk\" stealth=\"True\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=bmpsep8" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "-f%s" "-f%s"\"/>"
123 " <delegate decode=\"ps:color\" stealth=\"True\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=pnmraw" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "-f%s" "-f%s"\"/>"
124 " <delegate decode=\"ps:mono\" stealth=\"True\" command=\""gs" -q -dQUIET -dSAFER -dBATCH -dNOPAUSE -dNOPROMPT -dMaxBitmap=500000000 -dAlignToPixels=0 -dGridFitTT=2 "-sDEVICE=pnmraw" -dTextAlphaBits=%u -dGraphicsAlphaBits=%u "-r%s" %s "-sOutputFile=%s" "-f%s" "-f%s"\"/>"
125 " <delegate decode=\"rgba\" encode=\"rle\" mode=\"encode\" command=\""rawtorle" -o "%o" -v "%i"\"/>"
126 " <delegate decode=\"scan\" command=\""scanimage" -d "%i" > "%o"\"/>"
127 " <delegate encode=\"show\" spawn=\"True\" command=\""display" -immutable -delay 0 -title "%M" "%i"\"/>"
128 " <delegate decode=\"shtml\" command=\""html2ps" -U -o "%o" "%i"\"/>"
129 " <delegate decode=\"svg\" command=\""rsvg" "%i" "%o"\"/>"
130 " <delegate decode=\"txt\" encode=\"ps\" mode=\"bi\" command=\""enscript" -o "%o" "%i"\"/>"
131 " <delegate encode=\"win\" stealth=\"True\" spawn=\"True\" command=\""display" -immutable -delay 0 -title "%M" "%i"\"/>"
132 " <delegate decode=\"wmf\" command=\""wmf2eps" -o "%o" "%i"\"/>"
133 "</delegatemap>";
134
135 /*
136 Global declaractions.
137 */
138 static LinkedListInfo
139 *delegate_cache = (LinkedListInfo *) NULL;
140
141 static SemaphoreInfo
142 *delegate_semaphore = (SemaphoreInfo *) NULL;
143
144 /*
145 Forward declaractions.
146 */
147 static MagickBooleanType
148 IsDelegateCacheInstantiated(ExceptionInfo *),
149 LoadDelegateCache(LinkedListInfo *,const char *,const char *,const size_t,
150 ExceptionInfo *);
151
152 /*
153 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
154 % %
155 % %
156 % %
157 % A c q u i r e D e l e g a t e C a c h e %
158 % %
159 % %
160 % %
161 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
162 %
163 % AcquireDelegateCache() caches one or more delegate configurations which
164 % provides a mapping between delegate attributes and a delegate name.
165 %
166 % The format of the AcquireDelegateCache method is:
167 %
168 % LinkedListInfo *AcquireDelegateCache(const char *filename,
169 % ExceptionInfo *exception)
170 %
171 % A description of each parameter follows:
172 %
173 % o filename: the font file name.
174 %
175 % o exception: return any errors or warnings in this structure.
176 %
177 */
AcquireDelegateCache(const char * filename,ExceptionInfo * exception)178 static LinkedListInfo *AcquireDelegateCache(const char *filename,
179 ExceptionInfo *exception)
180 {
181 LinkedListInfo
182 *cache;
183
184 MagickStatusType
185 status;
186
187 cache=NewLinkedList(0);
188 if (cache == (LinkedListInfo *) NULL)
189 ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
190 status=MagickTrue;
191 #if !defined(MAGICKCORE_ZERO_CONFIGURATION_SUPPORT)
192 {
193 const StringInfo
194 *option;
195
196 LinkedListInfo
197 *options;
198
199 options=GetConfigureOptions(filename,exception);
200 option=(const StringInfo *) GetNextValueInLinkedList(options);
201 while (option != (const StringInfo *) NULL)
202 {
203 status&=LoadDelegateCache(cache,(const char *)
204 GetStringInfoDatum(option),GetStringInfoPath(option),0,exception);
205 option=(const StringInfo *) GetNextValueInLinkedList(options);
206 }
207 options=DestroyConfigureOptions(options);
208 }
209 #endif
210 if (IsLinkedListEmpty(cache) != MagickFalse)
211 status&=LoadDelegateCache(cache,DelegateMap,"built-in",0,exception);
212 return(cache);
213 }
214
215 /*
216 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
217 % %
218 % %
219 % %
220 + D e l e g a t e C o m p o n e n t G e n e s i s %
221 % %
222 % %
223 % %
224 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
225 %
226 % DelegateComponentGenesis() instantiates the delegate component.
227 %
228 % The format of the DelegateComponentGenesis method is:
229 %
230 % MagickBooleanType DelegateComponentGenesis(void)
231 %
232 */
DelegateComponentGenesis(void)233 MagickPrivate MagickBooleanType DelegateComponentGenesis(void)
234 {
235 if (delegate_semaphore == (SemaphoreInfo *) NULL)
236 delegate_semaphore=AcquireSemaphoreInfo();
237 return(MagickTrue);
238 }
239
240 /*
241 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
242 % %
243 % %
244 % %
245 % 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 %
246 % %
247 % %
248 % %
249 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
250 %
251 % DelegateComponentTerminus() destroys the delegate component.
252 %
253 % The format of the DelegateComponentTerminus method is:
254 %
255 % DelegateComponentTerminus(void)
256 %
257 */
258
DestroyDelegate(void * delegate_info)259 static void *DestroyDelegate(void *delegate_info)
260 {
261 register DelegateInfo
262 *p;
263
264 p=(DelegateInfo *) delegate_info;
265 if (p->path != (char *) NULL)
266 p->path=DestroyString(p->path);
267 if (p->decode != (char *) NULL)
268 p->decode=DestroyString(p->decode);
269 if (p->encode != (char *) NULL)
270 p->encode=DestroyString(p->encode);
271 if (p->commands != (char *) NULL)
272 p->commands=DestroyString(p->commands);
273 if (p->semaphore != (SemaphoreInfo *) NULL)
274 RelinquishSemaphoreInfo(&p->semaphore);
275 p=(DelegateInfo *) RelinquishMagickMemory(p);
276 return((void *) NULL);
277 }
278
DelegateComponentTerminus(void)279 MagickPrivate void DelegateComponentTerminus(void)
280 {
281 if (delegate_semaphore == (SemaphoreInfo *) NULL)
282 ActivateSemaphoreInfo(&delegate_semaphore);
283 LockSemaphoreInfo(delegate_semaphore);
284 if (delegate_cache != (LinkedListInfo *) NULL)
285 delegate_cache=DestroyLinkedList(delegate_cache,DestroyDelegate);
286 UnlockSemaphoreInfo(delegate_semaphore);
287 RelinquishSemaphoreInfo(&delegate_semaphore);
288 }
289
290 /*
291 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
292 % %
293 % %
294 % %
295 + E x t e r n a l D e l e g a t e C o m m a n d %
296 % %
297 % %
298 % %
299 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
300 %
301 % ExternalDelegateCommand() executes the specified command and waits until it
302 % terminates. The returned value is the exit status of the command.
303 %
304 % The format of the ExternalDelegateCommand method is:
305 %
306 % int ExternalDelegateCommand(const MagickBooleanType asynchronous,
307 % const MagickBooleanType verbose,const char *command,
308 % char *message,ExceptionInfo *exception)
309 %
310 % A description of each parameter follows:
311 %
312 % o asynchronous: a value other than 0 executes the parent program
313 % concurrently with the new child process.
314 %
315 % o verbose: a value other than 0 prints the executed command before it is
316 % invoked.
317 %
318 % o command: this string is the command to execute.
319 %
320 % o message: an option buffer to receive any message posted to stdout or
321 % stderr.
322 %
323 % o exception: return any errors here.
324 %
325 */
ExternalDelegateCommand(const MagickBooleanType asynchronous,const MagickBooleanType verbose,const char * command,char * message,ExceptionInfo * exception)326 MagickExport int ExternalDelegateCommand(const MagickBooleanType asynchronous,
327 const MagickBooleanType verbose,const char *command,char *message,
328 ExceptionInfo *exception)
329 {
330 char
331 **arguments,
332 *sanitize_command;
333
334 int
335 number_arguments,
336 status;
337
338 PolicyDomain
339 domain;
340
341 PolicyRights
342 rights;
343
344 register ssize_t
345 i;
346
347 status=(-1);
348 arguments=StringToArgv(command,&number_arguments);
349 if (arguments == (char **) NULL)
350 return(status);
351 if (*arguments[1] == '\0')
352 {
353 for (i=0; i < (ssize_t) number_arguments; i++)
354 arguments[i]=DestroyString(arguments[i]);
355 arguments=(char **) RelinquishMagickMemory(arguments);
356 return(-1);
357 }
358 rights=ExecutePolicyRights;
359 domain=DelegatePolicyDomain;
360 if (IsRightsAuthorized(domain,rights,arguments[1]) == MagickFalse)
361 {
362 errno=EPERM;
363 (void) ThrowMagickException(exception,GetMagickModule(),PolicyError,
364 "NotAuthorized","`%s'",arguments[1]);
365 for (i=0; i < (ssize_t) number_arguments; i++)
366 arguments[i]=DestroyString(arguments[i]);
367 arguments=(char **) RelinquishMagickMemory(arguments);
368 return(-1);
369 }
370 if (verbose != MagickFalse)
371 {
372 (void) FormatLocaleFile(stderr,"%s\n",command);
373 (void) fflush(stderr);
374 }
375 sanitize_command=SanitizeString(command);
376 if (asynchronous != MagickFalse)
377 (void) ConcatenateMagickString(sanitize_command,"&",MagickPathExtent);
378 if (message != (char *) NULL)
379 *message='\0';
380 #if defined(MAGICKCORE_POSIX_SUPPORT)
381 #if !defined(MAGICKCORE_HAVE_EXECVP)
382 status=system(sanitize_command);
383 #else
384 if ((asynchronous != MagickFalse) ||
385 (strpbrk(sanitize_command,"&;<>|") != (char *) NULL))
386 status=system(sanitize_command);
387 else
388 {
389 pid_t
390 child_pid;
391
392 /*
393 Call application directly rather than from a shell.
394 */
395 child_pid=(pid_t) fork();
396 if (child_pid == (pid_t) -1)
397 status=system(sanitize_command);
398 else
399 if (child_pid == 0)
400 {
401 status=execvp(arguments[1],arguments+1);
402 _exit(1);
403 }
404 else
405 {
406 int
407 child_status;
408
409 pid_t
410 pid;
411
412 child_status=0;
413 pid=(pid_t) waitpid(child_pid,&child_status,0);
414 if (pid == -1)
415 status=(-1);
416 else
417 {
418 if (WIFEXITED(child_status) != 0)
419 status=WEXITSTATUS(child_status);
420 else
421 if (WIFSIGNALED(child_status))
422 status=(-1);
423 }
424 }
425 }
426 #endif
427 #elif defined(MAGICKCORE_WINDOWS_SUPPORT)
428 {
429 register char
430 *p;
431
432 /*
433 If a command shell is executed we need to change the forward slashes in
434 files to a backslash. We need to do this to keep Windows happy when we
435 want to 'move' a file.
436
437 TODO: This won't work if one of the delegate parameters has a forward
438 slash as aparameter.
439 */
440 p=strstr(sanitize_command, "cmd.exe /c");
441 if (p != (char*) NULL)
442 {
443 p+=10;
444 for (; *p != '\0'; p++)
445 if (*p == '/')
446 *p=*DirectorySeparator;
447 }
448 }
449 status=NTSystemCommand(sanitize_command,message);
450 #elif defined(macintosh)
451 status=MACSystemCommand(sanitize_command);
452 #elif defined(vms)
453 status=system(sanitize_command);
454 #else
455 # error No suitable system() method.
456 #endif
457 if (status < 0)
458 {
459 if ((message != (char *) NULL) && (*message != '\0'))
460 (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
461 "FailedToExecuteCommand","`%s' (%s)",sanitize_command,message);
462 else
463 (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
464 "FailedToExecuteCommand","`%s' (%d)",sanitize_command,status);
465 }
466 sanitize_command=DestroyString(sanitize_command);
467 for (i=0; i < (ssize_t) number_arguments; i++)
468 arguments[i]=DestroyString(arguments[i]);
469 arguments=(char **) RelinquishMagickMemory(arguments);
470 return(status);
471 }
472
473 /*
474 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
475 % %
476 % %
477 % %
478 % G e t D e l e g a t e C o m m a n d %
479 % %
480 % %
481 % %
482 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
483 %
484 % GetDelegateCommand() replaces any embedded formatting characters with the
485 % appropriate image attribute and returns the resulting command.
486 %
487 % The format of the GetDelegateCommand method is:
488 %
489 % char *GetDelegateCommand(const ImageInfo *image_info,Image *image,
490 % const char *decode,const char *encode,ExceptionInfo *exception)
491 %
492 % A description of each parameter follows:
493 %
494 % o command: Method GetDelegateCommand returns the command associated
495 % with specified delegate tag.
496 %
497 % o image_info: the image info.
498 %
499 % o image: the image.
500 %
501 % o decode: Specifies the decode delegate we are searching for as a
502 % character string.
503 %
504 % o encode: Specifies the encode delegate we are searching for as a
505 % character string.
506 %
507 % o exception: return any errors or warnings in this structure.
508 %
509 */
510
GetMagickPropertyLetter(ImageInfo * image_info,Image * image,const char letter,ExceptionInfo * exception)511 static char *GetMagickPropertyLetter(ImageInfo *image_info,Image *image,
512 const char letter,ExceptionInfo *exception)
513 {
514 #define WarnNoImageReturn(format,letter) \
515 if (image == (Image *) NULL) \
516 { \
517 (void) ThrowMagickException(exception,GetMagickModule(),OptionWarning, \
518 "NoImageForProperty",format,letter); \
519 break; \
520 }
521 #define WarnNoImageInfoReturn(format,letter) \
522 if (image_info == (ImageInfo *) NULL) \
523 { \
524 (void) ThrowMagickException(exception,GetMagickModule(),OptionWarning, \
525 "NoImageInfoForProperty",format,letter); \
526 break; \
527 }
528
529 char
530 value[MagickPathExtent];
531
532 const char
533 *string;
534
535 if ((image != (Image *) NULL) && (image->debug != MagickFalse))
536 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
537 else
538 if ((image_info != (ImageInfo *) NULL) &&
539 (image_info->debug != MagickFalse))
540 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s","no-images");
541 /*
542 Get properties that are directly defined by images.
543 */
544 *value='\0'; /* formatted string */
545 string=(const char *) value;
546 switch (letter)
547 {
548 case 'a': /* authentication passphase */
549 {
550 WarnNoImageInfoReturn("\"%%%c\"",letter);
551 string=GetImageOption(image_info,"authenticate");
552 break;
553 }
554 case 'b': /* image size read in - in bytes */
555 {
556 WarnNoImageReturn("\"%%%c\"",letter);
557 (void) FormatMagickSize(image->extent,MagickFalse,"B",MagickPathExtent,
558 value);
559 if (image->extent == 0)
560 (void) FormatMagickSize(GetBlobSize(image),MagickFalse,"B",
561 MagickPathExtent,value);
562 break;
563 }
564 case 'd': /* Directory component of filename */
565 {
566 WarnNoImageReturn("\"%%%c\"",letter);
567 GetPathComponent(image->magick_filename,HeadPath,value);
568 break;
569 }
570 case 'e': /* Filename extension (suffix) of image file */
571 {
572 WarnNoImageReturn("\"%%%c\"",letter);
573 GetPathComponent(image->magick_filename,ExtensionPath,value);
574 break;
575 }
576 case 'f': /* Filename without directory component */
577 {
578 WarnNoImageReturn("\"%%%c\"",letter);
579 GetPathComponent(image->magick_filename,TailPath,value);
580 break;
581 }
582 case 'g': /* Image geometry, canvas and offset %Wx%H+%X+%Y */
583 {
584 WarnNoImageReturn("\"%%%c\"",letter);
585 (void) FormatLocaleString(value,MagickPathExtent,
586 "%.20gx%.20g%+.20g%+.20g",(double) image->page.width,(double)
587 image->page.height,(double) image->page.x,(double) image->page.y);
588 break;
589 }
590 case 'h': /* Image height (current) */
591 {
592 WarnNoImageReturn("\"%%%c\"",letter);
593 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
594 (image->rows != 0 ? image->rows : image->magick_rows));
595 break;
596 }
597 case 'i': /* Filename last used for an image (read or write) */
598 {
599 WarnNoImageReturn("\"%%%c\"",letter);
600 string=image->filename;
601 break;
602 }
603 case 'm': /* Image format (file magick) */
604 {
605 WarnNoImageReturn("\"%%%c\"",letter);
606 string=image->magick;
607 break;
608 }
609 case 'n': /* Number of images in the list. */
610 {
611 if (image != (Image *) NULL)
612 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
613 GetImageListLength(image));
614 break;
615 }
616 case 'o': /* Output Filename */
617 {
618 WarnNoImageInfoReturn("\"%%%c\"",letter);
619 string=image_info->filename;
620 break;
621 }
622 case 'p': /* Image index in current image list */
623 {
624 WarnNoImageReturn("\"%%%c\"",letter);
625 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
626 GetImageIndexInList(image));
627 break;
628 }
629 case 'q': /* Quantum depth of image in memory */
630 {
631 WarnNoImageReturn("\"%%%c\"",letter);
632 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
633 MAGICKCORE_QUANTUM_DEPTH);
634 break;
635 }
636 case 'r': /* Image storage class, colorspace, and alpha enabled. */
637 {
638 ColorspaceType
639 colorspace;
640
641 WarnNoImageReturn("\"%%%c\"",letter);
642 colorspace=image->colorspace;
643 if (SetImageGray(image,exception) != MagickFalse)
644 colorspace=GRAYColorspace; /* FUTURE: this is IMv6 not IMv7 */
645 (void) FormatLocaleString(value,MagickPathExtent,"%s %s %s",
646 CommandOptionToMnemonic(MagickClassOptions,(ssize_t)
647 image->storage_class),CommandOptionToMnemonic(MagickColorspaceOptions,
648 (ssize_t) colorspace),image->alpha_trait != UndefinedPixelTrait ?
649 "Alpha" : "");
650 break;
651 }
652 case 's': /* Image scene number */
653 {
654 WarnNoImageReturn("\"%%%c\"",letter);
655 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
656 image->scene);
657 break;
658 }
659 case 't': /* Base filename without directory or extention */
660 {
661 WarnNoImageReturn("\"%%%c\"",letter);
662 GetPathComponent(image->magick_filename,BasePath,value);
663 break;
664 }
665 case 'u': /* Unique filename */
666 {
667 WarnNoImageInfoReturn("\"%%%c\"",letter);
668 string=image_info->unique;
669 break;
670 }
671 case 'w': /* Image width (current) */
672 {
673 WarnNoImageReturn("\"%%%c\"",letter);
674 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
675 (image->columns != 0 ? image->columns : image->magick_columns));
676 break;
677 }
678 case 'x': /* Image horizontal resolution (with units) */
679 {
680 WarnNoImageReturn("\"%%%c\"",letter);
681 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",
682 fabs(image->resolution.x) > MagickEpsilon ? image->resolution.x : 72.0);
683 break;
684 }
685 case 'y': /* Image vertical resolution (with units) */
686 {
687 WarnNoImageReturn("\"%%%c\"",letter);
688 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",
689 fabs(image->resolution.y) > MagickEpsilon ? image->resolution.y : 72.0);
690 break;
691 }
692 case 'z': /* Image depth as read in */
693 {
694 WarnNoImageReturn("\"%%%c\"",letter);
695 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",
696 (double) image->depth);
697 break;
698 }
699 case 'A': /* Image alpha channel */
700 {
701 WarnNoImageReturn("\"%%%c\"",letter);
702 string=CommandOptionToMnemonic(MagickPixelTraitOptions,(ssize_t)
703 image->alpha_trait);
704 break;
705 }
706 case 'C': /* Image compression method. */
707 {
708 WarnNoImageReturn("\"%%%c\"",letter);
709 string=CommandOptionToMnemonic(MagickCompressOptions,
710 (ssize_t) image->compression);
711 break;
712 }
713 case 'D': /* Image dispose method. */
714 {
715 WarnNoImageReturn("\"%%%c\"",letter);
716 string=CommandOptionToMnemonic(MagickDisposeOptions,
717 (ssize_t) image->dispose);
718 break;
719 }
720 case 'F':
721 {
722 /*
723 Magick filename - filename given incl. coder & read mods.
724 */
725 WarnNoImageReturn("\"%%%c\"",letter);
726 (void) CopyMagickString(value,image->magick_filename,MagickPathExtent);
727 break;
728 }
729 case 'G': /* Image size as geometry = "%wx%h" */
730 {
731 WarnNoImageReturn("\"%%%c\"",letter);
732 (void) FormatLocaleString(value,MagickPathExtent,"%.20gx%.20g",
733 (double) image->magick_columns,(double) image->magick_rows);
734 break;
735 }
736 case 'H': /* layer canvas height */
737 {
738 WarnNoImageReturn("\"%%%c\"",letter);
739 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",
740 (double) image->page.height);
741 break;
742 }
743 case 'M': /* Magick filename - filename given incl. coder & read mods */
744 {
745 WarnNoImageReturn("\"%%%c\"",letter);
746 string=image->magick_filename;
747 break;
748 }
749 case 'O': /* layer canvas offset with sign = "+%X+%Y" */
750 {
751 WarnNoImageReturn("\"%%%c\"",letter);
752 (void) FormatLocaleString(value,MagickPathExtent,"%+ld%+ld",(long)
753 image->page.x,(long) image->page.y);
754 break;
755 }
756 case 'P': /* layer canvas page size = "%Wx%H" */
757 {
758 WarnNoImageReturn("\"%%%c\"",letter);
759 (void) FormatLocaleString(value,MagickPathExtent,"%.20gx%.20g",
760 (double) image->page.width,(double) image->page.height);
761 break;
762 }
763 case 'Q': /* image compression quality */
764 {
765 WarnNoImageReturn("\"%%%c\"",letter);
766 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
767 (image->quality == 0 ? 92 : image->quality));
768 break;
769 }
770 case 'S': /* Number of scenes in image list. */
771 {
772 WarnNoImageInfoReturn("\"%%%c\"",letter);
773 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
774 (image_info->number_scenes == 0 ? 2147483647 :
775 image_info->number_scenes));
776 break;
777 }
778 case 'T': /* image time delay for animations */
779 {
780 WarnNoImageReturn("\"%%%c\"",letter);
781 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
782 image->delay);
783 break;
784 }
785 case 'U': /* Image resolution units. */
786 {
787 WarnNoImageReturn("\"%%%c\"",letter);
788 string=CommandOptionToMnemonic(MagickResolutionOptions,
789 (ssize_t) image->units);
790 break;
791 }
792 case 'W': /* layer canvas width */
793 {
794 WarnNoImageReturn("\"%%%c\"",letter);
795 (void) FormatLocaleString(value,MagickPathExtent,"%.20g",(double)
796 image->page.width);
797 break;
798 }
799 case 'X': /* layer canvas X offset */
800 {
801 WarnNoImageReturn("\"%%%c\"",letter);
802 (void) FormatLocaleString(value,MagickPathExtent,"%+.20g",(double)
803 image->page.x);
804 break;
805 }
806 case 'Y': /* layer canvas Y offset */
807 {
808 WarnNoImageReturn("\"%%%c\"",letter);
809 (void) FormatLocaleString(value,MagickPathExtent,"%+.20g",(double)
810 image->page.y);
811 break;
812 }
813 case '%': /* percent escaped */
814 {
815 string="%";
816 break;
817 }
818 case '@': /* Trim bounding box, without actually trimming! */
819 {
820 RectangleInfo
821 page;
822
823 WarnNoImageReturn("\"%%%c\"",letter);
824 page=GetImageBoundingBox(image,exception);
825 (void) FormatLocaleString(value,MagickPathExtent,
826 "%.20gx%.20g%+.20g%+.20g",(double) page.width,(double) page.height,
827 (double) page.x,(double) page.y);
828 break;
829 }
830 case '#':
831 {
832 /*
833 Image signature.
834 */
835 WarnNoImageReturn("\"%%%c\"",letter);
836 (void) SignatureImage(image,exception);
837 string=GetImageProperty(image,"signature",exception);
838 break;
839 }
840 }
841 return(SanitizeString(string));
842 }
843
InterpretDelegateProperties(ImageInfo * image_info,Image * image,const char * embed_text,ExceptionInfo * exception)844 static char *InterpretDelegateProperties(ImageInfo *image_info,
845 Image *image,const char *embed_text,ExceptionInfo *exception)
846 {
847 #define ExtendInterpretText(string_length) \
848 DisableMSCWarning(4127) \
849 { \
850 size_t length=(string_length); \
851 if ((size_t) (q-interpret_text+length+1) >= extent) \
852 { \
853 extent+=length; \
854 interpret_text=(char *) ResizeQuantumMemory(interpret_text,extent+ \
855 MaxTextExtent,sizeof(*interpret_text)); \
856 if (interpret_text == (char *) NULL) \
857 return((char *) NULL); \
858 q=interpret_text+strlen(interpret_text); \
859 } \
860 } \
861 RestoreMSCWarning
862
863 #define AppendKeyValue2Text(key,value)\
864 DisableMSCWarning(4127) \
865 { \
866 size_t length=strlen(key)+strlen(value)+2; \
867 if ((size_t) (q-interpret_text+length+1) >= extent) \
868 { \
869 extent+=length; \
870 interpret_text=(char *) ResizeQuantumMemory(interpret_text,extent+ \
871 MaxTextExtent,sizeof(*interpret_text)); \
872 if (interpret_text == (char *) NULL) \
873 return((char *) NULL); \
874 q=interpret_text+strlen(interpret_text); \
875 } \
876 q+=FormatLocaleString(q,extent,"%s=%s\n",(key),(value)); \
877 } \
878 RestoreMSCWarning
879
880 #define AppendString2Text(string) \
881 DisableMSCWarning(4127) \
882 { \
883 size_t length=strlen((string)); \
884 if ((size_t) (q-interpret_text+length+1) >= extent) \
885 { \
886 extent+=length; \
887 interpret_text=(char *) ResizeQuantumMemory(interpret_text,extent+ \
888 MaxTextExtent,sizeof(*interpret_text)); \
889 if (interpret_text == (char *) NULL) \
890 return((char *) NULL); \
891 q=interpret_text+strlen(interpret_text); \
892 } \
893 (void) CopyMagickString(q,(string),extent); \
894 q+=length; \
895 } \
896 RestoreMSCWarning
897
898 char
899 *interpret_text,
900 *string;
901
902 register char
903 *q; /* current position in interpret_text */
904
905 register const char
906 *p; /* position in embed_text string being expanded */
907
908 size_t
909 extent; /* allocated length of interpret_text */
910
911 MagickBooleanType
912 number;
913
914 assert(image == NULL || image->signature == MagickCoreSignature);
915 assert(image_info == NULL || image_info->signature == MagickCoreSignature);
916 if ((image != (Image *) NULL) && (image->debug != MagickFalse))
917 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
918 else
919 if ((image_info != (ImageInfo *) NULL) && (image_info->debug != MagickFalse))
920 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s","no-image");
921 if (embed_text == (const char *) NULL)
922 return(ConstantString(""));
923 p=embed_text;
924 while ((isspace((int) ((unsigned char) *p)) != 0) && (*p != '\0'))
925 p++;
926 if (*p == '\0')
927 return(ConstantString(""));
928 /*
929 Translate any embedded format characters.
930 */
931 interpret_text=AcquireString(embed_text); /* new string with extra space */
932 extent=MagickPathExtent; /* allocated space in string */
933 number=MagickFalse; /* is last char a number? */
934 for (q=interpret_text; *p!='\0';
935 number=isdigit(*p) ? MagickTrue : MagickFalse,p++)
936 {
937 /*
938 Interpret escape characters (e.g. Filename: %M).
939 */
940 *q='\0';
941 ExtendInterpretText(MagickPathExtent);
942 switch (*p)
943 {
944 case '\\':
945 {
946 switch (*(p+1))
947 {
948 case '\0':
949 continue;
950 case 'r': /* convert to RETURN */
951 {
952 *q++='\r';
953 p++;
954 continue;
955 }
956 case 'n': /* convert to NEWLINE */
957 {
958 *q++='\n';
959 p++;
960 continue;
961 }
962 case '\n': /* EOL removal UNIX,MacOSX */
963 {
964 p++;
965 continue;
966 }
967 case '\r': /* EOL removal DOS,Windows */
968 {
969 p++;
970 if (*p == '\n') /* return-newline EOL */
971 p++;
972 continue;
973 }
974 default:
975 {
976 p++;
977 *q++=(*p);
978 }
979 }
980 continue;
981 }
982 case '&':
983 {
984 if (LocaleNCompare("<",p,4) == 0)
985 {
986 *q++='<';
987 p+=3;
988 }
989 else
990 if (LocaleNCompare(">",p,4) == 0)
991 {
992 *q++='>';
993 p+=3;
994 }
995 else
996 if (LocaleNCompare("&",p,5) == 0)
997 {
998 *q++='&';
999 p+=4;
1000 }
1001 else
1002 *q++=(*p);
1003 continue;
1004 }
1005 case '%':
1006 break; /* continue to next set of handlers */
1007 default:
1008 {
1009 *q++=(*p); /* any thing else is 'as normal' */
1010 continue;
1011 }
1012 }
1013 p++; /* advance beyond the percent */
1014 /*
1015 Doubled Percent - or percent at end of string.
1016 */
1017 if ((*p == '\0') || (*p == '\'') || (*p == '"'))
1018 p--;
1019 if (*p == '%')
1020 {
1021 *q++='%';
1022 continue;
1023 }
1024 /*
1025 Single letter escapes %c.
1026 */
1027 if (number != MagickFalse)
1028 {
1029 /*
1030 But only if not preceeded by a number!
1031 */
1032 *q++='%'; /* do NOT substitute the percent */
1033 p--; /* back up one */
1034 continue;
1035 }
1036 string=GetMagickPropertyLetter(image_info,image,*p, exception);
1037 if (string != (char *) NULL)
1038 {
1039 AppendString2Text(string);
1040 string=DestroyString(string);
1041 continue;
1042 }
1043 (void) ThrowMagickException(exception,GetMagickModule(),OptionWarning,
1044 "UnknownImageProperty","\"%%%c\"",*p);
1045 }
1046 *q='\0';
1047 return(interpret_text);
1048 }
1049
GetDelegateCommand(const ImageInfo * image_info,Image * image,const char * decode,const char * encode,ExceptionInfo * exception)1050 MagickExport char *GetDelegateCommand(const ImageInfo *image_info,Image *image,
1051 const char *decode,const char *encode,ExceptionInfo *exception)
1052 {
1053 char
1054 *command,
1055 **commands;
1056
1057 const DelegateInfo
1058 *delegate_info;
1059
1060 register ssize_t
1061 i;
1062
1063 assert(image_info != (ImageInfo *) NULL);
1064 assert(image_info->signature == MagickCoreSignature);
1065 assert(image != (Image *) NULL);
1066 assert(image->signature == MagickCoreSignature);
1067 if (image->debug != MagickFalse)
1068 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1069
1070 delegate_info=GetDelegateInfo(decode,encode,exception);
1071 if (delegate_info == (const DelegateInfo *) NULL)
1072 {
1073 (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
1074 "NoTagFound","`%s'",decode ? decode : encode);
1075 return((char *) NULL);
1076 }
1077 commands=StringToList(delegate_info->commands);
1078 if (commands == (char **) NULL)
1079 {
1080 (void) ThrowMagickException(exception,GetMagickModule(),
1081 ResourceLimitError,"MemoryAllocationFailed","`%s'",decode ? decode :
1082 encode);
1083 return((char *) NULL);
1084 }
1085 command=InterpretDelegateProperties((ImageInfo *) image_info,image,
1086 commands[0],exception);
1087 if (command == (char *) NULL)
1088 (void) ThrowMagickException(exception,GetMagickModule(),ResourceLimitError,
1089 "MemoryAllocationFailed","`%s'",commands[0]);
1090 /*
1091 Relinquish resources.
1092 */
1093 for (i=0; commands[i] != (char *) NULL; i++)
1094 commands[i]=DestroyString(commands[i]);
1095 commands=(char **) RelinquishMagickMemory(commands);
1096 return(command);
1097 }
1098
1099 /*
1100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1101 % %
1102 % %
1103 % %
1104 % G e t D e l e g a t e C o m m a n d s %
1105 % %
1106 % %
1107 % %
1108 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1109 %
1110 % GetDelegateCommands() returns the commands associated with a delegate.
1111 %
1112 % The format of the GetDelegateCommands method is:
1113 %
1114 % const char *GetDelegateCommands(const DelegateInfo *delegate_info)
1115 %
1116 % A description of each parameter follows:
1117 %
1118 % o delegate_info: The delegate info.
1119 %
1120 */
GetDelegateCommands(const DelegateInfo * delegate_info)1121 MagickExport const char *GetDelegateCommands(const DelegateInfo *delegate_info)
1122 {
1123 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
1124
1125 assert(delegate_info != (DelegateInfo *) NULL);
1126 assert(delegate_info->signature == MagickCoreSignature);
1127 return(delegate_info->commands);
1128 }
1129
1130 /*
1131 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1132 % %
1133 % %
1134 % %
1135 % G e t D e l e g a t e I n f o %
1136 % %
1137 % %
1138 % %
1139 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1140 %
1141 % GetDelegateInfo() returns any delegates associated with the specified tag.
1142 %
1143 % The format of the GetDelegateInfo method is:
1144 %
1145 % const DelegateInfo *GetDelegateInfo(const char *decode,
1146 % const char *encode,ExceptionInfo *exception)
1147 %
1148 % A description of each parameter follows:
1149 %
1150 % o decode: Specifies the decode delegate we are searching for as a
1151 % character string.
1152 %
1153 % o encode: Specifies the encode delegate we are searching for as a
1154 % character string.
1155 %
1156 % o exception: return any errors or warnings in this structure.
1157 %
1158 */
GetDelegateInfo(const char * decode,const char * encode,ExceptionInfo * exception)1159 MagickExport const DelegateInfo *GetDelegateInfo(const char *decode,
1160 const char *encode,ExceptionInfo *exception)
1161 {
1162 register const DelegateInfo
1163 *p;
1164
1165 assert(exception != (ExceptionInfo *) NULL);
1166 if (IsDelegateCacheInstantiated(exception) == MagickFalse)
1167 return((const DelegateInfo *) NULL);
1168 /*
1169 Search for named delegate.
1170 */
1171 LockSemaphoreInfo(delegate_semaphore);
1172 ResetLinkedListIterator(delegate_cache);
1173 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1174 if ((LocaleCompare(decode,"*") == 0) && (LocaleCompare(encode,"*") == 0))
1175 {
1176 UnlockSemaphoreInfo(delegate_semaphore);
1177 return(p);
1178 }
1179 while (p != (const DelegateInfo *) NULL)
1180 {
1181 if (p->mode > 0)
1182 {
1183 if (LocaleCompare(p->decode,decode) == 0)
1184 break;
1185 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1186 continue;
1187 }
1188 if (p->mode < 0)
1189 {
1190 if (LocaleCompare(p->encode,encode) == 0)
1191 break;
1192 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1193 continue;
1194 }
1195 if (LocaleCompare(decode,p->decode) == 0)
1196 if (LocaleCompare(encode,p->encode) == 0)
1197 break;
1198 if (LocaleCompare(decode,"*") == 0)
1199 if (LocaleCompare(encode,p->encode) == 0)
1200 break;
1201 if (LocaleCompare(decode,p->decode) == 0)
1202 if (LocaleCompare(encode,"*") == 0)
1203 break;
1204 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1205 }
1206 if (p != (const DelegateInfo *) NULL)
1207 (void) InsertValueInLinkedList(delegate_cache,0,
1208 RemoveElementByValueFromLinkedList(delegate_cache,p));
1209 UnlockSemaphoreInfo(delegate_semaphore);
1210 return(p);
1211 }
1212
1213 /*
1214 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1215 % %
1216 % %
1217 % %
1218 % G e t D e l e g a t e I n f o L i s t %
1219 % %
1220 % %
1221 % %
1222 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1223 %
1224 % GetDelegateInfoList() returns any delegates that match the specified pattern.
1225 %
1226 % The delegate of the GetDelegateInfoList function is:
1227 %
1228 % const DelegateInfo **GetDelegateInfoList(const char *pattern,
1229 % size_t *number_delegates,ExceptionInfo *exception)
1230 %
1231 % A description of each parameter follows:
1232 %
1233 % o pattern: Specifies a pointer to a text string containing a pattern.
1234 %
1235 % o number_delegates: This integer returns the number of delegates in the
1236 % list.
1237 %
1238 % o exception: return any errors or warnings in this structure.
1239 %
1240 */
1241
1242 #if defined(__cplusplus) || defined(c_plusplus)
1243 extern "C" {
1244 #endif
1245
DelegateInfoCompare(const void * x,const void * y)1246 static int DelegateInfoCompare(const void *x,const void *y)
1247 {
1248 const DelegateInfo
1249 **p,
1250 **q;
1251
1252 int
1253 cmp;
1254
1255 p=(const DelegateInfo **) x,
1256 q=(const DelegateInfo **) y;
1257 cmp=LocaleCompare((*p)->path,(*q)->path);
1258 if (cmp == 0)
1259 {
1260 if ((*p)->decode == (char *) NULL)
1261 if (((*p)->encode != (char *) NULL) &&
1262 ((*q)->encode != (char *) NULL))
1263 return(strcmp((*p)->encode,(*q)->encode));
1264 if (((*p)->decode != (char *) NULL) &&
1265 ((*q)->decode != (char *) NULL))
1266 return(strcmp((*p)->decode,(*q)->decode));
1267 }
1268 return(cmp);
1269 }
1270
1271 #if defined(__cplusplus) || defined(c_plusplus)
1272 }
1273 #endif
1274
GetDelegateInfoList(const char * pattern,size_t * number_delegates,ExceptionInfo * exception)1275 MagickExport const DelegateInfo **GetDelegateInfoList(const char *pattern,
1276 size_t *number_delegates,ExceptionInfo *exception)
1277 {
1278 const DelegateInfo
1279 **delegates;
1280
1281 register const DelegateInfo
1282 *p;
1283
1284 register ssize_t
1285 i;
1286
1287 /*
1288 Allocate delegate list.
1289 */
1290 assert(number_delegates != (size_t *) NULL);
1291 assert(pattern != (char *) NULL);
1292 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",pattern);
1293
1294 *number_delegates=0;
1295 p=GetDelegateInfo("*","*",exception);
1296 if (p == (const DelegateInfo *) NULL)
1297 return((const DelegateInfo **) NULL);
1298 delegates=(const DelegateInfo **) AcquireQuantumMemory((size_t)
1299 GetNumberOfElementsInLinkedList(delegate_cache)+1UL,sizeof(*delegates));
1300 if (delegates == (const DelegateInfo **) NULL)
1301 return((const DelegateInfo **) NULL);
1302 /*
1303 Generate delegate list.
1304 */
1305 LockSemaphoreInfo(delegate_semaphore);
1306 ResetLinkedListIterator(delegate_cache);
1307 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1308 for (i=0; p != (const DelegateInfo *) NULL; )
1309 {
1310 if( (p->stealth == MagickFalse) &&
1311 ( GlobExpression(p->decode,pattern,MagickFalse) != MagickFalse ||
1312 GlobExpression(p->encode,pattern,MagickFalse) != MagickFalse) )
1313 delegates[i++]=p;
1314 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1315 }
1316 UnlockSemaphoreInfo(delegate_semaphore);
1317 qsort((void *) delegates,(size_t) i,sizeof(*delegates),DelegateInfoCompare);
1318 delegates[i]=(DelegateInfo *) NULL;
1319 *number_delegates=(size_t) i;
1320 return(delegates);
1321 }
1322
1323 /*
1324 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1325 % %
1326 % %
1327 % %
1328 % G e t D e l e g a t e L i s t %
1329 % %
1330 % %
1331 % %
1332 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1333 %
1334 % GetDelegateList() returns any image format delegates that match the
1335 % specified pattern.
1336 %
1337 % The format of the GetDelegateList function is:
1338 %
1339 % char **GetDelegateList(const char *pattern,
1340 % size_t *number_delegates,ExceptionInfo *exception)
1341 %
1342 % A description of each parameter follows:
1343 %
1344 % o pattern: Specifies a pointer to a text string containing a pattern.
1345 %
1346 % o number_delegates: This integer returns the number of delegates
1347 % in the list.
1348 %
1349 % o exception: return any errors or warnings in this structure.
1350 %
1351 */
1352
1353 #if defined(__cplusplus) || defined(c_plusplus)
1354 extern "C" {
1355 #endif
1356
DelegateCompare(const void * x,const void * y)1357 static int DelegateCompare(const void *x,const void *y)
1358 {
1359 register const char
1360 **p,
1361 **q;
1362
1363 p=(const char **) x;
1364 q=(const char **) y;
1365 return(LocaleCompare(*p,*q));
1366 }
1367
1368 #if defined(__cplusplus) || defined(c_plusplus)
1369 }
1370 #endif
1371
GetDelegateList(const char * pattern,size_t * number_delegates,ExceptionInfo * exception)1372 MagickExport char **GetDelegateList(const char *pattern,
1373 size_t *number_delegates,ExceptionInfo *exception)
1374 {
1375 char
1376 **delegates;
1377
1378 register const DelegateInfo
1379 *p;
1380
1381 register ssize_t
1382 i;
1383
1384 /*
1385 Allocate delegate list.
1386 */
1387 assert(pattern != (char *) NULL);
1388 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",pattern);
1389
1390 assert(number_delegates != (size_t *) NULL);
1391 *number_delegates=0;
1392 p=GetDelegateInfo("*","*",exception);
1393 if (p == (const DelegateInfo *) NULL)
1394 return((char **) NULL);
1395 delegates=(char **) AcquireQuantumMemory((size_t)
1396 GetNumberOfElementsInLinkedList(delegate_cache)+1UL,sizeof(*delegates));
1397 if (delegates == (char **) NULL)
1398 return((char **) NULL);
1399 LockSemaphoreInfo(delegate_semaphore);
1400 ResetLinkedListIterator(delegate_cache);
1401 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1402 for (i=0; p != (const DelegateInfo *) NULL; )
1403 {
1404 if( (p->stealth == MagickFalse) &&
1405 GlobExpression(p->decode,pattern,MagickFalse) != MagickFalse )
1406 delegates[i++]=ConstantString(p->decode);
1407 if( (p->stealth == MagickFalse) &&
1408 GlobExpression(p->encode,pattern,MagickFalse) != MagickFalse )
1409 delegates[i++]=ConstantString(p->encode);
1410 p=(const DelegateInfo *) GetNextValueInLinkedList(delegate_cache);
1411 }
1412 UnlockSemaphoreInfo(delegate_semaphore);
1413 qsort((void *) delegates,(size_t) i,sizeof(*delegates),DelegateCompare);
1414 delegates[i]=(char *) NULL;
1415 *number_delegates=(size_t) i;
1416 return(delegates);
1417 }
1418
1419 /*
1420 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1421 % %
1422 % %
1423 % %
1424 % G e t D e l e g a t e M o d e %
1425 % %
1426 % %
1427 % %
1428 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1429 %
1430 % GetDelegateMode() returns the mode of the delegate.
1431 %
1432 % The format of the GetDelegateMode method is:
1433 %
1434 % ssize_t GetDelegateMode(const DelegateInfo *delegate_info)
1435 %
1436 % A description of each parameter follows:
1437 %
1438 % o delegate_info: The delegate info.
1439 %
1440 */
GetDelegateMode(const DelegateInfo * delegate_info)1441 MagickExport ssize_t GetDelegateMode(const DelegateInfo *delegate_info)
1442 {
1443 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
1444
1445 assert(delegate_info != (DelegateInfo *) NULL);
1446 assert(delegate_info->signature == MagickCoreSignature);
1447 return(delegate_info->mode);
1448 }
1449
1450 /*
1451 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1452 % %
1453 % %
1454 % %
1455 + G e t D e l e g a t e T h r e a d S u p p o r t %
1456 % %
1457 % %
1458 % %
1459 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1460 %
1461 % GetDelegateThreadSupport() returns MagickTrue if the delegate supports
1462 % threads.
1463 %
1464 % The format of the GetDelegateThreadSupport method is:
1465 %
1466 % MagickBooleanType GetDelegateThreadSupport(
1467 % const DelegateInfo *delegate_info)
1468 %
1469 % A description of each parameter follows:
1470 %
1471 % o delegate_info: The delegate info.
1472 %
1473 */
GetDelegateThreadSupport(const DelegateInfo * delegate_info)1474 MagickExport MagickBooleanType GetDelegateThreadSupport(
1475 const DelegateInfo *delegate_info)
1476 {
1477 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
1478
1479 assert(delegate_info != (DelegateInfo *) NULL);
1480 assert(delegate_info->signature == MagickCoreSignature);
1481 return(delegate_info->thread_support);
1482 }
1483
1484 /*
1485 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1486 % %
1487 % %
1488 % %
1489 + I s D e l e g a t e C a c h e I n s t a n t i a t e d %
1490 % %
1491 % %
1492 % %
1493 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1494 %
1495 % IsDelegateCacheInstantiated() determines if the delegate cache is
1496 % instantiated. If not, it instantiates the cache and returns it.
1497 %
1498 % The format of the IsDelegateInstantiated method is:
1499 %
1500 % MagickBooleanType IsDelegateCacheInstantiated(ExceptionInfo *exception)
1501 %
1502 % A description of each parameter follows.
1503 %
1504 % o exception: return any errors or warnings in this structure.
1505 %
1506 */
IsDelegateCacheInstantiated(ExceptionInfo * exception)1507 static MagickBooleanType IsDelegateCacheInstantiated(ExceptionInfo *exception)
1508 {
1509 if (delegate_cache == (LinkedListInfo *) NULL)
1510 {
1511 if (delegate_semaphore == (SemaphoreInfo *) NULL)
1512 ActivateSemaphoreInfo(&delegate_semaphore);
1513 LockSemaphoreInfo(delegate_semaphore);
1514 if (delegate_cache == (LinkedListInfo *) NULL)
1515 delegate_cache=AcquireDelegateCache(DelegateFilename,exception);
1516 UnlockSemaphoreInfo(delegate_semaphore);
1517 }
1518 return(delegate_cache != (LinkedListInfo *) NULL ? MagickTrue : MagickFalse);
1519 }
1520
1521 /*
1522 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1523 % %
1524 % %
1525 % %
1526 % I n v o k e D e l e g a t e %
1527 % %
1528 % %
1529 % %
1530 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1531 %
1532 % InvokeDelegate replaces any embedded formatting characters with the
1533 % appropriate image attribute and executes the resulting command. MagickFalse
1534 % is returned if the commands execute with success otherwise MagickTrue.
1535 %
1536 % The format of the InvokeDelegate method is:
1537 %
1538 % MagickBooleanType InvokeDelegate(ImageInfo *image_info,Image *image,
1539 % const char *decode,const char *encode,ExceptionInfo *exception)
1540 %
1541 % A description of each parameter follows:
1542 %
1543 % o image_info: the imageInfo.
1544 %
1545 % o image: the image.
1546 %
1547 % o exception: return any errors or warnings in this structure.
1548 %
1549 */
1550
CopyDelegateFile(const char * source,const char * destination,const MagickBooleanType overwrite)1551 static MagickBooleanType CopyDelegateFile(const char *source,
1552 const char *destination,const MagickBooleanType overwrite)
1553 {
1554 int
1555 destination_file,
1556 source_file;
1557
1558 MagickBooleanType
1559 status;
1560
1561 register size_t
1562 i;
1563
1564 size_t
1565 length,
1566 quantum;
1567
1568 ssize_t
1569 count;
1570
1571 struct stat
1572 attributes;
1573
1574 unsigned char
1575 *buffer;
1576
1577 /*
1578 Copy source file to destination.
1579 */
1580 assert(source != (const char *) NULL);
1581 assert(destination != (char *) NULL);
1582 if (overwrite == MagickFalse)
1583 {
1584 status=GetPathAttributes(destination,&attributes);
1585 if (status != MagickFalse)
1586 return(MagickTrue);
1587 }
1588 destination_file=open_utf8(destination,O_WRONLY | O_BINARY | O_CREAT,S_MODE);
1589 if (destination_file == -1)
1590 return(MagickFalse);
1591 source_file=open_utf8(source,O_RDONLY | O_BINARY,0);
1592 if (source_file == -1)
1593 {
1594 (void) close(destination_file);
1595 return(MagickFalse);
1596 }
1597 quantum=(size_t) MagickMaxBufferExtent;
1598 if ((fstat(source_file,&attributes) == 0) && (attributes.st_size > 0))
1599 quantum=MagickMin((size_t) attributes.st_size,MagickMaxBufferExtent);
1600 buffer=(unsigned char *) AcquireQuantumMemory(quantum,sizeof(*buffer));
1601 if (buffer == (unsigned char *) NULL)
1602 {
1603 (void) close(source_file);
1604 (void) close(destination_file);
1605 return(MagickFalse);
1606 }
1607 length=0;
1608 for (i=0; ; i+=count)
1609 {
1610 count=(ssize_t) read(source_file,buffer,quantum);
1611 if (count <= 0)
1612 break;
1613 length=(size_t) count;
1614 count=(ssize_t) write(destination_file,buffer,length);
1615 if ((size_t) count != length)
1616 break;
1617 }
1618 (void) close(destination_file);
1619 (void) close(source_file);
1620 buffer=(unsigned char *) RelinquishMagickMemory(buffer);
1621 return(i != 0 ? MagickTrue : MagickFalse);
1622 }
1623
InvokeDelegate(ImageInfo * image_info,Image * image,const char * decode,const char * encode,ExceptionInfo * exception)1624 MagickExport MagickBooleanType InvokeDelegate(ImageInfo *image_info,
1625 Image *image,const char *decode,const char *encode,ExceptionInfo *exception)
1626 {
1627 char
1628 *command,
1629 **commands,
1630 input_filename[MagickPathExtent],
1631 output_filename[MagickPathExtent];
1632
1633 const DelegateInfo
1634 *delegate_info;
1635
1636 MagickBooleanType
1637 status,
1638 temporary;
1639
1640 PolicyRights
1641 rights;
1642
1643 register ssize_t
1644 i;
1645
1646 /*
1647 Get delegate.
1648 */
1649 assert(image_info != (ImageInfo *) NULL);
1650 assert(image_info->signature == MagickCoreSignature);
1651 assert(image != (Image *) NULL);
1652 assert(image->signature == MagickCoreSignature);
1653 if (image->debug != MagickFalse)
1654 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
1655 rights=ExecutePolicyRights;
1656 if (IsRightsAuthorized(DelegatePolicyDomain,rights,decode) == MagickFalse)
1657 {
1658 errno=EPERM;
1659 (void) ThrowMagickException(exception,GetMagickModule(),PolicyError,
1660 "NotAuthorized","`%s'",decode);
1661 return(MagickFalse);
1662 }
1663 if (IsRightsAuthorized(DelegatePolicyDomain,rights,encode) == MagickFalse)
1664 {
1665 errno=EPERM;
1666 (void) ThrowMagickException(exception,GetMagickModule(),PolicyError,
1667 "NotAuthorized","`%s'",encode);
1668 return(MagickFalse);
1669 }
1670 temporary=*image->filename == '\0' ? MagickTrue : MagickFalse;
1671 if ((temporary != MagickFalse) && (AcquireUniqueFilename(image->filename) ==
1672 MagickFalse))
1673 {
1674 ThrowFileException(exception,FileOpenError,"UnableToCreateTemporaryFile",
1675 image->filename);
1676 return(MagickFalse);
1677 }
1678 delegate_info=GetDelegateInfo(decode,encode,exception);
1679 if (delegate_info == (DelegateInfo *) NULL)
1680 {
1681 if (temporary != MagickFalse)
1682 (void) RelinquishUniqueFileResource(image->filename);
1683 (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
1684 "NoTagFound","`%s'",decode ? decode : encode);
1685 return(MagickFalse);
1686 }
1687 if (*image_info->filename == '\0')
1688 {
1689 if (AcquireUniqueFilename(image_info->filename) == MagickFalse)
1690 {
1691 if (temporary != MagickFalse)
1692 (void) RelinquishUniqueFileResource(image->filename);
1693 ThrowFileException(exception,FileOpenError,
1694 "UnableToCreateTemporaryFile",image_info->filename);
1695 return(MagickFalse);
1696 }
1697 image_info->temporary=MagickTrue;
1698 }
1699 if ((delegate_info->mode != 0) && (((decode != (const char *) NULL) &&
1700 (delegate_info->encode != (char *) NULL)) ||
1701 ((encode != (const char *) NULL) &&
1702 (delegate_info->decode != (char *) NULL))))
1703 {
1704 char
1705 *magick;
1706
1707 ImageInfo
1708 *clone_info;
1709
1710 register Image
1711 *p;
1712
1713 /*
1714 Delegate requires a particular image format.
1715 */
1716 if (AcquireUniqueFilename(image_info->unique) == MagickFalse)
1717 {
1718 ThrowFileException(exception,FileOpenError,
1719 "UnableToCreateTemporaryFile",image_info->unique);
1720 return(MagickFalse);
1721 }
1722 magick=InterpretImageProperties(image_info,image,decode != (char *) NULL ?
1723 delegate_info->encode : delegate_info->decode,exception);
1724 if (magick == (char *) NULL)
1725 {
1726 (void) RelinquishUniqueFileResource(image_info->unique);
1727 if (temporary != MagickFalse)
1728 (void) RelinquishUniqueFileResource(image->filename);
1729 (void) ThrowMagickException(exception,GetMagickModule(),
1730 DelegateError,"DelegateFailed","`%s'",decode ? decode : encode);
1731 return(MagickFalse);
1732 }
1733 LocaleUpper(magick);
1734 clone_info=CloneImageInfo(image_info);
1735 (void) CopyMagickString((char *) clone_info->magick,magick,
1736 MagickPathExtent);
1737 if (LocaleCompare(magick,"NULL") != 0)
1738 (void) CopyMagickString(image->magick,magick,MagickPathExtent);
1739 magick=DestroyString(magick);
1740 (void) FormatLocaleString(clone_info->filename,MagickPathExtent,"%s:",
1741 delegate_info->decode);
1742 (void) SetImageInfo(clone_info,(unsigned int) GetImageListLength(image),
1743 exception);
1744 (void) CopyMagickString(clone_info->filename,image_info->filename,
1745 MagickPathExtent);
1746 (void) CopyMagickString(image_info->filename,image->filename,
1747 MagickPathExtent);
1748 for (p=image; p != (Image *) NULL; p=GetNextImageInList(p))
1749 {
1750 (void) FormatLocaleString(p->filename,MagickPathExtent,"%s:%s",
1751 delegate_info->decode,clone_info->filename);
1752 status=WriteImage(clone_info,p,exception);
1753 if (status == MagickFalse)
1754 {
1755 (void) RelinquishUniqueFileResource(image_info->unique);
1756 if (temporary != MagickFalse)
1757 (void) RelinquishUniqueFileResource(image->filename);
1758 clone_info=DestroyImageInfo(clone_info);
1759 (void) ThrowMagickException(exception,GetMagickModule(),
1760 DelegateError,"DelegateFailed","`%s'",decode ? decode : encode);
1761 return(MagickFalse);
1762 }
1763 if (clone_info->adjoin != MagickFalse)
1764 break;
1765 }
1766 (void) RelinquishUniqueFileResource(image_info->unique);
1767 clone_info=DestroyImageInfo(clone_info);
1768 }
1769 /*
1770 Invoke delegate.
1771 */
1772 commands=StringToList(delegate_info->commands);
1773 if (commands == (char **) NULL)
1774 {
1775 if (temporary != MagickFalse)
1776 (void) RelinquishUniqueFileResource(image->filename);
1777 (void) ThrowMagickException(exception,GetMagickModule(),
1778 ResourceLimitError,"MemoryAllocationFailed","`%s'",
1779 decode ? decode : encode);
1780 return(MagickFalse);
1781 }
1782 command=(char *) NULL;
1783 status=MagickTrue;
1784 (void) CopyMagickString(output_filename,image_info->filename,
1785 MagickPathExtent);
1786 (void) CopyMagickString(input_filename,image->filename,MagickPathExtent);
1787 for (i=0; commands[i] != (char *) NULL; i++)
1788 {
1789 (void) AcquireUniqueSymbolicLink(output_filename,image_info->filename);
1790 if (AcquireUniqueFilename(image_info->unique) == MagickFalse)
1791 {
1792 ThrowFileException(exception,FileOpenError,
1793 "UnableToCreateTemporaryFile",image_info->unique);
1794 break;
1795 }
1796 if (LocaleCompare(decode,"SCAN") != 0)
1797 {
1798 status=AcquireUniqueSymbolicLink(input_filename,image->filename);
1799 if (status == MagickFalse)
1800 {
1801 ThrowFileException(exception,FileOpenError,
1802 "UnableToCreateTemporaryFile",input_filename);
1803 break;
1804 }
1805 }
1806 status=MagickTrue;
1807 command=InterpretDelegateProperties(image_info,image,commands[i],exception);
1808 if (command != (char *) NULL)
1809 {
1810 /*
1811 Execute delegate.
1812 */
1813 if (ExternalDelegateCommand(delegate_info->spawn,image_info->verbose,
1814 command,(char *) NULL,exception) != 0)
1815 status=MagickFalse;
1816 if (delegate_info->spawn != MagickFalse)
1817 {
1818 ssize_t
1819 count;
1820
1821 /*
1822 Wait for input file to 'disappear', or maximum 10 seconds.
1823 */
1824 count=100;
1825 while ((count-- > 0) && (access_utf8(image->filename,F_OK) == 0))
1826 (void) MagickDelay(100); /* sleep 0.1 seconds */
1827 }
1828 command=DestroyString(command);
1829 }
1830 if (LocaleCompare(decode,"SCAN") != 0)
1831 {
1832 if (CopyDelegateFile(image->filename,input_filename,MagickFalse) == MagickFalse)
1833 (void) RelinquishUniqueFileResource(input_filename);
1834 }
1835 if ((strcmp(input_filename,output_filename) != 0) &&
1836 (CopyDelegateFile(image_info->filename,output_filename,MagickTrue) == MagickFalse))
1837 (void) RelinquishUniqueFileResource(output_filename);
1838 if (image_info->temporary != MagickFalse)
1839 (void) RelinquishUniqueFileResource(image_info->filename);
1840 (void) RelinquishUniqueFileResource(image_info->unique);
1841 (void) RelinquishUniqueFileResource(image_info->filename);
1842 (void) RelinquishUniqueFileResource(image->filename);
1843 if (status == MagickFalse)
1844 {
1845 (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
1846 "DelegateFailed","`%s'",commands[i]);
1847 break;
1848 }
1849 commands[i]=DestroyString(commands[i]);
1850 }
1851 (void) CopyMagickString(image_info->filename,output_filename,
1852 MagickPathExtent);
1853 (void) CopyMagickString(image->filename,input_filename,MagickPathExtent);
1854 /*
1855 Relinquish resources.
1856 */
1857 for ( ; commands[i] != (char *) NULL; i++)
1858 commands[i]=DestroyString(commands[i]);
1859 commands=(char **) RelinquishMagickMemory(commands);
1860 if (temporary != MagickFalse)
1861 (void) RelinquishUniqueFileResource(image->filename);
1862 return(status);
1863 }
1864
1865 /*
1866 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1867 % %
1868 % %
1869 % %
1870 % L i s t D e l e g a t e I n f o %
1871 % %
1872 % %
1873 % %
1874 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1875 %
1876 % ListDelegateInfo() lists the image formats to a file.
1877 %
1878 % The format of the ListDelegateInfo method is:
1879 %
1880 % MagickBooleanType ListDelegateInfo(FILE *file,ExceptionInfo *exception)
1881 %
1882 % A description of each parameter follows.
1883 %
1884 % o file: An pointer to a FILE.
1885 %
1886 % o exception: return any errors or warnings in this structure.
1887 %
1888 */
ListDelegateInfo(FILE * file,ExceptionInfo * exception)1889 MagickExport MagickBooleanType ListDelegateInfo(FILE *file,
1890 ExceptionInfo *exception)
1891 {
1892 const DelegateInfo
1893 **delegate_info;
1894
1895 char
1896 **commands,
1897 delegate[MagickPathExtent];
1898
1899 const char
1900 *path;
1901
1902 register ssize_t
1903 i;
1904
1905 size_t
1906 number_delegates;
1907
1908 ssize_t
1909 j;
1910
1911 if (file == (const FILE *) NULL)
1912 file=stdout;
1913 delegate_info=GetDelegateInfoList("*",&number_delegates,exception);
1914 if (delegate_info == (const DelegateInfo **) NULL)
1915 return(MagickFalse);
1916 path=(const char *) NULL;
1917 for (i=0; i < (ssize_t) number_delegates; i++)
1918 {
1919 if (delegate_info[i]->stealth != MagickFalse)
1920 continue;
1921 if ((path == (const char *) NULL) ||
1922 (LocaleCompare(path,delegate_info[i]->path) != 0))
1923 {
1924 if (delegate_info[i]->path != (char *) NULL)
1925 (void) FormatLocaleFile(file,"\nPath: %s\n\n",delegate_info[i]->path);
1926 (void) FormatLocaleFile(file,"Delegate Command\n");
1927 (void) FormatLocaleFile(file,
1928 "-------------------------------------------------"
1929 "------------------------------\n");
1930 }
1931 path=delegate_info[i]->path;
1932 *delegate='\0';
1933 if (delegate_info[i]->encode != (char *) NULL)
1934 (void) CopyMagickString(delegate,delegate_info[i]->encode,
1935 MagickPathExtent);
1936 (void) ConcatenateMagickString(delegate," ",MagickPathExtent);
1937 delegate[8]='\0';
1938 commands=StringToList(delegate_info[i]->commands);
1939 if (commands == (char **) NULL)
1940 continue;
1941 (void) FormatLocaleFile(file,"%11s%c=%c%s ",delegate_info[i]->decode ?
1942 delegate_info[i]->decode : "",delegate_info[i]->mode <= 0 ? '<' : ' ',
1943 delegate_info[i]->mode >= 0 ? '>' : ' ',delegate);
1944 StripString(commands[0]);
1945 (void) FormatLocaleFile(file,"\"%s\"\n",commands[0]);
1946 for (j=1; commands[j] != (char *) NULL; j++)
1947 {
1948 StripString(commands[j]);
1949 (void) FormatLocaleFile(file," \"%s\"\n",commands[j]);
1950 }
1951 for (j=0; commands[j] != (char *) NULL; j++)
1952 commands[j]=DestroyString(commands[j]);
1953 commands=(char **) RelinquishMagickMemory(commands);
1954 }
1955 (void) fflush(file);
1956 delegate_info=(const DelegateInfo **)
1957 RelinquishMagickMemory((void *) delegate_info);
1958 return(MagickTrue);
1959 }
1960
1961 /*
1962 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1963 % %
1964 % %
1965 % %
1966 + L o a d D e l e g a t e C a c h e %
1967 % %
1968 % %
1969 % %
1970 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1971 %
1972 % LoadDelegateCache() loads the delegate configurations which provides a
1973 % mapping between delegate attributes and a delegate name.
1974 %
1975 % The format of the LoadDelegateCache method is:
1976 %
1977 % MagickBooleanType LoadDelegateCache(LinkedListInfo *cache,
1978 % const char *xml,const char *filename,const size_t depth,
1979 % ExceptionInfo *exception)
1980 %
1981 % A description of each parameter follows:
1982 %
1983 % o xml: The delegate list in XML format.
1984 %
1985 % o filename: The delegate list filename.
1986 %
1987 % o depth: depth of <include /> statements.
1988 %
1989 % o exception: return any errors or warnings in this structure.
1990 %
1991 */
LoadDelegateCache(LinkedListInfo * cache,const char * xml,const char * filename,const size_t depth,ExceptionInfo * exception)1992 static MagickBooleanType LoadDelegateCache(LinkedListInfo *cache,
1993 const char *xml,const char *filename,const size_t depth,
1994 ExceptionInfo *exception)
1995 {
1996 char
1997 keyword[MagickPathExtent],
1998 *token;
1999
2000 const char
2001 *q;
2002
2003 DelegateInfo
2004 *delegate_info;
2005
2006 MagickStatusType
2007 status;
2008
2009 size_t
2010 extent;
2011
2012 /*
2013 Load the delegate map file.
2014 */
2015 (void) LogMagickEvent(ConfigureEvent,GetMagickModule(),
2016 "Loading delegate configuration file \"%s\" ...",filename);
2017 if (xml == (const char *) NULL)
2018 return(MagickFalse);
2019 status=MagickTrue;
2020 delegate_info=(DelegateInfo *) NULL;
2021 token=AcquireString(xml);
2022 extent=strlen(token)+MagickPathExtent;
2023 for (q=(const char *) xml; *q != '\0'; )
2024 {
2025 /*
2026 Interpret XML.
2027 */
2028 GetNextToken(q,&q,extent,token);
2029 if (*token == '\0')
2030 break;
2031 (void) CopyMagickString(keyword,token,MagickPathExtent);
2032 if (LocaleNCompare(keyword,"<!DOCTYPE",9) == 0)
2033 {
2034 /*
2035 Doctype element.
2036 */
2037 while ((LocaleNCompare(q,"]>",2) != 0) && (*q != '\0'))
2038 GetNextToken(q,&q,extent,token);
2039 continue;
2040 }
2041 if (LocaleNCompare(keyword,"<!--",4) == 0)
2042 {
2043 /*
2044 Comment element.
2045 */
2046 while ((LocaleNCompare(q,"->",2) != 0) && (*q != '\0'))
2047 GetNextToken(q,&q,extent,token);
2048 continue;
2049 }
2050 if (LocaleCompare(keyword,"<include") == 0)
2051 {
2052 /*
2053 Include element.
2054 */
2055 while (((*token != '/') && (*(token+1) != '>')) && (*q != '\0'))
2056 {
2057 (void) CopyMagickString(keyword,token,MagickPathExtent);
2058 GetNextToken(q,&q,extent,token);
2059 if (*token != '=')
2060 continue;
2061 GetNextToken(q,&q,extent,token);
2062 if (LocaleCompare(keyword,"file") == 0)
2063 {
2064 if (depth > 200)
2065 (void) ThrowMagickException(exception,GetMagickModule(),
2066 ConfigureError,"IncludeElementNestedTooDeeply","`%s'",token);
2067 else
2068 {
2069 char
2070 path[MagickPathExtent],
2071 *file_xml;
2072
2073 GetPathComponent(filename,HeadPath,path);
2074 if (*path != '\0')
2075 (void) ConcatenateMagickString(path,DirectorySeparator,
2076 MagickPathExtent);
2077 if (*token == *DirectorySeparator)
2078 (void) CopyMagickString(path,token,MagickPathExtent);
2079 else
2080 (void) ConcatenateMagickString(path,token,MagickPathExtent);
2081 file_xml=FileToXML(path,~0UL);
2082 if (file_xml != (char *) NULL)
2083 {
2084 status&=LoadDelegateCache(cache,file_xml,path,
2085 depth+1,exception);
2086 file_xml=DestroyString(file_xml);
2087 }
2088 }
2089 }
2090 }
2091 continue;
2092 }
2093 if (LocaleCompare(keyword,"<delegate") == 0)
2094 {
2095 /*
2096 Delegate element.
2097 */
2098 delegate_info=(DelegateInfo *) AcquireMagickMemory(
2099 sizeof(*delegate_info));
2100 if (delegate_info == (DelegateInfo *) NULL)
2101 ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
2102 (void) ResetMagickMemory(delegate_info,0,sizeof(*delegate_info));
2103 delegate_info->path=ConstantString(filename);
2104 delegate_info->thread_support=MagickTrue;
2105 delegate_info->signature=MagickCoreSignature;
2106 continue;
2107 }
2108 if (delegate_info == (DelegateInfo *) NULL)
2109 continue;
2110 if (LocaleCompare(keyword,"/>") == 0)
2111 {
2112 status=AppendValueToLinkedList(cache,delegate_info);
2113 if (status == MagickFalse)
2114 (void) ThrowMagickException(exception,GetMagickModule(),
2115 ResourceLimitError,"MemoryAllocationFailed","`%s'",
2116 delegate_info->commands);
2117 delegate_info=(DelegateInfo *) NULL;
2118 continue;
2119 }
2120 GetNextToken(q,(const char **) NULL,extent,token);
2121 if (*token != '=')
2122 continue;
2123 GetNextToken(q,&q,extent,token);
2124 GetNextToken(q,&q,extent,token);
2125 switch (*keyword)
2126 {
2127 case 'C':
2128 case 'c':
2129 {
2130 if (LocaleCompare((char *) keyword,"command") == 0)
2131 {
2132 char
2133 *commands;
2134
2135 commands=AcquireString(token);
2136 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
2137 if (strchr(commands,'@') != (char *) NULL)
2138 {
2139 char
2140 path[MagickPathExtent];
2141
2142 NTGhostscriptEXE(path,MagickPathExtent);
2143 (void) SubstituteString((char **) &commands,"@PSDelegate@",
2144 path);
2145 (void) SubstituteString((char **) &commands,"\\","/");
2146 }
2147 (void) SubstituteString((char **) &commands,""","\"");
2148 #else
2149 (void) SubstituteString((char **) &commands,""","'");
2150 #endif
2151 (void) SubstituteString((char **) &commands,"&","&");
2152 (void) SubstituteString((char **) &commands,">",">");
2153 (void) SubstituteString((char **) &commands,"<","<");
2154 delegate_info->commands=commands;
2155 break;
2156 }
2157 break;
2158 }
2159 case 'D':
2160 case 'd':
2161 {
2162 if (LocaleCompare((char *) keyword,"decode") == 0)
2163 {
2164 delegate_info->decode=ConstantString(token);
2165 delegate_info->mode=1;
2166 break;
2167 }
2168 break;
2169 }
2170 case 'E':
2171 case 'e':
2172 {
2173 if (LocaleCompare((char *) keyword,"encode") == 0)
2174 {
2175 delegate_info->encode=ConstantString(token);
2176 delegate_info->mode=(-1);
2177 break;
2178 }
2179 break;
2180 }
2181 case 'M':
2182 case 'm':
2183 {
2184 if (LocaleCompare((char *) keyword,"mode") == 0)
2185 {
2186 delegate_info->mode=1;
2187 if (LocaleCompare(token,"bi") == 0)
2188 delegate_info->mode=0;
2189 else
2190 if (LocaleCompare(token,"encode") == 0)
2191 delegate_info->mode=(-1);
2192 break;
2193 }
2194 break;
2195 }
2196 case 'S':
2197 case 's':
2198 {
2199 if (LocaleCompare((char *) keyword,"spawn") == 0)
2200 {
2201 delegate_info->spawn=IsStringTrue(token);
2202 break;
2203 }
2204 if (LocaleCompare((char *) keyword,"stealth") == 0)
2205 {
2206 delegate_info->stealth=IsStringTrue(token);
2207 break;
2208 }
2209 break;
2210 }
2211 case 'T':
2212 case 't':
2213 {
2214 if (LocaleCompare((char *) keyword,"thread-support") == 0)
2215 {
2216 delegate_info->thread_support=IsStringTrue(token);
2217 if (delegate_info->thread_support == MagickFalse)
2218 delegate_info->semaphore=AcquireSemaphoreInfo();
2219 break;
2220 }
2221 break;
2222 }
2223 default:
2224 break;
2225 }
2226 }
2227 token=(char *) RelinquishMagickMemory(token);
2228 return(status != 0 ? MagickTrue : MagickFalse);
2229 }
2230