gotwebd/log.c

   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 "got_compat.h"
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21 #include <stdarg.h>
  22 #include <string.h>
  23 #include <syslog.h>
  24 #include <errno.h>
  25 #include <time.h>
  26
  27 static int       debug;
  28 static int       verbose;
  29 const char      *log_procname;
  30
  31 void    log_init(int, int);
  32 void    log_procinit(const char *);
  33 void    log_setverbose(int);
  34 int     log_getverbose(void);
  35 void    log_warn(const char *, ...)
  36             __attribute__((__format__ (printf, 1, 2)));
  37 void    log_warnx(const char *, ...)
  38             __attribute__((__format__ (printf, 1, 2)));
  39 void    log_info(const char *, ...)
  40             __attribute__((__format__ (printf, 1, 2)));
  41 void    log_debug(const char *, ...)
  42             __attribute__((__format__ (printf, 1, 2)));
  43 void    logit(int, const char *, ...)
  44             __attribute__((__format__ (printf, 2, 3)));
  45 void    vlog(int, const char *, va_list)
  46             __attribute__((__format__ (printf, 2, 0)));
  47 __dead void fatal(const char *, ...)
  48             __attribute__((__format__ (printf, 1, 2)));
  49 __dead void fatalx(const char *, ...)
  50             __attribute__((__format__ (printf, 1, 2)));
  51
  52 void
  53 log_init(int n_debug, int facility)
  54 {
  55         debug = n_debug;
  56         verbose = n_debug;
  57         log_procinit(getprogname());
  58
  59         if (!debug)
  60                 openlog(getprogname(), LOG_PID | LOG_NDELAY, facility);
  61
  62         tzset();
  63 }
  64
  65 void
  66 log_procinit(const char *procname)
  67 {
  68         if (procname != NULL)
  69                 log_procname = procname;
  70 }
  71
  72 void
  73 log_setverbose(int v)
  74 {
  75         verbose = v;
  76 }
  77
  78 int
  79 log_getverbose(void)
  80 {
  81         return (verbose);
  82 }
  83
  84 void
  85 logit(int pri, const char *fmt, ...)
  86 {
  87         va_list ap;
  88
  89         va_start(ap, fmt);
  90         vlog(pri, fmt, ap);
  91         va_end(ap);
  92 }
  93
  94 void
  95 vlog(int pri, const char *fmt, va_list ap)
  96 {
  97         char *nfmt;
  98         int saved_errno = errno;
  99
 100         if (debug) {
 101                 /* best effort in out of mem situations */
 102                 if (asprintf(&nfmt, "%s\n", fmt) == -1) {
 103                         vfprintf(stderr, fmt, ap);
 104                         fprintf(stderr, "\n");
 105                 } else {
 106                         vfprintf(stderr, nfmt, ap);
 107                         free(nfmt);
 108                 }
 109                 fflush(stderr);
 110         } else
 111                 vsyslog(pri, fmt, ap);
 112
 113         errno = saved_errno;
 114 }
 115
 116 void
 117 log_warn(const char *emsg, ...)
 118 {
 119         char *nfmt;
 120         va_list ap;
 121         int saved_errno = errno;
 122
 123         /* best effort to even work in out of memory situations */
 124         if (emsg == NULL)
 125                 logit(LOG_CRIT, "%s", strerror(saved_errno));
 126         else {
 127                 va_start(ap, emsg);
 128
 129                 if (asprintf(&nfmt, "%s: %s", emsg,
 130                     strerror(saved_errno)) == -1) {
 131                         /* we tried it... */
 132                         vlog(LOG_CRIT, emsg, ap);
 133                         logit(LOG_CRIT, "%s", strerror(saved_errno));
 134                 } else {
 135                         vlog(LOG_CRIT, nfmt, ap);
 136                         free(nfmt);
 137                 }
 138                 va_end(ap);
 139         }
 140
 141         errno = saved_errno;
 142 }
 143
 144 void
 145 log_warnx(const char *emsg, ...)
 146 {
 147         va_list ap;
 148
 149         va_start(ap, emsg);
 150         vlog(LOG_CRIT, emsg, ap);
 151         va_end(ap);
 152 }
 153
 154 void
 155 log_info(const char *emsg, ...)
 156 {
 157         va_list ap;
 158
 159         va_start(ap, emsg);
 160         vlog(LOG_INFO, emsg, ap);
 161         va_end(ap);
 162 }
 163
 164 void
 165 log_debug(const char *emsg, ...)
 166 {
 167         va_list ap;
 168
 169         if (verbose > 1) {
 170                 va_start(ap, emsg);
 171                 vlog(LOG_DEBUG, emsg, ap);
 172                 va_end(ap);
 173         }
 174 }
 175
 176 static void
 177 vfatalc(int code, const char *emsg, va_list ap)
 178 {
 179         static char s[BUFSIZ];
 180         const char *sep;
 181
 182         if (emsg != NULL) {
 183                 (void)vsnprintf(s, sizeof(s), emsg, ap);
 184                 sep = ": ";
 185         } else {
 186                 s[0] = '\0';
 187                 sep = "";
 188         }
 189         if (code)
 190                 logit(LOG_CRIT, "%s: %s%s%s",
 191                     log_procname, s, sep, strerror(code));
 192         else
 193                 logit(LOG_CRIT, "%s%s%s", log_procname, sep, s);
 194 }
 195
 196 void
 197 fatal(const char *emsg, ...)
 198 {
 199         va_list ap;
 200
 201         va_start(ap, emsg);
 202         vfatalc(errno, emsg, ap);
 203         va_end(ap);
 204         exit(1);
 205 }
 206
 207 void
 208 fatalx(const char *emsg, ...)
 209 {
 210         va_list ap;
 211
 212         va_start(ap, emsg);
 213         vfatalc(0, emsg, ap);
 214         va_end(ap);
 215         exit(1);
 216 }