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