1 files changed, 83 insertions, 4 deletions

diff --git a/debug.c b/debug.c
index 3959987..e5908e2 100644
--- a/debug.c
+++ b/debug.c
@@ -10,22 +10,101 @@
 #include <stdio.h>
 #include <stdlib.h>
 #include <stdarg.h>
+#include <string.h>
+#include <strings.h>
+#include <time.h>
+#include <sys/time.h>
+#include <syslog.h>
+#include <errno.h>
 #include "debug.h"
 
+static char *debug_ident = NULL;
 static uint8_t debug_level = DBG_WARN;
+static FILE *debug_file = NULL;
+static int debug_syslogfacility = 0;
+
+void debug_init(char *ident) {
+    debug_file = stderr;
+    setvbuf(debug_file, NULL, _IONBF, 0);
+    debug_ident = ident;
+}
 
 void debug_set_level(uint8_t level) {
     debug_level = level;
 }
 
+uint8_t debug_get_level() {
+    return debug_level;
+}
+
+int debug_set_destination(char *dest) {
+    extern int errno;
+    
+    if (!strncasecmp(dest, "file:///", 8)) {
+	debug_file = fopen(dest + 7, "a");
+	if (!debug_file)
+	    debugx(1, DBG_ERR, "Failed to open logfile %s\n%s",
+		   dest + 7, strerror(errno));
+	setvbuf(debug_file, NULL, _IONBF, 0);
+	return 1;
+    }
+    if (!strcasecmp(dest, "x-syslog://")) {
+	debug_syslogfacility = LOG_DAEMON;
+	openlog(debug_ident, LOG_PID, debug_syslogfacility);
+	return 1;
+    }
+    return 0;
+}
+
+void debug_logit(uint8_t level, const char *format, va_list ap) {
+    struct timeval now;
+    char *timebuf;
+    int priority;
+    
+    if (debug_syslogfacility) {
+	switch (level) {
+	case DBG_INFO:
+	    priority = LOG_INFO;
+	    break;
+	case DBG_WARN:
+	    priority = LOG_WARNING;
+	    break;
+	case DBG_ERR:
+	    priority = LOG_ERR;
+	    break;
+	default:
+	    priority = LOG_DEBUG;
+	}
+	vsyslog(priority, format, ap);
+    } else {
+	timebuf = malloc(256);
+	if (timebuf) {
+	    gettimeofday(&now, NULL);
+	    ctime_r(&now.tv_sec, timebuf);
+	    timebuf[strlen(timebuf) - 1] = '\0';
+	    fprintf(debug_file, "%s: ", timebuf);
+	    free(timebuf);
+	}
+	vfprintf(debug_file, format, ap);
+	fprintf(debug_file, "\n");
+    }
+}
+
 void debug(uint8_t level, char *format, ...) {
+    va_list ap;
+    if (level < debug_level)
+	return;
+    va_start(ap, format);
+    debug_logit(level, format, ap);
+    va_end(ap);
+}
+
+void debugx(int status, uint8_t level, char *format, ...) {
     if (level >= debug_level) {
 	va_list ap;
 	va_start(ap, format);
-	vfprintf(stderr, format, ap);
+	debug_logit(level, format, ap);
 	va_end(ap);
-	fprintf(stderr, "\n");
     }
-    if (level >= DBG_ERR)
-	exit(1);
+    exit(status);
 }