Dogcows Code - chaz/openbox/blob - openbox/debug.c

   1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
   2
   3    debug.c for the Openbox window manager
   4    Copyright (c) 2003-2007   Dana Jansens
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 2 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    See the COPYING file for a copy of the GNU General Public License.
  17 */
  18
  19 #include "debug.h"
  20 #include "gettext.h"
  21 #include "obt/paths.h"
  22
  23 #include <glib.h>
  24 #include <stdlib.h>
  25 #include <stdarg.h>
  26 #include <stdio.h>
  27 #include <errno.h>
  28
  29 static gboolean  enabled_types[OB_DEBUG_TYPE_NUM] = {FALSE};
  30 static FILE     *log_file = NULL;
  31 static guint     rr_handler_id = 0;
  32 static guint     obt_handler_id = 0;
  33 static guint     ob_handler_id = 0;
  34
  35 static void log_handler(const gchar *log_domain, GLogLevelFlags log_level,
  36                         const gchar *message, gpointer user_data);
  37
  38 void ob_debug_startup(void)
  39 {
  40     ObtPaths *p = obt_paths_new();
  41     gchar *dir = g_build_filename(obt_paths_cache_home(p),
  42                                   "openbox", NULL);
  43
  44     /* log messages to a log file!  fancy, no? */
  45     if (!obt_paths_mkdir_path(dir, 0777))
  46         g_message(_("Unable to make directory '%s': %s"),
  47                   dir, g_strerror(errno));
  48     else {
  49         gchar *name = g_build_filename(obt_paths_cache_home(p),
  50                                        "openbox", "openbox.log", NULL);
  51         log_file = fopen(name, "w");
  52         g_free(name);
  53     }
  54
  55     rr_handler_id =
  56         g_log_set_handler("ObRender", G_LOG_LEVEL_MASK | G_LOG_FLAG_FATAL |
  57                           G_LOG_FLAG_RECURSION, log_handler, NULL);
  58     obt_handler_id =
  59         g_log_set_handler("Obt", G_LOG_LEVEL_MASK | G_LOG_FLAG_FATAL |
  60                           G_LOG_FLAG_RECURSION, log_handler, NULL);
  61     ob_handler_id =
  62         g_log_set_handler("Openbox", G_LOG_LEVEL_MASK | G_LOG_FLAG_FATAL |
  63                           G_LOG_FLAG_RECURSION, log_handler, NULL);
  64
  65     g_free(dir);
  66 }
  67
  68 void ob_debug_shutdown(void)
  69 {
  70     g_log_remove_handler("ObRender", rr_handler_id);
  71     g_log_remove_handler("Obt", obt_handler_id);
  72     g_log_remove_handler("Openbox", ob_handler_id);
  73
  74     if (log_file) {
  75         fclose(log_file);
  76         log_file = NULL;
  77     }
  78 }
  79
  80 void ob_debug_enable(ObDebugType type, gboolean enable)
  81 {
  82     g_assert(type < OB_DEBUG_TYPE_NUM);
  83     enabled_types[type] = enable;
  84 }
  85
  86 static inline void log_print(FILE *out, const gchar* log_domain,
  87                              const gchar *level, const gchar *message)
  88 {
  89     fprintf(out, log_domain);
  90     fprintf(out, "-");
  91     fprintf(out, level);
  92     fprintf(out, ": ");
  93     fprintf(out, message);
  94     fprintf(out, "\n");
  95     fflush(out);
  96 }
  97
  98 static void log_handler(const gchar *log_domain, GLogLevelFlags log_level,
  99                         const gchar *message, gpointer data)
 100 {
 101     FILE *out;
 102     const gchar *level;
 103
 104     switch (log_level & G_LOG_LEVEL_MASK) {
 105     case G_LOG_LEVEL_DEBUG:    level = "Debug";    out = stdout; break;
 106     case G_LOG_LEVEL_INFO:     level = "Info";     out = stdout; break;
 107     case G_LOG_LEVEL_MESSAGE:  level = "Message";  out = stdout; break;
 108     case G_LOG_LEVEL_WARNING:  level = "Warning";  out = stderr; break;
 109     case G_LOG_LEVEL_CRITICAL: level = "Critical"; out = stderr; break;
 110     case G_LOG_LEVEL_ERROR:    level = "Error";    out = stderr; break;
 111     default:                   g_assert_not_reached(); /* invalid level.. */
 112     }
 113
 114     log_print(out, log_domain, level, message);
 115     if (log_file) log_print(log_file, log_domain, level, message);
 116 }
 117
 118 static inline void log_argv(ObDebugType type,
 119                             const gchar *format, va_list args)
 120 {
 121     const gchar *prefix;
 122     gchar *message;
 123
 124     g_assert(type < OB_DEBUG_TYPE_NUM);
 125     if (!enabled_types[type]) return;
 126
 127     switch (type) {
 128     case OB_DEBUG_FOCUS:    prefix = "(FOCUS) ";           break;
 129     case OB_DEBUG_APP_BUGS: prefix = "(APPLICATION BUG) "; break;
 130     case OB_DEBUG_SM:       prefix = "(SESSION) ";         break;
 131     default:                prefix = NULL;                 break;
 132     }
 133
 134     message = g_strdup_vprintf(format, args);
 135     if (prefix) {
 136         gchar *a = message;
 137         message = g_strconcat(prefix, message, NULL);
 138         g_free(a);
 139     }
 140
 141     g_debug(message);
 142     g_free(message);
 143 }
 144
 145 void ob_debug(const gchar *a, ...)
 146 {
 147     va_list vl;
 148
 149     va_start(vl, a);
 150     log_argv(OB_DEBUG_NORMAL, a, vl);
 151     va_end(vl);
 152 }
 153
 154 void ob_debug_type(ObDebugType type, const gchar *a, ...)
 155 {
 156     va_list vl;
 157
 158     va_start(vl, a);
 159     log_argv(type, a, vl);
 160     va_end(vl);
 161 }