/***************************************************************************//*                                                                         *//*  ftdebug.c                                                              *//*                                                                         *//*    Debugging and logging component for Win32 (body).                    *//*                                                                         *//*  Copyright 1996-2001, 2002, 2005 by                                     *//*  David Turner, Robert Wilhelm, and Werner Lemberg.                      *//*                                                                         *//*  This file is part of the FreeType project, and may only be used,       *//*  modified, and distributed under the terms of the FreeType project      *//*  license, LICENSE.TXT.  By continuing to use, modify, or distribute     *//*  this file you indicate that you have read the license and              *//*  understand and accept it fully.                                        *//*                                                                         *//***************************************************************************/  /*************************************************************************/  /*                                                                       */  /* This component contains various macros and functions used to ease the */  /* debugging of the FreeType engine.  Its main purpose is in assertion   */  /* checking, tracing, and error detection.                               */  /*                                                                       */  /* There are now three debugging modes:                                  */  /*                                                                       */  /* - trace mode                                                          */  /*                                                                       */  /*   Error and trace messages are sent to the log file (which can be the */  /*   standard error output).                                             */  /*                                                                       */  /* - error mode                                                          */  /*                                                                       */  /*   Only error messages are generated.                                  */  /*                                                                       */  /* - release mode:                                                       */  /*                                                                       */  /*   No error message is sent or generated.  The code is free from any   */  /*   debugging parts.                                                    */  /*                                                                       */  /*************************************************************************/#include <ft2build.h>#include FT_INTERNAL_DEBUG_H#ifdef FT_DEBUG_LEVEL_ERROR#  include <stdarg.h>#  include <stdlib.h>#  include <string.h>#  include <windows.h>  FT_BASE_DEF( void )  FT_Message( const char*  fmt, ... )  {    static char buf[8192];    va_list     ap;    va_start( ap, fmt );    vsprintf( buf, fmt, ap );    OutputDebugStringA( buf );    va_end( ap );  }  FT_BASE_DEF( void )  FT_Panic( const char*  fmt, ... )  {    static char buf[8192];    va_list     ap;    va_start( ap, fmt );    vsprintf( buf, fmt, ap );    OutputDebugStringA( buf );    va_end( ap );    exit( EXIT_FAILURE );  }#  ifdef FT_DEBUG_LEVEL_TRACE  /* array of trace levels, initialized to 0 */  int  ft_trace_levels[trace_count];  /* define array of trace toggle names */#    define FT_TRACE_DEF( x )  #x ,  static const char*  ft_trace_toggles[trace_count + 1] =  {#    include FT_INTERNAL_TRACE_H    NULL  };#    undef FT_TRACE_DEF  /*************************************************************************/  /*                                                                       */  /* Initialize the tracing sub-system.  This is done by retrieving the    */  /* value of the "FT2_DEBUG" environment variable.  It must be a list of  */  /* toggles, separated by spaces, `;' or `,'.  Example:                   */  /*                                                                       */  /*    "any:3 memory:6 stream:5"                                          */  /*                                                                       */  /* This will request that all levels be set to 3, except the trace level */  /* for the memory and stream components which are set to 6 and 5,        */  /* respectively.                                                         */  /*                                                                       */  /* See the file <freetype/internal/fttrace.h> for details of the         */  /* available toggle names.                                               */  /*                                                                       */  /* The level must be between 0 and 6; 0 means quiet (except for serious  */  /* runtime errors), and 6 means _very_ verbose.                          */  /*                                                                       */  FT_BASE_DEF( void )  ft_debug_init( void )  {    const char*  ft2_debug = getenv( "FT2_DEBUG" );    if ( ft2_debug )    {      const char*  p = ft2_debug;      const char*  q;      for ( ; *p; p++ )      {        /* skip leading whitespace and separators */        if ( *p == ' ' || *p == '\t' || *p == ',' || *p == ';' || *p == '=' )          continue;        /* read toggle name, followed by ':' */        q = p;        while ( *p && *p != ':' )          p++;        if ( *p == ':' && p > q )        {          int  n, i, len = p - q;          int  level = -1, found = -1;          for ( n = 0; n < trace_count; n++ )          {            const char*  toggle = ft_trace_toggles[n];            for ( i = 0; i < len; i++ )            {              if ( toggle[i] != q[i] )                break;            }            if ( i == len && toggle[i] == 0 )            {              found = n;              break;            }          }          /* read level */          p++;          if ( *p )          {            level = *p++ - '0';            if ( level < 0 || level > 6 )              level = -1;          }          if ( found >= 0 && level >= 0 )          {            if ( found == trace_any )            {              /* special case for "any" */              for ( n = 0; n < trace_count; n++ )                ft_trace_levels[n] = level;            }            else              ft_trace_levels[found] = level;          }        }      }    }  }#  else  /* !FT_DEBUG_LEVEL_TRACE */  FT_BASE_DEF( void )  ft_debug_init( void )  {    /* nothing */  }#  endif /* !FT_DEBUG_LEVEL_TRACE */#endif /* FT_DEBUG_LEVEL_ERROR *//* END */