#ifndef lint
static char *rcsid = "$Id: log.c,v 1.1 2003/06/04 00:25:53 marka Exp $";
#endif
#include <config.h>
#include <stdio.h>
#include <stdarg.h>
#include <stdlib.h>
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#include <idn/log.h>
#define LOGLEVEL_ENV "IDN_LOG_LEVEL"
#ifdef DEBUG
#define DEFAULT_LOG_LEVEL idn_log_level_info
#else
#define DEFAULT_LOG_LEVEL idn_log_level_error
#endif
static int log_level = -1;
static idn_log_proc_t log_proc;
static void initialize(void);
static void log(int level, const char *fmt, va_list args);
static void log_to_stderr(int level, const char *buf);
void
idn_log_fatal(const char *fmt, ...) {
va_list args;
va_start(args, fmt);
log(idn_log_level_fatal, fmt, args);
va_end(args);
exit(1);
}
void
idn_log_error(const char *fmt, ...) {
va_list args;
va_start(args, fmt);
log(idn_log_level_error, fmt, args);
va_end(args);
}
void
idn_log_warning(const char *fmt, ...) {
va_list args;
va_start(args, fmt);
log(idn_log_level_warning, fmt, args);
va_end(args);
}
void
idn_log_info(const char *fmt, ...) {
va_list args;
va_start(args, fmt);
log(idn_log_level_info, fmt, args);
va_end(args);
}
void
idn_log_trace(const char *fmt, ...) {
va_list args;
va_start(args, fmt);
log(idn_log_level_trace, fmt, args);
va_end(args);
}
void
idn_log_dump(const char *fmt, ...) {
va_list args;
va_start(args, fmt);
log(idn_log_level_dump, fmt, args);
va_end(args);
}
void
idn_log_setlevel(int level) {
if (level >= 0)
log_level = level;
}
int
idn_log_getlevel(void) {
if (log_level < 0)
initialize();
return log_level;
}
void
idn_log_setproc(idn_log_proc_t proc) {
if (proc == NULL)
log_proc = log_to_stderr;
else
log_proc = proc;
}
static void
initialize(void) {
char *s;
if (log_level < 0) {
if ((s = getenv(LOGLEVEL_ENV)) != NULL) {
int level = atoi(s);
if (level >= 0)
log_level = level;
}
if (log_level < 0)
log_level = DEFAULT_LOG_LEVEL;
}
if (log_proc == NULL)
log_proc = log_to_stderr;
}
static void
log(int level, const char *fmt, va_list args) {
char buf[1024];
initialize();
if (log_level < level)
return;
#if HAVE_VSNPRINTF
(void)vsnprintf(buf, sizeof(buf), fmt, args);
#else
(void)vsprintf(buf, fmt, args);
#endif
(*log_proc)(level, buf);
}
static void
log_to_stderr(int level, const char *buf) {
char *title;
char tmp[20];
switch (level) {
case idn_log_level_fatal:
title = "FATAL";
break;
case idn_log_level_error:
title = "ERROR";
break;
case idn_log_level_warning:
title = "WARNING";
break;
case idn_log_level_info:
title = "INFO";
break;
case idn_log_level_trace:
title = "TRACE";
break;
case idn_log_level_dump:
title = "DUMP";
break;
default:
(void)sprintf(tmp, "LEVEL%d", level);
title = tmp;
break;
}
fprintf(stderr, "%u: [%s] %s", (unsigned int)getpid(), title, buf);
}