xref: /csrg-svn/sys/nfs/nfs_vnops.c (revision 39587)
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.15 (Berkeley) 11/22/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, cred)
568 	register struct vnode *vp;
569 	struct uio *uiop;
570 	struct ucred *cred;
571 {
572 	register u_long *p;
573 	register caddr_t cp;
574 	register long t1;
575 	caddr_t bpos, dpos, cp2;
576 	u_long xid;
577 	int error = 0;
578 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
579 	struct nfsmount *nmp;
580 	long len, retlen, tsiz;
581 
582 	nmp = vfs_to_nfs(vp->v_mount);
583 	tsiz = uiop->uio_resid;
584 	while (tsiz > 0) {
585 		nfsstats.rpccnt[NFSPROC_READ]++;
586 		len = (tsiz > nmp->nm_rsize) ? nmp->nm_rsize : tsiz;
587 		nfsm_reqhead(nfs_procids[NFSPROC_READ], cred, NFSX_FH+NFSX_UNSIGNED*3);
588 		nfsm_fhtom(vp);
589 		nfsm_build(p, u_long *, NFSX_UNSIGNED*3);
590 		*p++ = txdr_unsigned(uiop->uio_offset);
591 		*p++ = txdr_unsigned(len);
592 		*p = 0;
593 		nfsm_request(vp);
594 		nfsm_loadattr(vp, (struct vattr *)0);
595 		nfsm_strsiz(retlen, nmp->nm_rsize);
596 		nfsm_mtouio(uiop, retlen);
597 		m_freem(mrep);
598 		if (retlen < len)
599 			tsiz = 0;
600 		else
601 			tsiz -= len;
602 	}
603 nfsmout:
604 	return (error);
605 }
606 
607 /*
608  * nfs write call
609  */
610 nfs_writerpc(vp, uiop, cred)
611 	register struct vnode *vp;
612 	struct uio *uiop;
613 	struct ucred *cred;
614 {
615 	register u_long *p;
616 	register caddr_t cp;
617 	register long t1;
618 	caddr_t bpos, dpos;
619 	u_long xid;
620 	int error = 0;
621 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
622 	struct nfsmount *nmp;
623 	long len, tsiz;
624 
625 	nmp = vfs_to_nfs(vp->v_mount);
626 	tsiz = uiop->uio_resid;
627 	while (tsiz > 0) {
628 		nfsstats.rpccnt[NFSPROC_WRITE]++;
629 		len = (tsiz > nmp->nm_wsize) ? nmp->nm_wsize : tsiz;
630 		nfsm_reqhead(nfs_procids[NFSPROC_WRITE], cred,
631 			NFSX_FH+NFSX_UNSIGNED*4);
632 		nfsm_fhtom(vp);
633 		nfsm_build(p, u_long *, NFSX_UNSIGNED*4);
634 		*(p+1) = txdr_unsigned(uiop->uio_offset);
635 		*(p+3) = txdr_unsigned(len);
636 		nfsm_uiotom(uiop, len);
637 		nfsm_request(vp);
638 		nfsm_loadattr(vp, (struct vattr *)0);
639 		m_freem(mrep);
640 		tsiz -= len;
641 	}
642 nfsmout:
643 	return (error);
644 }
645 
646 /*
647  * nfs mknod call
648  * This call is currently not supported.
649  */
650 /* ARGSUSED */
651 nfs_mknod(ndp, vap, cred)
652 	struct nameidata *ndp;
653 	struct ucred *cred;
654 	struct vattr *vap;
655 {
656 
657 	nfs_abortop(ndp);
658 	return (EOPNOTSUPP);
659 }
660 
661 /*
662  * nfs file create call
663  */
664 nfs_create(ndp, vap)
665 	register struct nameidata *ndp;
666 	register struct vattr *vap;
667 {
668 	register struct nfsv2_sattr *sp;
669 	register u_long *p;
670 	register caddr_t cp;
671 	register long t1, t2;
672 	caddr_t bpos, dpos, cp2;
673 	u_long xid;
674 	int error = 0;
675 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
676 
677 	nfsstats.rpccnt[NFSPROC_CREATE]++;
678 	nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred,
679 	  NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR);
680 	nfsm_fhtom(ndp->ni_dvp);
681 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
682 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
683 	sp->sa_mode = vtonfs_mode(VREG, vap->va_mode);
684 	sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
685 	sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
686 	sp->sa_size = txdr_unsigned(0);
687 	/* or should these be VNOVAL ?? */
688 	txdr_time(&vap->va_atime, &sp->sa_atime);
689 	txdr_time(&vap->va_mtime, &sp->sa_mtime);
690 	nfsm_request(ndp->ni_dvp);
691 	nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
692 	nfsm_reqdone;
693 	nfs_nput(ndp->ni_dvp);
694 	return (error);
695 }
696 
697 /*
698  * nfs file remove call
699  * To try and make nfs semantics closer to vfs semantics, a file that has
700  * other references to the vnode is renamed instead of removed and then
701  * removed later on the last close.
702  * Unfortunately you must flush the buffer cache and cmap to get rid of
703  * all extraneous vnode references before you check the reference cnt.
704  * 1 - If the file could have blocks in the buffer cache
705  *	  flush them out and invalidate them
706  *	  mpurge the vnode to flush out cmap references
707  *	  (This is necessary to update the vnode ref cnt as well as sensible
708  *	   for actual removes, to free up the buffers)
709  * 2 - If v_count > 1
710  *	  If a rename is not already in the works
711  *	     call nfs_sillyrename() to set it up
712  *     else
713  *	  do the remove rpc
714  */
715 nfs_remove(ndp)
716 	register struct nameidata *ndp;
717 {
718 	register struct vnode *vp = ndp->ni_vp;
719 	register struct nfsnode *np = VTONFS(ndp->ni_vp);
720 	register u_long *p;
721 	register caddr_t cp;
722 	register long t1, t2;
723 	caddr_t bpos, dpos;
724 	u_long xid;
725 	int error = 0;
726 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
727 
728 	if (vp->v_type == VREG) {
729 		if (np->n_flag & (NMODIFIED|NBUFFERED)) {
730 			np->n_flag &= ~(NMODIFIED|NBUFFERED);
731 			nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE);
732 		}
733 		if (np->n_flag & NPAGEDON)
734 			mpurge(vp);	/* In case cmap entries still ref it */
735 	}
736 	if (vp->v_count > 1) {
737 		if (!np->n_sillyrename)
738 			error = nfs_sillyrename(ndp, REMOVE);
739 	} else {
740 		nfsstats.rpccnt[NFSPROC_REMOVE]++;
741 		nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred,
742 			NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
743 		nfsm_fhtom(ndp->ni_dvp);
744 		nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
745 		nfsm_request(ndp->ni_dvp);
746 		nfsm_reqdone;
747 	}
748 	if (ndp->ni_dvp == ndp->ni_vp)
749 		vrele(ndp->ni_vp);
750 	else
751 		nfs_nput(ndp->ni_vp);
752 	nfs_nput(ndp->ni_dvp);
753 	return (error);
754 }
755 
756 /*
757  * nfs file remove rpc called from nfs_inactive
758  */
759 nfs_removeit(ndp)
760 	register struct nameidata *ndp;
761 {
762 	register u_long *p;
763 	register caddr_t cp;
764 	register long t1, t2;
765 	caddr_t bpos, dpos;
766 	u_long xid;
767 	int error = 0;
768 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
769 
770 	nfsstats.rpccnt[NFSPROC_REMOVE]++;
771 	nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred,
772 		NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
773 	nfsm_fhtom(ndp->ni_dvp);
774 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
775 	nfsm_request(ndp->ni_dvp);
776 	nfsm_reqdone;
777 	return (error);
778 }
779 
780 /*
781  * nfs file rename call
782  */
783 nfs_rename(sndp, tndp)
784 	register struct nameidata *sndp, *tndp;
785 {
786 	register u_long *p;
787 	register caddr_t cp;
788 	register long t1, t2;
789 	caddr_t bpos, dpos;
790 	u_long xid;
791 	int error = 0;
792 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
793 
794 	nfsstats.rpccnt[NFSPROC_RENAME]++;
795 	nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred,
796 		(NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+
797 		nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/
798 	nfsm_fhtom(sndp->ni_dvp);
799 	nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
800 	nfsm_fhtom(tndp->ni_dvp);
801 	nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
802 	nfsm_request(sndp->ni_dvp);
803 	nfsm_reqdone;
804 	if (sndp->ni_vp->v_type == VDIR) {
805 		if (tndp->ni_vp != NULL && tndp->ni_vp->v_type == VDIR)
806 			cache_purge(tndp->ni_dvp);
807 		cache_purge(sndp->ni_dvp);
808 	}
809 	nfs_abortop(sndp);
810 	nfs_abortop(tndp);
811 	return (error);
812 }
813 
814 /*
815  * nfs file rename rpc called from above
816  */
817 nfs_renameit(sndp, tndp)
818 	register struct nameidata *sndp, *tndp;
819 {
820 	register u_long *p;
821 	register caddr_t cp;
822 	register long t1, t2;
823 	caddr_t bpos, dpos;
824 	u_long xid;
825 	int error = 0;
826 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
827 
828 	nfsstats.rpccnt[NFSPROC_RENAME]++;
829 	nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred,
830 		(NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+
831 		nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/
832 	nfsm_fhtom(sndp->ni_dvp);
833 	nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
834 	nfsm_fhtom(tndp->ni_dvp);
835 	nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN);
836 	nfsm_request(sndp->ni_dvp);
837 	nfsm_reqdone;
838 	return (error);
839 }
840 
841 /*
842  * nfs hard link create call
843  */
844 nfs_link(vp, ndp)
845 	register struct vnode *vp;
846 	register struct nameidata *ndp;
847 {
848 	register u_long *p;
849 	register caddr_t cp;
850 	register long t1, t2;
851 	caddr_t bpos, dpos;
852 	u_long xid;
853 	int error = 0;
854 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
855 
856 	if (ndp->ni_dvp != vp)
857 		nfs_lock(vp);
858 	nfsstats.rpccnt[NFSPROC_LINK]++;
859 	nfsm_reqhead(nfs_procids[NFSPROC_LINK], ndp->ni_cred,
860 		NFSX_FH*2+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
861 	nfsm_fhtom(vp);
862 	nfsm_fhtom(ndp->ni_dvp);
863 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
864 	nfsm_request(vp);
865 	nfsm_reqdone;
866 	if (ndp->ni_dvp != vp)
867 		nfs_unlock(vp);
868 	nfs_nput(ndp->ni_dvp);
869 	return (error);
870 }
871 
872 /*
873  * nfs symbolic link create call
874  */
875 nfs_symlink(ndp, vap, nm)
876 	struct nameidata *ndp;
877 	struct vattr *vap;
878 	char *nm;		/* is this the path ?? */
879 {
880 	register struct nfsv2_sattr *sp;
881 	register u_long *p;
882 	register caddr_t cp;
883 	register long t1, t2;
884 	caddr_t bpos, dpos;
885 	u_long xid;
886 	int error = 0;
887 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
888 
889 	nfsstats.rpccnt[NFSPROC_SYMLINK]++;
890 	nfsm_reqhead(nfs_procids[NFSPROC_SYMLINK], ndp->ni_cred,
891 	NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_UNSIGNED);
892 	nfsm_fhtom(ndp->ni_dvp);
893 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
894 	nfsm_strtom(nm, strlen(nm), NFS_MAXPATHLEN);
895 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
896 	sp->sa_mode = vtonfs_mode(VLNK, vap->va_mode);
897 	sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
898 	sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
899 	sp->sa_size = txdr_unsigned(VNOVAL);
900 	txdr_time(&vap->va_atime, &sp->sa_atime);		/* or VNOVAL ?? */
901 	txdr_time(&vap->va_mtime, &sp->sa_mtime);	/* or VNOVAL ?? */
902 	nfsm_request(ndp->ni_dvp);
903 	nfsm_reqdone;
904 	nfs_nput(ndp->ni_dvp);
905 	return (error);
906 }
907 
908 /*
909  * nfs make dir call
910  */
911 nfs_mkdir(ndp, vap)
912 	register struct nameidata *ndp;
913 	struct vattr *vap;
914 {
915 	register struct nfsv2_sattr *sp;
916 	register u_long *p;
917 	register caddr_t cp;
918 	register long t1, t2;
919 	caddr_t bpos, dpos, cp2;
920 	u_long xid;
921 	int error = 0;
922 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
923 
924 	nfsstats.rpccnt[NFSPROC_MKDIR]++;
925 	nfsm_reqhead(nfs_procids[NFSPROC_MKDIR], ndp->ni_cred,
926 	  NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR);
927 	nfsm_fhtom(ndp->ni_dvp);
928 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
929 	nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
930 	sp->sa_mode = vtonfs_mode(VDIR, vap->va_mode);
931 	sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
932 	sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
933 	sp->sa_size = txdr_unsigned(VNOVAL);
934 	txdr_time(&vap->va_atime, &sp->sa_atime);		/* or VNOVAL ?? */
935 	txdr_time(&vap->va_mtime, &sp->sa_mtime);	/* or VNOVAL ?? */
936 	nfsm_request(ndp->ni_dvp);
937 	nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
938 	nfsm_reqdone;
939 	nfs_nput(ndp->ni_dvp);
940 	return (error);
941 }
942 
943 /*
944  * nfs remove directory call
945  */
946 nfs_rmdir(ndp)
947 	register struct nameidata *ndp;
948 {
949 	register u_long *p;
950 	register caddr_t cp;
951 	register long t1, t2;
952 	caddr_t bpos, dpos;
953 	u_long xid;
954 	int error = 0;
955 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
956 
957 	if (ndp->ni_dvp == ndp->ni_vp) {
958 		vrele(ndp->ni_dvp);
959 		nfs_nput(ndp->ni_dvp);
960 		return (EINVAL);
961 	}
962 	nfsstats.rpccnt[NFSPROC_RMDIR]++;
963 	nfsm_reqhead(nfs_procids[NFSPROC_RMDIR], ndp->ni_cred,
964 		NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen));
965 	nfsm_fhtom(ndp->ni_dvp);
966 	nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN);
967 	nfsm_request(ndp->ni_dvp);
968 	nfsm_reqdone;
969 	cache_purge(ndp->ni_dvp);
970 	cache_purge(ndp->ni_vp);
971 	nfs_nput(ndp->ni_vp);
972 	nfs_nput(ndp->ni_dvp);
973 	return (error);
974 }
975 
976 /*
977  * nfs readdir call
978  * Although cookie is defined as opaque, I translate it to/from net byte
979  * order so that it looks more sensible. This appears consistent with the
980  * Ultrix implementation of NFS.
981  */
982 nfs_readdir(vp, uiop, cred)
983 	register struct vnode *vp;
984 	struct uio *uiop;
985 	struct ucred *cred;
986 {
987 	register long len;
988 	register struct direct *dp;
989 	register u_long *p;
990 	register caddr_t cp;
991 	register long t1;
992 	caddr_t bpos, dpos, cp2;
993 	u_long xid;
994 	int error = 0;
995 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
996 	struct mbuf *md2;
997 	caddr_t dpos2;
998 	int siz;
999 	int more_dirs;
1000 	off_t off, savoff;
1001 	struct direct *savdp;
1002 
1003 	nfsstats.rpccnt[NFSPROC_READDIR]++;
1004 	nfsm_reqhead(nfs_procids[NFSPROC_READDIR], cred, xid);
1005 	nfsm_fhtom(vp);
1006 	nfsm_build(p, u_long *, 2*NFSX_UNSIGNED);
1007 	*p++ = txdr_unsigned(uiop->uio_offset);
1008 	*p = txdr_unsigned(uiop->uio_resid);
1009 	nfsm_request(vp);
1010 	siz = 0;
1011 	nfsm_disect(p, u_long *, NFSX_UNSIGNED);
1012 	more_dirs = fxdr_unsigned(int, *p);
1013 
1014 	/* Save the position so that we can do nfsm_mtouio() later */
1015 	dpos2 = dpos;
1016 	md2 = md;
1017 
1018 	/* loop thru the dir entries, doctoring them to 4bsd form */
1019 	savoff = off = 0;
1020 	savdp = dp = NULL;
1021 	while (more_dirs && siz < uiop->uio_resid) {
1022 		savoff = off;		/* Hold onto offset and dp */
1023 		savdp = dp;
1024 		nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED);
1025 		dp = (struct direct *)p;
1026 		dp->d_ino = fxdr_unsigned(u_long, *p++);
1027 		len = fxdr_unsigned(int, *p);
1028 		if (len <= 0 || len > NFS_MAXNAMLEN) {
1029 			error = EBADRPC;
1030 			m_freem(mrep);
1031 			goto nfsmout;
1032 		}
1033 		dp->d_namlen = (u_short)len;
1034 		len = nfsm_rndup(len);
1035 		nfsm_adv(len);
1036 		nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED);
1037 		off = fxdr_unsigned(off_t, *p);
1038 		*p++ = 0;		/* Ensures null termination of name */
1039 		more_dirs = fxdr_unsigned(int, *p);
1040 		dp->d_reclen = len+4*NFSX_UNSIGNED;
1041 		siz += dp->d_reclen;
1042 	}
1043 	/*
1044 	 * If at end of rpc data, get the eof boolean
1045 	 */
1046 	if (!more_dirs)
1047 		nfsm_disecton(p, u_long *, NFSX_UNSIGNED);
1048 	/*
1049 	 * If there is too much to fit in the data buffer, use savoff and
1050 	 * savdp to trim off the last record.
1051 	 * --> we are not at eof
1052 	 */
1053 	if (siz > uiop->uio_resid) {
1054 		off = savoff;
1055 		siz -= dp->d_reclen;
1056 		dp = savdp;
1057 	}
1058 	if (siz > 0) {
1059 		md = md2;
1060 		dpos = dpos2;
1061 		nfsm_mtouio(uiop, siz);
1062 		uiop->uio_offset = off;
1063 	}
1064 	nfsm_reqdone;
1065 	return (error);
1066 }
1067 
1068 /*
1069  * nfs statfs call
1070  * (Actually a vfsop, not a vnode op)
1071  */
1072 nfs_statfs(mp, sbp)
1073 	struct mount *mp;
1074 	register struct statfs *sbp;
1075 {
1076 	register struct vnode *vp;
1077 	register struct nfsv2_statfs *sfp;
1078 	register caddr_t cp;
1079 	register long t1;
1080 	caddr_t bpos, dpos, cp2;
1081 	u_long xid;
1082 	int error = 0;
1083 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1084 	struct nfsmount *nmp;
1085 	struct ucred *cred;
1086 	struct nfsnode *np;
1087 
1088 	nmp = vfs_to_nfs(mp);
1089 	if (error = nfs_nget(mp, &nmp->nm_fh, &np))
1090 		return (error);
1091 	vp = NFSTOV(np);
1092 	nfsstats.rpccnt[NFSPROC_STATFS]++;
1093 	cred = crget();
1094 	cred->cr_ngroups = 1;
1095 	nfsm_reqhead(nfs_procids[NFSPROC_STATFS], cred, NFSX_FH);
1096 	nfsm_fhtom(vp);
1097 	nfsm_request(vp);
1098 	nfsm_disect(sfp, struct nfsv2_statfs *, NFSX_STATFS);
1099 	sbp->f_type = MOUNT_NFS;
1100 	sbp->f_bsize = fxdr_unsigned(long, sfp->sf_tsize);
1101 	sbp->f_fsize = fxdr_unsigned(long, sfp->sf_bsize);
1102 	sbp->f_blocks = fxdr_unsigned(long, sfp->sf_blocks);
1103 	sbp->f_bfree = fxdr_unsigned(long, sfp->sf_bfree);
1104 	sbp->f_bavail = fxdr_unsigned(long, sfp->sf_bavail);
1105 	sbp->f_files = 0;
1106 	sbp->f_ffree = 0;
1107 	bcopy(nmp->nm_path, sbp->f_mntonname, MNAMELEN);
1108 	bcopy(nmp->nm_host, sbp->f_mntfromname, MNAMELEN);
1109 	nfsm_reqdone;
1110 	nfs_nput(vp);
1111 	crfree(cred);
1112 	return (error);
1113 }
1114 
1115 static char hextoasc[] = "0123456789abcdef";
1116 
1117 /*
1118  * Silly rename. To make the NFS filesystem that is stateless look a little
1119  * more like the "ufs" a remove of an active vnode is translated to a rename
1120  * to a funny looking filename that is removed by nfs_inactive on the
1121  * nfsnode. There is the potential for another process on a different client
1122  * to create the same funny name between the nfs_lookitup() fails and the
1123  * nfs_rename() completes, but...
1124  */
1125 nfs_sillyrename(ndp, flag)
1126 	register struct nameidata *ndp;
1127 	int flag;
1128 {
1129 	register struct nfsnode *np;
1130 	register struct sillyrename *sp;
1131 	register struct nameidata *tndp;
1132 	int error;
1133 	short pid;
1134 
1135 	np = VTONFS(ndp->ni_dvp);
1136 	cache_purge(ndp->ni_dvp);
1137 	MALLOC(sp, struct sillyrename *, sizeof (struct sillyrename),
1138 		M_TEMP, M_WAITOK);
1139 	sp->s_flag = flag;
1140 	bcopy((caddr_t)&np->n_fh, (caddr_t)&sp->s_fh, NFSX_FH);
1141 	np = VTONFS(ndp->ni_vp);
1142 	tndp = &sp->s_namei;
1143 	tndp->ni_cred = crdup(ndp->ni_cred);
1144 
1145 	/* Fudge together a funny name */
1146 	pid = u.u_procp->p_pid;
1147 	bcopy(".nfsAxxxx4.4", tndp->ni_dent.d_name, 13);
1148 	tndp->ni_dent.d_namlen = 12;
1149 	tndp->ni_dent.d_name[8] = hextoasc[pid & 0xf];
1150 	tndp->ni_dent.d_name[7] = hextoasc[(pid >> 4) & 0xf];
1151 	tndp->ni_dent.d_name[6] = hextoasc[(pid >> 8) & 0xf];
1152 	tndp->ni_dent.d_name[5] = hextoasc[(pid >> 12) & 0xf];
1153 
1154 	/* Try lookitups until we get one that isn't there */
1155 	while (nfs_lookitup(ndp->ni_dvp, tndp, (nfsv2fh_t *)0) == 0) {
1156 		tndp->ni_dent.d_name[4]++;
1157 		if (tndp->ni_dent.d_name[4] > 'z') {
1158 			error = EINVAL;
1159 			goto bad;
1160 		}
1161 	}
1162 	if (error = nfs_renameit(ndp, tndp))
1163 		goto bad;
1164 	nfs_lookitup(ndp->ni_dvp, tndp, &np->n_fh);
1165 	np->n_sillyrename = sp;
1166 	return (0);
1167 bad:
1168 	crfree(tndp->ni_cred);
1169 	free((caddr_t)sp, M_TEMP);
1170 	return (error);
1171 }
1172 
1173 /*
1174  * Look up a file name for silly rename stuff.
1175  * Just like nfs_lookup() except that it doesn't load returned values
1176  * into the nfsnode table.
1177  * If fhp != NULL it copies the returned file handle out
1178  */
1179 nfs_lookitup(vp, ndp, fhp)
1180 	register struct vnode *vp;
1181 	register struct nameidata *ndp;
1182 	nfsv2fh_t *fhp;
1183 {
1184 	register u_long *p;
1185 	register caddr_t cp;
1186 	register long t1, t2;
1187 	caddr_t bpos, dpos, cp2;
1188 	u_long xid;
1189 	int error = 0;
1190 	struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1191 	long len;
1192 
1193 	nfsstats.rpccnt[NFSPROC_LOOKUP]++;
1194 	ndp->ni_dvp = vp;
1195 	ndp->ni_vp = NULL;
1196 	len = ndp->ni_dent.d_namlen;
1197 	nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len));
1198 	nfsm_fhtom(vp);
1199 	nfsm_strtom(ndp->ni_dent.d_name, len, NFS_MAXNAMLEN);
1200 	nfsm_request(vp);
1201 	if (fhp != NULL) {
1202 		nfsm_disect(cp, caddr_t, NFSX_FH);
1203 		bcopy(cp, (caddr_t)fhp, NFSX_FH);
1204 	}
1205 	nfsm_reqdone;
1206 	return (error);
1207 }
1208 
1209 /*
1210  * Kludge City..
1211  * - make nfs_bmap() essentially a no-op that does no translation
1212  * - do nfs_strategy() by faking physical I/O with nfs_readit/nfs_writeit
1213  *   after mapping the physical addresses into Kernel Virtual space in the
1214  *   nfsiobuf area.
1215  *   (Maybe I could use the process's page mapping, but I was concerned that
1216  *    Kernel Write might not be enabled and also figured copyout() would do
1217  *    a lot more work than bcopy() and also it currently happens in the
1218  *    context of the swapper process (2).
1219  */
1220 nfs_bmap(vp, bn, vpp, bnp)
1221 	struct vnode *vp;
1222 	daddr_t bn;
1223 	struct vnode **vpp;
1224 	daddr_t *bnp;
1225 {
1226 	if (vpp != NULL)
1227 		*vpp = vp;
1228 	if (bnp != NULL)
1229 		*bnp = bn * btodb(vp->v_mount->m_bsize);
1230 	return (0);
1231 }
1232 
1233 /*
1234  * Strategy routine for phys. i/o
1235  * If the biod's are running, queue a request
1236  * otherwise just call nfs_doio() to get it done
1237  */
1238 nfs_strategy(bp)
1239 	register struct buf *bp;
1240 {
1241 	register struct buf *dp;
1242 	register int i;
1243 	struct proc *rp;
1244 	int error = 0;
1245 	int fnd = 0;
1246 
1247 	/*
1248 	 * If an i/o daemon is waiting
1249 	 * queue the request, wake it up and wait for completion
1250 	 * otherwise just do it ourselves
1251 	 */
1252 	for (i = 0; i < nfs_asyncdaemons; i++) {
1253 		if (rp = nfs_iodwant[i]) {
1254 			/*
1255 			 * Ensure that the async_daemon is still waiting here
1256 			 */
1257 			if (rp->p_stat != SSLEEP ||
1258 			    rp->p_wchan != ((caddr_t)&nfs_iodwant[i])) {
1259 				nfs_iodwant[i] = (struct proc *)0;
1260 				continue;
1261 			}
1262 			dp = &nfs_bqueue;
1263 			if (dp->b_actf == NULL) {
1264 				dp->b_actl = bp;
1265 				bp->b_actf = dp;
1266 			} else {
1267 				dp->b_actf->b_actl = bp;
1268 				bp->b_actf = dp->b_actf;
1269 			}
1270 			dp->b_actf = bp;
1271 			bp->b_actl = dp;
1272 			fnd++;
1273 			nfs_iodwant[i] = (struct proc *)0;
1274 			wakeup((caddr_t)&nfs_iodwant[i]);
1275 			break;
1276 		}
1277 	}
1278 	if (!fnd)
1279 		error = nfs_doio(bp);
1280 	return (error);
1281 }
1282 
1283 /*
1284  * Fun and games with i/o
1285  * Essentially play ubasetup() and disk interrupt service routine by
1286  * mapping the data buffer into kernel virtual space and doing the
1287  * nfs read or write rpc's from it.
1288  * If the biod's are not running, this is just called from nfs_strategy(),
1289  * otherwise it is called by the biod's to do what would normally be
1290  * partially disk interrupt driven.
1291  */
1292 nfs_doio(bp)
1293 	register struct buf *bp;
1294 {
1295 	register struct pte *pte, *ppte;
1296 	register caddr_t vaddr;
1297 	register struct uio *uiop;
1298 	register struct vnode *vp;
1299 	struct nfsnode *np;
1300 	struct ucred *cr;
1301 	int npf, npf2;
1302 	int reg;
1303 	caddr_t vbase;
1304 	caddr_t addr;
1305 	unsigned v;
1306 	struct proc *rp;
1307 	int o, error;
1308 	int bcnt;
1309 	struct uio uio;
1310 	struct iovec io;
1311 
1312 	vp = bp->b_vp;
1313 	uiop = &uio;
1314 	uiop->uio_iov = &io;
1315 	uiop->uio_iovcnt = 1;
1316 	uiop->uio_segflg = UIO_SYSSPACE;
1317 	if (bp->b_flags & B_READ) {
1318 		io.iov_len = uiop->uio_resid = bp->b_bcount;
1319 		uiop->uio_offset = bp->b_blkno*DEV_BSIZE;
1320 		addr = bp->b_un.b_addr;
1321 		bcnt = bp->b_bcount;
1322 	} else {
1323 		io.iov_len = uiop->uio_resid = bp->b_dirtyend-bp->b_dirtyoff;
1324 		uiop->uio_offset = (bp->b_blkno*DEV_BSIZE)+bp->b_dirtyoff;
1325 		addr = bp->b_un.b_addr+bp->b_dirtyoff;
1326 		bcnt = bp->b_dirtyend-bp->b_dirtyoff;
1327 	}
1328 	/*
1329 	 * For phys i/o, map the b_addr into kernel virtual space using
1330 	 * the Nfsiomap pte's
1331 	 * Also, add a temporary b_rcred for reading using the process's uid
1332 	 * and a guess at a group
1333 	 */
1334 	if (bp->b_flags & B_PHYS) {
1335 		VTONFS(vp)->n_flag |= NPAGEDON;
1336 		bp->b_rcred = cr = crget();
1337 		rp = (bp->b_flags & B_DIRTY) ? &proc[2] : bp->b_proc;
1338 		cr->cr_uid = rp->p_uid;
1339 		cr->cr_gid = 0;		/* Anything ?? */
1340 		cr->cr_ngroups = 1;
1341 		o = (int)addr & PGOFSET;
1342 		npf2 = npf = btoc(bcnt + o);
1343 		/*
1344 		 * Get some mapping page table entries
1345 		 */
1346 		while ((reg = rmalloc(nfsmap, (long)npf)) == 0) {
1347 			nfsmap_want++;
1348 			sleep((caddr_t)&nfsmap_want, PZERO-1);
1349 		}
1350 		reg--;
1351 		/* I know it is always the else, but that may change someday */
1352 		if ((bp->b_flags & B_PHYS) == 0)
1353 			pte = kvtopte(bp->b_un.b_addr);
1354 		else if (bp->b_flags & B_PAGET)
1355 			pte = &Usrptmap[btokmx((struct pte *)bp->b_un.b_addr)];
1356 		else {
1357 			v = btop(bp->b_un.b_addr);
1358 			if (bp->b_flags & B_UAREA)
1359 				pte = &rp->p_addr[v];
1360 			else
1361 				pte = vtopte(rp, v);
1362 		}
1363 		/*
1364 		 * Play vmaccess() but with the Nfsiomap page table
1365 		 */
1366 		ppte = &Nfsiomap[reg];
1367 		vbase = vaddr = &nfsiobuf[reg*NBPG];
1368 		while (npf != 0) {
1369 			mapin(ppte, (u_int)vaddr, pte->pg_pfnum, (int)(PG_V|PG_KW));
1370 #if defined(tahoe)
1371 			mtpr(P1DC, vaddr);
1372 #endif
1373 			ppte++;
1374 			pte++;
1375 			vaddr += NBPG;
1376 			--npf;
1377 		}
1378 		io.iov_base = vbase+o;
1379 	} else {
1380 		io.iov_base = addr;
1381 	}
1382 	if (bp->b_flags & B_READ) {
1383 		uiop->uio_rw = UIO_READ;
1384 		bp->b_error = error = nfs_readrpc(vp, uiop, bp->b_rcred);
1385 	} else {
1386 		uiop->uio_rw = UIO_WRITE;
1387 		bp->b_error = error = nfs_writerpc(vp, uiop, bp->b_wcred);
1388 		if (error) {
1389 			np = VTONFS(vp);
1390 			np->n_error = error;
1391 			np->n_flag |= NWRITEERR;
1392 		}
1393 		bp->b_dirtyoff = bp->b_dirtyend = 0;
1394 	}
1395 	if (error)
1396 		bp->b_flags |= B_ERROR;
1397 	bp->b_resid = uiop->uio_resid;
1398 	/*
1399 	 * Release pte's used by physical i/o
1400 	 */
1401 	if (bp->b_flags & B_PHYS) {
1402 		crfree(cr);
1403 		rmfree(nfsmap, (long)npf2, (long)++reg);
1404 		if (nfsmap_want) {
1405 			nfsmap_want = 0;
1406 			wakeup((caddr_t)&nfsmap_want);
1407 		}
1408 	}
1409 	biodone(bp);
1410 	return (error);
1411 }
1412 
1413 /*
1414  * Flush all the blocks associated with a vnode.
1415  * 	Walk through the buffer pool and push any dirty pages
1416  *	associated with the vnode.
1417  */
1418 /* ARGSUSED */
1419 nfs_fsync(vp, fflags, cred, waitfor)
1420 	register struct vnode *vp;
1421 	int fflags;
1422 	struct ucred *cred;
1423 	int waitfor;
1424 {
1425 	register struct nfsnode *np = VTONFS(vp);
1426 	int error;
1427 
1428 	if (np->n_flag & NMODIFIED) {
1429 		np->n_flag &= ~NMODIFIED;
1430 		error = nfs_blkflush(vp, (daddr_t)0, np->n_size, FALSE);
1431 	}
1432 	return (error);
1433 }
1434