394 lines
9.7 KiB
C
Executable File
394 lines
9.7 KiB
C
Executable File
/* errwarn.c
|
|
|
|
Errors and warnings... */
|
|
|
|
/*
|
|
* Copyright (c) 1996 The Internet Software Consortium.
|
|
* All Rights Reserved.
|
|
* Copyright (c) 1995 RadioMail Corporation. All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
*
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. Neither the name of RadioMail Corporation, the Internet Software
|
|
* Consortium nor the names of its contributors may be used to endorse
|
|
* or promote products derived from this software without specific
|
|
* prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY RADIOMAIL CORPORATION, THE INTERNET
|
|
* SOFTWARE CONSORTIUM AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL RADIOMAIL CORPORATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
|
|
* OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* This software was written for RadioMail Corporation by Ted Lemon
|
|
* under a contract with Vixie Enterprises. Further modifications have
|
|
* been made for the Internet Software Consortium under a contract
|
|
* with Vixie Laboratories.
|
|
*/
|
|
|
|
#ifndef lint
|
|
#ifndef EMBED
|
|
static char copyright[] =
|
|
"$Id: //BBN_Linux/Branch/Branch_for_Rel_TP_ASEAN_20161216/tclinux_phoenix/apps/public/dhcp-isc/common/errwarn.c#1 $ Copyright (c) 1996 The Internet Software Consortium. All rights reserved.\n";
|
|
#endif /*!EMBED*/
|
|
#endif /* not lint */
|
|
|
|
#include "dhcpd.h"
|
|
#include <errno.h>
|
|
|
|
static void do_percentm PROTO ((char *obuf, char *ibuf));
|
|
|
|
static char mbuf [1024];
|
|
static char fbuf [1024];
|
|
|
|
int warnings_occurred;
|
|
|
|
/* Log an error message, then exit... */
|
|
|
|
void error (ANSI_DECL(char *) fmt, VA_DOTDOTDOT)
|
|
KandR (char *fmt;)
|
|
va_dcl
|
|
{
|
|
va_list list;
|
|
extern int logged_in;
|
|
|
|
do_percentm (fbuf, fmt);
|
|
|
|
VA_start (list, fmt);
|
|
vsnprintf (mbuf, sizeof mbuf, fbuf, list);
|
|
va_end (list);
|
|
|
|
#ifndef DEBUG
|
|
syslog (log_priority | LOG_ERR, mbuf);
|
|
#endif
|
|
|
|
/* Also log it to stderr? */
|
|
if (log_perror) {
|
|
write (2, mbuf, strlen (mbuf));
|
|
write (2, "\n", 1);
|
|
}
|
|
|
|
syslog (LOG_CRIT, "exiting.");
|
|
if (log_perror) {
|
|
fprintf (stderr, "exiting.\n");
|
|
fflush (stderr);
|
|
}
|
|
cleanup ();
|
|
exit (1);
|
|
}
|
|
|
|
/* Log a warning message... */
|
|
|
|
int warn (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
|
|
KandR (char *fmt;)
|
|
va_dcl
|
|
{
|
|
va_list list;
|
|
|
|
do_percentm (fbuf, fmt);
|
|
|
|
VA_start (list, fmt);
|
|
vsnprintf (mbuf, sizeof mbuf, fbuf, list);
|
|
va_end (list);
|
|
|
|
#ifndef DEBUG
|
|
syslog (log_priority | LOG_ERR, mbuf);
|
|
#endif
|
|
|
|
if (log_perror) {
|
|
write (2, mbuf, strlen (mbuf));
|
|
write (2, "\n", 1);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Log a note... */
|
|
|
|
int note (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
|
|
KandR (char *fmt;)
|
|
va_dcl
|
|
{
|
|
va_list list;
|
|
|
|
do_percentm (fbuf, fmt);
|
|
|
|
VA_start (list, fmt);
|
|
vsnprintf (mbuf, sizeof mbuf, fbuf, list);
|
|
va_end (list);
|
|
|
|
#ifndef DEBUG
|
|
syslog (log_priority | LOG_INFO, mbuf);
|
|
#endif
|
|
|
|
if (log_perror) {
|
|
write (2, mbuf, strlen (mbuf));
|
|
write (2, "\n", 1);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Log a debug message... */
|
|
|
|
int debug (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
|
|
KandR (char *fmt;)
|
|
va_dcl
|
|
{
|
|
va_list list;
|
|
|
|
do_percentm (fbuf, fmt);
|
|
|
|
VA_start (list, fmt);
|
|
vsnprintf (mbuf, sizeof mbuf, fbuf, list);
|
|
va_end (list);
|
|
|
|
#ifndef DEBUG
|
|
syslog (log_priority | LOG_DEBUG, mbuf);
|
|
#endif
|
|
|
|
if (log_perror) {
|
|
write (2, mbuf, strlen (mbuf));
|
|
write (2, "\n", 1);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Find %m in the input string and substitute an error message string. */
|
|
|
|
static void do_percentm (obuf, ibuf)
|
|
char *obuf;
|
|
char *ibuf;
|
|
{
|
|
char *s = ibuf;
|
|
char *p = obuf;
|
|
int infmt = 0;
|
|
char *m;
|
|
|
|
while (*s)
|
|
{
|
|
if (infmt)
|
|
{
|
|
if (*s == 'm')
|
|
{
|
|
#ifndef __CYGWIN32__
|
|
m = strerror (errno);
|
|
#else
|
|
m = pWSAError ();
|
|
#endif
|
|
if (!m)
|
|
m = "<unknown error>";
|
|
strcpy (p - 1, m);
|
|
p += strlen (p);
|
|
++s;
|
|
}
|
|
else
|
|
*p++ = *s++;
|
|
infmt = 0;
|
|
}
|
|
else
|
|
{
|
|
if (*s == '%')
|
|
infmt = 1;
|
|
*p++ = *s++;
|
|
}
|
|
}
|
|
*p = 0;
|
|
}
|
|
|
|
|
|
int parse_warn (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
|
|
KandR (char *fmt;)
|
|
va_dcl
|
|
{
|
|
va_list list;
|
|
static char spaces [] = " ";
|
|
|
|
do_percentm (mbuf, fmt);
|
|
#ifndef NO_SNPRINTF
|
|
snprintf (fbuf, sizeof fbuf, "%s line %d: %s",
|
|
tlname, lexline, mbuf);
|
|
#else
|
|
sprintf (fbuf, "%s line %d: %s",
|
|
tlname, lexline, mbuf);
|
|
#endif
|
|
|
|
VA_start (list, fmt);
|
|
vsnprintf (mbuf, sizeof mbuf, fbuf, list);
|
|
va_end (list);
|
|
|
|
#ifndef DEBUG
|
|
syslog (log_priority | LOG_ERR, mbuf);
|
|
syslog (log_priority | LOG_ERR, token_line);
|
|
if (lexline < 81)
|
|
syslog (log_priority | LOG_ERR,
|
|
"%s^", &spaces [sizeof spaces - lexchar]);
|
|
#endif
|
|
|
|
if (log_perror) {
|
|
write (2, mbuf, strlen (mbuf));
|
|
write (2, "\n", 1);
|
|
write (2, token_line, strlen (token_line));
|
|
write (2, "\n", 1);
|
|
write (2, spaces, lexchar - 1);
|
|
write (2, "^\n", 2);
|
|
}
|
|
|
|
warnings_occurred = 1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
#ifdef NO_STRERROR
|
|
char *strerror (err)
|
|
int err;
|
|
{
|
|
extern char *sys_errlist [];
|
|
extern int sys_nerr;
|
|
static char errbuf [128];
|
|
|
|
if (err < 0 || err >= sys_nerr) {
|
|
sprintf (errbuf, "Error %d", err);
|
|
return errbuf;
|
|
}
|
|
return sys_errlist [err];
|
|
}
|
|
#endif /* NO_STRERROR */
|
|
|
|
#ifdef _WIN32
|
|
char *pWSAError ()
|
|
{
|
|
int err = WSAGetLastError ();
|
|
|
|
switch (err)
|
|
{
|
|
case WSAEACCES:
|
|
return "Permission denied";
|
|
case WSAEADDRINUSE:
|
|
return "Address already in use";
|
|
case WSAEADDRNOTAVAIL:
|
|
return "Cannot assign requested address";
|
|
case WSAEAFNOSUPPORT:
|
|
return "Address family not supported by protocol family";
|
|
case WSAEALREADY:
|
|
return "Operation already in progress";
|
|
case WSAECONNABORTED:
|
|
return "Software caused connection abort";
|
|
case WSAECONNREFUSED:
|
|
return "Connection refused";
|
|
case WSAECONNRESET:
|
|
return "Connection reset by peer";
|
|
case WSAEDESTADDRREQ:
|
|
return "Destination address required";
|
|
case WSAEFAULT:
|
|
return "Bad address";
|
|
case WSAEHOSTDOWN:
|
|
return "Host is down";
|
|
case WSAEHOSTUNREACH:
|
|
return "No route to host";
|
|
case WSAEINPROGRESS:
|
|
return "Operation now in progress";
|
|
case WSAEINTR:
|
|
return "Interrupted function call";
|
|
case WSAEINVAL:
|
|
return "Invalid argument";
|
|
case WSAEISCONN:
|
|
return "Socket is already connected";
|
|
case WSAEMFILE:
|
|
return "Too many open files";
|
|
case WSAEMSGSIZE:
|
|
return "Message too long";
|
|
case WSAENETDOWN:
|
|
return "Network is down";
|
|
case WSAENETRESET:
|
|
return "Network dropped connection on reset";
|
|
case WSAENETUNREACH:
|
|
return "Network is unreachable";
|
|
case WSAENOBUFS:
|
|
return "No buffer space available";
|
|
case WSAENOPROTOOPT:
|
|
return "Bad protocol option";
|
|
case WSAENOTCONN:
|
|
return "Socket is not connected";
|
|
case WSAENOTSOCK:
|
|
return "Socket operation on non-socket";
|
|
case WSAEOPNOTSUPP:
|
|
return "Operation not supported";
|
|
case WSAEPFNOSUPPORT:
|
|
return "Protocol family not supported";
|
|
case WSAEPROCLIM:
|
|
return "Too many processes";
|
|
case WSAEPROTONOSUPPORT:
|
|
return "Protocol not supported";
|
|
case WSAEPROTOTYPE:
|
|
return "Protocol wrong type for socket";
|
|
case WSAESHUTDOWN:
|
|
return "Cannot send after socket shutdown";
|
|
case WSAESOCKTNOSUPPORT:
|
|
return "Socket type not supported";
|
|
case WSAETIMEDOUT:
|
|
return "Connection timed out";
|
|
case WSAEWOULDBLOCK:
|
|
return "Resource temporarily unavailable";
|
|
case WSAHOST_NOT_FOUND:
|
|
return "Host not found";
|
|
#if 0
|
|
case WSA_INVALID_HANDLE:
|
|
return "Specified event object handle is invalid";
|
|
case WSA_INVALID_PARAMETER:
|
|
return "One or more parameters are invalid";
|
|
case WSAINVALIDPROCTABLE:
|
|
return "Invalid procedure table from service provider";
|
|
case WSAINVALIDPROVIDER:
|
|
return "Invalid service provider version number";
|
|
case WSA_IO_PENDING:
|
|
return "Overlapped operations will complete later";
|
|
case WSA_IO_INCOMPLETE:
|
|
return "Overlapped I/O event object not in signaled state";
|
|
case WSA_NOT_ENOUGH_MEMORY:
|
|
return "Insufficient memory available";
|
|
#endif
|
|
case WSANOTINITIALISED:
|
|
return "Successful WSAStartup not yet performer";
|
|
case WSANO_DATA:
|
|
return "Valid name, no data record of requested type";
|
|
case WSANO_RECOVERY:
|
|
return "This is a non-recoverable error";
|
|
#if 0
|
|
case WSAPROVIDERFAILEDINIT:
|
|
return "Unable to initialize a service provider";
|
|
case WSASYSCALLFAILURE:
|
|
return "System call failure";
|
|
#endif
|
|
case WSASYSNOTREADY:
|
|
return "Network subsystem is unavailable";
|
|
case WSATRY_AGAIN:
|
|
return "Non-authoritative host not found";
|
|
case WSAVERNOTSUPPORTED:
|
|
return "WINSOCK.DLL version out of range";
|
|
case WSAEDISCON:
|
|
return "Graceful shutdown in progress";
|
|
#if 0
|
|
case WSA_OPERATION_ABORTED:
|
|
return "Overlapped operation aborted";
|
|
#endif
|
|
}
|
|
return "Unknown WinSock error";
|
|
}
|
|
#endif /* _WIN32 */
|