* Sebastian Hammer, Adam Dickmeiss
*
* $Log: log.c,v $
- * Revision 1.14 1997-09-18 08:48:09 adam
+ * Revision 1.17 1997-12-09 16:11:02 adam
+ * Assume strerror is defined on Unixes as well. It's standard ANSI.
+ *
+ * Revision 1.16 1997/10/06 08:55:07 adam
+ * Changed log_init so that previous (if any) is closed.
+ *
+ * Revision 1.15 1997/09/29 07:13:13 adam
+ * Minor changes.
+ *
+ * Revision 1.14 1997/09/18 08:48:09 adam
* Fixed minor bug that caused log_init to ignore filename.
*
* Revision 1.13 1997/09/01 08:54:13 adam
#include <time.h>
#include <log.h>
+#define HAS_STRERROR 1
+
+#if HAS_STRERROR
+
+#else
+char *strerror(int n)
+{
+ extern char *sys_errlist[];
+ return sys_errlist[n];
+}
+
+#endif
+
static int l_level = LOG_DEFAULT_LEVEL;
static FILE *l_file = NULL;
static char l_prefix[512] = "log";
{ 0, NULL }
};
-
-#ifndef strerror
-#ifndef WINDOWS
-char *strerror(int n)
-{
- extern char *sys_errlist[];
- return sys_errlist[n];
-}
-
-#endif
-#endif
-
FILE *log_file(void)
{
+ if (!l_file)
+ l_file = stderr;
return l_file;
}
void log_init(int level, const char *prefix, const char *name)
{
+ FILE *new_file;
l_level = level;
if (prefix && *prefix)
sprintf(l_prefix, "%.512s", prefix);
+ if (!l_file)
+ l_file = stderr;
if (!name || !*name)
return;
- if (l_file != stderr && l_file != 0)
- return;
- if (!(l_file = fopen(name, "a")))
+ if (!(new_file = fopen(name, "a")))
return;
- setvbuf(l_file, 0, _IONBF, 0);
+ if (l_file != stderr)
+ {
+ setvbuf(new_file, 0, _IONBF, 0);
+ fclose (l_file);
+ }
+ l_file = new_file;
}
static void (*start_hook_func)(int, const char *, void *) = NULL;
-void *start_hook_info;
+static void *start_hook_info;
static void (*end_hook_func)(int, const char *, void *) = NULL;
-void *end_hook_info;
+static void *end_hook_info;
void log_event_start (void (*func)(int, const char *, void *), void *info)
{