granicus.if.org Git - imagemagick/blob - MagickWand/wandcli.c

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %                W     W  AA  N   N DDD   CCC L    III                        %
   7 %                W     W A  A NN  N D  D C    L     I                         %
   8 %                W  W  W AAAA N N N D  D C    L     I                         %
   9 %                 W W W  A  A N  NN D  D C    L     I                         %
  10 %                  W W   A  A N   N DDD   CCC LLLL III                        %
  11 %                                                                             %
  12 %                         WandCLI Structure Methods                           %
  13 %                                                                             %
  14 %                              Dragon Computing                               %
  15 %                              Anthony Thyssen                                %
  16 %                                 April 2011                                  %
  17 %                                                                             %
  18 %  Copyright 1999-2016 ImageMagick Studio LLC, a non-profit organization      %
  19 %  dedicated to making software imaging solutions freely available.           %
  20 %                                                                             %
  21 %  You may not use this file except in compliance with the License.  You may  %
  22 %  obtain a copy of the License at                                            %
  23 %                                                                             %
  24 %    http://www.imagemagick.org/script/license.php                            %
  25 %                                                                             %
  26 %  Unless required by applicable law or agreed to in writing, software        %
  27 %  distributed under the License is distributed on an "AS IS" BASIS,          %
  28 %  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   %
  29 %  See the License for the specific language governing permissions and        %
  30 %  limitations under the License.                                             %
  31 %                                                                             %
  32 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  33 %
  34 % General methds for handling the WandCLI structure used for Command Line.
  35 %
  36 % Anthony Thyssen, April 2011
  37 */
  38 \f
  39 /*
  40   Include declarations.
  41 */
  42 #include "MagickWand/studio.h"
  43 #include "MagickWand/MagickWand.h"
  44 #include "MagickWand/wand.h"
  45 #include "MagickWand/magick-wand-private.h"
  46 #include "MagickWand/wandcli.h"
  47 #include "MagickWand/wandcli-private.h"
  48 #include "MagickCore/exception.h"
  49 \f
  50 /*
  51 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  52 %                                                                             %
  53 %                                                                             %
  54 %                                                                             %
  55 +   A c q u i r e W a n d C L I                                               %
  56 %                                                                             %
  57 %                                                                             %
  58 %                                                                             %
  59 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  60 %
  61 %  AcquireMagickCLI() creates a new CLI wand (an expanded form of Magick
  62 %  Wand). The given image_info and exception is included as is if provided.
  63 %
  64 %  Use DestroyMagickCLI() to dispose of the CLI wand when it is no longer
  65 %  needed.
  66 %
  67 %  The format of the NewMagickWand method is:
  68 %
  69 %      MagickCLI *AcquireMagickCLI(ImageInfo *image_info,
  70 %           ExceptionInfo *exception)
  71 %
  72 */
  73 WandExport MagickCLI *AcquireMagickCLI(ImageInfo *image_info,
  74     ExceptionInfo *exception)
  75 {
  76   MagickCLI
  77     *cli_wand;
  78
  79   /* precaution - as per NewMagickWand() */
  80   {
  81      size_t depth = MAGICKCORE_QUANTUM_DEPTH;
  82      const char *quantum = GetMagickQuantumDepth(&depth);
  83      if (depth != MAGICKCORE_QUANTUM_DEPTH)
  84        ThrowWandFatalException(WandError,"QuantumDepthMismatch",quantum);
  85   }
  86
  87   /* allocate memory for MgaickCLI */
  88   cli_wand=(MagickCLI *) AcquireMagickMemory(sizeof(*cli_wand));
  89   if (cli_wand == (MagickCLI *) NULL)
  90     ThrowWandFatalException(ResourceLimitFatalError,"MemoryAllocationFailed",
  91       GetExceptionMessage(errno));
  92
  93   /* Initialize Wand Part of MagickCLI
  94      FUTURE: this is a repeat of code from NewMagickWand()
  95      However some parts may be given fro man external source!
  96   */
  97   cli_wand->wand.id=AcquireWandId();
  98   (void) FormatLocaleString(cli_wand->wand.name,MagickPathExtent,
  99            "%s-%.20g","MagickWandCLI", (double) cli_wand->wand.id);
 100   cli_wand->wand.images=NewImageList();
 101   if ( image_info == (ImageInfo *) NULL)
 102     cli_wand->wand.image_info=AcquireImageInfo();
 103   else
 104     cli_wand->wand.image_info=image_info;
 105   if ( exception == (ExceptionInfo *) NULL)
 106     cli_wand->wand.exception=AcquireExceptionInfo();
 107   else
 108     cli_wand->wand.exception=exception;
 109   cli_wand->wand.debug=IsEventLogging();
 110   cli_wand->wand.signature=MagickWandSignature;
 111
 112   /* Initialize CLI Part of MagickCLI */
 113   cli_wand->draw_info=CloneDrawInfo(cli_wand->wand.image_info,(DrawInfo *) NULL);
 114   cli_wand->quantize_info=AcquireQuantizeInfo(cli_wand->wand.image_info);
 115   cli_wand->process_flags=MagickCommandOptionFlags;  /* assume "magick" CLI */
 116   cli_wand->command=(const OptionInfo *) NULL;     /* no option at this time */
 117   cli_wand->image_list_stack=(Stack *) NULL;
 118   cli_wand->image_info_stack=(Stack *) NULL;
 119
 120   /* default exception location...
 121      EG: sprintf(locaiton, filename, line, column);
 122   */
 123   cli_wand->location="from \"%s\"";   /* location format using arguments: */
 124                                       /*      filename, line, column */
 125   cli_wand->filename="unknown";       /* script filename, unknown source */
 126   cli_wand->line=0;                   /* line from script OR CLI argument */
 127   cli_wand->column=0;                 /* column from script */
 128
 129   cli_wand->signature=MagickWandSignature;
 130   if (cli_wand->wand.debug != MagickFalse)
 131     (void) LogMagickEvent(WandEvent,GetMagickModule(),"%s",cli_wand->wand.name);
 132   return(cli_wand);
 133 }
 134 \f
 135 /*
 136 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 137 %                                                                             %
 138 %                                                                             %
 139 %                                                                             %
 140 +   D e s t r o y W a n d C L I                                               %
 141 %                                                                             %
 142 %                                                                             %
 143 %                                                                             %
 144 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 145 %
 146 %  DestroyMagickCLI() destorys everything in a CLI wand, including image_info
 147 %  and any exceptions, if still present in the wand.
 148 %
 149 %  The format of the NewMagickWand method is:
 150 %
 151 %    MagickWand *DestroyMagickCLI()
 152 %            Exception *exception)
 153 %
 154 */
 155 WandExport MagickCLI *DestroyMagickCLI(MagickCLI *cli_wand)
 156 {
 157   Stack
 158     *node;
 159
 160   assert(cli_wand != (MagickCLI *) NULL);
 161   assert(cli_wand->signature == MagickWandSignature);
 162   assert(cli_wand->wand.signature == MagickWandSignature);
 163   if (cli_wand->wand.debug != MagickFalse)
 164     (void) LogMagickEvent(WandEvent,GetMagickModule(),"%s",cli_wand->wand.name);
 165
 166   /* Destroy CLI part of MagickCLI */
 167   if (cli_wand->draw_info != (DrawInfo *) NULL )
 168     cli_wand->draw_info=DestroyDrawInfo(cli_wand->draw_info);
 169   if (cli_wand->quantize_info != (QuantizeInfo *) NULL )
 170     cli_wand->quantize_info=DestroyQuantizeInfo(cli_wand->quantize_info);
 171   while(cli_wand->image_list_stack != (Stack *) NULL)
 172     {
 173       node=cli_wand->image_list_stack;
 174       cli_wand->image_list_stack=node->next;
 175       (void) DestroyImageList((Image *)node->data);
 176       (void) RelinquishMagickMemory(node);
 177     }
 178   while(cli_wand->image_info_stack != (Stack *) NULL)
 179     {
 180       node=cli_wand->image_info_stack;
 181       cli_wand->image_info_stack=node->next;
 182       (void) DestroyImageInfo((ImageInfo *)node->data);
 183       (void) RelinquishMagickMemory(node);
 184     }
 185   cli_wand->signature=(~MagickWandSignature);
 186
 187   /* Destroy Wand part MagickCLI */
 188   cli_wand->wand.images=DestroyImageList(cli_wand->wand.images);
 189   if (cli_wand->wand.image_info != (ImageInfo *) NULL )
 190     cli_wand->wand.image_info=DestroyImageInfo(cli_wand->wand.image_info);
 191   if (cli_wand->wand.exception != (ExceptionInfo *) NULL )
 192     cli_wand->wand.exception=DestroyExceptionInfo(cli_wand->wand.exception);
 193   RelinquishWandId(cli_wand->wand.id);
 194   cli_wand->wand.signature=(~MagickWandSignature);
 195   cli_wand=(MagickCLI *) RelinquishMagickMemory(cli_wand);
 196   return((MagickCLI *) NULL);
 197 }
 198 \f
 199 /*
 200 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 201 %                                                                             %
 202 %                                                                             %
 203 %                                                                             %
 204 +   C L I C a t c h E x c e p t i o n                                         %
 205 %                                                                             %
 206 %                                                                             %
 207 %                                                                             %
 208 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 209 %
 210 %  CLICatchException() will report exceptions, either just non-fatal warnings
 211 %  only, or all errors, according to 'all_execeptions' boolean argument.
 212 %
 213 %  The function returns true if errors are fatal, in which case the caller
 214 %  should abort and re-call with an 'all_exceptions' argument of true before
 215 %  quitting.
 216 %
 217 %  The cut-off level between fatal and non-fatal may be controlled by options
 218 %  (FUTURE), but defaults to 'Error' exceptions.
 219 %
 220 %  The format of the CLICatchException method is:
 221 %
 222 %    MagickBooleanType CLICatchException(MagickCLI *cli_wand,
 223 %              const MagickBooleanType all_exceptions );
 224 %
 225 %  Arguments are
 226 %
 227 %    o cli_wand:   The Wand CLI that holds the exception Information
 228 %
 229 %    o all_exceptions:   Report all exceptions, including the fatal one
 230 %
 231 */
 232 WandExport MagickBooleanType CLICatchException(MagickCLI *cli_wand,
 233   const MagickBooleanType all_exceptions)
 234 {
 235   MagickBooleanType
 236     status;
 237
 238   assert(cli_wand != (MagickCLI *) NULL);
 239   assert(cli_wand->signature == MagickWandSignature);
 240   assert(cli_wand->wand.signature == MagickWandSignature);
 241   if (cli_wand->wand.debug != MagickFalse)
 242     (void) LogMagickEvent(WandEvent,GetMagickModule(),"%s",cli_wand->wand.name);
 243
 244   // FUTURE: '-regard_warning' should make this more sensitive.
 245   // Note pipelined options may like more control over this level
 246
 247   status=cli_wand->wand.exception->severity > ErrorException ? MagickTrue :
 248     MagickFalse;
 249
 250   if ((status == MagickFalse) || (all_exceptions != MagickFalse))
 251     CatchException(cli_wand->wand.exception); /* output and clear exceptions */
 252
 253   return(status);
 254 }
 255 \f
 256 /*
 257 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 258 %                                                                             %
 259 %                                                                             %
 260 %                                                                             %
 261 +   C L I L o g E v e n t                                                     %
 262 %                                                                             %
 263 %                                                                             %
 264 %                                                                             %
 265 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 266 %
 267 % CLILogEvent() is a wrapper around LogMagickEvent(), adding to it the
 268 % location of the option that is (about) to be executed.
 269 %
 270 */
 271 WandExport MagickBooleanType CLILogEvent(MagickCLI *cli_wand,
 272      const LogEventType type,const char *module,const char *function,
 273      const size_t line,const char *format,...)
 274 {
 275   char
 276     new_format[MagickPathExtent];
 277
 278   MagickBooleanType
 279     status;
 280
 281   va_list
 282     operands;
 283
 284   /* HACK - prepend the CLI location to format string.
 285      The better way would be add more arguments to to the 'va' oparands
 286      list, but that does not appear to be possible! So we do some
 287      pre-formating of the location info here.
 288   */
 289   (void) FormatLocaleString(new_format,MagickPathExtent,cli_wand->location,
 290        cli_wand->filename, cli_wand->line, cli_wand->column);
 291   (void) ConcatenateMagickString(new_format," ",MagickPathExtent);
 292   (void) ConcatenateMagickString(new_format,format,MagickPathExtent);
 293
 294   va_start(operands,format);
 295   status=LogMagickEventList(type,module,function,line,new_format,operands);
 296   va_end(operands);
 297
 298   return(status);
 299 }
 300 \f
 301 /*
 302 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 303 %                                                                             %
 304 %                                                                             %
 305 %                                                                             %
 306 +   C L I T h r o w E x c e p t i o n                                         %
 307 %                                                                             %
 308 %                                                                             %
 309 %                                                                             %
 310 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 311 %
 312 % CLIThrowException() is a wrapper around ThrowMagickException(), adding to
 313 % it the location of the option that caused the exception to occur.
 314 */
 315 WandExport MagickBooleanType CLIThrowException(MagickCLI *cli_wand,
 316   const char *module,const char *function,const size_t line,
 317   const ExceptionType severity,const char *tag,const char *format,...)
 318 {
 319   char
 320     new_format[MagickPathExtent];
 321
 322   size_t
 323     len;
 324
 325   MagickBooleanType
 326     status;
 327
 328   va_list
 329     operands;
 330
 331   /* HACK - append location to format string.
 332      The better way would be add more arguments to to the 'va' oparands
 333      list, but that does not appear to be possible! So we do some
 334      pre-formating of the location info here.
 335   */
 336   (void) CopyMagickString(new_format,format,MagickPathExtent);
 337   (void) ConcatenateMagickString(new_format," ",MagickPathExtent);
 338
 339   len=strlen(new_format);
 340   (void) FormatLocaleString(new_format+len,MagickPathExtent-len,
 341     cli_wand->location,cli_wand->filename,cli_wand->line,cli_wand->column);
 342
 343   va_start(operands,format);
 344   status=ThrowMagickExceptionList(cli_wand->wand.exception,module,function,
 345     line,severity,tag,new_format,operands);
 346   va_end(operands);
 347   return(status);
 348 }