src/polypcore/log.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as
   8   published by the Free Software Foundation; either version 2 of the
   9   License, or (at your option) any later version.
  10
  11   polypaudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with polypaudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <assert.h>
  27 #include <stdarg.h>
  28 #include <stdio.h>
  29
  30 #ifdef HAVE_SYSLOG_H
  31 #include <syslog.h>
  32 #endif
  33
  34 #include "log.h"
  35 #include "xmalloc.h"
  36 #include "util.h"
  37
  38 #define ENV_LOGLEVEL "POLYP_LOG"
  39
  40 static char *log_ident = NULL;
  41 static pa_log_target_t log_target = PA_LOG_STDERR;
  42 static void (*user_log_func)(pa_log_level_t l, const char *s) = NULL;
  43 static pa_log_level_t maximal_level = PA_LOG_NOTICE;
  44
  45 #ifdef HAVE_SYSLOG_H
  46 static const int level_to_syslog[] = {
  47     [PA_LOG_ERROR] = LOG_ERR,
  48     [PA_LOG_WARN] = LOG_WARNING,
  49     [PA_LOG_NOTICE] = LOG_NOTICE,
  50     [PA_LOG_INFO] = LOG_INFO,
  51     [PA_LOG_DEBUG] = LOG_DEBUG
  52 };
  53 #endif
  54
  55 void pa_log_set_ident(const char *p) {
  56     if (log_ident)
  57         pa_xfree(log_ident);
  58
  59     log_ident = pa_xstrdup(p);
  60 }
  61
  62 void pa_log_set_maximal_level(pa_log_level_t l) {
  63     assert(l < PA_LOG_LEVEL_MAX);
  64     maximal_level = l;
  65 }
  66
  67 void pa_log_set_target(pa_log_target_t t, void (*func)(pa_log_level_t l, const char*s)) {
  68     assert(t == PA_LOG_USER || !func);
  69     log_target = t;
  70     user_log_func = func;
  71 }
  72
  73 void pa_log_levelv(pa_log_level_t level, const char *format, va_list ap) {
  74     const char *e;
  75     assert(level < PA_LOG_LEVEL_MAX);
  76
  77     if ((e = getenv(ENV_LOGLEVEL)))
  78         maximal_level = atoi(e);
  79
  80     if (level > maximal_level)
  81         return;
  82
  83     switch (log_target) {
  84         case PA_LOG_STDERR:
  85             vfprintf(stderr, format, ap);
  86             break;
  87
  88 #ifdef HAVE_SYSLOG_H
  89         case PA_LOG_SYSLOG:
  90             openlog(log_ident ? log_ident : "???", LOG_PID, LOG_USER);
  91             vsyslog(level_to_syslog[level], format, ap);
  92             closelog();
  93             break;
  94 #endif
  95
  96         case PA_LOG_USER: {
  97             char *t = pa_vsprintf_malloc(format, ap);
  98             assert(user_log_func);
  99             user_log_func(level, t);
 100             pa_xfree(t);
 101         }
 102
 103         case PA_LOG_NULL:
 104         default:
 105             break;
 106     }
 107
 108 }
 109
 110 void pa_log_level(pa_log_level_t level, const char *format, ...) {
 111     va_list ap;
 112     va_start(ap, format);
 113     pa_log_levelv(level, format, ap);
 114     va_end(ap);
 115 }
 116
 117 void pa_log_debug(const char *format, ...) {
 118     va_list ap;
 119     va_start(ap, format);
 120     pa_log_levelv(PA_LOG_DEBUG, format, ap);
 121     va_end(ap);
 122 }
 123
 124 void pa_log_info(const char *format, ...) {
 125     va_list ap;
 126     va_start(ap, format);
 127     pa_log_levelv(PA_LOG_INFO, format, ap);
 128     va_end(ap);
 129 }
 130
 131 void pa_log_notice(const char *format, ...) {
 132     va_list ap;
 133     va_start(ap, format);
 134     pa_log_levelv(PA_LOG_INFO, format, ap);
 135     va_end(ap);
 136 }
 137
 138 void pa_log_warn(const char *format, ...) {
 139     va_list ap;
 140     va_start(ap, format);
 141     pa_log_levelv(PA_LOG_WARN, format, ap);
 142     va_end(ap);
 143 }
 144
 145 void pa_log_error(const char *format, ...) {
 146     va_list ap;
 147     va_start(ap, format);
 148     pa_log_levelv(PA_LOG_ERROR, format, ap);
 149     va_end(ap);
 150 }