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