The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/nfs/nfs_nqlease.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*
    2  * Copyright (c) 1992, 1993
    3  *      The Regents of the University of California.  All rights reserved.
    4  *
    5  * This code is derived from software contributed to Berkeley by
    6  * Rick Macklem at The University of Guelph.
    7  *
    8  * Redistribution and use in source and binary forms, with or without
    9  * modification, are permitted provided that the following conditions
   10  * are met:
   11  * 1. Redistributions of source code must retain the above copyright
   12  *    notice, this list of conditions and the following disclaimer.
   13  * 2. Redistributions in binary form must reproduce the above copyright
   14  *    notice, this list of conditions and the following disclaimer in the
   15  *    documentation and/or other materials provided with the distribution.
   16  * 3. All advertising materials mentioning features or use of this software
   17  *    must display the following acknowledgement:
   18  *      This product includes software developed by the University of
   19  *      California, Berkeley and its contributors.
   20  * 4. Neither the name of the University nor the names of its contributors
   21  *    may be used to endorse or promote products derived from this software
   22  *    without specific prior written permission.
   23  *
   24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   34  * SUCH DAMAGE.
   35  *
   36  *      @(#)nfs_nqlease.c       8.9 (Berkeley) 5/20/95
   37  * $FreeBSD$
   38  */
   39 
   40 
   41 /*
   42  * References:
   43  *      Cary G. Gray and David R. Cheriton, "Leases: An Efficient Fault-Tolerant
   44  *              Mechanism for Distributed File Cache Consistency",
   45  *              In Proc. of the Twelfth ACM Symposium on Operating Systems
   46  *              Principals, pg. 202-210, Litchfield Park, AZ, Dec. 1989.
   47  *      Michael N. Nelson, Brent B. Welch and John K. Ousterhout, "Caching
   48  *              in the Sprite Network File System", ACM TOCS 6(1),
   49  *              pages 134-154, February 1988.
   50  *      V. Srinivasan and Jeffrey C. Mogul, "Spritely NFS: Implementation and
   51  *              Performance of Cache-Consistency Protocols", Digital
   52  *              Equipment Corporation WRL Research Report 89/5, May 1989.
   53  */
   54 #include <sys/param.h>
   55 #include <sys/vnode.h>
   56 #include <sys/malloc.h>
   57 #include <sys/mount.h>
   58 #include <sys/kernel.h>
   59 #include <sys/proc.h>
   60 #include <sys/systm.h>
   61 #include <sys/mbuf.h>
   62 #include <sys/socket.h>
   63 #include <sys/socketvar.h>
   64 #include <sys/protosw.h>
   65 
   66 #include <vm/vm_zone.h>
   67 
   68 #include <netinet/in.h>
   69 #include <nfs/rpcv2.h>
   70 #include <nfs/nfsproto.h>
   71 #include <nfs/nfs.h>
   72 #include <nfs/nfsm_subs.h>
   73 #include <nfs/xdr_subs.h>
   74 #include <nfs/nqnfs.h>
   75 #include <nfs/nfsnode.h>
   76 #include <nfs/nfsmount.h>
   77 
   78 static MALLOC_DEFINE(M_NQMHOST, "NQNFS Host", "Nqnfs host address table");
   79 
   80 time_t nqnfsstarttime = (time_t)0;
   81 int nqsrv_clockskew = NQ_CLOCKSKEW;
   82 int nqsrv_writeslack = NQ_WRITESLACK;
   83 int nqsrv_maxlease = NQ_MAXLEASE;
   84 #ifndef NFS_NOSERVER
   85 static int nqsrv_maxnumlease = NQ_MAXNUMLEASE;
   86 #endif
   87 
   88 struct vop_lease_args;
   89 
   90 #ifndef NFS_NOSERVER
   91 static int      nqsrv_cmpnam __P((struct nfssvc_sock *, struct sockaddr *,
   92                         struct nqhost *));
   93 static int      nqnfs_vacated __P((struct vnode *vp, struct ucred *cred));
   94 static void     nqsrv_addhost __P((struct nqhost *lph, struct nfssvc_sock *slp,
   95                                    struct sockaddr *nam));
   96 static void     nqsrv_instimeq __P((struct nqlease *lp, u_int32_t duration));
   97 static void     nqsrv_locklease __P((struct nqlease *lp));
   98 static void     nqsrv_send_eviction __P((struct vnode *vp, struct nqlease *lp,
   99                                          struct nfssvc_sock *slp,
  100                                          struct sockaddr *nam, 
  101                                          struct ucred *cred));
  102 static void     nqsrv_unlocklease __P((struct nqlease *lp));
  103 static void     nqsrv_waitfor_expiry __P((struct nqlease *lp));
  104 #endif
  105 extern void     nqnfs_lease_updatetime __P((int deltat));
  106 
  107 /*
  108  * Signifies which rpcs can have piggybacked lease requests
  109  */
  110 int nqnfs_piggy[NFS_NPROCS] = {
  111         0,
  112         0,
  113         ND_WRITE,
  114         ND_READ,
  115         0,
  116         ND_READ,
  117         ND_READ,
  118         ND_WRITE,
  119         0,
  120         0,
  121         0,
  122         0,
  123         0,
  124         0,
  125         0,
  126         0,
  127         ND_READ,
  128         ND_READ,
  129         0,
  130         0,
  131         0,
  132         0,
  133         0,
  134         0,
  135         0,
  136         0,
  137 };
  138 
  139 extern nfstype nfsv2_type[9];
  140 extern nfstype nfsv3_type[9];
  141 extern int nfsd_waiting;
  142 extern struct nfsstats nfsstats;
  143 
  144 #define TRUE    1
  145 #define FALSE   0
  146 
  147 #ifndef NFS_NOSERVER 
  148 /*
  149  * Get or check for a lease for "vp", based on ND_CHECK flag.
  150  * The rules are as follows:
  151  * - if a current non-caching lease, reply non-caching
  152  * - if a current lease for same host only, extend lease
  153  * - if a read cachable lease and a read lease request
  154  *      add host to list any reply cachable
  155  * - else { set non-cachable for read-write sharing }
  156  *      send eviction notice messages to all other hosts that have lease
  157  *      wait for lease termination { either by receiving vacated messages
  158  *                                      from all the other hosts or expiry
  159  *                                      via. timeout }
  160  *      modify lease to non-cachable
  161  * - else if no current lease, issue new one
  162  * - reply
  163  * - return boolean TRUE iff nam should be m_freem()'d
  164  * NB: Since nqnfs_serverd() is called from a timer, any potential tsleep()
  165  *     in here must be framed by nqsrv_locklease() and nqsrv_unlocklease().
  166  *     nqsrv_locklease() is coded such that at least one of LC_LOCKED and
  167  *     LC_WANTED is set whenever a process is tsleeping in it. The exception
  168  *     is when a new lease is being allocated, since it is not in the timer
  169  *     queue yet. (Ditto for the splsoftclock() and splx(s) calls)
  170  */
  171 int
  172 nqsrv_getlease(vp, duration, flags, slp, procp, nam, cachablep, frev, cred)
  173         struct vnode *vp;
  174         u_int32_t *duration;
  175         int flags;
  176         struct nfssvc_sock *slp;
  177         struct proc *procp;
  178         struct sockaddr *nam;
  179         int *cachablep;
  180         u_quad_t *frev;
  181         struct ucred *cred;
  182 {
  183         register struct nqlease *lp;
  184         register struct nqfhhashhead *lpp = NULL;
  185         register struct nqhost *lph = NULL;
  186         struct nqlease *tlp;
  187         struct nqm **lphp;
  188         struct vattr vattr;
  189         fhandle_t fh;
  190         int i, ok, error, s;
  191 
  192         if (vp->v_type != VREG && vp->v_type != VDIR && vp->v_type != VLNK)
  193                 return (0);
  194         if (*duration > nqsrv_maxlease)
  195                 *duration = nqsrv_maxlease;
  196         error = VOP_GETATTR(vp, &vattr, cred, procp);
  197         if (error)
  198                 return (error);
  199         *frev = vattr.va_filerev;
  200         s = splsoftclock();
  201         tlp = vp->v_lease;
  202         if ((flags & ND_CHECK) == 0)
  203                 nfsstats.srvnqnfs_getleases++;
  204         if (tlp == 0) {
  205                 /*
  206                  * Find the lease by searching the hash list.
  207                  */
  208                 fh.fh_fsid = vp->v_mount->mnt_stat.f_fsid;
  209                 error = VFS_VPTOFH(vp, &fh.fh_fid);
  210                 if (error) {
  211                         splx(s);
  212                         return (error);
  213                 }
  214                 lpp = NQFHHASH(fh.fh_fid.fid_data);
  215                 for (lp = lpp->lh_first; lp != 0; lp = lp->lc_hash.le_next)
  216                         if (fh.fh_fsid.val[0] == lp->lc_fsid.val[0] &&
  217                             fh.fh_fsid.val[1] == lp->lc_fsid.val[1] &&
  218                             !bcmp(fh.fh_fid.fid_data, lp->lc_fiddata,
  219                                   fh.fh_fid.fid_len - sizeof (int32_t))) {
  220                                 /* Found it */
  221                                 lp->lc_vp = vp;
  222                                 vp->v_lease = lp;
  223                                 tlp = lp;
  224                                 break;
  225                         }
  226         } else
  227                 lp = tlp;
  228         if (lp != 0) {
  229                 if ((lp->lc_flag & LC_NONCACHABLE) ||
  230                     (lp->lc_morehosts == (struct nqm *)0 &&
  231                      nqsrv_cmpnam(slp, nam, &lp->lc_host)))
  232                         goto doreply;
  233                 if ((flags & ND_READ) && (lp->lc_flag & LC_WRITE) == 0) {
  234                         if (flags & ND_CHECK)
  235                                 goto doreply;
  236                         if (nqsrv_cmpnam(slp, nam, &lp->lc_host))
  237                                 goto doreply;
  238                         i = 0;
  239                         if (lp->lc_morehosts) {
  240                                 lph = lp->lc_morehosts->lpm_hosts;
  241                                 lphp = &lp->lc_morehosts->lpm_next;
  242                                 ok = 1;
  243                         } else {
  244                                 lphp = &lp->lc_morehosts;
  245                                 ok = 0;
  246                         }
  247                         while (ok && (lph->lph_flag & LC_VALID)) {
  248                                 if (nqsrv_cmpnam(slp, nam, lph))
  249                                         goto doreply;
  250                                 if (++i == LC_MOREHOSTSIZ) {
  251                                         i = 0;
  252                                         if (*lphp) {
  253                                                 lph = (*lphp)->lpm_hosts;
  254                                                 lphp = &((*lphp)->lpm_next);
  255                                         } else
  256                                                 ok = 0;
  257                                 } else
  258                                         lph++;
  259                         }
  260                         nqsrv_locklease(lp);
  261                         if (!ok) {
  262                                 *lphp = (struct nqm *)
  263                                         malloc(sizeof (struct nqm),
  264                                                 M_NQMHOST, M_WAITOK);
  265                                 bzero((caddr_t)*lphp, sizeof (struct nqm));
  266                                 lph = (*lphp)->lpm_hosts;
  267                         }
  268                         nqsrv_addhost(lph, slp, nam);
  269                         nqsrv_unlocklease(lp);
  270                 } else {
  271                         lp->lc_flag |= LC_NONCACHABLE;
  272                         nqsrv_locklease(lp);
  273                         nqsrv_send_eviction(vp, lp, slp, nam, cred);
  274                         nqsrv_waitfor_expiry(lp);
  275                         nqsrv_unlocklease(lp);
  276                 }
  277 doreply:
  278                 /*
  279                  * Update the lease and return
  280                  */
  281                 if ((flags & ND_CHECK) == 0)
  282                         nqsrv_instimeq(lp, *duration);
  283                 if (lp->lc_flag & LC_NONCACHABLE)
  284                         *cachablep = 0;
  285                 else {
  286                         *cachablep = 1;
  287                         if (flags & ND_WRITE)
  288                                 lp->lc_flag |= LC_WRITTEN;
  289                 }
  290                 splx(s);
  291                 return (0);
  292         }
  293         splx(s);
  294         if (flags & ND_CHECK)
  295                 return (0);
  296 
  297         /*
  298          * Allocate new lease
  299          * The value of nqsrv_maxnumlease should be set generously, so that
  300          * the following "printf" happens infrequently.
  301          */
  302         if (nfsstats.srvnqnfs_leases > nqsrv_maxnumlease) {
  303                 printf("Nqnfs server, too many leases\n");
  304                 do {
  305                         (void) tsleep((caddr_t)&lbolt, PSOCK,
  306                                         "nqsrvnuml", 0);
  307                 } while (nfsstats.srvnqnfs_leases > nqsrv_maxnumlease);
  308         }
  309         MALLOC(lp, struct nqlease *, sizeof (struct nqlease), M_NQLEASE, M_WAITOK);
  310         bzero((caddr_t)lp, sizeof (struct nqlease));
  311         if (flags & ND_WRITE)
  312                 lp->lc_flag |= (LC_WRITE | LC_WRITTEN);
  313         nqsrv_addhost(&lp->lc_host, slp, nam);
  314         lp->lc_vp = vp;
  315         lp->lc_fsid = fh.fh_fsid;
  316         bcopy(fh.fh_fid.fid_data, lp->lc_fiddata,
  317                 fh.fh_fid.fid_len - sizeof (int32_t));
  318         if(!lpp)
  319                 panic("nfs_nqlease.c: Phoney lpp");
  320         LIST_INSERT_HEAD(lpp, lp, lc_hash);
  321         vp->v_lease = lp;
  322         s = splsoftclock();
  323         nqsrv_instimeq(lp, *duration);
  324         splx(s);
  325         *cachablep = 1;
  326         if (++nfsstats.srvnqnfs_leases > nfsstats.srvnqnfs_maxleases)
  327                 nfsstats.srvnqnfs_maxleases = nfsstats.srvnqnfs_leases;
  328         return (0);
  329 }
  330 
  331 /*
  332  * Local lease check for server syscalls.
  333  * Just set up args and let nqsrv_getlease() do the rest.
  334  * nqnfs_vop_lease_check() is the VOP_LEASE() form of the same routine.
  335  * Ifdef'd code in nfsnode.h renames these routines to whatever a particular
  336  * OS needs.
  337  */
  338 void
  339 nqnfs_lease_check(vp, p, cred, flag)
  340         struct vnode *vp;
  341         struct proc *p;
  342         struct ucred *cred;
  343         int flag;
  344 {
  345         u_int32_t duration = 0;
  346         int cache;
  347         u_quad_t frev;
  348 
  349         (void) nqsrv_getlease(vp, &duration, ND_CHECK | flag, NQLOCALSLP,
  350                 p, (struct sockaddr *)0, &cache, &frev, cred);
  351 }
  352 
  353 int
  354 nqnfs_vop_lease_check(ap)
  355         struct vop_lease_args /* {
  356                 struct vnode *a_vp;
  357                 struct proc *a_p;
  358                 struct ucred *a_cred;
  359                 int a_flag;
  360         } */ *ap;
  361 {
  362         u_int32_t duration = 0;
  363         int cache;
  364         u_quad_t frev;
  365 
  366         (void) nqsrv_getlease(ap->a_vp, &duration, ND_CHECK | ap->a_flag,
  367                               NQLOCALSLP, ap->a_p, (struct sockaddr *)0,
  368                               &cache, &frev, ap->a_cred);
  369         return (0);
  370 }
  371 
  372 
  373 /*
  374  * Add a host to an nqhost structure for a lease.
  375  */
  376 static void
  377 nqsrv_addhost(lph, slp, nam)
  378         register struct nqhost *lph;
  379         struct nfssvc_sock *slp;
  380         struct sockaddr *nam;
  381 {
  382         struct sockaddr_in *saddr;
  383         struct socket *nsso;
  384 
  385         if (slp == NQLOCALSLP) {
  386                 lph->lph_flag |= (LC_VALID | LC_LOCAL);
  387                 return;
  388         }
  389         nsso = slp->ns_so;
  390         lph->lph_slp = slp;
  391         if (nsso && nsso->so_proto->pr_protocol == IPPROTO_UDP) {
  392                 saddr = (struct sockaddr_in *)nam;
  393                 lph->lph_flag |= (LC_VALID | LC_UDP);
  394                 lph->lph_inetaddr = saddr->sin_addr.s_addr;
  395                 lph->lph_port = saddr->sin_port;
  396         } else {
  397                 lph->lph_flag |= (LC_VALID | LC_SREF);
  398                 slp->ns_sref++;
  399         }
  400 }
  401 
  402 /*
  403  * Update the lease expiry time and position it in the timer queue correctly.
  404  */
  405 static void
  406 nqsrv_instimeq(lp, duration)
  407         register struct nqlease *lp;
  408         u_int32_t duration;
  409 {
  410         register struct nqlease *tlp;
  411         time_t newexpiry;
  412 
  413         newexpiry = time_second + duration + nqsrv_clockskew;
  414         if (lp->lc_expiry == newexpiry)
  415                 return;
  416         if (lp->lc_timer.cqe_next != 0) {
  417                 CIRCLEQ_REMOVE(&nqtimerhead, lp, lc_timer);
  418         }
  419         lp->lc_expiry = newexpiry;
  420 
  421         /*
  422          * Find where in the queue it should be.
  423          */
  424         tlp = nqtimerhead.cqh_last;
  425         while (tlp != (void *)&nqtimerhead && tlp->lc_expiry > newexpiry)
  426                 tlp = tlp->lc_timer.cqe_prev;
  427 #ifdef HASNVRAM
  428         if (tlp == nqtimerhead.cqh_last)
  429                 NQSTORENOVRAM(newexpiry);
  430 #endif /* HASNVRAM */
  431         if (tlp == (void *)&nqtimerhead) {
  432                 CIRCLEQ_INSERT_HEAD(&nqtimerhead, lp, lc_timer);
  433         } else {
  434                 CIRCLEQ_INSERT_AFTER(&nqtimerhead, tlp, lp, lc_timer);
  435         }
  436 }
  437 
  438 /*
  439  * Compare the requesting host address with the lph entry in the lease.
  440  * Return true iff it is the same.
  441  * This is somewhat messy due to the union in the nqhost structure.
  442  * The local host is indicated by the special value of NQLOCALSLP for slp.
  443  */
  444 static int
  445 nqsrv_cmpnam(slp, nam, lph)
  446         register struct nfssvc_sock *slp;
  447         struct sockaddr *nam;
  448         register struct nqhost *lph;
  449 {
  450         register struct sockaddr_in *saddr;
  451         struct sockaddr *addr;
  452         union nethostaddr lhaddr;
  453         struct socket *nsso;
  454         int ret;
  455 
  456         if (slp == NQLOCALSLP) {
  457                 if (lph->lph_flag & LC_LOCAL)
  458                         return (1);
  459                 else
  460                         return (0);
  461         }
  462         nsso = slp->ns_so;
  463         if (nsso && nsso->so_proto->pr_protocol == IPPROTO_UDP) {
  464                 addr = nam;
  465         } else {
  466                 addr = slp->ns_nam;
  467         }
  468         if (lph->lph_flag & LC_UDP) {
  469                 ret = netaddr_match(AF_INET, &lph->lph_haddr, addr);
  470         } else {
  471                 if ((lph->lph_slp->ns_flag & SLP_VALID) == 0)
  472                         return (0);
  473                 saddr = (struct sockaddr_in *)lph->lph_slp->ns_nam;
  474                 if (saddr->sin_family == AF_INET)
  475                         lhaddr.had_inetaddr = saddr->sin_addr.s_addr;
  476                 else
  477                         lhaddr.had_nam = lph->lph_slp->ns_nam;
  478                 ret = netaddr_match(saddr->sin_family, &lhaddr, addr);
  479         }
  480         return (ret);
  481 }
  482 
  483 /*
  484  * Send out eviction notice messages to all other hosts for the lease.
  485  */
  486 static void
  487 nqsrv_send_eviction(vp, lp, slp, nam, cred)
  488         struct vnode *vp;
  489         register struct nqlease *lp;
  490         struct nfssvc_sock *slp;
  491         struct sockaddr *nam;
  492         struct ucred *cred;
  493 {
  494         register struct nqhost *lph = &lp->lc_host;
  495         register int siz;
  496         struct nqm *lphnext = lp->lc_morehosts;
  497         struct mbuf *m, *mreq, *mb, *mb2, *mheadend;
  498         struct sockaddr *nam2;
  499         struct sockaddr_in *saddr;
  500         nfsfh_t nfh;
  501         fhandle_t *fhp;
  502         caddr_t bpos, cp;
  503         u_int32_t *xidp, *tl;
  504         int len = 1, ok = 1, i = 0;
  505 
  506         while (ok && (lph->lph_flag & LC_VALID)) {
  507                 if (nqsrv_cmpnam(slp, nam, lph)) {
  508                         lph->lph_flag |= LC_VACATED;
  509                 } else if ((lph->lph_flag & (LC_LOCAL | LC_VACATED)) == 0) {
  510                         struct socket *so;
  511                         int sotype;
  512                         int *solockp = NULL;
  513 
  514                         so = lph->lph_slp->ns_so;
  515                         if (lph->lph_flag & LC_UDP) {
  516                                 MALLOC(nam2, struct sockaddr *,
  517                                        sizeof *nam2, M_SONAME, M_WAITOK);
  518                                 saddr = (struct sockaddr_in *)nam2;
  519                                 saddr->sin_len = sizeof *saddr;
  520                                 saddr->sin_family = AF_INET;
  521                                 saddr->sin_addr.s_addr = lph->lph_inetaddr;
  522                                 saddr->sin_port = lph->lph_port;
  523                         } else if (lph->lph_slp->ns_flag & SLP_VALID) {
  524                                 nam2 = (struct sockaddr *)0;
  525                         } else {
  526                                 goto nextone;
  527                         }
  528                         sotype = so->so_type;
  529                         if (so->so_proto->pr_flags & PR_CONNREQUIRED)
  530                                 solockp = &lph->lph_slp->ns_solock;
  531                         nfsm_reqhead((struct vnode *)0, NQNFSPROC_EVICTED,
  532                                 NFSX_V3FH + NFSX_UNSIGNED);
  533                         fhp = &nfh.fh_generic;
  534                         bzero((caddr_t)fhp, sizeof(nfh));
  535                         fhp->fh_fsid = vp->v_mount->mnt_stat.f_fsid;
  536                         VFS_VPTOFH(vp, &fhp->fh_fid);
  537                         nfsm_srvfhtom(fhp, 1);
  538                         m = mreq;
  539                         siz = 0;
  540                         while (m) {
  541                                 siz += m->m_len;
  542                                 m = m->m_next;
  543                         }
  544                         if (siz <= 0 || siz > NFS_MAXPACKET) {
  545                                 printf("mbuf siz=%d\n",siz);
  546                                 panic("Bad nfs svc reply");
  547                         }
  548                         m = nfsm_rpchead(cred, (NFSMNT_NFSV3 | NFSMNT_NQNFS),
  549                                 NQNFSPROC_EVICTED,
  550                                 RPCAUTH_UNIX, 5 * NFSX_UNSIGNED, (char *)0,
  551                                 0, (char *)NULL, mreq, siz, &mheadend, &xidp);
  552                         /*
  553                          * For stream protocols, prepend a Sun RPC
  554                          * Record Mark.
  555                          */
  556                         if (sotype == SOCK_STREAM) {
  557                                 M_PREPEND(m, NFSX_UNSIGNED, M_WAIT);
  558                                 *mtod(m, u_int32_t *) = htonl(0x80000000 |
  559                                         (m->m_pkthdr.len - NFSX_UNSIGNED));
  560                         }
  561                         /*
  562                          * nfs_sndlock if PR_CONNREQUIRED XXX
  563                          */
  564 
  565                         if ((lph->lph_flag & LC_UDP) == 0 &&
  566                             ((lph->lph_slp->ns_flag & SLP_VALID) == 0 ||
  567                             nfs_slplock(lph->lph_slp, 0) == 0)) {
  568                                 m_freem(m);
  569                         } else {
  570                                 (void) nfs_send(so, nam2, m,
  571                                                 (struct nfsreq *)0);
  572                                 if (solockp)
  573                                         nfs_slpunlock(lph->lph_slp);
  574                         }
  575                         if (lph->lph_flag & LC_UDP)
  576                                 FREE(nam2, M_SONAME);
  577                 }
  578 nextone:
  579                 if (++i == len) {
  580                         if (lphnext) {
  581                                 i = 0;
  582                                 len = LC_MOREHOSTSIZ;
  583                                 lph = lphnext->lpm_hosts;
  584                                 lphnext = lphnext->lpm_next;
  585                         } else
  586                                 ok = 0;
  587                 } else
  588                         lph++;
  589         }
  590 }
  591 
  592 /*
  593  * Wait for the lease to expire.
  594  * This will occur when all clients have sent "vacated" messages to
  595  * this server OR when it expires do to timeout.
  596  */
  597 static void
  598 nqsrv_waitfor_expiry(lp)
  599         register struct nqlease *lp;
  600 {
  601         register struct nqhost *lph;
  602         register int i;
  603         struct nqm *lphnext;
  604         int len, ok;
  605 
  606 tryagain:
  607         if (time_second > lp->lc_expiry)
  608                 return;
  609         lph = &lp->lc_host;
  610         lphnext = lp->lc_morehosts;
  611         len = 1;
  612         i = 0;
  613         ok = 1;
  614         while (ok && (lph->lph_flag & LC_VALID)) {
  615                 if ((lph->lph_flag & (LC_LOCAL | LC_VACATED)) == 0) {
  616                         lp->lc_flag |= LC_EXPIREDWANTED;
  617                         (void) tsleep((caddr_t)&lp->lc_flag, PSOCK,
  618                                         "nqexp", 0);
  619                         goto tryagain;
  620                 }
  621                 if (++i == len) {
  622                         if (lphnext) {
  623                                 i = 0;
  624                                 len = LC_MOREHOSTSIZ;
  625                                 lph = lphnext->lpm_hosts;
  626                                 lphnext = lphnext->lpm_next;
  627                         } else
  628                                 ok = 0;
  629                 } else
  630                         lph++;
  631         }
  632 }
  633 
  634 /*
  635  * Nqnfs server timer that maintains the server lease queue.
  636  * Scan the lease queue for expired entries:
  637  * - when one is found, wakeup anyone waiting for it
  638  *   else dequeue and free
  639  */
  640 void
  641 nqnfs_serverd()
  642 {
  643         register struct nqlease *lp;
  644         register struct nqhost *lph;
  645         struct nqlease *nextlp;
  646         struct nqm *lphnext, *olphnext;
  647         int i, len, ok;
  648 
  649         for (lp = nqtimerhead.cqh_first; lp != (void *)&nqtimerhead;
  650             lp = nextlp) {
  651                 if (lp->lc_expiry >= time_second)
  652                         break;
  653                 nextlp = lp->lc_timer.cqe_next;
  654                 if (lp->lc_flag & LC_EXPIREDWANTED) {
  655                         lp->lc_flag &= ~LC_EXPIREDWANTED;
  656                         wakeup((caddr_t)&lp->lc_flag);
  657                 } else if ((lp->lc_flag & (LC_LOCKED | LC_WANTED)) == 0) {
  658                     /*
  659                      * Make a best effort at keeping a write caching lease long
  660                      * enough by not deleting it until it has been explicitly
  661                      * vacated or there have been no writes in the previous
  662                      * write_slack seconds since expiry and the nfsds are not
  663                      * all busy. The assumption is that if the nfsds are not
  664                      * all busy now (no queue of nfs requests), then the client
  665                      * would have been able to do at least one write to the
  666                      * file during the last write_slack seconds if it was still
  667                      * trying to push writes to the server.
  668                      */
  669                     if ((lp->lc_flag & (LC_WRITE | LC_VACATED)) == LC_WRITE &&
  670                         ((lp->lc_flag & LC_WRITTEN) || nfsd_waiting == 0)) {
  671                         lp->lc_flag &= ~LC_WRITTEN;
  672                         nqsrv_instimeq(lp, nqsrv_writeslack);
  673                     } else {
  674                         CIRCLEQ_REMOVE(&nqtimerhead, lp, lc_timer);
  675                         LIST_REMOVE(lp, lc_hash);
  676                         /*
  677                          * This soft reference may no longer be valid, but
  678                          * no harm done. The worst case is if the vnode was
  679                          * recycled and has another valid lease reference,
  680                          * which is dereferenced prematurely.
  681                          */
  682                         lp->lc_vp->v_lease = (struct nqlease *)0;
  683                         lph = &lp->lc_host;
  684                         lphnext = lp->lc_morehosts;
  685                         olphnext = (struct nqm *)0;
  686                         len = 1;
  687                         i = 0;
  688                         ok = 1;
  689                         while (ok && (lph->lph_flag & LC_VALID)) {
  690                                 if (lph->lph_flag & LC_SREF)
  691                                         nfsrv_slpderef(lph->lph_slp);
  692                                 if (++i == len) {
  693                                         if (olphnext) {
  694                                                 free((caddr_t)olphnext, M_NQMHOST);
  695                                                 olphnext = (struct nqm *)0;
  696                                         }
  697                                         if (lphnext) {
  698                                                 olphnext = lphnext;
  699                                                 i = 0;
  700                                                 len = LC_MOREHOSTSIZ;
  701                                                 lph = lphnext->lpm_hosts;
  702                                                 lphnext = lphnext->lpm_next;
  703                                         } else
  704                                                 ok = 0;
  705                                 } else
  706                                         lph++;
  707                         }
  708                         FREE((caddr_t)lp, M_NQLEASE);
  709                         if (olphnext)
  710                                 free((caddr_t)olphnext, M_NQMHOST);
  711                         nfsstats.srvnqnfs_leases--;
  712                     }
  713                 }
  714         }
  715 }
  716 
  717 /*
  718  * Called from nfssvc_nfsd() for a getlease rpc request.
  719  * Do the from/to xdr translation and call nqsrv_getlease() to
  720  * do the real work.
  721  */
  722 int
  723 nqnfsrv_getlease(nfsd, slp, procp, mrq)
  724         struct nfsrv_descript *nfsd;
  725         struct nfssvc_sock *slp;
  726         struct proc *procp;
  727         struct mbuf **mrq;
  728 {
  729         struct mbuf *mrep = nfsd->nd_mrep, *md = nfsd->nd_md;
  730         struct sockaddr *nam = nfsd->nd_nam;
  731         caddr_t dpos = nfsd->nd_dpos;
  732         struct ucred *cred = &nfsd->nd_cr;
  733         register struct nfs_fattr *fp;
  734         struct vattr va;
  735         register struct vattr *vap = &va;
  736         struct vnode *vp;
  737         nfsfh_t nfh;
  738         fhandle_t *fhp;
  739         register u_int32_t *tl;
  740         register int32_t t1;
  741         u_quad_t frev;
  742         caddr_t bpos;
  743         int error = 0;
  744         char *cp2;
  745         struct mbuf *mb, *mb2, *mreq;
  746         int flags, rdonly, cache;
  747 
  748         fhp = &nfh.fh_generic;
  749         nfsm_srvmtofh(fhp);
  750         nfsm_dissect(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
  751         flags = fxdr_unsigned(int, *tl++);
  752         nfsd->nd_duration = fxdr_unsigned(int, *tl);
  753         error = nfsrv_fhtovp(fhp, 1, &vp, cred, slp, nam, &rdonly,
  754                 (nfsd->nd_flag & ND_KERBAUTH), TRUE);
  755         if (error) {
  756                 nfsm_reply(0);
  757                 goto nfsmout;
  758         }
  759         if (rdonly && flags == ND_WRITE) {
  760                 error = EROFS;
  761                 vput(vp);
  762                 nfsm_reply(0);
  763         }
  764         (void) nqsrv_getlease(vp, &nfsd->nd_duration, flags, slp, procp,
  765                 nam, &cache, &frev, cred);
  766         error = VOP_GETATTR(vp, vap, cred, procp);
  767         vput(vp);
  768         nfsm_reply(NFSX_V3FATTR + 4 * NFSX_UNSIGNED);
  769         nfsm_build(tl, u_int32_t *, 4 * NFSX_UNSIGNED);
  770         *tl++ = txdr_unsigned(cache);
  771         *tl++ = txdr_unsigned(nfsd->nd_duration);
  772         txdr_hyper(frev, tl);
  773         nfsm_build(fp, struct nfs_fattr *, NFSX_V3FATTR);
  774         nfsm_srvfillattr(vap, fp);
  775         nfsm_srvdone;
  776 }
  777 
  778 /*
  779  * Called from nfssvc_nfsd() when a "vacated" message is received from a
  780  * client. Find the entry and expire it.
  781  */
  782 int
  783 nqnfsrv_vacated(nfsd, slp, procp, mrq)
  784         struct nfsrv_descript *nfsd;
  785         struct nfssvc_sock *slp;
  786         struct proc *procp;
  787         struct mbuf **mrq;
  788 {
  789         struct mbuf *mrep = nfsd->nd_mrep, *md = nfsd->nd_md;
  790         struct sockaddr *nam = nfsd->nd_nam;
  791         caddr_t dpos = nfsd->nd_dpos;
  792         register struct nqlease *lp;
  793         register struct nqhost *lph;
  794         struct nqlease *tlp = (struct nqlease *)0;
  795         nfsfh_t nfh;
  796         fhandle_t *fhp;
  797         register u_int32_t *tl;
  798         register int32_t t1;
  799         struct nqm *lphnext;
  800         struct mbuf *mreq, *mb;
  801         int error = 0, i, len, ok, gotit = 0, cache = 0;
  802         char *cp2, *bpos;
  803         u_quad_t frev;
  804 
  805         fhp = &nfh.fh_generic;
  806         nfsm_srvmtofh(fhp);
  807         m_freem(mrep);
  808         /*
  809          * Find the lease by searching the hash list.
  810          */
  811         for (lp = NQFHHASH(fhp->fh_fid.fid_data)->lh_first; lp != 0;
  812             lp = lp->lc_hash.le_next)
  813                 if (fhp->fh_fsid.val[0] == lp->lc_fsid.val[0] &&
  814                     fhp->fh_fsid.val[1] == lp->lc_fsid.val[1] &&
  815                     !bcmp(fhp->fh_fid.fid_data, lp->lc_fiddata,
  816                           MAXFIDSZ)) {
  817                         /* Found it */
  818                         tlp = lp;
  819                         break;
  820                 }
  821         if (tlp != 0) {
  822                 lp = tlp;
  823                 len = 1;
  824                 i = 0;
  825                 lph = &lp->lc_host;
  826                 lphnext = lp->lc_morehosts;
  827                 ok = 1;
  828                 while (ok && (lph->lph_flag & LC_VALID)) {
  829                         if (nqsrv_cmpnam(slp, nam, lph)) {
  830                                 lph->lph_flag |= LC_VACATED;
  831                                 gotit++;
  832                                 break;
  833                         }
  834                         if (++i == len) {
  835                                 if (lphnext) {
  836                                         len = LC_MOREHOSTSIZ;
  837                                         i = 0;
  838                                         lph = lphnext->lpm_hosts;
  839                                         lphnext = lphnext->lpm_next;
  840                                 } else
  841                                         ok = 0;
  842                         } else
  843                                 lph++;
  844                 }
  845                 if ((lp->lc_flag & LC_EXPIREDWANTED) && gotit) {
  846                         lp->lc_flag &= ~LC_EXPIREDWANTED;
  847                         wakeup((caddr_t)&lp->lc_flag);
  848                 }
  849 nfsmout:
  850                 return (EPERM);
  851         }
  852         return (EPERM);
  853 }
  854 
  855 #endif /* NFS_NOSERVER */
  856 
  857 /*
  858  * Client get lease rpc function.
  859  */
  860 int
  861 nqnfs_getlease(vp, rwflag, cred, p)
  862         register struct vnode *vp;
  863         int rwflag;
  864         struct ucred *cred;
  865         struct proc *p;
  866 {
  867         register u_int32_t *tl;
  868         register caddr_t cp;
  869         register int32_t t1, t2;
  870         register struct nfsnode *np;
  871         struct nfsmount *nmp = VFSTONFS(vp->v_mount);
  872         caddr_t bpos, dpos, cp2;
  873         time_t reqtime;
  874         int error = 0;
  875         struct mbuf *mreq, *mrep, *md, *mb, *mb2;
  876         int cachable;
  877         u_quad_t frev;
  878 
  879         nfsstats.rpccnt[NQNFSPROC_GETLEASE]++;
  880         mb = mreq = nfsm_reqh(vp, NQNFSPROC_GETLEASE, NFSX_V3FH+2*NFSX_UNSIGNED,
  881                  &bpos);
  882         nfsm_fhtom(vp, 1);
  883         nfsm_build(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
  884         *tl++ = txdr_unsigned(rwflag);
  885         *tl = txdr_unsigned(nmp->nm_leaseterm);
  886         reqtime = time_second;
  887         nfsm_request(vp, NQNFSPROC_GETLEASE, p, cred);
  888         np = VTONFS(vp);
  889         nfsm_dissect(tl, u_int32_t *, 4 * NFSX_UNSIGNED);
  890         cachable = fxdr_unsigned(int, *tl++);
  891         reqtime += fxdr_unsigned(int, *tl++);
  892         if (reqtime > time_second) {
  893                 frev = fxdr_hyper(tl);
  894                 nqnfs_clientlease(nmp, np, rwflag, cachable, reqtime, frev);
  895                 nfsm_loadattr(vp, (struct vattr *)0);
  896         } else
  897                 error = NQNFS_EXPIRED;
  898         nfsm_reqdone;
  899         return (error);
  900 }
  901 
  902 #ifndef NFS_NOSERVER 
  903 /*
  904  * Client vacated message function.
  905  */
  906 static int
  907 nqnfs_vacated(vp, cred)
  908         register struct vnode *vp;
  909         struct ucred *cred;
  910 {
  911         register caddr_t cp;
  912         register int i;
  913         register u_int32_t *tl;
  914         register int32_t t2;
  915         caddr_t bpos;
  916         u_int32_t *xidp;
  917         int error = 0;
  918         struct mbuf *m, *mreq, *mb, *mb2, *mheadend;
  919         struct nfsmount *nmp;
  920         struct nfsreq myrep;
  921 
  922         nmp = VFSTONFS(vp->v_mount);
  923         nfsstats.rpccnt[NQNFSPROC_VACATED]++;
  924         nfsm_reqhead(vp, NQNFSPROC_VACATED, NFSX_FH(1));
  925         nfsm_fhtom(vp, 1);
  926         m = mreq;
  927         i = 0;
  928         while (m) {
  929                 i += m->m_len;
  930                 m = m->m_next;
  931         }
  932         m = nfsm_rpchead(cred, nmp->nm_flag, NQNFSPROC_VACATED,
  933                 RPCAUTH_UNIX, 5 * NFSX_UNSIGNED, (char *)0,
  934                 0, (char *)NULL, mreq, i, &mheadend, &xidp);
  935         if (nmp->nm_sotype == SOCK_STREAM) {
  936                 M_PREPEND(m, NFSX_UNSIGNED, M_WAIT);
  937                 *mtod(m, u_int32_t *) = htonl(0x80000000 | (m->m_pkthdr.len -
  938                         NFSX_UNSIGNED));
  939         }
  940         myrep.r_flags = 0;
  941         myrep.r_nmp = nmp;
  942         if (nmp->nm_soflags & PR_CONNREQUIRED)
  943                 (void) nfs_sndlock(&myrep);
  944         (void) nfs_send(nmp->nm_so, nmp->nm_nam, m, &myrep);
  945         if (nmp->nm_soflags & PR_CONNREQUIRED)
  946                 nfs_sndunlock(&myrep);
  947 nfsmout:
  948         return (error);
  949 }
  950 
  951 /*
  952  * Called for client side callbacks
  953  */
  954 int
  955 nqnfs_callback(nmp, mrep, md, dpos)
  956         struct nfsmount *nmp;
  957         struct mbuf *mrep, *md;
  958         caddr_t dpos;
  959 {
  960         register struct vnode *vp;
  961         register u_int32_t *tl;
  962         register int32_t t1;
  963         nfsfh_t nfh;
  964         fhandle_t *fhp;
  965         struct nfsnode *np;
  966         struct nfsd tnfsd;
  967         struct nfssvc_sock *slp;
  968         struct nfsrv_descript ndesc;
  969         register struct nfsrv_descript *nfsd = &ndesc;
  970         struct mbuf **mrq = (struct mbuf **)0, *mb, *mreq;
  971         int error = 0, cache = 0;
  972         char *cp2, *bpos;
  973         u_quad_t frev;
  974 
  975 #ifndef nolint
  976         slp = NULL;
  977 #endif
  978         nfsd->nd_mrep = mrep;
  979         nfsd->nd_md = md;
  980         nfsd->nd_dpos = dpos;
  981         error = nfs_getreq(nfsd, &tnfsd, FALSE);
  982         if (error)
  983                 return (error);
  984         md = nfsd->nd_md;
  985         dpos = nfsd->nd_dpos;
  986         if (nfsd->nd_procnum != NQNFSPROC_EVICTED) {
  987                 m_freem(mrep);
  988                 return (EPERM);
  989         }
  990         fhp = &nfh.fh_generic;
  991         nfsm_srvmtofh(fhp);
  992         m_freem(mrep);
  993         error = nfs_nget(nmp->nm_mountp, (nfsfh_t *)fhp, NFSX_V3FH, &np);
  994         if (error)
  995                 return (error);
  996         vp = NFSTOV(np);
  997         if (np->n_timer.cqe_next != 0) {
  998                 np->n_expiry = 0;
  999                 np->n_flag |= NQNFSEVICTED;
 1000                 if (nmp->nm_timerhead.cqh_first != np) {
 1001                         CIRCLEQ_REMOVE(&nmp->nm_timerhead, np, n_timer);
 1002                         CIRCLEQ_INSERT_HEAD(&nmp->nm_timerhead, np, n_timer);
 1003                 }
 1004         }
 1005         vput(vp);
 1006         nfsm_srvdone;
 1007 }
 1008 
 1009 
 1010 /*
 1011  * Nqnfs client helper daemon. Runs once a second to expire leases.
 1012  * It also get authorization strings for "kerb" mounts.
 1013  * It must start at the beginning of the list again after any potential
 1014  * "sleep" since nfs_reclaim() called from vclean() can pull a node off
 1015  * the list asynchronously.
 1016  */
 1017 int
 1018 nqnfs_clientd(nmp, cred, ncd, flag, argp, p)
 1019         register struct nfsmount *nmp;
 1020         struct ucred *cred;
 1021         struct nfsd_cargs *ncd;
 1022         int flag;
 1023         caddr_t argp;
 1024         struct proc *p;
 1025 {
 1026         register struct nfsnode *np;
 1027         struct vnode *vp;
 1028         struct nfsreq myrep;
 1029         struct nfsuid *nuidp, *nnuidp;
 1030         int error = 0, vpid;
 1031 
 1032         /*
 1033          * First initialize some variables
 1034          */
 1035 
 1036         /*
 1037          * If an authorization string is being passed in, get it.
 1038          */
 1039         if ((flag & NFSSVC_GOTAUTH) &&
 1040             (nmp->nm_state & (NFSSTA_WAITAUTH | NFSSTA_DISMNT)) == 0) {
 1041             if (nmp->nm_state & NFSSTA_HASAUTH)
 1042                 panic("cld kerb");
 1043             if ((flag & NFSSVC_AUTHINFAIL) == 0) {
 1044                 if (ncd->ncd_authlen <= nmp->nm_authlen &&
 1045                     ncd->ncd_verflen <= nmp->nm_verflen &&
 1046                     !copyin(ncd->ncd_authstr,nmp->nm_authstr,ncd->ncd_authlen)&&
 1047                     !copyin(ncd->ncd_verfstr,nmp->nm_verfstr,ncd->ncd_verflen)){
 1048                     nmp->nm_authtype = ncd->ncd_authtype;
 1049                     nmp->nm_authlen = ncd->ncd_authlen;
 1050                     nmp->nm_verflen = ncd->ncd_verflen;
 1051 #ifdef NFSKERB
 1052                     nmp->nm_key = ncd->ncd_key;
 1053 #endif
 1054                 } else
 1055                     nmp->nm_state |= NFSSTA_AUTHERR;
 1056             } else
 1057                 nmp->nm_state |= NFSSTA_AUTHERR;
 1058             nmp->nm_state |= NFSSTA_HASAUTH;
 1059             wakeup((caddr_t)&nmp->nm_authlen);
 1060         } else
 1061             nmp->nm_state |= NFSSTA_WAITAUTH;
 1062 
 1063         /*
 1064          * Loop every second updating queue until there is a termination sig.
 1065          */
 1066         while ((nmp->nm_state & NFSSTA_DISMNT) == 0) {
 1067             if (nmp->nm_flag & NFSMNT_NQNFS) {
 1068                 /*
 1069                  * If there are no outstanding requests (and therefore no
 1070                  * processes in nfs_reply) and there is data in the receive
 1071                  * queue, poke for callbacks.
 1072                  */
 1073                 if (nfs_reqq.tqh_first == 0 && nmp->nm_so &&
 1074                     nmp->nm_so->so_rcv.sb_cc > 0) {
 1075                     myrep.r_flags = R_GETONEREP;
 1076                     myrep.r_nmp = nmp;
 1077                     myrep.r_mrep = (struct mbuf *)0;
 1078                     myrep.r_procp = (struct proc *)0;
 1079                     (void) nfs_reply(&myrep);
 1080                 }
 1081 
 1082                 /*
 1083                  * Loop through the leases, updating as required.
 1084                  */
 1085                 np = nmp->nm_timerhead.cqh_first;
 1086                 while (np != (void *)&nmp->nm_timerhead &&
 1087                        (nmp->nm_state & NFSSTA_DISMINPROG) == 0) {
 1088                         vp = NFSTOV(np);
 1089                         vpid = vp->v_id;
 1090                         if (np->n_expiry < time_second) {
 1091                            if (vget(vp, LK_EXCLUSIVE, p) == 0) {
 1092                              nmp->nm_inprog = vp;
 1093                              if (vpid == vp->v_id) {
 1094                                 CIRCLEQ_REMOVE(&nmp->nm_timerhead, np, n_timer);
 1095                                 np->n_timer.cqe_next = 0;
 1096                                 if (np->n_flag & (NMODIFIED | NQNFSEVICTED)) {
 1097                                         if (np->n_flag & NQNFSEVICTED) {
 1098                                                 if (vp->v_type == VDIR)
 1099                                                         nfs_invaldir(vp);
 1100                                                 cache_purge(vp);
 1101                                                 (void) nfs_vinvalbuf(vp,
 1102                                                        V_SAVE, cred, p, 0);
 1103                                                 np->n_flag &= ~NQNFSEVICTED;
 1104                                                 (void) nqnfs_vacated(vp, cred);
 1105                                         } else if (vp->v_type == VREG) {
 1106                                                 (void) VOP_FSYNC(vp, cred,
 1107                                                     MNT_WAIT, p);
 1108                                                 np->n_flag &= ~NMODIFIED;
 1109                                         }
 1110                                 }
 1111                               }
 1112                               vput(vp);
 1113                               nmp->nm_inprog = NULLVP;
 1114                             }
 1115                         } else if ((np->n_expiry - NQ_RENEWAL) < time_second) {
 1116                             if ((np->n_flag & (NQNFSWRITE | NQNFSNONCACHE))
 1117                                  == NQNFSWRITE &&
 1118                                  !TAILQ_EMPTY(&vp->v_dirtyblkhd) &&
 1119                                  vget(vp, LK_EXCLUSIVE, p) == 0) {
 1120                                  nmp->nm_inprog = vp;
 1121                                  if (vpid == vp->v_id &&
 1122                                      nqnfs_getlease(vp, ND_WRITE, cred, p)==0)
 1123                                         np->n_brev = np->n_lrev;
 1124                                  vput(vp);
 1125                                  nmp->nm_inprog = NULLVP;
 1126                             }
 1127                         } else
 1128                                 break;
 1129                         if (np == nmp->nm_timerhead.cqh_first)
 1130                                 break;
 1131                         np = nmp->nm_timerhead.cqh_first;
 1132                 }
 1133             }
 1134 
 1135             /*
 1136              * Get an authorization string, if required.
 1137              */
 1138             if ((nmp->nm_state & (NFSSTA_WAITAUTH | NFSSTA_DISMNT | NFSSTA_HASAUTH)) == 0) {
 1139                 ncd->ncd_authuid = nmp->nm_authuid;
 1140                 if (copyout((caddr_t)ncd, argp, sizeof (struct nfsd_cargs)))
 1141                         nmp->nm_state |= NFSSTA_WAITAUTH;
 1142                 else
 1143                         return (ENEEDAUTH);
 1144             }
 1145 
 1146             /*
 1147              * Wait a bit (no pun) and do it again.
 1148              */
 1149             if ((nmp->nm_state & NFSSTA_DISMNT) == 0 &&
 1150                 (nmp->nm_state & (NFSSTA_WAITAUTH | NFSSTA_HASAUTH))) {
 1151                     error = tsleep((caddr_t)&nmp->nm_authstr, PSOCK | PCATCH,
 1152                         "nqnfstimr", hz / 3);
 1153                     if (error == EINTR || error == ERESTART)
 1154                         (void) dounmount(nmp->nm_mountp, 0, p);
 1155             }
 1156         }
 1157 
 1158         /*
 1159          * Finally, we can free up the mount structure.
 1160          */
 1161         for (nuidp = nmp->nm_uidlruhead.tqh_first; nuidp != 0; nuidp = nnuidp) {
 1162                 nnuidp = nuidp->nu_lru.tqe_next;
 1163                 LIST_REMOVE(nuidp, nu_hash);
 1164                 TAILQ_REMOVE(&nmp->nm_uidlruhead, nuidp, nu_lru);
 1165                 free((caddr_t)nuidp, M_NFSUID);
 1166         }
 1167         zfree(nfsmount_zone, nmp);
 1168         if (error == EWOULDBLOCK)
 1169                 error = 0;
 1170         return (error);
 1171 }
 1172 
 1173 #endif /* NFS_NOSERVER */
 1174 
 1175 /*
 1176  * Adjust all timer queue expiry times when the time of day clock is changed.
 1177  * Called from the settimeofday() syscall.
 1178  */
 1179 void
 1180 nqnfs_lease_updatetime(deltat)
 1181         register int deltat;
 1182 {
 1183         struct proc *p = curproc;       /* XXX */
 1184         struct nqlease *lp;
 1185         struct nfsnode *np;
 1186         struct mount *mp, *nxtmp;
 1187         struct nfsmount *nmp;
 1188         int s;
 1189 
 1190         if (nqnfsstarttime != 0)
 1191                 nqnfsstarttime += deltat;
 1192         s = splsoftclock();
 1193         for (lp = nqtimerhead.cqh_first; lp != (void *)&nqtimerhead;
 1194             lp = lp->lc_timer.cqe_next)
 1195                 lp->lc_expiry += deltat;
 1196         splx(s);
 1197 
 1198         /*
 1199          * Search the mount list for all nqnfs mounts and do their timer
 1200          * queues.
 1201          */
 1202         simple_lock(&mountlist_slock);
 1203         for (mp = TAILQ_FIRST(&mountlist); mp != NULL; mp = nxtmp) {
 1204                 if (vfs_busy(mp, LK_NOWAIT, &mountlist_slock, p)) {
 1205                         nxtmp = TAILQ_NEXT(mp, mnt_list);
 1206                         continue;
 1207                 }
 1208                 if (mp->mnt_stat.f_type == nfs_mount_type) {
 1209                         nmp = VFSTONFS(mp);
 1210                         if (nmp->nm_flag & NFSMNT_NQNFS) {
 1211                                 for (np = nmp->nm_timerhead.cqh_first;
 1212                                     np != (void *)&nmp->nm_timerhead;
 1213                                     np = np->n_timer.cqe_next) {
 1214                                         np->n_expiry += deltat;
 1215                                 }
 1216                         }
 1217                 }
 1218                 simple_lock(&mountlist_slock);
 1219                 nxtmp = TAILQ_NEXT(mp, mnt_list);
 1220                 vfs_unbusy(mp, p);
 1221         }
 1222         simple_unlock(&mountlist_slock);
 1223 }
 1224 
 1225 #ifndef NFS_NOSERVER 
 1226 /*
 1227  * Lock a server lease.
 1228  */
 1229 static void
 1230 nqsrv_locklease(lp)
 1231         struct nqlease *lp;
 1232 {
 1233 
 1234         while (lp->lc_flag & LC_LOCKED) {
 1235                 lp->lc_flag |= LC_WANTED;
 1236                 (void) tsleep((caddr_t)lp, PSOCK, "nqlc", 0);
 1237         }
 1238         lp->lc_flag |= LC_LOCKED;
 1239         lp->lc_flag &= ~LC_WANTED;
 1240 }
 1241 
 1242 /*
 1243  * Unlock a server lease.
 1244  */
 1245 static void
 1246 nqsrv_unlocklease(lp)
 1247         struct nqlease *lp;
 1248 {
 1249 
 1250         lp->lc_flag &= ~LC_LOCKED;
 1251         if (lp->lc_flag & LC_WANTED)
 1252                 wakeup((caddr_t)lp);
 1253 }
 1254 #endif /* NFS_NOSERVER */
 1255 
 1256 /*
 1257  * Update a client lease.
 1258  */
 1259 void
 1260 nqnfs_clientlease(nmp, np, rwflag, cachable, expiry, frev)
 1261         register struct nfsmount *nmp;
 1262         register struct nfsnode *np;
 1263         int rwflag, cachable;
 1264         time_t expiry;
 1265         u_quad_t frev;
 1266 {
 1267         register struct nfsnode *tp;
 1268 
 1269         if (np->n_timer.cqe_next != 0) {
 1270                 CIRCLEQ_REMOVE(&nmp->nm_timerhead, np, n_timer);
 1271                 if (rwflag == ND_WRITE)
 1272                         np->n_flag |= NQNFSWRITE;
 1273         } else if (rwflag == ND_READ)
 1274                 np->n_flag &= ~NQNFSWRITE;
 1275         else
 1276                 np->n_flag |= NQNFSWRITE;
 1277         if (cachable)
 1278                 np->n_flag &= ~NQNFSNONCACHE;
 1279         else
 1280                 np->n_flag |= NQNFSNONCACHE;
 1281         np->n_expiry = expiry;
 1282         np->n_lrev = frev;
 1283         tp = nmp->nm_timerhead.cqh_last;
 1284         while (tp != (void *)&nmp->nm_timerhead && tp->n_expiry > np->n_expiry)
 1285                 tp = tp->n_timer.cqe_prev;
 1286         if (tp == (void *)&nmp->nm_timerhead) {
 1287                 CIRCLEQ_INSERT_HEAD(&nmp->nm_timerhead, np, n_timer);
 1288         } else {
 1289                 CIRCLEQ_INSERT_AFTER(&nmp->nm_timerhead, tp, np, n_timer);
 1290         }
 1291 }

Cache object: 0a58dee8f3bfc27a02ba2191bda9d131


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.