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