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 * Redistribution and use in source and binary forms are permitted 9 * provided that the above copyright notice and this paragraph are 10 * duplicated in all such forms and that any documentation, 11 * advertising materials, and other materials related to such 12 * distribution and use acknowledge that the software was developed 13 * by the University of California, Berkeley. The name of the 14 * University may not be used to endorse or promote products derived 15 * from this software without specific prior written permission. 16 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED 18 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. 19 * 20 * @(#)nfs_vnops.c 7.18 (Berkeley) 12/19/89 21 */ 22 23 /* 24 * vnode op calls for sun nfs version 2 25 */ 26 27 #include "machine/pte.h" 28 #include "machine/mtpr.h" 29 #include "strings.h" 30 #include "param.h" 31 #include "user.h" 32 #include "proc.h" 33 #include "mount.h" 34 #include "buf.h" 35 #include "vm.h" 36 #include "../ufs/dir.h" 37 #include "malloc.h" 38 #include "mbuf.h" 39 #include "uio.h" 40 #include "ucred.h" 41 #include "namei.h" 42 #include "errno.h" 43 #include "file.h" 44 #include "conf.h" 45 #include "vnode.h" 46 #include "../ufs/inode.h" 47 #include "map.h" 48 #include "nfsv2.h" 49 #include "nfs.h" 50 #include "nfsnode.h" 51 #include "nfsmount.h" 52 #include "xdr_subs.h" 53 #include "nfsm_subs.h" 54 #include "nfsiom.h" 55 56 /* Defs */ 57 #define TRUE 1 58 #define FALSE 0 59 60 /* Global vars */ 61 int nfs_lookup(), 62 nfs_create(), 63 nfs_mknod(), 64 nfs_open(), 65 nfs_close(), 66 nfs_access(), 67 nfs_getattr(), 68 nfs_setattr(), 69 nfs_read(), 70 nfs_write(), 71 vfs_noop(), 72 vfs_nullop(), 73 nfs_remove(), 74 nfs_link(), 75 nfs_rename(), 76 nfs_mkdir(), 77 nfs_rmdir(), 78 nfs_symlink(), 79 nfs_readdir(), 80 nfs_readlink(), 81 nfs_abortop(), 82 nfs_lock(), 83 nfs_unlock(), 84 nfs_bmap(), 85 nfs_strategy(), 86 nfs_fsync(), 87 nfs_inactive(), 88 nfs_reclaim(), 89 nfs_print(); 90 91 struct vnodeops nfsv2_vnodeops = { 92 nfs_lookup, /* lookup */ 93 nfs_create, /* create */ 94 nfs_mknod, /* mknod */ 95 nfs_open, /* open */ 96 nfs_close, /* close */ 97 nfs_access, /* access */ 98 nfs_getattr, /* getattr */ 99 nfs_setattr, /* setattr */ 100 nfs_read, /* read */ 101 nfs_write, /* write */ 102 vfs_noop, /* ioctl */ 103 vfs_noop, /* select */ 104 vfs_noop, /* mmap */ 105 nfs_fsync, /* fsync */ 106 vfs_nullop, /* seek */ 107 nfs_remove, /* remove */ 108 nfs_link, /* link */ 109 nfs_rename, /* rename */ 110 nfs_mkdir, /* mkdir */ 111 nfs_rmdir, /* rmdir */ 112 nfs_symlink, /* symlink */ 113 nfs_readdir, /* readdir */ 114 nfs_readlink, /* readlink */ 115 nfs_abortop, /* abortop */ 116 nfs_inactive, /* inactive */ 117 nfs_reclaim, /* reclaim */ 118 nfs_lock, /* lock */ 119 nfs_unlock, /* unlock */ 120 nfs_bmap, /* bmap */ 121 nfs_strategy, /* strategy */ 122 nfs_print, /* print */ 123 }; 124 125 /* Special device vnode ops */ 126 int spec_lookup(), 127 spec_open(), 128 spec_read(), 129 spec_write(), 130 spec_strategy(), 131 spec_bmap(), 132 spec_ioctl(), 133 spec_select(), 134 spec_close(), 135 spec_badop(), 136 spec_nullop(); 137 138 struct vnodeops spec_nfsv2nodeops = { 139 spec_lookup, /* lookup */ 140 spec_badop, /* create */ 141 spec_badop, /* mknod */ 142 spec_open, /* open */ 143 spec_close, /* close */ 144 nfs_access, /* access */ 145 nfs_getattr, /* getattr */ 146 nfs_setattr, /* setattr */ 147 spec_read, /* read */ 148 spec_write, /* write */ 149 spec_ioctl, /* ioctl */ 150 spec_select, /* select */ 151 spec_badop, /* mmap */ 152 spec_nullop, /* fsync */ 153 spec_badop, /* seek */ 154 spec_badop, /* remove */ 155 spec_badop, /* link */ 156 spec_badop, /* rename */ 157 spec_badop, /* mkdir */ 158 spec_badop, /* rmdir */ 159 spec_badop, /* symlink */ 160 spec_badop, /* readdir */ 161 spec_badop, /* readlink */ 162 spec_badop, /* abortop */ 163 nfs_inactive, /* inactive */ 164 nfs_reclaim, /* reclaim */ 165 nfs_lock, /* lock */ 166 nfs_unlock, /* unlock */ 167 spec_bmap, /* bmap */ 168 spec_strategy, /* strategy */ 169 nfs_print, /* print */ 170 }; 171 172 extern u_long nfs_procids[NFS_NPROCS]; 173 extern u_long nfs_prog, nfs_vers; 174 extern char nfsiobuf[MAXPHYS+NBPG]; 175 struct map nfsmap[NFS_MSIZ]; 176 enum vtype v_type[NFLNK+1]; 177 struct buf nfs_bqueue; /* Queue head for nfsiod's */ 178 int nfs_asyncdaemons = 0; 179 struct proc *nfs_iodwant[MAX_ASYNCDAEMON]; 180 static int nfsmap_want = 0; 181 182 /* 183 * nfs null call from vfs. 184 */ 185 nfs_null(vp, cred) 186 struct vnode *vp; 187 struct ucred *cred; 188 { 189 caddr_t bpos, dpos; 190 u_long xid; 191 int error = 0; 192 struct mbuf *mreq, *mrep, *md, *mb; 193 194 nfsm_reqhead(nfs_procids[NFSPROC_NULL], cred, 0); 195 nfsm_request(vp); 196 nfsm_reqdone; 197 return (error); 198 } 199 200 /* 201 * nfs access vnode op. 202 * Essentially just get vattr and then imitate iaccess() 203 */ 204 nfs_access(vp, mode, cred) 205 struct vnode *vp; 206 int mode; 207 register struct ucred *cred; 208 { 209 register struct vattr *vap; 210 register gid_t *gp; 211 struct vattr vattr; 212 register int i; 213 int error; 214 215 /* 216 * If you're the super-user, 217 * you always get access. 218 */ 219 if (cred->cr_uid == 0) 220 return (0); 221 vap = &vattr; 222 if (error = nfs_getattr(vp, vap, cred)) 223 return (error); 224 /* 225 * Access check is based on only one of owner, group, public. 226 * If not owner, then check group. If not a member of the 227 * group, then check public access. 228 */ 229 if (cred->cr_uid != vap->va_uid) { 230 mode >>= 3; 231 gp = cred->cr_groups; 232 for (i = 0; i < cred->cr_ngroups; i++, gp++) 233 if (vap->va_gid == *gp) 234 goto found; 235 mode >>= 3; 236 found: 237 ; 238 } 239 if ((vap->va_mode & mode) != 0) 240 return (0); 241 return (EACCES); 242 } 243 244 /* 245 * nfs open vnode op 246 * Just check to see if the type is ok 247 */ 248 /* ARGSUSED */ 249 nfs_open(vp, mode, cred) 250 struct vnode *vp; 251 int mode; 252 struct ucred *cred; 253 { 254 register enum vtype vtyp; 255 256 vtyp = vp->v_type; 257 if (vtyp == VREG || vtyp == VDIR || vtyp == VLNK) 258 return (0); 259 else 260 return (EACCES); 261 } 262 263 /* 264 * nfs close vnode op 265 * For reg files, invalidate any buffer cache entries. 266 */ 267 /* ARGSUSED */ 268 nfs_close(vp, fflags, cred) 269 register struct vnode *vp; 270 int fflags; 271 struct ucred *cred; 272 { 273 register struct nfsnode *np = VTONFS(vp); 274 int error = 0; 275 276 if (vp->v_type == VREG && ((np->n_flag & NMODIFIED) || 277 ((np->n_flag & NBUFFERED) && np->n_sillyrename))) { 278 nfs_lock(vp); 279 np->n_flag &= ~(NMODIFIED|NBUFFERED); 280 error = nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE); 281 if (np->n_flag & NWRITEERR) { 282 np->n_flag &= ~NWRITEERR; 283 if (!error) 284 error = np->n_error ? np->n_error : EIO; 285 } 286 nfs_unlock(vp); 287 } 288 return (error); 289 } 290 291 /* 292 * nfs getattr call from vfs. 293 */ 294 nfs_getattr(vp, vap, cred) 295 register struct vnode *vp; 296 struct vattr *vap; 297 struct ucred *cred; 298 { 299 register caddr_t cp; 300 register long t1; 301 caddr_t bpos, dpos; 302 u_long xid; 303 int error = 0; 304 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 305 306 /* First look in the cache.. */ 307 if (nfs_getattrcache(vp, vap) == 0) 308 return (0); 309 nfsstats.rpccnt[NFSPROC_GETATTR]++; 310 nfsm_reqhead(nfs_procids[NFSPROC_GETATTR], cred, NFSX_FH); 311 nfsm_fhtom(vp); 312 nfsm_request(vp); 313 nfsm_loadattr(vp, vap); 314 nfsm_reqdone; 315 return (error); 316 } 317 318 /* 319 * nfs setattr call. 320 */ 321 nfs_setattr(vp, vap, cred) 322 register struct vnode *vp; 323 register struct vattr *vap; 324 struct ucred *cred; 325 { 326 register struct nfsv2_sattr *sp; 327 register caddr_t cp; 328 register long t1; 329 caddr_t bpos, dpos; 330 u_long xid; 331 int error = 0; 332 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 333 struct nfsnode *np; 334 335 nfsstats.rpccnt[NFSPROC_SETATTR]++; 336 nfsm_reqhead(nfs_procids[NFSPROC_SETATTR], cred, NFSX_FH+NFSX_SATTR); 337 nfsm_fhtom(vp); 338 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 339 if (vap->va_mode == 0xffff) 340 sp->sa_mode = VNOVAL; 341 else 342 sp->sa_mode = vtonfs_mode(vp->v_type, vap->va_mode); 343 if (vap->va_uid == 0xffff) 344 sp->sa_uid = VNOVAL; 345 else 346 sp->sa_uid = txdr_unsigned(vap->va_uid); 347 if (vap->va_gid == 0xffff) 348 sp->sa_gid = VNOVAL; 349 else 350 sp->sa_gid = txdr_unsigned(vap->va_gid); 351 sp->sa_size = txdr_unsigned(vap->va_size); 352 if (vap->va_size != VNOVAL) { 353 np = VTONFS(vp); 354 if (np->n_flag & NMODIFIED) { 355 np->n_flag &= ~NMODIFIED; 356 nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE); 357 } 358 } 359 txdr_time(&vap->va_atime, &sp->sa_atime); 360 txdr_time(&vap->va_mtime, &sp->sa_mtime); 361 nfsm_request(vp); 362 nfsm_loadattr(vp, (struct vattr *)0); 363 /* should we fill in any vap fields ?? */ 364 nfsm_reqdone; 365 return (error); 366 } 367 368 /* 369 * nfs lookup call, one step at a time... 370 * First look in cache 371 * If not found, unlock the directory nfsnode and do the rpc 372 */ 373 nfs_lookup(vp, ndp) 374 register struct vnode *vp; 375 register struct nameidata *ndp; 376 { 377 register struct vnode *vdp; 378 register u_long *p; 379 register caddr_t cp; 380 register long t1, t2; 381 caddr_t bpos, dpos, cp2; 382 u_long xid; 383 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 384 struct vnode *newvp; 385 long len; 386 nfsv2fh_t *fhp; 387 struct nfsnode *np; 388 int lockparent, wantparent, flag, error = 0; 389 390 ndp->ni_dvp = vp; 391 ndp->ni_vp = NULL; 392 if (vp->v_type != VDIR) 393 return (ENOTDIR); 394 lockparent = ndp->ni_nameiop & LOCKPARENT; 395 flag = ndp->ni_nameiop & OPFLAG; 396 wantparent = ndp->ni_nameiop & (LOCKPARENT|WANTPARENT); 397 if ((error = cache_lookup(ndp)) && error != ENOENT) { 398 struct vattr vattr; 399 int vpid; 400 401 if (vp == ndp->ni_rdir && ndp->ni_isdotdot) 402 panic("nfs_lookup: .. through root"); 403 vdp = ndp->ni_vp; 404 vpid = vdp->v_id; 405 /* 406 * See the comment starting `Step through' in ufs/ufs_lookup.c 407 * for an explanation of the locking protocol 408 */ 409 if (vp == vdp) { 410 VREF(vdp); 411 error = 0; 412 } else if (ndp->ni_isdotdot) { 413 nfs_unlock(vp); 414 error = vget(vdp); 415 } else { 416 error = vget(vdp); 417 nfs_unlock(vp); 418 } 419 if (!error) { 420 if (vpid == vdp->v_id && 421 !nfs_getattr(vdp, &vattr, ndp->ni_cred)) { 422 nfsstats.lookupcache_hits++; 423 return (0); 424 } else { 425 nfs_nput(vdp); 426 } 427 } 428 nfs_lock(vp); 429 ndp->ni_vp = (struct vnode *)0; 430 } 431 error = 0; 432 nfsstats.lookupcache_misses++; 433 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 434 len = ndp->ni_namelen; 435 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 436 nfsm_fhtom(vp); 437 nfsm_strtom(ndp->ni_ptr, len, NFS_MAXNAMLEN); 438 nfsm_request(vp); 439 nfsmout: 440 if (error) { 441 if ((flag == CREATE || flag == RENAME) && 442 *ndp->ni_next == 0) { 443 if (!lockparent) 444 nfs_unlock(vp); 445 } 446 return (ENOENT); 447 } 448 nfsm_disect(fhp,nfsv2fh_t *,NFSX_FH); 449 450 /* 451 * Handle DELETE and RENAME cases... 452 */ 453 if (flag == DELETE && *ndp->ni_next == 0) { 454 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 455 VREF(vp); 456 newvp = vp; 457 np = VTONFS(vp); 458 } else { 459 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 460 m_freem(mrep); 461 return (error); 462 } 463 newvp = NFSTOV(np); 464 } 465 if (error = 466 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 467 if (newvp != vp) 468 nfs_nput(newvp); 469 else 470 vrele(vp); 471 m_freem(mrep); 472 return (error); 473 } 474 ndp->ni_vp = newvp; 475 if (!lockparent) 476 nfs_unlock(vp); 477 m_freem(mrep); 478 return (0); 479 } 480 481 if (flag == RENAME && wantparent && *ndp->ni_next == 0) { 482 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 483 m_freem(mrep); 484 return (EISDIR); 485 } 486 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 487 m_freem(mrep); 488 return (error); 489 } 490 newvp = NFSTOV(np); 491 if (error = 492 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 493 nfs_nput(newvp); 494 m_freem(mrep); 495 return (error); 496 } 497 ndp->ni_vp = newvp; 498 if (!lockparent) 499 nfs_unlock(vp); 500 return (0); 501 } 502 503 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 504 VREF(vp); 505 newvp = vp; 506 np = VTONFS(vp); 507 } else if (ndp->ni_isdotdot) { 508 nfs_unlock(vp); 509 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 510 nfs_lock(vp); 511 m_freem(mrep); 512 return (error); 513 } 514 nfs_lock(vp); 515 newvp = NFSTOV(np); 516 } else { 517 if (error = nfs_nget(vp->v_mount, fhp, &np)) { 518 m_freem(mrep); 519 return (error); 520 } 521 newvp = NFSTOV(np); 522 } 523 if (error = nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 524 if (newvp != vp) 525 nfs_nput(newvp); 526 else 527 vrele(vp); 528 m_freem(mrep); 529 return (error); 530 } 531 m_freem(mrep); 532 533 if (vp != newvp && (!lockparent || *ndp->ni_next != '\0')) 534 nfs_unlock(vp); 535 ndp->ni_vp = newvp; 536 if (error == 0 && ndp->ni_makeentry) 537 cache_enter(ndp); 538 return (error); 539 } 540 541 /* 542 * nfs readlink call 543 */ 544 nfs_readlink(vp, uiop, cred) 545 register struct vnode *vp; 546 struct uio *uiop; 547 struct ucred *cred; 548 { 549 register u_long *p; 550 register caddr_t cp; 551 register long t1; 552 caddr_t bpos, dpos, cp2; 553 u_long xid; 554 int error = 0; 555 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 556 long len; 557 558 nfsstats.rpccnt[NFSPROC_READLINK]++; 559 nfsm_reqhead(nfs_procids[NFSPROC_READLINK], cred, NFSX_FH); 560 nfsm_fhtom(vp); 561 nfsm_request(vp); 562 nfsm_strsiz(len, NFS_MAXPATHLEN); 563 nfsm_mtouio(uiop, len); 564 nfsm_reqdone; 565 return (error); 566 } 567 568 /* 569 * nfs read call 570 */ 571 nfs_readrpc(vp, uiop, cred) 572 register struct vnode *vp; 573 struct uio *uiop; 574 struct ucred *cred; 575 { 576 register u_long *p; 577 register caddr_t cp; 578 register long t1; 579 caddr_t bpos, dpos, cp2; 580 u_long xid; 581 int error = 0; 582 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 583 struct nfsmount *nmp; 584 long len, retlen, tsiz; 585 586 nmp = vfs_to_nfs(vp->v_mount); 587 tsiz = uiop->uio_resid; 588 while (tsiz > 0) { 589 nfsstats.rpccnt[NFSPROC_READ]++; 590 len = (tsiz > nmp->nm_rsize) ? nmp->nm_rsize : tsiz; 591 nfsm_reqhead(nfs_procids[NFSPROC_READ], cred, NFSX_FH+NFSX_UNSIGNED*3); 592 nfsm_fhtom(vp); 593 nfsm_build(p, u_long *, NFSX_UNSIGNED*3); 594 *p++ = txdr_unsigned(uiop->uio_offset); 595 *p++ = txdr_unsigned(len); 596 *p = 0; 597 nfsm_request(vp); 598 nfsm_loadattr(vp, (struct vattr *)0); 599 nfsm_strsiz(retlen, nmp->nm_rsize); 600 nfsm_mtouio(uiop, retlen); 601 m_freem(mrep); 602 if (retlen < len) 603 tsiz = 0; 604 else 605 tsiz -= len; 606 } 607 nfsmout: 608 return (error); 609 } 610 611 /* 612 * nfs write call 613 */ 614 nfs_writerpc(vp, uiop, cred) 615 register struct vnode *vp; 616 struct uio *uiop; 617 struct ucred *cred; 618 { 619 register u_long *p; 620 register caddr_t cp; 621 register long t1; 622 caddr_t bpos, dpos; 623 u_long xid; 624 int error = 0; 625 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 626 struct nfsmount *nmp; 627 long len, tsiz; 628 629 nmp = vfs_to_nfs(vp->v_mount); 630 tsiz = uiop->uio_resid; 631 while (tsiz > 0) { 632 nfsstats.rpccnt[NFSPROC_WRITE]++; 633 len = (tsiz > nmp->nm_wsize) ? nmp->nm_wsize : tsiz; 634 nfsm_reqhead(nfs_procids[NFSPROC_WRITE], cred, 635 NFSX_FH+NFSX_UNSIGNED*4); 636 nfsm_fhtom(vp); 637 nfsm_build(p, u_long *, NFSX_UNSIGNED*4); 638 *(p+1) = txdr_unsigned(uiop->uio_offset); 639 *(p+3) = txdr_unsigned(len); 640 nfsm_uiotom(uiop, len); 641 nfsm_request(vp); 642 nfsm_loadattr(vp, (struct vattr *)0); 643 m_freem(mrep); 644 tsiz -= len; 645 } 646 nfsmout: 647 return (error); 648 } 649 650 /* 651 * nfs mknod call 652 * This call is currently not supported. 653 */ 654 /* ARGSUSED */ 655 nfs_mknod(ndp, vap, cred) 656 struct nameidata *ndp; 657 struct ucred *cred; 658 struct vattr *vap; 659 { 660 661 nfs_abortop(ndp); 662 return (EOPNOTSUPP); 663 } 664 665 /* 666 * nfs file create call 667 */ 668 nfs_create(ndp, vap) 669 register struct nameidata *ndp; 670 register struct vattr *vap; 671 { 672 register struct nfsv2_sattr *sp; 673 register u_long *p; 674 register caddr_t cp; 675 register long t1, t2; 676 caddr_t bpos, dpos, cp2; 677 u_long xid; 678 int error = 0; 679 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 680 681 nfsstats.rpccnt[NFSPROC_CREATE]++; 682 nfsm_reqhead(nfs_procids[NFSPROC_CREATE], ndp->ni_cred, 683 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR); 684 nfsm_fhtom(ndp->ni_dvp); 685 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 686 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 687 sp->sa_mode = vtonfs_mode(VREG, vap->va_mode); 688 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 689 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 690 sp->sa_size = txdr_unsigned(0); 691 /* or should these be VNOVAL ?? */ 692 txdr_time(&vap->va_atime, &sp->sa_atime); 693 txdr_time(&vap->va_mtime, &sp->sa_mtime); 694 nfsm_request(ndp->ni_dvp); 695 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp); 696 nfsm_reqdone; 697 nfs_nput(ndp->ni_dvp); 698 return (error); 699 } 700 701 /* 702 * nfs file remove call 703 * To try and make nfs semantics closer to vfs semantics, a file that has 704 * other references to the vnode is renamed instead of removed and then 705 * removed later on the last close. 706 * Unfortunately you must flush the buffer cache and cmap to get rid of 707 * all extraneous vnode references before you check the reference cnt. 708 * 1 - If the file could have blocks in the buffer cache 709 * flush them out and invalidate them 710 * mpurge the vnode to flush out cmap references 711 * (This is necessary to update the vnode ref cnt as well as sensible 712 * for actual removes, to free up the buffers) 713 * 2 - If v_count > 1 714 * If a rename is not already in the works 715 * call nfs_sillyrename() to set it up 716 * else 717 * do the remove rpc 718 */ 719 nfs_remove(ndp) 720 register struct nameidata *ndp; 721 { 722 register struct vnode *vp = ndp->ni_vp; 723 register struct nfsnode *np = VTONFS(ndp->ni_vp); 724 register u_long *p; 725 register caddr_t cp; 726 register long t1, t2; 727 caddr_t bpos, dpos; 728 u_long xid; 729 int error = 0; 730 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 731 732 if (vp->v_type == VREG) { 733 if (np->n_flag & (NMODIFIED|NBUFFERED)) { 734 np->n_flag &= ~(NMODIFIED|NBUFFERED); 735 nfs_blkflush(vp, (daddr_t)0, np->n_size, TRUE); 736 } 737 if (np->n_flag & NPAGEDON) 738 mpurge(vp); /* In case cmap entries still ref it */ 739 } 740 if (vp->v_count > 1) { 741 if (!np->n_sillyrename) 742 error = nfs_sillyrename(ndp, REMOVE); 743 } else { 744 nfsstats.rpccnt[NFSPROC_REMOVE]++; 745 nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred, 746 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 747 nfsm_fhtom(ndp->ni_dvp); 748 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 749 nfsm_request(ndp->ni_dvp); 750 nfsm_reqdone; 751 } 752 if (ndp->ni_dvp == ndp->ni_vp) 753 vrele(ndp->ni_vp); 754 else 755 nfs_nput(ndp->ni_vp); 756 nfs_nput(ndp->ni_dvp); 757 return (error); 758 } 759 760 /* 761 * nfs file remove rpc called from nfs_inactive 762 */ 763 nfs_removeit(ndp) 764 register struct nameidata *ndp; 765 { 766 register u_long *p; 767 register caddr_t cp; 768 register long t1, t2; 769 caddr_t bpos, dpos; 770 u_long xid; 771 int error = 0; 772 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 773 774 nfsstats.rpccnt[NFSPROC_REMOVE]++; 775 nfsm_reqhead(nfs_procids[NFSPROC_REMOVE], ndp->ni_cred, 776 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 777 nfsm_fhtom(ndp->ni_dvp); 778 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 779 nfsm_request(ndp->ni_dvp); 780 nfsm_reqdone; 781 return (error); 782 } 783 784 /* 785 * nfs file rename call 786 */ 787 nfs_rename(sndp, tndp) 788 register struct nameidata *sndp, *tndp; 789 { 790 register u_long *p; 791 register caddr_t cp; 792 register long t1, t2; 793 caddr_t bpos, dpos; 794 u_long xid; 795 int error = 0; 796 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 797 798 nfsstats.rpccnt[NFSPROC_RENAME]++; 799 nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred, 800 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+ 801 nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/ 802 nfsm_fhtom(sndp->ni_dvp); 803 nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 804 nfsm_fhtom(tndp->ni_dvp); 805 nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 806 nfsm_request(sndp->ni_dvp); 807 nfsm_reqdone; 808 if (sndp->ni_vp->v_type == VDIR) { 809 if (tndp->ni_vp != NULL && tndp->ni_vp->v_type == VDIR) 810 cache_purge(tndp->ni_dvp); 811 cache_purge(sndp->ni_dvp); 812 } 813 nfs_abortop(sndp); 814 nfs_abortop(tndp); 815 return (error); 816 } 817 818 /* 819 * nfs file rename rpc called from above 820 */ 821 nfs_renameit(sndp, tndp) 822 register struct nameidata *sndp, *tndp; 823 { 824 register u_long *p; 825 register caddr_t cp; 826 register long t1, t2; 827 caddr_t bpos, dpos; 828 u_long xid; 829 int error = 0; 830 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 831 832 nfsstats.rpccnt[NFSPROC_RENAME]++; 833 nfsm_reqhead(nfs_procids[NFSPROC_RENAME], tndp->ni_cred, 834 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(sndp->ni_dent.d_namlen)+ 835 nfsm_rndup(tndp->ni_dent.d_namlen)); /* or sndp->ni_cred?*/ 836 nfsm_fhtom(sndp->ni_dvp); 837 nfsm_strtom(sndp->ni_dent.d_name,sndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 838 nfsm_fhtom(tndp->ni_dvp); 839 nfsm_strtom(tndp->ni_dent.d_name,tndp->ni_dent.d_namlen,NFS_MAXNAMLEN); 840 nfsm_request(sndp->ni_dvp); 841 nfsm_reqdone; 842 return (error); 843 } 844 845 /* 846 * nfs hard link create call 847 */ 848 nfs_link(vp, ndp) 849 register struct vnode *vp; 850 register struct nameidata *ndp; 851 { 852 register u_long *p; 853 register caddr_t cp; 854 register long t1, t2; 855 caddr_t bpos, dpos; 856 u_long xid; 857 int error = 0; 858 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 859 860 if (ndp->ni_dvp != vp) 861 nfs_lock(vp); 862 nfsstats.rpccnt[NFSPROC_LINK]++; 863 nfsm_reqhead(nfs_procids[NFSPROC_LINK], ndp->ni_cred, 864 NFSX_FH*2+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 865 nfsm_fhtom(vp); 866 nfsm_fhtom(ndp->ni_dvp); 867 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 868 nfsm_request(vp); 869 nfsm_reqdone; 870 if (ndp->ni_dvp != vp) 871 nfs_unlock(vp); 872 nfs_nput(ndp->ni_dvp); 873 return (error); 874 } 875 876 /* 877 * nfs symbolic link create call 878 */ 879 nfs_symlink(ndp, vap, nm) 880 struct nameidata *ndp; 881 struct vattr *vap; 882 char *nm; /* is this the path ?? */ 883 { 884 register struct nfsv2_sattr *sp; 885 register u_long *p; 886 register caddr_t cp; 887 register long t1, t2; 888 caddr_t bpos, dpos; 889 u_long xid; 890 int error = 0; 891 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 892 893 nfsstats.rpccnt[NFSPROC_SYMLINK]++; 894 nfsm_reqhead(nfs_procids[NFSPROC_SYMLINK], ndp->ni_cred, 895 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_UNSIGNED); 896 nfsm_fhtom(ndp->ni_dvp); 897 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 898 nfsm_strtom(nm, strlen(nm), NFS_MAXPATHLEN); 899 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 900 sp->sa_mode = vtonfs_mode(VLNK, vap->va_mode); 901 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 902 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 903 sp->sa_size = txdr_unsigned(VNOVAL); 904 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */ 905 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */ 906 nfsm_request(ndp->ni_dvp); 907 nfsm_reqdone; 908 nfs_nput(ndp->ni_dvp); 909 return (error); 910 } 911 912 /* 913 * nfs make dir call 914 */ 915 nfs_mkdir(ndp, vap) 916 register struct nameidata *ndp; 917 struct vattr *vap; 918 { 919 register struct nfsv2_sattr *sp; 920 register u_long *p; 921 register caddr_t cp; 922 register long t1, t2; 923 caddr_t bpos, dpos, cp2; 924 u_long xid; 925 int error = 0; 926 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 927 928 nfsstats.rpccnt[NFSPROC_MKDIR]++; 929 nfsm_reqhead(nfs_procids[NFSPROC_MKDIR], ndp->ni_cred, 930 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)+NFSX_SATTR); 931 nfsm_fhtom(ndp->ni_dvp); 932 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 933 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 934 sp->sa_mode = vtonfs_mode(VDIR, vap->va_mode); 935 sp->sa_uid = txdr_unsigned(ndp->ni_cred->cr_uid); 936 sp->sa_gid = txdr_unsigned(ndp->ni_cred->cr_gid); 937 sp->sa_size = txdr_unsigned(VNOVAL); 938 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */ 939 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */ 940 nfsm_request(ndp->ni_dvp); 941 nfsm_mtofh(ndp->ni_dvp, ndp->ni_vp); 942 nfsm_reqdone; 943 nfs_nput(ndp->ni_dvp); 944 return (error); 945 } 946 947 /* 948 * nfs remove directory call 949 */ 950 nfs_rmdir(ndp) 951 register struct nameidata *ndp; 952 { 953 register u_long *p; 954 register caddr_t cp; 955 register long t1, t2; 956 caddr_t bpos, dpos; 957 u_long xid; 958 int error = 0; 959 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 960 961 if (ndp->ni_dvp == ndp->ni_vp) { 962 vrele(ndp->ni_dvp); 963 nfs_nput(ndp->ni_dvp); 964 return (EINVAL); 965 } 966 nfsstats.rpccnt[NFSPROC_RMDIR]++; 967 nfsm_reqhead(nfs_procids[NFSPROC_RMDIR], ndp->ni_cred, 968 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(ndp->ni_dent.d_namlen)); 969 nfsm_fhtom(ndp->ni_dvp); 970 nfsm_strtom(ndp->ni_dent.d_name, ndp->ni_dent.d_namlen, NFS_MAXNAMLEN); 971 nfsm_request(ndp->ni_dvp); 972 nfsm_reqdone; 973 cache_purge(ndp->ni_dvp); 974 cache_purge(ndp->ni_vp); 975 nfs_nput(ndp->ni_vp); 976 nfs_nput(ndp->ni_dvp); 977 return (error); 978 } 979 980 /* 981 * nfs readdir call 982 * Although cookie is defined as opaque, I translate it to/from net byte 983 * order so that it looks more sensible. This appears consistent with the 984 * Ultrix implementation of NFS. 985 */ 986 nfs_readdir(vp, uiop, cred) 987 register struct vnode *vp; 988 struct uio *uiop; 989 struct ucred *cred; 990 { 991 register long len; 992 register struct direct *dp; 993 register u_long *p; 994 register caddr_t cp; 995 register long t1; 996 caddr_t bpos, dpos, cp2; 997 u_long xid; 998 int error = 0; 999 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1000 struct mbuf *md2; 1001 caddr_t dpos2; 1002 int siz; 1003 int more_dirs; 1004 off_t off, savoff; 1005 struct direct *savdp; 1006 1007 nfsstats.rpccnt[NFSPROC_READDIR]++; 1008 nfsm_reqhead(nfs_procids[NFSPROC_READDIR], cred, xid); 1009 nfsm_fhtom(vp); 1010 nfsm_build(p, u_long *, 2*NFSX_UNSIGNED); 1011 *p++ = txdr_unsigned(uiop->uio_offset); 1012 *p = txdr_unsigned(uiop->uio_resid); 1013 nfsm_request(vp); 1014 siz = 0; 1015 nfsm_disect(p, u_long *, NFSX_UNSIGNED); 1016 more_dirs = fxdr_unsigned(int, *p); 1017 1018 /* Save the position so that we can do nfsm_mtouio() later */ 1019 dpos2 = dpos; 1020 md2 = md; 1021 1022 /* loop thru the dir entries, doctoring them to 4bsd form */ 1023 savoff = off = 0; 1024 savdp = dp = NULL; 1025 while (more_dirs && siz < uiop->uio_resid) { 1026 savoff = off; /* Hold onto offset and dp */ 1027 savdp = dp; 1028 nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED); 1029 dp = (struct direct *)p; 1030 dp->d_ino = fxdr_unsigned(u_long, *p++); 1031 len = fxdr_unsigned(int, *p); 1032 if (len <= 0 || len > NFS_MAXNAMLEN) { 1033 error = EBADRPC; 1034 m_freem(mrep); 1035 goto nfsmout; 1036 } 1037 dp->d_namlen = (u_short)len; 1038 len = nfsm_rndup(len); 1039 nfsm_adv(len); 1040 nfsm_disecton(p, u_long *, 2*NFSX_UNSIGNED); 1041 off = fxdr_unsigned(off_t, *p); 1042 *p++ = 0; /* Ensures null termination of name */ 1043 more_dirs = fxdr_unsigned(int, *p); 1044 dp->d_reclen = len+4*NFSX_UNSIGNED; 1045 siz += dp->d_reclen; 1046 } 1047 /* 1048 * If at end of rpc data, get the eof boolean 1049 */ 1050 if (!more_dirs) 1051 nfsm_disecton(p, u_long *, NFSX_UNSIGNED); 1052 /* 1053 * If there is too much to fit in the data buffer, use savoff and 1054 * savdp to trim off the last record. 1055 * --> we are not at eof 1056 */ 1057 if (siz > uiop->uio_resid) { 1058 off = savoff; 1059 siz -= dp->d_reclen; 1060 dp = savdp; 1061 } 1062 if (siz > 0) { 1063 md = md2; 1064 dpos = dpos2; 1065 nfsm_mtouio(uiop, siz); 1066 uiop->uio_offset = off; 1067 } 1068 nfsm_reqdone; 1069 return (error); 1070 } 1071 1072 /* 1073 * nfs statfs call 1074 * (Actually a vfsop, not a vnode op) 1075 */ 1076 nfs_statfs(mp, sbp) 1077 struct mount *mp; 1078 register struct statfs *sbp; 1079 { 1080 register struct vnode *vp; 1081 register struct nfsv2_statfs *sfp; 1082 register caddr_t cp; 1083 register long t1; 1084 caddr_t bpos, dpos, cp2; 1085 u_long xid; 1086 int error = 0; 1087 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1088 struct nfsmount *nmp; 1089 struct ucred *cred; 1090 struct nfsnode *np; 1091 1092 nmp = vfs_to_nfs(mp); 1093 if (error = nfs_nget(mp, &nmp->nm_fh, &np)) 1094 return (error); 1095 vp = NFSTOV(np); 1096 nfsstats.rpccnt[NFSPROC_STATFS]++; 1097 cred = crget(); 1098 cred->cr_ngroups = 1; 1099 nfsm_reqhead(nfs_procids[NFSPROC_STATFS], cred, NFSX_FH); 1100 nfsm_fhtom(vp); 1101 nfsm_request(vp); 1102 nfsm_disect(sfp, struct nfsv2_statfs *, NFSX_STATFS); 1103 sbp->f_type = MOUNT_NFS; 1104 sbp->f_bsize = fxdr_unsigned(long, sfp->sf_tsize); 1105 sbp->f_fsize = fxdr_unsigned(long, sfp->sf_bsize); 1106 sbp->f_blocks = fxdr_unsigned(long, sfp->sf_blocks); 1107 sbp->f_bfree = fxdr_unsigned(long, sfp->sf_bfree); 1108 sbp->f_bavail = fxdr_unsigned(long, sfp->sf_bavail); 1109 sbp->f_files = 0; 1110 sbp->f_ffree = 0; 1111 bcopy(nmp->nm_path, sbp->f_mntonname, MNAMELEN); 1112 bcopy(nmp->nm_host, sbp->f_mntfromname, MNAMELEN); 1113 nfsm_reqdone; 1114 nfs_nput(vp); 1115 crfree(cred); 1116 return (error); 1117 } 1118 1119 static char hextoasc[] = "0123456789abcdef"; 1120 1121 /* 1122 * Silly rename. To make the NFS filesystem that is stateless look a little 1123 * more like the "ufs" a remove of an active vnode is translated to a rename 1124 * to a funny looking filename that is removed by nfs_inactive on the 1125 * nfsnode. There is the potential for another process on a different client 1126 * to create the same funny name between the nfs_lookitup() fails and the 1127 * nfs_rename() completes, but... 1128 */ 1129 nfs_sillyrename(ndp, flag) 1130 register struct nameidata *ndp; 1131 int flag; 1132 { 1133 register struct nfsnode *np; 1134 register struct sillyrename *sp; 1135 register struct nameidata *tndp; 1136 int error; 1137 short pid; 1138 1139 np = VTONFS(ndp->ni_dvp); 1140 cache_purge(ndp->ni_dvp); 1141 MALLOC(sp, struct sillyrename *, sizeof (struct sillyrename), 1142 M_TEMP, M_WAITOK); 1143 sp->s_flag = flag; 1144 bcopy((caddr_t)&np->n_fh, (caddr_t)&sp->s_fh, NFSX_FH); 1145 np = VTONFS(ndp->ni_vp); 1146 tndp = &sp->s_namei; 1147 tndp->ni_cred = crdup(ndp->ni_cred); 1148 1149 /* Fudge together a funny name */ 1150 pid = u.u_procp->p_pid; 1151 bcopy(".nfsAxxxx4.4", tndp->ni_dent.d_name, 13); 1152 tndp->ni_dent.d_namlen = 12; 1153 tndp->ni_dent.d_name[8] = hextoasc[pid & 0xf]; 1154 tndp->ni_dent.d_name[7] = hextoasc[(pid >> 4) & 0xf]; 1155 tndp->ni_dent.d_name[6] = hextoasc[(pid >> 8) & 0xf]; 1156 tndp->ni_dent.d_name[5] = hextoasc[(pid >> 12) & 0xf]; 1157 1158 /* Try lookitups until we get one that isn't there */ 1159 while (nfs_lookitup(ndp->ni_dvp, tndp, (nfsv2fh_t *)0) == 0) { 1160 tndp->ni_dent.d_name[4]++; 1161 if (tndp->ni_dent.d_name[4] > 'z') { 1162 error = EINVAL; 1163 goto bad; 1164 } 1165 } 1166 if (error = nfs_renameit(ndp, tndp)) 1167 goto bad; 1168 nfs_lookitup(ndp->ni_dvp, tndp, &np->n_fh); 1169 np->n_sillyrename = sp; 1170 return (0); 1171 bad: 1172 crfree(tndp->ni_cred); 1173 free((caddr_t)sp, M_TEMP); 1174 return (error); 1175 } 1176 1177 /* 1178 * Look up a file name for silly rename stuff. 1179 * Just like nfs_lookup() except that it doesn't load returned values 1180 * into the nfsnode table. 1181 * If fhp != NULL it copies the returned file handle out 1182 */ 1183 nfs_lookitup(vp, ndp, fhp) 1184 register struct vnode *vp; 1185 register struct nameidata *ndp; 1186 nfsv2fh_t *fhp; 1187 { 1188 register u_long *p; 1189 register caddr_t cp; 1190 register long t1, t2; 1191 caddr_t bpos, dpos, cp2; 1192 u_long xid; 1193 int error = 0; 1194 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1195 long len; 1196 1197 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 1198 ndp->ni_dvp = vp; 1199 ndp->ni_vp = NULL; 1200 len = ndp->ni_dent.d_namlen; 1201 nfsm_reqhead(nfs_procids[NFSPROC_LOOKUP], ndp->ni_cred, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 1202 nfsm_fhtom(vp); 1203 nfsm_strtom(ndp->ni_dent.d_name, len, NFS_MAXNAMLEN); 1204 nfsm_request(vp); 1205 if (fhp != NULL) { 1206 nfsm_disect(cp, caddr_t, NFSX_FH); 1207 bcopy(cp, (caddr_t)fhp, NFSX_FH); 1208 } 1209 nfsm_reqdone; 1210 return (error); 1211 } 1212 1213 /* 1214 * Kludge City.. 1215 * - make nfs_bmap() essentially a no-op that does no translation 1216 * - do nfs_strategy() by faking physical I/O with nfs_readit/nfs_writeit 1217 * after mapping the physical addresses into Kernel Virtual space in the 1218 * nfsiobuf area. 1219 * (Maybe I could use the process's page mapping, but I was concerned that 1220 * Kernel Write might not be enabled and also figured copyout() would do 1221 * a lot more work than bcopy() and also it currently happens in the 1222 * context of the swapper process (2). 1223 */ 1224 nfs_bmap(vp, bn, vpp, bnp) 1225 struct vnode *vp; 1226 daddr_t bn; 1227 struct vnode **vpp; 1228 daddr_t *bnp; 1229 { 1230 if (vpp != NULL) 1231 *vpp = vp; 1232 if (bnp != NULL) 1233 *bnp = bn * btodb(vp->v_mount->m_bsize); 1234 return (0); 1235 } 1236 1237 /* 1238 * Strategy routine for phys. i/o 1239 * If the biod's are running, queue a request 1240 * otherwise just call nfs_doio() to get it done 1241 */ 1242 nfs_strategy(bp) 1243 register struct buf *bp; 1244 { 1245 register struct buf *dp; 1246 register int i; 1247 struct proc *rp; 1248 int error = 0; 1249 int fnd = 0; 1250 1251 /* 1252 * If an i/o daemon is waiting 1253 * queue the request, wake it up and wait for completion 1254 * otherwise just do it ourselves 1255 */ 1256 for (i = 0; i < nfs_asyncdaemons; i++) { 1257 if (rp = nfs_iodwant[i]) { 1258 /* 1259 * Ensure that the async_daemon is still waiting here 1260 */ 1261 if (rp->p_stat != SSLEEP || 1262 rp->p_wchan != ((caddr_t)&nfs_iodwant[i])) { 1263 nfs_iodwant[i] = (struct proc *)0; 1264 continue; 1265 } 1266 dp = &nfs_bqueue; 1267 if (dp->b_actf == NULL) { 1268 dp->b_actl = bp; 1269 bp->b_actf = dp; 1270 } else { 1271 dp->b_actf->b_actl = bp; 1272 bp->b_actf = dp->b_actf; 1273 } 1274 dp->b_actf = bp; 1275 bp->b_actl = dp; 1276 fnd++; 1277 nfs_iodwant[i] = (struct proc *)0; 1278 wakeup((caddr_t)&nfs_iodwant[i]); 1279 break; 1280 } 1281 } 1282 if (!fnd) 1283 error = nfs_doio(bp); 1284 return (error); 1285 } 1286 1287 /* 1288 * Fun and games with i/o 1289 * Essentially play ubasetup() and disk interrupt service routine by 1290 * mapping the data buffer into kernel virtual space and doing the 1291 * nfs read or write rpc's from it. 1292 * If the biod's are not running, this is just called from nfs_strategy(), 1293 * otherwise it is called by the biod's to do what would normally be 1294 * partially disk interrupt driven. 1295 */ 1296 nfs_doio(bp) 1297 register struct buf *bp; 1298 { 1299 register struct pte *pte, *ppte; 1300 register caddr_t vaddr; 1301 register struct uio *uiop; 1302 register struct vnode *vp; 1303 struct nfsnode *np; 1304 struct ucred *cr; 1305 int npf, npf2; 1306 int reg; 1307 caddr_t vbase; 1308 caddr_t addr; 1309 unsigned v; 1310 struct proc *rp; 1311 int o, error; 1312 int bcnt; 1313 struct uio uio; 1314 struct iovec io; 1315 1316 vp = bp->b_vp; 1317 uiop = &uio; 1318 uiop->uio_iov = &io; 1319 uiop->uio_iovcnt = 1; 1320 uiop->uio_segflg = UIO_SYSSPACE; 1321 if (bp->b_flags & B_READ) { 1322 io.iov_len = uiop->uio_resid = bp->b_bcount; 1323 uiop->uio_offset = bp->b_lblkno * DEV_BSIZE; 1324 addr = bp->b_un.b_addr; 1325 bcnt = bp->b_bcount; 1326 } else { 1327 io.iov_len = uiop->uio_resid = bp->b_dirtyend - bp->b_dirtyoff; 1328 uiop->uio_offset = (bp->b_lblkno * DEV_BSIZE) + bp->b_dirtyoff; 1329 addr = bp->b_un.b_addr+bp->b_dirtyoff; 1330 bcnt = bp->b_dirtyend-bp->b_dirtyoff; 1331 } 1332 /* 1333 * For phys i/o, map the b_addr into kernel virtual space using 1334 * the Nfsiomap pte's 1335 * Also, add a temporary b_rcred for reading using the process's uid 1336 * and a guess at a group 1337 */ 1338 if (bp->b_flags & B_PHYS) { 1339 VTONFS(vp)->n_flag |= NPAGEDON; 1340 bp->b_rcred = cr = crget(); 1341 rp = (bp->b_flags & B_DIRTY) ? &proc[2] : bp->b_proc; 1342 cr->cr_uid = rp->p_uid; 1343 cr->cr_gid = 0; /* Anything ?? */ 1344 cr->cr_ngroups = 1; 1345 o = (int)addr & PGOFSET; 1346 npf2 = npf = btoc(bcnt + o); 1347 /* 1348 * Get some mapping page table entries 1349 */ 1350 while ((reg = rmalloc(nfsmap, (long)npf)) == 0) { 1351 nfsmap_want++; 1352 sleep((caddr_t)&nfsmap_want, PZERO-1); 1353 } 1354 reg--; 1355 /* I know it is always the else, but that may change someday */ 1356 if ((bp->b_flags & B_PHYS) == 0) 1357 pte = kvtopte(addr); 1358 else if (bp->b_flags & B_PAGET) 1359 pte = &Usrptmap[btokmx((struct pte *)addr)]; 1360 else { 1361 v = btop(addr); 1362 if (bp->b_flags & B_UAREA) 1363 pte = &rp->p_addr[v]; 1364 else 1365 pte = vtopte(rp, v); 1366 } 1367 /* 1368 * Play vmaccess() but with the Nfsiomap page table 1369 */ 1370 ppte = &Nfsiomap[reg]; 1371 vbase = vaddr = &nfsiobuf[reg*NBPG]; 1372 while (npf != 0) { 1373 mapin(ppte, (u_int)vaddr, pte->pg_pfnum, (int)(PG_V|PG_KW)); 1374 #if defined(tahoe) 1375 mtpr(P1DC, vaddr); 1376 #endif 1377 ppte++; 1378 pte++; 1379 vaddr += NBPG; 1380 --npf; 1381 } 1382 io.iov_base = vbase+o; 1383 } else { 1384 io.iov_base = addr; 1385 } 1386 if (bp->b_flags & B_READ) { 1387 uiop->uio_rw = UIO_READ; 1388 bp->b_error = error = nfs_readrpc(vp, uiop, bp->b_rcred); 1389 } else { 1390 uiop->uio_rw = UIO_WRITE; 1391 bp->b_error = error = nfs_writerpc(vp, uiop, bp->b_wcred); 1392 if (error) { 1393 np = VTONFS(vp); 1394 np->n_error = error; 1395 np->n_flag |= NWRITEERR; 1396 } 1397 bp->b_dirtyoff = bp->b_dirtyend = 0; 1398 } 1399 if (error) 1400 bp->b_flags |= B_ERROR; 1401 bp->b_resid = uiop->uio_resid; 1402 /* 1403 * Release pte's used by physical i/o 1404 */ 1405 if (bp->b_flags & B_PHYS) { 1406 crfree(cr); 1407 rmfree(nfsmap, (long)npf2, (long)++reg); 1408 if (nfsmap_want) { 1409 nfsmap_want = 0; 1410 wakeup((caddr_t)&nfsmap_want); 1411 } 1412 } 1413 biodone(bp); 1414 return (error); 1415 } 1416 1417 /* 1418 * Flush all the blocks associated with a vnode. 1419 * Walk through the buffer pool and push any dirty pages 1420 * associated with the vnode. 1421 */ 1422 /* ARGSUSED */ 1423 nfs_fsync(vp, fflags, cred, waitfor) 1424 register struct vnode *vp; 1425 int fflags; 1426 struct ucred *cred; 1427 int waitfor; 1428 { 1429 register struct nfsnode *np = VTONFS(vp); 1430 int error; 1431 1432 if (np->n_flag & NMODIFIED) { 1433 np->n_flag &= ~NMODIFIED; 1434 error = nfs_blkflush(vp, (daddr_t)0, np->n_size, FALSE); 1435 } 1436 return (error); 1437 } 1438 1439 /* 1440 * Print out the contents of an nfsnode. 1441 */ 1442 nfs_print(vp) 1443 struct vnode *vp; 1444 { 1445 register struct nfsnode *np = VTONFS(vp); 1446 1447 printf("tag VT_NFS, fileid %d fsid 0x%x%s\n", 1448 np->n_vattr.va_fileid, np->n_vattr.va_fsid, 1449 (np->n_flag & NLOCKED) ? " (LOCKED)" : ""); 1450 } 1451