Initial import from FreeBSD RELENG_4:
[dragonfly.git] / lib / libc / net / herror.c
1 /*
2  * Copyright (c) 1987, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33
34 /*
35  * Portions Copyright (c) 1996 by Internet Software Consortium.
36  *
37  * Permission to use, copy, modify, and distribute this software for any
38  * purpose with or without fee is hereby granted, provided that the above
39  * copyright notice and this permission notice appear in all copies.
40  *
41  * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
42  * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
43  * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
44  * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
45  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
46  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
47  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
48  * SOFTWARE.
49  */
50
51 #if defined(LIBC_SCCS) && !defined(lint)
52 static char sccsid[] = "@(#)herror.c    8.1 (Berkeley) 6/4/93";
53 static char rcsid[] = "$FreeBSD: src/lib/libc/net/herror.c,v 1.8 1999/08/28 00:00:09 peter Exp $";
54 #endif /* LIBC_SCCS and not lint */
55
56 #include <sys/types.h>
57 #include <sys/uio.h>
58 #include <netdb.h>
59 #include <string.h>
60 #include <unistd.h>
61
62 const char *h_errlist[] = {
63         "Resolver Error 0 (no error)",
64         "Unknown host",                         /* 1 HOST_NOT_FOUND */
65         "Host name lookup failure",             /* 2 TRY_AGAIN */
66         "Unknown server error",                 /* 3 NO_RECOVERY */
67         "No address associated with name",      /* 4 NO_ADDRESS */
68 };
69 int     h_nerr = { sizeof h_errlist / sizeof h_errlist[0] };
70
71 int     h_errno;
72
73 /*
74  * herror --
75  *      print the error indicated by the h_errno value.
76  */
77 void
78 herror(s)
79         const char *s;
80 {
81         struct iovec iov[4];
82         register struct iovec *v = iov;
83
84         if (s && *s) {
85                 v->iov_base = (char *)s;
86                 v->iov_len = strlen(s);
87                 v++;
88                 v->iov_base = ": ";
89                 v->iov_len = 2;
90                 v++;
91         }
92         v->iov_base = (char *)hstrerror(h_errno);
93         v->iov_len = strlen(v->iov_base);
94         v++;
95         v->iov_base = "\n";
96         v->iov_len = 1;
97         writev(STDERR_FILENO, iov, (v - iov) + 1);
98 }
99
100 const char *
101 hstrerror(err)
102         int err;
103 {
104         if (err < 0)
105                 return ("Resolver internal error");
106         else if (err < h_nerr)
107                 return (h_errlist[err]);
108         return ("Unknown resolver error");
109 }