log.c

   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 EVENT2_EXPORT_SYMBOL ev_uint32_t event_debug_logging_mask_ = DEFAULT_MASK;
  73 #endif /* EVENT_DEBUG_LOGGING_ENABLED */
  74
  75 void
  76 event_enable_debug_logging(ev_uint32_t which)
  77 {
  78 #ifdef EVENT_DEBUG_LOGGING_ENABLED
  79         event_debug_logging_mask_ = which;
  80 #endif
  81 }
  82
  83 void
  84 event_set_fatal_callback(event_fatal_cb cb)
  85 {
  86         fatal_fn = cb;
  87 }
  88
  89 static void
  90 event_exit(int errcode)
  91 {
  92         if (fatal_fn) {
  93                 fatal_fn(errcode);
  94                 exit(errcode); /* should never be reached */
  95         } else if (errcode == EVENT_ERR_ABORT_)
  96                 abort();
  97         else
  98                 exit(errcode);
  99 }
 100
 101 void
 102 event_err(int eval, const char *fmt, ...)
 103 {
 104         va_list ap;
 105
 106         va_start(ap, fmt);
 107         event_logv_(EVENT_LOG_ERR, strerror(errno), fmt, ap);
 108         va_end(ap);
 109         event_exit(eval);
 110 }
 111
 112 void
 113 event_warn(const char *fmt, ...)
 114 {
 115         va_list ap;
 116
 117         va_start(ap, fmt);
 118         event_logv_(EVENT_LOG_WARN, strerror(errno), fmt, ap);
 119         va_end(ap);
 120 }
 121
 122 void
 123 event_sock_err(int eval, evutil_socket_t sock, const char *fmt, ...)
 124 {
 125         va_list ap;
 126         int err = evutil_socket_geterror(sock);
 127
 128         va_start(ap, fmt);
 129         event_logv_(EVENT_LOG_ERR, evutil_socket_error_to_string(err), fmt, ap);
 130         va_end(ap);
 131         event_exit(eval);
 132 }
 133
 134 void
 135 event_sock_warn(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_WARN, evutil_socket_error_to_string(err), fmt, ap);
 142         va_end(ap);
 143 }
 144
 145 void
 146 event_errx(int eval, const char *fmt, ...)
 147 {
 148         va_list ap;
 149
 150         va_start(ap, fmt);
 151         event_logv_(EVENT_LOG_ERR, NULL, fmt, ap);
 152         va_end(ap);
 153         event_exit(eval);
 154 }
 155
 156 void
 157 event_warnx(const char *fmt, ...)
 158 {
 159         va_list ap;
 160
 161         va_start(ap, fmt);
 162         event_logv_(EVENT_LOG_WARN, NULL, fmt, ap);
 163         va_end(ap);
 164 }
 165
 166 void
 167 event_msgx(const char *fmt, ...)
 168 {
 169         va_list ap;
 170
 171         va_start(ap, fmt);
 172         event_logv_(EVENT_LOG_MSG, NULL, fmt, ap);
 173         va_end(ap);
 174 }
 175
 176 void
 177 event_debugx_(const char *fmt, ...)
 178 {
 179         va_list ap;
 180
 181         va_start(ap, fmt);
 182         event_logv_(EVENT_LOG_DEBUG, NULL, fmt, ap);
 183         va_end(ap);
 184 }
 185
 186 void
 187 event_logv_(int severity, const char *errstr, const char *fmt, va_list ap)
 188 {
 189         char buf[1024];
 190         size_t len;
 191
 192         if (severity == EVENT_LOG_DEBUG && !event_debug_get_logging_mask_())
 193                 return;
 194
 195         if (fmt != NULL)
 196                 evutil_vsnprintf(buf, sizeof(buf), fmt, ap);
 197         else
 198                 buf[0] = '\0';
 199
 200         if (errstr) {
 201                 len = strlen(buf);
 202                 if (len < sizeof(buf) - 3) {
 203                         evutil_snprintf(buf + len, sizeof(buf) - len, ": %s", errstr);
 204                 }
 205         }
 206
 207         event_log(severity, buf);
 208 }
 209
 210 static event_log_cb log_fn = NULL;
 211
 212 void
 213 event_set_log_callback(event_log_cb cb)
 214 {
 215         log_fn = cb;
 216 }
 217
 218 static void
 219 event_log(int severity, const char *msg)
 220 {
 221         if (log_fn)
 222                 log_fn(severity, msg);
 223         else {
 224                 const char *severity_str;
 225                 switch (severity) {
 226                 case EVENT_LOG_DEBUG:
 227                         severity_str = "debug";
 228                         break;
 229                 case EVENT_LOG_MSG:
 230                         severity_str = "msg";
 231                         break;
 232                 case EVENT_LOG_WARN:
 233                         severity_str = "warn";
 234                         break;
 235                 case EVENT_LOG_ERR:
 236                         severity_str = "err";
 237                         break;
 238                 default:
 239                         severity_str = "???";
 240                         break;
 241                 }
 242                 (void)fprintf(stderr, "[%s] %s\n", severity_str, msg);
 243         }
 244 }