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.47 (Berkeley) 08/17/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 sp->sa_atime.tv_sec = txdr_unsigned(vap->va_atime.tv_sec); 400 sp->sa_atime.tv_usec = txdr_unsigned(vap->va_flags); 401 txdr_time(&vap->va_mtime, &sp->sa_mtime); 402 if (vap->va_size != VNOVAL || vap->va_mtime.tv_sec != VNOVAL || 403 vap->va_atime.tv_sec != VNOVAL) { 404 np = VTONFS(vp); 405 if (np->n_flag & NMODIFIED) { 406 np->n_flag &= ~NMODIFIED; 407 vinvalbuf(vp, TRUE); 408 np->n_attrstamp = 0; 409 } 410 } 411 nfsm_request(vp, NFSPROC_SETATTR, u.u_procp, 1); 412 nfsm_loadattr(vp, (struct vattr *)0); 413 /* should we fill in any vap fields ?? */ 414 nfsm_reqdone; 415 return (error); 416 } 417 418 /* 419 * nfs lookup call, one step at a time... 420 * First look in cache 421 * If not found, unlock the directory nfsnode and do the rpc 422 */ 423 nfs_lookup(vp, ndp) 424 register struct vnode *vp; 425 register struct nameidata *ndp; 426 { 427 register struct vnode *vdp; 428 register u_long *p; 429 register caddr_t cp; 430 register long t1, t2; 431 caddr_t bpos, dpos, cp2; 432 u_long xid; 433 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 434 struct vnode *newvp; 435 long len; 436 nfsv2fh_t *fhp; 437 struct nfsnode *np; 438 int lockparent, wantparent, flag, error = 0; 439 440 ndp->ni_dvp = vp; 441 ndp->ni_vp = NULL; 442 if (vp->v_type != VDIR) 443 return (ENOTDIR); 444 lockparent = ndp->ni_nameiop & LOCKPARENT; 445 flag = ndp->ni_nameiop & OPFLAG; 446 wantparent = ndp->ni_nameiop & (LOCKPARENT|WANTPARENT); 447 if ((error = cache_lookup(ndp)) && error != ENOENT) { 448 struct vattr vattr; 449 int vpid; 450 451 if (vp == ndp->ni_rdir && ndp->ni_isdotdot) 452 panic("nfs_lookup: .. through root"); 453 vdp = ndp->ni_vp; 454 vpid = vdp->v_id; 455 /* 456 * See the comment starting `Step through' in ufs/ufs_lookup.c 457 * for an explanation of the locking protocol 458 */ 459 if (vp == vdp) { 460 VREF(vdp); 461 error = 0; 462 } else if (ndp->ni_isdotdot) { 463 nfs_unlock(vp); 464 error = vget(vdp); 465 } else { 466 error = vget(vdp); 467 nfs_unlock(vp); 468 } 469 if (!error) { 470 if (vpid == vdp->v_id) { 471 if (!nfs_dogetattr(vdp, &vattr, ndp->ni_cred, 0) && 472 vattr.va_ctime.tv_sec == VTONFS(vdp)->n_ctime) { 473 nfsstats.lookupcache_hits++; 474 return (0); 475 } else { 476 cache_purge(vdp); 477 nfs_nput(vdp); 478 } 479 } else { 480 nfs_nput(vdp); 481 } 482 } 483 ndp->ni_vp = NULLVP; 484 } else 485 nfs_unlock(vp); 486 error = 0; 487 nfsstats.lookupcache_misses++; 488 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 489 len = ndp->ni_namelen; 490 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 491 nfsm_fhtom(vp); 492 nfsm_strtom(ndp->ni_ptr, len, NFS_MAXNAMLEN); 493 nfsm_request(vp, NFSPROC_LOOKUP, u.u_procp, 0); 494 nfsmout: 495 if (error) { 496 if (lockparent || (flag != CREATE && flag != RENAME) || 497 *ndp->ni_next != 0) 498 nfs_lock(vp); 499 return (error); 500 } 501 nfsm_disect(fhp,nfsv2fh_t *,NFSX_FH); 502 503 /* 504 * Handle DELETE and RENAME cases... 505 */ 506 if (flag == DELETE && *ndp->ni_next == 0) { 507 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 508 VREF(vp); 509 newvp = vp; 510 np = VTONFS(vp); 511 } else { 512 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 513 nfs_lock(vp); 514 m_freem(mrep); 515 return (error); 516 } 517 newvp = NFSTOV(np); 518 } 519 if (error = 520 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 521 nfs_lock(vp); 522 if (newvp != vp) 523 nfs_nput(newvp); 524 else 525 vrele(vp); 526 m_freem(mrep); 527 return (error); 528 } 529 ndp->ni_vp = newvp; 530 if (lockparent || vp == newvp) 531 nfs_lock(vp); 532 m_freem(mrep); 533 return (0); 534 } 535 536 if (flag == RENAME && wantparent && *ndp->ni_next == 0) { 537 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 538 nfs_lock(vp); 539 m_freem(mrep); 540 return (EISDIR); 541 } 542 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 543 nfs_lock(vp); 544 m_freem(mrep); 545 return (error); 546 } 547 newvp = NFSTOV(np); 548 if (error = 549 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 550 nfs_lock(vp); 551 nfs_nput(newvp); 552 m_freem(mrep); 553 return (error); 554 } 555 ndp->ni_vp = newvp; 556 if (lockparent) 557 nfs_lock(vp); 558 m_freem(mrep); 559 return (0); 560 } 561 562 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 563 VREF(vp); 564 newvp = vp; 565 np = VTONFS(vp); 566 } else if (ndp->ni_isdotdot) { 567 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 568 nfs_lock(vp); 569 m_freem(mrep); 570 return (error); 571 } 572 newvp = NFSTOV(np); 573 } else { 574 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 575 nfs_lock(vp); 576 m_freem(mrep); 577 return (error); 578 } 579 newvp = NFSTOV(np); 580 } 581 if (error = nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 582 nfs_lock(vp); 583 if (newvp != vp) 584 nfs_nput(newvp); 585 else 586 vrele(vp); 587 m_freem(mrep); 588 return (error); 589 } 590 m_freem(mrep); 591 592 if (vp == newvp || (lockparent && *ndp->ni_next == '\0')) 593 nfs_lock(vp); 594 ndp->ni_vp = newvp; 595 if (error == 0 && ndp->ni_makeentry) { 596 np->n_ctime = np->n_vattr.va_ctime.tv_sec; 597 cache_enter(ndp); 598 } 599 return (error); 600 } 601 602 /* 603 * nfs read call. 604 * Just call nfs_bioread() to do the work. 605 */ 606 nfs_read(vp, uiop, ioflag, cred) 607 register struct vnode *vp; 608 struct uio *uiop; 609 int ioflag; 610 struct ucred *cred; 611 { 612 if (vp->v_type != VREG) 613 return (EPERM); 614 return (nfs_bioread(vp, uiop, ioflag, cred)); 615 } 616 617 /* 618 * nfs readlink call 619 */ 620 nfs_readlink(vp, uiop, cred) 621 struct vnode *vp; 622 struct uio *uiop; 623 struct ucred *cred; 624 { 625 if (vp->v_type != VLNK) 626 return (EPERM); 627 return (nfs_bioread(vp, uiop, 0, cred)); 628 } 629 630 /* 631 * Do a readlink rpc. 632 * Called by nfs_doio() from below the buffer cache. 633 */ 634 nfs_readlinkrpc(vp, uiop, cred, procp) 635 register struct vnode *vp; 636 struct uio *uiop; 637 struct ucred *cred; 638 struct proc *procp; 639 { 640 register u_long *p; 641 register caddr_t cp; 642 register long t1; 643 caddr_t bpos, dpos, cp2; 644 u_long xid; 645 int error = 0; 646 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 647 long len; 648 649 nfsstats.rpccnt[NFSPROC_READLINK]++; 650 nfs_unlock(vp); 651 nfsm_reqhead(nfs_procids[NFSPROC_READLINK], cred, NFSX_FH); 652 nfsm_fhtom(vp); 653 nfsm_request(vp, NFSPROC_READLINK, procp, 0); 654 nfsm_strsiz(len, NFS_MAXPATHLEN); 655 nfsm_mtouio(uiop, len); 656 nfsm_reqdone; 657 nfs_lock(vp); 658 return (error); 659 } 660 661 /* 662 * nfs read rpc call 663 * Ditto above 664 */ 665 nfs_readrpc(vp, uiop, cred, procp) 666 register struct vnode *vp; 667 struct uio *uiop; 668 struct ucred *cred; 669 struct proc *procp; 670 { 671 register u_long *p; 672 register caddr_t cp; 673 register long t1; 674 caddr_t bpos, dpos, cp2; 675 u_long xid; 676 int error = 0; 677 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 678 struct nfsmount *nmp; 679 long len, retlen, tsiz; 680 681 nmp = VFSTONFS(vp->v_mount); 682 tsiz = uiop->uio_resid; 683 while (tsiz > 0) { 684 nfsstats.rpccnt[NFSPROC_READ]++; 685 len = (tsiz > nmp->nm_rsize) ? nmp->nm_rsize : tsiz; 686 nfsm_reqhead(nfs_procids[NFSPROC_READ], cred, NFSX_FH+NFSX_UNSIGNED*3); 687 nfsm_fhtom(vp); 688 nfsm_build(p, u_long *, NFSX_UNSIGNED*3); 689 *p++ = txdr_unsigned(uiop->uio_offset); 690 *p++ = txdr_unsigned(len); 691 *p = 0; 692 nfsm_request(vp, NFSPROC_READ, procp, 1); 693 nfsm_loadattr(vp, (struct vattr *)0); 694 nfsm_strsiz(retlen, nmp->nm_rsize); 695 nfsm_mtouio(uiop, retlen); 696 m_freem(mrep); 697 if (retlen < len) 698 tsiz = 0; 699 else 700 tsiz -= len; 701 } 702 nfsmout: 703 return (error); 704 } 705 706 /* 707 * nfs write call 708 */ 709 nfs_writerpc(vp, uiop, cred, procp) 710 register struct vnode *vp; 711 struct uio *uiop; 712 struct ucred *cred; 713 struct proc *procp; 714 { 715 register u_long *p; 716 register caddr_t cp; 717 register long t1; 718 caddr_t bpos, dpos; 719 u_long xid; 720 int error = 0; 721 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 722 struct nfsmount *nmp; 723 long len, tsiz; 724 725 nmp = VFSTONFS(vp->v_mount); 726 tsiz = uiop->uio_resid; 727 while (tsiz > 0) { 728 nfsstats.rpccnt[NFSPROC_WRITE]++; 729 len = (tsiz > nmp->nm_wsize) ? nmp->nm_wsize : tsiz; 730 nfsm_reqhead(nfs_procids[NFSPROC_WRITE], cred, 731 NFSX_FH+NFSX_UNSIGNED*4); 732 nfsm_fhtom(vp); 733 nfsm_build(p, u_long *, NFSX_UNSIGNED*4); 734 *(p+1) = txdr_unsigned(uiop->uio_offset); 735 *(p+3) = txdr_unsigned(len); 736 nfsm_uiotom(uiop, len); 737 nfsm_request(vp, NFSPROC_WRITE, procp, 1); 738 nfsm_loadattr(vp, (struct vattr *)0); 739 m_freem(mrep); 740 tsiz -= len; 741 } 742 nfsmout: 743 return (error); 744 } 745 746 /* 747 * nfs mknod call 748 * This is a kludge. Use a create rpc but with the IFMT bits of the mode 749 * set to specify the file type and the size field for rdev. 750 */ 751 /* ARGSUSED */ 752 nfs_mknod(ndp, vap, cred) 753 struct nameidata *ndp; 754 struct ucred *cred; 755 register struct vattr *vap; 756 { 757 register struct nfsv2_sattr *sp; 758 register u_long *p; 759 register caddr_t cp; 760 register long t1, t2; 761 caddr_t bpos, dpos; 762 u_long xid; 763 int error = 0; 764 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 765 u_long rdev; 766 767 if (vap->va_type == VCHR || vap->va_type == VBLK) 768 rdev = txdr_unsigned(vap->va_rdev); 769 #ifdef FIFO 770 else if (vap->va_type == VFIFO) 771 rdev = 0xffffffff; 772 #endif /* FIFO */ 773 else { 774 VOP_ABORTOP(ndp); 775 vput(ndp->ni_dvp); 776 return (EOPNOTSUPP); 777 } 778 nfsstats.rpccnt[NFSPROC_CREATE]++; 779 nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred, 780 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR); 781 nfsm_fhtom(ndp->ni_dvp); 782 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 783 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 784 sp->sa_mode = vtonfs_mode(vap->va_type, vap->va_mode); 785 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 786 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 787 sp->sa_size = rdev; 788 /* or should these be VNOVAL ?? */ 789 txdr_time(&vap->va_atime, &sp->sa_atime); 790 txdr_time(&vap->va_mtime, &sp->sa_mtime); 791 nfsm_request(ndp->ni_dvp, NFSPROC_CREATE, u.u_procp, 1); 792 nfsm_reqdone; 793 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 794 nfs_nput(ndp->ni_dvp); 795 return (error); 796 } 797 798 /* 799 * nfs file create call 800 */ 801 nfs_create(ndp, vap) 802 register struct nameidata *ndp; 803 register struct vattr *vap; 804 { 805 register struct nfsv2_sattr *sp; 806 register u_long *p; 807 register caddr_t cp; 808 register long t1, t2; 809 caddr_t bpos, dpos, cp2; 810 u_long xid; 811 int error = 0; 812 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 813 814 nfsstats.rpccnt[NFSPROC_CREATE]++; 815 nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred, 816 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR); 817 nfsm_fhtom(ndp->ni_dvp); 818 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 819 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 820 sp->sa_mode = vtonfs_mode(VREG, vap->va_mode); 821 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 822 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 823 sp->sa_size = txdr_unsigned(0); 824 /* or should these be VNOVAL ?? */ 825 txdr_time(&vap->va_atime, &sp->sa_atime); 826 txdr_time(&vap->va_mtime, &sp->sa_mtime); 827 nfsm_request(ndp->ni_dvp, NFSPROC_CREATE, u.u_procp, 1); 828 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp); 829 nfsm_reqdone; 830 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 831 nfs_nput(ndp->ni_dvp); 832 return (error); 833 } 834 835 /* 836 * nfs file remove call 837 * To try and make nfs semantics closer to ufs semantics, a file that has 838 * other processes using the vnode is renamed instead of removed and then 839 * removed later on the last close. 840 * - If v_usecount > 1 841 * If a rename is not already in the works 842 * call nfs_sillyrename() to set it up 843 * else 844 * do the remove rpc 845 */ 846 nfs_remove(ndp) 847 register struct nameidata *ndp; 848 { 849 register struct vnode *vp = ndp->ni_vp; 850 register struct nfsnode *np = VTONFS(ndp->ni_vp); 851 register u_long *p; 852 register caddr_t cp; 853 register long t1, t2; 854 caddr_t bpos, dpos; 855 u_long xid; 856 int error = 0; 857 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 858 859 if (vp->v_usecount > 1) { 860 if (!np->n_sillyrename) 861 error = nfs_sillyrename(ndp, REMOVE); 862 } else { 863 nfsstats.rpccnt[NFSPROC_REMOVE]++; 864 nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred, 865 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 866 nfsm_fhtom(ndp->ni_dvp); 867 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 868 nfsm_request(ndp->ni_dvp, NFSPROC_REMOVE, u.u_procp, 1); 869 nfsm_reqdone; 870 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 871 /* 872 * Kludge City: If the first reply to the remove rpc is lost.. 873 * the reply to the retransmitted request will be ENOENT 874 * since the file was in fact removed 875 * Therefore, we cheat and return success. 876 */ 877 if (error == ENOENT) 878 error = 0; 879 } 880 np->n_attrstamp = 0; 881 if (ndp->ni_dvp == vp) 882 vrele(vp); 883 else 884 nfs_nput(ndp->ni_dvp); 885 nfs_nput(vp); 886 return (error); 887 } 888 889 /* 890 * nfs file remove rpc called from nfs_inactive 891 */ 892 nfs_removeit(ndp) 893 register struct nameidata *ndp; 894 { 895 register u_long *p; 896 register caddr_t cp; 897 register long t1, t2; 898 caddr_t bpos, dpos; 899 u_long xid; 900 int error = 0; 901 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 902 903 nfsstats.rpccnt[NFSPROC_REMOVE]++; 904 nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred, 905 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 906 nfsm_fhtom(ndp->ni_dvp); 907 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 908 nfsm_request(ndp->ni_dvp, NFSPROC_REMOVE, u.u_procp, 1); 909 nfsm_reqdone; 910 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 911 return (error); 912 } 913 914 /* 915 * nfs file rename call 916 */ 917 nfs_rename(sndp, tndp) 918 register struct nameidata *sndp, *tndp; 919 { 920 register u_long *p; 921 register caddr_t cp; 922 register long t1, t2; 923 caddr_t bpos, dpos; 924 u_long xid; 925 int error = 0; 926 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 927 928 nfsstats.rpccnt[NFSPROC_RENAME]++; 929 nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred, 930 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+ 931 nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/ 932 nfsm_fhtom(sndp->ni_dvp); 933 nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 934 nfsm_fhtom(tndp->ni_dvp); 935 nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 936 nfsm_request(sndp->ni_dvp, NFSPROC_RENAME, u.u_procp, 1); 937 nfsm_reqdone; 938 VTONFS(sndp->ni_dvp)->n_flag |= NMODIFIED; 939 VTONFS(tndp->ni_dvp)->n_flag |= NMODIFIED; 940 if (sndp->ni_vp->v_type == VDIR) { 941 if (tndp->ni_vp != NULL && tndp->ni_vp->v_type == VDIR) 942 cache_purge(tndp->ni_dvp); 943 cache_purge(sndp->ni_dvp); 944 } 945 VOP_ABORTOP(tndp); 946 if (tndp->ni_dvp == tndp->ni_vp) 947 vrele(tndp->ni_dvp); 948 else 949 vput(tndp->ni_dvp); 950 if (tndp->ni_vp) 951 vput(tndp->ni_vp); 952 VOP_ABORTOP(sndp); 953 vrele(sndp->ni_dvp); 954 vrele(sndp->ni_vp); 955 /* 956 * Kludge: Map ENOENT => 0 assuming that it is a reply to a retry. 957 */ 958 if (error == ENOENT) 959 error = 0; 960 return (error); 961 } 962 963 /* 964 * nfs file rename rpc called from nfs_remove() above 965 */ 966 nfs_renameit(sndp, tndp) 967 register struct nameidata *sndp, *tndp; 968 { 969 register u_long *p; 970 register caddr_t cp; 971 register long t1, t2; 972 caddr_t bpos, dpos; 973 u_long xid; 974 int error = 0; 975 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 976 977 nfsstats.rpccnt[NFSPROC_RENAME]++; 978 nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred, 979 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+ 980 nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/ 981 nfsm_fhtom(sndp->ni_dvp); 982 nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 983 nfsm_fhtom(tndp->ni_dvp); 984 nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 985 nfsm_request(sndp->ni_dvp, NFSPROC_RENAME, u.u_procp, 1); 986 nfsm_reqdone; 987 VTONFS(sndp->ni_dvp)->n_flag |= NMODIFIED; 988 VTONFS(tndp->ni_dvp)->n_flag |= NMODIFIED; 989 return (error); 990 } 991 992 /* 993 * nfs hard link create call 994 */ 995 nfs_link(vp, ndp) 996 register struct vnode *vp; 997 register struct nameidata *ndp; 998 { 999 register u_long *p; 1000 register caddr_t cp; 1001 register long t1, t2; 1002 caddr_t bpos, dpos; 1003 u_long xid; 1004 int error = 0; 1005 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1006 1007 if (ndp->ni_dvp != vp) 1008 nfs_lock(vp); 1009 nfsstats.rpccnt[NFSPROC_LINK]++; 1010 nfsm_reqhead(nfs_procids[NFSPROC_LINK], ndp->ni_cred, 1011 NFSX_FH*2+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 1012 nfsm_fhtom(vp); 1013 nfsm_fhtom(ndp->ni_dvp); 1014 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 1015 nfsm_request(vp, NFSPROC_LINK, u.u_procp, 1); 1016 nfsm_reqdone; 1017 VTONFS(vp)->n_attrstamp = 0; 1018 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 1019 if (ndp->ni_dvp != vp) 1020 nfs_unlock(vp); 1021 nfs_nput(ndp->ni_dvp); 1022 /* 1023 * Kludge: Map EEXIST => 0 assuming that it is a reply to a retry. 1024 */ 1025 if (error == EEXIST) 1026 error = 0; 1027 return (error); 1028 } 1029 1030 /* 1031 * nfs symbolic link create call 1032 */ 1033 nfs_symlink(ndp, vap, nm) 1034 struct nameidata *ndp; 1035 struct vattr *vap; 1036 char *nm; /* is this the path ?? */ 1037 { 1038 register struct nfsv2_sattr *sp; 1039 register u_long *p; 1040 register caddr_t cp; 1041 register long t1, t2; 1042 caddr_t bpos, dpos; 1043 u_long xid; 1044 int error = 0; 1045 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1046 1047 nfsstats.rpccnt[NFSPROC_SYMLINK]++; 1048 nfsm_reqhead(nfs_procids[NFSPROC_SYMLINK], ndp->ni_cred, 1049 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_UNSIGNED); 1050 nfsm_fhtom(ndp->ni_dvp); 1051 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 1052 nfsm_strtom(nm, strlen(nm), NFS_MAXPATHLEN); 1053 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 1054 sp->sa_mode = vtonfs_mode(VLNK, vap->va_mode); 1055 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 1056 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 1057 sp->sa_size = txdr_unsigned(VNOVAL); 1058 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */ 1059 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */ 1060 nfsm_request(ndp->ni_dvp, NFSPROC_SYMLINK, u.u_procp, 1); 1061 nfsm_reqdone; 1062 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 1063 nfs_nput(ndp->ni_dvp); 1064 /* 1065 * Kludge: Map EEXIST => 0 assuming that it is a reply to a retry. 1066 */ 1067 if (error == EEXIST) 1068 error = 0; 1069 return (error); 1070 } 1071 1072 /* 1073 * nfs make dir call 1074 */ 1075 nfs_mkdir(ndp, vap) 1076 register struct nameidata *ndp; 1077 struct vattr *vap; 1078 { 1079 register struct nfsv2_sattr *sp; 1080 register u_long *p; 1081 register caddr_t cp; 1082 register long t1, t2; 1083 register int len; 1084 caddr_t bpos, dpos, cp2; 1085 u_long xid; 1086 int error = 0, firsttry = 1; 1087 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1088 1089 len = ndp->ni_dent.d_namlen; 1090 nfsstats.rpccnt[NFSPROC_MKDIR]++; 1091 nfsm_reqhead(nfs_procids[NFSPROC_MKDIR], ndp->ni_cred, 1092 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)+NFSX_SATTR); 1093 nfsm_fhtom(ndp->ni_dvp); 1094 nfsm_strtom(ndp->ni_dent.d_name, len, NFS_MAXNAMLEN); 1095 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 1096 sp->sa_mode = vtonfs_mode(VDIR, vap->va_mode); 1097 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 1098 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 1099 sp->sa_size = txdr_unsigned(VNOVAL); 1100 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */ 1101 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */ 1102 nfsm_request(ndp->ni_dvp, NFSPROC_MKDIR, u.u_procp, 1); 1103 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp); 1104 nfsm_reqdone; 1105 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 1106 /* 1107 * Kludge: Map EEXIST => 0 assuming that you have a reply to a retry 1108 * if we can succeed in looking up the directory. 1109 * "firsttry" is necessary since the macros may "goto nfsmout" which 1110 * is above the if on errors. (Ugh) 1111 */ 1112 if (error == EEXIST && firsttry) { 1113 firsttry = 0; 1114 error = 0; 1115 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 1116 ndp->ni_vp = NULL; 1117 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, 1118 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 1119 nfsm_fhtom(ndp->ni_dvp); 1120 nfsm_strtom(ndp->ni_dent.d_name, len, NFS_MAXNAMLEN); 1121 nfsm_request(ndp->ni_dvp, NFSPROC_LOOKUP, u.u_procp, 1); 1122 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp); 1123 if (ndp->ni_vp->v_type != VDIR) { 1124 vput(ndp->ni_vp); 1125 error = EEXIST; 1126 } 1127 m_freem(mrep); 1128 } 1129 nfs_nput(ndp->ni_dvp); 1130 return (error); 1131 } 1132 1133 /* 1134 * nfs remove directory call 1135 */ 1136 nfs_rmdir(ndp) 1137 register struct nameidata *ndp; 1138 { 1139 register u_long *p; 1140 register caddr_t cp; 1141 register long t1, t2; 1142 caddr_t bpos, dpos; 1143 u_long xid; 1144 int error = 0; 1145 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1146 1147 if (ndp->ni_dvp == ndp->ni_vp) { 1148 vrele(ndp->ni_dvp); 1149 nfs_nput(ndp->ni_dvp); 1150 return (EINVAL); 1151 } 1152 nfsstats.rpccnt[NFSPROC_RMDIR]++; 1153 nfsm_reqhead(nfs_procids[NFSPROC_RMDIR], ndp->ni_cred, 1154 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 1155 nfsm_fhtom(ndp->ni_dvp); 1156 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 1157 nfsm_request(ndp->ni_dvp, NFSPROC_RMDIR, u.u_procp, 1); 1158 nfsm_reqdone; 1159 VTONFS(ndp->ni_dvp)->n_flag |= NMODIFIED; 1160 cache_purge(ndp->ni_dvp); 1161 cache_purge(ndp->ni_vp); 1162 nfs_nput(ndp->ni_vp); 1163 nfs_nput(ndp->ni_dvp); 1164 /* 1165 * Kludge: Map ENOENT => 0 assuming that you have a reply to a retry. 1166 */ 1167 if (error == ENOENT) 1168 error = 0; 1169 return (error); 1170 } 1171 1172 /* 1173 * nfs readdir call 1174 * Although cookie is defined as opaque, I translate it to/from net byte 1175 * order so that it looks more sensible. This appears consistent with the 1176 * Ultrix implementation of NFS. 1177 */ 1178 nfs_readdir(vp, uiop, cred, eofflagp) 1179 register struct vnode *vp; 1180 struct uio *uiop; 1181 struct ucred *cred; 1182 int *eofflagp; 1183 { 1184 register struct nfsnode *np = VTONFS(vp); 1185 int tresid, error; 1186 struct vattr vattr; 1187 1188 if (vp->v_type != VDIR) 1189 return (EPERM); 1190 /* 1191 * First, check for hit on the EOF offset cache 1192 */ 1193 if (uiop->uio_offset != 0 && uiop->uio_offset == np->n_direofoffset && 1194 (np->n_flag & NMODIFIED) == 0 && 1195 nfs_dogetattr(vp, &vattr, cred, 0) == 0 && 1196 np->n_mtime == vattr.va_mtime.tv_sec) { 1197 *eofflagp = 1; 1198 nfsstats.direofcache_hits++; 1199 return (0); 1200 } 1201 1202 /* 1203 * Call nfs_bioread() to do the real work. 1204 */ 1205 tresid = uiop->uio_resid; 1206 error = nfs_bioread(vp, uiop, 0, cred); 1207 1208 if (!error && uiop->uio_resid == tresid) { 1209 *eofflagp = 1; 1210 nfsstats.direofcache_misses++; 1211 } else 1212 *eofflagp = 0; 1213 return (error); 1214 } 1215 1216 /* 1217 * Readdir rpc call. 1218 * Called from below the buffer cache by nfs_doio(). 1219 */ 1220 nfs_readdirrpc(vp, uiop, cred, procp) 1221 register struct vnode *vp; 1222 struct uio *uiop; 1223 struct ucred *cred; 1224 struct proc *procp; 1225 { 1226 register long len; 1227 register struct direct *dp; 1228 register u_long *p; 1229 register caddr_t cp; 1230 register long t1; 1231 long tlen, lastlen; 1232 caddr_t bpos, dpos, cp2; 1233 u_long xid; 1234 int error = 0; 1235 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1236 struct mbuf *md2; 1237 caddr_t dpos2; 1238 int siz; 1239 int more_dirs = 1; 1240 off_t off, savoff; 1241 struct direct *savdp; 1242 struct nfsmount *nmp; 1243 struct nfsnode *np = VTONFS(vp); 1244 long tresid; 1245 1246 nmp = VFSTONFS(vp->v_mount); 1247 tresid = uiop->uio_resid; 1248 /* 1249 * Loop around doing readdir rpc's of size uio_resid or nm_rsize, 1250 * whichever is smaller, truncated to a multiple of DIRBLKSIZ. 1251 * The stopping criteria is EOF or buffer full. 1252 */ 1253 while (more_dirs && uiop->uio_resid >= DIRBLKSIZ) { 1254 nfsstats.rpccnt[NFSPROC_READDIR]++; 1255 nfsm_reqhead(nfs_procids[NFSPROC_READDIR], cred, xid); 1256 nfsm_fhtom(vp); 1257 nfsm_build(p, u_long *, 2*NFSX_UNSIGNED); 1258 *p++ = txdr_unsigned(uiop->uio_offset); 1259 *p = txdr_unsigned(((uiop->uio_resid > nmp->nm_rsize) ? 1260 nmp->nm_rsize : uiop->uio_resid) & ~(DIRBLKSIZ-1)); 1261 nfsm_request(vp, NFSPROC_READDIR, procp, 0); 1262 siz = 0; 1263 nfsm_disect(p, u_long *, NFSX_UNSIGNED); 1264 more_dirs = fxdr_unsigned(int, *p); 1265 1266 /* Save the position so that we can do nfsm_mtouio() later */ 1267 dpos2 = dpos; 1268 md2 = md; 1269 1270 /* loop thru the dir entries, doctoring them to 4bsd form */ 1271 off = uiop->uio_offset; 1272 #ifdef lint 1273 dp = (struct direct *)0; 1274 #endif /* lint */ 1275 while (more_dirs && siz < uiop->uio_resid) { 1276 savoff = off; /* Hold onto offset and dp */ 1277 savdp = dp; 1278 nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED); 1279 dp = (struct direct *)p; 1280 dp->d_ino = fxdr_unsigned(u_long, *p++); 1281 len = fxdr_unsigned(int, *p); 1282 if (len <= 0 || len > NFS_MAXNAMLEN) { 1283 error = EBADRPC; 1284 m_freem(mrep); 1285 goto nfsmout; 1286 } 1287 dp->d_namlen = (u_short)len; 1288 nfsm_adv(len); /* Point past name */ 1289 tlen = nfsm_rndup(len); 1290 /* 1291 * This should not be necessary, but some servers have 1292 * broken XDR such that these bytes are not null filled. 1293 */ 1294 if (tlen != len) { 1295 *dpos = '\0'; /* Null-terminate */ 1296 nfsm_adv(tlen - len); 1297 len = tlen; 1298 } 1299 nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED); 1300 off = fxdr_unsigned(off_t, *p); 1301 *p++ = 0; /* Ensures null termination of name */ 1302 more_dirs = fxdr_unsigned(int, *p); 1303 dp->d_reclen = len+4*NFSX_UNSIGNED; 1304 siz += dp->d_reclen; 1305 } 1306 /* 1307 * If at end of rpc data, get the eof boolean 1308 */ 1309 if (!more_dirs) { 1310 nfsm_disecton(p, u_long *, NFSX_UNSIGNED); 1311 more_dirs = (fxdr_unsigned(int, *p) == 0); 1312 1313 /* 1314 * If at EOF, cache directory offset 1315 */ 1316 if (!more_dirs) 1317 np->n_direofoffset = off; 1318 } 1319 /* 1320 * If there is too much to fit in the data buffer, use savoff and 1321 * savdp to trim off the last record. 1322 * --> we are not at eof 1323 */ 1324 if (siz > uiop->uio_resid) { 1325 off = savoff; 1326 siz -= dp->d_reclen; 1327 dp = savdp; 1328 more_dirs = 0; /* Paranoia */ 1329 } 1330 if (siz > 0) { 1331 lastlen = dp->d_reclen; 1332 md = md2; 1333 dpos = dpos2; 1334 nfsm_mtouio(uiop, siz); 1335 uiop->uio_offset = off; 1336 } else 1337 more_dirs = 0; /* Ugh, never happens, but in case.. */ 1338 m_freem(mrep); 1339 } 1340 /* 1341 * Fill last record, iff any, out to a multiple of DIRBLKSIZ 1342 * by increasing d_reclen for the last record. 1343 */ 1344 if (uiop->uio_resid < tresid) { 1345 len = uiop->uio_resid & (DIRBLKSIZ - 1); 1346 if (len > 0) { 1347 dp = (struct direct *) 1348 (uiop->uio_iov->iov_base - lastlen); 1349 dp->d_reclen += len; 1350 uiop->uio_iov->iov_base += len; 1351 uiop->uio_iov->iov_len -= len; 1352 uiop->uio_resid -= len; 1353 } 1354 } 1355 nfsmout: 1356 return (error); 1357 } 1358 1359 static char hextoasc[] = "0123456789abcdef"; 1360 1361 /* 1362 * Silly rename. To make the NFS filesystem that is stateless look a little 1363 * more like the "ufs" a remove of an active vnode is translated to a rename 1364 * to a funny looking filename that is removed by nfs_inactive on the 1365 * nfsnode. There is the potential for another process on a different client 1366 * to create the same funny name between the nfs_lookitup() fails and the 1367 * nfs_rename() completes, but... 1368 */ 1369 nfs_sillyrename(ndp, flag) 1370 register struct nameidata *ndp; 1371 int flag; 1372 { 1373 register struct nfsnode *np; 1374 register struct sillyrename *sp; 1375 register struct nameidata *tndp; 1376 int error; 1377 short pid; 1378 1379 np = VTONFS(ndp->ni_dvp); 1380 cache_purge(ndp->ni_dvp); 1381 MALLOC(sp, struct sillyrename *, sizeof (struct sillyrename), 1382 M_TEMP, M_WAITOK); 1383 sp->s_flag = flag; 1384 bcopy((caddr_t)&np->n_fh, (caddr_t)&sp->s_fh, NFSX_FH); 1385 np = VTONFS(ndp->ni_vp); 1386 tndp = &sp->s_namei; 1387 tndp->ni_cred = crdup(ndp->ni_cred); 1388 1389 /* Fudge together a funny name */ 1390 pid = u.u_procp->p_pid; 1391 bcopy(".nfsAxxxx4.4", tndp->ni_dent.d_name, 13); 1392 tndp->ni_dent.d_namlen = 12; 1393 tndp->ni_dent.d_name[8] = hextoasc[pid & 0xf]; 1394 tndp->ni_dent.d_name[7] = hextoasc[(pid >> 4) & 0xf]; 1395 tndp->ni_dent.d_name[6] = hextoasc[(pid >> 8) & 0xf]; 1396 tndp->ni_dent.d_name[5] = hextoasc[(pid >> 12) & 0xf]; 1397 1398 /* Try lookitups until we get one that isn't there */ 1399 while (nfs_lookitup(ndp->ni_dvp, tndp, (nfsv2fh_t *)0) == 0) { 1400 tndp->ni_dent.d_name[4]++; 1401 if (tndp->ni_dent.d_name[4] > 'z') { 1402 error = EINVAL; 1403 goto bad; 1404 } 1405 } 1406 if (error = nfs_renameit(ndp, tndp)) 1407 goto bad; 1408 nfs_lookitup(ndp->ni_dvp, tndp, &np->n_fh); 1409 np->n_sillyrename = sp; 1410 return (0); 1411 bad: 1412 crfree(tndp->ni_cred); 1413 free((caddr_t)sp, M_TEMP); 1414 return (error); 1415 } 1416 1417 /* 1418 * Look up a file name for silly rename stuff. 1419 * Just like nfs_lookup() except that it doesn't load returned values 1420 * into the nfsnode table. 1421 * If fhp != NULL it copies the returned file handle out 1422 */ 1423 nfs_lookitup(vp, ndp, fhp) 1424 register struct vnode *vp; 1425 register struct nameidata *ndp; 1426 nfsv2fh_t *fhp; 1427 { 1428 register u_long *p; 1429 register caddr_t cp; 1430 register long t1, t2; 1431 caddr_t bpos, dpos, cp2; 1432 u_long xid; 1433 int error = 0; 1434 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1435 long len; 1436 1437 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 1438 ndp->ni_dvp = vp; 1439 ndp->ni_vp = NULL; 1440 len = ndp->ni_dent.d_namlen; 1441 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 1442 nfsm_fhtom(vp); 1443 nfsm_strtom(ndp->ni_dent.d_name, len, NFS_MAXNAMLEN); 1444 nfsm_request(vp, NFSPROC_LOOKUP, u.u_procp, 1); 1445 if (fhp != NULL) { 1446 nfsm_disect(cp, caddr_t, NFSX_FH); 1447 bcopy(cp, (caddr_t)fhp, NFSX_FH); 1448 } 1449 nfsm_reqdone; 1450 return (error); 1451 } 1452 1453 /* 1454 * Kludge City.. 1455 * - make nfs_bmap() essentially a no-op that does no translation 1456 * - do nfs_strategy() by faking physical I/O with nfs_readrpc/nfs_writerpc 1457 * after mapping the physical addresses into Kernel Virtual space in the 1458 * nfsiobuf area. 1459 * (Maybe I could use the process's page mapping, but I was concerned that 1460 * Kernel Write might not be enabled and also figured copyout() would do 1461 * a lot more work than bcopy() and also it currently happens in the 1462 * context of the swapper process (2). 1463 */ 1464 nfs_bmap(vp, bn, vpp, bnp) 1465 struct vnode *vp; 1466 daddr_t bn; 1467 struct vnode **vpp; 1468 daddr_t *bnp; 1469 { 1470 if (vpp != NULL) 1471 *vpp = vp; 1472 if (bnp != NULL) 1473 *bnp = bn * btodb(vp->v_mount->mnt_stat.f_bsize); 1474 return (0); 1475 } 1476 1477 /* 1478 * Strategy routine for phys. i/o 1479 * If the biod's are running, queue a request 1480 * otherwise just call nfs_doio() to get it done 1481 */ 1482 nfs_strategy(bp) 1483 register struct buf *bp; 1484 { 1485 register struct buf *dp; 1486 register int i; 1487 struct proc *rp; 1488 int error = 0; 1489 int fnd = 0; 1490 1491 /* 1492 * Set b_proc. It seems a bit silly to do it here, but since bread() 1493 * doesn't set it, I will. 1494 * Set b_proc == NULL for asynchronous reads, since these may still 1495 * be hanging about after the process terminates. 1496 */ 1497 if ((bp->b_flags & (B_READ | B_ASYNC)) == (B_READ | B_ASYNC)) 1498 bp->b_proc = (struct proc *)0; 1499 else 1500 bp->b_proc = u.u_procp; 1501 1502 /* 1503 * If an i/o daemon is waiting 1504 * queue the request, wake it up and wait for completion 1505 * otherwise just do it ourselves 1506 */ 1507 for (i = 0; i < nfs_asyncdaemons; i++) { 1508 if (rp = nfs_iodwant[i]) { 1509 /* 1510 * Ensure that the async_daemon is still waiting here 1511 */ 1512 if (rp->p_stat != SSLEEP || 1513 rp->p_wchan != ((caddr_t)&nfs_iodwant[i])) { 1514 nfs_iodwant[i] = (struct proc *)0; 1515 continue; 1516 } 1517 dp = &nfs_bqueue; 1518 if (dp->b_actf == NULL) { 1519 dp->b_actl = bp; 1520 bp->b_actf = dp; 1521 } else { 1522 dp->b_actf->b_actl = bp; 1523 bp->b_actf = dp->b_actf; 1524 } 1525 dp->b_actf = bp; 1526 bp->b_actl = dp; 1527 fnd++; 1528 nfs_iodwant[i] = (struct proc *)0; 1529 wakeup((caddr_t)&nfs_iodwant[i]); 1530 break; 1531 } 1532 } 1533 if (!fnd) 1534 error = nfs_doio(bp); 1535 return (error); 1536 } 1537 1538 /* 1539 * Fun and games with i/o 1540 * Essentially play ubasetup() and disk interrupt service routine by 1541 * mapping the data buffer into kernel virtual space and doing the 1542 * nfs read or write rpc's from it. 1543 * If the nfsiod's are not running, this is just called from nfs_strategy(), 1544 * otherwise it is called by the nfsiods to do what would normally be 1545 * partially disk interrupt driven. 1546 */ 1547 nfs_doio(bp) 1548 register struct buf *bp; 1549 { 1550 register struct uio *uiop; 1551 register struct vnode *vp; 1552 struct nfsnode *np; 1553 struct ucred *cr; 1554 struct proc *rp; 1555 int error; 1556 struct uio uio; 1557 struct iovec io; 1558 #if !defined(hp300) && !defined(i386) 1559 register struct pte *pte, *ppte; 1560 register caddr_t vaddr; 1561 int npf, npf2; 1562 int reg, o; 1563 caddr_t vbase; 1564 unsigned v; 1565 #endif 1566 1567 vp = bp->b_vp; 1568 np = VTONFS(vp); 1569 uiop = &uio; 1570 uiop->uio_iov = &io; 1571 uiop->uio_iovcnt = 1; 1572 uiop->uio_segflg = UIO_SYSSPACE; 1573 1574 /* 1575 * For phys i/o, map the b_addr into kernel virtual space using 1576 * the Nfsiomap pte's 1577 * Also, add a temporary b_rcred for reading using the process's uid 1578 * and a guess at a group 1579 */ 1580 if (bp->b_flags & B_PHYS) { 1581 bp->b_rcred = cr = crget(); 1582 rp = (bp->b_flags & B_DIRTY) ? &proc[2] : bp->b_proc; 1583 cr->cr_uid = rp->p_uid; 1584 cr->cr_gid = 0; /* Anything ?? */ 1585 cr->cr_ngroups = 1; 1586 #if defined(hp300) || defined(i386) 1587 /* mapping was already done by vmapbuf */ 1588 io.iov_base = bp->b_un.b_addr; 1589 #else 1590 o = (int)bp->b_un.b_addr & PGOFSET; 1591 npf2 = npf = btoc(bp->b_bcount + o); 1592 1593 /* 1594 * Get some mapping page table entries 1595 */ 1596 while ((reg = rmalloc(nfsmap, (long)npf)) == 0) { 1597 nfsmap_want++; 1598 (void) tsleep((caddr_t)&nfsmap_want, PZERO-1, "nfsmap", 1599 0); 1600 } 1601 reg--; 1602 if (bp->b_flags & B_PAGET) 1603 pte = &Usrptmap[btokmx((struct pte *)bp->b_un.b_addr)]; 1604 else { 1605 v = btop(bp->b_un.b_addr); 1606 if (bp->b_flags & B_UAREA) 1607 pte = &rp->p_addr[v]; 1608 else 1609 pte = vtopte(rp, v); 1610 } 1611 1612 /* 1613 * Play vmaccess() but with the Nfsiomap page table 1614 */ 1615 ppte = &Nfsiomap[reg]; 1616 vbase = vaddr = &nfsiobuf[reg*NBPG]; 1617 while (npf != 0) { 1618 mapin(ppte, (u_int)vaddr, pte->pg_pfnum, (int)(PG_V|PG_KW)); 1619 #if defined(tahoe) 1620 mtpr(P1DC, vaddr); 1621 #endif 1622 ppte++; 1623 pte++; 1624 vaddr += NBPG; 1625 --npf; 1626 } 1627 io.iov_base = vbase+o; 1628 #endif /* !defined(hp300) */ 1629 1630 /* 1631 * And do the i/o rpc 1632 */ 1633 io.iov_len = uiop->uio_resid = bp->b_bcount; 1634 uiop->uio_offset = bp->b_blkno * DEV_BSIZE; 1635 if (bp->b_flags & B_READ) { 1636 uiop->uio_rw = UIO_READ; 1637 nfsstats.read_physios++; 1638 bp->b_error = error = nfs_readrpc(vp, uiop, 1639 bp->b_rcred, bp->b_proc); 1640 /* 1641 * If a text file has been modified since it was exec'd 1642 * blow the process' out of the water. This is the 1643 * closest we can come to "Text File Busy" in good old 1644 * stateless nfs. 1645 */ 1646 if ((vp->v_flag & VTEXT) && 1647 (vp->v_text->x_mtime != np->n_vattr.va_mtime.tv_sec)) 1648 xinval(vp); 1649 } else { 1650 uiop->uio_rw = UIO_WRITE; 1651 nfsstats.write_physios++; 1652 bp->b_error = error = nfs_writerpc(vp, uiop, 1653 bp->b_wcred, bp->b_proc); 1654 } 1655 1656 /* 1657 * Finally, release pte's used by physical i/o 1658 */ 1659 crfree(cr); 1660 #if !defined(hp300) && !defined(i386) 1661 rmfree(nfsmap, (long)npf2, (long)++reg); 1662 if (nfsmap_want) { 1663 nfsmap_want = 0; 1664 wakeup((caddr_t)&nfsmap_want); 1665 } 1666 #endif 1667 } else { 1668 if (bp->b_flags & B_READ) { 1669 io.iov_len = uiop->uio_resid = bp->b_bcount; 1670 io.iov_base = bp->b_un.b_addr; 1671 uiop->uio_rw = UIO_READ; 1672 switch (vp->v_type) { 1673 case VREG: 1674 uiop->uio_offset = bp->b_blkno * DEV_BSIZE; 1675 nfsstats.read_bios++; 1676 error = nfs_readrpc(vp, uiop, bp->b_rcred, 1677 bp->b_proc); 1678 break; 1679 case VLNK: 1680 uiop->uio_offset = 0; 1681 nfsstats.readlink_bios++; 1682 error = nfs_readlinkrpc(vp, uiop, bp->b_rcred, 1683 bp->b_proc); 1684 break; 1685 case VDIR: 1686 uiop->uio_offset = bp->b_lblkno; 1687 nfsstats.readdir_bios++; 1688 error = nfs_readdirrpc(vp, uiop, bp->b_rcred, 1689 bp->b_proc); 1690 /* 1691 * Save offset cookie in b_blkno. 1692 */ 1693 bp->b_blkno = uiop->uio_offset; 1694 break; 1695 }; 1696 bp->b_error = error; 1697 } else { 1698 io.iov_len = uiop->uio_resid = bp->b_dirtyend 1699 - bp->b_dirtyoff; 1700 uiop->uio_offset = (bp->b_blkno * DEV_BSIZE) 1701 + bp->b_dirtyoff; 1702 io.iov_base = bp->b_un.b_addr + bp->b_dirtyoff; 1703 uiop->uio_rw = UIO_WRITE; 1704 nfsstats.write_bios++; 1705 bp->b_error = error = nfs_writerpc(vp, uiop, 1706 bp->b_wcred, bp->b_proc); 1707 if (error) { 1708 np->n_error = error; 1709 np->n_flag |= NWRITEERR; 1710 } 1711 bp->b_dirtyoff = bp->b_dirtyend = 0; 1712 } 1713 } 1714 if (error) 1715 bp->b_flags |= B_ERROR; 1716 bp->b_resid = uiop->uio_resid; 1717 biodone(bp); 1718 return (error); 1719 } 1720 1721 /* 1722 * Flush all the blocks associated with a vnode. 1723 * Walk through the buffer pool and push any dirty pages 1724 * associated with the vnode. 1725 */ 1726 /* ARGSUSED */ 1727 nfs_fsync(vp, fflags, cred, waitfor) 1728 register struct vnode *vp; 1729 int fflags; 1730 struct ucred *cred; 1731 int waitfor; 1732 { 1733 register struct nfsnode *np = VTONFS(vp); 1734 int error = 0; 1735 1736 if (np->n_flag & NMODIFIED) { 1737 np->n_flag &= ~NMODIFIED; 1738 vflushbuf(vp, waitfor == MNT_WAIT ? B_SYNC : 0); 1739 } 1740 if (!error && (np->n_flag & NWRITEERR)) 1741 error = np->n_error; 1742 return (error); 1743 } 1744 1745 /* 1746 * Print out the contents of an nfsnode. 1747 */ 1748 nfs_print(vp) 1749 struct vnode *vp; 1750 { 1751 register struct nfsnode *np = VTONFS(vp); 1752 1753 printf("tag VT_NFS, fileid %d fsid 0x%x", 1754 np->n_vattr.va_fileid, np->n_vattr.va_fsid); 1755 #ifdef FIFO 1756 if (vp->v_type == VFIFO) 1757 fifo_printinfo(vp); 1758 #endif /* FIFO */ 1759 printf("%s\n", (np->n_flag & NLOCKED) ? " (LOCKED)" : ""); 1760 if (np->n_lockholder == 0) 1761 return; 1762 printf("\towner pid %d", np->n_lockholder); 1763 if (np->n_lockwaiter) 1764 printf(" waiting pid %d", np->n_lockwaiter); 1765 printf("\n"); 1766 } 1767