xref: /netbsd/lib/libc/yp/yp_first.c (revision 6550d01e)
1 /*	$NetBSD: yp_first.c,v 1.14 2003/12/10 12:06:25 agc Exp $	 */
2 
3 /*
4  * Copyright (c) 1992, 1993 Theo de Raadt <deraadt@fsa.ca>
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
17  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
18  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
20  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 #if defined(LIBC_SCCS) && !defined(lint)
31 __RCSID("$NetBSD: yp_first.c,v 1.14 2003/12/10 12:06:25 agc Exp $");
32 #endif
33 
34 #include "namespace.h"
35 #include <stdlib.h>
36 #include <string.h>
37 #include <rpc/rpc.h>
38 #include <rpcsvc/yp_prot.h>
39 #include <rpcsvc/ypclnt.h>
40 #include "local.h"
41 
42 extern struct timeval _yplib_timeout;
43 extern int _yplib_nerrs;
44 
45 #ifdef __weak_alias
46 __weak_alias(yp_first,_yp_first)
47 __weak_alias(yp_next,_yp_next)
48 #endif
49 
50 int
51 yp_first(indomain, inmap, outkey, outkeylen, outval, outvallen)
52 	const char     *indomain;
53 	const char     *inmap;
54 	char          **outkey;
55 	int            *outkeylen;
56 	char          **outval;
57 	int            *outvallen;
58 {
59 	struct ypresp_key_val yprkv;
60 	struct ypreq_nokey yprnk;
61 	struct dom_binding *ysd;
62 	int r, nerrs = 0;
63 
64 	if (outkey == NULL || outkeylen == NULL || \
65 	    outval == NULL || outvallen == NULL)
66 		return YPERR_BADARGS;
67 	*outkey = *outval = NULL;
68 	*outkeylen = *outvallen = 0;
69 	if (_yp_invalid_domain(indomain))
70 		return YPERR_BADARGS;
71 	if (inmap == NULL || *inmap == '\0'
72 	    || strlen(inmap) > YPMAXMAP)
73 		return YPERR_BADARGS;
74 
75 again:
76 	if (_yp_dobind(indomain, &ysd) != 0)
77 		return YPERR_DOMAIN;
78 
79 	yprnk.domain = indomain;
80 	yprnk.map = inmap;
81 	(void)memset(&yprkv, 0, sizeof yprkv);
82 
83 	r = clnt_call(ysd->dom_client, (rpcproc_t)YPPROC_FIRST,
84 	    (xdrproc_t)xdr_ypreq_nokey,
85 	    &yprnk, (xdrproc_t)xdr_ypresp_key_val, &yprkv, _yplib_timeout);
86 	if (r != RPC_SUCCESS) {
87 		if (++nerrs == _yplib_nerrs) {
88 			clnt_perror(ysd->dom_client, "yp_first: clnt_call");
89 			nerrs = 0;
90 		}
91 		ysd->dom_vers = -1;
92 		goto again;
93 	}
94 	if (!(r = ypprot_err(yprkv.status))) {
95 		*outkeylen = yprkv.keydat.dsize;
96 		if ((*outkey = malloc((size_t)(*outkeylen + 1))) == NULL)
97 			r = YPERR_RESRC;
98 		else {
99 			(void)memcpy(*outkey, yprkv.keydat.dptr,
100 			    (size_t)*outkeylen);
101 			(*outkey)[*outkeylen] = '\0';
102 		}
103 		*outvallen = yprkv.valdat.dsize;
104 		if ((*outval = malloc((size_t)(*outvallen + 1))) == NULL)
105 			r = YPERR_RESRC;
106 		else {
107 			(void)memcpy(*outval, yprkv.valdat.dptr,
108 			    (size_t)*outvallen);
109 			(*outval)[*outvallen] = '\0';
110 		}
111 	}
112 	xdr_free((xdrproc_t)xdr_ypresp_key_val, (char *)(void *)&yprkv);
113 	__yp_unbind(ysd);
114 	if (r != 0) {
115 		if (*outkey) {
116 			free(*outkey);
117 			*outkey = NULL;
118 		}
119 		if (*outval) {
120 			free(*outval);
121 			*outval = NULL;
122 		}
123 	}
124 	return r;
125 }
126 
127 int
128 yp_next(indomain, inmap, inkey, inkeylen, outkey, outkeylen, outval, outvallen)
129 	const char     *indomain;
130 	const char     *inmap;
131 	const char     *inkey;
132 	int             inkeylen;
133 	char          **outkey;
134 	int            *outkeylen;
135 	char          **outval;
136 	int            *outvallen;
137 {
138 	struct ypresp_key_val yprkv;
139 	struct ypreq_key yprk;
140 	struct dom_binding *ysd;
141 	int r, nerrs = 0;
142 
143 	if (outkey == NULL || outkeylen == NULL || \
144 	    outval == NULL || outvallen == NULL || \
145 	    inkey == NULL)
146 		return YPERR_BADARGS;
147 	*outkey = *outval = NULL;
148 	*outkeylen = *outvallen = 0;
149 
150 	if (_yp_invalid_domain(indomain))
151 		return YPERR_BADARGS;
152 	if (inmap == NULL || *inmap == '\0'
153 	    || strlen(inmap) > YPMAXMAP)
154 		return YPERR_BADARGS;
155 
156 again:
157 	if (_yp_dobind(indomain, &ysd) != 0)
158 		return YPERR_DOMAIN;
159 
160 	yprk.domain = indomain;
161 	yprk.map = inmap;
162 	yprk.keydat.dptr = inkey;
163 	yprk.keydat.dsize = inkeylen;
164 	(void)memset(&yprkv, 0, sizeof yprkv);
165 
166 	r = clnt_call(ysd->dom_client, (rpcproc_t)YPPROC_NEXT,
167 	    (xdrproc_t)xdr_ypreq_key,
168 	    &yprk, (xdrproc_t)xdr_ypresp_key_val, &yprkv, _yplib_timeout);
169 	if (r != RPC_SUCCESS) {
170 		if (++nerrs == _yplib_nerrs) {
171 			clnt_perror(ysd->dom_client, "yp_next: clnt_call");
172 			nerrs = 0;
173 		}
174 		ysd->dom_vers = -1;
175 		goto again;
176 	}
177 	if (!(r = ypprot_err(yprkv.status))) {
178 		*outkeylen = yprkv.keydat.dsize;
179 		if ((*outkey = malloc((size_t)(*outkeylen + 1))) == NULL)
180 			r = YPERR_RESRC;
181 		else {
182 			(void)memcpy(*outkey, yprkv.keydat.dptr,
183 			    (size_t)*outkeylen);
184 			(*outkey)[*outkeylen] = '\0';
185 		}
186 		*outvallen = yprkv.valdat.dsize;
187 		if ((*outval = malloc((size_t)(*outvallen + 1))) == NULL)
188 			r = YPERR_RESRC;
189 		else {
190 			(void)memcpy(*outval, yprkv.valdat.dptr,
191 			    (size_t)*outvallen);
192 			(*outval)[*outvallen] = '\0';
193 		}
194 	}
195 	xdr_free((xdrproc_t)xdr_ypresp_key_val, (char *)(void *)&yprkv);
196 	__yp_unbind(ysd);
197 	if (r != 0) {
198 		if (*outkey) {
199 			free(*outkey);
200 			*outkey = NULL;
201 		}
202 		if (*outval) {
203 			free(*outval);
204 			*outval = NULL;
205 		}
206 	}
207 	return r;
208 }
209