nfs_clstate.c revision 317984
1/*-
2 * Copyright (c) 2009 Rick Macklem, University of Guelph
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 */
27
28#include <sys/cdefs.h>
29__FBSDID("$FreeBSD: stable/10/sys/fs/nfsclient/nfs_clstate.c 317984 2017-05-08 21:40:42Z rmacklem $");
30
31/*
32 * These functions implement the client side state handling for NFSv4.
33 * NFSv4 state handling:
34 * - A lockowner is used to determine lock contention, so it
35 *   corresponds directly to a Posix pid. (1 to 1 mapping)
36 * - The correct granularity of an OpenOwner is not nearly so
37 *   obvious. An OpenOwner does the following:
38 *   - provides a serial sequencing of Open/Close/Lock-with-new-lockowner
39 *   - is used to check for Open/Share contention (not applicable to
40 *     this client, since all Opens are Deny_None)
41 *   As such, I considered both extreme.
42 *   1 OpenOwner per ClientID - Simple to manage, but fully serializes
43 *   all Open, Close and Lock (with a new lockowner) Ops.
44 *   1 OpenOwner for each Open - This one results in an OpenConfirm for
45 *   every Open, for most servers.
46 *   So, I chose to use the same mapping as I did for LockOwnwers.
47 *   The main concern here is that you can end up with multiple Opens
48 *   for the same File Handle, but on different OpenOwners (opens
49 *   inherited from parents, grandparents...) and you do not know
50 *   which of these the vnodeop close applies to. This is handled by
51 *   delaying the Close Op(s) until all of the Opens have been closed.
52 *   (It is not yet obvious if this is the correct granularity.)
53 * - How the code handles serialization:
54 *   - For the ClientId, it uses an exclusive lock while getting its
55 *     SetClientId and during recovery. Otherwise, it uses a shared
56 *     lock via a reference count.
57 *   - For the rest of the data structures, it uses an SMP mutex
58 *     (once the nfs client is SMP safe) and doesn't sleep while
59 *     manipulating the linked lists.
60 *   - The serialization of Open/Close/Lock/LockU falls out in the
61 *     "wash", since OpenOwners and LockOwners are both mapped from
62 *     Posix pid. In other words, there is only one Posix pid using
63 *     any given owner, so that owner is serialized. (If you change
64 *     the granularity of the OpenOwner, then code must be added to
65 *     serialize Ops on the OpenOwner.)
66 * - When to get rid of OpenOwners and LockOwners.
67 *   - The function nfscl_cleanup_common() is executed after a process exits.
68 *     It goes through the client list looking for all Open and Lock Owners.
69 *     When one is found, it is marked "defunct" or in the case of
70 *     an OpenOwner without any Opens, freed.
71 *     The renew thread scans for defunct Owners and gets rid of them,
72 *     if it can. The LockOwners will also be deleted when the
73 *     associated Open is closed.
74 *   - If the LockU or Close Op(s) fail during close in a way
75 *     that could be recovered upon retry, they are relinked to the
76 *     ClientId's defunct open list and retried by the renew thread
77 *     until they succeed or an unmount/recovery occurs.
78 *     (Since we are done with them, they do not need to be recovered.)
79 */
80
81#ifndef APPLEKEXT
82#include <fs/nfs/nfsport.h>
83
84/*
85 * Global variables
86 */
87extern struct nfsstats newnfsstats;
88extern struct nfsreqhead nfsd_reqq;
89extern u_int32_t newnfs_false, newnfs_true;
90extern int nfscl_debuglevel;
91extern int nfscl_enablecallb;
92extern int nfs_numnfscbd;
93NFSREQSPINLOCK;
94NFSCLSTATEMUTEX;
95int nfscl_inited = 0;
96struct nfsclhead nfsclhead;	/* Head of clientid list */
97int nfscl_deleghighwater = NFSCLDELEGHIGHWATER;
98int nfscl_layouthighwater = NFSCLLAYOUTHIGHWATER;
99#endif	/* !APPLEKEXT */
100
101static int nfscl_delegcnt = 0;
102static int nfscl_layoutcnt = 0;
103static int nfscl_getopen(struct nfsclownerhead *, u_int8_t *, int, u_int8_t *,
104    u_int8_t *, u_int32_t, struct nfscllockowner **, struct nfsclopen **);
105static void nfscl_clrelease(struct nfsclclient *);
106static void nfscl_cleanclient(struct nfsclclient *);
107static void nfscl_expireclient(struct nfsclclient *, struct nfsmount *,
108    struct ucred *, NFSPROC_T *);
109static int nfscl_expireopen(struct nfsclclient *, struct nfsclopen *,
110    struct nfsmount *, struct ucred *, NFSPROC_T *);
111static void nfscl_recover(struct nfsclclient *, struct ucred *, NFSPROC_T *);
112static void nfscl_insertlock(struct nfscllockowner *, struct nfscllock *,
113    struct nfscllock *, int);
114static int nfscl_updatelock(struct nfscllockowner *, struct nfscllock **,
115    struct nfscllock **, int);
116static void nfscl_delegreturnall(struct nfsclclient *, NFSPROC_T *);
117static u_int32_t nfscl_nextcbident(void);
118static mount_t nfscl_getmnt(int, uint8_t *, u_int32_t, struct nfsclclient **);
119static struct nfsclclient *nfscl_getclnt(u_int32_t);
120static struct nfsclclient *nfscl_getclntsess(uint8_t *);
121static struct nfscldeleg *nfscl_finddeleg(struct nfsclclient *, u_int8_t *,
122    int);
123static void nfscl_retoncloselayout(vnode_t, struct nfsclclient *, uint8_t *,
124    int, struct nfsclrecalllayout **);
125static void nfscl_reldevinfo_locked(struct nfscldevinfo *);
126static struct nfscllayout *nfscl_findlayout(struct nfsclclient *, u_int8_t *,
127    int);
128static struct nfscldevinfo *nfscl_finddevinfo(struct nfsclclient *, uint8_t *);
129static int nfscl_checkconflict(struct nfscllockownerhead *, struct nfscllock *,
130    u_int8_t *, struct nfscllock **);
131static void nfscl_freealllocks(struct nfscllockownerhead *, int);
132static int nfscl_localconflict(struct nfsclclient *, u_int8_t *, int,
133    struct nfscllock *, u_int8_t *, struct nfscldeleg *, struct nfscllock **);
134static void nfscl_newopen(struct nfsclclient *, struct nfscldeleg *,
135    struct nfsclowner **, struct nfsclowner **, struct nfsclopen **,
136    struct nfsclopen **, u_int8_t *, u_int8_t *, int, int *);
137static int nfscl_moveopen(vnode_t , struct nfsclclient *,
138    struct nfsmount *, struct nfsclopen *, struct nfsclowner *,
139    struct nfscldeleg *, struct ucred *, NFSPROC_T *);
140static void nfscl_totalrecall(struct nfsclclient *);
141static int nfscl_relock(vnode_t , struct nfsclclient *, struct nfsmount *,
142    struct nfscllockowner *, struct nfscllock *, struct ucred *, NFSPROC_T *);
143static int nfscl_tryopen(struct nfsmount *, vnode_t , u_int8_t *, int,
144    u_int8_t *, int, u_int32_t, struct nfsclopen *, u_int8_t *, int,
145    struct nfscldeleg **, int, u_int32_t, struct ucred *, NFSPROC_T *);
146static int nfscl_trylock(struct nfsmount *, vnode_t , u_int8_t *,
147    int, struct nfscllockowner *, int, int, u_int64_t, u_int64_t, short,
148    struct ucred *, NFSPROC_T *);
149static int nfsrpc_reopen(struct nfsmount *, u_int8_t *, int, u_int32_t,
150    struct nfsclopen *, struct nfscldeleg **, struct ucred *, NFSPROC_T *);
151static void nfscl_freedeleg(struct nfscldeleghead *, struct nfscldeleg *);
152static int nfscl_errmap(struct nfsrv_descript *, u_int32_t);
153static void nfscl_cleanup_common(struct nfsclclient *, u_int8_t *);
154static int nfscl_recalldeleg(struct nfsclclient *, struct nfsmount *,
155    struct nfscldeleg *, vnode_t, struct ucred *, NFSPROC_T *, int);
156static void nfscl_freeopenowner(struct nfsclowner *, int);
157static void nfscl_cleandeleg(struct nfscldeleg *);
158static int nfscl_trydelegreturn(struct nfscldeleg *, struct ucred *,
159    struct nfsmount *, NFSPROC_T *);
160static void nfscl_emptylockowner(struct nfscllockowner *,
161    struct nfscllockownerfhhead *);
162static void nfscl_mergeflayouts(struct nfsclflayouthead *,
163    struct nfsclflayouthead *);
164static int nfscl_layoutrecall(int, struct nfscllayout *, uint32_t, uint64_t,
165    uint64_t, uint32_t, struct nfsclrecalllayout *);
166static int nfscl_seq(uint32_t, uint32_t);
167static void nfscl_layoutreturn(struct nfsmount *, struct nfscllayout *,
168    struct ucred *, NFSPROC_T *);
169static void nfscl_dolayoutcommit(struct nfsmount *, struct nfscllayout *,
170    struct ucred *, NFSPROC_T *);
171
172static short nfscberr_null[] = {
173	0,
174	0,
175};
176
177static short nfscberr_getattr[] = {
178	NFSERR_RESOURCE,
179	NFSERR_BADHANDLE,
180	NFSERR_BADXDR,
181	NFSERR_RESOURCE,
182	NFSERR_SERVERFAULT,
183	0,
184};
185
186static short nfscberr_recall[] = {
187	NFSERR_RESOURCE,
188	NFSERR_BADHANDLE,
189	NFSERR_BADSTATEID,
190	NFSERR_BADXDR,
191	NFSERR_RESOURCE,
192	NFSERR_SERVERFAULT,
193	0,
194};
195
196static short *nfscl_cberrmap[] = {
197	nfscberr_null,
198	nfscberr_null,
199	nfscberr_null,
200	nfscberr_getattr,
201	nfscberr_recall
202};
203
204#define	NETFAMILY(clp) \
205		(((clp)->nfsc_flags & NFSCLFLAGS_AFINET6) ? AF_INET6 : AF_INET)
206
207/*
208 * Called for an open operation.
209 * If the nfhp argument is NULL, just get an openowner.
210 */
211APPLESTATIC int
212nfscl_open(vnode_t vp, u_int8_t *nfhp, int fhlen, u_int32_t amode, int usedeleg,
213    struct ucred *cred, NFSPROC_T *p, struct nfsclowner **owpp,
214    struct nfsclopen **opp, int *newonep, int *retp, int lockit)
215{
216	struct nfsclclient *clp;
217	struct nfsclowner *owp, *nowp;
218	struct nfsclopen *op = NULL, *nop = NULL;
219	struct nfscldeleg *dp;
220	struct nfsclownerhead *ohp;
221	u_int8_t own[NFSV4CL_LOCKNAMELEN];
222	int ret;
223
224	if (newonep != NULL)
225		*newonep = 0;
226	if (opp != NULL)
227		*opp = NULL;
228	if (owpp != NULL)
229		*owpp = NULL;
230
231	/*
232	 * Might need one or both of these, so MALLOC them now, to
233	 * avoid a tsleep() in MALLOC later.
234	 */
235	MALLOC(nowp, struct nfsclowner *, sizeof (struct nfsclowner),
236	    M_NFSCLOWNER, M_WAITOK);
237	if (nfhp != NULL)
238	    MALLOC(nop, struct nfsclopen *, sizeof (struct nfsclopen) +
239		fhlen - 1, M_NFSCLOPEN, M_WAITOK);
240	ret = nfscl_getcl(vnode_mount(vp), cred, p, 1, &clp);
241	if (ret != 0) {
242		FREE((caddr_t)nowp, M_NFSCLOWNER);
243		if (nop != NULL)
244			FREE((caddr_t)nop, M_NFSCLOPEN);
245		return (ret);
246	}
247
248	/*
249	 * Get the Open iff it already exists.
250	 * If none found, add the new one or return error, depending upon
251	 * "create".
252	 */
253	NFSLOCKCLSTATE();
254	dp = NULL;
255	/* First check the delegation list */
256	if (nfhp != NULL && usedeleg) {
257		LIST_FOREACH(dp, NFSCLDELEGHASH(clp, nfhp, fhlen), nfsdl_hash) {
258			if (dp->nfsdl_fhlen == fhlen &&
259			    !NFSBCMP(nfhp, dp->nfsdl_fh, fhlen)) {
260				if (!(amode & NFSV4OPEN_ACCESSWRITE) ||
261				    (dp->nfsdl_flags & NFSCLDL_WRITE))
262					break;
263				dp = NULL;
264				break;
265			}
266		}
267	}
268
269	if (dp != NULL) {
270		nfscl_filllockowner(p->td_proc, own, F_POSIX);
271		ohp = &dp->nfsdl_owner;
272	} else {
273		/* For NFSv4.1 and this option, use a single open_owner. */
274		if (NFSHASONEOPENOWN(VFSTONFS(vnode_mount(vp))))
275			nfscl_filllockowner(NULL, own, F_POSIX);
276		else
277			nfscl_filllockowner(p->td_proc, own, F_POSIX);
278		ohp = &clp->nfsc_owner;
279	}
280	/* Now, search for an openowner */
281	LIST_FOREACH(owp, ohp, nfsow_list) {
282		if (!NFSBCMP(owp->nfsow_owner, own, NFSV4CL_LOCKNAMELEN))
283			break;
284	}
285
286	/*
287	 * Create a new open, as required.
288	 */
289	nfscl_newopen(clp, dp, &owp, &nowp, &op, &nop, own, nfhp, fhlen,
290	    newonep);
291
292	/*
293	 * Now, check the mode on the open and return the appropriate
294	 * value.
295	 */
296	if (retp != NULL) {
297		if (nfhp != NULL && dp != NULL && nop == NULL)
298			/* new local open on delegation */
299			*retp = NFSCLOPEN_SETCRED;
300		else
301			*retp = NFSCLOPEN_OK;
302	}
303	if (op != NULL && (amode & ~(op->nfso_mode))) {
304		op->nfso_mode |= amode;
305		if (retp != NULL && dp == NULL)
306			*retp = NFSCLOPEN_DOOPEN;
307	}
308
309	/*
310	 * Serialize modifications to the open owner for multiple threads
311	 * within the same process using a read/write sleep lock.
312	 * For NFSv4.1 and a single OpenOwner, allow concurrent open operations
313	 * by acquiring a shared lock.  The close operations still use an
314	 * exclusive lock for this case.
315	 */
316	if (lockit != 0) {
317		if (NFSHASONEOPENOWN(VFSTONFS(vnode_mount(vp)))) {
318			/*
319			 * Get a shared lock on the OpenOwner, but first
320			 * wait for any pending exclusive lock, so that the
321			 * exclusive locker gets priority.
322			 */
323			nfsv4_lock(&owp->nfsow_rwlock, 0, NULL,
324			    NFSCLSTATEMUTEXPTR, NULL);
325			nfsv4_getref(&owp->nfsow_rwlock, NULL,
326			    NFSCLSTATEMUTEXPTR, NULL);
327		} else
328			nfscl_lockexcl(&owp->nfsow_rwlock, NFSCLSTATEMUTEXPTR);
329	}
330	NFSUNLOCKCLSTATE();
331	if (nowp != NULL)
332		FREE((caddr_t)nowp, M_NFSCLOWNER);
333	if (nop != NULL)
334		FREE((caddr_t)nop, M_NFSCLOPEN);
335	if (owpp != NULL)
336		*owpp = owp;
337	if (opp != NULL)
338		*opp = op;
339	return (0);
340}
341
342/*
343 * Create a new open, as required.
344 */
345static void
346nfscl_newopen(struct nfsclclient *clp, struct nfscldeleg *dp,
347    struct nfsclowner **owpp, struct nfsclowner **nowpp, struct nfsclopen **opp,
348    struct nfsclopen **nopp, u_int8_t *own, u_int8_t *fhp, int fhlen,
349    int *newonep)
350{
351	struct nfsclowner *owp = *owpp, *nowp;
352	struct nfsclopen *op, *nop;
353
354	if (nowpp != NULL)
355		nowp = *nowpp;
356	else
357		nowp = NULL;
358	if (nopp != NULL)
359		nop = *nopp;
360	else
361		nop = NULL;
362	if (owp == NULL && nowp != NULL) {
363		NFSBCOPY(own, nowp->nfsow_owner, NFSV4CL_LOCKNAMELEN);
364		LIST_INIT(&nowp->nfsow_open);
365		nowp->nfsow_clp = clp;
366		nowp->nfsow_seqid = 0;
367		nowp->nfsow_defunct = 0;
368		nfscl_lockinit(&nowp->nfsow_rwlock);
369		if (dp != NULL) {
370			newnfsstats.cllocalopenowners++;
371			LIST_INSERT_HEAD(&dp->nfsdl_owner, nowp, nfsow_list);
372		} else {
373			newnfsstats.clopenowners++;
374			LIST_INSERT_HEAD(&clp->nfsc_owner, nowp, nfsow_list);
375		}
376		owp = *owpp = nowp;
377		*nowpp = NULL;
378		if (newonep != NULL)
379			*newonep = 1;
380	}
381
382	 /* If an fhp has been specified, create an Open as well. */
383	if (fhp != NULL) {
384		/* and look for the correct open, based upon FH */
385		LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
386			if (op->nfso_fhlen == fhlen &&
387			    !NFSBCMP(op->nfso_fh, fhp, fhlen))
388				break;
389		}
390		if (op == NULL && nop != NULL) {
391			nop->nfso_own = owp;
392			nop->nfso_mode = 0;
393			nop->nfso_opencnt = 0;
394			nop->nfso_posixlock = 1;
395			nop->nfso_fhlen = fhlen;
396			NFSBCOPY(fhp, nop->nfso_fh, fhlen);
397			LIST_INIT(&nop->nfso_lock);
398			nop->nfso_stateid.seqid = 0;
399			nop->nfso_stateid.other[0] = 0;
400			nop->nfso_stateid.other[1] = 0;
401			nop->nfso_stateid.other[2] = 0;
402			if (dp != NULL) {
403				TAILQ_REMOVE(&clp->nfsc_deleg, dp, nfsdl_list);
404				TAILQ_INSERT_HEAD(&clp->nfsc_deleg, dp,
405				    nfsdl_list);
406				dp->nfsdl_timestamp = NFSD_MONOSEC + 120;
407				newnfsstats.cllocalopens++;
408			} else {
409				newnfsstats.clopens++;
410			}
411			LIST_INSERT_HEAD(&owp->nfsow_open, nop, nfso_list);
412			*opp = nop;
413			*nopp = NULL;
414			if (newonep != NULL)
415				*newonep = 1;
416		} else {
417			*opp = op;
418		}
419	}
420}
421
422/*
423 * Called to find/add a delegation to a client.
424 */
425APPLESTATIC int
426nfscl_deleg(mount_t mp, struct nfsclclient *clp, u_int8_t *nfhp,
427    int fhlen, struct ucred *cred, NFSPROC_T *p, struct nfscldeleg **dpp)
428{
429	struct nfscldeleg *dp = *dpp, *tdp;
430
431	/*
432	 * First, if we have received a Read delegation for a file on a
433	 * read/write file system, just return it, because they aren't
434	 * useful, imho.
435	 */
436	if (mp != NULL && dp != NULL && !NFSMNT_RDONLY(mp) &&
437	    (dp->nfsdl_flags & NFSCLDL_READ)) {
438		(void) nfscl_trydelegreturn(dp, cred, VFSTONFS(mp), p);
439		FREE((caddr_t)dp, M_NFSCLDELEG);
440		*dpp = NULL;
441		return (0);
442	}
443
444	/* Look for the correct deleg, based upon FH */
445	NFSLOCKCLSTATE();
446	tdp = nfscl_finddeleg(clp, nfhp, fhlen);
447	if (tdp == NULL) {
448		if (dp == NULL) {
449			NFSUNLOCKCLSTATE();
450			return (NFSERR_BADSTATEID);
451		}
452		*dpp = NULL;
453		TAILQ_INSERT_HEAD(&clp->nfsc_deleg, dp, nfsdl_list);
454		LIST_INSERT_HEAD(NFSCLDELEGHASH(clp, nfhp, fhlen), dp,
455		    nfsdl_hash);
456		dp->nfsdl_timestamp = NFSD_MONOSEC + 120;
457		newnfsstats.cldelegates++;
458		nfscl_delegcnt++;
459	} else {
460		/*
461		 * Delegation already exists, what do we do if a new one??
462		 */
463		if (dp != NULL) {
464			printf("Deleg already exists!\n");
465			FREE((caddr_t)dp, M_NFSCLDELEG);
466			*dpp = NULL;
467		} else {
468			*dpp = tdp;
469		}
470	}
471	NFSUNLOCKCLSTATE();
472	return (0);
473}
474
475/*
476 * Find a delegation for this file handle. Return NULL upon failure.
477 */
478static struct nfscldeleg *
479nfscl_finddeleg(struct nfsclclient *clp, u_int8_t *fhp, int fhlen)
480{
481	struct nfscldeleg *dp;
482
483	LIST_FOREACH(dp, NFSCLDELEGHASH(clp, fhp, fhlen), nfsdl_hash) {
484	    if (dp->nfsdl_fhlen == fhlen &&
485		!NFSBCMP(dp->nfsdl_fh, fhp, fhlen))
486		break;
487	}
488	return (dp);
489}
490
491/*
492 * Get a stateid for an I/O operation. First, look for an open and iff
493 * found, return either a lockowner stateid or the open stateid.
494 * If no Open is found, just return error and the special stateid of all zeros.
495 */
496APPLESTATIC int
497nfscl_getstateid(vnode_t vp, u_int8_t *nfhp, int fhlen, u_int32_t mode,
498    int fords, struct ucred *cred, NFSPROC_T *p, nfsv4stateid_t *stateidp,
499    void **lckpp)
500{
501	struct nfsclclient *clp;
502	struct nfsclowner *owp;
503	struct nfsclopen *op = NULL, *top;
504	struct nfscllockowner *lp;
505	struct nfscldeleg *dp;
506	struct nfsnode *np;
507	struct nfsmount *nmp;
508	u_int8_t own[NFSV4CL_LOCKNAMELEN];
509	int error, done;
510
511	*lckpp = NULL;
512	/*
513	 * Initially, just set the special stateid of all zeros.
514	 * (Don't do this for a DS, since the special stateid can't be used.)
515	 */
516	if (fords == 0) {
517		stateidp->seqid = 0;
518		stateidp->other[0] = 0;
519		stateidp->other[1] = 0;
520		stateidp->other[2] = 0;
521	}
522	if (vnode_vtype(vp) != VREG)
523		return (EISDIR);
524	np = VTONFS(vp);
525	nmp = VFSTONFS(vnode_mount(vp));
526	NFSLOCKCLSTATE();
527	clp = nfscl_findcl(nmp);
528	if (clp == NULL) {
529		NFSUNLOCKCLSTATE();
530		return (EACCES);
531	}
532
533	/*
534	 * Wait for recovery to complete.
535	 */
536	while ((clp->nfsc_flags & NFSCLFLAGS_RECVRINPROG))
537		(void) nfsmsleep(&clp->nfsc_flags, NFSCLSTATEMUTEXPTR,
538		    PZERO, "nfsrecvr", NULL);
539
540	/*
541	 * First, look for a delegation.
542	 */
543	LIST_FOREACH(dp, NFSCLDELEGHASH(clp, nfhp, fhlen), nfsdl_hash) {
544		if (dp->nfsdl_fhlen == fhlen &&
545		    !NFSBCMP(nfhp, dp->nfsdl_fh, fhlen)) {
546			if (!(mode & NFSV4OPEN_ACCESSWRITE) ||
547			    (dp->nfsdl_flags & NFSCLDL_WRITE)) {
548				stateidp->seqid = dp->nfsdl_stateid.seqid;
549				stateidp->other[0] = dp->nfsdl_stateid.other[0];
550				stateidp->other[1] = dp->nfsdl_stateid.other[1];
551				stateidp->other[2] = dp->nfsdl_stateid.other[2];
552				if (!(np->n_flag & NDELEGRECALL)) {
553					TAILQ_REMOVE(&clp->nfsc_deleg, dp,
554					    nfsdl_list);
555					TAILQ_INSERT_HEAD(&clp->nfsc_deleg, dp,
556					    nfsdl_list);
557					dp->nfsdl_timestamp = NFSD_MONOSEC +
558					    120;
559					dp->nfsdl_rwlock.nfslock_usecnt++;
560					*lckpp = (void *)&dp->nfsdl_rwlock;
561				}
562				NFSUNLOCKCLSTATE();
563				return (0);
564			}
565			break;
566		}
567	}
568
569	if (p != NULL) {
570		/*
571		 * If p != NULL, we want to search the parentage tree
572		 * for a matching OpenOwner and use that.
573		 */
574		if (NFSHASONEOPENOWN(VFSTONFS(vnode_mount(vp))))
575			nfscl_filllockowner(NULL, own, F_POSIX);
576		else
577			nfscl_filllockowner(p->td_proc, own, F_POSIX);
578		lp = NULL;
579		error = nfscl_getopen(&clp->nfsc_owner, nfhp, fhlen, own, own,
580		    mode, &lp, &op);
581		if (error == 0 && lp != NULL && fords == 0) {
582			/* Don't return a lock stateid for a DS. */
583			stateidp->seqid =
584			    lp->nfsl_stateid.seqid;
585			stateidp->other[0] =
586			    lp->nfsl_stateid.other[0];
587			stateidp->other[1] =
588			    lp->nfsl_stateid.other[1];
589			stateidp->other[2] =
590			    lp->nfsl_stateid.other[2];
591			NFSUNLOCKCLSTATE();
592			return (0);
593		}
594	}
595	if (op == NULL) {
596		/* If not found, just look for any OpenOwner that will work. */
597		top = NULL;
598		done = 0;
599		owp = LIST_FIRST(&clp->nfsc_owner);
600		while (!done && owp != NULL) {
601			LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
602				if (op->nfso_fhlen == fhlen &&
603				    !NFSBCMP(op->nfso_fh, nfhp, fhlen)) {
604					if (top == NULL && (op->nfso_mode &
605					    NFSV4OPEN_ACCESSWRITE) != 0 &&
606					    (mode & NFSV4OPEN_ACCESSREAD) != 0)
607						top = op;
608					if ((mode & op->nfso_mode) == mode) {
609						done = 1;
610						break;
611					}
612				}
613			}
614			if (!done)
615				owp = LIST_NEXT(owp, nfsow_list);
616		}
617		if (!done) {
618			NFSCL_DEBUG(2, "openmode top=%p\n", top);
619			if (top == NULL || NFSHASOPENMODE(nmp)) {
620				NFSUNLOCKCLSTATE();
621				return (ENOENT);
622			} else
623				op = top;
624		}
625		/*
626		 * For read aheads or write behinds, use the open cred.
627		 * A read ahead or write behind is indicated by p == NULL.
628		 */
629		if (p == NULL)
630			newnfs_copycred(&op->nfso_cred, cred);
631	}
632
633	/*
634	 * No lock stateid, so return the open stateid.
635	 */
636	stateidp->seqid = op->nfso_stateid.seqid;
637	stateidp->other[0] = op->nfso_stateid.other[0];
638	stateidp->other[1] = op->nfso_stateid.other[1];
639	stateidp->other[2] = op->nfso_stateid.other[2];
640	NFSUNLOCKCLSTATE();
641	return (0);
642}
643
644/*
645 * Search for a matching file, mode and, optionally, lockowner.
646 */
647static int
648nfscl_getopen(struct nfsclownerhead *ohp, u_int8_t *nfhp, int fhlen,
649    u_int8_t *openown, u_int8_t *lockown, u_int32_t mode,
650    struct nfscllockowner **lpp, struct nfsclopen **opp)
651{
652	struct nfsclowner *owp;
653	struct nfsclopen *op, *rop, *rop2;
654	struct nfscllockowner *lp;
655	int keep_looping;
656
657	if (lpp != NULL)
658		*lpp = NULL;
659	/*
660	 * rop will be set to the open to be returned. There are three
661	 * variants of this, all for an open of the correct file:
662	 * 1 - A match of lockown.
663	 * 2 - A match of the openown, when no lockown match exists.
664	 * 3 - A match for any open, if no openown or lockown match exists.
665	 * Looking for #2 over #3 probably isn't necessary, but since
666	 * RFC3530 is vague w.r.t. the relationship between openowners and
667	 * lockowners, I think this is the safer way to go.
668	 */
669	rop = NULL;
670	rop2 = NULL;
671	keep_looping = 1;
672	/* Search the client list */
673	owp = LIST_FIRST(ohp);
674	while (owp != NULL && keep_looping != 0) {
675		/* and look for the correct open */
676		op = LIST_FIRST(&owp->nfsow_open);
677		while (op != NULL && keep_looping != 0) {
678			if (op->nfso_fhlen == fhlen &&
679			    !NFSBCMP(op->nfso_fh, nfhp, fhlen)
680			    && (op->nfso_mode & mode) == mode) {
681				if (lpp != NULL) {
682					/* Now look for a matching lockowner. */
683					LIST_FOREACH(lp, &op->nfso_lock,
684					    nfsl_list) {
685						if (!NFSBCMP(lp->nfsl_owner,
686						    lockown,
687						    NFSV4CL_LOCKNAMELEN)) {
688							*lpp = lp;
689							rop = op;
690							keep_looping = 0;
691							break;
692						}
693					}
694				}
695				if (rop == NULL && !NFSBCMP(owp->nfsow_owner,
696				    openown, NFSV4CL_LOCKNAMELEN)) {
697					rop = op;
698					if (lpp == NULL)
699						keep_looping = 0;
700				}
701				if (rop2 == NULL)
702					rop2 = op;
703			}
704			op = LIST_NEXT(op, nfso_list);
705		}
706		owp = LIST_NEXT(owp, nfsow_list);
707	}
708	if (rop == NULL)
709		rop = rop2;
710	if (rop == NULL)
711		return (EBADF);
712	*opp = rop;
713	return (0);
714}
715
716/*
717 * Release use of an open owner. Called when open operations are done
718 * with the open owner.
719 */
720APPLESTATIC void
721nfscl_ownerrelease(struct nfsmount *nmp, struct nfsclowner *owp,
722    __unused int error, __unused int candelete, int unlocked)
723{
724
725	if (owp == NULL)
726		return;
727	NFSLOCKCLSTATE();
728	if (unlocked == 0) {
729		if (NFSHASONEOPENOWN(nmp))
730			nfsv4_relref(&owp->nfsow_rwlock);
731		else
732			nfscl_lockunlock(&owp->nfsow_rwlock);
733	}
734	nfscl_clrelease(owp->nfsow_clp);
735	NFSUNLOCKCLSTATE();
736}
737
738/*
739 * Release use of an open structure under an open owner.
740 */
741APPLESTATIC void
742nfscl_openrelease(struct nfsmount *nmp, struct nfsclopen *op, int error,
743    int candelete)
744{
745	struct nfsclclient *clp;
746	struct nfsclowner *owp;
747
748	if (op == NULL)
749		return;
750	NFSLOCKCLSTATE();
751	owp = op->nfso_own;
752	if (NFSHASONEOPENOWN(nmp))
753		nfsv4_relref(&owp->nfsow_rwlock);
754	else
755		nfscl_lockunlock(&owp->nfsow_rwlock);
756	clp = owp->nfsow_clp;
757	if (error && candelete && op->nfso_opencnt == 0)
758		nfscl_freeopen(op, 0);
759	nfscl_clrelease(clp);
760	NFSUNLOCKCLSTATE();
761}
762
763/*
764 * Called to get a clientid structure. It will optionally lock the
765 * client data structures to do the SetClientId/SetClientId_confirm,
766 * but will release that lock and return the clientid with a refernce
767 * count on it.
768 * If the "cred" argument is NULL, a new clientid should not be created.
769 * If the "p" argument is NULL, a SetClientID/SetClientIDConfirm cannot
770 * be done.
771 * The start_renewthread argument tells nfscl_getcl() to start a renew
772 * thread if this creates a new clp.
773 * It always clpp with a reference count on it, unless returning an error.
774 */
775APPLESTATIC int
776nfscl_getcl(struct mount *mp, struct ucred *cred, NFSPROC_T *p,
777    int start_renewthread, struct nfsclclient **clpp)
778{
779	struct nfsclclient *clp;
780	struct nfsclclient *newclp = NULL;
781	struct nfsmount *nmp;
782	char uuid[HOSTUUIDLEN];
783	int igotlock = 0, error, trystalecnt, clidinusedelay, i;
784	u_int16_t idlen = 0;
785
786	nmp = VFSTONFS(mp);
787	if (cred != NULL) {
788		getcredhostuuid(cred, uuid, sizeof uuid);
789		idlen = strlen(uuid);
790		if (idlen > 0)
791			idlen += sizeof (u_int64_t);
792		else
793			idlen += sizeof (u_int64_t) + 16; /* 16 random bytes */
794		MALLOC(newclp, struct nfsclclient *,
795		    sizeof (struct nfsclclient) + idlen - 1, M_NFSCLCLIENT,
796		    M_WAITOK | M_ZERO);
797	}
798	NFSLOCKCLSTATE();
799	/*
800	 * If a forced dismount is already in progress, don't
801	 * allocate a new clientid and get out now. For the case where
802	 * clp != NULL, this is a harmless optimization.
803	 */
804	if ((mp->mnt_kern_flag & MNTK_UNMOUNTF) != 0) {
805		NFSUNLOCKCLSTATE();
806		if (newclp != NULL)
807			free(newclp, M_NFSCLCLIENT);
808		return (EBADF);
809	}
810	clp = nmp->nm_clp;
811	if (clp == NULL) {
812		if (newclp == NULL) {
813			NFSUNLOCKCLSTATE();
814			return (EACCES);
815		}
816		clp = newclp;
817		clp->nfsc_idlen = idlen;
818		LIST_INIT(&clp->nfsc_owner);
819		TAILQ_INIT(&clp->nfsc_deleg);
820		TAILQ_INIT(&clp->nfsc_layout);
821		LIST_INIT(&clp->nfsc_devinfo);
822		for (i = 0; i < NFSCLDELEGHASHSIZE; i++)
823			LIST_INIT(&clp->nfsc_deleghash[i]);
824		for (i = 0; i < NFSCLLAYOUTHASHSIZE; i++)
825			LIST_INIT(&clp->nfsc_layouthash[i]);
826		clp->nfsc_flags = NFSCLFLAGS_INITED;
827		clp->nfsc_clientidrev = 1;
828		clp->nfsc_cbident = nfscl_nextcbident();
829		nfscl_fillclid(nmp->nm_clval, uuid, clp->nfsc_id,
830		    clp->nfsc_idlen);
831		LIST_INSERT_HEAD(&nfsclhead, clp, nfsc_list);
832		nmp->nm_clp = clp;
833		clp->nfsc_nmp = nmp;
834		NFSUNLOCKCLSTATE();
835		if (start_renewthread != 0)
836			nfscl_start_renewthread(clp);
837	} else {
838		NFSUNLOCKCLSTATE();
839		if (newclp != NULL)
840			free(newclp, M_NFSCLCLIENT);
841	}
842	NFSLOCKCLSTATE();
843	while ((clp->nfsc_flags & NFSCLFLAGS_HASCLIENTID) == 0 && !igotlock &&
844	    (mp->mnt_kern_flag & MNTK_UNMOUNTF) == 0)
845		igotlock = nfsv4_lock(&clp->nfsc_lock, 1, NULL,
846		    NFSCLSTATEMUTEXPTR, mp);
847	if (igotlock == 0) {
848		/*
849		 * Call nfsv4_lock() with "iwantlock == 0" so that it will
850		 * wait for a pending exclusive lock request.  This gives the
851		 * exclusive lock request priority over this shared lock
852		 * request.
853		 * An exclusive lock on nfsc_lock is used mainly for server
854		 * crash recoveries.
855		 */
856		nfsv4_lock(&clp->nfsc_lock, 0, NULL, NFSCLSTATEMUTEXPTR, mp);
857		nfsv4_getref(&clp->nfsc_lock, NULL, NFSCLSTATEMUTEXPTR, mp);
858	}
859	if (igotlock == 0 && (mp->mnt_kern_flag & MNTK_UNMOUNTF) != 0) {
860		/*
861		 * Both nfsv4_lock() and nfsv4_getref() know to check
862		 * for MNTK_UNMOUNTF and return without sleeping to
863		 * wait for the exclusive lock to be released, since it
864		 * might be held by nfscl_umount() and we need to get out
865		 * now for that case and not wait until nfscl_umount()
866		 * releases it.
867		 */
868		NFSUNLOCKCLSTATE();
869		return (EBADF);
870	}
871	NFSUNLOCKCLSTATE();
872
873	/*
874	 * If it needs a clientid, do the setclientid now.
875	 */
876	if ((clp->nfsc_flags & NFSCLFLAGS_HASCLIENTID) == 0) {
877		if (!igotlock)
878			panic("nfscl_clget");
879		if (p == NULL || cred == NULL) {
880			NFSLOCKCLSTATE();
881			nfsv4_unlock(&clp->nfsc_lock, 0);
882			NFSUNLOCKCLSTATE();
883			return (EACCES);
884		}
885		/*
886		 * If RFC3530 Sec. 14.2.33 is taken literally,
887		 * NFSERR_CLIDINUSE will be returned persistently for the
888		 * case where a new mount of the same file system is using
889		 * a different principal. In practice, NFSERR_CLIDINUSE is
890		 * only returned when there is outstanding unexpired state
891		 * on the clientid. As such, try for twice the lease
892		 * interval, if we know what that is. Otherwise, make a
893		 * wild ass guess.
894		 * The case of returning NFSERR_STALECLIENTID is far less
895		 * likely, but might occur if there is a significant delay
896		 * between doing the SetClientID and SetClientIDConfirm Ops,
897		 * such that the server throws away the clientid before
898		 * receiving the SetClientIDConfirm.
899		 */
900		if (clp->nfsc_renew > 0)
901			clidinusedelay = NFSCL_LEASE(clp->nfsc_renew) * 2;
902		else
903			clidinusedelay = 120;
904		trystalecnt = 3;
905		do {
906			error = nfsrpc_setclient(nmp, clp, 0, cred, p);
907			if (error == NFSERR_STALECLIENTID ||
908			    error == NFSERR_STALEDONTRECOVER ||
909			    error == NFSERR_BADSESSION ||
910			    error == NFSERR_CLIDINUSE) {
911				(void) nfs_catnap(PZERO, error, "nfs_setcl");
912			}
913		} while (((error == NFSERR_STALECLIENTID ||
914		     error == NFSERR_BADSESSION ||
915		     error == NFSERR_STALEDONTRECOVER) && --trystalecnt > 0) ||
916		    (error == NFSERR_CLIDINUSE && --clidinusedelay > 0));
917		if (error) {
918			NFSLOCKCLSTATE();
919			nfsv4_unlock(&clp->nfsc_lock, 0);
920			NFSUNLOCKCLSTATE();
921			return (error);
922		}
923		clp->nfsc_flags |= NFSCLFLAGS_HASCLIENTID;
924	}
925	if (igotlock) {
926		NFSLOCKCLSTATE();
927		nfsv4_unlock(&clp->nfsc_lock, 1);
928		NFSUNLOCKCLSTATE();
929	}
930
931	*clpp = clp;
932	return (0);
933}
934
935/*
936 * Get a reference to a clientid and return it, if valid.
937 */
938APPLESTATIC struct nfsclclient *
939nfscl_findcl(struct nfsmount *nmp)
940{
941	struct nfsclclient *clp;
942
943	clp = nmp->nm_clp;
944	if (clp == NULL || !(clp->nfsc_flags & NFSCLFLAGS_HASCLIENTID))
945		return (NULL);
946	return (clp);
947}
948
949/*
950 * Release the clientid structure. It may be locked or reference counted.
951 */
952static void
953nfscl_clrelease(struct nfsclclient *clp)
954{
955
956	if (clp->nfsc_lock.nfslock_lock & NFSV4LOCK_LOCK)
957		nfsv4_unlock(&clp->nfsc_lock, 0);
958	else
959		nfsv4_relref(&clp->nfsc_lock);
960}
961
962/*
963 * External call for nfscl_clrelease.
964 */
965APPLESTATIC void
966nfscl_clientrelease(struct nfsclclient *clp)
967{
968
969	NFSLOCKCLSTATE();
970	if (clp->nfsc_lock.nfslock_lock & NFSV4LOCK_LOCK)
971		nfsv4_unlock(&clp->nfsc_lock, 0);
972	else
973		nfsv4_relref(&clp->nfsc_lock);
974	NFSUNLOCKCLSTATE();
975}
976
977/*
978 * Called when wanting to lock a byte region.
979 */
980APPLESTATIC int
981nfscl_getbytelock(vnode_t vp, u_int64_t off, u_int64_t len,
982    short type, struct ucred *cred, NFSPROC_T *p, struct nfsclclient *rclp,
983    int recovery, void *id, int flags, u_int8_t *rownp, u_int8_t *ropenownp,
984    struct nfscllockowner **lpp, int *newonep, int *donelocallyp)
985{
986	struct nfscllockowner *lp;
987	struct nfsclopen *op;
988	struct nfsclclient *clp;
989	struct nfscllockowner *nlp;
990	struct nfscllock *nlop, *otherlop;
991	struct nfscldeleg *dp = NULL, *ldp = NULL;
992	struct nfscllockownerhead *lhp = NULL;
993	struct nfsnode *np;
994	u_int8_t own[NFSV4CL_LOCKNAMELEN], *ownp, openown[NFSV4CL_LOCKNAMELEN];
995	u_int8_t *openownp;
996	int error = 0, ret, donelocally = 0;
997	u_int32_t mode;
998
999	/* For Lock Ops, the open mode doesn't matter, so use 0 to match any. */
1000	mode = 0;
1001	np = VTONFS(vp);
1002	*lpp = NULL;
1003	lp = NULL;
1004	*newonep = 0;
1005	*donelocallyp = 0;
1006
1007	/*
1008	 * Might need these, so MALLOC them now, to
1009	 * avoid a tsleep() in MALLOC later.
1010	 */
1011	MALLOC(nlp, struct nfscllockowner *,
1012	    sizeof (struct nfscllockowner), M_NFSCLLOCKOWNER, M_WAITOK);
1013	MALLOC(otherlop, struct nfscllock *,
1014	    sizeof (struct nfscllock), M_NFSCLLOCK, M_WAITOK);
1015	MALLOC(nlop, struct nfscllock *,
1016	    sizeof (struct nfscllock), M_NFSCLLOCK, M_WAITOK);
1017	nlop->nfslo_type = type;
1018	nlop->nfslo_first = off;
1019	if (len == NFS64BITSSET) {
1020		nlop->nfslo_end = NFS64BITSSET;
1021	} else {
1022		nlop->nfslo_end = off + len;
1023		if (nlop->nfslo_end <= nlop->nfslo_first)
1024			error = NFSERR_INVAL;
1025	}
1026
1027	if (!error) {
1028		if (recovery)
1029			clp = rclp;
1030		else
1031			error = nfscl_getcl(vnode_mount(vp), cred, p, 1, &clp);
1032	}
1033	if (error) {
1034		FREE((caddr_t)nlp, M_NFSCLLOCKOWNER);
1035		FREE((caddr_t)otherlop, M_NFSCLLOCK);
1036		FREE((caddr_t)nlop, M_NFSCLLOCK);
1037		return (error);
1038	}
1039
1040	op = NULL;
1041	if (recovery) {
1042		ownp = rownp;
1043		openownp = ropenownp;
1044	} else {
1045		nfscl_filllockowner(id, own, flags);
1046		ownp = own;
1047		if (NFSHASONEOPENOWN(VFSTONFS(vnode_mount(vp))))
1048			nfscl_filllockowner(NULL, openown, F_POSIX);
1049		else
1050			nfscl_filllockowner(p->td_proc, openown, F_POSIX);
1051		openownp = openown;
1052	}
1053	if (!recovery) {
1054		NFSLOCKCLSTATE();
1055		/*
1056		 * First, search for a delegation. If one exists for this file,
1057		 * the lock can be done locally against it, so long as there
1058		 * isn't a local lock conflict.
1059		 */
1060		ldp = dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh,
1061		    np->n_fhp->nfh_len);
1062		/* Just sanity check for correct type of delegation */
1063		if (dp != NULL && ((dp->nfsdl_flags &
1064		    (NFSCLDL_RECALL | NFSCLDL_DELEGRET)) != 0 ||
1065		     (type == F_WRLCK &&
1066		      (dp->nfsdl_flags & NFSCLDL_WRITE) == 0)))
1067			dp = NULL;
1068	}
1069	if (dp != NULL) {
1070		/* Now, find an open and maybe a lockowner. */
1071		ret = nfscl_getopen(&dp->nfsdl_owner, np->n_fhp->nfh_fh,
1072		    np->n_fhp->nfh_len, openownp, ownp, mode, NULL, &op);
1073		if (ret)
1074			ret = nfscl_getopen(&clp->nfsc_owner,
1075			    np->n_fhp->nfh_fh, np->n_fhp->nfh_len, openownp,
1076			    ownp, mode, NULL, &op);
1077		if (!ret) {
1078			lhp = &dp->nfsdl_lock;
1079			TAILQ_REMOVE(&clp->nfsc_deleg, dp, nfsdl_list);
1080			TAILQ_INSERT_HEAD(&clp->nfsc_deleg, dp, nfsdl_list);
1081			dp->nfsdl_timestamp = NFSD_MONOSEC + 120;
1082			donelocally = 1;
1083		} else {
1084			dp = NULL;
1085		}
1086	}
1087	if (!donelocally) {
1088		/*
1089		 * Get the related Open and maybe lockowner.
1090		 */
1091		error = nfscl_getopen(&clp->nfsc_owner,
1092		    np->n_fhp->nfh_fh, np->n_fhp->nfh_len, openownp,
1093		    ownp, mode, &lp, &op);
1094		if (!error)
1095			lhp = &op->nfso_lock;
1096	}
1097	if (!error && !recovery)
1098		error = nfscl_localconflict(clp, np->n_fhp->nfh_fh,
1099		    np->n_fhp->nfh_len, nlop, ownp, ldp, NULL);
1100	if (error) {
1101		if (!recovery) {
1102			nfscl_clrelease(clp);
1103			NFSUNLOCKCLSTATE();
1104		}
1105		FREE((caddr_t)nlp, M_NFSCLLOCKOWNER);
1106		FREE((caddr_t)otherlop, M_NFSCLLOCK);
1107		FREE((caddr_t)nlop, M_NFSCLLOCK);
1108		return (error);
1109	}
1110
1111	/*
1112	 * Ok, see if a lockowner exists and create one, as required.
1113	 */
1114	if (lp == NULL)
1115		LIST_FOREACH(lp, lhp, nfsl_list) {
1116			if (!NFSBCMP(lp->nfsl_owner, ownp, NFSV4CL_LOCKNAMELEN))
1117				break;
1118		}
1119	if (lp == NULL) {
1120		NFSBCOPY(ownp, nlp->nfsl_owner, NFSV4CL_LOCKNAMELEN);
1121		if (recovery)
1122			NFSBCOPY(ropenownp, nlp->nfsl_openowner,
1123			    NFSV4CL_LOCKNAMELEN);
1124		else
1125			NFSBCOPY(op->nfso_own->nfsow_owner, nlp->nfsl_openowner,
1126			    NFSV4CL_LOCKNAMELEN);
1127		nlp->nfsl_seqid = 0;
1128		nlp->nfsl_lockflags = flags;
1129		nlp->nfsl_inprog = NULL;
1130		nfscl_lockinit(&nlp->nfsl_rwlock);
1131		LIST_INIT(&nlp->nfsl_lock);
1132		if (donelocally) {
1133			nlp->nfsl_open = NULL;
1134			newnfsstats.cllocallockowners++;
1135		} else {
1136			nlp->nfsl_open = op;
1137			newnfsstats.cllockowners++;
1138		}
1139		LIST_INSERT_HEAD(lhp, nlp, nfsl_list);
1140		lp = nlp;
1141		nlp = NULL;
1142		*newonep = 1;
1143	}
1144
1145	/*
1146	 * Now, update the byte ranges for locks.
1147	 */
1148	ret = nfscl_updatelock(lp, &nlop, &otherlop, donelocally);
1149	if (!ret)
1150		donelocally = 1;
1151	if (donelocally) {
1152		*donelocallyp = 1;
1153		if (!recovery)
1154			nfscl_clrelease(clp);
1155	} else {
1156		/*
1157		 * Serial modifications on the lock owner for multiple threads
1158		 * for the same process using a read/write lock.
1159		 */
1160		if (!recovery)
1161			nfscl_lockexcl(&lp->nfsl_rwlock, NFSCLSTATEMUTEXPTR);
1162	}
1163	if (!recovery)
1164		NFSUNLOCKCLSTATE();
1165
1166	if (nlp)
1167		FREE((caddr_t)nlp, M_NFSCLLOCKOWNER);
1168	if (nlop)
1169		FREE((caddr_t)nlop, M_NFSCLLOCK);
1170	if (otherlop)
1171		FREE((caddr_t)otherlop, M_NFSCLLOCK);
1172
1173	*lpp = lp;
1174	return (0);
1175}
1176
1177/*
1178 * Called to unlock a byte range, for LockU.
1179 */
1180APPLESTATIC int
1181nfscl_relbytelock(vnode_t vp, u_int64_t off, u_int64_t len,
1182    __unused struct ucred *cred, NFSPROC_T *p, int callcnt,
1183    struct nfsclclient *clp, void *id, int flags,
1184    struct nfscllockowner **lpp, int *dorpcp)
1185{
1186	struct nfscllockowner *lp;
1187	struct nfsclowner *owp;
1188	struct nfsclopen *op;
1189	struct nfscllock *nlop, *other_lop = NULL;
1190	struct nfscldeleg *dp;
1191	struct nfsnode *np;
1192	u_int8_t own[NFSV4CL_LOCKNAMELEN];
1193	int ret = 0, fnd;
1194
1195	np = VTONFS(vp);
1196	*lpp = NULL;
1197	*dorpcp = 0;
1198
1199	/*
1200	 * Might need these, so MALLOC them now, to
1201	 * avoid a tsleep() in MALLOC later.
1202	 */
1203	MALLOC(nlop, struct nfscllock *,
1204	    sizeof (struct nfscllock), M_NFSCLLOCK, M_WAITOK);
1205	nlop->nfslo_type = F_UNLCK;
1206	nlop->nfslo_first = off;
1207	if (len == NFS64BITSSET) {
1208		nlop->nfslo_end = NFS64BITSSET;
1209	} else {
1210		nlop->nfslo_end = off + len;
1211		if (nlop->nfslo_end <= nlop->nfslo_first) {
1212			FREE((caddr_t)nlop, M_NFSCLLOCK);
1213			return (NFSERR_INVAL);
1214		}
1215	}
1216	if (callcnt == 0) {
1217		MALLOC(other_lop, struct nfscllock *,
1218		    sizeof (struct nfscllock), M_NFSCLLOCK, M_WAITOK);
1219		*other_lop = *nlop;
1220	}
1221	nfscl_filllockowner(id, own, flags);
1222	dp = NULL;
1223	NFSLOCKCLSTATE();
1224	if (callcnt == 0)
1225		dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh,
1226		    np->n_fhp->nfh_len);
1227
1228	/*
1229	 * First, unlock any local regions on a delegation.
1230	 */
1231	if (dp != NULL) {
1232		/* Look for this lockowner. */
1233		LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
1234			if (!NFSBCMP(lp->nfsl_owner, own,
1235			    NFSV4CL_LOCKNAMELEN))
1236				break;
1237		}
1238		if (lp != NULL)
1239			/* Use other_lop, so nlop is still available */
1240			(void)nfscl_updatelock(lp, &other_lop, NULL, 1);
1241	}
1242
1243	/*
1244	 * Now, find a matching open/lockowner that hasn't already been done,
1245	 * as marked by nfsl_inprog.
1246	 */
1247	lp = NULL;
1248	fnd = 0;
1249	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
1250	    LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
1251		if (op->nfso_fhlen == np->n_fhp->nfh_len &&
1252		    !NFSBCMP(op->nfso_fh, np->n_fhp->nfh_fh, op->nfso_fhlen)) {
1253		    LIST_FOREACH(lp, &op->nfso_lock, nfsl_list) {
1254			if (lp->nfsl_inprog == NULL &&
1255			    !NFSBCMP(lp->nfsl_owner, own,
1256			     NFSV4CL_LOCKNAMELEN)) {
1257				fnd = 1;
1258				break;
1259			}
1260		    }
1261		    if (fnd)
1262			break;
1263		}
1264	    }
1265	    if (fnd)
1266		break;
1267	}
1268
1269	if (lp != NULL) {
1270		ret = nfscl_updatelock(lp, &nlop, NULL, 0);
1271		if (ret)
1272			*dorpcp = 1;
1273		/*
1274		 * Serial modifications on the lock owner for multiple
1275		 * threads for the same process using a read/write lock.
1276		 */
1277		lp->nfsl_inprog = p;
1278		nfscl_lockexcl(&lp->nfsl_rwlock, NFSCLSTATEMUTEXPTR);
1279		*lpp = lp;
1280	}
1281	NFSUNLOCKCLSTATE();
1282	if (nlop)
1283		FREE((caddr_t)nlop, M_NFSCLLOCK);
1284	if (other_lop)
1285		FREE((caddr_t)other_lop, M_NFSCLLOCK);
1286	return (0);
1287}
1288
1289/*
1290 * Release all lockowners marked in progess for this process and file.
1291 */
1292APPLESTATIC void
1293nfscl_releasealllocks(struct nfsclclient *clp, vnode_t vp, NFSPROC_T *p,
1294    void *id, int flags)
1295{
1296	struct nfsclowner *owp;
1297	struct nfsclopen *op;
1298	struct nfscllockowner *lp;
1299	struct nfsnode *np;
1300	u_int8_t own[NFSV4CL_LOCKNAMELEN];
1301
1302	np = VTONFS(vp);
1303	nfscl_filllockowner(id, own, flags);
1304	NFSLOCKCLSTATE();
1305	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
1306	    LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
1307		if (op->nfso_fhlen == np->n_fhp->nfh_len &&
1308		    !NFSBCMP(op->nfso_fh, np->n_fhp->nfh_fh, op->nfso_fhlen)) {
1309		    LIST_FOREACH(lp, &op->nfso_lock, nfsl_list) {
1310			if (lp->nfsl_inprog == p &&
1311			    !NFSBCMP(lp->nfsl_owner, own,
1312			    NFSV4CL_LOCKNAMELEN)) {
1313			    lp->nfsl_inprog = NULL;
1314			    nfscl_lockunlock(&lp->nfsl_rwlock);
1315			}
1316		    }
1317		}
1318	    }
1319	}
1320	nfscl_clrelease(clp);
1321	NFSUNLOCKCLSTATE();
1322}
1323
1324/*
1325 * Called to find out if any bytes within the byte range specified are
1326 * write locked by the calling process. Used to determine if flushing
1327 * is required before a LockU.
1328 * If in doubt, return 1, so the flush will occur.
1329 */
1330APPLESTATIC int
1331nfscl_checkwritelocked(vnode_t vp, struct flock *fl,
1332    struct ucred *cred, NFSPROC_T *p, void *id, int flags)
1333{
1334	struct nfsclowner *owp;
1335	struct nfscllockowner *lp;
1336	struct nfsclopen *op;
1337	struct nfsclclient *clp;
1338	struct nfscllock *lop;
1339	struct nfscldeleg *dp;
1340	struct nfsnode *np;
1341	u_int64_t off, end;
1342	u_int8_t own[NFSV4CL_LOCKNAMELEN];
1343	int error = 0;
1344
1345	np = VTONFS(vp);
1346	switch (fl->l_whence) {
1347	case SEEK_SET:
1348	case SEEK_CUR:
1349		/*
1350		 * Caller is responsible for adding any necessary offset
1351		 * when SEEK_CUR is used.
1352		 */
1353		off = fl->l_start;
1354		break;
1355	case SEEK_END:
1356		off = np->n_size + fl->l_start;
1357		break;
1358	default:
1359		return (1);
1360	};
1361	if (fl->l_len != 0) {
1362		end = off + fl->l_len;
1363		if (end < off)
1364			return (1);
1365	} else {
1366		end = NFS64BITSSET;
1367	}
1368
1369	error = nfscl_getcl(vnode_mount(vp), cred, p, 1, &clp);
1370	if (error)
1371		return (1);
1372	nfscl_filllockowner(id, own, flags);
1373	NFSLOCKCLSTATE();
1374
1375	/*
1376	 * First check the delegation locks.
1377	 */
1378	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
1379	if (dp != NULL) {
1380		LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
1381			if (!NFSBCMP(lp->nfsl_owner, own,
1382			    NFSV4CL_LOCKNAMELEN))
1383				break;
1384		}
1385		if (lp != NULL) {
1386			LIST_FOREACH(lop, &lp->nfsl_lock, nfslo_list) {
1387				if (lop->nfslo_first >= end)
1388					break;
1389				if (lop->nfslo_end <= off)
1390					continue;
1391				if (lop->nfslo_type == F_WRLCK) {
1392					nfscl_clrelease(clp);
1393					NFSUNLOCKCLSTATE();
1394					return (1);
1395				}
1396			}
1397		}
1398	}
1399
1400	/*
1401	 * Now, check state against the server.
1402	 */
1403	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
1404	    LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
1405		if (op->nfso_fhlen == np->n_fhp->nfh_len &&
1406		    !NFSBCMP(op->nfso_fh, np->n_fhp->nfh_fh, op->nfso_fhlen)) {
1407		    LIST_FOREACH(lp, &op->nfso_lock, nfsl_list) {
1408			if (!NFSBCMP(lp->nfsl_owner, own,
1409			    NFSV4CL_LOCKNAMELEN))
1410			    break;
1411		    }
1412		    if (lp != NULL) {
1413			LIST_FOREACH(lop, &lp->nfsl_lock, nfslo_list) {
1414			    if (lop->nfslo_first >= end)
1415				break;
1416			    if (lop->nfslo_end <= off)
1417				continue;
1418			    if (lop->nfslo_type == F_WRLCK) {
1419				nfscl_clrelease(clp);
1420				NFSUNLOCKCLSTATE();
1421				return (1);
1422			    }
1423			}
1424		    }
1425		}
1426	    }
1427	}
1428	nfscl_clrelease(clp);
1429	NFSUNLOCKCLSTATE();
1430	return (0);
1431}
1432
1433/*
1434 * Release a byte range lock owner structure.
1435 */
1436APPLESTATIC void
1437nfscl_lockrelease(struct nfscllockowner *lp, int error, int candelete)
1438{
1439	struct nfsclclient *clp;
1440
1441	if (lp == NULL)
1442		return;
1443	NFSLOCKCLSTATE();
1444	clp = lp->nfsl_open->nfso_own->nfsow_clp;
1445	if (error != 0 && candelete &&
1446	    (lp->nfsl_rwlock.nfslock_lock & NFSV4LOCK_WANTED) == 0)
1447		nfscl_freelockowner(lp, 0);
1448	else
1449		nfscl_lockunlock(&lp->nfsl_rwlock);
1450	nfscl_clrelease(clp);
1451	NFSUNLOCKCLSTATE();
1452}
1453
1454/*
1455 * Free up an open structure and any associated byte range lock structures.
1456 */
1457APPLESTATIC void
1458nfscl_freeopen(struct nfsclopen *op, int local)
1459{
1460
1461	LIST_REMOVE(op, nfso_list);
1462	nfscl_freealllocks(&op->nfso_lock, local);
1463	FREE((caddr_t)op, M_NFSCLOPEN);
1464	if (local)
1465		newnfsstats.cllocalopens--;
1466	else
1467		newnfsstats.clopens--;
1468}
1469
1470/*
1471 * Free up all lock owners and associated locks.
1472 */
1473static void
1474nfscl_freealllocks(struct nfscllockownerhead *lhp, int local)
1475{
1476	struct nfscllockowner *lp, *nlp;
1477
1478	LIST_FOREACH_SAFE(lp, lhp, nfsl_list, nlp) {
1479		if ((lp->nfsl_rwlock.nfslock_lock & NFSV4LOCK_WANTED))
1480			panic("nfscllckw");
1481		nfscl_freelockowner(lp, local);
1482	}
1483}
1484
1485/*
1486 * Called for an Open when NFSERR_EXPIRED is received from the server.
1487 * If there are no byte range locks nor a Share Deny lost, try to do a
1488 * fresh Open. Otherwise, free the open.
1489 */
1490static int
1491nfscl_expireopen(struct nfsclclient *clp, struct nfsclopen *op,
1492    struct nfsmount *nmp, struct ucred *cred, NFSPROC_T *p)
1493{
1494	struct nfscllockowner *lp;
1495	struct nfscldeleg *dp;
1496	int mustdelete = 0, error;
1497
1498	/*
1499	 * Look for any byte range lock(s).
1500	 */
1501	LIST_FOREACH(lp, &op->nfso_lock, nfsl_list) {
1502		if (!LIST_EMPTY(&lp->nfsl_lock)) {
1503			mustdelete = 1;
1504			break;
1505		}
1506	}
1507
1508	/*
1509	 * If no byte range lock(s) nor a Share deny, try to re-open.
1510	 */
1511	if (!mustdelete && (op->nfso_mode & NFSLCK_DENYBITS) == 0) {
1512		newnfs_copycred(&op->nfso_cred, cred);
1513		dp = NULL;
1514		error = nfsrpc_reopen(nmp, op->nfso_fh,
1515		    op->nfso_fhlen, op->nfso_mode, op, &dp, cred, p);
1516		if (error) {
1517			mustdelete = 1;
1518			if (dp != NULL) {
1519				FREE((caddr_t)dp, M_NFSCLDELEG);
1520				dp = NULL;
1521			}
1522		}
1523		if (dp != NULL)
1524			nfscl_deleg(nmp->nm_mountp, clp, op->nfso_fh,
1525			    op->nfso_fhlen, cred, p, &dp);
1526	}
1527
1528	/*
1529	 * If a byte range lock or Share deny or couldn't re-open, free it.
1530	 */
1531	if (mustdelete)
1532		nfscl_freeopen(op, 0);
1533	return (mustdelete);
1534}
1535
1536/*
1537 * Free up an open owner structure.
1538 */
1539static void
1540nfscl_freeopenowner(struct nfsclowner *owp, int local)
1541{
1542
1543	LIST_REMOVE(owp, nfsow_list);
1544	FREE((caddr_t)owp, M_NFSCLOWNER);
1545	if (local)
1546		newnfsstats.cllocalopenowners--;
1547	else
1548		newnfsstats.clopenowners--;
1549}
1550
1551/*
1552 * Free up a byte range lock owner structure.
1553 */
1554APPLESTATIC void
1555nfscl_freelockowner(struct nfscllockowner *lp, int local)
1556{
1557	struct nfscllock *lop, *nlop;
1558
1559	LIST_REMOVE(lp, nfsl_list);
1560	LIST_FOREACH_SAFE(lop, &lp->nfsl_lock, nfslo_list, nlop) {
1561		nfscl_freelock(lop, local);
1562	}
1563	FREE((caddr_t)lp, M_NFSCLLOCKOWNER);
1564	if (local)
1565		newnfsstats.cllocallockowners--;
1566	else
1567		newnfsstats.cllockowners--;
1568}
1569
1570/*
1571 * Free up a byte range lock structure.
1572 */
1573APPLESTATIC void
1574nfscl_freelock(struct nfscllock *lop, int local)
1575{
1576
1577	LIST_REMOVE(lop, nfslo_list);
1578	FREE((caddr_t)lop, M_NFSCLLOCK);
1579	if (local)
1580		newnfsstats.cllocallocks--;
1581	else
1582		newnfsstats.cllocks--;
1583}
1584
1585/*
1586 * Clean out the state related to a delegation.
1587 */
1588static void
1589nfscl_cleandeleg(struct nfscldeleg *dp)
1590{
1591	struct nfsclowner *owp, *nowp;
1592	struct nfsclopen *op;
1593
1594	LIST_FOREACH_SAFE(owp, &dp->nfsdl_owner, nfsow_list, nowp) {
1595		op = LIST_FIRST(&owp->nfsow_open);
1596		if (op != NULL) {
1597			if (LIST_NEXT(op, nfso_list) != NULL)
1598				panic("nfscleandel");
1599			nfscl_freeopen(op, 1);
1600		}
1601		nfscl_freeopenowner(owp, 1);
1602	}
1603	nfscl_freealllocks(&dp->nfsdl_lock, 1);
1604}
1605
1606/*
1607 * Free a delegation.
1608 */
1609static void
1610nfscl_freedeleg(struct nfscldeleghead *hdp, struct nfscldeleg *dp)
1611{
1612
1613	TAILQ_REMOVE(hdp, dp, nfsdl_list);
1614	LIST_REMOVE(dp, nfsdl_hash);
1615	FREE((caddr_t)dp, M_NFSCLDELEG);
1616	newnfsstats.cldelegates--;
1617	nfscl_delegcnt--;
1618}
1619
1620/*
1621 * Free up all state related to this client structure.
1622 */
1623static void
1624nfscl_cleanclient(struct nfsclclient *clp)
1625{
1626	struct nfsclowner *owp, *nowp;
1627	struct nfsclopen *op, *nop;
1628
1629	/* Now, all the OpenOwners, etc. */
1630	LIST_FOREACH_SAFE(owp, &clp->nfsc_owner, nfsow_list, nowp) {
1631		LIST_FOREACH_SAFE(op, &owp->nfsow_open, nfso_list, nop) {
1632			nfscl_freeopen(op, 0);
1633		}
1634		nfscl_freeopenowner(owp, 0);
1635	}
1636}
1637
1638/*
1639 * Called when an NFSERR_EXPIRED is received from the server.
1640 */
1641static void
1642nfscl_expireclient(struct nfsclclient *clp, struct nfsmount *nmp,
1643    struct ucred *cred, NFSPROC_T *p)
1644{
1645	struct nfsclowner *owp, *nowp, *towp;
1646	struct nfsclopen *op, *nop, *top;
1647	struct nfscldeleg *dp, *ndp;
1648	int ret, printed = 0;
1649
1650	/*
1651	 * First, merge locally issued Opens into the list for the server.
1652	 */
1653	dp = TAILQ_FIRST(&clp->nfsc_deleg);
1654	while (dp != NULL) {
1655	    ndp = TAILQ_NEXT(dp, nfsdl_list);
1656	    owp = LIST_FIRST(&dp->nfsdl_owner);
1657	    while (owp != NULL) {
1658		nowp = LIST_NEXT(owp, nfsow_list);
1659		op = LIST_FIRST(&owp->nfsow_open);
1660		if (op != NULL) {
1661		    if (LIST_NEXT(op, nfso_list) != NULL)
1662			panic("nfsclexp");
1663		    LIST_FOREACH(towp, &clp->nfsc_owner, nfsow_list) {
1664			if (!NFSBCMP(towp->nfsow_owner, owp->nfsow_owner,
1665			    NFSV4CL_LOCKNAMELEN))
1666			    break;
1667		    }
1668		    if (towp != NULL) {
1669			/* Merge opens in */
1670			LIST_FOREACH(top, &towp->nfsow_open, nfso_list) {
1671			    if (top->nfso_fhlen == op->nfso_fhlen &&
1672				!NFSBCMP(top->nfso_fh, op->nfso_fh,
1673				 op->nfso_fhlen)) {
1674				top->nfso_mode |= op->nfso_mode;
1675				top->nfso_opencnt += op->nfso_opencnt;
1676				break;
1677			    }
1678			}
1679			if (top == NULL) {
1680			    /* Just add the open to the owner list */
1681			    LIST_REMOVE(op, nfso_list);
1682			    op->nfso_own = towp;
1683			    LIST_INSERT_HEAD(&towp->nfsow_open, op, nfso_list);
1684			    newnfsstats.cllocalopens--;
1685			    newnfsstats.clopens++;
1686			}
1687		    } else {
1688			/* Just add the openowner to the client list */
1689			LIST_REMOVE(owp, nfsow_list);
1690			owp->nfsow_clp = clp;
1691			LIST_INSERT_HEAD(&clp->nfsc_owner, owp, nfsow_list);
1692			newnfsstats.cllocalopenowners--;
1693			newnfsstats.clopenowners++;
1694			newnfsstats.cllocalopens--;
1695			newnfsstats.clopens++;
1696		    }
1697		}
1698		owp = nowp;
1699	    }
1700	    if (!printed && !LIST_EMPTY(&dp->nfsdl_lock)) {
1701		printed = 1;
1702		printf("nfsv4 expired locks lost\n");
1703	    }
1704	    nfscl_cleandeleg(dp);
1705	    nfscl_freedeleg(&clp->nfsc_deleg, dp);
1706	    dp = ndp;
1707	}
1708	if (!TAILQ_EMPTY(&clp->nfsc_deleg))
1709	    panic("nfsclexp");
1710
1711	/*
1712	 * Now, try and reopen against the server.
1713	 */
1714	LIST_FOREACH_SAFE(owp, &clp->nfsc_owner, nfsow_list, nowp) {
1715		owp->nfsow_seqid = 0;
1716		LIST_FOREACH_SAFE(op, &owp->nfsow_open, nfso_list, nop) {
1717			ret = nfscl_expireopen(clp, op, nmp, cred, p);
1718			if (ret && !printed) {
1719				printed = 1;
1720				printf("nfsv4 expired locks lost\n");
1721			}
1722		}
1723		if (LIST_EMPTY(&owp->nfsow_open))
1724			nfscl_freeopenowner(owp, 0);
1725	}
1726}
1727
1728/*
1729 * This function must be called after the process represented by "own" has
1730 * exited. Must be called with CLSTATE lock held.
1731 */
1732static void
1733nfscl_cleanup_common(struct nfsclclient *clp, u_int8_t *own)
1734{
1735	struct nfsclowner *owp, *nowp;
1736	struct nfscllockowner *lp, *nlp;
1737	struct nfscldeleg *dp;
1738
1739	/* First, get rid of local locks on delegations. */
1740	TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list) {
1741		LIST_FOREACH_SAFE(lp, &dp->nfsdl_lock, nfsl_list, nlp) {
1742		    if (!NFSBCMP(lp->nfsl_owner, own, NFSV4CL_LOCKNAMELEN)) {
1743			if ((lp->nfsl_rwlock.nfslock_lock & NFSV4LOCK_WANTED))
1744			    panic("nfscllckw");
1745			nfscl_freelockowner(lp, 1);
1746		    }
1747		}
1748	}
1749	owp = LIST_FIRST(&clp->nfsc_owner);
1750	while (owp != NULL) {
1751		nowp = LIST_NEXT(owp, nfsow_list);
1752		if (!NFSBCMP(owp->nfsow_owner, own,
1753		    NFSV4CL_LOCKNAMELEN)) {
1754			/*
1755			 * If there are children that haven't closed the
1756			 * file descriptors yet, the opens will still be
1757			 * here. For that case, let the renew thread clear
1758			 * out the OpenOwner later.
1759			 */
1760			if (LIST_EMPTY(&owp->nfsow_open))
1761				nfscl_freeopenowner(owp, 0);
1762			else
1763				owp->nfsow_defunct = 1;
1764		}
1765		owp = nowp;
1766	}
1767}
1768
1769/*
1770 * Find open/lock owners for processes that have exited.
1771 */
1772static void
1773nfscl_cleanupkext(struct nfsclclient *clp, struct nfscllockownerfhhead *lhp)
1774{
1775	struct nfsclowner *owp, *nowp;
1776	struct nfsclopen *op;
1777	struct nfscllockowner *lp, *nlp;
1778	struct nfscldeleg *dp;
1779
1780	NFSPROCLISTLOCK();
1781	NFSLOCKCLSTATE();
1782	LIST_FOREACH_SAFE(owp, &clp->nfsc_owner, nfsow_list, nowp) {
1783		LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
1784			LIST_FOREACH_SAFE(lp, &op->nfso_lock, nfsl_list, nlp) {
1785				if (LIST_EMPTY(&lp->nfsl_lock))
1786					nfscl_emptylockowner(lp, lhp);
1787			}
1788		}
1789		if (nfscl_procdoesntexist(owp->nfsow_owner))
1790			nfscl_cleanup_common(clp, owp->nfsow_owner);
1791	}
1792
1793	/*
1794	 * For the single open_owner case, these lock owners need to be
1795	 * checked to see if they still exist separately.
1796	 * This is because nfscl_procdoesntexist() never returns true for
1797	 * the single open_owner so that the above doesn't ever call
1798	 * nfscl_cleanup_common().
1799	 */
1800	TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list) {
1801		LIST_FOREACH_SAFE(lp, &dp->nfsdl_lock, nfsl_list, nlp) {
1802			if (nfscl_procdoesntexist(lp->nfsl_owner))
1803				nfscl_cleanup_common(clp, lp->nfsl_owner);
1804		}
1805	}
1806	NFSUNLOCKCLSTATE();
1807	NFSPROCLISTUNLOCK();
1808}
1809
1810/*
1811 * Take the empty lock owner and move it to the local lhp list if the
1812 * associated process no longer exists.
1813 */
1814static void
1815nfscl_emptylockowner(struct nfscllockowner *lp,
1816    struct nfscllockownerfhhead *lhp)
1817{
1818	struct nfscllockownerfh *lfhp, *mylfhp;
1819	struct nfscllockowner *nlp;
1820	int fnd_it;
1821
1822	/* If not a Posix lock owner, just return. */
1823	if ((lp->nfsl_lockflags & F_POSIX) == 0)
1824		return;
1825
1826	fnd_it = 0;
1827	mylfhp = NULL;
1828	/*
1829	 * First, search to see if this lock owner is already in the list.
1830	 * If it is, then the associated process no longer exists.
1831	 */
1832	SLIST_FOREACH(lfhp, lhp, nfslfh_list) {
1833		if (lfhp->nfslfh_len == lp->nfsl_open->nfso_fhlen &&
1834		    !NFSBCMP(lfhp->nfslfh_fh, lp->nfsl_open->nfso_fh,
1835		    lfhp->nfslfh_len))
1836			mylfhp = lfhp;
1837		LIST_FOREACH(nlp, &lfhp->nfslfh_lock, nfsl_list)
1838			if (!NFSBCMP(nlp->nfsl_owner, lp->nfsl_owner,
1839			    NFSV4CL_LOCKNAMELEN))
1840				fnd_it = 1;
1841	}
1842	/* If not found, check if process still exists. */
1843	if (fnd_it == 0 && nfscl_procdoesntexist(lp->nfsl_owner) == 0)
1844		return;
1845
1846	/* Move the lock owner over to the local list. */
1847	if (mylfhp == NULL) {
1848		mylfhp = malloc(sizeof(struct nfscllockownerfh), M_TEMP,
1849		    M_NOWAIT);
1850		if (mylfhp == NULL)
1851			return;
1852		mylfhp->nfslfh_len = lp->nfsl_open->nfso_fhlen;
1853		NFSBCOPY(lp->nfsl_open->nfso_fh, mylfhp->nfslfh_fh,
1854		    mylfhp->nfslfh_len);
1855		LIST_INIT(&mylfhp->nfslfh_lock);
1856		SLIST_INSERT_HEAD(lhp, mylfhp, nfslfh_list);
1857	}
1858	LIST_REMOVE(lp, nfsl_list);
1859	LIST_INSERT_HEAD(&mylfhp->nfslfh_lock, lp, nfsl_list);
1860}
1861
1862static int	fake_global;	/* Used to force visibility of MNTK_UNMOUNTF */
1863/*
1864 * Called from nfs umount to free up the clientid.
1865 */
1866APPLESTATIC void
1867nfscl_umount(struct nfsmount *nmp, NFSPROC_T *p)
1868{
1869	struct nfsclclient *clp;
1870	struct ucred *cred;
1871	int igotlock;
1872
1873	/*
1874	 * For the case that matters, this is the thread that set
1875	 * MNTK_UNMOUNTF, so it will see it set. The code that follows is
1876	 * done to ensure that any thread executing nfscl_getcl() after
1877	 * this time, will see MNTK_UNMOUNTF set. nfscl_getcl() uses the
1878	 * mutex for NFSLOCKCLSTATE(), so it is "m" for the following
1879	 * explanation, courtesy of Alan Cox.
1880	 * What follows is a snippet from Alan Cox's email at:
1881	 * http://docs.FreeBSD.org/cgi/
1882	 *     mid.cgi?BANLkTikR3d65zPHo9==08ZfJ2vmqZucEvw
1883	 *
1884	 * 1. Set MNTK_UNMOUNTF
1885	 * 2. Acquire a standard FreeBSD mutex "m".
1886	 * 3. Update some data structures.
1887	 * 4. Release mutex "m".
1888	 *
1889	 * Then, other threads that acquire "m" after step 4 has occurred will
1890	 * see MNTK_UNMOUNTF as set.  But, other threads that beat thread X to
1891	 * step 2 may or may not see MNTK_UNMOUNTF as set.
1892	 */
1893	NFSLOCKCLSTATE();
1894	if ((nmp->nm_mountp->mnt_kern_flag & MNTK_UNMOUNTF) != 0) {
1895		fake_global++;
1896		NFSUNLOCKCLSTATE();
1897		NFSLOCKCLSTATE();
1898	}
1899
1900	clp = nmp->nm_clp;
1901	if (clp != NULL) {
1902		if ((clp->nfsc_flags & NFSCLFLAGS_INITED) == 0)
1903			panic("nfscl umount");
1904
1905		/*
1906		 * First, handshake with the nfscl renew thread, to terminate
1907		 * it.
1908		 */
1909		clp->nfsc_flags |= NFSCLFLAGS_UMOUNT;
1910		while (clp->nfsc_flags & NFSCLFLAGS_HASTHREAD)
1911			(void)mtx_sleep(clp, NFSCLSTATEMUTEXPTR, PWAIT,
1912			    "nfsclumnt", hz);
1913
1914		/*
1915		 * Now, get the exclusive lock on the client state, so
1916		 * that no uses of the state are still in progress.
1917		 */
1918		do {
1919			igotlock = nfsv4_lock(&clp->nfsc_lock, 1, NULL,
1920			    NFSCLSTATEMUTEXPTR, NULL);
1921		} while (!igotlock);
1922		NFSUNLOCKCLSTATE();
1923
1924		/*
1925		 * Free up all the state. It will expire on the server, but
1926		 * maybe we should do a SetClientId/SetClientIdConfirm so
1927		 * the server throws it away?
1928		 */
1929		LIST_REMOVE(clp, nfsc_list);
1930		nfscl_delegreturnall(clp, p);
1931		cred = newnfs_getcred();
1932		if (NFSHASNFSV4N(nmp)) {
1933			(void)nfsrpc_destroysession(nmp, clp, cred, p);
1934			(void)nfsrpc_destroyclient(nmp, clp, cred, p);
1935		} else
1936			(void)nfsrpc_setclient(nmp, clp, 0, cred, p);
1937		nfscl_cleanclient(clp);
1938		nmp->nm_clp = NULL;
1939		NFSFREECRED(cred);
1940		free(clp, M_NFSCLCLIENT);
1941	} else
1942		NFSUNLOCKCLSTATE();
1943}
1944
1945/*
1946 * This function is called when a server replies with NFSERR_STALECLIENTID
1947 * NFSERR_STALESTATEID or NFSERR_BADSESSION. It traverses the clientid lists,
1948 * doing Opens and Locks with reclaim. If these fail, it deletes the
1949 * corresponding state.
1950 */
1951static void
1952nfscl_recover(struct nfsclclient *clp, struct ucred *cred, NFSPROC_T *p)
1953{
1954	struct nfsclowner *owp, *nowp;
1955	struct nfsclopen *op, *nop;
1956	struct nfscllockowner *lp, *nlp;
1957	struct nfscllock *lop, *nlop;
1958	struct nfscldeleg *dp, *ndp, *tdp;
1959	struct nfsmount *nmp;
1960	struct ucred *tcred;
1961	struct nfsclopenhead extra_open;
1962	struct nfscldeleghead extra_deleg;
1963	struct nfsreq *rep;
1964	u_int64_t len;
1965	u_int32_t delegtype = NFSV4OPEN_DELEGATEWRITE, mode;
1966	int i, igotlock = 0, error, trycnt, firstlock;
1967	struct nfscllayout *lyp, *nlyp;
1968
1969	/*
1970	 * First, lock the client structure, so everyone else will
1971	 * block when trying to use state.
1972	 */
1973	NFSLOCKCLSTATE();
1974	clp->nfsc_flags |= NFSCLFLAGS_RECVRINPROG;
1975	do {
1976		igotlock = nfsv4_lock(&clp->nfsc_lock, 1, NULL,
1977		    NFSCLSTATEMUTEXPTR, NULL);
1978	} while (!igotlock);
1979	NFSUNLOCKCLSTATE();
1980
1981	nmp = clp->nfsc_nmp;
1982	if (nmp == NULL)
1983		panic("nfscl recover");
1984
1985	/*
1986	 * For now, just get rid of all layouts. There may be a need
1987	 * to do LayoutCommit Ops with reclaim == true later.
1988	 */
1989	TAILQ_FOREACH_SAFE(lyp, &clp->nfsc_layout, nfsly_list, nlyp)
1990		nfscl_freelayout(lyp);
1991	TAILQ_INIT(&clp->nfsc_layout);
1992	for (i = 0; i < NFSCLLAYOUTHASHSIZE; i++)
1993		LIST_INIT(&clp->nfsc_layouthash[i]);
1994
1995	trycnt = 5;
1996	do {
1997		error = nfsrpc_setclient(nmp, clp, 1, cred, p);
1998	} while ((error == NFSERR_STALECLIENTID ||
1999	     error == NFSERR_BADSESSION ||
2000	     error == NFSERR_STALEDONTRECOVER) && --trycnt > 0);
2001	if (error) {
2002		NFSLOCKCLSTATE();
2003		clp->nfsc_flags &= ~(NFSCLFLAGS_RECOVER |
2004		    NFSCLFLAGS_RECVRINPROG);
2005		wakeup(&clp->nfsc_flags);
2006		nfsv4_unlock(&clp->nfsc_lock, 0);
2007		NFSUNLOCKCLSTATE();
2008		return;
2009	}
2010	clp->nfsc_flags |= NFSCLFLAGS_HASCLIENTID;
2011	clp->nfsc_flags &= ~NFSCLFLAGS_RECOVER;
2012
2013	/*
2014	 * Mark requests already queued on the server, so that they don't
2015	 * initiate another recovery cycle. Any requests already in the
2016	 * queue that handle state information will have the old stale
2017	 * clientid/stateid and will get a NFSERR_STALESTATEID,
2018	 * NFSERR_STALECLIENTID or NFSERR_BADSESSION reply from the server.
2019	 * This will be translated to NFSERR_STALEDONTRECOVER when
2020	 * R_DONTRECOVER is set.
2021	 */
2022	NFSLOCKREQ();
2023	TAILQ_FOREACH(rep, &nfsd_reqq, r_chain) {
2024		if (rep->r_nmp == nmp)
2025			rep->r_flags |= R_DONTRECOVER;
2026	}
2027	NFSUNLOCKREQ();
2028
2029	/*
2030	 * Now, mark all delegations "need reclaim".
2031	 */
2032	TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list)
2033		dp->nfsdl_flags |= NFSCLDL_NEEDRECLAIM;
2034
2035	TAILQ_INIT(&extra_deleg);
2036	LIST_INIT(&extra_open);
2037	/*
2038	 * Now traverse the state lists, doing Open and Lock Reclaims.
2039	 */
2040	tcred = newnfs_getcred();
2041	owp = LIST_FIRST(&clp->nfsc_owner);
2042	while (owp != NULL) {
2043	    nowp = LIST_NEXT(owp, nfsow_list);
2044	    owp->nfsow_seqid = 0;
2045	    op = LIST_FIRST(&owp->nfsow_open);
2046	    while (op != NULL) {
2047		nop = LIST_NEXT(op, nfso_list);
2048		if (error != NFSERR_NOGRACE && error != NFSERR_BADSESSION) {
2049		    /* Search for a delegation to reclaim with the open */
2050		    TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list) {
2051			if (!(dp->nfsdl_flags & NFSCLDL_NEEDRECLAIM))
2052			    continue;
2053			if ((dp->nfsdl_flags & NFSCLDL_WRITE)) {
2054			    mode = NFSV4OPEN_ACCESSWRITE;
2055			    delegtype = NFSV4OPEN_DELEGATEWRITE;
2056			} else {
2057			    mode = NFSV4OPEN_ACCESSREAD;
2058			    delegtype = NFSV4OPEN_DELEGATEREAD;
2059			}
2060			if ((op->nfso_mode & mode) == mode &&
2061			    op->nfso_fhlen == dp->nfsdl_fhlen &&
2062			    !NFSBCMP(op->nfso_fh, dp->nfsdl_fh, op->nfso_fhlen))
2063			    break;
2064		    }
2065		    ndp = dp;
2066		    if (dp == NULL)
2067			delegtype = NFSV4OPEN_DELEGATENONE;
2068		    newnfs_copycred(&op->nfso_cred, tcred);
2069		    error = nfscl_tryopen(nmp, NULL, op->nfso_fh,
2070			op->nfso_fhlen, op->nfso_fh, op->nfso_fhlen,
2071			op->nfso_mode, op, NULL, 0, &ndp, 1, delegtype,
2072			tcred, p);
2073		    if (!error) {
2074			/* Handle any replied delegation */
2075			if (ndp != NULL && ((ndp->nfsdl_flags & NFSCLDL_WRITE)
2076			    || NFSMNT_RDONLY(nmp->nm_mountp))) {
2077			    if ((ndp->nfsdl_flags & NFSCLDL_WRITE))
2078				mode = NFSV4OPEN_ACCESSWRITE;
2079			    else
2080				mode = NFSV4OPEN_ACCESSREAD;
2081			    TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list) {
2082				if (!(dp->nfsdl_flags & NFSCLDL_NEEDRECLAIM))
2083				    continue;
2084				if ((op->nfso_mode & mode) == mode &&
2085				    op->nfso_fhlen == dp->nfsdl_fhlen &&
2086				    !NFSBCMP(op->nfso_fh, dp->nfsdl_fh,
2087				    op->nfso_fhlen)) {
2088				    dp->nfsdl_stateid = ndp->nfsdl_stateid;
2089				    dp->nfsdl_sizelimit = ndp->nfsdl_sizelimit;
2090				    dp->nfsdl_ace = ndp->nfsdl_ace;
2091				    dp->nfsdl_change = ndp->nfsdl_change;
2092				    dp->nfsdl_flags &= ~NFSCLDL_NEEDRECLAIM;
2093				    if ((ndp->nfsdl_flags & NFSCLDL_RECALL))
2094					dp->nfsdl_flags |= NFSCLDL_RECALL;
2095				    FREE((caddr_t)ndp, M_NFSCLDELEG);
2096				    ndp = NULL;
2097				    break;
2098				}
2099			    }
2100			}
2101			if (ndp != NULL)
2102			    TAILQ_INSERT_HEAD(&extra_deleg, ndp, nfsdl_list);
2103
2104			/* and reclaim all byte range locks */
2105			lp = LIST_FIRST(&op->nfso_lock);
2106			while (lp != NULL) {
2107			    nlp = LIST_NEXT(lp, nfsl_list);
2108			    lp->nfsl_seqid = 0;
2109			    firstlock = 1;
2110			    lop = LIST_FIRST(&lp->nfsl_lock);
2111			    while (lop != NULL) {
2112				nlop = LIST_NEXT(lop, nfslo_list);
2113				if (lop->nfslo_end == NFS64BITSSET)
2114				    len = NFS64BITSSET;
2115				else
2116				    len = lop->nfslo_end - lop->nfslo_first;
2117				error = nfscl_trylock(nmp, NULL,
2118				    op->nfso_fh, op->nfso_fhlen, lp,
2119				    firstlock, 1, lop->nfslo_first, len,
2120				    lop->nfslo_type, tcred, p);
2121				if (error != 0)
2122				    nfscl_freelock(lop, 0);
2123				else
2124				    firstlock = 0;
2125				lop = nlop;
2126			    }
2127			    /* If no locks, but a lockowner, just delete it. */
2128			    if (LIST_EMPTY(&lp->nfsl_lock))
2129				nfscl_freelockowner(lp, 0);
2130			    lp = nlp;
2131			}
2132		    }
2133		}
2134		if (error != 0 && error != NFSERR_BADSESSION)
2135		    nfscl_freeopen(op, 0);
2136		op = nop;
2137	    }
2138	    owp = nowp;
2139	}
2140
2141	/*
2142	 * Now, try and get any delegations not yet reclaimed by cobbling
2143	 * to-gether an appropriate open.
2144	 */
2145	nowp = NULL;
2146	dp = TAILQ_FIRST(&clp->nfsc_deleg);
2147	while (dp != NULL) {
2148	    ndp = TAILQ_NEXT(dp, nfsdl_list);
2149	    if ((dp->nfsdl_flags & NFSCLDL_NEEDRECLAIM)) {
2150		if (nowp == NULL) {
2151		    MALLOC(nowp, struct nfsclowner *,
2152			sizeof (struct nfsclowner), M_NFSCLOWNER, M_WAITOK);
2153		    /*
2154		     * Name must be as long an largest possible
2155		     * NFSV4CL_LOCKNAMELEN. 12 for now.
2156		     */
2157		    NFSBCOPY("RECLAIMDELEG", nowp->nfsow_owner,
2158			NFSV4CL_LOCKNAMELEN);
2159		    LIST_INIT(&nowp->nfsow_open);
2160		    nowp->nfsow_clp = clp;
2161		    nowp->nfsow_seqid = 0;
2162		    nowp->nfsow_defunct = 0;
2163		    nfscl_lockinit(&nowp->nfsow_rwlock);
2164		}
2165		nop = NULL;
2166		if (error != NFSERR_NOGRACE && error != NFSERR_BADSESSION) {
2167		    MALLOC(nop, struct nfsclopen *, sizeof (struct nfsclopen) +
2168			dp->nfsdl_fhlen - 1, M_NFSCLOPEN, M_WAITOK);
2169		    nop->nfso_own = nowp;
2170		    if ((dp->nfsdl_flags & NFSCLDL_WRITE)) {
2171			nop->nfso_mode = NFSV4OPEN_ACCESSWRITE;
2172			delegtype = NFSV4OPEN_DELEGATEWRITE;
2173		    } else {
2174			nop->nfso_mode = NFSV4OPEN_ACCESSREAD;
2175			delegtype = NFSV4OPEN_DELEGATEREAD;
2176		    }
2177		    nop->nfso_opencnt = 0;
2178		    nop->nfso_posixlock = 1;
2179		    nop->nfso_fhlen = dp->nfsdl_fhlen;
2180		    NFSBCOPY(dp->nfsdl_fh, nop->nfso_fh, dp->nfsdl_fhlen);
2181		    LIST_INIT(&nop->nfso_lock);
2182		    nop->nfso_stateid.seqid = 0;
2183		    nop->nfso_stateid.other[0] = 0;
2184		    nop->nfso_stateid.other[1] = 0;
2185		    nop->nfso_stateid.other[2] = 0;
2186		    newnfs_copycred(&dp->nfsdl_cred, tcred);
2187		    newnfs_copyincred(tcred, &nop->nfso_cred);
2188		    tdp = NULL;
2189		    error = nfscl_tryopen(nmp, NULL, nop->nfso_fh,
2190			nop->nfso_fhlen, nop->nfso_fh, nop->nfso_fhlen,
2191			nop->nfso_mode, nop, NULL, 0, &tdp, 1,
2192			delegtype, tcred, p);
2193		    if (tdp != NULL) {
2194			if ((tdp->nfsdl_flags & NFSCLDL_WRITE))
2195			    mode = NFSV4OPEN_ACCESSWRITE;
2196			else
2197			    mode = NFSV4OPEN_ACCESSREAD;
2198			if ((nop->nfso_mode & mode) == mode &&
2199			    nop->nfso_fhlen == tdp->nfsdl_fhlen &&
2200			    !NFSBCMP(nop->nfso_fh, tdp->nfsdl_fh,
2201			    nop->nfso_fhlen)) {
2202			    dp->nfsdl_stateid = tdp->nfsdl_stateid;
2203			    dp->nfsdl_sizelimit = tdp->nfsdl_sizelimit;
2204			    dp->nfsdl_ace = tdp->nfsdl_ace;
2205			    dp->nfsdl_change = tdp->nfsdl_change;
2206			    dp->nfsdl_flags &= ~NFSCLDL_NEEDRECLAIM;
2207			    if ((tdp->nfsdl_flags & NFSCLDL_RECALL))
2208				dp->nfsdl_flags |= NFSCLDL_RECALL;
2209			    FREE((caddr_t)tdp, M_NFSCLDELEG);
2210			} else {
2211			    TAILQ_INSERT_HEAD(&extra_deleg, tdp, nfsdl_list);
2212			}
2213		    }
2214		}
2215		if (error) {
2216		    if (nop != NULL)
2217			FREE((caddr_t)nop, M_NFSCLOPEN);
2218		    /*
2219		     * Couldn't reclaim it, so throw the state
2220		     * away. Ouch!!
2221		     */
2222		    nfscl_cleandeleg(dp);
2223		    nfscl_freedeleg(&clp->nfsc_deleg, dp);
2224		} else {
2225		    LIST_INSERT_HEAD(&extra_open, nop, nfso_list);
2226		}
2227	    }
2228	    dp = ndp;
2229	}
2230
2231	/*
2232	 * Now, get rid of extra Opens and Delegations.
2233	 */
2234	LIST_FOREACH_SAFE(op, &extra_open, nfso_list, nop) {
2235		do {
2236			newnfs_copycred(&op->nfso_cred, tcred);
2237			error = nfscl_tryclose(op, tcred, nmp, p);
2238			if (error == NFSERR_GRACE)
2239				(void) nfs_catnap(PZERO, error, "nfsexcls");
2240		} while (error == NFSERR_GRACE);
2241		LIST_REMOVE(op, nfso_list);
2242		FREE((caddr_t)op, M_NFSCLOPEN);
2243	}
2244	if (nowp != NULL)
2245		FREE((caddr_t)nowp, M_NFSCLOWNER);
2246
2247	TAILQ_FOREACH_SAFE(dp, &extra_deleg, nfsdl_list, ndp) {
2248		do {
2249			newnfs_copycred(&dp->nfsdl_cred, tcred);
2250			error = nfscl_trydelegreturn(dp, tcred, nmp, p);
2251			if (error == NFSERR_GRACE)
2252				(void) nfs_catnap(PZERO, error, "nfsexdlg");
2253		} while (error == NFSERR_GRACE);
2254		TAILQ_REMOVE(&extra_deleg, dp, nfsdl_list);
2255		FREE((caddr_t)dp, M_NFSCLDELEG);
2256	}
2257
2258	/* For NFSv4.1 or later, do a RECLAIM_COMPLETE. */
2259	if (NFSHASNFSV4N(nmp))
2260		(void)nfsrpc_reclaimcomplete(nmp, cred, p);
2261
2262	NFSLOCKCLSTATE();
2263	clp->nfsc_flags &= ~NFSCLFLAGS_RECVRINPROG;
2264	wakeup(&clp->nfsc_flags);
2265	nfsv4_unlock(&clp->nfsc_lock, 0);
2266	NFSUNLOCKCLSTATE();
2267	NFSFREECRED(tcred);
2268}
2269
2270/*
2271 * This function is called when a server replies with NFSERR_EXPIRED.
2272 * It deletes all state for the client and does a fresh SetClientId/confirm.
2273 * XXX Someday it should post a signal to the process(es) that hold the
2274 * state, so they know that lock state has been lost.
2275 */
2276APPLESTATIC int
2277nfscl_hasexpired(struct nfsclclient *clp, u_int32_t clidrev, NFSPROC_T *p)
2278{
2279	struct nfsmount *nmp;
2280	struct ucred *cred;
2281	int igotlock = 0, error, trycnt;
2282
2283	/*
2284	 * If the clientid has gone away or a new SetClientid has already
2285	 * been done, just return ok.
2286	 */
2287	if (clp == NULL || clidrev != clp->nfsc_clientidrev)
2288		return (0);
2289
2290	/*
2291	 * First, lock the client structure, so everyone else will
2292	 * block when trying to use state. Also, use NFSCLFLAGS_EXPIREIT so
2293	 * that only one thread does the work.
2294	 */
2295	NFSLOCKCLSTATE();
2296	clp->nfsc_flags |= NFSCLFLAGS_EXPIREIT;
2297	do {
2298		igotlock = nfsv4_lock(&clp->nfsc_lock, 1, NULL,
2299		    NFSCLSTATEMUTEXPTR, NULL);
2300	} while (!igotlock && (clp->nfsc_flags & NFSCLFLAGS_EXPIREIT));
2301	if ((clp->nfsc_flags & NFSCLFLAGS_EXPIREIT) == 0) {
2302		if (igotlock)
2303			nfsv4_unlock(&clp->nfsc_lock, 0);
2304		NFSUNLOCKCLSTATE();
2305		return (0);
2306	}
2307	clp->nfsc_flags |= NFSCLFLAGS_RECVRINPROG;
2308	NFSUNLOCKCLSTATE();
2309
2310	nmp = clp->nfsc_nmp;
2311	if (nmp == NULL)
2312		panic("nfscl expired");
2313	cred = newnfs_getcred();
2314	trycnt = 5;
2315	do {
2316		error = nfsrpc_setclient(nmp, clp, 0, cred, p);
2317	} while ((error == NFSERR_STALECLIENTID ||
2318	     error == NFSERR_BADSESSION ||
2319	     error == NFSERR_STALEDONTRECOVER) && --trycnt > 0);
2320	if (error) {
2321		NFSLOCKCLSTATE();
2322		clp->nfsc_flags &= ~NFSCLFLAGS_RECOVER;
2323	} else {
2324		/*
2325		 * Expire the state for the client.
2326		 */
2327		nfscl_expireclient(clp, nmp, cred, p);
2328		NFSLOCKCLSTATE();
2329		clp->nfsc_flags |= NFSCLFLAGS_HASCLIENTID;
2330		clp->nfsc_flags &= ~NFSCLFLAGS_RECOVER;
2331	}
2332	clp->nfsc_flags &= ~(NFSCLFLAGS_EXPIREIT | NFSCLFLAGS_RECVRINPROG);
2333	wakeup(&clp->nfsc_flags);
2334	nfsv4_unlock(&clp->nfsc_lock, 0);
2335	NFSUNLOCKCLSTATE();
2336	NFSFREECRED(cred);
2337	return (error);
2338}
2339
2340/*
2341 * This function inserts a lock in the list after insert_lop.
2342 */
2343static void
2344nfscl_insertlock(struct nfscllockowner *lp, struct nfscllock *new_lop,
2345    struct nfscllock *insert_lop, int local)
2346{
2347
2348	if ((struct nfscllockowner *)insert_lop == lp)
2349		LIST_INSERT_HEAD(&lp->nfsl_lock, new_lop, nfslo_list);
2350	else
2351		LIST_INSERT_AFTER(insert_lop, new_lop, nfslo_list);
2352	if (local)
2353		newnfsstats.cllocallocks++;
2354	else
2355		newnfsstats.cllocks++;
2356}
2357
2358/*
2359 * This function updates the locking for a lock owner and given file. It
2360 * maintains a list of lock ranges ordered on increasing file offset that
2361 * are NFSCLLOCK_READ or NFSCLLOCK_WRITE and non-overlapping (aka POSIX style).
2362 * It always adds new_lop to the list and sometimes uses the one pointed
2363 * at by other_lopp.
2364 * Returns 1 if the locks were modified, 0 otherwise.
2365 */
2366static int
2367nfscl_updatelock(struct nfscllockowner *lp, struct nfscllock **new_lopp,
2368    struct nfscllock **other_lopp, int local)
2369{
2370	struct nfscllock *new_lop = *new_lopp;
2371	struct nfscllock *lop, *tlop, *ilop;
2372	struct nfscllock *other_lop;
2373	int unlock = 0, modified = 0;
2374	u_int64_t tmp;
2375
2376	/*
2377	 * Work down the list until the lock is merged.
2378	 */
2379	if (new_lop->nfslo_type == F_UNLCK)
2380		unlock = 1;
2381	ilop = (struct nfscllock *)lp;
2382	lop = LIST_FIRST(&lp->nfsl_lock);
2383	while (lop != NULL) {
2384	    /*
2385	     * Only check locks for this file that aren't before the start of
2386	     * new lock's range.
2387	     */
2388	    if (lop->nfslo_end >= new_lop->nfslo_first) {
2389		if (new_lop->nfslo_end < lop->nfslo_first) {
2390		    /*
2391		     * If the new lock ends before the start of the
2392		     * current lock's range, no merge, just insert
2393		     * the new lock.
2394		     */
2395		    break;
2396		}
2397		if (new_lop->nfslo_type == lop->nfslo_type ||
2398		    (new_lop->nfslo_first <= lop->nfslo_first &&
2399		     new_lop->nfslo_end >= lop->nfslo_end)) {
2400		    /*
2401		     * This lock can be absorbed by the new lock/unlock.
2402		     * This happens when it covers the entire range
2403		     * of the old lock or is contiguous
2404		     * with the old lock and is of the same type or an
2405		     * unlock.
2406		     */
2407		    if (new_lop->nfslo_type != lop->nfslo_type ||
2408			new_lop->nfslo_first != lop->nfslo_first ||
2409			new_lop->nfslo_end != lop->nfslo_end)
2410			modified = 1;
2411		    if (lop->nfslo_first < new_lop->nfslo_first)
2412			new_lop->nfslo_first = lop->nfslo_first;
2413		    if (lop->nfslo_end > new_lop->nfslo_end)
2414			new_lop->nfslo_end = lop->nfslo_end;
2415		    tlop = lop;
2416		    lop = LIST_NEXT(lop, nfslo_list);
2417		    nfscl_freelock(tlop, local);
2418		    continue;
2419		}
2420
2421		/*
2422		 * All these cases are for contiguous locks that are not the
2423		 * same type, so they can't be merged.
2424		 */
2425		if (new_lop->nfslo_first <= lop->nfslo_first) {
2426		    /*
2427		     * This case is where the new lock overlaps with the
2428		     * first part of the old lock. Move the start of the
2429		     * old lock to just past the end of the new lock. The
2430		     * new lock will be inserted in front of the old, since
2431		     * ilop hasn't been updated. (We are done now.)
2432		     */
2433		    if (lop->nfslo_first != new_lop->nfslo_end) {
2434			lop->nfslo_first = new_lop->nfslo_end;
2435			modified = 1;
2436		    }
2437		    break;
2438		}
2439		if (new_lop->nfslo_end >= lop->nfslo_end) {
2440		    /*
2441		     * This case is where the new lock overlaps with the
2442		     * end of the old lock's range. Move the old lock's
2443		     * end to just before the new lock's first and insert
2444		     * the new lock after the old lock.
2445		     * Might not be done yet, since the new lock could
2446		     * overlap further locks with higher ranges.
2447		     */
2448		    if (lop->nfslo_end != new_lop->nfslo_first) {
2449			lop->nfslo_end = new_lop->nfslo_first;
2450			modified = 1;
2451		    }
2452		    ilop = lop;
2453		    lop = LIST_NEXT(lop, nfslo_list);
2454		    continue;
2455		}
2456		/*
2457		 * The final case is where the new lock's range is in the
2458		 * middle of the current lock's and splits the current lock
2459		 * up. Use *other_lopp to handle the second part of the
2460		 * split old lock range. (We are done now.)
2461		 * For unlock, we use new_lop as other_lop and tmp, since
2462		 * other_lop and new_lop are the same for this case.
2463		 * We noted the unlock case above, so we don't need
2464		 * new_lop->nfslo_type any longer.
2465		 */
2466		tmp = new_lop->nfslo_first;
2467		if (unlock) {
2468		    other_lop = new_lop;
2469		    *new_lopp = NULL;
2470		} else {
2471		    other_lop = *other_lopp;
2472		    *other_lopp = NULL;
2473		}
2474		other_lop->nfslo_first = new_lop->nfslo_end;
2475		other_lop->nfslo_end = lop->nfslo_end;
2476		other_lop->nfslo_type = lop->nfslo_type;
2477		lop->nfslo_end = tmp;
2478		nfscl_insertlock(lp, other_lop, lop, local);
2479		ilop = lop;
2480		modified = 1;
2481		break;
2482	    }
2483	    ilop = lop;
2484	    lop = LIST_NEXT(lop, nfslo_list);
2485	    if (lop == NULL)
2486		break;
2487	}
2488
2489	/*
2490	 * Insert the new lock in the list at the appropriate place.
2491	 */
2492	if (!unlock) {
2493		nfscl_insertlock(lp, new_lop, ilop, local);
2494		*new_lopp = NULL;
2495		modified = 1;
2496	}
2497	return (modified);
2498}
2499
2500/*
2501 * This function must be run as a kernel thread.
2502 * It does Renew Ops and recovery, when required.
2503 */
2504APPLESTATIC void
2505nfscl_renewthread(struct nfsclclient *clp, NFSPROC_T *p)
2506{
2507	struct nfsclowner *owp, *nowp;
2508	struct nfsclopen *op;
2509	struct nfscllockowner *lp, *nlp;
2510	struct nfscldeleghead dh;
2511	struct nfscldeleg *dp, *ndp;
2512	struct ucred *cred;
2513	u_int32_t clidrev;
2514	int error, cbpathdown, islept, igotlock, ret, clearok;
2515	uint32_t recover_done_time = 0;
2516	time_t mytime;
2517	static time_t prevsec = 0;
2518	struct nfscllockownerfh *lfhp, *nlfhp;
2519	struct nfscllockownerfhhead lfh;
2520	struct nfscllayout *lyp, *nlyp;
2521	struct nfscldevinfo *dip, *ndip;
2522	struct nfscllayouthead rlh;
2523	struct nfsclrecalllayout *recallp;
2524	struct nfsclds *dsp;
2525
2526	cred = newnfs_getcred();
2527	NFSLOCKCLSTATE();
2528	clp->nfsc_flags |= NFSCLFLAGS_HASTHREAD;
2529	NFSUNLOCKCLSTATE();
2530	for(;;) {
2531		newnfs_setroot(cred);
2532		cbpathdown = 0;
2533		if (clp->nfsc_flags & NFSCLFLAGS_RECOVER) {
2534			/*
2535			 * Only allow one recover within 1/2 of the lease
2536			 * duration (nfsc_renew).
2537			 */
2538			if (recover_done_time < NFSD_MONOSEC) {
2539				recover_done_time = NFSD_MONOSEC +
2540				    clp->nfsc_renew;
2541				NFSCL_DEBUG(1, "Doing recovery..\n");
2542				nfscl_recover(clp, cred, p);
2543			} else {
2544				NFSCL_DEBUG(1, "Clear Recovery dt=%u ms=%jd\n",
2545				    recover_done_time, (intmax_t)NFSD_MONOSEC);
2546				NFSLOCKCLSTATE();
2547				clp->nfsc_flags &= ~NFSCLFLAGS_RECOVER;
2548				NFSUNLOCKCLSTATE();
2549			}
2550		}
2551		if (clp->nfsc_expire <= NFSD_MONOSEC &&
2552		    (clp->nfsc_flags & NFSCLFLAGS_HASCLIENTID)) {
2553			clp->nfsc_expire = NFSD_MONOSEC + clp->nfsc_renew;
2554			clidrev = clp->nfsc_clientidrev;
2555			error = nfsrpc_renew(clp, NULL, cred, p);
2556			if (error == NFSERR_CBPATHDOWN)
2557			    cbpathdown = 1;
2558			else if (error == NFSERR_STALECLIENTID ||
2559			    error == NFSERR_BADSESSION) {
2560			    NFSLOCKCLSTATE();
2561			    clp->nfsc_flags |= NFSCLFLAGS_RECOVER;
2562			    NFSUNLOCKCLSTATE();
2563			} else if (error == NFSERR_EXPIRED)
2564			    (void) nfscl_hasexpired(clp, clidrev, p);
2565		}
2566
2567checkdsrenew:
2568		if (NFSHASNFSV4N(clp->nfsc_nmp)) {
2569			/* Do renews for any DS sessions. */
2570			NFSLOCKMNT(clp->nfsc_nmp);
2571			/* Skip first entry, since the MDS is handled above. */
2572			dsp = TAILQ_FIRST(&clp->nfsc_nmp->nm_sess);
2573			if (dsp != NULL)
2574				dsp = TAILQ_NEXT(dsp, nfsclds_list);
2575			while (dsp != NULL) {
2576				if (dsp->nfsclds_expire <= NFSD_MONOSEC &&
2577				    dsp->nfsclds_sess.nfsess_defunct == 0) {
2578					dsp->nfsclds_expire = NFSD_MONOSEC +
2579					    clp->nfsc_renew;
2580					NFSUNLOCKMNT(clp->nfsc_nmp);
2581					(void)nfsrpc_renew(clp, dsp, cred, p);
2582					goto checkdsrenew;
2583				}
2584				dsp = TAILQ_NEXT(dsp, nfsclds_list);
2585			}
2586			NFSUNLOCKMNT(clp->nfsc_nmp);
2587		}
2588
2589		TAILQ_INIT(&dh);
2590		NFSLOCKCLSTATE();
2591		if (cbpathdown)
2592			/* It's a Total Recall! */
2593			nfscl_totalrecall(clp);
2594
2595		/*
2596		 * Now, handle defunct owners.
2597		 */
2598		LIST_FOREACH_SAFE(owp, &clp->nfsc_owner, nfsow_list, nowp) {
2599			if (LIST_EMPTY(&owp->nfsow_open)) {
2600				if (owp->nfsow_defunct != 0)
2601					nfscl_freeopenowner(owp, 0);
2602			}
2603		}
2604
2605		/*
2606		 * Do the recall on any delegations. To avoid trouble, always
2607		 * come back up here after having slept.
2608		 */
2609		igotlock = 0;
2610tryagain:
2611		dp = TAILQ_FIRST(&clp->nfsc_deleg);
2612		while (dp != NULL) {
2613			ndp = TAILQ_NEXT(dp, nfsdl_list);
2614			if ((dp->nfsdl_flags & NFSCLDL_RECALL)) {
2615				/*
2616				 * Wait for outstanding I/O ops to be done.
2617				 */
2618				if (dp->nfsdl_rwlock.nfslock_usecnt > 0) {
2619				    if (igotlock) {
2620					nfsv4_unlock(&clp->nfsc_lock, 0);
2621					igotlock = 0;
2622				    }
2623				    dp->nfsdl_rwlock.nfslock_lock |=
2624					NFSV4LOCK_WANTED;
2625				    (void) nfsmsleep(&dp->nfsdl_rwlock,
2626					NFSCLSTATEMUTEXPTR, PZERO, "nfscld",
2627					NULL);
2628				    goto tryagain;
2629				}
2630				while (!igotlock) {
2631				    igotlock = nfsv4_lock(&clp->nfsc_lock, 1,
2632					&islept, NFSCLSTATEMUTEXPTR, NULL);
2633				    if (islept)
2634					goto tryagain;
2635				}
2636				NFSUNLOCKCLSTATE();
2637				newnfs_copycred(&dp->nfsdl_cred, cred);
2638				ret = nfscl_recalldeleg(clp, clp->nfsc_nmp, dp,
2639				    NULL, cred, p, 1);
2640				if (!ret) {
2641				    nfscl_cleandeleg(dp);
2642				    TAILQ_REMOVE(&clp->nfsc_deleg, dp,
2643					nfsdl_list);
2644				    LIST_REMOVE(dp, nfsdl_hash);
2645				    TAILQ_INSERT_HEAD(&dh, dp, nfsdl_list);
2646				    nfscl_delegcnt--;
2647				    newnfsstats.cldelegates--;
2648				}
2649				NFSLOCKCLSTATE();
2650			}
2651			dp = ndp;
2652		}
2653
2654		/*
2655		 * Clear out old delegations, if we are above the high water
2656		 * mark. Only clear out ones with no state related to them.
2657		 * The tailq list is in LRU order.
2658		 */
2659		dp = TAILQ_LAST(&clp->nfsc_deleg, nfscldeleghead);
2660		while (nfscl_delegcnt > nfscl_deleghighwater && dp != NULL) {
2661		    ndp = TAILQ_PREV(dp, nfscldeleghead, nfsdl_list);
2662		    if (dp->nfsdl_rwlock.nfslock_usecnt == 0 &&
2663			dp->nfsdl_rwlock.nfslock_lock == 0 &&
2664			dp->nfsdl_timestamp < NFSD_MONOSEC &&
2665			(dp->nfsdl_flags & (NFSCLDL_RECALL | NFSCLDL_ZAPPED |
2666			  NFSCLDL_NEEDRECLAIM | NFSCLDL_DELEGRET)) == 0) {
2667			clearok = 1;
2668			LIST_FOREACH(owp, &dp->nfsdl_owner, nfsow_list) {
2669			    op = LIST_FIRST(&owp->nfsow_open);
2670			    if (op != NULL) {
2671				clearok = 0;
2672				break;
2673			    }
2674			}
2675			if (clearok) {
2676			    LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
2677				if (!LIST_EMPTY(&lp->nfsl_lock)) {
2678				    clearok = 0;
2679				    break;
2680				}
2681			    }
2682			}
2683			if (clearok) {
2684			    TAILQ_REMOVE(&clp->nfsc_deleg, dp, nfsdl_list);
2685			    LIST_REMOVE(dp, nfsdl_hash);
2686			    TAILQ_INSERT_HEAD(&dh, dp, nfsdl_list);
2687			    nfscl_delegcnt--;
2688			    newnfsstats.cldelegates--;
2689			}
2690		    }
2691		    dp = ndp;
2692		}
2693		if (igotlock)
2694			nfsv4_unlock(&clp->nfsc_lock, 0);
2695
2696		/*
2697		 * Do the recall on any layouts. To avoid trouble, always
2698		 * come back up here after having slept.
2699		 */
2700		TAILQ_INIT(&rlh);
2701tryagain2:
2702		TAILQ_FOREACH_SAFE(lyp, &clp->nfsc_layout, nfsly_list, nlyp) {
2703			if ((lyp->nfsly_flags & NFSLY_RECALL) != 0) {
2704				/*
2705				 * Wait for outstanding I/O ops to be done.
2706				 */
2707				if (lyp->nfsly_lock.nfslock_usecnt > 0 ||
2708				    (lyp->nfsly_lock.nfslock_lock &
2709				     NFSV4LOCK_LOCK) != 0) {
2710					lyp->nfsly_lock.nfslock_lock |=
2711					    NFSV4LOCK_WANTED;
2712					(void)nfsmsleep(&lyp->nfsly_lock,
2713					    NFSCLSTATEMUTEXPTR, PZERO, "nfslyp",
2714					    NULL);
2715					goto tryagain2;
2716				}
2717				/* Move the layout to the recall list. */
2718				TAILQ_REMOVE(&clp->nfsc_layout, lyp,
2719				    nfsly_list);
2720				LIST_REMOVE(lyp, nfsly_hash);
2721				TAILQ_INSERT_HEAD(&rlh, lyp, nfsly_list);
2722
2723				/* Handle any layout commits. */
2724				if (!NFSHASNOLAYOUTCOMMIT(clp->nfsc_nmp) &&
2725				    (lyp->nfsly_flags & NFSLY_WRITTEN) != 0) {
2726					lyp->nfsly_flags &= ~NFSLY_WRITTEN;
2727					NFSUNLOCKCLSTATE();
2728					NFSCL_DEBUG(3, "do layoutcommit\n");
2729					nfscl_dolayoutcommit(clp->nfsc_nmp, lyp,
2730					    cred, p);
2731					NFSLOCKCLSTATE();
2732					goto tryagain2;
2733				}
2734			}
2735		}
2736
2737		/* Now, look for stale layouts. */
2738		lyp = TAILQ_LAST(&clp->nfsc_layout, nfscllayouthead);
2739		while (lyp != NULL) {
2740			nlyp = TAILQ_PREV(lyp, nfscllayouthead, nfsly_list);
2741			if (lyp->nfsly_timestamp < NFSD_MONOSEC &&
2742			    (lyp->nfsly_flags & NFSLY_RECALL) == 0 &&
2743			    lyp->nfsly_lock.nfslock_usecnt == 0 &&
2744			    lyp->nfsly_lock.nfslock_lock == 0) {
2745				NFSCL_DEBUG(4, "ret stale lay=%d\n",
2746				    nfscl_layoutcnt);
2747				recallp = malloc(sizeof(*recallp),
2748				    M_NFSLAYRECALL, M_NOWAIT);
2749				if (recallp == NULL)
2750					break;
2751				(void)nfscl_layoutrecall(NFSLAYOUTRETURN_FILE,
2752				    lyp, NFSLAYOUTIOMODE_ANY, 0, UINT64_MAX,
2753				    lyp->nfsly_stateid.seqid, recallp);
2754			}
2755			lyp = nlyp;
2756		}
2757
2758		/*
2759		 * Free up any unreferenced device info structures.
2760		 */
2761		LIST_FOREACH_SAFE(dip, &clp->nfsc_devinfo, nfsdi_list, ndip) {
2762			if (dip->nfsdi_layoutrefs == 0 &&
2763			    dip->nfsdi_refcnt == 0) {
2764				NFSCL_DEBUG(4, "freeing devinfo\n");
2765				LIST_REMOVE(dip, nfsdi_list);
2766				nfscl_freedevinfo(dip);
2767			}
2768		}
2769		NFSUNLOCKCLSTATE();
2770
2771		/* Do layout return(s), as required. */
2772		TAILQ_FOREACH_SAFE(lyp, &rlh, nfsly_list, nlyp) {
2773			TAILQ_REMOVE(&rlh, lyp, nfsly_list);
2774			NFSCL_DEBUG(4, "ret layout\n");
2775			nfscl_layoutreturn(clp->nfsc_nmp, lyp, cred, p);
2776			nfscl_freelayout(lyp);
2777		}
2778
2779		/*
2780		 * Delegreturn any delegations cleaned out or recalled.
2781		 */
2782		TAILQ_FOREACH_SAFE(dp, &dh, nfsdl_list, ndp) {
2783			newnfs_copycred(&dp->nfsdl_cred, cred);
2784			(void) nfscl_trydelegreturn(dp, cred, clp->nfsc_nmp, p);
2785			TAILQ_REMOVE(&dh, dp, nfsdl_list);
2786			FREE((caddr_t)dp, M_NFSCLDELEG);
2787		}
2788
2789		SLIST_INIT(&lfh);
2790		/*
2791		 * Call nfscl_cleanupkext() once per second to check for
2792		 * open/lock owners where the process has exited.
2793		 */
2794		mytime = NFSD_MONOSEC;
2795		if (prevsec != mytime) {
2796			prevsec = mytime;
2797			nfscl_cleanupkext(clp, &lfh);
2798		}
2799
2800		/*
2801		 * Do a ReleaseLockOwner for all lock owners where the
2802		 * associated process no longer exists, as found by
2803		 * nfscl_cleanupkext().
2804		 */
2805		newnfs_setroot(cred);
2806		SLIST_FOREACH_SAFE(lfhp, &lfh, nfslfh_list, nlfhp) {
2807			LIST_FOREACH_SAFE(lp, &lfhp->nfslfh_lock, nfsl_list,
2808			    nlp) {
2809				(void)nfsrpc_rellockown(clp->nfsc_nmp, lp,
2810				    lfhp->nfslfh_fh, lfhp->nfslfh_len, cred,
2811				    p);
2812				nfscl_freelockowner(lp, 0);
2813			}
2814			free(lfhp, M_TEMP);
2815		}
2816		SLIST_INIT(&lfh);
2817
2818		NFSLOCKCLSTATE();
2819		if ((clp->nfsc_flags & NFSCLFLAGS_RECOVER) == 0)
2820			(void)mtx_sleep(clp, NFSCLSTATEMUTEXPTR, PWAIT, "nfscl",
2821			    hz);
2822		if (clp->nfsc_flags & NFSCLFLAGS_UMOUNT) {
2823			clp->nfsc_flags &= ~NFSCLFLAGS_HASTHREAD;
2824			NFSUNLOCKCLSTATE();
2825			NFSFREECRED(cred);
2826			wakeup((caddr_t)clp);
2827			return;
2828		}
2829		NFSUNLOCKCLSTATE();
2830	}
2831}
2832
2833/*
2834 * Initiate state recovery. Called when NFSERR_STALECLIENTID,
2835 * NFSERR_STALESTATEID or NFSERR_BADSESSION is received.
2836 */
2837APPLESTATIC void
2838nfscl_initiate_recovery(struct nfsclclient *clp)
2839{
2840
2841	if (clp == NULL)
2842		return;
2843	NFSLOCKCLSTATE();
2844	clp->nfsc_flags |= NFSCLFLAGS_RECOVER;
2845	NFSUNLOCKCLSTATE();
2846	wakeup((caddr_t)clp);
2847}
2848
2849/*
2850 * Dump out the state stuff for debugging.
2851 */
2852APPLESTATIC void
2853nfscl_dumpstate(struct nfsmount *nmp, int openowner, int opens,
2854    int lockowner, int locks)
2855{
2856	struct nfsclclient *clp;
2857	struct nfsclowner *owp;
2858	struct nfsclopen *op;
2859	struct nfscllockowner *lp;
2860	struct nfscllock *lop;
2861	struct nfscldeleg *dp;
2862
2863	clp = nmp->nm_clp;
2864	if (clp == NULL) {
2865		printf("nfscl dumpstate NULL clp\n");
2866		return;
2867	}
2868	NFSLOCKCLSTATE();
2869	TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list) {
2870	  LIST_FOREACH(owp, &dp->nfsdl_owner, nfsow_list) {
2871	    if (openowner && !LIST_EMPTY(&owp->nfsow_open))
2872		printf("owner=0x%x 0x%x 0x%x 0x%x seqid=%d\n",
2873		    owp->nfsow_owner[0], owp->nfsow_owner[1],
2874		    owp->nfsow_owner[2], owp->nfsow_owner[3],
2875		    owp->nfsow_seqid);
2876	    LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
2877		if (opens)
2878		    printf("open st=0x%x 0x%x 0x%x cnt=%d fh12=0x%x\n",
2879			op->nfso_stateid.other[0], op->nfso_stateid.other[1],
2880			op->nfso_stateid.other[2], op->nfso_opencnt,
2881			op->nfso_fh[12]);
2882		LIST_FOREACH(lp, &op->nfso_lock, nfsl_list) {
2883		    if (lockowner)
2884			printf("lckown=0x%x 0x%x 0x%x 0x%x seqid=%d st=0x%x 0x%x 0x%x\n",
2885			    lp->nfsl_owner[0], lp->nfsl_owner[1],
2886			    lp->nfsl_owner[2], lp->nfsl_owner[3],
2887			    lp->nfsl_seqid,
2888			    lp->nfsl_stateid.other[0], lp->nfsl_stateid.other[1],
2889			    lp->nfsl_stateid.other[2]);
2890		    LIST_FOREACH(lop, &lp->nfsl_lock, nfslo_list) {
2891			if (locks)
2892#ifdef __FreeBSD__
2893			    printf("lck typ=%d fst=%ju end=%ju\n",
2894				lop->nfslo_type, (intmax_t)lop->nfslo_first,
2895				(intmax_t)lop->nfslo_end);
2896#else
2897			    printf("lck typ=%d fst=%qd end=%qd\n",
2898				lop->nfslo_type, lop->nfslo_first,
2899				lop->nfslo_end);
2900#endif
2901		    }
2902		}
2903	    }
2904	  }
2905	}
2906	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
2907	    if (openowner && !LIST_EMPTY(&owp->nfsow_open))
2908		printf("owner=0x%x 0x%x 0x%x 0x%x seqid=%d\n",
2909		    owp->nfsow_owner[0], owp->nfsow_owner[1],
2910		    owp->nfsow_owner[2], owp->nfsow_owner[3],
2911		    owp->nfsow_seqid);
2912	    LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
2913		if (opens)
2914		    printf("open st=0x%x 0x%x 0x%x cnt=%d fh12=0x%x\n",
2915			op->nfso_stateid.other[0], op->nfso_stateid.other[1],
2916			op->nfso_stateid.other[2], op->nfso_opencnt,
2917			op->nfso_fh[12]);
2918		LIST_FOREACH(lp, &op->nfso_lock, nfsl_list) {
2919		    if (lockowner)
2920			printf("lckown=0x%x 0x%x 0x%x 0x%x seqid=%d st=0x%x 0x%x 0x%x\n",
2921			    lp->nfsl_owner[0], lp->nfsl_owner[1],
2922			    lp->nfsl_owner[2], lp->nfsl_owner[3],
2923			    lp->nfsl_seqid,
2924			    lp->nfsl_stateid.other[0], lp->nfsl_stateid.other[1],
2925			    lp->nfsl_stateid.other[2]);
2926		    LIST_FOREACH(lop, &lp->nfsl_lock, nfslo_list) {
2927			if (locks)
2928#ifdef __FreeBSD__
2929			    printf("lck typ=%d fst=%ju end=%ju\n",
2930				lop->nfslo_type, (intmax_t)lop->nfslo_first,
2931				(intmax_t)lop->nfslo_end);
2932#else
2933			    printf("lck typ=%d fst=%qd end=%qd\n",
2934				lop->nfslo_type, lop->nfslo_first,
2935				lop->nfslo_end);
2936#endif
2937		    }
2938		}
2939	    }
2940	}
2941	NFSUNLOCKCLSTATE();
2942}
2943
2944/*
2945 * Check for duplicate open owners and opens.
2946 * (Only used as a diagnostic aid.)
2947 */
2948APPLESTATIC void
2949nfscl_dupopen(vnode_t vp, int dupopens)
2950{
2951	struct nfsclclient *clp;
2952	struct nfsclowner *owp, *owp2;
2953	struct nfsclopen *op, *op2;
2954	struct nfsfh *nfhp;
2955
2956	clp = VFSTONFS(vnode_mount(vp))->nm_clp;
2957	if (clp == NULL) {
2958		printf("nfscl dupopen NULL clp\n");
2959		return;
2960	}
2961	nfhp = VTONFS(vp)->n_fhp;
2962	NFSLOCKCLSTATE();
2963
2964	/*
2965	 * First, search for duplicate owners.
2966	 * These should never happen!
2967	 */
2968	LIST_FOREACH(owp2, &clp->nfsc_owner, nfsow_list) {
2969	    LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
2970		if (owp != owp2 &&
2971		    !NFSBCMP(owp->nfsow_owner, owp2->nfsow_owner,
2972		    NFSV4CL_LOCKNAMELEN)) {
2973			NFSUNLOCKCLSTATE();
2974			printf("DUP OWNER\n");
2975			nfscl_dumpstate(VFSTONFS(vnode_mount(vp)), 1, 1, 0, 0);
2976			return;
2977		}
2978	    }
2979	}
2980
2981	/*
2982	 * Now, search for duplicate stateids.
2983	 * These shouldn't happen, either.
2984	 */
2985	LIST_FOREACH(owp2, &clp->nfsc_owner, nfsow_list) {
2986	    LIST_FOREACH(op2, &owp2->nfsow_open, nfso_list) {
2987		LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
2988		    LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
2989			if (op != op2 &&
2990			    (op->nfso_stateid.other[0] != 0 ||
2991			     op->nfso_stateid.other[1] != 0 ||
2992			     op->nfso_stateid.other[2] != 0) &&
2993			    op->nfso_stateid.other[0] == op2->nfso_stateid.other[0] &&
2994			    op->nfso_stateid.other[1] == op2->nfso_stateid.other[1] &&
2995			    op->nfso_stateid.other[2] == op2->nfso_stateid.other[2]) {
2996			    NFSUNLOCKCLSTATE();
2997			    printf("DUP STATEID\n");
2998			    nfscl_dumpstate(VFSTONFS(vnode_mount(vp)), 1, 1, 0,
2999				0);
3000			    return;
3001			}
3002		    }
3003		}
3004	    }
3005	}
3006
3007	/*
3008	 * Now search for duplicate opens.
3009	 * Duplicate opens for the same owner
3010	 * should never occur. Other duplicates are
3011	 * possible and are checked for if "dupopens"
3012	 * is true.
3013	 */
3014	LIST_FOREACH(owp2, &clp->nfsc_owner, nfsow_list) {
3015	    LIST_FOREACH(op2, &owp2->nfsow_open, nfso_list) {
3016		if (nfhp->nfh_len == op2->nfso_fhlen &&
3017		    !NFSBCMP(nfhp->nfh_fh, op2->nfso_fh, nfhp->nfh_len)) {
3018		    LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
3019			LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
3020			    if (op != op2 && nfhp->nfh_len == op->nfso_fhlen &&
3021				!NFSBCMP(nfhp->nfh_fh, op->nfso_fh, nfhp->nfh_len) &&
3022				(!NFSBCMP(op->nfso_own->nfsow_owner,
3023				 op2->nfso_own->nfsow_owner, NFSV4CL_LOCKNAMELEN) ||
3024				 dupopens)) {
3025				if (!NFSBCMP(op->nfso_own->nfsow_owner,
3026				    op2->nfso_own->nfsow_owner, NFSV4CL_LOCKNAMELEN)) {
3027				    NFSUNLOCKCLSTATE();
3028				    printf("BADDUP OPEN\n");
3029				} else {
3030				    NFSUNLOCKCLSTATE();
3031				    printf("DUP OPEN\n");
3032				}
3033				nfscl_dumpstate(VFSTONFS(vnode_mount(vp)), 1, 1,
3034				    0, 0);
3035				return;
3036			    }
3037			}
3038		    }
3039		}
3040	    }
3041	}
3042	NFSUNLOCKCLSTATE();
3043}
3044
3045/*
3046 * During close, find an open that needs to be dereferenced and
3047 * dereference it. If there are no more opens for this file,
3048 * log a message to that effect.
3049 * Opens aren't actually Close'd until VOP_INACTIVE() is performed
3050 * on the file's vnode.
3051 * This is the safe way, since it is difficult to identify
3052 * which open the close is for and I/O can be performed after the
3053 * close(2) system call when a file is mmap'd.
3054 * If it returns 0 for success, there will be a referenced
3055 * clp returned via clpp.
3056 */
3057APPLESTATIC int
3058nfscl_getclose(vnode_t vp, struct nfsclclient **clpp)
3059{
3060	struct nfsclclient *clp;
3061	struct nfsclowner *owp;
3062	struct nfsclopen *op;
3063	struct nfscldeleg *dp;
3064	struct nfsfh *nfhp;
3065	int error, notdecr;
3066
3067	error = nfscl_getcl(vnode_mount(vp), NULL, NULL, 1, &clp);
3068	if (error)
3069		return (error);
3070	*clpp = clp;
3071
3072	nfhp = VTONFS(vp)->n_fhp;
3073	notdecr = 1;
3074	NFSLOCKCLSTATE();
3075	/*
3076	 * First, look for one under a delegation that was locally issued
3077	 * and just decrement the opencnt for it. Since all my Opens against
3078	 * the server are DENY_NONE, I don't see a problem with hanging
3079	 * onto them. (It is much easier to use one of the extant Opens
3080	 * that I already have on the server when a Delegation is recalled
3081	 * than to do fresh Opens.) Someday, I might need to rethink this, but.
3082	 */
3083	dp = nfscl_finddeleg(clp, nfhp->nfh_fh, nfhp->nfh_len);
3084	if (dp != NULL) {
3085		LIST_FOREACH(owp, &dp->nfsdl_owner, nfsow_list) {
3086			op = LIST_FIRST(&owp->nfsow_open);
3087			if (op != NULL) {
3088				/*
3089				 * Since a delegation is for a file, there
3090				 * should never be more than one open for
3091				 * each openowner.
3092				 */
3093				if (LIST_NEXT(op, nfso_list) != NULL)
3094					panic("nfscdeleg opens");
3095				if (notdecr && op->nfso_opencnt > 0) {
3096					notdecr = 0;
3097					op->nfso_opencnt--;
3098					break;
3099				}
3100			}
3101		}
3102	}
3103
3104	/* Now process the opens against the server. */
3105	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
3106		LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
3107			if (op->nfso_fhlen == nfhp->nfh_len &&
3108			    !NFSBCMP(op->nfso_fh, nfhp->nfh_fh,
3109			    nfhp->nfh_len)) {
3110				/* Found an open, decrement cnt if possible */
3111				if (notdecr && op->nfso_opencnt > 0) {
3112					notdecr = 0;
3113					op->nfso_opencnt--;
3114				}
3115				/*
3116				 * There are more opens, so just return.
3117				 */
3118				if (op->nfso_opencnt > 0) {
3119					NFSUNLOCKCLSTATE();
3120					return (0);
3121				}
3122			}
3123		}
3124	}
3125	NFSUNLOCKCLSTATE();
3126	if (notdecr)
3127		printf("nfscl: never fnd open\n");
3128	return (0);
3129}
3130
3131APPLESTATIC int
3132nfscl_doclose(vnode_t vp, struct nfsclclient **clpp, NFSPROC_T *p)
3133{
3134	struct nfsclclient *clp;
3135	struct nfsclowner *owp, *nowp;
3136	struct nfsclopen *op;
3137	struct nfscldeleg *dp;
3138	struct nfsfh *nfhp;
3139	struct nfsclrecalllayout *recallp;
3140	int error;
3141
3142	error = nfscl_getcl(vnode_mount(vp), NULL, NULL, 1, &clp);
3143	if (error)
3144		return (error);
3145	*clpp = clp;
3146
3147	nfhp = VTONFS(vp)->n_fhp;
3148	recallp = malloc(sizeof(*recallp), M_NFSLAYRECALL, M_WAITOK);
3149	NFSLOCKCLSTATE();
3150	/*
3151	 * First get rid of the local Open structures, which should be no
3152	 * longer in use.
3153	 */
3154	dp = nfscl_finddeleg(clp, nfhp->nfh_fh, nfhp->nfh_len);
3155	if (dp != NULL) {
3156		LIST_FOREACH_SAFE(owp, &dp->nfsdl_owner, nfsow_list, nowp) {
3157			op = LIST_FIRST(&owp->nfsow_open);
3158			if (op != NULL) {
3159				KASSERT((op->nfso_opencnt == 0),
3160				    ("nfscl: bad open cnt on deleg"));
3161				nfscl_freeopen(op, 1);
3162			}
3163			nfscl_freeopenowner(owp, 1);
3164		}
3165	}
3166
3167	/* Return any layouts marked return on close. */
3168	nfscl_retoncloselayout(vp, clp, nfhp->nfh_fh, nfhp->nfh_len, &recallp);
3169
3170	/* Now process the opens against the server. */
3171lookformore:
3172	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
3173		op = LIST_FIRST(&owp->nfsow_open);
3174		while (op != NULL) {
3175			if (op->nfso_fhlen == nfhp->nfh_len &&
3176			    !NFSBCMP(op->nfso_fh, nfhp->nfh_fh,
3177			    nfhp->nfh_len)) {
3178				/* Found an open, close it. */
3179				KASSERT((op->nfso_opencnt == 0),
3180				    ("nfscl: bad open cnt on server"));
3181				NFSUNLOCKCLSTATE();
3182				nfsrpc_doclose(VFSTONFS(vnode_mount(vp)), op,
3183				    p);
3184				NFSLOCKCLSTATE();
3185				goto lookformore;
3186			}
3187			op = LIST_NEXT(op, nfso_list);
3188		}
3189	}
3190	NFSUNLOCKCLSTATE();
3191	/*
3192	 * recallp has been set NULL by nfscl_retoncloselayout() if it was
3193	 * used by the function, but calling free() with a NULL pointer is ok.
3194	 */
3195	free(recallp, M_NFSLAYRECALL);
3196	return (0);
3197}
3198
3199/*
3200 * Return all delegations on this client.
3201 * (Must be called with client sleep lock.)
3202 */
3203static void
3204nfscl_delegreturnall(struct nfsclclient *clp, NFSPROC_T *p)
3205{
3206	struct nfscldeleg *dp, *ndp;
3207	struct ucred *cred;
3208
3209	cred = newnfs_getcred();
3210	TAILQ_FOREACH_SAFE(dp, &clp->nfsc_deleg, nfsdl_list, ndp) {
3211		nfscl_cleandeleg(dp);
3212		(void) nfscl_trydelegreturn(dp, cred, clp->nfsc_nmp, p);
3213		nfscl_freedeleg(&clp->nfsc_deleg, dp);
3214	}
3215	NFSFREECRED(cred);
3216}
3217
3218/*
3219 * Do a callback RPC.
3220 */
3221APPLESTATIC void
3222nfscl_docb(struct nfsrv_descript *nd, NFSPROC_T *p)
3223{
3224	int clist, gotseq_ok, i, j, k, op, rcalls;
3225	u_int32_t *tl;
3226	struct nfsclclient *clp;
3227	struct nfscldeleg *dp = NULL;
3228	int numops, taglen = -1, error = 0, trunc;
3229	u_int32_t minorvers = 0, retops = 0, *retopsp = NULL, *repp, cbident;
3230	u_char tag[NFSV4_SMALLSTR + 1], *tagstr;
3231	vnode_t vp = NULL;
3232	struct nfsnode *np;
3233	struct vattr va;
3234	struct nfsfh *nfhp;
3235	mount_t mp;
3236	nfsattrbit_t attrbits, rattrbits;
3237	nfsv4stateid_t stateid;
3238	uint32_t seqid, slotid = 0, highslot, cachethis;
3239	uint8_t sessionid[NFSX_V4SESSIONID];
3240	struct mbuf *rep;
3241	struct nfscllayout *lyp;
3242	uint64_t filesid[2], len, off;
3243	int changed, gotone, laytype, recalltype;
3244	uint32_t iomode;
3245	struct nfsclrecalllayout *recallp = NULL;
3246	struct nfsclsession *tsep;
3247
3248	gotseq_ok = 0;
3249	nfsrvd_rephead(nd);
3250	NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
3251	taglen = fxdr_unsigned(int, *tl);
3252	if (taglen < 0) {
3253		error = EBADRPC;
3254		goto nfsmout;
3255	}
3256	if (taglen <= NFSV4_SMALLSTR)
3257		tagstr = tag;
3258	else
3259		tagstr = malloc(taglen + 1, M_TEMP, M_WAITOK);
3260	error = nfsrv_mtostr(nd, tagstr, taglen);
3261	if (error) {
3262		if (taglen > NFSV4_SMALLSTR)
3263			free(tagstr, M_TEMP);
3264		taglen = -1;
3265		goto nfsmout;
3266	}
3267	(void) nfsm_strtom(nd, tag, taglen);
3268	if (taglen > NFSV4_SMALLSTR) {
3269		free(tagstr, M_TEMP);
3270	}
3271	NFSM_BUILD(retopsp, u_int32_t *, NFSX_UNSIGNED);
3272	NFSM_DISSECT(tl, u_int32_t *, 3 * NFSX_UNSIGNED);
3273	minorvers = fxdr_unsigned(u_int32_t, *tl++);
3274	if (minorvers != NFSV4_MINORVERSION && minorvers != NFSV41_MINORVERSION)
3275		nd->nd_repstat = NFSERR_MINORVERMISMATCH;
3276	cbident = fxdr_unsigned(u_int32_t, *tl++);
3277	if (nd->nd_repstat)
3278		numops = 0;
3279	else
3280		numops = fxdr_unsigned(int, *tl);
3281	/*
3282	 * Loop around doing the sub ops.
3283	 */
3284	for (i = 0; i < numops; i++) {
3285		NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
3286		NFSM_BUILD(repp, u_int32_t *, 2 * NFSX_UNSIGNED);
3287		*repp++ = *tl;
3288		op = fxdr_unsigned(int, *tl);
3289		if (op < NFSV4OP_CBGETATTR ||
3290		   (op > NFSV4OP_CBRECALL && minorvers == NFSV4_MINORVERSION) ||
3291		   (op > NFSV4OP_CBNOTIFYDEVID &&
3292		    minorvers == NFSV41_MINORVERSION)) {
3293		    nd->nd_repstat = NFSERR_OPILLEGAL;
3294		    *repp = nfscl_errmap(nd, minorvers);
3295		    retops++;
3296		    break;
3297		}
3298		nd->nd_procnum = op;
3299		if (op < NFSV4OP_CBNOPS)
3300			newnfsstats.cbrpccnt[nd->nd_procnum]++;
3301		switch (op) {
3302		case NFSV4OP_CBGETATTR:
3303			NFSCL_DEBUG(4, "cbgetattr\n");
3304			mp = NULL;
3305			vp = NULL;
3306			error = nfsm_getfh(nd, &nfhp);
3307			if (!error)
3308				error = nfsrv_getattrbits(nd, &attrbits,
3309				    NULL, NULL);
3310			if (error == 0 && i == 0 &&
3311			    minorvers != NFSV4_MINORVERSION)
3312				error = NFSERR_OPNOTINSESS;
3313			if (!error) {
3314				mp = nfscl_getmnt(minorvers, sessionid, cbident,
3315				    &clp);
3316				if (mp == NULL)
3317					error = NFSERR_SERVERFAULT;
3318			}
3319			if (!error) {
3320				error = nfscl_ngetreopen(mp, nfhp->nfh_fh,
3321				    nfhp->nfh_len, p, &np);
3322				if (!error)
3323					vp = NFSTOV(np);
3324			}
3325			if (!error) {
3326				NFSZERO_ATTRBIT(&rattrbits);
3327				NFSLOCKCLSTATE();
3328				dp = nfscl_finddeleg(clp, nfhp->nfh_fh,
3329				    nfhp->nfh_len);
3330				if (dp != NULL) {
3331					if (NFSISSET_ATTRBIT(&attrbits,
3332					    NFSATTRBIT_SIZE)) {
3333						if (vp != NULL)
3334							va.va_size = np->n_size;
3335						else
3336							va.va_size =
3337							    dp->nfsdl_size;
3338						NFSSETBIT_ATTRBIT(&rattrbits,
3339						    NFSATTRBIT_SIZE);
3340					}
3341					if (NFSISSET_ATTRBIT(&attrbits,
3342					    NFSATTRBIT_CHANGE)) {
3343						va.va_filerev =
3344						    dp->nfsdl_change;
3345						if (vp == NULL ||
3346						    (np->n_flag & NDELEGMOD))
3347							va.va_filerev++;
3348						NFSSETBIT_ATTRBIT(&rattrbits,
3349						    NFSATTRBIT_CHANGE);
3350					}
3351				} else
3352					error = NFSERR_SERVERFAULT;
3353				NFSUNLOCKCLSTATE();
3354			}
3355			if (vp != NULL)
3356				vrele(vp);
3357			if (mp != NULL)
3358				vfs_unbusy(mp);
3359			if (nfhp != NULL)
3360				FREE((caddr_t)nfhp, M_NFSFH);
3361			if (!error)
3362				(void) nfsv4_fillattr(nd, NULL, NULL, NULL, &va,
3363				    NULL, 0, &rattrbits, NULL, p, 0, 0, 0, 0,
3364				    (uint64_t)0);
3365			break;
3366		case NFSV4OP_CBRECALL:
3367			NFSCL_DEBUG(4, "cbrecall\n");
3368			NFSM_DISSECT(tl, u_int32_t *, NFSX_STATEID +
3369			    NFSX_UNSIGNED);
3370			stateid.seqid = *tl++;
3371			NFSBCOPY((caddr_t)tl, (caddr_t)stateid.other,
3372			    NFSX_STATEIDOTHER);
3373			tl += (NFSX_STATEIDOTHER / NFSX_UNSIGNED);
3374			trunc = fxdr_unsigned(int, *tl);
3375			error = nfsm_getfh(nd, &nfhp);
3376			if (error == 0 && i == 0 &&
3377			    minorvers != NFSV4_MINORVERSION)
3378				error = NFSERR_OPNOTINSESS;
3379			if (!error) {
3380				NFSLOCKCLSTATE();
3381				if (minorvers == NFSV4_MINORVERSION)
3382					clp = nfscl_getclnt(cbident);
3383				else
3384					clp = nfscl_getclntsess(sessionid);
3385				if (clp != NULL) {
3386					dp = nfscl_finddeleg(clp, nfhp->nfh_fh,
3387					    nfhp->nfh_len);
3388					if (dp != NULL && (dp->nfsdl_flags &
3389					    NFSCLDL_DELEGRET) == 0) {
3390						dp->nfsdl_flags |=
3391						    NFSCLDL_RECALL;
3392						wakeup((caddr_t)clp);
3393					}
3394				} else {
3395					error = NFSERR_SERVERFAULT;
3396				}
3397				NFSUNLOCKCLSTATE();
3398			}
3399			if (nfhp != NULL)
3400				FREE((caddr_t)nfhp, M_NFSFH);
3401			break;
3402		case NFSV4OP_CBLAYOUTRECALL:
3403			NFSCL_DEBUG(4, "cblayrec\n");
3404			nfhp = NULL;
3405			NFSM_DISSECT(tl, uint32_t *, 4 * NFSX_UNSIGNED);
3406			laytype = fxdr_unsigned(int, *tl++);
3407			iomode = fxdr_unsigned(uint32_t, *tl++);
3408			if (newnfs_true == *tl++)
3409				changed = 1;
3410			else
3411				changed = 0;
3412			recalltype = fxdr_unsigned(int, *tl);
3413			recallp = malloc(sizeof(*recallp), M_NFSLAYRECALL,
3414			    M_WAITOK);
3415			if (laytype != NFSLAYOUT_NFSV4_1_FILES)
3416				error = NFSERR_NOMATCHLAYOUT;
3417			else if (recalltype == NFSLAYOUTRETURN_FILE) {
3418				error = nfsm_getfh(nd, &nfhp);
3419				NFSCL_DEBUG(4, "retfile getfh=%d\n", error);
3420				if (error != 0)
3421					goto nfsmout;
3422				NFSM_DISSECT(tl, u_int32_t *, 2 * NFSX_HYPER +
3423				    NFSX_STATEID);
3424				off = fxdr_hyper(tl); tl += 2;
3425				len = fxdr_hyper(tl); tl += 2;
3426				stateid.seqid = fxdr_unsigned(uint32_t, *tl++);
3427				NFSBCOPY(tl, stateid.other, NFSX_STATEIDOTHER);
3428				if (minorvers == NFSV4_MINORVERSION)
3429					error = NFSERR_NOTSUPP;
3430				else if (i == 0)
3431					error = NFSERR_OPNOTINSESS;
3432				if (error == 0) {
3433					NFSLOCKCLSTATE();
3434					clp = nfscl_getclntsess(sessionid);
3435					NFSCL_DEBUG(4, "cbly clp=%p\n", clp);
3436					if (clp != NULL) {
3437						lyp = nfscl_findlayout(clp,
3438						    nfhp->nfh_fh,
3439						    nfhp->nfh_len);
3440						NFSCL_DEBUG(4, "cblyp=%p\n",
3441						    lyp);
3442						if (lyp != NULL &&
3443						    (lyp->nfsly_flags &
3444						     NFSLY_FILES) != 0 &&
3445						    !NFSBCMP(stateid.other,
3446						    lyp->nfsly_stateid.other,
3447						    NFSX_STATEIDOTHER)) {
3448							error =
3449							    nfscl_layoutrecall(
3450							    recalltype,
3451							    lyp, iomode, off,
3452							    len, stateid.seqid,
3453							    recallp);
3454							recallp = NULL;
3455							wakeup(clp);
3456							NFSCL_DEBUG(4,
3457							    "aft layrcal=%d\n",
3458							    error);
3459						} else
3460							error =
3461							  NFSERR_NOMATCHLAYOUT;
3462					} else
3463						error = NFSERR_NOMATCHLAYOUT;
3464					NFSUNLOCKCLSTATE();
3465				}
3466				free(nfhp, M_NFSFH);
3467			} else if (recalltype == NFSLAYOUTRETURN_FSID) {
3468				NFSM_DISSECT(tl, uint32_t *, 2 * NFSX_HYPER);
3469				filesid[0] = fxdr_hyper(tl); tl += 2;
3470				filesid[1] = fxdr_hyper(tl); tl += 2;
3471				gotone = 0;
3472				NFSLOCKCLSTATE();
3473				clp = nfscl_getclntsess(sessionid);
3474				if (clp != NULL) {
3475					TAILQ_FOREACH(lyp, &clp->nfsc_layout,
3476					    nfsly_list) {
3477						if (lyp->nfsly_filesid[0] ==
3478						    filesid[0] &&
3479						    lyp->nfsly_filesid[1] ==
3480						    filesid[1]) {
3481							error =
3482							    nfscl_layoutrecall(
3483							    recalltype,
3484							    lyp, iomode, 0,
3485							    UINT64_MAX,
3486							    lyp->nfsly_stateid.seqid,
3487							    recallp);
3488							recallp = NULL;
3489							gotone = 1;
3490						}
3491					}
3492					if (gotone != 0)
3493						wakeup(clp);
3494					else
3495						error = NFSERR_NOMATCHLAYOUT;
3496				} else
3497					error = NFSERR_NOMATCHLAYOUT;
3498				NFSUNLOCKCLSTATE();
3499			} else if (recalltype == NFSLAYOUTRETURN_ALL) {
3500				gotone = 0;
3501				NFSLOCKCLSTATE();
3502				clp = nfscl_getclntsess(sessionid);
3503				if (clp != NULL) {
3504					TAILQ_FOREACH(lyp, &clp->nfsc_layout,
3505					    nfsly_list) {
3506						error = nfscl_layoutrecall(
3507						    recalltype, lyp, iomode, 0,
3508						    UINT64_MAX,
3509						    lyp->nfsly_stateid.seqid,
3510						    recallp);
3511						recallp = NULL;
3512						gotone = 1;
3513					}
3514					if (gotone != 0)
3515						wakeup(clp);
3516					else
3517						error = NFSERR_NOMATCHLAYOUT;
3518				} else
3519					error = NFSERR_NOMATCHLAYOUT;
3520				NFSUNLOCKCLSTATE();
3521			} else
3522				error = NFSERR_NOMATCHLAYOUT;
3523			if (recallp != NULL) {
3524				free(recallp, M_NFSLAYRECALL);
3525				recallp = NULL;
3526			}
3527			break;
3528		case NFSV4OP_CBSEQUENCE:
3529			NFSM_DISSECT(tl, uint32_t *, NFSX_V4SESSIONID +
3530			    5 * NFSX_UNSIGNED);
3531			bcopy(tl, sessionid, NFSX_V4SESSIONID);
3532			tl += NFSX_V4SESSIONID / NFSX_UNSIGNED;
3533			seqid = fxdr_unsigned(uint32_t, *tl++);
3534			slotid = fxdr_unsigned(uint32_t, *tl++);
3535			highslot = fxdr_unsigned(uint32_t, *tl++);
3536			cachethis = *tl++;
3537			/* Throw away the referring call stuff. */
3538			clist = fxdr_unsigned(int, *tl);
3539			for (j = 0; j < clist; j++) {
3540				NFSM_DISSECT(tl, uint32_t *, NFSX_V4SESSIONID +
3541				    NFSX_UNSIGNED);
3542				tl += NFSX_V4SESSIONID / NFSX_UNSIGNED;
3543				rcalls = fxdr_unsigned(int, *tl);
3544				for (k = 0; k < rcalls; k++) {
3545					NFSM_DISSECT(tl, uint32_t *,
3546					    2 * NFSX_UNSIGNED);
3547				}
3548			}
3549			NFSLOCKCLSTATE();
3550			if (i == 0) {
3551				clp = nfscl_getclntsess(sessionid);
3552				if (clp == NULL)
3553					error = NFSERR_SERVERFAULT;
3554			} else
3555				error = NFSERR_SEQUENCEPOS;
3556			if (error == 0) {
3557				tsep = nfsmnt_mdssession(clp->nfsc_nmp);
3558				error = nfsv4_seqsession(seqid, slotid,
3559				    highslot, tsep->nfsess_cbslots, &rep,
3560				    tsep->nfsess_backslots);
3561			}
3562			NFSUNLOCKCLSTATE();
3563			if (error == 0) {
3564				gotseq_ok = 1;
3565				if (rep != NULL) {
3566					NFSCL_DEBUG(4, "Got cbretry\n");
3567					m_freem(nd->nd_mreq);
3568					nd->nd_mreq = rep;
3569					rep = NULL;
3570					goto out;
3571				}
3572				NFSM_BUILD(tl, uint32_t *,
3573				    NFSX_V4SESSIONID + 4 * NFSX_UNSIGNED);
3574				bcopy(sessionid, tl, NFSX_V4SESSIONID);
3575				tl += NFSX_V4SESSIONID / NFSX_UNSIGNED;
3576				*tl++ = txdr_unsigned(seqid);
3577				*tl++ = txdr_unsigned(slotid);
3578				*tl++ = txdr_unsigned(NFSV4_CBSLOTS - 1);
3579				*tl = txdr_unsigned(NFSV4_CBSLOTS - 1);
3580			}
3581			break;
3582		default:
3583			if (i == 0 && minorvers == NFSV41_MINORVERSION)
3584				error = NFSERR_OPNOTINSESS;
3585			else {
3586				NFSCL_DEBUG(1, "unsupp callback %d\n", op);
3587				error = NFSERR_NOTSUPP;
3588			}
3589			break;
3590		};
3591		if (error) {
3592			if (error == EBADRPC || error == NFSERR_BADXDR) {
3593				nd->nd_repstat = NFSERR_BADXDR;
3594			} else {
3595				nd->nd_repstat = error;
3596			}
3597			error = 0;
3598		}
3599		retops++;
3600		if (nd->nd_repstat) {
3601			*repp = nfscl_errmap(nd, minorvers);
3602			break;
3603		} else
3604			*repp = 0;	/* NFS4_OK */
3605	}
3606nfsmout:
3607	if (recallp != NULL)
3608		free(recallp, M_NFSLAYRECALL);
3609	if (error) {
3610		if (error == EBADRPC || error == NFSERR_BADXDR)
3611			nd->nd_repstat = NFSERR_BADXDR;
3612		else
3613			printf("nfsv4 comperr1=%d\n", error);
3614	}
3615	if (taglen == -1) {
3616		NFSM_BUILD(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
3617		*tl++ = 0;
3618		*tl = 0;
3619	} else {
3620		*retopsp = txdr_unsigned(retops);
3621	}
3622	*nd->nd_errp = nfscl_errmap(nd, minorvers);
3623out:
3624	if (gotseq_ok != 0) {
3625		rep = m_copym(nd->nd_mreq, 0, M_COPYALL, M_WAITOK);
3626		NFSLOCKCLSTATE();
3627		clp = nfscl_getclntsess(sessionid);
3628		if (clp != NULL) {
3629			tsep = nfsmnt_mdssession(clp->nfsc_nmp);
3630			nfsv4_seqsess_cacherep(slotid, tsep->nfsess_cbslots,
3631			    NFSERR_OK, &rep);
3632			NFSUNLOCKCLSTATE();
3633		} else {
3634			NFSUNLOCKCLSTATE();
3635			m_freem(rep);
3636		}
3637	}
3638}
3639
3640/*
3641 * Generate the next cbident value. Basically just increment a static value
3642 * and then check that it isn't already in the list, if it has wrapped around.
3643 */
3644static u_int32_t
3645nfscl_nextcbident(void)
3646{
3647	struct nfsclclient *clp;
3648	int matched;
3649	static u_int32_t nextcbident = 0;
3650	static int haswrapped = 0;
3651
3652	nextcbident++;
3653	if (nextcbident == 0)
3654		haswrapped = 1;
3655	if (haswrapped) {
3656		/*
3657		 * Search the clientid list for one already using this cbident.
3658		 */
3659		do {
3660			matched = 0;
3661			NFSLOCKCLSTATE();
3662			LIST_FOREACH(clp, &nfsclhead, nfsc_list) {
3663				if (clp->nfsc_cbident == nextcbident) {
3664					matched = 1;
3665					break;
3666				}
3667			}
3668			NFSUNLOCKCLSTATE();
3669			if (matched == 1)
3670				nextcbident++;
3671		} while (matched);
3672	}
3673	return (nextcbident);
3674}
3675
3676/*
3677 * Get the mount point related to a given cbident or session and busy it.
3678 */
3679static mount_t
3680nfscl_getmnt(int minorvers, uint8_t *sessionid, u_int32_t cbident,
3681    struct nfsclclient **clpp)
3682{
3683	struct nfsclclient *clp;
3684	mount_t mp;
3685	int error;
3686	struct nfsclsession *tsep;
3687
3688	*clpp = NULL;
3689	NFSLOCKCLSTATE();
3690	LIST_FOREACH(clp, &nfsclhead, nfsc_list) {
3691		tsep = nfsmnt_mdssession(clp->nfsc_nmp);
3692		if (minorvers == NFSV4_MINORVERSION) {
3693			if (clp->nfsc_cbident == cbident)
3694				break;
3695		} else if (!NFSBCMP(tsep->nfsess_sessionid, sessionid,
3696		    NFSX_V4SESSIONID))
3697			break;
3698	}
3699	if (clp == NULL) {
3700		NFSUNLOCKCLSTATE();
3701		return (NULL);
3702	}
3703	mp = clp->nfsc_nmp->nm_mountp;
3704	vfs_ref(mp);
3705	NFSUNLOCKCLSTATE();
3706	error = vfs_busy(mp, 0);
3707	vfs_rel(mp);
3708	if (error != 0)
3709		return (NULL);
3710	*clpp = clp;
3711	return (mp);
3712}
3713
3714/*
3715 * Get the clientid pointer related to a given cbident.
3716 */
3717static struct nfsclclient *
3718nfscl_getclnt(u_int32_t cbident)
3719{
3720	struct nfsclclient *clp;
3721
3722	LIST_FOREACH(clp, &nfsclhead, nfsc_list)
3723		if (clp->nfsc_cbident == cbident)
3724			break;
3725	return (clp);
3726}
3727
3728/*
3729 * Get the clientid pointer related to a given sessionid.
3730 */
3731static struct nfsclclient *
3732nfscl_getclntsess(uint8_t *sessionid)
3733{
3734	struct nfsclclient *clp;
3735	struct nfsclsession *tsep;
3736
3737	LIST_FOREACH(clp, &nfsclhead, nfsc_list) {
3738		tsep = nfsmnt_mdssession(clp->nfsc_nmp);
3739		if (!NFSBCMP(tsep->nfsess_sessionid, sessionid,
3740		    NFSX_V4SESSIONID))
3741			break;
3742	}
3743	return (clp);
3744}
3745
3746/*
3747 * Search for a lock conflict locally on the client. A conflict occurs if
3748 * - not same owner and overlapping byte range and at least one of them is
3749 *   a write lock or this is an unlock.
3750 */
3751static int
3752nfscl_localconflict(struct nfsclclient *clp, u_int8_t *fhp, int fhlen,
3753    struct nfscllock *nlop, u_int8_t *own, struct nfscldeleg *dp,
3754    struct nfscllock **lopp)
3755{
3756	struct nfsclowner *owp;
3757	struct nfsclopen *op;
3758	int ret;
3759
3760	if (dp != NULL) {
3761		ret = nfscl_checkconflict(&dp->nfsdl_lock, nlop, own, lopp);
3762		if (ret)
3763			return (ret);
3764	}
3765	LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
3766		LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
3767			if (op->nfso_fhlen == fhlen &&
3768			    !NFSBCMP(op->nfso_fh, fhp, fhlen)) {
3769				ret = nfscl_checkconflict(&op->nfso_lock, nlop,
3770				    own, lopp);
3771				if (ret)
3772					return (ret);
3773			}
3774		}
3775	}
3776	return (0);
3777}
3778
3779static int
3780nfscl_checkconflict(struct nfscllockownerhead *lhp, struct nfscllock *nlop,
3781    u_int8_t *own, struct nfscllock **lopp)
3782{
3783	struct nfscllockowner *lp;
3784	struct nfscllock *lop;
3785
3786	LIST_FOREACH(lp, lhp, nfsl_list) {
3787		if (NFSBCMP(lp->nfsl_owner, own, NFSV4CL_LOCKNAMELEN)) {
3788			LIST_FOREACH(lop, &lp->nfsl_lock, nfslo_list) {
3789				if (lop->nfslo_first >= nlop->nfslo_end)
3790					break;
3791				if (lop->nfslo_end <= nlop->nfslo_first)
3792					continue;
3793				if (lop->nfslo_type == F_WRLCK ||
3794				    nlop->nfslo_type == F_WRLCK ||
3795				    nlop->nfslo_type == F_UNLCK) {
3796					if (lopp != NULL)
3797						*lopp = lop;
3798					return (NFSERR_DENIED);
3799				}
3800			}
3801		}
3802	}
3803	return (0);
3804}
3805
3806/*
3807 * Check for a local conflicting lock.
3808 */
3809APPLESTATIC int
3810nfscl_lockt(vnode_t vp, struct nfsclclient *clp, u_int64_t off,
3811    u_int64_t len, struct flock *fl, NFSPROC_T *p, void *id, int flags)
3812{
3813	struct nfscllock *lop, nlck;
3814	struct nfscldeleg *dp;
3815	struct nfsnode *np;
3816	u_int8_t own[NFSV4CL_LOCKNAMELEN];
3817	int error;
3818
3819	nlck.nfslo_type = fl->l_type;
3820	nlck.nfslo_first = off;
3821	if (len == NFS64BITSSET) {
3822		nlck.nfslo_end = NFS64BITSSET;
3823	} else {
3824		nlck.nfslo_end = off + len;
3825		if (nlck.nfslo_end <= nlck.nfslo_first)
3826			return (NFSERR_INVAL);
3827	}
3828	np = VTONFS(vp);
3829	nfscl_filllockowner(id, own, flags);
3830	NFSLOCKCLSTATE();
3831	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
3832	error = nfscl_localconflict(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len,
3833	    &nlck, own, dp, &lop);
3834	if (error != 0) {
3835		fl->l_whence = SEEK_SET;
3836		fl->l_start = lop->nfslo_first;
3837		if (lop->nfslo_end == NFS64BITSSET)
3838			fl->l_len = 0;
3839		else
3840			fl->l_len = lop->nfslo_end - lop->nfslo_first;
3841		fl->l_pid = (pid_t)0;
3842		fl->l_type = lop->nfslo_type;
3843		error = -1;			/* no RPC required */
3844	} else if (dp != NULL && ((dp->nfsdl_flags & NFSCLDL_WRITE) ||
3845	    fl->l_type == F_RDLCK)) {
3846		/*
3847		 * The delegation ensures that there isn't a conflicting
3848		 * lock on the server, so return -1 to indicate an RPC
3849		 * isn't required.
3850		 */
3851		fl->l_type = F_UNLCK;
3852		error = -1;
3853	}
3854	NFSUNLOCKCLSTATE();
3855	return (error);
3856}
3857
3858/*
3859 * Handle Recall of a delegation.
3860 * The clp must be exclusive locked when this is called.
3861 */
3862static int
3863nfscl_recalldeleg(struct nfsclclient *clp, struct nfsmount *nmp,
3864    struct nfscldeleg *dp, vnode_t vp, struct ucred *cred, NFSPROC_T *p,
3865    int called_from_renewthread)
3866{
3867	struct nfsclowner *owp, *lowp, *nowp;
3868	struct nfsclopen *op, *lop;
3869	struct nfscllockowner *lp;
3870	struct nfscllock *lckp;
3871	struct nfsnode *np;
3872	int error = 0, ret, gotvp = 0;
3873
3874	if (vp == NULL) {
3875		/*
3876		 * First, get a vnode for the file. This is needed to do RPCs.
3877		 */
3878		ret = nfscl_ngetreopen(nmp->nm_mountp, dp->nfsdl_fh,
3879		    dp->nfsdl_fhlen, p, &np);
3880		if (ret) {
3881			/*
3882			 * File isn't open, so nothing to move over to the
3883			 * server.
3884			 */
3885			return (0);
3886		}
3887		vp = NFSTOV(np);
3888		gotvp = 1;
3889	} else {
3890		np = VTONFS(vp);
3891	}
3892	dp->nfsdl_flags &= ~NFSCLDL_MODTIMESET;
3893
3894	/*
3895	 * Ok, if it's a write delegation, flush data to the server, so
3896	 * that close/open consistency is retained.
3897	 */
3898	ret = 0;
3899	NFSLOCKNODE(np);
3900	if ((dp->nfsdl_flags & NFSCLDL_WRITE) && (np->n_flag & NMODIFIED)) {
3901		np->n_flag |= NDELEGRECALL;
3902		NFSUNLOCKNODE(np);
3903		ret = ncl_flush(vp, MNT_WAIT, p, 1, called_from_renewthread);
3904		NFSLOCKNODE(np);
3905		np->n_flag &= ~NDELEGRECALL;
3906	}
3907	NFSINVALATTRCACHE(np);
3908	NFSUNLOCKNODE(np);
3909	if (ret == EIO && called_from_renewthread != 0) {
3910		/*
3911		 * If the flush failed with EIO for the renew thread,
3912		 * return now, so that the dirty buffer will be flushed
3913		 * later.
3914		 */
3915		if (gotvp != 0)
3916			vrele(vp);
3917		return (ret);
3918	}
3919
3920	/*
3921	 * Now, for each openowner with opens issued locally, move them
3922	 * over to state against the server.
3923	 */
3924	LIST_FOREACH(lowp, &dp->nfsdl_owner, nfsow_list) {
3925		lop = LIST_FIRST(&lowp->nfsow_open);
3926		if (lop != NULL) {
3927			if (LIST_NEXT(lop, nfso_list) != NULL)
3928				panic("nfsdlg mult opens");
3929			/*
3930			 * Look for the same openowner against the server.
3931			 */
3932			LIST_FOREACH(owp, &clp->nfsc_owner, nfsow_list) {
3933				if (!NFSBCMP(lowp->nfsow_owner,
3934				    owp->nfsow_owner, NFSV4CL_LOCKNAMELEN)) {
3935					newnfs_copycred(&dp->nfsdl_cred, cred);
3936					ret = nfscl_moveopen(vp, clp, nmp, lop,
3937					    owp, dp, cred, p);
3938					if (ret == NFSERR_STALECLIENTID ||
3939					    ret == NFSERR_STALEDONTRECOVER ||
3940					    ret == NFSERR_BADSESSION) {
3941						if (gotvp)
3942							vrele(vp);
3943						return (ret);
3944					}
3945					if (ret) {
3946						nfscl_freeopen(lop, 1);
3947						if (!error)
3948							error = ret;
3949					}
3950					break;
3951				}
3952			}
3953
3954			/*
3955			 * If no openowner found, create one and get an open
3956			 * for it.
3957			 */
3958			if (owp == NULL) {
3959				MALLOC(nowp, struct nfsclowner *,
3960				    sizeof (struct nfsclowner), M_NFSCLOWNER,
3961				    M_WAITOK);
3962				nfscl_newopen(clp, NULL, &owp, &nowp, &op,
3963				    NULL, lowp->nfsow_owner, dp->nfsdl_fh,
3964				    dp->nfsdl_fhlen, NULL);
3965				newnfs_copycred(&dp->nfsdl_cred, cred);
3966				ret = nfscl_moveopen(vp, clp, nmp, lop,
3967				    owp, dp, cred, p);
3968				if (ret) {
3969					nfscl_freeopenowner(owp, 0);
3970					if (ret == NFSERR_STALECLIENTID ||
3971					    ret == NFSERR_STALEDONTRECOVER ||
3972					    ret == NFSERR_BADSESSION) {
3973						if (gotvp)
3974							vrele(vp);
3975						return (ret);
3976					}
3977					if (ret) {
3978						nfscl_freeopen(lop, 1);
3979						if (!error)
3980							error = ret;
3981					}
3982				}
3983			}
3984		}
3985	}
3986
3987	/*
3988	 * Now, get byte range locks for any locks done locally.
3989	 */
3990	LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
3991		LIST_FOREACH(lckp, &lp->nfsl_lock, nfslo_list) {
3992			newnfs_copycred(&dp->nfsdl_cred, cred);
3993			ret = nfscl_relock(vp, clp, nmp, lp, lckp, cred, p);
3994			if (ret == NFSERR_STALESTATEID ||
3995			    ret == NFSERR_STALEDONTRECOVER ||
3996			    ret == NFSERR_STALECLIENTID ||
3997			    ret == NFSERR_BADSESSION) {
3998				if (gotvp)
3999					vrele(vp);
4000				return (ret);
4001			}
4002			if (ret && !error)
4003				error = ret;
4004		}
4005	}
4006	if (gotvp)
4007		vrele(vp);
4008	return (error);
4009}
4010
4011/*
4012 * Move a locally issued open over to an owner on the state list.
4013 * SIDE EFFECT: If it needs to sleep (do an rpc), it unlocks clstate and
4014 * returns with it unlocked.
4015 */
4016static int
4017nfscl_moveopen(vnode_t vp, struct nfsclclient *clp, struct nfsmount *nmp,
4018    struct nfsclopen *lop, struct nfsclowner *owp, struct nfscldeleg *dp,
4019    struct ucred *cred, NFSPROC_T *p)
4020{
4021	struct nfsclopen *op, *nop;
4022	struct nfscldeleg *ndp;
4023	struct nfsnode *np;
4024	int error = 0, newone;
4025
4026	/*
4027	 * First, look for an appropriate open, If found, just increment the
4028	 * opencnt in it.
4029	 */
4030	LIST_FOREACH(op, &owp->nfsow_open, nfso_list) {
4031		if ((op->nfso_mode & lop->nfso_mode) == lop->nfso_mode &&
4032		    op->nfso_fhlen == lop->nfso_fhlen &&
4033		    !NFSBCMP(op->nfso_fh, lop->nfso_fh, op->nfso_fhlen)) {
4034			op->nfso_opencnt += lop->nfso_opencnt;
4035			nfscl_freeopen(lop, 1);
4036			return (0);
4037		}
4038	}
4039
4040	/* No appropriate open, so we have to do one against the server. */
4041	np = VTONFS(vp);
4042	MALLOC(nop, struct nfsclopen *, sizeof (struct nfsclopen) +
4043	    lop->nfso_fhlen - 1, M_NFSCLOPEN, M_WAITOK);
4044	newone = 0;
4045	nfscl_newopen(clp, NULL, &owp, NULL, &op, &nop, owp->nfsow_owner,
4046	    lop->nfso_fh, lop->nfso_fhlen, &newone);
4047	ndp = dp;
4048	error = nfscl_tryopen(nmp, vp, np->n_v4->n4_data, np->n_v4->n4_fhlen,
4049	    lop->nfso_fh, lop->nfso_fhlen, lop->nfso_mode, op,
4050	    NFS4NODENAME(np->n_v4), np->n_v4->n4_namelen, &ndp, 0, 0, cred, p);
4051	if (error) {
4052		if (newone)
4053			nfscl_freeopen(op, 0);
4054	} else {
4055		if (newone)
4056			newnfs_copyincred(cred, &op->nfso_cred);
4057		op->nfso_mode |= lop->nfso_mode;
4058		op->nfso_opencnt += lop->nfso_opencnt;
4059		nfscl_freeopen(lop, 1);
4060	}
4061	if (nop != NULL)
4062		FREE((caddr_t)nop, M_NFSCLOPEN);
4063	if (ndp != NULL) {
4064		/*
4065		 * What should I do with the returned delegation, since the
4066		 * delegation is being recalled? For now, just printf and
4067		 * through it away.
4068		 */
4069		printf("Moveopen returned deleg\n");
4070		FREE((caddr_t)ndp, M_NFSCLDELEG);
4071	}
4072	return (error);
4073}
4074
4075/*
4076 * Recall all delegations on this client.
4077 */
4078static void
4079nfscl_totalrecall(struct nfsclclient *clp)
4080{
4081	struct nfscldeleg *dp;
4082
4083	TAILQ_FOREACH(dp, &clp->nfsc_deleg, nfsdl_list) {
4084		if ((dp->nfsdl_flags & NFSCLDL_DELEGRET) == 0)
4085			dp->nfsdl_flags |= NFSCLDL_RECALL;
4086	}
4087}
4088
4089/*
4090 * Relock byte ranges. Called for delegation recall and state expiry.
4091 */
4092static int
4093nfscl_relock(vnode_t vp, struct nfsclclient *clp, struct nfsmount *nmp,
4094    struct nfscllockowner *lp, struct nfscllock *lop, struct ucred *cred,
4095    NFSPROC_T *p)
4096{
4097	struct nfscllockowner *nlp;
4098	struct nfsfh *nfhp;
4099	u_int64_t off, len;
4100	u_int32_t clidrev = 0;
4101	int error, newone, donelocally;
4102
4103	off = lop->nfslo_first;
4104	len = lop->nfslo_end - lop->nfslo_first;
4105	error = nfscl_getbytelock(vp, off, len, lop->nfslo_type, cred, p,
4106	    clp, 1, NULL, lp->nfsl_lockflags, lp->nfsl_owner,
4107	    lp->nfsl_openowner, &nlp, &newone, &donelocally);
4108	if (error || donelocally)
4109		return (error);
4110	if (nmp->nm_clp != NULL)
4111		clidrev = nmp->nm_clp->nfsc_clientidrev;
4112	else
4113		clidrev = 0;
4114	nfhp = VTONFS(vp)->n_fhp;
4115	error = nfscl_trylock(nmp, vp, nfhp->nfh_fh,
4116	    nfhp->nfh_len, nlp, newone, 0, off,
4117	    len, lop->nfslo_type, cred, p);
4118	if (error)
4119		nfscl_freelockowner(nlp, 0);
4120	return (error);
4121}
4122
4123/*
4124 * Called to re-open a file. Basically get a vnode for the file handle
4125 * and then call nfsrpc_openrpc() to do the rest.
4126 */
4127static int
4128nfsrpc_reopen(struct nfsmount *nmp, u_int8_t *fhp, int fhlen,
4129    u_int32_t mode, struct nfsclopen *op, struct nfscldeleg **dpp,
4130    struct ucred *cred, NFSPROC_T *p)
4131{
4132	struct nfsnode *np;
4133	vnode_t vp;
4134	int error;
4135
4136	error = nfscl_ngetreopen(nmp->nm_mountp, fhp, fhlen, p, &np);
4137	if (error)
4138		return (error);
4139	vp = NFSTOV(np);
4140	if (np->n_v4 != NULL) {
4141		error = nfscl_tryopen(nmp, vp, np->n_v4->n4_data,
4142		    np->n_v4->n4_fhlen, fhp, fhlen, mode, op,
4143		    NFS4NODENAME(np->n_v4), np->n_v4->n4_namelen, dpp, 0, 0,
4144		    cred, p);
4145	} else {
4146		error = EINVAL;
4147	}
4148	vrele(vp);
4149	return (error);
4150}
4151
4152/*
4153 * Try an open against the server. Just call nfsrpc_openrpc(), retrying while
4154 * NFSERR_DELAY. Also, try system credentials, if the passed in credentials
4155 * fail.
4156 */
4157static int
4158nfscl_tryopen(struct nfsmount *nmp, vnode_t vp, u_int8_t *fhp, int fhlen,
4159    u_int8_t *newfhp, int newfhlen, u_int32_t mode, struct nfsclopen *op,
4160    u_int8_t *name, int namelen, struct nfscldeleg **ndpp,
4161    int reclaim, u_int32_t delegtype, struct ucred *cred, NFSPROC_T *p)
4162{
4163	int error;
4164
4165	do {
4166		error = nfsrpc_openrpc(nmp, vp, fhp, fhlen, newfhp, newfhlen,
4167		    mode, op, name, namelen, ndpp, reclaim, delegtype, cred, p,
4168		    0, 0);
4169		if (error == NFSERR_DELAY)
4170			(void) nfs_catnap(PZERO, error, "nfstryop");
4171	} while (error == NFSERR_DELAY);
4172	if (error == EAUTH || error == EACCES) {
4173		/* Try again using system credentials */
4174		newnfs_setroot(cred);
4175		do {
4176		    error = nfsrpc_openrpc(nmp, vp, fhp, fhlen, newfhp,
4177			newfhlen, mode, op, name, namelen, ndpp, reclaim,
4178			delegtype, cred, p, 1, 0);
4179		    if (error == NFSERR_DELAY)
4180			(void) nfs_catnap(PZERO, error, "nfstryop");
4181		} while (error == NFSERR_DELAY);
4182	}
4183	return (error);
4184}
4185
4186/*
4187 * Try a byte range lock. Just loop on nfsrpc_lock() while it returns
4188 * NFSERR_DELAY. Also, retry with system credentials, if the provided
4189 * cred don't work.
4190 */
4191static int
4192nfscl_trylock(struct nfsmount *nmp, vnode_t vp, u_int8_t *fhp,
4193    int fhlen, struct nfscllockowner *nlp, int newone, int reclaim,
4194    u_int64_t off, u_int64_t len, short type, struct ucred *cred, NFSPROC_T *p)
4195{
4196	struct nfsrv_descript nfsd, *nd = &nfsd;
4197	int error;
4198
4199	do {
4200		error = nfsrpc_lock(nd, nmp, vp, fhp, fhlen, nlp, newone,
4201		    reclaim, off, len, type, cred, p, 0);
4202		if (!error && nd->nd_repstat == NFSERR_DELAY)
4203			(void) nfs_catnap(PZERO, (int)nd->nd_repstat,
4204			    "nfstrylck");
4205	} while (!error && nd->nd_repstat == NFSERR_DELAY);
4206	if (!error)
4207		error = nd->nd_repstat;
4208	if (error == EAUTH || error == EACCES) {
4209		/* Try again using root credentials */
4210		newnfs_setroot(cred);
4211		do {
4212			error = nfsrpc_lock(nd, nmp, vp, fhp, fhlen, nlp,
4213			    newone, reclaim, off, len, type, cred, p, 1);
4214			if (!error && nd->nd_repstat == NFSERR_DELAY)
4215				(void) nfs_catnap(PZERO, (int)nd->nd_repstat,
4216				    "nfstrylck");
4217		} while (!error && nd->nd_repstat == NFSERR_DELAY);
4218		if (!error)
4219			error = nd->nd_repstat;
4220	}
4221	return (error);
4222}
4223
4224/*
4225 * Try a delegreturn against the server. Just call nfsrpc_delegreturn(),
4226 * retrying while NFSERR_DELAY. Also, try system credentials, if the passed in
4227 * credentials fail.
4228 */
4229static int
4230nfscl_trydelegreturn(struct nfscldeleg *dp, struct ucred *cred,
4231    struct nfsmount *nmp, NFSPROC_T *p)
4232{
4233	int error;
4234
4235	do {
4236		error = nfsrpc_delegreturn(dp, cred, nmp, p, 0);
4237		if (error == NFSERR_DELAY)
4238			(void) nfs_catnap(PZERO, error, "nfstrydp");
4239	} while (error == NFSERR_DELAY);
4240	if (error == EAUTH || error == EACCES) {
4241		/* Try again using system credentials */
4242		newnfs_setroot(cred);
4243		do {
4244			error = nfsrpc_delegreturn(dp, cred, nmp, p, 1);
4245			if (error == NFSERR_DELAY)
4246				(void) nfs_catnap(PZERO, error, "nfstrydp");
4247		} while (error == NFSERR_DELAY);
4248	}
4249	return (error);
4250}
4251
4252/*
4253 * Try a close against the server. Just call nfsrpc_closerpc(),
4254 * retrying while NFSERR_DELAY. Also, try system credentials, if the passed in
4255 * credentials fail.
4256 */
4257APPLESTATIC int
4258nfscl_tryclose(struct nfsclopen *op, struct ucred *cred,
4259    struct nfsmount *nmp, NFSPROC_T *p)
4260{
4261	struct nfsrv_descript nfsd, *nd = &nfsd;
4262	int error;
4263
4264	do {
4265		error = nfsrpc_closerpc(nd, nmp, op, cred, p, 0);
4266		if (error == NFSERR_DELAY)
4267			(void) nfs_catnap(PZERO, error, "nfstrycl");
4268	} while (error == NFSERR_DELAY);
4269	if (error == EAUTH || error == EACCES) {
4270		/* Try again using system credentials */
4271		newnfs_setroot(cred);
4272		do {
4273			error = nfsrpc_closerpc(nd, nmp, op, cred, p, 1);
4274			if (error == NFSERR_DELAY)
4275				(void) nfs_catnap(PZERO, error, "nfstrycl");
4276		} while (error == NFSERR_DELAY);
4277	}
4278	return (error);
4279}
4280
4281/*
4282 * Decide if a delegation on a file permits close without flushing writes
4283 * to the server. This might be a big performance win in some environments.
4284 * (Not useful until the client does caching on local stable storage.)
4285 */
4286APPLESTATIC int
4287nfscl_mustflush(vnode_t vp)
4288{
4289	struct nfsclclient *clp;
4290	struct nfscldeleg *dp;
4291	struct nfsnode *np;
4292	struct nfsmount *nmp;
4293
4294	np = VTONFS(vp);
4295	nmp = VFSTONFS(vnode_mount(vp));
4296	if (!NFSHASNFSV4(nmp))
4297		return (1);
4298	NFSLOCKCLSTATE();
4299	clp = nfscl_findcl(nmp);
4300	if (clp == NULL) {
4301		NFSUNLOCKCLSTATE();
4302		return (1);
4303	}
4304	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
4305	if (dp != NULL && (dp->nfsdl_flags &
4306	    (NFSCLDL_WRITE | NFSCLDL_RECALL | NFSCLDL_DELEGRET)) ==
4307	     NFSCLDL_WRITE &&
4308	    (dp->nfsdl_sizelimit >= np->n_size ||
4309	     !NFSHASSTRICT3530(nmp))) {
4310		NFSUNLOCKCLSTATE();
4311		return (0);
4312	}
4313	NFSUNLOCKCLSTATE();
4314	return (1);
4315}
4316
4317/*
4318 * See if a (write) delegation exists for this file.
4319 */
4320APPLESTATIC int
4321nfscl_nodeleg(vnode_t vp, int writedeleg)
4322{
4323	struct nfsclclient *clp;
4324	struct nfscldeleg *dp;
4325	struct nfsnode *np;
4326	struct nfsmount *nmp;
4327
4328	np = VTONFS(vp);
4329	nmp = VFSTONFS(vnode_mount(vp));
4330	if (!NFSHASNFSV4(nmp))
4331		return (1);
4332	NFSLOCKCLSTATE();
4333	clp = nfscl_findcl(nmp);
4334	if (clp == NULL) {
4335		NFSUNLOCKCLSTATE();
4336		return (1);
4337	}
4338	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
4339	if (dp != NULL &&
4340	    (dp->nfsdl_flags & (NFSCLDL_RECALL | NFSCLDL_DELEGRET)) == 0 &&
4341	    (writedeleg == 0 || (dp->nfsdl_flags & NFSCLDL_WRITE) ==
4342	     NFSCLDL_WRITE)) {
4343		NFSUNLOCKCLSTATE();
4344		return (0);
4345	}
4346	NFSUNLOCKCLSTATE();
4347	return (1);
4348}
4349
4350/*
4351 * Look for an associated delegation that should be DelegReturned.
4352 */
4353APPLESTATIC int
4354nfscl_removedeleg(vnode_t vp, NFSPROC_T *p, nfsv4stateid_t *stp)
4355{
4356	struct nfsclclient *clp;
4357	struct nfscldeleg *dp;
4358	struct nfsclowner *owp;
4359	struct nfscllockowner *lp;
4360	struct nfsmount *nmp;
4361	struct ucred *cred;
4362	struct nfsnode *np;
4363	int igotlock = 0, triedrecall = 0, needsrecall, retcnt = 0, islept;
4364
4365	nmp = VFSTONFS(vnode_mount(vp));
4366	np = VTONFS(vp);
4367	NFSLOCKCLSTATE();
4368	/*
4369	 * Loop around waiting for:
4370	 * - outstanding I/O operations on delegations to complete
4371	 * - for a delegation on vp that has state, lock the client and
4372	 *   do a recall
4373	 * - return delegation with no state
4374	 */
4375	while (1) {
4376		clp = nfscl_findcl(nmp);
4377		if (clp == NULL) {
4378			NFSUNLOCKCLSTATE();
4379			return (retcnt);
4380		}
4381		dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh,
4382		    np->n_fhp->nfh_len);
4383		if (dp != NULL) {
4384		    /*
4385		     * Wait for outstanding I/O ops to be done.
4386		     */
4387		    if (dp->nfsdl_rwlock.nfslock_usecnt > 0) {
4388			if (igotlock) {
4389			    nfsv4_unlock(&clp->nfsc_lock, 0);
4390			    igotlock = 0;
4391			}
4392			dp->nfsdl_rwlock.nfslock_lock |= NFSV4LOCK_WANTED;
4393			(void) nfsmsleep(&dp->nfsdl_rwlock,
4394			    NFSCLSTATEMUTEXPTR, PZERO, "nfscld", NULL);
4395			continue;
4396		    }
4397		    needsrecall = 0;
4398		    LIST_FOREACH(owp, &dp->nfsdl_owner, nfsow_list) {
4399			if (!LIST_EMPTY(&owp->nfsow_open)) {
4400			    needsrecall = 1;
4401			    break;
4402			}
4403		    }
4404		    if (!needsrecall) {
4405			LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
4406			    if (!LIST_EMPTY(&lp->nfsl_lock)) {
4407				needsrecall = 1;
4408				break;
4409			    }
4410			}
4411		    }
4412		    if (needsrecall && !triedrecall) {
4413			dp->nfsdl_flags |= NFSCLDL_DELEGRET;
4414			islept = 0;
4415			while (!igotlock) {
4416			    igotlock = nfsv4_lock(&clp->nfsc_lock, 1,
4417				&islept, NFSCLSTATEMUTEXPTR, NULL);
4418			    if (islept)
4419				break;
4420			}
4421			if (islept)
4422			    continue;
4423			NFSUNLOCKCLSTATE();
4424			cred = newnfs_getcred();
4425			newnfs_copycred(&dp->nfsdl_cred, cred);
4426			(void) nfscl_recalldeleg(clp, nmp, dp, vp, cred, p, 0);
4427			NFSFREECRED(cred);
4428			triedrecall = 1;
4429			NFSLOCKCLSTATE();
4430			nfsv4_unlock(&clp->nfsc_lock, 0);
4431			igotlock = 0;
4432			continue;
4433		    }
4434		    *stp = dp->nfsdl_stateid;
4435		    retcnt = 1;
4436		    nfscl_cleandeleg(dp);
4437		    nfscl_freedeleg(&clp->nfsc_deleg, dp);
4438		}
4439		if (igotlock)
4440		    nfsv4_unlock(&clp->nfsc_lock, 0);
4441		NFSUNLOCKCLSTATE();
4442		return (retcnt);
4443	}
4444}
4445
4446/*
4447 * Look for associated delegation(s) that should be DelegReturned.
4448 */
4449APPLESTATIC int
4450nfscl_renamedeleg(vnode_t fvp, nfsv4stateid_t *fstp, int *gotfdp, vnode_t tvp,
4451    nfsv4stateid_t *tstp, int *gottdp, NFSPROC_T *p)
4452{
4453	struct nfsclclient *clp;
4454	struct nfscldeleg *dp;
4455	struct nfsclowner *owp;
4456	struct nfscllockowner *lp;
4457	struct nfsmount *nmp;
4458	struct ucred *cred;
4459	struct nfsnode *np;
4460	int igotlock = 0, triedrecall = 0, needsrecall, retcnt = 0, islept;
4461
4462	nmp = VFSTONFS(vnode_mount(fvp));
4463	*gotfdp = 0;
4464	*gottdp = 0;
4465	NFSLOCKCLSTATE();
4466	/*
4467	 * Loop around waiting for:
4468	 * - outstanding I/O operations on delegations to complete
4469	 * - for a delegation on fvp that has state, lock the client and
4470	 *   do a recall
4471	 * - return delegation(s) with no state.
4472	 */
4473	while (1) {
4474		clp = nfscl_findcl(nmp);
4475		if (clp == NULL) {
4476			NFSUNLOCKCLSTATE();
4477			return (retcnt);
4478		}
4479		np = VTONFS(fvp);
4480		dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh,
4481		    np->n_fhp->nfh_len);
4482		if (dp != NULL && *gotfdp == 0) {
4483		    /*
4484		     * Wait for outstanding I/O ops to be done.
4485		     */
4486		    if (dp->nfsdl_rwlock.nfslock_usecnt > 0) {
4487			if (igotlock) {
4488			    nfsv4_unlock(&clp->nfsc_lock, 0);
4489			    igotlock = 0;
4490			}
4491			dp->nfsdl_rwlock.nfslock_lock |= NFSV4LOCK_WANTED;
4492			(void) nfsmsleep(&dp->nfsdl_rwlock,
4493			    NFSCLSTATEMUTEXPTR, PZERO, "nfscld", NULL);
4494			continue;
4495		    }
4496		    needsrecall = 0;
4497		    LIST_FOREACH(owp, &dp->nfsdl_owner, nfsow_list) {
4498			if (!LIST_EMPTY(&owp->nfsow_open)) {
4499			    needsrecall = 1;
4500			    break;
4501			}
4502		    }
4503		    if (!needsrecall) {
4504			LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
4505			    if (!LIST_EMPTY(&lp->nfsl_lock)) {
4506				needsrecall = 1;
4507				break;
4508			    }
4509			}
4510		    }
4511		    if (needsrecall && !triedrecall) {
4512			dp->nfsdl_flags |= NFSCLDL_DELEGRET;
4513			islept = 0;
4514			while (!igotlock) {
4515			    igotlock = nfsv4_lock(&clp->nfsc_lock, 1,
4516				&islept, NFSCLSTATEMUTEXPTR, NULL);
4517			    if (islept)
4518				break;
4519			}
4520			if (islept)
4521			    continue;
4522			NFSUNLOCKCLSTATE();
4523			cred = newnfs_getcred();
4524			newnfs_copycred(&dp->nfsdl_cred, cred);
4525			(void) nfscl_recalldeleg(clp, nmp, dp, fvp, cred, p, 0);
4526			NFSFREECRED(cred);
4527			triedrecall = 1;
4528			NFSLOCKCLSTATE();
4529			nfsv4_unlock(&clp->nfsc_lock, 0);
4530			igotlock = 0;
4531			continue;
4532		    }
4533		    *fstp = dp->nfsdl_stateid;
4534		    retcnt++;
4535		    *gotfdp = 1;
4536		    nfscl_cleandeleg(dp);
4537		    nfscl_freedeleg(&clp->nfsc_deleg, dp);
4538		}
4539		if (igotlock) {
4540		    nfsv4_unlock(&clp->nfsc_lock, 0);
4541		    igotlock = 0;
4542		}
4543		if (tvp != NULL) {
4544		    np = VTONFS(tvp);
4545		    dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh,
4546			np->n_fhp->nfh_len);
4547		    if (dp != NULL && *gottdp == 0) {
4548			/*
4549			 * Wait for outstanding I/O ops to be done.
4550			 */
4551			if (dp->nfsdl_rwlock.nfslock_usecnt > 0) {
4552			    dp->nfsdl_rwlock.nfslock_lock |= NFSV4LOCK_WANTED;
4553			    (void) nfsmsleep(&dp->nfsdl_rwlock,
4554				NFSCLSTATEMUTEXPTR, PZERO, "nfscld", NULL);
4555			    continue;
4556			}
4557			LIST_FOREACH(owp, &dp->nfsdl_owner, nfsow_list) {
4558			    if (!LIST_EMPTY(&owp->nfsow_open)) {
4559				NFSUNLOCKCLSTATE();
4560				return (retcnt);
4561			    }
4562			}
4563			LIST_FOREACH(lp, &dp->nfsdl_lock, nfsl_list) {
4564			    if (!LIST_EMPTY(&lp->nfsl_lock)) {
4565				NFSUNLOCKCLSTATE();
4566				return (retcnt);
4567			    }
4568			}
4569			*tstp = dp->nfsdl_stateid;
4570			retcnt++;
4571			*gottdp = 1;
4572			nfscl_cleandeleg(dp);
4573			nfscl_freedeleg(&clp->nfsc_deleg, dp);
4574		    }
4575		}
4576		NFSUNLOCKCLSTATE();
4577		return (retcnt);
4578	}
4579}
4580
4581/*
4582 * Get a reference on the clientid associated with the mount point.
4583 * Return 1 if success, 0 otherwise.
4584 */
4585APPLESTATIC int
4586nfscl_getref(struct nfsmount *nmp)
4587{
4588	struct nfsclclient *clp;
4589
4590	NFSLOCKCLSTATE();
4591	clp = nfscl_findcl(nmp);
4592	if (clp == NULL) {
4593		NFSUNLOCKCLSTATE();
4594		return (0);
4595	}
4596	nfsv4_getref(&clp->nfsc_lock, NULL, NFSCLSTATEMUTEXPTR, NULL);
4597	NFSUNLOCKCLSTATE();
4598	return (1);
4599}
4600
4601/*
4602 * Release a reference on a clientid acquired with the above call.
4603 */
4604APPLESTATIC void
4605nfscl_relref(struct nfsmount *nmp)
4606{
4607	struct nfsclclient *clp;
4608
4609	NFSLOCKCLSTATE();
4610	clp = nfscl_findcl(nmp);
4611	if (clp == NULL) {
4612		NFSUNLOCKCLSTATE();
4613		return;
4614	}
4615	nfsv4_relref(&clp->nfsc_lock);
4616	NFSUNLOCKCLSTATE();
4617}
4618
4619/*
4620 * Save the size attribute in the delegation, since the nfsnode
4621 * is going away.
4622 */
4623APPLESTATIC void
4624nfscl_reclaimnode(vnode_t vp)
4625{
4626	struct nfsclclient *clp;
4627	struct nfscldeleg *dp;
4628	struct nfsnode *np = VTONFS(vp);
4629	struct nfsmount *nmp;
4630
4631	nmp = VFSTONFS(vnode_mount(vp));
4632	if (!NFSHASNFSV4(nmp))
4633		return;
4634	NFSLOCKCLSTATE();
4635	clp = nfscl_findcl(nmp);
4636	if (clp == NULL) {
4637		NFSUNLOCKCLSTATE();
4638		return;
4639	}
4640	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
4641	if (dp != NULL && (dp->nfsdl_flags & NFSCLDL_WRITE))
4642		dp->nfsdl_size = np->n_size;
4643	NFSUNLOCKCLSTATE();
4644}
4645
4646/*
4647 * Get the saved size attribute in the delegation, since it is a
4648 * newly allocated nfsnode.
4649 */
4650APPLESTATIC void
4651nfscl_newnode(vnode_t vp)
4652{
4653	struct nfsclclient *clp;
4654	struct nfscldeleg *dp;
4655	struct nfsnode *np = VTONFS(vp);
4656	struct nfsmount *nmp;
4657
4658	nmp = VFSTONFS(vnode_mount(vp));
4659	if (!NFSHASNFSV4(nmp))
4660		return;
4661	NFSLOCKCLSTATE();
4662	clp = nfscl_findcl(nmp);
4663	if (clp == NULL) {
4664		NFSUNLOCKCLSTATE();
4665		return;
4666	}
4667	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
4668	if (dp != NULL && (dp->nfsdl_flags & NFSCLDL_WRITE))
4669		np->n_size = dp->nfsdl_size;
4670	NFSUNLOCKCLSTATE();
4671}
4672
4673/*
4674 * If there is a valid write delegation for this file, set the modtime
4675 * to the local clock time.
4676 */
4677APPLESTATIC void
4678nfscl_delegmodtime(vnode_t vp)
4679{
4680	struct nfsclclient *clp;
4681	struct nfscldeleg *dp;
4682	struct nfsnode *np = VTONFS(vp);
4683	struct nfsmount *nmp;
4684
4685	nmp = VFSTONFS(vnode_mount(vp));
4686	if (!NFSHASNFSV4(nmp))
4687		return;
4688	NFSLOCKCLSTATE();
4689	clp = nfscl_findcl(nmp);
4690	if (clp == NULL) {
4691		NFSUNLOCKCLSTATE();
4692		return;
4693	}
4694	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
4695	if (dp != NULL && (dp->nfsdl_flags & NFSCLDL_WRITE)) {
4696		nanotime(&dp->nfsdl_modtime);
4697		dp->nfsdl_flags |= NFSCLDL_MODTIMESET;
4698	}
4699	NFSUNLOCKCLSTATE();
4700}
4701
4702/*
4703 * If there is a valid write delegation for this file with a modtime set,
4704 * put that modtime in mtime.
4705 */
4706APPLESTATIC void
4707nfscl_deleggetmodtime(vnode_t vp, struct timespec *mtime)
4708{
4709	struct nfsclclient *clp;
4710	struct nfscldeleg *dp;
4711	struct nfsnode *np = VTONFS(vp);
4712	struct nfsmount *nmp;
4713
4714	nmp = VFSTONFS(vnode_mount(vp));
4715	if (!NFSHASNFSV4(nmp))
4716		return;
4717	NFSLOCKCLSTATE();
4718	clp = nfscl_findcl(nmp);
4719	if (clp == NULL) {
4720		NFSUNLOCKCLSTATE();
4721		return;
4722	}
4723	dp = nfscl_finddeleg(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
4724	if (dp != NULL &&
4725	    (dp->nfsdl_flags & (NFSCLDL_WRITE | NFSCLDL_MODTIMESET)) ==
4726	    (NFSCLDL_WRITE | NFSCLDL_MODTIMESET))
4727		*mtime = dp->nfsdl_modtime;
4728	NFSUNLOCKCLSTATE();
4729}
4730
4731static int
4732nfscl_errmap(struct nfsrv_descript *nd, u_int32_t minorvers)
4733{
4734	short *defaulterrp, *errp;
4735
4736	if (!nd->nd_repstat)
4737		return (0);
4738	if (nd->nd_procnum == NFSPROC_NOOP)
4739		return (txdr_unsigned(nd->nd_repstat & 0xffff));
4740	if (nd->nd_repstat == EBADRPC)
4741		return (txdr_unsigned(NFSERR_BADXDR));
4742	if (nd->nd_repstat == NFSERR_MINORVERMISMATCH ||
4743	    nd->nd_repstat == NFSERR_OPILLEGAL)
4744		return (txdr_unsigned(nd->nd_repstat));
4745	if (nd->nd_repstat >= NFSERR_BADIOMODE && nd->nd_repstat < 20000 &&
4746	    minorvers > NFSV4_MINORVERSION) {
4747		/* NFSv4.n error. */
4748		return (txdr_unsigned(nd->nd_repstat));
4749	}
4750	if (nd->nd_procnum < NFSV4OP_CBNOPS)
4751		errp = defaulterrp = nfscl_cberrmap[nd->nd_procnum];
4752	else
4753		return (txdr_unsigned(nd->nd_repstat));
4754	while (*++errp)
4755		if (*errp == (short)nd->nd_repstat)
4756			return (txdr_unsigned(nd->nd_repstat));
4757	return (txdr_unsigned(*defaulterrp));
4758}
4759
4760/*
4761 * Called to find/add a layout to a client.
4762 * This function returns the layout with a refcnt (shared lock) upon
4763 * success (returns 0) or with no lock/refcnt on the layout when an
4764 * error is returned.
4765 * If a layout is passed in via lypp, it is locked (exclusively locked).
4766 */
4767APPLESTATIC int
4768nfscl_layout(struct nfsmount *nmp, vnode_t vp, u_int8_t *fhp, int fhlen,
4769    nfsv4stateid_t *stateidp, int retonclose,
4770    struct nfsclflayouthead *fhlp, struct nfscllayout **lypp,
4771    struct ucred *cred, NFSPROC_T *p)
4772{
4773	struct nfsclclient *clp;
4774	struct nfscllayout *lyp, *tlyp;
4775	struct nfsclflayout *flp;
4776	struct nfsnode *np = VTONFS(vp);
4777	mount_t mp;
4778	int layout_passed_in;
4779
4780	mp = nmp->nm_mountp;
4781	layout_passed_in = 1;
4782	tlyp = NULL;
4783	lyp = *lypp;
4784	if (lyp == NULL) {
4785		layout_passed_in = 0;
4786		tlyp = malloc(sizeof(*tlyp) + fhlen - 1, M_NFSLAYOUT,
4787		    M_WAITOK | M_ZERO);
4788	}
4789
4790	NFSLOCKCLSTATE();
4791	clp = nmp->nm_clp;
4792	if (clp == NULL) {
4793		if (layout_passed_in != 0)
4794			nfsv4_unlock(&lyp->nfsly_lock, 0);
4795		NFSUNLOCKCLSTATE();
4796		if (tlyp != NULL)
4797			free(tlyp, M_NFSLAYOUT);
4798		return (EPERM);
4799	}
4800	if (lyp == NULL) {
4801		/*
4802		 * Although no lyp was passed in, another thread might have
4803		 * allocated one. If one is found, just increment it's ref
4804		 * count and return it.
4805		 */
4806		lyp = nfscl_findlayout(clp, fhp, fhlen);
4807		if (lyp == NULL) {
4808			lyp = tlyp;
4809			tlyp = NULL;
4810			lyp->nfsly_stateid.seqid = stateidp->seqid;
4811			lyp->nfsly_stateid.other[0] = stateidp->other[0];
4812			lyp->nfsly_stateid.other[1] = stateidp->other[1];
4813			lyp->nfsly_stateid.other[2] = stateidp->other[2];
4814			lyp->nfsly_lastbyte = 0;
4815			LIST_INIT(&lyp->nfsly_flayread);
4816			LIST_INIT(&lyp->nfsly_flayrw);
4817			LIST_INIT(&lyp->nfsly_recall);
4818			lyp->nfsly_filesid[0] = np->n_vattr.na_filesid[0];
4819			lyp->nfsly_filesid[1] = np->n_vattr.na_filesid[1];
4820			lyp->nfsly_clp = clp;
4821			lyp->nfsly_flags = (retonclose != 0) ?
4822			    (NFSLY_FILES | NFSLY_RETONCLOSE) : NFSLY_FILES;
4823			lyp->nfsly_fhlen = fhlen;
4824			NFSBCOPY(fhp, lyp->nfsly_fh, fhlen);
4825			TAILQ_INSERT_HEAD(&clp->nfsc_layout, lyp, nfsly_list);
4826			LIST_INSERT_HEAD(NFSCLLAYOUTHASH(clp, fhp, fhlen), lyp,
4827			    nfsly_hash);
4828			lyp->nfsly_timestamp = NFSD_MONOSEC + 120;
4829			nfscl_layoutcnt++;
4830		} else {
4831			if (retonclose != 0)
4832				lyp->nfsly_flags |= NFSLY_RETONCLOSE;
4833			TAILQ_REMOVE(&clp->nfsc_layout, lyp, nfsly_list);
4834			TAILQ_INSERT_HEAD(&clp->nfsc_layout, lyp, nfsly_list);
4835			lyp->nfsly_timestamp = NFSD_MONOSEC + 120;
4836		}
4837		nfsv4_getref(&lyp->nfsly_lock, NULL, NFSCLSTATEMUTEXPTR, mp);
4838		if ((mp->mnt_kern_flag & MNTK_UNMOUNTF) != 0) {
4839			NFSUNLOCKCLSTATE();
4840			if (tlyp != NULL)
4841				free(tlyp, M_NFSLAYOUT);
4842			return (EPERM);
4843		}
4844		*lypp = lyp;
4845	} else
4846		lyp->nfsly_stateid.seqid = stateidp->seqid;
4847
4848	/* Merge the new list of File Layouts into the list. */
4849	flp = LIST_FIRST(fhlp);
4850	if (flp != NULL) {
4851		if (flp->nfsfl_iomode == NFSLAYOUTIOMODE_READ)
4852			nfscl_mergeflayouts(&lyp->nfsly_flayread, fhlp);
4853		else
4854			nfscl_mergeflayouts(&lyp->nfsly_flayrw, fhlp);
4855	}
4856	if (layout_passed_in != 0)
4857		nfsv4_unlock(&lyp->nfsly_lock, 1);
4858	NFSUNLOCKCLSTATE();
4859	if (tlyp != NULL)
4860		free(tlyp, M_NFSLAYOUT);
4861	return (0);
4862}
4863
4864/*
4865 * Search for a layout by MDS file handle.
4866 * If one is found, it is returned with a refcnt (shared lock) iff
4867 * retflpp returned non-NULL and locked (exclusive locked) iff retflpp is
4868 * returned NULL.
4869 */
4870struct nfscllayout *
4871nfscl_getlayout(struct nfsclclient *clp, uint8_t *fhp, int fhlen,
4872    uint64_t off, struct nfsclflayout **retflpp, int *recalledp)
4873{
4874	struct nfscllayout *lyp;
4875	mount_t mp;
4876	int error, igotlock;
4877
4878	mp = clp->nfsc_nmp->nm_mountp;
4879	*recalledp = 0;
4880	*retflpp = NULL;
4881	NFSLOCKCLSTATE();
4882	lyp = nfscl_findlayout(clp, fhp, fhlen);
4883	if (lyp != NULL) {
4884		if ((lyp->nfsly_flags & NFSLY_RECALL) == 0) {
4885			TAILQ_REMOVE(&clp->nfsc_layout, lyp, nfsly_list);
4886			TAILQ_INSERT_HEAD(&clp->nfsc_layout, lyp, nfsly_list);
4887			lyp->nfsly_timestamp = NFSD_MONOSEC + 120;
4888			error = nfscl_findlayoutforio(lyp, off,
4889			    NFSV4OPEN_ACCESSREAD, retflpp);
4890			if (error == 0)
4891				nfsv4_getref(&lyp->nfsly_lock, NULL,
4892				    NFSCLSTATEMUTEXPTR, mp);
4893			else {
4894				do {
4895					igotlock = nfsv4_lock(&lyp->nfsly_lock,
4896					    1, NULL, NFSCLSTATEMUTEXPTR, mp);
4897				} while (igotlock == 0 &&
4898				    (mp->mnt_kern_flag & MNTK_UNMOUNTF) == 0);
4899				*retflpp = NULL;
4900			}
4901			if ((mp->mnt_kern_flag & MNTK_UNMOUNTF) != 0) {
4902				lyp = NULL;
4903				*recalledp = 1;
4904			}
4905		} else {
4906			lyp = NULL;
4907			*recalledp = 1;
4908		}
4909	}
4910	NFSUNLOCKCLSTATE();
4911	return (lyp);
4912}
4913
4914/*
4915 * Search for a layout by MDS file handle. If one is found, mark in to be
4916 * recalled, if it already marked "return on close".
4917 */
4918static void
4919nfscl_retoncloselayout(vnode_t vp, struct nfsclclient *clp, uint8_t *fhp,
4920    int fhlen, struct nfsclrecalllayout **recallpp)
4921{
4922	struct nfscllayout *lyp;
4923	uint32_t iomode;
4924
4925	if (vp->v_type != VREG || !NFSHASPNFS(VFSTONFS(vnode_mount(vp))) ||
4926	    nfscl_enablecallb == 0 || nfs_numnfscbd == 0 ||
4927	    (VTONFS(vp)->n_flag & NNOLAYOUT) != 0)
4928		return;
4929	lyp = nfscl_findlayout(clp, fhp, fhlen);
4930	if (lyp != NULL && (lyp->nfsly_flags & (NFSLY_RETONCLOSE |
4931	    NFSLY_RECALL)) == NFSLY_RETONCLOSE) {
4932		iomode = 0;
4933		if (!LIST_EMPTY(&lyp->nfsly_flayread))
4934			iomode |= NFSLAYOUTIOMODE_READ;
4935		if (!LIST_EMPTY(&lyp->nfsly_flayrw))
4936			iomode |= NFSLAYOUTIOMODE_RW;
4937		(void)nfscl_layoutrecall(NFSLAYOUTRETURN_FILE, lyp, iomode,
4938		    0, UINT64_MAX, lyp->nfsly_stateid.seqid, *recallpp);
4939		NFSCL_DEBUG(4, "retoncls recall iomode=%d\n", iomode);
4940		*recallpp = NULL;
4941	}
4942}
4943
4944/*
4945 * Dereference a layout.
4946 */
4947void
4948nfscl_rellayout(struct nfscllayout *lyp, int exclocked)
4949{
4950
4951	NFSLOCKCLSTATE();
4952	if (exclocked != 0)
4953		nfsv4_unlock(&lyp->nfsly_lock, 0);
4954	else
4955		nfsv4_relref(&lyp->nfsly_lock);
4956	NFSUNLOCKCLSTATE();
4957}
4958
4959/*
4960 * Search for a devinfo by deviceid. If one is found, return it after
4961 * acquiring a reference count on it.
4962 */
4963struct nfscldevinfo *
4964nfscl_getdevinfo(struct nfsclclient *clp, uint8_t *deviceid,
4965    struct nfscldevinfo *dip)
4966{
4967
4968	NFSLOCKCLSTATE();
4969	if (dip == NULL)
4970		dip = nfscl_finddevinfo(clp, deviceid);
4971	if (dip != NULL)
4972		dip->nfsdi_refcnt++;
4973	NFSUNLOCKCLSTATE();
4974	return (dip);
4975}
4976
4977/*
4978 * Dereference a devinfo structure.
4979 */
4980static void
4981nfscl_reldevinfo_locked(struct nfscldevinfo *dip)
4982{
4983
4984	dip->nfsdi_refcnt--;
4985	if (dip->nfsdi_refcnt == 0)
4986		wakeup(&dip->nfsdi_refcnt);
4987}
4988
4989/*
4990 * Dereference a devinfo structure.
4991 */
4992void
4993nfscl_reldevinfo(struct nfscldevinfo *dip)
4994{
4995
4996	NFSLOCKCLSTATE();
4997	nfscl_reldevinfo_locked(dip);
4998	NFSUNLOCKCLSTATE();
4999}
5000
5001/*
5002 * Find a layout for this file handle. Return NULL upon failure.
5003 */
5004static struct nfscllayout *
5005nfscl_findlayout(struct nfsclclient *clp, u_int8_t *fhp, int fhlen)
5006{
5007	struct nfscllayout *lyp;
5008
5009	LIST_FOREACH(lyp, NFSCLLAYOUTHASH(clp, fhp, fhlen), nfsly_hash)
5010		if (lyp->nfsly_fhlen == fhlen &&
5011		    !NFSBCMP(lyp->nfsly_fh, fhp, fhlen))
5012			break;
5013	return (lyp);
5014}
5015
5016/*
5017 * Find a devinfo for this deviceid. Return NULL upon failure.
5018 */
5019static struct nfscldevinfo *
5020nfscl_finddevinfo(struct nfsclclient *clp, uint8_t *deviceid)
5021{
5022	struct nfscldevinfo *dip;
5023
5024	LIST_FOREACH(dip, &clp->nfsc_devinfo, nfsdi_list)
5025		if (NFSBCMP(dip->nfsdi_deviceid, deviceid, NFSX_V4DEVICEID)
5026		    == 0)
5027			break;
5028	return (dip);
5029}
5030
5031/*
5032 * Merge the new file layout list into the main one, maintaining it in
5033 * increasing offset order.
5034 */
5035static void
5036nfscl_mergeflayouts(struct nfsclflayouthead *fhlp,
5037    struct nfsclflayouthead *newfhlp)
5038{
5039	struct nfsclflayout *flp, *nflp, *prevflp, *tflp;
5040
5041	flp = LIST_FIRST(fhlp);
5042	prevflp = NULL;
5043	LIST_FOREACH_SAFE(nflp, newfhlp, nfsfl_list, tflp) {
5044		while (flp != NULL && flp->nfsfl_off < nflp->nfsfl_off) {
5045			prevflp = flp;
5046			flp = LIST_NEXT(flp, nfsfl_list);
5047		}
5048		if (prevflp == NULL)
5049			LIST_INSERT_HEAD(fhlp, nflp, nfsfl_list);
5050		else
5051			LIST_INSERT_AFTER(prevflp, nflp, nfsfl_list);
5052		prevflp = nflp;
5053	}
5054}
5055
5056/*
5057 * Add this nfscldevinfo to the client, if it doesn't already exist.
5058 * This function consumes the structure pointed at by dip, if not NULL.
5059 */
5060APPLESTATIC int
5061nfscl_adddevinfo(struct nfsmount *nmp, struct nfscldevinfo *dip,
5062    struct nfsclflayout *flp)
5063{
5064	struct nfsclclient *clp;
5065	struct nfscldevinfo *tdip;
5066
5067	NFSLOCKCLSTATE();
5068	clp = nmp->nm_clp;
5069	if (clp == NULL) {
5070		NFSUNLOCKCLSTATE();
5071		if (dip != NULL)
5072			free(dip, M_NFSDEVINFO);
5073		return (ENODEV);
5074	}
5075	tdip = nfscl_finddevinfo(clp, flp->nfsfl_dev);
5076	if (tdip != NULL) {
5077		tdip->nfsdi_layoutrefs++;
5078		flp->nfsfl_devp = tdip;
5079		nfscl_reldevinfo_locked(tdip);
5080		NFSUNLOCKCLSTATE();
5081		if (dip != NULL)
5082			free(dip, M_NFSDEVINFO);
5083		return (0);
5084	}
5085	if (dip != NULL) {
5086		LIST_INSERT_HEAD(&clp->nfsc_devinfo, dip, nfsdi_list);
5087		dip->nfsdi_layoutrefs = 1;
5088		flp->nfsfl_devp = dip;
5089	}
5090	NFSUNLOCKCLSTATE();
5091	if (dip == NULL)
5092		return (ENODEV);
5093	return (0);
5094}
5095
5096/*
5097 * Free up a layout structure and associated file layout structure(s).
5098 */
5099APPLESTATIC void
5100nfscl_freelayout(struct nfscllayout *layp)
5101{
5102	struct nfsclflayout *flp, *nflp;
5103	struct nfsclrecalllayout *rp, *nrp;
5104
5105	LIST_FOREACH_SAFE(flp, &layp->nfsly_flayread, nfsfl_list, nflp) {
5106		LIST_REMOVE(flp, nfsfl_list);
5107		nfscl_freeflayout(flp);
5108	}
5109	LIST_FOREACH_SAFE(flp, &layp->nfsly_flayrw, nfsfl_list, nflp) {
5110		LIST_REMOVE(flp, nfsfl_list);
5111		nfscl_freeflayout(flp);
5112	}
5113	LIST_FOREACH_SAFE(rp, &layp->nfsly_recall, nfsrecly_list, nrp) {
5114		LIST_REMOVE(rp, nfsrecly_list);
5115		free(rp, M_NFSLAYRECALL);
5116	}
5117	nfscl_layoutcnt--;
5118	free(layp, M_NFSLAYOUT);
5119}
5120
5121/*
5122 * Free up a file layout structure.
5123 */
5124APPLESTATIC void
5125nfscl_freeflayout(struct nfsclflayout *flp)
5126{
5127	int i;
5128
5129	for (i = 0; i < flp->nfsfl_fhcnt; i++)
5130		free(flp->nfsfl_fh[i], M_NFSFH);
5131	if (flp->nfsfl_devp != NULL)
5132		flp->nfsfl_devp->nfsdi_layoutrefs--;
5133	free(flp, M_NFSFLAYOUT);
5134}
5135
5136/*
5137 * Free up a file layout devinfo structure.
5138 */
5139APPLESTATIC void
5140nfscl_freedevinfo(struct nfscldevinfo *dip)
5141{
5142
5143	free(dip, M_NFSDEVINFO);
5144}
5145
5146/*
5147 * Mark any layouts that match as recalled.
5148 */
5149static int
5150nfscl_layoutrecall(int recalltype, struct nfscllayout *lyp, uint32_t iomode,
5151    uint64_t off, uint64_t len, uint32_t stateseqid,
5152    struct nfsclrecalllayout *recallp)
5153{
5154	struct nfsclrecalllayout *rp, *orp;
5155
5156	recallp->nfsrecly_recalltype = recalltype;
5157	recallp->nfsrecly_iomode = iomode;
5158	recallp->nfsrecly_stateseqid = stateseqid;
5159	recallp->nfsrecly_off = off;
5160	recallp->nfsrecly_len = len;
5161	/*
5162	 * Order the list as file returns first, followed by fsid and any
5163	 * returns, both in increasing stateseqid order.
5164	 * Note that the seqids wrap around, so 1 is after 0xffffffff.
5165	 * (I'm not sure this is correct because I find RFC5661 confusing
5166	 *  on this, but hopefully it will work ok.)
5167	 */
5168	orp = NULL;
5169	LIST_FOREACH(rp, &lyp->nfsly_recall, nfsrecly_list) {
5170		orp = rp;
5171		if ((recalltype == NFSLAYOUTRETURN_FILE &&
5172		     (rp->nfsrecly_recalltype != NFSLAYOUTRETURN_FILE ||
5173		      nfscl_seq(stateseqid, rp->nfsrecly_stateseqid) != 0)) ||
5174		    (recalltype != NFSLAYOUTRETURN_FILE &&
5175		     rp->nfsrecly_recalltype != NFSLAYOUTRETURN_FILE &&
5176		     nfscl_seq(stateseqid, rp->nfsrecly_stateseqid) != 0)) {
5177			LIST_INSERT_BEFORE(rp, recallp, nfsrecly_list);
5178			break;
5179		}
5180	}
5181	if (rp == NULL) {
5182		if (orp == NULL)
5183			LIST_INSERT_HEAD(&lyp->nfsly_recall, recallp,
5184			    nfsrecly_list);
5185		else
5186			LIST_INSERT_AFTER(orp, recallp, nfsrecly_list);
5187	}
5188	lyp->nfsly_flags |= NFSLY_RECALL;
5189	return (0);
5190}
5191
5192/*
5193 * Compare the two seqids for ordering. The trick is that the seqids can
5194 * wrap around from 0xffffffff->0, so check for the cases where one
5195 * has wrapped around.
5196 * Return 1 if seqid1 comes before seqid2, 0 otherwise.
5197 */
5198static int
5199nfscl_seq(uint32_t seqid1, uint32_t seqid2)
5200{
5201
5202	if (seqid2 > seqid1 && (seqid2 - seqid1) >= 0x7fffffff)
5203		/* seqid2 has wrapped around. */
5204		return (0);
5205	if (seqid1 > seqid2 && (seqid1 - seqid2) >= 0x7fffffff)
5206		/* seqid1 has wrapped around. */
5207		return (1);
5208	if (seqid1 <= seqid2)
5209		return (1);
5210	return (0);
5211}
5212
5213/*
5214 * Do a layout return for each of the recalls.
5215 */
5216static void
5217nfscl_layoutreturn(struct nfsmount *nmp, struct nfscllayout *lyp,
5218    struct ucred *cred, NFSPROC_T *p)
5219{
5220	struct nfsclrecalllayout *rp;
5221	nfsv4stateid_t stateid;
5222
5223	NFSBCOPY(lyp->nfsly_stateid.other, stateid.other, NFSX_STATEIDOTHER);
5224	stateid.seqid = lyp->nfsly_stateid.seqid;
5225	LIST_FOREACH(rp, &lyp->nfsly_recall, nfsrecly_list) {
5226		(void)nfsrpc_layoutreturn(nmp, lyp->nfsly_fh,
5227		    lyp->nfsly_fhlen, 0, NFSLAYOUT_NFSV4_1_FILES,
5228		    rp->nfsrecly_iomode, rp->nfsrecly_recalltype,
5229		    rp->nfsrecly_off, rp->nfsrecly_len,
5230		    &stateid, 0, NULL, cred, p, NULL);
5231	}
5232}
5233
5234/*
5235 * Do the layout commit for a file layout.
5236 */
5237static void
5238nfscl_dolayoutcommit(struct nfsmount *nmp, struct nfscllayout *lyp,
5239    struct ucred *cred, NFSPROC_T *p)
5240{
5241	struct nfsclflayout *flp;
5242	uint64_t len;
5243	int error;
5244
5245	LIST_FOREACH(flp, &lyp->nfsly_flayrw, nfsfl_list) {
5246		if (flp->nfsfl_off <= lyp->nfsly_lastbyte) {
5247			len = flp->nfsfl_end - flp->nfsfl_off;
5248			error = nfsrpc_layoutcommit(nmp, lyp->nfsly_fh,
5249			    lyp->nfsly_fhlen, 0, flp->nfsfl_off, len,
5250			    lyp->nfsly_lastbyte, &lyp->nfsly_stateid,
5251			    NFSLAYOUT_NFSV4_1_FILES, 0, NULL, cred, p, NULL);
5252			NFSCL_DEBUG(4, "layoutcommit err=%d\n", error);
5253			if (error == NFSERR_NOTSUPP) {
5254				/* If not supported, don't bother doing it. */
5255				NFSLOCKMNT(nmp);
5256				nmp->nm_state |= NFSSTA_NOLAYOUTCOMMIT;
5257				NFSUNLOCKMNT(nmp);
5258				break;
5259			}
5260		}
5261	}
5262}
5263
5264/*
5265 * Commit all layouts for a file (vnode).
5266 */
5267int
5268nfscl_layoutcommit(vnode_t vp, NFSPROC_T *p)
5269{
5270	struct nfsclclient *clp;
5271	struct nfscllayout *lyp;
5272	struct nfsnode *np = VTONFS(vp);
5273	mount_t mp;
5274	struct nfsmount *nmp;
5275
5276	mp = vnode_mount(vp);
5277	nmp = VFSTONFS(mp);
5278	if (NFSHASNOLAYOUTCOMMIT(nmp))
5279		return (0);
5280	NFSLOCKCLSTATE();
5281	clp = nmp->nm_clp;
5282	if (clp == NULL) {
5283		NFSUNLOCKCLSTATE();
5284		return (EPERM);
5285	}
5286	lyp = nfscl_findlayout(clp, np->n_fhp->nfh_fh, np->n_fhp->nfh_len);
5287	if (lyp == NULL) {
5288		NFSUNLOCKCLSTATE();
5289		return (EPERM);
5290	}
5291	nfsv4_getref(&lyp->nfsly_lock, NULL, NFSCLSTATEMUTEXPTR, mp);
5292	if ((mp->mnt_kern_flag & MNTK_UNMOUNTF) != 0) {
5293		NFSUNLOCKCLSTATE();
5294		return (EPERM);
5295	}
5296tryagain:
5297	if ((lyp->nfsly_flags & NFSLY_WRITTEN) != 0) {
5298		lyp->nfsly_flags &= ~NFSLY_WRITTEN;
5299		NFSUNLOCKCLSTATE();
5300		NFSCL_DEBUG(4, "do layoutcommit2\n");
5301		nfscl_dolayoutcommit(clp->nfsc_nmp, lyp, NFSPROCCRED(p), p);
5302		NFSLOCKCLSTATE();
5303		goto tryagain;
5304	}
5305	nfsv4_relref(&lyp->nfsly_lock);
5306	NFSUNLOCKCLSTATE();
5307	return (0);
5308}
5309
5310