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