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.80 (Berkeley) 06/02/92 11 */ 12 13 /* 14 * vnode op calls for sun nfs version 2 15 */ 16 17 #include <sys/param.h> 18 #include <sys/proc.h> 19 #include <sys/kernel.h> 20 #include <sys/systm.h> 21 #include <sys/mount.h> 22 #include <sys/buf.h> 23 #include <sys/malloc.h> 24 #include <sys/mbuf.h> 25 #include <sys/conf.h> 26 #include <sys/namei.h> 27 #include <sys/vnode.h> 28 #include <sys/specdev.h> 29 #include <sys/fifo.h> 30 #include <sys/map.h> 31 32 #include <vm/vm.h> 33 34 #include <nfs/rpcv2.h> 35 #include <nfs/nfsv2.h> 36 #include <nfs/nfs.h> 37 #include <nfs/nfsnode.h> 38 #include <nfs/nfsmount.h> 39 #include <nfs/xdr_subs.h> 40 #include <nfs/nfsm_subs.h> 41 #include <nfs/nqnfs.h> 42 43 /* Defs */ 44 #define TRUE 1 45 #define FALSE 0 46 47 /* 48 * Global vfs data structures for nfs 49 */ 50 int (**nfsv2_vnodeop_p)(); 51 struct vnodeopv_entry_desc nfsv2_vnodeop_entries[] = { 52 { &vop_default_desc, vn_default_error }, 53 { &vop_lookup_desc, nfs_lookup }, /* lookup */ 54 { &vop_create_desc, nfs_create }, /* create */ 55 { &vop_mknod_desc, nfs_mknod }, /* mknod */ 56 { &vop_open_desc, nfs_open }, /* open */ 57 { &vop_close_desc, nfs_close }, /* close */ 58 { &vop_access_desc, nfs_access }, /* access */ 59 { &vop_getattr_desc, nfs_getattr }, /* getattr */ 60 { &vop_setattr_desc, nfs_setattr }, /* setattr */ 61 { &vop_read_desc, nfs_read }, /* read */ 62 { &vop_write_desc, nfs_write }, /* write */ 63 { &vop_ioctl_desc, nfs_ioctl }, /* ioctl */ 64 { &vop_select_desc, nfs_select }, /* select */ 65 { &vop_mmap_desc, nfs_mmap }, /* mmap */ 66 { &vop_fsync_desc, nfs_fsync }, /* fsync */ 67 { &vop_seek_desc, nfs_seek }, /* seek */ 68 { &vop_remove_desc, nfs_remove }, /* remove */ 69 { &vop_link_desc, nfs_link }, /* link */ 70 { &vop_rename_desc, nfs_rename }, /* rename */ 71 { &vop_mkdir_desc, nfs_mkdir }, /* mkdir */ 72 { &vop_rmdir_desc, nfs_rmdir }, /* rmdir */ 73 { &vop_symlink_desc, nfs_symlink }, /* symlink */ 74 { &vop_readdir_desc, nfs_readdir }, /* readdir */ 75 { &vop_readlink_desc, nfs_readlink }, /* readlink */ 76 { &vop_abortop_desc, nfs_abortop }, /* abortop */ 77 { &vop_inactive_desc, nfs_inactive }, /* inactive */ 78 { &vop_reclaim_desc, nfs_reclaim }, /* reclaim */ 79 { &vop_lock_desc, nfs_lock }, /* lock */ 80 { &vop_unlock_desc, nfs_unlock }, /* unlock */ 81 { &vop_bmap_desc, nfs_bmap }, /* bmap */ 82 { &vop_strategy_desc, nfs_strategy }, /* strategy */ 83 { &vop_print_desc, nfs_print }, /* print */ 84 { &vop_islocked_desc, nfs_islocked }, /* islocked */ 85 { &vop_advlock_desc, nfs_advlock }, /* advlock */ 86 { &vop_blkatoff_desc, nfs_blkatoff }, /* blkatoff */ 87 { &vop_vget_desc, nfs_vget }, /* vget */ 88 { &vop_valloc_desc, nfs_valloc }, /* valloc */ 89 { &vop_vfree_desc, nfs_vfree }, /* vfree */ 90 { &vop_truncate_desc, nfs_truncate }, /* truncate */ 91 { &vop_update_desc, nfs_update }, /* update */ 92 { &vop_bwrite_desc, vn_bwrite }, 93 { (struct vnodeop_desc*)NULL, (int(*)())NULL } 94 }; 95 struct vnodeopv_desc nfsv2_vnodeop_opv_desc = 96 { &nfsv2_vnodeop_p, nfsv2_vnodeop_entries }; 97 98 /* 99 * Special device vnode ops 100 */ 101 int (**spec_nfsv2nodeop_p)(); 102 struct vnodeopv_entry_desc spec_nfsv2nodeop_entries[] = { 103 { &vop_default_desc, vn_default_error }, 104 { &vop_lookup_desc, spec_lookup }, /* lookup */ 105 { &vop_create_desc, spec_create }, /* create */ 106 { &vop_mknod_desc, spec_mknod }, /* mknod */ 107 { &vop_open_desc, spec_open }, /* open */ 108 { &vop_close_desc, nfsspec_close }, /* close */ 109 { &vop_access_desc, nfs_access }, /* access */ 110 { &vop_getattr_desc, nfs_getattr }, /* getattr */ 111 { &vop_setattr_desc, nfs_setattr }, /* setattr */ 112 { &vop_read_desc, nfsspec_read }, /* read */ 113 { &vop_write_desc, nfsspec_write }, /* write */ 114 { &vop_ioctl_desc, spec_ioctl }, /* ioctl */ 115 { &vop_select_desc, spec_select }, /* select */ 116 { &vop_mmap_desc, spec_mmap }, /* mmap */ 117 { &vop_fsync_desc, spec_fsync }, /* fsync */ 118 { &vop_seek_desc, spec_seek }, /* seek */ 119 { &vop_remove_desc, spec_remove }, /* remove */ 120 { &vop_link_desc, spec_link }, /* link */ 121 { &vop_rename_desc, spec_rename }, /* rename */ 122 { &vop_mkdir_desc, spec_mkdir }, /* mkdir */ 123 { &vop_rmdir_desc, spec_rmdir }, /* rmdir */ 124 { &vop_symlink_desc, spec_symlink }, /* symlink */ 125 { &vop_readdir_desc, spec_readdir }, /* readdir */ 126 { &vop_readlink_desc, spec_readlink }, /* readlink */ 127 { &vop_abortop_desc, spec_abortop }, /* abortop */ 128 { &vop_inactive_desc, nfs_inactive }, /* inactive */ 129 { &vop_reclaim_desc, nfs_reclaim }, /* reclaim */ 130 { &vop_lock_desc, nfs_lock }, /* lock */ 131 { &vop_unlock_desc, nfs_unlock }, /* unlock */ 132 { &vop_bmap_desc, spec_bmap }, /* bmap */ 133 { &vop_strategy_desc, spec_strategy }, /* strategy */ 134 { &vop_print_desc, nfs_print }, /* print */ 135 { &vop_islocked_desc, nfs_islocked }, /* islocked */ 136 { &vop_advlock_desc, spec_advlock }, /* advlock */ 137 { &vop_blkatoff_desc, spec_blkatoff }, /* blkatoff */ 138 { &vop_vget_desc, spec_vget }, /* vget */ 139 { &vop_valloc_desc, spec_valloc }, /* valloc */ 140 { &vop_vfree_desc, spec_vfree }, /* vfree */ 141 { &vop_truncate_desc, spec_truncate }, /* truncate */ 142 { &vop_update_desc, nfs_update }, /* update */ 143 { &vop_bwrite_desc, vn_bwrite }, 144 { (struct vnodeop_desc*)NULL, (int(*)())NULL } 145 }; 146 struct vnodeopv_desc spec_nfsv2nodeop_opv_desc = 147 { &spec_nfsv2nodeop_p, spec_nfsv2nodeop_entries }; 148 149 #ifdef FIFO 150 int (**fifo_nfsv2nodeop_p)(); 151 struct vnodeopv_entry_desc fifo_nfsv2nodeop_entries[] = { 152 { &vop_default_desc, vn_default_error }, 153 { &vop_lookup_desc, fifo_lookup }, /* lookup */ 154 { &vop_create_desc, fifo_create }, /* create */ 155 { &vop_mknod_desc, fifo_mknod }, /* mknod */ 156 { &vop_open_desc, fifo_open }, /* open */ 157 { &vop_close_desc, nfsfifo_close }, /* close */ 158 { &vop_access_desc, nfs_access }, /* access */ 159 { &vop_getattr_desc, nfs_getattr }, /* getattr */ 160 { &vop_setattr_desc, nfs_setattr }, /* setattr */ 161 { &vop_read_desc, nfsfifo_read }, /* read */ 162 { &vop_write_desc, nfsfifo_write }, /* write */ 163 { &vop_ioctl_desc, fifo_ioctl }, /* ioctl */ 164 { &vop_select_desc, fifo_select }, /* select */ 165 { &vop_mmap_desc, fifo_mmap }, /* mmap */ 166 { &vop_fsync_desc, fifo_fsync }, /* fsync */ 167 { &vop_seek_desc, fifo_seek }, /* seek */ 168 { &vop_remove_desc, fifo_remove }, /* remove */ 169 { &vop_link_desc, fifo_link }, /* link */ 170 { &vop_rename_desc, fifo_rename }, /* rename */ 171 { &vop_mkdir_desc, fifo_mkdir }, /* mkdir */ 172 { &vop_rmdir_desc, fifo_rmdir }, /* rmdir */ 173 { &vop_symlink_desc, fifo_symlink }, /* symlink */ 174 { &vop_readdir_desc, fifo_readdir }, /* readdir */ 175 { &vop_readlink_desc, fifo_readlink }, /* readlink */ 176 { &vop_abortop_desc, fifo_abortop }, /* abortop */ 177 { &vop_inactive_desc, nfs_inactive }, /* inactive */ 178 { &vop_reclaim_desc, nfs_reclaim }, /* reclaim */ 179 { &vop_lock_desc, nfs_lock }, /* lock */ 180 { &vop_unlock_desc, nfs_unlock }, /* unlock */ 181 { &vop_bmap_desc, fifo_bmap }, /* bmap */ 182 { &vop_strategy_desc, fifo_badop }, /* strategy */ 183 { &vop_print_desc, nfs_print }, /* print */ 184 { &vop_islocked_desc, nfs_islocked }, /* islocked */ 185 { &vop_advlock_desc, fifo_advlock }, /* advlock */ 186 { &vop_blkatoff_desc, fifo_blkatoff }, /* blkatoff */ 187 { &vop_vget_desc, fifo_vget }, /* vget */ 188 { &vop_valloc_desc, fifo_valloc }, /* valloc */ 189 { &vop_vfree_desc, fifo_vfree }, /* vfree */ 190 { &vop_truncate_desc, fifo_truncate }, /* truncate */ 191 { &vop_update_desc, nfs_update }, /* update */ 192 { &vop_bwrite_desc, vn_bwrite }, 193 { (struct vnodeop_desc*)NULL, (int(*)())NULL } 194 }; 195 struct vnodeopv_desc fifo_nfsv2nodeop_opv_desc = 196 { &fifo_nfsv2nodeop_p, fifo_nfsv2nodeop_entries }; 197 #endif /* FIFO */ 198 199 /* 200 * Global variables 201 */ 202 extern u_long nfs_procids[NFS_NPROCS]; 203 extern u_long nfs_prog, nfs_vers; 204 extern char nfsiobuf[MAXPHYS+NBPG]; 205 struct buf nfs_bqueue; /* Queue head for nfsiod's */ 206 struct proc *nfs_iodwant[NFS_MAXASYNCDAEMON]; 207 int nfs_numasync = 0; 208 #define DIRHDSIZ (sizeof (struct readdir) - (MAXNAMLEN + 1)) 209 210 /* 211 * nfs null call from vfs. 212 */ 213 int 214 nfs_null(vp, cred, procp) 215 struct vnode *vp; 216 struct ucred *cred; 217 struct proc *procp; 218 { 219 caddr_t bpos, dpos; 220 int error = 0; 221 struct mbuf *mreq, *mrep, *md, *mb; 222 223 nfsm_reqhead(vp, NFSPROC_NULL, 0); 224 nfsm_request(vp, NFSPROC_NULL, procp, cred); 225 nfsm_reqdone; 226 return (error); 227 } 228 229 /* 230 * nfs access vnode op. 231 * Essentially just get vattr and then imitate iaccess() 232 */ 233 int 234 nfs_access(ap) 235 struct vop_access_args *ap; 236 { 237 USES_VOP_GETATTR; 238 register struct vattr *vap; 239 register gid_t *gp; 240 register struct ucred *cred = ap->a_cred; 241 mode_t mode = ap->a_mode; 242 struct vattr vattr; 243 register int i; 244 int error; 245 246 /* 247 * If you're the super-user, 248 * you always get access. 249 */ 250 if (cred->cr_uid == 0) 251 return (0); 252 vap = &vattr; 253 if (error = VOP_GETATTR(ap->a_vp, vap, cred, ap->a_p)) 254 return (error); 255 /* 256 * Access check is based on only one of owner, group, public. 257 * If not owner, then check group. If not a member of the 258 * group, then check public access. 259 */ 260 if (cred->cr_uid != vap->va_uid) { 261 mode >>= 3; 262 gp = cred->cr_groups; 263 for (i = 0; i < cred->cr_ngroups; i++, gp++) 264 if (vap->va_gid == *gp) 265 goto found; 266 mode >>= 3; 267 found: 268 ; 269 } 270 if ((vap->va_mode & mode) != 0) 271 return (0); 272 return (EACCES); 273 } 274 275 /* 276 * nfs open vnode op 277 * Just check to see if the type is ok 278 * and that deletion is not in progress. 279 */ 280 /* ARGSUSED */ 281 int 282 nfs_open(ap) 283 struct vop_open_args *ap; 284 { 285 register struct vnode *vp = ap->a_vp; 286 287 if (vp->v_type != VREG && vp->v_type != VDIR && vp->v_type != VLNK) 288 return (EACCES); 289 if ((VFSTONFS(vp->v_mount)->nm_flag & NFSMNT_NQNFS) == 0) 290 VTONFS(vp)->n_attrstamp = 0; /* For Open/Close consistency */ 291 return (0); 292 } 293 294 /* 295 * nfs close vnode op 296 * For reg files, invalidate any buffer cache entries. 297 */ 298 /* ARGSUSED */ 299 int 300 nfs_close(ap) 301 struct vop_close_args *ap; 302 { 303 register struct vnode *vp = ap->a_vp; 304 register struct nfsnode *np = VTONFS(vp); 305 int error = 0; 306 307 if (vp->v_type == VREG) { 308 if ((VFSTONFS(vp->v_mount)->nm_flag & NFSMNT_NQNFS) == 0 && 309 (np->n_flag & NMODIFIED)) { 310 np->n_flag &= ~NMODIFIED; 311 vinvalbuf(vp, TRUE); 312 np->n_attrstamp = 0; 313 } 314 if (np->n_flag & NWRITEERR) { 315 np->n_flag &= ~NWRITEERR; 316 error = np->n_error; 317 } 318 } 319 return (error); 320 } 321 322 /* 323 * nfs getattr call from vfs. 324 */ 325 int 326 nfs_getattr(ap) 327 struct vop_getattr_args *ap; 328 { 329 register struct vnode *vp = ap->a_vp; 330 register struct nfsnode *np = VTONFS(vp); 331 register caddr_t cp; 332 caddr_t bpos, dpos; 333 int error = 0; 334 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 335 336 /* 337 * Update local times for special files. 338 */ 339 if (np->n_flag & (NACC | NUPD)) { 340 if (np->n_flag & NACC) 341 np->n_atim = time; 342 if (np->n_flag & NUPD) 343 np->n_mtim = time; 344 np->n_flag |= NCHG; 345 } 346 /* 347 * First look in the cache. 348 */ 349 if (nfs_getattrcache(vp, ap->a_vap) == 0) 350 return (0); 351 nfsstats.rpccnt[NFSPROC_GETATTR]++; 352 nfsm_reqhead(vp, NFSPROC_GETATTR, NFSX_FH); 353 nfsm_fhtom(vp); 354 nfsm_request(vp, NFSPROC_GETATTR, ap->a_p, ap->a_cred); 355 nfsm_loadattr(vp, ap->a_vap); 356 nfsm_reqdone; 357 return (error); 358 } 359 360 /* 361 * nfs setattr call. 362 */ 363 int 364 nfs_setattr(ap) 365 struct vop_setattr_args *ap; 366 { 367 register struct nfsv2_sattr *sp; 368 register caddr_t cp; 369 register long t1; 370 caddr_t bpos, dpos, cp2; 371 u_long *tl; 372 int error = 0; 373 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 374 register struct vnode *vp = ap->a_vp; 375 register struct nfsnode *np = VTONFS(vp); 376 register struct vattr *vap = ap->a_vap; 377 u_quad_t frev; 378 379 nfsstats.rpccnt[NFSPROC_SETATTR]++; 380 nfsm_reqhead(vp, NFSPROC_SETATTR, 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 if (np->n_flag & NMODIFIED) { 402 np->n_flag &= ~NMODIFIED; 403 if (vap->va_size == 0) 404 vinvalbuf(vp, FALSE); 405 else 406 vinvalbuf(vp, TRUE); 407 } 408 } 409 nfsm_request(vp, NFSPROC_SETATTR, ap->a_p, ap->a_cred); 410 nfsm_loadattr(vp, (struct vattr *)0); 411 if ((VFSTONFS(vp->v_mount)->nm_flag & NFSMNT_NQNFS) && 412 NQNFS_CKCACHABLE(vp, NQL_WRITE)) { 413 nfsm_dissect(tl, u_long *, 2*NFSX_UNSIGNED); 414 fxdr_hyper(tl, &frev); 415 if (QUADGT(frev, np->n_brev)) 416 np->n_brev = frev; 417 } 418 nfsm_reqdone; 419 return (error); 420 } 421 422 /* 423 * nfs lookup call, one step at a time... 424 * First look in cache 425 * If not found, unlock the directory nfsnode and do the rpc 426 */ 427 int 428 nfs_lookup(ap) 429 struct vop_lookup_args *ap; 430 { 431 USES_VOP_GETATTR; 432 register struct componentname *cnp = ap->a_cnp; 433 register struct vnode *dvp = ap->a_dvp; 434 register struct vnode *vdp; 435 register u_long *tl; 436 register caddr_t cp; 437 register long t1, t2; 438 struct nfsmount *nmp; 439 struct nfsnode *tp; 440 caddr_t bpos, dpos, cp2; 441 time_t reqtime; 442 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 443 struct vnode *newvp; 444 long len; 445 nfsv2fh_t *fhp; 446 struct nfsnode *np; 447 int lockparent, wantparent, error = 0; 448 int nqlflag, cachable; 449 u_quad_t frev; 450 451 *ap->a_vpp = NULL; 452 if (dvp->v_type != VDIR) 453 return (ENOTDIR); 454 lockparent = cnp->cn_flags & LOCKPARENT; 455 wantparent = cnp->cn_flags & (LOCKPARENT|WANTPARENT); 456 nmp = VFSTONFS(dvp->v_mount); 457 np = VTONFS(dvp); 458 if ((error = cache_lookup(dvp, ap->a_vpp, cnp)) && error != ENOENT) { 459 struct vattr vattr; 460 int vpid; 461 462 vdp = *ap->a_vpp; 463 vpid = vdp->v_id; 464 /* 465 * See the comment starting `Step through' in ufs/ufs_lookup.c 466 * for an explanation of the locking protocol 467 */ 468 if (dvp == vdp) { 469 VREF(vdp); 470 error = 0; 471 } else 472 error = vget(vdp); 473 if (!error) { 474 if (vpid == vdp->v_id) { 475 if (nmp->nm_flag & NFSMNT_NQNFS) { 476 if (NQNFS_CKCACHABLE(dvp, NQL_READ)) { 477 if (QUADNE(np->n_lrev, np->n_brev) || 478 (np->n_flag & NMODIFIED)) { 479 np->n_direofoffset = 0; 480 cache_purge(dvp); 481 np->n_flag &= ~NMODIFIED; 482 vinvalbuf(dvp, FALSE); 483 np->n_brev = np->n_lrev; 484 } else { 485 nfsstats.lookupcache_hits++; 486 if (cnp->cn_nameiop != LOOKUP && 487 (cnp->cn_flags&ISLASTCN)) 488 cnp->cn_flags |= SAVENAME; 489 return (0); 490 } 491 } 492 } else if (!VOP_GETATTR(vdp, &vattr, cnp->cn_cred, cnp->cn_proc) && 493 vattr.va_ctime.tv_sec == VTONFS(vdp)->n_ctime) { 494 nfsstats.lookupcache_hits++; 495 if (cnp->cn_nameiop != LOOKUP && 496 (cnp->cn_flags&ISLASTCN)) 497 cnp->cn_flags |= SAVENAME; 498 return (0); 499 } 500 cache_purge(vdp); 501 } 502 vrele(vdp); 503 } 504 *ap->a_vpp = NULLVP; 505 } 506 error = 0; 507 nfsstats.lookupcache_misses++; 508 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 509 len = cnp->cn_namelen; 510 nfsm_reqhead(dvp, NFSPROC_LOOKUP, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 511 512 /* 513 * For nqnfs optionally piggyback a getlease request for the name 514 * being looked up. 515 */ 516 if (nmp->nm_flag & NFSMNT_NQNFS) { 517 if ((nmp->nm_flag & NFSMNT_NQLOOKLEASE) && 518 ((cnp->cn_flags&MAKEENTRY) && 519 (cnp->cn_nameiop != DELETE || !(cnp->cn_flags&ISLASTCN)))) { 520 nfsm_build(tl, u_long *, 2*NFSX_UNSIGNED); 521 *tl++ = txdr_unsigned(NQL_READ); 522 *tl = txdr_unsigned(nmp->nm_leaseterm); 523 } else { 524 nfsm_build(tl, u_long *, NFSX_UNSIGNED); 525 *tl = 0; 526 } 527 } 528 nfsm_fhtom(dvp); 529 nfsm_strtom(cnp->cn_nameptr, len, NFS_MAXNAMLEN); 530 reqtime = time.tv_sec; 531 nfsm_request(dvp, NFSPROC_LOOKUP, cnp->cn_proc, cnp->cn_cred); 532 nfsmout: 533 if (error) { 534 if ((cnp->cn_nameiop == CREATE || cnp->cn_nameiop == RENAME) && 535 (cnp->cn_flags & ISLASTCN) && error == ENOENT) 536 error = EJUSTRETURN; 537 if (cnp->cn_nameiop != LOOKUP && (cnp->cn_flags&ISLASTCN)) 538 cnp->cn_flags |= SAVENAME; 539 return (error); 540 } 541 if (nmp->nm_flag & NFSMNT_NQNFS) { 542 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); 543 if (*tl) { 544 nqlflag = fxdr_unsigned(int, *tl); 545 nfsm_dissect(tl, u_long *, 4*NFSX_UNSIGNED); 546 cachable = fxdr_unsigned(int, *tl++); 547 reqtime += fxdr_unsigned(int, *tl++); 548 fxdr_hyper(tl, &frev); 549 } else 550 nqlflag = 0; 551 } 552 nfsm_dissect(fhp, nfsv2fh_t *, NFSX_FH); 553 554 /* 555 * Handle RENAME case... 556 */ 557 if (cnp->cn_nameiop == RENAME && wantparent && (cnp->cn_flags&ISLASTCN)) { 558 if (!bcmp(np->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 559 m_freem(mrep); 560 return (EISDIR); 561 } 562 if (error = nfs_nget(dvp->v_mount, fhp, &np)) { 563 m_freem(mrep); 564 return (error); 565 } 566 newvp = NFSTOV(np); 567 if (error = 568 nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 569 vrele(newvp); 570 m_freem(mrep); 571 return (error); 572 } 573 *ap->a_vpp = newvp; 574 m_freem(mrep); 575 cnp->cn_flags |= SAVENAME; 576 return (0); 577 } 578 579 if (!bcmp(np->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 580 VREF(dvp); 581 newvp = dvp; 582 } else { 583 if (error = nfs_nget(dvp->v_mount, fhp, &np)) { 584 m_freem(mrep); 585 return (error); 586 } 587 newvp = NFSTOV(np); 588 } 589 if (error = nfs_loadattrcache(&newvp, &md, &dpos, (struct vattr *)0)) { 590 vrele(newvp); 591 m_freem(mrep); 592 return (error); 593 } 594 m_freem(mrep); 595 *ap->a_vpp = newvp; 596 if (cnp->cn_nameiop != LOOKUP && (cnp->cn_flags&ISLASTCN)) 597 cnp->cn_flags |= SAVENAME; 598 if ((cnp->cn_flags&MAKEENTRY) && 599 (cnp->cn_nameiop != DELETE || !(cnp->cn_flags&ISLASTCN))) { 600 if ((nmp->nm_flag & NFSMNT_NQNFS) == 0) 601 np->n_ctime = np->n_vattr.va_ctime.tv_sec; 602 else if (nqlflag && reqtime > time.tv_sec) { 603 if (np->n_tnext) { 604 if (np->n_tnext == (struct nfsnode *)nmp) 605 nmp->nm_tprev = np->n_tprev; 606 else 607 np->n_tnext->n_tprev = np->n_tprev; 608 if (np->n_tprev == (struct nfsnode *)nmp) 609 nmp->nm_tnext = np->n_tnext; 610 else 611 np->n_tprev->n_tnext = np->n_tnext; 612 if (nqlflag == NQL_WRITE) 613 np->n_flag |= NQNFSWRITE; 614 } else if (nqlflag == NQL_READ) 615 np->n_flag &= ~NQNFSWRITE; 616 else 617 np->n_flag |= NQNFSWRITE; 618 if (cachable) 619 np->n_flag &= ~NQNFSNONCACHE; 620 else 621 np->n_flag |= NQNFSNONCACHE; 622 np->n_expiry = reqtime; 623 np->n_lrev = frev; 624 tp = nmp->nm_tprev; 625 while (tp != (struct nfsnode *)nmp && tp->n_expiry > np->n_expiry) 626 tp = tp->n_tprev; 627 if (tp == (struct nfsnode *)nmp) { 628 np->n_tnext = nmp->nm_tnext; 629 nmp->nm_tnext = np; 630 } else { 631 np->n_tnext = tp->n_tnext; 632 tp->n_tnext = np; 633 } 634 np->n_tprev = tp; 635 if (np->n_tnext == (struct nfsnode *)nmp) 636 nmp->nm_tprev = np; 637 else 638 np->n_tnext->n_tprev = np; 639 } 640 cache_enter(dvp, *ap->a_vpp, cnp); 641 } 642 return (0); 643 } 644 645 /* 646 * nfs read call. 647 * Just call nfs_bioread() to do the work. 648 */ 649 int 650 nfs_read(ap) 651 struct vop_read_args *ap; 652 { 653 register struct vnode *vp = ap->a_vp; 654 655 if (vp->v_type != VREG) 656 return (EPERM); 657 return (nfs_bioread(vp, ap->a_uio, ap->a_ioflag, ap->a_cred)); 658 } 659 660 /* 661 * nfs readlink call 662 */ 663 int 664 nfs_readlink(ap) 665 struct vop_readlink_args *ap; 666 { 667 register struct vnode *vp = ap->a_vp; 668 669 if (vp->v_type != VLNK) 670 return (EPERM); 671 return (nfs_bioread(vp, ap->a_uio, 0, ap->a_cred)); 672 } 673 674 /* 675 * Do a readlink rpc. 676 * Called by nfs_doio() from below the buffer cache. 677 */ 678 int 679 nfs_readlinkrpc(vp, uiop, cred) 680 register struct vnode *vp; 681 struct uio *uiop; 682 struct ucred *cred; 683 { 684 register u_long *tl; 685 register caddr_t cp; 686 register long t1; 687 caddr_t bpos, dpos, cp2; 688 int error = 0; 689 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 690 long len; 691 692 nfsstats.rpccnt[NFSPROC_READLINK]++; 693 nfsm_reqhead(vp, NFSPROC_READLINK, NFSX_FH); 694 nfsm_fhtom(vp); 695 nfsm_request(vp, NFSPROC_READLINK, uiop->uio_procp, cred); 696 nfsm_strsiz(len, NFS_MAXPATHLEN); 697 nfsm_mtouio(uiop, len); 698 nfsm_reqdone; 699 return (error); 700 } 701 702 /* 703 * nfs read rpc call 704 * Ditto above 705 */ 706 int 707 nfs_readrpc(vp, uiop, cred) 708 register struct vnode *vp; 709 struct uio *uiop; 710 struct ucred *cred; 711 { 712 register u_long *tl; 713 register caddr_t cp; 714 register long t1; 715 caddr_t bpos, dpos, cp2; 716 int error = 0; 717 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 718 struct nfsmount *nmp; 719 long len, retlen, tsiz; 720 721 nmp = VFSTONFS(vp->v_mount); 722 tsiz = uiop->uio_resid; 723 while (tsiz > 0) { 724 nfsstats.rpccnt[NFSPROC_READ]++; 725 len = (tsiz > nmp->nm_rsize) ? nmp->nm_rsize : tsiz; 726 nfsm_reqhead(vp, NFSPROC_READ, NFSX_FH+NFSX_UNSIGNED*3); 727 nfsm_fhtom(vp); 728 nfsm_build(tl, u_long *, NFSX_UNSIGNED*3); 729 *tl++ = txdr_unsigned(uiop->uio_offset); 730 *tl++ = txdr_unsigned(len); 731 *tl = 0; 732 nfsm_request(vp, NFSPROC_READ, uiop->uio_procp, cred); 733 nfsm_loadattr(vp, (struct vattr *)0); 734 nfsm_strsiz(retlen, nmp->nm_rsize); 735 nfsm_mtouio(uiop, retlen); 736 m_freem(mrep); 737 if (retlen < len) 738 tsiz = 0; 739 else 740 tsiz -= len; 741 } 742 nfsmout: 743 return (error); 744 } 745 746 /* 747 * nfs write call 748 */ 749 int 750 nfs_writerpc(vp, uiop, cred) 751 register struct vnode *vp; 752 struct uio *uiop; 753 struct ucred *cred; 754 { 755 register u_long *tl; 756 register caddr_t cp; 757 register long t1; 758 caddr_t bpos, dpos, cp2; 759 int error = 0; 760 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 761 struct nfsmount *nmp; 762 struct nfsnode *np = VTONFS(vp); 763 u_quad_t frev; 764 long len, tsiz; 765 766 nmp = VFSTONFS(vp->v_mount); 767 tsiz = uiop->uio_resid; 768 while (tsiz > 0) { 769 nfsstats.rpccnt[NFSPROC_WRITE]++; 770 len = (tsiz > nmp->nm_wsize) ? nmp->nm_wsize : tsiz; 771 nfsm_reqhead(vp, NFSPROC_WRITE, 772 NFSX_FH+NFSX_UNSIGNED*4+nfsm_rndup(len)); 773 nfsm_fhtom(vp); 774 nfsm_build(tl, u_long *, NFSX_UNSIGNED*4); 775 *(tl+1) = txdr_unsigned(uiop->uio_offset); 776 *(tl+3) = txdr_unsigned(len); 777 nfsm_uiotom(uiop, len); 778 nfsm_request(vp, NFSPROC_WRITE, uiop->uio_procp, cred); 779 nfsm_loadattr(vp, (struct vattr *)0); 780 if (nmp->nm_flag & NFSMNT_MYWRITE) 781 VTONFS(vp)->n_mtime = VTONFS(vp)->n_vattr.va_mtime.tv_sec; 782 else if ((nmp->nm_flag & NFSMNT_NQNFS) && 783 NQNFS_CKCACHABLE(vp, NQL_WRITE)) { 784 nfsm_dissect(tl, u_long *, 2*NFSX_UNSIGNED); 785 fxdr_hyper(tl, &frev); 786 if (QUADGT(frev, np->n_brev)) 787 np->n_brev = frev; 788 } 789 m_freem(mrep); 790 tsiz -= len; 791 } 792 nfsmout: 793 if (error) 794 uiop->uio_resid = tsiz; 795 return (error); 796 } 797 798 /* 799 * nfs mknod call 800 * This is a kludge. Use a create rpc but with the IFMT bits of the mode 801 * set to specify the file type and the size field for rdev. 802 */ 803 /* ARGSUSED */ 804 int 805 nfs_mknod(ap) 806 struct vop_mknod_args *ap; 807 { 808 USES_VOP_ABORTOP; 809 register struct vnode *dvp = ap->a_dvp; 810 register struct vattr *vap = ap->a_vap; 811 register struct componentname *cnp = ap->a_cnp; 812 register struct nfsv2_sattr *sp; 813 register u_long *tl; 814 register caddr_t cp; 815 register long t2; 816 caddr_t bpos, dpos; 817 int error = 0; 818 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 819 u_long rdev; 820 821 if (vap->va_type == VCHR || vap->va_type == VBLK) 822 rdev = txdr_unsigned(vap->va_rdev); 823 #ifdef FIFO 824 else if (vap->va_type == VFIFO) 825 rdev = 0xffffffff; 826 #endif /* FIFO */ 827 else { 828 VOP_ABORTOP(dvp, cnp); 829 vput(dvp); 830 return (EOPNOTSUPP); 831 } 832 nfsstats.rpccnt[NFSPROC_CREATE]++; 833 nfsm_reqhead(dvp, NFSPROC_CREATE, 834 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(cnp->cn_namelen)+NFSX_SATTR); 835 nfsm_fhtom(dvp); 836 nfsm_strtom(cnp->cn_nameptr, cnp->cn_namelen, NFS_MAXNAMLEN); 837 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 838 sp->sa_mode = vtonfs_mode(vap->va_type, vap->va_mode); 839 sp->sa_uid = txdr_unsigned(cnp->cn_cred->cr_uid); 840 sp->sa_gid = txdr_unsigned(cnp->cn_cred->cr_gid); 841 sp->sa_size = rdev; 842 /* or should these be VNOVAL ?? */ 843 txdr_time(&vap->va_atime, &sp->sa_atime); 844 txdr_time(&vap->va_mtime, &sp->sa_mtime); 845 nfsm_request(dvp, NFSPROC_CREATE, cnp->cn_proc, cnp->cn_cred); 846 nfsm_reqdone; 847 FREE(cnp->cn_pnbuf, M_NAMEI); 848 VTONFS(dvp)->n_flag |= NMODIFIED; 849 vrele(dvp); 850 return (error); 851 } 852 853 /* 854 * nfs file create call 855 */ 856 int 857 nfs_create(ap) 858 struct vop_create_args *ap; 859 { 860 register struct vnode *dvp = ap->a_dvp; 861 register struct vattr *vap = ap->a_vap; 862 register struct componentname *cnp = ap->a_cnp; 863 register struct nfsv2_sattr *sp; 864 register u_long *tl; 865 register caddr_t cp; 866 register long t1, t2; 867 caddr_t bpos, dpos, cp2; 868 int error = 0; 869 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 870 871 nfsstats.rpccnt[NFSPROC_CREATE]++; 872 nfsm_reqhead(dvp, NFSPROC_CREATE, 873 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(cnp->cn_namelen)+NFSX_SATTR); 874 nfsm_fhtom(dvp); 875 nfsm_strtom(cnp->cn_nameptr, cnp->cn_namelen, NFS_MAXNAMLEN); 876 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 877 sp->sa_mode = vtonfs_mode(vap->va_type, vap->va_mode); 878 sp->sa_uid = txdr_unsigned(cnp->cn_cred->cr_uid); 879 sp->sa_gid = txdr_unsigned(cnp->cn_cred->cr_gid); 880 sp->sa_size = txdr_unsigned(0); 881 /* or should these be VNOVAL ?? */ 882 txdr_time(&vap->va_atime, &sp->sa_atime); 883 txdr_time(&vap->va_mtime, &sp->sa_mtime); 884 nfsm_request(dvp, NFSPROC_CREATE, cnp->cn_proc, cnp->cn_cred); 885 nfsm_mtofh(dvp, *ap->a_vpp); 886 nfsm_reqdone; 887 FREE(cnp->cn_pnbuf, M_NAMEI); 888 VTONFS(dvp)->n_flag |= NMODIFIED; 889 vrele(dvp); 890 return (error); 891 } 892 893 /* 894 * nfs file remove call 895 * To try and make nfs semantics closer to ufs semantics, a file that has 896 * other processes using the vnode is renamed instead of removed and then 897 * removed later on the last close. 898 * - If v_usecount > 1 899 * If a rename is not already in the works 900 * call nfs_sillyrename() to set it up 901 * else 902 * do the remove rpc 903 */ 904 int 905 nfs_remove(ap) 906 struct vop_remove_args *ap; 907 { 908 register struct vnode *vp = ap->a_vp; 909 register struct vnode *dvp = ap->a_dvp; 910 register struct componentname *cnp = ap->a_cnp; 911 register struct nfsnode *np = VTONFS(vp); 912 register u_long *tl; 913 register caddr_t cp; 914 register long t2; 915 caddr_t bpos, dpos; 916 int error = 0; 917 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 918 919 if (vp->v_usecount > 1) { 920 if (!np->n_sillyrename) 921 error = nfs_sillyrename(dvp, vp, cnp); 922 } else { 923 /* 924 * Purge the name cache so that the chance of a lookup for 925 * the name succeeding while the remove is in progress is 926 * minimized. Without node locking it can still happen, such 927 * that an I/O op returns ESTALE, but since you get this if 928 * another host removes the file.. 929 */ 930 cache_purge(vp); 931 /* 932 * Throw away biocache buffers. Mainly to avoid 933 * unnecessary delayed writes. 934 */ 935 vinvalbuf(vp, FALSE); 936 /* Do the rpc */ 937 nfsstats.rpccnt[NFSPROC_REMOVE]++; 938 nfsm_reqhead(dvp, NFSPROC_REMOVE, 939 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(cnp->cn_namelen)); 940 nfsm_fhtom(dvp); 941 nfsm_strtom(cnp->cn_nameptr, cnp->cn_namelen, NFS_MAXNAMLEN); 942 nfsm_request(dvp, NFSPROC_REMOVE, cnp->cn_proc, cnp->cn_cred); 943 nfsm_reqdone; 944 FREE(cnp->cn_pnbuf, M_NAMEI); 945 VTONFS(dvp)->n_flag |= NMODIFIED; 946 /* 947 * Kludge City: If the first reply to the remove rpc is lost.. 948 * the reply to the retransmitted request will be ENOENT 949 * since the file was in fact removed 950 * Therefore, we cheat and return success. 951 */ 952 if (error == ENOENT) 953 error = 0; 954 } 955 np->n_attrstamp = 0; 956 vrele(dvp); 957 vrele(vp); 958 return (error); 959 } 960 961 /* 962 * nfs file remove rpc called from nfs_inactive 963 */ 964 int 965 nfs_removeit(sp, procp) 966 register struct sillyrename *sp; 967 struct proc *procp; 968 { 969 register u_long *tl; 970 register caddr_t cp; 971 register long t2; 972 caddr_t bpos, dpos; 973 int error = 0; 974 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 975 976 nfsstats.rpccnt[NFSPROC_REMOVE]++; 977 nfsm_reqhead(sp->s_dvp, NFSPROC_REMOVE, 978 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(sp->s_namlen)); 979 nfsm_fhtom(sp->s_dvp); 980 nfsm_strtom(sp->s_name, sp->s_namlen, NFS_MAXNAMLEN); 981 nfsm_request(sp->s_dvp, NFSPROC_REMOVE, procp, sp->s_cred); 982 nfsm_reqdone; 983 VTONFS(sp->s_dvp)->n_flag |= NMODIFIED; 984 return (error); 985 } 986 987 /* 988 * nfs file rename call 989 */ 990 int 991 nfs_rename(ap) 992 struct vop_rename_args *ap; 993 { 994 register struct vnode *fvp = ap->a_fvp; 995 register struct vnode *tvp = ap->a_tvp; 996 register struct vnode *fdvp = ap->a_fdvp; 997 register struct vnode *tdvp = ap->a_tdvp; 998 register struct componentname *tcnp = ap->a_tcnp; 999 register struct componentname *fcnp = ap->a_fcnp; 1000 register u_long *tl; 1001 register caddr_t cp; 1002 register long t2; 1003 caddr_t bpos, dpos; 1004 int error = 0; 1005 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1006 1007 /* Check for cross-device rename */ 1008 if ((fvp->v_mount != tdvp->v_mount) || 1009 (tvp && (fvp->v_mount != tvp->v_mount))) { 1010 error = EXDEV; 1011 goto out; 1012 } 1013 1014 1015 nfsstats.rpccnt[NFSPROC_RENAME]++; 1016 nfsm_reqhead(fdvp, NFSPROC_RENAME, 1017 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(fcnp->cn_namelen)+ 1018 nfsm_rndup(fcnp->cn_namelen)); /* or fcnp->cn_cred?*/ 1019 nfsm_fhtom(fdvp); 1020 nfsm_strtom(fcnp->cn_nameptr, fcnp->cn_namelen, NFS_MAXNAMLEN); 1021 nfsm_fhtom(tdvp); 1022 nfsm_strtom(tcnp->cn_nameptr, tcnp->cn_namelen, NFS_MAXNAMLEN); 1023 nfsm_request(fdvp, NFSPROC_RENAME, tcnp->cn_proc, tcnp->cn_cred); 1024 nfsm_reqdone; 1025 VTONFS(fdvp)->n_flag |= NMODIFIED; 1026 VTONFS(tdvp)->n_flag |= NMODIFIED; 1027 if (fvp->v_type == VDIR) { 1028 if (tvp != NULL && tvp->v_type == VDIR) 1029 cache_purge(tdvp); 1030 cache_purge(fdvp); 1031 } 1032 out: 1033 if (tdvp == tvp) 1034 vrele(tdvp); 1035 else 1036 vput(tdvp); 1037 if (tvp) 1038 vput(tvp); 1039 vrele(fdvp); 1040 vrele(fvp); 1041 /* 1042 * Kludge: Map ENOENT => 0 assuming that it is a reply to a retry. 1043 */ 1044 if (error == ENOENT) 1045 error = 0; 1046 return (error); 1047 } 1048 1049 /* 1050 * nfs file rename rpc called from nfs_remove() above 1051 */ 1052 int 1053 nfs_renameit(sdvp, scnp, sp) 1054 struct vnode *sdvp; 1055 struct componentname *scnp; 1056 register struct sillyrename *sp; 1057 { 1058 register u_long *tl; 1059 register caddr_t cp; 1060 register long t2; 1061 caddr_t bpos, dpos; 1062 int error = 0; 1063 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1064 1065 nfsstats.rpccnt[NFSPROC_RENAME]++; 1066 nfsm_reqhead(sdvp, NFSPROC_RENAME, 1067 (NFSX_FH+NFSX_UNSIGNED)*2+nfsm_rndup(scnp->cn_namelen)+ 1068 nfsm_rndup(sp->s_namlen)); 1069 nfsm_fhtom(sdvp); 1070 nfsm_strtom(scnp->cn_nameptr, scnp->cn_namelen, NFS_MAXNAMLEN); 1071 nfsm_fhtom(sdvp); 1072 nfsm_strtom(sp->s_name, sp->s_namlen, NFS_MAXNAMLEN); 1073 nfsm_request(sdvp, NFSPROC_RENAME, scnp->cn_proc, scnp->cn_cred); 1074 nfsm_reqdone; 1075 FREE(scnp->cn_pnbuf, M_NAMEI); 1076 VTONFS(sdvp)->n_flag |= NMODIFIED; 1077 return (error); 1078 } 1079 1080 /* 1081 * nfs hard link create call 1082 */ 1083 int 1084 nfs_link(ap) 1085 struct vop_link_args *ap; 1086 { 1087 register struct vnode *vp = ap->a_vp; 1088 register struct vnode *tdvp = ap->a_tdvp; 1089 register struct componentname *cnp = ap->a_cnp; 1090 register u_long *tl; 1091 register caddr_t cp; 1092 register long t2; 1093 caddr_t bpos, dpos; 1094 int error = 0; 1095 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1096 1097 if (vp->v_mount != tdvp->v_mount) { 1098 /*VOP_ABORTOP(vp, cnp);*/ 1099 if (tdvp == vp) 1100 vrele(vp); 1101 else 1102 vput(vp); 1103 vrele(tdvp); 1104 return (EXDEV); 1105 } 1106 1107 nfsstats.rpccnt[NFSPROC_LINK]++; 1108 nfsm_reqhead(tdvp, NFSPROC_LINK, 1109 NFSX_FH*2+NFSX_UNSIGNED+nfsm_rndup(cnp->cn_namelen)); 1110 nfsm_fhtom(tdvp); 1111 nfsm_fhtom(vp); 1112 nfsm_strtom(cnp->cn_nameptr, cnp->cn_namelen, NFS_MAXNAMLEN); 1113 nfsm_request(tdvp, NFSPROC_LINK, cnp->cn_proc, cnp->cn_cred); 1114 nfsm_reqdone; 1115 FREE(cnp->cn_pnbuf, M_NAMEI); 1116 VTONFS(tdvp)->n_attrstamp = 0; 1117 VTONFS(vp)->n_flag |= NMODIFIED; 1118 vrele(vp); 1119 /* 1120 * Kludge: Map EEXIST => 0 assuming that it is a reply to a retry. 1121 */ 1122 if (error == EEXIST) 1123 error = 0; 1124 return (error); 1125 } 1126 1127 /* 1128 * nfs symbolic link create call 1129 */ 1130 /* start here */ 1131 int 1132 nfs_symlink(ap) 1133 struct vop_symlink_args *ap; 1134 { 1135 register struct vnode *dvp = ap->a_dvp; 1136 register struct vattr *vap = ap->a_vap; 1137 register struct componentname *cnp = ap->a_cnp; 1138 register struct nfsv2_sattr *sp; 1139 register u_long *tl; 1140 register caddr_t cp; 1141 register long t2; 1142 caddr_t bpos, dpos; 1143 int slen, error = 0; 1144 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1145 1146 nfsstats.rpccnt[NFSPROC_SYMLINK]++; 1147 slen = strlen(ap->a_target); 1148 nfsm_reqhead(dvp, NFSPROC_SYMLINK, NFSX_FH+2*NFSX_UNSIGNED+ 1149 nfsm_rndup(cnp->cn_namelen)+nfsm_rndup(slen)+NFSX_SATTR); 1150 nfsm_fhtom(dvp); 1151 nfsm_strtom(cnp->cn_nameptr, cnp->cn_namelen, NFS_MAXNAMLEN); 1152 nfsm_strtom(ap->a_target, slen, NFS_MAXPATHLEN); 1153 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 1154 sp->sa_mode = vtonfs_mode(VLNK, vap->va_mode); 1155 sp->sa_uid = txdr_unsigned(cnp->cn_cred->cr_uid); 1156 sp->sa_gid = txdr_unsigned(cnp->cn_cred->cr_gid); 1157 sp->sa_size = txdr_unsigned(VNOVAL); 1158 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */ 1159 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */ 1160 nfsm_request(dvp, NFSPROC_SYMLINK, cnp->cn_proc, cnp->cn_cred); 1161 nfsm_reqdone; 1162 FREE(cnp->cn_pnbuf, M_NAMEI); 1163 VTONFS(dvp)->n_flag |= NMODIFIED; 1164 vrele(dvp); 1165 /* 1166 * Kludge: Map EEXIST => 0 assuming that it is a reply to a retry. 1167 */ 1168 if (error == EEXIST) 1169 error = 0; 1170 return (error); 1171 } 1172 1173 /* 1174 * nfs make dir call 1175 */ 1176 int 1177 nfs_mkdir(ap) 1178 struct vop_mkdir_args *ap; 1179 { 1180 register struct vnode *dvp = ap->a_dvp; 1181 register struct vattr *vap = ap->a_vap; 1182 register struct componentname *cnp = ap->a_cnp; 1183 register struct nfsv2_sattr *sp; 1184 register u_long *tl; 1185 register caddr_t cp; 1186 register long t1, t2; 1187 register int len; 1188 caddr_t bpos, dpos, cp2; 1189 int error = 0, firsttry = 1; 1190 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1191 1192 len = cnp->cn_namelen; 1193 nfsstats.rpccnt[NFSPROC_MKDIR]++; 1194 nfsm_reqhead(dvp, NFSPROC_MKDIR, 1195 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)+NFSX_SATTR); 1196 nfsm_fhtom(dvp); 1197 nfsm_strtom(cnp->cn_nameptr, len, NFS_MAXNAMLEN); 1198 nfsm_build(sp, struct nfsv2_sattr *, NFSX_SATTR); 1199 sp->sa_mode = vtonfs_mode(VDIR, vap->va_mode); 1200 sp->sa_uid = txdr_unsigned(cnp->cn_cred->cr_uid); 1201 sp->sa_gid = txdr_unsigned(cnp->cn_cred->cr_gid); 1202 sp->sa_size = txdr_unsigned(VNOVAL); 1203 txdr_time(&vap->va_atime, &sp->sa_atime); /* or VNOVAL ?? */ 1204 txdr_time(&vap->va_mtime, &sp->sa_mtime); /* or VNOVAL ?? */ 1205 nfsm_request(dvp, NFSPROC_MKDIR, cnp->cn_proc, cnp->cn_cred); 1206 nfsm_mtofh(dvp, *ap->a_vpp); 1207 nfsm_reqdone; 1208 VTONFS(dvp)->n_flag |= NMODIFIED; 1209 /* 1210 * Kludge: Map EEXIST => 0 assuming that you have a reply to a retry 1211 * if we can succeed in looking up the directory. 1212 * "firsttry" is necessary since the macros may "goto nfsmout" which 1213 * is above the if on errors. (Ugh) 1214 */ 1215 if (error == EEXIST && firsttry) { 1216 firsttry = 0; 1217 error = 0; 1218 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 1219 *ap->a_vpp = NULL; 1220 nfsm_reqhead(dvp, NFSPROC_LOOKUP, 1221 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 1222 nfsm_fhtom(dvp); 1223 nfsm_strtom(cnp->cn_nameptr, len, NFS_MAXNAMLEN); 1224 nfsm_request(dvp, NFSPROC_LOOKUP, cnp->cn_proc, cnp->cn_cred); 1225 nfsm_mtofh(dvp, *ap->a_vpp); 1226 if ((*ap->a_vpp)->v_type != VDIR) { 1227 vput(*ap->a_vpp); 1228 error = EEXIST; 1229 } 1230 m_freem(mrep); 1231 } 1232 FREE(cnp->cn_pnbuf, M_NAMEI); 1233 vrele(dvp); 1234 return (error); 1235 } 1236 1237 /* 1238 * nfs remove directory call 1239 */ 1240 int 1241 nfs_rmdir(ap) 1242 struct vop_rmdir_args *ap; 1243 { 1244 register struct vnode *vp = ap->a_vp; 1245 register struct vnode *dvp = ap->a_dvp; 1246 register struct componentname *cnp = ap->a_cnp; 1247 register u_long *tl; 1248 register caddr_t cp; 1249 register long t2; 1250 caddr_t bpos, dpos; 1251 int error = 0; 1252 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1253 1254 if (dvp == vp) { 1255 vrele(dvp); 1256 vrele(dvp); 1257 FREE(cnp->cn_pnbuf, M_NAMEI); 1258 return (EINVAL); 1259 } 1260 nfsstats.rpccnt[NFSPROC_RMDIR]++; 1261 nfsm_reqhead(dvp, NFSPROC_RMDIR, 1262 NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(cnp->cn_namelen)); 1263 nfsm_fhtom(dvp); 1264 nfsm_strtom(cnp->cn_nameptr, cnp->cn_namelen, NFS_MAXNAMLEN); 1265 nfsm_request(dvp, NFSPROC_RMDIR, cnp->cn_proc, cnp->cn_cred); 1266 nfsm_reqdone; 1267 FREE(cnp->cn_pnbuf, M_NAMEI); 1268 VTONFS(dvp)->n_flag |= NMODIFIED; 1269 cache_purge(dvp); 1270 cache_purge(vp); 1271 vrele(vp); 1272 vrele(dvp); 1273 /* 1274 * Kludge: Map ENOENT => 0 assuming that you have a reply to a retry. 1275 */ 1276 if (error == ENOENT) 1277 error = 0; 1278 return (error); 1279 } 1280 1281 /* 1282 * nfs readdir call 1283 * Although cookie is defined as opaque, I translate it to/from net byte 1284 * order so that it looks more sensible. This appears consistent with the 1285 * Ultrix implementation of NFS. 1286 */ 1287 int 1288 nfs_readdir(ap) 1289 struct vop_readdir_args *ap; 1290 { 1291 USES_VOP_GETATTR; 1292 register struct vnode *vp = ap->a_vp; 1293 register struct nfsnode *np = VTONFS(vp); 1294 register struct uio *uio = ap->a_uio; 1295 register int *eofflagp = ap->a_eofflagp; 1296 int tresid, error; 1297 struct vattr vattr; 1298 1299 if (vp->v_type != VDIR) 1300 return (EPERM); 1301 /* 1302 * First, check for hit on the EOF offset cache 1303 */ 1304 if (uio->uio_offset != 0 && uio->uio_offset == np->n_direofoffset && 1305 (np->n_flag & NMODIFIED) == 0) { 1306 if (VFSTONFS(vp->v_mount)->nm_flag & NFSMNT_NQNFS) { 1307 if (NQNFS_CKCACHABLE(vp, NQL_READ)) { 1308 *eofflagp = 1; 1309 nfsstats.direofcache_hits++; 1310 return (0); 1311 } 1312 } else if (VOP_GETATTR(vp, &vattr, ap->a_cred, uio->uio_procp) == 0 && 1313 np->n_mtime == vattr.va_mtime.tv_sec) { 1314 *eofflagp = 1; 1315 nfsstats.direofcache_hits++; 1316 return (0); 1317 } 1318 } 1319 1320 /* 1321 * Call nfs_bioread() to do the real work. 1322 */ 1323 tresid = uio->uio_resid; 1324 error = nfs_bioread(vp, uio, 0, ap->a_cred); 1325 1326 if (!error && uio->uio_resid == tresid) { 1327 *eofflagp = 1; 1328 nfsstats.direofcache_misses++; 1329 } else 1330 *eofflagp = 0; 1331 return (error); 1332 } 1333 1334 /* 1335 * Readdir rpc call. 1336 * Called from below the buffer cache by nfs_doio(). 1337 */ 1338 int 1339 nfs_readdirrpc(vp, uiop, cred) 1340 register struct vnode *vp; 1341 struct uio *uiop; 1342 struct ucred *cred; 1343 { 1344 register long len; 1345 register struct readdir *dp; 1346 register u_long *tl; 1347 register caddr_t cp; 1348 register long t1; 1349 long tlen, lastlen; 1350 caddr_t bpos, dpos, cp2; 1351 int error = 0; 1352 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1353 struct mbuf *md2; 1354 caddr_t dpos2; 1355 int siz; 1356 int more_dirs = 1; 1357 off_t off, savoff; 1358 struct readdir *savdp; 1359 struct nfsmount *nmp; 1360 struct nfsnode *np = VTONFS(vp); 1361 long tresid; 1362 1363 nmp = VFSTONFS(vp->v_mount); 1364 tresid = uiop->uio_resid; 1365 /* 1366 * Loop around doing readdir rpc's of size uio_resid or nm_rsize, 1367 * whichever is smaller, truncated to a multiple of NFS_DIRBLKSIZ. 1368 * The stopping criteria is EOF or buffer full. 1369 */ 1370 while (more_dirs && uiop->uio_resid >= NFS_DIRBLKSIZ) { 1371 nfsstats.rpccnt[NFSPROC_READDIR]++; 1372 nfsm_reqhead(vp, NFSPROC_READDIR, 1373 NFSX_FH+2*NFSX_UNSIGNED); 1374 nfsm_fhtom(vp); 1375 nfsm_build(tl, u_long *, 2*NFSX_UNSIGNED); 1376 *tl++ = txdr_unsigned(uiop->uio_offset); 1377 *tl = txdr_unsigned(((uiop->uio_resid > nmp->nm_rsize) ? 1378 nmp->nm_rsize : uiop->uio_resid) & ~(NFS_DIRBLKSIZ-1)); 1379 nfsm_request(vp, NFSPROC_READDIR, uiop->uio_procp, cred); 1380 siz = 0; 1381 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); 1382 more_dirs = fxdr_unsigned(int, *tl); 1383 1384 /* Save the position so that we can do nfsm_mtouio() later */ 1385 dpos2 = dpos; 1386 md2 = md; 1387 1388 /* loop thru the dir entries, doctoring them to 4bsd form */ 1389 off = uiop->uio_offset; 1390 #ifdef lint 1391 dp = (struct readdir *)0; 1392 #endif /* lint */ 1393 while (more_dirs && siz < uiop->uio_resid) { 1394 savoff = off; /* Hold onto offset and dp */ 1395 savdp = dp; 1396 nfsm_dissecton(tl, u_long *, 2*NFSX_UNSIGNED); 1397 dp = (struct readdir *)tl; 1398 dp->d_ino = fxdr_unsigned(u_long, *tl++); 1399 len = fxdr_unsigned(int, *tl); 1400 if (len <= 0 || len > NFS_MAXNAMLEN) { 1401 error = EBADRPC; 1402 m_freem(mrep); 1403 goto nfsmout; 1404 } 1405 dp->d_namlen = (u_short)len; 1406 nfsm_adv(len); /* Point past name */ 1407 tlen = nfsm_rndup(len); 1408 /* 1409 * This should not be necessary, but some servers have 1410 * broken XDR such that these bytes are not null filled. 1411 */ 1412 if (tlen != len) { 1413 *dpos = '\0'; /* Null-terminate */ 1414 nfsm_adv(tlen - len); 1415 len = tlen; 1416 } 1417 nfsm_dissecton(tl, u_long *, 2*NFSX_UNSIGNED); 1418 off = fxdr_unsigned(off_t, *tl); 1419 *tl++ = 0; /* Ensures null termination of name */ 1420 more_dirs = fxdr_unsigned(int, *tl); 1421 dp->d_reclen = len+4*NFSX_UNSIGNED; 1422 siz += dp->d_reclen; 1423 } 1424 /* 1425 * If at end of rpc data, get the eof boolean 1426 */ 1427 if (!more_dirs) { 1428 nfsm_dissecton(tl, u_long *, NFSX_UNSIGNED); 1429 more_dirs = (fxdr_unsigned(int, *tl) == 0); 1430 1431 /* 1432 * If at EOF, cache directory offset 1433 */ 1434 if (!more_dirs) 1435 np->n_direofoffset = off; 1436 } 1437 /* 1438 * If there is too much to fit in the data buffer, use savoff and 1439 * savdp to trim off the last record. 1440 * --> we are not at eof 1441 */ 1442 if (siz > uiop->uio_resid) { 1443 off = savoff; 1444 siz -= dp->d_reclen; 1445 dp = savdp; 1446 more_dirs = 0; /* Paranoia */ 1447 } 1448 if (siz > 0) { 1449 lastlen = dp->d_reclen; 1450 md = md2; 1451 dpos = dpos2; 1452 nfsm_mtouio(uiop, siz); 1453 uiop->uio_offset = off; 1454 } else 1455 more_dirs = 0; /* Ugh, never happens, but in case.. */ 1456 m_freem(mrep); 1457 } 1458 /* 1459 * Fill last record, iff any, out to a multiple of NFS_DIRBLKSIZ 1460 * by increasing d_reclen for the last record. 1461 */ 1462 if (uiop->uio_resid < tresid) { 1463 len = uiop->uio_resid & (NFS_DIRBLKSIZ - 1); 1464 if (len > 0) { 1465 dp = (struct readdir *) 1466 (uiop->uio_iov->iov_base - lastlen); 1467 dp->d_reclen += len; 1468 uiop->uio_iov->iov_base += len; 1469 uiop->uio_iov->iov_len -= len; 1470 uiop->uio_resid -= len; 1471 } 1472 } 1473 nfsmout: 1474 return (error); 1475 } 1476 1477 /* 1478 * Nqnfs readdir_and_lookup RPC. Used in place of nfs_readdirrpc() when 1479 * the "rdirlook" mount option is specified. 1480 */ 1481 int 1482 nfs_readdirlookrpc(vp, uiop, cred) 1483 struct vnode *vp; 1484 register struct uio *uiop; 1485 struct ucred *cred; 1486 { 1487 register int len; 1488 register struct readdir *dp; 1489 register u_long *tl; 1490 register caddr_t cp; 1491 register long t1; 1492 caddr_t bpos, dpos, cp2; 1493 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1494 struct nameidata nami, *ndp = &nami; 1495 struct componentname *cnp = &ndp->ni_cnd; 1496 off_t off, endoff; 1497 time_t reqtime, ltime; 1498 struct nfsmount *nmp; 1499 struct nfsnode *np, *tp; 1500 struct vnode *newvp; 1501 nfsv2fh_t *fhp; 1502 u_long fileno; 1503 u_quad_t frev; 1504 int error = 0, tlen, more_dirs = 1, tresid, doit, bigenough, i; 1505 int cachable; 1506 1507 if (uiop->uio_iovcnt != 1) 1508 panic("nfs rdirlook"); 1509 nmp = VFSTONFS(vp->v_mount); 1510 tresid = uiop->uio_resid; 1511 ndp->ni_dvp = vp; 1512 newvp = NULLVP; 1513 /* 1514 * Loop around doing readdir rpc's of size uio_resid or nm_rsize, 1515 * whichever is smaller, truncated to a multiple of NFS_DIRBLKSIZ. 1516 * The stopping criteria is EOF or buffer full. 1517 */ 1518 while (more_dirs && uiop->uio_resid >= NFS_DIRBLKSIZ) { 1519 nfsstats.rpccnt[NQNFSPROC_READDIRLOOK]++; 1520 nfsm_reqhead(vp, NQNFSPROC_READDIRLOOK, 1521 NFSX_FH+3*NFSX_UNSIGNED); 1522 nfsm_fhtom(vp); 1523 nfsm_build(tl, u_long *, 3*NFSX_UNSIGNED); 1524 *tl++ = txdr_unsigned(uiop->uio_offset); 1525 *tl++ = txdr_unsigned(((uiop->uio_resid > nmp->nm_rsize) ? 1526 nmp->nm_rsize : uiop->uio_resid) & ~(NFS_DIRBLKSIZ-1)); 1527 *tl = txdr_unsigned(nmp->nm_leaseterm); 1528 reqtime = time.tv_sec; 1529 nfsm_request(vp, NQNFSPROC_READDIRLOOK, uiop->uio_procp, cred); 1530 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); 1531 more_dirs = fxdr_unsigned(int, *tl); 1532 1533 /* loop thru the dir entries, doctoring them to 4bsd form */ 1534 off = uiop->uio_offset; 1535 bigenough = 1; 1536 while (more_dirs && bigenough) { 1537 doit = 1; 1538 nfsm_dissect(tl, u_long *, 4*NFSX_UNSIGNED); 1539 cachable = fxdr_unsigned(int, *tl++); 1540 ltime = reqtime + fxdr_unsigned(int, *tl++); 1541 fxdr_hyper(tl, &frev); 1542 nfsm_dissect(fhp, nfsv2fh_t *, NFSX_FH); 1543 if (!bcmp(VTONFS(vp)->n_fh.fh_bytes, (caddr_t)fhp, NFSX_FH)) { 1544 VREF(vp); 1545 newvp = vp; 1546 np = VTONFS(vp); 1547 } else { 1548 if (error = nfs_nget(vp->v_mount, fhp, &np)) 1549 doit = 0; 1550 newvp = NFSTOV(np); 1551 } 1552 if (error = nfs_loadattrcache(&newvp, &md, &dpos, 1553 (struct vattr *)0)) 1554 doit = 0; 1555 nfsm_dissect(tl, u_long *, 2*NFSX_UNSIGNED); 1556 fileno = fxdr_unsigned(u_long, *tl++); 1557 len = fxdr_unsigned(int, *tl); 1558 if (len <= 0 || len > NFS_MAXNAMLEN) { 1559 error = EBADRPC; 1560 m_freem(mrep); 1561 goto nfsmout; 1562 } 1563 tlen = (len + 4) & ~0x3; 1564 if ((tlen + DIRHDSIZ) > uiop->uio_resid) 1565 bigenough = 0; 1566 if (bigenough && doit) { 1567 dp = (struct readdir *)uiop->uio_iov->iov_base; 1568 dp->d_ino = fileno; 1569 dp->d_namlen = len; 1570 dp->d_reclen = tlen + DIRHDSIZ; 1571 uiop->uio_resid -= DIRHDSIZ; 1572 uiop->uio_iov->iov_base += DIRHDSIZ; 1573 uiop->uio_iov->iov_len -= DIRHDSIZ; 1574 cnp->cn_nameptr = uiop->uio_iov->iov_base; 1575 cnp->cn_namelen = len; 1576 ndp->ni_vp = newvp; 1577 nfsm_mtouio(uiop, len); 1578 cp = uiop->uio_iov->iov_base; 1579 tlen -= len; 1580 for (i = 0; i < tlen; i++) 1581 *cp++ = '\0'; 1582 uiop->uio_iov->iov_base += tlen; 1583 uiop->uio_iov->iov_len -= tlen; 1584 uiop->uio_resid -= tlen; 1585 cnp->cn_hash = 0; 1586 for (cp = cnp->cn_nameptr, i = 1; i <= len; i++, cp++) 1587 cnp->cn_hash += (unsigned char)*cp * i; 1588 if (ltime > time.tv_sec) { 1589 if (np->n_tnext) { 1590 if (np->n_tnext == (struct nfsnode *)nmp) 1591 nmp->nm_tprev = np->n_tprev; 1592 else 1593 np->n_tnext->n_tprev = np->n_tprev; 1594 if (np->n_tprev == (struct nfsnode *)nmp) 1595 nmp->nm_tnext = np->n_tnext; 1596 else 1597 np->n_tprev->n_tnext = np->n_tnext; 1598 } else 1599 np->n_flag &= ~NQNFSWRITE; 1600 if (cachable) 1601 np->n_flag &= ~NQNFSNONCACHE; 1602 else 1603 np->n_flag |= NQNFSNONCACHE; 1604 np->n_expiry = ltime; 1605 np->n_lrev = frev; 1606 tp = nmp->nm_tprev; 1607 while (tp != (struct nfsnode *)nmp && tp->n_expiry > np->n_expiry) 1608 tp = tp->n_tprev; 1609 if (tp == (struct nfsnode *)nmp) { 1610 np->n_tnext = nmp->nm_tnext; 1611 nmp->nm_tnext = np; 1612 } else { 1613 np->n_tnext = tp->n_tnext; 1614 tp->n_tnext = np; 1615 } 1616 np->n_tprev = tp; 1617 if (np->n_tnext == (struct nfsnode *)nmp) 1618 nmp->nm_tprev = np; 1619 else 1620 np->n_tnext->n_tprev = np; 1621 cache_enter(ndp->ni_dvp, ndp->ni_vp, cnp); 1622 } 1623 } else { 1624 nfsm_adv(nfsm_rndup(len)); 1625 } 1626 if (newvp != NULLVP) { 1627 vrele(newvp); 1628 newvp = NULLVP; 1629 } 1630 nfsm_dissect(tl, u_long *, 2*NFSX_UNSIGNED); 1631 if (bigenough) 1632 endoff = off = fxdr_unsigned(off_t, *tl++); 1633 else 1634 endoff = fxdr_unsigned(off_t, *tl++); 1635 more_dirs = fxdr_unsigned(int, *tl); 1636 } 1637 /* 1638 * If at end of rpc data, get the eof boolean 1639 */ 1640 if (!more_dirs) { 1641 nfsm_dissect(tl, u_long *, NFSX_UNSIGNED); 1642 more_dirs = (fxdr_unsigned(int, *tl) == 0); 1643 1644 /* 1645 * If at EOF, cache directory offset 1646 */ 1647 if (!more_dirs) 1648 VTONFS(vp)->n_direofoffset = endoff; 1649 } 1650 if (uiop->uio_resid < tresid) 1651 uiop->uio_offset = off; 1652 else 1653 more_dirs = 0; 1654 m_freem(mrep); 1655 } 1656 /* 1657 * Fill last record, iff any, out to a multiple of NFS_DIRBLKSIZ 1658 * by increasing d_reclen for the last record. 1659 */ 1660 if (uiop->uio_resid < tresid) { 1661 len = uiop->uio_resid & (NFS_DIRBLKSIZ - 1); 1662 if (len > 0) { 1663 dp->d_reclen += len; 1664 uiop->uio_iov->iov_base += len; 1665 uiop->uio_iov->iov_len -= len; 1666 uiop->uio_resid -= len; 1667 } 1668 } 1669 nfsmout: 1670 if (newvp != NULLVP) 1671 vrele(newvp); 1672 return (error); 1673 } 1674 static char hextoasc[] = "0123456789abcdef"; 1675 1676 /* 1677 * Silly rename. To make the NFS filesystem that is stateless look a little 1678 * more like the "ufs" a remove of an active vnode is translated to a rename 1679 * to a funny looking filename that is removed by nfs_inactive on the 1680 * nfsnode. There is the potential for another process on a different client 1681 * to create the same funny name between the nfs_lookitup() fails and the 1682 * nfs_rename() completes, but... 1683 */ 1684 int 1685 nfs_sillyrename(dvp, vp, cnp) 1686 struct vnode *dvp, *vp; 1687 struct componentname *cnp; 1688 { 1689 register struct nfsnode *np; 1690 register struct sillyrename *sp; 1691 int error; 1692 short pid; 1693 1694 cache_purge(dvp); 1695 np = VTONFS(vp); 1696 #ifdef SILLYSEPARATE 1697 MALLOC(sp, struct sillyrename *, sizeof (struct sillyrename), 1698 M_NFSREQ, M_WAITOK); 1699 #else 1700 sp = &np->n_silly; 1701 #endif 1702 sp->s_cred = crdup(cnp->cn_cred); 1703 sp->s_dvp = dvp; 1704 VREF(dvp); 1705 1706 /* Fudge together a funny name */ 1707 pid = cnp->cn_proc->p_pid; 1708 bcopy(".nfsAxxxx4.4", sp->s_name, 13); 1709 sp->s_namlen = 12; 1710 sp->s_name[8] = hextoasc[pid & 0xf]; 1711 sp->s_name[7] = hextoasc[(pid >> 4) & 0xf]; 1712 sp->s_name[6] = hextoasc[(pid >> 8) & 0xf]; 1713 sp->s_name[5] = hextoasc[(pid >> 12) & 0xf]; 1714 1715 /* Try lookitups until we get one that isn't there */ 1716 while (nfs_lookitup(sp, (nfsv2fh_t *)0, cnp->cn_proc) == 0) { 1717 sp->s_name[4]++; 1718 if (sp->s_name[4] > 'z') { 1719 error = EINVAL; 1720 goto bad; 1721 } 1722 } 1723 if (error = nfs_renameit(dvp, cnp, sp)) 1724 goto bad; 1725 nfs_lookitup(sp, &np->n_fh, cnp->cn_proc); 1726 np->n_sillyrename = sp; 1727 return (0); 1728 bad: 1729 vrele(sp->s_dvp); 1730 crfree(sp->s_cred); 1731 #ifdef SILLYSEPARATE 1732 free((caddr_t)sp, M_NFSREQ); 1733 #endif 1734 return (error); 1735 } 1736 1737 /* 1738 * Look up a file name for silly rename stuff. 1739 * Just like nfs_lookup() except that it doesn't load returned values 1740 * into the nfsnode table. 1741 * If fhp != NULL it copies the returned file handle out 1742 */ 1743 int 1744 nfs_lookitup(sp, fhp, procp) 1745 register struct sillyrename *sp; 1746 nfsv2fh_t *fhp; 1747 struct proc *procp; 1748 { 1749 register struct vnode *vp = sp->s_dvp; 1750 register u_long *tl; 1751 register caddr_t cp; 1752 register long t1, t2; 1753 caddr_t bpos, dpos, cp2; 1754 u_long xid; 1755 int error = 0; 1756 struct mbuf *mreq, *mrep, *md, *mb, *mb2; 1757 long len; 1758 1759 nfsstats.rpccnt[NFSPROC_LOOKUP]++; 1760 len = sp->s_namlen; 1761 nfsm_reqhead(vp, NFSPROC_LOOKUP, NFSX_FH+NFSX_UNSIGNED+nfsm_rndup(len)); 1762 nfsm_fhtom(vp); 1763 nfsm_strtom(sp->s_name, len, NFS_MAXNAMLEN); 1764 nfsm_request(vp, NFSPROC_LOOKUP, procp, sp->s_cred); 1765 if (fhp != NULL) { 1766 nfsm_dissect(cp, caddr_t, NFSX_FH); 1767 bcopy(cp, (caddr_t)fhp, NFSX_FH); 1768 } 1769 nfsm_reqdone; 1770 return (error); 1771 } 1772 1773 /* 1774 * Kludge City.. 1775 * - make nfs_bmap() essentially a no-op that does no translation 1776 * - do nfs_strategy() by faking physical I/O with nfs_readrpc/nfs_writerpc 1777 * after mapping the physical addresses into Kernel Virtual space in the 1778 * nfsiobuf area. 1779 * (Maybe I could use the process's page mapping, but I was concerned that 1780 * Kernel Write might not be enabled and also figured copyout() would do 1781 * a lot more work than bcopy() and also it currently happens in the 1782 * context of the swapper process (2). 1783 */ 1784 int 1785 nfs_bmap(ap) 1786 struct vop_bmap_args *ap; 1787 { 1788 register struct vnode *vp = ap->a_vp; 1789 1790 if (ap->a_vpp != NULL) 1791 *ap->a_vpp = vp; 1792 if (ap->a_bnp != NULL) 1793 *ap->a_bnp = ap->a_bn * btodb(vp->v_mount->mnt_stat.f_iosize); 1794 return (0); 1795 } 1796 1797 /* 1798 * Strategy routine for phys. i/o 1799 * If the biod's are running, queue a request 1800 * otherwise just call nfs_doio() to get it done 1801 */ 1802 int 1803 nfs_strategy(ap) 1804 struct vop_strategy_args *ap; 1805 { 1806 register struct buf *bp = ap->a_bp; 1807 register struct buf *dp; 1808 register int i; 1809 int error = 0; 1810 int fnd = 0; 1811 1812 /* 1813 * Set b_proc. It seems a bit silly to do it here, but since bread() 1814 * doesn't set it, I will. 1815 * Set b_proc == NULL for asynchronous ops, since these may still 1816 * be hanging about after the process terminates. 1817 */ 1818 if ((bp->b_flags & B_PHYS) == 0) { 1819 if (bp->b_flags & B_ASYNC) 1820 bp->b_proc = (struct proc *)0; 1821 else 1822 bp->b_proc = curproc; 1823 } 1824 /* 1825 * If the op is asynchronous and an i/o daemon is waiting 1826 * queue the request, wake it up and wait for completion 1827 * otherwise just do it ourselves. 1828 */ 1829 if ((bp->b_flags & B_ASYNC) == 0 || nfs_numasync == 0) 1830 return (nfs_doio(bp)); 1831 for (i = 0; i < NFS_MAXASYNCDAEMON; i++) { 1832 if (nfs_iodwant[i]) { 1833 dp = &nfs_bqueue; 1834 if (dp->b_actf == NULL) { 1835 dp->b_actl = bp; 1836 bp->b_actf = dp; 1837 } else { 1838 dp->b_actf->b_actl = bp; 1839 bp->b_actf = dp->b_actf; 1840 } 1841 dp->b_actf = bp; 1842 bp->b_actl = dp; 1843 fnd++; 1844 wakeup((caddr_t)&nfs_iodwant[i]); 1845 break; 1846 } 1847 } 1848 if (!fnd) 1849 error = nfs_doio(bp); 1850 return (error); 1851 } 1852 1853 /* 1854 * Fun and games with i/o 1855 * Essentially play ubasetup() and disk interrupt service routine by 1856 * mapping the data buffer into kernel virtual space and doing the 1857 * nfs read or write rpc's from it. 1858 * If the nfsiod's are not running, this is just called from nfs_strategy(), 1859 * otherwise it is called by the nfsiods to do what would normally be 1860 * partially disk interrupt driven. 1861 */ 1862 int 1863 nfs_doio(bp) 1864 register struct buf *bp; 1865 { 1866 register struct uio *uiop; 1867 register struct vnode *vp; 1868 struct nfsnode *np; 1869 struct ucred *cr; 1870 int error; 1871 struct uio uio; 1872 struct iovec io; 1873 1874 vp = bp->b_vp; 1875 np = VTONFS(vp); 1876 uiop = &uio; 1877 uiop->uio_iov = &io; 1878 uiop->uio_iovcnt = 1; 1879 uiop->uio_segflg = UIO_SYSSPACE; 1880 uiop->uio_procp = bp->b_proc; 1881 1882 /* 1883 * For phys i/o, map the b_addr into kernel virtual space using 1884 * the Nfsiomap pte's 1885 * Also, add a temporary b_rcred for reading using the process's uid 1886 * and a guess at a group 1887 */ 1888 if (bp->b_flags & B_PHYS) { 1889 if (bp->b_flags & B_DIRTY) 1890 uiop->uio_procp = pageproc; 1891 cr = crcopy(uiop->uio_procp->p_ucred); 1892 /* mapping was already done by vmapbuf */ 1893 io.iov_base = bp->b_un.b_addr; 1894 1895 /* 1896 * And do the i/o rpc 1897 */ 1898 io.iov_len = uiop->uio_resid = bp->b_bcount; 1899 uiop->uio_offset = bp->b_blkno * DEV_BSIZE; 1900 if (bp->b_flags & B_READ) { 1901 uiop->uio_rw = UIO_READ; 1902 nfsstats.read_physios++; 1903 bp->b_error = error = nfs_readrpc(vp, uiop, cr); 1904 (void) vnode_pager_uncache(vp); 1905 } else { 1906 uiop->uio_rw = UIO_WRITE; 1907 nfsstats.write_physios++; 1908 bp->b_error = error = nfs_writerpc(vp, uiop, cr); 1909 } 1910 1911 /* 1912 * Finally, release pte's used by physical i/o 1913 */ 1914 crfree(cr); 1915 } else { 1916 if (bp->b_flags & B_READ) { 1917 io.iov_len = uiop->uio_resid = bp->b_bcount; 1918 io.iov_base = bp->b_un.b_addr; 1919 uiop->uio_rw = UIO_READ; 1920 switch (vp->v_type) { 1921 case VREG: 1922 uiop->uio_offset = bp->b_blkno * DEV_BSIZE; 1923 nfsstats.read_bios++; 1924 error = nfs_readrpc(vp, uiop, bp->b_rcred); 1925 break; 1926 case VLNK: 1927 uiop->uio_offset = 0; 1928 nfsstats.readlink_bios++; 1929 error = nfs_readlinkrpc(vp, uiop, bp->b_rcred); 1930 break; 1931 case VDIR: 1932 uiop->uio_offset = bp->b_lblkno; 1933 nfsstats.readdir_bios++; 1934 if (VFSTONFS(vp->v_mount)->nm_flag & NFSMNT_RDIRALOOK) 1935 error = nfs_readdirlookrpc(vp, uiop, bp->b_rcred); 1936 else 1937 error = nfs_readdirrpc(vp, uiop, bp->b_rcred); 1938 /* 1939 * Save offset cookie in b_blkno. 1940 */ 1941 bp->b_blkno = uiop->uio_offset; 1942 break; 1943 }; 1944 bp->b_error = error; 1945 } else { 1946 io.iov_len = uiop->uio_resid = bp->b_dirtyend 1947 - bp->b_dirtyoff; 1948 uiop->uio_offset = (bp->b_blkno * DEV_BSIZE) 1949 + bp->b_dirtyoff; 1950 io.iov_base = bp->b_un.b_addr + bp->b_dirtyoff; 1951 uiop->uio_rw = UIO_WRITE; 1952 nfsstats.write_bios++; 1953 bp->b_error = error = nfs_writerpc(vp, uiop, 1954 bp->b_wcred); 1955 if (error) { 1956 np->n_error = error; 1957 np->n_flag |= NWRITEERR; 1958 } 1959 bp->b_dirtyoff = bp->b_dirtyend = 0; 1960 } 1961 } 1962 if (error) 1963 bp->b_flags |= B_ERROR; 1964 bp->b_resid = uiop->uio_resid; 1965 biodone(bp); 1966 return (error); 1967 } 1968 1969 /* 1970 * Mmap a file 1971 * 1972 * NB Currently unsupported. 1973 */ 1974 /* ARGSUSED */ 1975 int 1976 nfs_mmap(ap) 1977 struct vop_mmap_args *ap; 1978 { 1979 1980 return (EINVAL); 1981 } 1982 1983 /* 1984 * Flush all the blocks associated with a vnode. 1985 * Walk through the buffer pool and push any dirty pages 1986 * associated with the vnode. 1987 */ 1988 /* ARGSUSED */ 1989 int 1990 nfs_fsync(ap) 1991 struct vop_fsync_args *ap; 1992 { 1993 register struct nfsnode *np = VTONFS(ap->a_vp); 1994 int error = 0; 1995 1996 if (np->n_flag & NMODIFIED) { 1997 np->n_flag &= ~NMODIFIED; 1998 vflushbuf(ap->a_vp, ap->a_waitfor == MNT_WAIT ? B_SYNC : 0); 1999 } 2000 if (np->n_flag & NWRITEERR) { 2001 error = np->n_error; 2002 np->n_flag &= ~NWRITEERR; 2003 } 2004 return (error); 2005 } 2006 2007 /* 2008 * NFS advisory byte-level locks. 2009 * Currently unsupported. 2010 */ 2011 int 2012 nfs_advlock(ap) 2013 struct vop_advlock_args *ap; 2014 { 2015 2016 return (EOPNOTSUPP); 2017 } 2018 2019 /* 2020 * Print out the contents of an nfsnode. 2021 */ 2022 int 2023 nfs_print(ap) 2024 struct vop_print_args *ap; 2025 { 2026 register struct vnode *vp = ap->a_vp; 2027 register struct nfsnode *np = VTONFS(vp); 2028 2029 printf("tag VT_NFS, fileid %d fsid 0x%x", 2030 np->n_vattr.va_fileid, np->n_vattr.va_fsid); 2031 #ifdef FIFO 2032 if (vp->v_type == VFIFO) 2033 fifo_printinfo(vp); 2034 #endif /* FIFO */ 2035 printf("\n"); 2036 } 2037 2038 /* 2039 * NFS directory offset lookup. 2040 * Currently unsupported. 2041 */ 2042 int 2043 nfs_blkatoff(ap) 2044 struct vop_blkatoff_args *ap; 2045 { 2046 2047 return (EOPNOTSUPP); 2048 } 2049 2050 /* 2051 * NFS flat namespace lookup. 2052 * Currently unsupported. 2053 */ 2054 int 2055 nfs_vget(ap) 2056 struct vop_vget_args *ap; 2057 { 2058 2059 return (EOPNOTSUPP); 2060 } 2061 2062 /* 2063 * NFS flat namespace allocation. 2064 * Currently unsupported. 2065 */ 2066 int 2067 nfs_valloc(ap) 2068 struct vop_valloc_args *ap; 2069 { 2070 2071 return (EOPNOTSUPP); 2072 } 2073 2074 /* 2075 * NFS flat namespace free. 2076 * Currently unsupported. 2077 */ 2078 int 2079 nfs_vfree(ap) 2080 struct vop_vfree_args *ap; 2081 { 2082 2083 return (EOPNOTSUPP); 2084 } 2085 2086 /* 2087 * NFS file truncation. 2088 */ 2089 int 2090 nfs_truncate(ap) 2091 struct vop_truncate_args *ap; 2092 { 2093 2094 /* Use nfs_setattr */ 2095 printf("nfs_truncate: need to implement!!"); 2096 return (EOPNOTSUPP); 2097 } 2098 2099 /* 2100 * NFS update. 2101 */ 2102 int 2103 nfs_update(ap) 2104 struct vop_update_args *ap; 2105 { 2106 2107 /* Use nfs_setattr */ 2108 printf("nfs_update: need to implement!!"); 2109 return (EOPNOTSUPP); 2110 } 2111 2112 /* 2113 * Read wrapper for special devices. 2114 */ 2115 int 2116 nfsspec_read(ap) 2117 struct vop_read_args *ap; 2118 { 2119 extern int (**spec_vnodeop_p)(); 2120 2121 /* 2122 * Set access flag. 2123 */ 2124 VTONFS(ap->a_vp)->n_flag |= NACC; 2125 return (VOCALL(spec_vnodeop_p, VOFFSET(vop_read), ap)); 2126 } 2127 2128 /* 2129 * Write wrapper for special devices. 2130 */ 2131 int 2132 nfsspec_write(ap) 2133 struct vop_write_args *ap; 2134 { 2135 extern int (**spec_vnodeop_p)(); 2136 2137 /* 2138 * Set update flags. 2139 */ 2140 VTONFS(ap->a_vp)->n_flag |= NUPD; 2141 return (VOCALL(spec_vnodeop_p, VOFFSET(vop_write), ap)); 2142 } 2143 2144 /* 2145 * Close wrapper for special devices. 2146 * 2147 * Update the times on the nfsnode then do device close. 2148 */ 2149 int 2150 nfsspec_close(ap) 2151 struct vop_close_args *ap; 2152 { 2153 USES_VOP_SETATTR; 2154 register struct vnode *vp = ap->a_vp; 2155 register struct nfsnode *np = VTONFS(vp); 2156 struct vattr vattr; 2157 extern int (**spec_vnodeop_p)(); 2158 2159 if (np->n_flag & (NACC | NUPD)) { 2160 if (np->n_flag & NACC) 2161 np->n_atim = time; 2162 if (np->n_flag & NUPD) 2163 np->n_mtim = time; 2164 np->n_flag |= NCHG; 2165 if (vp->v_usecount == 1 && 2166 (vp->v_mount->mnt_flag & MNT_RDONLY) == 0) { 2167 VATTR_NULL(&vattr); 2168 if (np->n_flag & NACC) 2169 vattr.va_atime = np->n_atim; 2170 if (np->n_flag & NUPD) 2171 vattr.va_mtime = np->n_mtim; 2172 (void)VOP_SETATTR(vp, &vattr, ap->a_cred, ap->a_p); 2173 } 2174 } 2175 return (VOCALL(spec_vnodeop_p, VOFFSET(vop_close), ap)); 2176 } 2177 2178 #ifdef FIFO 2179 /* 2180 * Read wrapper for fifos. 2181 */ 2182 int 2183 nfsfifo_read(ap) 2184 struct vop_read_args *ap; 2185 { 2186 extern int (**fifo_vnodeop_p)(); 2187 2188 /* 2189 * Set access flag. 2190 */ 2191 VTONFS(ap->a_vp)->n_flag |= NACC; 2192 return (VOCALL(fifo_vnodeop_p, VOFFSET(vop_read), ap)); 2193 } 2194 2195 /* 2196 * Write wrapper for fifos. 2197 */ 2198 int 2199 nfsfifo_write(ap) 2200 struct vop_write_args *ap; 2201 { 2202 extern int (**fifo_vnodeop_p)(); 2203 2204 /* 2205 * Set update flag. 2206 */ 2207 VTONFS(ap->a_vp)->n_flag |= NUPD; 2208 return (VOCALL(fifo_vnodeop_p, VOFFSET(vop_write), ap)); 2209 } 2210 2211 /* 2212 * Close wrapper for fifos. 2213 * 2214 * Update the times on the nfsnode then do fifo close. 2215 */ 2216 int 2217 nfsfifo_close(ap) 2218 struct vop_close_args *ap; 2219 { 2220 USES_VOP_SETATTR; 2221 register struct vnode *vp = ap->a_vp; 2222 register struct nfsnode *np = VTONFS(vp); 2223 struct vattr vattr; 2224 extern int (**fifo_vnodeop_p)(); 2225 2226 if (np->n_flag & (NACC | NUPD)) { 2227 if (np->n_flag & NACC) 2228 np->n_atim = time; 2229 if (np->n_flag & NUPD) 2230 np->n_mtim = time; 2231 np->n_flag |= NCHG; 2232 if (vp->v_usecount == 1 && 2233 (vp->v_mount->mnt_flag & MNT_RDONLY) == 0) { 2234 VATTR_NULL(&vattr); 2235 if (np->n_flag & NACC) 2236 vattr.va_atime = np->n_atim; 2237 if (np->n_flag & NUPD) 2238 vattr.va_mtime = np->n_mtim; 2239 (void)VOP_SETATTR(vp, &vattr, ap->a_cred, ap->a_p); 2240 } 2241 } 2242 return (VOCALL(fifo_vnodeop_p, VOFFSET(vop_close), ap)); 2243 } 2244 #endif /* FIFO */ 2245