1 /* $OpenBSD$ */
2
3 /*
4 * Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
5 *
6 * Permission to use, copy, modify, and distribute this software for any
7 * purpose with or without fee is hereby granted, provided that the above
8 * copyright notice and this permission notice appear in all copies.
9 *
10 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14 * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
15 * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
16 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17 */
18
19 #include "includes.h"
20
21 #include <sys/types.h>
22 #include <sys/queue.h>
23 #include <sys/tree.h>
24 #include <sys/socket.h>
25
26 #include <errno.h>
27 #include <pwd.h>
28 #include <stdarg.h>
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <syslog.h>
33 #include <time.h>
34 #include <unistd.h>
35
36 #include "log.h"
37
38 #define TRACE_DEBUG 0x1
39
40 static int foreground;
41 static int verbose;
42
43 void vlog(int, const char *, va_list);
44 void logit(int, const char *, ...)
45 __attribute__((format (printf, 2, 3)));
46
47
48 void
log_init(int n_foreground)49 log_init(int n_foreground)
50 {
51 extern char *__progname;
52
53 foreground = n_foreground;
54 if (!foreground)
55 openlog(__progname, LOG_PID | LOG_NDELAY, LOG_MAIL);
56
57 tzset();
58 }
59
60 void
log_verbose(int v)61 log_verbose(int v)
62 {
63 verbose = v;
64 }
65
66 void
logit(int pri,const char * fmt,...)67 logit(int pri, const char *fmt, ...)
68 {
69 va_list ap;
70
71 va_start(ap, fmt);
72 vlog(pri, fmt, ap);
73 va_end(ap);
74 }
75
76 void
vlog(int pri,const char * fmt,va_list ap)77 vlog(int pri, const char *fmt, va_list ap)
78 {
79 extern char *__progname;
80 char *nfmt;
81
82 if (foreground) {
83 /* best effort in out of mem situations */
84 if (asprintf(&nfmt, "%s[%u]: %s\n", __progname, getpid(), fmt) == -1) {
85 fprintf(stderr, "%s[%u]: ", __progname, getpid());
86 vfprintf(stderr, fmt, ap);
87 fprintf(stderr, "\n");
88 } else {
89 vfprintf(stderr, nfmt, ap);
90 free(nfmt);
91 }
92 fflush(stderr);
93 } else
94 vsyslog(pri, fmt, ap);
95 }
96
97
98 void
log_warn(const char * emsg,...)99 log_warn(const char *emsg, ...)
100 {
101 char *nfmt;
102 va_list ap;
103
104 /* best effort to even work in out of memory situations */
105 if (emsg == NULL)
106 logit(LOG_CRIT, "%s", strerror(errno));
107 else {
108 va_start(ap, emsg);
109
110 if (asprintf(&nfmt, "%s: %s", emsg, strerror(errno)) == -1) {
111 /* we tried it... */
112 vlog(LOG_CRIT, emsg, ap);
113 logit(LOG_CRIT, "%s", strerror(errno));
114 } else {
115 vlog(LOG_CRIT, nfmt, ap);
116 free(nfmt);
117 }
118 va_end(ap);
119 }
120 }
121
122 void
log_warnx(const char * emsg,...)123 log_warnx(const char *emsg, ...)
124 {
125 va_list ap;
126
127 va_start(ap, emsg);
128 vlog(LOG_CRIT, emsg, ap);
129 va_end(ap);
130 }
131
132 void
log_info(const char * emsg,...)133 log_info(const char *emsg, ...)
134 {
135 va_list ap;
136
137 va_start(ap, emsg);
138 vlog(LOG_INFO, emsg, ap);
139 va_end(ap);
140 }
141
142 void
log_debug(const char * emsg,...)143 log_debug(const char *emsg, ...)
144 {
145 va_list ap;
146
147 if (verbose & TRACE_DEBUG) {
148 va_start(ap, emsg);
149 vlog(LOG_DEBUG, emsg, ap);
150 va_end(ap);
151 }
152 }
153
154 void
log_trace(int mask,const char * emsg,...)155 log_trace(int mask, const char *emsg, ...)
156 {
157 va_list ap;
158
159 if (verbose & mask) {
160 va_start(ap, emsg);
161 vlog(LOG_DEBUG, emsg, ap);
162 va_end(ap);
163 }
164 }
165
166 static void
fatal_arg(const char * emsg,va_list ap)167 fatal_arg(const char *emsg, va_list ap)
168 {
169 #define FATALBUFSIZE 1024
170 static char ebuffer[FATALBUFSIZE];
171
172 if (emsg == NULL)
173 (void)strlcpy(ebuffer, strerror(errno), sizeof ebuffer);
174 else {
175 if (errno) {
176 (void)vsnprintf(ebuffer, sizeof ebuffer, emsg, ap);
177 (void)strlcat(ebuffer, ": ", sizeof ebuffer);
178 (void)strlcat(ebuffer, strerror(errno), sizeof ebuffer);
179 }
180 else
181 (void)vsnprintf(ebuffer, sizeof ebuffer, emsg, ap);
182 }
183 logit(LOG_CRIT, "fatal: %s", ebuffer);
184 }
185
186 void
fatal(const char * emsg,...)187 fatal(const char *emsg, ...)
188 {
189 va_list ap;
190
191 va_start(ap, emsg);
192 fatal_arg(emsg, ap);
193 va_end(ap);
194 exit(1);
195 }
196
197 void
fatalx(const char * emsg,...)198 fatalx(const char *emsg, ...)
199 {
200 va_list ap;
201
202 errno = 0;
203 va_start(ap, emsg);
204 fatal_arg(emsg, ap);
205 va_end(ap);
206 exit(1);
207 }
208