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