sys/fs/nfsserver/nfs_nfsdstate.c

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