xref: /netbsd/lib/libc/rpc/clnt_bcast.c (revision bf9ec67e)
1 /*	$NetBSD: clnt_bcast.c,v 1.7 2001/11/04 13:57:30 lukem Exp $	*/
2 
3 /*
4  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
5  * unrestricted use provided that this legend is included on all tape
6  * media and as a part of the software program in whole or part.  Users
7  * may copy or modify Sun RPC without charge, but are not authorized
8  * to license or distribute it to anyone else except as part of a product or
9  * program developed by the user.
10  *
11  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
12  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
13  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
14  *
15  * Sun RPC is provided with no support and without any obligation on the
16  * part of Sun Microsystems, Inc. to assist in its use, correction,
17  * modification or enhancement.
18  *
19  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
20  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
21  * OR ANY PART THEREOF.
22  *
23  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
24  * or profits or other special, indirect and consequential damages, even if
25  * Sun has been advised of the possibility of such damages.
26  *
27  * Sun Microsystems, Inc.
28  * 2550 Garcia Avenue
29  * Mountain View, California  94043
30  */
31 /*
32  * Copyright (c) 1986-1991 by Sun Microsystems Inc.
33  */
34 
35 /* #ident	"@(#)clnt_bcast.c	1.18	94/05/03 SMI" */
36 
37 #if 0
38 #if !defined(lint) && defined(SCCSIDS)
39 static char sccsid[] = "@(#)clnt_bcast.c 1.15 89/04/21 Copyr 1988 Sun Micro";
40 #endif
41 #endif
42 
43 
44 /*
45  * clnt_bcast.c
46  * Client interface to broadcast service.
47  *
48  * Copyright (C) 1988, Sun Microsystems, Inc.
49  *
50  * The following is kludged-up support for simple rpc broadcasts.
51  * Someday a large, complicated system will replace these routines.
52  */
53 
54 #include "namespace.h"
55 #include <sys/types.h>
56 #include <sys/socket.h>
57 #include <sys/queue.h>
58 #include <net/if.h>
59 #include <netinet/in.h>
60 #include <ifaddrs.h>
61 #include <sys/poll.h>
62 #include <rpc/rpc.h>
63 #ifdef PORTMAP
64 #include <rpc/pmap_prot.h>
65 #include <rpc/pmap_clnt.h>
66 #include <rpc/pmap_rmt.h>
67 #endif
68 #include <rpc/nettype.h>
69 #include <arpa/inet.h>
70 #ifdef RPC_DEBUG
71 #include <stdio.h>
72 #endif
73 #include <assert.h>
74 #include <errno.h>
75 #include <stdlib.h>
76 #include <unistd.h>
77 #include <netdb.h>
78 #include <err.h>
79 #include <string.h>
80 
81 #include "rpc_com.h"
82 
83 #define	MAXBCAST 20	/* Max no of broadcasting transports */
84 #define	INITTIME 4000	/* Time to wait initially */
85 #define	WAITTIME 8000	/* Maximum time to wait */
86 
87 /*
88  * If nettype is NULL, it broadcasts on all the available
89  * datagram_n transports. May potentially lead to broadacst storms
90  * and hence should be used with caution, care and courage.
91  *
92  * The current parameter xdr packet size is limited by the max tsdu
93  * size of the transport. If the max tsdu size of any transport is
94  * smaller than the parameter xdr packet, then broadcast is not
95  * sent on that transport.
96  *
97  * Also, the packet size should be less the packet size of
98  * the data link layer (for ethernet it is 1400 bytes).  There is
99  * no easy way to find out the max size of the data link layer and
100  * we are assuming that the args would be smaller than that.
101  *
102  * The result size has to be smaller than the transport tsdu size.
103  *
104  * If PORTMAP has been defined, we send two packets for UDP, one for
105  * rpcbind and one for portmap. For those machines which support
106  * both rpcbind and portmap, it will cause them to reply twice, and
107  * also here it will get two responses ... inefficient and clumsy.
108  */
109 
110 #ifdef __weak_alias
111 __weak_alias(rpc_broadcast_exp,_rpc_broadcast_exp)
112 __weak_alias(rpc_broadcast,_rpc_broadcast)
113 #endif
114 
115 struct broadif {
116 	int index;
117 	struct sockaddr_storage broadaddr;
118 	TAILQ_ENTRY(broadif) link;
119 };
120 
121 typedef TAILQ_HEAD(, broadif) broadlist_t;
122 
123 int __rpc_getbroadifs __P((int, int, int, broadlist_t *));
124 void __rpc_freebroadifs __P((broadlist_t *));
125 int __rpc_broadenable __P((int, int, struct broadif *));
126 
127 int __rpc_lowvers = 0;
128 
129 int
130 __rpc_getbroadifs(int af, int proto, int socktype, broadlist_t *list)
131 {
132 	int count = 0;
133 	struct broadif *bip;
134 	struct ifaddrs *ifap, *ifp;
135 #ifdef INET6
136 	struct sockaddr_in6 *sin6;
137 #endif
138 	struct sockaddr_in *gbsin;
139 	struct addrinfo hints, *res;
140 
141 	_DIAGASSERT(list != NULL);
142 
143 	if (getifaddrs(&ifp) < 0)
144 		return 0;
145 
146 	memset(&hints, 0, sizeof hints);
147 
148 	hints.ai_family = af;
149 	hints.ai_protocol = proto;
150 	hints.ai_socktype = socktype;
151 
152 	if (getaddrinfo(NULL, "sunrpc", &hints, &res) != 0)
153 		return 0;
154 
155 	for (ifap = ifp; ifap != NULL; ifap = ifap->ifa_next) {
156 		if (ifap->ifa_addr->sa_family != af ||
157 		    !(ifap->ifa_flags & IFF_UP))
158 			continue;
159 #ifdef INET6
160 		if ((af == AF_INET6 && !(ifap->ifa_flags & IFF_MULTICAST)) ||
161 		    !(ifap->ifa_flags & IFF_BROADCAST))
162 			continue;
163 #endif
164 		bip = (struct broadif *)malloc(sizeof *bip);
165 		if (bip == NULL)
166 			break;
167 		bip->index = if_nametoindex(ifap->ifa_name);
168 		if (
169 #ifdef INET6
170 		    af != AF_INET6 &&
171 #endif
172 		    (ifap->ifa_flags & IFF_BROADCAST)) {
173 			memcpy(&bip->broadaddr, ifap->ifa_broadaddr,
174 			    (size_t)ifap->ifa_broadaddr->sa_len);
175 			gbsin = (struct sockaddr_in *)(void *)&bip->broadaddr;
176 			gbsin->sin_port =
177 			    ((struct sockaddr_in *)
178 			    (void *)res->ai_addr)->sin_port;
179 		}
180 #ifdef INET6
181 		else if (af == AF_INET6) {
182 			sin6 = (struct sockaddr_in6 *)(void *)&bip->broadaddr;
183 			inet_pton(af, RPCB_MULTICAST_ADDR, &sin6->sin6_addr);
184 			sin6->sin6_family = af;
185 			sin6->sin6_len = sizeof *sin6;
186 			sin6->sin6_port =
187 			    ((struct sockaddr_in6 *)
188 			    (void *)res->ai_addr)->sin6_port;
189 			sin6->sin6_scope_id = bip->index;
190 		}
191 #endif
192 		TAILQ_INSERT_TAIL(list, bip, link);
193 		count++;
194 	}
195 	freeifaddrs(ifp);
196 	freeaddrinfo(res);
197 
198 	return count;
199 }
200 
201 void
202 __rpc_freebroadifs(broadlist_t *list)
203 {
204 	struct broadif *bip, *next;
205 
206 	_DIAGASSERT(list != NULL);
207 
208 	bip = TAILQ_FIRST(list);
209 
210 	while (bip != NULL) {
211 		next = TAILQ_NEXT(bip, link);
212 		free(bip);
213 		bip = next;
214 	}
215 }
216 
217 int
218 /*ARGSUSED*/
219 __rpc_broadenable(int af, int s, struct broadif *bip)
220 {
221 	int o = 1;
222 
223 #if 0
224 	_DIAGASSERT(bip != NULL);
225 
226 	if (af == AF_INET6) {
227 		fprintf(stderr, "set v6 multicast if to %d\n", bip->index);
228 		if (setsockopt(s, IPPROTO_IPV6, IPV6_MULTICAST_IF, &bip->index,
229 		    sizeof bip->index) < 0)
230 			return -1;
231 	} else
232 #endif
233 		if (setsockopt(s, SOL_SOCKET, SO_BROADCAST, &o, sizeof o) < 0)
234 			return -1;
235 
236 	return 0;
237 }
238 
239 
240 enum clnt_stat
241 rpc_broadcast_exp(prog, vers, proc, xargs, argsp, xresults, resultsp,
242 	eachresult, inittime, waittime, nettype)
243 	rpcprog_t	prog;		/* program number */
244 	rpcvers_t	vers;		/* version number */
245 	rpcproc_t	proc;		/* procedure number */
246 	xdrproc_t	xargs;		/* xdr routine for args */
247 	caddr_t		argsp;		/* pointer to args */
248 	xdrproc_t	xresults;	/* xdr routine for results */
249 	caddr_t		resultsp;	/* pointer to results */
250 	resultproc_t	eachresult;	/* call with each result obtained */
251 	int 		inittime;	/* how long to wait initially */
252 	int 		waittime;	/* maximum time to wait */
253 	const char		*nettype;	/* transport type */
254 {
255 	enum clnt_stat	stat = RPC_SUCCESS; /* Return status */
256 	XDR 		xdr_stream; /* XDR stream */
257 	XDR 		*xdrs = &xdr_stream;
258 	struct rpc_msg	msg;	/* RPC message */
259 	struct timeval	t;
260 	char 		*outbuf = NULL;	/* Broadcast msg buffer */
261 	char		*inbuf = NULL; /* Reply buf */
262 	int		inlen;
263 	u_int 		maxbufsize = 0;
264 	AUTH 		*sys_auth = authunix_create_default();
265 	int		i;
266 	void		*handle;
267 	char		uaddress[1024];	/* A self imposed limit */
268 	char		*uaddrp = uaddress;
269 	int 		pmap_reply_flag; /* reply recvd from PORTMAP */
270 	/* An array of all the suitable broadcast transports */
271 	struct {
272 		int fd;		/* File descriptor */
273 		int af;
274 		int proto;
275 		struct netconfig *nconf; /* Netconfig structure */
276 		u_int asize;	/* Size of the addr buf */
277 		u_int dsize;	/* Size of the data buf */
278 		struct sockaddr_storage raddr; /* Remote address */
279 		broadlist_t nal;
280 	} fdlist[MAXBCAST];
281 	struct pollfd pfd[MAXBCAST];
282 	size_t fdlistno = 0;
283 	struct r_rpcb_rmtcallargs barg;	/* Remote arguments */
284 	struct r_rpcb_rmtcallres bres; /* Remote results */
285 	size_t outlen;
286 	struct netconfig *nconf;
287 	int msec;
288 	int pollretval;
289 	int fds_found;
290 
291 #ifdef PORTMAP
292 	size_t outlen_pmap;
293 	u_long port;		/* Remote port number */
294 	int pmap_flag = 0;	/* UDP exists ? */
295 	char *outbuf_pmap = NULL;
296 	struct rmtcallargs barg_pmap;	/* Remote arguments */
297 	struct rmtcallres bres_pmap; /* Remote results */
298 	u_int udpbufsz = 0;
299 #endif				/* PORTMAP */
300 
301 	if (sys_auth == NULL) {
302 		return (RPC_SYSTEMERROR);
303 	}
304 	/*
305 	 * initialization: create a fd, a broadcast address, and send the
306 	 * request on the broadcast transport.
307 	 * Listen on all of them and on replies, call the user supplied
308 	 * function.
309 	 */
310 
311 	if (nettype == NULL)
312 		nettype = "datagram_n";
313 	if ((handle = __rpc_setconf(nettype)) == NULL) {
314 		return (RPC_UNKNOWNPROTO);
315 	}
316 	while ((nconf = __rpc_getconf(handle)) != NULL) {
317 		int fd;
318 		struct __rpc_sockinfo si;
319 
320 		if (nconf->nc_semantics != NC_TPI_CLTS)
321 			continue;
322 		if (fdlistno >= MAXBCAST)
323 			break;	/* No more slots available */
324 		if (!__rpc_nconf2sockinfo(nconf, &si))
325 			continue;
326 
327 		TAILQ_INIT(&fdlist[fdlistno].nal);
328 		if (__rpc_getbroadifs(si.si_af, si.si_proto, si.si_socktype,
329 		    &fdlist[fdlistno].nal) == 0)
330 			continue;
331 
332 		fd = socket(si.si_af, si.si_socktype, si.si_proto);
333 		if (fd < 0) {
334 			stat = RPC_CANTSEND;
335 			continue;
336 		}
337 		fdlist[fdlistno].af = si.si_af;
338 		fdlist[fdlistno].proto = si.si_proto;
339 		fdlist[fdlistno].fd = fd;
340 		fdlist[fdlistno].nconf = nconf;
341 		fdlist[fdlistno].asize = __rpc_get_a_size(si.si_af);
342 		pfd[fdlistno].events = POLLIN | POLLPRI |
343 			POLLRDNORM | POLLRDBAND;
344 		pfd[fdlistno].fd = fdlist[fdlistno].fd = fd;
345 		fdlist[fdlistno].dsize = __rpc_get_t_size(si.si_af, si.si_proto,
346 							  0);
347 
348 		if (maxbufsize <= fdlist[fdlistno].dsize)
349 			maxbufsize = fdlist[fdlistno].dsize;
350 
351 #ifdef PORTMAP
352 		if (si.si_af == AF_INET && si.si_proto == IPPROTO_UDP) {
353 			udpbufsz = fdlist[fdlistno].dsize;
354 			if ((outbuf_pmap = malloc(udpbufsz)) == NULL) {
355 				close(fd);
356 				stat = RPC_SYSTEMERROR;
357 				goto done_broad;
358 			}
359 			pmap_flag = 1;
360 		}
361 #endif
362 		fdlistno++;
363 	}
364 
365 	if (fdlistno == 0) {
366 		if (stat == RPC_SUCCESS)
367 			stat = RPC_UNKNOWNPROTO;
368 		goto done_broad;
369 	}
370 	if (maxbufsize == 0) {
371 		if (stat == RPC_SUCCESS)
372 			stat = RPC_CANTSEND;
373 		goto done_broad;
374 	}
375 	inbuf = malloc(maxbufsize);
376 	outbuf = malloc(maxbufsize);
377 	if ((inbuf == NULL) || (outbuf == NULL)) {
378 		stat = RPC_SYSTEMERROR;
379 		goto done_broad;
380 	}
381 
382 	/* Serialize all the arguments which have to be sent */
383 	(void) gettimeofday(&t, NULL);
384 	msg.rm_xid = __RPC_GETXID(&t);
385 	msg.rm_direction = CALL;
386 	msg.rm_call.cb_rpcvers = RPC_MSG_VERSION;
387 	msg.rm_call.cb_prog = RPCBPROG;
388 	msg.rm_call.cb_vers = RPCBVERS;
389 	msg.rm_call.cb_proc = RPCBPROC_CALLIT;
390 	barg.prog = prog;
391 	barg.vers = vers;
392 	barg.proc = proc;
393 	barg.args.args_val = argsp;
394 	barg.xdr_args = xargs;
395 	bres.addr = uaddrp;
396 	bres.results.results_val = resultsp;
397 	bres.xdr_res = xresults;
398 	msg.rm_call.cb_cred = sys_auth->ah_cred;
399 	msg.rm_call.cb_verf = sys_auth->ah_verf;
400 	xdrmem_create(xdrs, outbuf, maxbufsize, XDR_ENCODE);
401 	if ((!xdr_callmsg(xdrs, &msg)) ||
402 	    (!xdr_rpcb_rmtcallargs(xdrs,
403 	    (struct rpcb_rmtcallargs *)(void *)&barg))) {
404 		stat = RPC_CANTENCODEARGS;
405 		goto done_broad;
406 	}
407 	outlen = xdr_getpos(xdrs);
408 	xdr_destroy(xdrs);
409 
410 #ifdef PORTMAP
411 	/* Prepare the packet for version 2 PORTMAP */
412 	if (pmap_flag) {
413 		msg.rm_xid++;	/* One way to distinguish */
414 		msg.rm_call.cb_prog = PMAPPROG;
415 		msg.rm_call.cb_vers = PMAPVERS;
416 		msg.rm_call.cb_proc = PMAPPROC_CALLIT;
417 		barg_pmap.prog = prog;
418 		barg_pmap.vers = vers;
419 		barg_pmap.proc = proc;
420 		barg_pmap.args_ptr = argsp;
421 		barg_pmap.xdr_args = xargs;
422 		bres_pmap.port_ptr = &port;
423 		bres_pmap.xdr_results = xresults;
424 		bres_pmap.results_ptr = resultsp;
425 		xdrmem_create(xdrs, outbuf_pmap, udpbufsz, XDR_ENCODE);
426 		if ((! xdr_callmsg(xdrs, &msg)) ||
427 		    (! xdr_rmtcall_args(xdrs, &barg_pmap))) {
428 			stat = RPC_CANTENCODEARGS;
429 			goto done_broad;
430 		}
431 		outlen_pmap = xdr_getpos(xdrs);
432 		xdr_destroy(xdrs);
433 	}
434 #endif				/* PORTMAP */
435 
436 	/*
437 	 * Basic loop: broadcast the packets to transports which
438 	 * support data packets of size such that one can encode
439 	 * all the arguments.
440 	 * Wait a while for response(s).
441 	 * The response timeout grows larger per iteration.
442 	 */
443 	for (msec = inittime; msec <= waittime; msec += msec) {
444 		struct broadif *bip;
445 
446 		/* Broadcast all the packets now */
447 		for (i = 0; i < fdlistno; i++) {
448 			if (fdlist[i].dsize < outlen) {
449 				stat = RPC_CANTSEND;
450 				continue;
451 			}
452 			for (bip = TAILQ_FIRST(&fdlist[i].nal); bip != NULL;
453 			     bip = TAILQ_NEXT(bip, link)) {
454 				void *addr;
455 
456 				addr = &bip->broadaddr;
457 
458 				__rpc_broadenable(fdlist[i].af, fdlist[i].fd,
459 				    bip);
460 
461 				/*
462 				 * Only use version 3 if lowvers is not set
463 				 */
464 
465 				if (!__rpc_lowvers)
466 					if (sendto(fdlist[i].fd, outbuf,
467 					    outlen, 0, (struct sockaddr*)addr,
468 					    (size_t)fdlist[i].asize) !=
469 					    outlen) {
470 #ifdef RPC_DEBUG
471 						perror("sendto");
472 #endif
473 						warnx("clnt_bcast: cannot send"
474 						      " broadcast packet");
475 						stat = RPC_CANTSEND;
476 						continue;
477 					};
478 #ifdef RPC_DEBUG
479 				if (!__rpc_lowvers)
480 					fprintf(stderr, "Broadcast packet sent "
481 						"for %s\n",
482 						 fdlist[i].nconf->nc_netid);
483 #endif
484 #ifdef PORTMAP
485 				/*
486 				 * Send the version 2 packet also
487 				 * for UDP/IP
488 				 */
489 				if (pmap_flag && fdlist[i].proto == IPPROTO_UDP) {
490 					if (sendto(fdlist[i].fd, outbuf_pmap,
491 					    outlen_pmap, 0, addr,
492 					    (size_t)fdlist[i].asize) !=
493 						outlen_pmap) {
494 						warnx("clnt_bcast: "
495 				"Cannot send broadcast packet");
496 						stat = RPC_CANTSEND;
497 						continue;
498 					}
499 				}
500 #ifdef RPC_DEBUG
501 				fprintf(stderr, "PMAP Broadcast packet "
502 					"sent for %s\n",
503 					fdlist[i].nconf->nc_netid);
504 #endif
505 #endif				/* PORTMAP */
506 			}
507 			/* End for sending all packets on this transport */
508 		}	/* End for sending on all transports */
509 
510 		if (eachresult == NULL) {
511 			stat = RPC_SUCCESS;
512 			goto done_broad;
513 		}
514 
515 		/*
516 		 * Get all the replies from these broadcast requests
517 		 */
518 	recv_again:
519 
520 		switch (pollretval = poll(pfd, fdlistno, msec)) {
521 		case 0:		/* timed out */
522 			stat = RPC_TIMEDOUT;
523 			continue;
524 		case -1:	/* some kind of error - we ignore it */
525 			goto recv_again;
526 		}		/* end of poll results switch */
527 
528 		for (i = fds_found = 0;
529 		     i < fdlistno && fds_found < pollretval; i++) {
530 			bool_t done = FALSE;
531 
532 			if (pfd[i].revents == 0)
533 				continue;
534 			else if (pfd[i].revents & POLLNVAL) {
535 				/*
536 				 * Something bad has happened to this descri-
537 				 * ptor. We can cause poll() to ignore
538 				 * it simply by using a negative fd.  We do that
539 				 * rather than compacting the pfd[] and fdlist[]
540 				 * arrays.
541 				 */
542 				pfd[i].fd = -1;
543 				fds_found++;
544 				continue;
545 			} else
546 				fds_found++;
547 #ifdef RPC_DEBUG
548 			fprintf(stderr, "response for %s\n",
549 				fdlist[i].nconf->nc_netid);
550 #endif
551 		try_again:
552 			inlen = recvfrom(fdlist[i].fd, inbuf, fdlist[i].dsize,
553 			    0, (struct sockaddr *)(void *)&fdlist[i].raddr,
554 			    &fdlist[i].asize);
555 			if (inlen < 0) {
556 				if (errno == EINTR)
557 					goto try_again;
558 				warnx("clnt_bcast: Cannot receive reply to "
559 					"broadcast");
560 				stat = RPC_CANTRECV;
561 				continue;
562 			}
563 			if (inlen < sizeof (u_int32_t))
564 				continue; /* Drop that and go ahead */
565 			/*
566 			 * see if reply transaction id matches sent id.
567 			 * If so, decode the results. If return id is xid + 1
568 			 * it was a PORTMAP reply
569 			 */
570 			if (*((u_int32_t *)(void *)(inbuf)) ==
571 			    *((u_int32_t *)(void *)(outbuf))) {
572 				pmap_reply_flag = 0;
573 				msg.acpted_rply.ar_verf = _null_auth;
574 				msg.acpted_rply.ar_results.where =
575 					(caddr_t)(void *)&bres;
576 				msg.acpted_rply.ar_results.proc =
577 					(xdrproc_t)xdr_rpcb_rmtcallres;
578 #ifdef PORTMAP
579 			} else if (pmap_flag &&
580 				*((u_int32_t *)(void *)(inbuf)) ==
581 				*((u_int32_t *)(void *)(outbuf_pmap))) {
582 				pmap_reply_flag = 1;
583 				msg.acpted_rply.ar_verf = _null_auth;
584 				msg.acpted_rply.ar_results.where =
585 					(caddr_t)(void *)&bres_pmap;
586 				msg.acpted_rply.ar_results.proc =
587 					(xdrproc_t)xdr_rmtcallres;
588 #endif				/* PORTMAP */
589 			} else
590 				continue;
591 			xdrmem_create(xdrs, inbuf, (u_int)inlen, XDR_DECODE);
592 			if (xdr_replymsg(xdrs, &msg)) {
593 				if ((msg.rm_reply.rp_stat == MSG_ACCEPTED) &&
594 				    (msg.acpted_rply.ar_stat == SUCCESS)) {
595 					struct netbuf taddr, *np;
596 					struct sockaddr_in *bsin;
597 
598 #ifdef PORTMAP
599 					if (pmap_flag && pmap_reply_flag) {
600 						bsin = (struct sockaddr_in *)
601 						    (void *)&fdlist[i].raddr;
602 						bsin->sin_port =
603 						    htons((u_short)port);
604 						taddr.len = taddr.maxlen =
605 						    fdlist[i].raddr.ss_len;
606 						taddr.buf = &fdlist[i].raddr;
607 						done = (*eachresult)(resultsp,
608 						    &taddr, fdlist[i].nconf);
609 					} else {
610 #endif
611 #ifdef RPC_DEBUG
612 						fprintf(stderr, "uaddr %s\n",
613 						    uaddrp);
614 #endif
615 						np = uaddr2taddr(
616 						    fdlist[i].nconf, uaddrp);
617 						done = (*eachresult)(resultsp,
618 						    np, fdlist[i].nconf);
619 						free(np);
620 #ifdef PORTMAP
621 					}
622 #endif
623 				}
624 				/* otherwise, we just ignore the errors ... */
625 			}
626 			/* else some kind of deserialization problem ... */
627 
628 			xdrs->x_op = XDR_FREE;
629 			msg.acpted_rply.ar_results.proc = (xdrproc_t) xdr_void;
630 			(void) xdr_replymsg(xdrs, &msg);
631 			(void) (*xresults)(xdrs, resultsp);
632 			XDR_DESTROY(xdrs);
633 			if (done) {
634 				stat = RPC_SUCCESS;
635 				goto done_broad;
636 			} else {
637 				goto recv_again;
638 			}
639 		}		/* The recv for loop */
640 	}			/* The giant for loop */
641 
642 done_broad:
643 	if (inbuf)
644 		(void) free(inbuf);
645 	if (outbuf)
646 		(void) free(outbuf);
647 #ifdef PORTMAP
648 	if (outbuf_pmap)
649 		(void) free(outbuf_pmap);
650 #endif
651 	for (i = 0; i < fdlistno; i++) {
652 		(void) close(fdlist[i].fd);
653 		__rpc_freebroadifs(&fdlist[i].nal);
654 	}
655 	AUTH_DESTROY(sys_auth);
656 	(void) __rpc_endconf(handle);
657 
658 	return (stat);
659 }
660 
661 
662 enum clnt_stat
663 rpc_broadcast(prog, vers, proc, xargs, argsp, xresults, resultsp,
664 			eachresult, nettype)
665 	rpcprog_t	prog;		/* program number */
666 	rpcvers_t	vers;		/* version number */
667 	rpcproc_t	proc;		/* procedure number */
668 	xdrproc_t	xargs;		/* xdr routine for args */
669 	caddr_t		argsp;		/* pointer to args */
670 	xdrproc_t	xresults;	/* xdr routine for results */
671 	caddr_t		resultsp;	/* pointer to results */
672 	resultproc_t	eachresult;	/* call with each result obtained */
673 	const char		*nettype;	/* transport type */
674 {
675 	enum clnt_stat	dummy;
676 
677 	dummy = rpc_broadcast_exp(prog, vers, proc, xargs, argsp,
678 		xresults, resultsp, eachresult,
679 		INITTIME, WAITTIME, nettype);
680 	return (dummy);
681 }
682