1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
/**
* Navit, a modular navigation system.
* Copyright (C) 2005-2008 Navit Team
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* version 2 as published by the Free Software Foundation.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the
* Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include <signal.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <glib.h>
#include "file.h"
#include "debug.h"
int debug_level=0,segv_level=0;
static GHashTable *debug_hash;
static char *gdb_program;
static void sigsegv(int sig)
{
char buffer[256];
if (segv_level > 1)
sprintf(buffer, "gdb -ex bt %s %d", gdb_program, getpid());
else
sprintf(buffer, "gdb -ex bt -ex detach -ex quit %s %d", gdb_program, getpid());
system(buffer);
exit(1);
}
void
debug_init(const char *program_name)
{
gdb_program=program_name;
signal(SIGSEGV, sigsegv);
debug_hash=g_hash_table_new_full(g_str_hash, g_str_equal, g_free, NULL);
}
static void
debug_update_level(gpointer key, gpointer value, gpointer user_data)
{
if (debug_level < (int) value)
debug_level=(int) value;
}
void
debug_level_set(const char *name, int level)
{
debug_level=0;
if (strcmp(name,"segv")) {
g_hash_table_insert(debug_hash, g_strdup(name), (gpointer) level);
g_hash_table_foreach(debug_hash, debug_update_level, NULL);
} else {
segv_level=level;
if (segv_level)
signal(SIGSEGV, sigsegv);
else
signal(SIGSEGV, NULL);
}
}
int
debug_level_get(const char *name)
{
return (int)(g_hash_table_lookup(debug_hash, name));
}
void
debug_vprintf(int level, const char *module, const int mlen, const char *function, const int flen, int prefix, const char *fmt, va_list ap)
{
char buffer[mlen+flen+3];
sprintf(buffer, "%s:%s", module, function);
if (debug_level_get(module) >= level || debug_level_get(buffer) >= level) {
if (prefix)
fprintf(stderr,"%s:",buffer);
vfprintf(stderr,fmt, ap);
}
}
void
debug_printf(int level, const char *module, const int mlen,const char *function, const int flen, int prefix, const char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
debug_vprintf(level, module, mlen, function, flen, prefix, fmt, ap);
va_end(ap);
}
|