← Back to branch summary

~ubuntu-branches/ubuntu/gutsy/dhcp/gutsy-security

« back to all changes in this revision

Viewing changes to common/errwarn.c

  • Committer: Bazaar Package Importer
  • Author(s): Martin Schulze
  • Date: 2004-10-30 21:07:22 UTC
  • Revision ID: james.westby@ubuntu.com-20041030210722-p0u4682vtncfxnnn
Tags: upstream-2.0pl5
Import upstream version 2.0pl5

Show diffs side-by-side

added added

removed removed

Lines of Context:
common/errwarn.c
 
1
/* errwarn.c
 
2
 
 
3
   Errors and warnings... */
 
4
 
 
5
/*
 
6
 * Copyright (c) 1996 The Internet Software Consortium.
 
7
 * All Rights Reserved.
 
8
 * Copyright (c) 1995 RadioMail Corporation.  All rights reserved.
 
9
 *
 
10
 * Redistribution and use in source and binary forms, with or without
 
11
 * modification, are permitted provided that the following conditions
 
12
 * are met:
 
13
 *
 
14
 * 1. Redistributions of source code must retain the above copyright
 
15
 *    notice, this list of conditions and the following disclaimer.
 
16
 * 2. Redistributions in binary form must reproduce the above copyright
 
17
 *    notice, this list of conditions and the following disclaimer in the
 
18
 *    documentation and/or other materials provided with the distribution.
 
19
 * 3. Neither the name of RadioMail Corporation, the Internet Software
 
20
 *    Consortium nor the names of its contributors may be used to endorse
 
21
 *    or promote products derived from this software without specific
 
22
 *    prior written permission.
 
23
 *
 
24
 * THIS SOFTWARE IS PROVIDED BY RADIOMAIL CORPORATION, THE INTERNET
 
25
 * SOFTWARE CONSORTIUM AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR
 
26
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 
27
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 
28
 * ARE DISCLAIMED.  IN NO EVENT SHALL RADIOMAIL CORPORATION OR CONTRIBUTORS
 
29
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 
30
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 
31
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 
32
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 
33
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 
34
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
 
35
 * OF THE POSSIBILITY OF SUCH DAMAGE.
 
36
 *
 
37
 * This software was written for RadioMail Corporation by Ted Lemon
 
38
 * under a contract with Vixie Enterprises.   Further modifications have
 
39
 * been made for the Internet Software Consortium under a contract
 
40
 * with Vixie Laboratories.
 
41
 */
 
42
 
 
43
#ifndef lint
 
44
static char copyright[] =
 
45
"$Id: errwarn.c,v 1.15 1997/05/09 08:03:44 mellon Exp $ Copyright (c) 1996 The Internet Software Consortium.  All rights reserved.\n";
 
46
#endif /* not lint */
 
47
 
 
48
#include "dhcpd.h"
 
49
#include <errno.h>
 
50
 
 
51
static void do_percentm PROTO ((char *obuf, char *ibuf));
 
52
 
 
53
static char mbuf [1024];
 
54
static char fbuf [1024];
 
55
 
 
56
int warnings_occurred;
 
57
 
 
58
/* Log an error message, then exit... */
 
59
 
 
60
void error (ANSI_DECL(char *) fmt, VA_DOTDOTDOT)
 
61
     KandR (char *fmt;)
 
62
     va_dcl
 
63
{
 
64
  va_list list;
 
65
  extern int logged_in;
 
66
 
 
67
  do_percentm (fbuf, fmt);
 
68
 
 
69
  VA_start (list, fmt);
 
70
  vsnprintf (mbuf, sizeof mbuf, fbuf, list);
 
71
  va_end (list);
 
72
 
 
73
#ifndef DEBUG
 
74
  syslog (log_priority | LOG_ERR, mbuf);
 
75
#endif
 
76
 
 
77
  /* Also log it to stderr? */
 
78
  if (log_perror) {
 
79
          write (2, mbuf, strlen (mbuf));
 
80
          write (2, "\n", 1);
 
81
  }
 
82
 
 
83
  syslog (LOG_CRIT, "exiting.");
 
84
  if (log_perror) {
 
85
        fprintf (stderr, "exiting.\n");
 
86
        fflush (stderr);
 
87
  }
 
88
  cleanup ();
 
89
  exit (1);
 
90
}
 
91
 
 
92
/* Log a warning message... */
 
93
 
 
94
int warn (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
 
95
     KandR (char *fmt;)
 
96
     va_dcl
 
97
{
 
98
  va_list list;
 
99
 
 
100
  do_percentm (fbuf, fmt);
 
101
 
 
102
  VA_start (list, fmt);
 
103
  vsnprintf (mbuf, sizeof mbuf, fbuf, list);
 
104
  va_end (list);
 
105
 
 
106
#ifndef DEBUG
 
107
  syslog (log_priority | LOG_ERR, mbuf);
 
108
#endif
 
109
 
 
110
  if (log_perror) {
 
111
          write (2, mbuf, strlen (mbuf));
 
112
          write (2, "\n", 1);
 
113
  }
 
114
 
 
115
  return 0;
 
116
}
 
117
 
 
118
/* Log a note... */
 
119
 
 
120
int note (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
 
121
     KandR (char *fmt;)
 
122
     va_dcl
 
123
{
 
124
  va_list list;
 
125
 
 
126
  do_percentm (fbuf, fmt);
 
127
 
 
128
  VA_start (list, fmt);
 
129
  vsnprintf (mbuf, sizeof mbuf, fbuf, list);
 
130
  va_end (list);
 
131
 
 
132
#ifndef DEBUG
 
133
  syslog (log_priority | LOG_INFO, mbuf);
 
134
#endif
 
135
 
 
136
  if (log_perror) {
 
137
          write (2, mbuf, strlen (mbuf));
 
138
          write (2, "\n", 1);
 
139
  }
 
140
 
 
141
  return 0;
 
142
}
 
143
 
 
144
/* Log a debug message... */
 
145
 
 
146
int debug (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
 
147
     KandR (char *fmt;)
 
148
     va_dcl
 
149
{
 
150
  va_list list;
 
151
 
 
152
  do_percentm (fbuf, fmt);
 
153
 
 
154
  VA_start (list, fmt);
 
155
  vsnprintf (mbuf, sizeof mbuf, fbuf, list);
 
156
  va_end (list);
 
157
 
 
158
#ifndef DEBUG
 
159
  syslog (log_priority | LOG_DEBUG, mbuf);
 
160
#endif
 
161
 
 
162
  if (log_perror) {
 
163
          write (2, mbuf, strlen (mbuf));
 
164
          write (2, "\n", 1);
 
165
  }
 
166
 
 
167
  return 0;
 
168
}
 
169
 
 
170
/* Find %m in the input string and substitute an error message string. */
 
171
 
 
172
static void do_percentm (obuf, ibuf)
 
173
     char *obuf;
 
174
     char *ibuf;
 
175
{
 
176
        char *s = ibuf;
 
177
        char *p = obuf;
 
178
        int infmt = 0;
 
179
        char *m;
 
180
 
 
181
        while (*s)
 
182
        {
 
183
                if (infmt)
 
184
                {
 
185
                        if (*s == 'm')
 
186
                        {
 
187
#ifndef __CYGWIN32__
 
188
                                m = strerror (errno);
 
189
#else
 
190
                                m = pWSAError ();
 
191
#endif
 
192
                                if (!m)
 
193
                                        m = "<unknown error>";
 
194
                                strcpy (p - 1, m);
 
195
                                p += strlen (p);
 
196
                                ++s;
 
197
                        }
 
198
                        else
 
199
                                *p++ = *s++;
 
200
                        infmt = 0;
 
201
                }
 
202
                else
 
203
                {
 
204
                        if (*s == '%')
 
205
                                infmt = 1;
 
206
                        *p++ = *s++;
 
207
                }
 
208
        }
 
209
        *p = 0;
 
210
}
 
211
 
 
212
 
 
213
int parse_warn (ANSI_DECL (char *) fmt, VA_DOTDOTDOT)
 
214
        KandR (char *fmt;)
 
215
        va_dcl
 
216
{
 
217
        va_list list;
 
218
        static char spaces [] = "                                                                                ";
 
219
        
 
220
        do_percentm (mbuf, fmt);
 
221
#ifndef NO_SNPRINTF
 
222
        snprintf (fbuf, sizeof fbuf, "%s line %d: %s",
 
223
                  tlname, lexline, mbuf);
 
224
#else
 
225
        sprintf (fbuf, "%s line %d: %s",
 
226
                 tlname, lexline, mbuf);
 
227
#endif
 
228
        
 
229
        VA_start (list, fmt);
 
230
        vsnprintf (mbuf, sizeof mbuf, fbuf, list);
 
231
        va_end (list);
 
232
 
 
233
#ifndef DEBUG
 
234
        syslog (log_priority | LOG_ERR, mbuf);
 
235
        syslog (log_priority | LOG_ERR, token_line);
 
236
        if (lexline < 81)
 
237
                syslog (log_priority | LOG_ERR,
 
238
                        "%s^", &spaces [sizeof spaces - lexchar]);
 
239
#endif
 
240
 
 
241
        if (log_perror) {
 
242
                write (2, mbuf, strlen (mbuf));
 
243
                write (2, "\n", 1);
 
244
                write (2, token_line, strlen (token_line));
 
245
                write (2, "\n", 1);
 
246
                write (2, spaces, lexchar - 1);
 
247
                write (2, "^\n", 2);
 
248
        }
 
249
 
 
250
        warnings_occurred = 1;
 
251
 
 
252
        return 0;
 
253
}
 
254
 
 
255
#ifdef NO_STRERROR
 
256
char *strerror (err)
 
257
        int err;
 
258
{
 
259
        extern char *sys_errlist [];
 
260
        extern int sys_nerr;
 
261
        static char errbuf [128];
 
262
 
 
263
        if (err < 0 || err >= sys_nerr) {
 
264
                sprintf (errbuf, "Error %d", err);
 
265
                return errbuf;
 
266
        }
 
267
        return sys_errlist [err];
 
268
}
 
269
#endif /* NO_STRERROR */
 
270
 
 
271
#ifdef _WIN32
 
272
char *pWSAError ()
 
273
{
 
274
  int err = WSAGetLastError ();
 
275
 
 
276
  switch (err)
 
277
    {
 
278
    case WSAEACCES:
 
279
      return "Permission denied";
 
280
    case WSAEADDRINUSE:
 
281
      return "Address already in use";
 
282
    case WSAEADDRNOTAVAIL:
 
283
      return "Cannot assign requested address";
 
284
    case WSAEAFNOSUPPORT:
 
285
      return "Address family not supported by protocol family";
 
286
    case WSAEALREADY:
 
287
      return "Operation already in progress";
 
288
    case WSAECONNABORTED:
 
289
      return "Software caused connection abort";
 
290
    case WSAECONNREFUSED:
 
291
      return "Connection refused";
 
292
    case WSAECONNRESET:
 
293
      return "Connection reset by peer";
 
294
    case WSAEDESTADDRREQ:
 
295
      return "Destination address required";
 
296
    case WSAEFAULT:
 
297
      return "Bad address";
 
298
    case WSAEHOSTDOWN:
 
299
      return "Host is down";
 
300
    case WSAEHOSTUNREACH:
 
301
      return "No route to host";
 
302
    case WSAEINPROGRESS:
 
303
      return "Operation now in progress";
 
304
    case WSAEINTR:
 
305
      return "Interrupted function call";
 
306
    case WSAEINVAL:
 
307
      return "Invalid argument";
 
308
    case WSAEISCONN:
 
309
      return "Socket is already connected";
 
310
    case WSAEMFILE:
 
311
      return "Too many open files";
 
312
    case WSAEMSGSIZE:
 
313
      return "Message too long";
 
314
    case WSAENETDOWN:
 
315
      return "Network is down";
 
316
    case WSAENETRESET:
 
317
      return "Network dropped connection on reset";
 
318
    case WSAENETUNREACH:
 
319
      return "Network is unreachable";
 
320
    case WSAENOBUFS:
 
321
      return "No buffer space available";
 
322
    case WSAENOPROTOOPT:
 
323
      return "Bad protocol option";
 
324
    case WSAENOTCONN:
 
325
      return "Socket is not connected";
 
326
    case WSAENOTSOCK:
 
327
      return "Socket operation on non-socket";
 
328
    case WSAEOPNOTSUPP:
 
329
      return "Operation not supported";
 
330
    case WSAEPFNOSUPPORT:
 
331
      return "Protocol family not supported";
 
332
    case WSAEPROCLIM:
 
333
      return "Too many processes";
 
334
    case WSAEPROTONOSUPPORT:
 
335
      return "Protocol not supported";
 
336
    case WSAEPROTOTYPE:
 
337
      return "Protocol wrong type for socket";
 
338
    case WSAESHUTDOWN:
 
339
      return "Cannot send after socket shutdown";
 
340
    case WSAESOCKTNOSUPPORT:
 
341
      return "Socket type not supported";
 
342
    case WSAETIMEDOUT:
 
343
      return "Connection timed out";
 
344
    case WSAEWOULDBLOCK:
 
345
      return "Resource temporarily unavailable";
 
346
    case WSAHOST_NOT_FOUND:
 
347
      return "Host not found";
 
348
#if 0
 
349
    case WSA_INVALID_HANDLE:
 
350
      return "Specified event object handle is invalid";
 
351
    case WSA_INVALID_PARAMETER:
 
352
      return "One or more parameters are invalid";
 
353
    case WSAINVALIDPROCTABLE:
 
354
      return "Invalid procedure table from service provider";
 
355
    case WSAINVALIDPROVIDER:
 
356
      return "Invalid service provider version number";
 
357
    case WSA_IO_PENDING:
 
358
      return "Overlapped operations will complete later";
 
359
    case WSA_IO_INCOMPLETE:
 
360
      return "Overlapped I/O event object not in signaled state";
 
361
    case WSA_NOT_ENOUGH_MEMORY:
 
362
      return "Insufficient memory available";
 
363
#endif
 
364
    case WSANOTINITIALISED:
 
365
      return "Successful WSAStartup not yet performer";
 
366
    case WSANO_DATA:
 
367
      return "Valid name, no data record of requested type";
 
368
    case WSANO_RECOVERY:
 
369
      return "This is a non-recoverable error";
 
370
#if 0
 
371
    case WSAPROVIDERFAILEDINIT:
 
372
      return "Unable to initialize a service provider";
 
373
    case WSASYSCALLFAILURE:
 
374
      return "System call failure";
 
375
#endif
 
376
    case WSASYSNOTREADY:
 
377
      return "Network subsystem is unavailable";
 
378
    case WSATRY_AGAIN:
 
379
      return "Non-authoritative host not found";
 
380
    case WSAVERNOTSUPPORTED:
 
381
      return "WINSOCK.DLL version out of range";
 
382
    case WSAEDISCON:
 
383
      return "Graceful shutdown in progress";
 
384
#if 0
 
385
    case WSA_OPERATION_ABORTED:
 
386
      return "Overlapped operation aborted";
 
387
#endif
 
388
    }
 
389
  return "Unknown WinSock error";
 
390
}
 
391
#endif /* _WIN32 */