granicus.if.org Git - imagemagick/blob - MagickCore/log.c

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %                             L       OOO    GGGG                             %
   7 %                             L      O   O  G                                 %
   8 %                             L      O   O  G GG                              %
   9 %                             L      O   O  G   G                             %
  10 %                             LLLLL   OOO    GGG                              %
  11 %                                                                             %
  12 %                                                                             %
  13 %                             MagickCore Log Events                           %
  14 %                                                                             %
  15 %                               Software Design                               %
  16 %                                 John Cristy                                 %
  17 %                                September 2002                               %
  18 %                                                                             %
  19 %                                                                             %
  20 %  Copyright 1999-2011 ImageMagick Studio LLC, a non-profit organization      %
  21 %  dedicated to making software imaging solutions freely available.           %
  22 %                                                                             %
  23 %  You may not use this file except in compliance with the License.  You may  %
  24 %  obtain a copy of the License at                                            %
  25 %                                                                             %
  26 %    http://www.imagemagick.org/script/license.php                            %
  27 %                                                                             %
  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.                                             %
  33 %                                                                             %
  34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  35 %
  36 %
  37 */
  38 \f
  39 /*
  40   Include declarations.
  41 */
  42 #include "MagickCore/studio.h"
  43 #include "MagickCore/blob.h"
  44 #include "MagickCore/client.h"
  45 #include "MagickCore/configure.h"
  46 #include "MagickCore/configure-private.h"
  47 #include "MagickCore/exception.h"
  48 #include "MagickCore/exception-private.h"
  49 #include "MagickCore/hashmap.h"
  50 #include "MagickCore/log.h"
  51 #include "MagickCore/log-private.h"
  52 #include "MagickCore/memory_.h"
  53 #include "MagickCore/option.h"
  54 #include "MagickCore/semaphore.h"
  55 #include "MagickCore/timer.h"
  56 #include "MagickCore/string_.h"
  57 #include "MagickCore/string-private.h"
  58 #include "MagickCore/token.h"
  59 #include "MagickCore/thread_.h"
  60 #include "MagickCore/thread-private.h"
  61 #include "MagickCore/utility.h"
  62 #include "MagickCore/utility-private.h"
  63 #include "MagickCore/version.h"
  64 #include "MagickCore/xml-tree.h"
  65 \f
  66 /*
  67   Define declarations.
  68 */
  69 #define LogFilename  "log.xml"
  70 \f
  71 /*
  72   Typedef declarations.
  73 */
  74 typedef enum
  75 {
  76   UndefinedHandler = 0x0000,
  77   NoHandler = 0x0000,
  78   ConsoleHandler = 0x0001,
  79   StdoutHandler = 0x0002,
  80   StderrHandler = 0x0004,
  81   FileHandler = 0x0008,
  82   DebugHandler = 0x0010,
  83   EventHandler = 0x0020
  84 } LogHandlerType;
  85
  86 typedef struct _EventInfo
  87 {
  88   char
  89     *name;
  90
  91   LogEventType
  92     event;
  93 } EventInfo;
  94
  95 typedef struct _HandlerInfo
  96 {
  97   const char
  98     *name;
  99
 100   LogHandlerType
 101     handler;
 102 } HandlerInfo;
 103
 104 struct _LogInfo
 105 {
 106   LogEventType
 107     event_mask;
 108
 109   LogHandlerType
 110     handler_mask;
 111
 112   char
 113     *path,
 114     *name,
 115     *filename,
 116     *format;
 117
 118   size_t
 119     generations,
 120     limit;
 121
 122   FILE
 123     *file;
 124
 125   size_t
 126     generation;
 127
 128   MagickBooleanType
 129     append,
 130     exempt,
 131     stealth;
 132
 133   TimerInfo
 134     timer;
 135
 136   size_t
 137     signature;
 138 };
 139
 140 typedef struct _LogMapInfo
 141 {
 142   const LogEventType
 143     event_mask;
 144
 145   const LogHandlerType
 146     handler_mask;
 147
 148   const char
 149     *filename,
 150     *format;
 151 } LogMapInfo;
 152 \f
 153 /*
 154   Static declarations.
 155 */
 156 static const HandlerInfo
 157   LogHandlers[] =
 158   {
 159     { "console", ConsoleHandler },
 160     { "debug", DebugHandler },
 161     { "event", EventHandler },
 162     { "file", FileHandler },
 163     { "none", NoHandler },
 164     { "stderr", StderrHandler },
 165     { "stdout", StdoutHandler },
 166     { (char *) NULL, UndefinedHandler }
 167   };
 168
 169 static const LogMapInfo
 170   LogMap[] =
 171   {
 172     { NoEvents, ConsoleHandler, "Magick-%d.log",
 173       "%t %r %u %v %d %c[%p]: %m/%f/%l/%d\n  %e" }
 174   };
 175
 176 static char
 177   log_name[MaxTextExtent] = "Magick";
 178
 179 static LinkedListInfo
 180   *log_list = (LinkedListInfo *) NULL;
 181
 182 static SemaphoreInfo
 183   *log_semaphore = (SemaphoreInfo *) NULL;
 184
 185 static volatile MagickBooleanType
 186   instantiate_log = MagickFalse;
 187 \f
 188 /*
 189   Forward declarations.
 190 */
 191 static LogHandlerType
 192   ParseLogHandlers(const char *);
 193
 194 static LogInfo
 195   *GetLogInfo(const char *,ExceptionInfo *);
 196
 197 static MagickBooleanType
 198   InitializeLogList(ExceptionInfo *),
 199   LoadLogLists(const char *,ExceptionInfo *);
 200 \f
 201 /*
 202 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 203 %                                                                             %
 204 %                                                                             %
 205 %                                                                             %
 206 %   C l o s e M a g i c k L o g                                               %
 207 %                                                                             %
 208 %                                                                             %
 209 %                                                                             %
 210 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 211 %
 212 %  CloseMagickLog() closes the Magick log.
 213 %
 214 %  The format of the CloseMagickLog method is:
 215 %
 216 %      CloseMagickLog(void)
 217 %
 218 */
 219 MagickExport void CloseMagickLog(void)
 220 {
 221   ExceptionInfo
 222     *exception;
 223
 224   LogInfo
 225     *log_info;
 226
 227   if (IsEventLogging() == MagickFalse)
 228     return;
 229   exception=AcquireExceptionInfo();
 230   log_info=GetLogInfo("*",exception);
 231   exception=DestroyExceptionInfo(exception);
 232   LockSemaphoreInfo(log_semaphore);
 233   if (log_info->file != (FILE *) NULL)
 234     {
 235       if (log_info->append == MagickFalse)
 236         (void) FormatLocaleFile(log_info->file,"</log>\n");
 237       (void) fclose(log_info->file);
 238       log_info->file=(FILE *) NULL;
 239     }
 240   UnlockSemaphoreInfo(log_semaphore);
 241 }
 242 \f
 243 /*
 244 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 245 %                                                                             %
 246 %                                                                             %
 247 %                                                                             %
 248 +   G e t L o g I n f o                                                       %
 249 %                                                                             %
 250 %                                                                             %
 251 %                                                                             %
 252 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 253 %
 254 %  GetLogInfo() searches the log list for the specified name and if found
 255 %  returns attributes for that log.
 256 %
 257 %  The format of the GetLogInfo method is:
 258 %
 259 %      LogInfo *GetLogInfo(const char *name,ExceptionInfo *exception)
 260 %
 261 %  A description of each parameter follows:
 262 %
 263 %    o name: the log name.
 264 %
 265 %    o exception: return any errors or warnings in this structure.
 266 %
 267 */
 268 static LogInfo *GetLogInfo(const char *name,ExceptionInfo *exception)
 269 {
 270   register LogInfo
 271     *p;
 272
 273   assert(exception != (ExceptionInfo *) NULL);
 274   if ((log_list == (LinkedListInfo *) NULL) || (instantiate_log == MagickFalse))
 275     if (InitializeLogList(exception) == MagickFalse)
 276       return((LogInfo *) NULL);
 277   if ((log_list == (LinkedListInfo *) NULL) ||
 278       (IsLinkedListEmpty(log_list) != MagickFalse))
 279     return((LogInfo *) NULL);
 280   if ((name == (const char *) NULL) || (LocaleCompare(name,"*") == 0))
 281     return((LogInfo *) GetValueFromLinkedList(log_list,0));
 282   /*
 283     Search for log tag.
 284   */
 285   LockSemaphoreInfo(log_semaphore);
 286   ResetLinkedListIterator(log_list);
 287   p=(LogInfo *) GetNextValueInLinkedList(log_list);
 288   while (p != (LogInfo *) NULL)
 289   {
 290     if (LocaleCompare(name,p->name) == 0)
 291       break;
 292     p=(LogInfo *) GetNextValueInLinkedList(log_list);
 293   }
 294   if (p != (LogInfo *) NULL)
 295     (void) InsertValueInLinkedList(log_list,0,
 296       RemoveElementByValueFromLinkedList(log_list,p));
 297   UnlockSemaphoreInfo(log_semaphore);
 298   return(p);
 299 }
 300 \f
 301 /*
 302 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 303 %                                                                             %
 304 %                                                                             %
 305 %                                                                             %
 306 %   G e t L o g I n f o L i s t                                               %
 307 %                                                                             %
 308 %                                                                             %
 309 %                                                                             %
 310 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 311 %
 312 %  GetLogInfoList() returns any logs that match the specified pattern.
 313 %
 314 %  The format of the GetLogInfoList function is:
 315 %
 316 %      const LogInfo **GetLogInfoList(const char *pattern,
 317 %        size_t *number_preferences,ExceptionInfo *exception)
 318 %
 319 %  A description of each parameter follows:
 320 %
 321 %    o pattern: Specifies a pointer to a text string containing a pattern.
 322 %
 323 %    o number_preferences:  This integer returns the number of logs in the list.
 324 %
 325 %    o exception: return any errors or warnings in this structure.
 326 %
 327 */
 328 #if defined(__cplusplus) || defined(c_plusplus)
 329 extern "C" {
 330 #endif
 331
 332 static int LogInfoCompare(const void *x,const void *y)
 333 {
 334   const LogInfo
 335     **p,
 336     **q;
 337
 338   p=(const LogInfo **) x,
 339   q=(const LogInfo **) y;
 340   if (LocaleCompare((*p)->path,(*q)->path) == 0)
 341     return(LocaleCompare((*p)->name,(*q)->name));
 342   return(LocaleCompare((*p)->path,(*q)->path));
 343 }
 344
 345 #if defined(__cplusplus) || defined(c_plusplus)
 346 }
 347 #endif
 348
 349 MagickExport const LogInfo **GetLogInfoList(const char *pattern,
 350   size_t *number_preferences,ExceptionInfo *exception)
 351 {
 352   const LogInfo
 353     **preferences;
 354
 355   register const LogInfo
 356     *p;
 357
 358   register ssize_t
 359     i;
 360
 361   /*
 362     Allocate log list.
 363   */
 364   assert(pattern != (char *) NULL);
 365   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",pattern);
 366   assert(number_preferences != (size_t *) NULL);
 367   *number_preferences=0;
 368   p=GetLogInfo("*",exception);
 369   if (p == (const LogInfo *) NULL)
 370     return((const LogInfo **) NULL);
 371   preferences=(const LogInfo **) AcquireQuantumMemory((size_t)
 372     GetNumberOfElementsInLinkedList(log_list)+1UL,sizeof(*preferences));
 373   if (preferences == (const LogInfo **) NULL)
 374     return((const LogInfo **) NULL);
 375   /*
 376     Generate log list.
 377   */
 378   LockSemaphoreInfo(log_semaphore);
 379   ResetLinkedListIterator(log_list);
 380   p=(const LogInfo *) GetNextValueInLinkedList(log_list);
 381   for (i=0; p != (const LogInfo *) NULL; )
 382   {
 383     if ((p->stealth == MagickFalse) &&
 384         (GlobExpression(p->name,pattern,MagickFalse) != MagickFalse))
 385       preferences[i++]=p;
 386     p=(const LogInfo *) GetNextValueInLinkedList(log_list);
 387   }
 388   UnlockSemaphoreInfo(log_semaphore);
 389   qsort((void *) preferences,(size_t) i,sizeof(*preferences),LogInfoCompare);
 390   preferences[i]=(LogInfo *) NULL;
 391   *number_preferences=(size_t) i;
 392   return(preferences);
 393 }
 394 \f
 395 /*
 396 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 397 %                                                                             %
 398 %                                                                             %
 399 %                                                                             %
 400 %   G e t L o g L i s t                                                       %
 401 %                                                                             %
 402 %                                                                             %
 403 %                                                                             %
 404 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 405 %
 406 %  GetLogList() returns any logs that match the specified pattern.
 407 %
 408 %  The format of the GetLogList function is:
 409 %
 410 %      char **GetLogList(const char *pattern,size_t *number_preferences,
 411 %        ExceptionInfo *exception)
 412 %
 413 %  A description of each parameter follows:
 414 %
 415 %    o pattern: Specifies a pointer to a text string containing a pattern.
 416 %
 417 %    o number_preferences:  This integer returns the number of logs in the list.
 418 %
 419 %    o exception: return any errors or warnings in this structure.
 420 %
 421 */
 422
 423 #if defined(__cplusplus) || defined(c_plusplus)
 424 extern "C" {
 425 #endif
 426
 427 static int LogCompare(const void *x,const void *y)
 428 {
 429   register const char
 430     **p,
 431     **q;
 432
 433   p=(const char **) x;
 434   q=(const char **) y;
 435   return(LocaleCompare(*p,*q));
 436 }
 437
 438 #if defined(__cplusplus) || defined(c_plusplus)
 439 }
 440 #endif
 441
 442 MagickExport char **GetLogList(const char *pattern,
 443   size_t *number_preferences,ExceptionInfo *exception)
 444 {
 445   char
 446     **preferences;
 447
 448   register const LogInfo
 449     *p;
 450
 451   register ssize_t
 452     i;
 453
 454   /*
 455     Allocate log list.
 456   */
 457   assert(pattern != (char *) NULL);
 458   (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",pattern);
 459   assert(number_preferences != (size_t *) NULL);
 460   *number_preferences=0;
 461   p=GetLogInfo("*",exception);
 462   if (p == (const LogInfo *) NULL)
 463     return((char **) NULL);
 464   preferences=(char **) AcquireQuantumMemory((size_t)
 465     GetNumberOfElementsInLinkedList(log_list)+1UL,sizeof(*preferences));
 466   if (preferences == (char **) NULL)
 467     return((char **) NULL);
 468   /*
 469     Generate log list.
 470   */
 471   LockSemaphoreInfo(log_semaphore);
 472   ResetLinkedListIterator(log_list);
 473   p=(const LogInfo *) GetNextValueInLinkedList(log_list);
 474   for (i=0; p != (const LogInfo *) NULL; )
 475   {
 476     if ((p->stealth == MagickFalse) &&
 477         (GlobExpression(p->name,pattern,MagickFalse) != MagickFalse))
 478       preferences[i++]=ConstantString(p->name);
 479     p=(const LogInfo *) GetNextValueInLinkedList(log_list);
 480   }
 481   UnlockSemaphoreInfo(log_semaphore);
 482   qsort((void *) preferences,(size_t) i,sizeof(*preferences),LogCompare);
 483   preferences[i]=(char *) NULL;
 484   *number_preferences=(size_t) i;
 485   return(preferences);
 486 }
 487 \f
 488 /*
 489 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 490 %                                                                             %
 491 %                                                                             %
 492 %                                                                             %
 493 %   G e t L o g N a m e                                                       %
 494 %                                                                             %
 495 %                                                                             %
 496 %                                                                             %
 497 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 498 %
 499 %  GetLogName() returns the current log name.
 500 %
 501 %  The format of the GetLogName method is:
 502 %
 503 %      const char *GetLogName(void)
 504 %
 505 */
 506 MagickExport const char *GetLogName(void)
 507 {
 508   return(log_name);
 509 }
 510 \f
 511 /*
 512 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 513 %                                                                             %
 514 %                                                                             %
 515 %                                                                             %
 516 +   I n i t i a l i z e L o g L i s t                                         %
 517 %                                                                             %
 518 %                                                                             %
 519 %                                                                             %
 520 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 521 %
 522 %  InitializeLogList() initialize the log list.
 523 %
 524 %  The format of the InitializeLogList method is:
 525 %
 526 %      MagickBooleanType InitializeLogList(ExceptionInfo *exception)
 527 %
 528 %  A description of each parameter follows.
 529 %
 530 %    o exception: return any errors or warnings in this structure.
 531 %
 532 */
 533 static MagickBooleanType InitializeLogList(ExceptionInfo *exception)
 534 {
 535   if ((log_list == (LinkedListInfo *) NULL) && (instantiate_log == MagickFalse))
 536     {
 537       if (log_semaphore == (SemaphoreInfo *) NULL)
 538         AcquireSemaphoreInfo(&log_semaphore);
 539       LockSemaphoreInfo(log_semaphore);
 540       if ((log_list == (LinkedListInfo *) NULL) &&
 541           (instantiate_log == MagickFalse))
 542         {
 543           (void) LoadLogLists(LogFilename,exception);
 544           instantiate_log=MagickTrue;
 545         }
 546       UnlockSemaphoreInfo(log_semaphore);
 547     }
 548   return(log_list != (LinkedListInfo *) NULL ? MagickTrue : MagickFalse);
 549 }
 550 \f
 551 /*
 552 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 553 %                                                                             %
 554 %                                                                             %
 555 %                                                                             %
 556 %  I s E v e n t L o g g i n g                                                %
 557 %                                                                             %
 558 %                                                                             %
 559 %                                                                             %
 560 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 561 %
 562 %  IsEventLogging() returns MagickTrue if debug of events is enabled otherwise
 563 %  MagickFalse.
 564 %
 565 %  The format of the IsEventLogging method is:
 566 %
 567 %      MagickBooleanType IsEventLogging(void)
 568 %
 569 */
 570 MagickExport MagickBooleanType IsEventLogging(void)
 571 {
 572   const LogInfo
 573     *log_info;
 574
 575   ExceptionInfo
 576     *exception;
 577
 578   if ((log_list == (LinkedListInfo *) NULL) ||
 579       (IsLinkedListEmpty(log_list) != MagickFalse))
 580     return(MagickFalse);
 581   exception=AcquireExceptionInfo();
 582   log_info=GetLogInfo("*",exception);
 583   exception=DestroyExceptionInfo(exception);
 584   return(log_info->event_mask != NoEvents ? MagickTrue : MagickFalse);
 585 }
 586 /*
 587 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 588 %                                                                             %
 589 %                                                                             %
 590 %                                                                             %
 591 %  L i s t L o g I n f o                                                      %
 592 %                                                                             %
 593 %                                                                             %
 594 %                                                                             %
 595 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 596 %
 597 %  ListLogInfo() lists the log info to a file.
 598 %
 599 %  The format of the ListLogInfo method is:
 600 %
 601 %      MagickBooleanType ListLogInfo(FILE *file,ExceptionInfo *exception)
 602 %
 603 %  A description of each parameter follows.
 604 %
 605 %    o file:  An pointer to a FILE.
 606 %
 607 %    o exception: return any errors or warnings in this structure.
 608 %
 609 */
 610 MagickExport MagickBooleanType ListLogInfo(FILE *file,ExceptionInfo *exception)
 611 {
 612 #define MegabytesToBytes(value) ((MagickSizeType) (value)*1024*1024)
 613
 614   char
 615     limit[MaxTextExtent];
 616
 617   const char
 618     *path;
 619
 620   const LogInfo
 621     **log_info;
 622
 623   register ssize_t
 624     i;
 625
 626   size_t
 627     number_aliases;
 628
 629   ssize_t
 630     j;
 631
 632   if (file == (const FILE *) NULL)
 633     file=stdout;
 634   log_info=GetLogInfoList("*",&number_aliases,exception);
 635   if (log_info == (const LogInfo **) NULL)
 636     return(MagickFalse);
 637   j=0;
 638   path=(const char *) NULL;
 639   for (i=0; i < (ssize_t) number_aliases; i++)
 640   {
 641     if (log_info[i]->stealth != MagickFalse)
 642       continue;
 643     if ((path == (const char *) NULL) ||
 644         (LocaleCompare(path,log_info[i]->path) != 0))
 645       {
 646         if (log_info[i]->path != (char *) NULL)
 647           (void) FormatLocaleFile(file,"\nPath: %s\n\n",log_info[i]->path);
 648         (void) FormatLocaleFile(file,
 649           "Filename       Generations     Limit  Format\n");
 650         (void) FormatLocaleFile(file,
 651           "-------------------------------------------------"
 652           "------------------------------\n");
 653       }
 654     path=log_info[i]->path;
 655     if (log_info[i]->filename != (char *) NULL)
 656       {
 657         (void) FormatLocaleFile(file,"%s",log_info[i]->filename);
 658         for (j=(ssize_t) strlen(log_info[i]->filename); j <= 16; j++)
 659           (void) FormatLocaleFile(file," ");
 660       }
 661     (void) FormatLocaleFile(file,"%9g  ",(double) log_info[i]->generations);
 662     (void) FormatMagickSize(MegabytesToBytes(log_info[i]->limit),MagickFalse,
 663       limit);
 664     (void) FormatLocaleFile(file,"%8sB  ",limit);
 665     if (log_info[i]->format != (char *) NULL)
 666       (void) FormatLocaleFile(file,"%s",log_info[i]->format);
 667     (void) FormatLocaleFile(file,"\n");
 668   }
 669   (void) fflush(file);
 670   log_info=(const LogInfo **) RelinquishMagickMemory((void *) log_info);
 671   return(MagickTrue);
 672 }
 673 \f
 674 /*
 675 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 676 %                                                                             %
 677 %                                                                             %
 678 %                                                                             %
 679 +   L o g C o m p o n e n t G e n e s i s                                     %
 680 %                                                                             %
 681 %                                                                             %
 682 %                                                                             %
 683 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 684 %
 685 %  LogComponentGenesis() instantiates the log component.
 686 %
 687 %  The format of the LogComponentGenesis method is:
 688 %
 689 %      MagickBooleanType LogComponentGenesis(void)
 690 %
 691 */
 692 MagickPrivate MagickBooleanType LogComponentGenesis(void)
 693 {
 694   AcquireSemaphoreInfo(&log_semaphore);
 695   return(MagickTrue);
 696 }
 697 \f
 698 /*
 699 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 700 %                                                                             %
 701 %                                                                             %
 702 %                                                                             %
 703 +   L o g C o m p o n e n t T e r m i n u s                                   %
 704 %                                                                             %
 705 %                                                                             %
 706 %                                                                             %
 707 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 708 %
 709 %  LogComponentTerminus() destroys the logging component.
 710 %
 711 %  The format of the LogComponentTerminus method is:
 712 %
 713 %      LogComponentTerminus(void)
 714 %
 715 */
 716
 717 static void *DestroyLogElement(void *log_info)
 718 {
 719   register LogInfo
 720     *p;
 721
 722   p=(LogInfo *) log_info;
 723   if (p->file != (FILE *) NULL)
 724     {
 725       if (p->append == MagickFalse)
 726         (void) FormatLocaleFile(p->file,"</log>\n");
 727       (void) fclose(p->file);
 728       p->file=(FILE *) NULL;
 729     }
 730   if (p->exempt == MagickFalse)
 731     {
 732       if (p->format != (char *) NULL)
 733         p->format=DestroyString(p->format);
 734       if (p->path != (char *) NULL)
 735         p->path=DestroyString(p->path);
 736       if (p->filename != (char *) NULL)
 737         p->filename=DestroyString(p->filename);
 738     }
 739   p=(LogInfo *) RelinquishMagickMemory(p);
 740   return((void *) NULL);
 741 }
 742
 743 MagickPrivate void LogComponentTerminus(void)
 744 {
 745   if (log_semaphore == (SemaphoreInfo *) NULL)
 746     AcquireSemaphoreInfo(&log_semaphore);
 747   LockSemaphoreInfo(log_semaphore);
 748   if (log_list != (LinkedListInfo *) NULL)
 749     log_list=DestroyLinkedList(log_list,DestroyLogElement);
 750   instantiate_log=MagickFalse;
 751   UnlockSemaphoreInfo(log_semaphore);
 752   DestroySemaphoreInfo(&log_semaphore);
 753 }
 754 \f
 755 /*
 756 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 757 %                                                                             %
 758 %                                                                             %
 759 %                                                                             %
 760 %   L o g M a g i c k E v e n t                                               %
 761 %                                                                             %
 762 %                                                                             %
 763 %                                                                             %
 764 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 765 %
 766 %  LogMagickEvent() logs an event as determined by the log configuration file.
 767 %  If an error occurs, MagickFalse is returned otherwise MagickTrue.
 768 %
 769 %  The format of the LogMagickEvent method is:
 770 %
 771 %      MagickBooleanType LogMagickEvent(const LogEventType type,
 772 %        const char *module,const char *function,const size_t line,
 773 %        const char *format,...)
 774 %
 775 %  A description of each parameter follows:
 776 %
 777 %    o type: the event type.
 778 %
 779 %    o filename: the source module filename.
 780 %
 781 %    o function: the function name.
 782 %
 783 %    o line: the line number of the source module.
 784 %
 785 %    o format: the output format.
 786 %
 787 */
 788 static char *TranslateEvent(const LogEventType magick_unused(type),
 789   const char *module,const char *function,const size_t line,
 790   const char *domain,const char *event)
 791 {
 792   char
 793     *text;
 794
 795   double
 796     elapsed_time,
 797     user_time;
 798
 799   ExceptionInfo
 800     *exception;
 801
 802   LogInfo
 803     *log_info;
 804
 805   register char
 806     *q;
 807
 808   register const char
 809     *p;
 810
 811   size_t
 812     extent;
 813
 814   time_t
 815     seconds;
 816
 817   exception=AcquireExceptionInfo();
 818   log_info=(LogInfo *) GetLogInfo("*",exception);
 819   exception=DestroyExceptionInfo(exception);
 820   seconds=time((time_t *) NULL);
 821   elapsed_time=GetElapsedTime(&log_info->timer);
 822   user_time=GetUserTime(&log_info->timer);
 823   text=AcquireString(event);
 824   if (log_info->format == (char *) NULL)
 825     return(text);
 826   extent=strlen(event)+MaxTextExtent;
 827   if (LocaleCompare(log_info->format,"xml") == 0)
 828     {
 829       char
 830         timestamp[MaxTextExtent];
 831
 832       /*
 833         Translate event in "XML" format.
 834       */
 835       (void) FormatMagickTime(seconds,extent,timestamp);
 836       (void) FormatLocaleString(text,extent,
 837         "<entry>\n"
 838         "  <timestamp>%s</timestamp>\n"
 839         "  <elapsed-time>%lu:%02lu.%03lu</elapsed-time>\n"
 840         "  <user-time>%0.3f</user-time>\n"
 841         "  <process-id>%.20g</process-id>\n"
 842         "  <thread-id>%.20g</thread-id>\n"
 843         "  <module>%s</module>\n"
 844         "  <function>%s</function>\n"
 845         "  <line>%.20g</line>\n"
 846         "  <domain>%s</domain>\n"
 847         "  <event>%s</event>\n"
 848         "</entry>",timestamp,(unsigned long) (elapsed_time/60.0),
 849         (unsigned long) floor(fmod(elapsed_time,60.0)),(unsigned long)
 850         (1000.0*(elapsed_time-floor(elapsed_time))+0.5),user_time,
 851         (double) getpid(),(double) GetMagickThreadSignature(),module,function,
 852         (double) line,domain,event);
 853       return(text);
 854     }
 855   /*
 856     Translate event in "human readable" format.
 857   */
 858   q=text;
 859   for (p=log_info->format; *p != '\0'; p++)
 860   {
 861     *q='\0';
 862     if ((size_t) (q-text+MaxTextExtent) >= extent)
 863       {
 864         extent+=MaxTextExtent;
 865         text=(char *) ResizeQuantumMemory(text,extent+MaxTextExtent,
 866           sizeof(*text));
 867         if (text == (char *) NULL)
 868           return((char *) NULL);
 869         q=text+strlen(text);
 870       }
 871     /*
 872       The format of the log is defined by embedding special format characters:
 873
 874         %c   client name
 875         %d   domain
 876         %e   event
 877         %f   function
 878         %g   generation
 879         %l   line
 880         %m   module
 881         %n   log name
 882         %p   process id
 883         %r   real CPU time
 884         %t   wall clock time
 885         %u   user CPU time
 886         %v   version
 887         %%   percent sign
 888         \n   newline
 889         \r   carriage return
 890     */
 891     if ((*p == '\\') && (*(p+1) == 'r'))
 892       {
 893         *q++='\r';
 894         p++;
 895         continue;
 896       }
 897     if ((*p == '\\') && (*(p+1) == 'n'))
 898       {
 899         *q++='\n';
 900         p++;
 901         continue;
 902       }
 903     if (*p != '%')
 904       {
 905         *q++=(*p);
 906         continue;
 907       }
 908     p++;
 909     switch (*p)
 910     {
 911       case 'c':
 912       {
 913         q+=CopyMagickString(q,GetClientName(),extent);
 914         break;
 915       }
 916       case 'd':
 917       {
 918         q+=CopyMagickString(q,domain,extent);
 919         break;
 920       }
 921       case 'e':
 922       {
 923         q+=CopyMagickString(q,event,extent);
 924         break;
 925       }
 926       case 'f':
 927       {
 928         q+=CopyMagickString(q,function,extent);
 929         break;
 930       }
 931       case 'g':
 932       {
 933         if (log_info->generations == 0)
 934           {
 935             (void) CopyMagickString(q,"0",extent);
 936             q++;
 937             break;
 938           }
 939         q+=FormatLocaleString(q,extent,"%.20g",(double) (log_info->generation %
 940           log_info->generations));
 941         break;
 942       }
 943       case 'l':
 944       {
 945         q+=FormatLocaleString(q,extent,"%.20g",(double) line);
 946         break;
 947       }
 948       case 'm':
 949       {
 950         register const char
 951           *p;
 952
 953         for (p=module+strlen(module)-1; p > module; p--)
 954           if (*p == *DirectorySeparator)
 955             {
 956               p++;
 957               break;
 958             }
 959         q+=CopyMagickString(q,p,extent);
 960         break;
 961       }
 962       case 'n':
 963       {
 964         q+=CopyMagickString(q,GetLogName(),extent);
 965         break;
 966       }
 967       case 'p':
 968       {
 969         q+=FormatLocaleString(q,extent,"%.20g",(double) getpid());
 970         break;
 971       }
 972       case 'r':
 973       {
 974         q+=FormatLocaleString(q,extent,"%lu:%02lu.%03lu",(unsigned long)
 975           (elapsed_time/60.0),(unsigned long) floor(fmod(elapsed_time,60.0)),
 976           (unsigned long) (1000.0*(elapsed_time-floor(elapsed_time))+0.5));
 977         break;
 978       }
 979       case 't':
 980       {
 981         q+=FormatMagickTime(seconds,extent,q);
 982         break;
 983       }
 984       case 'u':
 985       {
 986         q+=FormatLocaleString(q,extent,"%0.3fu",user_time);
 987         break;
 988       }
 989       case 'v':
 990       {
 991         q+=CopyMagickString(q,MagickLibVersionText,extent);
 992         break;
 993       }
 994       case '%':
 995       {
 996         *q++=(*p);
 997         break;
 998       }
 999       default:
1000       {
1001         *q++='%';
1002         *q++=(*p);
1003         break;
1004       }
1005     }
1006   }
1007   *q='\0';
1008   return(text);
1009 }
1010
1011 static char *TranslateFilename(const LogInfo *log_info)
1012 {
1013   char
1014     *filename;
1015
1016   register char
1017     *q;
1018
1019   register const char
1020     *p;
1021
1022   size_t
1023     extent;
1024
1025   /*
1026     Translate event in "human readable" format.
1027   */
1028   assert(log_info != (LogInfo *) NULL);
1029   assert(log_info->filename != (char *) NULL);
1030   filename=AcquireString((char *) NULL);
1031   extent=MaxTextExtent;
1032   q=filename;
1033   for (p=log_info->filename; *p != '\0'; p++)
1034   {
1035     *q='\0';
1036     if ((size_t) (q-filename+MaxTextExtent) >= extent)
1037       {
1038         extent+=MaxTextExtent;
1039         filename=(char *) ResizeQuantumMemory(filename,extent+MaxTextExtent,
1040           sizeof(*filename));
1041         if (filename == (char *) NULL)
1042           return((char *) NULL);
1043         q=filename+strlen(filename);
1044       }
1045     /*
1046       The format of the filename is defined by embedding special format
1047       characters:
1048
1049         %c   client name
1050         %n   log name
1051         %p   process id
1052         %v   version
1053         %%   percent sign
1054     */
1055     if (*p != '%')
1056       {
1057         *q++=(*p);
1058         continue;
1059       }
1060     p++;
1061     switch (*p)
1062     {
1063       case 'c':
1064       {
1065         q+=CopyMagickString(q,GetClientName(),extent);
1066         break;
1067       }
1068       case 'g':
1069       {
1070         if (log_info->generations == 0)
1071           {
1072             (void) CopyMagickString(q,"0",extent);
1073             q++;
1074             break;
1075           }
1076         q+=FormatLocaleString(q,extent,"%.20g",(double) (log_info->generation %
1077           log_info->generations));
1078         break;
1079       }
1080       case 'n':
1081       {
1082         q+=CopyMagickString(q,GetLogName(),extent);
1083         break;
1084       }
1085       case 'p':
1086       {
1087         q+=FormatLocaleString(q,extent,"%.20g",(double) getpid());
1088         break;
1089       }
1090       case 'v':
1091       {
1092         q+=CopyMagickString(q,MagickLibVersionText,extent);
1093         break;
1094       }
1095       case '%':
1096       {
1097         *q++=(*p);
1098         break;
1099       }
1100       default:
1101       {
1102         *q++='%';
1103         *q++=(*p);
1104         break;
1105       }
1106     }
1107   }
1108   *q='\0';
1109   return(filename);
1110 }
1111
1112 MagickBooleanType LogMagickEventList(const LogEventType type,const char *module,
1113   const char *function,const size_t line,const char *format,
1114   va_list operands)
1115 {
1116   char
1117     event[MaxTextExtent],
1118     *text;
1119
1120   const char
1121     *domain;
1122
1123   ExceptionInfo
1124     *exception;
1125
1126   int
1127     n;
1128
1129   LogInfo
1130     *log_info;
1131
1132   if (IsEventLogging() == MagickFalse)
1133     return(MagickFalse);
1134   exception=AcquireExceptionInfo();
1135   log_info=(LogInfo *) GetLogInfo("*",exception);
1136   exception=DestroyExceptionInfo(exception);
1137   LockSemaphoreInfo(log_semaphore);
1138   if ((log_info->event_mask & type) == 0)
1139     {
1140       UnlockSemaphoreInfo(log_semaphore);
1141       return(MagickTrue);
1142     }
1143   domain=CommandOptionToMnemonic(MagickLogEventOptions,type);
1144 #if defined(MAGICKCORE_HAVE_VSNPRINTF)
1145   n=vsnprintf(event,MaxTextExtent,format,operands);
1146 #else
1147   n=vsprintf(event,format,operands);
1148 #endif
1149   if (n < 0)
1150     event[MaxTextExtent-1]='\0';
1151   text=TranslateEvent(type,module,function,line,domain,event);
1152   if (text == (char *) NULL)
1153     {
1154       (void) ContinueTimer((TimerInfo *) &log_info->timer);
1155       UnlockSemaphoreInfo(log_semaphore);
1156       return(MagickFalse);
1157     }
1158   if ((log_info->handler_mask & ConsoleHandler) != 0)
1159     {
1160       (void) FormatLocaleFile(stderr,"%s\n",text);
1161       (void) fflush(stderr);
1162     }
1163   if ((log_info->handler_mask & DebugHandler) != 0)
1164     {
1165 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
1166       OutputDebugString(text);
1167 #endif
1168     }
1169   if ((log_info->handler_mask & EventHandler) != 0)
1170     {
1171 #if defined(MAGICKCORE_WINDOWS_SUPPORT)
1172       (void) NTReportEvent(text,MagickFalse);
1173 #endif
1174     }
1175   if ((log_info->handler_mask & FileHandler) != 0)
1176     {
1177       struct stat
1178         file_info;
1179
1180       file_info.st_size=0;
1181       if (log_info->file != (FILE *) NULL)
1182         (void) fstat(fileno(log_info->file),&file_info);
1183       if (file_info.st_size > (ssize_t) (1024*1024*log_info->limit))
1184         {
1185           (void) FormatLocaleFile(log_info->file,"</log>\n");
1186           (void) fclose(log_info->file);
1187           log_info->file=(FILE *) NULL;
1188         }
1189       if (log_info->file == (FILE *) NULL)
1190         {
1191           char
1192             *filename;
1193
1194           filename=TranslateFilename(log_info);
1195           if (filename == (char *) NULL)
1196             {
1197               (void) ContinueTimer((TimerInfo *) &log_info->timer);
1198               UnlockSemaphoreInfo(log_semaphore);
1199               return(MagickFalse);
1200             }
1201           log_info->append=IsPathAccessible(filename);
1202           log_info->file=fopen_utf8(filename,"ab");
1203           filename=(char  *) RelinquishMagickMemory(filename);
1204           if (log_info->file == (FILE *) NULL)
1205             {
1206               UnlockSemaphoreInfo(log_semaphore);
1207               return(MagickFalse);
1208             }
1209           log_info->generation++;
1210           if (log_info->append == MagickFalse)
1211             {
1212               (void) FormatLocaleFile(log_info->file,"<?xml version=\"1.0\" "
1213                 "encoding=\"UTF-8\" standalone=\"yes\"?>\n");
1214               (void) FormatLocaleFile(log_info->file,"<log>\n");
1215             }
1216         }
1217       (void) FormatLocaleFile(log_info->file,"%s\n",text);
1218       (void) fflush(log_info->file);
1219     }
1220   if ((log_info->handler_mask & StdoutHandler) != 0)
1221     {
1222       (void) FormatLocaleFile(stdout,"%s\n",text);
1223       (void) fflush(stdout);
1224     }
1225   if ((log_info->handler_mask & StderrHandler) != 0)
1226     {
1227       (void) FormatLocaleFile(stderr,"%s\n",text);
1228       (void) fflush(stderr);
1229     }
1230   text=(char  *) RelinquishMagickMemory(text);
1231   (void) ContinueTimer((TimerInfo *) &log_info->timer);
1232   UnlockSemaphoreInfo(log_semaphore);
1233   return(MagickTrue);
1234 }
1235
1236 MagickBooleanType LogMagickEvent(const LogEventType type,const char *module,
1237   const char *function,const size_t line,const char *format,...)
1238 {
1239   va_list
1240     operands;
1241
1242   MagickBooleanType
1243     status;
1244
1245   va_start(operands,format);
1246   status=LogMagickEventList(type,module,function,line,format,operands);
1247   va_end(operands);
1248   return(status);
1249 }
1250 \f
1251 /*
1252 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1253 %                                                                             %
1254 %                                                                             %
1255 %                                                                             %
1256 +   L o a d L o g L i s t                                                     %
1257 %                                                                             %
1258 %                                                                             %
1259 %                                                                             %
1260 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1261 %
1262 %  LoadLogList() loads the log configuration file which provides a
1263 %  mapping between log attributes and log name.
1264 %
1265 %  The format of the LoadLogList method is:
1266 %
1267 %      MagickBooleanType LoadLogList(const char *xml,const char *filename,
1268 %        const size_t depth,ExceptionInfo *exception)
1269 %
1270 %  A description of each parameter follows:
1271 %
1272 %    o xml:  The log list in XML format.
1273 %
1274 %    o filename:  The log list filename.
1275 %
1276 %    o depth: depth of <include /> statements.
1277 %
1278 %    o exception: return any errors or warnings in this structure.
1279 %
1280 */
1281 static MagickBooleanType LoadLogList(const char *xml,const char *filename,
1282   const size_t depth,ExceptionInfo *exception)
1283 {
1284   char
1285     keyword[MaxTextExtent],
1286     *token;
1287
1288   const char
1289     *q;
1290
1291   LogInfo
1292     *log_info = (LogInfo *) NULL;
1293
1294   MagickStatusType
1295     status;
1296
1297   /*
1298     Load the log map file.
1299   */
1300   if (xml == (const char *) NULL)
1301     return(MagickFalse);
1302   if (log_list == (LinkedListInfo *) NULL)
1303     {
1304       log_list=NewLinkedList(0);
1305       if (log_list == (LinkedListInfo *) NULL)
1306         {
1307           ThrowFileException(exception,ResourceLimitError,
1308             "MemoryAllocationFailed",filename);
1309           return(MagickFalse);
1310         }
1311     }
1312   status=MagickTrue;
1313   token=AcquireString((const char *) xml);
1314   for (q=(const char *) xml; *q != '\0'; )
1315   {
1316     /*
1317       Interpret XML.
1318     */
1319     GetMagickToken(q,&q,token);
1320     if (*token == '\0')
1321       break;
1322     (void) CopyMagickString(keyword,token,MaxTextExtent);
1323     if (LocaleNCompare(keyword,"<!DOCTYPE",9) == 0)
1324       {
1325         /*
1326           Doctype element.
1327         */
1328         while ((LocaleNCompare(q,"]>",2) != 0) && (*q != '\0'))
1329           GetMagickToken(q,&q,token);
1330         continue;
1331       }
1332     if (LocaleNCompare(keyword,"<!--",4) == 0)
1333       {
1334         /*
1335           Comment element.
1336         */
1337         while ((LocaleNCompare(q,"->",2) != 0) && (*q != '\0'))
1338           GetMagickToken(q,&q,token);
1339         continue;
1340       }
1341     if (LocaleCompare(keyword,"<include") == 0)
1342       {
1343         /*
1344           Include element.
1345         */
1346         while (((*token != '/') && (*(token+1) != '>')) && (*q != '\0'))
1347         {
1348           (void) CopyMagickString(keyword,token,MaxTextExtent);
1349           GetMagickToken(q,&q,token);
1350           if (*token != '=')
1351             continue;
1352           GetMagickToken(q,&q,token);
1353           if (LocaleCompare(keyword,"file") == 0)
1354             {
1355               if (depth > 200)
1356                 (void) ThrowMagickException(exception,GetMagickModule(),
1357                   ConfigureError,"IncludeElementNestedTooDeeply","`%s'",token);
1358               else
1359                 {
1360                   char
1361                     path[MaxTextExtent],
1362                     *xml;
1363
1364                   GetPathComponent(filename,HeadPath,path);
1365                   if (*path != '\0')
1366                     (void) ConcatenateMagickString(path,DirectorySeparator,
1367                       MaxTextExtent);
1368                   if (*token == *DirectorySeparator)
1369                     (void) CopyMagickString(path,token,MaxTextExtent);
1370                   else
1371                     (void) ConcatenateMagickString(path,token,MaxTextExtent);
1372                   xml=FileToString(path,~0,exception);
1373                   if (xml != (char *) NULL)
1374                     {
1375                       status|=LoadLogList(xml,path,depth+1,exception);
1376                       xml=DestroyString(xml);
1377                     }
1378                 }
1379             }
1380         }
1381         continue;
1382       }
1383     if (LocaleCompare(keyword,"<logmap>") == 0)
1384       {
1385         /*
1386           Allocate memory for the log list.
1387         */
1388         log_info=(LogInfo *) AcquireMagickMemory(sizeof(*log_info));
1389         if (log_info == (LogInfo *) NULL)
1390           ThrowFatalException(ResourceLimitFatalError,"MemoryAllocationFailed");
1391         (void) ResetMagickMemory(log_info,0,sizeof(*log_info));
1392         log_info->path=ConstantString(filename);
1393         GetTimerInfo((TimerInfo *) &log_info->timer);
1394         log_info->exempt=MagickFalse;
1395         log_info->signature=MagickSignature;
1396         continue;
1397       }
1398     if (log_info == (LogInfo *) NULL)
1399       continue;
1400     if (LocaleCompare(keyword,"</logmap>") == 0)
1401       {
1402         status=AppendValueToLinkedList(log_list,log_info);
1403         if (status == MagickFalse)
1404           (void) ThrowMagickException(exception,GetMagickModule(),
1405             ResourceLimitError,"MemoryAllocationFailed","`%s'",filename);
1406         log_info=(LogInfo *) NULL;
1407       }
1408     GetMagickToken(q,(const char **) NULL,token);
1409     if (*token != '=')
1410       continue;
1411     GetMagickToken(q,&q,token);
1412     GetMagickToken(q,&q,token);
1413     switch (*keyword)
1414     {
1415       case 'E':
1416       case 'e':
1417       {
1418         if (LocaleCompare((char *) keyword,"events") == 0)
1419           {
1420             log_info->event_mask=(LogEventType) (log_info->event_mask |
1421               ParseCommandOption(MagickLogEventOptions,MagickTrue,token));
1422             break;
1423           }
1424         break;
1425       }
1426       case 'F':
1427       case 'f':
1428       {
1429         if (LocaleCompare((char *) keyword,"filename") == 0)
1430           {
1431             if (log_info->filename != (char *) NULL)
1432               log_info->filename=(char *)
1433                 RelinquishMagickMemory(log_info->filename);
1434             log_info->filename=ConstantString(token);
1435             break;
1436           }
1437         if (LocaleCompare((char *) keyword,"format") == 0)
1438           {
1439             if (log_info->format != (char *) NULL)
1440               log_info->format=(char *)
1441                 RelinquishMagickMemory(log_info->format);
1442             log_info->format=ConstantString(token);
1443             break;
1444           }
1445         break;
1446       }
1447       case 'G':
1448       case 'g':
1449       {
1450         if (LocaleCompare((char *) keyword,"generations") == 0)
1451           {
1452             if (LocaleCompare(token,"unlimited") == 0)
1453               {
1454                 log_info->generations=(~0UL);
1455                 break;
1456               }
1457             log_info->generations=StringToUnsignedLong(token);
1458             break;
1459           }
1460         break;
1461       }
1462       case 'L':
1463       case 'l':
1464       {
1465         if (LocaleCompare((char *) keyword,"limit") == 0)
1466           {
1467             if (LocaleCompare(token,"unlimited") == 0)
1468               {
1469                 log_info->limit=(~0UL);
1470                 break;
1471               }
1472             log_info->limit=StringToUnsignedLong(token);
1473             break;
1474           }
1475         break;
1476       }
1477       case 'O':
1478       case 'o':
1479       {
1480         if (LocaleCompare((char *) keyword,"output") == 0)
1481           {
1482             log_info->handler_mask=(LogHandlerType)
1483               (log_info->handler_mask | ParseLogHandlers(token));
1484             break;
1485           }
1486         break;
1487       }
1488       default:
1489         break;
1490     }
1491   }
1492   token=DestroyString(token);
1493   if (log_list == (LinkedListInfo *) NULL)
1494     return(MagickFalse);
1495   return(status != 0 ? MagickTrue : MagickFalse);
1496 }
1497 \f
1498 /*
1499 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1500 %                                                                             %
1501 %                                                                             %
1502 %                                                                             %
1503 %  L o a d L o g L i s t s                                                    %
1504 %                                                                             %
1505 %                                                                             %
1506 %                                                                             %
1507 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1508 %
1509 %  LoadLogLists() loads one or more log configuration file which provides a
1510 %  mapping between log attributes and log name.
1511 %
1512 %  The format of the LoadLogLists method is:
1513 %
1514 %      MagickBooleanType LoadLogLists(const char *filename,
1515 %        ExceptionInfo *exception)
1516 %
1517 %  A description of each parameter follows:
1518 %
1519 %    o filename: the log configuration filename.
1520 %
1521 %    o exception: return any errors or warnings in this structure.
1522 %
1523 */
1524 static MagickBooleanType LoadLogLists(const char *filename,
1525   ExceptionInfo *exception)
1526 {
1527   const StringInfo
1528     *option;
1529
1530   LinkedListInfo
1531     *options;
1532
1533   MagickStatusType
1534     status;
1535
1536   register ssize_t
1537     i;
1538
1539   /*
1540     Load built-in log map.
1541   */
1542   status=MagickFalse;
1543   if (log_list == (LinkedListInfo *) NULL)
1544     {
1545       log_list=NewLinkedList(0);
1546       if (log_list == (LinkedListInfo *) NULL)
1547         {
1548           ThrowFileException(exception,ResourceLimitError,
1549             "MemoryAllocationFailed",filename);
1550           return(MagickFalse);
1551         }
1552     }
1553   for (i=0; i < (ssize_t) (sizeof(LogMap)/sizeof(*LogMap)); i++)
1554   {
1555     LogInfo
1556       *log_info;
1557
1558     register const LogMapInfo
1559       *p;
1560
1561     p=LogMap+i;
1562     log_info=(LogInfo *) AcquireMagickMemory(sizeof(*log_info));
1563     if (log_info == (LogInfo *) NULL)
1564       {
1565         (void) ThrowMagickException(exception,GetMagickModule(),
1566           ResourceLimitError,"MemoryAllocationFailed","`%s'",log_info->name);
1567         continue;
1568       }
1569     (void) ResetMagickMemory(log_info,0,sizeof(*log_info));
1570     log_info->path=(char *) "[built-in]";
1571     GetTimerInfo((TimerInfo *) &log_info->timer);
1572     log_info->event_mask=p->event_mask;
1573     log_info->handler_mask=p->handler_mask;
1574     log_info->filename=ConstantString(p->filename);
1575     log_info->format=ConstantString(p->format);
1576     log_info->exempt=MagickTrue;
1577     log_info->signature=MagickSignature;
1578     status=AppendValueToLinkedList(log_list,log_info);
1579     if (status == MagickFalse)
1580       (void) ThrowMagickException(exception,GetMagickModule(),
1581         ResourceLimitError,"MemoryAllocationFailed","`%s'",log_info->name);
1582   }
1583   /*
1584     Load external log map.
1585   */
1586   options=GetConfigureOptions(filename,exception);
1587   option=(const StringInfo *) GetNextValueInLinkedList(options);
1588   while (option != (const StringInfo *) NULL)
1589   {
1590     status|=LoadLogList((const char *) GetStringInfoDatum(option),
1591       GetStringInfoPath(option),0,exception);
1592     option=(const StringInfo *) GetNextValueInLinkedList(options);
1593   }
1594   options=DestroyConfigureOptions(options);
1595   return(status != 0 ? MagickTrue : MagickFalse);
1596 }
1597 \f
1598 /*
1599 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1600 %                                                                             %
1601 %                                                                             %
1602 %                                                                             %
1603 +   P a r s e L o g H a n d l e r s                                           %
1604 %                                                                             %
1605 %                                                                             %
1606 %                                                                             %
1607 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1608 %
1609 %  ParseLogHandlers() parses a string defining which handlers takes a log
1610 %  message and exports them.
1611 %
1612 %  The format of the ParseLogHandlers method is:
1613 %
1614 %      LogHandlerType ParseLogHandlers(const char *handlers)
1615 %
1616 %  A description of each parameter follows:
1617 %
1618 %    o handlers: one or more handlers separated by commas.
1619 %
1620 */
1621 static LogHandlerType ParseLogHandlers(const char *handlers)
1622 {
1623   LogHandlerType
1624     handler_mask;
1625
1626   register const char
1627     *p;
1628
1629   register ssize_t
1630     i;
1631
1632   size_t
1633     length;
1634
1635   handler_mask=NoHandler;
1636   for (p=handlers; p != (char *) NULL; p=strchr(p,','))
1637   {
1638     while ((*p != '\0') && ((isspace((int) ((unsigned char) *p)) != 0) ||
1639            (*p == ',')))
1640       p++;
1641     for (i=0; LogHandlers[i].name != (char *) NULL; i++)
1642     {
1643       length=strlen(LogHandlers[i].name);
1644       if (LocaleNCompare(p,LogHandlers[i].name,length) == 0)
1645         {
1646           handler_mask=(LogHandlerType) (handler_mask | LogHandlers[i].handler);
1647           break;
1648         }
1649     }
1650     if (LogHandlers[i].name == (char *) NULL)
1651       return(UndefinedHandler);
1652   }
1653   return(handler_mask);
1654 }
1655 \f
1656 /*
1657 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1658 %                                                                             %
1659 %                                                                             %
1660 %                                                                             %
1661 %   S e t L o g E v e n t M a s k                                             %
1662 %                                                                             %
1663 %                                                                             %
1664 %                                                                             %
1665 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1666 %
1667 %  SetLogEventMask() accepts a list that determines which events to log.  All
1668 %  other events are ignored.  By default, no debug is enabled.  This method
1669 %  returns the previous log event mask.
1670 %
1671 %  The format of the SetLogEventMask method is:
1672 %
1673 %      LogEventType SetLogEventMask(const char *events)
1674 %
1675 %  A description of each parameter follows:
1676 %
1677 %    o events: log these events.
1678 %
1679 */
1680 MagickExport LogEventType SetLogEventMask(const char *events)
1681 {
1682   ExceptionInfo
1683     *exception;
1684
1685   LogInfo
1686     *log_info;
1687
1688   ssize_t
1689     option;
1690
1691   exception=AcquireExceptionInfo();
1692   log_info=(LogInfo *) GetLogInfo("*",exception);
1693   exception=DestroyExceptionInfo(exception);
1694   option=ParseCommandOption(MagickLogEventOptions,MagickTrue,events);
1695   LockSemaphoreInfo(log_semaphore);
1696   log_info=(LogInfo *) GetValueFromLinkedList(log_list,0);
1697   log_info->event_mask=(LogEventType) option;
1698   if (option == -1)
1699     log_info->event_mask=UndefinedEvents;
1700   UnlockSemaphoreInfo(log_semaphore);
1701   return(log_info->event_mask);
1702 }
1703 \f
1704 /*
1705 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1706 %                                                                             %
1707 %                                                                             %
1708 %                                                                             %
1709 %   S e t L o g F o r m a t                                                   %
1710 %                                                                             %
1711 %                                                                             %
1712 %                                                                             %
1713 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1714 %
1715 %  SetLogFormat() sets the format for the "human readable" log record.
1716 %
1717 %  The format of the LogMagickFormat method is:
1718 %
1719 %      SetLogFormat(const char *format)
1720 %
1721 %  A description of each parameter follows:
1722 %
1723 %    o format: the log record format.
1724 %
1725 */
1726 MagickExport void SetLogFormat(const char *format)
1727 {
1728   LogInfo
1729     *log_info;
1730
1731   ExceptionInfo
1732     *exception;
1733
1734   exception=AcquireExceptionInfo();
1735   log_info=(LogInfo *) GetLogInfo("*",exception);
1736   exception=DestroyExceptionInfo(exception);
1737   LockSemaphoreInfo(log_semaphore);
1738   if (log_info->format != (char *) NULL)
1739     log_info->format=DestroyString(log_info->format);
1740   log_info->format=ConstantString(format);
1741   UnlockSemaphoreInfo(log_semaphore);
1742 }
1743 \f
1744 /*
1745 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1746 %                                                                             %
1747 %                                                                             %
1748 %                                                                             %
1749 %   S e t L o g N a m e                                                       %
1750 %                                                                             %
1751 %                                                                             %
1752 %                                                                             %
1753 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1754 %
1755 %  SetLogName() sets the log name and returns it.
1756 %
1757 %  The format of the SetLogName method is:
1758 %
1759 %      const char *SetLogName(const char *name)
1760 %
1761 %  A description of each parameter follows:
1762 %
1763 %    o log_name: SetLogName() returns the current client name.
1764 %
1765 %    o name: Specifies the new client name.
1766 %
1767 */
1768 MagickExport const char *SetLogName(const char *name)
1769 {
1770   if ((name != (char *) NULL) && (*name != '\0'))
1771     (void) CopyMagickString(log_name,name,MaxTextExtent);
1772   return(log_name);
1773 }