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