xref: /freebsd/lib/libc/rpc/rpc_generic.c (revision 2e322d379631c3bd6107e295f3e5d814c7845fc7)
18360efbdSAlfred Perlstein /*	$NetBSD: rpc_generic.c,v 1.4 2000/09/28 09:07:04 kleink Exp $	*/
28360efbdSAlfred Perlstein 
3*2e322d37SHiroki Sato /*-
4*2e322d37SHiroki Sato  * Copyright (c) 2009, Sun Microsystems, Inc.
5*2e322d37SHiroki Sato  * All rights reserved.
68360efbdSAlfred Perlstein  *
7*2e322d37SHiroki Sato  * Redistribution and use in source and binary forms, with or without
8*2e322d37SHiroki Sato  * modification, are permitted provided that the following conditions are met:
9*2e322d37SHiroki Sato  * - Redistributions of source code must retain the above copyright notice,
10*2e322d37SHiroki Sato  *   this list of conditions and the following disclaimer.
11*2e322d37SHiroki Sato  * - Redistributions in binary form must reproduce the above copyright notice,
12*2e322d37SHiroki Sato  *   this list of conditions and the following disclaimer in the documentation
13*2e322d37SHiroki Sato  *   and/or other materials provided with the distribution.
14*2e322d37SHiroki Sato  * - Neither the name of Sun Microsystems, Inc. nor the names of its
15*2e322d37SHiroki Sato  *   contributors may be used to endorse or promote products derived
16*2e322d37SHiroki Sato  *   from this software without specific prior written permission.
178360efbdSAlfred Perlstein  *
18*2e322d37SHiroki Sato  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
19*2e322d37SHiroki Sato  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20*2e322d37SHiroki Sato  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21*2e322d37SHiroki Sato  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
22*2e322d37SHiroki Sato  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23*2e322d37SHiroki Sato  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24*2e322d37SHiroki Sato  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25*2e322d37SHiroki Sato  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26*2e322d37SHiroki Sato  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27*2e322d37SHiroki Sato  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28*2e322d37SHiroki Sato  * POSSIBILITY OF SUCH DAMAGE.
298360efbdSAlfred Perlstein  */
308360efbdSAlfred Perlstein /*
318360efbdSAlfred Perlstein  * Copyright (c) 1986-1991 by Sun Microsystems Inc.
328360efbdSAlfred Perlstein  */
338360efbdSAlfred Perlstein 
348360efbdSAlfred Perlstein /* #pragma ident	"@(#)rpc_generic.c	1.17	94/04/24 SMI" */
35d3d20c82SDavid E. O'Brien #include <sys/cdefs.h>
36d3d20c82SDavid E. O'Brien __FBSDID("$FreeBSD$");
378360efbdSAlfred Perlstein 
388360efbdSAlfred Perlstein /*
398360efbdSAlfred Perlstein  * rpc_generic.c, Miscl routines for RPC.
408360efbdSAlfred Perlstein  *
418360efbdSAlfred Perlstein  */
428360efbdSAlfred Perlstein 
438360efbdSAlfred Perlstein #include "namespace.h"
449f5afc13SIan Dowse #include "reentrant.h"
458360efbdSAlfred Perlstein #include <sys/types.h>
468360efbdSAlfred Perlstein #include <sys/param.h>
478360efbdSAlfred Perlstein #include <sys/socket.h>
488360efbdSAlfred Perlstein #include <sys/time.h>
498360efbdSAlfred Perlstein #include <sys/un.h>
508360efbdSAlfred Perlstein #include <sys/resource.h>
518360efbdSAlfred Perlstein #include <netinet/in.h>
528360efbdSAlfred Perlstein #include <arpa/inet.h>
538360efbdSAlfred Perlstein #include <rpc/rpc.h>
548360efbdSAlfred Perlstein #include <ctype.h>
551a154a14SIan Dowse #include <stddef.h>
568360efbdSAlfred Perlstein #include <stdio.h>
578360efbdSAlfred Perlstein #include <netdb.h>
588360efbdSAlfred Perlstein #include <netconfig.h>
598360efbdSAlfred Perlstein #include <stdlib.h>
608360efbdSAlfred Perlstein #include <string.h>
618360efbdSAlfred Perlstein #include <syslog.h>
628360efbdSAlfred Perlstein #include <rpc/nettype.h>
638360efbdSAlfred Perlstein #include "un-namespace.h"
648360efbdSAlfred Perlstein #include "rpc_com.h"
65235baf26SDaniel Eischen #include "mt_misc.h"
668360efbdSAlfred Perlstein 
678360efbdSAlfred Perlstein struct handle {
688360efbdSAlfred Perlstein 	NCONF_HANDLE *nhandle;
698360efbdSAlfred Perlstein 	int nflag;		/* Whether NETPATH or NETCONFIG */
708360efbdSAlfred Perlstein 	int nettype;
718360efbdSAlfred Perlstein };
728360efbdSAlfred Perlstein 
738360efbdSAlfred Perlstein static const struct _rpcnettype {
748360efbdSAlfred Perlstein 	const char *name;
758360efbdSAlfred Perlstein 	const int type;
768360efbdSAlfred Perlstein } _rpctypelist[] = {
778360efbdSAlfred Perlstein 	{ "netpath", _RPC_NETPATH },
788360efbdSAlfred Perlstein 	{ "visible", _RPC_VISIBLE },
798360efbdSAlfred Perlstein 	{ "circuit_v", _RPC_CIRCUIT_V },
808360efbdSAlfred Perlstein 	{ "datagram_v", _RPC_DATAGRAM_V },
818360efbdSAlfred Perlstein 	{ "circuit_n", _RPC_CIRCUIT_N },
828360efbdSAlfred Perlstein 	{ "datagram_n", _RPC_DATAGRAM_N },
838360efbdSAlfred Perlstein 	{ "tcp", _RPC_TCP },
848360efbdSAlfred Perlstein 	{ "udp", _RPC_UDP },
858360efbdSAlfred Perlstein 	{ 0, _RPC_NONE }
868360efbdSAlfred Perlstein };
878360efbdSAlfred Perlstein 
888360efbdSAlfred Perlstein struct netid_af {
898360efbdSAlfred Perlstein 	const char	*netid;
908360efbdSAlfred Perlstein 	int		af;
918360efbdSAlfred Perlstein 	int		protocol;
928360efbdSAlfred Perlstein };
938360efbdSAlfred Perlstein 
948360efbdSAlfred Perlstein static const struct netid_af na_cvt[] = {
958360efbdSAlfred Perlstein 	{ "udp",  AF_INET,  IPPROTO_UDP },
968360efbdSAlfred Perlstein 	{ "tcp",  AF_INET,  IPPROTO_TCP },
978360efbdSAlfred Perlstein #ifdef INET6
988360efbdSAlfred Perlstein 	{ "udp6", AF_INET6, IPPROTO_UDP },
998360efbdSAlfred Perlstein 	{ "tcp6", AF_INET6, IPPROTO_TCP },
1008360efbdSAlfred Perlstein #endif
101fb4c8061SMartin Blapp 	{ "local", AF_LOCAL, 0 }
1028360efbdSAlfred Perlstein };
1038360efbdSAlfred Perlstein 
1048360efbdSAlfred Perlstein #if 0
105c05ac53bSDavid E. O'Brien static char *strlocase(char *);
1068360efbdSAlfred Perlstein #endif
107c05ac53bSDavid E. O'Brien static int getnettype(const char *);
1088360efbdSAlfred Perlstein 
1098360efbdSAlfred Perlstein /*
1108360efbdSAlfred Perlstein  * Cache the result of getrlimit(), so we don't have to do an
1118360efbdSAlfred Perlstein  * expensive call every time.
1128360efbdSAlfred Perlstein  */
1138360efbdSAlfred Perlstein int
1148360efbdSAlfred Perlstein __rpc_dtbsize()
1158360efbdSAlfred Perlstein {
1168360efbdSAlfred Perlstein 	static int tbsize;
1178360efbdSAlfred Perlstein 	struct rlimit rl;
1188360efbdSAlfred Perlstein 
1198360efbdSAlfred Perlstein 	if (tbsize) {
1208360efbdSAlfred Perlstein 		return (tbsize);
1218360efbdSAlfred Perlstein 	}
1228360efbdSAlfred Perlstein 	if (getrlimit(RLIMIT_NOFILE, &rl) == 0) {
1238360efbdSAlfred Perlstein 		return (tbsize = (int)rl.rlim_max);
1248360efbdSAlfred Perlstein 	}
1258360efbdSAlfred Perlstein 	/*
1268360efbdSAlfred Perlstein 	 * Something wrong.  I'll try to save face by returning a
1278360efbdSAlfred Perlstein 	 * pessimistic number.
1288360efbdSAlfred Perlstein 	 */
1298360efbdSAlfred Perlstein 	return (32);
1308360efbdSAlfred Perlstein }
1318360efbdSAlfred Perlstein 
1328360efbdSAlfred Perlstein 
1338360efbdSAlfred Perlstein /*
1348360efbdSAlfred Perlstein  * Find the appropriate buffer size
1358360efbdSAlfred Perlstein  */
1368360efbdSAlfred Perlstein u_int
1378360efbdSAlfred Perlstein /*ARGSUSED*/
1388360efbdSAlfred Perlstein __rpc_get_t_size(af, proto, size)
1398360efbdSAlfred Perlstein 	int af, proto;
1408360efbdSAlfred Perlstein 	int size;	/* Size requested */
1418360efbdSAlfred Perlstein {
142e14f19f4SIan Dowse 	int maxsize, defsize;
1438360efbdSAlfred Perlstein 
144e14f19f4SIan Dowse 	maxsize = 256 * 1024;	/* XXX */
1458360efbdSAlfred Perlstein 	switch (proto) {
1468360efbdSAlfred Perlstein 	case IPPROTO_TCP:
147e14f19f4SIan Dowse 		defsize = 64 * 1024;	/* XXX */
1488360efbdSAlfred Perlstein 		break;
1498360efbdSAlfred Perlstein 	case IPPROTO_UDP:
150e14f19f4SIan Dowse 		defsize = UDPMSGSIZE;
1518360efbdSAlfred Perlstein 		break;
1528360efbdSAlfred Perlstein 	default:
153e14f19f4SIan Dowse 		defsize = RPC_MAXDATASIZE;
1548360efbdSAlfred Perlstein 		break;
1558360efbdSAlfred Perlstein 	}
1568360efbdSAlfred Perlstein 	if (size == 0)
157e14f19f4SIan Dowse 		return defsize;
1588360efbdSAlfred Perlstein 
1598360efbdSAlfred Perlstein 	/* Check whether the value is within the upper max limit */
1608360efbdSAlfred Perlstein 	return (size > maxsize ? (u_int)maxsize : (u_int)size);
1618360efbdSAlfred Perlstein }
1628360efbdSAlfred Perlstein 
1638360efbdSAlfred Perlstein /*
1648360efbdSAlfred Perlstein  * Find the appropriate address buffer size
1658360efbdSAlfred Perlstein  */
1668360efbdSAlfred Perlstein u_int
1678360efbdSAlfred Perlstein __rpc_get_a_size(af)
1688360efbdSAlfred Perlstein 	int af;
1698360efbdSAlfred Perlstein {
1708360efbdSAlfred Perlstein 	switch (af) {
1718360efbdSAlfred Perlstein 	case AF_INET:
1728360efbdSAlfred Perlstein 		return sizeof (struct sockaddr_in);
1738360efbdSAlfred Perlstein #ifdef INET6
1748360efbdSAlfred Perlstein 	case AF_INET6:
1758360efbdSAlfred Perlstein 		return sizeof (struct sockaddr_in6);
1768360efbdSAlfred Perlstein #endif
1778360efbdSAlfred Perlstein 	case AF_LOCAL:
1788360efbdSAlfred Perlstein 		return sizeof (struct sockaddr_un);
1798360efbdSAlfred Perlstein 	default:
1808360efbdSAlfred Perlstein 		break;
1818360efbdSAlfred Perlstein 	}
1828360efbdSAlfred Perlstein 	return ((u_int)RPC_MAXADDRSIZE);
1838360efbdSAlfred Perlstein }
1848360efbdSAlfred Perlstein 
1858360efbdSAlfred Perlstein #if 0
1868360efbdSAlfred Perlstein static char *
1878360efbdSAlfred Perlstein strlocase(p)
1888360efbdSAlfred Perlstein 	char *p;
1898360efbdSAlfred Perlstein {
1908360efbdSAlfred Perlstein 	char *t = p;
1918360efbdSAlfred Perlstein 
1928360efbdSAlfred Perlstein 	for (; *p; p++)
1938360efbdSAlfred Perlstein 		if (isupper(*p))
1948360efbdSAlfred Perlstein 			*p = tolower(*p);
1958360efbdSAlfred Perlstein 	return (t);
1968360efbdSAlfred Perlstein }
1978360efbdSAlfred Perlstein #endif
1988360efbdSAlfred Perlstein 
1998360efbdSAlfred Perlstein /*
2008360efbdSAlfred Perlstein  * Returns the type of the network as defined in <rpc/nettype.h>
2018360efbdSAlfred Perlstein  * If nettype is NULL, it defaults to NETPATH.
2028360efbdSAlfred Perlstein  */
2038360efbdSAlfred Perlstein static int
2048360efbdSAlfred Perlstein getnettype(nettype)
2058360efbdSAlfred Perlstein 	const char *nettype;
2068360efbdSAlfred Perlstein {
2078360efbdSAlfred Perlstein 	int i;
2088360efbdSAlfred Perlstein 
20974a48255SMartin Blapp 	if ((nettype == NULL) || (nettype[0] == 0)) {
2108360efbdSAlfred Perlstein 		return (_RPC_NETPATH);	/* Default */
2118360efbdSAlfred Perlstein 	}
2128360efbdSAlfred Perlstein 
2138360efbdSAlfred Perlstein #if 0
2148360efbdSAlfred Perlstein 	nettype = strlocase(nettype);
2158360efbdSAlfred Perlstein #endif
2168360efbdSAlfred Perlstein 	for (i = 0; _rpctypelist[i].name; i++)
2178360efbdSAlfred Perlstein 		if (strcasecmp(nettype, _rpctypelist[i].name) == 0) {
2188360efbdSAlfred Perlstein 			return (_rpctypelist[i].type);
2198360efbdSAlfred Perlstein 		}
2208360efbdSAlfred Perlstein 	return (_rpctypelist[i].type);
2218360efbdSAlfred Perlstein }
2228360efbdSAlfred Perlstein 
2236f88d2a8SJohn Baldwin static thread_key_t tcp_key, udp_key;
2246f88d2a8SJohn Baldwin static once_t keys_once = ONCE_INITIALIZER;
2256f88d2a8SJohn Baldwin static int tcp_key_error, udp_key_error;
2266f88d2a8SJohn Baldwin 
2276f88d2a8SJohn Baldwin static void
2286f88d2a8SJohn Baldwin keys_init(void)
2296f88d2a8SJohn Baldwin {
2306f88d2a8SJohn Baldwin 
2316f88d2a8SJohn Baldwin 	tcp_key_error = thr_keycreate(&tcp_key, free);
2326f88d2a8SJohn Baldwin 	udp_key_error = thr_keycreate(&udp_key, free);
2336f88d2a8SJohn Baldwin }
2346f88d2a8SJohn Baldwin 
2358360efbdSAlfred Perlstein /*
2368360efbdSAlfred Perlstein  * For the given nettype (tcp or udp only), return the first structure found.
2378360efbdSAlfred Perlstein  * This should be freed by calling freenetconfigent()
2388360efbdSAlfred Perlstein  */
2398360efbdSAlfred Perlstein struct netconfig *
2408360efbdSAlfred Perlstein __rpc_getconfip(nettype)
2418360efbdSAlfred Perlstein 	const char *nettype;
2428360efbdSAlfred Perlstein {
2438360efbdSAlfred Perlstein 	char *netid;
2448360efbdSAlfred Perlstein 	char *netid_tcp = (char *) NULL;
2458360efbdSAlfred Perlstein 	char *netid_udp = (char *) NULL;
2468360efbdSAlfred Perlstein 	static char *netid_tcp_main;
2478360efbdSAlfred Perlstein 	static char *netid_udp_main;
2488360efbdSAlfred Perlstein 	struct netconfig *dummy;
2498360efbdSAlfred Perlstein 	int main_thread;
2508360efbdSAlfred Perlstein 
2518360efbdSAlfred Perlstein 	if ((main_thread = thr_main())) {
2528360efbdSAlfred Perlstein 		netid_udp = netid_udp_main;
2538360efbdSAlfred Perlstein 		netid_tcp = netid_tcp_main;
2548360efbdSAlfred Perlstein 	} else {
2556f88d2a8SJohn Baldwin 		if (thr_once(&keys_once, keys_init) != 0 ||
2566f88d2a8SJohn Baldwin 		    tcp_key_error != 0 || udp_key_error != 0)
2576f88d2a8SJohn Baldwin 			return (NULL);
2588360efbdSAlfred Perlstein 		netid_tcp = (char *)thr_getspecific(tcp_key);
2598360efbdSAlfred Perlstein 		netid_udp = (char *)thr_getspecific(udp_key);
2608360efbdSAlfred Perlstein 	}
2618360efbdSAlfred Perlstein 	if (!netid_udp && !netid_tcp) {
2628360efbdSAlfred Perlstein 		struct netconfig *nconf;
2638360efbdSAlfred Perlstein 		void *confighandle;
2648360efbdSAlfred Perlstein 
2658360efbdSAlfred Perlstein 		if (!(confighandle = setnetconfig())) {
2668360efbdSAlfred Perlstein 			syslog (LOG_ERR, "rpc: failed to open " NETCONFIG);
2678360efbdSAlfred Perlstein 			return (NULL);
2688360efbdSAlfred Perlstein 		}
2698360efbdSAlfred Perlstein 		while ((nconf = getnetconfig(confighandle)) != NULL) {
2708360efbdSAlfred Perlstein 			if (strcmp(nconf->nc_protofmly, NC_INET) == 0) {
271b4e7a879SPedro F. Giffuni 				if (strcmp(nconf->nc_proto, NC_TCP) == 0 &&
272b4e7a879SPedro F. Giffuni 				    netid_tcp == NULL) {
2738360efbdSAlfred Perlstein 					netid_tcp = strdup(nconf->nc_netid);
2748360efbdSAlfred Perlstein 					if (main_thread)
2758360efbdSAlfred Perlstein 						netid_tcp_main = netid_tcp;
2768360efbdSAlfred Perlstein 					else
2778360efbdSAlfred Perlstein 						thr_setspecific(tcp_key,
2788360efbdSAlfred Perlstein 							(void *) netid_tcp);
2798360efbdSAlfred Perlstein 				} else
280b4e7a879SPedro F. Giffuni 				if (strcmp(nconf->nc_proto, NC_UDP) == 0 &&
281b4e7a879SPedro F. Giffuni 				    netid_udp == NULL) {
2828360efbdSAlfred Perlstein 					netid_udp = strdup(nconf->nc_netid);
2838360efbdSAlfred Perlstein 					if (main_thread)
2848360efbdSAlfred Perlstein 						netid_udp_main = netid_udp;
2858360efbdSAlfred Perlstein 					else
2868360efbdSAlfred Perlstein 						thr_setspecific(udp_key,
2878360efbdSAlfred Perlstein 						(void *) netid_udp);
2888360efbdSAlfred Perlstein 				}
2898360efbdSAlfred Perlstein 			}
2908360efbdSAlfred Perlstein 		}
2918360efbdSAlfred Perlstein 		endnetconfig(confighandle);
2928360efbdSAlfred Perlstein 	}
2938360efbdSAlfred Perlstein 	if (strcmp(nettype, "udp") == 0)
2948360efbdSAlfred Perlstein 		netid = netid_udp;
2958360efbdSAlfred Perlstein 	else if (strcmp(nettype, "tcp") == 0)
2968360efbdSAlfred Perlstein 		netid = netid_tcp;
2978360efbdSAlfred Perlstein 	else {
2988360efbdSAlfred Perlstein 		return (NULL);
2998360efbdSAlfred Perlstein 	}
30074a48255SMartin Blapp 	if ((netid == NULL) || (netid[0] == 0)) {
3018360efbdSAlfred Perlstein 		return (NULL);
3028360efbdSAlfred Perlstein 	}
3038360efbdSAlfred Perlstein 	dummy = getnetconfigent(netid);
3048360efbdSAlfred Perlstein 	return (dummy);
3058360efbdSAlfred Perlstein }
3068360efbdSAlfred Perlstein 
3078360efbdSAlfred Perlstein /*
3088360efbdSAlfred Perlstein  * Returns the type of the nettype, which should then be used with
3098360efbdSAlfred Perlstein  * __rpc_getconf().
3108360efbdSAlfred Perlstein  */
3118360efbdSAlfred Perlstein void *
3128360efbdSAlfred Perlstein __rpc_setconf(nettype)
3138360efbdSAlfred Perlstein 	const char *nettype;
3148360efbdSAlfred Perlstein {
3158360efbdSAlfred Perlstein 	struct handle *handle;
3168360efbdSAlfred Perlstein 
3178360efbdSAlfred Perlstein 	handle = (struct handle *) malloc(sizeof (struct handle));
3188360efbdSAlfred Perlstein 	if (handle == NULL) {
3198360efbdSAlfred Perlstein 		return (NULL);
3208360efbdSAlfred Perlstein 	}
3218360efbdSAlfred Perlstein 	switch (handle->nettype = getnettype(nettype)) {
3228360efbdSAlfred Perlstein 	case _RPC_NETPATH:
3238360efbdSAlfred Perlstein 	case _RPC_CIRCUIT_N:
3248360efbdSAlfred Perlstein 	case _RPC_DATAGRAM_N:
325330e445cSMatteo Riondato 		if (!(handle->nhandle = setnetpath()))
326330e445cSMatteo Riondato 			goto failed;
3278360efbdSAlfred Perlstein 		handle->nflag = TRUE;
3288360efbdSAlfred Perlstein 		break;
3298360efbdSAlfred Perlstein 	case _RPC_VISIBLE:
3308360efbdSAlfred Perlstein 	case _RPC_CIRCUIT_V:
3318360efbdSAlfred Perlstein 	case _RPC_DATAGRAM_V:
3328360efbdSAlfred Perlstein 	case _RPC_TCP:
3338360efbdSAlfred Perlstein 	case _RPC_UDP:
3348360efbdSAlfred Perlstein 		if (!(handle->nhandle = setnetconfig())) {
3358360efbdSAlfred Perlstein 		        syslog (LOG_ERR, "rpc: failed to open " NETCONFIG);
336330e445cSMatteo Riondato 			goto failed;
3378360efbdSAlfred Perlstein 		}
3388360efbdSAlfred Perlstein 		handle->nflag = FALSE;
3398360efbdSAlfred Perlstein 		break;
3408360efbdSAlfred Perlstein 	default:
341330e445cSMatteo Riondato 		goto failed;
3428360efbdSAlfred Perlstein 	}
3438360efbdSAlfred Perlstein 
3448360efbdSAlfred Perlstein 	return (handle);
345330e445cSMatteo Riondato 
346330e445cSMatteo Riondato failed:
347330e445cSMatteo Riondato 	free(handle);
348330e445cSMatteo Riondato 	return (NULL);
3498360efbdSAlfred Perlstein }
3508360efbdSAlfred Perlstein 
3518360efbdSAlfred Perlstein /*
3528360efbdSAlfred Perlstein  * Returns the next netconfig struct for the given "net" type.
3538360efbdSAlfred Perlstein  * __rpc_setconf() should have been called previously.
3548360efbdSAlfred Perlstein  */
3558360efbdSAlfred Perlstein struct netconfig *
3568360efbdSAlfred Perlstein __rpc_getconf(vhandle)
3578360efbdSAlfred Perlstein 	void *vhandle;
3588360efbdSAlfred Perlstein {
3598360efbdSAlfred Perlstein 	struct handle *handle;
3608360efbdSAlfred Perlstein 	struct netconfig *nconf;
3618360efbdSAlfred Perlstein 
3628360efbdSAlfred Perlstein 	handle = (struct handle *)vhandle;
3638360efbdSAlfred Perlstein 	if (handle == NULL) {
3648360efbdSAlfred Perlstein 		return (NULL);
3658360efbdSAlfred Perlstein 	}
3668360efbdSAlfred Perlstein 	for (;;) {
3678360efbdSAlfred Perlstein 		if (handle->nflag)
3688360efbdSAlfred Perlstein 			nconf = getnetpath(handle->nhandle);
3698360efbdSAlfred Perlstein 		else
3708360efbdSAlfred Perlstein 			nconf = getnetconfig(handle->nhandle);
3718360efbdSAlfred Perlstein 		if (nconf == NULL)
3728360efbdSAlfred Perlstein 			break;
3738360efbdSAlfred Perlstein 		if ((nconf->nc_semantics != NC_TPI_CLTS) &&
3748360efbdSAlfred Perlstein 			(nconf->nc_semantics != NC_TPI_COTS) &&
3758360efbdSAlfred Perlstein 			(nconf->nc_semantics != NC_TPI_COTS_ORD))
3768360efbdSAlfred Perlstein 			continue;
3778360efbdSAlfred Perlstein 		switch (handle->nettype) {
3788360efbdSAlfred Perlstein 		case _RPC_VISIBLE:
3798360efbdSAlfred Perlstein 			if (!(nconf->nc_flag & NC_VISIBLE))
3808360efbdSAlfred Perlstein 				continue;
3818360efbdSAlfred Perlstein 			/* FALLTHROUGH */
3828360efbdSAlfred Perlstein 		case _RPC_NETPATH:	/* Be happy */
3838360efbdSAlfred Perlstein 			break;
3848360efbdSAlfred Perlstein 		case _RPC_CIRCUIT_V:
3858360efbdSAlfred Perlstein 			if (!(nconf->nc_flag & NC_VISIBLE))
3868360efbdSAlfred Perlstein 				continue;
3878360efbdSAlfred Perlstein 			/* FALLTHROUGH */
3888360efbdSAlfred Perlstein 		case _RPC_CIRCUIT_N:
3898360efbdSAlfred Perlstein 			if ((nconf->nc_semantics != NC_TPI_COTS) &&
3908360efbdSAlfred Perlstein 				(nconf->nc_semantics != NC_TPI_COTS_ORD))
3918360efbdSAlfred Perlstein 				continue;
3928360efbdSAlfred Perlstein 			break;
3938360efbdSAlfred Perlstein 		case _RPC_DATAGRAM_V:
3948360efbdSAlfred Perlstein 			if (!(nconf->nc_flag & NC_VISIBLE))
3958360efbdSAlfred Perlstein 				continue;
3968360efbdSAlfred Perlstein 			/* FALLTHROUGH */
3978360efbdSAlfred Perlstein 		case _RPC_DATAGRAM_N:
3988360efbdSAlfred Perlstein 			if (nconf->nc_semantics != NC_TPI_CLTS)
3998360efbdSAlfred Perlstein 				continue;
4008360efbdSAlfred Perlstein 			break;
4018360efbdSAlfred Perlstein 		case _RPC_TCP:
4028360efbdSAlfred Perlstein 			if (((nconf->nc_semantics != NC_TPI_COTS) &&
4038360efbdSAlfred Perlstein 				(nconf->nc_semantics != NC_TPI_COTS_ORD)) ||
4048360efbdSAlfred Perlstein 				(strcmp(nconf->nc_protofmly, NC_INET)
4058360efbdSAlfred Perlstein #ifdef INET6
4068360efbdSAlfred Perlstein 				 && strcmp(nconf->nc_protofmly, NC_INET6))
4078360efbdSAlfred Perlstein #else
4088360efbdSAlfred Perlstein 				)
4098360efbdSAlfred Perlstein #endif
4108360efbdSAlfred Perlstein 				||
4118360efbdSAlfred Perlstein 				strcmp(nconf->nc_proto, NC_TCP))
4128360efbdSAlfred Perlstein 				continue;
4138360efbdSAlfred Perlstein 			break;
4148360efbdSAlfred Perlstein 		case _RPC_UDP:
4158360efbdSAlfred Perlstein 			if ((nconf->nc_semantics != NC_TPI_CLTS) ||
4168360efbdSAlfred Perlstein 				(strcmp(nconf->nc_protofmly, NC_INET)
4178360efbdSAlfred Perlstein #ifdef INET6
4188360efbdSAlfred Perlstein 				&& strcmp(nconf->nc_protofmly, NC_INET6))
4198360efbdSAlfred Perlstein #else
4208360efbdSAlfred Perlstein 				)
4218360efbdSAlfred Perlstein #endif
4228360efbdSAlfred Perlstein 				||
4238360efbdSAlfred Perlstein 				strcmp(nconf->nc_proto, NC_UDP))
4248360efbdSAlfred Perlstein 				continue;
4258360efbdSAlfred Perlstein 			break;
4268360efbdSAlfred Perlstein 		}
4278360efbdSAlfred Perlstein 		break;
4288360efbdSAlfred Perlstein 	}
4298360efbdSAlfred Perlstein 	return (nconf);
4308360efbdSAlfred Perlstein }
4318360efbdSAlfred Perlstein 
4328360efbdSAlfred Perlstein void
4338360efbdSAlfred Perlstein __rpc_endconf(vhandle)
4348360efbdSAlfred Perlstein 	void * vhandle;
4358360efbdSAlfred Perlstein {
4368360efbdSAlfred Perlstein 	struct handle *handle;
4378360efbdSAlfred Perlstein 
4388360efbdSAlfred Perlstein 	handle = (struct handle *) vhandle;
4398360efbdSAlfred Perlstein 	if (handle == NULL) {
4408360efbdSAlfred Perlstein 		return;
4418360efbdSAlfred Perlstein 	}
4428360efbdSAlfred Perlstein 	if (handle->nflag) {
4438360efbdSAlfred Perlstein 		endnetpath(handle->nhandle);
4448360efbdSAlfred Perlstein 	} else {
4458360efbdSAlfred Perlstein 		endnetconfig(handle->nhandle);
4468360efbdSAlfred Perlstein 	}
4478360efbdSAlfred Perlstein 	free(handle);
4488360efbdSAlfred Perlstein }
4498360efbdSAlfred Perlstein 
4508360efbdSAlfred Perlstein /*
4518360efbdSAlfred Perlstein  * Used to ping the NULL procedure for clnt handle.
4528360efbdSAlfred Perlstein  * Returns NULL if fails, else a non-NULL pointer.
4538360efbdSAlfred Perlstein  */
4548360efbdSAlfred Perlstein void *
4558360efbdSAlfred Perlstein rpc_nullproc(clnt)
4568360efbdSAlfred Perlstein 	CLIENT *clnt;
4578360efbdSAlfred Perlstein {
4588360efbdSAlfred Perlstein 	struct timeval TIMEOUT = {25, 0};
4598360efbdSAlfred Perlstein 
4608360efbdSAlfred Perlstein 	if (clnt_call(clnt, NULLPROC, (xdrproc_t) xdr_void, NULL,
4618360efbdSAlfred Perlstein 		(xdrproc_t) xdr_void, NULL, TIMEOUT) != RPC_SUCCESS) {
4628360efbdSAlfred Perlstein 		return (NULL);
4638360efbdSAlfred Perlstein 	}
4648360efbdSAlfred Perlstein 	return ((void *) clnt);
4658360efbdSAlfred Perlstein }
4668360efbdSAlfred Perlstein 
4678360efbdSAlfred Perlstein /*
4688360efbdSAlfred Perlstein  * Try all possible transports until
4698360efbdSAlfred Perlstein  * one succeeds in finding the netconf for the given fd.
4708360efbdSAlfred Perlstein  */
4718360efbdSAlfred Perlstein struct netconfig *
4728360efbdSAlfred Perlstein __rpcgettp(fd)
4738360efbdSAlfred Perlstein 	int fd;
4748360efbdSAlfred Perlstein {
4758360efbdSAlfred Perlstein 	const char *netid;
4768360efbdSAlfred Perlstein 	struct __rpc_sockinfo si;
4778360efbdSAlfred Perlstein 
4788360efbdSAlfred Perlstein 	if (!__rpc_fd2sockinfo(fd, &si))
4798360efbdSAlfred Perlstein 		return NULL;
4808360efbdSAlfred Perlstein 
4818360efbdSAlfred Perlstein 	if (!__rpc_sockinfo2netid(&si, &netid))
4828360efbdSAlfred Perlstein 		return NULL;
4838360efbdSAlfred Perlstein 
4848360efbdSAlfred Perlstein 	/*LINTED const castaway*/
4858360efbdSAlfred Perlstein 	return getnetconfigent((char *)netid);
4868360efbdSAlfred Perlstein }
4878360efbdSAlfred Perlstein 
4888360efbdSAlfred Perlstein int
4898360efbdSAlfred Perlstein __rpc_fd2sockinfo(int fd, struct __rpc_sockinfo *sip)
4908360efbdSAlfred Perlstein {
4918360efbdSAlfred Perlstein 	socklen_t len;
4928360efbdSAlfred Perlstein 	int type, proto;
4938360efbdSAlfred Perlstein 	struct sockaddr_storage ss;
4948360efbdSAlfred Perlstein 
4958360efbdSAlfred Perlstein 	len = sizeof ss;
4968360efbdSAlfred Perlstein 	if (_getsockname(fd, (struct sockaddr *)(void *)&ss, &len) < 0)
4978360efbdSAlfred Perlstein 		return 0;
4988360efbdSAlfred Perlstein 	sip->si_alen = len;
4998360efbdSAlfred Perlstein 
5008360efbdSAlfred Perlstein 	len = sizeof type;
5018360efbdSAlfred Perlstein 	if (_getsockopt(fd, SOL_SOCKET, SO_TYPE, &type, &len) < 0)
5028360efbdSAlfred Perlstein 		return 0;
5038360efbdSAlfred Perlstein 
5048360efbdSAlfred Perlstein 	/* XXX */
5058360efbdSAlfred Perlstein 	if (ss.ss_family != AF_LOCAL) {
5068360efbdSAlfred Perlstein 		if (type == SOCK_STREAM)
5078360efbdSAlfred Perlstein 			proto = IPPROTO_TCP;
5088360efbdSAlfred Perlstein 		else if (type == SOCK_DGRAM)
5098360efbdSAlfred Perlstein 			proto = IPPROTO_UDP;
5108360efbdSAlfred Perlstein 		else
5118360efbdSAlfred Perlstein 			return 0;
5128360efbdSAlfred Perlstein 	} else
5138360efbdSAlfred Perlstein 		proto = 0;
5148360efbdSAlfred Perlstein 
5158360efbdSAlfred Perlstein 	sip->si_af = ss.ss_family;
5168360efbdSAlfred Perlstein 	sip->si_proto = proto;
5178360efbdSAlfred Perlstein 	sip->si_socktype = type;
5188360efbdSAlfred Perlstein 
5198360efbdSAlfred Perlstein 	return 1;
5208360efbdSAlfred Perlstein }
5218360efbdSAlfred Perlstein 
5228360efbdSAlfred Perlstein /*
5238360efbdSAlfred Perlstein  * Linear search, but the number of entries is small.
5248360efbdSAlfred Perlstein  */
5258360efbdSAlfred Perlstein int
5268360efbdSAlfred Perlstein __rpc_nconf2sockinfo(const struct netconfig *nconf, struct __rpc_sockinfo *sip)
5278360efbdSAlfred Perlstein {
5288360efbdSAlfred Perlstein 	int i;
5298360efbdSAlfred Perlstein 
5308360efbdSAlfred Perlstein 	for (i = 0; i < (sizeof na_cvt) / (sizeof (struct netid_af)); i++)
531fb4c8061SMartin Blapp 		if (strcmp(na_cvt[i].netid, nconf->nc_netid) == 0 || (
532fb4c8061SMartin Blapp 		    strcmp(nconf->nc_netid, "unix") == 0 &&
533fb4c8061SMartin Blapp 		    strcmp(na_cvt[i].netid, "local") == 0)) {
5348360efbdSAlfred Perlstein 			sip->si_af = na_cvt[i].af;
5358360efbdSAlfred Perlstein 			sip->si_proto = na_cvt[i].protocol;
5368360efbdSAlfred Perlstein 			sip->si_socktype =
5378360efbdSAlfred Perlstein 			    __rpc_seman2socktype((int)nconf->nc_semantics);
5388360efbdSAlfred Perlstein 			if (sip->si_socktype == -1)
5398360efbdSAlfred Perlstein 				return 0;
5408360efbdSAlfred Perlstein 			sip->si_alen = __rpc_get_a_size(sip->si_af);
5418360efbdSAlfred Perlstein 			return 1;
5428360efbdSAlfred Perlstein 		}
5438360efbdSAlfred Perlstein 
5448360efbdSAlfred Perlstein 	return 0;
5458360efbdSAlfred Perlstein }
5468360efbdSAlfred Perlstein 
5478360efbdSAlfred Perlstein int
5488360efbdSAlfred Perlstein __rpc_nconf2fd(const struct netconfig *nconf)
5498360efbdSAlfred Perlstein {
5508360efbdSAlfred Perlstein 	struct __rpc_sockinfo si;
5518360efbdSAlfred Perlstein 
5528360efbdSAlfred Perlstein 	if (!__rpc_nconf2sockinfo(nconf, &si))
5538360efbdSAlfred Perlstein 		return 0;
5548360efbdSAlfred Perlstein 
5558360efbdSAlfred Perlstein 	return _socket(si.si_af, si.si_socktype, si.si_proto);
5568360efbdSAlfred Perlstein }
5578360efbdSAlfred Perlstein 
5588360efbdSAlfred Perlstein int
5598360efbdSAlfred Perlstein __rpc_sockinfo2netid(struct __rpc_sockinfo *sip, const char **netid)
5608360efbdSAlfred Perlstein {
5618360efbdSAlfred Perlstein 	int i;
5629790dbfcSMartin Blapp 	struct netconfig *nconf;
5639790dbfcSMartin Blapp 
5649790dbfcSMartin Blapp 	nconf = getnetconfigent("local");
5658360efbdSAlfred Perlstein 
566fb4c8061SMartin Blapp 	for (i = 0; i < (sizeof na_cvt) / (sizeof (struct netid_af)); i++) {
5678360efbdSAlfred Perlstein 		if (na_cvt[i].af == sip->si_af &&
5688360efbdSAlfred Perlstein 		    na_cvt[i].protocol == sip->si_proto) {
5699790dbfcSMartin Blapp 			if (strcmp(na_cvt[i].netid, "local") == 0 && nconf == NULL) {
570fb4c8061SMartin Blapp 				if (netid)
571fb4c8061SMartin Blapp 					*netid = "unix";
572fb4c8061SMartin Blapp 			} else {
5738360efbdSAlfred Perlstein 				if (netid)
5748360efbdSAlfred Perlstein 					*netid = na_cvt[i].netid;
575fb4c8061SMartin Blapp 			}
5769790dbfcSMartin Blapp 			if (nconf != NULL)
5779790dbfcSMartin Blapp 				freenetconfigent(nconf);
5788360efbdSAlfred Perlstein 			return 1;
5798360efbdSAlfred Perlstein 		}
580fb4c8061SMartin Blapp 	}
5819790dbfcSMartin Blapp 	if (nconf != NULL)
5829790dbfcSMartin Blapp 		freenetconfigent(nconf);
5838360efbdSAlfred Perlstein 
5848360efbdSAlfred Perlstein 	return 0;
5858360efbdSAlfred Perlstein }
5868360efbdSAlfred Perlstein 
5878360efbdSAlfred Perlstein char *
5888360efbdSAlfred Perlstein taddr2uaddr(const struct netconfig *nconf, const struct netbuf *nbuf)
5898360efbdSAlfred Perlstein {
5908360efbdSAlfred Perlstein 	struct __rpc_sockinfo si;
5918360efbdSAlfred Perlstein 
5928360efbdSAlfred Perlstein 	if (!__rpc_nconf2sockinfo(nconf, &si))
5938360efbdSAlfred Perlstein 		return NULL;
5948360efbdSAlfred Perlstein 	return __rpc_taddr2uaddr_af(si.si_af, nbuf);
5958360efbdSAlfred Perlstein }
5968360efbdSAlfred Perlstein 
5978360efbdSAlfred Perlstein struct netbuf *
5988360efbdSAlfred Perlstein uaddr2taddr(const struct netconfig *nconf, const char *uaddr)
5998360efbdSAlfred Perlstein {
6008360efbdSAlfred Perlstein 	struct __rpc_sockinfo si;
6018360efbdSAlfred Perlstein 
6028360efbdSAlfred Perlstein 	if (!__rpc_nconf2sockinfo(nconf, &si))
6038360efbdSAlfred Perlstein 		return NULL;
6048360efbdSAlfred Perlstein 	return __rpc_uaddr2taddr_af(si.si_af, uaddr);
6058360efbdSAlfred Perlstein }
6068360efbdSAlfred Perlstein 
6078360efbdSAlfred Perlstein char *
6088360efbdSAlfred Perlstein __rpc_taddr2uaddr_af(int af, const struct netbuf *nbuf)
6098360efbdSAlfred Perlstein {
6108360efbdSAlfred Perlstein 	char *ret;
6118360efbdSAlfred Perlstein 	struct sockaddr_in *sin;
6128360efbdSAlfred Perlstein 	struct sockaddr_un *sun;
6138360efbdSAlfred Perlstein 	char namebuf[INET_ADDRSTRLEN];
6148360efbdSAlfred Perlstein #ifdef INET6
6158360efbdSAlfred Perlstein 	struct sockaddr_in6 *sin6;
6168360efbdSAlfred Perlstein 	char namebuf6[INET6_ADDRSTRLEN];
6178360efbdSAlfred Perlstein #endif
6188360efbdSAlfred Perlstein 	u_int16_t port;
6198360efbdSAlfred Perlstein 
6208360efbdSAlfred Perlstein 	switch (af) {
6218360efbdSAlfred Perlstein 	case AF_INET:
6228360efbdSAlfred Perlstein 		sin = nbuf->buf;
6238360efbdSAlfred Perlstein 		if (inet_ntop(af, &sin->sin_addr, namebuf, sizeof namebuf)
6248360efbdSAlfred Perlstein 		    == NULL)
6258360efbdSAlfred Perlstein 			return NULL;
6268360efbdSAlfred Perlstein 		port = ntohs(sin->sin_port);
6278360efbdSAlfred Perlstein 		if (asprintf(&ret, "%s.%u.%u", namebuf, ((u_int32_t)port) >> 8,
6288360efbdSAlfred Perlstein 		    port & 0xff) < 0)
6298360efbdSAlfred Perlstein 			return NULL;
6308360efbdSAlfred Perlstein 		break;
6318360efbdSAlfred Perlstein #ifdef INET6
6328360efbdSAlfred Perlstein 	case AF_INET6:
6338360efbdSAlfred Perlstein 		sin6 = nbuf->buf;
6348360efbdSAlfred Perlstein 		if (inet_ntop(af, &sin6->sin6_addr, namebuf6, sizeof namebuf6)
6358360efbdSAlfred Perlstein 		    == NULL)
6368360efbdSAlfred Perlstein 			return NULL;
6378360efbdSAlfred Perlstein 		port = ntohs(sin6->sin6_port);
6388360efbdSAlfred Perlstein 		if (asprintf(&ret, "%s.%u.%u", namebuf6, ((u_int32_t)port) >> 8,
6398360efbdSAlfred Perlstein 		    port & 0xff) < 0)
6408360efbdSAlfred Perlstein 			return NULL;
6418360efbdSAlfred Perlstein 		break;
6428360efbdSAlfred Perlstein #endif
6438360efbdSAlfred Perlstein 	case AF_LOCAL:
6448360efbdSAlfred Perlstein 		sun = nbuf->buf;
6451a154a14SIan Dowse 		if (asprintf(&ret, "%.*s", (int)(sun->sun_len -
6461a154a14SIan Dowse 		    offsetof(struct sockaddr_un, sun_path)),
6471a154a14SIan Dowse 		    sun->sun_path) < 0)
6481a154a14SIan Dowse 			return (NULL);
6498360efbdSAlfred Perlstein 		break;
6508360efbdSAlfred Perlstein 	default:
6518360efbdSAlfred Perlstein 		return NULL;
6528360efbdSAlfred Perlstein 	}
6538360efbdSAlfred Perlstein 
6548360efbdSAlfred Perlstein 	return ret;
6558360efbdSAlfred Perlstein }
6568360efbdSAlfred Perlstein 
6578360efbdSAlfred Perlstein struct netbuf *
6588360efbdSAlfred Perlstein __rpc_uaddr2taddr_af(int af, const char *uaddr)
6598360efbdSAlfred Perlstein {
6608360efbdSAlfred Perlstein 	struct netbuf *ret = NULL;
6618360efbdSAlfred Perlstein 	char *addrstr, *p;
6628360efbdSAlfred Perlstein 	unsigned port, portlo, porthi;
6638360efbdSAlfred Perlstein 	struct sockaddr_in *sin;
6648360efbdSAlfred Perlstein #ifdef INET6
6658360efbdSAlfred Perlstein 	struct sockaddr_in6 *sin6;
6668360efbdSAlfred Perlstein #endif
6678360efbdSAlfred Perlstein 	struct sockaddr_un *sun;
6688360efbdSAlfred Perlstein 
6698d630135SAlfred Perlstein 	port = 0;
6708d630135SAlfred Perlstein 	sin = NULL;
6718360efbdSAlfred Perlstein 	addrstr = strdup(uaddr);
6728360efbdSAlfred Perlstein 	if (addrstr == NULL)
6738360efbdSAlfred Perlstein 		return NULL;
6748360efbdSAlfred Perlstein 
6758360efbdSAlfred Perlstein 	/*
6768360efbdSAlfred Perlstein 	 * AF_LOCAL addresses are expected to be absolute
6778360efbdSAlfred Perlstein 	 * pathnames, anything else will be AF_INET or AF_INET6.
6788360efbdSAlfred Perlstein 	 */
6798360efbdSAlfred Perlstein 	if (*addrstr != '/') {
6808360efbdSAlfred Perlstein 		p = strrchr(addrstr, '.');
6818360efbdSAlfred Perlstein 		if (p == NULL)
6828360efbdSAlfred Perlstein 			goto out;
6838360efbdSAlfred Perlstein 		portlo = (unsigned)atoi(p + 1);
6848360efbdSAlfred Perlstein 		*p = '\0';
6858360efbdSAlfred Perlstein 
6868360efbdSAlfred Perlstein 		p = strrchr(addrstr, '.');
6878360efbdSAlfred Perlstein 		if (p == NULL)
6888360efbdSAlfred Perlstein 			goto out;
6898360efbdSAlfred Perlstein 		porthi = (unsigned)atoi(p + 1);
6908360efbdSAlfred Perlstein 		*p = '\0';
6918360efbdSAlfred Perlstein 		port = (porthi << 8) | portlo;
6928360efbdSAlfred Perlstein 	}
6938360efbdSAlfred Perlstein 
6948360efbdSAlfred Perlstein 	ret = (struct netbuf *)malloc(sizeof *ret);
695b951fbe4SMartin Blapp 	if (ret == NULL)
696b951fbe4SMartin Blapp 		goto out;
6978360efbdSAlfred Perlstein 
6988360efbdSAlfred Perlstein 	switch (af) {
6998360efbdSAlfred Perlstein 	case AF_INET:
7008360efbdSAlfred Perlstein 		sin = (struct sockaddr_in *)malloc(sizeof *sin);
7018360efbdSAlfred Perlstein 		if (sin == NULL)
7028360efbdSAlfred Perlstein 			goto out;
7038360efbdSAlfred Perlstein 		memset(sin, 0, sizeof *sin);
7048360efbdSAlfred Perlstein 		sin->sin_family = AF_INET;
7058360efbdSAlfred Perlstein 		sin->sin_port = htons(port);
7068360efbdSAlfred Perlstein 		if (inet_pton(AF_INET, addrstr, &sin->sin_addr) <= 0) {
7078360efbdSAlfred Perlstein 			free(sin);
7088360efbdSAlfred Perlstein 			free(ret);
7098360efbdSAlfred Perlstein 			ret = NULL;
7108360efbdSAlfred Perlstein 			goto out;
7118360efbdSAlfred Perlstein 		}
7128360efbdSAlfred Perlstein 		sin->sin_len = ret->maxlen = ret->len = sizeof *sin;
7138360efbdSAlfred Perlstein 		ret->buf = sin;
7148360efbdSAlfred Perlstein 		break;
7158360efbdSAlfred Perlstein #ifdef INET6
7168360efbdSAlfred Perlstein 	case AF_INET6:
7178360efbdSAlfred Perlstein 		sin6 = (struct sockaddr_in6 *)malloc(sizeof *sin6);
7188360efbdSAlfred Perlstein 		if (sin6 == NULL)
7198360efbdSAlfred Perlstein 			goto out;
7208360efbdSAlfred Perlstein 		memset(sin6, 0, sizeof *sin6);
7218360efbdSAlfred Perlstein 		sin6->sin6_family = AF_INET6;
7228360efbdSAlfred Perlstein 		sin6->sin6_port = htons(port);
7238360efbdSAlfred Perlstein 		if (inet_pton(AF_INET6, addrstr, &sin6->sin6_addr) <= 0) {
724b951fbe4SMartin Blapp 			free(sin6);
7258360efbdSAlfred Perlstein 			free(ret);
7268360efbdSAlfred Perlstein 			ret = NULL;
7278360efbdSAlfred Perlstein 			goto out;
7288360efbdSAlfred Perlstein 		}
7298360efbdSAlfred Perlstein 		sin6->sin6_len = ret->maxlen = ret->len = sizeof *sin6;
7308360efbdSAlfred Perlstein 		ret->buf = sin6;
7318360efbdSAlfred Perlstein 		break;
7328360efbdSAlfred Perlstein #endif
7338360efbdSAlfred Perlstein 	case AF_LOCAL:
7348360efbdSAlfred Perlstein 		sun = (struct sockaddr_un *)malloc(sizeof *sun);
7358360efbdSAlfred Perlstein 		if (sun == NULL)
7368360efbdSAlfred Perlstein 			goto out;
7378360efbdSAlfred Perlstein 		memset(sun, 0, sizeof *sun);
7388360efbdSAlfred Perlstein 		sun->sun_family = AF_LOCAL;
7398360efbdSAlfred Perlstein 		strncpy(sun->sun_path, addrstr, sizeof(sun->sun_path) - 1);
740f2b95b20SIan Dowse 		ret->len = ret->maxlen = sun->sun_len = SUN_LEN(sun);
741f2b95b20SIan Dowse 		ret->buf = sun;
7428360efbdSAlfred Perlstein 		break;
7438360efbdSAlfred Perlstein 	default:
7448360efbdSAlfred Perlstein 		break;
7458360efbdSAlfred Perlstein 	}
7468360efbdSAlfred Perlstein out:
7478360efbdSAlfred Perlstein 	free(addrstr);
7488360efbdSAlfred Perlstein 	return ret;
7498360efbdSAlfred Perlstein }
7508360efbdSAlfred Perlstein 
7518360efbdSAlfred Perlstein int
7528360efbdSAlfred Perlstein __rpc_seman2socktype(int semantics)
7538360efbdSAlfred Perlstein {
7548360efbdSAlfred Perlstein 	switch (semantics) {
7558360efbdSAlfred Perlstein 	case NC_TPI_CLTS:
7568360efbdSAlfred Perlstein 		return SOCK_DGRAM;
7578360efbdSAlfred Perlstein 	case NC_TPI_COTS_ORD:
7588360efbdSAlfred Perlstein 		return SOCK_STREAM;
7598360efbdSAlfred Perlstein 	case NC_TPI_RAW:
7608360efbdSAlfred Perlstein 		return SOCK_RAW;
7618360efbdSAlfred Perlstein 	default:
7628360efbdSAlfred Perlstein 		break;
7638360efbdSAlfred Perlstein 	}
7648360efbdSAlfred Perlstein 
7658360efbdSAlfred Perlstein 	return -1;
7668360efbdSAlfred Perlstein }
7678360efbdSAlfred Perlstein 
7688360efbdSAlfred Perlstein int
7698360efbdSAlfred Perlstein __rpc_socktype2seman(int socktype)
7708360efbdSAlfred Perlstein {
7718360efbdSAlfred Perlstein 	switch (socktype) {
7728360efbdSAlfred Perlstein 	case SOCK_DGRAM:
7738360efbdSAlfred Perlstein 		return NC_TPI_CLTS;
7748360efbdSAlfred Perlstein 	case SOCK_STREAM:
7758360efbdSAlfred Perlstein 		return NC_TPI_COTS_ORD;
7768360efbdSAlfred Perlstein 	case SOCK_RAW:
7778360efbdSAlfred Perlstein 		return NC_TPI_RAW;
7788360efbdSAlfred Perlstein 	default:
7798360efbdSAlfred Perlstein 		break;
7808360efbdSAlfred Perlstein 	}
7818360efbdSAlfred Perlstein 
7828360efbdSAlfred Perlstein 	return -1;
7838360efbdSAlfred Perlstein }
7848360efbdSAlfred Perlstein 
7858360efbdSAlfred Perlstein /*
7868360efbdSAlfred Perlstein  * XXXX - IPv6 scope IDs can't be handled in universal addresses.
7878360efbdSAlfred Perlstein  * Here, we compare the original server address to that of the RPC
7888360efbdSAlfred Perlstein  * service we just received back from a call to rpcbind on the remote
7898360efbdSAlfred Perlstein  * machine. If they are both "link local" or "site local", copy
7908360efbdSAlfred Perlstein  * the scope id of the server address over to the service address.
7918360efbdSAlfred Perlstein  */
7928360efbdSAlfred Perlstein int
7938360efbdSAlfred Perlstein __rpc_fixup_addr(struct netbuf *new, const struct netbuf *svc)
7948360efbdSAlfred Perlstein {
7958360efbdSAlfred Perlstein #ifdef INET6
7968360efbdSAlfred Perlstein 	struct sockaddr *sa_new, *sa_svc;
7978360efbdSAlfred Perlstein 	struct sockaddr_in6 *sin6_new, *sin6_svc;
7988360efbdSAlfred Perlstein 
7998360efbdSAlfred Perlstein 	sa_svc = (struct sockaddr *)svc->buf;
8008360efbdSAlfred Perlstein 	sa_new = (struct sockaddr *)new->buf;
8018360efbdSAlfred Perlstein 
8028360efbdSAlfred Perlstein 	if (sa_new->sa_family == sa_svc->sa_family &&
8038360efbdSAlfred Perlstein 	    sa_new->sa_family == AF_INET6) {
8048360efbdSAlfred Perlstein 		sin6_new = (struct sockaddr_in6 *)new->buf;
8058360efbdSAlfred Perlstein 		sin6_svc = (struct sockaddr_in6 *)svc->buf;
8068360efbdSAlfred Perlstein 
8078360efbdSAlfred Perlstein 		if ((IN6_IS_ADDR_LINKLOCAL(&sin6_new->sin6_addr) &&
8088360efbdSAlfred Perlstein 		     IN6_IS_ADDR_LINKLOCAL(&sin6_svc->sin6_addr)) ||
8098360efbdSAlfred Perlstein 		    (IN6_IS_ADDR_SITELOCAL(&sin6_new->sin6_addr) &&
8108360efbdSAlfred Perlstein 		     IN6_IS_ADDR_SITELOCAL(&sin6_svc->sin6_addr))) {
8118360efbdSAlfred Perlstein 			sin6_new->sin6_scope_id = sin6_svc->sin6_scope_id;
8128360efbdSAlfred Perlstein 		}
8138360efbdSAlfred Perlstein 	}
8148360efbdSAlfred Perlstein #endif
8158360efbdSAlfred Perlstein 	return 1;
8168360efbdSAlfred Perlstein }
8178360efbdSAlfred Perlstein 
8188360efbdSAlfred Perlstein int
8198360efbdSAlfred Perlstein __rpc_sockisbound(int fd)
8208360efbdSAlfred Perlstein {
8218360efbdSAlfred Perlstein 	struct sockaddr_storage ss;
8228360efbdSAlfred Perlstein 	socklen_t slen;
8238360efbdSAlfred Perlstein 
8248360efbdSAlfred Perlstein 	slen = sizeof (struct sockaddr_storage);
8258360efbdSAlfred Perlstein 	if (_getsockname(fd, (struct sockaddr *)(void *)&ss, &slen) < 0)
8268360efbdSAlfred Perlstein 		return 0;
8278360efbdSAlfred Perlstein 
8288360efbdSAlfred Perlstein 	switch (ss.ss_family) {
8298360efbdSAlfred Perlstein 		case AF_INET:
8308360efbdSAlfred Perlstein 			return (((struct sockaddr_in *)
8318360efbdSAlfred Perlstein 			    (void *)&ss)->sin_port != 0);
8328360efbdSAlfred Perlstein #ifdef INET6
8338360efbdSAlfred Perlstein 		case AF_INET6:
8348360efbdSAlfred Perlstein 			return (((struct sockaddr_in6 *)
8358360efbdSAlfred Perlstein 			    (void *)&ss)->sin6_port != 0);
8368360efbdSAlfred Perlstein #endif
8378360efbdSAlfred Perlstein 		case AF_LOCAL:
8388360efbdSAlfred Perlstein 			/* XXX check this */
8398360efbdSAlfred Perlstein 			return (((struct sockaddr_un *)
8408360efbdSAlfred Perlstein 			    (void *)&ss)->sun_path[0] != '\0');
8418360efbdSAlfred Perlstein 		default:
8428360efbdSAlfred Perlstein 			break;
8438360efbdSAlfred Perlstein 	}
8448360efbdSAlfred Perlstein 
8458360efbdSAlfred Perlstein 	return 0;
8468360efbdSAlfred Perlstein }
847