xref: /freebsd/usr.sbin/rpcbind/check_bound.c (revision 2be1a816b9ff69588e55be0a84cbe2a31efc0f2f)
1 /*	$NetBSD: check_bound.c,v 1.2 2000/06/22 08:09:26 fvdl Exp $	*/
2 /*	$FreeBSD$ */
3 
4 /*
5  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
6  * unrestricted use provided that this legend is included on all tape
7  * media and as a part of the software program in whole or part.  Users
8  * may copy or modify Sun RPC without charge, but are not authorized
9  * to license or distribute it to anyone else except as part of a product or
10  * program developed by the user.
11  *
12  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
13  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
14  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
15  *
16  * Sun RPC is provided with no support and without any obligation on the
17  * part of Sun Microsystems, Inc. to assist in its use, correction,
18  * modification or enhancement.
19  *
20  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
21  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
22  * OR ANY PART THEREOF.
23  *
24  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
25  * or profits or other special, indirect and consequential damages, even if
26  * Sun has been advised of the possibility of such damages.
27  *
28  * Sun Microsystems, Inc.
29  * 2550 Garcia Avenue
30  * Mountain View, California  94043
31  */
32 /*
33  * Copyright (c) 1986 - 1991 by Sun Microsystems, Inc.
34  */
35 
36 /* #ident	"@(#)check_bound.c	1.15	93/07/05 SMI" */
37 
38 #if 0
39 #ifndef lint
40 static	char sccsid[] = "@(#)check_bound.c 1.11 89/04/21 Copyr 1989 Sun Micro";
41 #endif
42 #endif
43 
44 /*
45  * check_bound.c
46  * Checks to see whether the program is still bound to the
47  * claimed address and returns the univeral merged address
48  *
49  */
50 
51 #include <sys/types.h>
52 #include <sys/socket.h>
53 #include <rpc/rpc.h>
54 #include <stdio.h>
55 #include <netconfig.h>
56 #include <syslog.h>
57 #include <string.h>
58 #include <unistd.h>
59 #include <stdlib.h>
60 
61 #include "rpcbind.h"
62 
63 struct fdlist {
64 	int fd;
65 	struct netconfig *nconf;
66 	struct fdlist *next;
67 	int check_binding;
68 };
69 
70 static struct fdlist *fdhead;	/* Link list of the check fd's */
71 static struct fdlist *fdtail;
72 static char *nullstring = "";
73 
74 static bool_t check_bound(struct fdlist *, char *uaddr);
75 
76 /*
77  * Returns 1 if the given address is bound for the given addr & transport
78  * For all error cases, we assume that the address is bound
79  * Returns 0 for success.
80  */
81 static bool_t
82 check_bound(struct fdlist *fdl, char *uaddr)
83 {
84 	int fd;
85 	struct netbuf *na;
86 	int ans;
87 
88 	if (fdl->check_binding == FALSE)
89 		return (TRUE);
90 
91 	na = uaddr2taddr(fdl->nconf, uaddr);
92 	if (!na)
93 		return (TRUE); /* punt, should never happen */
94 
95 	fd = __rpc_nconf2fd(fdl->nconf);
96 	if (fd < 0) {
97 		free(na->buf);
98 		free(na);
99 		return (TRUE);
100 	}
101 
102 	ans = bind(fd, (struct sockaddr *)na->buf, na->len);
103 
104 	close(fd);
105 	free(na->buf);
106 	free(na);
107 
108 	return (ans == 0 ? FALSE : TRUE);
109 }
110 
111 int
112 add_bndlist(struct netconfig *nconf, struct netbuf *baddr __unused)
113 {
114 	struct fdlist *fdl;
115 	struct netconfig *newnconf;
116 
117 	newnconf = getnetconfigent(nconf->nc_netid);
118 	if (newnconf == NULL)
119 		return (-1);
120 	fdl = malloc(sizeof (struct fdlist));
121 	if (fdl == NULL) {
122 		freenetconfigent(newnconf);
123 		syslog(LOG_ERR, "no memory!");
124 		return (-1);
125 	}
126 	fdl->nconf = newnconf;
127 	fdl->next = NULL;
128 	if (fdhead == NULL) {
129 		fdhead = fdl;
130 		fdtail = fdl;
131 	} else {
132 		fdtail->next = fdl;
133 		fdtail = fdl;
134 	}
135 	/* XXX no bound checking for now */
136 	fdl->check_binding = FALSE;
137 
138 	return 0;
139 }
140 
141 bool_t
142 is_bound(char *netid, char *uaddr)
143 {
144 	struct fdlist *fdl;
145 
146 	for (fdl = fdhead; fdl; fdl = fdl->next)
147 		if (strcmp(fdl->nconf->nc_netid, netid) == 0)
148 			break;
149 	if (fdl == NULL)
150 		return (TRUE);
151 	return (check_bound(fdl, uaddr));
152 }
153 
154 /*
155  * Returns NULL if there was some system error.
156  * Returns "" if the address was not bound, i.e the server crashed.
157  * Returns the merged address otherwise.
158  */
159 char *
160 mergeaddr(SVCXPRT *xprt, char *netid, char *uaddr, char *saddr)
161 {
162 	struct fdlist *fdl;
163 	char *c_uaddr, *s_uaddr, *m_uaddr, *allocated_uaddr = NULL;
164 
165 	for (fdl = fdhead; fdl; fdl = fdl->next)
166 		if (strcmp(fdl->nconf->nc_netid, netid) == 0)
167 			break;
168 	if (fdl == NULL)
169 		return (NULL);
170 	if (check_bound(fdl, uaddr) == FALSE)
171 		/* that server died */
172 		return (nullstring);
173 	/*
174 	 * If saddr is not NULL, the remote client may have included the
175 	 * address by which it contacted us.  Use that for the "client" uaddr,
176 	 * otherwise use the info from the SVCXPRT.
177 	 */
178 	if (saddr != NULL) {
179 		c_uaddr = saddr;
180 	} else {
181 		c_uaddr = taddr2uaddr(fdl->nconf, svc_getrpccaller(xprt));
182 		if (c_uaddr == NULL) {
183 			syslog(LOG_ERR, "taddr2uaddr failed for %s",
184 				fdl->nconf->nc_netid);
185 			return (NULL);
186 		}
187 		allocated_uaddr = c_uaddr;
188 	}
189 
190 #ifdef ND_DEBUG
191 	if (debugging) {
192 		if (saddr == NULL) {
193 			fprintf(stderr, "mergeaddr: client uaddr = %s\n",
194 			    c_uaddr);
195 		} else {
196 			fprintf(stderr, "mergeaddr: contact uaddr = %s\n",
197 			    c_uaddr);
198 		}
199 	}
200 #endif
201 	s_uaddr = uaddr;
202 	/*
203 	 * This is all we should need for IP 4 and 6
204 	 */
205 	m_uaddr = addrmerge(svc_getrpccaller(xprt), s_uaddr, c_uaddr, netid);
206 #ifdef ND_DEBUG
207 	if (debugging)
208 		fprintf(stderr, "mergeaddr: uaddr = %s, merged uaddr = %s\n",
209 				uaddr, m_uaddr);
210 #endif
211 	if (allocated_uaddr != NULL)
212 		free(allocated_uaddr);
213 	return (m_uaddr);
214 }
215 
216 /*
217  * Returns a netconf structure from its internal list.  This
218  * structure should not be freed.
219  */
220 struct netconfig *
221 rpcbind_get_conf(char *netid)
222 {
223 	struct fdlist *fdl;
224 
225 	for (fdl = fdhead; fdl; fdl = fdl->next)
226 		if (strcmp(fdl->nconf->nc_netid, netid) == 0)
227 			break;
228 	if (fdl == NULL)
229 		return (NULL);
230 	return (fdl->nconf);
231 }
232