text: /*	$OpenBSD: log.c,v 1.5 2014/11/03 20:15:31 bluhm Exp $ */
  
  /*
   * Copyright (c) 2003, 2004 Henning Brauer <henning@openbsd.org>
   *
   * Permission to use, copy, modify, and distribute this software for any
   * purpose with or without fee is hereby granted, provided that the above
   * copyright notice and this permission notice appear in all copies.
   *
   * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
   * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
   * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
   * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
   * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
   * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
   */
  
  #include <errno.h>
  #include <stdarg.h>
  #include <stdio.h>
  #include <stdlib.h>
  #include <string.h>
  #include <syslog.h>
  #include <unistd.h>
  
  #include "ripd.h"
  #include "log.h"
  
  static const char * const procnames[] = {
  	"parent",
  	"ripe",
  	"rde"
  };
  
  int	debug;
  int	verbose;
  
  void
  log_init(int n_debug)
  {
  	extern char	*__progname;
  
  	debug = n_debug;
  
  	if (!debug)
  		openlog(__progname, LOG_PID | LOG_NDELAY, LOG_DAEMON);
  
  	tzset();
  }
  
  void
  log_verbose(int v)
  {
  	verbose = v;
  }
  
  void
  logit(int pri, const char *fmt, ...)
  {
  	va_list	ap;
  
  	va_start(ap, fmt);
  	vlog(pri, fmt, ap);
  	va_end(ap);
  }
  
  void
  vlog(int pri, const char *fmt, va_list ap)
  {
  	char	*nfmt;
  
  	if (debug) {
  		/* best effort in out of mem situations */
  		if (asprintf(&nfmt, "%s\n", fmt) == -1) {
  			vfprintf(stderr, fmt, ap);
  			fprintf(stderr, "\n");
  		} else {
  			vfprintf(stderr, nfmt, ap);
  			free(nfmt);
  		}
  		fflush(stderr);
  	} else
  		vsyslog(pri, fmt, ap);
  }
  
  void
  log_warn(const char *emsg, ...)
  {
  	char	*nfmt;
  	va_list	 ap;
  
  	/* best effort to even work in out of memory situations */
  	if (emsg == NULL)
  		logit(LOG_CRIT, "%s", strerror(errno));
  	else {
  		va_start(ap, emsg);
  
  		if (asprintf(&nfmt, "%s: %s", emsg, strerror(errno)) == -1) {
  			/* we tried it... */
  			vlog(LOG_CRIT, emsg, ap);
  			logit(LOG_CRIT, "%s", strerror(errno));
  		} else {
  			vlog(LOG_CRIT, nfmt, ap);
  			free(nfmt);
  		}
  		va_end(ap);
  	}
  }
  
  void
  log_warnx(const char *emsg, ...)
  {
  	va_list	 ap;
  
  	va_start(ap, emsg);
  	vlog(LOG_CRIT, emsg, ap);
  	va_end(ap);
  }
  
  void
  log_info(const char *emsg, ...)
  {
  	va_list	 ap;
  
  	va_start(ap, emsg);
  	vlog(LOG_INFO, emsg, ap);
  	va_end(ap);
  }
  
  void
  log_debug(const char *emsg, ...)
  {
  	va_list	 ap;
  
  	if (verbose) {
  		va_start(ap, emsg);
  		vlog(LOG_DEBUG, emsg, ap);
  		va_end(ap);
  	}
  }
  
  void
  fatal(const char *emsg)
  {
  	if (emsg == NULL)
  		logit(LOG_CRIT, "fatal in %s: %s", procnames[ripd_process],
  		    strerror(errno));
  	else
  		if (errno)
  			logit(LOG_CRIT, "fatal in %s: %s: %s",
  			    procnames[ripd_process], emsg, strerror(errno));
  		else
  			logit(LOG_CRIT, "fatal in %s: %s",
  			    procnames[ripd_process], emsg);
  
  	if (ripd_process == PROC_MAIN)
  		exit(1);
  	else				/* parent copes via SIGCHLD */
  		_exit(1);
  }
  
  void
  fatalx(const char *emsg)
  {
  	errno = 0;
  	fatal(emsg);
  }
  
  /* names */
  const char *
  nbr_state_name(int state)
  {
  	switch (state) {
  	case NBR_STA_DOWN:
  		return ("DOWN");
  	case NBR_STA_REQ_RCVD:
  		return ("REQUEST RCVD");
  	case NBR_STA_ACTIVE:
  		return ("ACTIVE");
  	default:
  		return ("UNKNOWN");
  	}
  }
  
  const char *
  if_type_name(enum iface_type type)
  {
  	switch (type) {
  	case IF_TYPE_POINTOPOINT:
  		return ("POINTOPOINT");
  	case IF_TYPE_BROADCAST:
  		return ("BROADCAST");
  	case IF_TYPE_NBMA:
  		return ("NBMA");
  	case IF_TYPE_POINTOMULTIPOINT:
  		return ("POINTOMULTIPOINT");
  	}
  	/* NOTREACHED */
  	return ("UNKNOWN");
  }
  
  const char *
  if_auth_name(enum auth_type type)
  {
  	switch (type) {
  	case AUTH_NONE:
  		return ("none");
  	case AUTH_SIMPLE:
  		return ("simple");
  	case AUTH_CRYPT:
  		return ("crypt");
  	}
  	/* NOTREACHED */
  	return ("unknown");
  }
  
  const char *
  if_state_name(int state)
  {
  	switch (state) {
  	case IF_STA_DOWN:
  		return ("DOWN");
  	case IF_STA_ACTIVE:
  		return ("ACTIVE");
  	default:
  		return ("UNKNOWN");
  	}
  }
  