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