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