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 #if !defined(LINT) && !defined(CODECENTER)
19 static const char rcsid[] = "$Id: lcl.c,v 1.4 2005/04/27 04:56:30 sra Exp $";
20 #endif
21
22 /* Imports */
23
24 #include "port_before.h"
25
26 #include <stdlib.h>
27 #include <errno.h>
28 #include <string.h>
29
30 #include <sys/types.h>
31 #include <netinet/in.h>
32 #include <arpa/nameser.h>
33 #include <resolv.h>
34
35 #include <isc/memcluster.h>
36
37 #include <irs.h>
38
39 #include "port_after.h"
40
41 #include "irs_p.h"
42 #include "lcl_p.h"
43
44 /* Forward. */
45
46 static void lcl_close(struct irs_acc *);
47 static struct __res_state * lcl_res_get(struct irs_acc *);
48 static void lcl_res_set(struct irs_acc *, struct __res_state *,
49 void (*)(void *));
50
51 /* Public */
52
53 struct irs_acc *
irs_lcl_acc(const char * options)54 irs_lcl_acc(const char *options) {
55 struct irs_acc *acc;
56 struct lcl_p *lcl;
57
58 UNUSED(options);
59
60 if (!(acc = memget(sizeof *acc))) {
61 errno = ENOMEM;
62 return (NULL);
63 }
64 memset(acc, 0x5e, sizeof *acc);
65 if (!(lcl = memget(sizeof *lcl))) {
66 errno = ENOMEM;
67 free(acc);
68 return (NULL);
69 }
70 memset(lcl, 0x5e, sizeof *lcl);
71 lcl->res = NULL;
72 lcl->free_res = NULL;
73 acc->private = lcl;
74 #ifdef WANT_IRS_GR
75 acc->gr_map = irs_lcl_gr;
76 #else
77 acc->gr_map = NULL;
78 #endif
79 #ifdef WANT_IRS_PW
80 acc->pw_map = irs_lcl_pw;
81 #else
82 acc->pw_map = NULL;
83 #endif
84 acc->sv_map = irs_lcl_sv;
85 acc->pr_map = irs_lcl_pr;
86 acc->ho_map = irs_lcl_ho;
87 acc->nw_map = irs_lcl_nw;
88 acc->ng_map = irs_lcl_ng;
89 acc->res_get = lcl_res_get;
90 acc->res_set = lcl_res_set;
91 acc->close = lcl_close;
92 return (acc);
93 }
94
95 /* Methods */
96 static struct __res_state *
lcl_res_get(struct irs_acc * this)97 lcl_res_get(struct irs_acc *this) {
98 struct lcl_p *lcl = (struct lcl_p *)this->private;
99
100 if (lcl->res == NULL) {
101 struct __res_state *res;
102 res = (struct __res_state *)malloc(sizeof *res);
103 if (res == NULL)
104 return (NULL);
105 memset(res, 0, sizeof *res);
106 lcl_res_set(this, res, free);
107 }
108
109 if ((lcl->res->options & RES_INIT) == 0U &&
110 res_ninit(lcl->res) < 0)
111 return (NULL);
112
113 return (lcl->res);
114 }
115
116 static void
lcl_res_set(struct irs_acc * this,struct __res_state * res,void (* free_res)(void *))117 lcl_res_set(struct irs_acc *this, struct __res_state *res,
118 void (*free_res)(void *)) {
119 struct lcl_p *lcl = (struct lcl_p *)this->private;
120
121 if (lcl->res && lcl->free_res) {
122 res_nclose(lcl->res);
123 (*lcl->free_res)(lcl->res);
124 }
125
126 lcl->res = res;
127 lcl->free_res = free_res;
128 }
129
130 static void
lcl_close(struct irs_acc * this)131 lcl_close(struct irs_acc *this) {
132 struct lcl_p *lcl = (struct lcl_p *)this->private;
133
134 if (lcl) {
135 if (lcl->free_res)
136 (*lcl->free_res)(lcl->res);
137 memput(lcl, sizeof *lcl);
138 }
139 memput(this, sizeof *this);
140 }
141
142 /*! \file */
143