#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;
static GHashTable *debug_hash;

static void sigsegv(int sig)
{
	FILE *f;
	time_t t;
	printf("segmentation fault received\n");
	f=fopen("crash.txt","a");
	setvbuf(f, NULL, _IONBF, 0);
	fprintf(f,"segmentation fault received\n");
	t=time(NULL);
	fprintf(f,"Time: %s", ctime(&t));
	file_unmap_all();
	fprintf(f,"dumping core\n");
	fclose(f);	
	abort();
}

void
debug_init(void)
{
#if 0
	signal(SIGSEGV, sigsegv);
#endif
	debug_hash=g_hash_table_new(g_str_hash, g_str_equal);
}


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(char *name, int level)
{
	debug_level=0;
	g_hash_table_insert(debug_hash, name, (gpointer) level);
	g_hash_table_foreach(debug_hash, debug_update_level, NULL);	
	debug_level_get(name);
}

int
debug_level_get(const char *name)
{
	return (int)(g_hash_table_lookup(debug_hash, name));
}

void
debug_print(int level, const char *module, const char *function, const char *fmt, ...)
{
	va_list ap;
	int module_len=strlen(module);
	int function_len=strlen(function);
	char buffer[module_len+function_len+3];

	strcpy(buffer, module);
	buffer[module_len]=':';
	strcpy(buffer+module_len+1, function);

	if (debug_level_get(module) >= level || debug_level_get(buffer) >= level) {
		strcpy(buffer+module_len+function_len+1, ":");
		printf("%s",buffer);
		va_start(ap, fmt);
		vprintf(fmt, ap);
		va_end(ap);
	}
}