1 /*        $NetBSD: nfs_nfsdstate.c,v 1.6 2024/07/05 04:31:52 rin Exp $          */
2 /*-
3  * Copyright (c) 2009 Rick Macklem, University of Guelph
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  */
28 
29 #include <sys/cdefs.h>
30 /* __FBSDID("FreeBSD: head/sys/fs/nfsserver/nfs_nfsdstate.c 307694 2016-10-20 23:53:16Z rmacklem "); */
31 __RCSID("$NetBSD: nfs_nfsdstate.c,v 1.6 2024/07/05 04:31:52 rin Exp $");
32 
33 #ifndef APPLEKEXT
34 #include <fs/nfs/common/nfsport.h>
35 
36 struct nfsrv_stablefirst nfsrv_stablefirst;
37 int nfsrv_issuedelegs = 0;
38 int nfsrv_dolocallocks = 0;
39 struct nfsv4lock nfsv4rootfs_lock;
40 
41 extern int newnfs_numnfsd;
42 extern struct nfsstatsv1 nfsstatsv1;
43 extern int nfsrv_lease;
44 extern struct timeval nfsboottime;
45 extern u_int32_t newnfs_true, newnfs_false;
46 NFSV4ROOTLOCKMUTEX;
47 NFSSTATESPINLOCK;
48 
49 SYSCTL_DECL(_vfs_nfsd);
50 int       nfsrv_statehashsize = NFSSTATEHASHSIZE;
51 SYSCTL_INT(_vfs_nfsd, OID_AUTO, statehashsize, CTLFLAG_RDTUN,
52     &nfsrv_statehashsize, 0,
53     "Size of state hash table set via loader.conf");
54 
55 int       nfsrv_clienthashsize = NFSCLIENTHASHSIZE;
56 SYSCTL_INT(_vfs_nfsd, OID_AUTO, clienthashsize, CTLFLAG_RDTUN,
57     &nfsrv_clienthashsize, 0,
58     "Size of client hash table set via loader.conf");
59 
60 int       nfsrv_lockhashsize = NFSLOCKHASHSIZE;
61 SYSCTL_INT(_vfs_nfsd, OID_AUTO, fhhashsize, CTLFLAG_RDTUN,
62     &nfsrv_lockhashsize, 0,
63     "Size of file handle hash table set via loader.conf");
64 
65 int       nfsrv_sessionhashsize = NFSSESSIONHASHSIZE;
66 SYSCTL_INT(_vfs_nfsd, OID_AUTO, sessionhashsize, CTLFLAG_RDTUN,
67     &nfsrv_sessionhashsize, 0,
68     "Size of session hash table set via loader.conf");
69 
70 static int          nfsrv_v4statelimit = NFSRV_V4STATELIMIT;
71 SYSCTL_INT(_vfs_nfsd, OID_AUTO, v4statelimit, CTLFLAG_RWTUN,
72     &nfsrv_v4statelimit, 0,
73     "High water limit for NFSv4 opens+locks+delegations");
74 
75 static int          nfsrv_writedelegifpos = 0;
76 SYSCTL_INT(_vfs_nfsd, OID_AUTO, writedelegifpos, CTLFLAG_RW,
77     &nfsrv_writedelegifpos, 0,
78     "Issue a write delegation for read opens if possible");
79 
80 /*
81  * Hash lists for nfs V4.
82  */
83 struct nfsclienthashhead      *nfsclienthash;
84 struct nfslockhashhead                  *nfslockhash;
85 struct nfssessionhash                   *nfssessionhash;
86 #endif    /* !APPLEKEXT */
87 
88 static u_int32_t nfsrv_openpluslock = 0, nfsrv_delegatecnt = 0;
89 static time_t nfsrvboottime;
90 static int nfsrv_returnoldstateid = 0, nfsrv_clients = 0;
91 static int nfsrv_clienthighwater = NFSRV_CLIENTHIGHWATER;
92 static int nfsrv_nogsscallback = 0;
93 
94 /* local functions */
95 static void nfsrv_dumpaclient(struct nfsclient *clp,
96     struct nfsd_dumpclients *dumpp);
97 static void nfsrv_freeopenowner(struct nfsstate *stp, int cansleep,
98     NFSPROC_T *p);
99 static int nfsrv_freeopen(struct nfsstate *stp, vnode_t vp, int cansleep,
100     NFSPROC_T *p);
101 static void nfsrv_freelockowner(struct nfsstate *stp, vnode_t vp, int cansleep,
102     NFSPROC_T *p);
103 static void nfsrv_freeallnfslocks(struct nfsstate *stp, vnode_t vp,
104     int cansleep, NFSPROC_T *p);
105 static void nfsrv_freenfslock(struct nfslock *lop);
106 static void nfsrv_freenfslockfile(struct nfslockfile *lfp);
107 static void nfsrv_freedeleg(struct nfsstate *);
108 static int nfsrv_getstate(struct nfsclient *clp, nfsv4stateid_t *stateidp,
109     u_int32_t flags, struct nfsstate **stpp);
110 static void nfsrv_getowner(struct nfsstatehead *hp, struct nfsstate *new_stp,
111     struct nfsstate **stpp);
112 static int nfsrv_getlockfh(vnode_t vp, u_short flags,
113     struct nfslockfile *new_lfp, fhandle_t *nfhp, NFSPROC_T *p);
114 static int nfsrv_getlockfile(u_short flags, struct nfslockfile **new_lfpp,
115     struct nfslockfile **lfpp, fhandle_t *nfhp, int lockit);
116 static void nfsrv_insertlock(struct nfslock *new_lop,
117     struct nfslock *insert_lop, struct nfsstate *stp, struct nfslockfile *lfp);
118 static void nfsrv_updatelock(struct nfsstate *stp, struct nfslock **new_lopp,
119     struct nfslock **other_lopp, struct nfslockfile *lfp);
120 static int nfsrv_getipnumber(u_char *cp);
121 static int nfsrv_checkrestart(nfsquad_t clientid, u_int32_t flags,
122     nfsv4stateid_t *stateidp, int specialid);
123 static int nfsrv_checkgrace(struct nfsrv_descript *nd, struct nfsclient *clp,
124     u_int32_t flags);
125 static int nfsrv_docallback(struct nfsclient *clp, int procnum,
126     nfsv4stateid_t *stateidp, int trunc, fhandle_t *fhp,
127     struct nfsvattr *nap, nfsattrbit_t *attrbitp, NFSPROC_T *p);
128 static int nfsrv_cbcallargs(struct nfsrv_descript *nd, struct nfsclient *clp,
129     uint32_t callback, int op, const char *optag, struct nfsdsession **sepp);
130 static u_int32_t nfsrv_nextclientindex(void);
131 static u_int32_t nfsrv_nextstateindex(struct nfsclient *clp);
132 static void nfsrv_markstable(struct nfsclient *clp);
133 static int nfsrv_checkstable(struct nfsclient *clp);
134 static int nfsrv_clientconflict(struct nfsclient *clp, int *haslockp, struct
135     vnode *vp, NFSPROC_T *p);
136 static int nfsrv_delegconflict(struct nfsstate *stp, int *haslockp,
137     NFSPROC_T *p, vnode_t vp);
138 static int nfsrv_cleandeleg(vnode_t vp, struct nfslockfile *lfp,
139     struct nfsclient *clp, int *haslockp, NFSPROC_T *p);
140 static int nfsrv_notsamecredname(struct nfsrv_descript *nd,
141     struct nfsclient *clp);
142 static time_t nfsrv_leaseexpiry(void);
143 static void nfsrv_delaydelegtimeout(struct nfsstate *stp);
144 static int nfsrv_checkseqid(struct nfsrv_descript *nd, u_int32_t seqid,
145     struct nfsstate *stp, struct nfsrvcache *op);
146 static int nfsrv_nootherstate(struct nfsstate *stp);
147 static int nfsrv_locallock(vnode_t vp, struct nfslockfile *lfp, int flags,
148     uint64_t first, uint64_t end, struct nfslockconflict *cfp, NFSPROC_T *p);
149 static void nfsrv_localunlock(vnode_t vp, struct nfslockfile *lfp,
150     uint64_t init_first, uint64_t init_end, NFSPROC_T *p);
151 static int nfsrv_dolocal(vnode_t vp, struct nfslockfile *lfp, int flags,
152     int oldflags, uint64_t first, uint64_t end, struct nfslockconflict *cfp,
153     NFSPROC_T *p);
154 static void nfsrv_locallock_rollback(vnode_t vp, struct nfslockfile *lfp,
155     NFSPROC_T *p);
156 static void nfsrv_locallock_commit(struct nfslockfile *lfp, int flags,
157     uint64_t first, uint64_t end);
158 static void nfsrv_locklf(struct nfslockfile *lfp);
159 static void nfsrv_unlocklf(struct nfslockfile *lfp);
160 static struct nfsdsession *nfsrv_findsession(uint8_t *sessionid);
161 static int nfsrv_freesession(struct nfsdsession *sep, uint8_t *sessionid);
162 static int nfsv4_setcbsequence(struct nfsrv_descript *nd, struct nfsclient *clp,
163     int dont_replycache, struct nfsdsession **sepp);
164 static int nfsv4_getcbsession(struct nfsclient *clp, struct nfsdsession **sepp);
165 
166 /*
167  * Scan the client list for a match and either return the current one,
168  * create a new entry or return an error.
169  * If returning a non-error, the clp structure must either be linked into
170  * the client list or free'd.
171  */
172 APPLESTATIC int
nfsrv_setclient(struct nfsrv_descript * nd,struct nfsclient ** new_clpp,nfsquad_t * clientidp,nfsquad_t * confirmp,NFSPROC_T * p)173 nfsrv_setclient(struct nfsrv_descript *nd, struct nfsclient **new_clpp,
174     nfsquad_t *clientidp, nfsquad_t *confirmp, NFSPROC_T *p)
175 {
176           struct nfsclient *clp = NULL, *new_clp = *new_clpp;
177           int i, error = 0;
178           struct nfsstate *stp, *tstp;
179           struct sockaddr_in *sad, *rad;
180           int zapit = 0, gotit, hasstate = 0, igotlock;
181           static u_int64_t confirm_index = 0;
182 
183           /*
184            * Check for state resource limit exceeded.
185            */
186           if (nfsrv_openpluslock > nfsrv_v4statelimit) {
187                     error = NFSERR_RESOURCE;
188                     goto out;
189           }
190 
191           if (nfsrv_issuedelegs == 0 ||
192               ((nd->nd_flag & ND_GSS) != 0 && nfsrv_nogsscallback != 0))
193                     /*
194                      * Don't do callbacks when delegations are disabled or
195                      * for AUTH_GSS unless enabled via nfsrv_nogsscallback.
196                      * If establishing a callback connection is attempted
197                      * when a firewall is blocking the callback path, the
198                      * server may wait too long for the connect attempt to
199                      * succeed during the Open. Some clients, such as Linux,
200                      * may timeout and give up on the Open before the server
201                      * replies. Also, since AUTH_GSS callbacks are not
202                      * yet interoperability tested, they might cause the
203                      * server to crap out, if they get past the Init call to
204                      * the client.
205                      */
206                     new_clp->lc_program = 0;
207 
208           /* Lock out other nfsd threads */
209           NFSLOCKV4ROOTMUTEX();
210           nfsv4_relref(&nfsv4rootfs_lock);
211           do {
212                     igotlock = nfsv4_lock(&nfsv4rootfs_lock, 1, NULL,
213                         NFSV4ROOTLOCKMUTEXPTR, NULL);
214           } while (!igotlock);
215           NFSUNLOCKV4ROOTMUTEX();
216 
217           /*
218            * Search for a match in the client list.
219            */
220           gotit = i = 0;
221           while (i < nfsrv_clienthashsize && !gotit) {
222               LIST_FOREACH(clp, &nfsclienthash[i], lc_hash) {
223                     if (new_clp->lc_idlen == clp->lc_idlen &&
224                         !NFSBCMP(new_clp->lc_id, clp->lc_id, clp->lc_idlen)) {
225                               gotit = 1;
226                               break;
227                     }
228               }
229               if (gotit == 0)
230                     i++;
231           }
232           if (!gotit ||
233               (clp->lc_flags & (LCL_NEEDSCONFIRM | LCL_ADMINREVOKED))) {
234                     if ((nd->nd_flag & ND_NFSV41) != 0 && confirmp->lval[1] != 0) {
235                               /*
236                                * For NFSv4.1, if confirmp->lval[1] is non-zero, the
237                                * client is trying to update a confirmed clientid.
238                                */
239                               NFSLOCKV4ROOTMUTEX();
240                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
241                               NFSUNLOCKV4ROOTMUTEX();
242                               confirmp->lval[1] = 0;
243                               error = NFSERR_NOENT;
244                               goto out;
245                     }
246                     /*
247                      * Get rid of the old one.
248                      */
249                     if (i != nfsrv_clienthashsize) {
250                               LIST_REMOVE(clp, lc_hash);
251                               nfsrv_cleanclient(clp, p);
252                               nfsrv_freedeleglist(&clp->lc_deleg);
253                               nfsrv_freedeleglist(&clp->lc_olddeleg);
254                               zapit = 1;
255                     }
256                     /*
257                      * Add it after assigning a client id to it.
258                      */
259                     new_clp->lc_flags |= LCL_NEEDSCONFIRM;
260                     if ((nd->nd_flag & ND_NFSV41) != 0)
261                               new_clp->lc_confirm.lval[0] = confirmp->lval[0] =
262                                   ++confirm_index;
263                     else
264                               confirmp->qval = new_clp->lc_confirm.qval =
265                                   ++confirm_index;
266                     clientidp->lval[0] = new_clp->lc_clientid.lval[0] =
267                         (u_int32_t)nfsrvboottime;
268                     clientidp->lval[1] = new_clp->lc_clientid.lval[1] =
269                         nfsrv_nextclientindex();
270                     new_clp->lc_stateindex = 0;
271                     new_clp->lc_statemaxindex = 0;
272                     new_clp->lc_cbref = 0;
273                     new_clp->lc_expiry = nfsrv_leaseexpiry();
274                     LIST_INIT(&new_clp->lc_open);
275                     LIST_INIT(&new_clp->lc_deleg);
276                     LIST_INIT(&new_clp->lc_olddeleg);
277                     LIST_INIT(&new_clp->lc_session);
278                     for (i = 0; i < nfsrv_statehashsize; i++)
279                               LIST_INIT(&new_clp->lc_stateid[i]);
280                     LIST_INSERT_HEAD(NFSCLIENTHASH(new_clp->lc_clientid), new_clp,
281                         lc_hash);
282                     nfsstatsv1.srvclients++;
283                     nfsrv_openpluslock++;
284                     nfsrv_clients++;
285                     NFSLOCKV4ROOTMUTEX();
286                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
287                     NFSUNLOCKV4ROOTMUTEX();
288                     if (zapit)
289                               nfsrv_zapclient(clp, p);
290                     *new_clpp = NULL;
291                     goto out;
292           }
293 
294           /*
295            * Now, handle the cases where the id is already issued.
296            */
297           if (nfsrv_notsamecredname(nd, clp)) {
298               /*
299                * Check to see if there is expired state that should go away.
300                */
301               if (clp->lc_expiry < NFSD_MONOSEC &&
302                   (!LIST_EMPTY(&clp->lc_open) || !LIST_EMPTY(&clp->lc_deleg))) {
303                     nfsrv_cleanclient(clp, p);
304                     nfsrv_freedeleglist(&clp->lc_deleg);
305               }
306 
307               /*
308                * If there is outstanding state, then reply NFSERR_CLIDINUSE per
309                * RFC3530 Sec. 8.1.2 last para.
310                */
311               if (!LIST_EMPTY(&clp->lc_deleg)) {
312                     hasstate = 1;
313               } else if (LIST_EMPTY(&clp->lc_open)) {
314                     hasstate = 0;
315               } else {
316                     hasstate = 0;
317                     /* Look for an Open on the OpenOwner */
318                     LIST_FOREACH(stp, &clp->lc_open, ls_list) {
319                         if (!LIST_EMPTY(&stp->ls_open)) {
320                               hasstate = 1;
321                               break;
322                         }
323                     }
324               }
325               if (hasstate) {
326                     /*
327                      * If the uid doesn't match, return NFSERR_CLIDINUSE after
328                      * filling out the correct ipaddr and portnum.
329                      */
330                     sad = NFSSOCKADDR(new_clp->lc_req.nr_nam, struct sockaddr_in *);
331                     rad = NFSSOCKADDR(clp->lc_req.nr_nam, struct sockaddr_in *);
332                     sad->sin_addr.s_addr = rad->sin_addr.s_addr;
333                     sad->sin_port = rad->sin_port;
334                     NFSLOCKV4ROOTMUTEX();
335                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
336                     NFSUNLOCKV4ROOTMUTEX();
337                     error = NFSERR_CLIDINUSE;
338                     goto out;
339               }
340           }
341 
342           if (NFSBCMP(new_clp->lc_verf, clp->lc_verf, NFSX_VERF)) {
343                     /*
344                      * If the verifier has changed, the client has rebooted
345                      * and a new client id is issued. The old state info
346                      * can be thrown away once the SETCLIENTID_CONFIRM occurs.
347                      */
348                     LIST_REMOVE(clp, lc_hash);
349                     new_clp->lc_flags |= LCL_NEEDSCONFIRM;
350                     if ((nd->nd_flag & ND_NFSV41) != 0)
351                               new_clp->lc_confirm.lval[0] = confirmp->lval[0] =
352                                   ++confirm_index;
353                     else
354                               confirmp->qval = new_clp->lc_confirm.qval =
355                                   ++confirm_index;
356                     clientidp->lval[0] = new_clp->lc_clientid.lval[0] =
357                         nfsrvboottime;
358                     clientidp->lval[1] = new_clp->lc_clientid.lval[1] =
359                         nfsrv_nextclientindex();
360                     new_clp->lc_stateindex = 0;
361                     new_clp->lc_statemaxindex = 0;
362                     new_clp->lc_cbref = 0;
363                     new_clp->lc_expiry = nfsrv_leaseexpiry();
364 
365                     /*
366                      * Save the state until confirmed.
367                      */
368                     LIST_NEWHEAD(&new_clp->lc_open, &clp->lc_open, ls_list);
369                     LIST_FOREACH(tstp, &new_clp->lc_open, ls_list)
370                               tstp->ls_clp = new_clp;
371                     LIST_NEWHEAD(&new_clp->lc_deleg, &clp->lc_deleg, ls_list);
372                     LIST_FOREACH(tstp, &new_clp->lc_deleg, ls_list)
373                               tstp->ls_clp = new_clp;
374                     LIST_NEWHEAD(&new_clp->lc_olddeleg, &clp->lc_olddeleg,
375                         ls_list);
376                     LIST_FOREACH(tstp, &new_clp->lc_olddeleg, ls_list)
377                               tstp->ls_clp = new_clp;
378                     for (i = 0; i < nfsrv_statehashsize; i++) {
379                               LIST_NEWHEAD(&new_clp->lc_stateid[i],
380                                   &clp->lc_stateid[i], ls_hash);
381                               LIST_FOREACH(tstp, &new_clp->lc_stateid[i], ls_hash)
382                                         tstp->ls_clp = new_clp;
383                     }
384                     LIST_INSERT_HEAD(NFSCLIENTHASH(new_clp->lc_clientid), new_clp,
385                         lc_hash);
386                     nfsstatsv1.srvclients++;
387                     nfsrv_openpluslock++;
388                     nfsrv_clients++;
389                     NFSLOCKV4ROOTMUTEX();
390                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
391                     NFSUNLOCKV4ROOTMUTEX();
392 
393                     /*
394                      * Must wait until any outstanding callback on the old clp
395                      * completes.
396                      */
397                     NFSLOCKSTATE();
398                     while (clp->lc_cbref) {
399                               clp->lc_flags |= LCL_WAKEUPWANTED;
400                               (void)mtx_sleep(clp, NFSSTATEMUTEXPTR, PZERO - 1,
401                                   "nfsd clp", 10 * hz);
402                     }
403                     NFSUNLOCKSTATE();
404                     nfsrv_zapclient(clp, p);
405                     *new_clpp = NULL;
406                     goto out;
407           }
408 
409           /* For NFSv4.1, mark that we found a confirmed clientid. */
410           if ((nd->nd_flag & ND_NFSV41) != 0) {
411                     clientidp->lval[0] = clp->lc_clientid.lval[0];
412                     clientidp->lval[1] = clp->lc_clientid.lval[1];
413                     confirmp->lval[0] = 0;        /* Ignored by client */
414                     confirmp->lval[1] = 1;
415           } else {
416                     /*
417                      * id and verifier match, so update the net address info
418                      * and get rid of any existing callback authentication
419                      * handle, so a new one will be acquired.
420                      */
421                     LIST_REMOVE(clp, lc_hash);
422                     new_clp->lc_flags |= (LCL_NEEDSCONFIRM | LCL_DONTCLEAN);
423                     new_clp->lc_expiry = nfsrv_leaseexpiry();
424                     confirmp->qval = new_clp->lc_confirm.qval = ++confirm_index;
425                     clientidp->lval[0] = new_clp->lc_clientid.lval[0] =
426                         clp->lc_clientid.lval[0];
427                     clientidp->lval[1] = new_clp->lc_clientid.lval[1] =
428                         clp->lc_clientid.lval[1];
429                     new_clp->lc_delegtime = clp->lc_delegtime;
430                     new_clp->lc_stateindex = clp->lc_stateindex;
431                     new_clp->lc_statemaxindex = clp->lc_statemaxindex;
432                     new_clp->lc_cbref = 0;
433                     LIST_NEWHEAD(&new_clp->lc_open, &clp->lc_open, ls_list);
434                     LIST_FOREACH(tstp, &new_clp->lc_open, ls_list)
435                               tstp->ls_clp = new_clp;
436                     LIST_NEWHEAD(&new_clp->lc_deleg, &clp->lc_deleg, ls_list);
437                     LIST_FOREACH(tstp, &new_clp->lc_deleg, ls_list)
438                               tstp->ls_clp = new_clp;
439                     LIST_NEWHEAD(&new_clp->lc_olddeleg, &clp->lc_olddeleg, ls_list);
440                     LIST_FOREACH(tstp, &new_clp->lc_olddeleg, ls_list)
441                               tstp->ls_clp = new_clp;
442                     for (i = 0; i < nfsrv_statehashsize; i++) {
443                               LIST_NEWHEAD(&new_clp->lc_stateid[i],
444                                   &clp->lc_stateid[i], ls_hash);
445                               LIST_FOREACH(tstp, &new_clp->lc_stateid[i], ls_hash)
446                                         tstp->ls_clp = new_clp;
447                     }
448                     LIST_INSERT_HEAD(NFSCLIENTHASH(new_clp->lc_clientid), new_clp,
449                         lc_hash);
450                     nfsstatsv1.srvclients++;
451                     nfsrv_openpluslock++;
452                     nfsrv_clients++;
453           }
454           NFSLOCKV4ROOTMUTEX();
455           nfsv4_unlock(&nfsv4rootfs_lock, 1);
456           NFSUNLOCKV4ROOTMUTEX();
457 
458           if ((nd->nd_flag & ND_NFSV41) == 0) {
459                     /*
460                      * Must wait until any outstanding callback on the old clp
461                      * completes.
462                      */
463                     NFSLOCKSTATE();
464                     while (clp->lc_cbref) {
465                               clp->lc_flags |= LCL_WAKEUPWANTED;
466                               (void)mtx_sleep(clp, NFSSTATEMUTEXPTR, PZERO - 1,
467                                   "nfsdclp", 10 * hz);
468                     }
469                     NFSUNLOCKSTATE();
470                     nfsrv_zapclient(clp, p);
471                     *new_clpp = NULL;
472           }
473 
474 out:
475           NFSEXITCODE2(error, nd);
476           return (error);
477 }
478 
479 /*
480  * Check to see if the client id exists and optionally confirm it.
481  */
482 APPLESTATIC int
nfsrv_getclient(nfsquad_t clientid,int opflags,struct nfsclient ** clpp,struct nfsdsession * nsep,nfsquad_t confirm,uint32_t cbprogram,struct nfsrv_descript * nd,NFSPROC_T * p)483 nfsrv_getclient(nfsquad_t clientid, int opflags, struct nfsclient **clpp,
484     struct nfsdsession *nsep, nfsquad_t confirm, uint32_t cbprogram,
485     struct nfsrv_descript *nd, NFSPROC_T *p)
486 {
487           struct nfsclient *clp;
488           struct nfsstate *stp;
489           int i;
490           struct nfsclienthashhead *hp;
491           int error = 0, igotlock, doneok;
492           struct nfssessionhash *shp;
493           struct nfsdsession *sep;
494           uint64_t sessid[2];
495           static uint64_t next_sess = 0;
496 
497           if (clpp)
498                     *clpp = NULL;
499           if ((nd == NULL || (nd->nd_flag & ND_NFSV41) == 0 ||
500               opflags != CLOPS_RENEW) && nfsrvboottime != clientid.lval[0]) {
501                     error = NFSERR_STALECLIENTID;
502                     goto out;
503           }
504 
505           /*
506            * If called with opflags == CLOPS_RENEW, the State Lock is
507            * already held. Otherwise, we need to get either that or,
508            * for the case of Confirm, lock out the nfsd threads.
509            */
510           if (opflags & CLOPS_CONFIRM) {
511                     NFSLOCKV4ROOTMUTEX();
512                     nfsv4_relref(&nfsv4rootfs_lock);
513                     do {
514                               igotlock = nfsv4_lock(&nfsv4rootfs_lock, 1, NULL,
515                                   NFSV4ROOTLOCKMUTEXPTR, NULL);
516                     } while (!igotlock);
517                     /*
518                      * Create a new sessionid here, since we need to do it where
519                      * there is a mutex held to serialize update of next_sess.
520                      */
521                     if ((nd->nd_flag & ND_NFSV41) != 0) {
522                               sessid[0] = ++next_sess;
523                               sessid[1] = clientid.qval;
524                     }
525                     NFSUNLOCKV4ROOTMUTEX();
526           } else if (opflags != CLOPS_RENEW) {
527                     NFSLOCKSTATE();
528           }
529 
530           /* For NFSv4.1, the clp is acquired from the associated session. */
531           if (nd != NULL && (nd->nd_flag & ND_NFSV41) != 0 &&
532               opflags == CLOPS_RENEW) {
533                     clp = NULL;
534                     if ((nd->nd_flag & ND_HASSEQUENCE) != 0) {
535                               shp = NFSSESSIONHASH(nd->nd_sessionid);
536                               NFSLOCKSESSION(shp);
537                               sep = nfsrv_findsession(nd->nd_sessionid);
538                               if (sep != NULL)
539                                         clp = sep->sess_clp;
540                               NFSUNLOCKSESSION(shp);
541                     }
542           } else {
543                     hp = NFSCLIENTHASH(clientid);
544                     LIST_FOREACH(clp, hp, lc_hash) {
545                               if (clp->lc_clientid.lval[1] == clientid.lval[1])
546                                         break;
547                     }
548           }
549           if (clp == NULL) {
550                     if (opflags & CLOPS_CONFIRM)
551                               error = NFSERR_STALECLIENTID;
552                     else
553                               error = NFSERR_EXPIRED;
554           } else if (clp->lc_flags & LCL_ADMINREVOKED) {
555                     /*
556                      * If marked admin revoked, just return the error.
557                      */
558                     error = NFSERR_ADMINREVOKED;
559           }
560           if (error) {
561                     if (opflags & CLOPS_CONFIRM) {
562                               NFSLOCKV4ROOTMUTEX();
563                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
564                               NFSUNLOCKV4ROOTMUTEX();
565                     } else if (opflags != CLOPS_RENEW) {
566                               NFSUNLOCKSTATE();
567                     }
568                     goto out;
569           }
570 
571           /*
572            * Perform any operations specified by the opflags.
573            */
574           if (opflags & CLOPS_CONFIRM) {
575                     if (((nd->nd_flag & ND_NFSV41) != 0 &&
576                          clp->lc_confirm.lval[0] != confirm.lval[0]) ||
577                         ((nd->nd_flag & ND_NFSV41) == 0 &&
578                          clp->lc_confirm.qval != confirm.qval))
579                               error = NFSERR_STALECLIENTID;
580                     else if (nfsrv_notsamecredname(nd, clp))
581                               error = NFSERR_CLIDINUSE;
582 
583                     if (!error) {
584                         if ((clp->lc_flags & (LCL_NEEDSCONFIRM | LCL_DONTCLEAN)) ==
585                               LCL_NEEDSCONFIRM) {
586                               /*
587                                * Hang onto the delegations (as old delegations)
588                                * for an Open with CLAIM_DELEGATE_PREV unless in
589                                * grace, but get rid of the rest of the state.
590                                */
591                               nfsrv_cleanclient(clp, p);
592                               nfsrv_freedeleglist(&clp->lc_olddeleg);
593                               if (nfsrv_checkgrace(nd, clp, 0)) {
594                                   /* In grace, so just delete delegations */
595                                   nfsrv_freedeleglist(&clp->lc_deleg);
596                               } else {
597                                   LIST_FOREACH(stp, &clp->lc_deleg, ls_list)
598                                         stp->ls_flags |= NFSLCK_OLDDELEG;
599                                   clp->lc_delegtime = NFSD_MONOSEC +
600                                         nfsrv_lease + NFSRV_LEASEDELTA;
601                                   LIST_NEWHEAD(&clp->lc_olddeleg, &clp->lc_deleg,
602                                         ls_list);
603                               }
604                               if ((nd->nd_flag & ND_NFSV41) != 0)
605                                   clp->lc_program = cbprogram;
606                         }
607                         clp->lc_flags &= ~(LCL_NEEDSCONFIRM | LCL_DONTCLEAN);
608                         if (clp->lc_program)
609                               clp->lc_flags |= LCL_NEEDSCBNULL;
610                         /* For NFSv4.1, link the session onto the client. */
611                         if (nsep != NULL) {
612                               /* Hold a reference on the xprt for a backchannel. */
613                               if ((nsep->sess_crflags & NFSV4CRSESS_CONNBACKCHAN)
614                                   != 0 && clp->lc_req.nr_client == NULL) {
615                                   clp->lc_req.nr_client = (struct __rpc_client *)
616                                         clnt_bck_create(nd->nd_xprt->xp_socket,
617                                         cbprogram, NFSV4_CBVERS);
618                                   if (clp->lc_req.nr_client != NULL) {
619                                         SVC_ACQUIRE(nd->nd_xprt);
620                                         nd->nd_xprt->xp_p2 =
621                                             clp->lc_req.nr_client->cl_private;
622                                         /* Disable idle timeout. */
623                                         nd->nd_xprt->xp_idletimeout = 0;
624                                         nsep->sess_cbsess.nfsess_xprt = nd->nd_xprt;
625                                   } else
626                                         nsep->sess_crflags &= ~NFSV4CRSESS_CONNBACKCHAN;
627                               }
628                               NFSBCOPY(sessid, nsep->sess_sessionid,
629                                   NFSX_V4SESSIONID);
630                               NFSBCOPY(sessid, nsep->sess_cbsess.nfsess_sessionid,
631                                   NFSX_V4SESSIONID);
632                               shp = NFSSESSIONHASH(nsep->sess_sessionid);
633                               NFSLOCKSTATE();
634                               NFSLOCKSESSION(shp);
635                               LIST_INSERT_HEAD(&shp->list, nsep, sess_hash);
636                               LIST_INSERT_HEAD(&clp->lc_session, nsep, sess_list);
637                               nsep->sess_clp = clp;
638                               NFSUNLOCKSESSION(shp);
639                               NFSUNLOCKSTATE();
640                         }
641                     }
642           } else if (clp->lc_flags & LCL_NEEDSCONFIRM) {
643                     error = NFSERR_EXPIRED;
644           }
645 
646           /*
647            * If called by the Renew Op, we must check the principal.
648            */
649           if (!error && (opflags & CLOPS_RENEWOP)) {
650               if (nfsrv_notsamecredname(nd, clp)) {
651                     doneok = 0;
652                     for (i = 0; i < nfsrv_statehashsize && doneok == 0; i++) {
653                         LIST_FOREACH(stp, &clp->lc_stateid[i], ls_hash) {
654                               if ((stp->ls_flags & NFSLCK_OPEN) &&
655                                   stp->ls_uid == nd->nd_cred->cr_uid) {
656                                         doneok = 1;
657                                         break;
658                               }
659                         }
660                     }
661                     if (!doneok)
662                               error = NFSERR_ACCES;
663               }
664               if (!error && (clp->lc_flags & LCL_CBDOWN))
665                     error = NFSERR_CBPATHDOWN;
666           }
667           if ((!error || error == NFSERR_CBPATHDOWN) &&
668                (opflags & CLOPS_RENEW)) {
669                     clp->lc_expiry = nfsrv_leaseexpiry();
670           }
671           if (opflags & CLOPS_CONFIRM) {
672                     NFSLOCKV4ROOTMUTEX();
673                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
674                     NFSUNLOCKV4ROOTMUTEX();
675           } else if (opflags != CLOPS_RENEW) {
676                     NFSUNLOCKSTATE();
677           }
678           if (clpp)
679                     *clpp = clp;
680 
681 out:
682           NFSEXITCODE2(error, nd);
683           return (error);
684 }
685 
686 /*
687  * Perform the NFSv4.1 destroy clientid.
688  */
689 int
nfsrv_destroyclient(nfsquad_t clientid,NFSPROC_T * p)690 nfsrv_destroyclient(nfsquad_t clientid, NFSPROC_T *p)
691 {
692           struct nfsclient *clp;
693           struct nfsclienthashhead *hp;
694           int error = 0, i, igotlock;
695 
696           if (nfsrvboottime != clientid.lval[0]) {
697                     error = NFSERR_STALECLIENTID;
698                     goto out;
699           }
700 
701           /* Lock out other nfsd threads */
702           NFSLOCKV4ROOTMUTEX();
703           nfsv4_relref(&nfsv4rootfs_lock);
704           do {
705                     igotlock = nfsv4_lock(&nfsv4rootfs_lock, 1, NULL,
706                         NFSV4ROOTLOCKMUTEXPTR, NULL);
707           } while (igotlock == 0);
708           NFSUNLOCKV4ROOTMUTEX();
709 
710           hp = NFSCLIENTHASH(clientid);
711           LIST_FOREACH(clp, hp, lc_hash) {
712                     if (clp->lc_clientid.lval[1] == clientid.lval[1])
713                               break;
714           }
715           if (clp == NULL) {
716                     NFSLOCKV4ROOTMUTEX();
717                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
718                     NFSUNLOCKV4ROOTMUTEX();
719                     /* Just return ok, since it is gone. */
720                     goto out;
721           }
722 
723           /* Scan for state on the clientid. */
724           for (i = 0; i < nfsrv_statehashsize; i++)
725                     if (!LIST_EMPTY(&clp->lc_stateid[i])) {
726                               NFSLOCKV4ROOTMUTEX();
727                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
728                               NFSUNLOCKV4ROOTMUTEX();
729                               error = NFSERR_CLIENTIDBUSY;
730                               goto out;
731                     }
732           if (!LIST_EMPTY(&clp->lc_session) || !LIST_EMPTY(&clp->lc_deleg)) {
733                     NFSLOCKV4ROOTMUTEX();
734                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
735                     NFSUNLOCKV4ROOTMUTEX();
736                     error = NFSERR_CLIENTIDBUSY;
737                     goto out;
738           }
739 
740           /* Destroy the clientid and return ok. */
741           nfsrv_cleanclient(clp, p);
742           nfsrv_freedeleglist(&clp->lc_deleg);
743           nfsrv_freedeleglist(&clp->lc_olddeleg);
744           LIST_REMOVE(clp, lc_hash);
745           NFSLOCKV4ROOTMUTEX();
746           nfsv4_unlock(&nfsv4rootfs_lock, 1);
747           NFSUNLOCKV4ROOTMUTEX();
748           nfsrv_zapclient(clp, p);
749 out:
750           NFSEXITCODE2(error, nd);
751           return (error);
752 }
753 
754 /*
755  * Called from the new nfssvc syscall to admin revoke a clientid.
756  * Returns 0 for success, error otherwise.
757  */
758 APPLESTATIC int
nfsrv_adminrevoke(struct nfsd_clid * revokep,NFSPROC_T * p)759 nfsrv_adminrevoke(struct nfsd_clid *revokep, NFSPROC_T *p)
760 {
761           struct nfsclient *clp = NULL;
762           int i, error = 0;
763           int gotit, igotlock;
764 
765           /*
766            * First, lock out the nfsd so that state won't change while the
767            * revocation record is being written to the stable storage restart
768            * file.
769            */
770           NFSLOCKV4ROOTMUTEX();
771           do {
772                     igotlock = nfsv4_lock(&nfsv4rootfs_lock, 1, NULL,
773                         NFSV4ROOTLOCKMUTEXPTR, NULL);
774           } while (!igotlock);
775           NFSUNLOCKV4ROOTMUTEX();
776 
777           /*
778            * Search for a match in the client list.
779            */
780           gotit = i = 0;
781           while (i < nfsrv_clienthashsize && !gotit) {
782               LIST_FOREACH(clp, &nfsclienthash[i], lc_hash) {
783                     if (revokep->nclid_idlen == clp->lc_idlen &&
784                         !NFSBCMP(revokep->nclid_id, clp->lc_id, clp->lc_idlen)) {
785                               gotit = 1;
786                               break;
787                     }
788               }
789               i++;
790           }
791           if (!gotit) {
792                     NFSLOCKV4ROOTMUTEX();
793                     nfsv4_unlock(&nfsv4rootfs_lock, 0);
794                     NFSUNLOCKV4ROOTMUTEX();
795                     error = EPERM;
796                     goto out;
797           }
798 
799           /*
800            * Now, write out the revocation record
801            */
802           nfsrv_writestable(clp->lc_id, clp->lc_idlen, NFSNST_REVOKE, p);
803           nfsrv_backupstable();
804 
805           /*
806            * and clear out the state, marking the clientid revoked.
807            */
808           clp->lc_flags &= ~LCL_CALLBACKSON;
809           clp->lc_flags |= LCL_ADMINREVOKED;
810           nfsrv_cleanclient(clp, p);
811           nfsrv_freedeleglist(&clp->lc_deleg);
812           nfsrv_freedeleglist(&clp->lc_olddeleg);
813           NFSLOCKV4ROOTMUTEX();
814           nfsv4_unlock(&nfsv4rootfs_lock, 0);
815           NFSUNLOCKV4ROOTMUTEX();
816 
817 out:
818           NFSEXITCODE(error);
819           return (error);
820 }
821 
822 /*
823  * Dump out stats for all clients. Called from nfssvc(2), that is used
824  * nfsstatsv1.
825  */
826 APPLESTATIC void
nfsrv_dumpclients(struct nfsd_dumpclients * dumpp,int maxcnt)827 nfsrv_dumpclients(struct nfsd_dumpclients *dumpp, int maxcnt)
828 {
829           struct nfsclient *clp;
830           int i = 0, cnt = 0;
831 
832           /*
833            * First, get a reference on the nfsv4rootfs_lock so that an
834            * exclusive lock cannot be acquired while dumping the clients.
835            */
836           NFSLOCKV4ROOTMUTEX();
837           nfsv4_getref(&nfsv4rootfs_lock, NULL, NFSV4ROOTLOCKMUTEXPTR, NULL);
838           NFSUNLOCKV4ROOTMUTEX();
839           NFSLOCKSTATE();
840           /*
841            * Rattle through the client lists until done.
842            */
843           while (i < nfsrv_clienthashsize && cnt < maxcnt) {
844               clp = LIST_FIRST(&nfsclienthash[i]);
845               while (clp != NULL && cnt < maxcnt) {
846                     nfsrv_dumpaclient(clp, &dumpp[cnt]);
847                     cnt++;
848                     clp = LIST_NEXT(clp, lc_hash);
849               }
850               i++;
851           }
852           if (cnt < maxcnt)
853               dumpp[cnt].ndcl_clid.nclid_idlen = 0;
854           NFSUNLOCKSTATE();
855           NFSLOCKV4ROOTMUTEX();
856           nfsv4_relref(&nfsv4rootfs_lock);
857           NFSUNLOCKV4ROOTMUTEX();
858 }
859 
860 /*
861  * Dump stats for a client. Must be called with the NFSSTATELOCK and spl'd.
862  */
863 static void
nfsrv_dumpaclient(struct nfsclient * clp,struct nfsd_dumpclients * dumpp)864 nfsrv_dumpaclient(struct nfsclient *clp, struct nfsd_dumpclients *dumpp)
865 {
866           struct nfsstate *stp, *openstp, *lckownstp;
867           struct nfslock *lop;
868           struct sockaddr *sad;
869           struct sockaddr_in *rad;
870           struct sockaddr_in6 *rad6;
871 
872           dumpp->ndcl_nopenowners = dumpp->ndcl_nlockowners = 0;
873           dumpp->ndcl_nopens = dumpp->ndcl_nlocks = 0;
874           dumpp->ndcl_ndelegs = dumpp->ndcl_nolddelegs = 0;
875           dumpp->ndcl_flags = clp->lc_flags;
876           dumpp->ndcl_clid.nclid_idlen = clp->lc_idlen;
877           NFSBCOPY(clp->lc_id, dumpp->ndcl_clid.nclid_id, clp->lc_idlen);
878           sad = NFSSOCKADDR(clp->lc_req.nr_nam, struct sockaddr *);
879           dumpp->ndcl_addrfam = sad->sa_family;
880           if (sad->sa_family == AF_INET) {
881                     rad = (struct sockaddr_in *)sad;
882                     dumpp->ndcl_cbaddr.sin_addr = rad->sin_addr;
883           } else {
884                     rad6 = (struct sockaddr_in6 *)sad;
885                     dumpp->ndcl_cbaddr.sin6_addr = rad6->sin6_addr;
886           }
887 
888           /*
889            * Now, scan the state lists and total up the opens and locks.
890            */
891           LIST_FOREACH(stp, &clp->lc_open, ls_list) {
892               dumpp->ndcl_nopenowners++;
893               LIST_FOREACH(openstp, &stp->ls_open, ls_list) {
894                     dumpp->ndcl_nopens++;
895                     LIST_FOREACH(lckownstp, &openstp->ls_open, ls_list) {
896                         dumpp->ndcl_nlockowners++;
897                         LIST_FOREACH(lop, &lckownstp->ls_lock, lo_lckowner) {
898                               dumpp->ndcl_nlocks++;
899                         }
900                     }
901               }
902           }
903 
904           /*
905            * and the delegation lists.
906            */
907           LIST_FOREACH(stp, &clp->lc_deleg, ls_list) {
908               dumpp->ndcl_ndelegs++;
909           }
910           LIST_FOREACH(stp, &clp->lc_olddeleg, ls_list) {
911               dumpp->ndcl_nolddelegs++;
912           }
913 }
914 
915 /*
916  * Dump out lock stats for a file.
917  */
918 APPLESTATIC void
nfsrv_dumplocks(vnode_t vp,struct nfsd_dumplocks * ldumpp,int maxcnt,NFSPROC_T * p)919 nfsrv_dumplocks(vnode_t vp, struct nfsd_dumplocks *ldumpp, int maxcnt,
920     NFSPROC_T *p)
921 {
922           struct nfsstate *stp;
923           struct nfslock *lop;
924           int cnt = 0;
925           struct nfslockfile *lfp;
926           struct sockaddr *sad;
927           struct sockaddr_in *rad;
928           struct sockaddr_in6 *rad6;
929           int ret;
930           fhandle_t nfh;
931 
932           ret = nfsrv_getlockfh(vp, 0, NULL, &nfh, p);
933           /*
934            * First, get a reference on the nfsv4rootfs_lock so that an
935            * exclusive lock on it cannot be acquired while dumping the locks.
936            */
937           NFSLOCKV4ROOTMUTEX();
938           nfsv4_getref(&nfsv4rootfs_lock, NULL, NFSV4ROOTLOCKMUTEXPTR, NULL);
939           NFSUNLOCKV4ROOTMUTEX();
940           NFSLOCKSTATE();
941           if (!ret)
942                     ret = nfsrv_getlockfile(0, NULL, &lfp, &nfh, 0);
943           if (ret) {
944                     ldumpp[0].ndlck_clid.nclid_idlen = 0;
945                     NFSUNLOCKSTATE();
946                     NFSLOCKV4ROOTMUTEX();
947                     nfsv4_relref(&nfsv4rootfs_lock);
948                     NFSUNLOCKV4ROOTMUTEX();
949                     return;
950           }
951 
952           /*
953            * For each open share on file, dump it out.
954            */
955           stp = LIST_FIRST(&lfp->lf_open);
956           while (stp != NULL && cnt < maxcnt) {
957                     ldumpp[cnt].ndlck_flags = stp->ls_flags;
958                     ldumpp[cnt].ndlck_stateid.seqid = stp->ls_stateid.seqid;
959                     ldumpp[cnt].ndlck_stateid.other[0] = stp->ls_stateid.other[0];
960                     ldumpp[cnt].ndlck_stateid.other[1] = stp->ls_stateid.other[1];
961                     ldumpp[cnt].ndlck_stateid.other[2] = stp->ls_stateid.other[2];
962                     ldumpp[cnt].ndlck_owner.nclid_idlen =
963                         stp->ls_openowner->ls_ownerlen;
964                     NFSBCOPY(stp->ls_openowner->ls_owner,
965                         ldumpp[cnt].ndlck_owner.nclid_id,
966                         stp->ls_openowner->ls_ownerlen);
967                     ldumpp[cnt].ndlck_clid.nclid_idlen = stp->ls_clp->lc_idlen;
968                     NFSBCOPY(stp->ls_clp->lc_id, ldumpp[cnt].ndlck_clid.nclid_id,
969                         stp->ls_clp->lc_idlen);
970                     sad=NFSSOCKADDR(stp->ls_clp->lc_req.nr_nam, struct sockaddr *);
971                     ldumpp[cnt].ndlck_addrfam = sad->sa_family;
972                     if (sad->sa_family == AF_INET) {
973                               rad = (struct sockaddr_in *)sad;
974                               ldumpp[cnt].ndlck_cbaddr.sin_addr = rad->sin_addr;
975                     } else {
976                               rad6 = (struct sockaddr_in6 *)sad;
977                               ldumpp[cnt].ndlck_cbaddr.sin6_addr = rad6->sin6_addr;
978                     }
979                     stp = LIST_NEXT(stp, ls_file);
980                     cnt++;
981           }
982 
983           /*
984            * and all locks.
985            */
986           lop = LIST_FIRST(&lfp->lf_lock);
987           while (lop != NULL && cnt < maxcnt) {
988                     stp = lop->lo_stp;
989                     ldumpp[cnt].ndlck_flags = lop->lo_flags;
990                     ldumpp[cnt].ndlck_first = lop->lo_first;
991                     ldumpp[cnt].ndlck_end = lop->lo_end;
992                     ldumpp[cnt].ndlck_stateid.seqid = stp->ls_stateid.seqid;
993                     ldumpp[cnt].ndlck_stateid.other[0] = stp->ls_stateid.other[0];
994                     ldumpp[cnt].ndlck_stateid.other[1] = stp->ls_stateid.other[1];
995                     ldumpp[cnt].ndlck_stateid.other[2] = stp->ls_stateid.other[2];
996                     ldumpp[cnt].ndlck_owner.nclid_idlen = stp->ls_ownerlen;
997                     NFSBCOPY(stp->ls_owner, ldumpp[cnt].ndlck_owner.nclid_id,
998                         stp->ls_ownerlen);
999                     ldumpp[cnt].ndlck_clid.nclid_idlen = stp->ls_clp->lc_idlen;
1000                     NFSBCOPY(stp->ls_clp->lc_id, ldumpp[cnt].ndlck_clid.nclid_id,
1001                         stp->ls_clp->lc_idlen);
1002                     sad=NFSSOCKADDR(stp->ls_clp->lc_req.nr_nam, struct sockaddr *);
1003                     ldumpp[cnt].ndlck_addrfam = sad->sa_family;
1004                     if (sad->sa_family == AF_INET) {
1005                               rad = (struct sockaddr_in *)sad;
1006                               ldumpp[cnt].ndlck_cbaddr.sin_addr = rad->sin_addr;
1007                     } else {
1008                               rad6 = (struct sockaddr_in6 *)sad;
1009                               ldumpp[cnt].ndlck_cbaddr.sin6_addr = rad6->sin6_addr;
1010                     }
1011                     lop = LIST_NEXT(lop, lo_lckfile);
1012                     cnt++;
1013           }
1014 
1015           /*
1016            * and the delegations.
1017            */
1018           stp = LIST_FIRST(&lfp->lf_deleg);
1019           while (stp != NULL && cnt < maxcnt) {
1020                     ldumpp[cnt].ndlck_flags = stp->ls_flags;
1021                     ldumpp[cnt].ndlck_stateid.seqid = stp->ls_stateid.seqid;
1022                     ldumpp[cnt].ndlck_stateid.other[0] = stp->ls_stateid.other[0];
1023                     ldumpp[cnt].ndlck_stateid.other[1] = stp->ls_stateid.other[1];
1024                     ldumpp[cnt].ndlck_stateid.other[2] = stp->ls_stateid.other[2];
1025                     ldumpp[cnt].ndlck_owner.nclid_idlen = 0;
1026                     ldumpp[cnt].ndlck_clid.nclid_idlen = stp->ls_clp->lc_idlen;
1027                     NFSBCOPY(stp->ls_clp->lc_id, ldumpp[cnt].ndlck_clid.nclid_id,
1028                         stp->ls_clp->lc_idlen);
1029                     sad=NFSSOCKADDR(stp->ls_clp->lc_req.nr_nam, struct sockaddr *);
1030                     ldumpp[cnt].ndlck_addrfam = sad->sa_family;
1031                     if (sad->sa_family == AF_INET) {
1032                               rad = (struct sockaddr_in *)sad;
1033                               ldumpp[cnt].ndlck_cbaddr.sin_addr = rad->sin_addr;
1034                     } else {
1035                               rad6 = (struct sockaddr_in6 *)sad;
1036                               ldumpp[cnt].ndlck_cbaddr.sin6_addr = rad6->sin6_addr;
1037                     }
1038                     stp = LIST_NEXT(stp, ls_file);
1039                     cnt++;
1040           }
1041 
1042           /*
1043            * If list isn't full, mark end of list by setting the client name
1044            * to zero length.
1045            */
1046           if (cnt < maxcnt)
1047                     ldumpp[cnt].ndlck_clid.nclid_idlen = 0;
1048           NFSUNLOCKSTATE();
1049           NFSLOCKV4ROOTMUTEX();
1050           nfsv4_relref(&nfsv4rootfs_lock);
1051           NFSUNLOCKV4ROOTMUTEX();
1052 }
1053 
1054 /*
1055  * Server timer routine. It can scan any linked list, so long
1056  * as it holds the spin/mutex lock and there is no exclusive lock on
1057  * nfsv4rootfs_lock.
1058  * (For OpenBSD, a kthread is ok. For FreeBSD, I think it is ok
1059  *  to do this from a callout, since the spin locks work. For
1060  *  Darwin, I'm not sure what will work correctly yet.)
1061  * Should be called once per second.
1062  */
1063 APPLESTATIC void
nfsrv_servertimer(void)1064 nfsrv_servertimer(void)
1065 {
1066           struct nfsclient *clp, *nclp;
1067           struct nfsstate *stp, *nstp;
1068           int got_ref, i;
1069 
1070           /*
1071            * Make sure nfsboottime is set. This is used by V3 as well
1072            * as V4. Note that nfsboottime is not nfsrvboottime, which is
1073            * only used by the V4 server for leases.
1074            */
1075           if (nfsboottime.tv_sec == 0)
1076                     NFSSETBOOTTIME(nfsboottime);
1077 
1078           /*
1079            * If server hasn't started yet, just return.
1080            */
1081           NFSLOCKSTATE();
1082           if (nfsrv_stablefirst.nsf_eograce == 0) {
1083                     NFSUNLOCKSTATE();
1084                     return;
1085           }
1086           if (!(nfsrv_stablefirst.nsf_flags & NFSNSF_UPDATEDONE)) {
1087                     if (!(nfsrv_stablefirst.nsf_flags & NFSNSF_GRACEOVER) &&
1088                         NFSD_MONOSEC > nfsrv_stablefirst.nsf_eograce)
1089                               nfsrv_stablefirst.nsf_flags |=
1090                                   (NFSNSF_GRACEOVER | NFSNSF_NEEDLOCK);
1091                     NFSUNLOCKSTATE();
1092                     return;
1093           }
1094 
1095           /*
1096            * Try and get a reference count on the nfsv4rootfs_lock so that
1097            * no nfsd thread can acquire an exclusive lock on it before this
1098            * call is done. If it is already exclusively locked, just return.
1099            */
1100           NFSLOCKV4ROOTMUTEX();
1101           got_ref = nfsv4_getref_nonblock(&nfsv4rootfs_lock);
1102           NFSUNLOCKV4ROOTMUTEX();
1103           if (got_ref == 0) {
1104                     NFSUNLOCKSTATE();
1105                     return;
1106           }
1107 
1108           /*
1109            * For each client...
1110            */
1111           for (i = 0; i < nfsrv_clienthashsize; i++) {
1112               clp = LIST_FIRST(&nfsclienthash[i]);
1113               while (clp != NULL) {
1114                     nclp = LIST_NEXT(clp, lc_hash);
1115                     if (!(clp->lc_flags & LCL_EXPIREIT)) {
1116                         if (((clp->lc_expiry + NFSRV_STALELEASE) < NFSD_MONOSEC
1117                                && ((LIST_EMPTY(&clp->lc_deleg)
1118                                     && LIST_EMPTY(&clp->lc_open)) ||
1119                                    nfsrv_clients > nfsrv_clienthighwater)) ||
1120                               (clp->lc_expiry + NFSRV_MOULDYLEASE) < NFSD_MONOSEC ||
1121                               (clp->lc_expiry < NFSD_MONOSEC &&
1122                                (nfsrv_openpluslock * 10 / 9) > nfsrv_v4statelimit)) {
1123                               /*
1124                                * Lease has expired several nfsrv_lease times ago:
1125                                * PLUS
1126                                *    - no state is associated with it
1127                                *    OR
1128                                *    - above high water mark for number of clients
1129                                *      (nfsrv_clienthighwater should be large enough
1130                                *       that this only occurs when clients fail to
1131                                *       use the same nfs_client_id4.id. Maybe somewhat
1132                                *       higher that the maximum number of clients that
1133                                *       will mount this server?)
1134                                * OR
1135                                * Lease has expired a very long time ago
1136                                * OR
1137                                * Lease has expired PLUS the number of opens + locks
1138                                * has exceeded 90% of capacity
1139                                *
1140                                * --> Mark for expiry. The actual expiry will be done
1141                                *     by an nfsd sometime soon.
1142                                */
1143                               clp->lc_flags |= LCL_EXPIREIT;
1144                               nfsrv_stablefirst.nsf_flags |=
1145                                   (NFSNSF_NEEDLOCK | NFSNSF_EXPIREDCLIENT);
1146                         } else {
1147                               /*
1148                                * If there are no opens, increment no open tick cnt
1149                                * If time exceeds NFSNOOPEN, mark it to be thrown away
1150                                * otherwise, if there is an open, reset no open time
1151                                * Hopefully, this will avoid excessive re-creation
1152                                * of open owners and subsequent open confirms.
1153                                */
1154                               stp = LIST_FIRST(&clp->lc_open);
1155                               while (stp != NULL) {
1156                                         nstp = LIST_NEXT(stp, ls_list);
1157                                         if (LIST_EMPTY(&stp->ls_open)) {
1158                                                   stp->ls_noopens++;
1159                                                   if (stp->ls_noopens > NFSNOOPEN ||
1160                                                       (nfsrv_openpluslock * 2) >
1161                                                       nfsrv_v4statelimit)
1162                                                             nfsrv_stablefirst.nsf_flags |=
1163                                                                       NFSNSF_NOOPENS;
1164                                         } else {
1165                                                   stp->ls_noopens = 0;
1166                                         }
1167                                         stp = nstp;
1168                               }
1169                         }
1170                     }
1171                     clp = nclp;
1172               }
1173           }
1174           NFSUNLOCKSTATE();
1175           NFSLOCKV4ROOTMUTEX();
1176           nfsv4_relref(&nfsv4rootfs_lock);
1177           NFSUNLOCKV4ROOTMUTEX();
1178 }
1179 
1180 /*
1181  * The following set of functions free up the various data structures.
1182  */
1183 /*
1184  * Clear out all open/lock state related to this nfsclient.
1185  * Caller must hold an exclusive lock on nfsv4rootfs_lock, so that
1186  * there are no other active nfsd threads.
1187  */
1188 APPLESTATIC void
nfsrv_cleanclient(struct nfsclient * clp,NFSPROC_T * p)1189 nfsrv_cleanclient(struct nfsclient *clp, NFSPROC_T *p)
1190 {
1191           struct nfsstate *stp, *nstp;
1192           struct nfsdsession *sep, *nsep;
1193 
1194           LIST_FOREACH_SAFE(stp, &clp->lc_open, ls_list, nstp)
1195                     nfsrv_freeopenowner(stp, 1, p);
1196           if ((clp->lc_flags & LCL_ADMINREVOKED) == 0)
1197                     LIST_FOREACH_SAFE(sep, &clp->lc_session, sess_list, nsep)
1198                               (void)nfsrv_freesession(sep, NULL);
1199 }
1200 
1201 /*
1202  * Free a client that has been cleaned. It should also already have been
1203  * removed from the lists.
1204  * (Just to be safe w.r.t. newnfs_disconnect(), call this function when
1205  *  softclock interrupts are enabled.)
1206  */
1207 APPLESTATIC void
nfsrv_zapclient(struct nfsclient * clp,NFSPROC_T * p)1208 nfsrv_zapclient(struct nfsclient *clp, NFSPROC_T *p)
1209 {
1210 
1211 #ifdef notyet
1212           if ((clp->lc_flags & (LCL_GSS | LCL_CALLBACKSON)) ==
1213                (LCL_GSS | LCL_CALLBACKSON) &&
1214               (clp->lc_hand.nfsh_flag & NFSG_COMPLETE) &&
1215               clp->lc_handlelen > 0) {
1216                     clp->lc_hand.nfsh_flag &= ~NFSG_COMPLETE;
1217                     clp->lc_hand.nfsh_flag |= NFSG_DESTROYED;
1218                     (void) nfsrv_docallback(clp, NFSV4PROC_CBNULL,
1219                               NULL, 0, NULL, NULL, NULL, p);
1220           }
1221 #endif
1222           newnfs_disconnect(&clp->lc_req);
1223           NFSSOCKADDRFREE(clp->lc_req.nr_nam);
1224           NFSFREEMUTEX(&clp->lc_req.nr_mtx);
1225           free(clp->lc_stateid, M_NFSDCLIENT);
1226           free(clp, M_NFSDCLIENT);
1227           NFSLOCKSTATE();
1228           nfsstatsv1.srvclients--;
1229           nfsrv_openpluslock--;
1230           nfsrv_clients--;
1231           NFSUNLOCKSTATE();
1232 }
1233 
1234 /*
1235  * Free a list of delegation state structures.
1236  * (This function will also free all nfslockfile structures that no
1237  *  longer have associated state.)
1238  */
1239 APPLESTATIC void
nfsrv_freedeleglist(struct nfsstatehead * sthp)1240 nfsrv_freedeleglist(struct nfsstatehead *sthp)
1241 {
1242           struct nfsstate *stp, *nstp;
1243 
1244           LIST_FOREACH_SAFE(stp, sthp, ls_list, nstp) {
1245                     nfsrv_freedeleg(stp);
1246           }
1247           LIST_INIT(sthp);
1248 }
1249 
1250 /*
1251  * Free up a delegation.
1252  */
1253 static void
nfsrv_freedeleg(struct nfsstate * stp)1254 nfsrv_freedeleg(struct nfsstate *stp)
1255 {
1256           struct nfslockfile *lfp;
1257 
1258           LIST_REMOVE(stp, ls_hash);
1259           LIST_REMOVE(stp, ls_list);
1260           LIST_REMOVE(stp, ls_file);
1261           lfp = stp->ls_lfp;
1262           if (LIST_EMPTY(&lfp->lf_open) &&
1263               LIST_EMPTY(&lfp->lf_lock) && LIST_EMPTY(&lfp->lf_deleg) &&
1264               LIST_EMPTY(&lfp->lf_locallock) && LIST_EMPTY(&lfp->lf_rollback) &&
1265               lfp->lf_usecount == 0 &&
1266               nfsv4_testlock(&lfp->lf_locallock_lck) == 0)
1267                     nfsrv_freenfslockfile(lfp);
1268           FREE((caddr_t)stp, M_NFSDSTATE);
1269           nfsstatsv1.srvdelegates--;
1270           nfsrv_openpluslock--;
1271           nfsrv_delegatecnt--;
1272 }
1273 
1274 /*
1275  * This function frees an open owner and all associated opens.
1276  */
1277 static void
nfsrv_freeopenowner(struct nfsstate * stp,int cansleep,NFSPROC_T * p)1278 nfsrv_freeopenowner(struct nfsstate *stp, int cansleep, NFSPROC_T *p)
1279 {
1280           struct nfsstate *nstp, *tstp;
1281 
1282           LIST_REMOVE(stp, ls_list);
1283           /*
1284            * Now, free all associated opens.
1285            */
1286           nstp = LIST_FIRST(&stp->ls_open);
1287           while (nstp != NULL) {
1288                     tstp = nstp;
1289                     nstp = LIST_NEXT(nstp, ls_list);
1290                     (void) nfsrv_freeopen(tstp, NULL, cansleep, p);
1291           }
1292           if (stp->ls_op)
1293                     nfsrvd_derefcache(stp->ls_op);
1294           FREE((caddr_t)stp, M_NFSDSTATE);
1295           nfsstatsv1.srvopenowners--;
1296           nfsrv_openpluslock--;
1297 }
1298 
1299 /*
1300  * This function frees an open (nfsstate open structure) with all associated
1301  * lock_owners and locks. It also frees the nfslockfile structure iff there
1302  * are no other opens on the file.
1303  * Returns 1 if it free'd the nfslockfile, 0 otherwise.
1304  */
1305 static int
nfsrv_freeopen(struct nfsstate * stp,vnode_t vp,int cansleep,NFSPROC_T * p)1306 nfsrv_freeopen(struct nfsstate *stp, vnode_t vp, int cansleep, NFSPROC_T *p)
1307 {
1308           struct nfsstate *nstp, *tstp;
1309           struct nfslockfile *lfp;
1310           int ret;
1311 
1312           LIST_REMOVE(stp, ls_hash);
1313           LIST_REMOVE(stp, ls_list);
1314           LIST_REMOVE(stp, ls_file);
1315 
1316           lfp = stp->ls_lfp;
1317           /*
1318            * Now, free all lockowners associated with this open.
1319            */
1320           LIST_FOREACH_SAFE(tstp, &stp->ls_open, ls_list, nstp)
1321                     nfsrv_freelockowner(tstp, vp, cansleep, p);
1322 
1323           /*
1324            * The nfslockfile is freed here if there are no locks
1325            * associated with the open.
1326            * If there are locks associated with the open, the
1327            * nfslockfile structure can be freed via nfsrv_freelockowner().
1328            * Acquire the state mutex to avoid races with calls to
1329            * nfsrv_getlockfile().
1330            */
1331           if (cansleep != 0)
1332                     NFSLOCKSTATE();
1333           if (lfp != NULL && LIST_EMPTY(&lfp->lf_open) &&
1334               LIST_EMPTY(&lfp->lf_deleg) && LIST_EMPTY(&lfp->lf_lock) &&
1335               LIST_EMPTY(&lfp->lf_locallock) && LIST_EMPTY(&lfp->lf_rollback) &&
1336               lfp->lf_usecount == 0 &&
1337               (cansleep != 0 || nfsv4_testlock(&lfp->lf_locallock_lck) == 0)) {
1338                     nfsrv_freenfslockfile(lfp);
1339                     ret = 1;
1340           } else
1341                     ret = 0;
1342           if (cansleep != 0)
1343                     NFSUNLOCKSTATE();
1344           FREE((caddr_t)stp, M_NFSDSTATE);
1345           nfsstatsv1.srvopens--;
1346           nfsrv_openpluslock--;
1347           return (ret);
1348 }
1349 
1350 /*
1351  * Frees a lockowner and all associated locks.
1352  */
1353 static void
nfsrv_freelockowner(struct nfsstate * stp,vnode_t vp,int cansleep,NFSPROC_T * p)1354 nfsrv_freelockowner(struct nfsstate *stp, vnode_t vp, int cansleep,
1355     NFSPROC_T *p)
1356 {
1357 
1358           LIST_REMOVE(stp, ls_hash);
1359           LIST_REMOVE(stp, ls_list);
1360           nfsrv_freeallnfslocks(stp, vp, cansleep, p);
1361           if (stp->ls_op)
1362                     nfsrvd_derefcache(stp->ls_op);
1363           FREE((caddr_t)stp, M_NFSDSTATE);
1364           nfsstatsv1.srvlockowners--;
1365           nfsrv_openpluslock--;
1366 }
1367 
1368 /*
1369  * Free all the nfs locks on a lockowner.
1370  */
1371 static void
nfsrv_freeallnfslocks(struct nfsstate * stp,vnode_t vp,int cansleep,NFSPROC_T * p)1372 nfsrv_freeallnfslocks(struct nfsstate *stp, vnode_t vp, int cansleep,
1373     NFSPROC_T *p)
1374 {
1375           struct nfslock *lop, *nlop;
1376           struct nfsrollback *rlp, *nrlp;
1377           struct nfslockfile *lfp = NULL;
1378           int gottvp = 0;
1379           vnode_t tvp = NULL;
1380           uint64_t first, end;
1381 
1382           if (vp != NULL)
1383                     ASSERT_VOP_UNLOCKED(vp, "nfsrv_freeallnfslocks: vnode locked");
1384           lop = LIST_FIRST(&stp->ls_lock);
1385           while (lop != NULL) {
1386                     nlop = LIST_NEXT(lop, lo_lckowner);
1387                     /*
1388                      * Since all locks should be for the same file, lfp should
1389                      * not change.
1390                      */
1391                     if (lfp == NULL)
1392                               lfp = lop->lo_lfp;
1393                     else if (lfp != lop->lo_lfp)
1394                               panic("allnfslocks");
1395                     /*
1396                      * If vp is NULL and cansleep != 0, a vnode must be acquired
1397                      * from the file handle. This only occurs when called from
1398                      * nfsrv_cleanclient().
1399                      */
1400                     if (gottvp == 0) {
1401                               if (nfsrv_dolocallocks == 0)
1402                                         tvp = NULL;
1403                               else if (vp == NULL && cansleep != 0) {
1404                                         tvp = nfsvno_getvp(&lfp->lf_fh);
1405                                         NFSVOPUNLOCK(tvp, 0);
1406                               } else
1407                                         tvp = vp;
1408                               gottvp = 1;
1409                     }
1410 
1411                     if (tvp != NULL) {
1412                               if (cansleep == 0)
1413                                         panic("allnfs2");
1414                               first = lop->lo_first;
1415                               end = lop->lo_end;
1416                               nfsrv_freenfslock(lop);
1417                               nfsrv_localunlock(tvp, lfp, first, end, p);
1418                               LIST_FOREACH_SAFE(rlp, &lfp->lf_rollback, rlck_list,
1419                                   nrlp)
1420                                         free(rlp, M_NFSDROLLBACK);
1421                               LIST_INIT(&lfp->lf_rollback);
1422                     } else
1423                               nfsrv_freenfslock(lop);
1424                     lop = nlop;
1425           }
1426           if (vp == NULL && tvp != NULL)
1427                     vrele(tvp);
1428 }
1429 
1430 /*
1431  * Free an nfslock structure.
1432  */
1433 static void
nfsrv_freenfslock(struct nfslock * lop)1434 nfsrv_freenfslock(struct nfslock *lop)
1435 {
1436 
1437           if (lop->lo_lckfile.le_prev != NULL) {
1438                     LIST_REMOVE(lop, lo_lckfile);
1439                     nfsstatsv1.srvlocks--;
1440                     nfsrv_openpluslock--;
1441           }
1442           LIST_REMOVE(lop, lo_lckowner);
1443           FREE((caddr_t)lop, M_NFSDLOCK);
1444 }
1445 
1446 /*
1447  * This function frees an nfslockfile structure.
1448  */
1449 static void
nfsrv_freenfslockfile(struct nfslockfile * lfp)1450 nfsrv_freenfslockfile(struct nfslockfile *lfp)
1451 {
1452 
1453           LIST_REMOVE(lfp, lf_hash);
1454           FREE((caddr_t)lfp, M_NFSDLOCKFILE);
1455 }
1456 
1457 /*
1458  * This function looks up an nfsstate structure via stateid.
1459  */
1460 static int
nfsrv_getstate(struct nfsclient * clp,nfsv4stateid_t * stateidp,__unused u_int32_t flags,struct nfsstate ** stpp)1461 nfsrv_getstate(struct nfsclient *clp, nfsv4stateid_t *stateidp, __unused u_int32_t flags,
1462     struct nfsstate **stpp)
1463 {
1464           struct nfsstate *stp;
1465           struct nfsstatehead *hp;
1466           int error = 0;
1467 
1468           *stpp = NULL;
1469           hp = NFSSTATEHASH(clp, *stateidp);
1470           LIST_FOREACH(stp, hp, ls_hash) {
1471                     if (!NFSBCMP(stp->ls_stateid.other, stateidp->other,
1472                               NFSX_STATEIDOTHER))
1473                               break;
1474           }
1475 
1476           /*
1477            * If no state id in list, return NFSERR_BADSTATEID.
1478            */
1479           if (stp == NULL) {
1480                     error = NFSERR_BADSTATEID;
1481                     goto out;
1482           }
1483           *stpp = stp;
1484 
1485 out:
1486           NFSEXITCODE(error);
1487           return (error);
1488 }
1489 
1490 /*
1491  * This function gets an nfsstate structure via owner string.
1492  */
1493 static void
nfsrv_getowner(struct nfsstatehead * hp,struct nfsstate * new_stp,struct nfsstate ** stpp)1494 nfsrv_getowner(struct nfsstatehead *hp, struct nfsstate *new_stp,
1495     struct nfsstate **stpp)
1496 {
1497           struct nfsstate *stp;
1498 
1499           *stpp = NULL;
1500           LIST_FOREACH(stp, hp, ls_list) {
1501                     if (new_stp->ls_ownerlen == stp->ls_ownerlen &&
1502                       !NFSBCMP(new_stp->ls_owner,stp->ls_owner,stp->ls_ownerlen)) {
1503                               *stpp = stp;
1504                               return;
1505                     }
1506           }
1507 }
1508 
1509 /*
1510  * Lock control function called to update lock status.
1511  * Returns 0 upon success, -1 if there is no lock and the flags indicate
1512  * that one isn't to be created and an NFSERR_xxx for other errors.
1513  * The structures new_stp and new_lop are passed in as pointers that should
1514  * be set to NULL if the structure is used and shouldn't be free'd.
1515  * For the NFSLCK_TEST and NFSLCK_CHECK cases, the structures are
1516  * never used and can safely be allocated on the stack. For all other
1517  * cases, *new_stpp and *new_lopp should be malloc'd before the call,
1518  * in case they are used.
1519  */
1520 APPLESTATIC int
nfsrv_lockctrl(vnode_t vp,struct nfsstate ** new_stpp,struct nfslock ** new_lopp,struct nfslockconflict * cfp,nfsquad_t clientid,nfsv4stateid_t * stateidp,__unused struct nfsexstuff * exp,struct nfsrv_descript * nd,NFSPROC_T * p)1521 nfsrv_lockctrl(vnode_t vp, struct nfsstate **new_stpp,
1522     struct nfslock **new_lopp, struct nfslockconflict *cfp,
1523     nfsquad_t clientid, nfsv4stateid_t *stateidp,
1524     __unused struct nfsexstuff *exp,
1525     struct nfsrv_descript *nd, NFSPROC_T *p)
1526 {
1527           struct nfslock *lop;
1528           struct nfsstate *new_stp = *new_stpp;
1529           struct nfslock *new_lop = *new_lopp;
1530           struct nfsstate *tstp, *mystp, *nstp;
1531           int specialid = 0;
1532           struct nfslockfile *lfp;
1533           struct nfslock *other_lop = NULL;
1534           struct nfsstate *stp, *lckstp = NULL;
1535           struct nfsclient *clp = NULL;
1536           u_int32_t bits;
1537           int error = 0, haslock = 0, ret, reterr;
1538           int getlckret, delegation = 0, filestruct_locked, vnode_unlocked = 0;
1539           fhandle_t nfh;
1540           uint64_t first, end;
1541           uint32_t lock_flags;
1542 
1543           if (new_stp->ls_flags & (NFSLCK_CHECK | NFSLCK_SETATTR)) {
1544                     /*
1545                      * Note the special cases of "all 1s" or "all 0s" stateids and
1546                      * let reads with all 1s go ahead.
1547                      */
1548                     if (new_stp->ls_stateid.seqid == 0x0 &&
1549                         new_stp->ls_stateid.other[0] == 0x0 &&
1550                         new_stp->ls_stateid.other[1] == 0x0 &&
1551                         new_stp->ls_stateid.other[2] == 0x0)
1552                               specialid = 1;
1553                     else if (new_stp->ls_stateid.seqid == 0xffffffff &&
1554                         new_stp->ls_stateid.other[0] == 0xffffffff &&
1555                         new_stp->ls_stateid.other[1] == 0xffffffff &&
1556                         new_stp->ls_stateid.other[2] == 0xffffffff)
1557                               specialid = 2;
1558           }
1559 
1560           /*
1561            * Check for restart conditions (client and server).
1562            */
1563           error = nfsrv_checkrestart(clientid, new_stp->ls_flags,
1564               &new_stp->ls_stateid, specialid);
1565           if (error)
1566                     goto out;
1567 
1568           /*
1569            * Check for state resource limit exceeded.
1570            */
1571           if ((new_stp->ls_flags & NFSLCK_LOCK) &&
1572               nfsrv_openpluslock > nfsrv_v4statelimit) {
1573                     error = NFSERR_RESOURCE;
1574                     goto out;
1575           }
1576 
1577           /*
1578            * For the lock case, get another nfslock structure,
1579            * just in case we need it.
1580            * Malloc now, before we start sifting through the linked lists,
1581            * in case we have to wait for memory.
1582            */
1583 tryagain:
1584           if (new_stp->ls_flags & NFSLCK_LOCK)
1585                     MALLOC(other_lop, struct nfslock *, sizeof (struct nfslock),
1586                         M_NFSDLOCK, M_WAITOK);
1587           filestruct_locked = 0;
1588           reterr = 0;
1589           lfp = NULL;
1590 
1591           /*
1592            * Get the lockfile structure for CFH now, so we can do a sanity
1593            * check against the stateid, before incrementing the seqid#, since
1594            * we want to return NFSERR_BADSTATEID on failure and the seqid#
1595            * shouldn't be incremented for this case.
1596            * If nfsrv_getlockfile() returns -1, it means "not found", which
1597            * will be handled later.
1598            * If we are doing Lock/LockU and local locking is enabled, sleep
1599            * lock the nfslockfile structure.
1600            */
1601           getlckret = nfsrv_getlockfh(vp, new_stp->ls_flags, NULL, &nfh, p);
1602           NFSLOCKSTATE();
1603           if (getlckret == 0) {
1604                     if ((new_stp->ls_flags & (NFSLCK_LOCK | NFSLCK_UNLOCK)) != 0 &&
1605                         nfsrv_dolocallocks != 0 && nd->nd_repstat == 0) {
1606                               getlckret = nfsrv_getlockfile(new_stp->ls_flags, NULL,
1607                                   &lfp, &nfh, 1);
1608                               if (getlckret == 0)
1609                                         filestruct_locked = 1;
1610                     } else
1611                               getlckret = nfsrv_getlockfile(new_stp->ls_flags, NULL,
1612                                   &lfp, &nfh, 0);
1613           }
1614           if (getlckret != 0 && getlckret != -1)
1615                     reterr = getlckret;
1616 
1617           if (filestruct_locked != 0) {
1618                     LIST_INIT(&lfp->lf_rollback);
1619                     if ((new_stp->ls_flags & NFSLCK_LOCK)) {
1620                               /*
1621                                * For local locking, do the advisory locking now, so
1622                                * that any conflict can be detected. A failure later
1623                                * can be rolled back locally. If an error is returned,
1624                                * struct nfslockfile has been unlocked and any local
1625                                * locking rolled back.
1626                                */
1627                               NFSUNLOCKSTATE();
1628                               if (vnode_unlocked == 0) {
1629                                         ASSERT_VOP_ELOCKED(vp, "nfsrv_lockctrl1");
1630                                         vnode_unlocked = 1;
1631                                         NFSVOPUNLOCK(vp, 0);
1632                               }
1633                               reterr = nfsrv_locallock(vp, lfp,
1634                                   (new_lop->lo_flags & (NFSLCK_READ | NFSLCK_WRITE)),
1635                                   new_lop->lo_first, new_lop->lo_end, cfp, p);
1636                               NFSLOCKSTATE();
1637                     }
1638           }
1639 
1640           if (specialid == 0) {
1641               if (new_stp->ls_flags & NFSLCK_TEST) {
1642                     /*
1643                      * RFC 3530 does not list LockT as an op that renews a
1644                      * lease, but the consensus seems to be that it is ok
1645                      * for a server to do so.
1646                      */
1647                     error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
1648                         (nfsquad_t)((u_quad_t)0), 0, nd, p);
1649 
1650                     /*
1651                      * Since NFSERR_EXPIRED, NFSERR_ADMINREVOKED are not valid
1652                      * error returns for LockT, just go ahead and test for a lock,
1653                      * since there are no locks for this client, but other locks
1654                      * can conflict. (ie. same client will always be false)
1655                      */
1656                     if (error == NFSERR_EXPIRED || error == NFSERR_ADMINREVOKED)
1657                         error = 0;
1658                     lckstp = new_stp;
1659               } else {
1660                 error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
1661                     (nfsquad_t)((u_quad_t)0), 0, nd, p);
1662                 if (error == 0)
1663                     /*
1664                      * Look up the stateid
1665                      */
1666                     error = nfsrv_getstate(clp, &new_stp->ls_stateid,
1667                       new_stp->ls_flags, &stp);
1668                 /*
1669                  * do some sanity checks for an unconfirmed open or a
1670                  * stateid that refers to the wrong file, for an open stateid
1671                  */
1672                 if (error == 0 && (stp->ls_flags & NFSLCK_OPEN) &&
1673                       ((stp->ls_openowner->ls_flags & NFSLCK_NEEDSCONFIRM) ||
1674                        (getlckret == 0 && stp->ls_lfp != lfp))){
1675                           /*
1676                            * NFSLCK_SETATTR should return OK rather than NFSERR_BADSTATEID
1677                            * The only exception is using SETATTR with SIZE.
1678                            * */
1679                     if ((new_stp->ls_flags &
1680                          (NFSLCK_SETATTR | NFSLCK_CHECK)) != NFSLCK_SETATTR)
1681                                    error = NFSERR_BADSTATEID;
1682                 }
1683 
1684                     if (error == 0 &&
1685                       (stp->ls_flags & (NFSLCK_DELEGREAD | NFSLCK_DELEGWRITE)) &&
1686                       getlckret == 0 && stp->ls_lfp != lfp)
1687                               error = NFSERR_BADSTATEID;
1688 
1689                 /*
1690                  * If the lockowner stateid doesn't refer to the same file,
1691                  * I believe that is considered ok, since some clients will
1692                  * only create a single lockowner and use that for all locks
1693                  * on all files.
1694                  * For now, log it as a diagnostic, instead of considering it
1695                  * a BadStateid.
1696                  */
1697                 if (error == 0 && (stp->ls_flags &
1698                       (NFSLCK_OPEN | NFSLCK_DELEGREAD | NFSLCK_DELEGWRITE)) == 0 &&
1699                       getlckret == 0 && stp->ls_lfp != lfp) {
1700 #ifdef DIAGNOSTIC
1701                       printf("Got a lock statid for different file open\n");
1702 #endif
1703                       /*
1704                       error = NFSERR_BADSTATEID;
1705                       */
1706                 }
1707 
1708                 if (error == 0) {
1709                         if (new_stp->ls_flags & NFSLCK_OPENTOLOCK) {
1710                               /*
1711                                * If haslock set, we've already checked the seqid.
1712                                */
1713                               if (!haslock) {
1714                                   if (stp->ls_flags & NFSLCK_OPEN)
1715                                         error = nfsrv_checkseqid(nd, new_stp->ls_seq,
1716                                             stp->ls_openowner, new_stp->ls_op);
1717                                   else
1718                                         error = NFSERR_BADSTATEID;
1719                               }
1720                               if (!error)
1721                                   nfsrv_getowner(&stp->ls_open, new_stp, &lckstp);
1722                               if (lckstp)
1723                                   /*
1724                                    * I believe this should be an error, but it
1725                                    * isn't obvious what NFSERR_xxx would be
1726                                    * appropriate, so I'll use NFSERR_INVAL for now.
1727                                    */
1728                                   error = NFSERR_INVAL;
1729                               else
1730                                   lckstp = new_stp;
1731                         } else if (new_stp->ls_flags&(NFSLCK_LOCK|NFSLCK_UNLOCK)) {
1732                               /*
1733                                * If haslock set, ditto above.
1734                                */
1735                               if (!haslock) {
1736                                   if (stp->ls_flags & NFSLCK_OPEN)
1737                                         error = NFSERR_BADSTATEID;
1738                                   else
1739                                         error = nfsrv_checkseqid(nd, new_stp->ls_seq,
1740                                             stp, new_stp->ls_op);
1741                               }
1742                               lckstp = stp;
1743                         } else {
1744                               lckstp = stp;
1745                         }
1746                 }
1747                 /*
1748                  * If the seqid part of the stateid isn't the same, return
1749                  * NFSERR_OLDSTATEID for cases other than I/O Ops.
1750                  * For I/O Ops, only return NFSERR_OLDSTATEID if
1751                  * nfsrv_returnoldstateid is set. (The consensus on the email
1752                  * list was that most clients would prefer to not receive
1753                  * NFSERR_OLDSTATEID for I/O Ops, but the RFC suggests that that
1754                  * is what will happen, so I use the nfsrv_returnoldstateid to
1755                  * allow for either server configuration.)
1756                  */
1757                 if (!error && stp->ls_stateid.seqid!=new_stp->ls_stateid.seqid &&
1758                       (((nd->nd_flag & ND_NFSV41) == 0 &&
1759                        (!(new_stp->ls_flags & NFSLCK_CHECK) ||
1760                         nfsrv_returnoldstateid)) ||
1761                        ((nd->nd_flag & ND_NFSV41) != 0 &&
1762                         new_stp->ls_stateid.seqid != 0)))
1763                         error = NFSERR_OLDSTATEID;
1764               }
1765           }
1766 
1767           /*
1768            * Now we can check for grace.
1769            */
1770           if (!error)
1771                     error = nfsrv_checkgrace(nd, clp, new_stp->ls_flags);
1772           if ((new_stp->ls_flags & NFSLCK_RECLAIM) && !error &&
1773                     nfsrv_checkstable(clp))
1774                     error = NFSERR_NOGRACE;
1775           /*
1776            * If we successfully Reclaimed state, note that.
1777            */
1778           if ((new_stp->ls_flags & NFSLCK_RECLAIM) && !error)
1779                     nfsrv_markstable(clp);
1780 
1781           /*
1782            * At this point, either error == NFSERR_BADSTATEID or the
1783            * seqid# has been updated, so we can return any error.
1784            * If error == 0, there may be an error in:
1785            *    nd_repstat - Set by the calling function.
1786            *    reterr - Set above, if getting the nfslockfile structure
1787            *       or acquiring the local lock failed.
1788            *    (If both of these are set, nd_repstat should probably be
1789            *     returned, since that error was detected before this
1790            *     function call.)
1791            */
1792           if (error != 0 || nd->nd_repstat != 0 || reterr != 0) {
1793                     if (error == 0) {
1794                               if (nd->nd_repstat != 0)
1795                                         error = nd->nd_repstat;
1796                               else
1797                                         error = reterr;
1798                     }
1799                     if (filestruct_locked != 0) {
1800                               /* Roll back local locks. */
1801                               NFSUNLOCKSTATE();
1802                               if (vnode_unlocked == 0) {
1803                                         ASSERT_VOP_ELOCKED(vp, "nfsrv_lockctrl2");
1804                                         vnode_unlocked = 1;
1805                                         NFSVOPUNLOCK(vp, 0);
1806                               }
1807                               nfsrv_locallock_rollback(vp, lfp, p);
1808                               NFSLOCKSTATE();
1809                               nfsrv_unlocklf(lfp);
1810                     }
1811                     NFSUNLOCKSTATE();
1812                     goto out;
1813           }
1814 
1815           /*
1816            * Check the nfsrv_getlockfile return.
1817            * Returned -1 if no structure found.
1818            */
1819           if (getlckret == -1) {
1820                     error = NFSERR_EXPIRED;
1821                     /*
1822                      * Called from lockt, so no lock is OK.
1823                      */
1824                     if (new_stp->ls_flags & NFSLCK_TEST) {
1825                               error = 0;
1826                     } else if (new_stp->ls_flags &
1827                         (NFSLCK_CHECK | NFSLCK_SETATTR)) {
1828                               /*
1829                                * Called to check for a lock, OK if the stateid is all
1830                                * 1s or all 0s, but there should be an nfsstate
1831                                * otherwise.
1832                                * (ie. If there is no open, I'll assume no share
1833                                *  deny bits.)
1834                                */
1835                               if (specialid)
1836                                         error = 0;
1837                               else
1838                                         error = NFSERR_BADSTATEID;
1839                     }
1840                     NFSUNLOCKSTATE();
1841                     goto out;
1842           }
1843 
1844           /*
1845            * For NFSLCK_CHECK and NFSLCK_LOCK, test for a share conflict.
1846            * For NFSLCK_CHECK, allow a read if write access is granted,
1847            * but check for a deny. For NFSLCK_LOCK, require correct access,
1848            * which implies a conflicting deny can't exist.
1849            */
1850           if (new_stp->ls_flags & (NFSLCK_CHECK | NFSLCK_LOCK)) {
1851               /*
1852                * Four kinds of state id:
1853                * - specialid (all 0s or all 1s), only for NFSLCK_CHECK
1854                * - stateid for an open
1855                * - stateid for a delegation
1856                * - stateid for a lock owner
1857                */
1858               if (!specialid) {
1859                     if (stp->ls_flags & (NFSLCK_DELEGREAD | NFSLCK_DELEGWRITE)) {
1860                         delegation = 1;
1861                         mystp = stp;
1862                         nfsrv_delaydelegtimeout(stp);
1863                   } else if (stp->ls_flags & NFSLCK_OPEN) {
1864                         mystp = stp;
1865                     } else {
1866                         mystp = stp->ls_openstp;
1867                     }
1868                     /*
1869                      * If locking or checking, require correct access
1870                      * bit set.
1871                      */
1872                     if (((new_stp->ls_flags & NFSLCK_LOCK) &&
1873                          !((new_lop->lo_flags >> NFSLCK_LOCKSHIFT) &
1874                            mystp->ls_flags & NFSLCK_ACCESSBITS)) ||
1875                         ((new_stp->ls_flags & (NFSLCK_CHECK|NFSLCK_READACCESS)) ==
1876                           (NFSLCK_CHECK | NFSLCK_READACCESS) &&
1877                          !(mystp->ls_flags & NFSLCK_READACCESS)) ||
1878                         ((new_stp->ls_flags & (NFSLCK_CHECK|NFSLCK_WRITEACCESS)) ==
1879                           (NFSLCK_CHECK | NFSLCK_WRITEACCESS) &&
1880                          !(mystp->ls_flags & NFSLCK_WRITEACCESS))) {
1881                               if (filestruct_locked != 0) {
1882                                         /* Roll back local locks. */
1883                                         NFSUNLOCKSTATE();
1884                                         if (vnode_unlocked == 0) {
1885                                                   ASSERT_VOP_ELOCKED(vp,
1886                                                       "nfsrv_lockctrl3");
1887                                                   vnode_unlocked = 1;
1888                                                   NFSVOPUNLOCK(vp, 0);
1889                                         }
1890                                         nfsrv_locallock_rollback(vp, lfp, p);
1891                                         NFSLOCKSTATE();
1892                                         nfsrv_unlocklf(lfp);
1893                               }
1894                               NFSUNLOCKSTATE();
1895                               error = NFSERR_OPENMODE;
1896                               goto out;
1897                     }
1898               } else
1899                     mystp = NULL;
1900               if ((new_stp->ls_flags & NFSLCK_CHECK) && !delegation) {
1901                     /*
1902                      * Check for a conflicting deny bit.
1903                      */
1904                     LIST_FOREACH(tstp, &lfp->lf_open, ls_file) {
1905                         if (tstp != mystp) {
1906                               bits = tstp->ls_flags;
1907                               bits >>= NFSLCK_SHIFT;
1908                               if (new_stp->ls_flags & bits & NFSLCK_ACCESSBITS) {
1909                                   KASSERT(vnode_unlocked == 0,
1910                                         ("nfsrv_lockctrl: vnode unlocked1"));
1911                                   ret = nfsrv_clientconflict(tstp->ls_clp, &haslock,
1912                                         vp, p);
1913                                   if (ret == 1) {
1914                                         /*
1915                                         * nfsrv_clientconflict unlocks state
1916                                          * when it returns non-zero.
1917                                          */
1918                                         lckstp = NULL;
1919                                         goto tryagain;
1920                                   }
1921                                   if (ret == 0)
1922                                         NFSUNLOCKSTATE();
1923                                   if (ret == 2)
1924                                         error = NFSERR_PERM;
1925                                   else
1926                                         error = NFSERR_OPENMODE;
1927                                   goto out;
1928                               }
1929                         }
1930                     }
1931 
1932                     /* We're outta here */
1933                     NFSUNLOCKSTATE();
1934                     goto out;
1935               }
1936           }
1937 
1938           /*
1939            * For setattr, just get rid of all the Delegations for other clients.
1940            */
1941           if (new_stp->ls_flags & NFSLCK_SETATTR) {
1942                     KASSERT(vnode_unlocked == 0,
1943                         ("nfsrv_lockctrl: vnode unlocked2"));
1944                     ret = nfsrv_cleandeleg(vp, lfp, clp, &haslock, p);
1945                     if (ret) {
1946                               /*
1947                                * nfsrv_cleandeleg() unlocks state when it
1948                                * returns non-zero.
1949                                */
1950                               if (ret == -1) {
1951                                         lckstp = NULL;
1952                                         goto tryagain;
1953                               }
1954                               error = ret;
1955                               goto out;
1956                     }
1957                     if (!(new_stp->ls_flags & NFSLCK_CHECK) ||
1958                         (LIST_EMPTY(&lfp->lf_open) && LIST_EMPTY(&lfp->lf_lock) &&
1959                          LIST_EMPTY(&lfp->lf_deleg))) {
1960                               NFSUNLOCKSTATE();
1961                               goto out;
1962                     }
1963           }
1964 
1965           /*
1966            * Check for a conflicting delegation. If one is found, call
1967            * nfsrv_delegconflict() to handle it. If the v4root lock hasn't
1968            * been set yet, it will get the lock. Otherwise, it will recall
1969            * the delegation. Then, we try try again...
1970            * I currently believe the conflict algorithm to be:
1971            * For Lock Ops (Lock/LockT/LockU)
1972            * - there is a conflict iff a different client has a write delegation
1973            * For Reading (Read Op)
1974            * - there is a conflict iff a different client has a write delegation
1975            *   (the specialids are always a different client)
1976            * For Writing (Write/Setattr of size)
1977            * - there is a conflict if a different client has any delegation
1978            * - there is a conflict if the same client has a read delegation
1979            *   (I don't understand why this isn't allowed, but that seems to be
1980            *    the current consensus?)
1981            */
1982           tstp = LIST_FIRST(&lfp->lf_deleg);
1983           while (tstp != NULL) {
1984               nstp = LIST_NEXT(tstp, ls_file);
1985               if ((((new_stp->ls_flags&(NFSLCK_LOCK|NFSLCK_UNLOCK|NFSLCK_TEST))||
1986                      ((new_stp->ls_flags & NFSLCK_CHECK) &&
1987                       (new_lop->lo_flags & NFSLCK_READ))) &&
1988                       clp != tstp->ls_clp &&
1989                      (tstp->ls_flags & NFSLCK_DELEGWRITE)) ||
1990                      ((new_stp->ls_flags & NFSLCK_CHECK) &&
1991                        (new_lop->lo_flags & NFSLCK_WRITE) &&
1992                       (clp != tstp->ls_clp ||
1993                        (tstp->ls_flags & NFSLCK_DELEGREAD)))) {
1994                     ret = 0;
1995                     if (filestruct_locked != 0) {
1996                               /* Roll back local locks. */
1997                               NFSUNLOCKSTATE();
1998                               if (vnode_unlocked == 0) {
1999                                         ASSERT_VOP_ELOCKED(vp, "nfsrv_lockctrl4");
2000                                         NFSVOPUNLOCK(vp, 0);
2001                               }
2002                               nfsrv_locallock_rollback(vp, lfp, p);
2003                               NFSLOCKSTATE();
2004                               nfsrv_unlocklf(lfp);
2005                               NFSUNLOCKSTATE();
2006                               NFSVOPLOCK(vp, LK_EXCLUSIVE | LK_RETRY);
2007                               vnode_unlocked = 0;
2008                               if ((vp->v_iflag & VI_DOOMED) != 0)
2009                                         ret = NFSERR_SERVERFAULT;
2010                               NFSLOCKSTATE();
2011                     }
2012                     if (ret == 0)
2013                               ret = nfsrv_delegconflict(tstp, &haslock, p, vp);
2014                     if (ret) {
2015                         /*
2016                          * nfsrv_delegconflict unlocks state when it
2017                          * returns non-zero, which it always does.
2018                          */
2019                         if (other_lop) {
2020                               FREE((caddr_t)other_lop, M_NFSDLOCK);
2021                               other_lop = NULL;
2022                         }
2023                         if (ret == -1) {
2024                               lckstp = NULL;
2025                               goto tryagain;
2026                         }
2027                         error = ret;
2028                         goto out;
2029                     }
2030                     /* Never gets here. */
2031               }
2032               tstp = nstp;
2033           }
2034 
2035           /*
2036            * Handle the unlock case by calling nfsrv_updatelock().
2037            * (Should I have done some access checking above for unlock? For now,
2038            *  just let it happen.)
2039            */
2040           if (new_stp->ls_flags & NFSLCK_UNLOCK) {
2041                     first = new_lop->lo_first;
2042                     end = new_lop->lo_end;
2043                     nfsrv_updatelock(stp, new_lopp, &other_lop, lfp);
2044                     stateidp->seqid = ++(stp->ls_stateid.seqid);
2045                     if ((nd->nd_flag & ND_NFSV41) != 0 && stateidp->seqid == 0)
2046                               stateidp->seqid = stp->ls_stateid.seqid = 1;
2047                     stateidp->other[0] = stp->ls_stateid.other[0];
2048                     stateidp->other[1] = stp->ls_stateid.other[1];
2049                     stateidp->other[2] = stp->ls_stateid.other[2];
2050                     if (filestruct_locked != 0) {
2051                               NFSUNLOCKSTATE();
2052                               if (vnode_unlocked == 0) {
2053                                         ASSERT_VOP_ELOCKED(vp, "nfsrv_lockctrl5");
2054                                         vnode_unlocked = 1;
2055                                         NFSVOPUNLOCK(vp, 0);
2056                               }
2057                               /* Update the local locks. */
2058                               nfsrv_localunlock(vp, lfp, first, end, p);
2059                               NFSLOCKSTATE();
2060                               nfsrv_unlocklf(lfp);
2061                     }
2062                     NFSUNLOCKSTATE();
2063                     goto out;
2064           }
2065 
2066           /*
2067            * Search for a conflicting lock. A lock conflicts if:
2068            * - the lock range overlaps and
2069            * - at least one lock is a write lock and
2070            * - it is not owned by the same lock owner
2071            */
2072           if (!delegation) {
2073             LIST_FOREACH(lop, &lfp->lf_lock, lo_lckfile) {
2074               if (new_lop->lo_end > lop->lo_first &&
2075                     new_lop->lo_first < lop->lo_end &&
2076                     (new_lop->lo_flags == NFSLCK_WRITE ||
2077                      lop->lo_flags == NFSLCK_WRITE) &&
2078                     lckstp != lop->lo_stp &&
2079                     (clp != lop->lo_stp->ls_clp ||
2080                      lckstp->ls_ownerlen != lop->lo_stp->ls_ownerlen ||
2081                      NFSBCMP(lckstp->ls_owner, lop->lo_stp->ls_owner,
2082                         lckstp->ls_ownerlen))) {
2083                     if (other_lop) {
2084                         FREE((caddr_t)other_lop, M_NFSDLOCK);
2085                         other_lop = NULL;
2086                     }
2087                     if (vnode_unlocked != 0)
2088                         ret = nfsrv_clientconflict(lop->lo_stp->ls_clp, &haslock,
2089                               NULL, p);
2090                     else
2091                         ret = nfsrv_clientconflict(lop->lo_stp->ls_clp, &haslock,
2092                               vp, p);
2093                     if (ret == 1) {
2094                         if (filestruct_locked != 0) {
2095                               if (vnode_unlocked == 0) {
2096                                         ASSERT_VOP_ELOCKED(vp, "nfsrv_lockctrl6");
2097                                         NFSVOPUNLOCK(vp, 0);
2098                               }
2099                               /* Roll back local locks. */
2100                               nfsrv_locallock_rollback(vp, lfp, p);
2101                               NFSLOCKSTATE();
2102                               nfsrv_unlocklf(lfp);
2103                               NFSUNLOCKSTATE();
2104                               NFSVOPLOCK(vp, LK_EXCLUSIVE | LK_RETRY);
2105                               vnode_unlocked = 0;
2106                               if ((vp->v_iflag & VI_DOOMED) != 0) {
2107                                         error = NFSERR_SERVERFAULT;
2108                                         goto out;
2109                               }
2110                         }
2111                         /*
2112                          * nfsrv_clientconflict() unlocks state when it
2113                          * returns non-zero.
2114                          */
2115                         lckstp = NULL;
2116                         goto tryagain;
2117                     }
2118                     /*
2119                      * Found a conflicting lock, so record the conflict and
2120                      * return the error.
2121                      */
2122                     if (cfp != NULL && ret == 0) {
2123                         cfp->cl_clientid.lval[0]=lop->lo_stp->ls_stateid.other[0];
2124                         cfp->cl_clientid.lval[1]=lop->lo_stp->ls_stateid.other[1];
2125                         cfp->cl_first = lop->lo_first;
2126                         cfp->cl_end = lop->lo_end;
2127                         cfp->cl_flags = lop->lo_flags;
2128                         cfp->cl_ownerlen = lop->lo_stp->ls_ownerlen;
2129                         NFSBCOPY(lop->lo_stp->ls_owner, cfp->cl_owner,
2130                               cfp->cl_ownerlen);
2131                     }
2132                     if (ret == 2)
2133                         error = NFSERR_PERM;
2134                     else if (new_stp->ls_flags & NFSLCK_RECLAIM)
2135                         error = NFSERR_RECLAIMCONFLICT;
2136                     else if (new_stp->ls_flags & NFSLCK_CHECK)
2137                         error = NFSERR_LOCKED;
2138                     else
2139                         error = NFSERR_DENIED;
2140                     if (filestruct_locked != 0 && ret == 0) {
2141                               /* Roll back local locks. */
2142                               NFSUNLOCKSTATE();
2143                               if (vnode_unlocked == 0) {
2144                                         ASSERT_VOP_ELOCKED(vp, "nfsrv_lockctrl7");
2145                                         vnode_unlocked = 1;
2146                                         NFSVOPUNLOCK(vp, 0);
2147                               }
2148                               nfsrv_locallock_rollback(vp, lfp, p);
2149                               NFSLOCKSTATE();
2150                               nfsrv_unlocklf(lfp);
2151                     }
2152                     if (ret == 0)
2153                               NFSUNLOCKSTATE();
2154                     goto out;
2155               }
2156             }
2157           }
2158 
2159           /*
2160            * We only get here if there was no lock that conflicted.
2161            */
2162           if (new_stp->ls_flags & (NFSLCK_TEST | NFSLCK_CHECK)) {
2163                     NFSUNLOCKSTATE();
2164                     goto out;
2165           }
2166 
2167           /*
2168            * We only get here when we are creating or modifying a lock.
2169            * There are two variants:
2170            * - exist_lock_owner where lock_owner exists
2171            * - open_to_lock_owner with new lock_owner
2172            */
2173           first = new_lop->lo_first;
2174           end = new_lop->lo_end;
2175           lock_flags = new_lop->lo_flags;
2176           if (!(new_stp->ls_flags & NFSLCK_OPENTOLOCK)) {
2177                     nfsrv_updatelock(lckstp, new_lopp, &other_lop, lfp);
2178                     stateidp->seqid = ++(lckstp->ls_stateid.seqid);
2179                     if ((nd->nd_flag & ND_NFSV41) != 0 && stateidp->seqid == 0)
2180                               stateidp->seqid = lckstp->ls_stateid.seqid = 1;
2181                     stateidp->other[0] = lckstp->ls_stateid.other[0];
2182                     stateidp->other[1] = lckstp->ls_stateid.other[1];
2183                     stateidp->other[2] = lckstp->ls_stateid.other[2];
2184           } else {
2185                     /*
2186                      * The new open_to_lock_owner case.
2187                      * Link the new nfsstate into the lists.
2188                      */
2189                     new_stp->ls_seq = new_stp->ls_opentolockseq;
2190                     nfsrvd_refcache(new_stp->ls_op);
2191                     stateidp->seqid = new_stp->ls_stateid.seqid = 1;
2192                     stateidp->other[0] = new_stp->ls_stateid.other[0] =
2193                         clp->lc_clientid.lval[0];
2194                     stateidp->other[1] = new_stp->ls_stateid.other[1] =
2195                         clp->lc_clientid.lval[1];
2196                     stateidp->other[2] = new_stp->ls_stateid.other[2] =
2197                         nfsrv_nextstateindex(clp);
2198                     new_stp->ls_clp = clp;
2199                     LIST_INIT(&new_stp->ls_lock);
2200                     new_stp->ls_openstp = stp;
2201                     new_stp->ls_lfp = lfp;
2202                     nfsrv_insertlock(new_lop, (struct nfslock *)new_stp, new_stp,
2203                         lfp);
2204                     LIST_INSERT_HEAD(NFSSTATEHASH(clp, new_stp->ls_stateid),
2205                         new_stp, ls_hash);
2206                     LIST_INSERT_HEAD(&stp->ls_open, new_stp, ls_list);
2207                     *new_lopp = NULL;
2208                     *new_stpp = NULL;
2209                     nfsstatsv1.srvlockowners++;
2210                     nfsrv_openpluslock++;
2211           }
2212           if (filestruct_locked != 0) {
2213                     NFSUNLOCKSTATE();
2214                     nfsrv_locallock_commit(lfp, lock_flags, first, end);
2215                     NFSLOCKSTATE();
2216                     nfsrv_unlocklf(lfp);
2217           }
2218           NFSUNLOCKSTATE();
2219 
2220 out:
2221           if (haslock) {
2222                     NFSLOCKV4ROOTMUTEX();
2223                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
2224                     NFSUNLOCKV4ROOTMUTEX();
2225           }
2226           if (vnode_unlocked != 0) {
2227                     NFSVOPLOCK(vp, LK_EXCLUSIVE | LK_RETRY);
2228                     if (error == 0 && (vp->v_iflag & VI_DOOMED) != 0)
2229                               error = NFSERR_SERVERFAULT;
2230           }
2231           if (other_lop)
2232                     FREE((caddr_t)other_lop, M_NFSDLOCK);
2233           NFSEXITCODE2(error, nd);
2234           return (error);
2235 }
2236 
2237 /*
2238  * Check for state errors for Open.
2239  * repstat is passed back out as an error if more critical errors
2240  * are not detected.
2241  */
2242 APPLESTATIC int
nfsrv_opencheck(nfsquad_t clientid,nfsv4stateid_t * stateidp,struct nfsstate * new_stp,vnode_t vp,struct nfsrv_descript * nd,NFSPROC_T * p,int repstat)2243 nfsrv_opencheck(nfsquad_t clientid, nfsv4stateid_t *stateidp,
2244     struct nfsstate *new_stp, vnode_t vp, struct nfsrv_descript *nd,
2245     NFSPROC_T *p, int repstat)
2246 {
2247           struct nfsstate *stp, *nstp;
2248           struct nfsclient *clp;
2249           struct nfsstate *ownerstp;
2250           struct nfslockfile *lfp, *new_lfp;
2251           int error = 0, haslock = 0, ret, readonly = 0, getfhret = 0;
2252 
2253           if ((new_stp->ls_flags & NFSLCK_SHAREBITS) == NFSLCK_READACCESS)
2254                     readonly = 1;
2255           /*
2256            * Check for restart conditions (client and server).
2257            */
2258           error = nfsrv_checkrestart(clientid, new_stp->ls_flags,
2259                     &new_stp->ls_stateid, 0);
2260           if (error)
2261                     goto out;
2262 
2263           /*
2264            * Check for state resource limit exceeded.
2265            * Technically this should be SMP protected, but the worst
2266            * case error is "out by one or two" on the count when it
2267            * returns NFSERR_RESOURCE and the limit is just a rather
2268            * arbitrary high water mark, so no harm is done.
2269            */
2270           if (nfsrv_openpluslock > nfsrv_v4statelimit) {
2271                     error = NFSERR_RESOURCE;
2272                     goto out;
2273           }
2274 
2275 tryagain:
2276           MALLOC(new_lfp, struct nfslockfile *, sizeof (struct nfslockfile),
2277               M_NFSDLOCKFILE, M_WAITOK);
2278           if (vp)
2279                     getfhret = nfsrv_getlockfh(vp, new_stp->ls_flags, new_lfp,
2280                         NULL, p);
2281           NFSLOCKSTATE();
2282           /*
2283            * Get the nfsclient structure.
2284            */
2285           error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
2286               (nfsquad_t)((u_quad_t)0), 0, nd, p);
2287 
2288           /*
2289            * Look up the open owner. See if it needs confirmation and
2290            * check the seq#, as required.
2291            */
2292           if (!error)
2293                     nfsrv_getowner(&clp->lc_open, new_stp, &ownerstp);
2294 
2295           if (!error && ownerstp) {
2296                     error = nfsrv_checkseqid(nd, new_stp->ls_seq, ownerstp,
2297                         new_stp->ls_op);
2298                     /*
2299                      * If the OpenOwner hasn't been confirmed, assume the
2300                      * old one was a replay and this one is ok.
2301                      * See: RFC3530 Sec. 14.2.18.
2302                      */
2303                     if (error == NFSERR_BADSEQID &&
2304                         (ownerstp->ls_flags & NFSLCK_NEEDSCONFIRM))
2305                               error = 0;
2306           }
2307 
2308           /*
2309            * Check for grace.
2310            */
2311           if (!error)
2312                     error = nfsrv_checkgrace(nd, clp, new_stp->ls_flags);
2313           if ((new_stp->ls_flags & NFSLCK_RECLAIM) && !error &&
2314                     nfsrv_checkstable(clp))
2315                     error = NFSERR_NOGRACE;
2316 
2317           /*
2318            * If none of the above errors occurred, let repstat be
2319            * returned.
2320            */
2321           if (repstat && !error)
2322                     error = repstat;
2323           if (error) {
2324                     NFSUNLOCKSTATE();
2325                     if (haslock) {
2326                               NFSLOCKV4ROOTMUTEX();
2327                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
2328                               NFSUNLOCKV4ROOTMUTEX();
2329                     }
2330                     free((caddr_t)new_lfp, M_NFSDLOCKFILE);
2331                     goto out;
2332           }
2333 
2334           /*
2335            * If vp == NULL, the file doesn't exist yet, so return ok.
2336            * (This always happens on the first pass, so haslock must be 0.)
2337            */
2338           if (vp == NULL) {
2339                     NFSUNLOCKSTATE();
2340                     FREE((caddr_t)new_lfp, M_NFSDLOCKFILE);
2341                     goto out;
2342           }
2343 
2344           /*
2345            * Get the structure for the underlying file.
2346            */
2347           if (getfhret)
2348                     error = getfhret;
2349           else
2350                     error = nfsrv_getlockfile(new_stp->ls_flags, &new_lfp, &lfp,
2351                         NULL, 0);
2352           if (new_lfp)
2353                     FREE((caddr_t)new_lfp, M_NFSDLOCKFILE);
2354           if (error) {
2355                     NFSUNLOCKSTATE();
2356                     if (haslock) {
2357                               NFSLOCKV4ROOTMUTEX();
2358                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
2359                               NFSUNLOCKV4ROOTMUTEX();
2360                     }
2361                     goto out;
2362           }
2363 
2364           /*
2365            * Search for a conflicting open/share.
2366            */
2367           if (new_stp->ls_flags & NFSLCK_DELEGCUR) {
2368               /*
2369                * For Delegate_Cur, search for the matching Delegation,
2370                * which indicates no conflict.
2371                * An old delegation should have been recovered by the
2372                * client doing a Claim_DELEGATE_Prev, so I won't let
2373                * it match and return NFSERR_EXPIRED. Should I let it
2374                * match?
2375                */
2376               LIST_FOREACH(stp, &lfp->lf_deleg, ls_file) {
2377                     if (!(stp->ls_flags & NFSLCK_OLDDELEG) &&
2378                         (((nd->nd_flag & ND_NFSV41) != 0 &&
2379                         stateidp->seqid == 0) ||
2380                         stateidp->seqid == stp->ls_stateid.seqid) &&
2381                         !NFSBCMP(stateidp->other, stp->ls_stateid.other,
2382                                 NFSX_STATEIDOTHER))
2383                               break;
2384               }
2385               if (stp == NULL ||
2386                     ((new_stp->ls_flags & NFSLCK_WRITEACCESS) &&
2387                      (stp->ls_flags & NFSLCK_DELEGREAD))) {
2388                     NFSUNLOCKSTATE();
2389                     if (haslock) {
2390                               NFSLOCKV4ROOTMUTEX();
2391                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
2392                               NFSUNLOCKV4ROOTMUTEX();
2393                     }
2394                     error = NFSERR_EXPIRED;
2395                     goto out;
2396               }
2397           }
2398 
2399           /*
2400            * Check for access/deny bit conflicts. I check for the same
2401            * owner as well, in case the client didn't bother.
2402            */
2403           LIST_FOREACH(stp, &lfp->lf_open, ls_file) {
2404                     if (!(new_stp->ls_flags & NFSLCK_DELEGCUR) &&
2405                         (((new_stp->ls_flags & NFSLCK_ACCESSBITS) &
2406                           ((stp->ls_flags>>NFSLCK_SHIFT) & NFSLCK_ACCESSBITS))||
2407                          ((stp->ls_flags & NFSLCK_ACCESSBITS) &
2408                           ((new_stp->ls_flags>>NFSLCK_SHIFT)&NFSLCK_ACCESSBITS)))){
2409                               ret = nfsrv_clientconflict(stp->ls_clp,&haslock,vp,p);
2410                               if (ret == 1) {
2411                                         /*
2412                                          * nfsrv_clientconflict() unlocks
2413                                          * state when it returns non-zero.
2414                                          */
2415                                         goto tryagain;
2416                               }
2417                               if (ret == 2)
2418                                         error = NFSERR_PERM;
2419                               else if (new_stp->ls_flags & NFSLCK_RECLAIM)
2420                                         error = NFSERR_RECLAIMCONFLICT;
2421                               else
2422                                         error = NFSERR_SHAREDENIED;
2423                               if (ret == 0)
2424                                         NFSUNLOCKSTATE();
2425                               if (haslock) {
2426                                         NFSLOCKV4ROOTMUTEX();
2427                                         nfsv4_unlock(&nfsv4rootfs_lock, 1);
2428                                         NFSUNLOCKV4ROOTMUTEX();
2429                               }
2430                               goto out;
2431                     }
2432           }
2433 
2434           /*
2435            * Check for a conflicting delegation. If one is found, call
2436            * nfsrv_delegconflict() to handle it. If the v4root lock hasn't
2437            * been set yet, it will get the lock. Otherwise, it will recall
2438            * the delegation. Then, we try try again...
2439            * (If NFSLCK_DELEGCUR is set, it has a delegation, so there
2440            *  isn't a conflict.)
2441            * I currently believe the conflict algorithm to be:
2442            * For Open with Read Access and Deny None
2443            * - there is a conflict iff a different client has a write delegation
2444            * For Open with other Write Access or any Deny except None
2445            * - there is a conflict if a different client has any delegation
2446            * - there is a conflict if the same client has a read delegation
2447            *   (The current consensus is that this last case should be
2448            *    considered a conflict since the client with a read delegation
2449            *    could have done an Open with ReadAccess and WriteDeny
2450            *    locally and then not have checked for the WriteDeny.)
2451            * Don't check for a Reclaim, since that will be dealt with
2452            * by nfsrv_openctrl().
2453            */
2454           if (!(new_stp->ls_flags &
2455                     (NFSLCK_DELEGPREV | NFSLCK_DELEGCUR | NFSLCK_RECLAIM))) {
2456               stp = LIST_FIRST(&lfp->lf_deleg);
2457               while (stp != NULL) {
2458                     nstp = LIST_NEXT(stp, ls_file);
2459                     if ((readonly && stp->ls_clp != clp &&
2460                            (stp->ls_flags & NFSLCK_DELEGWRITE)) ||
2461                         (!readonly && (stp->ls_clp != clp ||
2462                              (stp->ls_flags & NFSLCK_DELEGREAD)))) {
2463                               ret = nfsrv_delegconflict(stp, &haslock, p, vp);
2464                               if (ret) {
2465                                   /*
2466                                    * nfsrv_delegconflict() unlocks state
2467                                    * when it returns non-zero.
2468                                    */
2469                                   if (ret == -1)
2470                                         goto tryagain;
2471                                   error = ret;
2472                                   goto out;
2473                               }
2474                     }
2475                     stp = nstp;
2476               }
2477           }
2478           NFSUNLOCKSTATE();
2479           if (haslock) {
2480                     NFSLOCKV4ROOTMUTEX();
2481                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
2482                     NFSUNLOCKV4ROOTMUTEX();
2483           }
2484 
2485 out:
2486           NFSEXITCODE2(error, nd);
2487           return (error);
2488 }
2489 
2490 /*
2491  * Open control function to create/update open state for an open.
2492  */
2493 APPLESTATIC int
nfsrv_openctrl(struct nfsrv_descript * nd,vnode_t vp,struct nfsstate ** new_stpp,nfsquad_t clientid,nfsv4stateid_t * stateidp,nfsv4stateid_t * delegstateidp,u_int32_t * rflagsp,struct nfsexstuff * exp,NFSPROC_T * p,u_quad_t filerev)2494 nfsrv_openctrl(struct nfsrv_descript *nd, vnode_t vp,
2495     struct nfsstate **new_stpp, nfsquad_t clientid, nfsv4stateid_t *stateidp,
2496     nfsv4stateid_t *delegstateidp, u_int32_t *rflagsp, struct nfsexstuff *exp,
2497     NFSPROC_T *p, u_quad_t filerev)
2498 {
2499           struct nfsstate *new_stp = *new_stpp;
2500           struct nfsstate *stp, *nstp;
2501           struct nfsstate *openstp = NULL, *new_open, *ownerstp, *new_deleg;
2502           struct nfslockfile *lfp, *new_lfp;
2503           struct nfsclient *clp;
2504           int error = 0, haslock = 0, ret, delegate = 1, writedeleg = 1;
2505           int readonly = 0, cbret = 1, getfhret = 0;
2506 
2507           if ((new_stp->ls_flags & NFSLCK_SHAREBITS) == NFSLCK_READACCESS)
2508                     readonly = 1;
2509           /*
2510            * Check for restart conditions (client and server).
2511            * (Paranoia, should have been detected by nfsrv_opencheck().)
2512            * If an error does show up, return NFSERR_EXPIRED, since the
2513            * the seqid# has already been incremented.
2514            */
2515           error = nfsrv_checkrestart(clientid, new_stp->ls_flags,
2516               &new_stp->ls_stateid, 0);
2517           if (error) {
2518                     printf("Nfsd: openctrl unexpected restart err=%d\n",
2519                         error);
2520                     error = NFSERR_EXPIRED;
2521                     goto out;
2522           }
2523 
2524 tryagain:
2525           MALLOC(new_lfp, struct nfslockfile *, sizeof (struct nfslockfile),
2526               M_NFSDLOCKFILE, M_WAITOK);
2527           MALLOC(new_open, struct nfsstate *, sizeof (struct nfsstate),
2528               M_NFSDSTATE, M_WAITOK);
2529           MALLOC(new_deleg, struct nfsstate *, sizeof (struct nfsstate),
2530               M_NFSDSTATE, M_WAITOK);
2531           getfhret = nfsrv_getlockfh(vp, new_stp->ls_flags, new_lfp,
2532               NULL, p);
2533           NFSLOCKSTATE();
2534           /*
2535            * Get the client structure. Since the linked lists could be changed
2536            * by other nfsd processes if this process does a tsleep(), one of
2537            * two things must be done.
2538            * 1 - don't tsleep()
2539            * or
2540            * 2 - get the nfsv4_lock() { indicated by haslock == 1 }
2541            *     before using the lists, since this lock stops the other
2542            *     nfsd. This should only be used for rare cases, since it
2543            *     essentially single threads the nfsd.
2544            *     At this time, it is only done for cases where the stable
2545            *     storage file must be written prior to completion of state
2546            *     expiration.
2547            */
2548           error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
2549               (nfsquad_t)((u_quad_t)0), 0, nd, p);
2550           if (!error && (clp->lc_flags & LCL_NEEDSCBNULL) &&
2551               clp->lc_program) {
2552                     /*
2553                      * This happens on the first open for a client
2554                      * that supports callbacks.
2555                      */
2556                     NFSUNLOCKSTATE();
2557                     /*
2558                      * Although nfsrv_docallback() will sleep, clp won't
2559                      * go away, since they are only removed when the
2560                      * nfsv4_lock() has blocked the nfsd threads. The
2561                      * fields in clp can change, but having multiple
2562                      * threads do this Null callback RPC should be
2563                      * harmless.
2564                      */
2565                     cbret = nfsrv_docallback(clp, NFSV4PROC_CBNULL,
2566                         NULL, 0, NULL, NULL, NULL, p);
2567                     NFSLOCKSTATE();
2568                     clp->lc_flags &= ~LCL_NEEDSCBNULL;
2569                     if (!cbret)
2570                               clp->lc_flags |= LCL_CALLBACKSON;
2571           }
2572 
2573           /*
2574            * Look up the open owner. See if it needs confirmation and
2575            * check the seq#, as required.
2576            */
2577           if (!error)
2578                     nfsrv_getowner(&clp->lc_open, new_stp, &ownerstp);
2579 
2580           if (error) {
2581                     NFSUNLOCKSTATE();
2582                     printf("Nfsd: openctrl unexpected state err=%d\n",
2583                               error);
2584                     free((caddr_t)new_lfp, M_NFSDLOCKFILE);
2585                     free((caddr_t)new_open, M_NFSDSTATE);
2586                     free((caddr_t)new_deleg, M_NFSDSTATE);
2587                     if (haslock) {
2588                               NFSLOCKV4ROOTMUTEX();
2589                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
2590                               NFSUNLOCKV4ROOTMUTEX();
2591                     }
2592                     error = NFSERR_EXPIRED;
2593                     goto out;
2594           }
2595 
2596           if (new_stp->ls_flags & NFSLCK_RECLAIM)
2597                     nfsrv_markstable(clp);
2598 
2599           /*
2600            * Get the structure for the underlying file.
2601            */
2602           if (getfhret)
2603                     error = getfhret;
2604           else
2605                     error = nfsrv_getlockfile(new_stp->ls_flags, &new_lfp, &lfp,
2606                         NULL, 0);
2607           if (new_lfp)
2608                     FREE((caddr_t)new_lfp, M_NFSDLOCKFILE);
2609           if (error) {
2610                     NFSUNLOCKSTATE();
2611                     printf("Nfsd openctrl unexpected getlockfile err=%d\n",
2612                         error);
2613                     free((caddr_t)new_open, M_NFSDSTATE);
2614                     free((caddr_t)new_deleg, M_NFSDSTATE);
2615                     if (haslock) {
2616                               NFSLOCKV4ROOTMUTEX();
2617                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
2618                               NFSUNLOCKV4ROOTMUTEX();
2619                     }
2620                     goto out;
2621           }
2622 
2623           /*
2624            * Search for a conflicting open/share.
2625            */
2626           if (new_stp->ls_flags & NFSLCK_DELEGCUR) {
2627               /*
2628                * For Delegate_Cur, search for the matching Delegation,
2629                * which indicates no conflict.
2630                * An old delegation should have been recovered by the
2631                * client doing a Claim_DELEGATE_Prev, so I won't let
2632                * it match and return NFSERR_EXPIRED. Should I let it
2633                * match?
2634                */
2635               LIST_FOREACH(stp, &lfp->lf_deleg, ls_file) {
2636                     if (!(stp->ls_flags & NFSLCK_OLDDELEG) &&
2637                         (((nd->nd_flag & ND_NFSV41) != 0 &&
2638                         stateidp->seqid == 0) ||
2639                         stateidp->seqid == stp->ls_stateid.seqid) &&
2640                         !NFSBCMP(stateidp->other, stp->ls_stateid.other,
2641                               NFSX_STATEIDOTHER))
2642                               break;
2643               }
2644               if (stp == NULL ||
2645                     ((new_stp->ls_flags & NFSLCK_WRITEACCESS) &&
2646                      (stp->ls_flags & NFSLCK_DELEGREAD))) {
2647                     NFSUNLOCKSTATE();
2648                     printf("Nfsd openctrl unexpected expiry\n");
2649                     free((caddr_t)new_open, M_NFSDSTATE);
2650                     free((caddr_t)new_deleg, M_NFSDSTATE);
2651                     if (haslock) {
2652                               NFSLOCKV4ROOTMUTEX();
2653                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
2654                               NFSUNLOCKV4ROOTMUTEX();
2655                     }
2656                     error = NFSERR_EXPIRED;
2657                     goto out;
2658               }
2659 
2660               /*
2661                * Don't issue a Delegation, since one already exists and
2662                * delay delegation timeout, as required.
2663                */
2664               delegate = 0;
2665               nfsrv_delaydelegtimeout(stp);
2666           }
2667 
2668           /*
2669            * Check for access/deny bit conflicts. I also check for the
2670            * same owner, since the client might not have bothered to check.
2671            * Also, note an open for the same file and owner, if found,
2672            * which is all we do here for Delegate_Cur, since conflict
2673            * checking is already done.
2674            */
2675           LIST_FOREACH(stp, &lfp->lf_open, ls_file) {
2676                     if (ownerstp && stp->ls_openowner == ownerstp)
2677                               openstp = stp;
2678                     if (!(new_stp->ls_flags & NFSLCK_DELEGCUR)) {
2679                         /*
2680                          * If another client has the file open, the only
2681                          * delegation that can be issued is a Read delegation
2682                          * and only if it is a Read open with Deny none.
2683                          */
2684                         if (clp != stp->ls_clp) {
2685                               if ((stp->ls_flags & NFSLCK_SHAREBITS) ==
2686                                   NFSLCK_READACCESS)
2687                                   writedeleg = 0;
2688                               else
2689                                   delegate = 0;
2690                         }
2691                         if(((new_stp->ls_flags & NFSLCK_ACCESSBITS) &
2692                             ((stp->ls_flags>>NFSLCK_SHIFT) & NFSLCK_ACCESSBITS))||
2693                            ((stp->ls_flags & NFSLCK_ACCESSBITS) &
2694                             ((new_stp->ls_flags>>NFSLCK_SHIFT)&NFSLCK_ACCESSBITS))){
2695                               ret = nfsrv_clientconflict(stp->ls_clp,&haslock,vp,p);
2696                               if (ret == 1) {
2697                                         /*
2698                                          * nfsrv_clientconflict() unlocks state
2699                                          * when it returns non-zero.
2700                                          */
2701                                         free((caddr_t)new_open, M_NFSDSTATE);
2702                                         free((caddr_t)new_deleg, M_NFSDSTATE);
2703                                         openstp = NULL;
2704                                         goto tryagain;
2705                               }
2706                               if (ret == 2)
2707                                         error = NFSERR_PERM;
2708                               else if (new_stp->ls_flags & NFSLCK_RECLAIM)
2709                                         error = NFSERR_RECLAIMCONFLICT;
2710                               else
2711                                         error = NFSERR_SHAREDENIED;
2712                               if (ret == 0)
2713                                         NFSUNLOCKSTATE();
2714                               if (haslock) {
2715                                         NFSLOCKV4ROOTMUTEX();
2716                                         nfsv4_unlock(&nfsv4rootfs_lock, 1);
2717                                         NFSUNLOCKV4ROOTMUTEX();
2718                               }
2719                               free((caddr_t)new_open, M_NFSDSTATE);
2720                               free((caddr_t)new_deleg, M_NFSDSTATE);
2721                               printf("nfsd openctrl unexpected client cnfl\n");
2722                               goto out;
2723                         }
2724                     }
2725           }
2726 
2727           /*
2728            * Check for a conflicting delegation. If one is found, call
2729            * nfsrv_delegconflict() to handle it. If the v4root lock hasn't
2730            * been set yet, it will get the lock. Otherwise, it will recall
2731            * the delegation. Then, we try try again...
2732            * (If NFSLCK_DELEGCUR is set, it has a delegation, so there
2733            *  isn't a conflict.)
2734            * I currently believe the conflict algorithm to be:
2735            * For Open with Read Access and Deny None
2736            * - there is a conflict iff a different client has a write delegation
2737            * For Open with other Write Access or any Deny except None
2738            * - there is a conflict if a different client has any delegation
2739            * - there is a conflict if the same client has a read delegation
2740            *   (The current consensus is that this last case should be
2741            *    considered a conflict since the client with a read delegation
2742            *    could have done an Open with ReadAccess and WriteDeny
2743            *    locally and then not have checked for the WriteDeny.)
2744            */
2745           if (!(new_stp->ls_flags & (NFSLCK_DELEGPREV | NFSLCK_DELEGCUR))) {
2746               stp = LIST_FIRST(&lfp->lf_deleg);
2747               while (stp != NULL) {
2748                     nstp = LIST_NEXT(stp, ls_file);
2749                     if (stp->ls_clp != clp && (stp->ls_flags & NFSLCK_DELEGREAD))
2750                               writedeleg = 0;
2751                     else
2752                               delegate = 0;
2753                     if ((readonly && stp->ls_clp != clp &&
2754                            (stp->ls_flags & NFSLCK_DELEGWRITE)) ||
2755                         (!readonly && (stp->ls_clp != clp ||
2756                              (stp->ls_flags & NFSLCK_DELEGREAD)))) {
2757                         if (new_stp->ls_flags & NFSLCK_RECLAIM) {
2758                               delegate = 2;
2759                         } else {
2760                               ret = nfsrv_delegconflict(stp, &haslock, p, vp);
2761                               if (ret) {
2762                                   /*
2763                                    * nfsrv_delegconflict() unlocks state
2764                                    * when it returns non-zero.
2765                                    */
2766                                   printf("Nfsd openctrl unexpected deleg cnfl\n");
2767                                   free((caddr_t)new_open, M_NFSDSTATE);
2768                                   free((caddr_t)new_deleg, M_NFSDSTATE);
2769                                   if (ret == -1) {
2770                                         openstp = NULL;
2771                                         goto tryagain;
2772                                   }
2773                                   error = ret;
2774                                   goto out;
2775                               }
2776                         }
2777                     }
2778                     stp = nstp;
2779               }
2780           }
2781 
2782           /*
2783            * We only get here if there was no open that conflicted.
2784            * If an open for the owner exists, or in the access/deny bits.
2785            * Otherwise it is a new open. If the open_owner hasn't been
2786            * confirmed, replace the open with the new one needing confirmation,
2787            * otherwise add the open.
2788            */
2789           if (new_stp->ls_flags & NFSLCK_DELEGPREV) {
2790               /*
2791                * Handle NFSLCK_DELEGPREV by searching the old delegations for
2792                * a match. If found, just move the old delegation to the current
2793                * delegation list and issue open. If not found, return
2794                * NFSERR_EXPIRED.
2795                */
2796               LIST_FOREACH(stp, &clp->lc_olddeleg, ls_list) {
2797                     if (stp->ls_lfp == lfp) {
2798                         /* Found it */
2799                         if (stp->ls_clp != clp)
2800                               panic("olddeleg clp");
2801                         LIST_REMOVE(stp, ls_list);
2802                         LIST_REMOVE(stp, ls_hash);
2803                         stp->ls_flags &= ~NFSLCK_OLDDELEG;
2804                         stp->ls_stateid.seqid = delegstateidp->seqid = 1;
2805                         stp->ls_stateid.other[0] = delegstateidp->other[0] =
2806                               clp->lc_clientid.lval[0];
2807                         stp->ls_stateid.other[1] = delegstateidp->other[1] =
2808                               clp->lc_clientid.lval[1];
2809                         stp->ls_stateid.other[2] = delegstateidp->other[2] =
2810                               nfsrv_nextstateindex(clp);
2811                         stp->ls_compref = nd->nd_compref;
2812                         LIST_INSERT_HEAD(&clp->lc_deleg, stp, ls_list);
2813                         LIST_INSERT_HEAD(NFSSTATEHASH(clp,
2814                               stp->ls_stateid), stp, ls_hash);
2815                         if (stp->ls_flags & NFSLCK_DELEGWRITE)
2816                               *rflagsp |= NFSV4OPEN_WRITEDELEGATE;
2817                         else
2818                               *rflagsp |= NFSV4OPEN_READDELEGATE;
2819                         clp->lc_delegtime = NFSD_MONOSEC +
2820                               nfsrv_lease + NFSRV_LEASEDELTA;
2821 
2822                         /*
2823                          * Now, do the associated open.
2824                          */
2825                         new_open->ls_stateid.seqid = 1;
2826                         new_open->ls_stateid.other[0] = clp->lc_clientid.lval[0];
2827                         new_open->ls_stateid.other[1] = clp->lc_clientid.lval[1];
2828                         new_open->ls_stateid.other[2] = nfsrv_nextstateindex(clp);
2829                         new_open->ls_flags = (new_stp->ls_flags&NFSLCK_DENYBITS)|
2830                               NFSLCK_OPEN;
2831                         if (stp->ls_flags & NFSLCK_DELEGWRITE)
2832                               new_open->ls_flags |= (NFSLCK_READACCESS |
2833                                   NFSLCK_WRITEACCESS);
2834                         else
2835                               new_open->ls_flags |= NFSLCK_READACCESS;
2836                         new_open->ls_uid = new_stp->ls_uid;
2837                         new_open->ls_lfp = lfp;
2838                         new_open->ls_clp = clp;
2839                         LIST_INIT(&new_open->ls_open);
2840                         LIST_INSERT_HEAD(&lfp->lf_open, new_open, ls_file);
2841                         LIST_INSERT_HEAD(NFSSTATEHASH(clp, new_open->ls_stateid),
2842                               new_open, ls_hash);
2843                         /*
2844                          * and handle the open owner
2845                          */
2846                         if (ownerstp) {
2847                               new_open->ls_openowner = ownerstp;
2848                               LIST_INSERT_HEAD(&ownerstp->ls_open,new_open,ls_list);
2849                         } else {
2850                               new_open->ls_openowner = new_stp;
2851                               new_stp->ls_flags = 0;
2852                               nfsrvd_refcache(new_stp->ls_op);
2853                               new_stp->ls_noopens = 0;
2854                               LIST_INIT(&new_stp->ls_open);
2855                               LIST_INSERT_HEAD(&new_stp->ls_open, new_open, ls_list);
2856                               LIST_INSERT_HEAD(&clp->lc_open, new_stp, ls_list);
2857                               *new_stpp = NULL;
2858                               nfsstatsv1.srvopenowners++;
2859                               nfsrv_openpluslock++;
2860                         }
2861                         openstp = new_open;
2862                         new_open = NULL;
2863                         nfsstatsv1.srvopens++;
2864                         nfsrv_openpluslock++;
2865                         break;
2866                     }
2867               }
2868               if (stp == NULL)
2869                     error = NFSERR_EXPIRED;
2870           } else if (new_stp->ls_flags & (NFSLCK_DELEGREAD | NFSLCK_DELEGWRITE)) {
2871               /*
2872                * Scan to see that no delegation for this client and file
2873                * doesn't already exist.
2874                * There also shouldn't yet be an Open for this file and
2875                * openowner.
2876                */
2877               LIST_FOREACH(stp, &lfp->lf_deleg, ls_file) {
2878                     if (stp->ls_clp == clp)
2879                         break;
2880               }
2881               if (stp == NULL && openstp == NULL) {
2882                     /*
2883                      * This is the Claim_Previous case with a delegation
2884                      * type != Delegate_None.
2885                      */
2886                     /*
2887                      * First, add the delegation. (Although we must issue the
2888                      * delegation, we can also ask for an immediate return.)
2889                      */
2890                     new_deleg->ls_stateid.seqid = delegstateidp->seqid = 1;
2891                     new_deleg->ls_stateid.other[0] = delegstateidp->other[0] =
2892                         clp->lc_clientid.lval[0];
2893                     new_deleg->ls_stateid.other[1] = delegstateidp->other[1] =
2894                         clp->lc_clientid.lval[1];
2895                     new_deleg->ls_stateid.other[2] = delegstateidp->other[2] =
2896                         nfsrv_nextstateindex(clp);
2897                     if (new_stp->ls_flags & NFSLCK_DELEGWRITE) {
2898                         new_deleg->ls_flags = (NFSLCK_DELEGWRITE |
2899                               NFSLCK_READACCESS | NFSLCK_WRITEACCESS);
2900                         *rflagsp |= NFSV4OPEN_WRITEDELEGATE;
2901                     } else {
2902                         new_deleg->ls_flags = (NFSLCK_DELEGREAD |
2903                               NFSLCK_READACCESS);
2904                         *rflagsp |= NFSV4OPEN_READDELEGATE;
2905                     }
2906                     new_deleg->ls_uid = new_stp->ls_uid;
2907                     new_deleg->ls_lfp = lfp;
2908                     new_deleg->ls_clp = clp;
2909                     new_deleg->ls_filerev = filerev;
2910                     new_deleg->ls_compref = nd->nd_compref;
2911                     LIST_INSERT_HEAD(&lfp->lf_deleg, new_deleg, ls_file);
2912                     LIST_INSERT_HEAD(NFSSTATEHASH(clp,
2913                         new_deleg->ls_stateid), new_deleg, ls_hash);
2914                     LIST_INSERT_HEAD(&clp->lc_deleg, new_deleg, ls_list);
2915                     new_deleg = NULL;
2916                     if (delegate == 2 || nfsrv_issuedelegs == 0 ||
2917                         (clp->lc_flags & (LCL_CALLBACKSON | LCL_CBDOWN)) !=
2918                          LCL_CALLBACKSON ||
2919                         NFSRV_V4DELEGLIMIT(nfsrv_delegatecnt) ||
2920                         !NFSVNO_DELEGOK(vp))
2921                         *rflagsp |= NFSV4OPEN_RECALL;
2922                     nfsstatsv1.srvdelegates++;
2923                     nfsrv_openpluslock++;
2924                     nfsrv_delegatecnt++;
2925 
2926                     /*
2927                      * Now, do the associated open.
2928                      */
2929                     new_open->ls_stateid.seqid = 1;
2930                     new_open->ls_stateid.other[0] = clp->lc_clientid.lval[0];
2931                     new_open->ls_stateid.other[1] = clp->lc_clientid.lval[1];
2932                     new_open->ls_stateid.other[2] = nfsrv_nextstateindex(clp);
2933                     new_open->ls_flags = (new_stp->ls_flags & NFSLCK_DENYBITS) |
2934                         NFSLCK_OPEN;
2935                     if (new_stp->ls_flags & NFSLCK_DELEGWRITE)
2936                               new_open->ls_flags |= (NFSLCK_READACCESS |
2937                                   NFSLCK_WRITEACCESS);
2938                     else
2939                               new_open->ls_flags |= NFSLCK_READACCESS;
2940                     new_open->ls_uid = new_stp->ls_uid;
2941                     new_open->ls_lfp = lfp;
2942                     new_open->ls_clp = clp;
2943                     LIST_INIT(&new_open->ls_open);
2944                     LIST_INSERT_HEAD(&lfp->lf_open, new_open, ls_file);
2945                     LIST_INSERT_HEAD(NFSSTATEHASH(clp, new_open->ls_stateid),
2946                        new_open, ls_hash);
2947                     /*
2948                      * and handle the open owner
2949                      */
2950                     if (ownerstp) {
2951                         new_open->ls_openowner = ownerstp;
2952                         LIST_INSERT_HEAD(&ownerstp->ls_open, new_open, ls_list);
2953                     } else {
2954                         new_open->ls_openowner = new_stp;
2955                         new_stp->ls_flags = 0;
2956                         nfsrvd_refcache(new_stp->ls_op);
2957                         new_stp->ls_noopens = 0;
2958                         LIST_INIT(&new_stp->ls_open);
2959                         LIST_INSERT_HEAD(&new_stp->ls_open, new_open, ls_list);
2960                         LIST_INSERT_HEAD(&clp->lc_open, new_stp, ls_list);
2961                         *new_stpp = NULL;
2962                         nfsstatsv1.srvopenowners++;
2963                         nfsrv_openpluslock++;
2964                     }
2965                     openstp = new_open;
2966                     new_open = NULL;
2967                     nfsstatsv1.srvopens++;
2968                     nfsrv_openpluslock++;
2969               } else {
2970                     error = NFSERR_RECLAIMCONFLICT;
2971               }
2972           } else if (ownerstp) {
2973                     if (ownerstp->ls_flags & NFSLCK_NEEDSCONFIRM) {
2974                         /* Replace the open */
2975                         if (ownerstp->ls_op)
2976                               nfsrvd_derefcache(ownerstp->ls_op);
2977                         ownerstp->ls_op = new_stp->ls_op;
2978                         nfsrvd_refcache(ownerstp->ls_op);
2979                         ownerstp->ls_seq = new_stp->ls_seq;
2980                         *rflagsp |= NFSV4OPEN_RESULTCONFIRM;
2981                         stp = LIST_FIRST(&ownerstp->ls_open);
2982                         stp->ls_flags = (new_stp->ls_flags & NFSLCK_SHAREBITS) |
2983                               NFSLCK_OPEN;
2984                         stp->ls_stateid.seqid = 1;
2985                         stp->ls_uid = new_stp->ls_uid;
2986                         if (lfp != stp->ls_lfp) {
2987                               LIST_REMOVE(stp, ls_file);
2988                               LIST_INSERT_HEAD(&lfp->lf_open, stp, ls_file);
2989                               stp->ls_lfp = lfp;
2990                         }
2991                         openstp = stp;
2992                     } else if (openstp) {
2993                         openstp->ls_flags |= (new_stp->ls_flags & NFSLCK_SHAREBITS);
2994                         openstp->ls_stateid.seqid++;
2995                         if ((nd->nd_flag & ND_NFSV41) != 0 &&
2996                               openstp->ls_stateid.seqid == 0)
2997                               openstp->ls_stateid.seqid = 1;
2998 
2999                         /*
3000                          * This is where we can choose to issue a delegation.
3001                          */
3002                         if (delegate == 0 || writedeleg == 0 ||
3003                               NFSVNO_EXRDONLY(exp) || (readonly != 0 &&
3004                               nfsrv_writedelegifpos == 0) ||
3005                               !NFSVNO_DELEGOK(vp) ||
3006                               (new_stp->ls_flags & NFSLCK_WANTRDELEG) != 0 ||
3007                               (clp->lc_flags & (LCL_CALLBACKSON | LCL_CBDOWN)) !=
3008                                LCL_CALLBACKSON)
3009                               *rflagsp |= NFSV4OPEN_WDCONTENTION;
3010                         else if (nfsrv_issuedelegs == 0 ||
3011                               NFSRV_V4DELEGLIMIT(nfsrv_delegatecnt))
3012                               *rflagsp |= NFSV4OPEN_WDRESOURCE;
3013                         else if ((new_stp->ls_flags & NFSLCK_WANTNODELEG) != 0)
3014                               *rflagsp |= NFSV4OPEN_WDNOTWANTED;
3015                         else {
3016                               new_deleg->ls_stateid.seqid = delegstateidp->seqid = 1;
3017                               new_deleg->ls_stateid.other[0] = delegstateidp->other[0]
3018                                   = clp->lc_clientid.lval[0];
3019                               new_deleg->ls_stateid.other[1] = delegstateidp->other[1]
3020                                   = clp->lc_clientid.lval[1];
3021                               new_deleg->ls_stateid.other[2] = delegstateidp->other[2]
3022                                   = nfsrv_nextstateindex(clp);
3023                               new_deleg->ls_flags = (NFSLCK_DELEGWRITE |
3024                                   NFSLCK_READACCESS | NFSLCK_WRITEACCESS);
3025                               *rflagsp |= NFSV4OPEN_WRITEDELEGATE;
3026                               new_deleg->ls_uid = new_stp->ls_uid;
3027                               new_deleg->ls_lfp = lfp;
3028                               new_deleg->ls_clp = clp;
3029                               new_deleg->ls_filerev = filerev;
3030                               new_deleg->ls_compref = nd->nd_compref;
3031                               LIST_INSERT_HEAD(&lfp->lf_deleg, new_deleg, ls_file);
3032                               LIST_INSERT_HEAD(NFSSTATEHASH(clp,
3033                                   new_deleg->ls_stateid), new_deleg, ls_hash);
3034                               LIST_INSERT_HEAD(&clp->lc_deleg, new_deleg, ls_list);
3035                               new_deleg = NULL;
3036                               nfsstatsv1.srvdelegates++;
3037                               nfsrv_openpluslock++;
3038                               nfsrv_delegatecnt++;
3039                         }
3040                     } else {
3041                         new_open->ls_stateid.seqid = 1;
3042                         new_open->ls_stateid.other[0] = clp->lc_clientid.lval[0];
3043                         new_open->ls_stateid.other[1] = clp->lc_clientid.lval[1];
3044                         new_open->ls_stateid.other[2] = nfsrv_nextstateindex(clp);
3045                         new_open->ls_flags = (new_stp->ls_flags & NFSLCK_SHAREBITS)|
3046                               NFSLCK_OPEN;
3047                         new_open->ls_uid = new_stp->ls_uid;
3048                         new_open->ls_openowner = ownerstp;
3049                         new_open->ls_lfp = lfp;
3050                         new_open->ls_clp = clp;
3051                         LIST_INIT(&new_open->ls_open);
3052                         LIST_INSERT_HEAD(&lfp->lf_open, new_open, ls_file);
3053                         LIST_INSERT_HEAD(&ownerstp->ls_open, new_open, ls_list);
3054                         LIST_INSERT_HEAD(NFSSTATEHASH(clp, new_open->ls_stateid),
3055                               new_open, ls_hash);
3056                         openstp = new_open;
3057                         new_open = NULL;
3058                         nfsstatsv1.srvopens++;
3059                         nfsrv_openpluslock++;
3060 
3061                         /*
3062                          * This is where we can choose to issue a delegation.
3063                          */
3064                         if (delegate == 0 || (writedeleg == 0 && readonly == 0) ||
3065                               !NFSVNO_DELEGOK(vp) ||
3066                               (clp->lc_flags & (LCL_CALLBACKSON | LCL_CBDOWN)) !=
3067                                LCL_CALLBACKSON)
3068                               *rflagsp |= NFSV4OPEN_WDCONTENTION;
3069                         else if (nfsrv_issuedelegs == 0 ||
3070                               NFSRV_V4DELEGLIMIT(nfsrv_delegatecnt))
3071                               *rflagsp |= NFSV4OPEN_WDRESOURCE;
3072                         else if ((new_stp->ls_flags & NFSLCK_WANTNODELEG) != 0)
3073                               *rflagsp |= NFSV4OPEN_WDNOTWANTED;
3074                         else {
3075                               new_deleg->ls_stateid.seqid = delegstateidp->seqid = 1;
3076                               new_deleg->ls_stateid.other[0] = delegstateidp->other[0]
3077                                   = clp->lc_clientid.lval[0];
3078                               new_deleg->ls_stateid.other[1] = delegstateidp->other[1]
3079                                   = clp->lc_clientid.lval[1];
3080                               new_deleg->ls_stateid.other[2] = delegstateidp->other[2]
3081                                   = nfsrv_nextstateindex(clp);
3082                               if (writedeleg && !NFSVNO_EXRDONLY(exp) &&
3083                                   (nfsrv_writedelegifpos || !readonly) &&
3084                                   (new_stp->ls_flags & NFSLCK_WANTRDELEG) == 0) {
3085                                   new_deleg->ls_flags = (NFSLCK_DELEGWRITE |
3086                                         NFSLCK_READACCESS | NFSLCK_WRITEACCESS);
3087                                   *rflagsp |= NFSV4OPEN_WRITEDELEGATE;
3088                               } else {
3089                                   new_deleg->ls_flags = (NFSLCK_DELEGREAD |
3090                                         NFSLCK_READACCESS);
3091                                   *rflagsp |= NFSV4OPEN_READDELEGATE;
3092                               }
3093                               new_deleg->ls_uid = new_stp->ls_uid;
3094                               new_deleg->ls_lfp = lfp;
3095                               new_deleg->ls_clp = clp;
3096                               new_deleg->ls_filerev = filerev;
3097                               new_deleg->ls_compref = nd->nd_compref;
3098                               LIST_INSERT_HEAD(&lfp->lf_deleg, new_deleg, ls_file);
3099                               LIST_INSERT_HEAD(NFSSTATEHASH(clp,
3100                                   new_deleg->ls_stateid), new_deleg, ls_hash);
3101                               LIST_INSERT_HEAD(&clp->lc_deleg, new_deleg, ls_list);
3102                               new_deleg = NULL;
3103                               nfsstatsv1.srvdelegates++;
3104                               nfsrv_openpluslock++;
3105                               nfsrv_delegatecnt++;
3106                         }
3107                     }
3108           } else {
3109                     /*
3110                      * New owner case. Start the open_owner sequence with a
3111                      * Needs confirmation (unless a reclaim) and hang the
3112                      * new open off it.
3113                      */
3114                     new_open->ls_stateid.seqid = 1;
3115                     new_open->ls_stateid.other[0] = clp->lc_clientid.lval[0];
3116                     new_open->ls_stateid.other[1] = clp->lc_clientid.lval[1];
3117                     new_open->ls_stateid.other[2] = nfsrv_nextstateindex(clp);
3118                     new_open->ls_flags = (new_stp->ls_flags & NFSLCK_SHAREBITS) |
3119                         NFSLCK_OPEN;
3120                     new_open->ls_uid = new_stp->ls_uid;
3121                     LIST_INIT(&new_open->ls_open);
3122                     new_open->ls_openowner = new_stp;
3123                     new_open->ls_lfp = lfp;
3124                     new_open->ls_clp = clp;
3125                     LIST_INSERT_HEAD(&lfp->lf_open, new_open, ls_file);
3126                     if (new_stp->ls_flags & NFSLCK_RECLAIM) {
3127                               new_stp->ls_flags = 0;
3128                     } else if ((nd->nd_flag & ND_NFSV41) != 0) {
3129                               /* NFSv4.1 never needs confirmation. */
3130                               new_stp->ls_flags = 0;
3131 
3132                               /*
3133                                * This is where we can choose to issue a delegation.
3134                                */
3135                               if (delegate && nfsrv_issuedelegs &&
3136                                   (writedeleg || readonly) &&
3137                                   (clp->lc_flags & (LCL_CALLBACKSON | LCL_CBDOWN)) ==
3138                                    LCL_CALLBACKSON &&
3139                                   !NFSRV_V4DELEGLIMIT(nfsrv_delegatecnt) &&
3140                                   NFSVNO_DELEGOK(vp) &&
3141                                   ((nd->nd_flag & ND_NFSV41) == 0 ||
3142                                    (new_stp->ls_flags & NFSLCK_WANTNODELEG) == 0)) {
3143                                         new_deleg->ls_stateid.seqid =
3144                                             delegstateidp->seqid = 1;
3145                                         new_deleg->ls_stateid.other[0] =
3146                                             delegstateidp->other[0]
3147                                             = clp->lc_clientid.lval[0];
3148                                         new_deleg->ls_stateid.other[1] =
3149                                             delegstateidp->other[1]
3150                                             = clp->lc_clientid.lval[1];
3151                                         new_deleg->ls_stateid.other[2] =
3152                                             delegstateidp->other[2]
3153                                             = nfsrv_nextstateindex(clp);
3154                                         if (writedeleg && !NFSVNO_EXRDONLY(exp) &&
3155                                             (nfsrv_writedelegifpos || !readonly) &&
3156                                             ((nd->nd_flag & ND_NFSV41) == 0 ||
3157                                              (new_stp->ls_flags & NFSLCK_WANTRDELEG) ==
3158                                              0)) {
3159                                                   new_deleg->ls_flags =
3160                                                       (NFSLCK_DELEGWRITE |
3161                                                        NFSLCK_READACCESS |
3162                                                        NFSLCK_WRITEACCESS);
3163                                                   *rflagsp |= NFSV4OPEN_WRITEDELEGATE;
3164                                         } else {
3165                                                   new_deleg->ls_flags =
3166                                                       (NFSLCK_DELEGREAD |
3167                                                        NFSLCK_READACCESS);
3168                                                   *rflagsp |= NFSV4OPEN_READDELEGATE;
3169                                         }
3170                                         new_deleg->ls_uid = new_stp->ls_uid;
3171                                         new_deleg->ls_lfp = lfp;
3172                                         new_deleg->ls_clp = clp;
3173                                         new_deleg->ls_filerev = filerev;
3174                                         new_deleg->ls_compref = nd->nd_compref;
3175                                         LIST_INSERT_HEAD(&lfp->lf_deleg, new_deleg,
3176                                             ls_file);
3177                                         LIST_INSERT_HEAD(NFSSTATEHASH(clp,
3178                                             new_deleg->ls_stateid), new_deleg, ls_hash);
3179                                         LIST_INSERT_HEAD(&clp->lc_deleg, new_deleg,
3180                                             ls_list);
3181                                         new_deleg = NULL;
3182                                         nfsstatsv1.srvdelegates++;
3183                                         nfsrv_openpluslock++;
3184                                         nfsrv_delegatecnt++;
3185                               }
3186                     } else {
3187                               *rflagsp |= NFSV4OPEN_RESULTCONFIRM;
3188                               new_stp->ls_flags = NFSLCK_NEEDSCONFIRM;
3189                     }
3190                     nfsrvd_refcache(new_stp->ls_op);
3191                     new_stp->ls_noopens = 0;
3192                     LIST_INIT(&new_stp->ls_open);
3193                     LIST_INSERT_HEAD(&new_stp->ls_open, new_open, ls_list);
3194                     LIST_INSERT_HEAD(&clp->lc_open, new_stp, ls_list);
3195                     LIST_INSERT_HEAD(NFSSTATEHASH(clp, new_open->ls_stateid),
3196                         new_open, ls_hash);
3197                     openstp = new_open;
3198                     new_open = NULL;
3199                     *new_stpp = NULL;
3200                     nfsstatsv1.srvopens++;
3201                     nfsrv_openpluslock++;
3202                     nfsstatsv1.srvopenowners++;
3203                     nfsrv_openpluslock++;
3204           }
3205           if (!error) {
3206                     stateidp->seqid = openstp->ls_stateid.seqid;
3207                     stateidp->other[0] = openstp->ls_stateid.other[0];
3208                     stateidp->other[1] = openstp->ls_stateid.other[1];
3209                     stateidp->other[2] = openstp->ls_stateid.other[2];
3210           }
3211           NFSUNLOCKSTATE();
3212           if (haslock) {
3213                     NFSLOCKV4ROOTMUTEX();
3214                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
3215                     NFSUNLOCKV4ROOTMUTEX();
3216           }
3217           if (new_open)
3218                     FREE((caddr_t)new_open, M_NFSDSTATE);
3219           if (new_deleg)
3220                     FREE((caddr_t)new_deleg, M_NFSDSTATE);
3221 
3222 out:
3223           NFSEXITCODE2(error, nd);
3224           return (error);
3225 }
3226 
3227 /*
3228  * Open update. Does the confirm, downgrade and close.
3229  */
3230 APPLESTATIC int
nfsrv_openupdate(vnode_t vp,struct nfsstate * new_stp,nfsquad_t clientid,nfsv4stateid_t * stateidp,struct nfsrv_descript * nd,NFSPROC_T * p)3231 nfsrv_openupdate(vnode_t vp, struct nfsstate *new_stp, nfsquad_t clientid,
3232     nfsv4stateid_t *stateidp, struct nfsrv_descript *nd, NFSPROC_T *p)
3233 {
3234           struct nfsstate *stp, *ownerstp;
3235           struct nfsclient *clp;
3236           struct nfslockfile *lfp;
3237           u_int32_t bits;
3238           int error = 0, gotstate = 0, len = 0;
3239           u_char client[NFSV4_OPAQUELIMIT];
3240 
3241           /*
3242            * Check for restart conditions (client and server).
3243            */
3244           error = nfsrv_checkrestart(clientid, new_stp->ls_flags,
3245               &new_stp->ls_stateid, 0);
3246           if (error)
3247                     goto out;
3248 
3249           NFSLOCKSTATE();
3250           /*
3251            * Get the open structure via clientid and stateid.
3252            */
3253           error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
3254               (nfsquad_t)((u_quad_t)0), 0, nd, p);
3255           if (!error)
3256                     error = nfsrv_getstate(clp, &new_stp->ls_stateid,
3257                         new_stp->ls_flags, &stp);
3258 
3259           /*
3260            * Sanity check the open.
3261            */
3262           if (!error && (!(stp->ls_flags & NFSLCK_OPEN) ||
3263                     (!(new_stp->ls_flags & NFSLCK_CONFIRM) &&
3264                      (stp->ls_openowner->ls_flags & NFSLCK_NEEDSCONFIRM)) ||
3265                     ((new_stp->ls_flags & NFSLCK_CONFIRM) &&
3266                      (!(stp->ls_openowner->ls_flags & NFSLCK_NEEDSCONFIRM)))))
3267                     error = NFSERR_BADSTATEID;
3268 
3269           if (!error)
3270                     error = nfsrv_checkseqid(nd, new_stp->ls_seq,
3271                         stp->ls_openowner, new_stp->ls_op);
3272           if (!error && stp->ls_stateid.seqid != new_stp->ls_stateid.seqid &&
3273               (((nd->nd_flag & ND_NFSV41) == 0 &&
3274                 !(new_stp->ls_flags & NFSLCK_CONFIRM)) ||
3275                ((nd->nd_flag & ND_NFSV41) != 0 &&
3276                 new_stp->ls_stateid.seqid != 0)))
3277                     error = NFSERR_OLDSTATEID;
3278           if (!error && vnode_vtype(vp) != VREG) {
3279                     if (vnode_vtype(vp) == VDIR)
3280                               error = NFSERR_ISDIR;
3281                     else
3282                               error = NFSERR_INVAL;
3283           }
3284 
3285           if (error) {
3286                     /*
3287                      * If a client tries to confirm an Open with a bad
3288                      * seqid# and there are no byte range locks or other Opens
3289                      * on the openowner, just throw it away, so the next use of the
3290                      * openowner will start a fresh seq#.
3291                      */
3292                     if (error == NFSERR_BADSEQID &&
3293                         (new_stp->ls_flags & NFSLCK_CONFIRM) &&
3294                         nfsrv_nootherstate(stp))
3295                               nfsrv_freeopenowner(stp->ls_openowner, 0, p);
3296                     NFSUNLOCKSTATE();
3297                     goto out;
3298           }
3299 
3300           /*
3301            * Set the return stateid.
3302            */
3303           stateidp->seqid = stp->ls_stateid.seqid + 1;
3304           if ((nd->nd_flag & ND_NFSV41) != 0 && stateidp->seqid == 0)
3305                     stateidp->seqid = 1;
3306           stateidp->other[0] = stp->ls_stateid.other[0];
3307           stateidp->other[1] = stp->ls_stateid.other[1];
3308           stateidp->other[2] = stp->ls_stateid.other[2];
3309           /*
3310            * Now, handle the three cases.
3311            */
3312           if (new_stp->ls_flags & NFSLCK_CONFIRM) {
3313                     /*
3314                      * If the open doesn't need confirmation, it seems to me that
3315                      * there is a client error, but I'll just log it and keep going?
3316                      */
3317                     if (!(stp->ls_openowner->ls_flags & NFSLCK_NEEDSCONFIRM))
3318                               printf("Nfsv4d: stray open confirm\n");
3319                     stp->ls_openowner->ls_flags = 0;
3320                     stp->ls_stateid.seqid++;
3321                     if ((nd->nd_flag & ND_NFSV41) != 0 &&
3322                         stp->ls_stateid.seqid == 0)
3323                               stp->ls_stateid.seqid = 1;
3324                     if (!(clp->lc_flags & LCL_STAMPEDSTABLE)) {
3325                               clp->lc_flags |= LCL_STAMPEDSTABLE;
3326                               len = clp->lc_idlen;
3327                               NFSBCOPY(clp->lc_id, client, len);
3328                               gotstate = 1;
3329                     }
3330                     NFSUNLOCKSTATE();
3331           } else if (new_stp->ls_flags & NFSLCK_CLOSE) {
3332                     ownerstp = stp->ls_openowner;
3333                     lfp = stp->ls_lfp;
3334                     if (nfsrv_dolocallocks != 0 && !LIST_EMPTY(&stp->ls_open)) {
3335                               /* Get the lf lock */
3336                               nfsrv_locklf(lfp);
3337                               NFSUNLOCKSTATE();
3338                               ASSERT_VOP_ELOCKED(vp, "nfsrv_openupdate");
3339                               NFSVOPUNLOCK(vp, 0);
3340                               if (nfsrv_freeopen(stp, vp, 1, p) == 0) {
3341                                         NFSLOCKSTATE();
3342                                         nfsrv_unlocklf(lfp);
3343                                         NFSUNLOCKSTATE();
3344                               }
3345                               NFSVOPLOCK(vp, LK_EXCLUSIVE | LK_RETRY);
3346                     } else {
3347                               (void) nfsrv_freeopen(stp, NULL, 0, p);
3348                               NFSUNLOCKSTATE();
3349                     }
3350           } else {
3351                     /*
3352                      * Update the share bits, making sure that the new set are a
3353                      * subset of the old ones.
3354                      */
3355                     bits = (new_stp->ls_flags & NFSLCK_SHAREBITS);
3356                     if (~(stp->ls_flags) & bits) {
3357                               NFSUNLOCKSTATE();
3358                               error = NFSERR_INVAL;
3359                               goto out;
3360                     }
3361                     stp->ls_flags = (bits | NFSLCK_OPEN);
3362                     stp->ls_stateid.seqid++;
3363                     if ((nd->nd_flag & ND_NFSV41) != 0 &&
3364                         stp->ls_stateid.seqid == 0)
3365                               stp->ls_stateid.seqid = 1;
3366                     NFSUNLOCKSTATE();
3367           }
3368 
3369           /*
3370            * If the client just confirmed its first open, write a timestamp
3371            * to the stable storage file.
3372            */
3373           if (gotstate != 0) {
3374                     nfsrv_writestable(client, len, NFSNST_NEWSTATE, p);
3375                     nfsrv_backupstable();
3376           }
3377 
3378 out:
3379           NFSEXITCODE2(error, nd);
3380           return (error);
3381 }
3382 
3383 /*
3384  * Delegation update. Does the purge and return.
3385  */
3386 APPLESTATIC int
nfsrv_delegupdate(struct nfsrv_descript * nd,nfsquad_t clientid,nfsv4stateid_t * stateidp,vnode_t vp,int op,struct ucred * cred,NFSPROC_T * p)3387 nfsrv_delegupdate(struct nfsrv_descript *nd, nfsquad_t clientid,
3388     nfsv4stateid_t *stateidp, vnode_t vp, int op, struct ucred *cred,
3389     NFSPROC_T *p)
3390 {
3391           struct nfsstate *stp;
3392           struct nfsclient *clp;
3393           int error = 0;
3394           fhandle_t fh;
3395 
3396           /*
3397            * Do a sanity check against the file handle for DelegReturn.
3398            */
3399           if (vp) {
3400                     error = nfsvno_getfh(vp, &fh, p);
3401                     if (error)
3402                               goto out;
3403           }
3404           /*
3405            * Check for restart conditions (client and server).
3406            */
3407           if (op == NFSV4OP_DELEGRETURN)
3408                     error = nfsrv_checkrestart(clientid, NFSLCK_DELEGRETURN,
3409                               stateidp, 0);
3410           else
3411                     error = nfsrv_checkrestart(clientid, NFSLCK_DELEGPURGE,
3412                               stateidp, 0);
3413 
3414           NFSLOCKSTATE();
3415           /*
3416            * Get the open structure via clientid and stateid.
3417            */
3418           if (!error)
3419               error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
3420                     (nfsquad_t)((u_quad_t)0), 0, nd, p);
3421           if (error) {
3422                     if (error == NFSERR_CBPATHDOWN)
3423                               error = 0;
3424                     if (error == NFSERR_STALECLIENTID && op == NFSV4OP_DELEGRETURN)
3425                               error = NFSERR_STALESTATEID;
3426           }
3427           if (!error && op == NFSV4OP_DELEGRETURN) {
3428               error = nfsrv_getstate(clp, stateidp, NFSLCK_DELEGRETURN, &stp);
3429               if (!error && stp->ls_stateid.seqid != stateidp->seqid &&
3430                     ((nd->nd_flag & ND_NFSV41) == 0 || stateidp->seqid != 0))
3431                     error = NFSERR_OLDSTATEID;
3432           }
3433           /*
3434            * NFSERR_EXPIRED means that the state has gone away,
3435            * so Delegations have been purged. Just return ok.
3436            */
3437           if (error == NFSERR_EXPIRED && op == NFSV4OP_DELEGPURGE) {
3438                     NFSUNLOCKSTATE();
3439                     error = 0;
3440                     goto out;
3441           }
3442           if (error) {
3443                     NFSUNLOCKSTATE();
3444                     goto out;
3445           }
3446 
3447           if (op == NFSV4OP_DELEGRETURN) {
3448                     if (NFSBCMP((caddr_t)&fh, (caddr_t)&stp->ls_lfp->lf_fh,
3449                         sizeof (fhandle_t))) {
3450                               NFSUNLOCKSTATE();
3451                               error = NFSERR_BADSTATEID;
3452                               goto out;
3453                     }
3454                     nfsrv_freedeleg(stp);
3455           } else {
3456                     nfsrv_freedeleglist(&clp->lc_olddeleg);
3457           }
3458           NFSUNLOCKSTATE();
3459           error = 0;
3460 
3461 out:
3462           NFSEXITCODE(error);
3463           return (error);
3464 }
3465 
3466 /*
3467  * Release lock owner.
3468  */
3469 APPLESTATIC int
nfsrv_releaselckown(struct nfsstate * new_stp,nfsquad_t clientid,NFSPROC_T * p)3470 nfsrv_releaselckown(struct nfsstate *new_stp, nfsquad_t clientid,
3471     NFSPROC_T *p)
3472 {
3473           struct nfsstate *stp, *nstp, *openstp, *ownstp;
3474           struct nfsclient *clp;
3475           int error = 0;
3476 
3477           /*
3478            * Check for restart conditions (client and server).
3479            */
3480           error = nfsrv_checkrestart(clientid, new_stp->ls_flags,
3481               &new_stp->ls_stateid, 0);
3482           if (error)
3483                     goto out;
3484 
3485           NFSLOCKSTATE();
3486           /*
3487            * Get the lock owner by name.
3488            */
3489           error = nfsrv_getclient(clientid, CLOPS_RENEW, &clp, NULL,
3490               (nfsquad_t)((u_quad_t)0), 0, NULL, p);
3491           if (error) {
3492                     NFSUNLOCKSTATE();
3493                     goto out;
3494           }
3495           LIST_FOREACH(ownstp, &clp->lc_open, ls_list) {
3496               LIST_FOREACH(openstp, &ownstp->ls_open, ls_list) {
3497                     stp = LIST_FIRST(&openstp->ls_open);
3498                     while (stp != NULL) {
3499                         nstp = LIST_NEXT(stp, ls_list);
3500                         /*
3501                          * If the owner matches, check for locks and
3502                          * then free or return an error.
3503                          */
3504                         if (stp->ls_ownerlen == new_stp->ls_ownerlen &&
3505                               !NFSBCMP(stp->ls_owner, new_stp->ls_owner,
3506                                stp->ls_ownerlen)){
3507                               if (LIST_EMPTY(&stp->ls_lock)) {
3508                                   nfsrv_freelockowner(stp, NULL, 0, p);
3509                               } else {
3510                                   NFSUNLOCKSTATE();
3511                                   error = NFSERR_LOCKSHELD;
3512                                   goto out;
3513                               }
3514                         }
3515                         stp = nstp;
3516                     }
3517               }
3518           }
3519           NFSUNLOCKSTATE();
3520 
3521 out:
3522           NFSEXITCODE(error);
3523           return (error);
3524 }
3525 
3526 /*
3527  * Get the file handle for a lock structure.
3528  */
3529 static int
nfsrv_getlockfh(vnode_t vp,u_short flags,struct nfslockfile * new_lfp,fhandle_t * nfhp,NFSPROC_T * p)3530 nfsrv_getlockfh(vnode_t vp, u_short flags, struct nfslockfile *new_lfp,
3531     fhandle_t *nfhp, NFSPROC_T *p)
3532 {
3533           fhandle_t *fhp = NULL;
3534           int error;
3535 
3536           /*
3537            * For lock, use the new nfslock structure, otherwise just
3538            * a fhandle_t on the stack.
3539            */
3540           if (flags & NFSLCK_OPEN) {
3541                     KASSERT(new_lfp != NULL, ("nfsrv_getlockfh: new_lfp NULL"));
3542                     fhp = &new_lfp->lf_fh;
3543           } else if (nfhp) {
3544                     fhp = nfhp;
3545           } else {
3546                     panic("nfsrv_getlockfh");
3547           }
3548           error = nfsvno_getfh(vp, fhp, p);
3549           NFSEXITCODE(error);
3550           return (error);
3551 }
3552 
3553 /*
3554  * Get an nfs lock structure. Allocate one, as required, and return a
3555  * pointer to it.
3556  * Returns an NFSERR_xxx upon failure or -1 to indicate no current lock.
3557  */
3558 static int
nfsrv_getlockfile(u_short flags,struct nfslockfile ** new_lfpp,struct nfslockfile ** lfpp,fhandle_t * nfhp,int lockit)3559 nfsrv_getlockfile(u_short flags, struct nfslockfile **new_lfpp,
3560     struct nfslockfile **lfpp, fhandle_t *nfhp, int lockit)
3561 {
3562           struct nfslockfile *lfp;
3563           fhandle_t *fhp = NULL, *tfhp;
3564           struct nfslockhashhead *hp;
3565           struct nfslockfile *new_lfp = NULL;
3566 
3567           /*
3568            * For lock, use the new nfslock structure, otherwise just
3569            * a fhandle_t on the stack.
3570            */
3571           if (flags & NFSLCK_OPEN) {
3572                     new_lfp = *new_lfpp;
3573                     fhp = &new_lfp->lf_fh;
3574           } else if (nfhp) {
3575                     fhp = nfhp;
3576           } else {
3577                     panic("nfsrv_getlockfile");
3578           }
3579 
3580           hp = NFSLOCKHASH(fhp);
3581           LIST_FOREACH(lfp, hp, lf_hash) {
3582                     tfhp = &lfp->lf_fh;
3583                     if (NFSVNO_CMPFH(fhp, tfhp)) {
3584                               if (lockit)
3585                                         nfsrv_locklf(lfp);
3586                               *lfpp = lfp;
3587                               return (0);
3588                     }
3589           }
3590           if (!(flags & NFSLCK_OPEN))
3591                     return (-1);
3592 
3593           /*
3594            * No match, so chain the new one into the list.
3595            */
3596           LIST_INIT(&new_lfp->lf_open);
3597           LIST_INIT(&new_lfp->lf_lock);
3598           LIST_INIT(&new_lfp->lf_deleg);
3599           LIST_INIT(&new_lfp->lf_locallock);
3600           LIST_INIT(&new_lfp->lf_rollback);
3601           new_lfp->lf_locallock_lck.nfslock_usecnt = 0;
3602           new_lfp->lf_locallock_lck.nfslock_lock = 0;
3603           new_lfp->lf_usecount = 0;
3604           LIST_INSERT_HEAD(hp, new_lfp, lf_hash);
3605           *lfpp = new_lfp;
3606           *new_lfpp = NULL;
3607           return (0);
3608 }
3609 
3610 /*
3611  * This function adds a nfslock lock structure to the list for the associated
3612  * nfsstate and nfslockfile structures. It will be inserted after the
3613  * entry pointed at by insert_lop.
3614  */
3615 static void
nfsrv_insertlock(struct nfslock * new_lop,struct nfslock * insert_lop,struct nfsstate * stp,struct nfslockfile * lfp)3616 nfsrv_insertlock(struct nfslock *new_lop, struct nfslock *insert_lop,
3617     struct nfsstate *stp, struct nfslockfile *lfp)
3618 {
3619           struct nfslock *lop, *nlop;
3620 
3621           new_lop->lo_stp = stp;
3622           new_lop->lo_lfp = lfp;
3623 
3624           if (stp != NULL) {
3625                     /* Insert in increasing lo_first order */
3626                     lop = LIST_FIRST(&lfp->lf_lock);
3627                     if (lop == NULL ||
3628                         new_lop->lo_first <= lop->lo_first) {
3629                               LIST_INSERT_HEAD(&lfp->lf_lock, new_lop, lo_lckfile);
3630                     } else {
3631                               nlop = LIST_NEXT(lop, lo_lckfile);
3632                               while (nlop != NULL &&
3633                                      nlop->lo_first < new_lop->lo_first) {
3634                                         lop = nlop;
3635                                         nlop = LIST_NEXT(lop, lo_lckfile);
3636                               }
3637                               LIST_INSERT_AFTER(lop, new_lop, lo_lckfile);
3638                     }
3639           } else {
3640                     new_lop->lo_lckfile.le_prev = NULL;     /* list not used */
3641           }
3642 
3643           /*
3644            * Insert after insert_lop, which is overloaded as stp or lfp for
3645            * an empty list.
3646            */
3647           if (stp == NULL && (struct nfslockfile *)insert_lop == lfp)
3648                     LIST_INSERT_HEAD(&lfp->lf_locallock, new_lop, lo_lckowner);
3649           else if ((struct nfsstate *)insert_lop == stp)
3650                     LIST_INSERT_HEAD(&stp->ls_lock, new_lop, lo_lckowner);
3651           else
3652                     LIST_INSERT_AFTER(insert_lop, new_lop, lo_lckowner);
3653           if (stp != NULL) {
3654                     nfsstatsv1.srvlocks++;
3655                     nfsrv_openpluslock++;
3656           }
3657 }
3658 
3659 /*
3660  * This function updates the locking for a lock owner and given file. It
3661  * maintains a list of lock ranges ordered on increasing file offset that
3662  * are NFSLCK_READ or NFSLCK_WRITE and non-overlapping (aka POSIX style).
3663  * It always adds new_lop to the list and sometimes uses the one pointed
3664  * at by other_lopp.
3665  */
3666 static void
nfsrv_updatelock(struct nfsstate * stp,struct nfslock ** new_lopp,struct nfslock ** other_lopp,struct nfslockfile * lfp)3667 nfsrv_updatelock(struct nfsstate *stp, struct nfslock **new_lopp,
3668     struct nfslock **other_lopp, struct nfslockfile *lfp)
3669 {
3670           struct nfslock *new_lop = *new_lopp;
3671           struct nfslock *lop, *tlop, *ilop;
3672           struct nfslock *other_lop = *other_lopp;
3673           int unlock = 0, myfile = 0;
3674           u_int64_t tmp;
3675 
3676           /*
3677            * Work down the list until the lock is merged.
3678            */
3679           if (new_lop->lo_flags & NFSLCK_UNLOCK)
3680                     unlock = 1;
3681           if (stp != NULL) {
3682                     ilop = (struct nfslock *)stp;
3683                     lop = LIST_FIRST(&stp->ls_lock);
3684           } else {
3685                     ilop = (struct nfslock *)lfp;
3686                     lop = LIST_FIRST(&lfp->lf_locallock);
3687           }
3688           while (lop != NULL) {
3689               /*
3690                * Only check locks for this file that aren't before the start of
3691                * new lock's range.
3692                */
3693               if (lop->lo_lfp == lfp) {
3694                 myfile = 1;
3695                 if (lop->lo_end >= new_lop->lo_first) {
3696                     if (new_lop->lo_end < lop->lo_first) {
3697                               /*
3698                                * If the new lock ends before the start of the
3699                                * current lock's range, no merge, just insert
3700                                * the new lock.
3701                                */
3702                               break;
3703                     }
3704                     if (new_lop->lo_flags == lop->lo_flags ||
3705                         (new_lop->lo_first <= lop->lo_first &&
3706                          new_lop->lo_end >= lop->lo_end)) {
3707                               /*
3708                                * This lock can be absorbed by the new lock/unlock.
3709                                * This happens when it covers the entire range
3710                                * of the old lock or is contiguous
3711                                * with the old lock and is of the same type or an
3712                                * unlock.
3713                                */
3714                               if (lop->lo_first < new_lop->lo_first)
3715                                         new_lop->lo_first = lop->lo_first;
3716                               if (lop->lo_end > new_lop->lo_end)
3717                                         new_lop->lo_end = lop->lo_end;
3718                               tlop = lop;
3719                               lop = LIST_NEXT(lop, lo_lckowner);
3720                               nfsrv_freenfslock(tlop);
3721                               continue;
3722                     }
3723 
3724                     /*
3725                      * All these cases are for contiguous locks that are not the
3726                      * same type, so they can't be merged.
3727                      */
3728                     if (new_lop->lo_first <= lop->lo_first) {
3729                               /*
3730                                * This case is where the new lock overlaps with the
3731                                * first part of the old lock. Move the start of the
3732                                * old lock to just past the end of the new lock. The
3733                                * new lock will be inserted in front of the old, since
3734                                * ilop hasn't been updated. (We are done now.)
3735                                */
3736                               lop->lo_first = new_lop->lo_end;
3737                               break;
3738                     }
3739                     if (new_lop->lo_end >= lop->lo_end) {
3740                               /*
3741                                * This case is where the new lock overlaps with the
3742                                * end of the old lock's range. Move the old lock's
3743                                * end to just before the new lock's first and insert
3744                                * the new lock after the old lock.
3745                                * Might not be done yet, since the new lock could
3746                                * overlap further locks with higher ranges.
3747                                */
3748                               lop->lo_end = new_lop->lo_first;
3749                               ilop = lop;
3750                               lop = LIST_NEXT(lop, lo_lckowner);
3751                               continue;
3752                     }
3753                     /*
3754                      * The final case is where the new lock's range is in the
3755                      * middle of the current lock's and splits the current lock
3756                      * up. Use *other_lopp to handle the second part of the
3757                      * split old lock range. (We are done now.)
3758                      * For unlock, we use new_lop as other_lop and tmp, since
3759                      * other_lop and new_lop are the same for this case.
3760                      * We noted the unlock case above, so we don't need
3761                      * new_lop->lo_flags any longer.
3762                      */
3763                     tmp = new_lop->lo_first;
3764                     if (other_lop == NULL) {
3765                               if (!unlock)
3766                                         panic("nfsd srv update unlock");
3767                               other_lop = new_lop;
3768                               *new_lopp = NULL;
3769                     }
3770                     other_lop->lo_first = new_lop->lo_end;
3771                     other_lop->lo_end = lop->lo_end;
3772                     other_lop->lo_flags = lop->lo_flags;
3773                     other_lop->lo_stp = stp;
3774                     other_lop->lo_lfp = lfp;
3775                     lop->lo_end = tmp;
3776                     nfsrv_insertlock(other_lop, lop, stp, lfp);
3777                     *other_lopp = NULL;
3778                     ilop = lop;
3779                     break;
3780                 }
3781               }
3782               ilop = lop;
3783               lop = LIST_NEXT(lop, lo_lckowner);
3784               if (myfile && (lop == NULL || lop->lo_lfp != lfp))
3785                     break;
3786           }
3787 
3788           /*
3789            * Insert the new lock in the list at the appropriate place.
3790            */
3791           if (!unlock) {
3792                     nfsrv_insertlock(new_lop, ilop, stp, lfp);
3793                     *new_lopp = NULL;
3794           }
3795 }
3796 
3797 /*
3798  * This function handles sequencing of locks, etc.
3799  * It returns an error that indicates what the caller should do.
3800  */
3801 static int
nfsrv_checkseqid(struct nfsrv_descript * nd,u_int32_t seqid,struct nfsstate * stp,struct nfsrvcache * op)3802 nfsrv_checkseqid(struct nfsrv_descript *nd, u_int32_t seqid,
3803     struct nfsstate *stp, struct nfsrvcache *op)
3804 {
3805           int error = 0;
3806 
3807           if ((nd->nd_flag & ND_NFSV41) != 0)
3808                     /* NFSv4.1 ignores the open_seqid and lock_seqid. */
3809                     goto out;
3810           if (op != nd->nd_rp)
3811                     panic("nfsrvstate checkseqid");
3812           if (!(op->rc_flag & RC_INPROG))
3813                     panic("nfsrvstate not inprog");
3814           if (stp->ls_op && stp->ls_op->rc_refcnt <= 0) {
3815                     printf("refcnt=%d\n", stp->ls_op->rc_refcnt);
3816                     panic("nfsrvstate op refcnt");
3817           }
3818           if ((stp->ls_seq + 1) == seqid) {
3819                     if (stp->ls_op)
3820                               nfsrvd_derefcache(stp->ls_op);
3821                     stp->ls_op = op;
3822                     nfsrvd_refcache(op);
3823                     stp->ls_seq = seqid;
3824                     goto out;
3825           } else if (stp->ls_seq == seqid && stp->ls_op &&
3826                     op->rc_xid == stp->ls_op->rc_xid &&
3827                     op->rc_refcnt == 0 &&
3828                     op->rc_reqlen == stp->ls_op->rc_reqlen &&
3829                     op->rc_cksum == stp->ls_op->rc_cksum) {
3830                     if (stp->ls_op->rc_flag & RC_INPROG) {
3831                               error = NFSERR_DONTREPLY;
3832                               goto out;
3833                     }
3834                     nd->nd_rp = stp->ls_op;
3835                     nd->nd_rp->rc_flag |= RC_INPROG;
3836                     nfsrvd_delcache(op);
3837                     error = NFSERR_REPLYFROMCACHE;
3838                     goto out;
3839           }
3840           error = NFSERR_BADSEQID;
3841 
3842 out:
3843           NFSEXITCODE2(error, nd);
3844           return (error);
3845 }
3846 
3847 /*
3848  * Get the client ip address for callbacks. If the strings can't be parsed,
3849  * just set lc_program to 0 to indicate no callbacks are possible.
3850  * (For cases where the address can't be parsed or is 0.0.0.0.0.0, set
3851  *  the address to the client's transport address. This won't be used
3852  *  for callbacks, but can be printed out by nfsstats for info.)
3853  * Return error if the xdr can't be parsed, 0 otherwise.
3854  */
3855 APPLESTATIC int
nfsrv_getclientipaddr(struct nfsrv_descript * nd,struct nfsclient * clp)3856 nfsrv_getclientipaddr(struct nfsrv_descript *nd, struct nfsclient *clp)
3857 {
3858           u_int32_t *tl;
3859           u_char *cp, *cp2;
3860           int i, j;
3861           struct sockaddr_in *rad, *sad;
3862           u_char protocol[5], addr[24];
3863           int error = 0, cantparse = 0;
3864           union {
3865                     u_long ival;
3866                     u_char cval[4];
3867           } ip;
3868           union {
3869                     u_short sval;
3870                     u_char cval[2];
3871           } port;
3872 
3873           rad = NFSSOCKADDR(clp->lc_req.nr_nam, struct sockaddr_in *);
3874           rad->sin_family = AF_INET;
3875           rad->sin_len = sizeof (struct sockaddr_in);
3876           rad->sin_addr.s_addr = 0;
3877           rad->sin_port = 0;
3878           clp->lc_req.nr_client = NULL;
3879           clp->lc_req.nr_lock = 0;
3880           NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
3881           i = fxdr_unsigned(int, *tl);
3882           if (i >= 3 && i <= 4) {
3883                     error = nfsrv_mtostr(nd, protocol, i);
3884                     if (error)
3885                               goto nfsmout;
3886                     if (!strcmp(protocol, "tcp")) {
3887                               clp->lc_flags |= LCL_TCPCALLBACK;
3888                               clp->lc_req.nr_sotype = SOCK_STREAM;
3889                               clp->lc_req.nr_soproto = IPPROTO_TCP;
3890                     } else if (!strcmp(protocol, "udp")) {
3891                               clp->lc_req.nr_sotype = SOCK_DGRAM;
3892                               clp->lc_req.nr_soproto = IPPROTO_UDP;
3893                     } else {
3894                               cantparse = 1;
3895                     }
3896           } else {
3897                     cantparse = 1;
3898                     if (i > 0) {
3899                               error = nfsm_advance(nd, NFSM_RNDUP(i), -1);
3900                               if (error)
3901                                         goto nfsmout;
3902                     }
3903           }
3904           NFSM_DISSECT(tl, u_int32_t *, NFSX_UNSIGNED);
3905           i = fxdr_unsigned(int, *tl);
3906           if (i < 0) {
3907                     error = NFSERR_BADXDR;
3908                     goto nfsmout;
3909           } else if (i == 0) {
3910                     cantparse = 1;
3911           } else if (!cantparse && i <= 23 && i >= 11) {
3912                     error = nfsrv_mtostr(nd, addr, i);
3913                     if (error)
3914                               goto nfsmout;
3915 
3916                     /*
3917                      * Parse out the address fields. We expect 6 decimal numbers
3918                      * separated by '.'s.
3919                      */
3920                     cp = addr;
3921                     i = 0;
3922                     while (*cp && i < 6) {
3923                               cp2 = cp;
3924                               while (*cp2 && *cp2 != '.')
3925                                         cp2++;
3926                               if (*cp2)
3927                                         *cp2++ = '\0';
3928                               else if (i != 5) {
3929                                         cantparse = 1;
3930                                         break;
3931                               }
3932                               j = nfsrv_getipnumber(cp);
3933                               if (j >= 0) {
3934                                         if (i < 4)
3935                                                   ip.cval[3 - i] = j;
3936                                         else
3937                                                   port.cval[5 - i] = j;
3938                               } else {
3939                                         cantparse = 1;
3940                                         break;
3941                               }
3942                               cp = cp2;
3943                               i++;
3944                     }
3945                     if (!cantparse) {
3946                               if (ip.ival != 0x0) {
3947                                         rad->sin_addr.s_addr = htonl(ip.ival);
3948                                         rad->sin_port = htons(port.sval);
3949                               } else {
3950                                         cantparse = 1;
3951                               }
3952                     }
3953           } else {
3954                     cantparse = 1;
3955                     if (i > 0) {
3956                               error = nfsm_advance(nd, NFSM_RNDUP(i), -1);
3957                               if (error)
3958                                         goto nfsmout;
3959                     }
3960           }
3961           if (cantparse) {
3962                     sad = NFSSOCKADDR(nd->nd_nam, struct sockaddr_in *);
3963                     rad->sin_addr.s_addr = sad->sin_addr.s_addr;
3964                     rad->sin_port = 0x0;
3965                     clp->lc_program = 0;
3966           }
3967 nfsmout:
3968           NFSEXITCODE2(error, nd);
3969           return (error);
3970 }
3971 
3972 /*
3973  * Turn a string of up to three decimal digits into a number. Return -1 upon
3974  * error.
3975  */
3976 static int
nfsrv_getipnumber(u_char * cp)3977 nfsrv_getipnumber(u_char *cp)
3978 {
3979           int i = 0, j = 0;
3980 
3981           while (*cp) {
3982                     if (j > 2 || *cp < '0' || *cp > '9')
3983                               return (-1);
3984                     i *= 10;
3985                     i += (*cp - '0');
3986                     cp++;
3987                     j++;
3988           }
3989           if (i < 256)
3990                     return (i);
3991           return (-1);
3992 }
3993 
3994 /*
3995  * This function checks for restart conditions.
3996  */
3997 static int
nfsrv_checkrestart(nfsquad_t clientid,u_int32_t flags,nfsv4stateid_t * stateidp,int specialid)3998 nfsrv_checkrestart(nfsquad_t clientid, u_int32_t flags,
3999     nfsv4stateid_t *stateidp, int specialid)
4000 {
4001           int ret = 0;
4002 
4003           /*
4004            * First check for a server restart. Open, LockT, ReleaseLockOwner
4005            * and DelegPurge have a clientid, the rest a stateid.
4006            */
4007           if (flags &
4008               (NFSLCK_OPEN | NFSLCK_TEST | NFSLCK_RELEASE | NFSLCK_DELEGPURGE)) {
4009                     if (clientid.lval[0] != nfsrvboottime) {
4010                               ret = NFSERR_STALECLIENTID;
4011                               goto out;
4012                     }
4013           } else if (stateidp->other[0] != nfsrvboottime &&
4014                     specialid == 0) {
4015                     ret = NFSERR_STALESTATEID;
4016                     goto out;
4017           }
4018 
4019           /*
4020            * Read, Write, Setattr and LockT can return NFSERR_GRACE and do
4021            * not use a lock/open owner seqid#, so the check can be done now.
4022            * (The others will be checked, as required, later.)
4023            */
4024           if (!(flags & (NFSLCK_CHECK | NFSLCK_TEST)))
4025                     goto out;
4026 
4027           NFSLOCKSTATE();
4028           ret = nfsrv_checkgrace(NULL, NULL, flags);
4029           NFSUNLOCKSTATE();
4030 
4031 out:
4032           NFSEXITCODE(ret);
4033           return (ret);
4034 }
4035 
4036 /*
4037  * Check for grace.
4038  */
4039 static int
nfsrv_checkgrace(struct nfsrv_descript * nd,struct nfsclient * clp,u_int32_t flags)4040 nfsrv_checkgrace(struct nfsrv_descript *nd, struct nfsclient *clp,
4041     u_int32_t flags)
4042 {
4043           int error = 0;
4044 
4045           if ((nfsrv_stablefirst.nsf_flags & NFSNSF_GRACEOVER) != 0) {
4046                     if (flags & NFSLCK_RECLAIM) {
4047                               error = NFSERR_NOGRACE;
4048                               goto out;
4049                     }
4050           } else {
4051                     if (!(flags & NFSLCK_RECLAIM)) {
4052                               error = NFSERR_GRACE;
4053                               goto out;
4054                     }
4055                     if (nd != NULL && clp != NULL &&
4056                         (nd->nd_flag & ND_NFSV41) != 0 &&
4057                         (clp->lc_flags & LCL_RECLAIMCOMPLETE) != 0) {
4058                               error = NFSERR_NOGRACE;
4059                               goto out;
4060                     }
4061 
4062                     /*
4063                      * If grace is almost over and we are still getting Reclaims,
4064                      * extend grace a bit.
4065                      */
4066                     if ((NFSD_MONOSEC + NFSRV_LEASEDELTA) >
4067                         nfsrv_stablefirst.nsf_eograce)
4068                               nfsrv_stablefirst.nsf_eograce = NFSD_MONOSEC +
4069                                         NFSRV_LEASEDELTA;
4070           }
4071 
4072 out:
4073           NFSEXITCODE(error);
4074           return (error);
4075 }
4076 
4077 /*
4078  * Do a server callback.
4079  */
4080 static int
nfsrv_docallback(struct nfsclient * clp,int procnum,nfsv4stateid_t * stateidp,int trunc,fhandle_t * fhp,struct nfsvattr * nap,nfsattrbit_t * attrbitp,NFSPROC_T * p)4081 nfsrv_docallback(struct nfsclient *clp, int procnum,
4082     nfsv4stateid_t *stateidp, int trunc, fhandle_t *fhp,
4083     struct nfsvattr *nap, nfsattrbit_t *attrbitp, NFSPROC_T *p)
4084 {
4085           mbuf_t m;
4086           u_int32_t *tl;
4087           struct nfsrv_descript nfsd, *nd = &nfsd;
4088           struct ucred *cred;
4089           int error = 0;
4090           u_int32_t callback;
4091           struct nfsdsession *sep = NULL;
4092 
4093           cred = newnfs_getcred();
4094           NFSLOCKSTATE();     /* mostly for lc_cbref++ */
4095           if (clp->lc_flags & LCL_NEEDSCONFIRM) {
4096                     NFSUNLOCKSTATE();
4097                     panic("docallb");
4098           }
4099           clp->lc_cbref++;
4100 
4101           /*
4102            * Fill the callback program# and version into the request
4103            * structure for newnfs_connect() to use.
4104            */
4105           clp->lc_req.nr_prog = clp->lc_program;
4106 #ifdef notnow
4107           if ((clp->lc_flags & LCL_NFSV41) != 0)
4108                     clp->lc_req.nr_vers = NFSV41_CBVERS;
4109           else
4110 #endif
4111                     clp->lc_req.nr_vers = NFSV4_CBVERS;
4112 
4113           /*
4114            * First, fill in some of the fields of nd and cr.
4115            */
4116           nd->nd_flag = ND_NFSV4;
4117           if (clp->lc_flags & LCL_GSS)
4118                     nd->nd_flag |= ND_KERBV;
4119           if ((clp->lc_flags & LCL_NFSV41) != 0)
4120                     nd->nd_flag |= ND_NFSV41;
4121           nd->nd_repstat = 0;
4122           cred->cr_uid = clp->lc_uid;
4123           cred->cr_gid = clp->lc_gid;
4124           callback = clp->lc_callback;
4125           NFSUNLOCKSTATE();
4126           cred->cr_ngroups = 1;
4127 
4128           /*
4129            * Get the first mbuf for the request.
4130            */
4131           MGET(m, M_WAITOK, MT_DATA);
4132           mbuf_setlen(m, 0);
4133           nd->nd_mreq = nd->nd_mb = m;
4134           nd->nd_bpos = NFSMTOD(m, caddr_t);
4135 
4136           /*
4137            * and build the callback request.
4138            */
4139           if (procnum == NFSV4OP_CBGETATTR) {
4140                     nd->nd_procnum = NFSV4PROC_CBCOMPOUND;
4141                     error = nfsrv_cbcallargs(nd, clp, callback, NFSV4OP_CBGETATTR,
4142                         "CB Getattr", &sep);
4143                     if (error != 0) {
4144                               mbuf_freem(nd->nd_mreq);
4145                               goto errout;
4146                     }
4147                     (void)nfsm_fhtom(nd, (u_int8_t *)fhp, NFSX_MYFH, 0);
4148                     (void)nfsrv_putattrbit(nd, attrbitp);
4149           } else if (procnum == NFSV4OP_CBRECALL) {
4150                     nd->nd_procnum = NFSV4PROC_CBCOMPOUND;
4151                     error = nfsrv_cbcallargs(nd, clp, callback, NFSV4OP_CBRECALL,
4152                         "CB Recall", &sep);
4153                     if (error != 0) {
4154                               mbuf_freem(nd->nd_mreq);
4155                               goto errout;
4156                     }
4157                     NFSM_BUILD(tl, u_int32_t *, NFSX_UNSIGNED + NFSX_STATEID);
4158                     *tl++ = txdr_unsigned(stateidp->seqid);
4159                     NFSBCOPY((caddr_t)stateidp->other, (caddr_t)tl,
4160                         NFSX_STATEIDOTHER);
4161                     tl += (NFSX_STATEIDOTHER / NFSX_UNSIGNED);
4162                     if (trunc)
4163                               *tl = newnfs_true;
4164                     else
4165                               *tl = newnfs_false;
4166                     (void)nfsm_fhtom(nd, (u_int8_t *)fhp, NFSX_MYFH, 0);
4167           } else if (procnum == NFSV4PROC_CBNULL) {
4168                     nd->nd_procnum = NFSV4PROC_CBNULL;
4169                     if ((clp->lc_flags & LCL_NFSV41) != 0) {
4170                               error = nfsv4_getcbsession(clp, &sep);
4171                               if (error != 0) {
4172                                         mbuf_freem(nd->nd_mreq);
4173                                         goto errout;
4174                               }
4175                     }
4176           } else {
4177                     error = NFSERR_SERVERFAULT;
4178                     mbuf_freem(nd->nd_mreq);
4179                     goto errout;
4180           }
4181 
4182           /*
4183            * Call newnfs_connect(), as required, and then newnfs_request().
4184            */
4185           (void) newnfs_sndlock(&clp->lc_req.nr_lock);
4186           if (clp->lc_req.nr_client == NULL) {
4187                     if ((clp->lc_flags & LCL_NFSV41) != 0)
4188                               error = ECONNREFUSED;
4189                     else if (nd->nd_procnum == NFSV4PROC_CBNULL)
4190                               error = newnfs_connect(NULL, &clp->lc_req, cred,
4191                                   NULL, 1);
4192                     else
4193                               error = newnfs_connect(NULL, &clp->lc_req, cred,
4194                                   NULL, 3);
4195           }
4196           newnfs_sndunlock(&clp->lc_req.nr_lock);
4197           if (!error) {
4198                     if ((nd->nd_flag & ND_NFSV41) != 0) {
4199                               KASSERT(sep != NULL, ("sep NULL"));
4200                               if (sep->sess_cbsess.nfsess_xprt != NULL)
4201                                         error = newnfs_request(nd, NULL, clp,
4202                                             &clp->lc_req, NULL, NULL, cred,
4203                                             clp->lc_program, clp->lc_req.nr_vers, NULL,
4204                                             1, NULL, &sep->sess_cbsess);
4205                               else {
4206                                         /*
4207                                          * This should probably never occur, but if a
4208                                          * client somehow does an RPC without a
4209                                          * SequenceID Op that causes a callback just
4210                                          * after the nfsd threads have been terminated
4211                                          * and restarted we could conceivably get here
4212                                          * without a backchannel xprt.
4213                                          */
4214                                         printf("nfsrv_docallback: no xprt\n");
4215                                         error = ECONNREFUSED;
4216                               }
4217                               nfsrv_freesession(sep, NULL);
4218                     } else
4219                               error = newnfs_request(nd, NULL, clp, &clp->lc_req,
4220                                   NULL, NULL, cred, clp->lc_program,
4221                                   clp->lc_req.nr_vers, NULL, 1, NULL, NULL);
4222           }
4223 errout:
4224           NFSFREECRED(cred);
4225 
4226           /*
4227            * If error is set here, the Callback path isn't working
4228            * properly, so twiddle the appropriate LCL_ flags.
4229            * (nd_repstat != 0 indicates the Callback path is working,
4230            *  but the callback failed on the client.)
4231            */
4232           if (error) {
4233                     /*
4234                      * Mark the callback pathway down, which disabled issuing
4235                      * of delegations and gets Renew to return NFSERR_CBPATHDOWN.
4236                      */
4237                     NFSLOCKSTATE();
4238                     clp->lc_flags |= LCL_CBDOWN;
4239                     NFSUNLOCKSTATE();
4240           } else {
4241                     /*
4242                      * Callback worked. If the callback path was down, disable
4243                      * callbacks, so no more delegations will be issued. (This
4244                      * is done on the assumption that the callback pathway is
4245                      * flakey.)
4246                      */
4247                     NFSLOCKSTATE();
4248                     if (clp->lc_flags & LCL_CBDOWN)
4249                               clp->lc_flags &= ~(LCL_CBDOWN | LCL_CALLBACKSON);
4250                     NFSUNLOCKSTATE();
4251                     if (nd->nd_repstat)
4252                               error = nd->nd_repstat;
4253                     else if (error == 0 && procnum == NFSV4OP_CBGETATTR)
4254                               error = nfsv4_loadattr(nd, NULL, nap, NULL, NULL, 0,
4255                                   NULL, NULL, NULL, NULL, NULL, 0, NULL, NULL, NULL,
4256                                   p, NULL);
4257                     mbuf_freem(nd->nd_mrep);
4258           }
4259           NFSLOCKSTATE();
4260           clp->lc_cbref--;
4261           if ((clp->lc_flags & LCL_WAKEUPWANTED) && clp->lc_cbref == 0) {
4262                     clp->lc_flags &= ~LCL_WAKEUPWANTED;
4263                     wakeup(clp);
4264           }
4265           NFSUNLOCKSTATE();
4266 
4267           NFSEXITCODE(error);
4268           return (error);
4269 }
4270 
4271 /*
4272  * Set up the compound RPC for the callback.
4273  */
4274 static int
nfsrv_cbcallargs(struct nfsrv_descript * nd,struct nfsclient * clp,uint32_t callback,int op,const char * optag,struct nfsdsession ** sepp)4275 nfsrv_cbcallargs(struct nfsrv_descript *nd, struct nfsclient *clp,
4276     uint32_t callback, int op, const char *optag, struct nfsdsession **sepp)
4277 {
4278           uint32_t *tl;
4279           int error, len;
4280 
4281           len = strlen(optag);
4282           (void)nfsm_strtom(nd, optag, len);
4283           NFSM_BUILD(tl, uint32_t *, 4 * NFSX_UNSIGNED);
4284           if ((nd->nd_flag & ND_NFSV41) != 0) {
4285                     *tl++ = txdr_unsigned(NFSV41_MINORVERSION);
4286                     *tl++ = txdr_unsigned(callback);
4287                     *tl++ = txdr_unsigned(2);
4288                     *tl = txdr_unsigned(NFSV4OP_CBSEQUENCE);
4289                     error = nfsv4_setcbsequence(nd, clp, 1, sepp);
4290                     if (error != 0)
4291                               return (error);
4292                     NFSM_BUILD(tl, u_int32_t *, NFSX_UNSIGNED);
4293                     *tl = txdr_unsigned(op);
4294           } else {
4295                     *tl++ = txdr_unsigned(NFSV4_MINORVERSION);
4296                     *tl++ = txdr_unsigned(callback);
4297                     *tl++ = txdr_unsigned(1);
4298                     *tl = txdr_unsigned(op);
4299           }
4300           return (0);
4301 }
4302 
4303 /*
4304  * Return the next index# for a clientid. Mostly just increment and return
4305  * the next one, but... if the 32bit unsigned does actually wrap around,
4306  * it should be rebooted.
4307  * At an average rate of one new client per second, it will wrap around in
4308  * approximately 136 years. (I think the server will have been shut
4309  * down or rebooted before then.)
4310  */
4311 static u_int32_t
nfsrv_nextclientindex(void)4312 nfsrv_nextclientindex(void)
4313 {
4314           static u_int32_t client_index = 0;
4315 
4316           client_index++;
4317           if (client_index != 0)
4318                     return (client_index);
4319 
4320           printf("%s: out of clientids\n", __func__);
4321           return (client_index);
4322 }
4323 
4324 /*
4325  * Return the next index# for a stateid. Mostly just increment and return
4326  * the next one, but... if the 32bit unsigned does actually wrap around
4327  * (will a BSD server stay up that long?), find
4328  * new start and end values.
4329  */
4330 static u_int32_t
nfsrv_nextstateindex(struct nfsclient * clp)4331 nfsrv_nextstateindex(struct nfsclient *clp)
4332 {
4333           struct nfsstate *stp;
4334           int i;
4335           u_int32_t canuse, min_index, max_index;
4336 
4337           if (!(clp->lc_flags & LCL_INDEXNOTOK)) {
4338                     clp->lc_stateindex++;
4339                     if (clp->lc_stateindex != clp->lc_statemaxindex)
4340                               return (clp->lc_stateindex);
4341           }
4342 
4343           /*
4344            * Yuck, we've hit the end.
4345            * Look for a new min and max.
4346            */
4347           min_index = 0;
4348           max_index = 0xffffffff;
4349           for (i = 0; i < nfsrv_statehashsize; i++) {
4350               LIST_FOREACH(stp, &clp->lc_stateid[i], ls_hash) {
4351                     if (stp->ls_stateid.other[2] > 0x80000000) {
4352                         if (stp->ls_stateid.other[2] < max_index)
4353                               max_index = stp->ls_stateid.other[2];
4354                     } else {
4355                         if (stp->ls_stateid.other[2] > min_index)
4356                               min_index = stp->ls_stateid.other[2];
4357                     }
4358               }
4359           }
4360 
4361           /*
4362            * Yikes, highly unlikely, but I'll handle it anyhow.
4363            */
4364           if (min_index == 0x80000000 && max_index == 0x80000001) {
4365               canuse = 0;
4366               /*
4367                * Loop around until we find an unused entry. Return that
4368                * and set LCL_INDEXNOTOK, so the search will continue next time.
4369                * (This is one of those rare cases where a goto is the
4370                *  cleanest way to code the loop.)
4371                */
4372 tryagain:
4373               for (i = 0; i < nfsrv_statehashsize; i++) {
4374                     LIST_FOREACH(stp, &clp->lc_stateid[i], ls_hash) {
4375                         if (stp->ls_stateid.other[2] == canuse) {
4376                               canuse++;
4377                               goto tryagain;
4378                         }
4379                     }
4380               }
4381               clp->lc_flags |= LCL_INDEXNOTOK;
4382               return (canuse);
4383           }
4384 
4385           /*
4386            * Ok to start again from min + 1.
4387            */
4388           clp->lc_stateindex = min_index + 1;
4389           clp->lc_statemaxindex = max_index;
4390           clp->lc_flags &= ~LCL_INDEXNOTOK;
4391           return (clp->lc_stateindex);
4392 }
4393 
4394 /*
4395  * The following functions handle the stable storage file that deals with
4396  * the edge conditions described in RFC3530 Sec. 8.6.3.
4397  * The file is as follows:
4398  * - a single record at the beginning that has the lease time of the
4399  *   previous server instance (before the last reboot) and the nfsrvboottime
4400  *   values for the previous server boots.
4401  *   These previous boot times are used to ensure that the current
4402  *   nfsrvboottime does not, somehow, get set to a previous one.
4403  *   (This is important so that Stale ClientIDs and StateIDs can
4404  *    be recognized.)
4405  *   The number of previous nfsvrboottime values precedes the list.
4406  * - followed by some number of appended records with:
4407  *   - client id string
4408  *   - flag that indicates it is a record revoking state via lease
4409  *     expiration or similar
4410  *     OR has successfully acquired state.
4411  * These structures vary in length, with the client string at the end, up
4412  * to NFSV4_OPAQUELIMIT in size.
4413  *
4414  * At the end of the grace period, the file is truncated, the first
4415  * record is rewritten with updated information and any acquired state
4416  * records for successful reclaims of state are written.
4417  *
4418  * Subsequent records are appended when the first state is issued to
4419  * a client and when state is revoked for a client.
4420  *
4421  * When reading the file in, state issued records that come later in
4422  * the file override older ones, since the append log is in cronological order.
4423  * If, for some reason, the file can't be read, the grace period is
4424  * immediately terminated and all reclaims get NFSERR_NOGRACE.
4425  */
4426 
4427 /*
4428  * Read in the stable storage file. Called by nfssvc() before the nfsd
4429  * processes start servicing requests.
4430  */
4431 APPLESTATIC void
nfsrv_setupstable(NFSPROC_T * p)4432 nfsrv_setupstable(NFSPROC_T *p)
4433 {
4434           struct nfsrv_stablefirst *sf = &nfsrv_stablefirst;
4435           struct nfsrv_stable *sp, *nsp;
4436           struct nfst_rec *tsp;
4437           int error, i, tryagain;
4438           off_t off = 0;
4439           ssize_t aresid, len;
4440 
4441           /*
4442            * If NFSNSF_UPDATEDONE is set, this is a restart of the nfsds without
4443            * a reboot, so state has not been lost.
4444            */
4445           if (sf->nsf_flags & NFSNSF_UPDATEDONE)
4446                     return;
4447           /*
4448            * Set Grace over just until the file reads successfully.
4449            */
4450           nfsrvboottime = time_second;
4451           LIST_INIT(&sf->nsf_head);
4452           sf->nsf_flags = (NFSNSF_GRACEOVER | NFSNSF_NEEDLOCK);
4453           sf->nsf_eograce = NFSD_MONOSEC + NFSRV_LEASEDELTA;
4454           if (sf->nsf_fp == NULL)
4455                     return;
4456           error = NFSD_RDWR(UIO_READ, NFSFPVNODE(sf->nsf_fp),
4457               (caddr_t)&sf->nsf_rec, sizeof (struct nfsf_rec), off, UIO_SYSSPACE,
4458               0, NFSFPCRED(sf->nsf_fp), &aresid, p);
4459           if (error || aresid || sf->nsf_numboots == 0 ||
4460                     sf->nsf_numboots > NFSNSF_MAXNUMBOOTS)
4461                     return;
4462 
4463           /*
4464            * Now, read in the boottimes.
4465            */
4466           sf->nsf_bootvals = (time_t *)malloc((sf->nsf_numboots + 1) *
4467                     sizeof (time_t), M_TEMP, M_WAITOK);
4468           off = sizeof (struct nfsf_rec);
4469           error = NFSD_RDWR(UIO_READ, NFSFPVNODE(sf->nsf_fp),
4470               (caddr_t)sf->nsf_bootvals, sf->nsf_numboots * sizeof (time_t), off,
4471               UIO_SYSSPACE, 0, NFSFPCRED(sf->nsf_fp), &aresid, p);
4472           if (error || aresid) {
4473                     free((caddr_t)sf->nsf_bootvals, M_TEMP);
4474                     sf->nsf_bootvals = NULL;
4475                     return;
4476           }
4477 
4478           /*
4479            * Make sure this nfsrvboottime is different from all recorded
4480            * previous ones.
4481            */
4482           do {
4483                     tryagain = 0;
4484                     for (i = 0; i < sf->nsf_numboots; i++) {
4485                               if (nfsrvboottime == sf->nsf_bootvals[i]) {
4486                                         nfsrvboottime++;
4487                                         tryagain = 1;
4488                                         break;
4489                               }
4490                     }
4491           } while (tryagain);
4492 
4493           sf->nsf_flags |= NFSNSF_OK;
4494           off += (sf->nsf_numboots * sizeof (time_t));
4495 
4496           /*
4497            * Read through the file, building a list of records for grace
4498            * checking.
4499            * Each record is between sizeof (struct nfst_rec) and
4500            * sizeof (struct nfst_rec) + NFSV4_OPAQUELIMIT - 1
4501            * and is actually sizeof (struct nfst_rec) + nst_len - 1.
4502            */
4503           tsp = (struct nfst_rec *)malloc(sizeof (struct nfst_rec) +
4504                     NFSV4_OPAQUELIMIT - 1, M_TEMP, M_WAITOK);
4505           do {
4506               error = NFSD_RDWR(UIO_READ, NFSFPVNODE(sf->nsf_fp),
4507                   (caddr_t)tsp, sizeof (struct nfst_rec) + NFSV4_OPAQUELIMIT - 1,
4508                   off, UIO_SYSSPACE, 0, NFSFPCRED(sf->nsf_fp), &aresid, p);
4509               len = (sizeof (struct nfst_rec) + NFSV4_OPAQUELIMIT - 1) - aresid;
4510               if (error || (len > 0 && (len < sizeof (struct nfst_rec) ||
4511                     len < (sizeof (struct nfst_rec) + tsp->len - 1)))) {
4512                     /*
4513                      * Yuck, the file has been corrupted, so just return
4514                      * after clearing out any restart state, so the grace period
4515                      * is over.
4516                      */
4517                     LIST_FOREACH_SAFE(sp, &sf->nsf_head, nst_list, nsp) {
4518                               LIST_REMOVE(sp, nst_list);
4519                               free((caddr_t)sp, M_TEMP);
4520                     }
4521                     free((caddr_t)tsp, M_TEMP);
4522                     sf->nsf_flags &= ~NFSNSF_OK;
4523                     free((caddr_t)sf->nsf_bootvals, M_TEMP);
4524                     sf->nsf_bootvals = NULL;
4525                     return;
4526               }
4527               if (len > 0) {
4528                     off += sizeof (struct nfst_rec) + tsp->len - 1;
4529                     /*
4530                      * Search the list for a matching client.
4531                      */
4532                     LIST_FOREACH(sp, &sf->nsf_head, nst_list) {
4533                               if (tsp->len == sp->nst_len &&
4534                                   !NFSBCMP(tsp->client, sp->nst_client, tsp->len))
4535                                         break;
4536                     }
4537                     if (sp == NULL) {
4538                               sp = (struct nfsrv_stable *)malloc(tsp->len +
4539                                         sizeof (struct nfsrv_stable) - 1, M_TEMP,
4540                                         M_WAITOK);
4541                               NFSBCOPY((caddr_t)tsp, (caddr_t)&sp->nst_rec,
4542                                         sizeof (struct nfst_rec) + tsp->len - 1);
4543                               LIST_INSERT_HEAD(&sf->nsf_head, sp, nst_list);
4544                     } else {
4545                               if (tsp->flag == NFSNST_REVOKE)
4546                                         sp->nst_flag |= NFSNST_REVOKE;
4547                               else
4548                                         /*
4549                                          * A subsequent timestamp indicates the client
4550                                          * did a setclientid/confirm and any previous
4551                                          * revoke is no longer relevant.
4552                                          */
4553                                         sp->nst_flag &= ~NFSNST_REVOKE;
4554                     }
4555               }
4556           } while (len > 0);
4557           free((caddr_t)tsp, M_TEMP);
4558           sf->nsf_flags = NFSNSF_OK;
4559           sf->nsf_eograce = NFSD_MONOSEC + sf->nsf_lease +
4560                     NFSRV_LEASEDELTA;
4561 }
4562 
4563 /*
4564  * Update the stable storage file, now that the grace period is over.
4565  */
4566 APPLESTATIC void
nfsrv_updatestable(NFSPROC_T * p)4567 nfsrv_updatestable(NFSPROC_T *p)
4568 {
4569           struct nfsrv_stablefirst *sf = &nfsrv_stablefirst;
4570           struct nfsrv_stable *sp, *nsp;
4571           int i;
4572           struct nfsvattr nva;
4573           vnode_t vp;
4574 #if defined(__FreeBSD_version) && (__FreeBSD_version >= 500000)
4575           mount_t mp = NULL;
4576 #endif
4577           int error;
4578 
4579           if (sf->nsf_fp == NULL || (sf->nsf_flags & NFSNSF_UPDATEDONE))
4580                     return;
4581           sf->nsf_flags |= NFSNSF_UPDATEDONE;
4582           /*
4583            * Ok, we need to rewrite the stable storage file.
4584            * - truncate to 0 length
4585            * - write the new first structure
4586            * - loop through the data structures, writing out any that
4587            *   have timestamps older than the old boot
4588            */
4589           if (sf->nsf_bootvals) {
4590                     sf->nsf_numboots++;
4591                     for (i = sf->nsf_numboots - 2; i >= 0; i--)
4592                               sf->nsf_bootvals[i + 1] = sf->nsf_bootvals[i];
4593           } else {
4594                     sf->nsf_numboots = 1;
4595                     sf->nsf_bootvals = (time_t *)malloc(sizeof (time_t),
4596                               M_TEMP, M_WAITOK);
4597           }
4598           sf->nsf_bootvals[0] = nfsrvboottime;
4599           sf->nsf_lease = nfsrv_lease;
4600           NFSVNO_ATTRINIT(&nva);
4601           NFSVNO_SETATTRVAL(&nva, size, 0);
4602           vp = NFSFPVNODE(sf->nsf_fp);
4603           vn_start_write(vp, &mp, V_WAIT);
4604           if (NFSVOPLOCK(vp, LK_EXCLUSIVE) == 0) {
4605                     error = nfsvno_setattr(vp, &nva, NFSFPCRED(sf->nsf_fp), p,
4606                         NULL);
4607                     NFSVOPUNLOCK(vp, 0);
4608           } else
4609                     error = EPERM;
4610           vn_finished_write(mp);
4611           if (!error)
4612               error = NFSD_RDWR(UIO_WRITE, vp,
4613                     (caddr_t)&sf->nsf_rec, sizeof (struct nfsf_rec), (off_t)0,
4614                     UIO_SYSSPACE, IO_SYNC, NFSFPCRED(sf->nsf_fp), NULL, p);
4615           if (!error)
4616               error = NFSD_RDWR(UIO_WRITE, vp,
4617                     (caddr_t)sf->nsf_bootvals,
4618                     sf->nsf_numboots * sizeof (time_t),
4619                     (off_t)(sizeof (struct nfsf_rec)),
4620                     UIO_SYSSPACE, IO_SYNC, NFSFPCRED(sf->nsf_fp), NULL, p);
4621           free((caddr_t)sf->nsf_bootvals, M_TEMP);
4622           sf->nsf_bootvals = NULL;
4623           if (error) {
4624                     sf->nsf_flags &= ~NFSNSF_OK;
4625                     printf("EEK! Can't write NfsV4 stable storage file\n");
4626                     return;
4627           }
4628           sf->nsf_flags |= NFSNSF_OK;
4629 
4630           /*
4631            * Loop through the list and write out timestamp records for
4632            * any clients that successfully reclaimed state.
4633            */
4634           LIST_FOREACH_SAFE(sp, &sf->nsf_head, nst_list, nsp) {
4635                     if (sp->nst_flag & NFSNST_GOTSTATE) {
4636                               nfsrv_writestable(sp->nst_client, sp->nst_len,
4637                                         NFSNST_NEWSTATE, p);
4638                               sp->nst_clp->lc_flags |= LCL_STAMPEDSTABLE;
4639                     }
4640                     LIST_REMOVE(sp, nst_list);
4641                     free((caddr_t)sp, M_TEMP);
4642           }
4643           nfsrv_backupstable();
4644 }
4645 
4646 /*
4647  * Append a record to the stable storage file.
4648  */
4649 APPLESTATIC void
nfsrv_writestable(u_char * client,int len,int flag,NFSPROC_T * p)4650 nfsrv_writestable(u_char *client, int len, int flag, NFSPROC_T *p)
4651 {
4652           struct nfsrv_stablefirst *sf = &nfsrv_stablefirst;
4653           struct nfst_rec *sp;
4654           int error;
4655 
4656           if (!(sf->nsf_flags & NFSNSF_OK) || sf->nsf_fp == NULL)
4657                     return;
4658           sp = (struct nfst_rec *)malloc(sizeof (struct nfst_rec) +
4659                     len - 1, M_TEMP, M_WAITOK);
4660           sp->len = len;
4661           NFSBCOPY(client, sp->client, len);
4662           sp->flag = flag;
4663           error = NFSD_RDWR(UIO_WRITE, NFSFPVNODE(sf->nsf_fp),
4664               (caddr_t)sp, sizeof (struct nfst_rec) + len - 1, (off_t)0,
4665               UIO_SYSSPACE, (IO_SYNC | IO_APPEND), NFSFPCRED(sf->nsf_fp), NULL, p);
4666           free((caddr_t)sp, M_TEMP);
4667           if (error) {
4668                     sf->nsf_flags &= ~NFSNSF_OK;
4669                     printf("EEK! Can't write NfsV4 stable storage file\n");
4670           }
4671 }
4672 
4673 /*
4674  * This function is called during the grace period to mark a client
4675  * that successfully reclaimed state.
4676  */
4677 static void
nfsrv_markstable(struct nfsclient * clp)4678 nfsrv_markstable(struct nfsclient *clp)
4679 {
4680           struct nfsrv_stable *sp;
4681 
4682           /*
4683            * First find the client structure.
4684            */
4685           LIST_FOREACH(sp, &nfsrv_stablefirst.nsf_head, nst_list) {
4686                     if (sp->nst_len == clp->lc_idlen &&
4687                         !NFSBCMP(sp->nst_client, clp->lc_id, sp->nst_len))
4688                               break;
4689           }
4690           if (sp == NULL)
4691                     return;
4692 
4693           /*
4694            * Now, just mark it and set the nfsclient back pointer.
4695            */
4696           sp->nst_flag |= NFSNST_GOTSTATE;
4697           sp->nst_clp = clp;
4698 }
4699 
4700 /*
4701  * This function is called for a reclaim, to see if it gets grace.
4702  * It returns 0 if a reclaim is allowed, 1 otherwise.
4703  */
4704 static int
nfsrv_checkstable(struct nfsclient * clp)4705 nfsrv_checkstable(struct nfsclient *clp)
4706 {
4707           struct nfsrv_stable *sp;
4708 
4709           /*
4710            * First, find the entry for the client.
4711            */
4712           LIST_FOREACH(sp, &nfsrv_stablefirst.nsf_head, nst_list) {
4713                     if (sp->nst_len == clp->lc_idlen &&
4714                         !NFSBCMP(sp->nst_client, clp->lc_id, sp->nst_len))
4715                               break;
4716           }
4717 
4718           /*
4719            * If not in the list, state was revoked or no state was issued
4720            * since the previous reboot, a reclaim is denied.
4721            */
4722           if (sp == NULL ||
4723               (sp->nst_flag & NFSNST_REVOKE) ||
4724               !(nfsrv_stablefirst.nsf_flags & NFSNSF_OK))
4725                     return (1);
4726           return (0);
4727 }
4728 
4729 /*
4730  * Test for and try to clear out a conflicting client. This is called by
4731  * nfsrv_lockctrl() and nfsrv_openctrl() when conflicts with other clients
4732  * a found.
4733  * The trick here is that it can't revoke a conflicting client with an
4734  * expired lease unless it holds the v4root lock, so...
4735  * If no v4root lock, get the lock and return 1 to indicate "try again".
4736  * Return 0 to indicate the conflict can't be revoked and 1 to indicate
4737  * the revocation worked and the conflicting client is "bye, bye", so it
4738  * can be tried again.
4739  * Return 2 to indicate that the vnode is VI_DOOMED after NFSVOPLOCK().
4740  * Unlocks State before a non-zero value is returned.
4741  */
4742 static int
nfsrv_clientconflict(struct nfsclient * clp,int * haslockp,vnode_t vp,NFSPROC_T * p)4743 nfsrv_clientconflict(struct nfsclient *clp, int *haslockp, vnode_t vp,
4744     NFSPROC_T *p)
4745 {
4746           int gotlock, lktype = 0;
4747 
4748           /*
4749            * If lease hasn't expired, we can't fix it.
4750            */
4751           if (clp->lc_expiry >= NFSD_MONOSEC ||
4752               !(nfsrv_stablefirst.nsf_flags & NFSNSF_UPDATEDONE))
4753                     return (0);
4754           if (*haslockp == 0) {
4755                     NFSUNLOCKSTATE();
4756                     if (vp != NULL) {
4757                               lktype = NFSVOPISLOCKED(vp);
4758                               NFSVOPUNLOCK(vp, 0);
4759                     }
4760                     NFSLOCKV4ROOTMUTEX();
4761                     nfsv4_relref(&nfsv4rootfs_lock);
4762                     do {
4763                               gotlock = nfsv4_lock(&nfsv4rootfs_lock, 1, NULL,
4764                                   NFSV4ROOTLOCKMUTEXPTR, NULL);
4765                     } while (!gotlock);
4766                     NFSUNLOCKV4ROOTMUTEX();
4767                     *haslockp = 1;
4768                     if (vp != NULL) {
4769                               NFSVOPLOCK(vp, lktype | LK_RETRY);
4770                               if ((vp->v_iflag & VI_DOOMED) != 0)
4771                                         return (2);
4772                     }
4773                     return (1);
4774           }
4775           NFSUNLOCKSTATE();
4776 
4777           /*
4778            * Ok, we can expire the conflicting client.
4779            */
4780           nfsrv_writestable(clp->lc_id, clp->lc_idlen, NFSNST_REVOKE, p);
4781           nfsrv_backupstable();
4782           nfsrv_cleanclient(clp, p);
4783           nfsrv_freedeleglist(&clp->lc_deleg);
4784           nfsrv_freedeleglist(&clp->lc_olddeleg);
4785           LIST_REMOVE(clp, lc_hash);
4786           nfsrv_zapclient(clp, p);
4787           return (1);
4788 }
4789 
4790 /*
4791  * Resolve a delegation conflict.
4792  * Returns 0 to indicate the conflict was resolved without sleeping.
4793  * Return -1 to indicate that the caller should check for conflicts again.
4794  * Return > 0 for an error that should be returned, normally NFSERR_DELAY.
4795  *
4796  * Also, manipulate the nfsv4root_lock, as required. It isn't changed
4797  * for a return of 0, since there was no sleep and it could be required
4798  * later. It is released for a return of NFSERR_DELAY, since the caller
4799  * will return that error. It is released when a sleep was done waiting
4800  * for the delegation to be returned or expire (so that other nfsds can
4801  * handle ops). Then, it must be acquired for the write to stable storage.
4802  * (This function is somewhat similar to nfsrv_clientconflict(), but
4803  *  the semantics differ in a couple of subtle ways. The return of 0
4804  *  indicates the conflict was resolved without sleeping here, not
4805  *  that the conflict can't be resolved and the handling of nfsv4root_lock
4806  *  differs, as noted above.)
4807  * Unlocks State before returning a non-zero value.
4808  */
4809 static int
nfsrv_delegconflict(struct nfsstate * stp,int * haslockp,NFSPROC_T * p,vnode_t vp)4810 nfsrv_delegconflict(struct nfsstate *stp, int *haslockp, NFSPROC_T *p,
4811     vnode_t vp)
4812 {
4813           struct nfsclient *clp = stp->ls_clp;
4814           int gotlock, error, lktype = 0, retrycnt, zapped_clp;
4815           nfsv4stateid_t tstateid;
4816           fhandle_t tfh;
4817 
4818           /*
4819            * If the conflict is with an old delegation...
4820            */
4821           if (stp->ls_flags & NFSLCK_OLDDELEG) {
4822                     /*
4823                      * You can delete it, if it has expired.
4824                      */
4825                     if (clp->lc_delegtime < NFSD_MONOSEC) {
4826                               nfsrv_freedeleg(stp);
4827                               NFSUNLOCKSTATE();
4828                               error = -1;
4829                               goto out;
4830                     }
4831                     NFSUNLOCKSTATE();
4832                     /*
4833                      * During this delay, the old delegation could expire or it
4834                      * could be recovered by the client via an Open with
4835                      * CLAIM_DELEGATE_PREV.
4836                      * Release the nfsv4root_lock, if held.
4837                      */
4838                     if (*haslockp) {
4839                               *haslockp = 0;
4840                               NFSLOCKV4ROOTMUTEX();
4841                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
4842                               NFSUNLOCKV4ROOTMUTEX();
4843                     }
4844                     error = NFSERR_DELAY;
4845                     goto out;
4846           }
4847 
4848           /*
4849            * It's a current delegation, so:
4850            * - check to see if the delegation has expired
4851            *   - if so, get the v4root lock and then expire it
4852            */
4853           if (!(stp->ls_flags & NFSLCK_DELEGRECALL)) {
4854                     /*
4855                      * - do a recall callback, since not yet done
4856                      * For now, never allow truncate to be set. To use
4857                      * truncate safely, it must be guaranteed that the
4858                      * Remove, Rename or Setattr with size of 0 will
4859                      * succeed and that would require major changes to
4860                      * the VFS/Vnode OPs.
4861                      * Set the expiry time large enough so that it won't expire
4862                      * until after the callback, then set it correctly, once
4863                      * the callback is done. (The delegation will now time
4864                      * out whether or not the Recall worked ok. The timeout
4865                      * will be extended when ops are done on the delegation
4866                      * stateid, up to the timelimit.)
4867                      */
4868                     stp->ls_delegtime = NFSD_MONOSEC + (2 * nfsrv_lease) +
4869                         NFSRV_LEASEDELTA;
4870                     stp->ls_delegtimelimit = NFSD_MONOSEC + (6 * nfsrv_lease) +
4871                         NFSRV_LEASEDELTA;
4872                     stp->ls_flags |= NFSLCK_DELEGRECALL;
4873 
4874                     /*
4875                      * Loop NFSRV_CBRETRYCNT times while the CBRecall replies
4876                      * NFSERR_BADSTATEID or NFSERR_BADHANDLE. This is done
4877                      * in order to try and avoid a race that could happen
4878                      * when a CBRecall request passed the Open reply with
4879                      * the delegation in it when transitting the network.
4880                      * Since nfsrv_docallback will sleep, don't use stp after
4881                      * the call.
4882                      */
4883                     NFSBCOPY((caddr_t)&stp->ls_stateid, (caddr_t)&tstateid,
4884                         sizeof (tstateid));
4885                     NFSBCOPY((caddr_t)&stp->ls_lfp->lf_fh, (caddr_t)&tfh,
4886                         sizeof (tfh));
4887                     NFSUNLOCKSTATE();
4888                     if (*haslockp) {
4889                               *haslockp = 0;
4890                               NFSLOCKV4ROOTMUTEX();
4891                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
4892                               NFSUNLOCKV4ROOTMUTEX();
4893                     }
4894                     retrycnt = 0;
4895                     do {
4896                         error = nfsrv_docallback(clp, NFSV4OP_CBRECALL,
4897                               &tstateid, 0, &tfh, NULL, NULL, p);
4898                         retrycnt++;
4899                     } while ((error == NFSERR_BADSTATEID ||
4900                         error == NFSERR_BADHANDLE) && retrycnt < NFSV4_CBRETRYCNT);
4901                     error = NFSERR_DELAY;
4902                     goto out;
4903           }
4904 
4905           if (clp->lc_expiry >= NFSD_MONOSEC &&
4906               stp->ls_delegtime >= NFSD_MONOSEC) {
4907                     NFSUNLOCKSTATE();
4908                     /*
4909                      * A recall has been done, but it has not yet expired.
4910                      * So, RETURN_DELAY.
4911                      */
4912                     if (*haslockp) {
4913                               *haslockp = 0;
4914                               NFSLOCKV4ROOTMUTEX();
4915                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
4916                               NFSUNLOCKV4ROOTMUTEX();
4917                     }
4918                     error = NFSERR_DELAY;
4919                     goto out;
4920           }
4921 
4922           /*
4923            * If we don't yet have the lock, just get it and then return,
4924            * since we need that before deleting expired state, such as
4925            * this delegation.
4926            * When getting the lock, unlock the vnode, so other nfsds that
4927            * are in progress, won't get stuck waiting for the vnode lock.
4928            */
4929           if (*haslockp == 0) {
4930                     NFSUNLOCKSTATE();
4931                     if (vp != NULL) {
4932                               lktype = NFSVOPISLOCKED(vp);
4933                               NFSVOPUNLOCK(vp, 0);
4934                     }
4935                     NFSLOCKV4ROOTMUTEX();
4936                     nfsv4_relref(&nfsv4rootfs_lock);
4937                     do {
4938                               gotlock = nfsv4_lock(&nfsv4rootfs_lock, 1, NULL,
4939                                   NFSV4ROOTLOCKMUTEXPTR, NULL);
4940                     } while (!gotlock);
4941                     NFSUNLOCKV4ROOTMUTEX();
4942                     *haslockp = 1;
4943                     if (vp != NULL) {
4944                               NFSVOPLOCK(vp, lktype | LK_RETRY);
4945                               if ((vp->v_iflag & VI_DOOMED) != 0) {
4946                                         *haslockp = 0;
4947                                         NFSLOCKV4ROOTMUTEX();
4948                                         nfsv4_unlock(&nfsv4rootfs_lock, 1);
4949                                         NFSUNLOCKV4ROOTMUTEX();
4950                                         error = NFSERR_PERM;
4951                                         goto out;
4952                               }
4953                     }
4954                     error = -1;
4955                     goto out;
4956           }
4957 
4958           NFSUNLOCKSTATE();
4959           /*
4960            * Ok, we can delete the expired delegation.
4961            * First, write the Revoke record to stable storage and then
4962            * clear out the conflict.
4963            * Since all other nfsd threads are now blocked, we can safely
4964            * sleep without the state changing.
4965            */
4966           nfsrv_writestable(clp->lc_id, clp->lc_idlen, NFSNST_REVOKE, p);
4967           nfsrv_backupstable();
4968           if (clp->lc_expiry < NFSD_MONOSEC) {
4969                     nfsrv_cleanclient(clp, p);
4970                     nfsrv_freedeleglist(&clp->lc_deleg);
4971                     nfsrv_freedeleglist(&clp->lc_olddeleg);
4972                     LIST_REMOVE(clp, lc_hash);
4973                     zapped_clp = 1;
4974           } else {
4975                     nfsrv_freedeleg(stp);
4976                     zapped_clp = 0;
4977           }
4978           if (zapped_clp)
4979                     nfsrv_zapclient(clp, p);
4980           error = -1;
4981 
4982 out:
4983           NFSEXITCODE(error);
4984           return (error);
4985 }
4986 
4987 /*
4988  * Check for a remove allowed, if remove is set to 1 and get rid of
4989  * delegations.
4990  */
4991 APPLESTATIC int
nfsrv_checkremove(vnode_t vp,int remove,NFSPROC_T * p)4992 nfsrv_checkremove(vnode_t vp, int remove, NFSPROC_T *p)
4993 {
4994           struct nfsstate *stp;
4995           struct nfslockfile *lfp;
4996           int error, haslock = 0;
4997           fhandle_t nfh;
4998 
4999           /*
5000            * First, get the lock file structure.
5001            * (A return of -1 means no associated state, so remove ok.)
5002            */
5003           error = nfsrv_getlockfh(vp, NFSLCK_CHECK, NULL, &nfh, p);
5004 tryagain:
5005           NFSLOCKSTATE();
5006           if (!error)
5007                     error = nfsrv_getlockfile(NFSLCK_CHECK, NULL, &lfp, &nfh, 0);
5008           if (error) {
5009                     NFSUNLOCKSTATE();
5010                     if (haslock) {
5011                               NFSLOCKV4ROOTMUTEX();
5012                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
5013                               NFSUNLOCKV4ROOTMUTEX();
5014                     }
5015                     if (error == -1)
5016                               error = 0;
5017                     goto out;
5018           }
5019 
5020           /*
5021            * Now, we must Recall any delegations.
5022            */
5023           error = nfsrv_cleandeleg(vp, lfp, NULL, &haslock, p);
5024           if (error) {
5025                     /*
5026                      * nfsrv_cleandeleg() unlocks state for non-zero
5027                      * return.
5028                      */
5029                     if (error == -1)
5030                               goto tryagain;
5031                     if (haslock) {
5032                               NFSLOCKV4ROOTMUTEX();
5033                               nfsv4_unlock(&nfsv4rootfs_lock, 1);
5034                               NFSUNLOCKV4ROOTMUTEX();
5035                     }
5036                     goto out;
5037           }
5038 
5039           /*
5040            * Now, look for a conflicting open share.
5041            */
5042           if (remove) {
5043                     /*
5044                      * If the entry in the directory was the last reference to the
5045                      * corresponding filesystem object, the object can be destroyed
5046                      * */
5047                     if(lfp->lf_usecount>1)
5048                               LIST_FOREACH(stp, &lfp->lf_open, ls_file) {
5049                                         if (stp->ls_flags & NFSLCK_WRITEDENY) {
5050                                                   error = NFSERR_FILEOPEN;
5051                                                   break;
5052                                         }
5053                               }
5054           }
5055 
5056           NFSUNLOCKSTATE();
5057           if (haslock) {
5058                     NFSLOCKV4ROOTMUTEX();
5059                     nfsv4_unlock(&nfsv4rootfs_lock, 1);
5060                     NFSUNLOCKV4ROOTMUTEX();
5061           }
5062 
5063 out:
5064           NFSEXITCODE(error);
5065           return (error);
5066 }
5067 
5068 /*
5069  * Clear out all delegations for the file referred to by lfp.
5070  * May return NFSERR_DELAY, if there will be a delay waiting for
5071  * delegations to expire.
5072  * Returns -1 to indicate it slept while recalling a delegation.
5073  * This function has the side effect of deleting the nfslockfile structure,
5074  * if it no longer has associated state and didn't have to sleep.
5075  * Unlocks State before a non-zero value is returned.
5076  */
5077 static int
nfsrv_cleandeleg(vnode_t vp,struct nfslockfile * lfp,struct nfsclient * clp,int * haslockp,NFSPROC_T * p)5078 nfsrv_cleandeleg(vnode_t vp, struct nfslockfile *lfp,
5079     struct nfsclient *clp, int *haslockp, NFSPROC_T *p)
5080 {
5081           struct nfsstate *stp, *nstp;
5082           int ret = 0;
5083 
5084           stp = LIST_FIRST(&lfp->lf_deleg);
5085           while (stp != NULL) {
5086                     nstp = LIST_NEXT(stp, ls_file);
5087                     if (stp->ls_clp != clp) {
5088                               ret = nfsrv_delegconflict(stp, haslockp, p, vp);
5089                               if (ret) {
5090                                         /*
5091                                          * nfsrv_delegconflict() unlocks state
5092                                          * when it returns non-zero.
5093                                          */
5094                                         goto out;
5095                               }
5096                     }
5097                     stp = nstp;
5098           }
5099 out:
5100           NFSEXITCODE(ret);
5101           return (ret);
5102 }
5103 
5104 /*
5105  * There are certain operations that, when being done outside of NFSv4,
5106  * require that any NFSv4 delegation for the file be recalled.
5107  * This function is to be called for those cases:
5108  * VOP_RENAME() - When a delegation is being recalled for any reason,
5109  *        the client may have to do Opens against the server, using the file's
5110  *        final component name. If the file has been renamed on the server,
5111  *        that component name will be incorrect and the Open will fail.
5112  * VOP_REMOVE() - Theoretically, a client could Open a file after it has
5113  *        been removed on the server, if there is a delegation issued to
5114  *        that client for the file. I say "theoretically" since clients
5115  *        normally do an Access Op before the Open and that Access Op will
5116  *        fail with ESTALE. Note that NFSv2 and 3 don't even do Opens, so
5117  *        they will detect the file's removal in the same manner. (There is
5118  *        one case where RFC3530 allows a client to do an Open without first
5119  *        doing an Access Op, which is passage of a check against the ACE
5120  *        returned with a Write delegation, but current practice is to ignore
5121  *        the ACE and always do an Access Op.)
5122  *        Since the functions can only be called with an unlocked vnode, this
5123  *        can't be done at this time.
5124  * VOP_ADVLOCK() - When a client holds a delegation, it can issue byte range
5125  *        locks locally in the client, which are not visible to the server. To
5126  *        deal with this, issuing of delegations for a vnode must be disabled
5127  *        and all delegations for the vnode recalled. This is done via the
5128  *        second function, using the VV_DISABLEDELEG vflag on the vnode.
5129  */
5130 APPLESTATIC void
nfsd_recalldelegation(vnode_t vp,NFSPROC_T * p)5131 nfsd_recalldelegation(vnode_t vp, NFSPROC_T *p)
5132 {
5133           time_t starttime;
5134           int error;
5135 
5136           /*
5137            * First, check to see if the server is currently running and it has
5138            * been called for a regular file when issuing delegations.
5139            */
5140           if (newnfs_numnfsd == 0 || vp->v_type != VREG ||
5141               nfsrv_issuedelegs == 0)
5142                     return;
5143 
5144           KASSERT((NFSVOPISLOCKED(vp) != LK_EXCLUSIVE), ("vp %p is locked", vp));
5145           /*
5146            * First, get a reference on the nfsv4rootfs_lock so that an
5147            * exclusive lock cannot be acquired by another thread.
5148            */
5149           NFSLOCKV4ROOTMUTEX();
5150           nfsv4_getref(&nfsv4rootfs_lock, NULL, NFSV4ROOTLOCKMUTEXPTR, NULL);
5151           NFSUNLOCKV4ROOTMUTEX();
5152 
5153           /*
5154            * Now, call nfsrv_checkremove() in a loop while it returns
5155            * NFSERR_DELAY. Return upon any other error or when timed out.
5156            */
5157           starttime = NFSD_MONOSEC;
5158           do {
5159                     if (NFSVOPLOCK(vp, LK_EXCLUSIVE) == 0) {
5160                               error = nfsrv_checkremove(vp, 0, p);
5161                               NFSVOPUNLOCK(vp, 0);
5162                     } else
5163                               error = EPERM;
5164                     if (error == NFSERR_DELAY) {
5165                               if (NFSD_MONOSEC - starttime > NFS_REMOVETIMEO)
5166                                         break;
5167                               /* Sleep for a short period of time */
5168                               (void) nfs_catnap(PZERO, 0, "nfsremove");
5169                     }
5170           } while (error == NFSERR_DELAY);
5171           NFSLOCKV4ROOTMUTEX();
5172           nfsv4_relref(&nfsv4rootfs_lock);
5173           NFSUNLOCKV4ROOTMUTEX();
5174 }
5175 
5176 APPLESTATIC void
nfsd_disabledelegation(vnode_t vp,NFSPROC_T * p)5177 nfsd_disabledelegation(vnode_t vp, NFSPROC_T *p)
5178 {
5179 
5180 #ifdef VV_DISABLEDELEG
5181           /*
5182            * First, flag issuance of delegations disabled.
5183            */
5184           atomic_set_long(&vp->v_vflag, VV_DISABLEDELEG);
5185 #endif
5186 
5187           /*
5188            * Then call nfsd_recalldelegation() to get rid of all extant
5189            * delegations.
5190            */
5191           nfsd_recalldelegation(vp, p);
5192 }
5193 
5194 /*
5195  * Check for conflicting locks, etc. and then get rid of delegations.
5196  * (At one point I thought that I should get rid of delegations for any
5197  *  Setattr, since it could potentially disallow the I/O op (read or write)
5198  *  allowed by the delegation. However, Setattr Ops that aren't changing
5199  *  the size get a stateid of all 0s, so you can't tell if it is a delegation
5200  *  for the same client or a different one, so I decided to only get rid
5201  *  of delegations for other clients when the size is being changed.)
5202  * In general, a Setattr can disable NFS I/O Ops that are outstanding, such
5203  * as Write backs, even if there is no delegation, so it really isn't any
5204  * different?)
5205  */
5206 APPLESTATIC int
nfsrv_checksetattr(vnode_t vp,struct nfsrv_descript * nd,nfsv4stateid_t * stateidp,struct nfsvattr * nvap,nfsattrbit_t * attrbitp,struct nfsexstuff * exp,NFSPROC_T * p)5207 nfsrv_checksetattr(vnode_t vp, struct nfsrv_descript *nd,
5208     nfsv4stateid_t *stateidp, struct nfsvattr *nvap, nfsattrbit_t *attrbitp,
5209     struct nfsexstuff *exp, NFSPROC_T *p)
5210 {
5211           struct nfsstate st, *stp = &st;
5212           struct nfslock lo, *lop = &lo;
5213           int error = 0;
5214           nfsquad_t clientid;
5215 
5216           if (NFSISSET_ATTRBIT(attrbitp, NFSATTRBIT_SIZE)) {
5217                     stp->ls_flags = (NFSLCK_CHECK | NFSLCK_WRITEACCESS);
5218                     lop->lo_first = nvap->na_size;
5219           } else {
5220                     stp->ls_flags = 0;
5221                     lop->lo_first = 0;
5222           }
5223           if (NFSISSET_ATTRBIT(attrbitp, NFSATTRBIT_OWNER) ||
5224               NFSISSET_ATTRBIT(attrbitp, NFSATTRBIT_OWNERGROUP) ||
5225               NFSISSET_ATTRBIT(attrbitp, NFSATTRBIT_MODE) ||
5226               NFSISSET_ATTRBIT(attrbitp, NFSATTRBIT_ACL))
5227                     stp->ls_flags |= NFSLCK_SETATTR;
5228           if (stp->ls_flags == 0)
5229                     goto out;
5230           lop->lo_end = NFS64BITSSET;
5231           lop->lo_flags = NFSLCK_WRITE;
5232           stp->ls_ownerlen = 0;
5233           stp->ls_op = NULL;
5234           stp->ls_uid = nd->nd_cred->cr_uid;
5235           stp->ls_stateid.seqid = stateidp->seqid;
5236           clientid.lval[0] = stp->ls_stateid.other[0] = stateidp->other[0];
5237           clientid.lval[1] = stp->ls_stateid.other[1] = stateidp->other[1];
5238           stp->ls_stateid.other[2] = stateidp->other[2];
5239           error = nfsrv_lockctrl(vp, &stp, &lop, NULL, clientid,
5240               stateidp, exp, nd, p);
5241 
5242 out:
5243           NFSEXITCODE2(error, nd);
5244           return (error);
5245 }
5246 
5247 /*
5248  * Check for a write delegation and do a CBGETATTR if there is one, updating
5249  * the attributes, as required.
5250  * Should I return an error if I can't get the attributes? (For now, I'll
5251  * just return ok.
5252  */
5253 APPLESTATIC int
nfsrv_checkgetattr(struct nfsrv_descript * nd,vnode_t vp,struct nfsvattr * nvap,nfsattrbit_t * attrbitp,struct ucred * cred,NFSPROC_T * p)5254 nfsrv_checkgetattr(struct nfsrv_descript *nd, vnode_t vp,
5255     struct nfsvattr *nvap, nfsattrbit_t *attrbitp, struct ucred *cred,
5256     NFSPROC_T *p)
5257 {
5258           struct nfsstate *stp;
5259           struct nfslockfile *lfp;
5260           struct nfsclient *clp;
5261           struct nfsvattr nva;
5262           fhandle_t nfh;
5263           int error = 0;
5264           nfsattrbit_t cbbits;
5265           u_quad_t delegfilerev;
5266 
5267           NFSCBGETATTR_ATTRBIT(attrbitp, &cbbits);
5268           if (!NFSNONZERO_ATTRBIT(&cbbits))
5269                     goto out;
5270 
5271           /*
5272            * Get the lock file structure.
5273            * (A return of -1 means no associated state, so return ok.)
5274            */
5275           error = nfsrv_getlockfh(vp, NFSLCK_CHECK, NULL, &nfh, p);
5276           NFSLOCKSTATE();
5277           if (!error)
5278                     error = nfsrv_getlockfile(NFSLCK_CHECK, NULL, &lfp, &nfh, 0);
5279           if (error) {
5280                     NFSUNLOCKSTATE();
5281                     if (error == -1)
5282                               error = 0;
5283                     goto out;
5284           }
5285 
5286           /*
5287            * Now, look for a write delegation.
5288            */
5289           LIST_FOREACH(stp, &lfp->lf_deleg, ls_file) {
5290                     if (stp->ls_flags & NFSLCK_DELEGWRITE)
5291                               break;
5292           }
5293           if (stp == NULL) {
5294                     NFSUNLOCKSTATE();
5295                     goto out;
5296           }
5297           clp = stp->ls_clp;
5298           delegfilerev = stp->ls_filerev;
5299 
5300           /*
5301            * If the Write delegation was issued as a part of this Compound RPC
5302            * or if we have an Implied Clientid (used in a previous Op in this
5303            * compound) and it is the client the delegation was issued to,
5304            * just return ok.
5305            * I also assume that it is from the same client iff the network
5306            * host IP address is the same as the callback address. (Not
5307            * exactly correct by the RFC, but avoids a lot of Getattr
5308            * callbacks.)
5309            */
5310           if (nd->nd_compref == stp->ls_compref ||
5311               ((nd->nd_flag & ND_IMPLIEDCLID) &&
5312                clp->lc_clientid.qval == nd->nd_clientid.qval) ||
5313                nfsaddr2_match(clp->lc_req.nr_nam, nd->nd_nam)) {
5314                     NFSUNLOCKSTATE();
5315                     goto out;
5316           }
5317 
5318           /*
5319            * We are now done with the delegation state structure,
5320            * so the statelock can be released and we can now tsleep().
5321            */
5322 
5323           /*
5324            * Now, we must do the CB Getattr callback, to see if Change or Size
5325            * has changed.
5326            */
5327           if (clp->lc_expiry >= NFSD_MONOSEC) {
5328                     NFSUNLOCKSTATE();
5329                     NFSVNO_ATTRINIT(&nva);
5330                     nva.na_filerev = NFS64BITSSET;
5331                     error = nfsrv_docallback(clp, NFSV4OP_CBGETATTR, NULL,
5332                         0, &nfh, &nva, &cbbits, p);
5333                     if (!error) {
5334                               if ((nva.na_filerev != NFS64BITSSET &&
5335                                   nva.na_filerev > delegfilerev) ||
5336                                   (NFSVNO_ISSETSIZE(&nva) &&
5337                                    nva.na_size != nvap->na_size)) {
5338                                         error = nfsvno_updfilerev(vp, nvap, cred, p);
5339                                         if (NFSVNO_ISSETSIZE(&nva))
5340                                                   nvap->na_size = nva.na_size;
5341                               }
5342                     } else
5343                               error = 0;          /* Ignore callback errors for now. */
5344           } else {
5345                     NFSUNLOCKSTATE();
5346           }
5347 
5348 out:
5349           NFSEXITCODE2(error, nd);
5350           return (error);
5351 }
5352 
5353 /*
5354  * This function looks for openowners that haven't had any opens for
5355  * a while and throws them away. Called by an nfsd when NFSNSF_NOOPENS
5356  * is set.
5357  */
5358 APPLESTATIC void
nfsrv_throwawayopens(NFSPROC_T * p)5359 nfsrv_throwawayopens(NFSPROC_T *p)
5360 {
5361           struct nfsclient *clp, *nclp;
5362           struct nfsstate *stp, *nstp;
5363           int i;
5364 
5365           NFSLOCKSTATE();
5366           nfsrv_stablefirst.nsf_flags &= ~NFSNSF_NOOPENS;
5367           /*
5368            * For each client...
5369            */
5370           for (i = 0; i < nfsrv_clienthashsize; i++) {
5371               LIST_FOREACH_SAFE(clp, &nfsclienthash[i], lc_hash, nclp) {
5372                     LIST_FOREACH_SAFE(stp, &clp->lc_open, ls_list, nstp) {
5373                               if (LIST_EMPTY(&stp->ls_open) &&
5374                                   (stp->ls_noopens > NFSNOOPEN ||
5375                                    (nfsrv_openpluslock * 2) >
5376                                    nfsrv_v4statelimit))
5377                                         nfsrv_freeopenowner(stp, 0, p);
5378                     }
5379               }
5380           }
5381           NFSUNLOCKSTATE();
5382 }
5383 
5384 /*
5385  * This function checks to see if the credentials are the same.
5386  * Returns 1 for not same, 0 otherwise.
5387  */
5388 static int
nfsrv_notsamecredname(struct nfsrv_descript * nd,struct nfsclient * clp)5389 nfsrv_notsamecredname(struct nfsrv_descript *nd, struct nfsclient *clp)
5390 {
5391 
5392           if (nd->nd_flag & ND_GSS) {
5393                     if (!(clp->lc_flags & LCL_GSS))
5394                               return (1);
5395                     if (clp->lc_flags & LCL_NAME) {
5396                               if (nd->nd_princlen != clp->lc_namelen ||
5397                                   NFSBCMP(nd->nd_principal, clp->lc_name,
5398                                         clp->lc_namelen))
5399                                         return (1);
5400                               else
5401                                         return (0);
5402                     }
5403                     if (nd->nd_cred->cr_uid == clp->lc_uid)
5404                               return (0);
5405                     else
5406                               return (1);
5407           } else if (clp->lc_flags & LCL_GSS)
5408                     return (1);
5409           /*
5410            * For AUTH_SYS, allow the same uid or root. (This is underspecified
5411            * in RFC3530, which talks about principals, but doesn't say anything
5412            * about uids for AUTH_SYS.)
5413            */
5414           if (nd->nd_cred->cr_uid == clp->lc_uid || nd->nd_cred->cr_uid == 0)
5415                     return (0);
5416           else
5417                     return (1);
5418 }
5419 
5420 /*
5421  * Calculate the lease expiry time.
5422  */
5423 static time_t
nfsrv_leaseexpiry(void)5424 nfsrv_leaseexpiry(void)
5425 {
5426 
5427           if (nfsrv_stablefirst.nsf_eograce > NFSD_MONOSEC)
5428                     return (NFSD_MONOSEC + 2 * (nfsrv_lease + NFSRV_LEASEDELTA));
5429           return (NFSD_MONOSEC + nfsrv_lease + NFSRV_LEASEDELTA);
5430 }
5431 
5432 /*
5433  * Delay the delegation timeout as far as ls_delegtimelimit, as required.
5434  */
5435 static void
nfsrv_delaydelegtimeout(struct nfsstate * stp)5436 nfsrv_delaydelegtimeout(struct nfsstate *stp)
5437 {
5438 
5439           if ((stp->ls_flags & NFSLCK_DELEGRECALL) == 0)
5440                     return;
5441 
5442           if ((stp->ls_delegtime + 15) > NFSD_MONOSEC &&
5443               stp->ls_delegtime < stp->ls_delegtimelimit) {
5444                     stp->ls_delegtime += nfsrv_lease;
5445                     if (stp->ls_delegtime > stp->ls_delegtimelimit)
5446                               stp->ls_delegtime = stp->ls_delegtimelimit;
5447           }
5448 }
5449 
5450 /*
5451  * This function checks to see if there is any other state associated
5452  * with the openowner for this Open.
5453  * It returns 1 if there is no other state, 0 otherwise.
5454  */
5455 static int
nfsrv_nootherstate(struct nfsstate * stp)5456 nfsrv_nootherstate(struct nfsstate *stp)
5457 {
5458           struct nfsstate *tstp;
5459 
5460           LIST_FOREACH(tstp, &stp->ls_openowner->ls_open, ls_list) {
5461                     if (tstp != stp || !LIST_EMPTY(&tstp->ls_lock))
5462                               return (0);
5463           }
5464           return (1);
5465 }
5466 
5467 /*
5468  * Create a list of lock deltas (changes to local byte range locking
5469  * that can be rolled back using the list) and apply the changes via
5470  * nfsvno_advlock(). Optionally, lock the list. It is expected that either
5471  * the rollback or update function will be called after this.
5472  * It returns an error (and rolls back, as required), if any nfsvno_advlock()
5473  * call fails. If it returns an error, it will unlock the list.
5474  */
5475 static int
nfsrv_locallock(vnode_t vp,struct nfslockfile * lfp,int flags,uint64_t first,uint64_t end,struct nfslockconflict * cfp,NFSPROC_T * p)5476 nfsrv_locallock(vnode_t vp, struct nfslockfile *lfp, int flags,
5477     uint64_t first, uint64_t end, struct nfslockconflict *cfp, NFSPROC_T *p)
5478 {
5479           struct nfslock *lop, *nlop;
5480           int error = 0;
5481 
5482           /* Loop through the list of locks. */
5483           lop = LIST_FIRST(&lfp->lf_locallock);
5484           while (first < end && lop != NULL) {
5485                     nlop = LIST_NEXT(lop, lo_lckowner);
5486                     if (first >= lop->lo_end) {
5487                               /* not there yet */
5488                               lop = nlop;
5489                     } else if (first < lop->lo_first) {
5490                               /* new one starts before entry in list */
5491                               if (end <= lop->lo_first) {
5492                                         /* no overlap between old and new */
5493                                         error = nfsrv_dolocal(vp, lfp, flags,
5494                                             NFSLCK_UNLOCK, first, end, cfp, p);
5495                                         if (error != 0)
5496                                                   break;
5497                                         first = end;
5498                               } else {
5499                                         /* handle fragment overlapped with new one */
5500                                         error = nfsrv_dolocal(vp, lfp, flags,
5501                                             NFSLCK_UNLOCK, first, lop->lo_first, cfp,
5502                                             p);
5503                                         if (error != 0)
5504                                                   break;
5505                                         first = lop->lo_first;
5506                               }
5507                     } else {
5508                               /* new one overlaps this entry in list */
5509                               if (end <= lop->lo_end) {
5510                                         /* overlaps all of new one */
5511                                         error = nfsrv_dolocal(vp, lfp, flags,
5512                                             lop->lo_flags, first, end, cfp, p);
5513                                         if (error != 0)
5514                                                   break;
5515                                         first = end;
5516                               } else {
5517                                         /* handle fragment overlapped with new one */
5518                                         error = nfsrv_dolocal(vp, lfp, flags,
5519                                             lop->lo_flags, first, lop->lo_end, cfp, p);
5520                                         if (error != 0)
5521                                                   break;
5522                                         first = lop->lo_end;
5523                                         lop = nlop;
5524                               }
5525                     }
5526           }
5527           if (first < end && error == 0)
5528                     /* handle fragment past end of list */
5529                     error = nfsrv_dolocal(vp, lfp, flags, NFSLCK_UNLOCK, first,
5530                         end, cfp, p);
5531 
5532           NFSEXITCODE(error);
5533           return (error);
5534 }
5535 
5536 /*
5537  * Local lock unlock. Unlock all byte ranges that are no longer locked
5538  * by NFSv4. To do this, unlock any subranges of first-->end that
5539  * do not overlap with the byte ranges of any lock in the lfp->lf_lock
5540  * list. This list has all locks for the file held by other
5541  * <clientid, lockowner> tuples. The list is ordered by increasing
5542  * lo_first value, but may have entries that overlap each other, for
5543  * the case of read locks.
5544  */
5545 static void
nfsrv_localunlock(vnode_t vp,struct nfslockfile * lfp,uint64_t init_first,uint64_t init_end,NFSPROC_T * p)5546 nfsrv_localunlock(vnode_t vp, struct nfslockfile *lfp, uint64_t init_first,
5547     uint64_t init_end, NFSPROC_T *p)
5548 {
5549           struct nfslock *lop;
5550           uint64_t first, end, prevfirst;
5551 
5552           first = init_first;
5553           end = init_end;
5554           while (first < init_end) {
5555                     /* Loop through all nfs locks, adjusting first and end */
5556                     prevfirst = 0;
5557                     LIST_FOREACH(lop, &lfp->lf_lock, lo_lckfile) {
5558                               KASSERT(prevfirst <= lop->lo_first,
5559                                   ("nfsv4 locks out of order"));
5560                               KASSERT(lop->lo_first < lop->lo_end,
5561                                   ("nfsv4 bogus lock"));
5562                               prevfirst = lop->lo_first;
5563                               if (first >= lop->lo_first &&
5564                                   first < lop->lo_end)
5565                                         /*
5566                                          * Overlaps with initial part, so trim
5567                                          * off that initial part by moving first past
5568                                          * it.
5569                                          */
5570                                         first = lop->lo_end;
5571                               else if (end > lop->lo_first &&
5572                                   lop->lo_first > first) {
5573                                         /*
5574                                          * This lock defines the end of the
5575                                          * segment to unlock, so set end to the
5576                                          * start of it and break out of the loop.
5577                                          */
5578                                         end = lop->lo_first;
5579                                         break;
5580                               }
5581                               if (first >= end)
5582                                         /*
5583                                          * There is no segment left to do, so
5584                                          * break out of this loop and then exit
5585                                          * the outer while() since first will be set
5586                                          * to end, which must equal init_end here.
5587                                          */
5588                                         break;
5589                     }
5590                     if (first < end) {
5591                               /* Unlock this segment */
5592                               (void) nfsrv_dolocal(vp, lfp, NFSLCK_UNLOCK,
5593                                   NFSLCK_READ, first, end, NULL, p);
5594                               nfsrv_locallock_commit(lfp, NFSLCK_UNLOCK,
5595                                   first, end);
5596                     }
5597                     /*
5598                      * Now move past this segment and look for any further
5599                      * segment in the range, if there is one.
5600                      */
5601                     first = end;
5602                     end = init_end;
5603           }
5604 }
5605 
5606 /*
5607  * Do the local lock operation and update the rollback list, as required.
5608  * Perform the rollback and return the error if nfsvno_advlock() fails.
5609  */
5610 static int
nfsrv_dolocal(vnode_t vp,struct nfslockfile * lfp,int flags,int oldflags,uint64_t first,uint64_t end,struct nfslockconflict * cfp,NFSPROC_T * p)5611 nfsrv_dolocal(vnode_t vp, struct nfslockfile *lfp, int flags, int oldflags,
5612     uint64_t first, uint64_t end, struct nfslockconflict *cfp, NFSPROC_T *p)
5613 {
5614           struct nfsrollback *rlp;
5615           int error = 0, ltype, oldltype;
5616 
5617           if (flags & NFSLCK_WRITE)
5618                     ltype = F_WRLCK;
5619           else if (flags & NFSLCK_READ)
5620                     ltype = F_RDLCK;
5621           else
5622                     ltype = F_UNLCK;
5623           if (oldflags & NFSLCK_WRITE)
5624                     oldltype = F_WRLCK;
5625           else if (oldflags & NFSLCK_READ)
5626                     oldltype = F_RDLCK;
5627           else
5628                     oldltype = F_UNLCK;
5629           if (ltype == oldltype || (oldltype == F_WRLCK && ltype == F_RDLCK))
5630                     /* nothing to do */
5631                     goto out;
5632           error = nfsvno_advlock(vp, ltype, first, end, p);
5633           if (error != 0) {
5634                     if (cfp != NULL) {
5635                               cfp->cl_clientid.lval[0] = 0;
5636                               cfp->cl_clientid.lval[1] = 0;
5637                               cfp->cl_first = 0;
5638                               cfp->cl_end = NFS64BITSSET;
5639                               cfp->cl_flags = NFSLCK_WRITE;
5640                               cfp->cl_ownerlen = 5;
5641                               NFSBCOPY("LOCAL", cfp->cl_owner, 5);
5642                     }
5643                     nfsrv_locallock_rollback(vp, lfp, p);
5644           } else if (ltype != F_UNLCK) {
5645                     rlp = malloc(sizeof (struct nfsrollback), M_NFSDROLLBACK,
5646                         M_WAITOK);
5647                     rlp->rlck_first = first;
5648                     rlp->rlck_end = end;
5649                     rlp->rlck_type = oldltype;
5650                     LIST_INSERT_HEAD(&lfp->lf_rollback, rlp, rlck_list);
5651           }
5652 
5653 out:
5654           NFSEXITCODE(error);
5655           return (error);
5656 }
5657 
5658 /*
5659  * Roll back local lock changes and free up the rollback list.
5660  */
5661 static void
nfsrv_locallock_rollback(vnode_t vp,struct nfslockfile * lfp,NFSPROC_T * p)5662 nfsrv_locallock_rollback(vnode_t vp, struct nfslockfile *lfp, NFSPROC_T *p)
5663 {
5664           struct nfsrollback *rlp, *nrlp;
5665 
5666           LIST_FOREACH_SAFE(rlp, &lfp->lf_rollback, rlck_list, nrlp) {
5667                     (void) nfsvno_advlock(vp, rlp->rlck_type, rlp->rlck_first,
5668                         rlp->rlck_end, p);
5669                     free(rlp, M_NFSDROLLBACK);
5670           }
5671           LIST_INIT(&lfp->lf_rollback);
5672 }
5673 
5674 /*
5675  * Update local lock list and delete rollback list (ie now committed to the
5676  * local locks). Most of the work is done by the internal function.
5677  */
5678 static void
nfsrv_locallock_commit(struct nfslockfile * lfp,int flags,uint64_t first,uint64_t end)5679 nfsrv_locallock_commit(struct nfslockfile *lfp, int flags, uint64_t first,
5680     uint64_t end)
5681 {
5682           struct nfsrollback *rlp, *nrlp;
5683           struct nfslock *new_lop, *other_lop;
5684 
5685           new_lop = malloc(sizeof (struct nfslock), M_NFSDLOCK, M_WAITOK);
5686           if (flags & (NFSLCK_READ | NFSLCK_WRITE))
5687                     other_lop = malloc(sizeof (struct nfslock), M_NFSDLOCK,
5688                         M_WAITOK);
5689           else
5690                     other_lop = NULL;
5691           new_lop->lo_flags = flags;
5692           new_lop->lo_first = first;
5693           new_lop->lo_end = end;
5694           nfsrv_updatelock(NULL, &new_lop, &other_lop, lfp);
5695           if (new_lop != NULL)
5696                     free(new_lop, M_NFSDLOCK);
5697           if (other_lop != NULL)
5698                     free(other_lop, M_NFSDLOCK);
5699 
5700           /* and get rid of the rollback list */
5701           LIST_FOREACH_SAFE(rlp, &lfp->lf_rollback, rlck_list, nrlp)
5702                     free(rlp, M_NFSDROLLBACK);
5703           LIST_INIT(&lfp->lf_rollback);
5704 }
5705 
5706 /*
5707  * Lock the struct nfslockfile for local lock updating.
5708  */
5709 static void
nfsrv_locklf(struct nfslockfile * lfp)5710 nfsrv_locklf(struct nfslockfile *lfp)
5711 {
5712           int gotlock;
5713 
5714           /* lf_usecount ensures *lfp won't be free'd */
5715           lfp->lf_usecount++;
5716           do {
5717                     gotlock = nfsv4_lock(&lfp->lf_locallock_lck, 1, NULL,
5718                         NFSSTATEMUTEXPTR, NULL);
5719           } while (gotlock == 0);
5720           lfp->lf_usecount--;
5721 }
5722 
5723 /*
5724  * Unlock the struct nfslockfile after local lock updating.
5725  */
5726 static void
nfsrv_unlocklf(struct nfslockfile * lfp)5727 nfsrv_unlocklf(struct nfslockfile *lfp)
5728 {
5729 
5730           nfsv4_unlock(&lfp->lf_locallock_lck, 0);
5731 }
5732 
5733 /*
5734  * Clear out all state for the NFSv4 server.
5735  * Must be called by a thread that can sleep when no nfsds are running.
5736  */
5737 void
nfsrv_throwawayallstate(NFSPROC_T * p)5738 nfsrv_throwawayallstate(NFSPROC_T *p)
5739 {
5740           struct nfsclient *clp, *nclp;
5741           struct nfslockfile *lfp, *nlfp;
5742           int i;
5743 
5744           /*
5745            * For each client, clean out the state and then free the structure.
5746            */
5747           for (i = 0; i < nfsrv_clienthashsize; i++) {
5748                     LIST_FOREACH_SAFE(clp, &nfsclienthash[i], lc_hash, nclp) {
5749                               nfsrv_cleanclient(clp, p);
5750                               nfsrv_freedeleglist(&clp->lc_deleg);
5751                               nfsrv_freedeleglist(&clp->lc_olddeleg);
5752                               free(clp->lc_stateid, M_NFSDCLIENT);
5753                               free(clp, M_NFSDCLIENT);
5754                     }
5755           }
5756 
5757           /*
5758            * Also, free up any remaining lock file structures.
5759            */
5760           for (i = 0; i < nfsrv_lockhashsize; i++) {
5761                     LIST_FOREACH_SAFE(lfp, &nfslockhash[i], lf_hash, nlfp) {
5762                               printf("nfsd unload: fnd a lock file struct\n");
5763                               nfsrv_freenfslockfile(lfp);
5764                     }
5765           }
5766 }
5767 
5768 /*
5769  * Check the sequence# for the session and slot provided as an argument.
5770  * Also, renew the lease if the session will return NFS_OK.
5771  */
5772 int
nfsrv_checksequence(struct nfsrv_descript * nd,uint32_t sequenceid,uint32_t * highest_slotidp,uint32_t * target_highest_slotidp,int cache_this,uint32_t * sflagsp,NFSPROC_T * p)5773 nfsrv_checksequence(struct nfsrv_descript *nd, uint32_t sequenceid,
5774     uint32_t *highest_slotidp, uint32_t *target_highest_slotidp, int cache_this,
5775     uint32_t *sflagsp, NFSPROC_T *p)
5776 {
5777           struct nfsdsession *sep;
5778           struct nfssessionhash *shp;
5779           int error;
5780           SVCXPRT *savxprt;
5781 
5782           shp = NFSSESSIONHASH(nd->nd_sessionid);
5783           NFSLOCKSESSION(shp);
5784           sep = nfsrv_findsession(nd->nd_sessionid);
5785           if (sep == NULL) {
5786                     NFSUNLOCKSESSION(shp);
5787                     return (NFSERR_BADSESSION);
5788           }
5789           error = nfsv4_seqsession(sequenceid, nd->nd_slotid, *highest_slotidp,
5790               sep->sess_slots, NULL, NFSV4_SLOTS - 1);
5791           if (error != 0) {
5792                     NFSUNLOCKSESSION(shp);
5793                     return (error);
5794           }
5795           if (cache_this != 0)
5796                     nd->nd_flag |= ND_SAVEREPLY;
5797           /* Renew the lease. */
5798           sep->sess_clp->lc_expiry = nfsrv_leaseexpiry();
5799           nd->nd_clientid.qval = sep->sess_clp->lc_clientid.qval;
5800           nd->nd_flag |= ND_IMPLIEDCLID;
5801 
5802           /*
5803            * If this session handles the backchannel, save the nd_xprt for this
5804            * RPC, since this is the one being used.
5805            */
5806           if (sep->sess_clp->lc_req.nr_client != NULL &&
5807               (sep->sess_crflags & NFSV4CRSESS_CONNBACKCHAN) != 0) {
5808                     savxprt = sep->sess_cbsess.nfsess_xprt;
5809                     SVC_ACQUIRE(nd->nd_xprt);
5810                     nd->nd_xprt->xp_p2 =
5811                         sep->sess_clp->lc_req.nr_client->cl_private;
5812                     nd->nd_xprt->xp_idletimeout = 0;        /* Disable timeout. */
5813                     sep->sess_cbsess.nfsess_xprt = nd->nd_xprt;
5814                     if (savxprt != NULL)
5815                               SVC_RELEASE(savxprt);
5816           }
5817 
5818           *sflagsp = 0;
5819           if (sep->sess_clp->lc_req.nr_client == NULL)
5820                     *sflagsp |= NFSV4SEQ_CBPATHDOWN;
5821           NFSUNLOCKSESSION(shp);
5822           if (error == NFSERR_EXPIRED) {
5823                     *sflagsp |= NFSV4SEQ_EXPIREDALLSTATEREVOKED;
5824                     error = 0;
5825           } else if (error == NFSERR_ADMINREVOKED) {
5826                     *sflagsp |= NFSV4SEQ_ADMINSTATEREVOKED;
5827                     error = 0;
5828           }
5829           *highest_slotidp = *target_highest_slotidp = NFSV4_SLOTS - 1;
5830           return (0);
5831 }
5832 
5833 /*
5834  * Check/set reclaim complete for this session/clientid.
5835  */
5836 int
nfsrv_checkreclaimcomplete(struct nfsrv_descript * nd)5837 nfsrv_checkreclaimcomplete(struct nfsrv_descript *nd)
5838 {
5839           struct nfsdsession *sep;
5840           struct nfssessionhash *shp;
5841           int error = 0;
5842 
5843           shp = NFSSESSIONHASH(nd->nd_sessionid);
5844           NFSLOCKSTATE();
5845           NFSLOCKSESSION(shp);
5846           sep = nfsrv_findsession(nd->nd_sessionid);
5847           if (sep == NULL) {
5848                     NFSUNLOCKSESSION(shp);
5849                     NFSUNLOCKSTATE();
5850                     return (NFSERR_BADSESSION);
5851           }
5852 
5853           /* Check to see if reclaim complete has already happened. */
5854           if ((sep->sess_clp->lc_flags & LCL_RECLAIMCOMPLETE) != 0)
5855                     error = NFSERR_COMPLETEALREADY;
5856           else
5857                     sep->sess_clp->lc_flags |= LCL_RECLAIMCOMPLETE;
5858           NFSUNLOCKSESSION(shp);
5859           NFSUNLOCKSTATE();
5860           return (error);
5861 }
5862 
5863 /*
5864  * Cache the reply in a session slot.
5865  */
5866 void
nfsrv_cache_session(uint8_t * sessionid,uint32_t slotid,int repstat,struct mbuf ** m)5867 nfsrv_cache_session(uint8_t *sessionid, uint32_t slotid, int repstat,
5868    struct mbuf **m)
5869 {
5870           struct nfsdsession *sep;
5871           struct nfssessionhash *shp;
5872 
5873           shp = NFSSESSIONHASH(sessionid);
5874           NFSLOCKSESSION(shp);
5875           sep = nfsrv_findsession(sessionid);
5876           if (sep == NULL) {
5877                     NFSUNLOCKSESSION(shp);
5878                     printf("nfsrv_cache_session: no session\n");
5879                     m_freem(*m);
5880                     return;
5881           }
5882           nfsv4_seqsess_cacherep(slotid, sep->sess_slots, repstat, m);
5883           NFSUNLOCKSESSION(shp);
5884 }
5885 
5886 /*
5887  * Search for a session that matches the sessionid.
5888  */
5889 static struct nfsdsession *
nfsrv_findsession(uint8_t * sessionid)5890 nfsrv_findsession(uint8_t *sessionid)
5891 {
5892           struct nfsdsession *sep;
5893           struct nfssessionhash *shp;
5894 
5895           shp = NFSSESSIONHASH(sessionid);
5896           LIST_FOREACH(sep, &shp->list, sess_hash) {
5897                     if (!NFSBCMP(sessionid, sep->sess_sessionid, NFSX_V4SESSIONID))
5898                               break;
5899           }
5900           return (sep);
5901 }
5902 
5903 /*
5904  * Destroy a session.
5905  */
5906 int
nfsrv_destroysession(struct nfsrv_descript * nd,uint8_t * sessionid)5907 nfsrv_destroysession(struct nfsrv_descript *nd, uint8_t *sessionid)
5908 {
5909           int error, samesess;
5910 
5911           samesess = 0;
5912           if (!NFSBCMP(sessionid, nd->nd_sessionid, NFSX_V4SESSIONID)) {
5913                     samesess = 1;
5914                     if ((nd->nd_flag & ND_LASTOP) == 0)
5915                               return (NFSERR_BADSESSION);
5916           }
5917           error = nfsrv_freesession(NULL, sessionid);
5918           if (error == 0 && samesess != 0)
5919                     nd->nd_flag &= ~ND_HASSEQUENCE;
5920           return (error);
5921 }
5922 
5923 /*
5924  * Free up a session structure.
5925  */
5926 static int
nfsrv_freesession(struct nfsdsession * sep,uint8_t * sessionid)5927 nfsrv_freesession(struct nfsdsession *sep, uint8_t *sessionid)
5928 {
5929           struct nfssessionhash *shp;
5930           int i;
5931 
5932           NFSLOCKSTATE();
5933           if (sep == NULL) {
5934                     shp = NFSSESSIONHASH(sessionid);
5935                     NFSLOCKSESSION(shp);
5936                     sep = nfsrv_findsession(sessionid);
5937           } else {
5938                     shp = NFSSESSIONHASH(sep->sess_sessionid);
5939                     NFSLOCKSESSION(shp);
5940           }
5941           if (sep != NULL) {
5942                     sep->sess_refcnt--;
5943                     if (sep->sess_refcnt > 0) {
5944                               NFSUNLOCKSESSION(shp);
5945                               NFSUNLOCKSTATE();
5946                               return (0);
5947                     }
5948                     LIST_REMOVE(sep, sess_hash);
5949                     LIST_REMOVE(sep, sess_list);
5950           }
5951           NFSUNLOCKSESSION(shp);
5952           NFSUNLOCKSTATE();
5953           if (sep == NULL)
5954                     return (NFSERR_BADSESSION);
5955           for (i = 0; i < NFSV4_SLOTS; i++)
5956                     m_freem(sep->sess_slots[i].nfssl_reply);
5957           if (sep->sess_cbsess.nfsess_xprt != NULL)
5958                     SVC_RELEASE(sep->sess_cbsess.nfsess_xprt);
5959           free(sep, M_NFSDSESSION);
5960           return (0);
5961 }
5962 
5963 /*
5964  * Free a stateid.
5965  * RFC5661 says that it should fail when there are associated opens, locks
5966  * or delegations. Since stateids represent opens, I don't see how you can
5967  * free an open stateid (it will be free'd when closed), so this function
5968  * only works for lock stateids (freeing the lock_owner) or delegations.
5969  */
5970 int
nfsrv_freestateid(struct nfsrv_descript * nd,nfsv4stateid_t * stateidp,NFSPROC_T * p)5971 nfsrv_freestateid(struct nfsrv_descript *nd, nfsv4stateid_t *stateidp,
5972     NFSPROC_T *p)
5973 {
5974           struct nfsclient *clp;
5975           struct nfsstate *stp;
5976           int error;
5977 
5978           NFSLOCKSTATE();
5979           /*
5980            * Look up the stateid
5981            */
5982           error = nfsrv_getclient((nfsquad_t)((u_quad_t)0), CLOPS_RENEW, &clp,
5983               NULL, (nfsquad_t)((u_quad_t)0), 0, nd, p);
5984           if (error == 0) {
5985                     /* First, check for a delegation. */
5986                     LIST_FOREACH(stp, &clp->lc_deleg, ls_list) {
5987                               if (!NFSBCMP(stp->ls_stateid.other, stateidp->other,
5988                                   NFSX_STATEIDOTHER))
5989                                         break;
5990                     }
5991                     if (stp != NULL) {
5992                               nfsrv_freedeleg(stp);
5993                               NFSUNLOCKSTATE();
5994                               return (error);
5995                     }
5996           }
5997           /* Not a delegation, try for a lock_owner. */
5998           if (error == 0)
5999                     error = nfsrv_getstate(clp, stateidp, 0, &stp);
6000           if (error == 0 && ((stp->ls_flags & (NFSLCK_OPEN | NFSLCK_DELEGREAD |
6001               NFSLCK_DELEGWRITE)) != 0 || (stp->ls_flags & NFSLCK_LOCK) == 0))
6002                     /* Not a lock_owner stateid. */
6003                     error = NFSERR_LOCKSHELD;
6004           if (error == 0 && !LIST_EMPTY(&stp->ls_lock))
6005                     error = NFSERR_LOCKSHELD;
6006           if (error == 0)
6007                     nfsrv_freelockowner(stp, NULL, 0, p);
6008           NFSUNLOCKSTATE();
6009           return (error);
6010 }
6011 
6012 /*
6013  * Generate the xdr for an NFSv4.1 CBSequence Operation.
6014  */
6015 static int
nfsv4_setcbsequence(struct nfsrv_descript * nd,struct nfsclient * clp,int dont_replycache,struct nfsdsession ** sepp)6016 nfsv4_setcbsequence(struct nfsrv_descript *nd, struct nfsclient *clp,
6017     int dont_replycache, struct nfsdsession **sepp)
6018 {
6019           struct nfsdsession *sep;
6020           uint32_t *tl, slotseq = 0;
6021           int maxslot, slotpos;
6022           uint8_t sessionid[NFSX_V4SESSIONID];
6023           int error;
6024 
6025           error = nfsv4_getcbsession(clp, sepp);
6026           if (error != 0)
6027                     return (error);
6028           sep = *sepp;
6029           (void)nfsv4_sequencelookup(NULL, &sep->sess_cbsess, &slotpos, &maxslot,
6030               &slotseq, sessionid);
6031           KASSERT(maxslot >= 0, ("nfsv4_setcbsequence neg maxslot"));
6032 
6033           /* Build the Sequence arguments. */
6034           NFSM_BUILD(tl, uint32_t *, NFSX_V4SESSIONID + 5 * NFSX_UNSIGNED);
6035           bcopy(sessionid, tl, NFSX_V4SESSIONID);
6036           tl += NFSX_V4SESSIONID / NFSX_UNSIGNED;
6037           nd->nd_slotseq = tl;
6038           *tl++ = txdr_unsigned(slotseq);
6039           *tl++ = txdr_unsigned(slotpos);
6040           *tl++ = txdr_unsigned(maxslot);
6041           if (dont_replycache == 0)
6042                     *tl++ = newnfs_true;
6043           else
6044                     *tl++ = newnfs_false;
6045           *tl = 0;                      /* No referring call list, for now. */
6046           nd->nd_flag |= ND_HASSEQUENCE;
6047           return (0);
6048 }
6049 
6050 /*
6051  * Get a session for the callback.
6052  */
6053 static int
nfsv4_getcbsession(struct nfsclient * clp,struct nfsdsession ** sepp)6054 nfsv4_getcbsession(struct nfsclient *clp, struct nfsdsession **sepp)
6055 {
6056           struct nfsdsession *sep;
6057 
6058           NFSLOCKSTATE();
6059           LIST_FOREACH(sep, &clp->lc_session, sess_list) {
6060                     if ((sep->sess_crflags & NFSV4CRSESS_CONNBACKCHAN) != 0)
6061                               break;
6062           }
6063           if (sep == NULL) {
6064                     NFSUNLOCKSTATE();
6065                     return (NFSERR_BADSESSION);
6066           }
6067           sep->sess_refcnt++;
6068           *sepp = sep;
6069           NFSUNLOCKSTATE();
6070           return (0);
6071 }
6072 
6073 /*
6074  * Free up all backchannel xprts.  This needs to be done when the nfsd threads
6075  * exit, since those transports will all be going away.
6076  * This is only called after all the nfsd threads are done performing RPCs,
6077  * so locking shouldn't be an issue.
6078  */
6079 APPLESTATIC void
nfsrv_freeallbackchannel_xprts(void)6080 nfsrv_freeallbackchannel_xprts(void)
6081 {
6082           struct nfsdsession *sep;
6083           struct nfsclient *clp;
6084           SVCXPRT *xprt;
6085           int i;
6086 
6087           for (i = 0; i < nfsrv_clienthashsize; i++) {
6088                     LIST_FOREACH(clp, &nfsclienthash[i], lc_hash) {
6089                               LIST_FOREACH(sep, &clp->lc_session, sess_list) {
6090                                         xprt = sep->sess_cbsess.nfsess_xprt;
6091                                         sep->sess_cbsess.nfsess_xprt = NULL;
6092                                         if (xprt != NULL)
6093                                                   SVC_RELEASE(xprt);
6094                               }
6095                     }
6096           }
6097 }
6098 
6099