1 /*- 2 * Copyright (c) 2002, 2003 Networks Associates Technology, Inc. 3 * All rights reserved. 4 * 5 * This software was developed for the FreeBSD Project by Marshall 6 * Kirk McKusick and Network Associates Laboratories, the Security 7 * Research Division of Network Associates, Inc. under DARPA/SPAWAR 8 * contract N66001-01-C-8035 ("CBOSS"), as part of the DARPA CHATS 9 * research program 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 * 32 * Copyright (c) 1982, 1986, 1989, 1993 33 * The Regents of the University of California. All rights reserved. 34 * 35 * Redistribution and use in source and binary forms, with or without 36 * modification, are permitted provided that the following conditions 37 * are met: 38 * 1. Redistributions of source code must retain the above copyright 39 * notice, this list of conditions and the following disclaimer. 40 * 2. Redistributions in binary form must reproduce the above copyright 41 * notice, this list of conditions and the following disclaimer in the 42 * documentation and/or other materials provided with the distribution. 43 * 4. Neither the name of the University nor the names of its contributors 44 * may be used to endorse or promote products derived from this software 45 * without specific prior written permission. 46 * 47 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 48 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 49 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 50 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 51 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 52 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 53 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 54 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 55 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 56 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 57 * SUCH DAMAGE. 58 * 59 * from: @(#)ufs_readwrite.c 8.11 (Berkeley) 5/8/95 60 * from: $FreeBSD: .../ufs/ufs_readwrite.c,v 1.96 2002/08/12 09:22:11 phk ... 61 * @(#)ffs_vnops.c 8.15 (Berkeley) 5/14/95 62 */ 63 64 #include <sys/cdefs.h> 65 __FBSDID("$FreeBSD$"); 66 67 #include <sys/param.h> 68 #include <sys/bio.h> 69 #include <sys/systm.h> 70 #include <sys/buf.h> 71 #include <sys/conf.h> 72 #include <sys/extattr.h> 73 #include <sys/kernel.h> 74 #include <sys/limits.h> 75 #include <sys/malloc.h> 76 #include <sys/mount.h> 77 #include <sys/priv.h> 78 #include <sys/rwlock.h> 79 #include <sys/stat.h> 80 #include <sys/vmmeter.h> 81 #include <sys/vnode.h> 82 83 #include <vm/vm.h> 84 #include <vm/vm_param.h> 85 #include <vm/vm_extern.h> 86 #include <vm/vm_object.h> 87 #include <vm/vm_page.h> 88 #include <vm/vm_pager.h> 89 #include <vm/vnode_pager.h> 90 91 #include <ufs/ufs/extattr.h> 92 #include <ufs/ufs/quota.h> 93 #include <ufs/ufs/inode.h> 94 #include <ufs/ufs/ufs_extern.h> 95 #include <ufs/ufs/ufsmount.h> 96 97 #include <ufs/ffs/fs.h> 98 #include <ufs/ffs/ffs_extern.h> 99 #include "opt_directio.h" 100 #include "opt_ffs.h" 101 102 #ifdef DIRECTIO 103 extern int ffs_rawread(struct vnode *vp, struct uio *uio, int *workdone); 104 #endif 105 static vop_fsync_t ffs_fsync; 106 static vop_lock1_t ffs_lock; 107 static vop_getpages_t ffs_getpages; 108 static vop_read_t ffs_read; 109 static vop_write_t ffs_write; 110 static int ffs_extread(struct vnode *vp, struct uio *uio, int ioflag); 111 static int ffs_extwrite(struct vnode *vp, struct uio *uio, int ioflag, 112 struct ucred *cred); 113 static vop_strategy_t ffsext_strategy; 114 static vop_closeextattr_t ffs_closeextattr; 115 static vop_deleteextattr_t ffs_deleteextattr; 116 static vop_getextattr_t ffs_getextattr; 117 static vop_listextattr_t ffs_listextattr; 118 static vop_openextattr_t ffs_openextattr; 119 static vop_setextattr_t ffs_setextattr; 120 static vop_vptofh_t ffs_vptofh; 121 122 123 /* Global vfs data structures for ufs. */ 124 struct vop_vector ffs_vnodeops1 = { 125 .vop_default = &ufs_vnodeops, 126 .vop_fsync = ffs_fsync, 127 .vop_getpages = ffs_getpages, 128 .vop_lock1 = ffs_lock, 129 .vop_read = ffs_read, 130 .vop_reallocblks = ffs_reallocblks, 131 .vop_write = ffs_write, 132 .vop_vptofh = ffs_vptofh, 133 }; 134 135 struct vop_vector ffs_fifoops1 = { 136 .vop_default = &ufs_fifoops, 137 .vop_fsync = ffs_fsync, 138 .vop_reallocblks = ffs_reallocblks, /* XXX: really ??? */ 139 .vop_vptofh = ffs_vptofh, 140 }; 141 142 /* Global vfs data structures for ufs. */ 143 struct vop_vector ffs_vnodeops2 = { 144 .vop_default = &ufs_vnodeops, 145 .vop_fsync = ffs_fsync, 146 .vop_getpages = ffs_getpages, 147 .vop_lock1 = ffs_lock, 148 .vop_read = ffs_read, 149 .vop_reallocblks = ffs_reallocblks, 150 .vop_write = ffs_write, 151 .vop_closeextattr = ffs_closeextattr, 152 .vop_deleteextattr = ffs_deleteextattr, 153 .vop_getextattr = ffs_getextattr, 154 .vop_listextattr = ffs_listextattr, 155 .vop_openextattr = ffs_openextattr, 156 .vop_setextattr = ffs_setextattr, 157 .vop_vptofh = ffs_vptofh, 158 }; 159 160 struct vop_vector ffs_fifoops2 = { 161 .vop_default = &ufs_fifoops, 162 .vop_fsync = ffs_fsync, 163 .vop_lock1 = ffs_lock, 164 .vop_reallocblks = ffs_reallocblks, 165 .vop_strategy = ffsext_strategy, 166 .vop_closeextattr = ffs_closeextattr, 167 .vop_deleteextattr = ffs_deleteextattr, 168 .vop_getextattr = ffs_getextattr, 169 .vop_listextattr = ffs_listextattr, 170 .vop_openextattr = ffs_openextattr, 171 .vop_setextattr = ffs_setextattr, 172 .vop_vptofh = ffs_vptofh, 173 }; 174 175 /* 176 * Synch an open file. 177 */ 178 /* ARGSUSED */ 179 static int 180 ffs_fsync(struct vop_fsync_args *ap) 181 { 182 struct vnode *vp; 183 struct bufobj *bo; 184 int error; 185 186 vp = ap->a_vp; 187 bo = &vp->v_bufobj; 188 retry: 189 error = ffs_syncvnode(vp, ap->a_waitfor, 0); 190 if (error) 191 return (error); 192 if (ap->a_waitfor == MNT_WAIT && DOINGSOFTDEP(vp)) { 193 error = softdep_fsync(vp); 194 if (error) 195 return (error); 196 197 /* 198 * The softdep_fsync() function may drop vp lock, 199 * allowing for dirty buffers to reappear on the 200 * bo_dirty list. Recheck and resync as needed. 201 */ 202 BO_LOCK(bo); 203 if (vp->v_type == VREG && (bo->bo_numoutput > 0 || 204 bo->bo_dirty.bv_cnt > 0)) { 205 BO_UNLOCK(bo); 206 goto retry; 207 } 208 BO_UNLOCK(bo); 209 } 210 return (0); 211 } 212 213 int 214 ffs_syncvnode(struct vnode *vp, int waitfor, int flags) 215 { 216 struct inode *ip; 217 struct bufobj *bo; 218 struct buf *bp; 219 struct buf *nbp; 220 ufs_lbn_t lbn; 221 int error, wait, passes; 222 223 ip = VTOI(vp); 224 ip->i_flag &= ~IN_NEEDSYNC; 225 bo = &vp->v_bufobj; 226 227 /* 228 * When doing MNT_WAIT we must first flush all dependencies 229 * on the inode. 230 */ 231 if (DOINGSOFTDEP(vp) && waitfor == MNT_WAIT && 232 (error = softdep_sync_metadata(vp)) != 0) 233 return (error); 234 235 /* 236 * Flush all dirty buffers associated with a vnode. 237 */ 238 error = 0; 239 passes = 0; 240 wait = 0; /* Always do an async pass first. */ 241 lbn = lblkno(ip->i_fs, (ip->i_size + ip->i_fs->fs_bsize - 1)); 242 BO_LOCK(bo); 243 loop: 244 TAILQ_FOREACH(bp, &bo->bo_dirty.bv_hd, b_bobufs) 245 bp->b_vflags &= ~BV_SCANNED; 246 TAILQ_FOREACH_SAFE(bp, &bo->bo_dirty.bv_hd, b_bobufs, nbp) { 247 /* 248 * Reasons to skip this buffer: it has already been considered 249 * on this pass, the buffer has dependencies that will cause 250 * it to be redirtied and it has not already been deferred, 251 * or it is already being written. 252 */ 253 if ((bp->b_vflags & BV_SCANNED) != 0) 254 continue; 255 bp->b_vflags |= BV_SCANNED; 256 /* Flush indirects in order. */ 257 if (waitfor == MNT_WAIT && bp->b_lblkno <= -NDADDR && 258 lbn_level(bp->b_lblkno) >= passes) 259 continue; 260 if (bp->b_lblkno > lbn) 261 panic("ffs_syncvnode: syncing truncated data."); 262 if (BUF_LOCK(bp, LK_EXCLUSIVE | LK_NOWAIT, NULL)) 263 continue; 264 BO_UNLOCK(bo); 265 if ((bp->b_flags & B_DELWRI) == 0) 266 panic("ffs_fsync: not dirty"); 267 /* 268 * Check for dependencies and potentially complete them. 269 */ 270 if (!LIST_EMPTY(&bp->b_dep) && 271 (error = softdep_sync_buf(vp, bp, 272 wait ? MNT_WAIT : MNT_NOWAIT)) != 0) { 273 /* I/O error. */ 274 if (error != EBUSY) { 275 BUF_UNLOCK(bp); 276 return (error); 277 } 278 /* If we deferred once, don't defer again. */ 279 if ((bp->b_flags & B_DEFERRED) == 0) { 280 bp->b_flags |= B_DEFERRED; 281 BUF_UNLOCK(bp); 282 goto next; 283 } 284 } 285 if (wait) { 286 bremfree(bp); 287 if ((error = bwrite(bp)) != 0) 288 return (error); 289 } else if ((bp->b_flags & B_CLUSTEROK)) { 290 (void) vfs_bio_awrite(bp); 291 } else { 292 bremfree(bp); 293 (void) bawrite(bp); 294 } 295 next: 296 /* 297 * Since we may have slept during the I/O, we need 298 * to start from a known point. 299 */ 300 BO_LOCK(bo); 301 nbp = TAILQ_FIRST(&bo->bo_dirty.bv_hd); 302 } 303 if (waitfor != MNT_WAIT) { 304 BO_UNLOCK(bo); 305 if ((flags & NO_INO_UPDT) != 0) 306 return (0); 307 else 308 return (ffs_update(vp, 0)); 309 } 310 /* Drain IO to see if we're done. */ 311 bufobj_wwait(bo, 0, 0); 312 /* 313 * Block devices associated with filesystems may have new I/O 314 * requests posted for them even if the vnode is locked, so no 315 * amount of trying will get them clean. We make several passes 316 * as a best effort. 317 * 318 * Regular files may need multiple passes to flush all dependency 319 * work as it is possible that we must write once per indirect 320 * level, once for the leaf, and once for the inode and each of 321 * these will be done with one sync and one async pass. 322 */ 323 if (bo->bo_dirty.bv_cnt > 0) { 324 /* Write the inode after sync passes to flush deps. */ 325 if (wait && DOINGSOFTDEP(vp) && (flags & NO_INO_UPDT) == 0) { 326 BO_UNLOCK(bo); 327 ffs_update(vp, 1); 328 BO_LOCK(bo); 329 } 330 /* switch between sync/async. */ 331 wait = !wait; 332 if (wait == 1 || ++passes < NIADDR + 2) 333 goto loop; 334 #ifdef INVARIANTS 335 if (!vn_isdisk(vp, NULL)) 336 vprint("ffs_fsync: dirty", vp); 337 #endif 338 } 339 BO_UNLOCK(bo); 340 error = 0; 341 if ((flags & NO_INO_UPDT) == 0) 342 error = ffs_update(vp, 1); 343 if (DOINGSUJ(vp)) 344 softdep_journal_fsync(VTOI(vp)); 345 return (error); 346 } 347 348 static int 349 ffs_lock(ap) 350 struct vop_lock1_args /* { 351 struct vnode *a_vp; 352 int a_flags; 353 struct thread *a_td; 354 char *file; 355 int line; 356 } */ *ap; 357 { 358 #ifndef NO_FFS_SNAPSHOT 359 struct vnode *vp; 360 int flags; 361 struct lock *lkp; 362 int result; 363 364 switch (ap->a_flags & LK_TYPE_MASK) { 365 case LK_SHARED: 366 case LK_UPGRADE: 367 case LK_EXCLUSIVE: 368 vp = ap->a_vp; 369 flags = ap->a_flags; 370 for (;;) { 371 #ifdef DEBUG_VFS_LOCKS 372 KASSERT(vp->v_holdcnt != 0, 373 ("ffs_lock %p: zero hold count", vp)); 374 #endif 375 lkp = vp->v_vnlock; 376 result = _lockmgr_args(lkp, flags, VI_MTX(vp), 377 LK_WMESG_DEFAULT, LK_PRIO_DEFAULT, LK_TIMO_DEFAULT, 378 ap->a_file, ap->a_line); 379 if (lkp == vp->v_vnlock || result != 0) 380 break; 381 /* 382 * Apparent success, except that the vnode 383 * mutated between snapshot file vnode and 384 * regular file vnode while this process 385 * slept. The lock currently held is not the 386 * right lock. Release it, and try to get the 387 * new lock. 388 */ 389 (void) _lockmgr_args(lkp, LK_RELEASE, NULL, 390 LK_WMESG_DEFAULT, LK_PRIO_DEFAULT, LK_TIMO_DEFAULT, 391 ap->a_file, ap->a_line); 392 if ((flags & (LK_INTERLOCK | LK_NOWAIT)) == 393 (LK_INTERLOCK | LK_NOWAIT)) 394 return (EBUSY); 395 if ((flags & LK_TYPE_MASK) == LK_UPGRADE) 396 flags = (flags & ~LK_TYPE_MASK) | LK_EXCLUSIVE; 397 flags &= ~LK_INTERLOCK; 398 } 399 break; 400 default: 401 result = VOP_LOCK1_APV(&ufs_vnodeops, ap); 402 } 403 return (result); 404 #else 405 return (VOP_LOCK1_APV(&ufs_vnodeops, ap)); 406 #endif 407 } 408 409 /* 410 * Vnode op for reading. 411 */ 412 static int 413 ffs_read(ap) 414 struct vop_read_args /* { 415 struct vnode *a_vp; 416 struct uio *a_uio; 417 int a_ioflag; 418 struct ucred *a_cred; 419 } */ *ap; 420 { 421 struct vnode *vp; 422 struct inode *ip; 423 struct uio *uio; 424 struct fs *fs; 425 struct buf *bp; 426 ufs_lbn_t lbn, nextlbn; 427 off_t bytesinfile; 428 long size, xfersize, blkoffset; 429 ssize_t orig_resid; 430 int error; 431 int seqcount; 432 int ioflag; 433 434 vp = ap->a_vp; 435 uio = ap->a_uio; 436 ioflag = ap->a_ioflag; 437 if (ap->a_ioflag & IO_EXT) 438 #ifdef notyet 439 return (ffs_extread(vp, uio, ioflag)); 440 #else 441 panic("ffs_read+IO_EXT"); 442 #endif 443 #ifdef DIRECTIO 444 if ((ioflag & IO_DIRECT) != 0) { 445 int workdone; 446 447 error = ffs_rawread(vp, uio, &workdone); 448 if (error != 0 || workdone != 0) 449 return error; 450 } 451 #endif 452 453 seqcount = ap->a_ioflag >> IO_SEQSHIFT; 454 ip = VTOI(vp); 455 456 #ifdef INVARIANTS 457 if (uio->uio_rw != UIO_READ) 458 panic("ffs_read: mode"); 459 460 if (vp->v_type == VLNK) { 461 if ((int)ip->i_size < vp->v_mount->mnt_maxsymlinklen) 462 panic("ffs_read: short symlink"); 463 } else if (vp->v_type != VREG && vp->v_type != VDIR) 464 panic("ffs_read: type %d", vp->v_type); 465 #endif 466 orig_resid = uio->uio_resid; 467 KASSERT(orig_resid >= 0, ("ffs_read: uio->uio_resid < 0")); 468 if (orig_resid == 0) 469 return (0); 470 KASSERT(uio->uio_offset >= 0, ("ffs_read: uio->uio_offset < 0")); 471 fs = ip->i_fs; 472 if (uio->uio_offset < ip->i_size && 473 uio->uio_offset >= fs->fs_maxfilesize) 474 return (EOVERFLOW); 475 476 for (error = 0, bp = NULL; uio->uio_resid > 0; bp = NULL) { 477 if ((bytesinfile = ip->i_size - uio->uio_offset) <= 0) 478 break; 479 lbn = lblkno(fs, uio->uio_offset); 480 nextlbn = lbn + 1; 481 482 /* 483 * size of buffer. The buffer representing the 484 * end of the file is rounded up to the size of 485 * the block type ( fragment or full block, 486 * depending ). 487 */ 488 size = blksize(fs, ip, lbn); 489 blkoffset = blkoff(fs, uio->uio_offset); 490 491 /* 492 * The amount we want to transfer in this iteration is 493 * one FS block less the amount of the data before 494 * our startpoint (duh!) 495 */ 496 xfersize = fs->fs_bsize - blkoffset; 497 498 /* 499 * But if we actually want less than the block, 500 * or the file doesn't have a whole block more of data, 501 * then use the lesser number. 502 */ 503 if (uio->uio_resid < xfersize) 504 xfersize = uio->uio_resid; 505 if (bytesinfile < xfersize) 506 xfersize = bytesinfile; 507 508 if (lblktosize(fs, nextlbn) >= ip->i_size) { 509 /* 510 * Don't do readahead if this is the end of the file. 511 */ 512 error = bread_gb(vp, lbn, size, NOCRED, 513 GB_UNMAPPED, &bp); 514 } else if ((vp->v_mount->mnt_flag & MNT_NOCLUSTERR) == 0) { 515 /* 516 * Otherwise if we are allowed to cluster, 517 * grab as much as we can. 518 * 519 * XXX This may not be a win if we are not 520 * doing sequential access. 521 */ 522 error = cluster_read(vp, ip->i_size, lbn, 523 size, NOCRED, blkoffset + uio->uio_resid, 524 seqcount, GB_UNMAPPED, &bp); 525 } else if (seqcount > 1) { 526 /* 527 * If we are NOT allowed to cluster, then 528 * if we appear to be acting sequentially, 529 * fire off a request for a readahead 530 * as well as a read. Note that the 4th and 5th 531 * arguments point to arrays of the size specified in 532 * the 6th argument. 533 */ 534 int nextsize = blksize(fs, ip, nextlbn); 535 error = breadn_flags(vp, lbn, size, &nextlbn, 536 &nextsize, 1, NOCRED, GB_UNMAPPED, &bp); 537 } else { 538 /* 539 * Failing all of the above, just read what the 540 * user asked for. Interestingly, the same as 541 * the first option above. 542 */ 543 error = bread_gb(vp, lbn, size, NOCRED, 544 GB_UNMAPPED, &bp); 545 } 546 if (error) { 547 brelse(bp); 548 bp = NULL; 549 break; 550 } 551 552 /* 553 * If IO_DIRECT then set B_DIRECT for the buffer. This 554 * will cause us to attempt to release the buffer later on 555 * and will cause the buffer cache to attempt to free the 556 * underlying pages. 557 */ 558 if (ioflag & IO_DIRECT) 559 bp->b_flags |= B_DIRECT; 560 561 /* 562 * We should only get non-zero b_resid when an I/O error 563 * has occurred, which should cause us to break above. 564 * However, if the short read did not cause an error, 565 * then we want to ensure that we do not uiomove bad 566 * or uninitialized data. 567 */ 568 size -= bp->b_resid; 569 if (size < xfersize) { 570 if (size == 0) 571 break; 572 xfersize = size; 573 } 574 575 if ((bp->b_flags & B_UNMAPPED) == 0) { 576 error = vn_io_fault_uiomove((char *)bp->b_data + 577 blkoffset, (int)xfersize, uio); 578 } else { 579 error = vn_io_fault_pgmove(bp->b_pages, blkoffset, 580 (int)xfersize, uio); 581 } 582 if (error) 583 break; 584 585 if ((ioflag & (IO_VMIO|IO_DIRECT)) && 586 (LIST_EMPTY(&bp->b_dep))) { 587 /* 588 * If there are no dependencies, and it's VMIO, 589 * then we don't need the buf, mark it available 590 * for freeing. For non-direct VMIO reads, the VM 591 * has the data. 592 */ 593 bp->b_flags |= B_RELBUF; 594 brelse(bp); 595 } else { 596 /* 597 * Otherwise let whoever 598 * made the request take care of 599 * freeing it. We just queue 600 * it onto another list. 601 */ 602 bqrelse(bp); 603 } 604 } 605 606 /* 607 * This can only happen in the case of an error 608 * because the loop above resets bp to NULL on each iteration 609 * and on normal completion has not set a new value into it. 610 * so it must have come from a 'break' statement 611 */ 612 if (bp != NULL) { 613 if ((ioflag & (IO_VMIO|IO_DIRECT)) && 614 (LIST_EMPTY(&bp->b_dep))) { 615 bp->b_flags |= B_RELBUF; 616 brelse(bp); 617 } else { 618 bqrelse(bp); 619 } 620 } 621 622 if ((error == 0 || uio->uio_resid != orig_resid) && 623 (vp->v_mount->mnt_flag & MNT_NOATIME) == 0 && 624 (ip->i_flag & IN_ACCESS) == 0) { 625 VI_LOCK(vp); 626 ip->i_flag |= IN_ACCESS; 627 VI_UNLOCK(vp); 628 } 629 return (error); 630 } 631 632 /* 633 * Vnode op for writing. 634 */ 635 static int 636 ffs_write(ap) 637 struct vop_write_args /* { 638 struct vnode *a_vp; 639 struct uio *a_uio; 640 int a_ioflag; 641 struct ucred *a_cred; 642 } */ *ap; 643 { 644 struct vnode *vp; 645 struct uio *uio; 646 struct inode *ip; 647 struct fs *fs; 648 struct buf *bp; 649 ufs_lbn_t lbn; 650 off_t osize; 651 ssize_t resid; 652 int seqcount; 653 int blkoffset, error, flags, ioflag, size, xfersize; 654 655 vp = ap->a_vp; 656 uio = ap->a_uio; 657 ioflag = ap->a_ioflag; 658 if (ap->a_ioflag & IO_EXT) 659 #ifdef notyet 660 return (ffs_extwrite(vp, uio, ioflag, ap->a_cred)); 661 #else 662 panic("ffs_write+IO_EXT"); 663 #endif 664 665 seqcount = ap->a_ioflag >> IO_SEQSHIFT; 666 ip = VTOI(vp); 667 668 #ifdef INVARIANTS 669 if (uio->uio_rw != UIO_WRITE) 670 panic("ffs_write: mode"); 671 #endif 672 673 switch (vp->v_type) { 674 case VREG: 675 if (ioflag & IO_APPEND) 676 uio->uio_offset = ip->i_size; 677 if ((ip->i_flags & APPEND) && uio->uio_offset != ip->i_size) 678 return (EPERM); 679 /* FALLTHROUGH */ 680 case VLNK: 681 break; 682 case VDIR: 683 panic("ffs_write: dir write"); 684 break; 685 default: 686 panic("ffs_write: type %p %d (%d,%d)", vp, (int)vp->v_type, 687 (int)uio->uio_offset, 688 (int)uio->uio_resid 689 ); 690 } 691 692 KASSERT(uio->uio_resid >= 0, ("ffs_write: uio->uio_resid < 0")); 693 KASSERT(uio->uio_offset >= 0, ("ffs_write: uio->uio_offset < 0")); 694 fs = ip->i_fs; 695 if ((uoff_t)uio->uio_offset + uio->uio_resid > fs->fs_maxfilesize) 696 return (EFBIG); 697 /* 698 * Maybe this should be above the vnode op call, but so long as 699 * file servers have no limits, I don't think it matters. 700 */ 701 if (vn_rlimit_fsize(vp, uio, uio->uio_td)) 702 return (EFBIG); 703 704 resid = uio->uio_resid; 705 osize = ip->i_size; 706 if (seqcount > BA_SEQMAX) 707 flags = BA_SEQMAX << BA_SEQSHIFT; 708 else 709 flags = seqcount << BA_SEQSHIFT; 710 if ((ioflag & IO_SYNC) && !DOINGASYNC(vp)) 711 flags |= IO_SYNC; 712 flags |= BA_UNMAPPED; 713 714 for (error = 0; uio->uio_resid > 0;) { 715 lbn = lblkno(fs, uio->uio_offset); 716 blkoffset = blkoff(fs, uio->uio_offset); 717 xfersize = fs->fs_bsize - blkoffset; 718 if (uio->uio_resid < xfersize) 719 xfersize = uio->uio_resid; 720 if (uio->uio_offset + xfersize > ip->i_size) 721 vnode_pager_setsize(vp, uio->uio_offset + xfersize); 722 723 /* 724 * We must perform a read-before-write if the transfer size 725 * does not cover the entire buffer. 726 */ 727 if (fs->fs_bsize > xfersize) 728 flags |= BA_CLRBUF; 729 else 730 flags &= ~BA_CLRBUF; 731 /* XXX is uio->uio_offset the right thing here? */ 732 error = UFS_BALLOC(vp, uio->uio_offset, xfersize, 733 ap->a_cred, flags, &bp); 734 if (error != 0) { 735 vnode_pager_setsize(vp, ip->i_size); 736 break; 737 } 738 if (ioflag & IO_DIRECT) 739 bp->b_flags |= B_DIRECT; 740 if ((ioflag & (IO_SYNC|IO_INVAL)) == (IO_SYNC|IO_INVAL)) 741 bp->b_flags |= B_NOCACHE; 742 743 if (uio->uio_offset + xfersize > ip->i_size) { 744 ip->i_size = uio->uio_offset + xfersize; 745 DIP_SET(ip, i_size, ip->i_size); 746 } 747 748 size = blksize(fs, ip, lbn) - bp->b_resid; 749 if (size < xfersize) 750 xfersize = size; 751 752 if ((bp->b_flags & B_UNMAPPED) == 0) { 753 error = vn_io_fault_uiomove((char *)bp->b_data + 754 blkoffset, (int)xfersize, uio); 755 } else { 756 error = vn_io_fault_pgmove(bp->b_pages, blkoffset, 757 (int)xfersize, uio); 758 } 759 /* 760 * If the buffer is not already filled and we encounter an 761 * error while trying to fill it, we have to clear out any 762 * garbage data from the pages instantiated for the buffer. 763 * If we do not, a failed uiomove() during a write can leave 764 * the prior contents of the pages exposed to a userland mmap. 765 * 766 * Note that we need only clear buffers with a transfer size 767 * equal to the block size because buffers with a shorter 768 * transfer size were cleared above by the call to UFS_BALLOC() 769 * with the BA_CLRBUF flag set. 770 * 771 * If the source region for uiomove identically mmaps the 772 * buffer, uiomove() performed the NOP copy, and the buffer 773 * content remains valid because the page fault handler 774 * validated the pages. 775 */ 776 if (error != 0 && (bp->b_flags & B_CACHE) == 0 && 777 fs->fs_bsize == xfersize) 778 vfs_bio_clrbuf(bp); 779 if ((ioflag & (IO_VMIO|IO_DIRECT)) && 780 (LIST_EMPTY(&bp->b_dep))) { 781 bp->b_flags |= B_RELBUF; 782 } 783 784 /* 785 * If IO_SYNC each buffer is written synchronously. Otherwise 786 * if we have a severe page deficiency write the buffer 787 * asynchronously. Otherwise try to cluster, and if that 788 * doesn't do it then either do an async write (if O_DIRECT), 789 * or a delayed write (if not). 790 */ 791 if (ioflag & IO_SYNC) { 792 (void)bwrite(bp); 793 } else if (vm_page_count_severe() || 794 buf_dirty_count_severe() || 795 (ioflag & IO_ASYNC)) { 796 bp->b_flags |= B_CLUSTEROK; 797 bawrite(bp); 798 } else if (xfersize + blkoffset == fs->fs_bsize) { 799 if ((vp->v_mount->mnt_flag & MNT_NOCLUSTERW) == 0) { 800 bp->b_flags |= B_CLUSTEROK; 801 cluster_write(vp, bp, ip->i_size, seqcount, 802 GB_UNMAPPED); 803 } else { 804 bawrite(bp); 805 } 806 } else if (ioflag & IO_DIRECT) { 807 bp->b_flags |= B_CLUSTEROK; 808 bawrite(bp); 809 } else { 810 bp->b_flags |= B_CLUSTEROK; 811 bdwrite(bp); 812 } 813 if (error || xfersize == 0) 814 break; 815 ip->i_flag |= IN_CHANGE | IN_UPDATE; 816 } 817 /* 818 * If we successfully wrote any data, and we are not the superuser 819 * we clear the setuid and setgid bits as a precaution against 820 * tampering. 821 */ 822 if ((ip->i_mode & (ISUID | ISGID)) && resid > uio->uio_resid && 823 ap->a_cred) { 824 if (priv_check_cred(ap->a_cred, PRIV_VFS_RETAINSUGID, 0)) { 825 ip->i_mode &= ~(ISUID | ISGID); 826 DIP_SET(ip, i_mode, ip->i_mode); 827 } 828 } 829 if (error) { 830 if (ioflag & IO_UNIT) { 831 (void)ffs_truncate(vp, osize, 832 IO_NORMAL | (ioflag & IO_SYNC), ap->a_cred); 833 uio->uio_offset -= resid - uio->uio_resid; 834 uio->uio_resid = resid; 835 } 836 } else if (resid > uio->uio_resid && (ioflag & IO_SYNC)) 837 error = ffs_update(vp, 1); 838 return (error); 839 } 840 841 /* 842 * get page routine 843 */ 844 static int 845 ffs_getpages(ap) 846 struct vop_getpages_args *ap; 847 { 848 int i; 849 vm_page_t mreq; 850 int pcount; 851 852 pcount = round_page(ap->a_count) / PAGE_SIZE; 853 mreq = ap->a_m[ap->a_reqpage]; 854 855 /* 856 * if ANY DEV_BSIZE blocks are valid on a large filesystem block, 857 * then the entire page is valid. Since the page may be mapped, 858 * user programs might reference data beyond the actual end of file 859 * occuring within the page. We have to zero that data. 860 */ 861 VM_OBJECT_WLOCK(mreq->object); 862 if (mreq->valid) { 863 if (mreq->valid != VM_PAGE_BITS_ALL) 864 vm_page_zero_invalid(mreq, TRUE); 865 for (i = 0; i < pcount; i++) { 866 if (i != ap->a_reqpage) { 867 vm_page_lock(ap->a_m[i]); 868 vm_page_free(ap->a_m[i]); 869 vm_page_unlock(ap->a_m[i]); 870 } 871 } 872 VM_OBJECT_WUNLOCK(mreq->object); 873 return VM_PAGER_OK; 874 } 875 VM_OBJECT_WUNLOCK(mreq->object); 876 877 return vnode_pager_generic_getpages(ap->a_vp, ap->a_m, 878 ap->a_count, 879 ap->a_reqpage); 880 } 881 882 883 /* 884 * Extended attribute area reading. 885 */ 886 static int 887 ffs_extread(struct vnode *vp, struct uio *uio, int ioflag) 888 { 889 struct inode *ip; 890 struct ufs2_dinode *dp; 891 struct fs *fs; 892 struct buf *bp; 893 ufs_lbn_t lbn, nextlbn; 894 off_t bytesinfile; 895 long size, xfersize, blkoffset; 896 ssize_t orig_resid; 897 int error; 898 899 ip = VTOI(vp); 900 fs = ip->i_fs; 901 dp = ip->i_din2; 902 903 #ifdef INVARIANTS 904 if (uio->uio_rw != UIO_READ || fs->fs_magic != FS_UFS2_MAGIC) 905 panic("ffs_extread: mode"); 906 907 #endif 908 orig_resid = uio->uio_resid; 909 KASSERT(orig_resid >= 0, ("ffs_extread: uio->uio_resid < 0")); 910 if (orig_resid == 0) 911 return (0); 912 KASSERT(uio->uio_offset >= 0, ("ffs_extread: uio->uio_offset < 0")); 913 914 for (error = 0, bp = NULL; uio->uio_resid > 0; bp = NULL) { 915 if ((bytesinfile = dp->di_extsize - uio->uio_offset) <= 0) 916 break; 917 lbn = lblkno(fs, uio->uio_offset); 918 nextlbn = lbn + 1; 919 920 /* 921 * size of buffer. The buffer representing the 922 * end of the file is rounded up to the size of 923 * the block type ( fragment or full block, 924 * depending ). 925 */ 926 size = sblksize(fs, dp->di_extsize, lbn); 927 blkoffset = blkoff(fs, uio->uio_offset); 928 929 /* 930 * The amount we want to transfer in this iteration is 931 * one FS block less the amount of the data before 932 * our startpoint (duh!) 933 */ 934 xfersize = fs->fs_bsize - blkoffset; 935 936 /* 937 * But if we actually want less than the block, 938 * or the file doesn't have a whole block more of data, 939 * then use the lesser number. 940 */ 941 if (uio->uio_resid < xfersize) 942 xfersize = uio->uio_resid; 943 if (bytesinfile < xfersize) 944 xfersize = bytesinfile; 945 946 if (lblktosize(fs, nextlbn) >= dp->di_extsize) { 947 /* 948 * Don't do readahead if this is the end of the info. 949 */ 950 error = bread(vp, -1 - lbn, size, NOCRED, &bp); 951 } else { 952 /* 953 * If we have a second block, then 954 * fire off a request for a readahead 955 * as well as a read. Note that the 4th and 5th 956 * arguments point to arrays of the size specified in 957 * the 6th argument. 958 */ 959 int nextsize = sblksize(fs, dp->di_extsize, nextlbn); 960 961 nextlbn = -1 - nextlbn; 962 error = breadn(vp, -1 - lbn, 963 size, &nextlbn, &nextsize, 1, NOCRED, &bp); 964 } 965 if (error) { 966 brelse(bp); 967 bp = NULL; 968 break; 969 } 970 971 /* 972 * If IO_DIRECT then set B_DIRECT for the buffer. This 973 * will cause us to attempt to release the buffer later on 974 * and will cause the buffer cache to attempt to free the 975 * underlying pages. 976 */ 977 if (ioflag & IO_DIRECT) 978 bp->b_flags |= B_DIRECT; 979 980 /* 981 * We should only get non-zero b_resid when an I/O error 982 * has occurred, which should cause us to break above. 983 * However, if the short read did not cause an error, 984 * then we want to ensure that we do not uiomove bad 985 * or uninitialized data. 986 */ 987 size -= bp->b_resid; 988 if (size < xfersize) { 989 if (size == 0) 990 break; 991 xfersize = size; 992 } 993 994 error = uiomove((char *)bp->b_data + blkoffset, 995 (int)xfersize, uio); 996 if (error) 997 break; 998 999 if ((ioflag & (IO_VMIO|IO_DIRECT)) && 1000 (LIST_EMPTY(&bp->b_dep))) { 1001 /* 1002 * If there are no dependencies, and it's VMIO, 1003 * then we don't need the buf, mark it available 1004 * for freeing. For non-direct VMIO reads, the VM 1005 * has the data. 1006 */ 1007 bp->b_flags |= B_RELBUF; 1008 brelse(bp); 1009 } else { 1010 /* 1011 * Otherwise let whoever 1012 * made the request take care of 1013 * freeing it. We just queue 1014 * it onto another list. 1015 */ 1016 bqrelse(bp); 1017 } 1018 } 1019 1020 /* 1021 * This can only happen in the case of an error 1022 * because the loop above resets bp to NULL on each iteration 1023 * and on normal completion has not set a new value into it. 1024 * so it must have come from a 'break' statement 1025 */ 1026 if (bp != NULL) { 1027 if ((ioflag & (IO_VMIO|IO_DIRECT)) && 1028 (LIST_EMPTY(&bp->b_dep))) { 1029 bp->b_flags |= B_RELBUF; 1030 brelse(bp); 1031 } else { 1032 bqrelse(bp); 1033 } 1034 } 1035 return (error); 1036 } 1037 1038 /* 1039 * Extended attribute area writing. 1040 */ 1041 static int 1042 ffs_extwrite(struct vnode *vp, struct uio *uio, int ioflag, struct ucred *ucred) 1043 { 1044 struct inode *ip; 1045 struct ufs2_dinode *dp; 1046 struct fs *fs; 1047 struct buf *bp; 1048 ufs_lbn_t lbn; 1049 off_t osize; 1050 ssize_t resid; 1051 int blkoffset, error, flags, size, xfersize; 1052 1053 ip = VTOI(vp); 1054 fs = ip->i_fs; 1055 dp = ip->i_din2; 1056 1057 #ifdef INVARIANTS 1058 if (uio->uio_rw != UIO_WRITE || fs->fs_magic != FS_UFS2_MAGIC) 1059 panic("ffs_extwrite: mode"); 1060 #endif 1061 1062 if (ioflag & IO_APPEND) 1063 uio->uio_offset = dp->di_extsize; 1064 KASSERT(uio->uio_offset >= 0, ("ffs_extwrite: uio->uio_offset < 0")); 1065 KASSERT(uio->uio_resid >= 0, ("ffs_extwrite: uio->uio_resid < 0")); 1066 if ((uoff_t)uio->uio_offset + uio->uio_resid > NXADDR * fs->fs_bsize) 1067 return (EFBIG); 1068 1069 resid = uio->uio_resid; 1070 osize = dp->di_extsize; 1071 flags = IO_EXT; 1072 if ((ioflag & IO_SYNC) && !DOINGASYNC(vp)) 1073 flags |= IO_SYNC; 1074 1075 for (error = 0; uio->uio_resid > 0;) { 1076 lbn = lblkno(fs, uio->uio_offset); 1077 blkoffset = blkoff(fs, uio->uio_offset); 1078 xfersize = fs->fs_bsize - blkoffset; 1079 if (uio->uio_resid < xfersize) 1080 xfersize = uio->uio_resid; 1081 1082 /* 1083 * We must perform a read-before-write if the transfer size 1084 * does not cover the entire buffer. 1085 */ 1086 if (fs->fs_bsize > xfersize) 1087 flags |= BA_CLRBUF; 1088 else 1089 flags &= ~BA_CLRBUF; 1090 error = UFS_BALLOC(vp, uio->uio_offset, xfersize, 1091 ucred, flags, &bp); 1092 if (error != 0) 1093 break; 1094 /* 1095 * If the buffer is not valid we have to clear out any 1096 * garbage data from the pages instantiated for the buffer. 1097 * If we do not, a failed uiomove() during a write can leave 1098 * the prior contents of the pages exposed to a userland 1099 * mmap(). XXX deal with uiomove() errors a better way. 1100 */ 1101 if ((bp->b_flags & B_CACHE) == 0 && fs->fs_bsize <= xfersize) 1102 vfs_bio_clrbuf(bp); 1103 if (ioflag & IO_DIRECT) 1104 bp->b_flags |= B_DIRECT; 1105 1106 if (uio->uio_offset + xfersize > dp->di_extsize) 1107 dp->di_extsize = uio->uio_offset + xfersize; 1108 1109 size = sblksize(fs, dp->di_extsize, lbn) - bp->b_resid; 1110 if (size < xfersize) 1111 xfersize = size; 1112 1113 error = 1114 uiomove((char *)bp->b_data + blkoffset, (int)xfersize, uio); 1115 if ((ioflag & (IO_VMIO|IO_DIRECT)) && 1116 (LIST_EMPTY(&bp->b_dep))) { 1117 bp->b_flags |= B_RELBUF; 1118 } 1119 1120 /* 1121 * If IO_SYNC each buffer is written synchronously. Otherwise 1122 * if we have a severe page deficiency write the buffer 1123 * asynchronously. Otherwise try to cluster, and if that 1124 * doesn't do it then either do an async write (if O_DIRECT), 1125 * or a delayed write (if not). 1126 */ 1127 if (ioflag & IO_SYNC) { 1128 (void)bwrite(bp); 1129 } else if (vm_page_count_severe() || 1130 buf_dirty_count_severe() || 1131 xfersize + blkoffset == fs->fs_bsize || 1132 (ioflag & (IO_ASYNC | IO_DIRECT))) 1133 bawrite(bp); 1134 else 1135 bdwrite(bp); 1136 if (error || xfersize == 0) 1137 break; 1138 ip->i_flag |= IN_CHANGE; 1139 } 1140 /* 1141 * If we successfully wrote any data, and we are not the superuser 1142 * we clear the setuid and setgid bits as a precaution against 1143 * tampering. 1144 */ 1145 if ((ip->i_mode & (ISUID | ISGID)) && resid > uio->uio_resid && ucred) { 1146 if (priv_check_cred(ucred, PRIV_VFS_RETAINSUGID, 0)) { 1147 ip->i_mode &= ~(ISUID | ISGID); 1148 dp->di_mode = ip->i_mode; 1149 } 1150 } 1151 if (error) { 1152 if (ioflag & IO_UNIT) { 1153 (void)ffs_truncate(vp, osize, 1154 IO_EXT | (ioflag&IO_SYNC), ucred); 1155 uio->uio_offset -= resid - uio->uio_resid; 1156 uio->uio_resid = resid; 1157 } 1158 } else if (resid > uio->uio_resid && (ioflag & IO_SYNC)) 1159 error = ffs_update(vp, 1); 1160 return (error); 1161 } 1162 1163 1164 /* 1165 * Vnode operating to retrieve a named extended attribute. 1166 * 1167 * Locate a particular EA (nspace:name) in the area (ptr:length), and return 1168 * the length of the EA, and possibly the pointer to the entry and to the data. 1169 */ 1170 static int 1171 ffs_findextattr(u_char *ptr, u_int length, int nspace, const char *name, u_char **eap, u_char **eac) 1172 { 1173 u_char *p, *pe, *pn, *p0; 1174 int eapad1, eapad2, ealength, ealen, nlen; 1175 uint32_t ul; 1176 1177 pe = ptr + length; 1178 nlen = strlen(name); 1179 1180 for (p = ptr; p < pe; p = pn) { 1181 p0 = p; 1182 bcopy(p, &ul, sizeof(ul)); 1183 pn = p + ul; 1184 /* make sure this entry is complete */ 1185 if (pn > pe) 1186 break; 1187 p += sizeof(uint32_t); 1188 if (*p != nspace) 1189 continue; 1190 p++; 1191 eapad2 = *p++; 1192 if (*p != nlen) 1193 continue; 1194 p++; 1195 if (bcmp(p, name, nlen)) 1196 continue; 1197 ealength = sizeof(uint32_t) + 3 + nlen; 1198 eapad1 = 8 - (ealength % 8); 1199 if (eapad1 == 8) 1200 eapad1 = 0; 1201 ealength += eapad1; 1202 ealen = ul - ealength - eapad2; 1203 p += nlen + eapad1; 1204 if (eap != NULL) 1205 *eap = p0; 1206 if (eac != NULL) 1207 *eac = p; 1208 return (ealen); 1209 } 1210 return(-1); 1211 } 1212 1213 static int 1214 ffs_rdextattr(u_char **p, struct vnode *vp, struct thread *td, int extra) 1215 { 1216 struct inode *ip; 1217 struct ufs2_dinode *dp; 1218 struct fs *fs; 1219 struct uio luio; 1220 struct iovec liovec; 1221 int easize, error; 1222 u_char *eae; 1223 1224 ip = VTOI(vp); 1225 fs = ip->i_fs; 1226 dp = ip->i_din2; 1227 easize = dp->di_extsize; 1228 if ((uoff_t)easize + extra > NXADDR * fs->fs_bsize) 1229 return (EFBIG); 1230 1231 eae = malloc(easize + extra, M_TEMP, M_WAITOK); 1232 1233 liovec.iov_base = eae; 1234 liovec.iov_len = easize; 1235 luio.uio_iov = &liovec; 1236 luio.uio_iovcnt = 1; 1237 luio.uio_offset = 0; 1238 luio.uio_resid = easize; 1239 luio.uio_segflg = UIO_SYSSPACE; 1240 luio.uio_rw = UIO_READ; 1241 luio.uio_td = td; 1242 1243 error = ffs_extread(vp, &luio, IO_EXT | IO_SYNC); 1244 if (error) { 1245 free(eae, M_TEMP); 1246 return(error); 1247 } 1248 *p = eae; 1249 return (0); 1250 } 1251 1252 static void 1253 ffs_lock_ea(struct vnode *vp) 1254 { 1255 struct inode *ip; 1256 1257 ip = VTOI(vp); 1258 VI_LOCK(vp); 1259 while (ip->i_flag & IN_EA_LOCKED) { 1260 ip->i_flag |= IN_EA_LOCKWAIT; 1261 msleep(&ip->i_ea_refs, &vp->v_interlock, PINOD + 2, "ufs_ea", 1262 0); 1263 } 1264 ip->i_flag |= IN_EA_LOCKED; 1265 VI_UNLOCK(vp); 1266 } 1267 1268 static void 1269 ffs_unlock_ea(struct vnode *vp) 1270 { 1271 struct inode *ip; 1272 1273 ip = VTOI(vp); 1274 VI_LOCK(vp); 1275 if (ip->i_flag & IN_EA_LOCKWAIT) 1276 wakeup(&ip->i_ea_refs); 1277 ip->i_flag &= ~(IN_EA_LOCKED | IN_EA_LOCKWAIT); 1278 VI_UNLOCK(vp); 1279 } 1280 1281 static int 1282 ffs_open_ea(struct vnode *vp, struct ucred *cred, struct thread *td) 1283 { 1284 struct inode *ip; 1285 struct ufs2_dinode *dp; 1286 int error; 1287 1288 ip = VTOI(vp); 1289 1290 ffs_lock_ea(vp); 1291 if (ip->i_ea_area != NULL) { 1292 ip->i_ea_refs++; 1293 ffs_unlock_ea(vp); 1294 return (0); 1295 } 1296 dp = ip->i_din2; 1297 error = ffs_rdextattr(&ip->i_ea_area, vp, td, 0); 1298 if (error) { 1299 ffs_unlock_ea(vp); 1300 return (error); 1301 } 1302 ip->i_ea_len = dp->di_extsize; 1303 ip->i_ea_error = 0; 1304 ip->i_ea_refs++; 1305 ffs_unlock_ea(vp); 1306 return (0); 1307 } 1308 1309 /* 1310 * Vnode extattr transaction commit/abort 1311 */ 1312 static int 1313 ffs_close_ea(struct vnode *vp, int commit, struct ucred *cred, struct thread *td) 1314 { 1315 struct inode *ip; 1316 struct uio luio; 1317 struct iovec liovec; 1318 int error; 1319 struct ufs2_dinode *dp; 1320 1321 ip = VTOI(vp); 1322 1323 ffs_lock_ea(vp); 1324 if (ip->i_ea_area == NULL) { 1325 ffs_unlock_ea(vp); 1326 return (EINVAL); 1327 } 1328 dp = ip->i_din2; 1329 error = ip->i_ea_error; 1330 if (commit && error == 0) { 1331 ASSERT_VOP_ELOCKED(vp, "ffs_close_ea commit"); 1332 if (cred == NOCRED) 1333 cred = vp->v_mount->mnt_cred; 1334 liovec.iov_base = ip->i_ea_area; 1335 liovec.iov_len = ip->i_ea_len; 1336 luio.uio_iov = &liovec; 1337 luio.uio_iovcnt = 1; 1338 luio.uio_offset = 0; 1339 luio.uio_resid = ip->i_ea_len; 1340 luio.uio_segflg = UIO_SYSSPACE; 1341 luio.uio_rw = UIO_WRITE; 1342 luio.uio_td = td; 1343 /* XXX: I'm not happy about truncating to zero size */ 1344 if (ip->i_ea_len < dp->di_extsize) 1345 error = ffs_truncate(vp, 0, IO_EXT, cred); 1346 error = ffs_extwrite(vp, &luio, IO_EXT | IO_SYNC, cred); 1347 } 1348 if (--ip->i_ea_refs == 0) { 1349 free(ip->i_ea_area, M_TEMP); 1350 ip->i_ea_area = NULL; 1351 ip->i_ea_len = 0; 1352 ip->i_ea_error = 0; 1353 } 1354 ffs_unlock_ea(vp); 1355 return (error); 1356 } 1357 1358 /* 1359 * Vnode extattr strategy routine for fifos. 1360 * 1361 * We need to check for a read or write of the external attributes. 1362 * Otherwise we just fall through and do the usual thing. 1363 */ 1364 static int 1365 ffsext_strategy(struct vop_strategy_args *ap) 1366 /* 1367 struct vop_strategy_args { 1368 struct vnodeop_desc *a_desc; 1369 struct vnode *a_vp; 1370 struct buf *a_bp; 1371 }; 1372 */ 1373 { 1374 struct vnode *vp; 1375 daddr_t lbn; 1376 1377 vp = ap->a_vp; 1378 lbn = ap->a_bp->b_lblkno; 1379 if (VTOI(vp)->i_fs->fs_magic == FS_UFS2_MAGIC && 1380 lbn < 0 && lbn >= -NXADDR) 1381 return (VOP_STRATEGY_APV(&ufs_vnodeops, ap)); 1382 if (vp->v_type == VFIFO) 1383 return (VOP_STRATEGY_APV(&ufs_fifoops, ap)); 1384 panic("spec nodes went here"); 1385 } 1386 1387 /* 1388 * Vnode extattr transaction commit/abort 1389 */ 1390 static int 1391 ffs_openextattr(struct vop_openextattr_args *ap) 1392 /* 1393 struct vop_openextattr_args { 1394 struct vnodeop_desc *a_desc; 1395 struct vnode *a_vp; 1396 IN struct ucred *a_cred; 1397 IN struct thread *a_td; 1398 }; 1399 */ 1400 { 1401 struct inode *ip; 1402 struct fs *fs; 1403 1404 ip = VTOI(ap->a_vp); 1405 fs = ip->i_fs; 1406 1407 if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK) 1408 return (EOPNOTSUPP); 1409 1410 return (ffs_open_ea(ap->a_vp, ap->a_cred, ap->a_td)); 1411 } 1412 1413 1414 /* 1415 * Vnode extattr transaction commit/abort 1416 */ 1417 static int 1418 ffs_closeextattr(struct vop_closeextattr_args *ap) 1419 /* 1420 struct vop_closeextattr_args { 1421 struct vnodeop_desc *a_desc; 1422 struct vnode *a_vp; 1423 int a_commit; 1424 IN struct ucred *a_cred; 1425 IN struct thread *a_td; 1426 }; 1427 */ 1428 { 1429 struct inode *ip; 1430 struct fs *fs; 1431 1432 ip = VTOI(ap->a_vp); 1433 fs = ip->i_fs; 1434 1435 if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK) 1436 return (EOPNOTSUPP); 1437 1438 if (ap->a_commit && (ap->a_vp->v_mount->mnt_flag & MNT_RDONLY)) 1439 return (EROFS); 1440 1441 return (ffs_close_ea(ap->a_vp, ap->a_commit, ap->a_cred, ap->a_td)); 1442 } 1443 1444 /* 1445 * Vnode operation to remove a named attribute. 1446 */ 1447 static int 1448 ffs_deleteextattr(struct vop_deleteextattr_args *ap) 1449 /* 1450 vop_deleteextattr { 1451 IN struct vnode *a_vp; 1452 IN int a_attrnamespace; 1453 IN const char *a_name; 1454 IN struct ucred *a_cred; 1455 IN struct thread *a_td; 1456 }; 1457 */ 1458 { 1459 struct inode *ip; 1460 struct fs *fs; 1461 uint32_t ealength, ul; 1462 int ealen, olen, eapad1, eapad2, error, i, easize; 1463 u_char *eae, *p; 1464 1465 ip = VTOI(ap->a_vp); 1466 fs = ip->i_fs; 1467 1468 if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK) 1469 return (EOPNOTSUPP); 1470 1471 if (strlen(ap->a_name) == 0) 1472 return (EINVAL); 1473 1474 if (ap->a_vp->v_mount->mnt_flag & MNT_RDONLY) 1475 return (EROFS); 1476 1477 error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace, 1478 ap->a_cred, ap->a_td, VWRITE); 1479 if (error) { 1480 1481 /* 1482 * ffs_lock_ea is not needed there, because the vnode 1483 * must be exclusively locked. 1484 */ 1485 if (ip->i_ea_area != NULL && ip->i_ea_error == 0) 1486 ip->i_ea_error = error; 1487 return (error); 1488 } 1489 1490 error = ffs_open_ea(ap->a_vp, ap->a_cred, ap->a_td); 1491 if (error) 1492 return (error); 1493 1494 ealength = eapad1 = ealen = eapad2 = 0; 1495 1496 eae = malloc(ip->i_ea_len, M_TEMP, M_WAITOK); 1497 bcopy(ip->i_ea_area, eae, ip->i_ea_len); 1498 easize = ip->i_ea_len; 1499 1500 olen = ffs_findextattr(eae, easize, ap->a_attrnamespace, ap->a_name, 1501 &p, NULL); 1502 if (olen == -1) { 1503 /* delete but nonexistent */ 1504 free(eae, M_TEMP); 1505 ffs_close_ea(ap->a_vp, 0, ap->a_cred, ap->a_td); 1506 return(ENOATTR); 1507 } 1508 bcopy(p, &ul, sizeof ul); 1509 i = p - eae + ul; 1510 if (ul != ealength) { 1511 bcopy(p + ul, p + ealength, easize - i); 1512 easize += (ealength - ul); 1513 } 1514 if (easize > NXADDR * fs->fs_bsize) { 1515 free(eae, M_TEMP); 1516 ffs_close_ea(ap->a_vp, 0, ap->a_cred, ap->a_td); 1517 if (ip->i_ea_area != NULL && ip->i_ea_error == 0) 1518 ip->i_ea_error = ENOSPC; 1519 return(ENOSPC); 1520 } 1521 p = ip->i_ea_area; 1522 ip->i_ea_area = eae; 1523 ip->i_ea_len = easize; 1524 free(p, M_TEMP); 1525 error = ffs_close_ea(ap->a_vp, 1, ap->a_cred, ap->a_td); 1526 return(error); 1527 } 1528 1529 /* 1530 * Vnode operation to retrieve a named extended attribute. 1531 */ 1532 static int 1533 ffs_getextattr(struct vop_getextattr_args *ap) 1534 /* 1535 vop_getextattr { 1536 IN struct vnode *a_vp; 1537 IN int a_attrnamespace; 1538 IN const char *a_name; 1539 INOUT struct uio *a_uio; 1540 OUT size_t *a_size; 1541 IN struct ucred *a_cred; 1542 IN struct thread *a_td; 1543 }; 1544 */ 1545 { 1546 struct inode *ip; 1547 struct fs *fs; 1548 u_char *eae, *p; 1549 unsigned easize; 1550 int error, ealen; 1551 1552 ip = VTOI(ap->a_vp); 1553 fs = ip->i_fs; 1554 1555 if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK) 1556 return (EOPNOTSUPP); 1557 1558 error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace, 1559 ap->a_cred, ap->a_td, VREAD); 1560 if (error) 1561 return (error); 1562 1563 error = ffs_open_ea(ap->a_vp, ap->a_cred, ap->a_td); 1564 if (error) 1565 return (error); 1566 1567 eae = ip->i_ea_area; 1568 easize = ip->i_ea_len; 1569 1570 ealen = ffs_findextattr(eae, easize, ap->a_attrnamespace, ap->a_name, 1571 NULL, &p); 1572 if (ealen >= 0) { 1573 error = 0; 1574 if (ap->a_size != NULL) 1575 *ap->a_size = ealen; 1576 else if (ap->a_uio != NULL) 1577 error = uiomove(p, ealen, ap->a_uio); 1578 } else 1579 error = ENOATTR; 1580 1581 ffs_close_ea(ap->a_vp, 0, ap->a_cred, ap->a_td); 1582 return(error); 1583 } 1584 1585 /* 1586 * Vnode operation to retrieve extended attributes on a vnode. 1587 */ 1588 static int 1589 ffs_listextattr(struct vop_listextattr_args *ap) 1590 /* 1591 vop_listextattr { 1592 IN struct vnode *a_vp; 1593 IN int a_attrnamespace; 1594 INOUT struct uio *a_uio; 1595 OUT size_t *a_size; 1596 IN struct ucred *a_cred; 1597 IN struct thread *a_td; 1598 }; 1599 */ 1600 { 1601 struct inode *ip; 1602 struct fs *fs; 1603 u_char *eae, *p, *pe, *pn; 1604 unsigned easize; 1605 uint32_t ul; 1606 int error, ealen; 1607 1608 ip = VTOI(ap->a_vp); 1609 fs = ip->i_fs; 1610 1611 if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK) 1612 return (EOPNOTSUPP); 1613 1614 error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace, 1615 ap->a_cred, ap->a_td, VREAD); 1616 if (error) 1617 return (error); 1618 1619 error = ffs_open_ea(ap->a_vp, ap->a_cred, ap->a_td); 1620 if (error) 1621 return (error); 1622 eae = ip->i_ea_area; 1623 easize = ip->i_ea_len; 1624 1625 error = 0; 1626 if (ap->a_size != NULL) 1627 *ap->a_size = 0; 1628 pe = eae + easize; 1629 for(p = eae; error == 0 && p < pe; p = pn) { 1630 bcopy(p, &ul, sizeof(ul)); 1631 pn = p + ul; 1632 if (pn > pe) 1633 break; 1634 p += sizeof(ul); 1635 if (*p++ != ap->a_attrnamespace) 1636 continue; 1637 p++; /* pad2 */ 1638 ealen = *p; 1639 if (ap->a_size != NULL) { 1640 *ap->a_size += ealen + 1; 1641 } else if (ap->a_uio != NULL) { 1642 error = uiomove(p, ealen + 1, ap->a_uio); 1643 } 1644 } 1645 ffs_close_ea(ap->a_vp, 0, ap->a_cred, ap->a_td); 1646 return(error); 1647 } 1648 1649 /* 1650 * Vnode operation to set a named attribute. 1651 */ 1652 static int 1653 ffs_setextattr(struct vop_setextattr_args *ap) 1654 /* 1655 vop_setextattr { 1656 IN struct vnode *a_vp; 1657 IN int a_attrnamespace; 1658 IN const char *a_name; 1659 INOUT struct uio *a_uio; 1660 IN struct ucred *a_cred; 1661 IN struct thread *a_td; 1662 }; 1663 */ 1664 { 1665 struct inode *ip; 1666 struct fs *fs; 1667 uint32_t ealength, ul; 1668 ssize_t ealen; 1669 int olen, eapad1, eapad2, error, i, easize; 1670 u_char *eae, *p; 1671 1672 ip = VTOI(ap->a_vp); 1673 fs = ip->i_fs; 1674 1675 if (ap->a_vp->v_type == VCHR || ap->a_vp->v_type == VBLK) 1676 return (EOPNOTSUPP); 1677 1678 if (strlen(ap->a_name) == 0) 1679 return (EINVAL); 1680 1681 /* XXX Now unsupported API to delete EAs using NULL uio. */ 1682 if (ap->a_uio == NULL) 1683 return (EOPNOTSUPP); 1684 1685 if (ap->a_vp->v_mount->mnt_flag & MNT_RDONLY) 1686 return (EROFS); 1687 1688 ealen = ap->a_uio->uio_resid; 1689 if (ealen < 0 || ealen > lblktosize(fs, NXADDR)) 1690 return (EINVAL); 1691 1692 error = extattr_check_cred(ap->a_vp, ap->a_attrnamespace, 1693 ap->a_cred, ap->a_td, VWRITE); 1694 if (error) { 1695 1696 /* 1697 * ffs_lock_ea is not needed there, because the vnode 1698 * must be exclusively locked. 1699 */ 1700 if (ip->i_ea_area != NULL && ip->i_ea_error == 0) 1701 ip->i_ea_error = error; 1702 return (error); 1703 } 1704 1705 error = ffs_open_ea(ap->a_vp, ap->a_cred, ap->a_td); 1706 if (error) 1707 return (error); 1708 1709 ealength = sizeof(uint32_t) + 3 + strlen(ap->a_name); 1710 eapad1 = 8 - (ealength % 8); 1711 if (eapad1 == 8) 1712 eapad1 = 0; 1713 eapad2 = 8 - (ealen % 8); 1714 if (eapad2 == 8) 1715 eapad2 = 0; 1716 ealength += eapad1 + ealen + eapad2; 1717 1718 eae = malloc(ip->i_ea_len + ealength, M_TEMP, M_WAITOK); 1719 bcopy(ip->i_ea_area, eae, ip->i_ea_len); 1720 easize = ip->i_ea_len; 1721 1722 olen = ffs_findextattr(eae, easize, 1723 ap->a_attrnamespace, ap->a_name, &p, NULL); 1724 if (olen == -1) { 1725 /* new, append at end */ 1726 p = eae + easize; 1727 easize += ealength; 1728 } else { 1729 bcopy(p, &ul, sizeof ul); 1730 i = p - eae + ul; 1731 if (ul != ealength) { 1732 bcopy(p + ul, p + ealength, easize - i); 1733 easize += (ealength - ul); 1734 } 1735 } 1736 if (easize > lblktosize(fs, NXADDR)) { 1737 free(eae, M_TEMP); 1738 ffs_close_ea(ap->a_vp, 0, ap->a_cred, ap->a_td); 1739 if (ip->i_ea_area != NULL && ip->i_ea_error == 0) 1740 ip->i_ea_error = ENOSPC; 1741 return(ENOSPC); 1742 } 1743 bcopy(&ealength, p, sizeof(ealength)); 1744 p += sizeof(ealength); 1745 *p++ = ap->a_attrnamespace; 1746 *p++ = eapad2; 1747 *p++ = strlen(ap->a_name); 1748 strcpy(p, ap->a_name); 1749 p += strlen(ap->a_name); 1750 bzero(p, eapad1); 1751 p += eapad1; 1752 error = uiomove(p, ealen, ap->a_uio); 1753 if (error) { 1754 free(eae, M_TEMP); 1755 ffs_close_ea(ap->a_vp, 0, ap->a_cred, ap->a_td); 1756 if (ip->i_ea_area != NULL && ip->i_ea_error == 0) 1757 ip->i_ea_error = error; 1758 return(error); 1759 } 1760 p += ealen; 1761 bzero(p, eapad2); 1762 1763 p = ip->i_ea_area; 1764 ip->i_ea_area = eae; 1765 ip->i_ea_len = easize; 1766 free(p, M_TEMP); 1767 error = ffs_close_ea(ap->a_vp, 1, ap->a_cred, ap->a_td); 1768 return(error); 1769 } 1770 1771 /* 1772 * Vnode pointer to File handle 1773 */ 1774 static int 1775 ffs_vptofh(struct vop_vptofh_args *ap) 1776 /* 1777 vop_vptofh { 1778 IN struct vnode *a_vp; 1779 IN struct fid *a_fhp; 1780 }; 1781 */ 1782 { 1783 struct inode *ip; 1784 struct ufid *ufhp; 1785 1786 ip = VTOI(ap->a_vp); 1787 ufhp = (struct ufid *)ap->a_fhp; 1788 ufhp->ufid_len = sizeof(struct ufid); 1789 ufhp->ufid_ino = ip->i_number; 1790 ufhp->ufid_gen = ip->i_gen; 1791 return (0); 1792 } 1793