os/ossrv/genericopenlibs/liboil/src/liboildebug.c
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
sl@0
     1
/*
sl@0
     2
 * LIBOIL - Library of Optimized Inner Loops
sl@0
     3
 * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>
sl@0
     4
 * All rights reserved.
sl@0
     5
 *
sl@0
     6
 * Redistribution and use in source and binary forms, with or without
sl@0
     7
 * modification, are permitted provided that the following conditions
sl@0
     8
 * are met:
sl@0
     9
 * 1. Redistributions of source code must retain the above copyright
sl@0
    10
 *    notice, this list of conditions and the following disclaimer.
sl@0
    11
 * 2. Redistributions in binary form must reproduce the above copyright
sl@0
    12
 *    notice, this list of conditions and the following disclaimer in the
sl@0
    13
 *    documentation and/or other materials provided with the distribution.
sl@0
    14
 * 
sl@0
    15
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
sl@0
    16
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
sl@0
    17
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
sl@0
    18
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
sl@0
    19
 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
sl@0
    20
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
sl@0
    21
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
sl@0
    22
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
sl@0
    23
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
sl@0
    24
 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
sl@0
    25
 * POSSIBILITY OF SUCH DAMAGE.
sl@0
    26
 */
sl@0
    27
//Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 
sl@0
    28
sl@0
    29
#ifdef HAVE_CONFIG_H
sl@0
    30
#include "config.h"
sl@0
    31
#endif
sl@0
    32
#include <liboil/liboilfunction.h>
sl@0
    33
#include <liboil/liboildebug.h>
sl@0
    34
sl@0
    35
#include <stdio.h>
sl@0
    36
#include <string.h>
sl@0
    37
#include <stdarg.h>
sl@0
    38
#include <stdlib.h>
sl@0
    39
sl@0
    40
/**
sl@0
    41
 * SECTION:liboildebug
sl@0
    42
 * @title: Debug
sl@0
    43
 * @short_description: Printing and formatting debug information
sl@0
    44
 */
sl@0
    45
sl@0
    46
static void oil_debug_print_valist (int level, const char *file,
sl@0
    47
    const char *func, int line, const char *format, va_list args);
sl@0
    48
sl@0
    49
static int _oil_debug_level = OIL_DEBUG_ERROR;
sl@0
    50
sl@0
    51
static OilDebugPrintFunc _oil_debug_print_func = oil_debug_print_valist;
sl@0
    52
sl@0
    53
#ifdef __SYMBIAN32__
sl@0
    54
 
sl@0
    55
#endif
sl@0
    56
void
sl@0
    57
_oil_debug_init(void)
sl@0
    58
{
sl@0
    59
  const char *envvar;
sl@0
    60
sl@0
    61
  envvar = getenv ("OIL_DEBUG");
sl@0
    62
  if (envvar != NULL) {
sl@0
    63
    char *end = NULL;
sl@0
    64
    int level;
sl@0
    65
    level = strtol (envvar, &end, 0);
sl@0
    66
    if (end > envvar) {
sl@0
    67
      _oil_debug_level = level;
sl@0
    68
    }
sl@0
    69
  }
sl@0
    70
sl@0
    71
  OIL_INFO ("liboil-" VERSION " debug init");
sl@0
    72
}
sl@0
    73
sl@0
    74
static void
sl@0
    75
oil_debug_print_valist (int level, const char *file, const char *func,
sl@0
    76
        int line, const char *format, va_list args)
sl@0
    77
{
sl@0
    78
  static const char *level_names[] = { "NONE", "ERROR", "WARNING", "INFO",
sl@0
    79
    "DEBUG", "LOG" };
sl@0
    80
  const char *level_name = "unknown";
sl@0
    81
sl@0
    82
  if (level > _oil_debug_level) return;
sl@0
    83
sl@0
    84
  if(level>=OIL_DEBUG_NONE && level<=OIL_DEBUG_LOG){
sl@0
    85
    level_name = level_names[level];
sl@0
    86
  }
sl@0
    87
  
sl@0
    88
  fprintf (stderr, "OIL: %s %s %d: %s(): ", level_name, file, line, func);
sl@0
    89
  vfprintf (stderr, format, args);
sl@0
    90
  fprintf (stderr, "\n");
sl@0
    91
}
sl@0
    92
sl@0
    93
#ifdef __SYMBIAN32__
sl@0
    94
EXPORT_C 
sl@0
    95
#endif
sl@0
    96
void
sl@0
    97
oil_debug_print (int level, const char *file, const char *func,
sl@0
    98
        int line, const char *format, ...)
sl@0
    99
{
sl@0
   100
  va_list var_args;
sl@0
   101
sl@0
   102
  va_start (var_args, format);
sl@0
   103
  _oil_debug_print_func (level, file, func, line, format, var_args);
sl@0
   104
  va_end (var_args);
sl@0
   105
}
sl@0
   106
sl@0
   107
/**
sl@0
   108
 * oil_debug_get_level:
sl@0
   109
 *
sl@0
   110
 * Gets the current debug level.
sl@0
   111
 *
sl@0
   112
 * Returns: the current debug level
sl@0
   113
 */
sl@0
   114
 #ifdef __SYMBIAN32__
sl@0
   115
 EXPORT_C
sl@0
   116
#endif
sl@0
   117
int
sl@0
   118
oil_debug_get_level (void)
sl@0
   119
{
sl@0
   120
  return _oil_debug_level;
sl@0
   121
}
sl@0
   122
sl@0
   123
/**
sl@0
   124
 * oil_debug_set_level:
sl@0
   125
 * @level: the new debug level
sl@0
   126
 *
sl@0
   127
 * Sets the current debug level.
sl@0
   128
 */
sl@0
   129
#ifdef __SYMBIAN32__
sl@0
   130
 EXPORT_C
sl@0
   131
#endif 
sl@0
   132
void
sl@0
   133
oil_debug_set_level (int level)
sl@0
   134
{
sl@0
   135
  _oil_debug_level = level;
sl@0
   136
}
sl@0
   137
sl@0
   138
/**
sl@0
   139
 * oil_debug_set_print_function:
sl@0
   140
 * @func:
sl@0
   141
 *
sl@0
   142
 * Sets the function to call when outputting debugging information.
sl@0
   143
 * A value of NULL for @func will restore the default handler,
sl@0
   144
 * which prints debugging information to stderr.
sl@0
   145
 */
sl@0
   146
#ifdef __SYMBIAN32__
sl@0
   147
 EXPORT_C
sl@0
   148
#endif
sl@0
   149
void
sl@0
   150
oil_debug_set_print_function (OilDebugPrintFunc func)
sl@0
   151
{
sl@0
   152
  if (func) {
sl@0
   153
    _oil_debug_print_func = func;
sl@0
   154
  } else {
sl@0
   155
    _oil_debug_print_func = oil_debug_print_valist;
sl@0
   156
  }
sl@0
   157
}
sl@0
   158