xref: /openbmc/linux/net/sunrpc/rpcb_clnt.c (revision 82ced6fd)
1 /*
2  * In-kernel rpcbind client supporting versions 2, 3, and 4 of the rpcbind
3  * protocol
4  *
5  * Based on RFC 1833: "Binding Protocols for ONC RPC Version 2" and
6  * RFC 3530: "Network File System (NFS) version 4 Protocol"
7  *
8  * Original: Gilles Quillard, Bull Open Source, 2005 <gilles.quillard@bull.net>
9  * Updated: Chuck Lever, Oracle Corporation, 2007 <chuck.lever@oracle.com>
10  *
11  * Descended from net/sunrpc/pmap_clnt.c,
12  *  Copyright (C) 1996, Olaf Kirch <okir@monad.swb.de>
13  */
14 
15 #include <linux/module.h>
16 
17 #include <linux/types.h>
18 #include <linux/socket.h>
19 #include <linux/in.h>
20 #include <linux/in6.h>
21 #include <linux/kernel.h>
22 #include <linux/errno.h>
23 #include <net/ipv6.h>
24 
25 #include <linux/sunrpc/clnt.h>
26 #include <linux/sunrpc/sched.h>
27 #include <linux/sunrpc/xprtsock.h>
28 
29 #ifdef RPC_DEBUG
30 # define RPCDBG_FACILITY	RPCDBG_BIND
31 #endif
32 
33 #define RPCBIND_PROGRAM		(100000u)
34 #define RPCBIND_PORT		(111u)
35 
36 #define RPCBVERS_2		(2u)
37 #define RPCBVERS_3		(3u)
38 #define RPCBVERS_4		(4u)
39 
40 enum {
41 	RPCBPROC_NULL,
42 	RPCBPROC_SET,
43 	RPCBPROC_UNSET,
44 	RPCBPROC_GETPORT,
45 	RPCBPROC_GETADDR = 3,		/* alias for GETPORT */
46 	RPCBPROC_DUMP,
47 	RPCBPROC_CALLIT,
48 	RPCBPROC_BCAST = 5,		/* alias for CALLIT */
49 	RPCBPROC_GETTIME,
50 	RPCBPROC_UADDR2TADDR,
51 	RPCBPROC_TADDR2UADDR,
52 	RPCBPROC_GETVERSADDR,
53 	RPCBPROC_INDIRECT,
54 	RPCBPROC_GETADDRLIST,
55 	RPCBPROC_GETSTAT,
56 };
57 
58 #define RPCB_HIGHPROC_2		RPCBPROC_CALLIT
59 #define RPCB_HIGHPROC_3		RPCBPROC_TADDR2UADDR
60 #define RPCB_HIGHPROC_4		RPCBPROC_GETSTAT
61 
62 /*
63  * r_owner
64  *
65  * The "owner" is allowed to unset a service in the rpcbind database.
66  *
67  * For AF_LOCAL SET/UNSET requests, rpcbind treats this string as a
68  * UID which it maps to a local user name via a password lookup.
69  * In all other cases it is ignored.
70  *
71  * For SET/UNSET requests, user space provides a value, even for
72  * network requests, and GETADDR uses an empty string.  We follow
73  * those precedents here.
74  */
75 #define RPCB_OWNER_STRING	"0"
76 #define RPCB_MAXOWNERLEN	sizeof(RPCB_OWNER_STRING)
77 
78 static void			rpcb_getport_done(struct rpc_task *, void *);
79 static void			rpcb_map_release(void *data);
80 static struct rpc_program	rpcb_program;
81 
82 struct rpcbind_args {
83 	struct rpc_xprt *	r_xprt;
84 
85 	u32			r_prog;
86 	u32			r_vers;
87 	u32			r_prot;
88 	unsigned short		r_port;
89 	const char *		r_netid;
90 	const char *		r_addr;
91 	const char *		r_owner;
92 
93 	int			r_status;
94 };
95 
96 static struct rpc_procinfo rpcb_procedures2[];
97 static struct rpc_procinfo rpcb_procedures3[];
98 static struct rpc_procinfo rpcb_procedures4[];
99 
100 struct rpcb_info {
101 	u32			rpc_vers;
102 	struct rpc_procinfo *	rpc_proc;
103 };
104 
105 static struct rpcb_info rpcb_next_version[];
106 static struct rpcb_info rpcb_next_version6[];
107 
108 static const struct rpc_call_ops rpcb_getport_ops = {
109 	.rpc_call_done		= rpcb_getport_done,
110 	.rpc_release		= rpcb_map_release,
111 };
112 
113 static void rpcb_wake_rpcbind_waiters(struct rpc_xprt *xprt, int status)
114 {
115 	xprt_clear_binding(xprt);
116 	rpc_wake_up_status(&xprt->binding, status);
117 }
118 
119 static void rpcb_map_release(void *data)
120 {
121 	struct rpcbind_args *map = data;
122 
123 	rpcb_wake_rpcbind_waiters(map->r_xprt, map->r_status);
124 	xprt_put(map->r_xprt);
125 	kfree(map);
126 }
127 
128 static const struct sockaddr_in rpcb_inaddr_loopback = {
129 	.sin_family		= AF_INET,
130 	.sin_addr.s_addr	= htonl(INADDR_LOOPBACK),
131 	.sin_port		= htons(RPCBIND_PORT),
132 };
133 
134 static struct rpc_clnt *rpcb_create_local(struct sockaddr *addr,
135 					  size_t addrlen, u32 version)
136 {
137 	struct rpc_create_args args = {
138 		.protocol	= XPRT_TRANSPORT_UDP,
139 		.address	= addr,
140 		.addrsize	= addrlen,
141 		.servername	= "localhost",
142 		.program	= &rpcb_program,
143 		.version	= version,
144 		.authflavor	= RPC_AUTH_UNIX,
145 		.flags		= RPC_CLNT_CREATE_NOPING,
146 	};
147 
148 	return rpc_create(&args);
149 }
150 
151 static struct rpc_clnt *rpcb_create(char *hostname, struct sockaddr *srvaddr,
152 				    size_t salen, int proto, u32 version)
153 {
154 	struct rpc_create_args args = {
155 		.protocol	= proto,
156 		.address	= srvaddr,
157 		.addrsize	= salen,
158 		.servername	= hostname,
159 		.program	= &rpcb_program,
160 		.version	= version,
161 		.authflavor	= RPC_AUTH_UNIX,
162 		.flags		= (RPC_CLNT_CREATE_NOPING |
163 					RPC_CLNT_CREATE_NONPRIVPORT),
164 	};
165 
166 	switch (srvaddr->sa_family) {
167 	case AF_INET:
168 		((struct sockaddr_in *)srvaddr)->sin_port = htons(RPCBIND_PORT);
169 		break;
170 	case AF_INET6:
171 		((struct sockaddr_in6 *)srvaddr)->sin6_port = htons(RPCBIND_PORT);
172 		break;
173 	default:
174 		return NULL;
175 	}
176 
177 	return rpc_create(&args);
178 }
179 
180 static int rpcb_register_call(const u32 version, struct rpc_message *msg)
181 {
182 	struct sockaddr *addr = (struct sockaddr *)&rpcb_inaddr_loopback;
183 	size_t addrlen = sizeof(rpcb_inaddr_loopback);
184 	struct rpc_clnt *rpcb_clnt;
185 	int result, error = 0;
186 
187 	msg->rpc_resp = &result;
188 
189 	rpcb_clnt = rpcb_create_local(addr, addrlen, version);
190 	if (!IS_ERR(rpcb_clnt)) {
191 		error = rpc_call_sync(rpcb_clnt, msg, 0);
192 		rpc_shutdown_client(rpcb_clnt);
193 	} else
194 		error = PTR_ERR(rpcb_clnt);
195 
196 	if (error < 0) {
197 		dprintk("RPC:       failed to contact local rpcbind "
198 				"server (errno %d).\n", -error);
199 		return error;
200 	}
201 
202 	if (!result)
203 		return -EACCES;
204 	return 0;
205 }
206 
207 /**
208  * rpcb_register - set or unset a port registration with the local rpcbind svc
209  * @prog: RPC program number to bind
210  * @vers: RPC version number to bind
211  * @prot: transport protocol to register
212  * @port: port value to register
213  *
214  * Returns zero if the registration request was dispatched successfully
215  * and the rpcbind daemon returned success.  Otherwise, returns an errno
216  * value that reflects the nature of the error (request could not be
217  * dispatched, timed out, or rpcbind returned an error).
218  *
219  * RPC services invoke this function to advertise their contact
220  * information via the system's rpcbind daemon.  RPC services
221  * invoke this function once for each [program, version, transport]
222  * tuple they wish to advertise.
223  *
224  * Callers may also unregister RPC services that are no longer
225  * available by setting the passed-in port to zero.  This removes
226  * all registered transports for [program, version] from the local
227  * rpcbind database.
228  *
229  * This function uses rpcbind protocol version 2 to contact the
230  * local rpcbind daemon.
231  *
232  * Registration works over both AF_INET and AF_INET6, and services
233  * registered via this function are advertised as available for any
234  * address.  If the local rpcbind daemon is listening on AF_INET6,
235  * services registered via this function will be advertised on
236  * IN6ADDR_ANY (ie available for all AF_INET and AF_INET6
237  * addresses).
238  */
239 int rpcb_register(u32 prog, u32 vers, int prot, unsigned short port)
240 {
241 	struct rpcbind_args map = {
242 		.r_prog		= prog,
243 		.r_vers		= vers,
244 		.r_prot		= prot,
245 		.r_port		= port,
246 	};
247 	struct rpc_message msg = {
248 		.rpc_argp	= &map,
249 	};
250 
251 	dprintk("RPC:       %sregistering (%u, %u, %d, %u) with local "
252 			"rpcbind\n", (port ? "" : "un"),
253 			prog, vers, prot, port);
254 
255 	msg.rpc_proc = &rpcb_procedures2[RPCBPROC_UNSET];
256 	if (port)
257 		msg.rpc_proc = &rpcb_procedures2[RPCBPROC_SET];
258 
259 	return rpcb_register_call(RPCBVERS_2, &msg);
260 }
261 
262 /*
263  * Fill in AF_INET family-specific arguments to register
264  */
265 static int rpcb_register_inet4(const struct sockaddr *sap,
266 			       struct rpc_message *msg)
267 {
268 	const struct sockaddr_in *sin = (const struct sockaddr_in *)sap;
269 	struct rpcbind_args *map = msg->rpc_argp;
270 	unsigned short port = ntohs(sin->sin_port);
271 	char buf[32];
272 
273 	/* Construct AF_INET universal address */
274 	snprintf(buf, sizeof(buf), "%pI4.%u.%u",
275 		 &sin->sin_addr.s_addr, port >> 8, port & 0xff);
276 	map->r_addr = buf;
277 
278 	dprintk("RPC:       %sregistering [%u, %u, %s, '%s'] with "
279 		"local rpcbind\n", (port ? "" : "un"),
280 			map->r_prog, map->r_vers,
281 			map->r_addr, map->r_netid);
282 
283 	msg->rpc_proc = &rpcb_procedures4[RPCBPROC_UNSET];
284 	if (port)
285 		msg->rpc_proc = &rpcb_procedures4[RPCBPROC_SET];
286 
287 	return rpcb_register_call(RPCBVERS_4, msg);
288 }
289 
290 /*
291  * Fill in AF_INET6 family-specific arguments to register
292  */
293 static int rpcb_register_inet6(const struct sockaddr *sap,
294 			       struct rpc_message *msg)
295 {
296 	const struct sockaddr_in6 *sin6 = (const struct sockaddr_in6 *)sap;
297 	struct rpcbind_args *map = msg->rpc_argp;
298 	unsigned short port = ntohs(sin6->sin6_port);
299 	char buf[64];
300 
301 	/* Construct AF_INET6 universal address */
302 	if (ipv6_addr_any(&sin6->sin6_addr))
303 		snprintf(buf, sizeof(buf), "::.%u.%u",
304 				port >> 8, port & 0xff);
305 	else
306 		snprintf(buf, sizeof(buf), "%pI6.%u.%u",
307 			 &sin6->sin6_addr, port >> 8, port & 0xff);
308 	map->r_addr = buf;
309 
310 	dprintk("RPC:       %sregistering [%u, %u, %s, '%s'] with "
311 		"local rpcbind\n", (port ? "" : "un"),
312 			map->r_prog, map->r_vers,
313 			map->r_addr, map->r_netid);
314 
315 	msg->rpc_proc = &rpcb_procedures4[RPCBPROC_UNSET];
316 	if (port)
317 		msg->rpc_proc = &rpcb_procedures4[RPCBPROC_SET];
318 
319 	return rpcb_register_call(RPCBVERS_4, msg);
320 }
321 
322 static int rpcb_unregister_all_protofamilies(struct rpc_message *msg)
323 {
324 	struct rpcbind_args *map = msg->rpc_argp;
325 
326 	dprintk("RPC:       unregistering [%u, %u, '%s'] with "
327 		"local rpcbind\n",
328 			map->r_prog, map->r_vers, map->r_netid);
329 
330 	map->r_addr = "";
331 	msg->rpc_proc = &rpcb_procedures4[RPCBPROC_UNSET];
332 
333 	return rpcb_register_call(RPCBVERS_4, msg);
334 }
335 
336 /**
337  * rpcb_v4_register - set or unset a port registration with the local rpcbind
338  * @program: RPC program number of service to (un)register
339  * @version: RPC version number of service to (un)register
340  * @address: address family, IP address, and port to (un)register
341  * @netid: netid of transport protocol to (un)register
342  *
343  * Returns zero if the registration request was dispatched successfully
344  * and the rpcbind daemon returned success.  Otherwise, returns an errno
345  * value that reflects the nature of the error (request could not be
346  * dispatched, timed out, or rpcbind returned an error).
347  *
348  * RPC services invoke this function to advertise their contact
349  * information via the system's rpcbind daemon.  RPC services
350  * invoke this function once for each [program, version, address,
351  * netid] tuple they wish to advertise.
352  *
353  * Callers may also unregister RPC services that are registered at a
354  * specific address by setting the port number in @address to zero.
355  * They may unregister all registered protocol families at once for
356  * a service by passing a NULL @address argument.  If @netid is ""
357  * then all netids for [program, version, address] are unregistered.
358  *
359  * This function uses rpcbind protocol version 4 to contact the
360  * local rpcbind daemon.  The local rpcbind daemon must support
361  * version 4 of the rpcbind protocol in order for these functions
362  * to register a service successfully.
363  *
364  * Supported netids include "udp" and "tcp" for UDP and TCP over
365  * IPv4, and "udp6" and "tcp6" for UDP and TCP over IPv6,
366  * respectively.
367  *
368  * The contents of @address determine the address family and the
369  * port to be registered.  The usual practice is to pass INADDR_ANY
370  * as the raw address, but specifying a non-zero address is also
371  * supported by this API if the caller wishes to advertise an RPC
372  * service on a specific network interface.
373  *
374  * Note that passing in INADDR_ANY does not create the same service
375  * registration as IN6ADDR_ANY.  The former advertises an RPC
376  * service on any IPv4 address, but not on IPv6.  The latter
377  * advertises the service on all IPv4 and IPv6 addresses.
378  */
379 int rpcb_v4_register(const u32 program, const u32 version,
380 		     const struct sockaddr *address, const char *netid)
381 {
382 	struct rpcbind_args map = {
383 		.r_prog		= program,
384 		.r_vers		= version,
385 		.r_netid	= netid,
386 		.r_owner	= RPCB_OWNER_STRING,
387 	};
388 	struct rpc_message msg = {
389 		.rpc_argp	= &map,
390 	};
391 
392 	if (address == NULL)
393 		return rpcb_unregister_all_protofamilies(&msg);
394 
395 	switch (address->sa_family) {
396 	case AF_INET:
397 		return rpcb_register_inet4(address, &msg);
398 	case AF_INET6:
399 		return rpcb_register_inet6(address, &msg);
400 	}
401 
402 	return -EAFNOSUPPORT;
403 }
404 
405 /**
406  * rpcb_getport_sync - obtain the port for an RPC service on a given host
407  * @sin: address of remote peer
408  * @prog: RPC program number to bind
409  * @vers: RPC version number to bind
410  * @prot: transport protocol to use to make this request
411  *
412  * Return value is the requested advertised port number,
413  * or a negative errno value.
414  *
415  * Called from outside the RPC client in a synchronous task context.
416  * Uses default timeout parameters specified by underlying transport.
417  *
418  * XXX: Needs to support IPv6
419  */
420 int rpcb_getport_sync(struct sockaddr_in *sin, u32 prog, u32 vers, int prot)
421 {
422 	struct rpcbind_args map = {
423 		.r_prog		= prog,
424 		.r_vers		= vers,
425 		.r_prot		= prot,
426 		.r_port		= 0,
427 	};
428 	struct rpc_message msg = {
429 		.rpc_proc	= &rpcb_procedures2[RPCBPROC_GETPORT],
430 		.rpc_argp	= &map,
431 		.rpc_resp	= &map.r_port,
432 	};
433 	struct rpc_clnt	*rpcb_clnt;
434 	int status;
435 
436 	dprintk("RPC:       %s(%pI4, %u, %u, %d)\n",
437 		__func__, &sin->sin_addr.s_addr, prog, vers, prot);
438 
439 	rpcb_clnt = rpcb_create(NULL, (struct sockaddr *)sin,
440 				sizeof(*sin), prot, RPCBVERS_2);
441 	if (IS_ERR(rpcb_clnt))
442 		return PTR_ERR(rpcb_clnt);
443 
444 	status = rpc_call_sync(rpcb_clnt, &msg, 0);
445 	rpc_shutdown_client(rpcb_clnt);
446 
447 	if (status >= 0) {
448 		if (map.r_port != 0)
449 			return map.r_port;
450 		status = -EACCES;
451 	}
452 	return status;
453 }
454 EXPORT_SYMBOL_GPL(rpcb_getport_sync);
455 
456 static struct rpc_task *rpcb_call_async(struct rpc_clnt *rpcb_clnt, struct rpcbind_args *map, struct rpc_procinfo *proc)
457 {
458 	struct rpc_message msg = {
459 		.rpc_proc = proc,
460 		.rpc_argp = map,
461 		.rpc_resp = &map->r_port,
462 	};
463 	struct rpc_task_setup task_setup_data = {
464 		.rpc_client = rpcb_clnt,
465 		.rpc_message = &msg,
466 		.callback_ops = &rpcb_getport_ops,
467 		.callback_data = map,
468 		.flags = RPC_TASK_ASYNC,
469 	};
470 
471 	return rpc_run_task(&task_setup_data);
472 }
473 
474 /*
475  * In the case where rpc clients have been cloned, we want to make
476  * sure that we use the program number/version etc of the actual
477  * owner of the xprt. To do so, we walk back up the tree of parents
478  * to find whoever created the transport and/or whoever has the
479  * autobind flag set.
480  */
481 static struct rpc_clnt *rpcb_find_transport_owner(struct rpc_clnt *clnt)
482 {
483 	struct rpc_clnt *parent = clnt->cl_parent;
484 
485 	while (parent != clnt) {
486 		if (parent->cl_xprt != clnt->cl_xprt)
487 			break;
488 		if (clnt->cl_autobind)
489 			break;
490 		clnt = parent;
491 		parent = parent->cl_parent;
492 	}
493 	return clnt;
494 }
495 
496 /**
497  * rpcb_getport_async - obtain the port for a given RPC service on a given host
498  * @task: task that is waiting for portmapper request
499  *
500  * This one can be called for an ongoing RPC request, and can be used in
501  * an async (rpciod) context.
502  */
503 void rpcb_getport_async(struct rpc_task *task)
504 {
505 	struct rpc_clnt *clnt;
506 	struct rpc_procinfo *proc;
507 	u32 bind_version;
508 	struct rpc_xprt *xprt;
509 	struct rpc_clnt	*rpcb_clnt;
510 	static struct rpcbind_args *map;
511 	struct rpc_task	*child;
512 	struct sockaddr_storage addr;
513 	struct sockaddr *sap = (struct sockaddr *)&addr;
514 	size_t salen;
515 	int status;
516 
517 	clnt = rpcb_find_transport_owner(task->tk_client);
518 	xprt = clnt->cl_xprt;
519 
520 	dprintk("RPC: %5u %s(%s, %u, %u, %d)\n",
521 		task->tk_pid, __func__,
522 		clnt->cl_server, clnt->cl_prog, clnt->cl_vers, xprt->prot);
523 
524 	/* Put self on the wait queue to ensure we get notified if
525 	 * some other task is already attempting to bind the port */
526 	rpc_sleep_on(&xprt->binding, task, NULL);
527 
528 	if (xprt_test_and_set_binding(xprt)) {
529 		dprintk("RPC: %5u %s: waiting for another binder\n",
530 			task->tk_pid, __func__);
531 		return;
532 	}
533 
534 	/* Someone else may have bound if we slept */
535 	if (xprt_bound(xprt)) {
536 		status = 0;
537 		dprintk("RPC: %5u %s: already bound\n",
538 			task->tk_pid, __func__);
539 		goto bailout_nofree;
540 	}
541 
542 	salen = rpc_peeraddr(clnt, sap, sizeof(addr));
543 
544 	/* Don't ever use rpcbind v2 for AF_INET6 requests */
545 	switch (sap->sa_family) {
546 	case AF_INET:
547 		proc = rpcb_next_version[xprt->bind_index].rpc_proc;
548 		bind_version = rpcb_next_version[xprt->bind_index].rpc_vers;
549 		break;
550 	case AF_INET6:
551 		proc = rpcb_next_version6[xprt->bind_index].rpc_proc;
552 		bind_version = rpcb_next_version6[xprt->bind_index].rpc_vers;
553 		break;
554 	default:
555 		status = -EAFNOSUPPORT;
556 		dprintk("RPC: %5u %s: bad address family\n",
557 				task->tk_pid, __func__);
558 		goto bailout_nofree;
559 	}
560 	if (proc == NULL) {
561 		xprt->bind_index = 0;
562 		status = -EPFNOSUPPORT;
563 		dprintk("RPC: %5u %s: no more getport versions available\n",
564 			task->tk_pid, __func__);
565 		goto bailout_nofree;
566 	}
567 
568 	dprintk("RPC: %5u %s: trying rpcbind version %u\n",
569 		task->tk_pid, __func__, bind_version);
570 
571 	rpcb_clnt = rpcb_create(clnt->cl_server, sap, salen, xprt->prot,
572 				bind_version);
573 	if (IS_ERR(rpcb_clnt)) {
574 		status = PTR_ERR(rpcb_clnt);
575 		dprintk("RPC: %5u %s: rpcb_create failed, error %ld\n",
576 			task->tk_pid, __func__, PTR_ERR(rpcb_clnt));
577 		goto bailout_nofree;
578 	}
579 
580 	map = kzalloc(sizeof(struct rpcbind_args), GFP_ATOMIC);
581 	if (!map) {
582 		status = -ENOMEM;
583 		dprintk("RPC: %5u %s: no memory available\n",
584 			task->tk_pid, __func__);
585 		goto bailout_release_client;
586 	}
587 	map->r_prog = clnt->cl_prog;
588 	map->r_vers = clnt->cl_vers;
589 	map->r_prot = xprt->prot;
590 	map->r_port = 0;
591 	map->r_xprt = xprt_get(xprt);
592 	map->r_netid = rpc_peeraddr2str(clnt, RPC_DISPLAY_NETID);
593 	map->r_addr = rpc_peeraddr2str(rpcb_clnt, RPC_DISPLAY_UNIVERSAL_ADDR);
594 	map->r_owner = "";
595 	map->r_status = -EIO;
596 
597 	child = rpcb_call_async(rpcb_clnt, map, proc);
598 	rpc_release_client(rpcb_clnt);
599 	if (IS_ERR(child)) {
600 		/* rpcb_map_release() has freed the arguments */
601 		dprintk("RPC: %5u %s: rpc_run_task failed\n",
602 			task->tk_pid, __func__);
603 		return;
604 	}
605 
606 	xprt->stat.bind_count++;
607 	rpc_put_task(child);
608 	return;
609 
610 bailout_release_client:
611 	rpc_release_client(rpcb_clnt);
612 bailout_nofree:
613 	rpcb_wake_rpcbind_waiters(xprt, status);
614 	task->tk_status = status;
615 }
616 EXPORT_SYMBOL_GPL(rpcb_getport_async);
617 
618 /*
619  * Rpcbind child task calls this callback via tk_exit.
620  */
621 static void rpcb_getport_done(struct rpc_task *child, void *data)
622 {
623 	struct rpcbind_args *map = data;
624 	struct rpc_xprt *xprt = map->r_xprt;
625 	int status = child->tk_status;
626 
627 	/* Garbage reply: retry with a lesser rpcbind version */
628 	if (status == -EIO)
629 		status = -EPROTONOSUPPORT;
630 
631 	/* rpcbind server doesn't support this rpcbind protocol version */
632 	if (status == -EPROTONOSUPPORT)
633 		xprt->bind_index++;
634 
635 	if (status < 0) {
636 		/* rpcbind server not available on remote host? */
637 		xprt->ops->set_port(xprt, 0);
638 	} else if (map->r_port == 0) {
639 		/* Requested RPC service wasn't registered on remote host */
640 		xprt->ops->set_port(xprt, 0);
641 		status = -EACCES;
642 	} else {
643 		/* Succeeded */
644 		xprt->ops->set_port(xprt, map->r_port);
645 		xprt_set_bound(xprt);
646 		status = 0;
647 	}
648 
649 	dprintk("RPC: %5u rpcb_getport_done(status %d, port %u)\n",
650 			child->tk_pid, status, map->r_port);
651 
652 	map->r_status = status;
653 }
654 
655 /*
656  * XDR functions for rpcbind
657  */
658 
659 static int rpcb_encode_mapping(struct rpc_rqst *req, __be32 *p,
660 			       struct rpcbind_args *rpcb)
661 {
662 	dprintk("RPC:       encoding rpcb request (%u, %u, %d, %u)\n",
663 			rpcb->r_prog, rpcb->r_vers, rpcb->r_prot, rpcb->r_port);
664 	*p++ = htonl(rpcb->r_prog);
665 	*p++ = htonl(rpcb->r_vers);
666 	*p++ = htonl(rpcb->r_prot);
667 	*p++ = htonl(rpcb->r_port);
668 
669 	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
670 	return 0;
671 }
672 
673 static int rpcb_decode_getport(struct rpc_rqst *req, __be32 *p,
674 			       unsigned short *portp)
675 {
676 	*portp = (unsigned short) ntohl(*p++);
677 	dprintk("RPC:       rpcb getport result: %u\n",
678 			*portp);
679 	return 0;
680 }
681 
682 static int rpcb_decode_set(struct rpc_rqst *req, __be32 *p,
683 			   unsigned int *boolp)
684 {
685 	*boolp = (unsigned int) ntohl(*p++);
686 	dprintk("RPC:       rpcb set/unset call %s\n",
687 			(*boolp ? "succeeded" : "failed"));
688 	return 0;
689 }
690 
691 static int rpcb_encode_getaddr(struct rpc_rqst *req, __be32 *p,
692 			       struct rpcbind_args *rpcb)
693 {
694 	dprintk("RPC:       encoding rpcb request (%u, %u, %s)\n",
695 			rpcb->r_prog, rpcb->r_vers, rpcb->r_addr);
696 	*p++ = htonl(rpcb->r_prog);
697 	*p++ = htonl(rpcb->r_vers);
698 
699 	p = xdr_encode_string(p, rpcb->r_netid);
700 	p = xdr_encode_string(p, rpcb->r_addr);
701 	p = xdr_encode_string(p, rpcb->r_owner);
702 
703 	req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
704 
705 	return 0;
706 }
707 
708 static int rpcb_decode_getaddr(struct rpc_rqst *req, __be32 *p,
709 			       unsigned short *portp)
710 {
711 	char *addr;
712 	u32 addr_len;
713 	int c, i, f, first, val;
714 
715 	*portp = 0;
716 	addr_len = ntohl(*p++);
717 
718 	if (addr_len == 0) {
719 		dprintk("RPC:       rpcb_decode_getaddr: "
720 					"service is not registered\n");
721 		return 0;
722 	}
723 
724 	/*
725 	 * Simple sanity check.
726 	 */
727 	if (addr_len > RPCBIND_MAXUADDRLEN)
728 		goto out_err;
729 
730 	/*
731 	 * Start at the end and walk backwards until the first dot
732 	 * is encountered.  When the second dot is found, we have
733 	 * both parts of the port number.
734 	 */
735 	addr = (char *)p;
736 	val = 0;
737 	first = 1;
738 	f = 1;
739 	for (i = addr_len - 1; i > 0; i--) {
740 		c = addr[i];
741 		if (c >= '0' && c <= '9') {
742 			val += (c - '0') * f;
743 			f *= 10;
744 		} else if (c == '.') {
745 			if (first) {
746 				*portp = val;
747 				val = first = 0;
748 				f = 1;
749 			} else {
750 				*portp |= (val << 8);
751 				break;
752 			}
753 		}
754 	}
755 
756 	/*
757 	 * Simple sanity check.  If we never saw a dot in the reply,
758 	 * then this was probably just garbage.
759 	 */
760 	if (first)
761 		goto out_err;
762 
763 	dprintk("RPC:       rpcb_decode_getaddr port=%u\n", *portp);
764 	return 0;
765 
766 out_err:
767 	dprintk("RPC:       rpcbind server returned malformed reply\n");
768 	return -EIO;
769 }
770 
771 #define RPCB_program_sz		(1u)
772 #define RPCB_version_sz		(1u)
773 #define RPCB_protocol_sz	(1u)
774 #define RPCB_port_sz		(1u)
775 #define RPCB_boolean_sz		(1u)
776 
777 #define RPCB_netid_sz		(1+XDR_QUADLEN(RPCBIND_MAXNETIDLEN))
778 #define RPCB_addr_sz		(1+XDR_QUADLEN(RPCBIND_MAXUADDRLEN))
779 #define RPCB_ownerstring_sz	(1+XDR_QUADLEN(RPCB_MAXOWNERLEN))
780 
781 #define RPCB_mappingargs_sz	RPCB_program_sz+RPCB_version_sz+	\
782 				RPCB_protocol_sz+RPCB_port_sz
783 #define RPCB_getaddrargs_sz	RPCB_program_sz+RPCB_version_sz+	\
784 				RPCB_netid_sz+RPCB_addr_sz+		\
785 				RPCB_ownerstring_sz
786 
787 #define RPCB_setres_sz		RPCB_boolean_sz
788 #define RPCB_getportres_sz	RPCB_port_sz
789 
790 /*
791  * Note that RFC 1833 does not put any size restrictions on the
792  * address string returned by the remote rpcbind database.
793  */
794 #define RPCB_getaddrres_sz	RPCB_addr_sz
795 
796 #define PROC(proc, argtype, restype)					\
797 	[RPCBPROC_##proc] = {						\
798 		.p_proc		= RPCBPROC_##proc,			\
799 		.p_encode	= (kxdrproc_t) rpcb_encode_##argtype,	\
800 		.p_decode	= (kxdrproc_t) rpcb_decode_##restype,	\
801 		.p_arglen	= RPCB_##argtype##args_sz,		\
802 		.p_replen	= RPCB_##restype##res_sz,		\
803 		.p_statidx	= RPCBPROC_##proc,			\
804 		.p_timer	= 0,					\
805 		.p_name		= #proc,				\
806 	}
807 
808 /*
809  * Not all rpcbind procedures described in RFC 1833 are implemented
810  * since the Linux kernel RPC code requires only these.
811  */
812 static struct rpc_procinfo rpcb_procedures2[] = {
813 	PROC(SET,		mapping,	set),
814 	PROC(UNSET,		mapping,	set),
815 	PROC(GETPORT,		mapping,	getport),
816 };
817 
818 static struct rpc_procinfo rpcb_procedures3[] = {
819 	PROC(SET,		getaddr,	set),
820 	PROC(UNSET,		getaddr,	set),
821 	PROC(GETADDR,		getaddr,	getaddr),
822 };
823 
824 static struct rpc_procinfo rpcb_procedures4[] = {
825 	PROC(SET,		getaddr,	set),
826 	PROC(UNSET,		getaddr,	set),
827 	PROC(GETADDR,		getaddr,	getaddr),
828 	PROC(GETVERSADDR,	getaddr,	getaddr),
829 };
830 
831 static struct rpcb_info rpcb_next_version[] = {
832 	{
833 		.rpc_vers	= RPCBVERS_2,
834 		.rpc_proc	= &rpcb_procedures2[RPCBPROC_GETPORT],
835 	},
836 	{
837 		.rpc_proc	= NULL,
838 	},
839 };
840 
841 static struct rpcb_info rpcb_next_version6[] = {
842 	{
843 		.rpc_vers	= RPCBVERS_4,
844 		.rpc_proc	= &rpcb_procedures4[RPCBPROC_GETADDR],
845 	},
846 	{
847 		.rpc_vers	= RPCBVERS_3,
848 		.rpc_proc	= &rpcb_procedures3[RPCBPROC_GETADDR],
849 	},
850 	{
851 		.rpc_proc	= NULL,
852 	},
853 };
854 
855 static struct rpc_version rpcb_version2 = {
856 	.number		= RPCBVERS_2,
857 	.nrprocs	= RPCB_HIGHPROC_2,
858 	.procs		= rpcb_procedures2
859 };
860 
861 static struct rpc_version rpcb_version3 = {
862 	.number		= RPCBVERS_3,
863 	.nrprocs	= RPCB_HIGHPROC_3,
864 	.procs		= rpcb_procedures3
865 };
866 
867 static struct rpc_version rpcb_version4 = {
868 	.number		= RPCBVERS_4,
869 	.nrprocs	= RPCB_HIGHPROC_4,
870 	.procs		= rpcb_procedures4
871 };
872 
873 static struct rpc_version *rpcb_version[] = {
874 	NULL,
875 	NULL,
876 	&rpcb_version2,
877 	&rpcb_version3,
878 	&rpcb_version4
879 };
880 
881 static struct rpc_stat rpcb_stats;
882 
883 static struct rpc_program rpcb_program = {
884 	.name		= "rpcbind",
885 	.number		= RPCBIND_PROGRAM,
886 	.nrvers		= ARRAY_SIZE(rpcb_version),
887 	.version	= rpcb_version,
888 	.stats		= &rpcb_stats,
889 };
890