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#ifdef WANT_IRS_NIS
21
22#include <rpc/rpc.h>
23#include <rpc/xdr.h>
24#include <rpcsvc/yp_prot.h>
25#include <rpcsvc/ypclnt.h>
26
27#include <stdlib.h>
28#include <string.h>
29#include <errno.h>
30
31#include <sys/types.h>
32#include <netinet/in.h>
33#ifdef T_NULL
34#undef T_NULL			/* Silence re-definition warning of T_NULL. */
35#endif
36#include <arpa/nameser.h>
37#include <resolv.h>
38
39#include <isc/memcluster.h>
40#include <irs.h>
41
42#include "port_after.h"
43
44#include "irs_p.h"
45#include "hesiod.h"
46#include "nis_p.h"
47
48/* Forward */
49
50static void		nis_close(struct irs_acc *);
51static struct __res_state * nis_res_get(struct irs_acc *);
52static void		nis_res_set(struct irs_acc *, struct __res_state *,
53				void (*)(void *));
54
55/* Public */
56
57struct irs_acc *
58irs_nis_acc(const char *options) {
59	struct nis_p *nis;
60	struct irs_acc *acc;
61	char *domain;
62
63	UNUSED(options);
64
65	if (yp_get_default_domain(&domain) != 0)
66		return (NULL);
67	if (!(nis = memget(sizeof *nis))) {
68		errno = ENOMEM;
69		return (NULL);
70	}
71	memset(nis, 0, sizeof *nis);
72	if (!(acc = memget(sizeof *acc))) {
73		memput(nis, sizeof *nis);
74		errno = ENOMEM;
75		return (NULL);
76	}
77	memset(acc, 0x5e, sizeof *acc);
78	acc->private = nis;
79	nis->domain = strdup(domain);
80#ifdef WANT_IRS_GR
81	acc->gr_map = irs_nis_gr;
82#else
83	acc->gr_map = NULL;
84#endif
85#ifdef WANT_IRS_PW
86	acc->pw_map = irs_nis_pw;
87#else
88	acc->pw_map = NULL;
89#endif
90	acc->sv_map = irs_nis_sv;
91	acc->pr_map = irs_nis_pr;
92	acc->ho_map = irs_nis_ho;
93	acc->nw_map = irs_nis_nw;
94	acc->ng_map = irs_nis_ng;
95	acc->res_get = nis_res_get;
96	acc->res_set = nis_res_set;
97	acc->close = nis_close;
98	return (acc);
99}
100
101/* Methods */
102
103static struct __res_state *
104nis_res_get(struct irs_acc *this) {
105	struct nis_p *nis = (struct nis_p *)this->private;
106
107	if (nis->res == NULL) {
108		struct __res_state *res;
109		res = (struct __res_state *)malloc(sizeof *res);
110		if (res == NULL)
111			return (NULL);
112		memset(res, 0, sizeof *res);
113		nis_res_set(this, res, free);
114	}
115
116	if ((nis->res->options & RES_INIT) == 0 &&
117	    res_ninit(nis->res) < 0)
118		return (NULL);
119
120	return (nis->res);
121}
122
123static void
124nis_res_set(struct irs_acc *this, struct __res_state *res,
125		void (*free_res)(void *)) {
126	struct nis_p *nis = (struct nis_p *)this->private;
127
128	if (nis->res && nis->free_res) {
129		res_nclose(nis->res);
130		(*nis->free_res)(nis->res);
131	}
132
133	nis->res = res;
134	nis->free_res = free_res;
135}
136
137static void
138nis_close(struct irs_acc *this) {
139	struct nis_p *nis = (struct nis_p *)this->private;
140
141	if (nis->res && nis->free_res)
142		(*nis->free_res)(nis->res);
143	free(nis->domain);
144	memput(nis, sizeof *nis);
145	memput(this, sizeof *this);
146}
147
148#endif /*WANT_IRS_NIS*/
149
150/*! \file */
151