contrib/ntpd/log.c

   1 /*      $OpenBSD: log.c,v 1.6 2004/07/12 09:22:38 dtucker Exp $ */
   2
   3 /*
   4  * Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
   5  *
   6  * Permission to use, copy, modify, and distribute this software for any
   7  * purpose with or without fee is hereby granted, provided that the above
   8  * copyright notice and this permission notice appear in all copies.
   9  *
  10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  14  * WHATSOEVER RESULTING FROM LOSS OF MIND, USE, DATA OR PROFITS, WHETHER
  15  * IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
  16  * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  17  */
  18
  19 #include <sys/types.h>
  20 #include <sys/socket.h>
  21 #include <netinet/in.h>
  22 #include <arpa/inet.h>
  23
  24 #include <errno.h>
  25 #include <stdarg.h>
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <syslog.h>
  30 #include <time.h>
  31 #include <unistd.h>
  32
  33 #include "ntpd.h"
  34
  35 int     debug;
  36
  37 void     logit(int, const char *, ...);
  38
  39 void
  40 log_init(int n_debug)
  41 {
  42         extern char     *__progname;
  43
  44         debug = n_debug;
  45
  46         if (!debug)
  47                 openlog(__progname, LOG_PID | LOG_NDELAY, LOG_DAEMON);
  48
  49         tzset();
  50 }
  51
  52 void
  53 logit(int pri, const char *fmt, ...)
  54 {
  55         va_list ap;
  56
  57         va_start(ap, fmt);
  58         vlog(pri, fmt, ap);
  59         va_end(ap);
  60 }
  61
  62 void
  63 vlog(int pri, const char *fmt, va_list ap)
  64 {
  65         char    *nfmt;
  66
  67         if (debug) {
  68                 /* best effort in out of mem situations */
  69                 if (asprintf(&nfmt, "%s\n", fmt) == -1) {
  70                         vfprintf(stderr, fmt, ap);
  71                         fprintf(stderr, "\n");
  72                 } else {
  73                         vfprintf(stderr, nfmt, ap);
  74                         free(nfmt);
  75                 }
  76                 fflush(stderr);
  77         } else
  78                 vsyslog(pri, fmt, ap);
  79 }
  80
  81
  82 void
  83 log_warn(const char *emsg, ...)
  84 {
  85         char    *nfmt;
  86         va_list  ap;
  87
  88         /* best effort to even work in out of memory situations */
  89         if (emsg == NULL)
  90                 logit(LOG_CRIT, "%s", strerror(errno));
  91         else {
  92                 va_start(ap, emsg);
  93
  94                 if (asprintf(&nfmt, "%s: %s", emsg, strerror(errno)) == -1) {
  95                         /* we tried it... */
  96                         vlog(LOG_CRIT, emsg, ap);
  97                         logit(LOG_CRIT, "%s", strerror(errno));
  98                 } else {
  99                         vlog(LOG_CRIT, nfmt, ap);
 100                         free(nfmt);
 101                 }
 102                 va_end(ap);
 103         }
 104 }
 105
 106 void
 107 log_warnx(const char *emsg, ...)
 108 {
 109         va_list  ap;
 110
 111         va_start(ap, emsg);
 112         vlog(LOG_CRIT, emsg, ap);
 113         va_end(ap);
 114 }
 115
 116 void
 117 log_info(const char *emsg, ...)
 118 {
 119         va_list  ap;
 120
 121         va_start(ap, emsg);
 122         vlog(LOG_INFO, emsg, ap);
 123         va_end(ap);
 124 }
 125
 126 void
 127 log_debug(const char *emsg, ...)
 128 {
 129         va_list  ap;
 130
 131         if (debug) {
 132                 va_start(ap, emsg);
 133                 vlog(LOG_DEBUG, emsg, ap);
 134                 va_end(ap);
 135         }
 136 }
 137
 138 void
 139 fatal(const char *emsg)
 140 {
 141         if (emsg == NULL)
 142                 logit(LOG_CRIT, "fatal: %s", strerror(errno));
 143         else
 144                 if (errno)
 145                         logit(LOG_CRIT, "fatal: %s: %s",
 146                             emsg, strerror(errno));
 147                 else
 148                         logit(LOG_CRIT, "fatal: %s", emsg);
 149
 150         exit(1);
 151 }
 152
 153 void
 154 fatalx(const char *emsg)
 155 {
 156         errno = 0;
 157         fatal(emsg);
 158 }
 159
 160 const char *
 161 log_sockaddr(struct sockaddr *sa)
 162 {
 163         static char     buf[NI_MAXHOST];
 164
 165         if (getnameinfo(sa, SA_LEN(sa), buf, sizeof(buf), NULL, 0,
 166             NI_NUMERICHOST))
 167                 return ("(unknown)");
 168         else
 169                 return (buf);
 170 }