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