2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6 % U U TTTTT IIIII L IIIII TTTTT Y Y %
10 % UUU T IIIII LLLLL IIIII T Y %
13 % MagickCore Utility Methods %
20 % Copyright 1999-2012 ImageMagick Studio LLC, a non-profit organization %
21 % dedicated to making software imaging solutions freely available. %
23 % You may not use this file except in compliance with the License. You may %
24 % obtain a copy of the License at %
26 % http://www.imagemagick.org/script/license.php %
28 % Unless required by applicable law or agreed to in writing, software %
29 % distributed under the License is distributed on an "AS IS" BASIS, %
30 % WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. %
31 % See the License for the specific language governing permissions and %
32 % limitations under the License. %
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
42 #include "MagickCore/studio.h"
43 #include "MagickCore/property.h"
44 #include "MagickCore/blob.h"
45 #include "MagickCore/color.h"
46 #include "MagickCore/exception.h"
47 #include "MagickCore/exception-private.h"
48 #include "MagickCore/geometry.h"
49 #include "MagickCore/list.h"
50 #include "MagickCore/log.h"
51 #include "MagickCore/magick-private.h"
52 #include "MagickCore/memory_.h"
53 #include "MagickCore/nt-base-private.h"
54 #include "MagickCore/option.h"
55 #include "MagickCore/policy.h"
56 #include "MagickCore/resource_.h"
57 #include "MagickCore/semaphore.h"
58 #include "MagickCore/signature-private.h"
59 #include "MagickCore/statistic.h"
60 #include "MagickCore/string_.h"
61 #include "MagickCore/string-private.h"
62 #include "MagickCore/token.h"
63 #include "MagickCore/token-private.h"
64 #include "MagickCore/utility.h"
65 #include "MagickCore/utility-private.h"
66 #if defined(MAGICKCORE_HAVE_PROCESS_H)
69 #if defined(MAGICKCORE_HAVE_MACH_O_DYLD_H)
70 #include <mach-o/dyld.h>
77 Base64[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
83 IsPathDirectory(const char *);
86 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
90 % A c q u i r e U n i q u e F i l e n a m e %
94 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
96 % AcquireUniqueFilename() replaces the contents of path by a unique path name.
98 % The format of the AcquireUniqueFilename method is:
100 % MagickBooleanType AcquireUniqueFilename(char *path)
102 % A description of each parameter follows.
104 % o path: Specifies a pointer to an array of characters. The unique path
105 % name is returned in this array.
108 MagickExport MagickBooleanType AcquireUniqueFilename(char *path)
113 file=AcquireUniqueFileResource(path);
121 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
125 % A c q u i r e U n i q u e S ym b o l i c L i n k %
129 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
131 % AcquireUniqueSymbolicLink() creates a unique symbolic link to the specified
132 % source path and returns MagickTrue on success otherwise MagickFalse. If the
133 % symlink() method fails or is not available, a unique file name is generated
134 % and the source file copied to it. When you are finished with the file, use
135 % RelinquishUniqueFilename() to destroy it.
137 % The format of the AcquireUniqueSymbolicLink method is:
139 % MagickBooleanType AcquireUniqueSymbolicLink(const char *source,
142 % A description of each parameter follows.
144 % o source: the source path.
146 % o destination: the destination path.
150 static inline size_t MagickMin(const size_t x,const size_t y)
157 MagickExport MagickBooleanType AcquireUniqueSymbolicLink(const char *source,
177 assert(source != (const char *) NULL);
178 assert(destination != (char *) NULL);
179 #if defined(MAGICKCORE_HAVE_SYMLINK)
180 (void) AcquireUniqueFilename(destination);
181 (void) RelinquishUniqueFileResource(destination);
182 if (*source == *DirectorySeparator)
184 if (symlink(source,destination) == 0)
193 if (getcwd(path,MaxTextExtent) == (char *) NULL)
195 (void) ConcatenateMagickString(path,DirectorySeparator,MaxTextExtent);
196 (void) ConcatenateMagickString(path,source,MaxTextExtent);
197 if (symlink(path,destination) == 0)
201 destination_file=AcquireUniqueFileResource(destination);
202 if (destination_file == -1)
204 source_file=open_utf8(source,O_RDONLY | O_BINARY,0);
205 if (source_file == -1)
207 (void) close(destination_file);
208 (void) RelinquishUniqueFileResource(destination);
211 quantum=(size_t) MagickMaxBufferExtent;
212 if ((fstat(source_file,&attributes) == 0) && (attributes.st_size != 0))
213 quantum=MagickMin((size_t) attributes.st_size,MagickMaxBufferExtent);
214 buffer=(unsigned char *) AcquireQuantumMemory(quantum,sizeof(*buffer));
215 if (buffer == (unsigned char *) NULL)
217 (void) close(source_file);
218 (void) close(destination_file);
219 (void) RelinquishUniqueFileResource(destination);
224 count=(ssize_t) read(source_file,buffer,quantum);
227 length=(size_t) count;
228 count=(ssize_t) write(destination_file,buffer,length);
229 if ((size_t) count != length)
231 (void) close(destination_file);
232 (void) close(source_file);
233 buffer=(unsigned char *) RelinquishMagickMemory(buffer);
234 (void) RelinquishUniqueFileResource(destination);
238 (void) close(destination_file);
239 (void) close(source_file);
240 buffer=(unsigned char *) RelinquishMagickMemory(buffer);
245 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
249 % A p p e n d I m a g e F o r m a t %
253 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
255 % AppendImageFormat() appends the image format type to the filename. If an
256 % extension to the file already exists, it is first removed.
258 % The format of the AppendImageFormat method is:
260 % void AppendImageFormat(const char *format,char *filename)
262 % A description of each parameter follows.
264 % o format: Specifies a pointer to an array of characters. This the
265 % format of the image.
267 % o filename: Specifies a pointer to an array of characters. The unique
268 % file name is returned in this array.
271 MagickExport void AppendImageFormat(const char *format,char *filename)
274 extension[MaxTextExtent],
277 assert(format != (char *) NULL);
278 assert(filename != (char *) NULL);
279 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",filename);
280 if ((*format == '\0') || (*filename == '\0'))
282 if (LocaleCompare(filename,"-") == 0)
285 message[MaxTextExtent];
287 (void) FormatLocaleString(message,MaxTextExtent,"%s:%s",format,filename);
288 (void) CopyMagickString(filename,message,MaxTextExtent);
291 GetPathComponent(filename,ExtensionPath,extension);
292 if ((LocaleCompare(extension,"Z") == 0) ||
293 (LocaleCompare(extension,"bz2") == 0) ||
294 (LocaleCompare(extension,"gz") == 0) ||
295 (LocaleCompare(extension,"wmz") == 0) ||
296 (LocaleCompare(extension,"svgz") == 0))
298 GetPathComponent(filename,RootPath,root);
299 (void) CopyMagickString(filename,root,MaxTextExtent);
300 GetPathComponent(filename,RootPath,root);
301 (void) FormatLocaleString(filename,MaxTextExtent,"%s.%s.%s",root,format,
305 GetPathComponent(filename,RootPath,root);
306 (void) FormatLocaleString(filename,MaxTextExtent,"%s.%s",root,format);
310 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
314 % B a s e 6 4 D e c o d e %
318 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
320 % Base64Decode() decodes Base64-encoded text and returns its binary
321 % equivalent. NULL is returned if the text is not valid Base64 data, or a
322 % memory allocation failure occurs.
324 % The format of the Base64Decode method is:
326 % unsigned char *Base64Decode(const char *source,length_t *length)
328 % A description of each parameter follows:
330 % o source: A pointer to a Base64-encoded string.
332 % o length: the number of bytes decoded.
335 MagickExport unsigned char *Base64Decode(const char *source,size_t *length)
350 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
351 assert(source != (char *) NULL);
352 assert(length != (size_t *) NULL);
354 decode=(unsigned char *) AcquireQuantumMemory(strlen(source)/4+4,
356 if (decode == (unsigned char *) NULL)
357 return((unsigned char *) NULL);
360 for (p=source; *p != '\0'; p++)
362 if (isspace((int) ((unsigned char) *p)) != 0)
367 if (q == (char *) NULL)
369 decode=(unsigned char *) RelinquishMagickMemory(decode);
370 return((unsigned char *) NULL); /* non-Base64 character */
376 decode[i]=(q-Base64) << 2;
382 decode[i++]|=(q-Base64) >> 4;
383 decode[i]=((q-Base64) & 0x0f) << 4;
389 decode[i++]|=(q-Base64) >> 2;
390 decode[i]=((q-Base64) & 0x03) << 6;
396 decode[i++]|=(q-Base64);
403 Verify Base-64 string has proper terminal characters.
409 decode=(unsigned char *) RelinquishMagickMemory(decode);
410 return((unsigned char *) NULL);
422 Unrecognized '=' character.
424 decode=(unsigned char *) RelinquishMagickMemory(decode);
425 return((unsigned char *) NULL);
429 for ( ; *p != '\0'; p++)
430 if (isspace((int) ((unsigned char) *p)) == 0)
434 decode=(unsigned char *) RelinquishMagickMemory(decode);
435 return((unsigned char *) NULL);
441 for ( ; *p != '\0'; p++)
442 if (isspace((int) ((unsigned char) *p)) == 0)
444 decode=(unsigned char *) RelinquishMagickMemory(decode);
445 return((unsigned char *) NULL);
447 if ((int) decode[i] != 0)
449 decode=(unsigned char *) RelinquishMagickMemory(decode);
450 return((unsigned char *) NULL);
460 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
464 % B a s e 6 4 E n c o d e %
468 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
470 % Base64Encode() encodes arbitrary binary data to Base64 encoded format as
471 % described by the "Base64 Content-Transfer-Encoding" section of RFC 2045 and
472 % returns the result as a null-terminated ASCII string. NULL is returned if
473 % a memory allocation failure occurs.
475 % The format of the Base64Encode method is:
477 % char *Base64Encode(const unsigned char *blob,const size_t blob_length,
478 % size_t *encode_length)
480 % A description of each parameter follows:
482 % o blob: A pointer to binary data to encode.
484 % o blob_length: the number of bytes to encode.
486 % o encode_length: The number of bytes encoded.
489 MagickExport char *Base64Encode(const unsigned char *blob,
490 const size_t blob_length,size_t *encode_length)
495 register const unsigned char
504 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
505 assert(blob != (const unsigned char *) NULL);
506 assert(blob_length != 0);
507 assert(encode_length != (size_t *) NULL);
509 encode=(char *) AcquireQuantumMemory(blob_length/3+4,4*sizeof(*encode));
510 if (encode == (char *) NULL)
511 return((char *) NULL);
513 for (p=blob; p < (blob+blob_length-2); p+=3)
515 encode[i++]=Base64[(int) (*p >> 2)];
516 encode[i++]=Base64[(int) (((*p & 0x03) << 4)+(*(p+1) >> 4))];
517 encode[i++]=Base64[(int) (((*(p+1) & 0x0f) << 2)+(*(p+2) >> 6))];
518 encode[i++]=Base64[(int) (*(p+2) & 0x3f)];
520 remainder=blob_length % 3;
532 for (j=0; j < (ssize_t) remainder; j++)
534 encode[i++]=Base64[(int) (code[0] >> 2)];
535 encode[i++]=Base64[(int) (((code[0] & 0x03) << 4)+(code[1] >> 4))];
539 encode[i++]=Base64[(int) (((code[1] & 0x0f) << 2)+(code[2] >> 6))];
548 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
552 % C h o p P a t h C o m p o n e n t s %
556 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
558 % ChopPathComponents() removes the number of specified file components from a
561 % The format of the ChopPathComponents method is:
563 % ChopPathComponents(char *path,size_t components)
565 % A description of each parameter follows:
569 % o components: The number of components to chop.
572 MagickPrivate void ChopPathComponents(char *path,const size_t components)
577 for (i=0; i < (ssize_t) components; i++)
578 GetPathComponent(path,HeadPath,path);
582 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
586 % E x p a n d F i l e n a m e %
590 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
592 % ExpandFilename() expands '~' in a path.
594 % The format of the ExpandFilename function is:
596 % ExpandFilename(char *path)
598 % A description of each parameter follows:
600 % o path: Specifies a pointer to a character array that contains the
604 MagickPrivate void ExpandFilename(char *path)
607 expand_path[MaxTextExtent];
609 if (path == (char *) NULL)
613 (void) CopyMagickString(expand_path,path,MaxTextExtent);
614 if ((*(path+1) == *DirectorySeparator) || (*(path+1) == '\0'))
620 Substitute ~ with $HOME.
622 (void) CopyMagickString(expand_path,".",MaxTextExtent);
623 (void) ConcatenateMagickString(expand_path,path+1,MaxTextExtent);
624 home=GetEnvironmentValue("HOME");
625 if (home == (char *) NULL)
626 home=GetEnvironmentValue("USERPROFILE");
627 if (home != (char *) NULL)
629 (void) CopyMagickString(expand_path,home,MaxTextExtent);
630 (void) ConcatenateMagickString(expand_path,path+1,MaxTextExtent);
631 home=DestroyString(home);
636 #if defined(MAGICKCORE_POSIX_SUPPORT) && !defined(__OS2__)
638 username[MaxTextExtent];
647 Substitute ~ with home directory from password file.
649 (void) CopyMagickString(username,path+1,MaxTextExtent);
650 p=strchr(username,'/');
651 if (p != (char *) NULL)
653 entry=getpwnam(username);
654 if (entry == (struct passwd *) NULL)
656 (void) CopyMagickString(expand_path,entry->pw_dir,MaxTextExtent);
657 if (p != (char *) NULL)
659 (void) ConcatenateMagickString(expand_path,"/",MaxTextExtent);
660 (void) ConcatenateMagickString(expand_path,p+1,MaxTextExtent);
664 (void) CopyMagickString(path,expand_path,MaxTextExtent);
668 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
672 % E x p a n d F i l e n a m e s %
676 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
678 % ExpandFilenames() checks each argument of the command line vector and
679 % expands it if they have a wildcard character. For example, *.jpg might
680 % expand to: bird.jpg rose.jpg tiki.jpg.
682 % The format of the ExpandFilenames function is:
684 % status=ExpandFilenames(int *number_arguments,char ***arguments)
686 % A description of each parameter follows:
688 % o number_arguments: Specifies a pointer to an integer describing the
689 % number of elements in the argument vector.
691 % o arguments: Specifies a pointer to a text array containing the command
695 MagickExport MagickBooleanType ExpandFilenames(int *number_arguments,
700 home_directory[MaxTextExtent],
715 Allocate argument vector.
717 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
718 assert(number_arguments != (int *) NULL);
719 assert(arguments != (char ***) NULL);
720 vector=(char **) AcquireQuantumMemory((size_t) (*number_arguments+1),
722 if (vector == (char **) NULL)
723 ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
725 Expand any wildcard filenames.
727 *home_directory='\0';
729 for (i=0; i < (ssize_t) *number_arguments; i++)
733 filename[MaxTextExtent],
734 magick[MaxTextExtent],
737 subimage[MaxTextExtent];
742 option=(*arguments)[i];
747 vector[count++]=ConstantString(option);
749 parameters=ParseCommandOption(MagickCommandOptions,MagickFalse,option);
753 Do not expand command option parameters.
755 for (j=0; j < parameters; j++)
758 if (i == (ssize_t) *number_arguments)
760 option=(*arguments)[i];
761 vector[count++]=ConstantString(option);
765 if ((*option == '"') || (*option == '\''))
767 GetPathComponent(option,TailPath,filename);
768 GetPathComponent(option,MagickPath,magick);
769 if ((LocaleCompare(magick,"CAPTION") == 0) ||
770 (LocaleCompare(magick,"LABEL") == 0) ||
771 (LocaleCompare(magick,"PANGO") == 0) ||
772 (LocaleCompare(magick,"VID") == 0))
774 if ((IsGlob(option) == MagickFalse) && (*option != '@'))
779 Generate file list from wildcard filename (e.g. *.jpg).
781 GetPathComponent(option,HeadPath,path);
782 GetPathComponent(option,SubimagePath,subimage);
783 ExpandFilename(path);
784 if (*home_directory == '\0')
785 directory=getcwd(home_directory,MaxTextExtent-1);
787 filelist=ListFiles(*path == '\0' ? home_directory : path,option,
802 Generate file list from file list (e.g. @filelist.txt).
804 exception=AcquireExceptionInfo();
805 files=FileToString(option+1,~0,exception);
806 exception=DestroyExceptionInfo(exception);
807 if (files == (char *) NULL)
809 filelist=StringToArgv(files,&length);
810 if (filelist == (char **) NULL)
812 files=DestroyString(files);
813 filelist[0]=DestroyString(filelist[0]);
814 for (j=0; j < (ssize_t) (length-1); j++)
815 filelist[j]=filelist[j+1];
816 number_files=(size_t) length-1;
818 if (filelist == (char **) NULL)
820 for (j=0; j < (ssize_t) number_files; j++)
821 if (IsPathDirectory(filelist[j]) <= 0)
823 if (j == (ssize_t) number_files)
825 for (j=0; j < (ssize_t) number_files; j++)
826 filelist[j]=DestroyString(filelist[j]);
827 filelist=(char **) RelinquishMagickMemory(filelist);
831 Transfer file list to argument vector.
833 vector=(char **) ResizeQuantumMemory(vector,(size_t) *number_arguments+
834 count+number_files+1,sizeof(*vector));
835 if (vector == (char **) NULL)
837 for (j=0; j < (ssize_t) number_files; j++)
840 parameters=ParseCommandOption(MagickCommandOptions,MagickFalse,option);
847 Do not expand command option parameters.
849 vector[count++]=ConstantString(option);
850 for (k=0; k < parameters; k++)
853 if (j == (ssize_t) number_files)
856 vector[count++]=ConstantString(option);
860 (void) CopyMagickString(filename,path,MaxTextExtent);
862 (void) ConcatenateMagickString(filename,DirectorySeparator,
864 (void) ConcatenateMagickString(filename,filelist[j],MaxTextExtent);
865 filelist[j]=DestroyString(filelist[j]);
866 if (strlen(filename) >= (MaxTextExtent-1))
867 ThrowFatalException(OptionFatalError,"FilenameTruncated");
868 if (IsPathDirectory(filename) <= 0)
876 (void) ConcatenateMagickString(path,magick,MaxTextExtent);
877 (void) ConcatenateMagickString(path,":",MaxTextExtent);
879 (void) ConcatenateMagickString(path,filename,MaxTextExtent);
880 if (*subimage != '\0')
882 (void) ConcatenateMagickString(path,"[",MaxTextExtent);
883 (void) ConcatenateMagickString(path,subimage,MaxTextExtent);
884 (void) ConcatenateMagickString(path,"]",MaxTextExtent);
886 if (strlen(path) >= (MaxTextExtent-1))
887 ThrowFatalException(OptionFatalError,"FilenameTruncated");
888 if (destroy != MagickFalse)
891 vector[count]=DestroyString(vector[count]);
894 vector[count++]=ConstantString(path);
897 filelist=(char **) RelinquishMagickMemory(filelist);
899 vector[count]=(char *) NULL;
900 if (IsEventLogging() != MagickFalse)
905 command_line=AcquireString(vector[0]);
906 for (i=1; i < count; i++)
908 (void) ConcatenateString(&command_line," {");
909 (void) ConcatenateString(&command_line,vector[i]);
910 (void) ConcatenateString(&command_line,"}");
912 (void) LogMagickEvent(ConfigureEvent,GetMagickModule(),
913 "Command line: %s",command_line);
914 command_line=DestroyString(command_line);
916 *number_arguments=(int) count;
922 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
926 % G e t E x e c u t i o n P a t h %
930 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
932 % GetExecutionPath() returns the pathname of the executable that started
933 % the process. On success MagickTrue is returned, otherwise MagickFalse.
935 % The format of the GetExecutionPath method is:
937 % MagickBooleanType GetExecutionPath(char *path,const size_t extent)
939 % A description of each parameter follows:
941 % o path: the pathname of the executable that started the process.
943 % o extent: the maximum extent of the path.
946 MagickPrivate MagickBooleanType GetExecutionPath(char *path,const size_t extent)
952 directory=getcwd(path,(unsigned long) extent);
954 #if defined(MAGICKCORE_HAVE_GETPID) && defined(MAGICKCORE_HAVE_READLINK) && defined(PATH_MAX)
957 link_path[MaxTextExtent],
958 execution_path[PATH_MAX+1];
963 (void) FormatLocaleString(link_path,MaxTextExtent,"/proc/%.20g/exe",
965 count=readlink(link_path,execution_path,PATH_MAX);
968 (void) FormatLocaleString(link_path,MaxTextExtent,"/proc/%.20g/file",
970 count=readlink(link_path,execution_path,PATH_MAX);
972 if ((count > 0) && (count <= (ssize_t) PATH_MAX))
974 execution_path[count]='\0';
975 (void) CopyMagickString(path,execution_path,extent);
979 #if defined(MAGICKCORE_HAVE__NSGETEXECUTABLEPATH)
982 executable_path[PATH_MAX << 1],
983 execution_path[PATH_MAX+1];
988 length=sizeof(executable_path);
989 if ((_NSGetExecutablePath(executable_path,&length) == 0) &&
990 (realpath(executable_path,execution_path) != (char *) NULL))
991 (void) CopyMagickString(path,execution_path,extent);
994 #if defined(MAGICKCORE_HAVE_GETEXECNAME)
999 execution_path=(const char *) getexecname();
1000 if (execution_path != (const char *) NULL)
1002 if (*execution_path != *DirectorySeparator)
1003 (void) ConcatenateMagickString(path,DirectorySeparator,extent);
1004 (void) ConcatenateMagickString(path,execution_path,extent);
1008 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
1009 NTGetExecutionPath(path,extent);
1011 #if defined(__GNU__)
1021 execution_path=(char *) NULL;
1022 program_name=program_invocation_name;
1023 if (*program_invocation_name != '/')
1028 extent=strlen(directory)+strlen(program_name)+2;
1029 program_name=AcquireQuantumMemory(extent,sizeof(*program_name));
1030 if (program_name == (char *) NULL)
1031 program_name=program_invocation_name;
1033 count=FormatLocaleString(program_name,extent,"%s/%s",directory,
1034 program_invocation_name);
1038 execution_path=realpath(program_name,NULL);
1039 if (execution_path != (char *) NULL)
1040 (void) CopyMagickString(path,execution_path,extent);
1042 if (program_name != program_invocation_name)
1043 program_name=(char *) RelinquishMagickMemory(program_name);
1044 execution_path=(char *) RelinquishMagickMemory(execution_path);
1047 return(IsPathAccessible(path));
1051 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1055 % G e t M a g i c k P a g e S i z e %
1059 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1061 % GetMagickPageSize() returns the memory page size.
1063 % The format of the GetMagickPageSize method is:
1065 % ssize_t GetMagickPageSize()
1068 MagickPrivate ssize_t GetMagickPageSize(void)
1075 #if defined(MAGICKCORE_HAVE_SYSCONF) && defined(_SC_PAGE_SIZE)
1076 page_size=(ssize_t) sysconf(_SC_PAGE_SIZE);
1078 #if defined(MAGICKCORE_HAVE_GETPAGESIZE)
1079 page_size=(ssize_t) getpagesize();
1088 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1092 % G e t P a t h A t t r i b u t e s %
1096 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1098 % GetPathAttributes() returns attributes (e.g. size of file) about a path.
1100 % The path of the GetPathAttributes method is:
1102 % MagickBooleanType GetPathAttributes(const char *path,void *attributes)
1104 % A description of each parameter follows.
1106 % o path: the file path.
1108 % o attributes: the path attributes are returned here.
1111 MagickExport MagickBooleanType GetPathAttributes(const char *path,
1117 if (path == (const char *) NULL)
1120 return(MagickFalse);
1122 status=stat_utf8(path,(struct stat *) attributes) == 0 ? MagickTrue :
1128 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1132 % G e t P a t h C o m p o n e n t %
1136 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1138 % GetPathComponent() returns the parent directory name, filename, basename, or
1139 % extension of a file path.
1141 % The format of the GetPathComponent function is:
1143 % GetPathComponent(const char *path,PathType type,char *component)
1145 % A description of each parameter follows:
1147 % o path: Specifies a pointer to a character array that contains the
1150 % o type: Specififies which file path component to return.
1152 % o component: the selected file path component is returned here.
1155 MagickExport void GetPathComponent(const char *path,PathType type,
1159 magick[MaxTextExtent],
1161 subimage[MaxTextExtent];
1166 assert(path != (const char *) NULL);
1167 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",path);
1168 assert(component != (char *) NULL);
1174 (void) CopyMagickString(component,path,MaxTextExtent);
1176 #if defined(__OS2__)
1179 for (p=component; *p != '\0'; p++)
1181 if ((*p == '%') && (*(p+1) == '['))
1186 for (p++; (*p != ']') && (*p != '\0'); p++) ;
1190 if ((*p == ':') && (IsPathDirectory(path) < 0) &&
1191 (IsPathAccessible(path) == MagickFalse))
1194 Look for image format specification (e.g. ps3:image).
1196 (void) CopyMagickString(magick,component,(size_t) (p-component+1));
1197 if (IsMagickConflict(magick) != MagickFalse)
1200 for (q=component; *q != '\0'; q++)
1208 p=component+strlen(component)-1;
1209 if ((*p == ']') && (strchr(component,'[') != (char *) NULL) &&
1210 (IsPathAccessible(path) == MagickFalse))
1213 Look for scene specification (e.g. img0001.pcd[4]).
1215 for (q=p-1; q > component; q--)
1220 (void) CopyMagickString(subimage,q+1,MaxTextExtent);
1221 subimage[p-q-1]='\0';
1222 if ((IsSceneGeometry(subimage,MagickFalse) == MagickFalse) &&
1223 (IsGeometry(subimage) == MagickFalse))
1231 for (p=component+strlen(component)-1; p > component; p--)
1232 if (IsBasenameSeparator(*p) != MagickFalse)
1238 (void) CopyMagickString(component,magick,MaxTextExtent);
1243 for (p=component+(strlen(component)-1); p > component; p--)
1245 if (IsBasenameSeparator(*p) != MagickFalse)
1261 if (IsBasenameSeparator(*p) != MagickFalse)
1262 (void) CopyMagickMemory((unsigned char *) component,
1263 (const unsigned char *) (p+1),strlen(p+1)+1);
1268 if (IsBasenameSeparator(*p) != MagickFalse)
1269 (void) CopyMagickString(component,p+1,MaxTextExtent);
1270 for (p=component+(strlen(component)-1); p > component; p--)
1280 if (IsBasenameSeparator(*p) != MagickFalse)
1281 (void) CopyMagickString(component,p+1,MaxTextExtent);
1284 for (p=component+strlen(component)-1; p > component; p--)
1289 (void) CopyMagickString(component,p+1,MaxTextExtent);
1294 (void) CopyMagickString(component,subimage,MaxTextExtent);
1304 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1308 % G e t P a t h C o m p o n e n t s %
1312 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1314 % GetPathComponents() returns a list of path components.
1316 % The format of the GetPathComponents method is:
1318 % char **GetPathComponents(const char *path,
1319 % size_t *number_componenets)
1321 % A description of each parameter follows:
1323 % o path: Specifies the string to segment into a list.
1325 % o number_components: return the number of components in the list
1328 MagickPrivate char **GetPathComponents(const char *path,
1329 size_t *number_components)
1341 if (path == (char *) NULL)
1342 return((char **) NULL);
1343 *number_components=1;
1344 for (p=path; *p != '\0'; p++)
1345 if (IsBasenameSeparator(*p))
1346 (*number_components)++;
1347 components=(char **) AcquireQuantumMemory((size_t) *number_components+1UL,
1348 sizeof(*components));
1349 if (components == (char **) NULL)
1350 ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
1352 for (i=0; i < (ssize_t) *number_components; i++)
1354 for (q=p; *q != '\0'; q++)
1355 if (IsBasenameSeparator(*q))
1357 components[i]=(char *) AcquireQuantumMemory((size_t) (q-p)+MaxTextExtent,
1358 sizeof(**components));
1359 if (components[i] == (char *) NULL)
1360 ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
1361 (void) CopyMagickString(components[i],p,(size_t) (q-p+1));
1364 components[i]=(char *) NULL;
1369 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1373 % I s P a t h A c c e s s i b l e %
1377 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1379 % IsPathAccessible() returns MagickTrue if the file as defined by the path is
1382 % The format of the IsPathAccessible method is:
1384 % MagickBooleanType IsPathAccessible(const char *filename)
1386 % A description of each parameter follows.
1388 % o path: Specifies a path to a file.
1391 MagickExport MagickBooleanType IsPathAccessible(const char *path)
1399 if ((path == (const char *) NULL) || (*path == '\0'))
1400 return(MagickFalse);
1401 status=GetPathAttributes(path,&attributes);
1402 if (status == MagickFalse)
1404 if (S_ISREG(attributes.st_mode) == 0)
1405 return(MagickFalse);
1406 if (access_utf8(path,F_OK) != 0)
1407 return(MagickFalse);
1412 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1416 + I s P a t h D i r e c t o r y %
1420 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1422 % IsPathDirectory() returns -1 if the directory does not exist, 1 is returned
1423 % if the path represents a directory otherwise 0.
1425 % The format of the IsPathDirectory method is:
1427 % int IsPathDirectory(const char *path)
1429 % A description of each parameter follows.
1431 % o path: The directory path.
1434 static int IsPathDirectory(const char *path)
1442 if ((path == (const char *) NULL) || (*path == '\0'))
1443 return(MagickFalse);
1444 status=GetPathAttributes(path,&attributes);
1445 if (status == MagickFalse)
1447 if (S_ISDIR(attributes.st_mode) == 0)
1453 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1457 % L i s t F i l e s %
1461 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1463 % ListFiles() reads the directory specified and returns a list of filenames
1464 % contained in the directory sorted in ascending alphabetic order.
1466 % The format of the ListFiles function is:
1468 % char **ListFiles(const char *directory,const char *pattern,
1469 % ssize_t *number_entries)
1471 % A description of each parameter follows:
1473 % o filelist: Method ListFiles returns a list of filenames contained
1474 % in the directory. If the directory specified cannot be read or it is
1475 % a file a NULL list is returned.
1477 % o directory: Specifies a pointer to a text string containing a directory
1480 % o pattern: Specifies a pointer to a text string containing a pattern.
1482 % o number_entries: This integer returns the number of filenames in the
1487 #if defined(__cplusplus) || defined(c_plusplus)
1491 static int FileCompare(const void *x,const void *y)
1497 p=(const char **) x;
1498 q=(const char **) y;
1499 return(LocaleCompare(*p,*q));
1502 #if defined(__cplusplus) || defined(c_plusplus)
1506 static inline int MagickReadDirectory(DIR *directory,struct dirent *entry,
1507 struct dirent **result)
1509 #if defined(MAGICKCORE_HAVE_READDIR_R)
1510 return(readdir_r(directory,entry,result));
1514 *result=readdir(directory);
1519 MagickPrivate char **ListFiles(const char *directory,const char *pattern,
1520 size_t *number_entries)
1538 assert(directory != (const char *) NULL);
1539 (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",directory);
1540 assert(pattern != (const char *) NULL);
1541 assert(number_entries != (size_t *) NULL);
1543 current_directory=opendir(directory);
1544 if (current_directory == (DIR *) NULL)
1545 return((char **) NULL);
1550 filelist=(char **) AcquireQuantumMemory((size_t) max_entries,
1552 if (filelist == (char **) NULL)
1554 (void) closedir(current_directory);
1555 return((char **) NULL);
1558 Save the current and change to the new directory.
1560 buffer=(struct dirent *) AcquireMagickMemory(sizeof(*buffer)+
1562 if (buffer == (struct dirent *) NULL)
1563 ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
1564 while ((MagickReadDirectory(current_directory,buffer,&entry) == 0) &&
1565 (entry != (struct dirent *) NULL))
1567 if (*entry->d_name == '.')
1569 if ((IsPathDirectory(entry->d_name) > 0) ||
1570 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
1571 (GlobExpression(entry->d_name,pattern,MagickTrue) != MagickFalse))
1573 (GlobExpression(entry->d_name,pattern,MagickFalse) != MagickFalse))
1576 if (*number_entries >= max_entries)
1579 Extend the file list.
1582 filelist=(char **) ResizeQuantumMemory(filelist,(size_t)
1583 max_entries,sizeof(*filelist));
1584 if (filelist == (char **) NULL)
1592 p=strchr(entry->d_name,';');
1595 if (*number_entries > 0)
1596 if (LocaleCompare(entry->d_name,filelist[*number_entries-1]) == 0)
1600 filelist[*number_entries]=(char *) AcquireString(entry->d_name);
1601 (*number_entries)++;
1604 buffer=(struct dirent *) RelinquishMagickMemory(buffer);
1605 (void) closedir(current_directory);
1606 if (filelist == (char **) NULL)
1607 return((char **) NULL);
1609 Sort filelist in ascending order.
1611 qsort((void *) filelist,(size_t) *number_entries,sizeof(*filelist),
1617 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1621 % M a g i c k D e l a y %
1625 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1627 % MagickDelay() suspends program execution for the number of milliseconds
1630 % The format of the Delay method is:
1632 % void MagickDelay(const MagickSizeType milliseconds)
1634 % A description of each parameter follows:
1636 % o milliseconds: Specifies the number of milliseconds to delay before
1640 MagickPrivate void MagickDelay(const MagickSizeType milliseconds)
1642 if (milliseconds == 0)
1644 #if defined(MAGICKCORE_HAVE_NANOSLEEP)
1649 timer.tv_sec=(time_t) (milliseconds/1000);
1650 timer.tv_nsec=(milliseconds % 1000)*1000*1000;
1651 (void) nanosleep(&timer,(struct timespec *) NULL);
1653 #elif defined(MAGICKCORE_HAVE_USLEEP)
1654 usleep(1000*milliseconds);
1655 #elif defined(MAGICKCORE_HAVE_SELECT)
1660 timer.tv_sec=(long) milliseconds/1000;
1661 timer.tv_usec=(long) (milliseconds % 1000)*1000;
1662 (void) select(0,(XFD_SET *) NULL,(XFD_SET *) NULL,(XFD_SET *) NULL,&timer);
1664 #elif defined(MAGICKCORE_HAVE_POLL)
1665 (void) poll((struct pollfd *) NULL,0,(int) milliseconds);
1666 #elif defined(MAGICKCORE_WINDOWS_SUPPORT)
1667 Sleep((long) milliseconds);
1673 timer=milliseconds/1000.0;
1676 #elif defined(__BEOS__)
1677 snooze(1000*milliseconds);
1679 # error "Time delay method not defined."
1684 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1688 % M u l t i l i n e C e n s u s %
1692 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1694 % MultilineCensus() returns the number of lines within a label. A line is
1695 % represented by a \n character.
1697 % The format of the MultilineCenus method is:
1699 % size_t MultilineCensus(const char *label)
1701 % A description of each parameter follows.
1703 % o label: This character string is the label.
1706 MagickExport size_t MultilineCensus(const char *label)
1712 Determine the number of lines within this label.
1714 if (label == (char *) NULL)
1716 for (number_lines=1; *label != '\0'; label++)
1719 return(number_lines);
1723 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1727 % S y s t e m C o m m a n d %
1731 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1733 % SystemCommand() executes the specified command and waits until it
1734 % terminates. The returned value is the exit status of the command.
1736 % The format of the SystemCommand method is:
1738 % int SystemCommand(const MagickBooleanType asynchronous,
1739 % const MagickBooleanType verbose,const char *command,
1740 % ExceptionInfo *exception)
1742 % A description of each parameter follows:
1744 % o asynchronous: a value other than 0 executes the parent program
1745 % concurrently with the new child process.
1747 % o verbose: a value other than 0 prints the executed command before it is
1750 % o command: this string is the command to execute.
1752 % o exception: return any errors here.
1755 MagickExport int SystemCommand(const MagickBooleanType asynchronous,
1756 const MagickBooleanType verbose,const char *command,ExceptionInfo *exception)
1776 arguments=StringToArgv(command,&number_arguments);
1777 if (arguments == (char **) NULL)
1779 rights=ExecutePolicyRights;
1780 domain=DelegatePolicyDomain;
1781 if (IsRightsAuthorized(domain,rights,arguments[1]) == MagickFalse)
1784 (void) ThrowMagickException(exception,GetMagickModule(),PolicyError,
1785 "NotAuthorized","'%s'",arguments[1]);
1786 for (i=0; i < (ssize_t) number_arguments; i++)
1787 arguments[i]=DestroyString(arguments[i]);
1788 arguments=(char **) RelinquishMagickMemory(arguments);
1791 if (verbose != MagickFalse)
1793 (void) FormatLocaleFile(stderr,"%s\n",command);
1794 (void) fflush(stderr);
1796 shell_command=(char *) command;
1797 if (asynchronous != MagickFalse)
1799 shell_command=AcquireString(command);
1800 (void) ConcatenateMagickString(shell_command,"&",MaxTextExtent);
1802 #if defined(MAGICKCORE_POSIX_SUPPORT)
1803 #if !defined(MAGICKCORE_HAVE_EXECVP)
1804 status=system(shell_command);
1806 if ((asynchronous != MagickFalse) ||
1807 (strpbrk(shell_command,"&;<>|") != (char *) NULL))
1808 status=system(shell_command);
1815 Call application directly rather than from a shell.
1817 child_pid=(pid_t) fork();
1818 if (child_pid == (pid_t) -1)
1819 status=system(command);
1823 status=execvp(arguments[1],arguments+1);
1835 pid=(pid_t) waitpid(child_pid,&child_status,0);
1840 if (WIFEXITED(child_status) != 0)
1841 status=WEXITSTATUS(child_status);
1843 if (WIFSIGNALED(child_status))
1849 #elif defined(MAGICKCORE_WINDOWS_SUPPORT)
1850 status=NTSystemCommand(shell_command);
1851 #elif defined(macintosh)
1852 status=MACSystemCommand(shell_command);
1854 status=system(shell_command);
1856 # error No suitable system() method.
1859 (void) ThrowMagickException(exception,GetMagickModule(),DelegateError,
1860 "'%s' (%d)",command,status);
1861 if (shell_command != command)
1862 shell_command=DestroyString(shell_command);
1863 for (i=0; i < (ssize_t) number_arguments; i++)
1864 arguments[i]=DestroyString(arguments[i]);
1865 arguments=(char **) RelinquishMagickMemory(arguments);