Renamed logf function to yaz_log. Removed VC++ project files.

[yaz-moved-to-github.git] / util / log.c

diff --git a/util/log.c b/util/log.c
index 46f74ea..f404cfc 100644 (file)
--- a/util/log.c
+++ b/util/log.c
@@ -1,10 +1,32 @@
 /*
- * Copyright (c) 1995, Index Data
+ * Copyright (c) 1995-1999, Index Data
  * See the file LICENSE for details.
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: log.c,v $
- * Revision 1.12  1997-05-01 15:08:14  adam
+ * Revision 1.19  1999-08-27 09:40:32  adam
+ * Renamed logf function to yaz_log. Removed VC++ project files.
+ *
+ * Revision 1.18  1998/10/28 10:27:00  adam
+ * New functions log_init_file, log_init_level, log_init_prefix.
+ *
+ * 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
+ * New windows NT/95 port using MSV5.0. Made prefix query handling
+ * thread safe. The function options ignores empty arguments when met.
+ *
+ * Revision 1.12  1997/05/01 15:08:14  adam
  * Added log_mask_str_x routine.
  *
  * Revision 1.11  1996/02/05 12:24:32  adam
@@ -80,8 +102,21 @@
 #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 = stderr;
+static FILE *l_file = NULL;
 static char l_prefix[512] = "log";
 
 static struct {
@@ -99,37 +134,52 @@ static struct {
     { 0, NULL }
 };  
 
-#ifndef strerror
-
-char *strerror(int n)
+FILE *log_file(void)
 {
-        extern char *sys_errlist[];
-        return sys_errlist[n];
+    if (!l_file)
+        l_file = stderr;
+    return l_file;
 }
 
-#endif
-
-FILE *log_file(void)
+void log_init_file (const char *fname)
 {
-    return l_file;
+    FILE *new_file;
+    if (!l_file)
+        l_file = stderr;
+    if (!fname || !*fname)
+        return;
+    if (!(new_file = fopen(fname, "a")))
+        return;
+    if (l_file != stderr)
+    {
+        fclose (l_file);
+    }
+    setvbuf(new_file, 0, _IONBF, 0);
+    l_file = new_file;
 }
 
-void log_init(int level, const char *prefix, const char *name)
+void log_init_level (int level)
 {
     l_level = level;
+}
+
+void log_init_prefix (const char *prefix)
+{
     if (prefix && *prefix)
        sprintf(l_prefix, "%.512s", prefix);
-    if (!name || !*name || l_file != stderr)
-       return;
-    if (!(l_file = fopen(name, "a")))
-        return;
-    setvbuf(l_file, 0, _IONBF, 0);
+}
+
+void log_init(int level, const char *prefix, const char *fname)
+{
+    log_init_level (level);
+    log_init_prefix (prefix);
+    log_init_file (fname);
 }
 
 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)
 {
@@ -143,7 +193,7 @@ void log_event_end (void (*func)(int, const char *, void *), void *info)
     end_hook_info = info;
 }
 
-void logf(int level, const char *fmt, ...)
+void yaz_log(int level, const char *fmt, ...)
 {
     va_list ap;
     char buf[4096], flags[1024];
@@ -155,6 +205,8 @@ void logf(int level, const char *fmt, ...)
 
     if (!(level & l_level))
        return;
+    if (!l_file)
+        l_file = stderr;
     *flags = '\0';
     for (i = 0; level && mask_names[i].name; i++)
        if (mask_names[i].mask & level)
@@ -196,7 +248,7 @@ int log_mask_str_x (const char *str, int level)
             level = atoi (str);
         else
             for (i = 0; mask_names[i].name; i++)
-                if (strlen (mask_names[i].name) == p-str &&
+                if (strlen (mask_names[i].name) == (size_t) (p-str) &&
                     memcmp (mask_names[i].name, str, p-str) == 0)
                 {
                     if (mask_names[i].mask)