* Copyright (c) 1985 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)gethostnamadr.c 6.20 (Berkeley) %G%";
#endif LIBC_SCCS and not lint
#include <arpa/nameser.h>
static char *h_addr_ptrs
[MAXADDRS
+ 1];
static struct hostent host
;
static char *host_aliases
[MAXALIASES
];
static char hostbuf
[BUFSIZ
+1];
static struct in_addr host_addr
;
static char HOSTDB
[] = "/etc/hosts";
static FILE *hostf
= NULL
;
static char line
[BUFSIZ
+1];
static char hostaddr
[MAXADDRS
];
static char *host_addrs
[2];
getanswer(msg
, msglen
, iquery
)
int type
, class, buflen
, ancount
, qdcount
;
int haveanswer
, getclass
= C_ANY
;
n
= res_send(msg
, msglen
, (char *)&answer
, sizeof(answer
));
if (_res
.options
& RES_DEBUG
)
printf("res_send failed\n");
eom
= (char *)&answer
+ n
;
* find first satisfactory answer
ancount
= ntohs(hp
->ancount
);
qdcount
= ntohs(hp
->qdcount
);
if (hp
->rcode
!= NOERROR
|| ancount
== 0) {
if (_res
.options
& RES_DEBUG
)
printf("rcode = %d, ancount=%d\n", hp
->rcode
, ancount
);
/* Check if it's an authoritive answer */
h_errno
= HOST_NOT_FOUND
;
buflen
= sizeof(hostbuf
);
cp
= (char *)&answer
+ sizeof(HEADER
);
if ((n
= dn_expand((char *)&answer
, eom
,
cp
+= dn_skip(cp
) + QFIXEDSZ
;
cp
+= dn_skip(cp
) + QFIXEDSZ
;
h_errno
= HOST_NOT_FOUND
;
host
.h_aliases
= host_aliases
;
host
.h_addr_list
= h_addr_ptrs
;
host
.h_addr
= h_addr_ptrs
[0];
while (--ancount
>= 0 && cp
< eom
) {
if ((n
= dn_expand((char *)&answer
, eom
, cp
, bp
, buflen
)) < 0)
cp
+= sizeof(u_short
) + sizeof(u_long
);
if (ap
>= &host_aliases
[MAXALIASES
-1])
if ((n
= dn_expand((char *)&answer
, eom
,
if (_res
.options
& RES_DEBUG
)
printf("unexpected answer type %d, size %d\n",
if (n
!= host
.h_length
) {
host
.h_addrtype
= (class == C_IN
) ? AF_INET
: AF_UNSPEC
;
bp
+= (sizeof(align
) - ((u_long
)bp
% sizeof(align
))) &~
if (bp
+ n
>= &hostbuf
[sizeof(hostbuf
)]) {
if (_res
.options
& RES_DEBUG
)
printf("size (%d) too big\n", n
);
bcopy(cp
, *hap
++ = bp
, n
);
register char *cp
, **domain
;
struct hostent
*hp
, *gethostdomain();
extern struct hostent
*_gethtbyname();
if (!(_res
.options
& RES_INIT
) && res_init() == -1)
for (cp
= name
, n
= 0; *cp
; cp
++)
if ((n
&& cp
[-1] == '.') || (_res
.options
& RES_DEFNAMES
) == 0) {
hp
= gethostdomain(name
, (char *)NULL
);
if (n
== 0 && (cp
= hostalias(name
)))
return (gethostdomain(cp
, (char *)NULL
));
for (domain
= _res
.dnsrch
; *domain
; domain
++) {
hp
= gethostdomain(name
, *domain
);
if (errno
== ECONNREFUSED
)
return (_gethtbyname(name
));
if (h_errno
!= HOST_NOT_FOUND
||
(_res
.options
& RES_DNSRCH
) == 0)
return (gethostdomain(name
, (char *)NULL
));
gethostdomain(name
, domain
)
sprintf(nbuf
, "%.*s.%.*s", MAXDNAME
, name
, MAXDNAME
, domain
);
n
= res_mkquery(QUERY
, nbuf
, C_IN
, T_A
, (char *)NULL
, 0, NULL
,
(char *)&buf
, sizeof(buf
));
if (_res
.options
& RES_DEBUG
)
printf("res_mkquery failed\n");
return (getanswer((char *)&buf
, n
, 0));
gethostbyaddr(addr
, len
, type
)
register struct hostent
*hp
;
extern struct hostent
*_gethtbyaddr();
(void)sprintf(qbuf
, "%d.%d.%d.%d.in-addr.arpa",
((unsigned)addr
[3] & 0xff),
((unsigned)addr
[2] & 0xff),
((unsigned)addr
[1] & 0xff),
((unsigned)addr
[0] & 0xff));
n
= res_mkquery(QUERY
, qbuf
, C_IN
, T_PTR
, (char *)NULL
, 0, NULL
,
(char *)&buf
, sizeof(buf
));
if (_res
.options
& RES_DEBUG
)
printf("res_mkquery failed\n");
hp
= getanswer((char *)&buf
, n
, 1);
if (hp
== NULL
&& errno
== ECONNREFUSED
)
hp
= _gethtbyaddr(addr
, len
, type
);
h_addr_ptrs
[0] = (char *)&host_addr
;
h_addr_ptrs
[1] = (char *)0;
host_addr
= *(struct in_addr
*)addr
;
char *file
, *getenv(), *strcpy(), *strncpy();
static char abuf
[MAXDNAME
];
file
= getenv("HOSTALIASES");
if (file
== NULL
|| (fp
= fopen(file
, "r")) == NULL
)
buf
[sizeof(buf
) - 1] = '\0';
while (fgets(buf
, sizeof(buf
), fp
)) {
for (C1
= buf
; *C1
&& !isspace(*C1
); ++C1
);
if (!strncmp(buf
, name
, C1
- buf
)) {
for (C2
= C1
+ 1; *C2
&& !isspace(*C2
); ++C2
);
abuf
[sizeof(abuf
) - 1] = *C2
= '\0';
(void)strncpy(abuf
, C1
, sizeof(abuf
) - 1);
hostf
= fopen(HOSTDB
, "r" );
if (hostf
&& !stayopen
) {
if (hostf
== NULL
&& (hostf
= fopen(HOSTDB
, "r" )) == NULL
)
if ((p
= fgets(line
, BUFSIZ
, hostf
)) == NULL
)
/* THIS STUFF IS INTERNET SPECIFIC */
host
.h_addr_list
= host_addrs
;
*((u_long
*)host
.h_addr
) = inet_addr(p
);
host
.h_length
= sizeof (u_long
);
host
.h_addrtype
= AF_INET
;
while (*cp
== ' ' || *cp
== '\t')
q
= host
.h_aliases
= host_aliases
;
if (*cp
== ' ' || *cp
== '\t') {
if (q
< &host_aliases
[MAXALIASES
- 1])
for (mp
= match
; *mp
; mp
++)
register struct hostent
*p
;
register char *lp
= lowname
;
*lp
++ = tolower(*name
++);
while (p
= _gethtent()) {
if (strcmp(p
->h_name
, lowname
) == 0)
for (cp
= p
->h_aliases
; *cp
!= 0; cp
++)
if (strcmp(*cp
, lowname
) == 0)
_gethtbyaddr(addr
, len
, type
)
register struct hostent
*p
;
if (p
->h_addrtype
== type
&& !bcmp(p
->h_addr
, addr
, len
))