2 * Copyright (c) 1995, Index Data
3 * See the file LICENSE for details.
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.10 1995-12-06 09:51:27 quinn
8 * Fixed the log-prefix buffer - it was too small and the setup code lacked
11 * Revision 1.9 1995/09/29 17:12:34 quinn
14 * Revision 1.8 1995/09/27 15:03:02 quinn
15 * Modified function heads & prototypes.
17 * Revision 1.7 1995/06/19 12:40:18 quinn
20 * Revision 1.6 1995/06/15 15:45:03 quinn
23 * Revision 1.5 1995/05/16 08:51:11 quinn
24 * License, documentation, and memory fixes
26 * Revision 1.4 1995/05/15 11:56:55 quinn
27 * Debuggng & adjustments.
29 * Revision 1.3 1995/04/10 10:23:51 quinn
32 * Revision 1.2 1995/03/31 10:16:55 quinn
35 * Revision 1.1 1995/03/30 10:26:53 quinn
38 * Revision 1.9 1994/12/12 12:09:02 quinn
41 * Revision 1.8 1994/11/22 13:15:38 quinn
44 * Revision 1.7 1994/10/05 10:16:11 quinn
45 * Added xrealloc. Fixed bug in log.
47 * Revision 1.6 1994/10/04 14:02:19 quinn
50 * Revision 1.5 1994/09/28 13:07:41 adam
51 * Implemented log_mask_str.
53 * Revision 1.4 1994/09/27 20:04:13 quinn
56 * Revision 1.3 1994/08/18 08:18:48 quinn
57 * Added prefix to log_init.
59 * Revision 1.2 1994/08/17 14:27:53 quinn
62 * Revision 1.1 1994/08/17 13:23:15 quinn
76 static int l_level = LOG_DEFAULT_LEVEL;
77 static FILE *l_file = stderr;
78 static char l_prefix[512] = "log";
85 { LOG_FATAL, "fatal"},
86 { LOG_DEBUG, "debug"},
99 extern char *sys_errlist[];
100 return sys_errlist[n];
110 void log_init(int level, const char *prefix, const char *name)
113 if (prefix && *prefix)
114 sprintf(l_prefix, "%.512s", prefix);
115 if (!name || !*name || l_file != stderr)
117 if (!(l_file = fopen(name, "a")))
119 setvbuf(l_file, 0, _IONBF, 0);
122 void logf(int level, const char *fmt, ...)
125 char buf[4096], flags[1024];
131 if (!(level & l_level))
133 if (level & LOG_ERRNO)
136 for (i = 0; level && mask_names[i].name; i++)
137 if (mask_names[i].mask & level)
139 if (*mask_names[i].name)
140 sprintf(flags + strlen(flags), "[%s]", mask_names[i].name);
141 level -= mask_names[i].mask;
144 vsprintf(buf, fmt, ap);
146 sprintf(buf + strlen(buf), " [%s]", strerror(errno));
148 tim = localtime(&ti);
149 strftime(tbuf, 50, "%H:%M:%S-%d/%m", tim);
150 fprintf(l_file, "%s: %s: %s %s\n", tbuf, l_prefix, flags, buf);
154 int log_mask_str (const char *str)
157 int i, level = LOG_DEFAULT_LEVEL;
161 for (p = str; *p && *p != ','; p++)
163 if (*str == '-' || isdigit(*str))
166 for (i = 0; mask_names[i].name; i++)
167 if (strlen (mask_names[i].name) == p-str &&
168 memcmp (mask_names[i].name, str, p-str) == 0)
170 if (mask_names[i].mask)
171 level |= mask_names[i].mask;