xref: /csrg-svn/sys/nfs/nfs_vnops.c (revision 39495)
1 /*
2  * Copyright (c) 1989 The Regents of the University of California.
3  * 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 are permitted
9  * provided that the above copyright notice and this paragraph are
10  * duplicated in all such forms and that any documentation,
11  * advertising materials, and other materials related to such
12  * distribution and use acknowledge that the software was developed
13  * by the University of California, Berkeley.  The name of the
14  * University may not be used to endorse or promote products derived
15  * from this software without specific prior written permission.
16  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
18  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
19  *
20  *	@(#)nfs_vnops.c	7.14 (Berkeley) 11/03/89
21  */
22 
23 /*
24  * vnode op calls for sun nfs version 2
25  */
26 
27 #include "machine/pte.h"
28 #include "machine/mtpr.h"
29 #include "strings.h"
30 #include "param.h"
31 #include "user.h"
32 #include "proc.h"
33 #include "mount.h"
34 #include "buf.h"
35 #include "vm.h"
36 #include "../ufs/dir.h"
37 #include "malloc.h"
38 #include "mbuf.h"
39 #include "uio.h"
40 #include "ucred.h"
41 #include "namei.h"
42 #include "errno.h"
43 #include "file.h"
44 #include "conf.h"
45 #include "vnode.h"
46 #include "../ufs/inode.h"
47 #include "map.h"
48 #include "nfsv2.h"
49 #include "nfs.h"
50 #include "nfsnode.h"
51 #include "nfsmount.h"
52 #include "xdr_subs.h"
53 #include "nfsm_subs.h"
54 #include "nfsiom.h"
55 
56 /* Defs */
57 #define	TRUE	1
58 #define	FALSE	0
59 
60 /* Global vars */
61 int	nfs_lookup(),
62 	nfs_create(),
63 	nfs_mknod(),
64 	nfs_open(),
65 	nfs_close(),
66 	nfs_access(),
67 	nfs_getattr(),
68 	nfs_setattr(),
69 	nfs_read(),
70 	nfs_write(),
71 	vfs_noop(),
72 	vfs_nullop(),
73 	nfs_remove(),
74 	nfs_link(),
75 	nfs_rename(),
76 	nfs_mkdir(),
77 	nfs_rmdir(),
78 	nfs_symlink(),
79 	nfs_readdir(),
80 	nfs_readlink(),
81 	nfs_abortop(),
82 	nfs_lock(),
83 	nfs_unlock(),
84 	nfs_bmap(),
85 	nfs_strategy(),
86 	nfs_fsync(),
87 	nfs_inactive(),
88 	nfs_reclaim();
89 
90 struct vnodeops nfsv2_vnodeops = {
91 	nfs_lookup,
92 	nfs_create,
93 	nfs_mknod,
94 	nfs_open,
95 	nfs_close,
96 	nfs_access,
97 	nfs_getattr,
98 	nfs_setattr,
99 	nfs_read,
100 	nfs_write,
101 	vfs_noop,
102 	vfs_noop,
103 	vfs_noop,
104 	nfs_fsync,
105 	vfs_nullop,
106 	nfs_remove,
107 	nfs_link,
108 	nfs_rename,
109 	nfs_mkdir,
110 	nfs_rmdir,
111 	nfs_symlink,
112 	nfs_readdir,
113 	nfs_readlink,
114 	nfs_abortop,
115 	nfs_inactive,
116 	nfs_reclaim,
117 	nfs_lock,
118 	nfs_unlock,
119 	nfs_bmap,
120 	nfs_strategy,
121 };
122 
123 /* Special device vnode ops */
124 int	spec_lookup(),
125 	spec_open(),
126 	spec_read(),
127 	spec_write(),
128 	spec_strategy(),
129 	spec_ioctl(),
130 	spec_select(),
131 	spec_close(),
132 	spec_badop(),
133 	spec_nullop();
134 
135 struct vnodeops spec_nfsv2nodeops = {
136 	spec_lookup,
137 	spec_badop,
138 	spec_badop,
139 	spec_open,
140 	spec_close,
141 	nfs_access,
142 	nfs_getattr,
143 	nfs_setattr,
144 	spec_read,
145 	spec_write,
146 	spec_ioctl,
147 	spec_select,
148 	spec_badop,
149 	spec_nullop,
150 	spec_badop,
151 	spec_badop,
152 	spec_badop,
153 	spec_badop,
154 	spec_badop,
155 	spec_badop,
156 	spec_badop,
157 	spec_badop,
158 	spec_badop,
159 	spec_badop,
160 	nfs_inactive,
161 	nfs_reclaim,
162 	nfs_lock,
163 	nfs_unlock,
164 	spec_badop,
165 	spec_strategy,
166 };
167 
168 extern u_long nfs_procids[NFS_NPROCS];
169 extern u_long nfs_prog, nfs_vers;
170 extern char nfsiobuf[MAXPHYS+NBPG];
171 struct map nfsmap[NFS_MSIZ];
172 enum vtype v_type[NFLNK+1];
173 struct buf nfs_bqueue;		/* Queue head for nfsiod's */
174 int nfs_asyncdaemons = 0;
175 struct proc *nfs_iodwant[MAX_ASYNCDAEMON];
176 static int nfsmap_want = 0;
177 
178 /*
179  * nfs null call from vfs.
180  */
181 nfs_null(vp, cred)
182 	struct vnode *vp;
183 	struct ucred *cred;
184 {
185 	caddr_t bpos, dpos;
186 	u_long xid;
187 	int error = 0;
188 	struct mbuf *mreq, *mrep, *md, *mb;
189 
190 	nfsm_reqhead(nfs_procids[NFSPROC_NULL], cred, 0);
191 	nfsm_request(vp);
192 	nfsm_reqdone;
193 	return (error);
194 }
195 
196 /*
197  * nfs access vnode op.
198  * Essentially just get vattr and then imitate iaccess()
199  */
200 nfs_access(vp, mode, cred)
201 	struct vnode *vp;
202 	int mode;
203 	register struct ucred *cred;
204 {
205 	register struct vattr *vap;
206 	register gid_t *gp;
207 	struct vattr vattr;
208 	register int i;
209 	int error;
210 
211 	/*
212 	 * If you're the super-user,
213 	 * you always get access.
214 	 */
215 	if (cred->cr_uid == 0)
216 		return (0);
217 	vap = &vattr;
218 	if (error = nfs_getattr(vp, vap, cred))
219 		return (error);
220 	/*
221 	 * Access check is based on only one of owner, group, public.
222 	 * If not owner, then check group. If not a member of the
223 	 * group, then check public access.
224 	 */
225 	if (cred->cr_uid != vap->va_uid) {
226 		mode >>= 3;
227 		gp = cred->cr_groups;
228 		for (i = 0; i < cred->cr_ngroups; i++, gp++)
229 			if (vap->va_gid == *gp)
230 				goto found;
231 		mode >>= 3;
232 found:
233 		;
234 	}
235 	if ((vap->va_mode & mode) != 0)
236 		return (0);
237 	return (EACCES);
238 }
239 
240 /*
241  * nfs open vnode op
242  * Just check to see if the type is ok
243  */
244 /* ARGSUSED */
245 nfs_open(vp, mode, cred)
246 	struct vnode *vp;
247 	int mode;
248 	struct ucred *cred;
249 {
250 	register enum vtype vtyp;
251 
252 	vtyp = vp->v_type;
253 	if (vtyp == VREG || vtyp == VDIR || vtyp == VLNK)
254 		return (0);
255 	else
256 		return (EACCES);
257 }
258 
259 /*
260  * nfs close vnode op
261  * For reg files, invalidate any buffer cache entries.
262  */
263 /* ARGSUSED */
264 nfs_close(vp, fflags, cred)
265 	register struct vnode *vp;
266 	int fflags;
267 	struct ucred *cred;
268 {
269 	register struct nfsnode *np = VTONFS(vp);
270 	int error = 0;
271 
272 	if (vp->v_type == VREG && ((np->n_flag & NMODIFIED) ||
273 	   ((np->n_flag & NBUFFERED) && np->n_sillyrename))) {
274 		nfs_lock(vp);
275 		np->n_flag &= ~(NMODIFIED|NBUFFERED);
276 		error = nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE);
277 		if (np->n_flag & NWRITEERR) {
278 			np->n_flag &= ~NWRITEERR;
279 			if (!error)
280 				error = np->n_error ? np->n_error : EIO;
281 		}
282 		nfs_unlock(vp);
283 	}
284 	return (error);
285 }
286 
287 /*
288  * nfs getattr call from vfs.
289  */
290 nfs_getattr(vp, vap, cred)
291 	register struct vnode *vp;
292 	struct vattr *vap;
293 	struct ucred *cred;
294 {
295 	register caddr_t cp;
296 	register long t1;
297 	caddr_t bpos, dpos;
298 	u_long xid;
299 	int error = 0;
300 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
301 
302 	/* First look in the cache.. */
303 	if (nfs_getattrcache(vp, vap) == 0)
304 		return (0);
305 	nfsstats.rpccnt[NFSPROC_GETATTR]++;
306 	nfsm_reqhead(nfs_procids[NFSPROC_GETATTR], cred, NFSX_FH);
307 	nfsm_fhtom(vp);
308 	nfsm_request(vp);
309 	nfsm_loadattr(vp, vap);
310 	nfsm_reqdone;
311 	return (error);
312 }
313 
314 /*
315  * nfs setattr call.
316  */
317 nfs_setattr(vp, vap, cred)
318 	register struct vnode *vp;
319 	register struct vattr *vap;
320 	struct ucred *cred;
321 {
322 	register struct nfsv2_sattr *sp;
323 	register caddr_t cp;
324 	register long t1;
325 	caddr_t bpos, dpos;
326 	u_long xid;
327 	int error = 0;
328 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
329 	struct nfsnode *np;
330 
331 	nfsstats.rpccnt[NFSPROC_SETATTR]++;
332 	nfsm_reqhead(nfs_procids[NFSPROC_SETATTR], cred, NFSX_FH+NFSX_SATTR);
333 	nfsm_fhtom(vp);
334 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
335 	if (vap->va_mode == 0xffff)
336 		sp->sa_mode = VNOVAL;
337 	else
338 		sp->sa_mode = vtonfs_mode(vp->v_type, vap->va_mode);
339 	if (vap->va_uid == 0xffff)
340 		sp->sa_uid = VNOVAL;
341 	else
342 		sp->sa_uid = txdr_unsigned(vap->va_uid);
343 	if (vap->va_gid == 0xffff)
344 		sp->sa_gid = VNOVAL;
345 	else
346 		sp->sa_gid = txdr_unsigned(vap->va_gid);
347 	sp->sa_size = txdr_unsigned(vap->va_size);
348 	if (vap->va_size != VNOVAL) {
349 		np = VTONFS(vp);
350 		if (np->n_flag & NMODIFIED) {
351 			np->n_flag &= ~NMODIFIED;
352 			nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE);
353 		}
354 	}
355 	txdr_time(&vap->va_atime, &sp->sa_atime);
356 	txdr_time(&vap->va_mtime, &sp->sa_mtime);
357 	nfsm_request(vp);
358 	nfsm_loadattr(vp, (struct vattr *)0);
359 	/* should we fill in any vap fields ?? */
360 	nfsm_reqdone;
361 	return (error);
362 }
363 
364 /*
365  * nfs lookup call, one step at a time...
366  * First look in cache
367  * If not found, unlock the directory nfsnode and do the rpc
368  */
369 nfs_lookup(vp, ndp)
370 	register struct vnode *vp;
371 	register struct nameidata *ndp;
372 {
373 	register struct vnode *vdp;
374 	register u_long *p;
375 	register caddr_t cp;
376 	register long t1, t2;
377 	caddr_t bpos, dpos, cp2;
378 	u_long xid;
379 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
380 	struct vnode *newvp;
381 	long len;
382 	nfsv2fh_t *fhp;
383 	struct nfsnode *np;
384 	int lockparent, wantparent, flag, error = 0;
385 
386 	ndp->ni_dvp = vp;
387 	ndp->ni_vp = NULL;
388 	if (vp->v_type != VDIR)
389 		return (ENOTDIR);
390 	lockparent = ndp->ni_nameiop & LOCKPARENT;
391 	flag = ndp->ni_nameiop & OPFLAG;
392 	wantparent = ndp->ni_nameiop & (LOCKPARENT|WANTPARENT);
393 	if ((error = cache_lookup(ndp)) && error != ENOENT) {
394 		struct vattr vattr;
395 		int vpid;
396 
397 		if (vp == ndp->ni_rdir && ndp->ni_isdotdot)
398 			panic("nfs_lookup: .. through root");
399 		vdp = ndp->ni_vp;
400 		vpid = vdp->v_id;
401 		/*
402 		 * See the comment starting `Step through' in ufs/ufs_lookup.c
403 		 * for an explanation of the locking protocol
404 		 */
405 		if (vp == vdp) {
406 			VREF(vdp);
407 			error = 0;
408 		} else if (ndp->ni_isdotdot) {
409 			nfs_unlock(vp);
410 			error = vget(vdp);
411 		} else {
412 			error = vget(vdp);
413 			nfs_unlock(vp);
414 		}
415 		if (!error) {
416 			if (vpid == vdp->v_id &&
417 			   !nfs_getattr(vdp, &vattr, ndp->ni_cred)) {
418 				nfsstats.lookupcache_hits++;
419 				return (0);
420 			} else {
421 				nfs_nput(vdp);
422 			}
423 		}
424 		nfs_lock(vp);
425 		ndp->ni_vp = (struct vnode *)0;
426 	}
427 	error = 0;
428 	nfsstats.lookupcache_misses++;
429 	nfsstats.rpccnt[NFSPROC_LOOKUP]++;
430 	len = ndp->ni_namelen;
431 	nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len));
432 	nfsm_fhtom(vp);
433 	nfsm_strtom(ndp->ni_ptr, len, NFS_MAXNAMLEN);
434 	nfsm_request(vp);
435 nfsmout:
436 	if (error) {
437 		if ((flag == CREATE || flag == RENAME) &&
438 			*ndp->ni_next == 0) {
439 			if (!lockparent)
440 				nfs_unlock(vp);
441 		}
442 		return (ENOENT);
443 	}
444 	nfsm_disect(fhp,nfsv2fh_t *,NFSX_FH);
445 
446 	/*
447 	 * Handle DELETE and RENAME cases...
448 	 */
449 	if (flag == DELETE && *ndp->ni_next == 0) {
450 		if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) {
451 			VREF(vp);
452 			newvp = vp;
453 			np = VTONFS(vp);
454 		} else {
455 			if (error = nfs_nget(vp->v_mount, fhp, &np)) {
456 				m_freem(mrep);
457 				return (error);
458 			}
459 			newvp = NFSTOV(np);
460 		}
461 		if (error =
462 		    nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) {
463 			if (newvp != vp)
464 				nfs_nput(newvp);
465 			else
466 				vrele(vp);
467 			m_freem(mrep);
468 			return (error);
469 		}
470 		ndp->ni_vp = newvp;
471 		if (!lockparent)
472 			nfs_unlock(vp);
473 		m_freem(mrep);
474 		return (0);
475 	}
476 
477 	if (flag == RENAME && wantparent && *ndp->ni_next == 0) {
478 		if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) {
479 			m_freem(mrep);
480 			return (EISDIR);
481 		}
482 		if (error = nfs_nget(vp->v_mount, fhp, &np)) {
483 			m_freem(mrep);
484 			return (error);
485 		}
486 		newvp = NFSTOV(np);
487 		if (error =
488 		    nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) {
489 			nfs_nput(newvp);
490 			m_freem(mrep);
491 			return (error);
492 		}
493 		ndp->ni_vp = newvp;
494 		if (!lockparent)
495 			nfs_unlock(vp);
496 		return (0);
497 	}
498 
499 	if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) {
500 		VREF(vp);
501 		newvp = vp;
502 		np = VTONFS(vp);
503 	} else if (ndp->ni_isdotdot) {
504 		nfs_unlock(vp);
505 		if (error = nfs_nget(vp->v_mount, fhp, &np)) {
506 			nfs_lock(vp);
507 			m_freem(mrep);
508 			return (error);
509 		}
510 		nfs_lock(vp);
511 		newvp = NFSTOV(np);
512 	} else {
513 		if (error = nfs_nget(vp->v_mount, fhp, &np)) {
514 			m_freem(mrep);
515 			return (error);
516 		}
517 		newvp = NFSTOV(np);
518 	}
519 	if (error = nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) {
520 		if (newvp != vp)
521 			nfs_nput(newvp);
522 		else
523 			vrele(vp);
524 		m_freem(mrep);
525 		return (error);
526 	}
527 	m_freem(mrep);
528 
529 	if (vp != newvp && (!lockparent || *ndp->ni_next != '\0'))
530 		nfs_unlock(vp);
531 	ndp->ni_vp = newvp;
532 	if (error == 0 && ndp->ni_makeentry)
533 		cache_enter(ndp);
534 	return (error);
535 }
536 
537 /*
538  * nfs readlink call
539  */
540 nfs_readlink(vp, uiop, cred)
541 	register struct vnode *vp;
542 	struct uio *uiop;
543 	struct ucred *cred;
544 {
545 	register u_long *p;
546 	register caddr_t cp;
547 	register long t1;
548 	caddr_t bpos, dpos, cp2;
549 	u_long xid;
550 	int error = 0;
551 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
552 	long len;
553 
554 	nfsstats.rpccnt[NFSPROC_READLINK]++;
555 	nfsm_reqhead(nfs_procids[NFSPROC_READLINK], cred, NFSX_FH);
556 	nfsm_fhtom(vp);
557 	nfsm_request(vp);
558 	nfsm_strsiz(len, NFS_MAXPATHLEN);
559 	nfsm_mtouio(uiop, len);
560 	nfsm_reqdone;
561 	return (error);
562 }
563 
564 /*
565  * nfs read call
566  */
567 nfs_readrpc(vp, uiop, offp, cred)
568 	register struct vnode *vp;
569 	struct uio *uiop;
570 	off_t *offp;
571 	struct ucred *cred;
572 {
573 	register u_long *p;
574 	register caddr_t cp;
575 	register long t1;
576 	caddr_t bpos, dpos, cp2;
577 	u_long xid;
578 	int error = 0;
579 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
580 	struct nfsmount *nmp;
581 	long len, retlen, tsiz;
582 
583 	nmp = vfs_to_nfs(vp->v_mount);
584 	tsiz = uiop->uio_resid;
585 	while (tsiz > 0) {
586 		nfsstats.rpccnt[NFSPROC_READ]++;
587 		len = (tsiz > nmp->nm_rsize) ? nmp->nm_rsize : tsiz;
588 		nfsm_reqhead(nfs_procids[NFSPROC_READ], cred, NFSX_FH+NFSX_UNSIGNED*3);
589 		nfsm_fhtom(vp);
590 		nfsm_build(p, u_long *, NFSX_UNSIGNED*3);
591 		*p++ = txdr_unsigned(*offp);
592 		*p++ = txdr_unsigned(len);
593 		*p = 0;
594 		nfsm_request(vp);
595 		nfsm_loadattr(vp, (struct vattr *)0);
596 		nfsm_strsiz(retlen, nmp->nm_rsize);
597 		nfsm_mtouio(uiop, retlen);
598 		m_freem(mrep);
599 		*offp += retlen;
600 		if (retlen < len)
601 			tsiz = 0;
602 		else
603 			tsiz -= len;
604 	}
605 nfsmout:
606 	return (error);
607 }
608 
609 /*
610  * nfs write call
611  */
612 nfs_writerpc(vp, uiop, offp, cred)
613 	register struct vnode *vp;
614 	struct uio *uiop;
615 	off_t *offp;
616 	struct ucred *cred;
617 {
618 	register u_long *p;
619 	register caddr_t cp;
620 	register long t1;
621 	caddr_t bpos, dpos;
622 	u_long xid;
623 	int error = 0;
624 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
625 	struct nfsmount *nmp;
626 	long len, tsiz;
627 
628 	nmp = vfs_to_nfs(vp->v_mount);
629 	tsiz = uiop->uio_resid;
630 	while (tsiz > 0) {
631 		nfsstats.rpccnt[NFSPROC_WRITE]++;
632 		len = (tsiz > nmp->nm_wsize) ? nmp->nm_wsize : tsiz;
633 		nfsm_reqhead(nfs_procids[NFSPROC_WRITE], cred,
634 			NFSX_FH+NFSX_UNSIGNED*4);
635 		nfsm_fhtom(vp);
636 		nfsm_build(p, u_long *, NFSX_UNSIGNED*4);
637 		*(p+1) = txdr_unsigned(*offp);
638 		*(p+3) = txdr_unsigned(len);
639 		nfsm_uiotom(uiop, len);
640 		nfsm_request(vp);
641 		nfsm_loadattr(vp, (struct vattr *)0);
642 		m_freem(mrep);
643 		tsiz -= len;
644 		*offp += len;
645 	}
646 nfsmout:
647 	return (error);
648 }
649 
650 /*
651  * nfs mknod call
652  * This call is currently not supported.
653  */
654 /* ARGSUSED */
655 nfs_mknod(ndp, vap, cred)
656 	struct nameidata *ndp;
657 	struct ucred *cred;
658 	struct vattr *vap;
659 {
660 
661 	nfs_abortop(ndp);
662 	return (EOPNOTSUPP);
663 }
664 
665 /*
666  * nfs file create call
667  */
668 nfs_create(ndp, vap)
669 	register struct nameidata *ndp;
670 	register struct vattr *vap;
671 {
672 	register struct nfsv2_sattr *sp;
673 	register u_long *p;
674 	register caddr_t cp;
675 	register long t1, t2;
676 	caddr_t bpos, dpos, cp2;
677 	u_long xid;
678 	int error = 0;
679 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
680 
681 	nfsstats.rpccnt[NFSPROC_CREATE]++;
682 	nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred,
683 	  NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR);
684 	nfsm_fhtom(ndp->ni_dvp);
685 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
686 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
687 	sp->sa_mode = vtonfs_mode(VREG, vap->va_mode);
688 	sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
689 	sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
690 	sp->sa_size = txdr_unsigned(0);
691 	/* or should these be VNOVAL ?? */
692 	txdr_time(&vap->va_atime, &sp->sa_atime);
693 	txdr_time(&vap->va_mtime, &sp->sa_mtime);
694 	nfsm_request(ndp->ni_dvp);
695 	nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
696 	nfsm_reqdone;
697 	nfs_nput(ndp->ni_dvp);
698 	return (error);
699 }
700 
701 /*
702  * nfs file remove call
703  * To try and make nfs semantics closer to vfs semantics, a file that has
704  * other references to the vnode is renamed instead of removed and then
705  * removed later on the last close.
706  * Unfortunately you must flush the buffer cache and cmap to get rid of
707  * all extraneous vnode references before you check the reference cnt.
708  * 1 - If the file could have blocks in the buffer cache
709  *	  flush them out and invalidate them
710  *	  mpurge the vnode to flush out cmap references
711  *	  (This is necessary to update the vnode ref cnt as well as sensible
712  *	   for actual removes, to free up the buffers)
713  * 2 - If v_count > 1
714  *	  If a rename is not already in the works
715  *	     call nfs_sillyrename() to set it up
716  *     else
717  *	  do the remove rpc
718  */
719 nfs_remove(ndp)
720 	register struct nameidata *ndp;
721 {
722 	register struct vnode *vp = ndp->ni_vp;
723 	register struct nfsnode *np = VTONFS(ndp->ni_vp);
724 	register u_long *p;
725 	register caddr_t cp;
726 	register long t1, t2;
727 	caddr_t bpos, dpos;
728 	u_long xid;
729 	int error = 0;
730 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
731 
732 	if (vp->v_type == VREG) {
733 		if (np->n_flag & (NMODIFIED|NBUFFERED)) {
734 			np->n_flag &= ~(NMODIFIED|NBUFFERED);
735 			nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE);
736 		}
737 		if (np->n_flag & NPAGEDON)
738 			mpurge(vp);	/* In case cmap entries still ref it */
739 	}
740 	if (vp->v_count > 1) {
741 		if (!np->n_sillyrename)
742 			error = nfs_sillyrename(ndp, REMOVE);
743 	} else {
744 		nfsstats.rpccnt[NFSPROC_REMOVE]++;
745 		nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred,
746 			NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
747 		nfsm_fhtom(ndp->ni_dvp);
748 		nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
749 		nfsm_request(ndp->ni_dvp);
750 		nfsm_reqdone;
751 	}
752 	if (ndp->ni_dvp == ndp->ni_vp)
753 		vrele(ndp->ni_vp);
754 	else
755 		nfs_nput(ndp->ni_vp);
756 	nfs_nput(ndp->ni_dvp);
757 	return (error);
758 }
759 
760 /*
761  * nfs file remove rpc called from nfs_inactive
762  */
763 nfs_removeit(ndp)
764 	register struct nameidata *ndp;
765 {
766 	register u_long *p;
767 	register caddr_t cp;
768 	register long t1, t2;
769 	caddr_t bpos, dpos;
770 	u_long xid;
771 	int error = 0;
772 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
773 
774 	nfsstats.rpccnt[NFSPROC_REMOVE]++;
775 	nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred,
776 		NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
777 	nfsm_fhtom(ndp->ni_dvp);
778 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
779 	nfsm_request(ndp->ni_dvp);
780 	nfsm_reqdone;
781 	return (error);
782 }
783 
784 /*
785  * nfs file rename call
786  */
787 nfs_rename(sndp, tndp)
788 	register struct nameidata *sndp, *tndp;
789 {
790 	register u_long *p;
791 	register caddr_t cp;
792 	register long t1, t2;
793 	caddr_t bpos, dpos;
794 	u_long xid;
795 	int error = 0;
796 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
797 
798 	nfsstats.rpccnt[NFSPROC_RENAME]++;
799 	nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred,
800 		(NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+
801 		nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/
802 	nfsm_fhtom(sndp->ni_dvp);
803 	nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
804 	nfsm_fhtom(tndp->ni_dvp);
805 	nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
806 	nfsm_request(sndp->ni_dvp);
807 	nfsm_reqdone;
808 	if (sndp->ni_vp->v_type == VDIR) {
809 		if (tndp->ni_vp != NULL && tndp->ni_vp->v_type == VDIR)
810 			cache_purge(tndp->ni_dvp);
811 		cache_purge(sndp->ni_dvp);
812 	}
813 	nfs_abortop(sndp);
814 	nfs_abortop(tndp);
815 	return (error);
816 }
817 
818 /*
819  * nfs file rename rpc called from above
820  */
821 nfs_renameit(sndp, tndp)
822 	register struct nameidata *sndp, *tndp;
823 {
824 	register u_long *p;
825 	register caddr_t cp;
826 	register long t1, t2;
827 	caddr_t bpos, dpos;
828 	u_long xid;
829 	int error = 0;
830 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
831 
832 	nfsstats.rpccnt[NFSPROC_RENAME]++;
833 	nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred,
834 		(NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+
835 		nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/
836 	nfsm_fhtom(sndp->ni_dvp);
837 	nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
838 	nfsm_fhtom(tndp->ni_dvp);
839 	nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
840 	nfsm_request(sndp->ni_dvp);
841 	nfsm_reqdone;
842 	return (error);
843 }
844 
845 /*
846  * nfs hard link create call
847  */
848 nfs_link(vp, ndp)
849 	register struct vnode *vp;
850 	register struct nameidata *ndp;
851 {
852 	register u_long *p;
853 	register caddr_t cp;
854 	register long t1, t2;
855 	caddr_t bpos, dpos;
856 	u_long xid;
857 	int error = 0;
858 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
859 
860 	if (ndp->ni_dvp != vp)
861 		nfs_lock(vp);
862 	nfsstats.rpccnt[NFSPROC_LINK]++;
863 	nfsm_reqhead(nfs_procids[NFSPROC_LINK], ndp->ni_cred,
864 		NFSX_FH*2+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
865 	nfsm_fhtom(vp);
866 	nfsm_fhtom(ndp->ni_dvp);
867 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
868 	nfsm_request(vp);
869 	nfsm_reqdone;
870 	if (ndp->ni_dvp != vp)
871 		nfs_unlock(vp);
872 	nfs_nput(ndp->ni_dvp);
873 	return (error);
874 }
875 
876 /*
877  * nfs symbolic link create call
878  */
879 nfs_symlink(ndp, vap, nm)
880 	struct nameidata *ndp;
881 	struct vattr *vap;
882 	char *nm;		/* is this the path ?? */
883 {
884 	register struct nfsv2_sattr *sp;
885 	register u_long *p;
886 	register caddr_t cp;
887 	register long t1, t2;
888 	caddr_t bpos, dpos;
889 	u_long xid;
890 	int error = 0;
891 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
892 
893 	nfsstats.rpccnt[NFSPROC_SYMLINK]++;
894 	nfsm_reqhead(nfs_procids[NFSPROC_SYMLINK], ndp->ni_cred,
895 	NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_UNSIGNED);
896 	nfsm_fhtom(ndp->ni_dvp);
897 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
898 	nfsm_strtom(nm, strlen(nm), NFS_MAXPATHLEN);
899 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
900 	sp->sa_mode = vtonfs_mode(VLNK, vap->va_mode);
901 	sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
902 	sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
903 	sp->sa_size = txdr_unsigned(VNOVAL);
904 	txdr_time(&vap->va_atime, &sp->sa_atime);		/* or VNOVAL ?? */
905 	txdr_time(&vap->va_mtime, &sp->sa_mtime);	/* or VNOVAL ?? */
906 	nfsm_request(ndp->ni_dvp);
907 	nfsm_reqdone;
908 	nfs_nput(ndp->ni_dvp);
909 	return (error);
910 }
911 
912 /*
913  * nfs make dir call
914  */
915 nfs_mkdir(ndp, vap)
916 	register struct nameidata *ndp;
917 	struct vattr *vap;
918 {
919 	register struct nfsv2_sattr *sp;
920 	register u_long *p;
921 	register caddr_t cp;
922 	register long t1, t2;
923 	caddr_t bpos, dpos, cp2;
924 	u_long xid;
925 	int error = 0;
926 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
927 
928 	nfsstats.rpccnt[NFSPROC_MKDIR]++;
929 	nfsm_reqhead(nfs_procids[NFSPROC_MKDIR], ndp->ni_cred,
930 	  NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR);
931 	nfsm_fhtom(ndp->ni_dvp);
932 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
933 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
934 	sp->sa_mode = vtonfs_mode(VDIR, vap->va_mode);
935 	sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
936 	sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
937 	sp->sa_size = txdr_unsigned(VNOVAL);
938 	txdr_time(&vap->va_atime, &sp->sa_atime);		/* or VNOVAL ?? */
939 	txdr_time(&vap->va_mtime, &sp->sa_mtime);	/* or VNOVAL ?? */
940 	nfsm_request(ndp->ni_dvp);
941 	nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
942 	nfsm_reqdone;
943 	nfs_nput(ndp->ni_dvp);
944 	return (error);
945 }
946 
947 /*
948  * nfs remove directory call
949  */
950 nfs_rmdir(ndp)
951 	register struct nameidata *ndp;
952 {
953 	register u_long *p;
954 	register caddr_t cp;
955 	register long t1, t2;
956 	caddr_t bpos, dpos;
957 	u_long xid;
958 	int error = 0;
959 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
960 
961 	if (ndp->ni_dvp == ndp->ni_vp) {
962 		vrele(ndp->ni_dvp);
963 		nfs_nput(ndp->ni_dvp);
964 		return (EINVAL);
965 	}
966 	nfsstats.rpccnt[NFSPROC_RMDIR]++;
967 	nfsm_reqhead(nfs_procids[NFSPROC_RMDIR], ndp->ni_cred,
968 		NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
969 	nfsm_fhtom(ndp->ni_dvp);
970 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
971 	nfsm_request(ndp->ni_dvp);
972 	nfsm_reqdone;
973 	cache_purge(ndp->ni_dvp);
974 	cache_purge(ndp->ni_vp);
975 	nfs_nput(ndp->ni_vp);
976 	nfs_nput(ndp->ni_dvp);
977 	return (error);
978 }
979 
980 /*
981  * nfs readdir call
982  * Although cookie is defined as opaque, I translate it to/from net byte
983  * order so that it looks more sensible. This appears consistent with the
984  * Ultrix implementation of NFS.
985  */
986 nfs_readdir(vp, uiop, offp, cred)
987 	register struct vnode *vp;
988 	struct uio *uiop;
989 	off_t *offp;
990 	struct ucred *cred;
991 {
992 	register long len;
993 	register struct direct *dp;
994 	register u_long *p;
995 	register caddr_t cp;
996 	register long t1;
997 	caddr_t bpos, dpos, cp2;
998 	u_long xid;
999 	int error = 0;
1000 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1001 	struct mbuf *md2;
1002 	caddr_t dpos2;
1003 	int siz;
1004 	int more_dirs;
1005 	off_t off, savoff;
1006 	struct direct *savdp;
1007 
1008 	nfs_lock(vp);
1009 	nfsstats.rpccnt[NFSPROC_READDIR]++;
1010 	nfsm_reqhead(nfs_procids[NFSPROC_READDIR], cred, xid);
1011 	nfsm_fhtom(vp);
1012 	nfsm_build(p, u_long *, 2*NFSX_UNSIGNED);
1013 	off = *offp;
1014 	*p++ = txdr_unsigned(off);
1015 	*p = txdr_unsigned(uiop->uio_resid);
1016 	nfsm_request(vp);
1017 	siz = 0;
1018 	nfsm_disect(p, u_long *, NFSX_UNSIGNED);
1019 	more_dirs = fxdr_unsigned(int, *p);
1020 
1021 	/* Save the position so that we can do nfsm_mtouio() later */
1022 	dpos2 = dpos;
1023 	md2 = md;
1024 
1025 	/* loop thru the dir entries, doctoring them to 4bsd form */
1026 	savoff = off = 0;
1027 	savdp = dp = NULL;
1028 	while (more_dirs && siz < uiop->uio_resid) {
1029 		savoff = off;		/* Hold onto offset and dp */
1030 		savdp = dp;
1031 		nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED);
1032 		dp = (struct direct *)p;
1033 		dp->d_ino = fxdr_unsigned(u_long, *p++);
1034 		len = fxdr_unsigned(int, *p);
1035 		if (len <= 0 || len > NFS_MAXNAMLEN) {
1036 			error = EBADRPC;
1037 			m_freem(mrep);
1038 			goto nfsmout;
1039 		}
1040 		dp->d_namlen = (u_short)len;
1041 		len = nfsm_rndup(len);
1042 		nfsm_adv(len);
1043 		nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED);
1044 		off = fxdr_unsigned(off_t, *p);
1045 		*p++ = 0;		/* Ensures null termination of name */
1046 		more_dirs = fxdr_unsigned(int, *p);
1047 		dp->d_reclen = len+4*NFSX_UNSIGNED;
1048 		siz += dp->d_reclen;
1049 	}
1050 	/*
1051 	 * If at end of rpc data, get the eof boolean
1052 	 */
1053 	if (!more_dirs)
1054 		nfsm_disecton(p, u_long *, NFSX_UNSIGNED);
1055 	/*
1056 	 * If there is too much to fit in the data buffer, use savoff and
1057 	 * savdp to trim off the last record.
1058 	 * --> we are not at eof
1059 	 */
1060 	if (siz > uiop->uio_resid) {
1061 		off = savoff;
1062 		siz -= dp->d_reclen;
1063 		dp = savdp;
1064 	}
1065 	if (siz > 0) {
1066 		md = md2;
1067 		dpos = dpos2;
1068 		nfsm_mtouio(uiop, siz);
1069 		*offp = off;
1070 	}
1071 	nfsm_reqdone;
1072 	nfs_unlock(vp);
1073 	return (error);
1074 }
1075 
1076 /*
1077  * nfs statfs call
1078  * (Actually a vfsop, not a vnode op)
1079  */
1080 nfs_statfs(mp, sbp)
1081 	struct mount *mp;
1082 	register struct statfs *sbp;
1083 {
1084 	register struct vnode *vp;
1085 	register struct nfsv2_statfs *sfp;
1086 	register caddr_t cp;
1087 	register long t1;
1088 	caddr_t bpos, dpos, cp2;
1089 	u_long xid;
1090 	int error = 0;
1091 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1092 	struct nfsmount *nmp;
1093 	struct ucred *cred;
1094 	struct nfsnode *np;
1095 
1096 	nmp = vfs_to_nfs(mp);
1097 	if (error = nfs_nget(mp, &nmp->nm_fh, &np))
1098 		return (error);
1099 	vp = NFSTOV(np);
1100 	nfsstats.rpccnt[NFSPROC_STATFS]++;
1101 	cred = crget();
1102 	cred->cr_ngroups = 1;
1103 	nfsm_reqhead(nfs_procids[NFSPROC_STATFS], cred, NFSX_FH);
1104 	nfsm_fhtom(vp);
1105 	nfsm_request(vp);
1106 	nfsm_disect(sfp, struct nfsv2_statfs *, NFSX_STATFS);
1107 	sbp->f_type = MOUNT_NFS;
1108 	sbp->f_bsize = fxdr_unsigned(long, sfp->sf_tsize);
1109 	sbp->f_fsize = fxdr_unsigned(long, sfp->sf_bsize);
1110 	sbp->f_blocks = fxdr_unsigned(long, sfp->sf_blocks);
1111 	sbp->f_bfree = fxdr_unsigned(long, sfp->sf_bfree);
1112 	sbp->f_bavail = fxdr_unsigned(long, sfp->sf_bavail);
1113 	sbp->f_files = 0;
1114 	sbp->f_ffree = 0;
1115 	bcopy(nmp->nm_path, sbp->f_mntonname, MNAMELEN);
1116 	bcopy(nmp->nm_host, sbp->f_mntfromname, MNAMELEN);
1117 	nfsm_reqdone;
1118 	nfs_nput(vp);
1119 	crfree(cred);
1120 	return (error);
1121 }
1122 
1123 static char hextoasc[] = "0123456789abcdef";
1124 
1125 /*
1126  * Silly rename. To make the NFS filesystem that is stateless look a little
1127  * more like the "ufs" a remove of an active vnode is translated to a rename
1128  * to a funny looking filename that is removed by nfs_inactive on the
1129  * nfsnode. There is the potential for another process on a different client
1130  * to create the same funny name between the nfs_lookitup() fails and the
1131  * nfs_rename() completes, but...
1132  */
1133 nfs_sillyrename(ndp, flag)
1134 	register struct nameidata *ndp;
1135 	int flag;
1136 {
1137 	register struct nfsnode *np;
1138 	register struct sillyrename *sp;
1139 	register struct nameidata *tndp;
1140 	int error;
1141 	short pid;
1142 
1143 	np = VTONFS(ndp->ni_dvp);
1144 	cache_purge(ndp->ni_dvp);
1145 	MALLOC(sp, struct sillyrename *, sizeof (struct sillyrename),
1146 		M_TEMP, M_WAITOK);
1147 	sp->s_flag = flag;
1148 	bcopy((caddr_t)&np->n_fh, (caddr_t)&sp->s_fh, NFSX_FH);
1149 	np = VTONFS(ndp->ni_vp);
1150 	tndp = &sp->s_namei;
1151 	tndp->ni_cred = crdup(ndp->ni_cred);
1152 
1153 	/* Fudge together a funny name */
1154 	pid = u.u_procp->p_pid;
1155 	bcopy(".nfsAxxxx4.4", tndp->ni_dent.d_name, 13);
1156 	tndp->ni_dent.d_namlen = 12;
1157 	tndp->ni_dent.d_name[8] = hextoasc[pid & 0xf];
1158 	tndp->ni_dent.d_name[7] = hextoasc[(pid >> 4) & 0xf];
1159 	tndp->ni_dent.d_name[6] = hextoasc[(pid >> 8) & 0xf];
1160 	tndp->ni_dent.d_name[5] = hextoasc[(pid >> 12) & 0xf];
1161 
1162 	/* Try lookitups until we get one that isn't there */
1163 	while (nfs_lookitup(ndp->ni_dvp, tndp, (nfsv2fh_t *)0) == 0) {
1164 		tndp->ni_dent.d_name[4]++;
1165 		if (tndp->ni_dent.d_name[4] > 'z') {
1166 			error = EINVAL;
1167 			goto bad;
1168 		}
1169 	}
1170 	if (error = nfs_renameit(ndp, tndp))
1171 		goto bad;
1172 	nfs_lookitup(ndp->ni_dvp, tndp, &np->n_fh);
1173 	np->n_sillyrename = sp;
1174 	return (0);
1175 bad:
1176 	crfree(tndp->ni_cred);
1177 	free((caddr_t)sp, M_TEMP);
1178 	return (error);
1179 }
1180 
1181 /*
1182  * Look up a file name for silly rename stuff.
1183  * Just like nfs_lookup() except that it doesn't load returned values
1184  * into the nfsnode table.
1185  * If fhp != NULL it copies the returned file handle out
1186  */
1187 nfs_lookitup(vp, ndp, fhp)
1188 	register struct vnode *vp;
1189 	register struct nameidata *ndp;
1190 	nfsv2fh_t *fhp;
1191 {
1192 	register u_long *p;
1193 	register caddr_t cp;
1194 	register long t1, t2;
1195 	caddr_t bpos, dpos, cp2;
1196 	u_long xid;
1197 	int error = 0;
1198 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1199 	long len;
1200 
1201 	nfsstats.rpccnt[NFSPROC_LOOKUP]++;
1202 	ndp->ni_dvp = vp;
1203 	ndp->ni_vp = NULL;
1204 	len = ndp->ni_dent.d_namlen;
1205 	nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len));
1206 	nfsm_fhtom(vp);
1207 	nfsm_strtom(ndp->ni_dent.d_name, len, NFS_MAXNAMLEN);
1208 	nfsm_request(vp);
1209 	if (fhp != NULL) {
1210 		nfsm_disect(cp, caddr_t, NFSX_FH);
1211 		bcopy(cp, (caddr_t)fhp, NFSX_FH);
1212 	}
1213 	nfsm_reqdone;
1214 	return (error);
1215 }
1216 
1217 /*
1218  * Kludge City..
1219  * - make nfs_bmap() essentially a no-op that does no translation
1220  * - do nfs_strategy() by faking physical I/O with nfs_readit/nfs_writeit
1221  *   after mapping the physical addresses into Kernel Virtual space in the
1222  *   nfsiobuf area.
1223  *   (Maybe I could use the process's page mapping, but I was concerned that
1224  *    Kernel Write might not be enabled and also figured copyout() would do
1225  *    a lot more work than bcopy() and also it currently happens in the
1226  *    context of the swapper process (2).
1227  */
1228 nfs_bmap(vp, bn, vpp, bnp)
1229 	struct vnode *vp;
1230 	daddr_t bn;
1231 	struct vnode **vpp;
1232 	daddr_t *bnp;
1233 {
1234 	if (vpp != NULL)
1235 		*vpp = vp;
1236 	if (bnp != NULL)
1237 		*bnp = bn * btodb(vp->v_mount->m_bsize);
1238 	return (0);
1239 }
1240 
1241 /*
1242  * Strategy routine for phys. i/o
1243  * If the biod's are running, queue a request
1244  * otherwise just call nfs_doio() to get it done
1245  */
1246 nfs_strategy(bp)
1247 	register struct buf *bp;
1248 {
1249 	register struct buf *dp;
1250 	register int i;
1251 	struct proc *rp;
1252 	int error = 0;
1253 	int fnd = 0;
1254 
1255 	/*
1256 	 * If an i/o daemon is waiting
1257 	 * queue the request, wake it up and wait for completion
1258 	 * otherwise just do it ourselves
1259 	 */
1260 	for (i = 0; i < nfs_asyncdaemons; i++) {
1261 		if (rp = nfs_iodwant[i]) {
1262 			/*
1263 			 * Ensure that the async_daemon is still waiting here
1264 			 */
1265 			if (rp->p_stat != SSLEEP ||
1266 			    rp->p_wchan != ((caddr_t)&nfs_iodwant[i])) {
1267 				nfs_iodwant[i] = (struct proc *)0;
1268 				continue;
1269 			}
1270 			dp = &nfs_bqueue;
1271 			if (dp->b_actf == NULL) {
1272 				dp->b_actl = bp;
1273 				bp->b_actf = dp;
1274 			} else {
1275 				dp->b_actf->b_actl = bp;
1276 				bp->b_actf = dp->b_actf;
1277 			}
1278 			dp->b_actf = bp;
1279 			bp->b_actl = dp;
1280 			fnd++;
1281 			nfs_iodwant[i] = (struct proc *)0;
1282 			wakeup((caddr_t)&nfs_iodwant[i]);
1283 			break;
1284 		}
1285 	}
1286 	if (!fnd)
1287 		error = nfs_doio(bp);
1288 	return (error);
1289 }
1290 
1291 /*
1292  * Fun and games with i/o
1293  * Essentially play ubasetup() and disk interrupt service routine by
1294  * mapping the data buffer into kernel virtual space and doing the
1295  * nfs read or write rpc's from it.
1296  * If the biod's are not running, this is just called from nfs_strategy(),
1297  * otherwise it is called by the biod's to do what would normally be
1298  * partially disk interrupt driven.
1299  */
1300 nfs_doio(bp)
1301 	register struct buf *bp;
1302 {
1303 	register struct pte *pte, *ppte;
1304 	register caddr_t vaddr;
1305 	register struct uio *uiop;
1306 	register struct vnode *vp;
1307 	struct nfsnode *np;
1308 	struct ucred *cr;
1309 	int npf, npf2;
1310 	int reg;
1311 	caddr_t vbase;
1312 	caddr_t addr;
1313 	unsigned v;
1314 	struct proc *rp;
1315 	int o, error;
1316 	int bcnt;
1317 	off_t off;
1318 	struct uio uio;
1319 	struct iovec io;
1320 
1321 	vp = bp->b_vp;
1322 	uiop = &uio;
1323 	uiop->uio_iov = &io;
1324 	uiop->uio_iovcnt = 1;
1325 	uiop->uio_segflg = UIO_SYSSPACE;
1326 	if (bp->b_flags & B_READ) {
1327 		io.iov_len = uiop->uio_resid = bp->b_bcount;
1328 		uiop->uio_offset = off = bp->b_blkno*DEV_BSIZE;
1329 		addr = bp->b_un.b_addr;
1330 		bcnt = bp->b_bcount;
1331 	} else {
1332 		io.iov_len = uiop->uio_resid = bp->b_dirtyend-bp->b_dirtyoff;
1333 		uiop->uio_offset = off = (bp->b_blkno*DEV_BSIZE)+bp->b_dirtyoff;
1334 		addr = bp->b_un.b_addr+bp->b_dirtyoff;
1335 		bcnt = bp->b_dirtyend-bp->b_dirtyoff;
1336 	}
1337 	/*
1338 	 * For phys i/o, map the b_addr into kernel virtual space using
1339 	 * the Nfsiomap pte's
1340 	 * Also, add a temporary b_rcred for reading using the process's uid
1341 	 * and a guess at a group
1342 	 */
1343 	if (bp->b_flags & B_PHYS) {
1344 		VTONFS(vp)->n_flag |= NPAGEDON;
1345 		bp->b_rcred = cr = crget();
1346 		rp = (bp->b_flags & B_DIRTY) ? &proc[2] : bp->b_proc;
1347 		cr->cr_uid = rp->p_uid;
1348 		cr->cr_gid = 0;		/* Anything ?? */
1349 		cr->cr_ngroups = 1;
1350 		o = (int)addr & PGOFSET;
1351 		npf2 = npf = btoc(bcnt + o);
1352 		/*
1353 		 * Get some mapping page table entries
1354 		 */
1355 		while ((reg = rmalloc(nfsmap, (long)npf)) == 0) {
1356 			nfsmap_want++;
1357 			sleep((caddr_t)&nfsmap_want, PZERO-1);
1358 		}
1359 		reg--;
1360 		/* I know it is always the else, but that may change someday */
1361 		if ((bp->b_flags & B_PHYS) == 0)
1362 			pte = kvtopte(bp->b_un.b_addr);
1363 		else if (bp->b_flags & B_PAGET)
1364 			pte = &Usrptmap[btokmx((struct pte *)bp->b_un.b_addr)];
1365 		else {
1366 			v = btop(bp->b_un.b_addr);
1367 			if (bp->b_flags & B_UAREA)
1368 				pte = &rp->p_addr[v];
1369 			else
1370 				pte = vtopte(rp, v);
1371 		}
1372 		/*
1373 		 * Play vmaccess() but with the Nfsiomap page table
1374 		 */
1375 		ppte = &Nfsiomap[reg];
1376 		vbase = vaddr = &nfsiobuf[reg*NBPG];
1377 		while (npf != 0) {
1378 			mapin(ppte, (u_int)vaddr, pte->pg_pfnum, (int)(PG_V|PG_KW));
1379 #if defined(tahoe)
1380 			mtpr(P1DC, vaddr);
1381 #endif
1382 			ppte++;
1383 			pte++;
1384 			vaddr += NBPG;
1385 			--npf;
1386 		}
1387 		io.iov_base = vbase+o;
1388 	} else {
1389 		io.iov_base = addr;
1390 	}
1391 	if (bp->b_flags & B_READ) {
1392 		uiop->uio_rw = UIO_READ;
1393 		bp->b_error = error = nfs_readrpc(vp, uiop, &off, bp->b_rcred);
1394 	} else {
1395 		uiop->uio_rw = UIO_WRITE;
1396 		bp->b_error = error = nfs_writerpc(vp, uiop, &off, bp->b_wcred);
1397 		if (error) {
1398 			np = VTONFS(vp);
1399 			np->n_error = error;
1400 			np->n_flag |= NWRITEERR;
1401 		}
1402 		bp->b_dirtyoff = bp->b_dirtyend = 0;
1403 	}
1404 	if (error)
1405 		bp->b_flags |= B_ERROR;
1406 	bp->b_resid = uiop->uio_resid;
1407 	/*
1408 	 * Release pte's used by physical i/o
1409 	 */
1410 	if (bp->b_flags & B_PHYS) {
1411 		crfree(cr);
1412 		rmfree(nfsmap, (long)npf2, (long)++reg);
1413 		if (nfsmap_want) {
1414 			nfsmap_want = 0;
1415 			wakeup((caddr_t)&nfsmap_want);
1416 		}
1417 	}
1418 	biodone(bp);
1419 	return (error);
1420 }
1421 
1422 /*
1423  * Flush all the blocks associated with a vnode.
1424  * 	Walk through the buffer pool and push any dirty pages
1425  *	associated with the vnode.
1426  */
1427 /* ARGSUSED */
1428 nfs_fsync(vp, fflags, cred)
1429 	register struct vnode *vp;
1430 	int fflags;
1431 	struct ucred *cred;
1432 {
1433 	register struct nfsnode *np = VTONFS(vp);
1434 	int error;
1435 
1436 	nfs_lock(vp);
1437 	if (np->n_flag & NMODIFIED) {
1438 		np->n_flag &= ~NMODIFIED;
1439 		error = nfs_blkflush(vp, (daddr_t)0, np->n_size, FALSE);
1440 	}
1441 	nfs_unlock(vp);
1442 	return (error);
1443 }
1444