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     obt_paths_unref(p);
  66     g_free(dir);
  67 }
  68
  69 void ob_debug_shutdown(void)
  70 {
  71     g_log_remove_handler("ObRender", rr_handler_id);
  72     g_log_remove_handler("Obt", obt_handler_id);
  73     g_log_remove_handler("Openbox", ob_handler_id);
  74
  75     if (log_file) {
  76         fclose(log_file);
  77         log_file = NULL;
  78     }
  79 }
  80
  81 void ob_debug_enable(ObDebugType type, gboolean enable)
  82 {
  83     g_assert(type < OB_DEBUG_TYPE_NUM);
  84     enabled_types[type] = enable;
  85 }
  86
  87 static inline void log_print(FILE *out, const gchar* log_domain,
  88                              const gchar *level, const gchar *message)
  89 {
  90     fprintf(out, log_domain);
  91     fprintf(out, "-");
  92     fprintf(out, level);
  93     fprintf(out, ": ");
  94     fprintf(out, message);
  95     fprintf(out, "\n");
  96     fflush(out);
  97 }
  98
  99 static void log_handler(const gchar *log_domain, GLogLevelFlags log_level,
 100                         const gchar *message, gpointer data)
 101 {
 102     FILE *out;
 103     const gchar *level;
 104
 105     switch (log_level & G_LOG_LEVEL_MASK) {
 106     case G_LOG_LEVEL_DEBUG:    level = "Debug";    out = stdout; break;
 107     case G_LOG_LEVEL_INFO:     level = "Info";     out = stdout; break;
 108     case G_LOG_LEVEL_MESSAGE:  level = "Message";  out = stdout; break;
 109     case G_LOG_LEVEL_WARNING:  level = "Warning";  out = stderr; break;
 110     case G_LOG_LEVEL_CRITICAL: level = "Critical"; out = stderr; break;
 111     case G_LOG_LEVEL_ERROR:    level = "Error";    out = stderr; break;
 112     default:                   g_assert_not_reached(); /* invalid level.. */
 113     }
 114
 115     log_print(out, log_domain, level, message);
 116     if (log_file) log_print(log_file, log_domain, level, message);
 117 }
 118
 119 static inline void log_argv(ObDebugType type,
 120                             const gchar *format, va_list args)
 121 {
 122     const gchar *prefix;
 123     gchar *message;
 124
 125     g_assert(type < OB_DEBUG_TYPE_NUM);
 126     if (!enabled_types[type]) return;
 127
 128     switch (type) {
 129     case OB_DEBUG_FOCUS:    prefix = "(FOCUS) ";           break;
 130     case OB_DEBUG_APP_BUGS: prefix = "(APPLICATION BUG) "; break;
 131     case OB_DEBUG_SM:       prefix = "(SESSION) ";         break;
 132     default:                prefix = NULL;                 break;
 133     }
 134
 135     message = g_strdup_vprintf(format, args);
 136     if (prefix) {
 137         gchar *a = message;
 138         message = g_strconcat(prefix, message, NULL);
 139         g_free(a);
 140     }
 141
 142     g_debug(message);
 143     g_free(message);
 144 }
 145
 146 void ob_debug(const gchar *a, ...)
 147 {
 148     va_list vl;
 149
 150     va_start(vl, a);
 151     log_argv(OB_DEBUG_NORMAL, a, vl);
 152     va_end(vl);
 153 }
 154
 155 void ob_debug_type(ObDebugType type, const gchar *a, ...)
 156 {
 157     va_list vl;
 158
 159     va_start(vl, a);
 160     log_argv(type, a, vl);
 161     va_end(vl);
 162 }