nfs_nfsdport.c revision 299208
1/*-
2 * Copyright (c) 1989, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Rick Macklem at The University of Guelph.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 4. Neither the name of the University nor the names of its contributors
17 *    may be used to endorse or promote products derived from this software
18 *    without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 *
32 */
33
34#include <sys/cdefs.h>
35__FBSDID("$FreeBSD: stable/10/sys/fs/nfsserver/nfs_nfsdport.c 299208 2016-05-07 00:02:28Z rmacklem $");
36
37#include <sys/capsicum.h>
38
39/*
40 * Functions that perform the vfs operations required by the routines in
41 * nfsd_serv.c. It is hoped that this change will make the server more
42 * portable.
43 */
44
45#include <fs/nfs/nfsport.h>
46#include <sys/hash.h>
47#include <sys/sysctl.h>
48#include <nlm/nlm_prot.h>
49#include <nlm/nlm.h>
50
51FEATURE(nfsd, "NFSv4 server");
52
53extern u_int32_t newnfs_true, newnfs_false, newnfs_xdrneg1;
54extern int nfsrv_useacl;
55extern int newnfs_numnfsd;
56extern struct mount nfsv4root_mnt;
57extern struct nfsrv_stablefirst nfsrv_stablefirst;
58extern void (*nfsd_call_servertimer)(void);
59extern SVCPOOL	*nfsrvd_pool;
60extern struct nfsv4lock nfsd_suspend_lock;
61extern struct nfsclienthashhead *nfsclienthash;
62extern struct nfslockhashhead *nfslockhash;
63extern struct nfssessionhash *nfssessionhash;
64extern int nfsrv_sessionhashsize;
65struct vfsoptlist nfsv4root_opt, nfsv4root_newopt;
66NFSDLOCKMUTEX;
67struct nfsrchash_bucket nfsrchash_table[NFSRVCACHE_HASHSIZE];
68struct nfsrchash_bucket nfsrcahash_table[NFSRVCACHE_HASHSIZE];
69struct mtx nfsrc_udpmtx;
70struct mtx nfs_v4root_mutex;
71struct nfsrvfh nfs_rootfh, nfs_pubfh;
72int nfs_pubfhset = 0, nfs_rootfhset = 0;
73struct proc *nfsd_master_proc = NULL;
74int nfsd_debuglevel = 0;
75static pid_t nfsd_master_pid = (pid_t)-1;
76static char nfsd_master_comm[MAXCOMLEN + 1];
77static struct timeval nfsd_master_start;
78static uint32_t nfsv4_sysid = 0;
79
80static int nfssvc_srvcall(struct thread *, struct nfssvc_args *,
81    struct ucred *);
82
83int nfsrv_enable_crossmntpt = 1;
84static int nfs_commit_blks;
85static int nfs_commit_miss;
86extern int nfsrv_issuedelegs;
87extern int nfsrv_dolocallocks;
88extern int nfsd_enable_stringtouid;
89
90SYSCTL_NODE(_vfs, OID_AUTO, nfsd, CTLFLAG_RW, 0, "New NFS server");
91SYSCTL_INT(_vfs_nfsd, OID_AUTO, mirrormnt, CTLFLAG_RW,
92    &nfsrv_enable_crossmntpt, 0, "Enable nfsd to cross mount points");
93SYSCTL_INT(_vfs_nfsd, OID_AUTO, commit_blks, CTLFLAG_RW, &nfs_commit_blks,
94    0, "");
95SYSCTL_INT(_vfs_nfsd, OID_AUTO, commit_miss, CTLFLAG_RW, &nfs_commit_miss,
96    0, "");
97SYSCTL_INT(_vfs_nfsd, OID_AUTO, issue_delegations, CTLFLAG_RW,
98    &nfsrv_issuedelegs, 0, "Enable nfsd to issue delegations");
99SYSCTL_INT(_vfs_nfsd, OID_AUTO, enable_locallocks, CTLFLAG_RW,
100    &nfsrv_dolocallocks, 0, "Enable nfsd to acquire local locks on files");
101SYSCTL_INT(_vfs_nfsd, OID_AUTO, debuglevel, CTLFLAG_RW, &nfsd_debuglevel,
102    0, "Debug level for new nfs server");
103SYSCTL_INT(_vfs_nfsd, OID_AUTO, enable_stringtouid, CTLFLAG_RW,
104    &nfsd_enable_stringtouid, 0, "Enable nfsd to accept numeric owner_names");
105
106#define	MAX_REORDERED_RPC	16
107#define	NUM_HEURISTIC		1031
108#define	NHUSE_INIT		64
109#define	NHUSE_INC		16
110#define	NHUSE_MAX		2048
111
112static struct nfsheur {
113	struct vnode *nh_vp;	/* vp to match (unreferenced pointer) */
114	off_t nh_nextoff;	/* next offset for sequential detection */
115	int nh_use;		/* use count for selection */
116	int nh_seqcount;	/* heuristic */
117} nfsheur[NUM_HEURISTIC];
118
119
120/*
121 * Heuristic to detect sequential operation.
122 */
123static struct nfsheur *
124nfsrv_sequential_heuristic(struct uio *uio, struct vnode *vp)
125{
126	struct nfsheur *nh;
127	int hi, try;
128
129	/* Locate best candidate. */
130	try = 32;
131	hi = ((int)(vm_offset_t)vp / sizeof(struct vnode)) % NUM_HEURISTIC;
132	nh = &nfsheur[hi];
133	while (try--) {
134		if (nfsheur[hi].nh_vp == vp) {
135			nh = &nfsheur[hi];
136			break;
137		}
138		if (nfsheur[hi].nh_use > 0)
139			--nfsheur[hi].nh_use;
140		hi = (hi + 1) % NUM_HEURISTIC;
141		if (nfsheur[hi].nh_use < nh->nh_use)
142			nh = &nfsheur[hi];
143	}
144
145	/* Initialize hint if this is a new file. */
146	if (nh->nh_vp != vp) {
147		nh->nh_vp = vp;
148		nh->nh_nextoff = uio->uio_offset;
149		nh->nh_use = NHUSE_INIT;
150		if (uio->uio_offset == 0)
151			nh->nh_seqcount = 4;
152		else
153			nh->nh_seqcount = 1;
154	}
155
156	/* Calculate heuristic. */
157	if ((uio->uio_offset == 0 && nh->nh_seqcount > 0) ||
158	    uio->uio_offset == nh->nh_nextoff) {
159		/* See comments in vfs_vnops.c:sequential_heuristic(). */
160		nh->nh_seqcount += howmany(uio->uio_resid, 16384);
161		if (nh->nh_seqcount > IO_SEQMAX)
162			nh->nh_seqcount = IO_SEQMAX;
163	} else if (qabs(uio->uio_offset - nh->nh_nextoff) <= MAX_REORDERED_RPC *
164	    imax(vp->v_mount->mnt_stat.f_iosize, uio->uio_resid)) {
165		/* Probably a reordered RPC, leave seqcount alone. */
166	} else if (nh->nh_seqcount > 1) {
167		nh->nh_seqcount /= 2;
168	} else {
169		nh->nh_seqcount = 0;
170	}
171	nh->nh_use += NHUSE_INC;
172	if (nh->nh_use > NHUSE_MAX)
173		nh->nh_use = NHUSE_MAX;
174	return (nh);
175}
176
177/*
178 * Get attributes into nfsvattr structure.
179 */
180int
181nfsvno_getattr(struct vnode *vp, struct nfsvattr *nvap, struct ucred *cred,
182    struct thread *p, int vpislocked)
183{
184	int error, lockedit = 0;
185
186	if (vpislocked == 0) {
187		/*
188		 * When vpislocked == 0, the vnode is either exclusively
189		 * locked by this thread or not locked by this thread.
190		 * As such, shared lock it, if not exclusively locked.
191		 */
192		if (NFSVOPISLOCKED(vp) != LK_EXCLUSIVE) {
193			lockedit = 1;
194			NFSVOPLOCK(vp, LK_SHARED | LK_RETRY);
195		}
196	}
197	error = VOP_GETATTR(vp, &nvap->na_vattr, cred);
198	if (lockedit != 0)
199		NFSVOPUNLOCK(vp, 0);
200
201	NFSEXITCODE(error);
202	return (error);
203}
204
205/*
206 * Get a file handle for a vnode.
207 */
208int
209nfsvno_getfh(struct vnode *vp, fhandle_t *fhp, struct thread *p)
210{
211	int error;
212
213	NFSBZERO((caddr_t)fhp, sizeof(fhandle_t));
214	fhp->fh_fsid = vp->v_mount->mnt_stat.f_fsid;
215	error = VOP_VPTOFH(vp, &fhp->fh_fid);
216
217	NFSEXITCODE(error);
218	return (error);
219}
220
221/*
222 * Perform access checking for vnodes obtained from file handles that would
223 * refer to files already opened by a Unix client. You cannot just use
224 * vn_writechk() and VOP_ACCESSX() for two reasons.
225 * 1 - You must check for exported rdonly as well as MNT_RDONLY for the write
226 *     case.
227 * 2 - The owner is to be given access irrespective of mode bits for some
228 *     operations, so that processes that chmod after opening a file don't
229 *     break.
230 */
231int
232nfsvno_accchk(struct vnode *vp, accmode_t accmode, struct ucred *cred,
233    struct nfsexstuff *exp, struct thread *p, int override, int vpislocked,
234    u_int32_t *supportedtypep)
235{
236	struct vattr vattr;
237	int error = 0, getret = 0;
238
239	if (vpislocked == 0) {
240		if (NFSVOPLOCK(vp, LK_SHARED) != 0) {
241			error = EPERM;
242			goto out;
243		}
244	}
245	if (accmode & VWRITE) {
246		/* Just vn_writechk() changed to check rdonly */
247		/*
248		 * Disallow write attempts on read-only file systems;
249		 * unless the file is a socket or a block or character
250		 * device resident on the file system.
251		 */
252		if (NFSVNO_EXRDONLY(exp) ||
253		    (vp->v_mount->mnt_flag & MNT_RDONLY)) {
254			switch (vp->v_type) {
255			case VREG:
256			case VDIR:
257			case VLNK:
258				error = EROFS;
259			default:
260				break;
261			}
262		}
263		/*
264		 * If there's shared text associated with
265		 * the inode, try to free it up once.  If
266		 * we fail, we can't allow writing.
267		 */
268		if (VOP_IS_TEXT(vp) && error == 0)
269			error = ETXTBSY;
270	}
271	if (error != 0) {
272		if (vpislocked == 0)
273			NFSVOPUNLOCK(vp, 0);
274		goto out;
275	}
276
277	/*
278	 * Should the override still be applied when ACLs are enabled?
279	 */
280	error = VOP_ACCESSX(vp, accmode, cred, p);
281	if (error != 0 && (accmode & (VDELETE | VDELETE_CHILD))) {
282		/*
283		 * Try again with VEXPLICIT_DENY, to see if the test for
284		 * deletion is supported.
285		 */
286		error = VOP_ACCESSX(vp, accmode | VEXPLICIT_DENY, cred, p);
287		if (error == 0) {
288			if (vp->v_type == VDIR) {
289				accmode &= ~(VDELETE | VDELETE_CHILD);
290				accmode |= VWRITE;
291				error = VOP_ACCESSX(vp, accmode, cred, p);
292			} else if (supportedtypep != NULL) {
293				*supportedtypep &= ~NFSACCESS_DELETE;
294			}
295		}
296	}
297
298	/*
299	 * Allow certain operations for the owner (reads and writes
300	 * on files that are already open).
301	 */
302	if (override != NFSACCCHK_NOOVERRIDE &&
303	    (error == EPERM || error == EACCES)) {
304		if (cred->cr_uid == 0 && (override & NFSACCCHK_ALLOWROOT))
305			error = 0;
306		else if (override & NFSACCCHK_ALLOWOWNER) {
307			getret = VOP_GETATTR(vp, &vattr, cred);
308			if (getret == 0 && cred->cr_uid == vattr.va_uid)
309				error = 0;
310		}
311	}
312	if (vpislocked == 0)
313		NFSVOPUNLOCK(vp, 0);
314
315out:
316	NFSEXITCODE(error);
317	return (error);
318}
319
320/*
321 * Set attribute(s) vnop.
322 */
323int
324nfsvno_setattr(struct vnode *vp, struct nfsvattr *nvap, struct ucred *cred,
325    struct thread *p, struct nfsexstuff *exp)
326{
327	int error;
328
329	error = VOP_SETATTR(vp, &nvap->na_vattr, cred);
330	NFSEXITCODE(error);
331	return (error);
332}
333
334/*
335 * Set up nameidata for a lookup() call and do it.
336 */
337int
338nfsvno_namei(struct nfsrv_descript *nd, struct nameidata *ndp,
339    struct vnode *dp, int islocked, struct nfsexstuff *exp, struct thread *p,
340    struct vnode **retdirp)
341{
342	struct componentname *cnp = &ndp->ni_cnd;
343	int i;
344	struct iovec aiov;
345	struct uio auio;
346	int lockleaf = (cnp->cn_flags & LOCKLEAF) != 0, linklen;
347	int error = 0, crossmnt;
348	char *cp;
349
350	*retdirp = NULL;
351	cnp->cn_nameptr = cnp->cn_pnbuf;
352	ndp->ni_strictrelative = 0;
353	/*
354	 * Extract and set starting directory.
355	 */
356	if (dp->v_type != VDIR) {
357		if (islocked)
358			vput(dp);
359		else
360			vrele(dp);
361		nfsvno_relpathbuf(ndp);
362		error = ENOTDIR;
363		goto out1;
364	}
365	if (islocked)
366		NFSVOPUNLOCK(dp, 0);
367	VREF(dp);
368	*retdirp = dp;
369	if (NFSVNO_EXRDONLY(exp))
370		cnp->cn_flags |= RDONLY;
371	ndp->ni_segflg = UIO_SYSSPACE;
372	crossmnt = 1;
373
374	if (nd->nd_flag & ND_PUBLOOKUP) {
375		ndp->ni_loopcnt = 0;
376		if (cnp->cn_pnbuf[0] == '/') {
377			vrele(dp);
378			/*
379			 * Check for degenerate pathnames here, since lookup()
380			 * panics on them.
381			 */
382			for (i = 1; i < ndp->ni_pathlen; i++)
383				if (cnp->cn_pnbuf[i] != '/')
384					break;
385			if (i == ndp->ni_pathlen) {
386				error = NFSERR_ACCES;
387				goto out;
388			}
389			dp = rootvnode;
390			VREF(dp);
391		}
392	} else if ((nfsrv_enable_crossmntpt == 0 && NFSVNO_EXPORTED(exp)) ||
393	    (nd->nd_flag & ND_NFSV4) == 0) {
394		/*
395		 * Only cross mount points for NFSv4 when doing a
396		 * mount while traversing the file system above
397		 * the mount point, unless nfsrv_enable_crossmntpt is set.
398		 */
399		cnp->cn_flags |= NOCROSSMOUNT;
400		crossmnt = 0;
401	}
402
403	/*
404	 * Initialize for scan, set ni_startdir and bump ref on dp again
405	 * because lookup() will dereference ni_startdir.
406	 */
407
408	cnp->cn_thread = p;
409	ndp->ni_startdir = dp;
410	ndp->ni_rootdir = rootvnode;
411	ndp->ni_topdir = NULL;
412
413	if (!lockleaf)
414		cnp->cn_flags |= LOCKLEAF;
415	for (;;) {
416		cnp->cn_nameptr = cnp->cn_pnbuf;
417		/*
418		 * Call lookup() to do the real work.  If an error occurs,
419		 * ndp->ni_vp and ni_dvp are left uninitialized or NULL and
420		 * we do not have to dereference anything before returning.
421		 * In either case ni_startdir will be dereferenced and NULLed
422		 * out.
423		 */
424		error = lookup(ndp);
425		if (error)
426			break;
427
428		/*
429		 * Check for encountering a symbolic link.  Trivial
430		 * termination occurs if no symlink encountered.
431		 */
432		if ((cnp->cn_flags & ISSYMLINK) == 0) {
433			if ((cnp->cn_flags & (SAVENAME | SAVESTART)) == 0)
434				nfsvno_relpathbuf(ndp);
435			if (ndp->ni_vp && !lockleaf)
436				NFSVOPUNLOCK(ndp->ni_vp, 0);
437			break;
438		}
439
440		/*
441		 * Validate symlink
442		 */
443		if ((cnp->cn_flags & LOCKPARENT) && ndp->ni_pathlen == 1)
444			NFSVOPUNLOCK(ndp->ni_dvp, 0);
445		if (!(nd->nd_flag & ND_PUBLOOKUP)) {
446			error = EINVAL;
447			goto badlink2;
448		}
449
450		if (ndp->ni_loopcnt++ >= MAXSYMLINKS) {
451			error = ELOOP;
452			goto badlink2;
453		}
454		if (ndp->ni_pathlen > 1)
455			cp = uma_zalloc(namei_zone, M_WAITOK);
456		else
457			cp = cnp->cn_pnbuf;
458		aiov.iov_base = cp;
459		aiov.iov_len = MAXPATHLEN;
460		auio.uio_iov = &aiov;
461		auio.uio_iovcnt = 1;
462		auio.uio_offset = 0;
463		auio.uio_rw = UIO_READ;
464		auio.uio_segflg = UIO_SYSSPACE;
465		auio.uio_td = NULL;
466		auio.uio_resid = MAXPATHLEN;
467		error = VOP_READLINK(ndp->ni_vp, &auio, cnp->cn_cred);
468		if (error) {
469		badlink1:
470			if (ndp->ni_pathlen > 1)
471				uma_zfree(namei_zone, cp);
472		badlink2:
473			vrele(ndp->ni_dvp);
474			vput(ndp->ni_vp);
475			break;
476		}
477		linklen = MAXPATHLEN - auio.uio_resid;
478		if (linklen == 0) {
479			error = ENOENT;
480			goto badlink1;
481		}
482		if (linklen + ndp->ni_pathlen >= MAXPATHLEN) {
483			error = ENAMETOOLONG;
484			goto badlink1;
485		}
486
487		/*
488		 * Adjust or replace path
489		 */
490		if (ndp->ni_pathlen > 1) {
491			NFSBCOPY(ndp->ni_next, cp + linklen, ndp->ni_pathlen);
492			uma_zfree(namei_zone, cnp->cn_pnbuf);
493			cnp->cn_pnbuf = cp;
494		} else
495			cnp->cn_pnbuf[linklen] = '\0';
496		ndp->ni_pathlen += linklen;
497
498		/*
499		 * Cleanup refs for next loop and check if root directory
500		 * should replace current directory.  Normally ni_dvp
501		 * becomes the new base directory and is cleaned up when
502		 * we loop.  Explicitly null pointers after invalidation
503		 * to clarify operation.
504		 */
505		vput(ndp->ni_vp);
506		ndp->ni_vp = NULL;
507
508		if (cnp->cn_pnbuf[0] == '/') {
509			vrele(ndp->ni_dvp);
510			ndp->ni_dvp = ndp->ni_rootdir;
511			VREF(ndp->ni_dvp);
512		}
513		ndp->ni_startdir = ndp->ni_dvp;
514		ndp->ni_dvp = NULL;
515	}
516	if (!lockleaf)
517		cnp->cn_flags &= ~LOCKLEAF;
518
519out:
520	if (error) {
521		nfsvno_relpathbuf(ndp);
522		ndp->ni_vp = NULL;
523		ndp->ni_dvp = NULL;
524		ndp->ni_startdir = NULL;
525	} else if ((ndp->ni_cnd.cn_flags & (WANTPARENT|LOCKPARENT)) == 0) {
526		ndp->ni_dvp = NULL;
527	}
528
529out1:
530	NFSEXITCODE2(error, nd);
531	return (error);
532}
533
534/*
535 * Set up a pathname buffer and return a pointer to it and, optionally
536 * set a hash pointer.
537 */
538void
539nfsvno_setpathbuf(struct nameidata *ndp, char **bufpp, u_long **hashpp)
540{
541	struct componentname *cnp = &ndp->ni_cnd;
542
543	cnp->cn_flags |= (NOMACCHECK | HASBUF);
544	cnp->cn_pnbuf = uma_zalloc(namei_zone, M_WAITOK);
545	if (hashpp != NULL)
546		*hashpp = NULL;
547	*bufpp = cnp->cn_pnbuf;
548}
549
550/*
551 * Release the above path buffer, if not released by nfsvno_namei().
552 */
553void
554nfsvno_relpathbuf(struct nameidata *ndp)
555{
556
557	if ((ndp->ni_cnd.cn_flags & HASBUF) == 0)
558		panic("nfsrelpath");
559	uma_zfree(namei_zone, ndp->ni_cnd.cn_pnbuf);
560	ndp->ni_cnd.cn_flags &= ~HASBUF;
561}
562
563/*
564 * Readlink vnode op into an mbuf list.
565 */
566int
567nfsvno_readlink(struct vnode *vp, struct ucred *cred, struct thread *p,
568    struct mbuf **mpp, struct mbuf **mpendp, int *lenp)
569{
570	struct iovec iv[(NFS_MAXPATHLEN+MLEN-1)/MLEN];
571	struct iovec *ivp = iv;
572	struct uio io, *uiop = &io;
573	struct mbuf *mp, *mp2 = NULL, *mp3 = NULL;
574	int i, len, tlen, error = 0;
575
576	len = 0;
577	i = 0;
578	while (len < NFS_MAXPATHLEN) {
579		NFSMGET(mp);
580		MCLGET(mp, M_WAITOK);
581		mp->m_len = NFSMSIZ(mp);
582		if (len == 0) {
583			mp3 = mp2 = mp;
584		} else {
585			mp2->m_next = mp;
586			mp2 = mp;
587		}
588		if ((len + mp->m_len) > NFS_MAXPATHLEN) {
589			mp->m_len = NFS_MAXPATHLEN - len;
590			len = NFS_MAXPATHLEN;
591		} else {
592			len += mp->m_len;
593		}
594		ivp->iov_base = mtod(mp, caddr_t);
595		ivp->iov_len = mp->m_len;
596		i++;
597		ivp++;
598	}
599	uiop->uio_iov = iv;
600	uiop->uio_iovcnt = i;
601	uiop->uio_offset = 0;
602	uiop->uio_resid = len;
603	uiop->uio_rw = UIO_READ;
604	uiop->uio_segflg = UIO_SYSSPACE;
605	uiop->uio_td = NULL;
606	error = VOP_READLINK(vp, uiop, cred);
607	if (error) {
608		m_freem(mp3);
609		*lenp = 0;
610		goto out;
611	}
612	if (uiop->uio_resid > 0) {
613		len -= uiop->uio_resid;
614		tlen = NFSM_RNDUP(len);
615		nfsrv_adj(mp3, NFS_MAXPATHLEN - tlen, tlen - len);
616	}
617	*lenp = len;
618	*mpp = mp3;
619	*mpendp = mp;
620
621out:
622	NFSEXITCODE(error);
623	return (error);
624}
625
626/*
627 * Read vnode op call into mbuf list.
628 */
629int
630nfsvno_read(struct vnode *vp, off_t off, int cnt, struct ucred *cred,
631    struct thread *p, struct mbuf **mpp, struct mbuf **mpendp)
632{
633	struct mbuf *m;
634	int i;
635	struct iovec *iv;
636	struct iovec *iv2;
637	int error = 0, len, left, siz, tlen, ioflag = 0;
638	struct mbuf *m2 = NULL, *m3;
639	struct uio io, *uiop = &io;
640	struct nfsheur *nh;
641
642	len = left = NFSM_RNDUP(cnt);
643	m3 = NULL;
644	/*
645	 * Generate the mbuf list with the uio_iov ref. to it.
646	 */
647	i = 0;
648	while (left > 0) {
649		NFSMGET(m);
650		MCLGET(m, M_WAITOK);
651		m->m_len = 0;
652		siz = min(M_TRAILINGSPACE(m), left);
653		left -= siz;
654		i++;
655		if (m3)
656			m2->m_next = m;
657		else
658			m3 = m;
659		m2 = m;
660	}
661	MALLOC(iv, struct iovec *, i * sizeof (struct iovec),
662	    M_TEMP, M_WAITOK);
663	uiop->uio_iov = iv2 = iv;
664	m = m3;
665	left = len;
666	i = 0;
667	while (left > 0) {
668		if (m == NULL)
669			panic("nfsvno_read iov");
670		siz = min(M_TRAILINGSPACE(m), left);
671		if (siz > 0) {
672			iv->iov_base = mtod(m, caddr_t) + m->m_len;
673			iv->iov_len = siz;
674			m->m_len += siz;
675			left -= siz;
676			iv++;
677			i++;
678		}
679		m = m->m_next;
680	}
681	uiop->uio_iovcnt = i;
682	uiop->uio_offset = off;
683	uiop->uio_resid = len;
684	uiop->uio_rw = UIO_READ;
685	uiop->uio_segflg = UIO_SYSSPACE;
686	uiop->uio_td = NULL;
687	nh = nfsrv_sequential_heuristic(uiop, vp);
688	ioflag |= nh->nh_seqcount << IO_SEQSHIFT;
689	error = VOP_READ(vp, uiop, IO_NODELOCKED | ioflag, cred);
690	FREE((caddr_t)iv2, M_TEMP);
691	if (error) {
692		m_freem(m3);
693		*mpp = NULL;
694		goto out;
695	}
696	nh->nh_nextoff = uiop->uio_offset;
697	tlen = len - uiop->uio_resid;
698	cnt = cnt < tlen ? cnt : tlen;
699	tlen = NFSM_RNDUP(cnt);
700	if (tlen == 0) {
701		m_freem(m3);
702		m3 = NULL;
703	} else if (len != tlen || tlen != cnt)
704		nfsrv_adj(m3, len - tlen, tlen - cnt);
705	*mpp = m3;
706	*mpendp = m2;
707
708out:
709	NFSEXITCODE(error);
710	return (error);
711}
712
713/*
714 * Write vnode op from an mbuf list.
715 */
716int
717nfsvno_write(struct vnode *vp, off_t off, int retlen, int cnt, int stable,
718    struct mbuf *mp, char *cp, struct ucred *cred, struct thread *p)
719{
720	struct iovec *ivp;
721	int i, len;
722	struct iovec *iv;
723	int ioflags, error;
724	struct uio io, *uiop = &io;
725	struct nfsheur *nh;
726
727	MALLOC(ivp, struct iovec *, cnt * sizeof (struct iovec), M_TEMP,
728	    M_WAITOK);
729	uiop->uio_iov = iv = ivp;
730	uiop->uio_iovcnt = cnt;
731	i = mtod(mp, caddr_t) + mp->m_len - cp;
732	len = retlen;
733	while (len > 0) {
734		if (mp == NULL)
735			panic("nfsvno_write");
736		if (i > 0) {
737			i = min(i, len);
738			ivp->iov_base = cp;
739			ivp->iov_len = i;
740			ivp++;
741			len -= i;
742		}
743		mp = mp->m_next;
744		if (mp) {
745			i = mp->m_len;
746			cp = mtod(mp, caddr_t);
747		}
748	}
749
750	if (stable == NFSWRITE_UNSTABLE)
751		ioflags = IO_NODELOCKED;
752	else
753		ioflags = (IO_SYNC | IO_NODELOCKED);
754	uiop->uio_resid = retlen;
755	uiop->uio_rw = UIO_WRITE;
756	uiop->uio_segflg = UIO_SYSSPACE;
757	NFSUIOPROC(uiop, p);
758	uiop->uio_offset = off;
759	nh = nfsrv_sequential_heuristic(uiop, vp);
760	ioflags |= nh->nh_seqcount << IO_SEQSHIFT;
761	error = VOP_WRITE(vp, uiop, ioflags, cred);
762	if (error == 0)
763		nh->nh_nextoff = uiop->uio_offset;
764	FREE((caddr_t)iv, M_TEMP);
765
766	NFSEXITCODE(error);
767	return (error);
768}
769
770/*
771 * Common code for creating a regular file (plus special files for V2).
772 */
773int
774nfsvno_createsub(struct nfsrv_descript *nd, struct nameidata *ndp,
775    struct vnode **vpp, struct nfsvattr *nvap, int *exclusive_flagp,
776    int32_t *cverf, NFSDEV_T rdev, struct thread *p, struct nfsexstuff *exp)
777{
778	u_quad_t tempsize;
779	int error;
780
781	error = nd->nd_repstat;
782	if (!error && ndp->ni_vp == NULL) {
783		if (nvap->na_type == VREG || nvap->na_type == VSOCK) {
784			vrele(ndp->ni_startdir);
785			error = VOP_CREATE(ndp->ni_dvp,
786			    &ndp->ni_vp, &ndp->ni_cnd, &nvap->na_vattr);
787			vput(ndp->ni_dvp);
788			nfsvno_relpathbuf(ndp);
789			if (!error) {
790				if (*exclusive_flagp) {
791					*exclusive_flagp = 0;
792					NFSVNO_ATTRINIT(nvap);
793					nvap->na_atime.tv_sec = cverf[0];
794					nvap->na_atime.tv_nsec = cverf[1];
795					error = VOP_SETATTR(ndp->ni_vp,
796					    &nvap->na_vattr, nd->nd_cred);
797					if (error != 0) {
798						vput(ndp->ni_vp);
799						ndp->ni_vp = NULL;
800						error = NFSERR_NOTSUPP;
801					}
802				}
803			}
804		/*
805		 * NFS V2 Only. nfsrvd_mknod() does this for V3.
806		 * (This implies, just get out on an error.)
807		 */
808		} else if (nvap->na_type == VCHR || nvap->na_type == VBLK ||
809			nvap->na_type == VFIFO) {
810			if (nvap->na_type == VCHR && rdev == 0xffffffff)
811				nvap->na_type = VFIFO;
812                        if (nvap->na_type != VFIFO &&
813			    (error = priv_check_cred(nd->nd_cred,
814			     PRIV_VFS_MKNOD_DEV, 0))) {
815				vrele(ndp->ni_startdir);
816				nfsvno_relpathbuf(ndp);
817				vput(ndp->ni_dvp);
818				goto out;
819			}
820			nvap->na_rdev = rdev;
821			error = VOP_MKNOD(ndp->ni_dvp, &ndp->ni_vp,
822			    &ndp->ni_cnd, &nvap->na_vattr);
823			vput(ndp->ni_dvp);
824			nfsvno_relpathbuf(ndp);
825			vrele(ndp->ni_startdir);
826			if (error)
827				goto out;
828		} else {
829			vrele(ndp->ni_startdir);
830			nfsvno_relpathbuf(ndp);
831			vput(ndp->ni_dvp);
832			error = ENXIO;
833			goto out;
834		}
835		*vpp = ndp->ni_vp;
836	} else {
837		/*
838		 * Handle cases where error is already set and/or
839		 * the file exists.
840		 * 1 - clean up the lookup
841		 * 2 - iff !error and na_size set, truncate it
842		 */
843		vrele(ndp->ni_startdir);
844		nfsvno_relpathbuf(ndp);
845		*vpp = ndp->ni_vp;
846		if (ndp->ni_dvp == *vpp)
847			vrele(ndp->ni_dvp);
848		else
849			vput(ndp->ni_dvp);
850		if (!error && nvap->na_size != VNOVAL) {
851			error = nfsvno_accchk(*vpp, VWRITE,
852			    nd->nd_cred, exp, p, NFSACCCHK_NOOVERRIDE,
853			    NFSACCCHK_VPISLOCKED, NULL);
854			if (!error) {
855				tempsize = nvap->na_size;
856				NFSVNO_ATTRINIT(nvap);
857				nvap->na_size = tempsize;
858				error = VOP_SETATTR(*vpp,
859				    &nvap->na_vattr, nd->nd_cred);
860			}
861		}
862		if (error)
863			vput(*vpp);
864	}
865
866out:
867	NFSEXITCODE(error);
868	return (error);
869}
870
871/*
872 * Do a mknod vnode op.
873 */
874int
875nfsvno_mknod(struct nameidata *ndp, struct nfsvattr *nvap, struct ucred *cred,
876    struct thread *p)
877{
878	int error = 0;
879	enum vtype vtyp;
880
881	vtyp = nvap->na_type;
882	/*
883	 * Iff doesn't exist, create it.
884	 */
885	if (ndp->ni_vp) {
886		vrele(ndp->ni_startdir);
887		nfsvno_relpathbuf(ndp);
888		vput(ndp->ni_dvp);
889		vrele(ndp->ni_vp);
890		error = EEXIST;
891		goto out;
892	}
893	if (vtyp != VCHR && vtyp != VBLK && vtyp != VSOCK && vtyp != VFIFO) {
894		vrele(ndp->ni_startdir);
895		nfsvno_relpathbuf(ndp);
896		vput(ndp->ni_dvp);
897		error = NFSERR_BADTYPE;
898		goto out;
899	}
900	if (vtyp == VSOCK) {
901		vrele(ndp->ni_startdir);
902		error = VOP_CREATE(ndp->ni_dvp, &ndp->ni_vp,
903		    &ndp->ni_cnd, &nvap->na_vattr);
904		vput(ndp->ni_dvp);
905		nfsvno_relpathbuf(ndp);
906	} else {
907		if (nvap->na_type != VFIFO &&
908		    (error = priv_check_cred(cred, PRIV_VFS_MKNOD_DEV, 0))) {
909			vrele(ndp->ni_startdir);
910			nfsvno_relpathbuf(ndp);
911			vput(ndp->ni_dvp);
912			goto out;
913		}
914		error = VOP_MKNOD(ndp->ni_dvp, &ndp->ni_vp,
915		    &ndp->ni_cnd, &nvap->na_vattr);
916		vput(ndp->ni_dvp);
917		nfsvno_relpathbuf(ndp);
918		vrele(ndp->ni_startdir);
919		/*
920		 * Since VOP_MKNOD returns the ni_vp, I can't
921		 * see any reason to do the lookup.
922		 */
923	}
924
925out:
926	NFSEXITCODE(error);
927	return (error);
928}
929
930/*
931 * Mkdir vnode op.
932 */
933int
934nfsvno_mkdir(struct nameidata *ndp, struct nfsvattr *nvap, uid_t saved_uid,
935    struct ucred *cred, struct thread *p, struct nfsexstuff *exp)
936{
937	int error = 0;
938
939	if (ndp->ni_vp != NULL) {
940		if (ndp->ni_dvp == ndp->ni_vp)
941			vrele(ndp->ni_dvp);
942		else
943			vput(ndp->ni_dvp);
944		vrele(ndp->ni_vp);
945		nfsvno_relpathbuf(ndp);
946		error = EEXIST;
947		goto out;
948	}
949	error = VOP_MKDIR(ndp->ni_dvp, &ndp->ni_vp, &ndp->ni_cnd,
950	    &nvap->na_vattr);
951	vput(ndp->ni_dvp);
952	nfsvno_relpathbuf(ndp);
953
954out:
955	NFSEXITCODE(error);
956	return (error);
957}
958
959/*
960 * symlink vnode op.
961 */
962int
963nfsvno_symlink(struct nameidata *ndp, struct nfsvattr *nvap, char *pathcp,
964    int pathlen, int not_v2, uid_t saved_uid, struct ucred *cred, struct thread *p,
965    struct nfsexstuff *exp)
966{
967	int error = 0;
968
969	if (ndp->ni_vp) {
970		vrele(ndp->ni_startdir);
971		nfsvno_relpathbuf(ndp);
972		if (ndp->ni_dvp == ndp->ni_vp)
973			vrele(ndp->ni_dvp);
974		else
975			vput(ndp->ni_dvp);
976		vrele(ndp->ni_vp);
977		error = EEXIST;
978		goto out;
979	}
980
981	error = VOP_SYMLINK(ndp->ni_dvp, &ndp->ni_vp, &ndp->ni_cnd,
982	    &nvap->na_vattr, pathcp);
983	vput(ndp->ni_dvp);
984	vrele(ndp->ni_startdir);
985	nfsvno_relpathbuf(ndp);
986	/*
987	 * Although FreeBSD still had the lookup code in
988	 * it for 7/current, there doesn't seem to be any
989	 * point, since VOP_SYMLINK() returns the ni_vp.
990	 * Just vput it for v2.
991	 */
992	if (!not_v2 && !error)
993		vput(ndp->ni_vp);
994
995out:
996	NFSEXITCODE(error);
997	return (error);
998}
999
1000/*
1001 * Parse symbolic link arguments.
1002 * This function has an ugly side effect. It will MALLOC() an area for
1003 * the symlink and set iov_base to point to it, only if it succeeds.
1004 * So, if it returns with uiop->uio_iov->iov_base != NULL, that must
1005 * be FREE'd later.
1006 */
1007int
1008nfsvno_getsymlink(struct nfsrv_descript *nd, struct nfsvattr *nvap,
1009    struct thread *p, char **pathcpp, int *lenp)
1010{
1011	u_int32_t *tl;
1012	char *pathcp = NULL;
1013	int error = 0, len;
1014	struct nfsv2_sattr *sp;
1015
1016	*pathcpp = NULL;
1017	*lenp = 0;
1018	if ((nd->nd_flag & ND_NFSV3) &&
1019	    (error = nfsrv_sattr(nd, nvap, NULL, NULL, p)))
1020		goto nfsmout;
1021	NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
1022	len = fxdr_unsigned(int, *tl);
1023	if (len > NFS_MAXPATHLEN || len <= 0) {
1024		error = EBADRPC;
1025		goto nfsmout;
1026	}
1027	MALLOC(pathcp, caddr_t, len + 1, M_TEMP, M_WAITOK);
1028	error = nfsrv_mtostr(nd, pathcp, len);
1029	if (error)
1030		goto nfsmout;
1031	if (nd->nd_flag & ND_NFSV2) {
1032		NFSM_DISSECT(sp, struct nfsv2_sattr *, NFSX_V2SATTR);
1033		nvap->na_mode = fxdr_unsigned(u_int16_t, sp->sa_mode);
1034	}
1035	*pathcpp = pathcp;
1036	*lenp = len;
1037	NFSEXITCODE2(0, nd);
1038	return (0);
1039nfsmout:
1040	if (pathcp)
1041		free(pathcp, M_TEMP);
1042	NFSEXITCODE2(error, nd);
1043	return (error);
1044}
1045
1046/*
1047 * Remove a non-directory object.
1048 */
1049int
1050nfsvno_removesub(struct nameidata *ndp, int is_v4, struct ucred *cred,
1051    struct thread *p, struct nfsexstuff *exp)
1052{
1053	struct vnode *vp;
1054	int error = 0;
1055
1056	vp = ndp->ni_vp;
1057	if (vp->v_type == VDIR)
1058		error = NFSERR_ISDIR;
1059	else if (is_v4)
1060		error = nfsrv_checkremove(vp, 1, p);
1061	if (!error)
1062		error = VOP_REMOVE(ndp->ni_dvp, vp, &ndp->ni_cnd);
1063	if (ndp->ni_dvp == vp)
1064		vrele(ndp->ni_dvp);
1065	else
1066		vput(ndp->ni_dvp);
1067	vput(vp);
1068	if ((ndp->ni_cnd.cn_flags & SAVENAME) != 0)
1069		nfsvno_relpathbuf(ndp);
1070	NFSEXITCODE(error);
1071	return (error);
1072}
1073
1074/*
1075 * Remove a directory.
1076 */
1077int
1078nfsvno_rmdirsub(struct nameidata *ndp, int is_v4, struct ucred *cred,
1079    struct thread *p, struct nfsexstuff *exp)
1080{
1081	struct vnode *vp;
1082	int error = 0;
1083
1084	vp = ndp->ni_vp;
1085	if (vp->v_type != VDIR) {
1086		error = ENOTDIR;
1087		goto out;
1088	}
1089	/*
1090	 * No rmdir "." please.
1091	 */
1092	if (ndp->ni_dvp == vp) {
1093		error = EINVAL;
1094		goto out;
1095	}
1096	/*
1097	 * The root of a mounted filesystem cannot be deleted.
1098	 */
1099	if (vp->v_vflag & VV_ROOT)
1100		error = EBUSY;
1101out:
1102	if (!error)
1103		error = VOP_RMDIR(ndp->ni_dvp, vp, &ndp->ni_cnd);
1104	if (ndp->ni_dvp == vp)
1105		vrele(ndp->ni_dvp);
1106	else
1107		vput(ndp->ni_dvp);
1108	vput(vp);
1109	if ((ndp->ni_cnd.cn_flags & SAVENAME) != 0)
1110		nfsvno_relpathbuf(ndp);
1111	NFSEXITCODE(error);
1112	return (error);
1113}
1114
1115/*
1116 * Rename vnode op.
1117 */
1118int
1119nfsvno_rename(struct nameidata *fromndp, struct nameidata *tondp,
1120    u_int32_t ndstat, u_int32_t ndflag, struct ucred *cred, struct thread *p)
1121{
1122	struct vnode *fvp, *tvp, *tdvp;
1123	int error = 0;
1124
1125	fvp = fromndp->ni_vp;
1126	if (ndstat) {
1127		vrele(fromndp->ni_dvp);
1128		vrele(fvp);
1129		error = ndstat;
1130		goto out1;
1131	}
1132	tdvp = tondp->ni_dvp;
1133	tvp = tondp->ni_vp;
1134	if (tvp != NULL) {
1135		if (fvp->v_type == VDIR && tvp->v_type != VDIR) {
1136			error = (ndflag & ND_NFSV2) ? EISDIR : EEXIST;
1137			goto out;
1138		} else if (fvp->v_type != VDIR && tvp->v_type == VDIR) {
1139			error = (ndflag & ND_NFSV2) ? ENOTDIR : EEXIST;
1140			goto out;
1141		}
1142		if (tvp->v_type == VDIR && tvp->v_mountedhere) {
1143			error = (ndflag & ND_NFSV2) ? ENOTEMPTY : EXDEV;
1144			goto out;
1145		}
1146
1147		/*
1148		 * A rename to '.' or '..' results in a prematurely
1149		 * unlocked vnode on FreeBSD5, so I'm just going to fail that
1150		 * here.
1151		 */
1152		if ((tondp->ni_cnd.cn_namelen == 1 &&
1153		     tondp->ni_cnd.cn_nameptr[0] == '.') ||
1154		    (tondp->ni_cnd.cn_namelen == 2 &&
1155		     tondp->ni_cnd.cn_nameptr[0] == '.' &&
1156		     tondp->ni_cnd.cn_nameptr[1] == '.')) {
1157			error = EINVAL;
1158			goto out;
1159		}
1160	}
1161	if (fvp->v_type == VDIR && fvp->v_mountedhere) {
1162		error = (ndflag & ND_NFSV2) ? ENOTEMPTY : EXDEV;
1163		goto out;
1164	}
1165	if (fvp->v_mount != tdvp->v_mount) {
1166		error = (ndflag & ND_NFSV2) ? ENOTEMPTY : EXDEV;
1167		goto out;
1168	}
1169	if (fvp == tdvp) {
1170		error = (ndflag & ND_NFSV2) ? ENOTEMPTY : EINVAL;
1171		goto out;
1172	}
1173	if (fvp == tvp) {
1174		/*
1175		 * If source and destination are the same, there is nothing to
1176		 * do. Set error to -1 to indicate this.
1177		 */
1178		error = -1;
1179		goto out;
1180	}
1181	if (ndflag & ND_NFSV4) {
1182		if (NFSVOPLOCK(fvp, LK_EXCLUSIVE) == 0) {
1183			error = nfsrv_checkremove(fvp, 0, p);
1184			NFSVOPUNLOCK(fvp, 0);
1185		} else
1186			error = EPERM;
1187		if (tvp && !error)
1188			error = nfsrv_checkremove(tvp, 1, p);
1189	} else {
1190		/*
1191		 * For NFSv2 and NFSv3, try to get rid of the delegation, so
1192		 * that the NFSv4 client won't be confused by the rename.
1193		 * Since nfsd_recalldelegation() can only be called on an
1194		 * unlocked vnode at this point and fvp is the file that will
1195		 * still exist after the rename, just do fvp.
1196		 */
1197		nfsd_recalldelegation(fvp, p);
1198	}
1199out:
1200	if (!error) {
1201		error = VOP_RENAME(fromndp->ni_dvp, fromndp->ni_vp,
1202		    &fromndp->ni_cnd, tondp->ni_dvp, tondp->ni_vp,
1203		    &tondp->ni_cnd);
1204	} else {
1205		if (tdvp == tvp)
1206			vrele(tdvp);
1207		else
1208			vput(tdvp);
1209		if (tvp)
1210			vput(tvp);
1211		vrele(fromndp->ni_dvp);
1212		vrele(fvp);
1213		if (error == -1)
1214			error = 0;
1215	}
1216	vrele(tondp->ni_startdir);
1217	nfsvno_relpathbuf(tondp);
1218out1:
1219	vrele(fromndp->ni_startdir);
1220	nfsvno_relpathbuf(fromndp);
1221	NFSEXITCODE(error);
1222	return (error);
1223}
1224
1225/*
1226 * Link vnode op.
1227 */
1228int
1229nfsvno_link(struct nameidata *ndp, struct vnode *vp, struct ucred *cred,
1230    struct thread *p, struct nfsexstuff *exp)
1231{
1232	struct vnode *xp;
1233	int error = 0;
1234
1235	xp = ndp->ni_vp;
1236	if (xp != NULL) {
1237		error = EEXIST;
1238	} else {
1239		xp = ndp->ni_dvp;
1240		if (vp->v_mount != xp->v_mount)
1241			error = EXDEV;
1242	}
1243	if (!error) {
1244		NFSVOPLOCK(vp, LK_EXCLUSIVE | LK_RETRY);
1245		if ((vp->v_iflag & VI_DOOMED) == 0)
1246			error = VOP_LINK(ndp->ni_dvp, vp, &ndp->ni_cnd);
1247		else
1248			error = EPERM;
1249		if (ndp->ni_dvp == vp)
1250			vrele(ndp->ni_dvp);
1251		else
1252			vput(ndp->ni_dvp);
1253		NFSVOPUNLOCK(vp, 0);
1254	} else {
1255		if (ndp->ni_dvp == ndp->ni_vp)
1256			vrele(ndp->ni_dvp);
1257		else
1258			vput(ndp->ni_dvp);
1259		if (ndp->ni_vp)
1260			vrele(ndp->ni_vp);
1261	}
1262	nfsvno_relpathbuf(ndp);
1263	NFSEXITCODE(error);
1264	return (error);
1265}
1266
1267/*
1268 * Do the fsync() appropriate for the commit.
1269 */
1270int
1271nfsvno_fsync(struct vnode *vp, u_int64_t off, int cnt, struct ucred *cred,
1272    struct thread *td)
1273{
1274	int error = 0;
1275
1276	/*
1277	 * RFC 1813 3.3.21: if count is 0, a flush from offset to the end of
1278	 * file is done.  At this time VOP_FSYNC does not accept offset and
1279	 * byte count parameters so call VOP_FSYNC the whole file for now.
1280	 * The same is true for NFSv4: RFC 3530 Sec. 14.2.3.
1281	 * File systems that do not use the buffer cache (as indicated
1282	 * by MNTK_USES_BCACHE not being set) must use VOP_FSYNC().
1283	 */
1284	if (cnt == 0 || cnt > MAX_COMMIT_COUNT ||
1285	    (vp->v_mount->mnt_kern_flag & MNTK_USES_BCACHE) == 0) {
1286		/*
1287		 * Give up and do the whole thing
1288		 */
1289		if (vp->v_object &&
1290		   (vp->v_object->flags & OBJ_MIGHTBEDIRTY)) {
1291			VM_OBJECT_WLOCK(vp->v_object);
1292			vm_object_page_clean(vp->v_object, 0, 0, OBJPC_SYNC);
1293			VM_OBJECT_WUNLOCK(vp->v_object);
1294		}
1295		error = VOP_FSYNC(vp, MNT_WAIT, td);
1296	} else {
1297		/*
1298		 * Locate and synchronously write any buffers that fall
1299		 * into the requested range.  Note:  we are assuming that
1300		 * f_iosize is a power of 2.
1301		 */
1302		int iosize = vp->v_mount->mnt_stat.f_iosize;
1303		int iomask = iosize - 1;
1304		struct bufobj *bo;
1305		daddr_t lblkno;
1306
1307		/*
1308		 * Align to iosize boundry, super-align to page boundry.
1309		 */
1310		if (off & iomask) {
1311			cnt += off & iomask;
1312			off &= ~(u_quad_t)iomask;
1313		}
1314		if (off & PAGE_MASK) {
1315			cnt += off & PAGE_MASK;
1316			off &= ~(u_quad_t)PAGE_MASK;
1317		}
1318		lblkno = off / iosize;
1319
1320		if (vp->v_object &&
1321		   (vp->v_object->flags & OBJ_MIGHTBEDIRTY)) {
1322			VM_OBJECT_WLOCK(vp->v_object);
1323			vm_object_page_clean(vp->v_object, off, off + cnt,
1324			    OBJPC_SYNC);
1325			VM_OBJECT_WUNLOCK(vp->v_object);
1326		}
1327
1328		bo = &vp->v_bufobj;
1329		BO_LOCK(bo);
1330		while (cnt > 0) {
1331			struct buf *bp;
1332
1333			/*
1334			 * If we have a buffer and it is marked B_DELWRI we
1335			 * have to lock and write it.  Otherwise the prior
1336			 * write is assumed to have already been committed.
1337			 *
1338			 * gbincore() can return invalid buffers now so we
1339			 * have to check that bit as well (though B_DELWRI
1340			 * should not be set if B_INVAL is set there could be
1341			 * a race here since we haven't locked the buffer).
1342			 */
1343			if ((bp = gbincore(&vp->v_bufobj, lblkno)) != NULL) {
1344				if (BUF_LOCK(bp, LK_EXCLUSIVE | LK_SLEEPFAIL |
1345				    LK_INTERLOCK, BO_LOCKPTR(bo)) == ENOLCK) {
1346					BO_LOCK(bo);
1347					continue; /* retry */
1348				}
1349			    	if ((bp->b_flags & (B_DELWRI|B_INVAL)) ==
1350				    B_DELWRI) {
1351					bremfree(bp);
1352					bp->b_flags &= ~B_ASYNC;
1353					bwrite(bp);
1354					++nfs_commit_miss;
1355				} else
1356					BUF_UNLOCK(bp);
1357				BO_LOCK(bo);
1358			}
1359			++nfs_commit_blks;
1360			if (cnt < iosize)
1361				break;
1362			cnt -= iosize;
1363			++lblkno;
1364		}
1365		BO_UNLOCK(bo);
1366	}
1367	NFSEXITCODE(error);
1368	return (error);
1369}
1370
1371/*
1372 * Statfs vnode op.
1373 */
1374int
1375nfsvno_statfs(struct vnode *vp, struct statfs *sf)
1376{
1377	int error;
1378
1379	error = VFS_STATFS(vp->v_mount, sf);
1380	if (error == 0) {
1381		/*
1382		 * Since NFS handles these values as unsigned on the
1383		 * wire, there is no way to represent negative values,
1384		 * so set them to 0. Without this, they will appear
1385		 * to be very large positive values for clients like
1386		 * Solaris10.
1387		 */
1388		if (sf->f_bavail < 0)
1389			sf->f_bavail = 0;
1390		if (sf->f_ffree < 0)
1391			sf->f_ffree = 0;
1392	}
1393	NFSEXITCODE(error);
1394	return (error);
1395}
1396
1397/*
1398 * Do the vnode op stuff for Open. Similar to nfsvno_createsub(), but
1399 * must handle nfsrv_opencheck() calls after any other access checks.
1400 */
1401void
1402nfsvno_open(struct nfsrv_descript *nd, struct nameidata *ndp,
1403    nfsquad_t clientid, nfsv4stateid_t *stateidp, struct nfsstate *stp,
1404    int *exclusive_flagp, struct nfsvattr *nvap, int32_t *cverf, int create,
1405    NFSACL_T *aclp, nfsattrbit_t *attrbitp, struct ucred *cred, struct thread *p,
1406    struct nfsexstuff *exp, struct vnode **vpp)
1407{
1408	struct vnode *vp = NULL;
1409	u_quad_t tempsize;
1410	struct nfsexstuff nes;
1411
1412	if (ndp->ni_vp == NULL)
1413		nd->nd_repstat = nfsrv_opencheck(clientid,
1414		    stateidp, stp, NULL, nd, p, nd->nd_repstat);
1415	if (!nd->nd_repstat) {
1416		if (ndp->ni_vp == NULL) {
1417			vrele(ndp->ni_startdir);
1418			nd->nd_repstat = VOP_CREATE(ndp->ni_dvp,
1419			    &ndp->ni_vp, &ndp->ni_cnd, &nvap->na_vattr);
1420			vput(ndp->ni_dvp);
1421			nfsvno_relpathbuf(ndp);
1422			if (!nd->nd_repstat) {
1423				if (*exclusive_flagp) {
1424					*exclusive_flagp = 0;
1425					NFSVNO_ATTRINIT(nvap);
1426					nvap->na_atime.tv_sec = cverf[0];
1427					nvap->na_atime.tv_nsec = cverf[1];
1428					nd->nd_repstat = VOP_SETATTR(ndp->ni_vp,
1429					    &nvap->na_vattr, cred);
1430					if (nd->nd_repstat != 0) {
1431						vput(ndp->ni_vp);
1432						ndp->ni_vp = NULL;
1433						nd->nd_repstat = NFSERR_NOTSUPP;
1434					}
1435				} else {
1436					nfsrv_fixattr(nd, ndp->ni_vp, nvap,
1437					    aclp, p, attrbitp, exp);
1438				}
1439			}
1440			vp = ndp->ni_vp;
1441		} else {
1442			if (ndp->ni_startdir)
1443				vrele(ndp->ni_startdir);
1444			nfsvno_relpathbuf(ndp);
1445			vp = ndp->ni_vp;
1446			if (create == NFSV4OPEN_CREATE) {
1447				if (ndp->ni_dvp == vp)
1448					vrele(ndp->ni_dvp);
1449				else
1450					vput(ndp->ni_dvp);
1451			}
1452			if (NFSVNO_ISSETSIZE(nvap) && vp->v_type == VREG) {
1453				if (ndp->ni_cnd.cn_flags & RDONLY)
1454					NFSVNO_SETEXRDONLY(&nes);
1455				else
1456					NFSVNO_EXINIT(&nes);
1457				nd->nd_repstat = nfsvno_accchk(vp,
1458				    VWRITE, cred, &nes, p,
1459				    NFSACCCHK_NOOVERRIDE,
1460				    NFSACCCHK_VPISLOCKED, NULL);
1461				nd->nd_repstat = nfsrv_opencheck(clientid,
1462				    stateidp, stp, vp, nd, p, nd->nd_repstat);
1463				if (!nd->nd_repstat) {
1464					tempsize = nvap->na_size;
1465					NFSVNO_ATTRINIT(nvap);
1466					nvap->na_size = tempsize;
1467					nd->nd_repstat = VOP_SETATTR(vp,
1468					    &nvap->na_vattr, cred);
1469				}
1470			} else if (vp->v_type == VREG) {
1471				nd->nd_repstat = nfsrv_opencheck(clientid,
1472				    stateidp, stp, vp, nd, p, nd->nd_repstat);
1473			}
1474		}
1475	} else {
1476		if (ndp->ni_cnd.cn_flags & HASBUF)
1477			nfsvno_relpathbuf(ndp);
1478		if (ndp->ni_startdir && create == NFSV4OPEN_CREATE) {
1479			vrele(ndp->ni_startdir);
1480			if (ndp->ni_dvp == ndp->ni_vp)
1481				vrele(ndp->ni_dvp);
1482			else
1483				vput(ndp->ni_dvp);
1484			if (ndp->ni_vp)
1485				vput(ndp->ni_vp);
1486		}
1487	}
1488	*vpp = vp;
1489
1490	NFSEXITCODE2(0, nd);
1491}
1492
1493/*
1494 * Updates the file rev and sets the mtime and ctime
1495 * to the current clock time, returning the va_filerev and va_Xtime
1496 * values.
1497 * Return ESTALE to indicate the vnode is VI_DOOMED.
1498 */
1499int
1500nfsvno_updfilerev(struct vnode *vp, struct nfsvattr *nvap,
1501    struct ucred *cred, struct thread *p)
1502{
1503	struct vattr va;
1504
1505	VATTR_NULL(&va);
1506	vfs_timestamp(&va.va_mtime);
1507	if (NFSVOPISLOCKED(vp) != LK_EXCLUSIVE) {
1508		NFSVOPLOCK(vp, LK_UPGRADE | LK_RETRY);
1509		if ((vp->v_iflag & VI_DOOMED) != 0)
1510			return (ESTALE);
1511	}
1512	(void) VOP_SETATTR(vp, &va, cred);
1513	(void) nfsvno_getattr(vp, nvap, cred, p, 1);
1514	return (0);
1515}
1516
1517/*
1518 * Glue routine to nfsv4_fillattr().
1519 */
1520int
1521nfsvno_fillattr(struct nfsrv_descript *nd, struct mount *mp, struct vnode *vp,
1522    struct nfsvattr *nvap, fhandle_t *fhp, int rderror, nfsattrbit_t *attrbitp,
1523    struct ucred *cred, struct thread *p, int isdgram, int reterr,
1524    int supports_nfsv4acls, int at_root, uint64_t mounted_on_fileno)
1525{
1526	int error;
1527
1528	error = nfsv4_fillattr(nd, mp, vp, NULL, &nvap->na_vattr, fhp, rderror,
1529	    attrbitp, cred, p, isdgram, reterr, supports_nfsv4acls, at_root,
1530	    mounted_on_fileno);
1531	NFSEXITCODE2(0, nd);
1532	return (error);
1533}
1534
1535/* Since the Readdir vnode ops vary, put the entire functions in here. */
1536/*
1537 * nfs readdir service
1538 * - mallocs what it thinks is enough to read
1539 *	count rounded up to a multiple of DIRBLKSIZ <= NFS_MAXREADDIR
1540 * - calls VOP_READDIR()
1541 * - loops around building the reply
1542 *	if the output generated exceeds count break out of loop
1543 *	The NFSM_CLGET macro is used here so that the reply will be packed
1544 *	tightly in mbuf clusters.
1545 * - it trims out records with d_fileno == 0
1546 *	this doesn't matter for Unix clients, but they might confuse clients
1547 *	for other os'.
1548 * - it trims out records with d_type == DT_WHT
1549 *	these cannot be seen through NFS (unless we extend the protocol)
1550 *     The alternate call nfsrvd_readdirplus() does lookups as well.
1551 * PS: The NFS protocol spec. does not clarify what the "count" byte
1552 *	argument is a count of.. just name strings and file id's or the
1553 *	entire reply rpc or ...
1554 *	I tried just file name and id sizes and it confused the Sun client,
1555 *	so I am using the full rpc size now. The "paranoia.." comment refers
1556 *	to including the status longwords that are not a part of the dir.
1557 *	"entry" structures, but are in the rpc.
1558 */
1559int
1560nfsrvd_readdir(struct nfsrv_descript *nd, int isdgram,
1561    struct vnode *vp, struct thread *p, struct nfsexstuff *exp)
1562{
1563	struct dirent *dp;
1564	u_int32_t *tl;
1565	int dirlen;
1566	char *cpos, *cend, *rbuf;
1567	struct nfsvattr at;
1568	int nlen, error = 0, getret = 1;
1569	int siz, cnt, fullsiz, eofflag, ncookies;
1570	u_int64_t off, toff, verf;
1571	u_long *cookies = NULL, *cookiep;
1572	struct uio io;
1573	struct iovec iv;
1574	int is_ufs;
1575
1576	if (nd->nd_repstat) {
1577		nfsrv_postopattr(nd, getret, &at);
1578		goto out;
1579	}
1580	if (nd->nd_flag & ND_NFSV2) {
1581		NFSM_DISSECT(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
1582		off = fxdr_unsigned(u_quad_t, *tl++);
1583	} else {
1584		NFSM_DISSECT(tl, u_int32_t *, 5 * NFSX_UNSIGNED);
1585		off = fxdr_hyper(tl);
1586		tl += 2;
1587		verf = fxdr_hyper(tl);
1588		tl += 2;
1589	}
1590	toff = off;
1591	cnt = fxdr_unsigned(int, *tl);
1592	if (cnt > NFS_SRVMAXDATA(nd) || cnt < 0)
1593		cnt = NFS_SRVMAXDATA(nd);
1594	siz = ((cnt + DIRBLKSIZ - 1) & ~(DIRBLKSIZ - 1));
1595	fullsiz = siz;
1596	if (nd->nd_flag & ND_NFSV3) {
1597		nd->nd_repstat = getret = nfsvno_getattr(vp, &at, nd->nd_cred,
1598		    p, 1);
1599#if 0
1600		/*
1601		 * va_filerev is not sufficient as a cookie verifier,
1602		 * since it is not supposed to change when entries are
1603		 * removed/added unless that offset cookies returned to
1604		 * the client are no longer valid.
1605		 */
1606		if (!nd->nd_repstat && toff && verf != at.na_filerev)
1607			nd->nd_repstat = NFSERR_BAD_COOKIE;
1608#endif
1609	}
1610	if (!nd->nd_repstat && vp->v_type != VDIR)
1611		nd->nd_repstat = NFSERR_NOTDIR;
1612	if (nd->nd_repstat == 0 && cnt == 0) {
1613		if (nd->nd_flag & ND_NFSV2)
1614			/* NFSv2 does not have NFSERR_TOOSMALL */
1615			nd->nd_repstat = EPERM;
1616		else
1617			nd->nd_repstat = NFSERR_TOOSMALL;
1618	}
1619	if (!nd->nd_repstat)
1620		nd->nd_repstat = nfsvno_accchk(vp, VEXEC,
1621		    nd->nd_cred, exp, p, NFSACCCHK_NOOVERRIDE,
1622		    NFSACCCHK_VPISLOCKED, NULL);
1623	if (nd->nd_repstat) {
1624		vput(vp);
1625		if (nd->nd_flag & ND_NFSV3)
1626			nfsrv_postopattr(nd, getret, &at);
1627		goto out;
1628	}
1629	is_ufs = strcmp(vp->v_mount->mnt_vfc->vfc_name, "ufs") == 0;
1630	MALLOC(rbuf, caddr_t, siz, M_TEMP, M_WAITOK);
1631again:
1632	eofflag = 0;
1633	if (cookies) {
1634		free((caddr_t)cookies, M_TEMP);
1635		cookies = NULL;
1636	}
1637
1638	iv.iov_base = rbuf;
1639	iv.iov_len = siz;
1640	io.uio_iov = &iv;
1641	io.uio_iovcnt = 1;
1642	io.uio_offset = (off_t)off;
1643	io.uio_resid = siz;
1644	io.uio_segflg = UIO_SYSSPACE;
1645	io.uio_rw = UIO_READ;
1646	io.uio_td = NULL;
1647	nd->nd_repstat = VOP_READDIR(vp, &io, nd->nd_cred, &eofflag, &ncookies,
1648	    &cookies);
1649	off = (u_int64_t)io.uio_offset;
1650	if (io.uio_resid)
1651		siz -= io.uio_resid;
1652
1653	if (!cookies && !nd->nd_repstat)
1654		nd->nd_repstat = NFSERR_PERM;
1655	if (nd->nd_flag & ND_NFSV3) {
1656		getret = nfsvno_getattr(vp, &at, nd->nd_cred, p, 1);
1657		if (!nd->nd_repstat)
1658			nd->nd_repstat = getret;
1659	}
1660
1661	/*
1662	 * Handles the failed cases. nd->nd_repstat == 0 past here.
1663	 */
1664	if (nd->nd_repstat) {
1665		vput(vp);
1666		free((caddr_t)rbuf, M_TEMP);
1667		if (cookies)
1668			free((caddr_t)cookies, M_TEMP);
1669		if (nd->nd_flag & ND_NFSV3)
1670			nfsrv_postopattr(nd, getret, &at);
1671		goto out;
1672	}
1673	/*
1674	 * If nothing read, return eof
1675	 * rpc reply
1676	 */
1677	if (siz == 0) {
1678		vput(vp);
1679		if (nd->nd_flag & ND_NFSV2) {
1680			NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
1681		} else {
1682			nfsrv_postopattr(nd, getret, &at);
1683			NFSM_BUILD(tl, u_int32_t *, 4 * NFSX_UNSIGNED);
1684			txdr_hyper(at.na_filerev, tl);
1685			tl += 2;
1686		}
1687		*tl++ = newnfs_false;
1688		*tl = newnfs_true;
1689		FREE((caddr_t)rbuf, M_TEMP);
1690		FREE((caddr_t)cookies, M_TEMP);
1691		goto out;
1692	}
1693
1694	/*
1695	 * Check for degenerate cases of nothing useful read.
1696	 * If so go try again
1697	 */
1698	cpos = rbuf;
1699	cend = rbuf + siz;
1700	dp = (struct dirent *)cpos;
1701	cookiep = cookies;
1702
1703	/*
1704	 * For some reason FreeBSD's ufs_readdir() chooses to back the
1705	 * directory offset up to a block boundary, so it is necessary to
1706	 * skip over the records that precede the requested offset. This
1707	 * requires the assumption that file offset cookies monotonically
1708	 * increase.
1709	 */
1710	while (cpos < cend && ncookies > 0 &&
1711	    (dp->d_fileno == 0 || dp->d_type == DT_WHT ||
1712	     (is_ufs == 1 && ((u_quad_t)(*cookiep)) <= toff))) {
1713		cpos += dp->d_reclen;
1714		dp = (struct dirent *)cpos;
1715		cookiep++;
1716		ncookies--;
1717	}
1718	if (cpos >= cend || ncookies == 0) {
1719		siz = fullsiz;
1720		toff = off;
1721		goto again;
1722	}
1723	vput(vp);
1724
1725	/*
1726	 * dirlen is the size of the reply, including all XDR and must
1727	 * not exceed cnt. For NFSv2, RFC1094 didn't clearly indicate
1728	 * if the XDR should be included in "count", but to be safe, we do.
1729	 * (Include the two booleans at the end of the reply in dirlen now.)
1730	 */
1731	if (nd->nd_flag & ND_NFSV3) {
1732		nfsrv_postopattr(nd, getret, &at);
1733		NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
1734		txdr_hyper(at.na_filerev, tl);
1735		dirlen = NFSX_V3POSTOPATTR + NFSX_VERF + 2 * NFSX_UNSIGNED;
1736	} else {
1737		dirlen = 2 * NFSX_UNSIGNED;
1738	}
1739
1740	/* Loop through the records and build reply */
1741	while (cpos < cend && ncookies > 0) {
1742		nlen = dp->d_namlen;
1743		if (dp->d_fileno != 0 && dp->d_type != DT_WHT &&
1744			nlen <= NFS_MAXNAMLEN) {
1745			if (nd->nd_flag & ND_NFSV3)
1746				dirlen += (6*NFSX_UNSIGNED + NFSM_RNDUP(nlen));
1747			else
1748				dirlen += (4*NFSX_UNSIGNED + NFSM_RNDUP(nlen));
1749			if (dirlen > cnt) {
1750				eofflag = 0;
1751				break;
1752			}
1753
1754			/*
1755			 * Build the directory record xdr from
1756			 * the dirent entry.
1757			 */
1758			if (nd->nd_flag & ND_NFSV3) {
1759				NFSM_BUILD(tl, u_int32_t *, 3 * NFSX_UNSIGNED);
1760				*tl++ = newnfs_true;
1761				*tl++ = 0;
1762			} else {
1763				NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
1764				*tl++ = newnfs_true;
1765			}
1766			*tl = txdr_unsigned(dp->d_fileno);
1767			(void) nfsm_strtom(nd, dp->d_name, nlen);
1768			if (nd->nd_flag & ND_NFSV3) {
1769				NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
1770				*tl++ = 0;
1771			} else
1772				NFSM_BUILD(tl, u_int32_t *, NFSX_UNSIGNED);
1773			*tl = txdr_unsigned(*cookiep);
1774		}
1775		cpos += dp->d_reclen;
1776		dp = (struct dirent *)cpos;
1777		cookiep++;
1778		ncookies--;
1779	}
1780	if (cpos < cend)
1781		eofflag = 0;
1782	NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
1783	*tl++ = newnfs_false;
1784	if (eofflag)
1785		*tl = newnfs_true;
1786	else
1787		*tl = newnfs_false;
1788	FREE((caddr_t)rbuf, M_TEMP);
1789	FREE((caddr_t)cookies, M_TEMP);
1790
1791out:
1792	NFSEXITCODE2(0, nd);
1793	return (0);
1794nfsmout:
1795	vput(vp);
1796	NFSEXITCODE2(error, nd);
1797	return (error);
1798}
1799
1800/*
1801 * Readdirplus for V3 and Readdir for V4.
1802 */
1803int
1804nfsrvd_readdirplus(struct nfsrv_descript *nd, int isdgram,
1805    struct vnode *vp, struct thread *p, struct nfsexstuff *exp)
1806{
1807	struct dirent *dp;
1808	u_int32_t *tl;
1809	int dirlen;
1810	char *cpos, *cend, *rbuf;
1811	struct vnode *nvp;
1812	fhandle_t nfh;
1813	struct nfsvattr nva, at, *nvap = &nva;
1814	struct mbuf *mb0, *mb1;
1815	struct nfsreferral *refp;
1816	int nlen, r, error = 0, getret = 1, usevget = 1;
1817	int siz, cnt, fullsiz, eofflag, ncookies, entrycnt;
1818	caddr_t bpos0, bpos1;
1819	u_int64_t off, toff, verf;
1820	u_long *cookies = NULL, *cookiep;
1821	nfsattrbit_t attrbits, rderrbits, savbits;
1822	struct uio io;
1823	struct iovec iv;
1824	struct componentname cn;
1825	int at_root, is_ufs, is_zfs, needs_unbusy, supports_nfsv4acls;
1826	struct mount *mp, *new_mp;
1827	uint64_t mounted_on_fileno;
1828
1829	if (nd->nd_repstat) {
1830		nfsrv_postopattr(nd, getret, &at);
1831		goto out;
1832	}
1833	NFSM_DISSECT(tl, u_int32_t *, 6 * NFSX_UNSIGNED);
1834	off = fxdr_hyper(tl);
1835	toff = off;
1836	tl += 2;
1837	verf = fxdr_hyper(tl);
1838	tl += 2;
1839	siz = fxdr_unsigned(int, *tl++);
1840	cnt = fxdr_unsigned(int, *tl);
1841
1842	/*
1843	 * Use the server's maximum data transfer size as the upper bound
1844	 * on reply datalen.
1845	 */
1846	if (cnt > NFS_SRVMAXDATA(nd) || cnt < 0)
1847		cnt = NFS_SRVMAXDATA(nd);
1848
1849	/*
1850	 * siz is a "hint" of how much directory information (name, fileid,
1851	 * cookie) should be in the reply. At least one client "hints" 0,
1852	 * so I set it to cnt for that case. I also round it up to the
1853	 * next multiple of DIRBLKSIZ.
1854	 */
1855	if (siz <= 0)
1856		siz = cnt;
1857	siz = ((siz + DIRBLKSIZ - 1) & ~(DIRBLKSIZ - 1));
1858
1859	if (nd->nd_flag & ND_NFSV4) {
1860		error = nfsrv_getattrbits(nd, &attrbits, NULL, NULL);
1861		if (error)
1862			goto nfsmout;
1863		NFSSET_ATTRBIT(&savbits, &attrbits);
1864		NFSCLRNOTFILLABLE_ATTRBIT(&attrbits);
1865		NFSZERO_ATTRBIT(&rderrbits);
1866		NFSSETBIT_ATTRBIT(&rderrbits, NFSATTRBIT_RDATTRERROR);
1867	} else {
1868		NFSZERO_ATTRBIT(&attrbits);
1869	}
1870	fullsiz = siz;
1871	nd->nd_repstat = getret = nfsvno_getattr(vp, &at, nd->nd_cred, p, 1);
1872	if (!nd->nd_repstat) {
1873	    if (off && verf != at.na_filerev) {
1874		/*
1875		 * va_filerev is not sufficient as a cookie verifier,
1876		 * since it is not supposed to change when entries are
1877		 * removed/added unless that offset cookies returned to
1878		 * the client are no longer valid.
1879		 */
1880#if 0
1881		if (nd->nd_flag & ND_NFSV4) {
1882			nd->nd_repstat = NFSERR_NOTSAME;
1883		} else {
1884			nd->nd_repstat = NFSERR_BAD_COOKIE;
1885		}
1886#endif
1887	    } else if ((nd->nd_flag & ND_NFSV4) && off == 0 && verf != 0) {
1888		nd->nd_repstat = NFSERR_BAD_COOKIE;
1889	    }
1890	}
1891	if (!nd->nd_repstat && vp->v_type != VDIR)
1892		nd->nd_repstat = NFSERR_NOTDIR;
1893	if (!nd->nd_repstat && cnt == 0)
1894		nd->nd_repstat = NFSERR_TOOSMALL;
1895	if (!nd->nd_repstat)
1896		nd->nd_repstat = nfsvno_accchk(vp, VEXEC,
1897		    nd->nd_cred, exp, p, NFSACCCHK_NOOVERRIDE,
1898		    NFSACCCHK_VPISLOCKED, NULL);
1899	if (nd->nd_repstat) {
1900		vput(vp);
1901		if (nd->nd_flag & ND_NFSV3)
1902			nfsrv_postopattr(nd, getret, &at);
1903		goto out;
1904	}
1905	is_ufs = strcmp(vp->v_mount->mnt_vfc->vfc_name, "ufs") == 0;
1906	is_zfs = strcmp(vp->v_mount->mnt_vfc->vfc_name, "zfs") == 0;
1907
1908	MALLOC(rbuf, caddr_t, siz, M_TEMP, M_WAITOK);
1909again:
1910	eofflag = 0;
1911	if (cookies) {
1912		free((caddr_t)cookies, M_TEMP);
1913		cookies = NULL;
1914	}
1915
1916	iv.iov_base = rbuf;
1917	iv.iov_len = siz;
1918	io.uio_iov = &iv;
1919	io.uio_iovcnt = 1;
1920	io.uio_offset = (off_t)off;
1921	io.uio_resid = siz;
1922	io.uio_segflg = UIO_SYSSPACE;
1923	io.uio_rw = UIO_READ;
1924	io.uio_td = NULL;
1925	nd->nd_repstat = VOP_READDIR(vp, &io, nd->nd_cred, &eofflag, &ncookies,
1926	    &cookies);
1927	off = (u_int64_t)io.uio_offset;
1928	if (io.uio_resid)
1929		siz -= io.uio_resid;
1930
1931	getret = nfsvno_getattr(vp, &at, nd->nd_cred, p, 1);
1932
1933	if (!cookies && !nd->nd_repstat)
1934		nd->nd_repstat = NFSERR_PERM;
1935	if (!nd->nd_repstat)
1936		nd->nd_repstat = getret;
1937	if (nd->nd_repstat) {
1938		vput(vp);
1939		if (cookies)
1940			free((caddr_t)cookies, M_TEMP);
1941		free((caddr_t)rbuf, M_TEMP);
1942		if (nd->nd_flag & ND_NFSV3)
1943			nfsrv_postopattr(nd, getret, &at);
1944		goto out;
1945	}
1946	/*
1947	 * If nothing read, return eof
1948	 * rpc reply
1949	 */
1950	if (siz == 0) {
1951		vput(vp);
1952		if (nd->nd_flag & ND_NFSV3)
1953			nfsrv_postopattr(nd, getret, &at);
1954		NFSM_BUILD(tl, u_int32_t *, 4 * NFSX_UNSIGNED);
1955		txdr_hyper(at.na_filerev, tl);
1956		tl += 2;
1957		*tl++ = newnfs_false;
1958		*tl = newnfs_true;
1959		free((caddr_t)cookies, M_TEMP);
1960		free((caddr_t)rbuf, M_TEMP);
1961		goto out;
1962	}
1963
1964	/*
1965	 * Check for degenerate cases of nothing useful read.
1966	 * If so go try again
1967	 */
1968	cpos = rbuf;
1969	cend = rbuf + siz;
1970	dp = (struct dirent *)cpos;
1971	cookiep = cookies;
1972
1973	/*
1974	 * For some reason FreeBSD's ufs_readdir() chooses to back the
1975	 * directory offset up to a block boundary, so it is necessary to
1976	 * skip over the records that precede the requested offset. This
1977	 * requires the assumption that file offset cookies monotonically
1978	 * increase.
1979	 */
1980	while (cpos < cend && ncookies > 0 &&
1981	  (dp->d_fileno == 0 || dp->d_type == DT_WHT ||
1982	   (is_ufs == 1 && ((u_quad_t)(*cookiep)) <= toff) ||
1983	   ((nd->nd_flag & ND_NFSV4) &&
1984	    ((dp->d_namlen == 1 && dp->d_name[0] == '.') ||
1985	     (dp->d_namlen==2 && dp->d_name[0]=='.' && dp->d_name[1]=='.'))))) {
1986		cpos += dp->d_reclen;
1987		dp = (struct dirent *)cpos;
1988		cookiep++;
1989		ncookies--;
1990	}
1991	if (cpos >= cend || ncookies == 0) {
1992		siz = fullsiz;
1993		toff = off;
1994		goto again;
1995	}
1996
1997	/*
1998	 * Busy the file system so that the mount point won't go away
1999	 * and, as such, VFS_VGET() can be used safely.
2000	 */
2001	mp = vp->v_mount;
2002	vfs_ref(mp);
2003	NFSVOPUNLOCK(vp, 0);
2004	nd->nd_repstat = vfs_busy(mp, 0);
2005	vfs_rel(mp);
2006	if (nd->nd_repstat != 0) {
2007		vrele(vp);
2008		free(cookies, M_TEMP);
2009		free(rbuf, M_TEMP);
2010		if (nd->nd_flag & ND_NFSV3)
2011			nfsrv_postopattr(nd, getret, &at);
2012		goto out;
2013	}
2014
2015	/*
2016	 * Check to see if entries in this directory can be safely acquired
2017	 * via VFS_VGET() or if a switch to VOP_LOOKUP() is required.
2018	 * ZFS snapshot directories need VOP_LOOKUP(), so that any
2019	 * automount of the snapshot directory that is required will
2020	 * be done.
2021	 * This needs to be done here for NFSv4, since NFSv4 never does
2022	 * a VFS_VGET() for "." or "..".
2023	 */
2024	if (is_zfs == 1) {
2025		r = VFS_VGET(mp, at.na_fileid, LK_SHARED, &nvp);
2026		if (r == EOPNOTSUPP) {
2027			usevget = 0;
2028			cn.cn_nameiop = LOOKUP;
2029			cn.cn_lkflags = LK_SHARED | LK_RETRY;
2030			cn.cn_cred = nd->nd_cred;
2031			cn.cn_thread = p;
2032		} else if (r == 0)
2033			vput(nvp);
2034	}
2035
2036	/*
2037	 * Save this position, in case there is an error before one entry
2038	 * is created.
2039	 */
2040	mb0 = nd->nd_mb;
2041	bpos0 = nd->nd_bpos;
2042
2043	/*
2044	 * Fill in the first part of the reply.
2045	 * dirlen is the reply length in bytes and cannot exceed cnt.
2046	 * (Include the two booleans at the end of the reply in dirlen now,
2047	 *  so we recognize when we have exceeded cnt.)
2048	 */
2049	if (nd->nd_flag & ND_NFSV3) {
2050		dirlen = NFSX_V3POSTOPATTR + NFSX_VERF + 2 * NFSX_UNSIGNED;
2051		nfsrv_postopattr(nd, getret, &at);
2052	} else {
2053		dirlen = NFSX_VERF + 2 * NFSX_UNSIGNED;
2054	}
2055	NFSM_BUILD(tl, u_int32_t *, NFSX_VERF);
2056	txdr_hyper(at.na_filerev, tl);
2057
2058	/*
2059	 * Save this position, in case there is an empty reply needed.
2060	 */
2061	mb1 = nd->nd_mb;
2062	bpos1 = nd->nd_bpos;
2063
2064	/* Loop through the records and build reply */
2065	entrycnt = 0;
2066	while (cpos < cend && ncookies > 0 && dirlen < cnt) {
2067		nlen = dp->d_namlen;
2068		if (dp->d_fileno != 0 && dp->d_type != DT_WHT &&
2069		    nlen <= NFS_MAXNAMLEN &&
2070		    ((nd->nd_flag & ND_NFSV3) || nlen > 2 ||
2071		     (nlen==2 && (dp->d_name[0]!='.' || dp->d_name[1]!='.'))
2072		      || (nlen == 1 && dp->d_name[0] != '.'))) {
2073			/*
2074			 * Save the current position in the reply, in case
2075			 * this entry exceeds cnt.
2076			 */
2077			mb1 = nd->nd_mb;
2078			bpos1 = nd->nd_bpos;
2079
2080			/*
2081			 * For readdir_and_lookup get the vnode using
2082			 * the file number.
2083			 */
2084			nvp = NULL;
2085			refp = NULL;
2086			r = 0;
2087			at_root = 0;
2088			needs_unbusy = 0;
2089			new_mp = mp;
2090			mounted_on_fileno = (uint64_t)dp->d_fileno;
2091			if ((nd->nd_flag & ND_NFSV3) ||
2092			    NFSNONZERO_ATTRBIT(&savbits)) {
2093				if (nd->nd_flag & ND_NFSV4)
2094					refp = nfsv4root_getreferral(NULL,
2095					    vp, dp->d_fileno);
2096				if (refp == NULL) {
2097					if (usevget)
2098						r = VFS_VGET(mp, dp->d_fileno,
2099						    LK_SHARED, &nvp);
2100					else
2101						r = EOPNOTSUPP;
2102					if (r == EOPNOTSUPP) {
2103						if (usevget) {
2104							usevget = 0;
2105							cn.cn_nameiop = LOOKUP;
2106							cn.cn_lkflags =
2107							    LK_SHARED |
2108							    LK_RETRY;
2109							cn.cn_cred =
2110							    nd->nd_cred;
2111							cn.cn_thread = p;
2112						}
2113						cn.cn_nameptr = dp->d_name;
2114						cn.cn_namelen = nlen;
2115						cn.cn_flags = ISLASTCN |
2116						    NOFOLLOW | LOCKLEAF;
2117						if (nlen == 2 &&
2118						    dp->d_name[0] == '.' &&
2119						    dp->d_name[1] == '.')
2120							cn.cn_flags |=
2121							    ISDOTDOT;
2122						if (NFSVOPLOCK(vp, LK_SHARED)
2123						    != 0) {
2124							nd->nd_repstat = EPERM;
2125							break;
2126						}
2127						if ((vp->v_vflag & VV_ROOT) != 0
2128						    && (cn.cn_flags & ISDOTDOT)
2129						    != 0) {
2130							vref(vp);
2131							nvp = vp;
2132							r = 0;
2133						} else {
2134							r = VOP_LOOKUP(vp, &nvp,
2135							    &cn);
2136							if (vp != nvp)
2137								NFSVOPUNLOCK(vp,
2138								    0);
2139						}
2140					}
2141
2142					/*
2143					 * For NFSv4, check to see if nvp is
2144					 * a mount point and get the mount
2145					 * point vnode, as required.
2146					 */
2147					if (r == 0 &&
2148					    nfsrv_enable_crossmntpt != 0 &&
2149					    (nd->nd_flag & ND_NFSV4) != 0 &&
2150					    nvp->v_type == VDIR &&
2151					    nvp->v_mountedhere != NULL) {
2152						new_mp = nvp->v_mountedhere;
2153						r = vfs_busy(new_mp, 0);
2154						vput(nvp);
2155						nvp = NULL;
2156						if (r == 0) {
2157							r = VFS_ROOT(new_mp,
2158							    LK_SHARED, &nvp);
2159							needs_unbusy = 1;
2160							if (r == 0)
2161								at_root = 1;
2162						}
2163					}
2164				}
2165				if (!r) {
2166				    if (refp == NULL &&
2167					((nd->nd_flag & ND_NFSV3) ||
2168					 NFSNONZERO_ATTRBIT(&attrbits))) {
2169					r = nfsvno_getfh(nvp, &nfh, p);
2170					if (!r)
2171					    r = nfsvno_getattr(nvp, nvap,
2172						nd->nd_cred, p, 1);
2173					if (r == 0 && is_zfs == 1 &&
2174					    nfsrv_enable_crossmntpt != 0 &&
2175					    (nd->nd_flag & ND_NFSV4) != 0 &&
2176					    nvp->v_type == VDIR &&
2177					    vp->v_mount != nvp->v_mount) {
2178					    /*
2179					     * For a ZFS snapshot, there is a
2180					     * pseudo mount that does not set
2181					     * v_mountedhere, so it needs to
2182					     * be detected via a different
2183					     * mount structure.
2184					     */
2185					    at_root = 1;
2186					    if (new_mp == mp)
2187						new_mp = nvp->v_mount;
2188					}
2189				    }
2190				} else {
2191				    nvp = NULL;
2192				}
2193				if (r) {
2194					if (!NFSISSET_ATTRBIT(&attrbits,
2195					    NFSATTRBIT_RDATTRERROR)) {
2196						if (nvp != NULL)
2197							vput(nvp);
2198						if (needs_unbusy != 0)
2199							vfs_unbusy(new_mp);
2200						nd->nd_repstat = r;
2201						break;
2202					}
2203				}
2204			}
2205
2206			/*
2207			 * Build the directory record xdr
2208			 */
2209			if (nd->nd_flag & ND_NFSV3) {
2210				NFSM_BUILD(tl, u_int32_t *, 3 * NFSX_UNSIGNED);
2211				*tl++ = newnfs_true;
2212				*tl++ = 0;
2213				*tl = txdr_unsigned(dp->d_fileno);
2214				dirlen += nfsm_strtom(nd, dp->d_name, nlen);
2215				NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
2216				*tl++ = 0;
2217				*tl = txdr_unsigned(*cookiep);
2218				nfsrv_postopattr(nd, 0, nvap);
2219				dirlen += nfsm_fhtom(nd,(u_int8_t *)&nfh,0,1);
2220				dirlen += (5*NFSX_UNSIGNED+NFSX_V3POSTOPATTR);
2221				if (nvp != NULL)
2222					vput(nvp);
2223			} else {
2224				NFSM_BUILD(tl, u_int32_t *, 3 * NFSX_UNSIGNED);
2225				*tl++ = newnfs_true;
2226				*tl++ = 0;
2227				*tl = txdr_unsigned(*cookiep);
2228				dirlen += nfsm_strtom(nd, dp->d_name, nlen);
2229				if (nvp != NULL) {
2230					supports_nfsv4acls =
2231					    nfs_supportsnfsv4acls(nvp);
2232					NFSVOPUNLOCK(nvp, 0);
2233				} else
2234					supports_nfsv4acls = 0;
2235				if (refp != NULL) {
2236					dirlen += nfsrv_putreferralattr(nd,
2237					    &savbits, refp, 0,
2238					    &nd->nd_repstat);
2239					if (nd->nd_repstat) {
2240						if (nvp != NULL)
2241							vrele(nvp);
2242						if (needs_unbusy != 0)
2243							vfs_unbusy(new_mp);
2244						break;
2245					}
2246				} else if (r) {
2247					dirlen += nfsvno_fillattr(nd, new_mp,
2248					    nvp, nvap, &nfh, r, &rderrbits,
2249					    nd->nd_cred, p, isdgram, 0,
2250					    supports_nfsv4acls, at_root,
2251					    mounted_on_fileno);
2252				} else {
2253					dirlen += nfsvno_fillattr(nd, new_mp,
2254					    nvp, nvap, &nfh, r, &attrbits,
2255					    nd->nd_cred, p, isdgram, 0,
2256					    supports_nfsv4acls, at_root,
2257					    mounted_on_fileno);
2258				}
2259				if (nvp != NULL)
2260					vrele(nvp);
2261				dirlen += (3 * NFSX_UNSIGNED);
2262			}
2263			if (needs_unbusy != 0)
2264				vfs_unbusy(new_mp);
2265			if (dirlen <= cnt)
2266				entrycnt++;
2267		}
2268		cpos += dp->d_reclen;
2269		dp = (struct dirent *)cpos;
2270		cookiep++;
2271		ncookies--;
2272	}
2273	vrele(vp);
2274	vfs_unbusy(mp);
2275
2276	/*
2277	 * If dirlen > cnt, we must strip off the last entry. If that
2278	 * results in an empty reply, report NFSERR_TOOSMALL.
2279	 */
2280	if (dirlen > cnt || nd->nd_repstat) {
2281		if (!nd->nd_repstat && entrycnt == 0)
2282			nd->nd_repstat = NFSERR_TOOSMALL;
2283		if (nd->nd_repstat) {
2284			newnfs_trimtrailing(nd, mb0, bpos0);
2285			if (nd->nd_flag & ND_NFSV3)
2286				nfsrv_postopattr(nd, getret, &at);
2287		} else
2288			newnfs_trimtrailing(nd, mb1, bpos1);
2289		eofflag = 0;
2290	} else if (cpos < cend)
2291		eofflag = 0;
2292	if (!nd->nd_repstat) {
2293		NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
2294		*tl++ = newnfs_false;
2295		if (eofflag)
2296			*tl = newnfs_true;
2297		else
2298			*tl = newnfs_false;
2299	}
2300	FREE((caddr_t)cookies, M_TEMP);
2301	FREE((caddr_t)rbuf, M_TEMP);
2302
2303out:
2304	NFSEXITCODE2(0, nd);
2305	return (0);
2306nfsmout:
2307	vput(vp);
2308	NFSEXITCODE2(error, nd);
2309	return (error);
2310}
2311
2312/*
2313 * Get the settable attributes out of the mbuf list.
2314 * (Return 0 or EBADRPC)
2315 */
2316int
2317nfsrv_sattr(struct nfsrv_descript *nd, struct nfsvattr *nvap,
2318    nfsattrbit_t *attrbitp, NFSACL_T *aclp, struct thread *p)
2319{
2320	u_int32_t *tl;
2321	struct nfsv2_sattr *sp;
2322	int error = 0, toclient = 0;
2323
2324	switch (nd->nd_flag & (ND_NFSV2 | ND_NFSV3 | ND_NFSV4)) {
2325	case ND_NFSV2:
2326		NFSM_DISSECT(sp, struct nfsv2_sattr *, NFSX_V2SATTR);
2327		/*
2328		 * Some old clients didn't fill in the high order 16bits.
2329		 * --> check the low order 2 bytes for 0xffff
2330		 */
2331		if ((fxdr_unsigned(int, sp->sa_mode) & 0xffff) != 0xffff)
2332			nvap->na_mode = nfstov_mode(sp->sa_mode);
2333		if (sp->sa_uid != newnfs_xdrneg1)
2334			nvap->na_uid = fxdr_unsigned(uid_t, sp->sa_uid);
2335		if (sp->sa_gid != newnfs_xdrneg1)
2336			nvap->na_gid = fxdr_unsigned(gid_t, sp->sa_gid);
2337		if (sp->sa_size != newnfs_xdrneg1)
2338			nvap->na_size = fxdr_unsigned(u_quad_t, sp->sa_size);
2339		if (sp->sa_atime.nfsv2_sec != newnfs_xdrneg1) {
2340#ifdef notyet
2341			fxdr_nfsv2time(&sp->sa_atime, &nvap->na_atime);
2342#else
2343			nvap->na_atime.tv_sec =
2344				fxdr_unsigned(u_int32_t,sp->sa_atime.nfsv2_sec);
2345			nvap->na_atime.tv_nsec = 0;
2346#endif
2347		}
2348		if (sp->sa_mtime.nfsv2_sec != newnfs_xdrneg1)
2349			fxdr_nfsv2time(&sp->sa_mtime, &nvap->na_mtime);
2350		break;
2351	case ND_NFSV3:
2352		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2353		if (*tl == newnfs_true) {
2354			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2355			nvap->na_mode = nfstov_mode(*tl);
2356		}
2357		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2358		if (*tl == newnfs_true) {
2359			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2360			nvap->na_uid = fxdr_unsigned(uid_t, *tl);
2361		}
2362		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2363		if (*tl == newnfs_true) {
2364			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2365			nvap->na_gid = fxdr_unsigned(gid_t, *tl);
2366		}
2367		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2368		if (*tl == newnfs_true) {
2369			NFSM_DISSECT(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
2370			nvap->na_size = fxdr_hyper(tl);
2371		}
2372		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2373		switch (fxdr_unsigned(int, *tl)) {
2374		case NFSV3SATTRTIME_TOCLIENT:
2375			NFSM_DISSECT(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
2376			fxdr_nfsv3time(tl, &nvap->na_atime);
2377			toclient = 1;
2378			break;
2379		case NFSV3SATTRTIME_TOSERVER:
2380			vfs_timestamp(&nvap->na_atime);
2381			nvap->na_vaflags |= VA_UTIMES_NULL;
2382			break;
2383		};
2384		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2385		switch (fxdr_unsigned(int, *tl)) {
2386		case NFSV3SATTRTIME_TOCLIENT:
2387			NFSM_DISSECT(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
2388			fxdr_nfsv3time(tl, &nvap->na_mtime);
2389			nvap->na_vaflags &= ~VA_UTIMES_NULL;
2390			break;
2391		case NFSV3SATTRTIME_TOSERVER:
2392			vfs_timestamp(&nvap->na_mtime);
2393			if (!toclient)
2394				nvap->na_vaflags |= VA_UTIMES_NULL;
2395			break;
2396		};
2397		break;
2398	case ND_NFSV4:
2399		error = nfsv4_sattr(nd, nvap, attrbitp, aclp, p);
2400	};
2401nfsmout:
2402	NFSEXITCODE2(error, nd);
2403	return (error);
2404}
2405
2406/*
2407 * Handle the setable attributes for V4.
2408 * Returns NFSERR_BADXDR if it can't be parsed, 0 otherwise.
2409 */
2410int
2411nfsv4_sattr(struct nfsrv_descript *nd, struct nfsvattr *nvap,
2412    nfsattrbit_t *attrbitp, NFSACL_T *aclp, struct thread *p)
2413{
2414	u_int32_t *tl;
2415	int attrsum = 0;
2416	int i, j;
2417	int error, attrsize, bitpos, aclsize, aceerr, retnotsup = 0;
2418	int toclient = 0;
2419	u_char *cp, namestr[NFSV4_SMALLSTR + 1];
2420	uid_t uid;
2421	gid_t gid;
2422
2423	error = nfsrv_getattrbits(nd, attrbitp, NULL, &retnotsup);
2424	if (error)
2425		goto nfsmout;
2426	NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2427	attrsize = fxdr_unsigned(int, *tl);
2428
2429	/*
2430	 * Loop around getting the setable attributes. If an unsupported
2431	 * one is found, set nd_repstat == NFSERR_ATTRNOTSUPP and return.
2432	 */
2433	if (retnotsup) {
2434		nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2435		bitpos = NFSATTRBIT_MAX;
2436	} else {
2437		bitpos = 0;
2438	}
2439	for (; bitpos < NFSATTRBIT_MAX; bitpos++) {
2440	    if (attrsum > attrsize) {
2441		error = NFSERR_BADXDR;
2442		goto nfsmout;
2443	    }
2444	    if (NFSISSET_ATTRBIT(attrbitp, bitpos))
2445		switch (bitpos) {
2446		case NFSATTRBIT_SIZE:
2447			NFSM_DISSECT(tl, u_int32_t *, NFSX_HYPER);
2448			nvap->na_size = fxdr_hyper(tl);
2449			attrsum += NFSX_HYPER;
2450			break;
2451		case NFSATTRBIT_ACL:
2452			error = nfsrv_dissectacl(nd, aclp, &aceerr, &aclsize,
2453			    p);
2454			if (error)
2455				goto nfsmout;
2456			if (aceerr && !nd->nd_repstat)
2457				nd->nd_repstat = aceerr;
2458			attrsum += aclsize;
2459			break;
2460		case NFSATTRBIT_ARCHIVE:
2461			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2462			if (!nd->nd_repstat)
2463				nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2464			attrsum += NFSX_UNSIGNED;
2465			break;
2466		case NFSATTRBIT_HIDDEN:
2467			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2468			if (!nd->nd_repstat)
2469				nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2470			attrsum += NFSX_UNSIGNED;
2471			break;
2472		case NFSATTRBIT_MIMETYPE:
2473			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2474			i = fxdr_unsigned(int, *tl);
2475			error = nfsm_advance(nd, NFSM_RNDUP(i), -1);
2476			if (error)
2477				goto nfsmout;
2478			if (!nd->nd_repstat)
2479				nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2480			attrsum += (NFSX_UNSIGNED + NFSM_RNDUP(i));
2481			break;
2482		case NFSATTRBIT_MODE:
2483			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2484			nvap->na_mode = nfstov_mode(*tl);
2485			attrsum += NFSX_UNSIGNED;
2486			break;
2487		case NFSATTRBIT_OWNER:
2488			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2489			j = fxdr_unsigned(int, *tl);
2490			if (j < 0) {
2491				error = NFSERR_BADXDR;
2492				goto nfsmout;
2493			}
2494			if (j > NFSV4_SMALLSTR)
2495				cp = malloc(j + 1, M_NFSSTRING, M_WAITOK);
2496			else
2497				cp = namestr;
2498			error = nfsrv_mtostr(nd, cp, j);
2499			if (error) {
2500				if (j > NFSV4_SMALLSTR)
2501					free(cp, M_NFSSTRING);
2502				goto nfsmout;
2503			}
2504			if (!nd->nd_repstat) {
2505				nd->nd_repstat = nfsv4_strtouid(nd, cp, j, &uid,
2506				    p);
2507				if (!nd->nd_repstat)
2508					nvap->na_uid = uid;
2509			}
2510			if (j > NFSV4_SMALLSTR)
2511				free(cp, M_NFSSTRING);
2512			attrsum += (NFSX_UNSIGNED + NFSM_RNDUP(j));
2513			break;
2514		case NFSATTRBIT_OWNERGROUP:
2515			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2516			j = fxdr_unsigned(int, *tl);
2517			if (j < 0) {
2518				error = NFSERR_BADXDR;
2519				goto nfsmout;
2520			}
2521			if (j > NFSV4_SMALLSTR)
2522				cp = malloc(j + 1, M_NFSSTRING, M_WAITOK);
2523			else
2524				cp = namestr;
2525			error = nfsrv_mtostr(nd, cp, j);
2526			if (error) {
2527				if (j > NFSV4_SMALLSTR)
2528					free(cp, M_NFSSTRING);
2529				goto nfsmout;
2530			}
2531			if (!nd->nd_repstat) {
2532				nd->nd_repstat = nfsv4_strtogid(nd, cp, j, &gid,
2533				    p);
2534				if (!nd->nd_repstat)
2535					nvap->na_gid = gid;
2536			}
2537			if (j > NFSV4_SMALLSTR)
2538				free(cp, M_NFSSTRING);
2539			attrsum += (NFSX_UNSIGNED + NFSM_RNDUP(j));
2540			break;
2541		case NFSATTRBIT_SYSTEM:
2542			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2543			if (!nd->nd_repstat)
2544				nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2545			attrsum += NFSX_UNSIGNED;
2546			break;
2547		case NFSATTRBIT_TIMEACCESSSET:
2548			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2549			attrsum += NFSX_UNSIGNED;
2550			if (fxdr_unsigned(int, *tl)==NFSV4SATTRTIME_TOCLIENT) {
2551			    NFSM_DISSECT(tl, u_int32_t *, NFSX_V4TIME);
2552			    fxdr_nfsv4time(tl, &nvap->na_atime);
2553			    toclient = 1;
2554			    attrsum += NFSX_V4TIME;
2555			} else {
2556			    vfs_timestamp(&nvap->na_atime);
2557			    nvap->na_vaflags |= VA_UTIMES_NULL;
2558			}
2559			break;
2560		case NFSATTRBIT_TIMEBACKUP:
2561			NFSM_DISSECT(tl, u_int32_t *, NFSX_V4TIME);
2562			if (!nd->nd_repstat)
2563				nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2564			attrsum += NFSX_V4TIME;
2565			break;
2566		case NFSATTRBIT_TIMECREATE:
2567			NFSM_DISSECT(tl, u_int32_t *, NFSX_V4TIME);
2568			if (!nd->nd_repstat)
2569				nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2570			attrsum += NFSX_V4TIME;
2571			break;
2572		case NFSATTRBIT_TIMEMODIFYSET:
2573			NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
2574			attrsum += NFSX_UNSIGNED;
2575			if (fxdr_unsigned(int, *tl)==NFSV4SATTRTIME_TOCLIENT) {
2576			    NFSM_DISSECT(tl, u_int32_t *, NFSX_V4TIME);
2577			    fxdr_nfsv4time(tl, &nvap->na_mtime);
2578			    nvap->na_vaflags &= ~VA_UTIMES_NULL;
2579			    attrsum += NFSX_V4TIME;
2580			} else {
2581			    vfs_timestamp(&nvap->na_mtime);
2582			    if (!toclient)
2583				nvap->na_vaflags |= VA_UTIMES_NULL;
2584			}
2585			break;
2586		default:
2587			nd->nd_repstat = NFSERR_ATTRNOTSUPP;
2588			/*
2589			 * set bitpos so we drop out of the loop.
2590			 */
2591			bitpos = NFSATTRBIT_MAX;
2592			break;
2593		};
2594	}
2595
2596	/*
2597	 * some clients pad the attrlist, so we need to skip over the
2598	 * padding.
2599	 */
2600	if (attrsum > attrsize) {
2601		error = NFSERR_BADXDR;
2602	} else {
2603		attrsize = NFSM_RNDUP(attrsize);
2604		if (attrsum < attrsize)
2605			error = nfsm_advance(nd, attrsize - attrsum, -1);
2606	}
2607nfsmout:
2608	NFSEXITCODE2(error, nd);
2609	return (error);
2610}
2611
2612/*
2613 * Check/setup export credentials.
2614 */
2615int
2616nfsd_excred(struct nfsrv_descript *nd, struct nfsexstuff *exp,
2617    struct ucred *credanon)
2618{
2619	int error = 0;
2620
2621	/*
2622	 * Check/setup credentials.
2623	 */
2624	if (nd->nd_flag & ND_GSS)
2625		exp->nes_exflag &= ~MNT_EXPORTANON;
2626
2627	/*
2628	 * Check to see if the operation is allowed for this security flavor.
2629	 * RFC2623 suggests that the NFSv3 Fsinfo RPC be allowed to
2630	 * AUTH_NONE or AUTH_SYS for file systems requiring RPCSEC_GSS.
2631	 * Also, allow Secinfo, so that it can acquire the correct flavor(s).
2632	 */
2633	if (nfsvno_testexp(nd, exp) &&
2634	    nd->nd_procnum != NFSV4OP_SECINFO &&
2635	    nd->nd_procnum != NFSPROC_FSINFO) {
2636		if (nd->nd_flag & ND_NFSV4)
2637			error = NFSERR_WRONGSEC;
2638		else
2639			error = (NFSERR_AUTHERR | AUTH_TOOWEAK);
2640		goto out;
2641	}
2642
2643	/*
2644	 * Check to see if the file system is exported V4 only.
2645	 */
2646	if (NFSVNO_EXV4ONLY(exp) && !(nd->nd_flag & ND_NFSV4)) {
2647		error = NFSERR_PROGNOTV4;
2648		goto out;
2649	}
2650
2651	/*
2652	 * Now, map the user credentials.
2653	 * (Note that ND_AUTHNONE will only be set for an NFSv3
2654	 *  Fsinfo RPC. If set for anything else, this code might need
2655	 *  to change.)
2656	 */
2657	if (NFSVNO_EXPORTED(exp)) {
2658		if (((nd->nd_flag & ND_GSS) == 0 && nd->nd_cred->cr_uid == 0) ||
2659		     NFSVNO_EXPORTANON(exp) ||
2660		     (nd->nd_flag & ND_AUTHNONE) != 0) {
2661			nd->nd_cred->cr_uid = credanon->cr_uid;
2662			nd->nd_cred->cr_gid = credanon->cr_gid;
2663			crsetgroups(nd->nd_cred, credanon->cr_ngroups,
2664			    credanon->cr_groups);
2665		} else if ((nd->nd_flag & ND_GSS) == 0) {
2666			/*
2667			 * If using AUTH_SYS, call nfsrv_getgrpscred() to see
2668			 * if there is a replacement credential with a group
2669			 * list set up by "nfsuserd -manage-gids".
2670			 * If there is no replacement, nfsrv_getgrpscred()
2671			 * simply returns its argument.
2672			 */
2673			nd->nd_cred = nfsrv_getgrpscred(nd->nd_cred);
2674		}
2675	}
2676
2677out:
2678	NFSEXITCODE2(error, nd);
2679	return (error);
2680}
2681
2682/*
2683 * Check exports.
2684 */
2685int
2686nfsvno_checkexp(struct mount *mp, struct sockaddr *nam, struct nfsexstuff *exp,
2687    struct ucred **credp)
2688{
2689	int i, error, *secflavors;
2690
2691	error = VFS_CHECKEXP(mp, nam, &exp->nes_exflag, credp,
2692	    &exp->nes_numsecflavor, &secflavors);
2693	if (error) {
2694		if (nfs_rootfhset) {
2695			exp->nes_exflag = 0;
2696			exp->nes_numsecflavor = 0;
2697			error = 0;
2698		}
2699	} else {
2700		/* Copy the security flavors. */
2701		for (i = 0; i < exp->nes_numsecflavor; i++)
2702			exp->nes_secflavors[i] = secflavors[i];
2703	}
2704	NFSEXITCODE(error);
2705	return (error);
2706}
2707
2708/*
2709 * Get a vnode for a file handle and export stuff.
2710 */
2711int
2712nfsvno_fhtovp(struct mount *mp, fhandle_t *fhp, struct sockaddr *nam,
2713    int lktype, struct vnode **vpp, struct nfsexstuff *exp,
2714    struct ucred **credp)
2715{
2716	int i, error, *secflavors;
2717
2718	*credp = NULL;
2719	exp->nes_numsecflavor = 0;
2720	error = VFS_FHTOVP(mp, &fhp->fh_fid, lktype, vpp);
2721	if (error != 0)
2722		/* Make sure the server replies ESTALE to the client. */
2723		error = ESTALE;
2724	if (nam && !error) {
2725		error = VFS_CHECKEXP(mp, nam, &exp->nes_exflag, credp,
2726		    &exp->nes_numsecflavor, &secflavors);
2727		if (error) {
2728			if (nfs_rootfhset) {
2729				exp->nes_exflag = 0;
2730				exp->nes_numsecflavor = 0;
2731				error = 0;
2732			} else {
2733				vput(*vpp);
2734			}
2735		} else {
2736			/* Copy the security flavors. */
2737			for (i = 0; i < exp->nes_numsecflavor; i++)
2738				exp->nes_secflavors[i] = secflavors[i];
2739		}
2740	}
2741	NFSEXITCODE(error);
2742	return (error);
2743}
2744
2745/*
2746 * nfsd_fhtovp() - convert a fh to a vnode ptr
2747 * 	- look up fsid in mount list (if not found ret error)
2748 *	- get vp and export rights by calling nfsvno_fhtovp()
2749 *	- if cred->cr_uid == 0 or MNT_EXPORTANON set it to credanon
2750 *	  for AUTH_SYS
2751 *	- if mpp != NULL, return the mount point so that it can
2752 *	  be used for vn_finished_write() by the caller
2753 */
2754void
2755nfsd_fhtovp(struct nfsrv_descript *nd, struct nfsrvfh *nfp, int lktype,
2756    struct vnode **vpp, struct nfsexstuff *exp,
2757    struct mount **mpp, int startwrite, struct thread *p)
2758{
2759	struct mount *mp;
2760	struct ucred *credanon;
2761	fhandle_t *fhp;
2762
2763	fhp = (fhandle_t *)nfp->nfsrvfh_data;
2764	/*
2765	 * Check for the special case of the nfsv4root_fh.
2766	 */
2767	mp = vfs_busyfs(&fhp->fh_fsid);
2768	if (mpp != NULL)
2769		*mpp = mp;
2770	if (mp == NULL) {
2771		*vpp = NULL;
2772		nd->nd_repstat = ESTALE;
2773		goto out;
2774	}
2775
2776	if (startwrite) {
2777		vn_start_write(NULL, mpp, V_WAIT);
2778		if (lktype == LK_SHARED && !(MNT_SHARED_WRITES(mp)))
2779			lktype = LK_EXCLUSIVE;
2780	}
2781	nd->nd_repstat = nfsvno_fhtovp(mp, fhp, nd->nd_nam, lktype, vpp, exp,
2782	    &credanon);
2783	vfs_unbusy(mp);
2784
2785	/*
2786	 * For NFSv4 without a pseudo root fs, unexported file handles
2787	 * can be returned, so that Lookup works everywhere.
2788	 */
2789	if (!nd->nd_repstat && exp->nes_exflag == 0 &&
2790	    !(nd->nd_flag & ND_NFSV4)) {
2791		vput(*vpp);
2792		nd->nd_repstat = EACCES;
2793	}
2794
2795	/*
2796	 * Personally, I've never seen any point in requiring a
2797	 * reserved port#, since only in the rare case where the
2798	 * clients are all boxes with secure system priviledges,
2799	 * does it provide any enhanced security, but... some people
2800	 * believe it to be useful and keep putting this code back in.
2801	 * (There is also some "security checker" out there that
2802	 *  complains if the nfs server doesn't enforce this.)
2803	 * However, note the following:
2804	 * RFC3530 (NFSv4) specifies that a reserved port# not be
2805	 *	required.
2806	 * RFC2623 recommends that, if a reserved port# is checked for,
2807	 *	that there be a way to turn that off--> ifdef'd.
2808	 */
2809#ifdef NFS_REQRSVPORT
2810	if (!nd->nd_repstat) {
2811		struct sockaddr_in *saddr;
2812		struct sockaddr_in6 *saddr6;
2813
2814		saddr = NFSSOCKADDR(nd->nd_nam, struct sockaddr_in *);
2815		saddr6 = NFSSOCKADDR(nd->nd_nam, struct sockaddr_in6 *);
2816		if (!(nd->nd_flag & ND_NFSV4) &&
2817		    ((saddr->sin_family == AF_INET &&
2818		      ntohs(saddr->sin_port) >= IPPORT_RESERVED) ||
2819		     (saddr6->sin6_family == AF_INET6 &&
2820		      ntohs(saddr6->sin6_port) >= IPPORT_RESERVED))) {
2821			vput(*vpp);
2822			nd->nd_repstat = (NFSERR_AUTHERR | AUTH_TOOWEAK);
2823		}
2824	}
2825#endif	/* NFS_REQRSVPORT */
2826
2827	/*
2828	 * Check/setup credentials.
2829	 */
2830	if (!nd->nd_repstat) {
2831		nd->nd_saveduid = nd->nd_cred->cr_uid;
2832		nd->nd_repstat = nfsd_excred(nd, exp, credanon);
2833		if (nd->nd_repstat)
2834			vput(*vpp);
2835	}
2836	if (credanon != NULL)
2837		crfree(credanon);
2838	if (nd->nd_repstat) {
2839		if (startwrite)
2840			vn_finished_write(mp);
2841		*vpp = NULL;
2842		if (mpp != NULL)
2843			*mpp = NULL;
2844	}
2845
2846out:
2847	NFSEXITCODE2(0, nd);
2848}
2849
2850/*
2851 * glue for fp.
2852 */
2853static int
2854fp_getfvp(struct thread *p, int fd, struct file **fpp, struct vnode **vpp)
2855{
2856	struct filedesc *fdp;
2857	struct file *fp;
2858	int error = 0;
2859
2860	fdp = p->td_proc->p_fd;
2861	if (fd < 0 || fd >= fdp->fd_nfiles ||
2862	    (fp = fdp->fd_ofiles[fd].fde_file) == NULL) {
2863		error = EBADF;
2864		goto out;
2865	}
2866	*fpp = fp;
2867
2868out:
2869	NFSEXITCODE(error);
2870	return (error);
2871}
2872
2873/*
2874 * Called from nfssvc() to update the exports list. Just call
2875 * vfs_export(). This has to be done, since the v4 root fake fs isn't
2876 * in the mount list.
2877 */
2878int
2879nfsrv_v4rootexport(void *argp, struct ucred *cred, struct thread *p)
2880{
2881	struct nfsex_args *nfsexargp = (struct nfsex_args *)argp;
2882	int error = 0;
2883	struct nameidata nd;
2884	fhandle_t fh;
2885
2886	error = vfs_export(&nfsv4root_mnt, &nfsexargp->export);
2887	if ((nfsexargp->export.ex_flags & MNT_DELEXPORT) != 0)
2888		nfs_rootfhset = 0;
2889	else if (error == 0) {
2890		if (nfsexargp->fspec == NULL) {
2891			error = EPERM;
2892			goto out;
2893		}
2894		/*
2895		 * If fspec != NULL, this is the v4root path.
2896		 */
2897		NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE,
2898		    nfsexargp->fspec, p);
2899		if ((error = namei(&nd)) != 0)
2900			goto out;
2901		error = nfsvno_getfh(nd.ni_vp, &fh, p);
2902		vrele(nd.ni_vp);
2903		if (!error) {
2904			nfs_rootfh.nfsrvfh_len = NFSX_MYFH;
2905			NFSBCOPY((caddr_t)&fh,
2906			    nfs_rootfh.nfsrvfh_data,
2907			    sizeof (fhandle_t));
2908			nfs_rootfhset = 1;
2909		}
2910	}
2911
2912out:
2913	NFSEXITCODE(error);
2914	return (error);
2915}
2916
2917/*
2918 * This function needs to test to see if the system is near its limit
2919 * for memory allocation via malloc() or mget() and return True iff
2920 * either of these resources are near their limit.
2921 * XXX (For now, this is just a stub.)
2922 */
2923int nfsrv_testmalloclimit = 0;
2924int
2925nfsrv_mallocmget_limit(void)
2926{
2927	static int printmesg = 0;
2928	static int testval = 1;
2929
2930	if (nfsrv_testmalloclimit && (testval++ % 1000) == 0) {
2931		if ((printmesg++ % 100) == 0)
2932			printf("nfsd: malloc/mget near limit\n");
2933		return (1);
2934	}
2935	return (0);
2936}
2937
2938/*
2939 * BSD specific initialization of a mount point.
2940 */
2941void
2942nfsd_mntinit(void)
2943{
2944	static int inited = 0;
2945
2946	if (inited)
2947		return;
2948	inited = 1;
2949	nfsv4root_mnt.mnt_flag = (MNT_RDONLY | MNT_EXPORTED);
2950	TAILQ_INIT(&nfsv4root_mnt.mnt_nvnodelist);
2951	TAILQ_INIT(&nfsv4root_mnt.mnt_activevnodelist);
2952	nfsv4root_mnt.mnt_export = NULL;
2953	TAILQ_INIT(&nfsv4root_opt);
2954	TAILQ_INIT(&nfsv4root_newopt);
2955	nfsv4root_mnt.mnt_opt = &nfsv4root_opt;
2956	nfsv4root_mnt.mnt_optnew = &nfsv4root_newopt;
2957	nfsv4root_mnt.mnt_nvnodelistsize = 0;
2958	nfsv4root_mnt.mnt_activevnodelistsize = 0;
2959}
2960
2961/*
2962 * Get a vnode for a file handle, without checking exports, etc.
2963 */
2964struct vnode *
2965nfsvno_getvp(fhandle_t *fhp)
2966{
2967	struct mount *mp;
2968	struct vnode *vp;
2969	int error;
2970
2971	mp = vfs_busyfs(&fhp->fh_fsid);
2972	if (mp == NULL)
2973		return (NULL);
2974	error = VFS_FHTOVP(mp, &fhp->fh_fid, LK_EXCLUSIVE, &vp);
2975	vfs_unbusy(mp);
2976	if (error)
2977		return (NULL);
2978	return (vp);
2979}
2980
2981/*
2982 * Do a local VOP_ADVLOCK().
2983 */
2984int
2985nfsvno_advlock(struct vnode *vp, int ftype, u_int64_t first,
2986    u_int64_t end, struct thread *td)
2987{
2988	int error = 0;
2989	struct flock fl;
2990	u_int64_t tlen;
2991
2992	if (nfsrv_dolocallocks == 0)
2993		goto out;
2994	ASSERT_VOP_UNLOCKED(vp, "nfsvno_advlock: vp locked");
2995
2996	fl.l_whence = SEEK_SET;
2997	fl.l_type = ftype;
2998	fl.l_start = (off_t)first;
2999	if (end == NFS64BITSSET) {
3000		fl.l_len = 0;
3001	} else {
3002		tlen = end - first;
3003		fl.l_len = (off_t)tlen;
3004	}
3005	/*
3006	 * For FreeBSD8, the l_pid and l_sysid must be set to the same
3007	 * values for all calls, so that all locks will be held by the
3008	 * nfsd server. (The nfsd server handles conflicts between the
3009	 * various clients.)
3010	 * Since an NFSv4 lockowner is a ClientID plus an array of up to 1024
3011	 * bytes, so it can't be put in l_sysid.
3012	 */
3013	if (nfsv4_sysid == 0)
3014		nfsv4_sysid = nlm_acquire_next_sysid();
3015	fl.l_pid = (pid_t)0;
3016	fl.l_sysid = (int)nfsv4_sysid;
3017
3018	if (ftype == F_UNLCK)
3019		error = VOP_ADVLOCK(vp, (caddr_t)td->td_proc, F_UNLCK, &fl,
3020		    (F_POSIX | F_REMOTE));
3021	else
3022		error = VOP_ADVLOCK(vp, (caddr_t)td->td_proc, F_SETLK, &fl,
3023		    (F_POSIX | F_REMOTE));
3024
3025out:
3026	NFSEXITCODE(error);
3027	return (error);
3028}
3029
3030/*
3031 * Check the nfsv4 root exports.
3032 */
3033int
3034nfsvno_v4rootexport(struct nfsrv_descript *nd)
3035{
3036	struct ucred *credanon;
3037	int exflags, error = 0, numsecflavor, *secflavors, i;
3038
3039	error = vfs_stdcheckexp(&nfsv4root_mnt, nd->nd_nam, &exflags,
3040	    &credanon, &numsecflavor, &secflavors);
3041	if (error) {
3042		error = NFSERR_PROGUNAVAIL;
3043		goto out;
3044	}
3045	if (credanon != NULL)
3046		crfree(credanon);
3047	for (i = 0; i < numsecflavor; i++) {
3048		if (secflavors[i] == AUTH_SYS)
3049			nd->nd_flag |= ND_EXAUTHSYS;
3050		else if (secflavors[i] == RPCSEC_GSS_KRB5)
3051			nd->nd_flag |= ND_EXGSS;
3052		else if (secflavors[i] == RPCSEC_GSS_KRB5I)
3053			nd->nd_flag |= ND_EXGSSINTEGRITY;
3054		else if (secflavors[i] == RPCSEC_GSS_KRB5P)
3055			nd->nd_flag |= ND_EXGSSPRIVACY;
3056	}
3057
3058out:
3059	NFSEXITCODE(error);
3060	return (error);
3061}
3062
3063/*
3064 * Nfs server psuedo system call for the nfsd's
3065 */
3066/*
3067 * MPSAFE
3068 */
3069static int
3070nfssvc_nfsd(struct thread *td, struct nfssvc_args *uap)
3071{
3072	struct file *fp;
3073	struct nfsd_addsock_args sockarg;
3074	struct nfsd_nfsd_args nfsdarg;
3075	cap_rights_t rights;
3076	int error;
3077
3078	if (uap->flag & NFSSVC_NFSDADDSOCK) {
3079		error = copyin(uap->argp, (caddr_t)&sockarg, sizeof (sockarg));
3080		if (error)
3081			goto out;
3082		/*
3083		 * Since we don't know what rights might be required,
3084		 * pretend that we need them all. It is better to be too
3085		 * careful than too reckless.
3086		 */
3087		error = fget(td, sockarg.sock,
3088		    cap_rights_init(&rights, CAP_SOCK_SERVER), &fp);
3089		if (error != 0)
3090			goto out;
3091		if (fp->f_type != DTYPE_SOCKET) {
3092			fdrop(fp, td);
3093			error = EPERM;
3094			goto out;
3095		}
3096		error = nfsrvd_addsock(fp);
3097		fdrop(fp, td);
3098	} else if (uap->flag & NFSSVC_NFSDNFSD) {
3099		if (uap->argp == NULL) {
3100			error = EINVAL;
3101			goto out;
3102		}
3103		error = copyin(uap->argp, (caddr_t)&nfsdarg,
3104		    sizeof (nfsdarg));
3105		if (error)
3106			goto out;
3107		error = nfsrvd_nfsd(td, &nfsdarg);
3108	} else {
3109		error = nfssvc_srvcall(td, uap, td->td_ucred);
3110	}
3111
3112out:
3113	NFSEXITCODE(error);
3114	return (error);
3115}
3116
3117static int
3118nfssvc_srvcall(struct thread *p, struct nfssvc_args *uap, struct ucred *cred)
3119{
3120	struct nfsex_args export;
3121	struct file *fp = NULL;
3122	int stablefd, len;
3123	struct nfsd_clid adminrevoke;
3124	struct nfsd_dumplist dumplist;
3125	struct nfsd_dumpclients *dumpclients;
3126	struct nfsd_dumplocklist dumplocklist;
3127	struct nfsd_dumplocks *dumplocks;
3128	struct nameidata nd;
3129	vnode_t vp;
3130	int error = EINVAL, igotlock;
3131	struct proc *procp;
3132	static int suspend_nfsd = 0;
3133
3134	if (uap->flag & NFSSVC_PUBLICFH) {
3135		NFSBZERO((caddr_t)&nfs_pubfh.nfsrvfh_data,
3136		    sizeof (fhandle_t));
3137		error = copyin(uap->argp,
3138		    &nfs_pubfh.nfsrvfh_data, sizeof (fhandle_t));
3139		if (!error)
3140			nfs_pubfhset = 1;
3141	} else if (uap->flag & NFSSVC_V4ROOTEXPORT) {
3142		error = copyin(uap->argp,(caddr_t)&export,
3143		    sizeof (struct nfsex_args));
3144		if (!error)
3145			error = nfsrv_v4rootexport(&export, cred, p);
3146	} else if (uap->flag & NFSSVC_NOPUBLICFH) {
3147		nfs_pubfhset = 0;
3148		error = 0;
3149	} else if (uap->flag & NFSSVC_STABLERESTART) {
3150		error = copyin(uap->argp, (caddr_t)&stablefd,
3151		    sizeof (int));
3152		if (!error)
3153			error = fp_getfvp(p, stablefd, &fp, &vp);
3154		if (!error && (NFSFPFLAG(fp) & (FREAD | FWRITE)) != (FREAD | FWRITE))
3155			error = EBADF;
3156		if (!error && newnfs_numnfsd != 0)
3157			error = EPERM;
3158		if (!error) {
3159			nfsrv_stablefirst.nsf_fp = fp;
3160			nfsrv_setupstable(p);
3161		}
3162	} else if (uap->flag & NFSSVC_ADMINREVOKE) {
3163		error = copyin(uap->argp, (caddr_t)&adminrevoke,
3164		    sizeof (struct nfsd_clid));
3165		if (!error)
3166			error = nfsrv_adminrevoke(&adminrevoke, p);
3167	} else if (uap->flag & NFSSVC_DUMPCLIENTS) {
3168		error = copyin(uap->argp, (caddr_t)&dumplist,
3169		    sizeof (struct nfsd_dumplist));
3170		if (!error && (dumplist.ndl_size < 1 ||
3171			dumplist.ndl_size > NFSRV_MAXDUMPLIST))
3172			error = EPERM;
3173		if (!error) {
3174		    len = sizeof (struct nfsd_dumpclients) * dumplist.ndl_size;
3175		    dumpclients = (struct nfsd_dumpclients *)malloc(len,
3176			M_TEMP, M_WAITOK);
3177		    nfsrv_dumpclients(dumpclients, dumplist.ndl_size);
3178		    error = copyout(dumpclients,
3179			CAST_USER_ADDR_T(dumplist.ndl_list), len);
3180		    free((caddr_t)dumpclients, M_TEMP);
3181		}
3182	} else if (uap->flag & NFSSVC_DUMPLOCKS) {
3183		error = copyin(uap->argp, (caddr_t)&dumplocklist,
3184		    sizeof (struct nfsd_dumplocklist));
3185		if (!error && (dumplocklist.ndllck_size < 1 ||
3186			dumplocklist.ndllck_size > NFSRV_MAXDUMPLIST))
3187			error = EPERM;
3188		if (!error)
3189			error = nfsrv_lookupfilename(&nd,
3190				dumplocklist.ndllck_fname, p);
3191		if (!error) {
3192			len = sizeof (struct nfsd_dumplocks) *
3193				dumplocklist.ndllck_size;
3194			dumplocks = (struct nfsd_dumplocks *)malloc(len,
3195				M_TEMP, M_WAITOK);
3196			nfsrv_dumplocks(nd.ni_vp, dumplocks,
3197			    dumplocklist.ndllck_size, p);
3198			vput(nd.ni_vp);
3199			error = copyout(dumplocks,
3200			    CAST_USER_ADDR_T(dumplocklist.ndllck_list), len);
3201			free((caddr_t)dumplocks, M_TEMP);
3202		}
3203	} else if (uap->flag & NFSSVC_BACKUPSTABLE) {
3204		procp = p->td_proc;
3205		PROC_LOCK(procp);
3206		nfsd_master_pid = procp->p_pid;
3207		bcopy(procp->p_comm, nfsd_master_comm, MAXCOMLEN + 1);
3208		nfsd_master_start = procp->p_stats->p_start;
3209		nfsd_master_proc = procp;
3210		PROC_UNLOCK(procp);
3211	} else if ((uap->flag & NFSSVC_SUSPENDNFSD) != 0) {
3212		NFSLOCKV4ROOTMUTEX();
3213		if (suspend_nfsd == 0) {
3214			/* Lock out all nfsd threads */
3215			do {
3216				igotlock = nfsv4_lock(&nfsd_suspend_lock, 1,
3217				    NULL, NFSV4ROOTLOCKMUTEXPTR, NULL);
3218			} while (igotlock == 0 && suspend_nfsd == 0);
3219			suspend_nfsd = 1;
3220		}
3221		NFSUNLOCKV4ROOTMUTEX();
3222		error = 0;
3223	} else if ((uap->flag & NFSSVC_RESUMENFSD) != 0) {
3224		NFSLOCKV4ROOTMUTEX();
3225		if (suspend_nfsd != 0) {
3226			nfsv4_unlock(&nfsd_suspend_lock, 0);
3227			suspend_nfsd = 0;
3228		}
3229		NFSUNLOCKV4ROOTMUTEX();
3230		error = 0;
3231	}
3232
3233	NFSEXITCODE(error);
3234	return (error);
3235}
3236
3237/*
3238 * Check exports.
3239 * Returns 0 if ok, 1 otherwise.
3240 */
3241int
3242nfsvno_testexp(struct nfsrv_descript *nd, struct nfsexstuff *exp)
3243{
3244	int i;
3245
3246	/*
3247	 * This seems odd, but allow the case where the security flavor
3248	 * list is empty. This happens when NFSv4 is traversing non-exported
3249	 * file systems. Exported file systems should always have a non-empty
3250	 * security flavor list.
3251	 */
3252	if (exp->nes_numsecflavor == 0)
3253		return (0);
3254
3255	for (i = 0; i < exp->nes_numsecflavor; i++) {
3256		/*
3257		 * The tests for privacy and integrity must be first,
3258		 * since ND_GSS is set for everything but AUTH_SYS.
3259		 */
3260		if (exp->nes_secflavors[i] == RPCSEC_GSS_KRB5P &&
3261		    (nd->nd_flag & ND_GSSPRIVACY))
3262			return (0);
3263		if (exp->nes_secflavors[i] == RPCSEC_GSS_KRB5I &&
3264		    (nd->nd_flag & ND_GSSINTEGRITY))
3265			return (0);
3266		if (exp->nes_secflavors[i] == RPCSEC_GSS_KRB5 &&
3267		    (nd->nd_flag & ND_GSS))
3268			return (0);
3269		if (exp->nes_secflavors[i] == AUTH_SYS &&
3270		    (nd->nd_flag & ND_GSS) == 0)
3271			return (0);
3272	}
3273	return (1);
3274}
3275
3276/*
3277 * Calculate a hash value for the fid in a file handle.
3278 */
3279uint32_t
3280nfsrv_hashfh(fhandle_t *fhp)
3281{
3282	uint32_t hashval;
3283
3284	hashval = hash32_buf(&fhp->fh_fid, sizeof(struct fid), 0);
3285	return (hashval);
3286}
3287
3288/*
3289 * Calculate a hash value for the sessionid.
3290 */
3291uint32_t
3292nfsrv_hashsessionid(uint8_t *sessionid)
3293{
3294	uint32_t hashval;
3295
3296	hashval = hash32_buf(sessionid, NFSX_V4SESSIONID, 0);
3297	return (hashval);
3298}
3299
3300/*
3301 * Signal the userland master nfsd to backup the stable restart file.
3302 */
3303void
3304nfsrv_backupstable(void)
3305{
3306	struct proc *procp;
3307
3308	if (nfsd_master_proc != NULL) {
3309		procp = pfind(nfsd_master_pid);
3310		/* Try to make sure it is the correct process. */
3311		if (procp == nfsd_master_proc &&
3312		    procp->p_stats->p_start.tv_sec ==
3313		    nfsd_master_start.tv_sec &&
3314		    procp->p_stats->p_start.tv_usec ==
3315		    nfsd_master_start.tv_usec &&
3316		    strcmp(procp->p_comm, nfsd_master_comm) == 0)
3317			kern_psignal(procp, SIGUSR2);
3318		else
3319			nfsd_master_proc = NULL;
3320
3321		if (procp != NULL)
3322			PROC_UNLOCK(procp);
3323	}
3324}
3325
3326extern int (*nfsd_call_nfsd)(struct thread *, struct nfssvc_args *);
3327
3328/*
3329 * Called once to initialize data structures...
3330 */
3331static int
3332nfsd_modevent(module_t mod, int type, void *data)
3333{
3334	int error = 0, i;
3335	static int loaded = 0;
3336
3337	switch (type) {
3338	case MOD_LOAD:
3339		if (loaded)
3340			goto out;
3341		newnfs_portinit();
3342		for (i = 0; i < NFSRVCACHE_HASHSIZE; i++) {
3343			mtx_init(&nfsrchash_table[i].mtx, "nfsrtc", NULL,
3344			    MTX_DEF);
3345			mtx_init(&nfsrcahash_table[i].mtx, "nfsrtca", NULL,
3346			    MTX_DEF);
3347		}
3348		mtx_init(&nfsrc_udpmtx, "nfsuc", NULL, MTX_DEF);
3349		mtx_init(&nfs_v4root_mutex, "nfs4rt", NULL, MTX_DEF);
3350		mtx_init(&nfsv4root_mnt.mnt_mtx, "nfs4mnt", NULL, MTX_DEF);
3351		lockinit(&nfsv4root_mnt.mnt_explock, PVFS, "explock", 0, 0);
3352		nfsrvd_initcache();
3353		nfsd_init();
3354		NFSD_LOCK();
3355		nfsrvd_init(0);
3356		NFSD_UNLOCK();
3357		nfsd_mntinit();
3358#ifdef VV_DISABLEDELEG
3359		vn_deleg_ops.vndeleg_recall = nfsd_recalldelegation;
3360		vn_deleg_ops.vndeleg_disable = nfsd_disabledelegation;
3361#endif
3362		nfsd_call_servertimer = nfsrv_servertimer;
3363		nfsd_call_nfsd = nfssvc_nfsd;
3364		loaded = 1;
3365		break;
3366
3367	case MOD_UNLOAD:
3368		if (newnfs_numnfsd != 0) {
3369			error = EBUSY;
3370			break;
3371		}
3372
3373#ifdef VV_DISABLEDELEG
3374		vn_deleg_ops.vndeleg_recall = NULL;
3375		vn_deleg_ops.vndeleg_disable = NULL;
3376#endif
3377		nfsd_call_servertimer = NULL;
3378		nfsd_call_nfsd = NULL;
3379
3380		/* Clean out all NFSv4 state. */
3381		nfsrv_throwawayallstate(curthread);
3382
3383		/* Clean the NFS server reply cache */
3384		nfsrvd_cleancache();
3385
3386		/* Free up the krpc server pool. */
3387		if (nfsrvd_pool != NULL)
3388			svcpool_destroy(nfsrvd_pool);
3389
3390		/* and get rid of the locks */
3391		for (i = 0; i < NFSRVCACHE_HASHSIZE; i++) {
3392			mtx_destroy(&nfsrchash_table[i].mtx);
3393			mtx_destroy(&nfsrcahash_table[i].mtx);
3394		}
3395		mtx_destroy(&nfsrc_udpmtx);
3396		mtx_destroy(&nfs_v4root_mutex);
3397		mtx_destroy(&nfsv4root_mnt.mnt_mtx);
3398		for (i = 0; i < nfsrv_sessionhashsize; i++)
3399			mtx_destroy(&nfssessionhash[i].mtx);
3400		lockdestroy(&nfsv4root_mnt.mnt_explock);
3401		free(nfsclienthash, M_NFSDCLIENT);
3402		free(nfslockhash, M_NFSDLOCKFILE);
3403		free(nfssessionhash, M_NFSDSESSION);
3404		loaded = 0;
3405		break;
3406	default:
3407		error = EOPNOTSUPP;
3408		break;
3409	}
3410
3411out:
3412	NFSEXITCODE(error);
3413	return (error);
3414}
3415static moduledata_t nfsd_mod = {
3416	"nfsd",
3417	nfsd_modevent,
3418	NULL,
3419};
3420DECLARE_MODULE(nfsd, nfsd_mod, SI_SUB_VFS, SI_ORDER_ANY);
3421
3422/* So that loader and kldload(2) can find us, wherever we are.. */
3423MODULE_VERSION(nfsd, 1);
3424MODULE_DEPEND(nfsd, nfscommon, 1, 1, 1);
3425MODULE_DEPEND(nfsd, nfslock, 1, 1, 1);
3426MODULE_DEPEND(nfsd, nfslockd, 1, 1, 1);
3427MODULE_DEPEND(nfsd, krpc, 1, 1, 1);
3428MODULE_DEPEND(nfsd, nfssvc, 1, 1, 1);
3429
3430