/*
 * dhcpcd - DHCP client daemon -
 * Copyright (C) 2006 Roy Marples <uberlord@gentoo.org>
 * 
 * dhcpcd is an RFC2131 compliant DHCP client daemon.
 *
 * This is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 * See the GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <syslog.h>

#include "common.h"
#include "logger.h"

static int loglevel = LOG_WARNING;
static char logprefix[12] = {0};

static char *syslog_level_msg[] = {
  [LOG_EMERG]   	= "EMERGENCY!",
  [LOG_ALERT]   	= "ALERT!",
  [LOG_CRIT]    	= "Critical!",
  [LOG_WARNING] 	= "Warning",
  [LOG_ERR]     	= "Error",
  [LOG_INFO]    	= "Info",
  [LOG_DEBUG]   	= "Debug",
  [LOG_DEBUG + 1]	= NULL
};

static char *syslog_level[] = {
  [LOG_EMERG]   	= "LOG_EMERG",
  [LOG_ALERT]   	= "LOG_ALERT",
  [LOG_CRIT]    	= "LOG_CRIT",
  [LOG_ERR]     	= "LOG_ERR",
  [LOG_WARNING] 	= "LOG_WARNING",
  [LOG_NOTICE]  	= "LOG_NOTICE",
  [LOG_INFO]    	= "LOG_INFO",
  [LOG_DEBUG]   	= "LOG_DEBUG",
  [LOG_DEBUG + 1]		= NULL
};

int logtolevel (const char *priority)
{
  int i = 0;

  while (syslog_level[i])
    {
      if (!strcmp (priority, syslog_level[i]))
	return i;
      i++;
    }
  return -1;
}

void setloglevel (int level)
{
  loglevel = level;
}

void setlogprefix (const char *prefix)
{
  snprintf (logprefix, sizeof (logprefix), "%s", prefix);
}

void logger(int level, const char *fmt, ...)
{
  va_list p;
  va_list p2;
  FILE *f = stderr;

  va_start (p, fmt);
  va_copy (p2, p);

  if (level <= LOG_ERR || level <= loglevel)
    {
      if (level == LOG_DEBUG || level == LOG_INFO)
	f = stdout;
      fprintf (f, "%s, %s", syslog_level_msg[level], logprefix);
      vfprintf (f, fmt, p);
      fputc ('\n', f);
    }

  if (level < LOG_DEBUG || level <= loglevel)
    {
      int len = strlen (logprefix);
      char *fmt2 = xmalloc (strlen (fmt) + len + 1);
      char *p = fmt2;
      memcpy (p, &logprefix, len);
      p += len;
      strcpy (p, fmt);
      vsyslog (level, fmt2, p2);
      free (fmt2);
    }

  va_end (p);
}