1 /*- 2 * modified for Lites 1.1 3 * 4 * Aug 1995, Godmar Back (gback@cs.utah.edu) 5 * University of Utah, Department of Computer Science 6 */ 7 /*- 8 * Copyright (c) 1989, 1993 9 * The Regents of the University of California. All rights reserved. 10 * (c) UNIX System Laboratories, Inc. 11 * All or some portions of this file are derived from material licensed 12 * to the University of California by American Telephone and Telegraph 13 * Co. or Unix System Laboratories, Inc. and are reproduced herein with 14 * the permission of UNIX System Laboratories, Inc. 15 * 16 * Redistribution and use in source and binary forms, with or without 17 * modification, are permitted provided that the following conditions 18 * are met: 19 * 1. Redistributions of source code must retain the above copyright 20 * notice, this list of conditions and the following disclaimer. 21 * 2. Redistributions in binary form must reproduce the above copyright 22 * notice, this list of conditions and the following disclaimer in the 23 * documentation and/or other materials provided with the distribution. 24 * 4. Neither the name of the University nor the names of its contributors 25 * may be used to endorse or promote products derived from this software 26 * without specific prior written permission. 27 * 28 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 29 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 30 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 31 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 32 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 33 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 34 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 35 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 36 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 37 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 38 * SUCH DAMAGE. 39 * 40 * @(#)ufs_lookup.c 8.6 (Berkeley) 4/1/94 41 * $FreeBSD$ 42 */ 43 44 #include <sys/param.h> 45 #include <sys/systm.h> 46 #include <sys/namei.h> 47 #include <sys/bio.h> 48 #include <sys/buf.h> 49 #include <sys/endian.h> 50 #include <sys/mount.h> 51 #include <sys/vnode.h> 52 #include <sys/malloc.h> 53 #include <sys/dirent.h> 54 #include <sys/sysctl.h> 55 56 #include <ufs/ufs/dir.h> 57 58 #include <fs/ext2fs/inode.h> 59 #include <fs/ext2fs/ext2_mount.h> 60 #include <fs/ext2fs/ext2fs.h> 61 #include <fs/ext2fs/ext2_dinode.h> 62 #include <fs/ext2fs/ext2_dir.h> 63 #include <fs/ext2fs/ext2_extern.h> 64 65 #ifdef DIAGNOSTIC 66 static int dirchk = 1; 67 #else 68 static int dirchk = 0; 69 #endif 70 71 static SYSCTL_NODE(_vfs, OID_AUTO, e2fs, CTLFLAG_RD, 0, "EXT2FS filesystem"); 72 SYSCTL_INT(_vfs_e2fs, OID_AUTO, dircheck, CTLFLAG_RW, &dirchk, 0, ""); 73 74 /* 75 DIRBLKSIZE in ffs is DEV_BSIZE (in most cases 512) 76 while it is the native blocksize in ext2fs - thus, a #define 77 is no longer appropriate 78 */ 79 #undef DIRBLKSIZ 80 81 static u_char ext2_ft_to_dt[] = { 82 DT_UNKNOWN, /* EXT2_FT_UNKNOWN */ 83 DT_REG, /* EXT2_FT_REG_FILE */ 84 DT_DIR, /* EXT2_FT_DIR */ 85 DT_CHR, /* EXT2_FT_CHRDEV */ 86 DT_BLK, /* EXT2_FT_BLKDEV */ 87 DT_FIFO, /* EXT2_FT_FIFO */ 88 DT_SOCK, /* EXT2_FT_SOCK */ 89 DT_LNK, /* EXT2_FT_SYMLINK */ 90 }; 91 #define FTTODT(ft) \ 92 ((ft) > sizeof(ext2_ft_to_dt) / sizeof(ext2_ft_to_dt[0]) ? \ 93 DT_UNKNOWN : ext2_ft_to_dt[(ft)]) 94 95 static u_char dt_to_ext2_ft[] = { 96 EXT2_FT_UNKNOWN, /* DT_UNKNOWN */ 97 EXT2_FT_FIFO, /* DT_FIFO */ 98 EXT2_FT_CHRDEV, /* DT_CHR */ 99 EXT2_FT_UNKNOWN, /* unused */ 100 EXT2_FT_DIR, /* DT_DIR */ 101 EXT2_FT_UNKNOWN, /* unused */ 102 EXT2_FT_BLKDEV, /* DT_BLK */ 103 EXT2_FT_UNKNOWN, /* unused */ 104 EXT2_FT_REG_FILE, /* DT_REG */ 105 EXT2_FT_UNKNOWN, /* unused */ 106 EXT2_FT_SYMLINK, /* DT_LNK */ 107 EXT2_FT_UNKNOWN, /* unused */ 108 EXT2_FT_SOCK, /* DT_SOCK */ 109 EXT2_FT_UNKNOWN, /* unused */ 110 EXT2_FT_UNKNOWN, /* DT_WHT */ 111 }; 112 #define DTTOFT(dt) \ 113 ((dt) > sizeof(dt_to_ext2_ft) / sizeof(dt_to_ext2_ft[0]) ? \ 114 EXT2_FT_UNKNOWN : dt_to_ext2_ft[(dt)]) 115 116 static int ext2_dirbadentry(struct vnode *dp, struct ext2fs_direct_2 *de, 117 int entryoffsetinblock); 118 static int ext2_lookup_ino(struct vnode *vdp, struct vnode **vpp, 119 struct componentname *cnp, ino_t *dd_ino); 120 121 /* 122 * Vnode op for reading directories. 123 * 124 * This function has to convert directory entries from the on-disk 125 * format to the format defined by <sys/dirent.h>. Unfortunately, the 126 * conversion will blow up some entries by four bytes, so it can't be 127 * done in place. Instead, the conversion is done entry by entry and 128 * the converted entry is sent via uiomove. 129 * 130 * XXX allocate a buffer, convert as many entries as possible, then send 131 * the whole buffer to uiomove 132 */ 133 int 134 ext2_readdir(ap) 135 struct vop_readdir_args /* { 136 struct vnode *a_vp; 137 struct uio *a_uio; 138 struct ucred *a_cred; 139 } */ *ap; 140 { 141 struct uio *uio = ap->a_uio; 142 int count, error; 143 144 struct ext2fs_direct_2 *edp, *dp; 145 int ncookies; 146 struct dirent dstdp; 147 struct uio auio; 148 struct iovec aiov; 149 caddr_t dirbuf; 150 int DIRBLKSIZ = VTOI(ap->a_vp)->i_e2fs->e2fs_bsize; 151 int readcnt; 152 off_t startoffset = uio->uio_offset; 153 154 count = uio->uio_resid; 155 /* 156 * Avoid complications for partial directory entries by adjusting 157 * the i/o to end at a block boundary. Don't give up (like ufs 158 * does) if the initial adjustment gives a negative count, since 159 * many callers don't supply a large enough buffer. The correct 160 * size is a little larger than DIRBLKSIZ to allow for expansion 161 * of directory entries, but some callers just use 512. 162 */ 163 count -= (uio->uio_offset + count) & (DIRBLKSIZ -1); 164 if (count <= 0) 165 count += DIRBLKSIZ; 166 auio = *uio; 167 auio.uio_iov = &aiov; 168 auio.uio_iovcnt = 1; 169 auio.uio_resid = count; 170 auio.uio_segflg = UIO_SYSSPACE; 171 aiov.iov_len = count; 172 dirbuf = malloc(count, M_TEMP, M_WAITOK); 173 aiov.iov_base = dirbuf; 174 error = VOP_READ(ap->a_vp, &auio, 0, ap->a_cred); 175 if (error == 0) { 176 readcnt = count - auio.uio_resid; 177 edp = (struct ext2fs_direct_2 *)&dirbuf[readcnt]; 178 ncookies = 0; 179 bzero(&dstdp, offsetof(struct dirent, d_name)); 180 for (dp = (struct ext2fs_direct_2 *)dirbuf; 181 !error && uio->uio_resid > 0 && dp < edp; ) { 182 /*- 183 * "New" ext2fs directory entries differ in 3 ways 184 * from ufs on-disk ones: 185 * - the name is not necessarily NUL-terminated. 186 * - the file type field always exists and always 187 * follows the name length field. 188 * - the file type is encoded in a different way. 189 * 190 * "Old" ext2fs directory entries need no special 191 * conversions, since they are binary compatible 192 * with "new" entries having a file type of 0 (i.e., 193 * EXT2_FT_UNKNOWN). Splitting the old name length 194 * field didn't make a mess like it did in ufs, 195 * because ext2fs uses a machine-independent disk 196 * layout. 197 */ 198 dstdp.d_fileno = dp->e2d_ino; 199 dstdp.d_type = FTTODT(dp->e2d_type); 200 dstdp.d_namlen = dp->e2d_namlen; 201 dstdp.d_reclen = GENERIC_DIRSIZ(&dstdp); 202 bcopy(dp->e2d_name, dstdp.d_name, dstdp.d_namlen); 203 bzero(dstdp.d_name + dstdp.d_namlen, 204 dstdp.d_reclen - offsetof(struct dirent, d_name) - 205 dstdp.d_namlen); 206 207 if (dp->e2d_reclen > 0) { 208 if(dstdp.d_reclen <= uio->uio_resid) { 209 /* advance dp */ 210 dp = (struct ext2fs_direct_2 *) 211 ((char *)dp + dp->e2d_reclen); 212 error = 213 uiomove(&dstdp, dstdp.d_reclen, uio); 214 if (!error) 215 ncookies++; 216 } else 217 break; 218 } else { 219 error = EIO; 220 break; 221 } 222 } 223 /* we need to correct uio_offset */ 224 uio->uio_offset = startoffset + (caddr_t)dp - dirbuf; 225 226 if (!error && ap->a_ncookies != NULL) { 227 u_long *cookiep, *cookies, *ecookies; 228 off_t off; 229 230 if (uio->uio_segflg != UIO_SYSSPACE || uio->uio_iovcnt != 1) 231 panic("ext2_readdir: unexpected uio from NFS server"); 232 cookies = malloc(ncookies * sizeof(u_long), M_TEMP, 233 M_WAITOK); 234 off = startoffset; 235 for (dp = (struct ext2fs_direct_2 *)dirbuf, 236 cookiep = cookies, ecookies = cookies + ncookies; 237 cookiep < ecookies; 238 dp = (struct ext2fs_direct_2 *)((caddr_t) dp + dp->e2d_reclen)) { 239 off += dp->e2d_reclen; 240 *cookiep++ = (u_long) off; 241 } 242 *ap->a_ncookies = ncookies; 243 *ap->a_cookies = cookies; 244 } 245 } 246 free(dirbuf, M_TEMP); 247 if (ap->a_eofflag) 248 *ap->a_eofflag = VTOI(ap->a_vp)->i_size <= uio->uio_offset; 249 return (error); 250 } 251 252 /* 253 * Convert a component of a pathname into a pointer to a locked inode. 254 * This is a very central and rather complicated routine. 255 * If the file system is not maintained in a strict tree hierarchy, 256 * this can result in a deadlock situation (see comments in code below). 257 * 258 * The cnp->cn_nameiop argument is LOOKUP, CREATE, RENAME, or DELETE depending 259 * on whether the name is to be looked up, created, renamed, or deleted. 260 * When CREATE, RENAME, or DELETE is specified, information usable in 261 * creating, renaming, or deleting a directory entry may be calculated. 262 * If flag has LOCKPARENT or'ed into it and the target of the pathname 263 * exists, lookup returns both the target and its parent directory locked. 264 * When creating or renaming and LOCKPARENT is specified, the target may 265 * not be ".". When deleting and LOCKPARENT is specified, the target may 266 * be "."., but the caller must check to ensure it does an vrele and vput 267 * instead of two vputs. 268 * 269 * Overall outline of ext2_lookup: 270 * 271 * search for name in directory, to found or notfound 272 * notfound: 273 * if creating, return locked directory, leaving info on available slots 274 * else return error 275 * found: 276 * if at end of path and deleting, return information to allow delete 277 * if at end of path and rewriting (RENAME and LOCKPARENT), lock target 278 * inode and return info to allow rewrite 279 * if not at end, add name to cache; if at end and neither creating 280 * nor deleting, add name to cache 281 */ 282 int 283 ext2_lookup(ap) 284 struct vop_cachedlookup_args /* { 285 struct vnode *a_dvp; 286 struct vnode **a_vpp; 287 struct componentname *a_cnp; 288 } */ *ap; 289 { 290 291 return (ext2_lookup_ino(ap->a_dvp, ap->a_vpp, ap->a_cnp, NULL)); 292 } 293 294 static int 295 ext2_lookup_ino(struct vnode *vdp, struct vnode **vpp, struct componentname *cnp, 296 ino_t *dd_ino) 297 { 298 struct inode *dp; /* inode for directory being searched */ 299 struct buf *bp; /* a buffer of directory entries */ 300 struct ext2fs_direct_2 *ep; /* the current directory entry */ 301 int entryoffsetinblock; /* offset of ep in bp's buffer */ 302 enum {NONE, COMPACT, FOUND} slotstatus; 303 doff_t slotoffset; /* offset of area with free space */ 304 int slotsize; /* size of area at slotoffset */ 305 doff_t i_diroff; /* cached i_diroff value */ 306 doff_t i_offset; /* cached i_offset value */ 307 int slotfreespace; /* amount of space free in slot */ 308 int slotneeded; /* size of the entry we're seeking */ 309 int numdirpasses; /* strategy for directory search */ 310 doff_t endsearch; /* offset to end directory search */ 311 doff_t prevoff; /* prev entry dp->i_offset */ 312 struct vnode *pdp; /* saved dp during symlink work */ 313 struct vnode *tdp; /* returned by VFS_VGET */ 314 doff_t enduseful; /* pointer past last used dir slot */ 315 u_long bmask; /* block offset mask */ 316 int namlen, error; 317 struct ucred *cred = cnp->cn_cred; 318 int flags = cnp->cn_flags; 319 int nameiop = cnp->cn_nameiop; 320 ino_t ino, ino1; 321 int ltype; 322 323 int DIRBLKSIZ = VTOI(vdp)->i_e2fs->e2fs_bsize; 324 325 if (vpp != NULL) 326 *vpp = NULL; 327 328 dp = VTOI(vdp); 329 bmask = VFSTOEXT2(vdp->v_mount)->um_mountp->mnt_stat.f_iosize - 1; 330 restart: 331 bp = NULL; 332 slotoffset = -1; 333 334 /* 335 * We now have a segment name to search for, and a directory to search. 336 */ 337 338 /* 339 * Suppress search for slots unless creating 340 * file and at end of pathname, in which case 341 * we watch for a place to put the new file in 342 * case it doesn't already exist. 343 */ 344 ino = 0; 345 i_diroff = dp->i_diroff; 346 slotstatus = FOUND; 347 slotfreespace = slotsize = slotneeded = 0; 348 if ((nameiop == CREATE || nameiop == RENAME) && 349 (flags & ISLASTCN)) { 350 slotstatus = NONE; 351 slotneeded = EXT2_DIR_REC_LEN(cnp->cn_namelen); 352 /* was 353 slotneeded = (sizeof(struct direct) - MAXNAMLEN + 354 cnp->cn_namelen + 3) &~ 3; */ 355 } 356 357 /* 358 * If there is cached information on a previous search of 359 * this directory, pick up where we last left off. 360 * We cache only lookups as these are the most common 361 * and have the greatest payoff. Caching CREATE has little 362 * benefit as it usually must search the entire directory 363 * to determine that the entry does not exist. Caching the 364 * location of the last DELETE or RENAME has not reduced 365 * profiling time and hence has been removed in the interest 366 * of simplicity. 367 */ 368 if (nameiop != LOOKUP || i_diroff == 0 || 369 i_diroff > dp->i_size) { 370 entryoffsetinblock = 0; 371 i_offset = 0; 372 numdirpasses = 1; 373 } else { 374 i_offset = i_diroff; 375 if ((entryoffsetinblock = i_offset & bmask) && 376 (error = ext2_blkatoff(vdp, (off_t)i_offset, NULL, 377 &bp))) 378 return (error); 379 numdirpasses = 2; 380 nchstats.ncs_2passes++; 381 } 382 prevoff = i_offset; 383 endsearch = roundup2(dp->i_size, DIRBLKSIZ); 384 enduseful = 0; 385 386 searchloop: 387 while (i_offset < endsearch) { 388 /* 389 * If necessary, get the next directory block. 390 */ 391 if ((i_offset & bmask) == 0) { 392 if (bp != NULL) 393 brelse(bp); 394 if ((error = 395 ext2_blkatoff(vdp, (off_t)i_offset, NULL, 396 &bp)) != 0) 397 return (error); 398 entryoffsetinblock = 0; 399 } 400 /* 401 * If still looking for a slot, and at a DIRBLKSIZE 402 * boundary, have to start looking for free space again. 403 */ 404 if (slotstatus == NONE && 405 (entryoffsetinblock & (DIRBLKSIZ - 1)) == 0) { 406 slotoffset = -1; 407 slotfreespace = 0; 408 } 409 /* 410 * Get pointer to next entry. 411 * Full validation checks are slow, so we only check 412 * enough to insure forward progress through the 413 * directory. Complete checks can be run by setting 414 * "vfs.e2fs.dirchk" to be true. 415 */ 416 ep = (struct ext2fs_direct_2 *) 417 ((char *)bp->b_data + entryoffsetinblock); 418 if (ep->e2d_reclen == 0 || 419 (dirchk && ext2_dirbadentry(vdp, ep, entryoffsetinblock))) { 420 int i; 421 ext2_dirbad(dp, i_offset, "mangled entry"); 422 i = DIRBLKSIZ - (entryoffsetinblock & (DIRBLKSIZ - 1)); 423 i_offset += i; 424 entryoffsetinblock += i; 425 continue; 426 } 427 428 /* 429 * If an appropriate sized slot has not yet been found, 430 * check to see if one is available. Also accumulate space 431 * in the current block so that we can determine if 432 * compaction is viable. 433 */ 434 if (slotstatus != FOUND) { 435 int size = ep->e2d_reclen; 436 437 if (ep->e2d_ino != 0) 438 size -= EXT2_DIR_REC_LEN(ep->e2d_namlen); 439 if (size > 0) { 440 if (size >= slotneeded) { 441 slotstatus = FOUND; 442 slotoffset = i_offset; 443 slotsize = ep->e2d_reclen; 444 } else if (slotstatus == NONE) { 445 slotfreespace += size; 446 if (slotoffset == -1) 447 slotoffset = i_offset; 448 if (slotfreespace >= slotneeded) { 449 slotstatus = COMPACT; 450 slotsize = i_offset + 451 ep->e2d_reclen - slotoffset; 452 } 453 } 454 } 455 } 456 457 /* 458 * Check for a name match. 459 */ 460 if (ep->e2d_ino) { 461 namlen = ep->e2d_namlen; 462 if (namlen == cnp->cn_namelen && 463 !bcmp(cnp->cn_nameptr, ep->e2d_name, 464 (unsigned)namlen)) { 465 /* 466 * Save directory entry's inode number and 467 * reclen in ndp->ni_ufs area, and release 468 * directory buffer. 469 */ 470 ino = ep->e2d_ino; 471 goto found; 472 } 473 } 474 prevoff = i_offset; 475 i_offset += ep->e2d_reclen; 476 entryoffsetinblock += ep->e2d_reclen; 477 if (ep->e2d_ino) 478 enduseful = i_offset; 479 } 480 /* notfound: */ 481 /* 482 * If we started in the middle of the directory and failed 483 * to find our target, we must check the beginning as well. 484 */ 485 if (numdirpasses == 2) { 486 numdirpasses--; 487 i_offset = 0; 488 endsearch = i_diroff; 489 goto searchloop; 490 } 491 dp->i_offset = i_offset; 492 if (bp != NULL) 493 brelse(bp); 494 /* 495 * If creating, and at end of pathname and current 496 * directory has not been removed, then can consider 497 * allowing file to be created. 498 */ 499 if ((nameiop == CREATE || nameiop == RENAME) && 500 (flags & ISLASTCN) && dp->i_nlink != 0) { 501 /* 502 * Access for write is interpreted as allowing 503 * creation of files in the directory. 504 */ 505 if ((error = VOP_ACCESS(vdp, VWRITE, cred, cnp->cn_thread)) != 0) 506 return (error); 507 /* 508 * Return an indication of where the new directory 509 * entry should be put. If we didn't find a slot, 510 * then set dp->i_count to 0 indicating 511 * that the new slot belongs at the end of the 512 * directory. If we found a slot, then the new entry 513 * can be put in the range from dp->i_offset to 514 * dp->i_offset + dp->i_count. 515 */ 516 if (slotstatus == NONE) { 517 dp->i_offset = roundup2(dp->i_size, DIRBLKSIZ); 518 dp->i_count = 0; 519 enduseful = dp->i_offset; 520 } else { 521 dp->i_offset = slotoffset; 522 dp->i_count = slotsize; 523 if (enduseful < slotoffset + slotsize) 524 enduseful = slotoffset + slotsize; 525 } 526 dp->i_endoff = roundup2(enduseful, DIRBLKSIZ); 527 dp->i_flag |= IN_CHANGE | IN_UPDATE; 528 /* 529 * We return with the directory locked, so that 530 * the parameters we set up above will still be 531 * valid if we actually decide to do a direnter(). 532 * We return ni_vp == NULL to indicate that the entry 533 * does not currently exist; we leave a pointer to 534 * the (locked) directory inode in ndp->ni_dvp. 535 * The pathname buffer is saved so that the name 536 * can be obtained later. 537 * 538 * NB - if the directory is unlocked, then this 539 * information cannot be used. 540 */ 541 cnp->cn_flags |= SAVENAME; 542 return (EJUSTRETURN); 543 } 544 /* 545 * Insert name into cache (as non-existent) if appropriate. 546 */ 547 if ((cnp->cn_flags & MAKEENTRY) && nameiop != CREATE) 548 cache_enter(vdp, NULL, cnp); 549 return (ENOENT); 550 551 found: 552 if (dd_ino != NULL) 553 *dd_ino = ino; 554 if (numdirpasses == 2) 555 nchstats.ncs_pass2++; 556 /* 557 * Check that directory length properly reflects presence 558 * of this entry. 559 */ 560 if (entryoffsetinblock + EXT2_DIR_REC_LEN(ep->e2d_namlen) 561 > dp->i_size) { 562 ext2_dirbad(dp, i_offset, "i_size too small"); 563 dp->i_size = entryoffsetinblock+EXT2_DIR_REC_LEN(ep->e2d_namlen); 564 dp->i_flag |= IN_CHANGE | IN_UPDATE; 565 } 566 brelse(bp); 567 568 /* 569 * Found component in pathname. 570 * If the final component of path name, save information 571 * in the cache as to where the entry was found. 572 */ 573 if ((flags & ISLASTCN) && nameiop == LOOKUP) 574 dp->i_diroff = i_offset &~ (DIRBLKSIZ - 1); 575 dp->i_offset = i_offset; 576 /* 577 * If deleting, and at end of pathname, return 578 * parameters which can be used to remove file. 579 */ 580 if (nameiop == DELETE && (flags & ISLASTCN)) { 581 /* 582 * Write access to directory required to delete files. 583 */ 584 if ((error = VOP_ACCESS(vdp, VWRITE, cred, cnp->cn_thread)) != 0) 585 return (error); 586 /* 587 * Return pointer to current entry in dp->i_offset, 588 * and distance past previous entry (if there 589 * is a previous entry in this block) in dp->i_count. 590 * Save directory inode pointer in ndp->ni_dvp for dirremove(). 591 */ 592 if ((dp->i_offset & (DIRBLKSIZ - 1)) == 0) 593 dp->i_count = 0; 594 else 595 dp->i_count = dp->i_offset - prevoff; 596 if (dd_ino != NULL) 597 return (0); 598 if (dp->i_number == ino) { 599 VREF(vdp); 600 *vpp = vdp; 601 return (0); 602 } 603 if ((error = VFS_VGET(vdp->v_mount, ino, LK_EXCLUSIVE, 604 &tdp)) != 0) 605 return (error); 606 /* 607 * If directory is "sticky", then user must own 608 * the directory, or the file in it, else she 609 * may not delete it (unless she's root). This 610 * implements append-only directories. 611 */ 612 if ((dp->i_mode & ISVTX) && 613 cred->cr_uid != 0 && 614 cred->cr_uid != dp->i_uid && 615 VTOI(tdp)->i_uid != cred->cr_uid) { 616 vput(tdp); 617 return (EPERM); 618 } 619 *vpp = tdp; 620 return (0); 621 } 622 623 /* 624 * If rewriting (RENAME), return the inode and the 625 * information required to rewrite the present directory 626 * Must get inode of directory entry to verify it's a 627 * regular file, or empty directory. 628 */ 629 if (nameiop == RENAME && (flags & ISLASTCN)) { 630 if ((error = VOP_ACCESS(vdp, VWRITE, cred, cnp->cn_thread)) != 0) 631 return (error); 632 /* 633 * Careful about locking second inode. 634 * This can only occur if the target is ".". 635 */ 636 if (dp->i_number == ino) 637 return (EISDIR); 638 if (dd_ino != NULL) 639 return (0); 640 if ((error = VFS_VGET(vdp->v_mount, ino, LK_EXCLUSIVE, 641 &tdp)) != 0) 642 return (error); 643 *vpp = tdp; 644 cnp->cn_flags |= SAVENAME; 645 return (0); 646 } 647 if (dd_ino != NULL) 648 return (0); 649 650 /* 651 * Step through the translation in the name. We do not `vput' the 652 * directory because we may need it again if a symbolic link 653 * is relative to the current directory. Instead we save it 654 * unlocked as "pdp". We must get the target inode before unlocking 655 * the directory to insure that the inode will not be removed 656 * before we get it. We prevent deadlock by always fetching 657 * inodes from the root, moving down the directory tree. Thus 658 * when following backward pointers ".." we must unlock the 659 * parent directory before getting the requested directory. 660 * There is a potential race condition here if both the current 661 * and parent directories are removed before the VFS_VGET for the 662 * inode associated with ".." returns. We hope that this occurs 663 * infrequently since we cannot avoid this race condition without 664 * implementing a sophisticated deadlock detection algorithm. 665 * Note also that this simple deadlock detection scheme will not 666 * work if the file system has any hard links other than ".." 667 * that point backwards in the directory structure. 668 */ 669 pdp = vdp; 670 if (flags & ISDOTDOT) { 671 ltype = VOP_ISLOCKED(pdp); 672 VOP_UNLOCK(pdp, 0); /* race to get the inode */ 673 error = VFS_VGET(vdp->v_mount, ino, cnp->cn_lkflags, &tdp); 674 vn_lock(pdp, ltype | LK_RETRY); 675 if (pdp->v_iflag & VI_DOOMED) { 676 if (error == 0) 677 vput(tdp); 678 error = ENOENT; 679 } 680 if (error) 681 return (error); 682 /* 683 * Recheck that ".." entry in the vdp directory points 684 * to the inode we looked up before vdp lock was 685 * dropped. 686 */ 687 error = ext2_lookup_ino(pdp, NULL, cnp, &ino1); 688 if (error) { 689 vput(tdp); 690 return (error); 691 } 692 if (ino1 != ino) { 693 vput(tdp); 694 goto restart; 695 } 696 *vpp = tdp; 697 } else if (dp->i_number == ino) { 698 VREF(vdp); /* we want ourself, ie "." */ 699 /* 700 * When we lookup "." we still can be asked to lock it 701 * differently. 702 */ 703 ltype = cnp->cn_lkflags & LK_TYPE_MASK; 704 if (ltype != VOP_ISLOCKED(vdp)) { 705 if (ltype == LK_EXCLUSIVE) 706 vn_lock(vdp, LK_UPGRADE | LK_RETRY); 707 else /* if (ltype == LK_SHARED) */ 708 vn_lock(vdp, LK_DOWNGRADE | LK_RETRY); 709 } 710 *vpp = vdp; 711 } else { 712 if ((error = VFS_VGET(vdp->v_mount, ino, cnp->cn_lkflags, 713 &tdp)) != 0) 714 return (error); 715 *vpp = tdp; 716 } 717 718 /* 719 * Insert name into cache if appropriate. 720 */ 721 if (cnp->cn_flags & MAKEENTRY) 722 cache_enter(vdp, *vpp, cnp); 723 return (0); 724 } 725 726 void 727 ext2_dirbad(ip, offset, how) 728 struct inode *ip; 729 doff_t offset; 730 char *how; 731 { 732 struct mount *mp; 733 734 mp = ITOV(ip)->v_mount; 735 if ((mp->mnt_flag & MNT_RDONLY) == 0) 736 panic("ext2_dirbad: %s: bad dir ino %lu at offset %ld: %s\n", 737 mp->mnt_stat.f_mntonname, (u_long)ip->i_number,(long)offset, how); 738 else 739 (void)printf("%s: bad dir ino %lu at offset %ld: %s\n", 740 mp->mnt_stat.f_mntonname, (u_long)ip->i_number, (long)offset, how); 741 742 } 743 744 /* 745 * Do consistency checking on a directory entry: 746 * record length must be multiple of 4 747 * entry must fit in rest of its DIRBLKSIZ block 748 * record must be large enough to contain entry 749 * name is not longer than MAXNAMLEN 750 * name must be as long as advertised, and null terminated 751 */ 752 /* 753 * changed so that it confirms to ext2_check_dir_entry 754 */ 755 static int 756 ext2_dirbadentry(dp, de, entryoffsetinblock) 757 struct vnode *dp; 758 struct ext2fs_direct_2 *de; 759 int entryoffsetinblock; 760 { 761 int DIRBLKSIZ = VTOI(dp)->i_e2fs->e2fs_bsize; 762 763 char * error_msg = NULL; 764 765 if (de->e2d_reclen < EXT2_DIR_REC_LEN(1)) 766 error_msg = "rec_len is smaller than minimal"; 767 else if (de->e2d_reclen % 4 != 0) 768 error_msg = "rec_len % 4 != 0"; 769 else if (de->e2d_reclen < EXT2_DIR_REC_LEN(de->e2d_namlen)) 770 error_msg = "reclen is too small for name_len"; 771 else if (entryoffsetinblock + de->e2d_reclen > DIRBLKSIZ) 772 error_msg = "directory entry across blocks"; 773 /* else LATER 774 if (de->inode > dir->i_sb->u.ext2_sb.s_es->s_inodes_count) 775 error_msg = "inode out of bounds"; 776 */ 777 778 if (error_msg != NULL) { 779 printf("bad directory entry: %s\n", error_msg); 780 printf("offset=%d, inode=%lu, rec_len=%u, name_len=%u\n", 781 entryoffsetinblock, (unsigned long)de->e2d_ino, 782 de->e2d_reclen, de->e2d_namlen); 783 } 784 return error_msg == NULL ? 0 : 1; 785 } 786 787 /* 788 * Write a directory entry after a call to namei, using the parameters 789 * that it left in nameidata. The argument ip is the inode which the new 790 * directory entry will refer to. Dvp is a pointer to the directory to 791 * be written, which was left locked by namei. Remaining parameters 792 * (dp->i_offset, dp->i_count) indicate how the space for the new 793 * entry is to be obtained. 794 */ 795 int 796 ext2_direnter(ip, dvp, cnp) 797 struct inode *ip; 798 struct vnode *dvp; 799 struct componentname *cnp; 800 { 801 struct ext2fs_direct_2 *ep, *nep; 802 struct inode *dp; 803 struct buf *bp; 804 struct ext2fs_direct_2 newdir; 805 struct iovec aiov; 806 struct uio auio; 807 u_int dsize; 808 int error, loc, newentrysize, spacefree; 809 char *dirbuf; 810 int DIRBLKSIZ = ip->i_e2fs->e2fs_bsize; 811 812 813 #ifdef DIAGNOSTIC 814 if ((cnp->cn_flags & SAVENAME) == 0) 815 panic("direnter: missing name"); 816 #endif 817 dp = VTOI(dvp); 818 newdir.e2d_ino = ip->i_number; 819 newdir.e2d_namlen = cnp->cn_namelen; 820 if (EXT2_HAS_INCOMPAT_FEATURE(ip->i_e2fs, 821 EXT2F_INCOMPAT_FTYPE)) 822 newdir.e2d_type = DTTOFT(IFTODT(ip->i_mode)); 823 else 824 newdir.e2d_type = EXT2_FT_UNKNOWN; 825 bcopy(cnp->cn_nameptr, newdir.e2d_name, (unsigned)cnp->cn_namelen + 1); 826 newentrysize = EXT2_DIR_REC_LEN(newdir.e2d_namlen); 827 if (dp->i_count == 0) { 828 /* 829 * If dp->i_count is 0, then namei could find no 830 * space in the directory. Here, dp->i_offset will 831 * be on a directory block boundary and we will write the 832 * new entry into a fresh block. 833 */ 834 if (dp->i_offset & (DIRBLKSIZ - 1)) 835 panic("ext2_direnter: newblk"); 836 auio.uio_offset = dp->i_offset; 837 newdir.e2d_reclen = DIRBLKSIZ; 838 auio.uio_resid = newentrysize; 839 aiov.iov_len = newentrysize; 840 aiov.iov_base = (caddr_t)&newdir; 841 auio.uio_iov = &aiov; 842 auio.uio_iovcnt = 1; 843 auio.uio_rw = UIO_WRITE; 844 auio.uio_segflg = UIO_SYSSPACE; 845 auio.uio_td = (struct thread *)0; 846 error = VOP_WRITE(dvp, &auio, IO_SYNC, cnp->cn_cred); 847 if (DIRBLKSIZ > 848 VFSTOEXT2(dvp->v_mount)->um_mountp->mnt_stat.f_bsize) 849 /* XXX should grow with balloc() */ 850 panic("ext2_direnter: frag size"); 851 else if (!error) { 852 dp->i_size = roundup2(dp->i_size, DIRBLKSIZ); 853 dp->i_flag |= IN_CHANGE; 854 } 855 return (error); 856 } 857 858 /* 859 * If dp->i_count is non-zero, then namei found space 860 * for the new entry in the range dp->i_offset to 861 * dp->i_offset + dp->i_count in the directory. 862 * To use this space, we may have to compact the entries located 863 * there, by copying them together towards the beginning of the 864 * block, leaving the free space in one usable chunk at the end. 865 */ 866 867 /* 868 * Increase size of directory if entry eats into new space. 869 * This should never push the size past a new multiple of 870 * DIRBLKSIZE. 871 * 872 * N.B. - THIS IS AN ARTIFACT OF 4.2 AND SHOULD NEVER HAPPEN. 873 */ 874 if (dp->i_offset + dp->i_count > dp->i_size) 875 dp->i_size = dp->i_offset + dp->i_count; 876 /* 877 * Get the block containing the space for the new directory entry. 878 */ 879 if ((error = ext2_blkatoff(dvp, (off_t)dp->i_offset, &dirbuf, 880 &bp)) != 0) 881 return (error); 882 /* 883 * Find space for the new entry. In the simple case, the entry at 884 * offset base will have the space. If it does not, then namei 885 * arranged that compacting the region dp->i_offset to 886 * dp->i_offset + dp->i_count would yield the 887 * space. 888 */ 889 ep = (struct ext2fs_direct_2 *)dirbuf; 890 dsize = EXT2_DIR_REC_LEN(ep->e2d_namlen); 891 spacefree = ep->e2d_reclen - dsize; 892 for (loc = ep->e2d_reclen; loc < dp->i_count; ) { 893 nep = (struct ext2fs_direct_2 *)(dirbuf + loc); 894 if (ep->e2d_ino) { 895 /* trim the existing slot */ 896 ep->e2d_reclen = dsize; 897 ep = (struct ext2fs_direct_2 *)((char *)ep + dsize); 898 } else { 899 /* overwrite; nothing there; header is ours */ 900 spacefree += dsize; 901 } 902 dsize = EXT2_DIR_REC_LEN(nep->e2d_namlen); 903 spacefree += nep->e2d_reclen - dsize; 904 loc += nep->e2d_reclen; 905 bcopy((caddr_t)nep, (caddr_t)ep, dsize); 906 } 907 /* 908 * Update the pointer fields in the previous entry (if any), 909 * copy in the new entry, and write out the block. 910 */ 911 if (ep->e2d_ino == 0) { 912 if (spacefree + dsize < newentrysize) 913 panic("ext2_direnter: compact1"); 914 newdir.e2d_reclen = spacefree + dsize; 915 } else { 916 if (spacefree < newentrysize) 917 panic("ext2_direnter: compact2"); 918 newdir.e2d_reclen = spacefree; 919 ep->e2d_reclen = dsize; 920 ep = (struct ext2fs_direct_2 *)((char *)ep + dsize); 921 } 922 bcopy((caddr_t)&newdir, (caddr_t)ep, (u_int)newentrysize); 923 if (DOINGASYNC(dvp)) { 924 bdwrite(bp); 925 error = 0; 926 } else { 927 error = bwrite(bp); 928 } 929 dp->i_flag |= IN_CHANGE | IN_UPDATE; 930 if (!error && dp->i_endoff && dp->i_endoff < dp->i_size) 931 error = ext2_truncate(dvp, (off_t)dp->i_endoff, IO_SYNC, 932 cnp->cn_cred, cnp->cn_thread); 933 return (error); 934 } 935 936 /* 937 * Remove a directory entry after a call to namei, using 938 * the parameters which it left in nameidata. The entry 939 * dp->i_offset contains the offset into the directory of the 940 * entry to be eliminated. The dp->i_count field contains the 941 * size of the previous record in the directory. If this 942 * is 0, the first entry is being deleted, so we need only 943 * zero the inode number to mark the entry as free. If the 944 * entry is not the first in the directory, we must reclaim 945 * the space of the now empty record by adding the record size 946 * to the size of the previous entry. 947 */ 948 int 949 ext2_dirremove(dvp, cnp) 950 struct vnode *dvp; 951 struct componentname *cnp; 952 { 953 struct inode *dp; 954 struct ext2fs_direct_2 *ep, *rep; 955 struct buf *bp; 956 int error; 957 958 dp = VTOI(dvp); 959 if (dp->i_count == 0) { 960 /* 961 * First entry in block: set d_ino to zero. 962 */ 963 if ((error = 964 ext2_blkatoff(dvp, (off_t)dp->i_offset, (char **)&ep, 965 &bp)) != 0) 966 return (error); 967 ep->e2d_ino = 0; 968 error = bwrite(bp); 969 dp->i_flag |= IN_CHANGE | IN_UPDATE; 970 return (error); 971 } 972 /* 973 * Collapse new free space into previous entry. 974 */ 975 if ((error = ext2_blkatoff(dvp, (off_t)(dp->i_offset - dp->i_count), 976 (char **)&ep, &bp)) != 0) 977 return (error); 978 979 /* Set 'rep' to the entry being removed. */ 980 if (dp->i_count == 0) 981 rep = ep; 982 else 983 rep = (struct ext2fs_direct_2 *)((char *)ep + ep->e2d_reclen); 984 ep->e2d_reclen += rep->e2d_reclen; 985 if (DOINGASYNC(dvp) && dp->i_count != 0) 986 bdwrite(bp); 987 else 988 error = bwrite(bp); 989 dp->i_flag |= IN_CHANGE | IN_UPDATE; 990 return (error); 991 } 992 993 /* 994 * Rewrite an existing directory entry to point at the inode 995 * supplied. The parameters describing the directory entry are 996 * set up by a call to namei. 997 */ 998 int 999 ext2_dirrewrite(dp, ip, cnp) 1000 struct inode *dp, *ip; 1001 struct componentname *cnp; 1002 { 1003 struct buf *bp; 1004 struct ext2fs_direct_2 *ep; 1005 struct vnode *vdp = ITOV(dp); 1006 int error; 1007 1008 if ((error = ext2_blkatoff(vdp, (off_t)dp->i_offset, (char **)&ep, 1009 &bp)) != 0) 1010 return (error); 1011 ep->e2d_ino = ip->i_number; 1012 if (EXT2_HAS_INCOMPAT_FEATURE(ip->i_e2fs, 1013 EXT2F_INCOMPAT_FTYPE)) 1014 ep->e2d_type = DTTOFT(IFTODT(ip->i_mode)); 1015 else 1016 ep->e2d_type = EXT2_FT_UNKNOWN; 1017 error = bwrite(bp); 1018 dp->i_flag |= IN_CHANGE | IN_UPDATE; 1019 return (error); 1020 } 1021 1022 /* 1023 * Check if a directory is empty or not. 1024 * Inode supplied must be locked. 1025 * 1026 * Using a struct dirtemplate here is not precisely 1027 * what we want, but better than using a struct direct. 1028 * 1029 * NB: does not handle corrupted directories. 1030 */ 1031 int 1032 ext2_dirempty(ip, parentino, cred) 1033 struct inode *ip; 1034 ino_t parentino; 1035 struct ucred *cred; 1036 { 1037 off_t off; 1038 struct dirtemplate dbuf; 1039 struct ext2fs_direct_2 *dp = (struct ext2fs_direct_2 *)&dbuf; 1040 int error, namlen; 1041 ssize_t count; 1042 #define MINDIRSIZ (sizeof(struct dirtemplate) / 2) 1043 1044 for (off = 0; off < ip->i_size; off += dp->e2d_reclen) { 1045 error = vn_rdwr(UIO_READ, ITOV(ip), (caddr_t)dp, MINDIRSIZ, 1046 off, UIO_SYSSPACE, IO_NODELOCKED | IO_NOMACCHECK, cred, 1047 NOCRED, &count, (struct thread *)0); 1048 /* 1049 * Since we read MINDIRSIZ, residual must 1050 * be 0 unless we're at end of file. 1051 */ 1052 if (error || count != 0) 1053 return (0); 1054 /* avoid infinite loops */ 1055 if (dp->e2d_reclen == 0) 1056 return (0); 1057 /* skip empty entries */ 1058 if (dp->e2d_ino == 0) 1059 continue; 1060 /* accept only "." and ".." */ 1061 namlen = dp->e2d_namlen; 1062 if (namlen > 2) 1063 return (0); 1064 if (dp->e2d_name[0] != '.') 1065 return (0); 1066 /* 1067 * At this point namlen must be 1 or 2. 1068 * 1 implies ".", 2 implies ".." if second 1069 * char is also "." 1070 */ 1071 if (namlen == 1) 1072 continue; 1073 if (dp->e2d_name[1] == '.' && dp->e2d_ino == parentino) 1074 continue; 1075 return (0); 1076 } 1077 return (1); 1078 } 1079 1080 /* 1081 * Check if source directory is in the path of the target directory. 1082 * Target is supplied locked, source is unlocked. 1083 * The target is always vput before returning. 1084 */ 1085 int 1086 ext2_checkpath(source, target, cred) 1087 struct inode *source, *target; 1088 struct ucred *cred; 1089 { 1090 struct vnode *vp; 1091 int error, rootino, namlen; 1092 struct dirtemplate dirbuf; 1093 1094 vp = ITOV(target); 1095 if (target->i_number == source->i_number) { 1096 error = EEXIST; 1097 goto out; 1098 } 1099 rootino = EXT2_ROOTINO; 1100 error = 0; 1101 if (target->i_number == rootino) 1102 goto out; 1103 1104 for (;;) { 1105 if (vp->v_type != VDIR) { 1106 error = ENOTDIR; 1107 break; 1108 } 1109 error = vn_rdwr(UIO_READ, vp, (caddr_t)&dirbuf, 1110 sizeof(struct dirtemplate), (off_t)0, UIO_SYSSPACE, 1111 IO_NODELOCKED | IO_NOMACCHECK, cred, NOCRED, NULL, 1112 NULL); 1113 if (error != 0) 1114 break; 1115 namlen = dirbuf.dotdot_type; /* like ufs little-endian */ 1116 if (namlen != 2 || 1117 dirbuf.dotdot_name[0] != '.' || 1118 dirbuf.dotdot_name[1] != '.') { 1119 error = ENOTDIR; 1120 break; 1121 } 1122 if (dirbuf.dotdot_ino == source->i_number) { 1123 error = EINVAL; 1124 break; 1125 } 1126 if (dirbuf.dotdot_ino == rootino) 1127 break; 1128 vput(vp); 1129 if ((error = VFS_VGET(vp->v_mount, dirbuf.dotdot_ino, 1130 LK_EXCLUSIVE, &vp)) != 0) { 1131 vp = NULL; 1132 break; 1133 } 1134 } 1135 1136 out: 1137 if (error == ENOTDIR) 1138 printf("checkpath: .. not a directory\n"); 1139 if (vp != NULL) 1140 vput(vp); 1141 return (error); 1142 } 1143