1/*
2 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
3 * Copyright (c) 1996-1999 by Internet Software Consortium.
4 *
5 * Permission to use, copy, modify, and distribute this software for any
6 * purpose with or without fee is hereby granted, provided that the above
7 * copyright notice and this permission notice appear in all copies.
8 *
9 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
10 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11 * MERCHANTABILITY AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR
12 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
15 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16 */
17
18#include "port_before.h"
19
20#include <stdlib.h>
21#include <errno.h>
22#include <string.h>
23
24#include <sys/types.h>
25#include <netinet/in.h>
26#include <arpa/nameser.h>
27#include <resolv.h>
28
29#include <isc/memcluster.h>
30
31#include <irs.h>
32
33#include "port_after.h"
34
35#include "irs_p.h"
36#include "lcl_p.h"
37
38/* Forward. */
39
40static void		lcl_close(struct irs_acc *);
41static struct __res_state *	lcl_res_get(struct irs_acc *);
42static void		lcl_res_set(struct irs_acc *, struct __res_state *,
43				void (*)(void *));
44
45/* Public */
46
47struct irs_acc *
48irs_lcl_acc(const char *options) {
49	struct irs_acc *acc;
50	struct lcl_p *lcl;
51
52	UNUSED(options);
53
54	if (!(acc = memget(sizeof *acc))) {
55		errno = ENOMEM;
56		return (NULL);
57	}
58	memset(acc, 0x5e, sizeof *acc);
59	if (!(lcl = memget(sizeof *lcl))) {
60		errno = ENOMEM;
61		free(acc);
62		return (NULL);
63	}
64	memset(lcl, 0x5e, sizeof *lcl);
65	lcl->res = NULL;
66	lcl->free_res = NULL;
67	acc->private = lcl;
68#ifdef WANT_IRS_GR
69	acc->gr_map = irs_lcl_gr;
70#else
71	acc->gr_map = NULL;
72#endif
73#ifdef WANT_IRS_PW
74	acc->pw_map = irs_lcl_pw;
75#else
76	acc->pw_map = NULL;
77#endif
78	acc->sv_map = irs_lcl_sv;
79	acc->pr_map = irs_lcl_pr;
80	acc->ho_map = irs_lcl_ho;
81	acc->nw_map = irs_lcl_nw;
82	acc->ng_map = irs_lcl_ng;
83	acc->res_get = lcl_res_get;
84	acc->res_set = lcl_res_set;
85	acc->close = lcl_close;
86	return (acc);
87}
88
89/* Methods */
90static struct __res_state *
91lcl_res_get(struct irs_acc *this) {
92	struct lcl_p *lcl = (struct lcl_p *)this->private;
93
94	if (lcl->res == NULL) {
95		struct __res_state *res;
96		res = (struct __res_state *)malloc(sizeof *res);
97		if (res == NULL)
98			return (NULL);
99		memset(res, 0, sizeof *res);
100		lcl_res_set(this, res, free);
101	}
102
103	if ((lcl->res->options & RES_INIT) == 0U &&
104	    res_ninit(lcl->res) < 0)
105		return (NULL);
106
107	return (lcl->res);
108}
109
110static void
111lcl_res_set(struct irs_acc *this, struct __res_state *res,
112		void (*free_res)(void *)) {
113	struct lcl_p *lcl = (struct lcl_p *)this->private;
114
115	if (lcl->res && lcl->free_res) {
116		res_nclose(lcl->res);
117		(*lcl->free_res)(lcl->res);
118	}
119
120	lcl->res = res;
121	lcl->free_res = free_res;
122}
123
124static void
125lcl_close(struct irs_acc *this) {
126	struct lcl_p *lcl = (struct lcl_p *)this->private;
127
128	if (lcl) {
129		if (lcl->free_res)
130			(*lcl->free_res)(lcl->res);
131		memput(lcl, sizeof *lcl);
132	}
133	memput(this, sizeof *this);
134}
135
136/*! \file */
137