xref: /illumos-gate/usr/src/uts/common/fs/nfs/nfs_server.c (revision fca4268092e9961ebb9b5e0098dcebc545023586)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright 2015 Nexenta Systems, Inc.  All rights reserved.
24  * Copyright (c) 1990, 2010, Oracle and/or its affiliates. All rights reserved.
25  * Copyright (c) 2011 Bayard G. Bell. All rights reserved.
26  * Copyright (c) 2013 by Delphix. All rights reserved.
27  */
28 
29 /*
30  *	Copyright (c) 1983,1984,1985,1986,1987,1988,1989  AT&T.
31  *	All rights reserved.
32  *	Use is subject to license terms.
33  */
34 
35 #include <sys/param.h>
36 #include <sys/types.h>
37 #include <sys/systm.h>
38 #include <sys/cred.h>
39 #include <sys/proc.h>
40 #include <sys/user.h>
41 #include <sys/buf.h>
42 #include <sys/vfs.h>
43 #include <sys/vnode.h>
44 #include <sys/pathname.h>
45 #include <sys/uio.h>
46 #include <sys/file.h>
47 #include <sys/stat.h>
48 #include <sys/errno.h>
49 #include <sys/socket.h>
50 #include <sys/sysmacros.h>
51 #include <sys/siginfo.h>
52 #include <sys/tiuser.h>
53 #include <sys/statvfs.h>
54 #include <sys/stream.h>
55 #include <sys/strsun.h>
56 #include <sys/strsubr.h>
57 #include <sys/stropts.h>
58 #include <sys/timod.h>
59 #include <sys/t_kuser.h>
60 #include <sys/kmem.h>
61 #include <sys/kstat.h>
62 #include <sys/dirent.h>
63 #include <sys/cmn_err.h>
64 #include <sys/debug.h>
65 #include <sys/unistd.h>
66 #include <sys/vtrace.h>
67 #include <sys/mode.h>
68 #include <sys/acl.h>
69 #include <sys/sdt.h>
70 
71 #include <rpc/types.h>
72 #include <rpc/auth.h>
73 #include <rpc/auth_unix.h>
74 #include <rpc/auth_des.h>
75 #include <rpc/svc.h>
76 #include <rpc/xdr.h>
77 #include <rpc/rpc_rdma.h>
78 
79 #include <nfs/nfs.h>
80 #include <nfs/export.h>
81 #include <nfs/nfssys.h>
82 #include <nfs/nfs_clnt.h>
83 #include <nfs/nfs_acl.h>
84 #include <nfs/nfs_log.h>
85 #include <nfs/nfs_cmd.h>
86 #include <nfs/lm.h>
87 #include <nfs/nfs_dispatch.h>
88 #include <nfs/nfs4_drc.h>
89 
90 #include <sys/modctl.h>
91 #include <sys/cladm.h>
92 #include <sys/clconf.h>
93 
94 #include <sys/tsol/label.h>
95 
96 #define	MAXHOST 32
97 const char *kinet_ntop6(uchar_t *, char *, size_t);
98 
99 /*
100  * Module linkage information.
101  */
102 
103 static struct modlmisc modlmisc = {
104 	&mod_miscops, "NFS server module"
105 };
106 
107 static struct modlinkage modlinkage = {
108 	MODREV_1, (void *)&modlmisc, NULL
109 };
110 
111 kmem_cache_t *nfs_xuio_cache;
112 int nfs_loaned_buffers = 0;
113 
114 int
115 _init(void)
116 {
117 	int status;
118 
119 	if ((status = nfs_srvinit()) != 0) {
120 		cmn_err(CE_WARN, "_init: nfs_srvinit failed");
121 		return (status);
122 	}
123 
124 	status = mod_install((struct modlinkage *)&modlinkage);
125 	if (status != 0) {
126 		/*
127 		 * Could not load module, cleanup previous
128 		 * initialization work.
129 		 */
130 		nfs_srvfini();
131 
132 		return (status);
133 	}
134 
135 	/*
136 	 * Initialise some placeholders for nfssys() calls. These have
137 	 * to be declared by the nfs module, since that handles nfssys()
138 	 * calls - also used by NFS clients - but are provided by this
139 	 * nfssrv module. These also then serve as confirmation to the
140 	 * relevant code in nfs that nfssrv has been loaded, as they're
141 	 * initially NULL.
142 	 */
143 	nfs_srv_quiesce_func = nfs_srv_quiesce_all;
144 	nfs_srv_dss_func = rfs4_dss_setpaths;
145 
146 	/* setup DSS paths here; must be done before initial server startup */
147 	rfs4_dss_paths = rfs4_dss_oldpaths = NULL;
148 
149 	/* initialize the copy reduction caches */
150 
151 	nfs_xuio_cache = kmem_cache_create("nfs_xuio_cache",
152 	    sizeof (nfs_xuio_t), 0, NULL, NULL, NULL, NULL, NULL, 0);
153 
154 	return (status);
155 }
156 
157 int
158 _fini()
159 {
160 	return (EBUSY);
161 }
162 
163 int
164 _info(struct modinfo *modinfop)
165 {
166 	return (mod_info(&modlinkage, modinfop));
167 }
168 
169 /*
170  * PUBLICFH_CHECK() checks if the dispatch routine supports
171  * RPC_PUBLICFH_OK, if the filesystem is exported public, and if the
172  * incoming request is using the public filehandle. The check duplicates
173  * the exportmatch() call done in checkexport(), and we should consider
174  * modifying those routines to avoid the duplication. For now, we optimize
175  * by calling exportmatch() only after checking that the dispatch routine
176  * supports RPC_PUBLICFH_OK, and if the filesystem is explicitly exported
177  * public (i.e., not the placeholder).
178  */
179 #define	PUBLICFH_CHECK(disp, exi, fsid, xfid) \
180 		((disp->dis_flags & RPC_PUBLICFH_OK) && \
181 		((exi->exi_export.ex_flags & EX_PUBLIC) || \
182 		(exi == exi_public && exportmatch(exi_root, \
183 		fsid, xfid))))
184 
185 static void	nfs_srv_shutdown_all(int);
186 static void	rfs4_server_start(int);
187 static void	nullfree(void);
188 static void	rfs_dispatch(struct svc_req *, SVCXPRT *);
189 static void	acl_dispatch(struct svc_req *, SVCXPRT *);
190 static void	common_dispatch(struct svc_req *, SVCXPRT *,
191 		rpcvers_t, rpcvers_t, char *,
192 		struct rpc_disptable *);
193 static void	hanfsv4_failover(void);
194 static	int	checkauth(struct exportinfo *, struct svc_req *, cred_t *, int,
195 		bool_t, bool_t *);
196 static char	*client_name(struct svc_req *req);
197 static char	*client_addr(struct svc_req *req, char *buf);
198 extern	int	sec_svc_getcred(struct svc_req *, cred_t *cr, char **, int *);
199 extern	bool_t	sec_svc_inrootlist(int, caddr_t, int, caddr_t *);
200 
201 #define	NFSLOG_COPY_NETBUF(exi, xprt, nb)	{		\
202 	(nb)->maxlen = (xprt)->xp_rtaddr.maxlen;		\
203 	(nb)->len = (xprt)->xp_rtaddr.len;			\
204 	(nb)->buf = kmem_alloc((nb)->len, KM_SLEEP);		\
205 	bcopy((xprt)->xp_rtaddr.buf, (nb)->buf, (nb)->len);	\
206 	}
207 
208 /*
209  * Public Filehandle common nfs routines
210  */
211 static int	MCLpath(char **);
212 static void	URLparse(char *);
213 
214 /*
215  * NFS callout table.
216  * This table is used by svc_getreq() to dispatch a request with
217  * a given prog/vers pair to an appropriate service provider
218  * dispatch routine.
219  *
220  * NOTE: ordering is relied upon below when resetting the version min/max
221  * for NFS_PROGRAM.  Careful, if this is ever changed.
222  */
223 static SVC_CALLOUT __nfs_sc_clts[] = {
224 	{ NFS_PROGRAM,	   NFS_VERSMIN,	    NFS_VERSMAX,	rfs_dispatch },
225 	{ NFS_ACL_PROGRAM, NFS_ACL_VERSMIN, NFS_ACL_VERSMAX,	acl_dispatch }
226 };
227 
228 static SVC_CALLOUT_TABLE nfs_sct_clts = {
229 	sizeof (__nfs_sc_clts) / sizeof (__nfs_sc_clts[0]), FALSE,
230 	__nfs_sc_clts
231 };
232 
233 static SVC_CALLOUT __nfs_sc_cots[] = {
234 	{ NFS_PROGRAM,	   NFS_VERSMIN,	    NFS_VERSMAX,	rfs_dispatch },
235 	{ NFS_ACL_PROGRAM, NFS_ACL_VERSMIN, NFS_ACL_VERSMAX,	acl_dispatch }
236 };
237 
238 static SVC_CALLOUT_TABLE nfs_sct_cots = {
239 	sizeof (__nfs_sc_cots) / sizeof (__nfs_sc_cots[0]), FALSE, __nfs_sc_cots
240 };
241 
242 static SVC_CALLOUT __nfs_sc_rdma[] = {
243 	{ NFS_PROGRAM,	   NFS_VERSMIN,	    NFS_VERSMAX,	rfs_dispatch },
244 	{ NFS_ACL_PROGRAM, NFS_ACL_VERSMIN, NFS_ACL_VERSMAX,	acl_dispatch }
245 };
246 
247 static SVC_CALLOUT_TABLE nfs_sct_rdma = {
248 	sizeof (__nfs_sc_rdma) / sizeof (__nfs_sc_rdma[0]), FALSE, __nfs_sc_rdma
249 };
250 rpcvers_t nfs_versmin = NFS_VERSMIN_DEFAULT;
251 rpcvers_t nfs_versmax = NFS_VERSMAX_DEFAULT;
252 
253 /*
254  * Used to track the state of the server so that initialization
255  * can be done properly.
256  */
257 typedef enum {
258 	NFS_SERVER_STOPPED,	/* server state destroyed */
259 	NFS_SERVER_STOPPING,	/* server state being destroyed */
260 	NFS_SERVER_RUNNING,
261 	NFS_SERVER_QUIESCED,	/* server state preserved */
262 	NFS_SERVER_OFFLINE	/* server pool offline */
263 } nfs_server_running_t;
264 
265 static nfs_server_running_t nfs_server_upordown;
266 static kmutex_t nfs_server_upordown_lock;
267 static	kcondvar_t nfs_server_upordown_cv;
268 
269 /*
270  * DSS: distributed stable storage
271  * lists of all DSS paths: current, and before last warmstart
272  */
273 nvlist_t *rfs4_dss_paths, *rfs4_dss_oldpaths;
274 
275 int rfs4_dispatch(struct rpcdisp *, struct svc_req *, SVCXPRT *, char *,
276     size_t *);
277 bool_t rfs4_minorvers_mismatch(struct svc_req *, SVCXPRT *, void *);
278 
279 /*
280  * RDMA wait variables.
281  */
282 static kcondvar_t rdma_wait_cv;
283 static kmutex_t rdma_wait_mutex;
284 
285 /*
286  * Will be called at the point the server pool is being unregistered
287  * from the pool list. From that point onwards, the pool is waiting
288  * to be drained and as such the server state is stale and pertains
289  * to the old instantiation of the NFS server pool.
290  */
291 void
292 nfs_srv_offline(void)
293 {
294 	mutex_enter(&nfs_server_upordown_lock);
295 	if (nfs_server_upordown == NFS_SERVER_RUNNING) {
296 		nfs_server_upordown = NFS_SERVER_OFFLINE;
297 	}
298 	mutex_exit(&nfs_server_upordown_lock);
299 }
300 
301 /*
302  * Will be called at the point the server pool is being destroyed so
303  * all transports have been closed and no service threads are in
304  * existence.
305  *
306  * If we quiesce the server, we're shutting it down without destroying the
307  * server state. This allows it to warm start subsequently.
308  */
309 void
310 nfs_srv_stop_all(void)
311 {
312 	int quiesce = 0;
313 	nfs_srv_shutdown_all(quiesce);
314 }
315 
316 /*
317  * This alternative shutdown routine can be requested via nfssys()
318  */
319 void
320 nfs_srv_quiesce_all(void)
321 {
322 	int quiesce = 1;
323 	nfs_srv_shutdown_all(quiesce);
324 }
325 
326 static void
327 nfs_srv_shutdown_all(int quiesce) {
328 	mutex_enter(&nfs_server_upordown_lock);
329 	if (quiesce) {
330 		if (nfs_server_upordown == NFS_SERVER_RUNNING ||
331 			nfs_server_upordown == NFS_SERVER_OFFLINE) {
332 			nfs_server_upordown = NFS_SERVER_QUIESCED;
333 			cv_signal(&nfs_server_upordown_cv);
334 
335 			/* reset DSS state, for subsequent warm restart */
336 			rfs4_dss_numnewpaths = 0;
337 			rfs4_dss_newpaths = NULL;
338 
339 			cmn_err(CE_NOTE, "nfs_server: server is now quiesced; "
340 			    "NFSv4 state has been preserved");
341 		}
342 	} else {
343 		if (nfs_server_upordown == NFS_SERVER_OFFLINE) {
344 			nfs_server_upordown = NFS_SERVER_STOPPING;
345 			mutex_exit(&nfs_server_upordown_lock);
346 			rfs4_state_fini();
347 			rfs4_fini_drc(nfs4_drc);
348 			mutex_enter(&nfs_server_upordown_lock);
349 			nfs_server_upordown = NFS_SERVER_STOPPED;
350 			cv_signal(&nfs_server_upordown_cv);
351 		}
352 	}
353 	mutex_exit(&nfs_server_upordown_lock);
354 }
355 
356 static int
357 nfs_srv_set_sc_versions(struct file *fp, SVC_CALLOUT_TABLE **sctpp,
358 			rpcvers_t versmin, rpcvers_t versmax)
359 {
360 	struct strioctl strioc;
361 	struct T_info_ack tinfo;
362 	int		error, retval;
363 
364 	/*
365 	 * Find out what type of transport this is.
366 	 */
367 	strioc.ic_cmd = TI_GETINFO;
368 	strioc.ic_timout = -1;
369 	strioc.ic_len = sizeof (tinfo);
370 	strioc.ic_dp = (char *)&tinfo;
371 	tinfo.PRIM_type = T_INFO_REQ;
372 
373 	error = strioctl(fp->f_vnode, I_STR, (intptr_t)&strioc, 0, K_TO_K,
374 	    CRED(), &retval);
375 	if (error || retval)
376 		return (error);
377 
378 	/*
379 	 * Based on our query of the transport type...
380 	 *
381 	 * Reset the min/max versions based on the caller's request
382 	 * NOTE: This assumes that NFS_PROGRAM is first in the array!!
383 	 * And the second entry is the NFS_ACL_PROGRAM.
384 	 */
385 	switch (tinfo.SERV_type) {
386 	case T_CLTS:
387 		if (versmax == NFS_V4)
388 			return (EINVAL);
389 		__nfs_sc_clts[0].sc_versmin = versmin;
390 		__nfs_sc_clts[0].sc_versmax = versmax;
391 		__nfs_sc_clts[1].sc_versmin = versmin;
392 		__nfs_sc_clts[1].sc_versmax = versmax;
393 		*sctpp = &nfs_sct_clts;
394 		break;
395 	case T_COTS:
396 	case T_COTS_ORD:
397 		__nfs_sc_cots[0].sc_versmin = versmin;
398 		__nfs_sc_cots[0].sc_versmax = versmax;
399 		/* For the NFS_ACL program, check the max version */
400 		if (versmax > NFS_ACL_VERSMAX)
401 			versmax = NFS_ACL_VERSMAX;
402 		__nfs_sc_cots[1].sc_versmin = versmin;
403 		__nfs_sc_cots[1].sc_versmax = versmax;
404 		*sctpp = &nfs_sct_cots;
405 		break;
406 	default:
407 		error = EINVAL;
408 	}
409 
410 	return (error);
411 }
412 
413 /*
414  * NFS Server system call.
415  * Does all of the work of running a NFS server.
416  * uap->fd is the fd of an open transport provider
417  */
418 int
419 nfs_svc(struct nfs_svc_args *arg, model_t model)
420 {
421 	file_t *fp;
422 	SVCMASTERXPRT *xprt;
423 	int error;
424 	int readsize;
425 	char buf[KNC_STRSIZE];
426 	size_t len;
427 	STRUCT_HANDLE(nfs_svc_args, uap);
428 	struct netbuf addrmask;
429 	SVC_CALLOUT_TABLE *sctp = NULL;
430 
431 #ifdef lint
432 	model = model;		/* STRUCT macros don't always refer to it */
433 #endif
434 
435 	STRUCT_SET_HANDLE(uap, model, arg);
436 
437 	/* Check privileges in nfssys() */
438 
439 	if ((fp = getf(STRUCT_FGET(uap, fd))) == NULL)
440 		return (EBADF);
441 
442 	/*
443 	 * Set read buffer size to rsize
444 	 * and add room for RPC headers.
445 	 */
446 	readsize = nfs3tsize() + (RPC_MAXDATASIZE - NFS_MAXDATA);
447 	if (readsize < RPC_MAXDATASIZE)
448 		readsize = RPC_MAXDATASIZE;
449 
450 	error = copyinstr((const char *)STRUCT_FGETP(uap, netid), buf,
451 	    KNC_STRSIZE, &len);
452 	if (error) {
453 		releasef(STRUCT_FGET(uap, fd));
454 		return (error);
455 	}
456 
457 	addrmask.len = STRUCT_FGET(uap, addrmask.len);
458 	addrmask.maxlen = STRUCT_FGET(uap, addrmask.maxlen);
459 	addrmask.buf = kmem_alloc(addrmask.maxlen, KM_SLEEP);
460 	error = copyin(STRUCT_FGETP(uap, addrmask.buf), addrmask.buf,
461 	    addrmask.len);
462 	if (error) {
463 		releasef(STRUCT_FGET(uap, fd));
464 		kmem_free(addrmask.buf, addrmask.maxlen);
465 		return (error);
466 	}
467 
468 	nfs_versmin = STRUCT_FGET(uap, versmin);
469 	nfs_versmax = STRUCT_FGET(uap, versmax);
470 
471 	/* Double check the vers min/max ranges */
472 	if ((nfs_versmin > nfs_versmax) ||
473 	    (nfs_versmin < NFS_VERSMIN) ||
474 	    (nfs_versmax > NFS_VERSMAX)) {
475 		nfs_versmin = NFS_VERSMIN_DEFAULT;
476 		nfs_versmax = NFS_VERSMAX_DEFAULT;
477 	}
478 
479 	if (error =
480 	    nfs_srv_set_sc_versions(fp, &sctp, nfs_versmin, nfs_versmax)) {
481 		releasef(STRUCT_FGET(uap, fd));
482 		kmem_free(addrmask.buf, addrmask.maxlen);
483 		return (error);
484 	}
485 
486 	/* Initialize nfsv4 server */
487 	if (nfs_versmax == (rpcvers_t)NFS_V4)
488 		rfs4_server_start(STRUCT_FGET(uap, delegation));
489 
490 	/* Create a transport handle. */
491 	error = svc_tli_kcreate(fp, readsize, buf, &addrmask, &xprt,
492 	    sctp, NULL, NFS_SVCPOOL_ID, TRUE);
493 
494 	if (error)
495 		kmem_free(addrmask.buf, addrmask.maxlen);
496 
497 	releasef(STRUCT_FGET(uap, fd));
498 
499 	/* HA-NFSv4: save the cluster nodeid */
500 	if (cluster_bootflags & CLUSTER_BOOTED)
501 		lm_global_nlmid = clconf_get_nodeid();
502 
503 	return (error);
504 }
505 
506 static void
507 rfs4_server_start(int nfs4_srv_delegation)
508 {
509 	/*
510 	 * Determine if the server has previously been "started" and
511 	 * if not, do the per instance initialization
512 	 */
513 	mutex_enter(&nfs_server_upordown_lock);
514 
515 	if (nfs_server_upordown != NFS_SERVER_RUNNING) {
516 		/* Do we need to stop and wait on the previous server? */
517 		while (nfs_server_upordown == NFS_SERVER_STOPPING ||
518 		    nfs_server_upordown == NFS_SERVER_OFFLINE)
519 			cv_wait(&nfs_server_upordown_cv,
520 			    &nfs_server_upordown_lock);
521 
522 		if (nfs_server_upordown != NFS_SERVER_RUNNING) {
523 			(void) svc_pool_control(NFS_SVCPOOL_ID,
524 			    SVCPSET_UNREGISTER_PROC, (void *)&nfs_srv_offline);
525 			(void) svc_pool_control(NFS_SVCPOOL_ID,
526 			    SVCPSET_SHUTDOWN_PROC, (void *)&nfs_srv_stop_all);
527 
528 			/* is this an nfsd warm start? */
529 			if (nfs_server_upordown == NFS_SERVER_QUIESCED) {
530 				cmn_err(CE_NOTE, "nfs_server: "
531 				    "server was previously quiesced; "
532 				    "existing NFSv4 state will be re-used");
533 
534 				/*
535 				 * HA-NFSv4: this is also the signal
536 				 * that a Resource Group failover has
537 				 * occurred.
538 				 */
539 				if (cluster_bootflags & CLUSTER_BOOTED)
540 					hanfsv4_failover();
541 			} else {
542 				/* cold start */
543 				rfs4_state_init();
544 				nfs4_drc = rfs4_init_drc(nfs4_drc_max,
545 				    nfs4_drc_hash);
546 			}
547 
548 			/*
549 			 * Check to see if delegation is to be
550 			 * enabled at the server
551 			 */
552 			if (nfs4_srv_delegation != FALSE)
553 				rfs4_set_deleg_policy(SRV_NORMAL_DELEGATE);
554 
555 			nfs_server_upordown = NFS_SERVER_RUNNING;
556 		}
557 		cv_signal(&nfs_server_upordown_cv);
558 	}
559 	mutex_exit(&nfs_server_upordown_lock);
560 }
561 
562 /*
563  * If RDMA device available,
564  * start RDMA listener.
565  */
566 int
567 rdma_start(struct rdma_svc_args *rsa)
568 {
569 	int error;
570 	rdma_xprt_group_t started_rdma_xprts;
571 	rdma_stat stat;
572 	int svc_state = 0;
573 
574 	/* Double check the vers min/max ranges */
575 	if ((rsa->nfs_versmin > rsa->nfs_versmax) ||
576 	    (rsa->nfs_versmin < NFS_VERSMIN) ||
577 	    (rsa->nfs_versmax > NFS_VERSMAX)) {
578 		rsa->nfs_versmin = NFS_VERSMIN_DEFAULT;
579 		rsa->nfs_versmax = NFS_VERSMAX_DEFAULT;
580 	}
581 	nfs_versmin = rsa->nfs_versmin;
582 	nfs_versmax = rsa->nfs_versmax;
583 
584 	/* Set the versions in the callout table */
585 	__nfs_sc_rdma[0].sc_versmin = rsa->nfs_versmin;
586 	__nfs_sc_rdma[0].sc_versmax = rsa->nfs_versmax;
587 	/* For the NFS_ACL program, check the max version */
588 	__nfs_sc_rdma[1].sc_versmin = rsa->nfs_versmin;
589 	if (rsa->nfs_versmax > NFS_ACL_VERSMAX)
590 		__nfs_sc_rdma[1].sc_versmax = NFS_ACL_VERSMAX;
591 	else
592 		__nfs_sc_rdma[1].sc_versmax = rsa->nfs_versmax;
593 
594 	/* Initialize nfsv4 server */
595 	if (rsa->nfs_versmax == (rpcvers_t)NFS_V4)
596 		rfs4_server_start(rsa->delegation);
597 
598 	started_rdma_xprts.rtg_count = 0;
599 	started_rdma_xprts.rtg_listhead = NULL;
600 	started_rdma_xprts.rtg_poolid = rsa->poolid;
601 
602 restart:
603 	error = svc_rdma_kcreate(rsa->netid, &nfs_sct_rdma, rsa->poolid,
604 	    &started_rdma_xprts);
605 
606 	svc_state = !error;
607 
608 	while (!error) {
609 
610 		/*
611 		 * wait till either interrupted by a signal on
612 		 * nfs service stop/restart or signalled by a
613 		 * rdma plugin attach/detatch.
614 		 */
615 
616 		stat = rdma_kwait();
617 
618 		/*
619 		 * stop services if running -- either on a HCA detach event
620 		 * or if the nfs service is stopped/restarted.
621 		 */
622 
623 		if ((stat == RDMA_HCA_DETACH || stat == RDMA_INTR) &&
624 		    svc_state) {
625 			rdma_stop(&started_rdma_xprts);
626 			svc_state = 0;
627 		}
628 
629 		/*
630 		 * nfs service stop/restart, break out of the
631 		 * wait loop and return;
632 		 */
633 		if (stat == RDMA_INTR)
634 			return (0);
635 
636 		/*
637 		 * restart stopped services on a HCA attach event
638 		 * (if not already running)
639 		 */
640 
641 		if ((stat == RDMA_HCA_ATTACH) && (svc_state == 0))
642 			goto restart;
643 
644 		/*
645 		 * loop until a nfs service stop/restart
646 		 */
647 	}
648 
649 	return (error);
650 }
651 
652 /* ARGSUSED */
653 void
654 rpc_null(caddr_t *argp, caddr_t *resp, struct exportinfo *exi,
655     struct svc_req *req, cred_t *cr, bool_t ro)
656 {
657 }
658 
659 /* ARGSUSED */
660 void
661 rpc_null_v3(caddr_t *argp, caddr_t *resp, struct exportinfo *exi,
662     struct svc_req *req, cred_t *cr, bool_t ro)
663 {
664 	DTRACE_NFSV3_3(op__null__start, struct svc_req *, req,
665 	    cred_t *, cr, vnode_t *, NULL);
666 	DTRACE_NFSV3_3(op__null__done, struct svc_req *, req,
667 	    cred_t *, cr, vnode_t *, NULL);
668 }
669 
670 /* ARGSUSED */
671 static void
672 rfs_error(caddr_t *argp, caddr_t *resp, struct exportinfo *exi,
673     struct svc_req *req, cred_t *cr, bool_t ro)
674 {
675 	/* return (EOPNOTSUPP); */
676 }
677 
678 static void
679 nullfree(void)
680 {
681 }
682 
683 static char *rfscallnames_v2[] = {
684 	"RFS2_NULL",
685 	"RFS2_GETATTR",
686 	"RFS2_SETATTR",
687 	"RFS2_ROOT",
688 	"RFS2_LOOKUP",
689 	"RFS2_READLINK",
690 	"RFS2_READ",
691 	"RFS2_WRITECACHE",
692 	"RFS2_WRITE",
693 	"RFS2_CREATE",
694 	"RFS2_REMOVE",
695 	"RFS2_RENAME",
696 	"RFS2_LINK",
697 	"RFS2_SYMLINK",
698 	"RFS2_MKDIR",
699 	"RFS2_RMDIR",
700 	"RFS2_READDIR",
701 	"RFS2_STATFS"
702 };
703 
704 static struct rpcdisp rfsdisptab_v2[] = {
705 	/*
706 	 * NFS VERSION 2
707 	 */
708 
709 	/* RFS_NULL = 0 */
710 	{rpc_null,
711 	    xdr_void, NULL_xdrproc_t, 0,
712 	    xdr_void, NULL_xdrproc_t, 0,
713 	    nullfree, RPC_IDEMPOTENT,
714 	    0},
715 
716 	/* RFS_GETATTR = 1 */
717 	{rfs_getattr,
718 	    xdr_fhandle, xdr_fastfhandle, sizeof (fhandle_t),
719 	    xdr_attrstat, xdr_fastattrstat, sizeof (struct nfsattrstat),
720 	    nullfree, RPC_IDEMPOTENT|RPC_ALLOWANON|RPC_MAPRESP,
721 	    rfs_getattr_getfh},
722 
723 	/* RFS_SETATTR = 2 */
724 	{rfs_setattr,
725 	    xdr_saargs, NULL_xdrproc_t, sizeof (struct nfssaargs),
726 	    xdr_attrstat, xdr_fastattrstat, sizeof (struct nfsattrstat),
727 	    nullfree, RPC_MAPRESP,
728 	    rfs_setattr_getfh},
729 
730 	/* RFS_ROOT = 3 *** NO LONGER SUPPORTED *** */
731 	{rfs_error,
732 	    xdr_void, NULL_xdrproc_t, 0,
733 	    xdr_void, NULL_xdrproc_t, 0,
734 	    nullfree, RPC_IDEMPOTENT,
735 	    0},
736 
737 	/* RFS_LOOKUP = 4 */
738 	{rfs_lookup,
739 	    xdr_diropargs, NULL_xdrproc_t, sizeof (struct nfsdiropargs),
740 	    xdr_diropres, xdr_fastdiropres, sizeof (struct nfsdiropres),
741 	    nullfree, RPC_IDEMPOTENT|RPC_MAPRESP|RPC_PUBLICFH_OK,
742 	    rfs_lookup_getfh},
743 
744 	/* RFS_READLINK = 5 */
745 	{rfs_readlink,
746 	    xdr_fhandle, xdr_fastfhandle, sizeof (fhandle_t),
747 	    xdr_rdlnres, NULL_xdrproc_t, sizeof (struct nfsrdlnres),
748 	    rfs_rlfree, RPC_IDEMPOTENT,
749 	    rfs_readlink_getfh},
750 
751 	/* RFS_READ = 6 */
752 	{rfs_read,
753 	    xdr_readargs, NULL_xdrproc_t, sizeof (struct nfsreadargs),
754 	    xdr_rdresult, NULL_xdrproc_t, sizeof (struct nfsrdresult),
755 	    rfs_rdfree, RPC_IDEMPOTENT,
756 	    rfs_read_getfh},
757 
758 	/* RFS_WRITECACHE = 7 *** NO LONGER SUPPORTED *** */
759 	{rfs_error,
760 	    xdr_void, NULL_xdrproc_t, 0,
761 	    xdr_void, NULL_xdrproc_t, 0,
762 	    nullfree, RPC_IDEMPOTENT,
763 	    0},
764 
765 	/* RFS_WRITE = 8 */
766 	{rfs_write,
767 	    xdr_writeargs, NULL_xdrproc_t, sizeof (struct nfswriteargs),
768 	    xdr_attrstat, xdr_fastattrstat, sizeof (struct nfsattrstat),
769 	    nullfree, RPC_MAPRESP,
770 	    rfs_write_getfh},
771 
772 	/* RFS_CREATE = 9 */
773 	{rfs_create,
774 	    xdr_creatargs, NULL_xdrproc_t, sizeof (struct nfscreatargs),
775 	    xdr_diropres, xdr_fastdiropres, sizeof (struct nfsdiropres),
776 	    nullfree, RPC_MAPRESP,
777 	    rfs_create_getfh},
778 
779 	/* RFS_REMOVE = 10 */
780 	{rfs_remove,
781 	    xdr_diropargs, NULL_xdrproc_t, sizeof (struct nfsdiropargs),
782 #ifdef _LITTLE_ENDIAN
783 	    xdr_enum, xdr_fastenum, sizeof (enum nfsstat),
784 #else
785 	    xdr_enum, NULL_xdrproc_t, sizeof (enum nfsstat),
786 #endif
787 	    nullfree, RPC_MAPRESP,
788 	    rfs_remove_getfh},
789 
790 	/* RFS_RENAME = 11 */
791 	{rfs_rename,
792 	    xdr_rnmargs, NULL_xdrproc_t, sizeof (struct nfsrnmargs),
793 #ifdef _LITTLE_ENDIAN
794 	    xdr_enum, xdr_fastenum, sizeof (enum nfsstat),
795 #else
796 	    xdr_enum, NULL_xdrproc_t, sizeof (enum nfsstat),
797 #endif
798 	    nullfree, RPC_MAPRESP,
799 	    rfs_rename_getfh},
800 
801 	/* RFS_LINK = 12 */
802 	{rfs_link,
803 	    xdr_linkargs, NULL_xdrproc_t, sizeof (struct nfslinkargs),
804 #ifdef _LITTLE_ENDIAN
805 	    xdr_enum, xdr_fastenum, sizeof (enum nfsstat),
806 #else
807 	    xdr_enum, NULL_xdrproc_t, sizeof (enum nfsstat),
808 #endif
809 	    nullfree, RPC_MAPRESP,
810 	    rfs_link_getfh},
811 
812 	/* RFS_SYMLINK = 13 */
813 	{rfs_symlink,
814 	    xdr_slargs, NULL_xdrproc_t, sizeof (struct nfsslargs),
815 #ifdef _LITTLE_ENDIAN
816 	    xdr_enum, xdr_fastenum, sizeof (enum nfsstat),
817 #else
818 	    xdr_enum, NULL_xdrproc_t, sizeof (enum nfsstat),
819 #endif
820 	    nullfree, RPC_MAPRESP,
821 	    rfs_symlink_getfh},
822 
823 	/* RFS_MKDIR = 14 */
824 	{rfs_mkdir,
825 	    xdr_creatargs, NULL_xdrproc_t, sizeof (struct nfscreatargs),
826 	    xdr_diropres, xdr_fastdiropres, sizeof (struct nfsdiropres),
827 	    nullfree, RPC_MAPRESP,
828 	    rfs_mkdir_getfh},
829 
830 	/* RFS_RMDIR = 15 */
831 	{rfs_rmdir,
832 	    xdr_diropargs, NULL_xdrproc_t, sizeof (struct nfsdiropargs),
833 #ifdef _LITTLE_ENDIAN
834 	    xdr_enum, xdr_fastenum, sizeof (enum nfsstat),
835 #else
836 	    xdr_enum, NULL_xdrproc_t, sizeof (enum nfsstat),
837 #endif
838 	    nullfree, RPC_MAPRESP,
839 	    rfs_rmdir_getfh},
840 
841 	/* RFS_READDIR = 16 */
842 	{rfs_readdir,
843 	    xdr_rddirargs, NULL_xdrproc_t, sizeof (struct nfsrddirargs),
844 	    xdr_putrddirres, NULL_xdrproc_t, sizeof (struct nfsrddirres),
845 	    rfs_rddirfree, RPC_IDEMPOTENT,
846 	    rfs_readdir_getfh},
847 
848 	/* RFS_STATFS = 17 */
849 	{rfs_statfs,
850 	    xdr_fhandle, xdr_fastfhandle, sizeof (fhandle_t),
851 	    xdr_statfs, xdr_faststatfs, sizeof (struct nfsstatfs),
852 	    nullfree, RPC_IDEMPOTENT|RPC_ALLOWANON|RPC_MAPRESP,
853 	    rfs_statfs_getfh},
854 };
855 
856 static char *rfscallnames_v3[] = {
857 	"RFS3_NULL",
858 	"RFS3_GETATTR",
859 	"RFS3_SETATTR",
860 	"RFS3_LOOKUP",
861 	"RFS3_ACCESS",
862 	"RFS3_READLINK",
863 	"RFS3_READ",
864 	"RFS3_WRITE",
865 	"RFS3_CREATE",
866 	"RFS3_MKDIR",
867 	"RFS3_SYMLINK",
868 	"RFS3_MKNOD",
869 	"RFS3_REMOVE",
870 	"RFS3_RMDIR",
871 	"RFS3_RENAME",
872 	"RFS3_LINK",
873 	"RFS3_READDIR",
874 	"RFS3_READDIRPLUS",
875 	"RFS3_FSSTAT",
876 	"RFS3_FSINFO",
877 	"RFS3_PATHCONF",
878 	"RFS3_COMMIT"
879 };
880 
881 static struct rpcdisp rfsdisptab_v3[] = {
882 	/*
883 	 * NFS VERSION 3
884 	 */
885 
886 	/* RFS_NULL = 0 */
887 	{rpc_null_v3,
888 	    xdr_void, NULL_xdrproc_t, 0,
889 	    xdr_void, NULL_xdrproc_t, 0,
890 	    nullfree, RPC_IDEMPOTENT,
891 	    0},
892 
893 	/* RFS3_GETATTR = 1 */
894 	{rfs3_getattr,
895 	    xdr_nfs_fh3_server, NULL_xdrproc_t, sizeof (GETATTR3args),
896 	    xdr_GETATTR3res, NULL_xdrproc_t, sizeof (GETATTR3res),
897 	    nullfree, (RPC_IDEMPOTENT | RPC_ALLOWANON),
898 	    rfs3_getattr_getfh},
899 
900 	/* RFS3_SETATTR = 2 */
901 	{rfs3_setattr,
902 	    xdr_SETATTR3args, NULL_xdrproc_t, sizeof (SETATTR3args),
903 	    xdr_SETATTR3res, NULL_xdrproc_t, sizeof (SETATTR3res),
904 	    nullfree, 0,
905 	    rfs3_setattr_getfh},
906 
907 	/* RFS3_LOOKUP = 3 */
908 	{rfs3_lookup,
909 	    xdr_diropargs3, NULL_xdrproc_t, sizeof (LOOKUP3args),
910 	    xdr_LOOKUP3res, NULL_xdrproc_t, sizeof (LOOKUP3res),
911 	    nullfree, (RPC_IDEMPOTENT | RPC_PUBLICFH_OK),
912 	    rfs3_lookup_getfh},
913 
914 	/* RFS3_ACCESS = 4 */
915 	{rfs3_access,
916 	    xdr_ACCESS3args, NULL_xdrproc_t, sizeof (ACCESS3args),
917 	    xdr_ACCESS3res, NULL_xdrproc_t, sizeof (ACCESS3res),
918 	    nullfree, RPC_IDEMPOTENT,
919 	    rfs3_access_getfh},
920 
921 	/* RFS3_READLINK = 5 */
922 	{rfs3_readlink,
923 	    xdr_nfs_fh3_server, NULL_xdrproc_t, sizeof (READLINK3args),
924 	    xdr_READLINK3res, NULL_xdrproc_t, sizeof (READLINK3res),
925 	    rfs3_readlink_free, RPC_IDEMPOTENT,
926 	    rfs3_readlink_getfh},
927 
928 	/* RFS3_READ = 6 */
929 	{rfs3_read,
930 	    xdr_READ3args, NULL_xdrproc_t, sizeof (READ3args),
931 	    xdr_READ3res, NULL_xdrproc_t, sizeof (READ3res),
932 	    rfs3_read_free, RPC_IDEMPOTENT,
933 	    rfs3_read_getfh},
934 
935 	/* RFS3_WRITE = 7 */
936 	{rfs3_write,
937 	    xdr_WRITE3args, NULL_xdrproc_t, sizeof (WRITE3args),
938 	    xdr_WRITE3res, NULL_xdrproc_t, sizeof (WRITE3res),
939 	    nullfree, 0,
940 	    rfs3_write_getfh},
941 
942 	/* RFS3_CREATE = 8 */
943 	{rfs3_create,
944 	    xdr_CREATE3args, NULL_xdrproc_t, sizeof (CREATE3args),
945 	    xdr_CREATE3res, NULL_xdrproc_t, sizeof (CREATE3res),
946 	    nullfree, 0,
947 	    rfs3_create_getfh},
948 
949 	/* RFS3_MKDIR = 9 */
950 	{rfs3_mkdir,
951 	    xdr_MKDIR3args, NULL_xdrproc_t, sizeof (MKDIR3args),
952 	    xdr_MKDIR3res, NULL_xdrproc_t, sizeof (MKDIR3res),
953 	    nullfree, 0,
954 	    rfs3_mkdir_getfh},
955 
956 	/* RFS3_SYMLINK = 10 */
957 	{rfs3_symlink,
958 	    xdr_SYMLINK3args, NULL_xdrproc_t, sizeof (SYMLINK3args),
959 	    xdr_SYMLINK3res, NULL_xdrproc_t, sizeof (SYMLINK3res),
960 	    nullfree, 0,
961 	    rfs3_symlink_getfh},
962 
963 	/* RFS3_MKNOD = 11 */
964 	{rfs3_mknod,
965 	    xdr_MKNOD3args, NULL_xdrproc_t, sizeof (MKNOD3args),
966 	    xdr_MKNOD3res, NULL_xdrproc_t, sizeof (MKNOD3res),
967 	    nullfree, 0,
968 	    rfs3_mknod_getfh},
969 
970 	/* RFS3_REMOVE = 12 */
971 	{rfs3_remove,
972 	    xdr_diropargs3, NULL_xdrproc_t, sizeof (REMOVE3args),
973 	    xdr_REMOVE3res, NULL_xdrproc_t, sizeof (REMOVE3res),
974 	    nullfree, 0,
975 	    rfs3_remove_getfh},
976 
977 	/* RFS3_RMDIR = 13 */
978 	{rfs3_rmdir,
979 	    xdr_diropargs3, NULL_xdrproc_t, sizeof (RMDIR3args),
980 	    xdr_RMDIR3res, NULL_xdrproc_t, sizeof (RMDIR3res),
981 	    nullfree, 0,
982 	    rfs3_rmdir_getfh},
983 
984 	/* RFS3_RENAME = 14 */
985 	{rfs3_rename,
986 	    xdr_RENAME3args, NULL_xdrproc_t, sizeof (RENAME3args),
987 	    xdr_RENAME3res, NULL_xdrproc_t, sizeof (RENAME3res),
988 	    nullfree, 0,
989 	    rfs3_rename_getfh},
990 
991 	/* RFS3_LINK = 15 */
992 	{rfs3_link,
993 	    xdr_LINK3args, NULL_xdrproc_t, sizeof (LINK3args),
994 	    xdr_LINK3res, NULL_xdrproc_t, sizeof (LINK3res),
995 	    nullfree, 0,
996 	    rfs3_link_getfh},
997 
998 	/* RFS3_READDIR = 16 */
999 	{rfs3_readdir,
1000 	    xdr_READDIR3args, NULL_xdrproc_t, sizeof (READDIR3args),
1001 	    xdr_READDIR3res, NULL_xdrproc_t, sizeof (READDIR3res),
1002 	    rfs3_readdir_free, RPC_IDEMPOTENT,
1003 	    rfs3_readdir_getfh},
1004 
1005 	/* RFS3_READDIRPLUS = 17 */
1006 	{rfs3_readdirplus,
1007 	    xdr_READDIRPLUS3args, NULL_xdrproc_t, sizeof (READDIRPLUS3args),
1008 	    xdr_READDIRPLUS3res, NULL_xdrproc_t, sizeof (READDIRPLUS3res),
1009 	    rfs3_readdirplus_free, RPC_AVOIDWORK,
1010 	    rfs3_readdirplus_getfh},
1011 
1012 	/* RFS3_FSSTAT = 18 */
1013 	{rfs3_fsstat,
1014 	    xdr_nfs_fh3_server, NULL_xdrproc_t, sizeof (FSSTAT3args),
1015 	    xdr_FSSTAT3res, NULL_xdrproc_t, sizeof (FSSTAT3res),
1016 	    nullfree, RPC_IDEMPOTENT,
1017 	    rfs3_fsstat_getfh},
1018 
1019 	/* RFS3_FSINFO = 19 */
1020 	{rfs3_fsinfo,
1021 	    xdr_nfs_fh3_server, NULL_xdrproc_t, sizeof (FSINFO3args),
1022 	    xdr_FSINFO3res, NULL_xdrproc_t, sizeof (FSINFO3res),
1023 	    nullfree, RPC_IDEMPOTENT|RPC_ALLOWANON,
1024 	    rfs3_fsinfo_getfh},
1025 
1026 	/* RFS3_PATHCONF = 20 */
1027 	{rfs3_pathconf,
1028 	    xdr_nfs_fh3_server, NULL_xdrproc_t, sizeof (PATHCONF3args),
1029 	    xdr_PATHCONF3res, NULL_xdrproc_t, sizeof (PATHCONF3res),
1030 	    nullfree, RPC_IDEMPOTENT,
1031 	    rfs3_pathconf_getfh},
1032 
1033 	/* RFS3_COMMIT = 21 */
1034 	{rfs3_commit,
1035 	    xdr_COMMIT3args, NULL_xdrproc_t, sizeof (COMMIT3args),
1036 	    xdr_COMMIT3res, NULL_xdrproc_t, sizeof (COMMIT3res),
1037 	    nullfree, RPC_IDEMPOTENT,
1038 	    rfs3_commit_getfh},
1039 };
1040 
1041 static char *rfscallnames_v4[] = {
1042 	"RFS4_NULL",
1043 	"RFS4_COMPOUND",
1044 	"RFS4_NULL",
1045 	"RFS4_NULL",
1046 	"RFS4_NULL",
1047 	"RFS4_NULL",
1048 	"RFS4_NULL",
1049 	"RFS4_NULL",
1050 	"RFS4_CREATE"
1051 };
1052 
1053 static struct rpcdisp rfsdisptab_v4[] = {
1054 	/*
1055 	 * NFS VERSION 4
1056 	 */
1057 
1058 	/* RFS_NULL = 0 */
1059 	{rpc_null,
1060 	    xdr_void, NULL_xdrproc_t, 0,
1061 	    xdr_void, NULL_xdrproc_t, 0,
1062 	    nullfree, RPC_IDEMPOTENT, 0},
1063 
1064 	/* RFS4_compound = 1 */
1065 	{rfs4_compound,
1066 	    xdr_COMPOUND4args_srv, NULL_xdrproc_t, sizeof (COMPOUND4args),
1067 	    xdr_COMPOUND4res_srv, NULL_xdrproc_t, sizeof (COMPOUND4res),
1068 	    rfs4_compound_free, 0, 0},
1069 };
1070 
1071 union rfs_args {
1072 	/*
1073 	 * NFS VERSION 2
1074 	 */
1075 
1076 	/* RFS_NULL = 0 */
1077 
1078 	/* RFS_GETATTR = 1 */
1079 	fhandle_t nfs2_getattr_args;
1080 
1081 	/* RFS_SETATTR = 2 */
1082 	struct nfssaargs nfs2_setattr_args;
1083 
1084 	/* RFS_ROOT = 3 *** NO LONGER SUPPORTED *** */
1085 
1086 	/* RFS_LOOKUP = 4 */
1087 	struct nfsdiropargs nfs2_lookup_args;
1088 
1089 	/* RFS_READLINK = 5 */
1090 	fhandle_t nfs2_readlink_args;
1091 
1092 	/* RFS_READ = 6 */
1093 	struct nfsreadargs nfs2_read_args;
1094 
1095 	/* RFS_WRITECACHE = 7 *** NO LONGER SUPPORTED *** */
1096 
1097 	/* RFS_WRITE = 8 */
1098 	struct nfswriteargs nfs2_write_args;
1099 
1100 	/* RFS_CREATE = 9 */
1101 	struct nfscreatargs nfs2_create_args;
1102 
1103 	/* RFS_REMOVE = 10 */
1104 	struct nfsdiropargs nfs2_remove_args;
1105 
1106 	/* RFS_RENAME = 11 */
1107 	struct nfsrnmargs nfs2_rename_args;
1108 
1109 	/* RFS_LINK = 12 */
1110 	struct nfslinkargs nfs2_link_args;
1111 
1112 	/* RFS_SYMLINK = 13 */
1113 	struct nfsslargs nfs2_symlink_args;
1114 
1115 	/* RFS_MKDIR = 14 */
1116 	struct nfscreatargs nfs2_mkdir_args;
1117 
1118 	/* RFS_RMDIR = 15 */
1119 	struct nfsdiropargs nfs2_rmdir_args;
1120 
1121 	/* RFS_READDIR = 16 */
1122 	struct nfsrddirargs nfs2_readdir_args;
1123 
1124 	/* RFS_STATFS = 17 */
1125 	fhandle_t nfs2_statfs_args;
1126 
1127 	/*
1128 	 * NFS VERSION 3
1129 	 */
1130 
1131 	/* RFS_NULL = 0 */
1132 
1133 	/* RFS3_GETATTR = 1 */
1134 	GETATTR3args nfs3_getattr_args;
1135 
1136 	/* RFS3_SETATTR = 2 */
1137 	SETATTR3args nfs3_setattr_args;
1138 
1139 	/* RFS3_LOOKUP = 3 */
1140 	LOOKUP3args nfs3_lookup_args;
1141 
1142 	/* RFS3_ACCESS = 4 */
1143 	ACCESS3args nfs3_access_args;
1144 
1145 	/* RFS3_READLINK = 5 */
1146 	READLINK3args nfs3_readlink_args;
1147 
1148 	/* RFS3_READ = 6 */
1149 	READ3args nfs3_read_args;
1150 
1151 	/* RFS3_WRITE = 7 */
1152 	WRITE3args nfs3_write_args;
1153 
1154 	/* RFS3_CREATE = 8 */
1155 	CREATE3args nfs3_create_args;
1156 
1157 	/* RFS3_MKDIR = 9 */
1158 	MKDIR3args nfs3_mkdir_args;
1159 
1160 	/* RFS3_SYMLINK = 10 */
1161 	SYMLINK3args nfs3_symlink_args;
1162 
1163 	/* RFS3_MKNOD = 11 */
1164 	MKNOD3args nfs3_mknod_args;
1165 
1166 	/* RFS3_REMOVE = 12 */
1167 	REMOVE3args nfs3_remove_args;
1168 
1169 	/* RFS3_RMDIR = 13 */
1170 	RMDIR3args nfs3_rmdir_args;
1171 
1172 	/* RFS3_RENAME = 14 */
1173 	RENAME3args nfs3_rename_args;
1174 
1175 	/* RFS3_LINK = 15 */
1176 	LINK3args nfs3_link_args;
1177 
1178 	/* RFS3_READDIR = 16 */
1179 	READDIR3args nfs3_readdir_args;
1180 
1181 	/* RFS3_READDIRPLUS = 17 */
1182 	READDIRPLUS3args nfs3_readdirplus_args;
1183 
1184 	/* RFS3_FSSTAT = 18 */
1185 	FSSTAT3args nfs3_fsstat_args;
1186 
1187 	/* RFS3_FSINFO = 19 */
1188 	FSINFO3args nfs3_fsinfo_args;
1189 
1190 	/* RFS3_PATHCONF = 20 */
1191 	PATHCONF3args nfs3_pathconf_args;
1192 
1193 	/* RFS3_COMMIT = 21 */
1194 	COMMIT3args nfs3_commit_args;
1195 
1196 	/*
1197 	 * NFS VERSION 4
1198 	 */
1199 
1200 	/* RFS_NULL = 0 */
1201 
1202 	/* COMPUND = 1 */
1203 	COMPOUND4args nfs4_compound_args;
1204 };
1205 
1206 union rfs_res {
1207 	/*
1208 	 * NFS VERSION 2
1209 	 */
1210 
1211 	/* RFS_NULL = 0 */
1212 
1213 	/* RFS_GETATTR = 1 */
1214 	struct nfsattrstat nfs2_getattr_res;
1215 
1216 	/* RFS_SETATTR = 2 */
1217 	struct nfsattrstat nfs2_setattr_res;
1218 
1219 	/* RFS_ROOT = 3 *** NO LONGER SUPPORTED *** */
1220 
1221 	/* RFS_LOOKUP = 4 */
1222 	struct nfsdiropres nfs2_lookup_res;
1223 
1224 	/* RFS_READLINK = 5 */
1225 	struct nfsrdlnres nfs2_readlink_res;
1226 
1227 	/* RFS_READ = 6 */
1228 	struct nfsrdresult nfs2_read_res;
1229 
1230 	/* RFS_WRITECACHE = 7 *** NO LONGER SUPPORTED *** */
1231 
1232 	/* RFS_WRITE = 8 */
1233 	struct nfsattrstat nfs2_write_res;
1234 
1235 	/* RFS_CREATE = 9 */
1236 	struct nfsdiropres nfs2_create_res;
1237 
1238 	/* RFS_REMOVE = 10 */
1239 	enum nfsstat nfs2_remove_res;
1240 
1241 	/* RFS_RENAME = 11 */
1242 	enum nfsstat nfs2_rename_res;
1243 
1244 	/* RFS_LINK = 12 */
1245 	enum nfsstat nfs2_link_res;
1246 
1247 	/* RFS_SYMLINK = 13 */
1248 	enum nfsstat nfs2_symlink_res;
1249 
1250 	/* RFS_MKDIR = 14 */
1251 	struct nfsdiropres nfs2_mkdir_res;
1252 
1253 	/* RFS_RMDIR = 15 */
1254 	enum nfsstat nfs2_rmdir_res;
1255 
1256 	/* RFS_READDIR = 16 */
1257 	struct nfsrddirres nfs2_readdir_res;
1258 
1259 	/* RFS_STATFS = 17 */
1260 	struct nfsstatfs nfs2_statfs_res;
1261 
1262 	/*
1263 	 * NFS VERSION 3
1264 	 */
1265 
1266 	/* RFS_NULL = 0 */
1267 
1268 	/* RFS3_GETATTR = 1 */
1269 	GETATTR3res nfs3_getattr_res;
1270 
1271 	/* RFS3_SETATTR = 2 */
1272 	SETATTR3res nfs3_setattr_res;
1273 
1274 	/* RFS3_LOOKUP = 3 */
1275 	LOOKUP3res nfs3_lookup_res;
1276 
1277 	/* RFS3_ACCESS = 4 */
1278 	ACCESS3res nfs3_access_res;
1279 
1280 	/* RFS3_READLINK = 5 */
1281 	READLINK3res nfs3_readlink_res;
1282 
1283 	/* RFS3_READ = 6 */
1284 	READ3res nfs3_read_res;
1285 
1286 	/* RFS3_WRITE = 7 */
1287 	WRITE3res nfs3_write_res;
1288 
1289 	/* RFS3_CREATE = 8 */
1290 	CREATE3res nfs3_create_res;
1291 
1292 	/* RFS3_MKDIR = 9 */
1293 	MKDIR3res nfs3_mkdir_res;
1294 
1295 	/* RFS3_SYMLINK = 10 */
1296 	SYMLINK3res nfs3_symlink_res;
1297 
1298 	/* RFS3_MKNOD = 11 */
1299 	MKNOD3res nfs3_mknod_res;
1300 
1301 	/* RFS3_REMOVE = 12 */
1302 	REMOVE3res nfs3_remove_res;
1303 
1304 	/* RFS3_RMDIR = 13 */
1305 	RMDIR3res nfs3_rmdir_res;
1306 
1307 	/* RFS3_RENAME = 14 */
1308 	RENAME3res nfs3_rename_res;
1309 
1310 	/* RFS3_LINK = 15 */
1311 	LINK3res nfs3_link_res;
1312 
1313 	/* RFS3_READDIR = 16 */
1314 	READDIR3res nfs3_readdir_res;
1315 
1316 	/* RFS3_READDIRPLUS = 17 */
1317 	READDIRPLUS3res nfs3_readdirplus_res;
1318 
1319 	/* RFS3_FSSTAT = 18 */
1320 	FSSTAT3res nfs3_fsstat_res;
1321 
1322 	/* RFS3_FSINFO = 19 */
1323 	FSINFO3res nfs3_fsinfo_res;
1324 
1325 	/* RFS3_PATHCONF = 20 */
1326 	PATHCONF3res nfs3_pathconf_res;
1327 
1328 	/* RFS3_COMMIT = 21 */
1329 	COMMIT3res nfs3_commit_res;
1330 
1331 	/*
1332 	 * NFS VERSION 4
1333 	 */
1334 
1335 	/* RFS_NULL = 0 */
1336 
1337 	/* RFS4_COMPOUND = 1 */
1338 	COMPOUND4res nfs4_compound_res;
1339 
1340 };
1341 
1342 static struct rpc_disptable rfs_disptable[] = {
1343 	{sizeof (rfsdisptab_v2) / sizeof (rfsdisptab_v2[0]),
1344 	    rfscallnames_v2,
1345 	    &rfsproccnt_v2_ptr, &rfsprocio_v2_ptr, rfsdisptab_v2},
1346 	{sizeof (rfsdisptab_v3) / sizeof (rfsdisptab_v3[0]),
1347 	    rfscallnames_v3,
1348 	    &rfsproccnt_v3_ptr, &rfsprocio_v3_ptr, rfsdisptab_v3},
1349 	{sizeof (rfsdisptab_v4) / sizeof (rfsdisptab_v4[0]),
1350 	    rfscallnames_v4,
1351 	    &rfsproccnt_v4_ptr, &rfsprocio_v4_ptr, rfsdisptab_v4},
1352 };
1353 
1354 /*
1355  * If nfs_portmon is set, then clients are required to use privileged
1356  * ports (ports < IPPORT_RESERVED) in order to get NFS services.
1357  *
1358  * N.B.: this attempt to carry forward the already ill-conceived notion
1359  * of privileged ports for TCP/UDP is really quite ineffectual.  Not only
1360  * is it transport-dependent, it's laughably easy to spoof.  If you're
1361  * really interested in security, you must start with secure RPC instead.
1362  */
1363 static int nfs_portmon = 0;
1364 
1365 #ifdef DEBUG
1366 static int cred_hits = 0;
1367 static int cred_misses = 0;
1368 #endif
1369 
1370 
1371 #ifdef DEBUG
1372 /*
1373  * Debug code to allow disabling of rfs_dispatch() use of
1374  * fastxdrargs() and fastxdrres() calls for testing purposes.
1375  */
1376 static int rfs_no_fast_xdrargs = 0;
1377 static int rfs_no_fast_xdrres = 0;
1378 #endif
1379 
1380 union acl_args {
1381 	/*
1382 	 * ACL VERSION 2
1383 	 */
1384 
1385 	/* ACL2_NULL = 0 */
1386 
1387 	/* ACL2_GETACL = 1 */
1388 	GETACL2args acl2_getacl_args;
1389 
1390 	/* ACL2_SETACL = 2 */
1391 	SETACL2args acl2_setacl_args;
1392 
1393 	/* ACL2_GETATTR = 3 */
1394 	GETATTR2args acl2_getattr_args;
1395 
1396 	/* ACL2_ACCESS = 4 */
1397 	ACCESS2args acl2_access_args;
1398 
1399 	/* ACL2_GETXATTRDIR = 5 */
1400 	GETXATTRDIR2args acl2_getxattrdir_args;
1401 
1402 	/*
1403 	 * ACL VERSION 3
1404 	 */
1405 
1406 	/* ACL3_NULL = 0 */
1407 
1408 	/* ACL3_GETACL = 1 */
1409 	GETACL3args acl3_getacl_args;
1410 
1411 	/* ACL3_SETACL = 2 */
1412 	SETACL3args acl3_setacl;
1413 
1414 	/* ACL3_GETXATTRDIR = 3 */
1415 	GETXATTRDIR3args acl3_getxattrdir_args;
1416 
1417 };
1418 
1419 union acl_res {
1420 	/*
1421 	 * ACL VERSION 2
1422 	 */
1423 
1424 	/* ACL2_NULL = 0 */
1425 
1426 	/* ACL2_GETACL = 1 */
1427 	GETACL2res acl2_getacl_res;
1428 
1429 	/* ACL2_SETACL = 2 */
1430 	SETACL2res acl2_setacl_res;
1431 
1432 	/* ACL2_GETATTR = 3 */
1433 	GETATTR2res acl2_getattr_res;
1434 
1435 	/* ACL2_ACCESS = 4 */
1436 	ACCESS2res acl2_access_res;
1437 
1438 	/* ACL2_GETXATTRDIR = 5 */
1439 	GETXATTRDIR2args acl2_getxattrdir_res;
1440 
1441 	/*
1442 	 * ACL VERSION 3
1443 	 */
1444 
1445 	/* ACL3_NULL = 0 */
1446 
1447 	/* ACL3_GETACL = 1 */
1448 	GETACL3res acl3_getacl_res;
1449 
1450 	/* ACL3_SETACL = 2 */
1451 	SETACL3res acl3_setacl_res;
1452 
1453 	/* ACL3_GETXATTRDIR = 3 */
1454 	GETXATTRDIR3res acl3_getxattrdir_res;
1455 
1456 };
1457 
1458 static bool_t
1459 auth_tooweak(struct svc_req *req, char *res)
1460 {
1461 
1462 	if (req->rq_vers == NFS_VERSION && req->rq_proc == RFS_LOOKUP) {
1463 		struct nfsdiropres *dr = (struct nfsdiropres *)res;
1464 		if ((enum wnfsstat)dr->dr_status == WNFSERR_CLNT_FLAVOR)
1465 			return (TRUE);
1466 	} else if (req->rq_vers == NFS_V3 && req->rq_proc == NFSPROC3_LOOKUP) {
1467 		LOOKUP3res *resp = (LOOKUP3res *)res;
1468 		if ((enum wnfsstat)resp->status == WNFSERR_CLNT_FLAVOR)
1469 			return (TRUE);
1470 	}
1471 	return (FALSE);
1472 }
1473 
1474 
1475 static void
1476 common_dispatch(struct svc_req *req, SVCXPRT *xprt, rpcvers_t min_vers,
1477 		rpcvers_t max_vers, char *pgmname,
1478 		struct rpc_disptable *disptable)
1479 {
1480 	int which;
1481 	rpcvers_t vers;
1482 	char *args;
1483 	union {
1484 			union rfs_args ra;
1485 			union acl_args aa;
1486 		} args_buf;
1487 	char *res;
1488 	union {
1489 			union rfs_res rr;
1490 			union acl_res ar;
1491 		} res_buf;
1492 	struct rpcdisp *disp = NULL;
1493 	int dis_flags = 0;
1494 	cred_t *cr;
1495 	int error = 0;
1496 	int anon_ok;
1497 	struct exportinfo *exi = NULL;
1498 	unsigned int nfslog_rec_id;
1499 	int dupstat;
1500 	struct dupreq *dr;
1501 	int authres;
1502 	bool_t publicfh_ok = FALSE;
1503 	enum_t auth_flavor;
1504 	bool_t dupcached = FALSE;
1505 	struct netbuf	nb;
1506 	bool_t logging_enabled = FALSE;
1507 	struct exportinfo *nfslog_exi = NULL;
1508 	char **procnames;
1509 	char cbuf[INET6_ADDRSTRLEN];	/* to hold both IPv4 and IPv6 addr */
1510 	bool_t ro = FALSE;
1511 	kstat_t *ksp = NULL;
1512 	kstat_t *exi_ksp = NULL;
1513 	size_t pos;			/* request size */
1514 	size_t rlen;			/* reply size */
1515 	bool_t rsent = FALSE;		/* reply was sent successfully */
1516 
1517 	vers = req->rq_vers;
1518 
1519 	if (vers < min_vers || vers > max_vers) {
1520 		svcerr_progvers(req->rq_xprt, min_vers, max_vers);
1521 		error++;
1522 		cmn_err(CE_NOTE, "%s: bad version number %u", pgmname, vers);
1523 		goto done;
1524 	}
1525 	vers -= min_vers;
1526 
1527 	which = req->rq_proc;
1528 	if (which < 0 || which >= disptable[(int)vers].dis_nprocs) {
1529 		svcerr_noproc(req->rq_xprt);
1530 		error++;
1531 		goto done;
1532 	}
1533 
1534 	(*(disptable[(int)vers].dis_proccntp))[which].value.ui64++;
1535 
1536 	ksp = (*(disptable[(int)vers].dis_prociop))[which];
1537 	if (ksp != NULL) {
1538 		mutex_enter(ksp->ks_lock);
1539 		kstat_runq_enter(KSTAT_IO_PTR(ksp));
1540 		mutex_exit(ksp->ks_lock);
1541 	}
1542 	pos = XDR_GETPOS(&xprt->xp_xdrin);
1543 
1544 	disp = &disptable[(int)vers].dis_table[which];
1545 	procnames = disptable[(int)vers].dis_procnames;
1546 
1547 	auth_flavor = req->rq_cred.oa_flavor;
1548 
1549 	/*
1550 	 * Deserialize into the args struct.
1551 	 */
1552 	args = (char *)&args_buf;
1553 
1554 #ifdef DEBUG
1555 	if (rfs_no_fast_xdrargs || (auth_flavor == RPCSEC_GSS) ||
1556 	    disp->dis_fastxdrargs == NULL_xdrproc_t ||
1557 	    !SVC_GETARGS(xprt, disp->dis_fastxdrargs, (char *)&args))
1558 #else
1559 	if ((auth_flavor == RPCSEC_GSS) ||
1560 	    disp->dis_fastxdrargs == NULL_xdrproc_t ||
1561 	    !SVC_GETARGS(xprt, disp->dis_fastxdrargs, (char *)&args))
1562 #endif
1563 	{
1564 		bzero(args, disp->dis_argsz);
1565 		if (!SVC_GETARGS(xprt, disp->dis_xdrargs, args)) {
1566 			error++;
1567 			/*
1568 			 * Check if we are outside our capabilities.
1569 			 */
1570 			if (rfs4_minorvers_mismatch(req, xprt, (void *)args))
1571 				goto done;
1572 
1573 			svcerr_decode(xprt);
1574 			cmn_err(CE_NOTE,
1575 			    "Failed to decode arguments for %s version %u "
1576 			    "procedure %s client %s%s",
1577 			    pgmname, vers + min_vers, procnames[which],
1578 			    client_name(req), client_addr(req, cbuf));
1579 			goto done;
1580 		}
1581 	}
1582 
1583 	/*
1584 	 * If Version 4 use that specific dispatch function.
1585 	 */
1586 	if (req->rq_vers == 4) {
1587 		error += rfs4_dispatch(disp, req, xprt, args, &rlen);
1588 		if (error == 0)
1589 			rsent = TRUE;
1590 		goto done;
1591 	}
1592 
1593 	dis_flags = disp->dis_flags;
1594 
1595 	/*
1596 	 * Find export information and check authentication,
1597 	 * setting the credential if everything is ok.
1598 	 */
1599 	if (disp->dis_getfh != NULL) {
1600 		void *fh;
1601 		fsid_t *fsid;
1602 		fid_t *fid, *xfid;
1603 		fhandle_t *fh2;
1604 		nfs_fh3 *fh3;
1605 
1606 		fh = (*disp->dis_getfh)(args);
1607 		switch (req->rq_vers) {
1608 		case NFS_VERSION:
1609 			fh2 = (fhandle_t *)fh;
1610 			fsid = &fh2->fh_fsid;
1611 			fid = (fid_t *)&fh2->fh_len;
1612 			xfid = (fid_t *)&fh2->fh_xlen;
1613 			break;
1614 		case NFS_V3:
1615 			fh3 = (nfs_fh3 *)fh;
1616 			fsid = &fh3->fh3_fsid;
1617 			fid = FH3TOFIDP(fh3);
1618 			xfid = FH3TOXFIDP(fh3);
1619 			break;
1620 		}
1621 
1622 		/*
1623 		 * Fix for bug 1038302 - corbin
1624 		 * There is a problem here if anonymous access is
1625 		 * disallowed.  If the current request is part of the
1626 		 * client's mount process for the requested filesystem,
1627 		 * then it will carry root (uid 0) credentials on it, and
1628 		 * will be denied by checkauth if that client does not
1629 		 * have explicit root=0 permission.  This will cause the
1630 		 * client's mount operation to fail.  As a work-around,
1631 		 * we check here to see if the request is a getattr or
1632 		 * statfs operation on the exported vnode itself, and
1633 		 * pass a flag to checkauth with the result of this test.
1634 		 *
1635 		 * The filehandle refers to the mountpoint itself if
1636 		 * the fh_data and fh_xdata portions of the filehandle
1637 		 * are equal.
1638 		 *
1639 		 * Added anon_ok argument to checkauth().
1640 		 */
1641 
1642 		if ((dis_flags & RPC_ALLOWANON) && EQFID(fid, xfid))
1643 			anon_ok = 1;
1644 		else
1645 			anon_ok = 0;
1646 
1647 		cr = xprt->xp_cred;
1648 		ASSERT(cr != NULL);
1649 #ifdef DEBUG
1650 		if (crgetref(cr) != 1) {
1651 			crfree(cr);
1652 			cr = crget();
1653 			xprt->xp_cred = cr;
1654 			cred_misses++;
1655 		} else
1656 			cred_hits++;
1657 #else
1658 		if (crgetref(cr) != 1) {
1659 			crfree(cr);
1660 			cr = crget();
1661 			xprt->xp_cred = cr;
1662 		}
1663 #endif
1664 
1665 		exi = checkexport(fsid, xfid);
1666 
1667 		if (exi != NULL) {
1668 			rw_enter(&exported_lock, RW_READER);
1669 
1670 			switch (req->rq_vers) {
1671 			case NFS_VERSION:
1672 				exi_ksp = (disptable == rfs_disptable) ?
1673 				    exi->exi_kstats->rfsprocio_v2_ptr[which] :
1674 				    exi->exi_kstats->aclprocio_v2_ptr[which];
1675 				break;
1676 			case NFS_V3:
1677 				exi_ksp = (disptable == rfs_disptable) ?
1678 				    exi->exi_kstats->rfsprocio_v3_ptr[which] :
1679 				    exi->exi_kstats->aclprocio_v3_ptr[which];
1680 				break;
1681 			default:
1682 				ASSERT(0);
1683 				break;
1684 			}
1685 
1686 			if (exi_ksp != NULL) {
1687 				mutex_enter(exi_ksp->ks_lock);
1688 				kstat_runq_enter(KSTAT_IO_PTR(exi_ksp));
1689 				mutex_exit(exi_ksp->ks_lock);
1690 			} else {
1691 				rw_exit(&exported_lock);
1692 			}
1693 
1694 			publicfh_ok = PUBLICFH_CHECK(disp, exi, fsid, xfid);
1695 
1696 			/*
1697 			 * Don't allow non-V4 clients access
1698 			 * to pseudo exports
1699 			 */
1700 			if (PSEUDO(exi)) {
1701 				svcerr_weakauth(xprt);
1702 				error++;
1703 				goto done;
1704 			}
1705 
1706 			authres = checkauth(exi, req, cr, anon_ok, publicfh_ok,
1707 			    &ro);
1708 			/*
1709 			 * authres >  0: authentication OK - proceed
1710 			 * authres == 0: authentication weak - return error
1711 			 * authres <  0: authentication timeout - drop
1712 			 */
1713 			if (authres <= 0) {
1714 				if (authres == 0) {
1715 					svcerr_weakauth(xprt);
1716 					error++;
1717 				}
1718 				goto done;
1719 			}
1720 		}
1721 	} else
1722 		cr = NULL;
1723 
1724 	if ((dis_flags & RPC_MAPRESP) && (auth_flavor != RPCSEC_GSS)) {
1725 		res = (char *)SVC_GETRES(xprt, disp->dis_ressz);
1726 		if (res == NULL)
1727 			res = (char *)&res_buf;
1728 	} else
1729 		res = (char *)&res_buf;
1730 
1731 	if (!(dis_flags & RPC_IDEMPOTENT)) {
1732 		dupstat = SVC_DUP_EXT(xprt, req, res, disp->dis_ressz, &dr,
1733 		    &dupcached);
1734 
1735 		switch (dupstat) {
1736 		case DUP_ERROR:
1737 			svcerr_systemerr(xprt);
1738 			error++;
1739 			goto done;
1740 			/* NOTREACHED */
1741 		case DUP_INPROGRESS:
1742 			if (res != (char *)&res_buf)
1743 				SVC_FREERES(xprt);
1744 			error++;
1745 			goto done;
1746 			/* NOTREACHED */
1747 		case DUP_NEW:
1748 		case DUP_DROP:
1749 			curthread->t_flag |= T_DONTPEND;
1750 
1751 			(*disp->dis_proc)(args, res, exi, req, cr, ro);
1752 
1753 			curthread->t_flag &= ~T_DONTPEND;
1754 			if (curthread->t_flag & T_WOULDBLOCK) {
1755 				curthread->t_flag &= ~T_WOULDBLOCK;
1756 				SVC_DUPDONE_EXT(xprt, dr, res, NULL,
1757 				    disp->dis_ressz, DUP_DROP);
1758 				if (res != (char *)&res_buf)
1759 					SVC_FREERES(xprt);
1760 				error++;
1761 				goto done;
1762 			}
1763 			if (dis_flags & RPC_AVOIDWORK) {
1764 				SVC_DUPDONE_EXT(xprt, dr, res, NULL,
1765 				    disp->dis_ressz, DUP_DROP);
1766 			} else {
1767 				SVC_DUPDONE_EXT(xprt, dr, res,
1768 				    disp->dis_resfree == nullfree ? NULL :
1769 				    disp->dis_resfree,
1770 				    disp->dis_ressz, DUP_DONE);
1771 				dupcached = TRUE;
1772 			}
1773 			break;
1774 		case DUP_DONE:
1775 			break;
1776 		}
1777 
1778 	} else {
1779 		curthread->t_flag |= T_DONTPEND;
1780 
1781 		(*disp->dis_proc)(args, res, exi, req, cr, ro);
1782 
1783 		curthread->t_flag &= ~T_DONTPEND;
1784 		if (curthread->t_flag & T_WOULDBLOCK) {
1785 			curthread->t_flag &= ~T_WOULDBLOCK;
1786 			if (res != (char *)&res_buf)
1787 				SVC_FREERES(xprt);
1788 			error++;
1789 			goto done;
1790 		}
1791 	}
1792 
1793 	if (auth_tooweak(req, res)) {
1794 		svcerr_weakauth(xprt);
1795 		error++;
1796 		goto done;
1797 	}
1798 
1799 	/*
1800 	 * Check to see if logging has been enabled on the server.
1801 	 * If so, then obtain the export info struct to be used for
1802 	 * the later writing of the log record.  This is done for
1803 	 * the case that a lookup is done across a non-logged public
1804 	 * file system.
1805 	 */
1806 	if (nfslog_buffer_list != NULL) {
1807 		nfslog_exi = nfslog_get_exi(exi, req, res, &nfslog_rec_id);
1808 		/*
1809 		 * Is logging enabled?
1810 		 */
1811 		logging_enabled = (nfslog_exi != NULL);
1812 
1813 		/*
1814 		 * Copy the netbuf for logging purposes, before it is
1815 		 * freed by svc_sendreply().
1816 		 */
1817 		if (logging_enabled) {
1818 			NFSLOG_COPY_NETBUF(nfslog_exi, xprt, &nb);
1819 			/*
1820 			 * If RPC_MAPRESP flag set (i.e. in V2 ops) the
1821 			 * res gets copied directly into the mbuf and
1822 			 * may be freed soon after the sendreply. So we
1823 			 * must copy it here to a safe place...
1824 			 */
1825 			if (res != (char *)&res_buf) {
1826 				bcopy(res, (char *)&res_buf, disp->dis_ressz);
1827 			}
1828 		}
1829 	}
1830 
1831 	/*
1832 	 * Serialize and send results struct
1833 	 */
1834 #ifdef DEBUG
1835 	if (rfs_no_fast_xdrres == 0 && res != (char *)&res_buf)
1836 #else
1837 	if (res != (char *)&res_buf)
1838 #endif
1839 	{
1840 		if (!svc_sendreply(xprt, disp->dis_fastxdrres, res)) {
1841 			cmn_err(CE_NOTE, "%s: bad sendreply", pgmname);
1842 			svcerr_systemerr(xprt);
1843 			error++;
1844 		} else {
1845 			rlen = xdr_sizeof(disp->dis_fastxdrres, res);
1846 			rsent = TRUE;
1847 		}
1848 	} else {
1849 		if (!svc_sendreply(xprt, disp->dis_xdrres, res)) {
1850 			cmn_err(CE_NOTE, "%s: bad sendreply", pgmname);
1851 			svcerr_systemerr(xprt);
1852 			error++;
1853 		} else {
1854 			rlen = xdr_sizeof(disp->dis_xdrres, res);
1855 			rsent = TRUE;
1856 		}
1857 	}
1858 
1859 	/*
1860 	 * Log if needed
1861 	 */
1862 	if (logging_enabled) {
1863 		nfslog_write_record(nfslog_exi, req, args, (char *)&res_buf,
1864 		    cr, &nb, nfslog_rec_id, NFSLOG_ONE_BUFFER);
1865 		exi_rele(nfslog_exi);
1866 		kmem_free((&nb)->buf, (&nb)->len);
1867 	}
1868 
1869 	/*
1870 	 * Free results struct. With the addition of NFS V4 we can
1871 	 * have non-idempotent procedures with functions.
1872 	 */
1873 	if (disp->dis_resfree != nullfree && dupcached == FALSE) {
1874 		(*disp->dis_resfree)(res);
1875 	}
1876 
1877 done:
1878 	if (ksp != NULL || exi_ksp != NULL) {
1879 		pos = XDR_GETPOS(&xprt->xp_xdrin) - pos;
1880 	}
1881 
1882 	/*
1883 	 * Free arguments struct
1884 	 */
1885 	if (disp) {
1886 		if (!SVC_FREEARGS(xprt, disp->dis_xdrargs, args)) {
1887 			cmn_err(CE_NOTE, "%s: bad freeargs", pgmname);
1888 			error++;
1889 		}
1890 	} else {
1891 		if (!SVC_FREEARGS(xprt, (xdrproc_t)0, (caddr_t)0)) {
1892 			cmn_err(CE_NOTE, "%s: bad freeargs", pgmname);
1893 			error++;
1894 		}
1895 	}
1896 
1897 	if (exi_ksp != NULL) {
1898 		mutex_enter(exi_ksp->ks_lock);
1899 		KSTAT_IO_PTR(exi_ksp)->nwritten += pos;
1900 		KSTAT_IO_PTR(exi_ksp)->writes++;
1901 		if (rsent) {
1902 			KSTAT_IO_PTR(exi_ksp)->nread += rlen;
1903 			KSTAT_IO_PTR(exi_ksp)->reads++;
1904 		}
1905 		kstat_runq_exit(KSTAT_IO_PTR(exi_ksp));
1906 		mutex_exit(exi_ksp->ks_lock);
1907 
1908 		rw_exit(&exported_lock);
1909 	}
1910 
1911 	if (exi != NULL)
1912 		exi_rele(exi);
1913 
1914 	if (ksp != NULL) {
1915 		mutex_enter(ksp->ks_lock);
1916 		KSTAT_IO_PTR(ksp)->nwritten += pos;
1917 		KSTAT_IO_PTR(ksp)->writes++;
1918 		if (rsent) {
1919 			KSTAT_IO_PTR(ksp)->nread += rlen;
1920 			KSTAT_IO_PTR(ksp)->reads++;
1921 		}
1922 		kstat_runq_exit(KSTAT_IO_PTR(ksp));
1923 		mutex_exit(ksp->ks_lock);
1924 	}
1925 
1926 	global_svstat_ptr[req->rq_vers][NFS_BADCALLS].value.ui64 += error;
1927 
1928 	global_svstat_ptr[req->rq_vers][NFS_CALLS].value.ui64++;
1929 }
1930 
1931 static void
1932 rfs_dispatch(struct svc_req *req, SVCXPRT *xprt)
1933 {
1934 	common_dispatch(req, xprt, NFS_VERSMIN, NFS_VERSMAX,
1935 	    "NFS", rfs_disptable);
1936 }
1937 
1938 static char *aclcallnames_v2[] = {
1939 	"ACL2_NULL",
1940 	"ACL2_GETACL",
1941 	"ACL2_SETACL",
1942 	"ACL2_GETATTR",
1943 	"ACL2_ACCESS",
1944 	"ACL2_GETXATTRDIR"
1945 };
1946 
1947 static struct rpcdisp acldisptab_v2[] = {
1948 	/*
1949 	 * ACL VERSION 2
1950 	 */
1951 
1952 	/* ACL2_NULL = 0 */
1953 	{rpc_null,
1954 	    xdr_void, NULL_xdrproc_t, 0,
1955 	    xdr_void, NULL_xdrproc_t, 0,
1956 	    nullfree, RPC_IDEMPOTENT,
1957 	    0},
1958 
1959 	/* ACL2_GETACL = 1 */
1960 	{acl2_getacl,
1961 	    xdr_GETACL2args, xdr_fastGETACL2args, sizeof (GETACL2args),
1962 	    xdr_GETACL2res, NULL_xdrproc_t, sizeof (GETACL2res),
1963 	    acl2_getacl_free, RPC_IDEMPOTENT,
1964 	    acl2_getacl_getfh},
1965 
1966 	/* ACL2_SETACL = 2 */
1967 	{acl2_setacl,
1968 	    xdr_SETACL2args, NULL_xdrproc_t, sizeof (SETACL2args),
1969 #ifdef _LITTLE_ENDIAN
1970 	    xdr_SETACL2res, xdr_fastSETACL2res, sizeof (SETACL2res),
1971 #else
1972 	    xdr_SETACL2res, NULL_xdrproc_t, sizeof (SETACL2res),
1973 #endif
1974 	    nullfree, RPC_MAPRESP,
1975 	    acl2_setacl_getfh},
1976 
1977 	/* ACL2_GETATTR = 3 */
1978 	{acl2_getattr,
1979 	    xdr_GETATTR2args, xdr_fastGETATTR2args, sizeof (GETATTR2args),
1980 #ifdef _LITTLE_ENDIAN
1981 	    xdr_GETATTR2res, xdr_fastGETATTR2res, sizeof (GETATTR2res),
1982 #else
1983 	    xdr_GETATTR2res, NULL_xdrproc_t, sizeof (GETATTR2res),
1984 #endif
1985 	    nullfree, RPC_IDEMPOTENT|RPC_ALLOWANON|RPC_MAPRESP,
1986 	    acl2_getattr_getfh},
1987 
1988 	/* ACL2_ACCESS = 4 */
1989 	{acl2_access,
1990 	    xdr_ACCESS2args, xdr_fastACCESS2args, sizeof (ACCESS2args),
1991 #ifdef _LITTLE_ENDIAN
1992 	    xdr_ACCESS2res, xdr_fastACCESS2res, sizeof (ACCESS2res),
1993 #else
1994 	    xdr_ACCESS2res, NULL_xdrproc_t, sizeof (ACCESS2res),
1995 #endif
1996 	    nullfree, RPC_IDEMPOTENT|RPC_MAPRESP,
1997 	    acl2_access_getfh},
1998 
1999 	/* ACL2_GETXATTRDIR = 5 */
2000 	{acl2_getxattrdir,
2001 	    xdr_GETXATTRDIR2args, NULL_xdrproc_t, sizeof (GETXATTRDIR2args),
2002 	    xdr_GETXATTRDIR2res, NULL_xdrproc_t, sizeof (GETXATTRDIR2res),
2003 	    nullfree, RPC_IDEMPOTENT,
2004 	    acl2_getxattrdir_getfh},
2005 };
2006 
2007 static char *aclcallnames_v3[] = {
2008 	"ACL3_NULL",
2009 	"ACL3_GETACL",
2010 	"ACL3_SETACL",
2011 	"ACL3_GETXATTRDIR"
2012 };
2013 
2014 static struct rpcdisp acldisptab_v3[] = {
2015 	/*
2016 	 * ACL VERSION 3
2017 	 */
2018 
2019 	/* ACL3_NULL = 0 */
2020 	{rpc_null,
2021 	    xdr_void, NULL_xdrproc_t, 0,
2022 	    xdr_void, NULL_xdrproc_t, 0,
2023 	    nullfree, RPC_IDEMPOTENT,
2024 	    0},
2025 
2026 	/* ACL3_GETACL = 1 */
2027 	{acl3_getacl,
2028 	    xdr_GETACL3args, NULL_xdrproc_t, sizeof (GETACL3args),
2029 	    xdr_GETACL3res, NULL_xdrproc_t, sizeof (GETACL3res),
2030 	    acl3_getacl_free, RPC_IDEMPOTENT,
2031 	    acl3_getacl_getfh},
2032 
2033 	/* ACL3_SETACL = 2 */
2034 	{acl3_setacl,
2035 	    xdr_SETACL3args, NULL_xdrproc_t, sizeof (SETACL3args),
2036 	    xdr_SETACL3res, NULL_xdrproc_t, sizeof (SETACL3res),
2037 	    nullfree, 0,
2038 	    acl3_setacl_getfh},
2039 
2040 	/* ACL3_GETXATTRDIR = 3 */
2041 	{acl3_getxattrdir,
2042 	    xdr_GETXATTRDIR3args, NULL_xdrproc_t, sizeof (GETXATTRDIR3args),
2043 	    xdr_GETXATTRDIR3res, NULL_xdrproc_t, sizeof (GETXATTRDIR3res),
2044 	    nullfree, RPC_IDEMPOTENT,
2045 	    acl3_getxattrdir_getfh},
2046 };
2047 
2048 static struct rpc_disptable acl_disptable[] = {
2049 	{sizeof (acldisptab_v2) / sizeof (acldisptab_v2[0]),
2050 		aclcallnames_v2,
2051 		&aclproccnt_v2_ptr, &aclprocio_v2_ptr, acldisptab_v2},
2052 	{sizeof (acldisptab_v3) / sizeof (acldisptab_v3[0]),
2053 		aclcallnames_v3,
2054 		&aclproccnt_v3_ptr, &aclprocio_v3_ptr, acldisptab_v3},
2055 };
2056 
2057 static void
2058 acl_dispatch(struct svc_req *req, SVCXPRT *xprt)
2059 {
2060 	common_dispatch(req, xprt, NFS_ACL_VERSMIN, NFS_ACL_VERSMAX,
2061 	    "ACL", acl_disptable);
2062 }
2063 
2064 int
2065 checkwin(int flavor, int window, struct svc_req *req)
2066 {
2067 	struct authdes_cred *adc;
2068 
2069 	switch (flavor) {
2070 	case AUTH_DES:
2071 		adc = (struct authdes_cred *)req->rq_clntcred;
2072 		if (adc->adc_fullname.window > window)
2073 			return (0);
2074 		break;
2075 
2076 	default:
2077 		break;
2078 	}
2079 	return (1);
2080 }
2081 
2082 
2083 /*
2084  * checkauth() will check the access permission against the export
2085  * information.  Then map root uid/gid to appropriate uid/gid.
2086  *
2087  * This routine is used by NFS V3 and V2 code.
2088  */
2089 static int
2090 checkauth(struct exportinfo *exi, struct svc_req *req, cred_t *cr, int anon_ok,
2091     bool_t publicfh_ok, bool_t *ro)
2092 {
2093 	int i, nfsflavor, rpcflavor, stat, access;
2094 	struct secinfo *secp;
2095 	caddr_t principal;
2096 	char buf[INET6_ADDRSTRLEN]; /* to hold both IPv4 and IPv6 addr */
2097 	int anon_res = 0;
2098 
2099 	uid_t uid;
2100 	gid_t gid;
2101 	uint_t ngids;
2102 	gid_t *gids;
2103 
2104 	/*
2105 	 * Check for privileged port number
2106 	 * N.B.:  this assumes that we know the format of a netbuf.
2107 	 */
2108 	if (nfs_portmon) {
2109 		struct sockaddr *ca;
2110 		ca = (struct sockaddr *)svc_getrpccaller(req->rq_xprt)->buf;
2111 
2112 		if (ca == NULL)
2113 			return (0);
2114 
2115 		if ((ca->sa_family == AF_INET &&
2116 		    ntohs(((struct sockaddr_in *)ca)->sin_port) >=
2117 		    IPPORT_RESERVED) ||
2118 		    (ca->sa_family == AF_INET6 &&
2119 		    ntohs(((struct sockaddr_in6 *)ca)->sin6_port) >=
2120 		    IPPORT_RESERVED)) {
2121 			cmn_err(CE_NOTE,
2122 			    "nfs_server: client %s%ssent NFS request from "
2123 			    "unprivileged port",
2124 			    client_name(req), client_addr(req, buf));
2125 			return (0);
2126 		}
2127 	}
2128 
2129 	/*
2130 	 *  return 1 on success or 0 on failure
2131 	 */
2132 	stat = sec_svc_getcred(req, cr, &principal, &nfsflavor);
2133 
2134 	/*
2135 	 * A failed AUTH_UNIX sec_svc_getcred() implies we couldn't set
2136 	 * the credentials; below we map that to anonymous.
2137 	 */
2138 	if (!stat && nfsflavor != AUTH_UNIX) {
2139 		cmn_err(CE_NOTE,
2140 		    "nfs_server: couldn't get unix cred for %s",
2141 		    client_name(req));
2142 		return (0);
2143 	}
2144 
2145 	/*
2146 	 * Short circuit checkauth() on operations that support the
2147 	 * public filehandle, and if the request for that operation
2148 	 * is using the public filehandle. Note that we must call
2149 	 * sec_svc_getcred() first so that xp_cookie is set to the
2150 	 * right value. Normally xp_cookie is just the RPC flavor
2151 	 * of the the request, but in the case of RPCSEC_GSS it
2152 	 * could be a pseudo flavor.
2153 	 */
2154 	if (publicfh_ok)
2155 		return (1);
2156 
2157 	rpcflavor = req->rq_cred.oa_flavor;
2158 	/*
2159 	 * Check if the auth flavor is valid for this export
2160 	 */
2161 	access = nfsauth_access(exi, req, cr, &uid, &gid, &ngids, &gids);
2162 	if (access & NFSAUTH_DROP)
2163 		return (-1);	/* drop the request */
2164 
2165 	if (access & NFSAUTH_RO)
2166 		*ro = TRUE;
2167 
2168 	if (access & NFSAUTH_DENIED) {
2169 		/*
2170 		 * If anon_ok == 1 and we got NFSAUTH_DENIED, it was
2171 		 * probably due to the flavor not matching during
2172 		 * the mount attempt. So map the flavor to AUTH_NONE
2173 		 * so that the credentials get mapped to the anonymous
2174 		 * user.
2175 		 */
2176 		if (anon_ok == 1)
2177 			rpcflavor = AUTH_NONE;
2178 		else
2179 			return (0);	/* deny access */
2180 
2181 	} else if (access & NFSAUTH_MAPNONE) {
2182 		/*
2183 		 * Access was granted even though the flavor mismatched
2184 		 * because AUTH_NONE was one of the exported flavors.
2185 		 */
2186 		rpcflavor = AUTH_NONE;
2187 
2188 	} else if (access & NFSAUTH_WRONGSEC) {
2189 		/*
2190 		 * NFSAUTH_WRONGSEC is used for NFSv4. If we get here,
2191 		 * it means a client ignored the list of allowed flavors
2192 		 * returned via the MOUNT protocol. So we just disallow it!
2193 		 */
2194 		return (0);
2195 	}
2196 
2197 	if (rpcflavor != AUTH_SYS)
2198 		kmem_free(gids, ngids * sizeof (gid_t));
2199 
2200 	switch (rpcflavor) {
2201 	case AUTH_NONE:
2202 		anon_res = crsetugid(cr, exi->exi_export.ex_anon,
2203 		    exi->exi_export.ex_anon);
2204 		(void) crsetgroups(cr, 0, NULL);
2205 		break;
2206 
2207 	case AUTH_UNIX:
2208 		if (!stat || crgetuid(cr) == 0 && !(access & NFSAUTH_UIDMAP)) {
2209 			anon_res = crsetugid(cr, exi->exi_export.ex_anon,
2210 			    exi->exi_export.ex_anon);
2211 			(void) crsetgroups(cr, 0, NULL);
2212 		} else if (crgetuid(cr) == 0 && access & NFSAUTH_ROOT) {
2213 			/*
2214 			 * It is root, so apply rootid to get real UID
2215 			 * Find the secinfo structure.  We should be able
2216 			 * to find it by the time we reach here.
2217 			 * nfsauth_access() has done the checking.
2218 			 */
2219 			secp = NULL;
2220 			for (i = 0; i < exi->exi_export.ex_seccnt; i++) {
2221 				struct secinfo *sptr;
2222 				sptr = &exi->exi_export.ex_secinfo[i];
2223 				if (sptr->s_secinfo.sc_nfsnum == nfsflavor) {
2224 					secp = sptr;
2225 					break;
2226 				}
2227 			}
2228 			if (secp != NULL) {
2229 				(void) crsetugid(cr, secp->s_rootid,
2230 				    secp->s_rootid);
2231 				(void) crsetgroups(cr, 0, NULL);
2232 			}
2233 		} else if (crgetuid(cr) != uid || crgetgid(cr) != gid) {
2234 			if (crsetugid(cr, uid, gid) != 0)
2235 				anon_res = crsetugid(cr,
2236 				    exi->exi_export.ex_anon,
2237 				    exi->exi_export.ex_anon);
2238 			(void) crsetgroups(cr, 0, NULL);
2239 		} else if (access & NFSAUTH_GROUPS) {
2240 			(void) crsetgroups(cr, ngids, gids);
2241 		}
2242 
2243 		kmem_free(gids, ngids * sizeof (gid_t));
2244 
2245 		break;
2246 
2247 	case AUTH_DES:
2248 	case RPCSEC_GSS:
2249 		/*
2250 		 *  Find the secinfo structure.  We should be able
2251 		 *  to find it by the time we reach here.
2252 		 *  nfsauth_access() has done the checking.
2253 		 */
2254 		secp = NULL;
2255 		for (i = 0; i < exi->exi_export.ex_seccnt; i++) {
2256 			if (exi->exi_export.ex_secinfo[i].s_secinfo.sc_nfsnum ==
2257 			    nfsflavor) {
2258 				secp = &exi->exi_export.ex_secinfo[i];
2259 				break;
2260 			}
2261 		}
2262 
2263 		if (!secp) {
2264 			cmn_err(CE_NOTE, "nfs_server: client %s%shad "
2265 			    "no secinfo data for flavor %d",
2266 			    client_name(req), client_addr(req, buf),
2267 			    nfsflavor);
2268 			return (0);
2269 		}
2270 
2271 		if (!checkwin(rpcflavor, secp->s_window, req)) {
2272 			cmn_err(CE_NOTE,
2273 			    "nfs_server: client %s%sused invalid "
2274 			    "auth window value",
2275 			    client_name(req), client_addr(req, buf));
2276 			return (0);
2277 		}
2278 
2279 		/*
2280 		 * Map root principals listed in the share's root= list to root,
2281 		 * and map any others principals that were mapped to root by RPC
2282 		 * to anon.
2283 		 */
2284 		if (principal && sec_svc_inrootlist(rpcflavor, principal,
2285 		    secp->s_rootcnt, secp->s_rootnames)) {
2286 			if (crgetuid(cr) == 0 && secp->s_rootid == 0)
2287 				return (1);
2288 
2289 
2290 			(void) crsetugid(cr, secp->s_rootid, secp->s_rootid);
2291 
2292 			/*
2293 			 * NOTE: If and when kernel-land privilege tracing is
2294 			 * added this may have to be replaced with code that
2295 			 * retrieves root's supplementary groups (e.g., using
2296 			 * kgss_get_group_info().  In the meantime principals
2297 			 * mapped to uid 0 get all privileges, so setting cr's
2298 			 * supplementary groups for them does nothing.
2299 			 */
2300 			(void) crsetgroups(cr, 0, NULL);
2301 
2302 			return (1);
2303 		}
2304 
2305 		/*
2306 		 * Not a root princ, or not in root list, map UID 0/nobody to
2307 		 * the anon ID for the share.  (RPC sets cr's UIDs and GIDs to
2308 		 * UID_NOBODY and GID_NOBODY, respectively.)
2309 		 */
2310 		if (crgetuid(cr) != 0 &&
2311 		    (crgetuid(cr) != UID_NOBODY || crgetgid(cr) != GID_NOBODY))
2312 			return (1);
2313 
2314 		anon_res = crsetugid(cr, exi->exi_export.ex_anon,
2315 		    exi->exi_export.ex_anon);
2316 		(void) crsetgroups(cr, 0, NULL);
2317 		break;
2318 	default:
2319 		return (0);
2320 	} /* switch on rpcflavor */
2321 
2322 	/*
2323 	 * Even if anon access is disallowed via ex_anon == -1, we allow
2324 	 * this access if anon_ok is set.  So set creds to the default
2325 	 * "nobody" id.
2326 	 */
2327 	if (anon_res != 0) {
2328 		if (anon_ok == 0) {
2329 			cmn_err(CE_NOTE,
2330 			    "nfs_server: client %s%ssent wrong "
2331 			    "authentication for %s",
2332 			    client_name(req), client_addr(req, buf),
2333 			    exi->exi_export.ex_path ?
2334 			    exi->exi_export.ex_path : "?");
2335 			return (0);
2336 		}
2337 
2338 		if (crsetugid(cr, UID_NOBODY, GID_NOBODY) != 0)
2339 			return (0);
2340 	}
2341 
2342 	return (1);
2343 }
2344 
2345 /*
2346  * returns 0 on failure, -1 on a drop, -2 on wrong security flavor,
2347  * and 1 on success
2348  */
2349 int
2350 checkauth4(struct compound_state *cs, struct svc_req *req)
2351 {
2352 	int i, rpcflavor, access;
2353 	struct secinfo *secp;
2354 	char buf[MAXHOST + 1];
2355 	int anon_res = 0, nfsflavor;
2356 	struct exportinfo *exi;
2357 	cred_t	*cr;
2358 	caddr_t	principal;
2359 
2360 	uid_t uid;
2361 	gid_t gid;
2362 	uint_t ngids;
2363 	gid_t *gids;
2364 
2365 	exi = cs->exi;
2366 	cr = cs->cr;
2367 	principal = cs->principal;
2368 	nfsflavor = cs->nfsflavor;
2369 
2370 	ASSERT(cr != NULL);
2371 
2372 	rpcflavor = req->rq_cred.oa_flavor;
2373 	cs->access &= ~CS_ACCESS_LIMITED;
2374 
2375 	/*
2376 	 * Check for privileged port number
2377 	 * N.B.:  this assumes that we know the format of a netbuf.
2378 	 */
2379 	if (nfs_portmon) {
2380 		struct sockaddr *ca;
2381 		ca = (struct sockaddr *)svc_getrpccaller(req->rq_xprt)->buf;
2382 
2383 		if (ca == NULL)
2384 			return (0);
2385 
2386 		if ((ca->sa_family == AF_INET &&
2387 		    ntohs(((struct sockaddr_in *)ca)->sin_port) >=
2388 		    IPPORT_RESERVED) ||
2389 		    (ca->sa_family == AF_INET6 &&
2390 		    ntohs(((struct sockaddr_in6 *)ca)->sin6_port) >=
2391 		    IPPORT_RESERVED)) {
2392 			cmn_err(CE_NOTE,
2393 			    "nfs_server: client %s%ssent NFSv4 request from "
2394 			    "unprivileged port",
2395 			    client_name(req), client_addr(req, buf));
2396 			return (0);
2397 		}
2398 	}
2399 
2400 	/*
2401 	 * Check the access right per auth flavor on the vnode of
2402 	 * this export for the given request.
2403 	 */
2404 	access = nfsauth4_access(cs->exi, cs->vp, req, cr, &uid, &gid, &ngids,
2405 	    &gids);
2406 
2407 	if (access & NFSAUTH_WRONGSEC)
2408 		return (-2);	/* no access for this security flavor */
2409 
2410 	if (access & NFSAUTH_DROP)
2411 		return (-1);	/* drop the request */
2412 
2413 	if (access & NFSAUTH_DENIED) {
2414 
2415 		if (exi->exi_export.ex_seccnt > 0)
2416 			return (0);	/* deny access */
2417 
2418 	} else if (access & NFSAUTH_LIMITED) {
2419 
2420 		cs->access |= CS_ACCESS_LIMITED;
2421 
2422 	} else if (access & NFSAUTH_MAPNONE) {
2423 		/*
2424 		 * Access was granted even though the flavor mismatched
2425 		 * because AUTH_NONE was one of the exported flavors.
2426 		 */
2427 		rpcflavor = AUTH_NONE;
2428 	}
2429 
2430 	/*
2431 	 * XXX probably need to redo some of it for nfsv4?
2432 	 * return 1 on success or 0 on failure
2433 	 */
2434 
2435 	if (rpcflavor != AUTH_SYS)
2436 		kmem_free(gids, ngids * sizeof (gid_t));
2437 
2438 	switch (rpcflavor) {
2439 	case AUTH_NONE:
2440 		anon_res = crsetugid(cr, exi->exi_export.ex_anon,
2441 		    exi->exi_export.ex_anon);
2442 		(void) crsetgroups(cr, 0, NULL);
2443 		break;
2444 
2445 	case AUTH_UNIX:
2446 		if (crgetuid(cr) == 0 && !(access & NFSAUTH_UIDMAP)) {
2447 			anon_res = crsetugid(cr, exi->exi_export.ex_anon,
2448 			    exi->exi_export.ex_anon);
2449 			(void) crsetgroups(cr, 0, NULL);
2450 		} else if (crgetuid(cr) == 0 && access & NFSAUTH_ROOT) {
2451 			/*
2452 			 * It is root, so apply rootid to get real UID
2453 			 * Find the secinfo structure.  We should be able
2454 			 * to find it by the time we reach here.
2455 			 * nfsauth_access() has done the checking.
2456 			 */
2457 			secp = NULL;
2458 			for (i = 0; i < exi->exi_export.ex_seccnt; i++) {
2459 				struct secinfo *sptr;
2460 				sptr = &exi->exi_export.ex_secinfo[i];
2461 				if (sptr->s_secinfo.sc_nfsnum == nfsflavor) {
2462 					secp = &exi->exi_export.ex_secinfo[i];
2463 					break;
2464 				}
2465 			}
2466 			if (secp != NULL) {
2467 				(void) crsetugid(cr, secp->s_rootid,
2468 				    secp->s_rootid);
2469 				(void) crsetgroups(cr, 0, NULL);
2470 			}
2471 		} else if (crgetuid(cr) != uid || crgetgid(cr) != gid) {
2472 			if (crsetugid(cr, uid, gid) != 0)
2473 				anon_res = crsetugid(cr,
2474 				    exi->exi_export.ex_anon,
2475 				    exi->exi_export.ex_anon);
2476 			(void) crsetgroups(cr, 0, NULL);
2477 		} if (access & NFSAUTH_GROUPS) {
2478 			(void) crsetgroups(cr, ngids, gids);
2479 		}
2480 
2481 		kmem_free(gids, ngids * sizeof (gid_t));
2482 
2483 		break;
2484 
2485 	default:
2486 		/*
2487 		 *  Find the secinfo structure.  We should be able
2488 		 *  to find it by the time we reach here.
2489 		 *  nfsauth_access() has done the checking.
2490 		 */
2491 		secp = NULL;
2492 		for (i = 0; i < exi->exi_export.ex_seccnt; i++) {
2493 			if (exi->exi_export.ex_secinfo[i].s_secinfo.sc_nfsnum ==
2494 			    nfsflavor) {
2495 				secp = &exi->exi_export.ex_secinfo[i];
2496 				break;
2497 			}
2498 		}
2499 
2500 		if (!secp) {
2501 			cmn_err(CE_NOTE, "nfs_server: client %s%shad "
2502 			    "no secinfo data for flavor %d",
2503 			    client_name(req), client_addr(req, buf),
2504 			    nfsflavor);
2505 			return (0);
2506 		}
2507 
2508 		if (!checkwin(rpcflavor, secp->s_window, req)) {
2509 			cmn_err(CE_NOTE,
2510 			    "nfs_server: client %s%sused invalid "
2511 			    "auth window value",
2512 			    client_name(req), client_addr(req, buf));
2513 			return (0);
2514 		}
2515 
2516 		/*
2517 		 * Map root principals listed in the share's root= list to root,
2518 		 * and map any others principals that were mapped to root by RPC
2519 		 * to anon. If not going to anon, set to rootid (root_mapping).
2520 		 */
2521 		if (principal && sec_svc_inrootlist(rpcflavor, principal,
2522 		    secp->s_rootcnt, secp->s_rootnames)) {
2523 			if (crgetuid(cr) == 0 && secp->s_rootid == 0)
2524 				return (1);
2525 
2526 			(void) crsetugid(cr, secp->s_rootid, secp->s_rootid);
2527 
2528 			/*
2529 			 * NOTE: If and when kernel-land privilege tracing is
2530 			 * added this may have to be replaced with code that
2531 			 * retrieves root's supplementary groups (e.g., using
2532 			 * kgss_get_group_info().  In the meantime principals
2533 			 * mapped to uid 0 get all privileges, so setting cr's
2534 			 * supplementary groups for them does nothing.
2535 			 */
2536 			(void) crsetgroups(cr, 0, NULL);
2537 
2538 			return (1);
2539 		}
2540 
2541 		/*
2542 		 * Not a root princ, or not in root list, map UID 0/nobody to
2543 		 * the anon ID for the share.  (RPC sets cr's UIDs and GIDs to
2544 		 * UID_NOBODY and GID_NOBODY, respectively.)
2545 		 */
2546 		if (crgetuid(cr) != 0 &&
2547 		    (crgetuid(cr) != UID_NOBODY || crgetgid(cr) != GID_NOBODY))
2548 			return (1);
2549 
2550 		anon_res = crsetugid(cr, exi->exi_export.ex_anon,
2551 		    exi->exi_export.ex_anon);
2552 		(void) crsetgroups(cr, 0, NULL);
2553 		break;
2554 	} /* switch on rpcflavor */
2555 
2556 	/*
2557 	 * Even if anon access is disallowed via ex_anon == -1, we allow
2558 	 * this access if anon_ok is set.  So set creds to the default
2559 	 * "nobody" id.
2560 	 */
2561 
2562 	if (anon_res != 0) {
2563 		cmn_err(CE_NOTE,
2564 		    "nfs_server: client %s%ssent wrong "
2565 		    "authentication for %s",
2566 		    client_name(req), client_addr(req, buf),
2567 		    exi->exi_export.ex_path ?
2568 		    exi->exi_export.ex_path : "?");
2569 		return (0);
2570 	}
2571 
2572 	return (1);
2573 }
2574 
2575 
2576 static char *
2577 client_name(struct svc_req *req)
2578 {
2579 	char *hostname = NULL;
2580 
2581 	/*
2582 	 * If it's a Unix cred then use the
2583 	 * hostname from the credential.
2584 	 */
2585 	if (req->rq_cred.oa_flavor == AUTH_UNIX) {
2586 		hostname = ((struct authunix_parms *)
2587 		    req->rq_clntcred)->aup_machname;
2588 	}
2589 	if (hostname == NULL)
2590 		hostname = "";
2591 
2592 	return (hostname);
2593 }
2594 
2595 static char *
2596 client_addr(struct svc_req *req, char *buf)
2597 {
2598 	struct sockaddr *ca;
2599 	uchar_t *b;
2600 	char *frontspace = "";
2601 
2602 	/*
2603 	 * We assume we are called in tandem with client_name and the
2604 	 * format string looks like "...client %s%sblah blah..."
2605 	 *
2606 	 * If it's a Unix cred then client_name returned
2607 	 * a host name, so we need insert a space between host name
2608 	 * and IP address.
2609 	 */
2610 	if (req->rq_cred.oa_flavor == AUTH_UNIX)
2611 		frontspace = " ";
2612 
2613 	/*
2614 	 * Convert the caller's IP address to a dotted string
2615 	 */
2616 	ca = (struct sockaddr *)svc_getrpccaller(req->rq_xprt)->buf;
2617 
2618 	if (ca->sa_family == AF_INET) {
2619 		b = (uchar_t *)&((struct sockaddr_in *)ca)->sin_addr;
2620 		(void) sprintf(buf, "%s(%d.%d.%d.%d) ", frontspace,
2621 		    b[0] & 0xFF, b[1] & 0xFF, b[2] & 0xFF, b[3] & 0xFF);
2622 	} else if (ca->sa_family == AF_INET6) {
2623 		struct sockaddr_in6 *sin6;
2624 		sin6 = (struct sockaddr_in6 *)ca;
2625 		(void) kinet_ntop6((uchar_t *)&sin6->sin6_addr,
2626 		    buf, INET6_ADDRSTRLEN);
2627 
2628 	} else {
2629 
2630 		/*
2631 		 * No IP address to print. If there was a host name
2632 		 * printed, then we print a space.
2633 		 */
2634 		(void) sprintf(buf, frontspace);
2635 	}
2636 
2637 	return (buf);
2638 }
2639 
2640 /*
2641  * NFS Server initialization routine.  This routine should only be called
2642  * once.  It performs the following tasks:
2643  *	- Call sub-initialization routines (localize access to variables)
2644  *	- Initialize all locks
2645  *	- initialize the version 3 write verifier
2646  */
2647 int
2648 nfs_srvinit(void)
2649 {
2650 	int error;
2651 
2652 	error = nfs_exportinit();
2653 	if (error != 0)
2654 		return (error);
2655 	error = rfs4_srvrinit();
2656 	if (error != 0) {
2657 		nfs_exportfini();
2658 		return (error);
2659 	}
2660 	rfs_srvrinit();
2661 	rfs3_srvrinit();
2662 	nfsauth_init();
2663 
2664 	/* Init the stuff to control start/stop */
2665 	nfs_server_upordown = NFS_SERVER_STOPPED;
2666 	mutex_init(&nfs_server_upordown_lock, NULL, MUTEX_DEFAULT, NULL);
2667 	cv_init(&nfs_server_upordown_cv, NULL, CV_DEFAULT, NULL);
2668 	mutex_init(&rdma_wait_mutex, NULL, MUTEX_DEFAULT, NULL);
2669 	cv_init(&rdma_wait_cv, NULL, CV_DEFAULT, NULL);
2670 
2671 	return (0);
2672 }
2673 
2674 /*
2675  * NFS Server finalization routine. This routine is called to cleanup the
2676  * initialization work previously performed if the NFS server module could
2677  * not be loaded correctly.
2678  */
2679 void
2680 nfs_srvfini(void)
2681 {
2682 	nfsauth_fini();
2683 	rfs3_srvrfini();
2684 	rfs_srvrfini();
2685 	nfs_exportfini();
2686 
2687 	mutex_destroy(&nfs_server_upordown_lock);
2688 	cv_destroy(&nfs_server_upordown_cv);
2689 	mutex_destroy(&rdma_wait_mutex);
2690 	cv_destroy(&rdma_wait_cv);
2691 }
2692 
2693 /*
2694  * Set up an iovec array of up to cnt pointers.
2695  */
2696 
2697 void
2698 mblk_to_iov(mblk_t *m, int cnt, struct iovec *iovp)
2699 {
2700 	while (m != NULL && cnt-- > 0) {
2701 		iovp->iov_base = (caddr_t)m->b_rptr;
2702 		iovp->iov_len = (m->b_wptr - m->b_rptr);
2703 		iovp++;
2704 		m = m->b_cont;
2705 	}
2706 }
2707 
2708 /*
2709  * Common code between NFS Version 2 and NFS Version 3 for the public
2710  * filehandle multicomponent lookups.
2711  */
2712 
2713 /*
2714  * Public filehandle evaluation of a multi-component lookup, following
2715  * symbolic links, if necessary. This may result in a vnode in another
2716  * filesystem, which is OK as long as the other filesystem is exported.
2717  *
2718  * Note that the exi will be set either to NULL or a new reference to the
2719  * exportinfo struct that corresponds to the vnode of the multi-component path.
2720  * It is the callers responsibility to release this reference.
2721  */
2722 int
2723 rfs_publicfh_mclookup(char *p, vnode_t *dvp, cred_t *cr, vnode_t **vpp,
2724     struct exportinfo **exi, struct sec_ol *sec)
2725 {
2726 	int pathflag;
2727 	vnode_t *mc_dvp = NULL;
2728 	vnode_t *realvp;
2729 	int error;
2730 
2731 	*exi = NULL;
2732 
2733 	/*
2734 	 * check if the given path is a url or native path. Since p is
2735 	 * modified by MCLpath(), it may be empty after returning from
2736 	 * there, and should be checked.
2737 	 */
2738 	if ((pathflag = MCLpath(&p)) == -1)
2739 		return (EIO);
2740 
2741 	/*
2742 	 * If pathflag is SECURITY_QUERY, turn the SEC_QUERY bit
2743 	 * on in sec->sec_flags. This bit will later serve as an
2744 	 * indication in makefh_ol() or makefh3_ol() to overload the
2745 	 * filehandle to contain the sec modes used by the server for
2746 	 * the path.
2747 	 */
2748 	if (pathflag == SECURITY_QUERY) {
2749 		if ((sec->sec_index = (uint_t)(*p)) > 0) {
2750 			sec->sec_flags |= SEC_QUERY;
2751 			p++;
2752 			if ((pathflag = MCLpath(&p)) == -1)
2753 				return (EIO);
2754 		} else {
2755 			cmn_err(CE_NOTE,
2756 			    "nfs_server: invalid security index %d, "
2757 			    "violating WebNFS SNEGO protocol.", sec->sec_index);
2758 			return (EIO);
2759 		}
2760 	}
2761 
2762 	if (p[0] == '\0') {
2763 		error = ENOENT;
2764 		goto publicfh_done;
2765 	}
2766 
2767 	error = rfs_pathname(p, &mc_dvp, vpp, dvp, cr, pathflag);
2768 
2769 	/*
2770 	 * If name resolves to "/" we get EINVAL since we asked for
2771 	 * the vnode of the directory that the file is in. Try again
2772 	 * with NULL directory vnode.
2773 	 */
2774 	if (error == EINVAL) {
2775 		error = rfs_pathname(p, NULL, vpp, dvp, cr, pathflag);
2776 		if (!error) {
2777 			ASSERT(*vpp != NULL);
2778 			if ((*vpp)->v_type == VDIR) {
2779 				VN_HOLD(*vpp);
2780 				mc_dvp = *vpp;
2781 			} else {
2782 				/*
2783 				 * This should not happen, the filesystem is
2784 				 * in an inconsistent state. Fail the lookup
2785 				 * at this point.
2786 				 */
2787 				VN_RELE(*vpp);
2788 				error = EINVAL;
2789 			}
2790 		}
2791 	}
2792 
2793 	if (error)
2794 		goto publicfh_done;
2795 
2796 	if (*vpp == NULL) {
2797 		error = ENOENT;
2798 		goto publicfh_done;
2799 	}
2800 
2801 	ASSERT(mc_dvp != NULL);
2802 	ASSERT(*vpp != NULL);
2803 
2804 	if ((*vpp)->v_type == VDIR) {
2805 		do {
2806 			/*
2807 			 * *vpp may be an AutoFS node, so we perform
2808 			 * a VOP_ACCESS() to trigger the mount of the intended
2809 			 * filesystem, so we can perform the lookup in the
2810 			 * intended filesystem.
2811 			 */
2812 			(void) VOP_ACCESS(*vpp, 0, 0, cr, NULL);
2813 
2814 			/*
2815 			 * If vnode is covered, get the
2816 			 * the topmost vnode.
2817 			 */
2818 			if (vn_mountedvfs(*vpp) != NULL) {
2819 				error = traverse(vpp);
2820 				if (error) {
2821 					VN_RELE(*vpp);
2822 					goto publicfh_done;
2823 				}
2824 			}
2825 
2826 			if (VOP_REALVP(*vpp, &realvp, NULL) == 0 &&
2827 			    realvp != *vpp) {
2828 				/*
2829 				 * If realvp is different from *vpp
2830 				 * then release our reference on *vpp, so that
2831 				 * the export access check be performed on the
2832 				 * real filesystem instead.
2833 				 */
2834 				VN_HOLD(realvp);
2835 				VN_RELE(*vpp);
2836 				*vpp = realvp;
2837 			} else {
2838 				break;
2839 			}
2840 		/* LINTED */
2841 		} while (TRUE);
2842 
2843 		/*
2844 		 * Let nfs_vptexi() figure what the real parent is.
2845 		 */
2846 		VN_RELE(mc_dvp);
2847 		mc_dvp = NULL;
2848 
2849 	} else {
2850 		/*
2851 		 * If vnode is covered, get the
2852 		 * the topmost vnode.
2853 		 */
2854 		if (vn_mountedvfs(mc_dvp) != NULL) {
2855 			error = traverse(&mc_dvp);
2856 			if (error) {
2857 				VN_RELE(*vpp);
2858 				goto publicfh_done;
2859 			}
2860 		}
2861 
2862 		if (VOP_REALVP(mc_dvp, &realvp, NULL) == 0 &&
2863 		    realvp != mc_dvp) {
2864 			/*
2865 			 * *vpp is a file, obtain realvp of the parent
2866 			 * directory vnode.
2867 			 */
2868 			VN_HOLD(realvp);
2869 			VN_RELE(mc_dvp);
2870 			mc_dvp = realvp;
2871 		}
2872 	}
2873 
2874 	/*
2875 	 * The pathname may take us from the public filesystem to another.
2876 	 * If that's the case then just set the exportinfo to the new export
2877 	 * and build filehandle for it. Thanks to per-access checking there's
2878 	 * no security issues with doing this. If the client is not allowed
2879 	 * access to this new export then it will get an access error when it
2880 	 * tries to use the filehandle
2881 	 */
2882 	if (error = nfs_check_vpexi(mc_dvp, *vpp, kcred, exi)) {
2883 		VN_RELE(*vpp);
2884 		goto publicfh_done;
2885 	}
2886 
2887 	/*
2888 	 * Not allowed access to pseudo exports.
2889 	 */
2890 	if (PSEUDO(*exi)) {
2891 		error = ENOENT;
2892 		VN_RELE(*vpp);
2893 		goto publicfh_done;
2894 	}
2895 
2896 	/*
2897 	 * Do a lookup for the index file. We know the index option doesn't
2898 	 * allow paths through handling in the share command, so mc_dvp will
2899 	 * be the parent for the index file vnode, if its present. Use
2900 	 * temporary pointers to preserve and reuse the vnode pointers of the
2901 	 * original directory in case there's no index file. Note that the
2902 	 * index file is a native path, and should not be interpreted by
2903 	 * the URL parser in rfs_pathname()
2904 	 */
2905 	if (((*exi)->exi_export.ex_flags & EX_INDEX) &&
2906 	    ((*vpp)->v_type == VDIR) && (pathflag == URLPATH)) {
2907 		vnode_t *tvp, *tmc_dvp;	/* temporary vnode pointers */
2908 
2909 		tmc_dvp = mc_dvp;
2910 		mc_dvp = tvp = *vpp;
2911 
2912 		error = rfs_pathname((*exi)->exi_export.ex_index, NULL, vpp,
2913 		    mc_dvp, cr, NATIVEPATH);
2914 
2915 		if (error == ENOENT) {
2916 			*vpp = tvp;
2917 			mc_dvp = tmc_dvp;
2918 			error = 0;
2919 		} else {	/* ok or error other than ENOENT */
2920 			if (tmc_dvp)
2921 				VN_RELE(tmc_dvp);
2922 			if (error)
2923 				goto publicfh_done;
2924 
2925 			/*
2926 			 * Found a valid vp for index "filename". Sanity check
2927 			 * for odd case where a directory is provided as index
2928 			 * option argument and leads us to another filesystem
2929 			 */
2930 
2931 			/* Release the reference on the old exi value */
2932 			ASSERT(*exi != NULL);
2933 			exi_rele(*exi);
2934 
2935 			if (error = nfs_check_vpexi(mc_dvp, *vpp, kcred, exi)) {
2936 				VN_RELE(*vpp);
2937 				goto publicfh_done;
2938 			}
2939 		}
2940 	}
2941 
2942 publicfh_done:
2943 	if (mc_dvp)
2944 		VN_RELE(mc_dvp);
2945 
2946 	return (error);
2947 }
2948 
2949 /*
2950  * Evaluate a multi-component path
2951  */
2952 int
2953 rfs_pathname(
2954 	char *path,			/* pathname to evaluate */
2955 	vnode_t **dirvpp,		/* ret for ptr to parent dir vnode */
2956 	vnode_t **compvpp,		/* ret for ptr to component vnode */
2957 	vnode_t *startdvp,		/* starting vnode */
2958 	cred_t *cr,			/* user's credential */
2959 	int pathflag)			/* flag to identify path, e.g. URL */
2960 {
2961 	char namebuf[TYPICALMAXPATHLEN];
2962 	struct pathname pn;
2963 	int error;
2964 
2965 	/*
2966 	 * If pathname starts with '/', then set startdvp to root.
2967 	 */
2968 	if (*path == '/') {
2969 		while (*path == '/')
2970 			path++;
2971 
2972 		startdvp = rootdir;
2973 	}
2974 
2975 	error = pn_get_buf(path, UIO_SYSSPACE, &pn, namebuf, sizeof (namebuf));
2976 	if (error == 0) {
2977 		/*
2978 		 * Call the URL parser for URL paths to modify the original
2979 		 * string to handle any '%' encoded characters that exist.
2980 		 * Done here to avoid an extra bcopy in the lookup.
2981 		 * We need to be careful about pathlen's. We know that
2982 		 * rfs_pathname() is called with a non-empty path. However,
2983 		 * it could be emptied due to the path simply being all /'s,
2984 		 * which is valid to proceed with the lookup, or due to the
2985 		 * URL parser finding an encoded null character at the
2986 		 * beginning of path which should not proceed with the lookup.
2987 		 */
2988 		if (pn.pn_pathlen != 0 && pathflag == URLPATH) {
2989 			URLparse(pn.pn_path);
2990 			if ((pn.pn_pathlen = strlen(pn.pn_path)) == 0)
2991 				return (ENOENT);
2992 		}
2993 		VN_HOLD(startdvp);
2994 		error = lookuppnvp(&pn, NULL, NO_FOLLOW, dirvpp, compvpp,
2995 		    rootdir, startdvp, cr);
2996 	}
2997 	if (error == ENAMETOOLONG) {
2998 		/*
2999 		 * This thread used a pathname > TYPICALMAXPATHLEN bytes long.
3000 		 */
3001 		if (error = pn_get(path, UIO_SYSSPACE, &pn))
3002 			return (error);
3003 		if (pn.pn_pathlen != 0 && pathflag == URLPATH) {
3004 			URLparse(pn.pn_path);
3005 			if ((pn.pn_pathlen = strlen(pn.pn_path)) == 0) {
3006 				pn_free(&pn);
3007 				return (ENOENT);
3008 			}
3009 		}
3010 		VN_HOLD(startdvp);
3011 		error = lookuppnvp(&pn, NULL, NO_FOLLOW, dirvpp, compvpp,
3012 		    rootdir, startdvp, cr);
3013 		pn_free(&pn);
3014 	}
3015 
3016 	return (error);
3017 }
3018 
3019 /*
3020  * Adapt the multicomponent lookup path depending on the pathtype
3021  */
3022 static int
3023 MCLpath(char **path)
3024 {
3025 	unsigned char c = (unsigned char)**path;
3026 
3027 	/*
3028 	 * If the MCL path is between 0x20 and 0x7E (graphic printable
3029 	 * character of the US-ASCII coded character set), its a URL path,
3030 	 * per RFC 1738.
3031 	 */
3032 	if (c >= 0x20 && c <= 0x7E)
3033 		return (URLPATH);
3034 
3035 	/*
3036 	 * If the first octet of the MCL path is not an ASCII character
3037 	 * then it must be interpreted as a tag value that describes the
3038 	 * format of the remaining octets of the MCL path.
3039 	 *
3040 	 * If the first octet of the MCL path is 0x81 it is a query
3041 	 * for the security info.
3042 	 */
3043 	switch (c) {
3044 	case 0x80:	/* native path, i.e. MCL via mount protocol */
3045 		(*path)++;
3046 		return (NATIVEPATH);
3047 	case 0x81:	/* security query */
3048 		(*path)++;
3049 		return (SECURITY_QUERY);
3050 	default:
3051 		return (-1);
3052 	}
3053 }
3054 
3055 #define	fromhex(c)  ((c >= '0' && c <= '9') ? (c - '0') : \
3056 			((c >= 'A' && c <= 'F') ? (c - 'A' + 10) :\
3057 			((c >= 'a' && c <= 'f') ? (c - 'a' + 10) : 0)))
3058 
3059 /*
3060  * The implementation of URLparse guarantees that the final string will
3061  * fit in the original one. Replaces '%' occurrences followed by 2 characters
3062  * with its corresponding hexadecimal character.
3063  */
3064 static void
3065 URLparse(char *str)
3066 {
3067 	char *p, *q;
3068 
3069 	p = q = str;
3070 	while (*p) {
3071 		*q = *p;
3072 		if (*p++ == '%') {
3073 			if (*p) {
3074 				*q = fromhex(*p) * 16;
3075 				p++;
3076 				if (*p) {
3077 					*q += fromhex(*p);
3078 					p++;
3079 				}
3080 			}
3081 		}
3082 		q++;
3083 	}
3084 	*q = '\0';
3085 }
3086 
3087 
3088 /*
3089  * Get the export information for the lookup vnode, and verify its
3090  * useable.
3091  */
3092 int
3093 nfs_check_vpexi(vnode_t *mc_dvp, vnode_t *vp, cred_t *cr,
3094     struct exportinfo **exi)
3095 {
3096 	int walk;
3097 	int error = 0;
3098 
3099 	*exi = nfs_vptoexi(mc_dvp, vp, cr, &walk, NULL, FALSE);
3100 	if (*exi == NULL)
3101 		error = EACCES;
3102 	else {
3103 		/*
3104 		 * If nosub is set for this export then
3105 		 * a lookup relative to the public fh
3106 		 * must not terminate below the
3107 		 * exported directory.
3108 		 */
3109 		if ((*exi)->exi_export.ex_flags & EX_NOSUB && walk > 0)
3110 			error = EACCES;
3111 	}
3112 
3113 	return (error);
3114 }
3115 
3116 /*
3117  * Do the main work of handling HA-NFSv4 Resource Group failover on
3118  * Sun Cluster.
3119  * We need to detect whether any RG admin paths have been added or removed,
3120  * and adjust resources accordingly.
3121  * Currently we're using a very inefficient algorithm, ~ 2 * O(n**2). In
3122  * order to scale, the list and array of paths need to be held in more
3123  * suitable data structures.
3124  */
3125 static void
3126 hanfsv4_failover(void)
3127 {
3128 	int i, start_grace, numadded_paths = 0;
3129 	char **added_paths = NULL;
3130 	rfs4_dss_path_t *dss_path;
3131 
3132 	/*
3133 	 * Note: currently, rfs4_dss_pathlist cannot be NULL, since
3134 	 * it will always include an entry for NFS4_DSS_VAR_DIR. If we
3135 	 * make the latter dynamically specified too, the following will
3136 	 * need to be adjusted.
3137 	 */
3138 
3139 	/*
3140 	 * First, look for removed paths: RGs that have been failed-over
3141 	 * away from this node.
3142 	 * Walk the "currently-serving" rfs4_dss_pathlist and, for each
3143 	 * path, check if it is on the "passed-in" rfs4_dss_newpaths array
3144 	 * from nfsd. If not, that RG path has been removed.
3145 	 *
3146 	 * Note that nfsd has sorted rfs4_dss_newpaths for us, and removed
3147 	 * any duplicates.
3148 	 */
3149 	dss_path = rfs4_dss_pathlist;
3150 	do {
3151 		int found = 0;
3152 		char *path = dss_path->path;
3153 
3154 		/* used only for non-HA so may not be removed */
3155 		if (strcmp(path, NFS4_DSS_VAR_DIR) == 0) {
3156 			dss_path = dss_path->next;
3157 			continue;
3158 		}
3159 
3160 		for (i = 0; i < rfs4_dss_numnewpaths; i++) {
3161 			int cmpret;
3162 			char *newpath = rfs4_dss_newpaths[i];
3163 
3164 			/*
3165 			 * Since nfsd has sorted rfs4_dss_newpaths for us,
3166 			 * once the return from strcmp is negative we know
3167 			 * we've passed the point where "path" should be,
3168 			 * and can stop searching: "path" has been removed.
3169 			 */
3170 			cmpret = strcmp(path, newpath);
3171 			if (cmpret < 0)
3172 				break;
3173 			if (cmpret == 0) {
3174 				found = 1;
3175 				break;
3176 			}
3177 		}
3178 
3179 		if (found == 0) {
3180 			unsigned index = dss_path->index;
3181 			rfs4_servinst_t *sip = dss_path->sip;
3182 			rfs4_dss_path_t *path_next = dss_path->next;
3183 
3184 			/*
3185 			 * This path has been removed.
3186 			 * We must clear out the servinst reference to
3187 			 * it, since it's now owned by another
3188 			 * node: we should not attempt to touch it.
3189 			 */
3190 			ASSERT(dss_path == sip->dss_paths[index]);
3191 			sip->dss_paths[index] = NULL;
3192 
3193 			/* remove from "currently-serving" list, and destroy */
3194 			remque(dss_path);
3195 			/* allow for NUL */
3196 			kmem_free(dss_path->path, strlen(dss_path->path) + 1);
3197 			kmem_free(dss_path, sizeof (rfs4_dss_path_t));
3198 
3199 			dss_path = path_next;
3200 		} else {
3201 			/* path was found; not removed */
3202 			dss_path = dss_path->next;
3203 		}
3204 	} while (dss_path != rfs4_dss_pathlist);
3205 
3206 	/*
3207 	 * Now, look for added paths: RGs that have been failed-over
3208 	 * to this node.
3209 	 * Walk the "passed-in" rfs4_dss_newpaths array from nfsd and,
3210 	 * for each path, check if it is on the "currently-serving"
3211 	 * rfs4_dss_pathlist. If not, that RG path has been added.
3212 	 *
3213 	 * Note: we don't do duplicate detection here; nfsd does that for us.
3214 	 *
3215 	 * Note: numadded_paths <= rfs4_dss_numnewpaths, which gives us
3216 	 * an upper bound for the size needed for added_paths[numadded_paths].
3217 	 */
3218 
3219 	/* probably more space than we need, but guaranteed to be enough */
3220 	if (rfs4_dss_numnewpaths > 0) {
3221 		size_t sz = rfs4_dss_numnewpaths * sizeof (char *);
3222 		added_paths = kmem_zalloc(sz, KM_SLEEP);
3223 	}
3224 
3225 	/* walk the "passed-in" rfs4_dss_newpaths array from nfsd */
3226 	for (i = 0; i < rfs4_dss_numnewpaths; i++) {
3227 		int found = 0;
3228 		char *newpath = rfs4_dss_newpaths[i];
3229 
3230 		dss_path = rfs4_dss_pathlist;
3231 		do {
3232 			char *path = dss_path->path;
3233 
3234 			/* used only for non-HA */
3235 			if (strcmp(path, NFS4_DSS_VAR_DIR) == 0) {
3236 				dss_path = dss_path->next;
3237 				continue;
3238 			}
3239 
3240 			if (strncmp(path, newpath, strlen(path)) == 0) {
3241 				found = 1;
3242 				break;
3243 			}
3244 
3245 			dss_path = dss_path->next;
3246 		} while (dss_path != rfs4_dss_pathlist);
3247 
3248 		if (found == 0) {
3249 			added_paths[numadded_paths] = newpath;
3250 			numadded_paths++;
3251 		}
3252 	}
3253 
3254 	/* did we find any added paths? */
3255 	if (numadded_paths > 0) {
3256 		/* create a new server instance, and start its grace period */
3257 		start_grace = 1;
3258 		rfs4_servinst_create(start_grace, numadded_paths, added_paths);
3259 
3260 		/* read in the stable storage state from these paths */
3261 		rfs4_dss_readstate(numadded_paths, added_paths);
3262 
3263 		/*
3264 		 * Multiple failovers during a grace period will cause
3265 		 * clients of the same resource group to be partitioned
3266 		 * into different server instances, with different
3267 		 * grace periods.  Since clients of the same resource
3268 		 * group must be subject to the same grace period,
3269 		 * we need to reset all currently active grace periods.
3270 		 */
3271 		rfs4_grace_reset_all();
3272 	}
3273 
3274 	if (rfs4_dss_numnewpaths > 0)
3275 		kmem_free(added_paths, rfs4_dss_numnewpaths * sizeof (char *));
3276 }
3277 
3278 /*
3279  * Used by NFSv3 and NFSv4 server to query label of
3280  * a pathname component during lookup/access ops.
3281  */
3282 ts_label_t *
3283 nfs_getflabel(vnode_t *vp, struct exportinfo *exi)
3284 {
3285 	zone_t *zone;
3286 	ts_label_t *zone_label;
3287 	char *path;
3288 
3289 	mutex_enter(&vp->v_lock);
3290 	if (vp->v_path != NULL) {
3291 		zone = zone_find_by_any_path(vp->v_path, B_FALSE);
3292 		mutex_exit(&vp->v_lock);
3293 	} else {
3294 		/*
3295 		 * v_path not cached. Fall back on pathname of exported
3296 		 * file system as we rely on pathname from which we can
3297 		 * derive a label. The exported file system portion of
3298 		 * path is sufficient to obtain a label.
3299 		 */
3300 		path = exi->exi_export.ex_path;
3301 		if (path == NULL) {
3302 			mutex_exit(&vp->v_lock);
3303 			return (NULL);
3304 		}
3305 		zone = zone_find_by_any_path(path, B_FALSE);
3306 		mutex_exit(&vp->v_lock);
3307 	}
3308 	/*
3309 	 * Caller has verified that the file is either
3310 	 * exported or visible. So if the path falls in
3311 	 * global zone, admin_low is returned; otherwise
3312 	 * the zone's label is returned.
3313 	 */
3314 	zone_label = zone->zone_slabel;
3315 	label_hold(zone_label);
3316 	zone_rele(zone);
3317 	return (zone_label);
3318 }
3319 
3320 /*
3321  * TX NFS routine used by NFSv3 and NFSv4 to do label check
3322  * on client label and server's file object lable.
3323  */
3324 boolean_t
3325 do_rfs_label_check(bslabel_t *clabel, vnode_t *vp, int flag,
3326     struct exportinfo *exi)
3327 {
3328 	bslabel_t *slabel;
3329 	ts_label_t *tslabel;
3330 	boolean_t result;
3331 
3332 	if ((tslabel = nfs_getflabel(vp, exi)) == NULL) {
3333 		return (B_FALSE);
3334 	}
3335 	slabel = label2bslabel(tslabel);
3336 	DTRACE_PROBE4(tx__rfs__log__info__labelcheck, char *,
3337 	    "comparing server's file label(1) with client label(2) (vp(3))",
3338 	    bslabel_t *, slabel, bslabel_t *, clabel, vnode_t *, vp);
3339 
3340 	if (flag == EQUALITY_CHECK)
3341 		result = blequal(clabel, slabel);
3342 	else
3343 		result = bldominates(clabel, slabel);
3344 	label_rele(tslabel);
3345 	return (result);
3346 }
3347 
3348 /*
3349  * Callback function to return the loaned buffers.
3350  * Calls VOP_RETZCBUF() only after all uio_iov[]
3351  * buffers are returned. nu_ref maintains the count.
3352  */
3353 void
3354 rfs_free_xuio(void *free_arg)
3355 {
3356 	uint_t ref;
3357 	nfs_xuio_t *nfsuiop = (nfs_xuio_t *)free_arg;
3358 
3359 	ref = atomic_dec_uint_nv(&nfsuiop->nu_ref);
3360 
3361 	/*
3362 	 * Call VOP_RETZCBUF() only when all the iov buffers
3363 	 * are sent OTW.
3364 	 */
3365 	if (ref != 0)
3366 		return;
3367 
3368 	if (((uio_t *)nfsuiop)->uio_extflg & UIO_XUIO) {
3369 		(void) VOP_RETZCBUF(nfsuiop->nu_vp, (xuio_t *)free_arg, NULL,
3370 		    NULL);
3371 		VN_RELE(nfsuiop->nu_vp);
3372 	}
3373 
3374 	kmem_cache_free(nfs_xuio_cache, free_arg);
3375 }
3376 
3377 xuio_t *
3378 rfs_setup_xuio(vnode_t *vp)
3379 {
3380 	nfs_xuio_t *nfsuiop;
3381 
3382 	nfsuiop = kmem_cache_alloc(nfs_xuio_cache, KM_SLEEP);
3383 
3384 	bzero(nfsuiop, sizeof (nfs_xuio_t));
3385 	nfsuiop->nu_vp = vp;
3386 
3387 	/*
3388 	 * ref count set to 1. more may be added
3389 	 * if multiple mblks refer to multiple iov's.
3390 	 * This is done in uio_to_mblk().
3391 	 */
3392 
3393 	nfsuiop->nu_ref = 1;
3394 
3395 	nfsuiop->nu_frtn.free_func = rfs_free_xuio;
3396 	nfsuiop->nu_frtn.free_arg = (char *)nfsuiop;
3397 
3398 	nfsuiop->nu_uio.xu_type = UIOTYPE_ZEROCOPY;
3399 
3400 	return (&nfsuiop->nu_uio);
3401 }
3402 
3403 mblk_t *
3404 uio_to_mblk(uio_t *uiop)
3405 {
3406 	struct iovec *iovp;
3407 	int i;
3408 	mblk_t *mp, *mp1;
3409 	nfs_xuio_t *nfsuiop = (nfs_xuio_t *)uiop;
3410 
3411 	if (uiop->uio_iovcnt == 0)
3412 		return (NULL);
3413 
3414 	iovp = uiop->uio_iov;
3415 	mp = mp1 = esballoca((uchar_t *)iovp->iov_base, iovp->iov_len,
3416 	    BPRI_MED, &nfsuiop->nu_frtn);
3417 	ASSERT(mp != NULL);
3418 
3419 	mp->b_wptr += iovp->iov_len;
3420 	mp->b_datap->db_type = M_DATA;
3421 
3422 	for (i = 1; i < uiop->uio_iovcnt; i++) {
3423 		iovp = (uiop->uio_iov + i);
3424 
3425 		mp1->b_cont = esballoca(
3426 		    (uchar_t *)iovp->iov_base, iovp->iov_len, BPRI_MED,
3427 		    &nfsuiop->nu_frtn);
3428 
3429 		mp1 = mp1->b_cont;
3430 		ASSERT(mp1 != NULL);
3431 		mp1->b_wptr += iovp->iov_len;
3432 		mp1->b_datap->db_type = M_DATA;
3433 	}
3434 
3435 	nfsuiop->nu_ref = uiop->uio_iovcnt;
3436 
3437 	return (mp);
3438 }
3439 
3440 /*
3441  * Allocate memory to hold data for a read request of len bytes.
3442  *
3443  * We don't allocate buffers greater than kmem_max_cached in size to avoid
3444  * allocating memory from the kmem_oversized arena.  If we allocate oversized
3445  * buffers, we incur heavy cross-call activity when freeing these large buffers
3446  * in the TCP receive path. Note that we can't set b_wptr here since the
3447  * length of the data returned may differ from the length requested when
3448  * reading the end of a file; we set b_wptr in rfs_rndup_mblks() once the
3449  * length of the read is known.
3450  */
3451 mblk_t *
3452 rfs_read_alloc(uint_t len, struct iovec **iov, int *iovcnt)
3453 {
3454 	struct iovec *iovarr;
3455 	mblk_t *mp, **mpp = &mp;
3456 	size_t mpsize;
3457 	uint_t remain = len;
3458 	int i, err = 0;
3459 
3460 	*iovcnt = howmany(len, kmem_max_cached);
3461 
3462 	iovarr = kmem_alloc(*iovcnt * sizeof (struct iovec), KM_SLEEP);
3463 	*iov = iovarr;
3464 
3465 	for (i = 0; i < *iovcnt; remain -= mpsize, i++) {
3466 		ASSERT(remain <= len);
3467 		/*
3468 		 * We roundup the size we allocate to a multiple of
3469 		 * BYTES_PER_XDR_UNIT (4 bytes) so that the call to
3470 		 * xdrmblk_putmblk() never fails.
3471 		 */
3472 		ASSERT(kmem_max_cached % BYTES_PER_XDR_UNIT == 0);
3473 		mpsize = MIN(kmem_max_cached, remain);
3474 		*mpp = allocb_wait(RNDUP(mpsize), BPRI_MED, STR_NOSIG, &err);
3475 		ASSERT(*mpp != NULL);
3476 		ASSERT(err == 0);
3477 
3478 		iovarr[i].iov_base = (caddr_t)(*mpp)->b_rptr;
3479 		iovarr[i].iov_len = mpsize;
3480 		mpp = &(*mpp)->b_cont;
3481 	}
3482 	return (mp);
3483 }
3484 
3485 void
3486 rfs_rndup_mblks(mblk_t *mp, uint_t len, int buf_loaned)
3487 {
3488 	int i;
3489 	int alloc_err = 0;
3490 	mblk_t *rmp;
3491 	uint_t mpsize, remainder;
3492 
3493 	remainder = P2NPHASE(len, BYTES_PER_XDR_UNIT);
3494 
3495 	/*
3496 	 * Non copy-reduction case.  This function assumes that blocks were
3497 	 * allocated in multiples of BYTES_PER_XDR_UNIT bytes, which makes this
3498 	 * padding safe without bounds checking.
3499 	 */
3500 	if (!buf_loaned) {
3501 		/*
3502 		 * Set the size of each mblk in the chain until we've consumed
3503 		 * the specified length for all but the last one.
3504 		 */
3505 		while ((mpsize = MBLKSIZE(mp)) < len) {
3506 			ASSERT(mpsize % BYTES_PER_XDR_UNIT == 0);
3507 			mp->b_wptr += mpsize;
3508 			len -= mpsize;
3509 			mp = mp->b_cont;
3510 			ASSERT(mp != NULL);
3511 		}
3512 
3513 		ASSERT(len + remainder <= mpsize);
3514 		mp->b_wptr += len;
3515 		for (i = 0; i < remainder; i++)
3516 			*mp->b_wptr++ = '\0';
3517 		return;
3518 	}
3519 
3520 	/*
3521 	 * No remainder mblk required.
3522 	 */
3523 	if (remainder == 0)
3524 		return;
3525 
3526 	/*
3527 	 * Get to the last mblk in the chain.
3528 	 */
3529 	while (mp->b_cont != NULL)
3530 		mp = mp->b_cont;
3531 
3532 	/*
3533 	 * In case of copy-reduction mblks, the size of the mblks are fixed
3534 	 * and are of the size of the loaned buffers.  Allocate a remainder
3535 	 * mblk and chain it to the data buffers. This is sub-optimal, but not
3536 	 * expected to happen commonly.
3537 	 */
3538 	rmp = allocb_wait(remainder, BPRI_MED, STR_NOSIG, &alloc_err);
3539 	ASSERT(rmp != NULL);
3540 	ASSERT(alloc_err == 0);
3541 
3542 	for (i = 0; i < remainder; i++)
3543 		*rmp->b_wptr++ = '\0';
3544 
3545 	rmp->b_datap->db_type = M_DATA;
3546 	mp->b_cont = rmp;
3547 }
3548