/* * Copyright (c) 1985, 1989, 1993 *    The Regents of the University of California.  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. All advertising materials mentioning features or use of this software *    must display the following acknowledgement: * 	This product includes software developed by the University of * 	California, Berkeley and its contributors. * 4. Neither the name of the University 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 THE REGENTS 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 THE REGENTS 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. *//* * Portions Copyright (c) 1993 by Digital Equipment Corporation. *  * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the above * copyright notice and this permission notice appear in all copies, and that * the name of Digital Equipment Corporation not be used in advertising or * publicity pertaining to distribution of the document or software without * specific, written prior permission. *  * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS.   IN NO EVENT SHALL DIGITAL EQUIPMENT * CORPORATION BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS * SOFTWARE. *//* * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") * Portions Copyright (c) 1996-1999 by Internet Software Consortium. * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the above * copyright notice and this permission notice appear in all copies. * * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */#if defined(LIBC_SCCS) && !defined(lint)static const char sccsid[] = "@(#)res_init.c	8.1 (Berkeley) 6/7/93";static const char rcsid[] = "$Id: res_init.c,v 1.9.2.5.4.2 2004/03/16 12:34:18 marka Exp $";#endif /* LIBC_SCCS and not lint */#include "port_before.h"#include <sys/types.h>#include <sys/param.h>#include <sys/socket.h>#include <sys/time.h>#include <netinet/in.h>#include <arpa/inet.h>#include <arpa/nameser.h>#include <ctype.h>#include <stdio.h>#include <stdlib.h>#include <string.h>#include <unistd.h>#include <netdb.h>#include "port_after.h"/* ensure that sockaddr_in6 and IN6ADDR_ANY_INIT are declared / defined */#include <resolv.h>#include "res_private.h"/* Options.  Should all be left alone. */#define RESOLVSORT#define DEBUGstatic void res_setoptions __P((res_state, const char *, const char *));#ifdef RESOLVSORTstatic const char sort_mask[] = "/&";#define ISSORTMASK(ch) (strchr(sort_mask, ch) != NULL)static u_int32_t net_mask __P((struct in_addr));#endif#if !defined(isascii)	/* XXX - could be a function */# define isascii(c) (!(c & 0200))#endif/* * Resolver state default settings. *//* * Set up default settings.  If the configuration file exist, the values * there will have precedence.  Otherwise, the server address is set to * INADDR_ANY and the default domain name comes from the gethostname(). * * An interrim version of this code (BIND 4.9, pre-4.4BSD) used 127.0.0.1 * rather than INADDR_ANY ("0.0.0.0") as the default name server address * since it was noted that INADDR_ANY actually meant ``the first interface * you "ifconfig"'d at boot time'' and if this was a SLIP or PPP interface, * it had to be "up" in order for you to reach your own name server.  It * was later decided that since the recommended practice is to always  * install local static routes through 127.0.0.1 for all your network * interfaces, that we could solve this problem without a code change. * * The configuration file should always be used, since it is the only way * to specify a default domain.  If you are running a server on your local * machine, you should say "nameserver 0.0.0.0" or "nameserver 127.0.0.1" * in the configuration file. * * Return 0 if completes successfully, -1 on error */intres_ninit(res_state statp) {	extern int __res_vinit(res_state, int);	return (__res_vinit(statp, 0));}/* This function has to be reachable by res_data.c but not publically. */int__res_vinit(res_state statp, int preinit) {	register FILE *fp;	register char *cp, **pp;	register int n;	char buf[BUFSIZ];	int nserv = 0;    /* number of nameserver records read from file */	int haveenv = 0;	int havesearch = 0;#ifdef RESOLVSORT	int nsort = 0;	char *net;#endif	int dots;	union res_sockaddr_union u[2];	if (!preinit) {		statp->retrans = RES_TIMEOUT;		statp->retry = RES_DFLRETRY;		statp->options = RES_DEFAULT;		statp->id = res_randomid();	}	if ((statp->options & RES_INIT) != 0U)		res_ndestroy(statp);	memset(u, 0, sizeof(u));#ifdef USELOOPBACK	u[nserv].sin.sin_addr = inet_makeaddr(IN_LOOPBACKNET, 1);#else	u[nserv].sin.sin_addr.s_addr = INADDR_ANY;#endif	u[nserv].sin.sin_family = AF_INET;	u[nserv].sin.sin_port = htons(NAMESERVER_PORT);#ifdef HAVE_SA_LEN	u[nserv].sin.sin_len = sizeof(struct sockaddr_in);#endif	nserv++;#ifdef HAS_INET6_STRUCTS#ifdef USELOOPBACK	u[nserv].sin6.sin6_addr = in6addr_loopback;#else	u[nserv].sin6.sin6_addr = in6addr_any;#endif	u[nserv].sin6.sin6_family = AF_INET6;	u[nserv].sin6.sin6_port = htons(NAMESERVER_PORT);#ifdef HAVE_SA_LEN	u[nserv].sin6.sin6_len = sizeof(struct sockaddr_in6);#endif	nserv++;#endif	statp->nscount = 0;	statp->ndots = 1;	statp->pfcode = 0;	statp->_vcsock = -1;	statp->_flags = 0;	statp->qhook = NULL;	statp->rhook = NULL;	statp->_u._ext.nscount = 0;	statp->_u._ext.ext = malloc(sizeof(*statp->_u._ext.ext));	if (statp->_u._ext.ext != NULL) {	        memset(statp->_u._ext.ext, 0, sizeof(*statp->_u._ext.ext));		statp->_u._ext.ext->nsaddrs[0].sin = statp->nsaddr;		strcpy(statp->_u._ext.ext->nsuffix, "ip6.arpa");		strcpy(statp->_u._ext.ext->nsuffix2, "ip6.int");	}#ifdef RESOLVSORT	statp->nsort = 0;#endif	res_setservers(statp, u, nserv);	/* Allow user to override the local domain definition */	if ((cp = getenv("LOCALDOMAIN")) != NULL) {		(void)strncpy(statp->defdname, cp, sizeof(statp->defdname) - 1);		statp->defdname[sizeof(statp->defdname) - 1] = '\0';		haveenv++;		/*		 * Set search list to be blank-separated strings		 * from rest of env value.  Permits users of LOCALDOMAIN		 * to still have a search list, and anyone to set the		 * one that they want to use as an individual (even more		 * important now that the rfc1535 stuff restricts searches)		 */		cp = statp->defdname;		pp = statp->dnsrch;		*pp++ = cp;		for (n = 0; *cp && pp < statp->dnsrch + MAXDNSRCH; cp++) {			if (*cp == '\n')	/* silly backwards compat */				break;			else if (*cp == ' ' || *cp == '\t') {				*cp = 0;				n = 1;			} else if (n) {				*pp++ = cp;				n = 0;				havesearch = 1;			}		}		/* null terminate last domain if there are excess */		while (*cp != '\0' && *cp != ' ' && *cp != '\t' && *cp != '\n')			cp++;		*cp = '\0';		*pp++ = 0;	}#define	MATCH(line, name) \	(!strncmp(line, name, sizeof(name) - 1) && \	(line[sizeof(name) - 1] == ' ' || \	 line[sizeof(name) - 1] == '\t'))	nserv = 0;	if ((fp = fopen(_PATH_RESCONF, "r")) != NULL) {	    /* read the config file */	    while (fgets(buf, sizeof(buf), fp) != NULL) {		/* skip comments */		if (*buf == ';' || *buf == '#')			continue;		/* read default domain name */		if (MATCH(buf, "domain")) {		    if (haveenv)	/* skip if have from environ */			    continue;		    cp = buf + sizeof("domain") - 1;		    while (*cp == ' ' || *cp == '\t')			    cp++;		    if ((*cp == '\0') || (*cp == '\n'))			    continue;		    strncpy(statp->defdname, cp, sizeof(statp->defdname) - 1);		    statp->defdname[sizeof(statp->defdname) - 1] = '\0';		    if ((cp = strpbrk(statp->defdname, " \t\n")) != NULL)			    *cp = '\0';		    havesearch = 0;		    continue;		}		/* set search list */		if (MATCH(buf, "search")) {		    if (haveenv)	/* skip if have from environ */			    continue;		    cp = buf + sizeof("search") - 1;		    while (*cp == ' ' || *cp == '\t')			    cp++;		    if ((*cp == '\0') || (*cp == '\n'))			    continue;		    strncpy(statp->defdname, cp, sizeof(statp->defdname) - 1);		    statp->defdname[sizeof(statp->defdname) - 1] = '\0';		    if ((cp = strchr(statp->defdname, '\n')) != NULL)			    *cp = '\0';		    /*		     * Set search list to be blank-separated strings		     * on rest of line.		     */		    cp = statp->defdname;		    pp = statp->dnsrch;		    *pp++ = cp;		    for (n = 0; *cp && pp < statp->dnsrch + MAXDNSRCH; cp++) {			    if (*cp == ' ' || *cp == '\t') {				    *cp = 0;				    n = 1;			    } else if (n) {				    *pp++ = cp;				    n = 0;			    }		    }		    /* null terminate last domain if there are excess */		    while (*cp != '\0' && *cp != ' ' && *cp != '\t')			    cp++;		    *cp = '\0';		    *pp++ = 0;		    havesearch = 1;		    continue;		}		/* read nameservers to query */		if (MATCH(buf, "nameserver") && nserv < MAXNS) {		    struct addrinfo hints, *ai;		    char sbuf[NI_MAXSERV];		    const size_t minsiz =		        sizeof(statp->_u._ext.ext->nsaddrs[0]);		    cp = buf + sizeof("nameserver") - 1;		    while (*cp == ' ' || *cp == '\t')			cp++;		    cp[strcspn(cp, ";# \t\n")] = '\0';		    if ((*cp != '\0') && (*cp != '\n')) {			memset(&hints, 0, sizeof(hints));			hints.ai_family = PF_UNSPEC;			hints.ai_socktype = SOCK_DGRAM;	/*dummy*/			hints.ai_flags = AI_NUMERICHOST;			sprintf(sbuf, "%u", NAMESERVER_PORT);			if (getaddrinfo(cp, sbuf, &hints, &ai) == 0 &&			    ai->ai_addrlen <= minsiz) {			    if (statp->_u._ext.ext != NULL) {				memcpy(&statp->_u._ext.ext->nsaddrs[nserv],				    ai->ai_addr, ai->ai_addrlen);			    }			    if (ai->ai_addrlen <=			        sizeof(statp->nsaddr_list[nserv])) {				memcpy(&statp->nsaddr_list[nserv],				    ai->ai_addr, ai->ai_addrlen);			    } else				statp->nsaddr_list[nserv].sin_family = 0;			    freeaddrinfo(ai);			    nserv++;			}		    }		    continue;		}#ifdef RESOLVSORT		if (MATCH(buf, "sortlist")) {		    struct in_addr a;		    cp = buf + sizeof("sortlist") - 1;		    while (nsort < MAXRESOLVSORT) {			while (*cp == ' ' || *cp == '\t')			    cp++;			if (*cp == '\0' || *cp == '\n' || *cp == ';')			    break;			net = cp;			while (*cp && !ISSORTMASK(*cp) && *cp != ';' &&			       isascii(*cp) && !isspace((unsigned char)*cp))				cp++;			n = *cp;			*cp = 0;