/* * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") * 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(LINT) && !defined(CODECENTER)static const char rcsid[] = "$Id: irs_data.c,v 1.3.2.2.4.3 2004/11/30 01:15:43 marka Exp $";#endif#include "port_before.h"#ifndef __BIND_NOSTATIC#include <sys/types.h>#include <netinet/in.h>#include <arpa/nameser.h>#include <resolv.h>#include <stdio.h>#include <string.h>#include <isc/memcluster.h>#ifdef DO_PTHREADS#include <pthread.h>#endif#include <irs.h>#include <stdlib.h>#include "port_after.h"#include "irs_data.h"#undef _res#if !(__GLIBC__ > 2 || __GLIBC__ == 2 &&  __GLIBC_MINOR__ >= 3)#undef h_errnoextern int h_errno;#endifextern struct __res_state _res;#ifdef	DO_PTHREADSstatic pthread_key_t	key;static int		once = 0;#elsestatic struct net_data	*net_data;#endifvoidirs_destroy(void) {#ifndef DO_PTHREADS	if (net_data != NULL)		net_data_destroy(net_data);	net_data = NULL;#endif}voidnet_data_destroy(void *p) {	struct net_data *net_data = p;	res_ndestroy(net_data->res);	if (net_data->gr != NULL) {		(*net_data->gr->close)(net_data->gr);		net_data->gr = NULL;	}	if (net_data->pw != NULL) {		(*net_data->pw->close)(net_data->pw);		net_data->pw = NULL;	}	if (net_data->sv != NULL) {		(*net_data->sv->close)(net_data->sv);		net_data->sv = NULL;	}	if (net_data->pr != NULL) {		(*net_data->pr->close)(net_data->pr);		net_data->pr = NULL;	}	if (net_data->ho != NULL) {		(*net_data->ho->close)(net_data->ho);		net_data->ho = NULL;	}	if (net_data->nw != NULL) {		(*net_data->nw->close)(net_data->nw);		net_data->nw = NULL;	}	if (net_data->ng != NULL) {		(*net_data->ng->close)(net_data->ng);		net_data->ng = NULL;	}	if (net_data->ho_data != NULL) {		free(net_data->ho_data);		net_data->ho_data = NULL;	}	if (net_data->nw_data != NULL) {		free(net_data->nw_data);		net_data->nw_data = NULL;	}	(*net_data->irs->close)(net_data->irs);	memput(net_data, sizeof *net_data);}/* applications that need a specific config file other than * _PATH_IRS_CONF should call net_data_init directly rather than letting *   the various wrapper functions make the first call. - brister */struct net_data *net_data_init(const char *conf_file) {#ifdef	DO_PTHREADS#ifndef LIBBIND_MUTEX_INITIALIZER#define LIBBIND_MUTEX_INITIALIZER PTHREAD_MUTEX_INITIALIZER#endif	static pthread_mutex_t keylock = LIBBIND_MUTEX_INITIALIZER;	struct net_data *net_data;	if (!once) {		pthread_mutex_lock(&keylock);		if (!once++)			pthread_key_create(&key, net_data_destroy);		pthread_mutex_unlock(&keylock);	}	net_data = pthread_getspecific(key);#endif	if (net_data == NULL) {		net_data = net_data_create(conf_file);		if (net_data == NULL)			return (NULL);#ifdef	DO_PTHREADS		pthread_setspecific(key, net_data);#endif	}	return (net_data);}struct net_data *net_data_create(const char *conf_file) {	struct net_data *net_data;	net_data = memget(sizeof (struct net_data));	if (net_data == NULL)		return (NULL);	memset(net_data, 0, sizeof (struct net_data));	if ((net_data->irs = irs_gen_acc("", conf_file)) == NULL) {		memput(net_data, sizeof (struct net_data));		return (NULL);	}#ifndef DO_PTHREADS	(*net_data->irs->res_set)(net_data->irs, &_res, NULL);#endif	net_data->res = (*net_data->irs->res_get)(net_data->irs);	if (net_data->res == NULL) {		(*net_data->irs->close)(net_data->irs);		memput(net_data, sizeof (struct net_data));		return (NULL);	}	if ((net_data->res->options & RES_INIT) == 0U &&	    res_ninit(net_data->res) == -1) {		(*net_data->irs->close)(net_data->irs);		memput(net_data, sizeof (struct net_data));		return (NULL);	}	return (net_data);}voidnet_data_minimize(struct net_data *net_data) {	res_nclose(net_data->res);}#ifdef _REENTRANTstruct __res_state *__res_state(void) {	/* NULL param here means use the default config file. */	struct net_data *net_data = net_data_init(NULL);	if (net_data && net_data->res)		return (net_data->res);	return (&_res);}#else#ifdef __linuxstruct __res_state *__res_state(void) {	return (&_res);}#endif#endifint *__h_errno(void) {	/* NULL param here means use the default config file. */	struct net_data *net_data = net_data_init(NULL);	if (net_data && net_data->res)		return (&net_data->res->res_h_errno);#if !(__GLIBC__ > 2 || __GLIBC__ == 2 &&  __GLIBC_MINOR__ >= 3)	return(&_res.res_h_errno);#else	return (&h_errno);#endif}void__h_errno_set(struct __res_state *res, int err) {#if (__GLIBC__ > 2 || __GLIBC__ == 2 &&  __GLIBC_MINOR__ >= 3)	res->res_h_errno = err;#else	h_errno = res->res_h_errno = err;#endif}#endif /*__BIND_NOSTATIC*/