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