FreeBSD/Linux Kernel Cross Reference
sys/nfs/nfs_nqlease.c
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
|