xref: /netbsd-src/external/bsd/libevent/dist/log.c (revision 7330f729ccf0bd976a06f95fad452fe774fc7fd1)
1 /*	$NetBSD: log.c,v 1.5 2017/01/31 23:17:39 christos Exp $	*/
2 /*	$OpenBSD: err.c,v 1.2 2002/06/25 15:50:15 mickey Exp $	*/
3 
4 /*
5  * log.c
6  *
7  * Based on err.c, which was adapted from OpenBSD libc *err* *warn* code.
8  *
9  * Copyright (c) 2005-2012 Niels Provos and Nick Mathewson
10  *
11  * Copyright (c) 2000 Dug Song <dugsong@monkey.org>
12  *
13  * Copyright (c) 1993
14  *	The Regents of the University of California.  All rights reserved.
15  *
16  * Redistribution and use in source and binary forms, with or without
17  * modification, are permitted provided that the following conditions
18  * are met:
19  * 1. Redistributions of source code must retain the above copyright
20  *    notice, this list of conditions and the following disclaimer.
21  * 2. Redistributions in binary form must reproduce the above copyright
22  *    notice, this list of conditions and the following disclaimer in the
23  *    documentation and/or other materials provided with the distribution.
24  * 3. Neither the name of the University nor the names of its contributors
25  *    may be used to endorse or promote products derived from this software
26  *    without specific prior written permission.
27  *
28  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
29  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
30  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
31  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
32  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
37  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
38  * SUCH DAMAGE.
39  */
40 
41 #include "event2/event-config.h"
42 #include <sys/cdefs.h>
43 __RCSID("$NetBSD: log.c,v 1.5 2017/01/31 23:17:39 christos Exp $");
44 #include "evconfig-private.h"
45 
46 #ifdef _WIN32
47 #include <winsock2.h>
48 #define WIN32_LEAN_AND_MEAN
49 #include <windows.h>
50 #undef WIN32_LEAN_AND_MEAN
51 #endif
52 #include <sys/types.h>
53 #include <stdio.h>
54 #include <stdlib.h>
55 #include <stdarg.h>
56 #include <string.h>
57 #include <errno.h>
58 #include "event2/event.h"
59 #include "event2/util.h"
60 
61 #include "log-internal.h"
62 
63 static void event_log(int severity, const char *msg);
64 static void event_exit(int errcode) EV_NORETURN;
65 
66 static event_fatal_cb fatal_fn = NULL;
67 
68 #ifdef EVENT_DEBUG_LOGGING_ENABLED
69 #ifdef USE_DEBUG
70 #define DEFAULT_MASK EVENT_DBG_ALL
71 #else
72 #define DEFAULT_MASK 0
73 #endif
74 
75 #ifdef USE_GLOBAL_FOR_DEBUG_LOGGING
76 ev_uint32_t event_debug_logging_mask_ = DEFAULT_MASK;
77 #else
78 static ev_uint32_t event_debug_logging_mask_ = DEFAULT_MASK;
79 ev_uint32_t
80 event_debug_get_logging_mask_(void)
81 {
82 	return event_debug_logging_mask_;
83 }
84 #endif
85 #endif /* EVENT_DEBUG_LOGGING_ENABLED */
86 
87 void
88 event_enable_debug_logging(ev_uint32_t which)
89 {
90 #ifdef EVENT_DEBUG_LOGGING_ENABLED
91 	event_debug_logging_mask_ = which;
92 #endif
93 }
94 
95 void
96 event_set_fatal_callback(event_fatal_cb cb)
97 {
98 	fatal_fn = cb;
99 }
100 
101 static void
102 event_exit(int errcode)
103 {
104 	if (fatal_fn) {
105 		fatal_fn(errcode);
106 		exit(errcode); /* should never be reached */
107 	} else if (errcode == EVENT_ERR_ABORT_)
108 		abort();
109 	else
110 		exit(errcode);
111 }
112 
113 void
114 event_err(int eval, const char *fmt, ...)
115 {
116 	va_list ap;
117 
118 	va_start(ap, fmt);
119 	event_logv_(EVENT_LOG_ERR, strerror(errno), fmt, ap);
120 	va_end(ap);
121 	event_exit(eval);
122 }
123 
124 void
125 event_warn(const char *fmt, ...)
126 {
127 	va_list ap;
128 
129 	va_start(ap, fmt);
130 	event_logv_(EVENT_LOG_WARN, strerror(errno), fmt, ap);
131 	va_end(ap);
132 }
133 
134 void
135 event_sock_err(int eval, evutil_socket_t sock, const char *fmt, ...)
136 {
137 	va_list ap;
138 	int err = evutil_socket_geterror(sock);
139 
140 	va_start(ap, fmt);
141 	event_logv_(EVENT_LOG_ERR, evutil_socket_error_to_string(err), fmt, ap);
142 	va_end(ap);
143 	event_exit(eval);
144 }
145 
146 void
147 event_sock_warn(evutil_socket_t sock, const char *fmt, ...)
148 {
149 	va_list ap;
150 	int err = evutil_socket_geterror(sock);
151 
152 	va_start(ap, fmt);
153 	event_logv_(EVENT_LOG_WARN, evutil_socket_error_to_string(err), fmt, ap);
154 	va_end(ap);
155 }
156 
157 void
158 event_errx(int eval, const char *fmt, ...)
159 {
160 	va_list ap;
161 
162 	va_start(ap, fmt);
163 	event_logv_(EVENT_LOG_ERR, NULL, fmt, ap);
164 	va_end(ap);
165 	event_exit(eval);
166 }
167 
168 void
169 event_warnx(const char *fmt, ...)
170 {
171 	va_list ap;
172 
173 	va_start(ap, fmt);
174 	event_logv_(EVENT_LOG_WARN, NULL, fmt, ap);
175 	va_end(ap);
176 }
177 
178 void
179 event_msgx(const char *fmt, ...)
180 {
181 	va_list ap;
182 
183 	va_start(ap, fmt);
184 	event_logv_(EVENT_LOG_MSG, NULL, fmt, ap);
185 	va_end(ap);
186 }
187 
188 void
189 event_debugx_(const char *fmt, ...)
190 {
191 	va_list ap;
192 
193 	va_start(ap, fmt);
194 	event_logv_(EVENT_LOG_DEBUG, NULL, fmt, ap);
195 	va_end(ap);
196 }
197 
198 void
199 event_logv_(int severity, const char *errstr, const char *fmt, va_list ap)
200 {
201 	char buf[1024];
202 	size_t len;
203 
204 	if (severity == EVENT_LOG_DEBUG && !event_debug_get_logging_mask_())
205 		return;
206 
207 	if (fmt != NULL)
208 		evutil_vsnprintf(buf, sizeof(buf), fmt, ap);
209 	else
210 		buf[0] = '\0';
211 
212 	if (errstr) {
213 		len = strlen(buf);
214 		if (len < sizeof(buf) - 3) {
215 			evutil_snprintf(buf + len, sizeof(buf) - len, ": %s", errstr);
216 		}
217 	}
218 
219 	event_log(severity, buf);
220 }
221 
222 static event_log_cb log_fn = NULL;
223 
224 void
225 event_set_log_callback(event_log_cb cb)
226 {
227 	log_fn = cb;
228 }
229 
230 static void
231 event_log(int severity, const char *msg)
232 {
233 	if (log_fn)
234 		log_fn(severity, msg);
235 	else {
236 		const char *severity_str;
237 		switch (severity) {
238 		case EVENT_LOG_DEBUG:
239 			severity_str = "debug";
240 			break;
241 		case EVENT_LOG_MSG:
242 			severity_str = "msg";
243 			break;
244 		case EVENT_LOG_WARN:
245 			severity_str = "warn";
246 			break;
247 		case EVENT_LOG_ERR:
248 			severity_str = "err";
249 			break;
250 		default:
251 			severity_str = "???";
252 			break;
253 		}
254 		(void)fprintf(stderr, "[%s] %s\n", severity_str, msg);
255 	}
256 }
257