forked from openkylin/imagemagick
127 lines
5.1 KiB
C
127 lines
5.1 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 %
|
|||
|
|
% Cristy %
|
|||
|
|
% December 2001 %
|
|||
|
|
% %
|
|||
|
|
% %
|
|||
|
|
% Copyright 1999-2021 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 %
|
|||
|
|
% %
|
|||
|
|
% https://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. %
|
|||
|
|
% %
|
|||
|
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
|||
|
|
%
|
|||
|
|
% Conjure interprets and executes scripts in the Magick Scripting Language
|
|||
|
|
% (MSL). The Magick scripting language (MSL) will primarily benefit those
|
|||
|
|
% that want to accomplish custom image processing tasks but do not wish
|
|||
|
|
% to program, or those that do not have access to a Perl interpreter or a
|
|||
|
|
% compiler. The interpreter is called conjure and here is an example script:
|
|||
|
|
%
|
|||
|
|
% <?xml version="1.0" encoding="UTF-8"?>
|
|||
|
|
% <image size="400x400" >
|
|||
|
|
% <read filename="image.gif" />
|
|||
|
|
% <get width="base-width" height="base-height" />
|
|||
|
|
% <resize geometry="%[dimensions]" />
|
|||
|
|
% <get width="width" height="height" />
|
|||
|
|
% <print output="Image sized from %[base-width]x%[base-height]
|
|||
|
|
% to %[width]x%[height].\n" />
|
|||
|
|
% <write filename="image.png" />
|
|||
|
|
% </image>
|
|||
|
|
%
|
|||
|
|
%
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
Include declarations.
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
Include declarations.
|
|||
|
|
*/
|
|||
|
|
#include "wand/studio.h"
|
|||
|
|
#include "wand/MagickWand.h"
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
|||
|
|
% %
|
|||
|
|
% %
|
|||
|
|
% %
|
|||
|
|
% M a i n %
|
|||
|
|
% %
|
|||
|
|
% %
|
|||
|
|
% %
|
|||
|
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
|||
|
|
%
|
|||
|
|
%
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
static int ConjureMain(int argc,char **argv)
|
|||
|
|
{
|
|||
|
|
ExceptionInfo
|
|||
|
|
*exception;
|
|||
|
|
|
|||
|
|
ImageInfo
|
|||
|
|
*image_info;
|
|||
|
|
|
|||
|
|
MagickBooleanType
|
|||
|
|
status;
|
|||
|
|
|
|||
|
|
MagickCoreGenesis(*argv,MagickTrue);
|
|||
|
|
exception=AcquireExceptionInfo();
|
|||
|
|
image_info=AcquireImageInfo();
|
|||
|
|
status=MagickCommandGenesis(image_info,ConjureImageCommand,argc,argv,
|
|||
|
|
(char **) NULL,exception);
|
|||
|
|
image_info=DestroyImageInfo(image_info);
|
|||
|
|
exception=DestroyExceptionInfo(exception);
|
|||
|
|
MagickCoreTerminus();
|
|||
|
|
return(status != MagickFalse ? 0 : 1);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
#if !defined(MAGICKCORE_WINDOWS_SUPPORT) || defined(__CYGWIN__) || defined(__MINGW32__)
|
|||
|
|
int main(int argc,char **argv)
|
|||
|
|
{
|
|||
|
|
return(ConjureMain(argc,argv));
|
|||
|
|
}
|
|||
|
|
#else
|
|||
|
|
int wmain(int argc,wchar_t *argv[])
|
|||
|
|
{
|
|||
|
|
char
|
|||
|
|
**utf8;
|
|||
|
|
|
|||
|
|
int
|
|||
|
|
status;
|
|||
|
|
|
|||
|
|
int
|
|||
|
|
i;
|
|||
|
|
|
|||
|
|
utf8=NTArgvToUTF8(argc,argv);
|
|||
|
|
status=ConjureMain(argc,utf8);
|
|||
|
|
for (i=0; i < argc; i++)
|
|||
|
|
utf8[i]=DestroyString(utf8[i]);
|
|||
|
|
utf8=(char **) RelinquishMagickMemory(utf8);
|
|||
|
|
return(status);
|
|||
|
|
}
|
|||
|
|
#endif
|