nfs_vnops.c revision 1.30 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, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 *
36 * from: @(#)nfs_vnops.c 7.60 (Berkeley) 5/24/91
37 * $Id: nfs_vnops.c,v 1.30 1994/04/25 03:50:21 cgd Exp $
38 */
39
40 /*
41 * vnode op calls for sun nfs version 2
42 */
43
44 #include <sys/param.h>
45 #include <sys/proc.h>
46 #include <sys/kernel.h>
47 #include <sys/systm.h>
48 #include <sys/mount.h>
49 #include <sys/buf.h>
50 #include <sys/malloc.h>
51 #include <sys/mbuf.h>
52 #include <sys/conf.h>
53 #include <sys/namei.h>
54 #include <sys/vnode.h>
55 #include <sys/dir.h>
56 #include <sys/lockf.h>
57 #include <miscfs/specfs/specdev.h> /* XXX */
58 #include <miscfs/fifofs/fifo.h> /* XXX */
59
60 #include <nfs/nfsv2.h>
61 #include <nfs/nfs.h>
62 #include <nfs/nfsnode.h>
63 #include <nfs/nfsmount.h>
64 #include <nfs/xdr_subs.h>
65 #include <nfs/nfsm_subs.h>
66 #include <nfs/nfsiom.h>
67
68 #include <ufs/quota.h>
69 #include <ufs/inode.h> /* for IFTOVT */
70
71 /* Defs */
72 #define TRUE 1
73 #define FALSE 0
74
75 /*
76 * Global vfs data structures for nfs
77 */
78 struct vnodeops nfsv2_vnodeops = {
79 nfs_lookup, /* lookup */
80 nfs_create, /* create */
81 nfs_mknod, /* mknod */
82 nfs_open, /* open */
83 nfs_close, /* close */
84 nfs_access, /* access */
85 nfs_getattr, /* getattr */
86 nfs_setattr, /* setattr */
87 nfs_read, /* read */
88 nfs_write, /* write */
89 nfs_ioctl, /* ioctl */
90 nfs_select, /* select */
91 nfs_mmap, /* mmap */
92 nfs_fsync, /* fsync */
93 nfs_seek, /* seek */
94 nfs_remove, /* remove */
95 nfs_link, /* link */
96 nfs_rename, /* rename */
97 nfs_mkdir, /* mkdir */
98 nfs_rmdir, /* rmdir */
99 nfs_symlink, /* symlink */
100 nfs_readdir, /* readdir */
101 nfs_readlink, /* readlink */
102 nfs_abortop, /* abortop */
103 nfs_inactive, /* inactive */
104 nfs_reclaim, /* reclaim */
105 nfs_lock, /* lock */
106 nfs_unlock, /* unlock */
107 nfs_bmap, /* bmap */
108 nfs_strategy, /* strategy */
109 nfs_print, /* print */
110 nfs_islocked, /* islocked */
111 nfs_advlock, /* advlock */
112 };
113
114 /*
115 * Special device vnode ops
116 */
117 struct vnodeops spec_nfsv2nodeops = {
118 spec_lookup, /* lookup */
119 spec_create, /* create */
120 spec_mknod, /* mknod */
121 spec_open, /* open */
122 nfsspec_close, /* close */
123 nfs_access, /* access */
124 nfs_getattr, /* getattr */
125 nfs_setattr, /* setattr */
126 nfsspec_read, /* read */
127 nfsspec_write, /* write */
128 spec_ioctl, /* ioctl */
129 spec_select, /* select */
130 spec_mmap, /* mmap */
131 spec_fsync, /* fsync */
132 spec_seek, /* seek */
133 spec_remove, /* remove */
134 spec_link, /* link */
135 spec_rename, /* rename */
136 spec_mkdir, /* mkdir */
137 spec_rmdir, /* rmdir */
138 spec_symlink, /* symlink */
139 spec_readdir, /* readdir */
140 spec_readlink, /* readlink */
141 spec_abortop, /* abortop */
142 nfs_inactive, /* inactive */
143 nfs_reclaim, /* reclaim */
144 nfs_lock, /* lock */
145 nfs_unlock, /* unlock */
146 spec_bmap, /* bmap */
147 spec_strategy, /* strategy */
148 nfs_print, /* print */
149 nfs_islocked, /* islocked */
150 spec_advlock, /* advlock */
151 };
152
153 #ifdef FIFO
154 struct vnodeops fifo_nfsv2nodeops = {
155 fifo_lookup, /* lookup */
156 fifo_create, /* create */
157 fifo_mknod, /* mknod */
158 fifo_open, /* open */
159 nfsfifo_close, /* close */
160 nfs_access, /* access */
161 nfs_getattr, /* getattr */
162 nfs_setattr, /* setattr */
163 nfsfifo_read, /* read */
164 nfsfifo_write, /* write */
165 fifo_ioctl, /* ioctl */
166 fifo_select, /* select */
167 fifo_mmap, /* mmap */
168 fifo_fsync, /* fsync */
169 fifo_seek, /* seek */
170 fifo_remove, /* remove */
171 fifo_link, /* link */
172 fifo_rename, /* rename */
173 fifo_mkdir, /* mkdir */
174 fifo_rmdir, /* rmdir */
175 fifo_symlink, /* symlink */
176 fifo_readdir, /* readdir */
177 fifo_readlink, /* readlink */
178 fifo_abortop, /* abortop */
179 nfs_inactive, /* inactive */
180 nfs_reclaim, /* reclaim */
181 nfs_lock, /* lock */
182 nfs_unlock, /* unlock */
183 fifo_bmap, /* bmap */
184 fifo_badop, /* strategy */
185 nfs_print, /* print */
186 nfs_islocked, /* islocked */
187 fifo_advlock, /* advlock */
188 };
189 #endif /* FIFO */
190
191 /*
192 * Global vars
193 */
194 extern u_long nfs_procids[NFS_NPROCS];
195 extern u_long nfs_prog, nfs_vers;
196 extern char nfsiobuf[MAXPHYS+NBPG];
197 struct buf nfs_bqueue; /* Queue head for nfsiod's */
198 struct proc *nfs_iodwant[NFS_MAXASYNCDAEMON];
199 enum vtype ntov_type[7] = { VNON, VREG, VDIR, VBLK, VCHR, VLNK, VNON };
200 int nfs_numasync = 0;
201
202 /*
203 * nfs null call from vfs.
204 */
205 nfs_null(vp, cred, p)
206 struct vnode *vp;
207 struct ucred *cred;
208 struct proc *p;
209 {
210 caddr_t bpos, dpos;
211 u_long xid;
212 int error = 0;
213 struct mbuf *mreq, *mrep, *md, *mb;
214
215 nfsm_reqhead(nfs_procids[NFSPROC_NULL], cred, 0);
216 nfsm_request(vp, NFSPROC_NULL, p, 0);
217 nfsm_reqdone;
218 return (error);
219 }
220
221 /*
222 * nfs access vnode op.
223 * Essentially just get vattr and then imitate iaccess()
224 */
225 nfs_access(vp, mode, cred, p)
226 struct vnode *vp;
227 int mode;
228 register struct ucred *cred;
229 struct proc *p;
230 {
231 register struct vattr *vap;
232 register gid_t *gp;
233 struct vattr vattr;
234 register int i;
235 int error;
236
237 /*
238 * If you're the super-user,
239 * you always get access.
240 */
241 if (cred->cr_uid == 0)
242 return (0);
243 vap = &vattr;
244 if (error = nfs_dogetattr(vp, vap, cred, 0, p))
245 return (error);
246 /*
247 * Access check is based on only one of owner, group, public.
248 * If not owner, then check group. If not a member of the
249 * group, then check public access.
250 */
251 if (cred->cr_uid != vap->va_uid) {
252 mode >>= 3;
253 gp = cred->cr_groups;
254 for (i = 0; i < cred->cr_ngroups; i++, gp++)
255 if (vap->va_gid == *gp)
256 goto found;
257 mode >>= 3;
258 found:
259 ;
260 }
261 return ((vap->va_mode & mode) == mode ? 0 : EACCES);
262 }
263
264 /*
265 * nfs open vnode op
266 * Just check to see if the type is ok
267 */
268 /* ARGSUSED */
269 nfs_open(vp, mode, cred, p)
270 struct vnode *vp;
271 int mode;
272 struct ucred *cred;
273 struct proc *p;
274 {
275 register enum vtype vtyp;
276
277 vtyp = vp->v_type;
278 if (vtyp == VREG || vtyp == VDIR || vtyp == VLNK)
279 return (0);
280 else
281 return (EACCES);
282 }
283
284 /*
285 * nfs close vnode op
286 * For reg files, invalidate any buffer cache entries.
287 */
288 /* ARGSUSED */
289 nfs_close(vp, fflags, cred, p)
290 register struct vnode *vp;
291 int fflags;
292 struct ucred *cred;
293 struct proc *p;
294 {
295 register struct nfsnode *np = VTONFS(vp);
296 int error = 0;
297
298 if (vp->v_type == VREG && (np->n_flag & NMODIFIED)) {
299 nfs_lock(vp);
300 np->n_flag &= ~NMODIFIED;
301 vinvalbuf(vp, TRUE);
302 np->n_attrstamp = 0;
303 if (np->n_flag & NWRITEERR) {
304 np->n_flag &= ~NWRITEERR;
305 error = np->n_error;
306 }
307 nfs_unlock(vp);
308 }
309 return (error);
310 }
311
312 /*
313 * nfs getattr call from vfs.
314 */
315 nfs_getattr(vp, vap, cred, p)
316 register struct vnode *vp;
317 struct vattr *vap;
318 struct ucred *cred;
319 struct proc *p;
320 {
321 return (nfs_dogetattr(vp, vap, cred, 0, p));
322 }
323
324 nfs_dogetattr(vp, vap, cred, tryhard, p)
325 register struct vnode *vp;
326 struct vattr *vap;
327 struct ucred *cred;
328 int tryhard;
329 struct proc *p;
330 {
331 register caddr_t cp;
332 register long t1;
333 caddr_t bpos, dpos;
334 u_long xid;
335 int error = 0;
336 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
337 struct nfsnode *np;
338
339 /* First look in the cache.. */
340 /* cred == NOCRED when we are called by mountroot */
341 if (cred != NOCRED && nfs_getattrcache(vp, vap) == 0)
342 return (0);
343
344 np = VTONFS(vp);
345 if (np->n_delayed_atime.ts_sec != VNOVAL ||
346 np->n_delayed_mtime.ts_sec != VNOVAL) {
347 VATTR_NULL(vap);
348 error = nfs_setattr(vp, vap, cred, p);
349 bcopy((caddr_t)&np->n_vattr, (caddr_t)vap, sizeof(*vap));
350 if ((np->n_flag & NMODIFIED) && (np->n_size > vap->va_size))
351 vap->va_size = np->n_size;
352 return error;
353 }
354 nfsstats.rpccnt[NFSPROC_GETATTR]++;
355 nfsm_reqhead(nfs_procids[NFSPROC_GETATTR], cred, NFSX_FH);
356 nfsm_fhtom(vp);
357 nfsm_request(vp, NFSPROC_GETATTR, p, tryhard);
358 nfsm_loadattr(vp, vap);
359 nfsm_reqdone;
360 return (error);
361 }
362
363 /*
364 * nfs setattr call.
365 */
366 nfs_setattr(vp, vap, cred, p)
367 register struct vnode *vp;
368 register struct vattr *vap;
369 struct ucred *cred;
370 struct proc *p;
371 {
372 register struct nfsv2_sattr *sp;
373 register caddr_t cp;
374 register long t1;
375 caddr_t bpos, dpos;
376 u_long xid;
377 int error = 0;
378 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
379 struct nfsnode *np = VTONFS(vp);
380
381 nfsstats.rpccnt[NFSPROC_SETATTR]++;
382 nfsm_reqhead(nfs_procids[NFSPROC_SETATTR], cred, NFSX_FH+NFSX_SATTR);
383 nfsm_fhtom(vp);
384 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
385 if (vap->va_mode == (u_short)VNOVAL)
386 sp->sa_mode = VNOVAL;
387 else
388 sp->sa_mode = vtonfs_mode(vp->v_type, vap->va_mode);
389 if (vap->va_uid == VNOVAL)
390 sp->sa_uid = VNOVAL;
391 else
392 sp->sa_uid = txdr_unsigned(vap->va_uid);
393 if (vap->va_gid == VNOVAL)
394 sp->sa_gid = VNOVAL;
395 else
396 sp->sa_gid = txdr_unsigned(vap->va_gid);
397 sp->sa_size = txdr_unsigned(vap->va_size);
398 /* jfw (at) ksr.com 6/2/93 */
399 #if 0 /* bad assumption; Suns (at least) make full use of usec field */
400 sp->sa_atime.tv_sec = txdr_unsigned(vap->va_atime.tv_sec);
401 sp->sa_atime.tv_usec = txdr_unsigned(vap->va_flags);
402 #else
403 if (vap->va_atime.ts_sec == VNOVAL &&
404 np->n_delayed_atime.ts_sec != VNOVAL) {
405 txdr_time(&np->n_delayed_atime, &sp->sa_atime);
406 } else {
407 txdr_time(&vap->va_atime, &sp->sa_atime);
408 }
409 #endif
410 if (vap->va_mtime.ts_sec == VNOVAL &&
411 np->n_delayed_mtime.ts_sec != VNOVAL) {
412 txdr_time(&np->n_delayed_mtime, &sp->sa_mtime);
413 } else {
414 txdr_time(&vap->va_mtime, &sp->sa_mtime);
415 }
416 np->n_delayed_atime.ts_sec = VNOVAL;
417 np->n_delayed_mtime.ts_sec = VNOVAL;
418
419 if (vap->va_size != VNOVAL || vap->va_mtime.ts_sec != VNOVAL ||
420 vap->va_atime.ts_sec != VNOVAL) {
421 if (np->n_flag & NMODIFIED) {
422 np->n_flag &= ~NMODIFIED;
423 if (vap->va_size == 0)
424 vinvalbuf(vp, FALSE);
425 else
426 vinvalbuf(vp, TRUE);
427 np->n_attrstamp = 0;
428 }
429 }
430 nfsm_request(vp, NFSPROC_SETATTR, p, 1);
431 nfsm_loadattr(vp, (struct vattr *)0);
432 /* should we fill in any vap fields ?? */
433 nfsm_reqdone;
434 return (error);
435 }
436
437 /*
438 * nfs lookup call, one step at a time...
439 * First look in cache
440 * If not found, unlock the directory nfsnode and do the rpc
441 */
442 nfs_lookup(vp, ndp, p)
443 register struct vnode *vp;
444 register struct nameidata *ndp;
445 struct proc *p;
446 {
447 register struct vnode *vdp;
448 register u_long *tl;
449 register caddr_t cp;
450 register long t1, t2;
451 caddr_t bpos, dpos, cp2;
452 u_long xid;
453 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
454 struct vnode *newvp;
455 long len;
456 nfsv2fh_t *fhp;
457 struct nfsnode *np;
458 int lockparent, wantparent, flag, error = 0;
459
460 ndp->ni_dvp = vp;
461 ndp->ni_vp = NULL;
462 if (vp->v_type != VDIR)
463 return (ENOTDIR);
464 lockparent = ndp->ni_nameiop & LOCKPARENT;
465 flag = ndp->ni_nameiop & OPMASK;
466 wantparent = ndp->ni_nameiop & (LOCKPARENT|WANTPARENT);
467 if ((error = cache_lookup(ndp)) && error != ENOENT) {
468 struct vattr vattr;
469 int vpid;
470
471 vdp = ndp->ni_vp;
472 vpid = vdp->v_id;
473 /*
474 * See the comment starting `Step through' in ufs/ufs_lookup.c
475 * for an explanation of the locking protocol
476 */
477 if (vp == vdp) {
478 VREF(vdp);
479 error = 0;
480 } else if (ndp->ni_isdotdot) {
481 nfs_unlock(vp);
482 error = vget(vdp, 1);
483 if (!error && lockparent && *ndp->ni_next == '\0')
484 nfs_lock(vp);
485 } else {
486 error = vget(vdp, 1);
487 if (!lockparent || error || *ndp->ni_next != '\0')
488 nfs_unlock(vp);
489 }
490 if (!error) {
491 if (vpid == vdp->v_id) {
492 if (!nfs_dogetattr(vdp, &vattr, ndp->ni_cred, 0, p)&&
493 vattr.va_ctime.ts_sec == VTONFS(vdp)->n_ctime) {
494 nfsstats.lookupcache_hits++;
495 if (flag != LOOKUP && *ndp->ni_next == 0)
496 ndp->ni_nameiop |= SAVENAME;
497 return (0);
498 }
499 cache_purge(vdp);
500 }
501 nfs_nput(vdp);
502 if (lockparent && vdp != vp && *ndp->ni_next == '\0')
503 nfs_unlock(vp);
504 }
505 ndp->ni_vp = NULLVP;
506 } else
507 nfs_unlock(vp);
508 error = 0;
509 nfsstats.lookupcache_misses++;
510 nfsstats.rpccnt[NFSPROC_LOOKUP]++;
511 len = ndp->ni_namelen;
512 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len));
513 nfsm_fhtom(vp);
514 nfsm_strtom(ndp->ni_ptr, len, NFS_MAXNAMLEN);
515 nfsm_request(vp, NFSPROC_LOOKUP, p, 0);
516 nfsmout:
517 if (error) {
518 if ((flag == CREATE || flag == RENAME) &&
519 *ndp->ni_next == '\0' && error == ENOENT)
520 error = EJUSTRETURN;
521 if (lockparent || (flag != CREATE && flag != RENAME) ||
522 *ndp->ni_next != 0)
523 nfs_lock(vp);
524 if (flag != LOOKUP && *ndp->ni_next == 0)
525 ndp->ni_nameiop |= SAVENAME;
526 return (error);
527 }
528 nfsm_disect(fhp,nfsv2fh_t *,NFSX_FH);
529
530 /*
531 * Handle DELETE and RENAME cases...
532 */
533 if (flag == DELETE && *ndp->ni_next == 0) {
534 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) {
535 VREF(vp);
536 newvp = vp;
537 np = VTONFS(vp);
538 } else {
539 if (error = nfs_nget(vp->v_mount, fhp, &np)) {
540 nfs_lock(vp);
541 m_freem(mrep);
542 return (error);
543 }
544 newvp = NFSTOV(np);
545 }
546 if (error =
547 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) {
548 nfs_lock(vp);
549 if (newvp != vp)
550 nfs_nput(newvp);
551 else
552 vrele(vp);
553 m_freem(mrep);
554 return (error);
555 }
556 ndp->ni_vp = newvp;
557 if (lockparent || vp == newvp)
558 nfs_lock(vp);
559 m_freem(mrep);
560 ndp->ni_nameiop |= SAVENAME;
561 return (0);
562 }
563
564 if (flag == RENAME && wantparent && *ndp->ni_next == 0) {
565 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) {
566 nfs_lock(vp);
567 m_freem(mrep);
568 return (EISDIR);
569 }
570 if (error = nfs_nget(vp->v_mount, fhp, &np)) {
571 nfs_lock(vp);
572 m_freem(mrep);
573 return (error);
574 }
575 newvp = NFSTOV(np);
576 if (error =
577 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) {
578 nfs_lock(vp);
579 nfs_nput(newvp);
580 m_freem(mrep);
581 return (error);
582 }
583 ndp->ni_vp = newvp;
584 if (lockparent)
585 nfs_lock(vp);
586 m_freem(mrep);
587 ndp->ni_nameiop |= SAVENAME;
588 return (0);
589 }
590
591 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) {
592 VREF(vp);
593 newvp = vp;
594 np = VTONFS(vp);
595 } else if (ndp->ni_isdotdot) {
596 if (error = nfs_nget(vp->v_mount, fhp, &np)) {
597 nfs_lock(vp);
598 m_freem(mrep);
599 return (error);
600 }
601 newvp = NFSTOV(np);
602 } else {
603 if (error = nfs_nget(vp->v_mount, fhp, &np)) {
604 nfs_lock(vp);
605 m_freem(mrep);
606 return (error);
607 }
608 newvp = NFSTOV(np);
609 }
610 if (error = nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) {
611 nfs_lock(vp);
612 if (newvp != vp)
613 nfs_nput(newvp);
614 else
615 vrele(vp);
616 m_freem(mrep);
617 return (error);
618 }
619 m_freem(mrep);
620
621 if (vp == newvp || (lockparent && *ndp->ni_next == '\0'))
622 nfs_lock(vp);
623 ndp->ni_vp = newvp;
624 if (flag != LOOKUP && *ndp->ni_next == 0)
625 ndp->ni_nameiop |= SAVENAME;
626 if (error == 0 && ndp->ni_makeentry) {
627 np->n_ctime = np->n_vattr.va_ctime.ts_sec;
628 cache_enter(ndp);
629 }
630 return (error);
631 }
632
633 /*
634 * nfs read call.
635 * Just call nfs_bioread() to do the work.
636 */
637 nfs_read(vp, uiop, ioflag, cred)
638 register struct vnode *vp;
639 struct uio *uiop;
640 int ioflag;
641 struct ucred *cred;
642 {
643 if (vp->v_type != VREG)
644 return (EPERM);
645 return (nfs_bioread(vp, uiop, ioflag, cred));
646 }
647
648 /*
649 * nfs readlink call
650 */
651 nfs_readlink(vp, uiop, cred)
652 struct vnode *vp;
653 struct uio *uiop;
654 struct ucred *cred;
655 {
656 if (vp->v_type != VLNK)
657 return (EPERM);
658 return (nfs_bioread(vp, uiop, 0, cred));
659 }
660
661 /*
662 * Do a readlink rpc.
663 * Called by nfs_doio() from below the buffer cache.
664 */
665 nfs_readlinkrpc(vp, uiop, cred)
666 register struct vnode *vp;
667 struct uio *uiop;
668 struct ucred *cred;
669 {
670 register u_long *tl;
671 register caddr_t cp;
672 register long t1;
673 caddr_t bpos, dpos, cp2;
674 u_long xid;
675 int error = 0;
676 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
677 long len;
678
679 nfsstats.rpccnt[NFSPROC_READLINK]++;
680 nfsm_reqhead(nfs_procids[NFSPROC_READLINK], cred, NFSX_FH);
681 nfsm_fhtom(vp);
682 nfsm_request(vp, NFSPROC_READLINK, uiop->uio_procp, 0);
683 nfsm_strsiz(len, NFS_MAXPATHLEN);
684 nfsm_mtouio(uiop, len);
685 nfsm_reqdone;
686 return (error);
687 }
688
689 /*
690 * nfs read rpc call
691 * Ditto above
692 */
693 nfs_readrpc(vp, uiop, cred)
694 register struct vnode *vp;
695 struct uio *uiop;
696 struct ucred *cred;
697 {
698 register u_long *tl;
699 register caddr_t cp;
700 register long t1;
701 caddr_t bpos, dpos, cp2;
702 u_long xid;
703 int error = 0;
704 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
705 struct nfsmount *nmp;
706 long len, retlen, tsiz;
707
708 nmp = VFSTONFS(vp->v_mount);
709 tsiz = uiop->uio_resid;
710 while (tsiz > 0) {
711 nfsstats.rpccnt[NFSPROC_READ]++;
712 len = (tsiz > nmp->nm_rsize) ? nmp->nm_rsize : tsiz;
713 nfsm_reqhead(nfs_procids[NFSPROC_READ], cred, NFSX_FH+NFSX_UNSIGNED*3);
714 nfsm_fhtom(vp);
715 nfsm_build(tl, u_long *, NFSX_UNSIGNED*3);
716 *tl++ = txdr_unsigned(uiop->uio_offset);
717 *tl++ = txdr_unsigned(len);
718 *tl = 0;
719 nfsm_request(vp, NFSPROC_READ, uiop->uio_procp, 1);
720 nfsm_loadattr(vp, (struct vattr *)0);
721 nfsm_strsiz(retlen, nmp->nm_rsize);
722 nfsm_mtouio(uiop, retlen);
723 m_freem(mrep);
724 if (retlen < len)
725 tsiz = 0;
726 else
727 tsiz -= len;
728 }
729 nfsmout:
730 return (error);
731 }
732
733 /*
734 * nfs write call
735 */
736 nfs_writerpc(vp, uiop, cred)
737 register struct vnode *vp;
738 struct uio *uiop;
739 struct ucred *cred;
740 {
741 register u_long *tl;
742 register caddr_t cp;
743 register long t1;
744 caddr_t bpos, dpos;
745 u_long xid;
746 int error = 0;
747 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
748 struct nfsmount *nmp;
749 long len, tsiz;
750
751 nmp = VFSTONFS(vp->v_mount);
752 tsiz = uiop->uio_resid;
753 while (tsiz > 0) {
754 nfsstats.rpccnt[NFSPROC_WRITE]++;
755 len = (tsiz > nmp->nm_wsize) ? nmp->nm_wsize : tsiz;
756 nfsm_reqhead(nfs_procids[NFSPROC_WRITE], cred,
757 NFSX_FH+NFSX_UNSIGNED*4);
758 nfsm_fhtom(vp);
759 nfsm_build(tl, u_long *, NFSX_UNSIGNED*4);
760 *(tl+1) = txdr_unsigned(uiop->uio_offset);
761 *(tl+3) = txdr_unsigned(len);
762 nfsm_uiotom(uiop, len);
763 nfsm_request(vp, NFSPROC_WRITE, uiop->uio_procp, 1);
764 nfsm_loadattr(vp, (struct vattr *)0);
765 m_freem(mrep);
766 tsiz -= len;
767 }
768 nfsmout:
769 return (error);
770 }
771
772 /*
773 * nfs mknod call
774 * This is a kludge. Use a create rpc but with the IFMT bits of the mode
775 * set to specify the file type and the size field for rdev.
776 */
777 /* ARGSUSED */
778 nfs_mknod(ndp, vap, cred, p)
779 struct nameidata *ndp;
780 struct ucred *cred;
781 register struct vattr *vap;
782 struct proc *p;
783 {
784 register struct nfsv2_sattr *sp;
785 register u_long *tl;
786 register caddr_t cp;
787 register long t1, t2;
788 caddr_t bpos, dpos;
789 u_long xid;
790 int error = 0;
791 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
792 u_long rdev;
793
794 if (vap->va_type == VCHR || vap->va_type == VBLK)
795 rdev = txdr_unsigned(vap->va_rdev);
796 #ifdef FIFO
797 else if (vap->va_type == VFIFO)
798 rdev = 0xffffffff;
799 #endif /* FIFO */
800 else {
801 VOP_ABORTOP(ndp);
802 vput(ndp->ni_dvp);
803 return (EOPNOTSUPP);
804 }
805 nfsstats.rpccnt[NFSPROC_CREATE]++;
806 nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred,
807 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_namelen)+NFSX_SATTR);
808 nfsm_fhtom(ndp->ni_dvp);
809 nfsm_strtom(ndp->ni_ptr, ndp->ni_namelen, NFS_MAXNAMLEN);
810 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
811 sp->sa_mode = vtonfs_mode(vap->va_type, vap->va_mode);
812 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
813 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
814 sp->sa_size = rdev;
815 /* or should these be VNOVAL ?? */
816 txdr_time(&vap->va_atime, &sp->sa_atime);
817 txdr_time(&vap->va_mtime, &sp->sa_mtime);
818 nfsm_request(ndp->ni_dvp, NFSPROC_CREATE, p, 1);
819 nfsm_reqdone;
820 FREE(ndp->ni_pnbuf, M_NAMEI);
821 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
822 nfs_nput(ndp->ni_dvp);
823 return (error);
824 }
825
826 /*
827 * nfs file create call
828 */
829 nfs_create(ndp, vap, p)
830 register struct nameidata *ndp;
831 register struct vattr *vap;
832 struct proc *p;
833 {
834 register struct nfsv2_sattr *sp;
835 register u_long *tl;
836 register caddr_t cp;
837 register long t1, t2;
838 caddr_t bpos, dpos, cp2;
839 u_long xid;
840 int error = 0;
841 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
842
843 nfsstats.rpccnt[NFSPROC_CREATE]++;
844 nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred,
845 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_namelen)+NFSX_SATTR);
846 nfsm_fhtom(ndp->ni_dvp);
847 nfsm_strtom(ndp->ni_ptr, ndp->ni_namelen, NFS_MAXNAMLEN);
848 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
849 sp->sa_mode = vtonfs_mode(vap->va_type, vap->va_mode);
850 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
851 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
852 sp->sa_size = txdr_unsigned(0);
853 /* or should these be VNOVAL ?? */
854 txdr_time(&vap->va_atime, &sp->sa_atime);
855 txdr_time(&vap->va_mtime, &sp->sa_mtime);
856 nfsm_request(ndp->ni_dvp, NFSPROC_CREATE, p, 1);
857 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
858 nfsm_reqdone;
859 FREE(ndp->ni_pnbuf, M_NAMEI);
860 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
861 nfs_nput(ndp->ni_dvp);
862 return (error);
863 }
864
865 /*
866 * nfs file remove call
867 * To try and make nfs semantics closer to ufs semantics, a file that has
868 * other processes using the vnode is renamed instead of removed and then
869 * removed later on the last close.
870 * - If v_usecount > 1
871 * If a rename is not already in the works
872 * call nfs_sillyrename() to set it up
873 * else
874 * If link_count > 0
875 * do the remove rpc
876 * else
877 * do the remove rpc
878 */
879 nfs_remove(ndp, p)
880 register struct nameidata *ndp;
881 struct proc *p;
882 {
883 register struct vnode *vp = ndp->ni_vp;
884 register struct nfsnode *np = VTONFS(ndp->ni_vp);
885 register u_long *tl;
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 if (vp->v_usecount > 1) {
894 struct vattr va;
895 if (!np->n_sillyrename)
896 error = nfs_sillyrename(ndp, p);
897 else if (nfs_getattr(vp, &va, ndp->ni_cred, p) == 0 &&
898 va.va_nlink > 1)
899 goto do_nfsremove;
900 } else {
901 do_nfsremove:
902 nfsstats.rpccnt[NFSPROC_REMOVE]++;
903 nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred,
904 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_namelen));
905 nfsm_fhtom(ndp->ni_dvp);
906 nfsm_strtom(ndp->ni_ptr, ndp->ni_namelen, NFS_MAXNAMLEN);
907 nfsm_request(ndp->ni_dvp, NFSPROC_REMOVE, p, 1);
908 nfsm_reqdone;
909 FREE(ndp->ni_pnbuf, M_NAMEI);
910 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
911 /*
912 * Kludge City: If the first reply to the remove rpc is lost..
913 * the reply to the retransmitted request will be ENOENT
914 * since the file was in fact removed
915 * Therefore, we cheat and return success.
916 */
917 if (error == ENOENT)
918 error = 0;
919 }
920 np->n_attrstamp = 0;
921 if (ndp->ni_dvp == vp)
922 vrele(vp);
923 else
924 nfs_nput(ndp->ni_dvp);
925 nfs_nput(vp);
926 return (error);
927 }
928
929 /*
930 * nfs file remove rpc called from nfs_inactive
931 */
932 nfs_removeit(sp, p)
933 register struct sillyrename *sp;
934 struct proc *p;
935 {
936 register u_long *tl;
937 register caddr_t cp;
938 register long t1, t2;
939 caddr_t bpos, dpos;
940 u_long xid;
941 int error = 0;
942 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
943
944 nfsstats.rpccnt[NFSPROC_REMOVE]++;
945 nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], sp->s_cred,
946 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(sp->s_namlen));
947 nfsm_fhtom(sp->s_dvp);
948 nfsm_strtom(sp->s_name, sp->s_namlen, NFS_MAXNAMLEN);
949 nfsm_request(sp->s_dvp, NFSPROC_REMOVE, p, 1);
950 nfsm_reqdone;
951 VTONFS(sp->s_dvp)->n_flag |= NMODIFIED;
952 return (error);
953 }
954
955 /*
956 * nfs file rename call
957 */
958 nfs_rename(sndp, tndp, p)
959 register struct nameidata *sndp, *tndp;
960 struct proc *p;
961 {
962 register u_long *tl;
963 register caddr_t cp;
964 register long t1, t2;
965 caddr_t bpos, dpos;
966 u_long xid;
967 int error = 0;
968 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
969 struct vnode *fvp, *tdvp, *tvp;
970
971 /* Check for cross-device rename */
972 fvp = sndp->ni_vp;
973 tdvp = tndp->ni_dvp;
974 tvp = tndp->ni_vp;
975 if ((fvp->v_mount != tdvp->v_mount) ||
976 (tvp && (fvp->v_mount != tvp->v_mount))) {
977 error = EXDEV;
978 goto out;
979 }
980
981 nfsstats.rpccnt[NFSPROC_RENAME]++;
982 nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred,
983 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_namelen) +
984 nfsm_rndup(tndp->ni_namelen)); /* or sndp->ni_cred?*/
985 nfsm_fhtom(sndp->ni_dvp);
986 nfsm_strtom(sndp->ni_ptr, sndp->ni_namelen, NFS_MAXNAMLEN);
987 nfsm_fhtom(tndp->ni_dvp);
988 nfsm_strtom(tndp->ni_ptr, tndp->ni_namelen, NFS_MAXNAMLEN);
989 nfsm_request(sndp->ni_dvp, NFSPROC_RENAME, p, 1);
990 nfsm_reqdone;
991 VTONFS(sndp->ni_dvp)->n_flag |= NMODIFIED;
992 VTONFS(tndp->ni_dvp)->n_flag |= NMODIFIED;
993 if (sndp->ni_vp->v_type == VDIR) {
994 if (tndp->ni_vp != NULL && tndp->ni_vp->v_type == VDIR)
995 cache_purge(tndp->ni_dvp);
996 cache_purge(sndp->ni_dvp);
997 }
998
999 out:
1000 if (tndp->ni_dvp == tndp->ni_vp)
1001 vrele(tndp->ni_dvp);
1002 else
1003 vput(tndp->ni_dvp);
1004 if (tndp->ni_vp)
1005 vput(tndp->ni_vp);
1006 vrele(sndp->ni_dvp);
1007 vrele(sndp->ni_vp);
1008 /*
1009 * Kludge: Map ENOENT => 0 assuming that it is a reply to a retry.
1010 */
1011 if (error == ENOENT)
1012 error = 0;
1013 return (error);
1014 }
1015
1016 /*
1017 * nfs file rename rpc called from nfs_remove() above
1018 */
1019 nfs_renameit(sndp, sp, p)
1020 register struct nameidata *sndp;
1021 register struct sillyrename *sp;
1022 struct proc *p;
1023 {
1024 register u_long *tl;
1025 register caddr_t cp;
1026 register long t1, t2;
1027 caddr_t bpos, dpos;
1028 u_long xid;
1029 int error = 0;
1030 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1031
1032 nfsstats.rpccnt[NFSPROC_RENAME]++;
1033 nfsm_reqhead(nfs_procids[NFSPROC_RENAME], sp->s_cred,
1034 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_namelen) +
1035 nfsm_rndup(sp->s_namlen)); /* or sndp->ni_cred?*/
1036 nfsm_fhtom(sndp->ni_dvp);
1037 nfsm_strtom(sndp->ni_ptr, sndp->ni_namelen, NFS_MAXNAMLEN);
1038 nfsm_fhtom(sp->s_dvp);
1039 nfsm_strtom(sp->s_name, sp->s_namlen, NFS_MAXNAMLEN);
1040 nfsm_request(sndp->ni_dvp, NFSPROC_RENAME, p, 1);
1041 nfsm_reqdone;
1042 FREE(sndp->ni_pnbuf, M_NAMEI);
1043 VTONFS(sndp->ni_dvp)->n_flag |= NMODIFIED;
1044 VTONFS(sp->s_dvp)->n_flag |= NMODIFIED;
1045 return (error);
1046 }
1047
1048 /*
1049 * nfs hard link create call
1050 */
1051 nfs_link(vp, ndp, p)
1052 register struct vnode *vp;
1053 register struct nameidata *ndp;
1054 struct proc *p;
1055 {
1056 register u_long *tl;
1057 register caddr_t cp;
1058 register long t1, t2;
1059 caddr_t bpos, dpos;
1060 u_long xid;
1061 int error = 0;
1062 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1063
1064 if (vp->v_mount != ndp->ni_dvp->v_mount) {
1065 VOP_ABORTOP(ndp);
1066 if (ndp->ni_dvp == ndp->ni_vp)
1067 vrele(ndp->ni_dvp);
1068 else
1069 vput(ndp->ni_dvp);
1070 if (ndp->ni_vp)
1071 vrele(ndp->ni_vp);
1072 return (EXDEV);
1073 }
1074 if (ndp->ni_dvp != vp)
1075 nfs_lock(vp);
1076 nfsstats.rpccnt[NFSPROC_LINK]++;
1077 nfsm_reqhead(nfs_procids[NFSPROC_LINK], ndp->ni_cred,
1078 NFSX_FH*2+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_namelen));
1079 nfsm_fhtom(vp);
1080 nfsm_fhtom(ndp->ni_dvp);
1081 nfsm_strtom(ndp->ni_ptr, ndp->ni_namelen, NFS_MAXNAMLEN);
1082 nfsm_request(vp, NFSPROC_LINK, p, 1);
1083 nfsm_reqdone;
1084 FREE(ndp->ni_pnbuf, M_NAMEI);
1085 VTONFS(vp)->n_attrstamp = 0;
1086 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
1087 if (ndp->ni_dvp != vp)
1088 nfs_unlock(vp);
1089 nfs_nput(ndp->ni_dvp);
1090 /*
1091 * Kludge: Map EEXIST => 0 assuming that it is a reply to a retry.
1092 */
1093 if (error == EEXIST)
1094 error = 0;
1095 return (error);
1096 }
1097
1098 /*
1099 * nfs symbolic link create call
1100 */
1101 nfs_symlink(ndp, vap, nm, p)
1102 struct nameidata *ndp;
1103 struct vattr *vap;
1104 char *nm; /* is this the path ?? */
1105 struct proc *p;
1106 {
1107 register struct nfsv2_sattr *sp;
1108 register u_long *tl;
1109 register caddr_t cp;
1110 register long t1, t2;
1111 caddr_t bpos, dpos;
1112 u_long xid;
1113 int error = 0;
1114 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1115
1116 nfsstats.rpccnt[NFSPROC_SYMLINK]++;
1117 nfsm_reqhead(nfs_procids[NFSPROC_SYMLINK], ndp->ni_cred,
1118 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_namelen)+NFSX_UNSIGNED);
1119 nfsm_fhtom(ndp->ni_dvp);
1120 nfsm_strtom(ndp->ni_ptr, ndp->ni_namelen, NFS_MAXNAMLEN);
1121 nfsm_strtom(nm, strlen(nm), NFS_MAXPATHLEN);
1122 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
1123 sp->sa_mode = vtonfs_mode(VLNK, vap->va_mode);
1124 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
1125 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
1126 sp->sa_size = txdr_unsigned(VNOVAL);
1127 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */
1128 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */
1129 nfsm_request(ndp->ni_dvp, NFSPROC_SYMLINK, p, 1);
1130 nfsm_reqdone;
1131 FREE(ndp->ni_pnbuf, M_NAMEI);
1132 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
1133 nfs_nput(ndp->ni_dvp);
1134 /*
1135 * Kludge: Map EEXIST => 0 assuming that it is a reply to a retry.
1136 */
1137 if (error == EEXIST)
1138 error = 0;
1139 return (error);
1140 }
1141
1142 /*
1143 * nfs make dir call
1144 */
1145 nfs_mkdir(ndp, vap, p)
1146 register struct nameidata *ndp;
1147 struct vattr *vap;
1148 struct proc *p;
1149 {
1150 register struct nfsv2_sattr *sp;
1151 register u_long *tl;
1152 register caddr_t cp;
1153 register long t1, t2;
1154 register int len;
1155 caddr_t bpos, dpos, cp2;
1156 u_long xid;
1157 int error = 0, firsttry = 1;
1158 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1159
1160 len = ndp->ni_namelen;
1161 nfsstats.rpccnt[NFSPROC_MKDIR]++;
1162 nfsm_reqhead(nfs_procids[NFSPROC_MKDIR], ndp->ni_cred,
1163 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)+NFSX_SATTR);
1164 nfsm_fhtom(ndp->ni_dvp);
1165 nfsm_strtom(ndp->ni_ptr, len, NFS_MAXNAMLEN);
1166 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR);
1167 sp->sa_mode = vtonfs_mode(VDIR, vap->va_mode);
1168 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid);
1169 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid);
1170 sp->sa_size = txdr_unsigned(VNOVAL);
1171 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */
1172 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */
1173 nfsm_request(ndp->ni_dvp, NFSPROC_MKDIR, p, 1);
1174 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
1175 nfsm_reqdone;
1176 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
1177 /*
1178 * Kludge: Map EEXIST => 0 assuming that you have a reply to a retry
1179 * if we can succeed in looking up the directory.
1180 * "firsttry" is necessary since the macros may "goto nfsmout" which
1181 * is above the if on errors. (Ugh)
1182 */
1183 if (error == EEXIST && firsttry) {
1184 firsttry = 0;
1185 error = 0;
1186 nfsstats.rpccnt[NFSPROC_LOOKUP]++;
1187 ndp->ni_vp = NULL;
1188 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred,
1189 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len));
1190 nfsm_fhtom(ndp->ni_dvp);
1191 nfsm_strtom(ndp->ni_ptr, len, NFS_MAXNAMLEN);
1192 nfsm_request(ndp->ni_dvp, NFSPROC_LOOKUP, p, 1);
1193 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp);
1194 if (ndp->ni_vp->v_type != VDIR) {
1195 vput(ndp->ni_vp);
1196 error = EEXIST;
1197 }
1198 m_freem(mrep);
1199 }
1200 FREE(ndp->ni_pnbuf, M_NAMEI);
1201 nfs_nput(ndp->ni_dvp);
1202 return (error);
1203 }
1204
1205 /*
1206 * nfs remove directory call
1207 */
1208 nfs_rmdir(ndp, p)
1209 register struct nameidata *ndp;
1210 struct proc *p;
1211 {
1212 register u_long *tl;
1213 register caddr_t cp;
1214 register long t1, t2;
1215 caddr_t bpos, dpos;
1216 u_long xid;
1217 int error = 0;
1218 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1219
1220 if (ndp->ni_dvp == ndp->ni_vp) {
1221 vrele(ndp->ni_dvp);
1222 nfs_nput(ndp->ni_dvp);
1223 return (EINVAL);
1224 }
1225 nfsstats.rpccnt[NFSPROC_RMDIR]++;
1226 nfsm_reqhead(nfs_procids[NFSPROC_RMDIR], ndp->ni_cred,
1227 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_namelen));
1228 nfsm_fhtom(ndp->ni_dvp);
1229 nfsm_strtom(ndp->ni_ptr, ndp->ni_namelen, NFS_MAXNAMLEN);
1230 nfsm_request(ndp->ni_dvp, NFSPROC_RMDIR, p, 1);
1231 nfsm_reqdone;
1232 FREE(ndp->ni_pnbuf, M_NAMEI);
1233 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED;
1234 cache_purge(ndp->ni_dvp);
1235 cache_purge(ndp->ni_vp);
1236 nfs_nput(ndp->ni_vp);
1237 nfs_nput(ndp->ni_dvp);
1238 /*
1239 * Kludge: Map ENOENT => 0 assuming that you have a reply to a retry.
1240 */
1241 if (error == ENOENT)
1242 error = 0;
1243 return (error);
1244 }
1245
1246 /*
1247 * nfs readdir call
1248 * Although cookie is defined as opaque, I translate it to/from net byte
1249 * order so that it looks more sensible. This appears consistent with the
1250 * Ultrix implementation of NFS.
1251 */
1252 nfs_readdir(vp, uiop, cred, eofflagp, cookies, ncookies)
1253 register struct vnode *vp;
1254 struct uio *uiop;
1255 struct ucred *cred;
1256 int *eofflagp;
1257 u_int *cookies;
1258 int ncookies;
1259 {
1260 register struct nfsnode *np = VTONFS(vp);
1261 int tresid, error;
1262 struct vattr vattr;
1263
1264 /*
1265 * Since NFS mounting isn't propagated,
1266 * we don't need to handle cookies here!
1267 */
1268 if (cookies)
1269 panic("nfs_readdir");
1270
1271 if (vp->v_type != VDIR)
1272 return (EPERM);
1273 /*
1274 * First, check for hit on the EOF offset cache
1275 */
1276 if (uiop->uio_offset != 0 && uiop->uio_offset == np->n_direofoffset &&
1277 (np->n_flag & NMODIFIED) == 0 &&
1278 nfs_dogetattr(vp, &vattr, cred, 0, uiop->uio_procp) == 0 &&
1279 np->n_mtime == vattr.va_mtime.ts_sec) {
1280 *eofflagp = 1;
1281 nfsstats.direofcache_hits++;
1282 return (0);
1283 }
1284
1285 /*
1286 * Call nfs_bioread() to do the real work.
1287 */
1288 tresid = uiop->uio_resid;
1289 error = nfs_bioread(vp, uiop, 0, cred);
1290
1291 if (!error && uiop->uio_resid == tresid) {
1292 *eofflagp = 1;
1293 nfsstats.direofcache_misses++;
1294 } else
1295 *eofflagp = 0;
1296 return (error);
1297 }
1298
1299 /*
1300 * Readdir rpc call.
1301 * Called from below the buffer cache by nfs_doio().
1302 */
1303 nfs_readdirrpc(vp, uiop, cred)
1304 register struct vnode *vp;
1305 struct uio *uiop;
1306 struct ucred *cred;
1307 {
1308 register long len;
1309 register struct dirent *dp;
1310 register u_long *tl;
1311 register caddr_t cp;
1312 register long t1;
1313 long tlen, lastlen;
1314 caddr_t bpos, dpos, cp2;
1315 u_long xid;
1316 int error = 0;
1317 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1318 struct mbuf *md2;
1319 caddr_t dpos2;
1320 int siz;
1321 int more_dirs = 1;
1322 off_t off, savoff;
1323 struct dirent *savdp;
1324 struct nfsmount *nmp;
1325 struct nfsnode *np = VTONFS(vp);
1326 long tresid;
1327
1328 nmp = VFSTONFS(vp->v_mount);
1329 tresid = uiop->uio_resid;
1330 /*
1331 * Loop around doing readdir rpc's of size uio_resid or nm_rsize,
1332 * whichever is smaller, truncated to a multiple of NFS_DIRBLKSIZ.
1333 * The stopping criteria is EOF or buffer full.
1334 */
1335 while (more_dirs && uiop->uio_resid >= NFS_DIRBLKSIZ) {
1336 nfsstats.rpccnt[NFSPROC_READDIR]++;
1337 nfsm_reqhead(nfs_procids[NFSPROC_READDIR], cred, xid);
1338 nfsm_fhtom(vp);
1339 nfsm_build(tl, u_long *, 2*NFSX_UNSIGNED);
1340 *tl++ = txdr_unsigned(uiop->uio_offset);
1341 *tl = txdr_unsigned(((uiop->uio_resid > nmp->nm_rsize) ?
1342 nmp->nm_rsize : uiop->uio_resid) & ~(NFS_DIRBLKSIZ-1));
1343 nfsm_request(vp, NFSPROC_READDIR, uiop->uio_procp, 0);
1344 siz = 0;
1345 nfsm_disect(tl, u_long *, NFSX_UNSIGNED);
1346 more_dirs = fxdr_unsigned(int, *tl);
1347
1348 /* Save the position so that we can do nfsm_mtouio() later */
1349 dpos2 = dpos;
1350 md2 = md;
1351
1352 /* loop thru the dir entries, doctoring them to 4bsd form */
1353 off = uiop->uio_offset;
1354 #ifdef lint
1355 dp = (struct dirent *)0;
1356 #endif /* lint */
1357 while (more_dirs && siz < uiop->uio_resid) {
1358 savoff = off; /* Hold onto offset and dp */
1359 savdp = dp;
1360 nfsm_disecton(tl, u_long *, 2*NFSX_UNSIGNED);
1361 dp = (struct dirent *)tl;
1362 dp->d_fileno = fxdr_unsigned(u_long, *tl++);
1363 len = fxdr_unsigned(int, *tl);
1364 if (len <= 0 || len > NFS_MAXNAMLEN) {
1365 error = EBADRPC;
1366 m_freem(mrep);
1367 goto nfsmout;
1368 }
1369 dp->d_namlen = (u_short)len;
1370 nfsm_adv(len); /* Point past name */
1371 tlen = nfsm_rndup(len);
1372 /*
1373 * This should not be necessary, but some servers have
1374 * broken XDR such that these bytes are not null filled.
1375 */
1376 if (tlen != len) {
1377 *dpos = '\0'; /* Null-terminate */
1378 nfsm_adv(tlen - len);
1379 len = tlen;
1380 }
1381 nfsm_disecton(tl, u_long *, 2*NFSX_UNSIGNED);
1382 off = fxdr_unsigned(off_t, *tl);
1383 *tl++ = 0; /* Ensures null termination of name */
1384 more_dirs = fxdr_unsigned(int, *tl);
1385 dp->d_reclen = len+4*NFSX_UNSIGNED;
1386 siz += dp->d_reclen;
1387 }
1388 /*
1389 * If at end of rpc data, get the eof boolean
1390 */
1391 if (!more_dirs) {
1392 nfsm_disecton(tl, u_long *, NFSX_UNSIGNED);
1393 more_dirs = (fxdr_unsigned(int, *tl) == 0);
1394
1395 /*
1396 * If at EOF, cache directory offset
1397 */
1398 if (!more_dirs)
1399 np->n_direofoffset = off;
1400 }
1401 /*
1402 * If there is too much to fit in the data buffer, use savoff and
1403 * savdp to trim off the last record.
1404 * --> we are not at eof
1405 */
1406 if (siz > uiop->uio_resid) {
1407 off = savoff;
1408 siz -= dp->d_reclen;
1409 dp = savdp;
1410 more_dirs = 0; /* Paranoia */
1411 }
1412 if (siz > 0) {
1413 lastlen = dp->d_reclen;
1414 md = md2;
1415 dpos = dpos2;
1416 nfsm_mtouio(uiop, siz);
1417 uiop->uio_offset = off;
1418 } else
1419 more_dirs = 0; /* Ugh, never happens, but in case.. */
1420 m_freem(mrep);
1421 }
1422 /*
1423 * Fill last record, iff any, out to a multiple of NFS_DIRBLKSIZ
1424 * by increasing d_reclen for the last record.
1425 */
1426 if (uiop->uio_resid < tresid) {
1427 len = uiop->uio_resid & (NFS_DIRBLKSIZ - 1);
1428 if (len > 0) {
1429 dp = (struct dirent *)
1430 (uiop->uio_iov->iov_base - lastlen);
1431 dp->d_reclen += len;
1432 uiop->uio_iov->iov_base += len;
1433 uiop->uio_iov->iov_len -= len;
1434 uiop->uio_resid -= len;
1435 }
1436 }
1437 nfsmout:
1438 return (error);
1439 }
1440
1441 static char hextoasc[] = "0123456789abcdef";
1442
1443 /*
1444 * Silly rename. To make the NFS filesystem that is stateless look a little
1445 * more like the "ufs" a remove of an active vnode is translated to a rename
1446 * to a funny looking filename that is removed by nfs_inactive on the
1447 * nfsnode. There is the potential for another process on a different client
1448 * to create the same funny name between the nfs_lookitup() fails and the
1449 * nfs_rename() completes, but...
1450 */
1451 nfs_sillyrename(ndp, p)
1452 register struct nameidata *ndp;
1453 struct proc *p;
1454 {
1455 register struct nfsnode *np;
1456 register struct sillyrename *sp;
1457 int error;
1458 short pid;
1459
1460 np = VTONFS(ndp->ni_dvp);
1461 cache_purge(ndp->ni_dvp);
1462 MALLOC(sp, struct sillyrename *, sizeof (struct sillyrename),
1463 M_NFSREQ, M_WAITOK);
1464 bcopy((caddr_t)&np->n_fh, (caddr_t)&sp->s_fh, NFSX_FH);
1465 np = VTONFS(ndp->ni_vp);
1466 sp->s_cred = crdup(ndp->ni_cred);
1467 sp->s_dvp = ndp->ni_dvp;
1468 VREF(sp->s_dvp);
1469
1470 /* Fudge together a funny name */
1471 pid = p->p_pid;
1472 bcopy(".nfsAxxxx4.4", sp->s_name, 13);
1473 sp->s_namlen = 12;
1474 sp->s_name[8] = hextoasc[pid & 0xf];
1475 sp->s_name[7] = hextoasc[(pid >> 4) & 0xf];
1476 sp->s_name[6] = hextoasc[(pid >> 8) & 0xf];
1477 sp->s_name[5] = hextoasc[(pid >> 12) & 0xf];
1478
1479 /* Try lookitups until we get one that isn't there */
1480 while (nfs_lookitup(sp, (nfsv2fh_t *)0, p) == 0) {
1481 sp->s_name[4]++;
1482 if (sp->s_name[4] > 'z') {
1483 error = EINVAL;
1484 goto bad;
1485 }
1486 }
1487 if (error = nfs_renameit(ndp, sp, p))
1488 goto bad;
1489 nfs_lookitup(sp, &np->n_fh, p);
1490 np->n_sillyrename = sp;
1491 return (0);
1492 bad:
1493 vrele(sp->s_dvp);
1494 crfree(sp->s_cred);
1495 free((caddr_t)sp, M_NFSREQ);
1496 return (error);
1497 }
1498
1499 /*
1500 * Look up a file name for silly rename stuff.
1501 * Just like nfs_lookup() except that it doesn't load returned values
1502 * into the nfsnode table.
1503 * If fhp != NULL it copies the returned file handle out
1504 */
1505 nfs_lookitup(sp, fhp, p)
1506 register struct sillyrename *sp;
1507 nfsv2fh_t *fhp;
1508 struct proc *p;
1509 {
1510 register struct vnode *vp = sp->s_dvp;
1511 register u_long *tl;
1512 register caddr_t cp;
1513 register long t1, t2;
1514 caddr_t bpos, dpos, cp2;
1515 u_long xid;
1516 int error = 0;
1517 struct mbuf *mreq, *mrep, *md, *mb, *mb2;
1518 long len;
1519
1520 nfsstats.rpccnt[NFSPROC_LOOKUP]++;
1521 len = sp->s_namlen;
1522 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], sp->s_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len));
1523 nfsm_fhtom(vp);
1524 nfsm_strtom(sp->s_name, len, NFS_MAXNAMLEN);
1525 nfsm_request(vp, NFSPROC_LOOKUP, p, 1);
1526 if (fhp != NULL) {
1527 nfsm_disect(cp, caddr_t, NFSX_FH);
1528 bcopy(cp, (caddr_t)fhp, NFSX_FH);
1529 }
1530 nfsm_reqdone;
1531 return (error);
1532 }
1533
1534 /*
1535 * Kludge City..
1536 * - make nfs_bmap() essentially a no-op that does no translation
1537 * - do nfs_strategy() by faking physical I/O with nfs_readrpc/nfs_writerpc
1538 * after mapping the physical addresses into Kernel Virtual space in the
1539 * nfsiobuf area.
1540 * (Maybe I could use the process's page mapping, but I was concerned that
1541 * Kernel Write might not be enabled and also figured copyout() would do
1542 * a lot more work than bcopy() and also it currently happens in the
1543 * context of the swapper process (2).
1544 */
1545 nfs_bmap(vp, bn, vpp, bnp)
1546 struct vnode *vp;
1547 daddr_t bn;
1548 struct vnode **vpp;
1549 daddr_t *bnp;
1550 {
1551 if (vpp != NULL)
1552 *vpp = vp;
1553 if (bnp != NULL)
1554 *bnp = bn * btodb(vp->v_mount->mnt_stat.f_iosize);
1555 return (0);
1556 }
1557
1558 /*
1559 * Strategy routine for phys. i/o
1560 * If the biod's are running, queue a request
1561 * otherwise just call nfs_doio() to get it done
1562 */
1563 nfs_strategy(bp)
1564 register struct buf *bp;
1565 {
1566 register struct buf *dp;
1567 register int i;
1568 int error = 0;
1569 int fnd = 0;
1570
1571 /*
1572 * Set b_proc. It seems a bit silly to do it here, but since bread()
1573 * doesn't set it, I will.
1574 * Set b_proc == NULL for asynchronous ops, since these may still
1575 * be hanging about after the process terminates.
1576 */
1577 if ((bp->b_flags & B_PHYS) == 0) {
1578 if (bp->b_flags & B_ASYNC)
1579 bp->b_proc = (struct proc *)0;
1580 else
1581 bp->b_proc = curproc;
1582 }
1583 /*
1584 * If the op is asynchronous and an i/o daemon is waiting
1585 * queue the request, wake it up and wait for completion
1586 * otherwise just do it ourselves.
1587 */
1588 if ((bp->b_flags & B_ASYNC) == 0 || nfs_numasync == 0)
1589 return (nfs_doio(bp));
1590 for (i = 0; i < NFS_MAXASYNCDAEMON; i++) {
1591 if (nfs_iodwant[i]) {
1592 dp = &nfs_bqueue;
1593 bp->b_actf = NULL;
1594 bp->b_actb = dp->b_actb;
1595 *dp->b_actb = bp;
1596 dp->b_actb = &bp->b_actf;
1597 fnd++;
1598 wakeup((caddr_t)&nfs_iodwant[i]);
1599 break;
1600 }
1601 }
1602 if (!fnd)
1603 error = nfs_doio(bp);
1604 return (error);
1605 }
1606
1607 /*
1608 * Fun and games with i/o
1609 *
1610 * If the nfsiod's are not running, this is just called from nfs_strategy(),
1611 * otherwise it is called by the nfsiods to do what would normally be
1612 * partially disk interrupt driven.
1613 */
1614 nfs_doio(bp)
1615 register struct buf *bp;
1616 {
1617 register struct uio *uiop;
1618 register struct vnode *vp;
1619 struct nfsnode *np;
1620 struct ucred *cr;
1621 int error;
1622 struct uio uio;
1623 struct iovec io;
1624
1625 vp = bp->b_vp;
1626 np = VTONFS(vp);
1627 uiop = &uio;
1628 uiop->uio_iov = &io;
1629 uiop->uio_iovcnt = 1;
1630 uiop->uio_segflg = UIO_SYSSPACE;
1631 /*
1632 * Not to worry, `b_proc' will have been set to NULL
1633 * for asynchronous IO.
1634 */
1635 uiop->uio_procp = bp->b_proc;
1636
1637 /*
1638 * Always use credentials passed in the buffer header.
1639 */
1640 if (bp->b_flags & B_PHYS) {
1641 #if 0
1642 /*
1643 * This cannot happen in the current (12/16/93) NetBSD kernel
1644 * Is this an artifact of the pager implementation in
1645 * previous incarnations of BSD ??
1646 */
1647 if (bp->b_flags & B_DIRTY)
1648 uiop->uio_procp = pageproc;
1649 #endif
1650
1651 /* mapping was already done by vmapbuf */
1652 io.iov_base = bp->b_un.b_addr;
1653 io.iov_len = uiop->uio_resid = bp->b_bcount;
1654 uiop->uio_offset = bp->b_blkno * DEV_BSIZE;
1655 if (bp->b_flags & B_READ) {
1656 uiop->uio_rw = UIO_READ;
1657 nfsstats.read_physios++;
1658 bp->b_error = error = nfs_readrpc(vp, uiop, bp->b_rcred);
1659 } else {
1660 (void) vnode_pager_uncache(vp);
1661 uiop->uio_rw = UIO_WRITE;
1662 nfsstats.write_physios++;
1663 bp->b_error = error = nfs_writerpc(vp, uiop, bp->b_wcred);
1664 }
1665
1666 } else {
1667 if (bp->b_flags & B_READ) {
1668 io.iov_len = uiop->uio_resid = bp->b_bcount;
1669 io.iov_base = bp->b_un.b_addr;
1670 uiop->uio_rw = UIO_READ;
1671 switch (vp->v_type) {
1672 case VREG:
1673 uiop->uio_offset = bp->b_blkno * DEV_BSIZE;
1674 nfsstats.read_bios++;
1675 error = nfs_readrpc(vp, uiop, bp->b_rcred);
1676 break;
1677 case VLNK:
1678 uiop->uio_offset = 0;
1679 nfsstats.readlink_bios++;
1680 error = nfs_readlinkrpc(vp, uiop, bp->b_rcred);
1681 break;
1682 case VDIR:
1683 uiop->uio_offset = bp->b_lblkno;
1684 nfsstats.readdir_bios++;
1685 error = nfs_readdirrpc(vp, uiop, bp->b_rcred);
1686 /*
1687 * Save offset cookie in b_blkno.
1688 */
1689 bp->b_blkno = uiop->uio_offset;
1690 break;
1691 };
1692 bp->b_error = error;
1693 } else {
1694 io.iov_len = uiop->uio_resid = bp->b_dirtyend
1695 - bp->b_dirtyoff;
1696 uiop->uio_offset = (bp->b_blkno * DEV_BSIZE)
1697 + bp->b_dirtyoff;
1698 io.iov_base = bp->b_un.b_addr + bp->b_dirtyoff;
1699 uiop->uio_rw = UIO_WRITE;
1700 nfsstats.write_bios++;
1701 bp->b_error = error = nfs_writerpc(vp, uiop,
1702 bp->b_wcred);
1703 if (error) {
1704 np->n_error = error;
1705 np->n_flag |= NWRITEERR;
1706 }
1707 bp->b_dirtyoff = bp->b_dirtyend = 0;
1708 }
1709 }
1710 if (error)
1711 bp->b_flags |= B_ERROR;
1712 bp->b_resid = uiop->uio_resid;
1713 biodone(bp);
1714 return (error);
1715 }
1716
1717 /*
1718 * Mmap a file
1719 *
1720 * NB Currently unsupported.
1721 */
1722 /* ARGSUSED */
1723 nfs_mmap(vp, fflags, cred, p)
1724 struct vnode *vp;
1725 int fflags;
1726 struct ucred *cred;
1727 struct proc *p;
1728 {
1729
1730 return (EINVAL);
1731 }
1732
1733 /*
1734 * Flush all the blocks associated with a vnode.
1735 * Walk through the buffer pool and push any dirty pages
1736 * associated with the vnode.
1737 */
1738 /* ARGSUSED */
1739 nfs_fsync(vp, fflags, cred, waitfor, p)
1740 register struct vnode *vp;
1741 int fflags;
1742 struct ucred *cred;
1743 int waitfor;
1744 struct proc *p;
1745 {
1746 register struct nfsnode *np = VTONFS(vp);
1747 int error = 0;
1748
1749 if (np->n_flag & NMODIFIED) {
1750 np->n_flag &= ~NMODIFIED;
1751 vflushbuf(vp, waitfor == MNT_WAIT ? B_SYNC : 0);
1752 }
1753 if (!error && (np->n_flag & NWRITEERR))
1754 error = np->n_error;
1755 return (error);
1756 }
1757
1758 /*
1759 * NFS advisory byte-level locks.
1760 * Currently unsupported.
1761 */
1762 nfs_advlock(vp, id, op, fl, flags)
1763 struct vnode *vp;
1764 caddr_t id;
1765 int op;
1766 struct flock *fl;
1767 int flags;
1768 {
1769 register struct nfsnode *np = VTONFS(vp);
1770
1771 return (lf_advlock(&(np->n_lockf), np->n_size, id, op, fl, flags));
1772 }
1773
1774 /*
1775 * Print out the contents of an nfsnode.
1776 */
1777 int
1778 nfs_print(vp)
1779 struct vnode *vp;
1780 {
1781 register struct nfsnode *np = VTONFS(vp);
1782
1783 printf("tag VT_NFS, fileid %d fsid 0x%x",
1784 np->n_vattr.va_fileid, np->n_vattr.va_fsid);
1785 #ifdef FIFO
1786 if (vp->v_type == VFIFO)
1787 fifo_printinfo(vp);
1788 #endif /* FIFO */
1789 printf("\n");
1790 return (0);
1791 }
1792
1793 /*
1794 * Attribute cache routines.
1795 * nfs_loadattrcache() - loads or updates the cache contents from attributes
1796 * that are on the mbuf list
1797 * nfs_getattrcache() - returns valid attributes if found in cache, returns
1798 * error otherwise
1799 */
1800
1801 /*
1802 * Load the attribute cache (that lives in the nfsnode entry) with
1803 * the values on the mbuf list and
1804 * Iff vap not NULL
1805 * copy the attributes to *vaper
1806 */
1807 nfs_loadattrcache(vpp, mdp, dposp, vaper)
1808 struct vnode **vpp;
1809 struct mbuf **mdp;
1810 caddr_t *dposp;
1811 struct vattr *vaper;
1812 {
1813 register struct vnode *vp = *vpp;
1814 register struct vattr *vap;
1815 register struct nfsv2_fattr *fp;
1816 extern struct vnodeops spec_nfsv2nodeops;
1817 register struct nfsnode *np;
1818 register long t1;
1819 caddr_t dpos, cp2;
1820 int error = 0;
1821 struct mbuf *md;
1822 enum vtype type;
1823 u_short mode;
1824 long rdev;
1825 struct timespec mtime;
1826 struct vnode *nvp;
1827
1828 md = *mdp;
1829 dpos = *dposp;
1830 t1 = (mtod(md, caddr_t)+md->m_len)-dpos;
1831 if (error = nfsm_disct(&md, &dpos, NFSX_FATTR, t1, TRUE, &cp2))
1832 return (error);
1833 fp = (struct nfsv2_fattr *)cp2;
1834 type = nfstov_type(fp->fa_type);
1835 mode = fxdr_unsigned(u_short, fp->fa_mode);
1836 if (type == VNON)
1837 type = IFTOVT(mode);
1838 rdev = fxdr_unsigned(long, fp->fa_rdev);
1839 fxdr_time(&fp->fa_mtime, &mtime);
1840 /*
1841 * If v_type == VNON it is a new node, so fill in the v_type,
1842 * n_mtime fields. Check to see if it represents a special
1843 * device, and if so, check for a possible alias. Once the
1844 * correct vnode has been obtained, fill in the rest of the
1845 * information.
1846 */
1847 np = VTONFS(vp);
1848 if (vp->v_type == VNON) {
1849 if (type == VCHR && rdev == 0xffffffff)
1850 vp->v_type = type = VFIFO;
1851 else
1852 vp->v_type = type;
1853 if (vp->v_type == VFIFO) {
1854 #ifdef FIFO
1855 extern struct vnodeops fifo_nfsv2nodeops;
1856 vp->v_op = &fifo_nfsv2nodeops;
1857 #else
1858 return (EOPNOTSUPP);
1859 #endif /* FIFO */
1860 }
1861 if (vp->v_type == VCHR || vp->v_type == VBLK) {
1862 vp->v_op = &spec_nfsv2nodeops;
1863 if (nvp = checkalias(vp, (dev_t)rdev, vp->v_mount)) {
1864 /*
1865 * Reinitialize aliased node.
1866 */
1867 np = VTONFS(nvp);
1868 np->n_vnode = nvp;
1869 np->n_flag = 0;
1870 nfs_lock(nvp);
1871 bcopy((caddr_t)&VTONFS(vp)->n_fh,
1872 (caddr_t)&np->n_fh, NFSX_FH);
1873 insque(np, nfs_hash(&np->n_fh));
1874 np->n_attrstamp = 0;
1875 np->n_sillyrename = (struct sillyrename *)0;
1876 /*
1877 * Discard unneeded vnode and update actual one
1878 */
1879 vput(vp);
1880 *vpp = vp = nvp;
1881 }
1882 }
1883 np->n_mtime = mtime.ts_sec;
1884 }
1885 vap = &np->n_vattr;
1886 vap->va_type = type;
1887 vap->va_mode = (mode & 07777);
1888 vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
1889 vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
1890 vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
1891 vap->va_size = fxdr_unsigned(u_long, fp->fa_size);
1892 if ((np->n_flag & NMODIFIED) == 0 || vap->va_size > np->n_size) {
1893 np->n_size = vap->va_size;
1894 vnode_pager_setsize(vp, np->n_size);
1895 }
1896 vap->va_blocksize = fxdr_unsigned(long, fp->fa_blocksize);
1897 vap->va_rdev = (dev_t)rdev;
1898 vap->va_bytes = fxdr_unsigned(long, fp->fa_blocks) * NFS_FABLKSIZE;
1899 vap->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0];
1900 vap->va_fileid = fxdr_unsigned(long, fp->fa_fileid);
1901 /* jfw (at) ksr.com 6/2/93 */
1902 #if 0 /* bad assumption; Suns make full (and obvious) use of .usec fields */
1903 vap->va_atime.tv_sec = fxdr_unsigned(long, fp->fa_atime.tv_sec);
1904 vap->va_atime.tv_usec = 0;
1905 vap->va_flags = fxdr_unsigned(u_long, fp->fa_atime.tv_usec);
1906 vap->va_mtime = mtime;
1907 vap->va_ctime.tv_sec = fxdr_unsigned(long, fp->fa_ctime.tv_sec);
1908 vap->va_ctime.tv_usec = 0;
1909 vap->va_gen = fxdr_unsigned(u_long, fp->fa_ctime.tv_usec);
1910 #else
1911 fxdr_time(&fp->fa_atime, &vap->va_atime);
1912 vap->va_mtime = mtime;
1913 fxdr_time(&fp->fa_ctime, &vap->va_ctime);
1914 vap->va_gen = 0; /* can reliably learn nothing about this via NFS. */
1915 vap->va_flags = 0; /* can reliably learn nothing about this via NFS. */
1916 #endif
1917 np->n_attrstamp = time.tv_sec;
1918 *dposp = dpos;
1919 *mdp = md;
1920 if (vaper != NULL) {
1921 bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(*vap));
1922 if ((np->n_flag & NMODIFIED) && (np->n_size > vap->va_size))
1923 vaper->va_size = np->n_size;
1924 }
1925 return (0);
1926 }
1927
1928 /*
1929 * Check the time stamp
1930 * If the cache is valid, copy contents to *vap and return 0
1931 * otherwise return an error
1932 */
1933 nfs_getattrcache(vp, vap)
1934 register struct vnode *vp;
1935 struct vattr *vap;
1936 {
1937 register struct nfsnode *np;
1938
1939 np = VTONFS(vp);
1940 if ((time.tv_sec-np->n_attrstamp) < NFS_ATTRTIMEO) {
1941 nfsstats.attrcache_hits++;
1942 bcopy((caddr_t)&np->n_vattr,(caddr_t)vap,sizeof(struct vattr));
1943 if ((np->n_flag & NMODIFIED) == 0) {
1944 np->n_size = vap->va_size;
1945 vnode_pager_setsize(vp, np->n_size);
1946 } else if (np->n_size > vap->va_size)
1947 vap->va_size = np->n_size;
1948 if (np->n_delayed_atime.ts_sec != VNOVAL)
1949 vap->va_atime = np->n_delayed_atime;
1950 if (np->n_delayed_mtime.ts_sec != VNOVAL)
1951 vap->va_mtime = np->n_delayed_mtime;
1952 return (0);
1953 } else {
1954 nfsstats.attrcache_misses++;
1955 return (ENOENT);
1956 }
1957 }
1958
1959 /*
1960 * Read wrapper for special devices.
1961 */
1962 nfsspec_read(vp, uio, ioflag, cred)
1963 struct vnode *vp;
1964 struct uio *uio;
1965 int ioflag;
1966 struct ucred *cred;
1967 {
1968 /*
1969 * Set access time.
1970 */
1971 TIMEVAL_TO_TIMESPEC(&time, &(VTONFS(vp)->n_delayed_atime));
1972 return (spec_read(vp, uio, ioflag, cred));
1973 }
1974
1975 /*
1976 * Write wrapper for special devices.
1977 */
1978 nfsspec_write(vp, uio, ioflag, cred)
1979 struct vnode *vp;
1980 struct uio *uio;
1981 int ioflag;
1982 struct ucred *cred;
1983 {
1984 /*
1985 * Set change time.
1986 */
1987 TIMEVAL_TO_TIMESPEC(&time, &(VTONFS(vp)->n_delayed_mtime));
1988 return (spec_write(vp, uio, ioflag, cred));
1989 }
1990
1991 /*
1992 * Close wrapper for special devices.
1993 *
1994 * Update the times then do device close.
1995 */
1996 nfsspec_close(vp, fflag, cred, p)
1997 struct vnode *vp;
1998 int fflag;
1999 struct ucred *cred;
2000 struct proc *p;
2001 {
2002 if (VTONFS(vp)->n_delayed_mtime.ts_sec != VNOVAL ||
2003 VTONFS(vp)->n_delayed_atime.ts_sec != VNOVAL) {
2004 struct vattr va;
2005 VATTR_NULL(&va);
2006 nfs_setattr(vp, &va, cred, p);
2007 }
2008 return (spec_close(vp, fflag, cred, p));
2009 }
2010
2011 #ifdef FIFO
2012 /*
2013 * Read wrapper for special devices.
2014 */
2015 nfsfifo_read(vp, uio, ioflag, cred)
2016 struct vnode *vp;
2017 struct uio *uio;
2018 int ioflag;
2019 struct ucred *cred;
2020 {
2021 /*
2022 * Set access time.
2023 */
2024 TIMEVAL_TO_TIMESPEC(&time, &(VTONFS(vp)->n_delayed_atime));
2025 return (fifo_read(vp, uio, ioflag, cred));
2026 }
2027
2028 /*
2029 * Write wrapper for special devices.
2030 */
2031 nfsfifo_write(vp, uio, ioflag, cred)
2032 struct vnode *vp;
2033 struct uio *uio;
2034 int ioflag;
2035 struct ucred *cred;
2036 {
2037 /*
2038 * Set change time.
2039 */
2040 TIMEVAL_TO_TIMESPEC(&time, &(VTONFS(vp)->n_delayed_mtime));
2041 return (fifo_write(vp, uio, ioflag, cred));
2042 }
2043
2044 /*
2045 * Close wrapper for special devices.
2046 *
2047 * Update the times then do device close.
2048 */
2049 nfsfifo_close(vp, fflag, cred, p)
2050 struct vnode *vp;
2051 int fflag;
2052 struct ucred *cred;
2053 struct proc *p;
2054 {
2055 if (VTONFS(vp)->n_delayed_mtime.ts_sec != VNOVAL ||
2056 VTONFS(vp)->n_delayed_atime.ts_sec != VNOVAL) {
2057 struct vattr va;
2058 VATTR_NULL(&va);
2059 nfs_setattr(vp, &va, cred, p);
2060 }
2061 return (fifo_close(vp, fflag, cred, p));
2062 }
2063 #endif /* FIFO */
2064