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