309 lines
12 KiB
C
309 lines
12 KiB
C
/*
|
||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||
% %
|
||
% %
|
||
% %
|
||
% CCCC OOO N N JJJJJ U U RRRR EEEEE %
|
||
% C O O NN N J U U R R E %
|
||
% C O O N N N J U U RRRR EEE %
|
||
% C O O N NN J J U U R R E %
|
||
% CCCC OOO N N JJJ UUU R R EEEEE %
|
||
% %
|
||
% %
|
||
% Interpret Magick Scripting Language. %
|
||
% %
|
||
% Software Design %
|
||
% John Cristy %
|
||
% December 2001 %
|
||
% %
|
||
% %
|
||
% Copyright 1999-2013 ImageMagick Studio LLC, a non-profit organization %
|
||
% dedicated to making software imaging solutions freely available. %
|
||
% %
|
||
% You may not use this file except in compliance with the License. You may %
|
||
% obtain a copy of the License at %
|
||
% %
|
||
% http://www.imagemagick.org/script/license.php %
|
||
% %
|
||
% Unless required by applicable law or agreed to in writing, software %
|
||
% distributed under the License is distributed on an "AS IS" BASIS, %
|
||
% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. %
|
||
% See the License for the specific language governing permissions and %
|
||
% limitations under the License. %
|
||
% %
|
||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||
%
|
||
% The conjure program gives you the ability to perform custom image processing
|
||
% tasks from a script written in the Magick Scripting Language (MSL). MSL is
|
||
% XML-based and consists of action statements with attributes. Actions include
|
||
% reading an image, processing an image, getting attributes from an image,
|
||
% writing an image, and more. An attribute is a key/value pair that modifies
|
||
% the behavior of an action.
|
||
%
|
||
*/
|
||
|
||
/*
|
||
Include declarations.
|
||
*/
|
||
#include "wand/studio.h"
|
||
#include "wand/MagickWand.h"
|
||
#include "wand/mogrify-private.h"
|
||
|
||
/*
|
||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||
% %
|
||
% %
|
||
% %
|
||
+ C o n j u r e I m a g e C o m m a n d %
|
||
% %
|
||
% %
|
||
% %
|
||
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||
%
|
||
% ConjureImageCommand() describes the format and characteristics of one or
|
||
% more image files. It will also report if an image is incomplete or corrupt.
|
||
% The information displayed includes the scene number, the file name, the
|
||
% width and height of the image, whether the image is colormapped or not,
|
||
% the number of colors in the image, the number of bytes in the image, the
|
||
% format of the image (JPEG, PNM, etc.), and finally the number of seconds
|
||
% it took to read and process the image.
|
||
%
|
||
% The format of the ConjureImageCommand method is:
|
||
%
|
||
% MagickBooleanType ConjureImageCommand(ImageInfo *image_info,int argc,
|
||
% char **argv,char **metadata,ExceptionInfo *exception)
|
||
%
|
||
% A description of each parameter follows:
|
||
%
|
||
% o image_info: the image info.
|
||
%
|
||
% o argc: the number of elements in the argument vector.
|
||
%
|
||
% o argv: A text array containing the command line arguments.
|
||
%
|
||
% o metadata: any metadata is returned here.
|
||
%
|
||
% o exception: return any errors or warnings in this structure.
|
||
%
|
||
*/
|
||
|
||
static MagickBooleanType ConjureUsage(void)
|
||
{
|
||
const char
|
||
**p;
|
||
|
||
static const char
|
||
*miscellaneous[]=
|
||
{
|
||
"-debug events display copious debugging information",
|
||
"-help print program options",
|
||
"-list type print a list of supported option arguments",
|
||
"-log format format of debugging information",
|
||
"-version print version information",
|
||
(char *) NULL
|
||
},
|
||
*settings[]=
|
||
{
|
||
"-monitor monitor progress",
|
||
"-quiet suppress all warning messages",
|
||
"-regard-warnings pay attention to warning messages",
|
||
"-seed value seed a new sequence of pseudo-random numbers",
|
||
"-verbose print detailed information about the image",
|
||
(char *) NULL
|
||
};
|
||
|
||
ListMagickVersion(stdout);
|
||
(void) printf("Usage: %s [options ...] file [ [options ...] file ...]\n",
|
||
GetClientName());
|
||
(void) printf("\nImage Settings:\n");
|
||
for (p=settings; *p != (char *) NULL; p++)
|
||
(void) printf(" %s\n",*p);
|
||
(void) printf("\nMiscellaneous Options:\n");
|
||
for (p=miscellaneous; *p != (char *) NULL; p++)
|
||
(void) printf(" %s\n",*p);
|
||
(void) printf("\nIn addition, define any key value pairs required by "
|
||
"your script. For\nexample,\n\n");
|
||
(void) printf(" conjure -size 100x100 -color blue -foo bar script.msl\n");
|
||
return(MagickFalse);
|
||
}
|
||
|
||
WandExport MagickBooleanType ConjureImageCommand(ImageInfo *image_info,
|
||
int argc,char **argv,char **wand_unused(metadata),ExceptionInfo *exception)
|
||
{
|
||
#define DestroyConjure() \
|
||
{ \
|
||
image=DestroyImageList(image); \
|
||
for (i=0; i < (ssize_t) argc; i++) \
|
||
argv[i]=DestroyString(argv[i]); \
|
||
argv=(char **) RelinquishMagickMemory(argv); \
|
||
}
|
||
#define ThrowConjureException(asperity,tag,option) \
|
||
{ \
|
||
(void) ThrowMagickException(exception,GetMagickModule(),asperity,tag,"`%s'", \
|
||
option); \
|
||
DestroyConjure(); \
|
||
return(MagickFalse); \
|
||
}
|
||
#define ThrowConjureInvalidArgumentException(option,argument) \
|
||
{ \
|
||
(void) ThrowMagickException(exception,GetMagickModule(),OptionError, \
|
||
"InvalidArgument","`%s': %s",option,argument); \
|
||
DestroyConjure(); \
|
||
return(MagickFalse); \
|
||
}
|
||
|
||
char
|
||
*option;
|
||
|
||
Image
|
||
*image;
|
||
|
||
MagickStatusType
|
||
status;
|
||
|
||
register ssize_t
|
||
i;
|
||
|
||
ssize_t
|
||
number_images;
|
||
|
||
/*
|
||
Set defaults.
|
||
*/
|
||
assert(image_info != (ImageInfo *) NULL);
|
||
assert(image_info->signature == MagickSignature);
|
||
if (image_info->debug != MagickFalse)
|
||
(void) LogMagickEvent(TraceEvent,GetMagickModule(),"...");
|
||
assert(exception != (ExceptionInfo *) NULL);
|
||
if (argc < 2)
|
||
return(ConjureUsage());
|
||
image=NewImageList();
|
||
number_images=0;
|
||
option=(char *) NULL;
|
||
/*
|
||
Conjure an image.
|
||
*/
|
||
ReadCommandlLine(argc,&argv);
|
||
status=ExpandFilenames(&argc,&argv);
|
||
if (status == MagickFalse)
|
||
ThrowConjureException(ResourceLimitError,"MemoryAllocationFailed",
|
||
GetExceptionMessage(errno));
|
||
for (i=1; i < (ssize_t) argc; i++)
|
||
{
|
||
option=argv[i];
|
||
if (IsCommandOption(option) != MagickFalse)
|
||
{
|
||
if (LocaleCompare("concurrent",option+1) == 0)
|
||
break;
|
||
if (LocaleCompare("debug",option+1) == 0)
|
||
{
|
||
ssize_t
|
||
event;
|
||
|
||
if (*option == '+')
|
||
break;
|
||
i++;
|
||
if (i == (ssize_t) argc)
|
||
ThrowConjureException(OptionError,"MissingArgument",option);
|
||
event=ParseCommandOption(MagickLogEventOptions,MagickFalse,argv[i]);
|
||
if (event < 0)
|
||
ThrowConjureException(OptionError,"UnrecognizedEventType",
|
||
argv[i]);
|
||
(void) SetLogEventMask(argv[i]);
|
||
continue;
|
||
}
|
||
if (LocaleCompare("duration",option+1) == 0)
|
||
{
|
||
if (*option == '+')
|
||
break;
|
||
i++;
|
||
if (i == (ssize_t) (argc-1))
|
||
ThrowConjureException(OptionError,"MissingArgument",option);
|
||
if (IsGeometry(argv[i]) == MagickFalse)
|
||
ThrowConjureInvalidArgumentException(option,argv[i]);
|
||
continue;
|
||
}
|
||
if ((LocaleCompare("help",option+1) == 0) ||
|
||
(LocaleCompare("-help",option+1) == 0))
|
||
{
|
||
if (*option == '-')
|
||
return(ConjureUsage());
|
||
continue;
|
||
}
|
||
if (LocaleCompare("log",option+1) == 0)
|
||
{
|
||
if (*option == '-')
|
||
{
|
||
i++;
|
||
if (i == (ssize_t) argc)
|
||
ThrowConjureException(OptionError,"MissingLogFormat",option);
|
||
(void) SetLogFormat(argv[i]);
|
||
}
|
||
continue;
|
||
}
|
||
if (LocaleCompare("monitor",option+1) == 0)
|
||
continue;
|
||
if (LocaleCompare("quiet",option+1) == 0)
|
||
continue;
|
||
if (LocaleCompare("regard-warnings",option+1) == 0)
|
||
break;
|
||
if (LocaleCompare("seed",option+1) == 0)
|
||
{
|
||
if (*option == '+')
|
||
break;
|
||
i++;
|
||
if (i == (ssize_t) (argc-1))
|
||
ThrowConjureException(OptionError,"MissingArgument",option);
|
||
if (IsGeometry(argv[i]) == MagickFalse)
|
||
ThrowConjureInvalidArgumentException(option,argv[i]);
|
||
break;
|
||
}
|
||
if (LocaleCompare("verbose",option+1) == 0)
|
||
{
|
||
image_info->verbose=(*option == '-') ? MagickTrue : MagickFalse;
|
||
continue;
|
||
}
|
||
if ((LocaleCompare("version",option+1) == 0) ||
|
||
(LocaleCompare("-version",option+1) == 0))
|
||
{
|
||
ListMagickVersion(stdout);
|
||
return(MagickFalse);
|
||
}
|
||
/*
|
||
Persist key/value pair.
|
||
*/
|
||
(void) DeleteImageOption(image_info,option+1);
|
||
status=SetImageOption(image_info,option+1,argv[i+1]);
|
||
if (status == MagickFalse)
|
||
ThrowConjureException(ImageError,"UnableToPersistKey",option);
|
||
i++;
|
||
continue;
|
||
}
|
||
/*
|
||
Interpret MSL script.
|
||
*/
|
||
(void) DeleteImageOption(image_info,"filename");
|
||
status=SetImageOption(image_info,"filename",argv[i]);
|
||
if (status == MagickFalse)
|
||
ThrowConjureException(ImageError,"UnableToPersistKey",argv[i]);
|
||
(void) FormatLocaleString(image_info->filename,MaxTextExtent,"msl:%s",
|
||
argv[i]);
|
||
(void) SetImageOption(image_info,"filename",argv[i]);
|
||
image=ReadImages(image_info,exception);
|
||
CatchException(exception);
|
||
if (image != (Image *) NULL)
|
||
image=DestroyImageList(image);
|
||
status=image != (Image *) NULL ? MagickTrue : MagickFalse;
|
||
number_images++;
|
||
}
|
||
if (i != (ssize_t) argc)
|
||
ThrowConjureException(OptionError,"MissingAnImageFilename",argv[i]);
|
||
if (number_images == 0)
|
||
ThrowConjureException(OptionError,"MissingAnImageFilename",argv[argc-1]);
|
||
if (image != (Image *) NULL)
|
||
image=DestroyImageList(image);
|
||
for (i=0; i < (ssize_t) argc; i++)
|
||
argv[i]=DestroyString(argv[i]);
|
||
argv=(char **) RelinquishMagickMemory(argv);
|
||
return(status != 0 ? MagickTrue : MagickFalse);
|
||
}
|