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