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