sys/fs/msdosfs/msdosfs_lookup.c

   1 /* $FreeBSD$ */
   2 /*      $NetBSD: msdosfs_lookup.c,v 1.37 1997/11/17 15:36:54 ws Exp $   */
   3
   4 /*-
   5  * Copyright (C) 1994, 1995, 1997 Wolfgang Solfrank.
   6  * Copyright (C) 1994, 1995, 1997 TooLs GmbH.
   7  * All rights reserved.
   8  * Original code by Paul Popelka (paulp@uts.amdahl.com) (see below).
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  * 3. All advertising materials mentioning features or use of this software
  19  *    must display the following acknowledgement:
  20  *      This product includes software developed by TooLs GmbH.
  21  * 4. The name of TooLs GmbH may not be used to endorse or promote products
  22  *    derived from this software without specific prior written permission.
  23  *
  24  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
  25  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  26  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  28  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  29  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  30  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  31  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  32  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  33  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  34  */
  35 /*-
  36  * Written by Paul Popelka (paulp@uts.amdahl.com)
  37  *
  38  * You can do anything you want with this software, just don't say you wrote
  39  * it, and don't remove this notice.
  40  *
  41  * This software is provided "as is".
  42  *
  43  * The author supplies this software to be publicly redistributed on the
  44  * understanding that the author is not responsible for the correct
  45  * functioning of this software in any circumstances and is not liable for
  46  * any damages caused by this software.
  47  *
  48  * October 1992
  49  */
  50
  51 #include <sys/param.h>
  52 #include <sys/systm.h>
  53 #include <sys/buf.h>
  54 #include <sys/mount.h>
  55 #include <sys/namei.h>
  56 #include <sys/vnode.h>
  57
  58 #include <fs/msdosfs/bpb.h>
  59 #include <fs/msdosfs/direntry.h>
  60 #include <fs/msdosfs/denode.h>
  61 #include <fs/msdosfs/fat.h>
  62 #include <fs/msdosfs/msdosfsmount.h>
  63
  64 static int msdosfs_lookup_(struct vnode *vdp, struct vnode **vpp,
  65     struct componentname *cnp, u_int64_t *inum);
  66 static int msdosfs_deget_dotdot(struct vnode *vp, u_long cluster, int blkoff,
  67     struct vnode **rvp);
  68
  69 int
  70 msdosfs_lookup(struct vop_cachedlookup_args *ap)
  71 {
  72
  73         return (msdosfs_lookup_(ap->a_dvp, ap->a_vpp, ap->a_cnp, NULL));
  74 }
  75
  76 /*
  77  * When we search a directory the blocks containing directory entries are
  78  * read and examined.  The directory entries contain information that would
  79  * normally be in the inode of a unix filesystem.  This means that some of
  80  * a directory's contents may also be in memory resident denodes (sort of
  81  * an inode).  This can cause problems if we are searching while some other
  82  * process is modifying a directory.  To prevent one process from accessing
  83  * incompletely modified directory information we depend upon being the
  84  * sole owner of a directory block.  bread/brelse provide this service.
  85  * This being the case, when a process modifies a directory it must first
  86  * acquire the disk block that contains the directory entry to be modified.
  87  * Then update the disk block and the denode, and then write the disk block
  88  * out to disk.  This way disk blocks containing directory entries and in
  89  * memory denode's will be in synch.
  90  */
  91 static int
  92 msdosfs_lookup_(struct vnode *vdp, struct vnode **vpp,
  93     struct componentname *cnp, u_int64_t *dd_inum)
  94 {
  95         struct mbnambuf nb;
  96         daddr_t bn;
  97         int error;
  98         int slotcount;
  99         int slotoffset = 0;
 100         int frcn;
 101         u_long cluster;
 102         int blkoff;
 103         int diroff;
 104         int blsize;
 105         int isadir;             /* ~0 if found direntry is a directory   */
 106         u_long scn;             /* starting cluster number               */
 107         struct vnode *pdp;
 108         struct denode *dp;
 109         struct denode *tdp;
 110         struct msdosfsmount *pmp;
 111         struct buf *bp = NULL;
 112         struct direntry *dep = NULL;
 113         u_char dosfilename[12];
 114         int flags = cnp->cn_flags;
 115         int nameiop = cnp->cn_nameiop;
 116         int unlen;
 117         u_int64_t inode1;
 118
 119         int wincnt = 1;
 120         int chksum = -1, chksum_ok;
 121         int olddos = 1;
 122
 123 #ifdef MSDOSFS_DEBUG
 124         printf("msdosfs_lookup(): looking for %s\n", cnp->cn_nameptr);
 125 #endif
 126         dp = VTODE(vdp);
 127         pmp = dp->de_pmp;
 128 #ifdef MSDOSFS_DEBUG
 129         printf("msdosfs_lookup(): vdp %p, dp %p, Attr %02x\n",
 130             vdp, dp, dp->de_Attributes);
 131 #endif
 132
 133  restart:
 134         if (vpp != NULL)
 135                 *vpp = NULL;
 136         /*
 137          * If they are going after the . or .. entry in the root directory,
 138          * they won't find it.  DOS filesystems don't have them in the root
 139          * directory.  So, we fake it. deget() is in on this scam too.
 140          */
 141         if ((vdp->v_vflag & VV_ROOT) && cnp->cn_nameptr[0] == '.' &&
 142             (cnp->cn_namelen == 1 ||
 143                 (cnp->cn_namelen == 2 && cnp->cn_nameptr[1] == '.'))) {
 144                 isadir = ATTR_DIRECTORY;
 145                 scn = MSDOSFSROOT;
 146 #ifdef MSDOSFS_DEBUG
 147                 printf("msdosfs_lookup(): looking for . or .. in root directory\n");
 148 #endif
 149                 cluster = MSDOSFSROOT;
 150                 blkoff = MSDOSFSROOT_OFS;
 151                 goto foundroot;
 152         }
 153
 154         switch (unix2dosfn((const u_char *)cnp->cn_nameptr, dosfilename,
 155             cnp->cn_namelen, 0, pmp)) {
 156         case 0:
 157                 return (EINVAL);
 158         case 1:
 159                 break;
 160         case 2:
 161                 wincnt = winSlotCnt((const u_char *)cnp->cn_nameptr,
 162                     cnp->cn_namelen, pmp) + 1;
 163                 break;
 164         case 3:
 165                 olddos = 0;
 166                 wincnt = winSlotCnt((const u_char *)cnp->cn_nameptr,
 167                     cnp->cn_namelen, pmp) + 1;
 168                 break;
 169         }
 170         if (pmp->pm_flags & MSDOSFSMNT_SHORTNAME) {
 171                 wincnt = 1;
 172                 olddos = 1;
 173         }
 174         unlen = winLenFixup(cnp->cn_nameptr, cnp->cn_namelen);
 175
 176         /*
 177          * Suppress search for slots unless creating
 178          * file and at end of pathname, in which case
 179          * we watch for a place to put the new file in
 180          * case it doesn't already exist.
 181          */
 182         slotcount = wincnt;
 183         if ((nameiop == CREATE || nameiop == RENAME) &&
 184             (flags & ISLASTCN))
 185                 slotcount = 0;
 186
 187 #ifdef MSDOSFS_DEBUG
 188         printf("msdosfs_lookup(): dos version of filename %s, length %ld\n",
 189             dosfilename, cnp->cn_namelen);
 190 #endif
 191         /*
 192          * Search the directory pointed at by vdp for the name pointed at
 193          * by cnp->cn_nameptr.
 194          */
 195         tdp = NULL;
 196         mbnambuf_init(&nb);
 197         /*
 198          * The outer loop ranges over the clusters that make up the
 199          * directory.  Note that the root directory is different from all
 200          * other directories.  It has a fixed number of blocks that are not
 201          * part of the pool of allocatable clusters.  So, we treat it a
 202          * little differently. The root directory starts at "cluster" 0.
 203          */
 204         diroff = 0;
 205         for (frcn = 0;; frcn++) {
 206                 error = pcbmap(dp, frcn, &bn, &cluster, &blsize);
 207                 if (error) {
 208                         if (error == E2BIG)
 209                                 break;
 210                         return (error);
 211                 }
 212                 error = bread(pmp->pm_devvp, bn, blsize, NOCRED, &bp);
 213                 if (error) {
 214                         brelse(bp);
 215                         return (error);
 216                 }
 217                 for (blkoff = 0; blkoff < blsize;
 218                      blkoff += sizeof(struct direntry),
 219                      diroff += sizeof(struct direntry)) {
 220                         dep = (struct direntry *)(bp->b_data + blkoff);
 221                         /*
 222                          * If the slot is empty and we are still looking
 223                          * for an empty then remember this one.  If the
 224                          * slot is not empty then check to see if it
 225                          * matches what we are looking for.  If the slot
 226                          * has never been filled with anything, then the
 227                          * remainder of the directory has never been used,
 228                          * so there is no point in searching it.
 229                          */
 230                         if (dep->deName[0] == SLOT_EMPTY ||
 231                             dep->deName[0] == SLOT_DELETED) {
 232                                 /*
 233                                  * Drop memory of previous long matches
 234                                  */
 235                                 chksum = -1;
 236                                 mbnambuf_init(&nb);
 237
 238                                 if (slotcount < wincnt) {
 239                                         slotcount++;
 240                                         slotoffset = diroff;
 241                                 }
 242                                 if (dep->deName[0] == SLOT_EMPTY) {
 243                                         brelse(bp);
 244                                         goto notfound;
 245                                 }
 246                         } else {
 247                                 /*
 248                                  * If there wasn't enough space for our winentries,
 249                                  * forget about the empty space
 250                                  */
 251                                 if (slotcount < wincnt)
 252                                         slotcount = 0;
 253
 254                                 /*
 255                                  * Check for Win95 long filename entry
 256                                  */
 257                                 if (dep->deAttributes == ATTR_WIN95) {
 258                                         if (pmp->pm_flags & MSDOSFSMNT_SHORTNAME)
 259                                                 continue;
 260
 261                                         chksum = win2unixfn(&nb,
 262                                             (struct winentry *)dep, chksum,
 263                                             pmp);
 264                                         continue;
 265                                 }
 266
 267                                 chksum = winChkName(&nb,
 268                                     (const u_char *)cnp->cn_nameptr, unlen,
 269                                     chksum, pmp);
 270                                 if (chksum == -2) {
 271                                         chksum = -1;
 272                                         continue;
 273                                 }
 274
 275                                 /*
 276                                  * Ignore volume labels (anywhere, not just
 277                                  * the root directory).
 278                                  */
 279                                 if (dep->deAttributes & ATTR_VOLUME) {
 280                                         chksum = -1;
 281                                         continue;
 282                                 }
 283
 284                                 /*
 285                                  * Check for a checksum or name match
 286                                  */
 287                                 chksum_ok = (chksum == winChksum(dep->deName));
 288                                 if (!chksum_ok
 289                                     && (!olddos || bcmp(dosfilename, dep->deName, 11))) {
 290                                         chksum = -1;
 291                                         continue;
 292                                 }
 293 #ifdef MSDOSFS_DEBUG
 294                                 printf("msdosfs_lookup(): match blkoff %d, diroff %d\n",
 295                                     blkoff, diroff);
 296 #endif
 297                                 /*
 298                                  * Remember where this directory
 299                                  * entry came from for whoever did
 300                                  * this lookup.
 301                                  */
 302                                 dp->de_fndoffset = diroff;
 303                                 if (chksum_ok && nameiop == RENAME) {
 304                                         /*
 305                                          * Target had correct long name
 306                                          * directory entries, reuse them
 307                                          * as needed.
 308                                          */
 309                                         dp->de_fndcnt = wincnt - 1;
 310                                 } else {
 311                                         /*
 312                                          * Long name directory entries
 313                                          * not present or corrupt, can only
 314                                          * reuse dos directory entry.
 315                                          */
 316                                         dp->de_fndcnt = 0;
 317                                 }
 318
 319                                 goto found;
 320                         }
 321                 }       /* for (blkoff = 0; .... */
 322                 /*
 323                  * Release the buffer holding the directory cluster just
 324                  * searched.
 325                  */
 326                 brelse(bp);
 327         }       /* for (frcn = 0; ; frcn++) */
 328
 329 notfound:
 330         /*
 331          * We hold no disk buffers at this point.
 332          */
 333
 334         /*
 335          * Fixup the slot description to point to the place where
 336          * we might put the new DOS direntry (putting the Win95
 337          * long name entries before that)
 338          */
 339         if (!slotcount) {
 340                 slotcount = 1;
 341                 slotoffset = diroff;
 342         }
 343         if (wincnt > slotcount)
 344                 slotoffset += sizeof(struct direntry) * (wincnt - slotcount);
 345
 346         /*
 347          * If we get here we didn't find the entry we were looking for. But
 348          * that's ok if we are creating or renaming and are at the end of
 349          * the pathname and the directory hasn't been removed.
 350          */
 351 #ifdef MSDOSFS_DEBUG
 352         printf("msdosfs_lookup(): op %d, refcnt %ld\n",
 353             nameiop, dp->de_refcnt);
 354         printf("               slotcount %d, slotoffset %d\n",
 355                slotcount, slotoffset);
 356 #endif
 357         if ((nameiop == CREATE || nameiop == RENAME) &&
 358             (flags & ISLASTCN) && dp->de_refcnt != 0) {
 359                 /*
 360                  * Access for write is interpreted as allowing
 361                  * creation of files in the directory.
 362                  */
 363                 error = VOP_ACCESS(vdp, VWRITE, cnp->cn_cred, cnp->cn_thread);
 364                 if (error)
 365                         return (error);
 366                 /*
 367                  * Return an indication of where the new directory
 368                  * entry should be put.
 369                  */
 370                 dp->de_fndoffset = slotoffset;
 371                 dp->de_fndcnt = wincnt - 1;
 372
 373                 /*
 374                  * We return with the directory locked, so that
 375                  * the parameters we set up above will still be
 376                  * valid if we actually decide to do a direnter().
 377                  * We return ni_vp == NULL to indicate that the entry
 378                  * does not currently exist; we leave a pointer to
 379                  * the (locked) directory inode in ndp->ni_dvp.
 380                  * The pathname buffer is saved so that the name
 381                  * can be obtained later.
 382                  *
 383                  * NB - if the directory is unlocked, then this
 384                  * information cannot be used.
 385                  */
 386                 cnp->cn_flags |= SAVENAME;
 387                 return (EJUSTRETURN);
 388         }
 389 #if 0
 390         /*
 391          * Insert name into cache (as non-existent) if appropriate.
 392          *
 393          * XXX Negative caching is broken for msdosfs because the name
 394          * cache doesn't understand peculiarities such as case insensitivity
 395          * and 8.3 filenames.  Hence, it may not invalidate all negative
 396          * entries if a file with this name is later created.
 397          */
 398         if ((cnp->cn_flags & MAKEENTRY) && nameiop != CREATE)
 399                 cache_enter(vdp, *vpp, cnp);
 400 #endif
 401         return (ENOENT);
 402
 403 found:
 404         /*
 405          * NOTE:  We still have the buffer with matched directory entry at
 406          * this point.
 407          */
 408         isadir = dep->deAttributes & ATTR_DIRECTORY;
 409         scn = getushort(dep->deStartCluster);
 410         if (FAT32(pmp)) {
 411                 scn |= getushort(dep->deHighClust) << 16;
 412                 if (scn == pmp->pm_rootdirblk) {
 413                         /*
 414                          * There should actually be 0 here.
 415                          * Just ignore the error.
 416                          */
 417                         scn = MSDOSFSROOT;
 418                 }
 419         }
 420
 421         if (isadir) {
 422                 cluster = scn;
 423                 if (cluster == MSDOSFSROOT)
 424                         blkoff = MSDOSFSROOT_OFS;
 425                 else
 426                         blkoff = 0;
 427         } else if (cluster == MSDOSFSROOT)
 428                 blkoff = diroff;
 429
 430         /*
 431          * Now release buf to allow deget to read the entry again.
 432          * Reserving it here and giving it to deget could result
 433          * in a deadlock.
 434          */
 435         brelse(bp);
 436         bp = 0;
 437
 438 foundroot:
 439         /*
 440          * If we entered at foundroot, then we are looking for the . or ..
 441          * entry of the filesystems root directory.  isadir and scn were
 442          * setup before jumping here.  And, bp is already null.
 443          */
 444         if (FAT32(pmp) && scn == MSDOSFSROOT)
 445                 scn = pmp->pm_rootdirblk;
 446
 447         if (dd_inum != NULL) {
 448                 *dd_inum = (uint64_t)pmp->pm_bpcluster * scn + blkoff;
 449                 return (0);
 450         }
 451
 452         /*
 453          * If deleting, and at end of pathname, return
 454          * parameters which can be used to remove file.
 455          */
 456         if (nameiop == DELETE && (flags & ISLASTCN)) {
 457                 /*
 458                  * Don't allow deleting the root.
 459                  */
 460                 if (blkoff == MSDOSFSROOT_OFS)
 461                         return (EBUSY);
 462
 463                 /*
 464                  * Write access to directory required to delete files.
 465                  */
 466                 error = VOP_ACCESS(vdp, VWRITE, cnp->cn_cred, cnp->cn_thread);
 467                 if (error)
 468                         return (error);
 469
 470                 /*
 471                  * Return pointer to current entry in dp->i_offset.
 472                  * Save directory inode pointer in ndp->ni_dvp for dirremove().
 473                  */
 474                 if (dp->de_StartCluster == scn && isadir) {     /* "." */
 475                         VREF(vdp);
 476                         *vpp = vdp;
 477                         return (0);
 478                 }
 479                 error = deget(pmp, cluster, blkoff, &tdp);
 480                 if (error)
 481                         return (error);
 482                 *vpp = DETOV(tdp);
 483                 return (0);
 484         }
 485
 486         /*
 487          * If rewriting (RENAME), return the inode and the
 488          * information required to rewrite the present directory
 489          * Must get inode of directory entry to verify it's a
 490          * regular file, or empty directory.
 491          */
 492         if (nameiop == RENAME && (flags & ISLASTCN)) {
 493                 if (blkoff == MSDOSFSROOT_OFS)
 494                         return (EBUSY);
 495
 496                 error = VOP_ACCESS(vdp, VWRITE, cnp->cn_cred, cnp->cn_thread);
 497                 if (error)
 498                         return (error);
 499
 500                 /*
 501                  * Careful about locking second inode.
 502                  * This can only occur if the target is ".".
 503                  */
 504                 if (dp->de_StartCluster == scn && isadir)
 505                         return (EISDIR);
 506
 507                 if ((error = deget(pmp, cluster, blkoff, &tdp)) != 0)
 508                         return (error);
 509                 *vpp = DETOV(tdp);
 510                 cnp->cn_flags |= SAVENAME;
 511                 return (0);
 512         }
 513
 514         /*
 515          * Step through the translation in the name.  We do not `vput' the
 516          * directory because we may need it again if a symbolic link
 517          * is relative to the current directory.  Instead we save it
 518          * unlocked as "pdp".  We must get the target inode before unlocking
 519          * the directory to insure that the inode will not be removed
 520          * before we get it.  We prevent deadlock by always fetching
 521          * inodes from the root, moving down the directory tree. Thus
 522          * when following backward pointers ".." we must unlock the
 523          * parent directory before getting the requested directory.
 524          */
 525         pdp = vdp;
 526         if (flags & ISDOTDOT) {
 527                 error = msdosfs_deget_dotdot(pdp, cluster, blkoff, vpp);
 528                 if (error) {
 529                         *vpp = NULL;
 530                         return (error);
 531                 }
 532                 /*
 533                  * Recheck that ".." still points to the inode we
 534                  * looked up before pdp lock was dropped.
 535                  */
 536                 error = msdosfs_lookup_(pdp, NULL, cnp, &inode1);
 537                 if (error) {
 538                         vput(*vpp);
 539                         *vpp = NULL;
 540                         return (error);
 541                 }
 542                 if (VTODE(*vpp)->de_inode != inode1) {
 543                         vput(*vpp);
 544                         goto restart;
 545                 }
 546         } else if (dp->de_StartCluster == scn && isadir) {
 547                 VREF(vdp);      /* we want ourself, ie "." */
 548                 *vpp = vdp;
 549         } else {
 550                 if ((error = deget(pmp, cluster, blkoff, &tdp)) != 0)
 551                         return (error);
 552                 *vpp = DETOV(tdp);
 553         }
 554
 555         /*
 556          * Insert name into cache if appropriate.
 557          */
 558         if (cnp->cn_flags & MAKEENTRY)
 559                 cache_enter(vdp, *vpp, cnp);
 560         return (0);
 561 }
 562
 563 static int
 564 msdosfs_deget_dotdot(struct vnode *vp, u_long cluster, int blkoff,
 565     struct vnode **rvp)
 566 {
 567         struct mount *mp;
 568         struct msdosfsmount *pmp;
 569         struct denode *rdp;
 570         int ltype, error;
 571
 572         mp = vp->v_mount;
 573         pmp = VFSTOMSDOSFS(mp);
 574         ltype = VOP_ISLOCKED(vp);
 575         KASSERT(ltype == LK_EXCLUSIVE || ltype == LK_SHARED,
 576             ("msdosfs_deget_dotdot: vp not locked"));
 577
 578         error = vfs_busy(mp, MBF_NOWAIT);
 579         if (error != 0) {
 580                 vfs_ref(mp);
 581                 VOP_UNLOCK(vp, 0);
 582                 error = vfs_busy(mp, 0);
 583                 vn_lock(vp, ltype | LK_RETRY);
 584                 vfs_rel(mp);
 585                 if (error != 0)
 586                         return (ENOENT);
 587                 if (vp->v_iflag & VI_DOOMED) {
 588                         vfs_unbusy(mp);
 589                         return (ENOENT);
 590                 }
 591         }
 592         VOP_UNLOCK(vp, 0);
 593         error = deget(pmp, cluster, blkoff,  &rdp);
 594         vfs_unbusy(mp);
 595         if (error == 0)
 596                 *rvp = DETOV(rdp);
 597         if (*rvp != vp)
 598                 vn_lock(vp, ltype | LK_RETRY);
 599         if (vp->v_iflag & VI_DOOMED) {
 600                 if (error == 0) {
 601                         if (*rvp == vp)
 602                                 vunref(*rvp);
 603                         else
 604                                 vput(*rvp);
 605                 }
 606                 error = ENOENT;
 607         }
 608         return (error);
 609 }
 610
 611 /*
 612  * dep  - directory entry to copy into the directory
 613  * ddep - directory to add to
 614  * depp - return the address of the denode for the created directory entry
 615  *        if depp != 0
 616  * cnp  - componentname needed for Win95 long filenames
 617  */
 618 int
 619 createde(dep, ddep, depp, cnp)
 620         struct denode *dep;
 621         struct denode *ddep;
 622         struct denode **depp;
 623         struct componentname *cnp;
 624 {
 625         int error;
 626         u_long dirclust, diroffset;
 627         struct direntry *ndep;
 628         struct msdosfsmount *pmp = ddep->de_pmp;
 629         struct buf *bp;
 630         daddr_t bn;
 631         int blsize;
 632
 633 #ifdef MSDOSFS_DEBUG
 634         printf("createde(dep %p, ddep %p, depp %p, cnp %p)\n",
 635             dep, ddep, depp, cnp);
 636 #endif
 637
 638         /*
 639          * If no space left in the directory then allocate another cluster
 640          * and chain it onto the end of the file.  There is one exception
 641          * to this.  That is, if the root directory has no more space it
 642          * can NOT be expanded.  extendfile() checks for and fails attempts
 643          * to extend the root directory.  We just return an error in that
 644          * case.
 645          */
 646         if (ddep->de_fndoffset >= ddep->de_FileSize) {
 647                 diroffset = ddep->de_fndoffset + sizeof(struct direntry)
 648                     - ddep->de_FileSize;
 649                 dirclust = de_clcount(pmp, diroffset);
 650                 error = extendfile(ddep, dirclust, 0, 0, DE_CLEAR);
 651                 if (error) {
 652                         (void)detrunc(ddep, ddep->de_FileSize, 0, NOCRED);
 653                         return error;
 654                 }
 655
 656                 /*
 657                  * Update the size of the directory
 658                  */
 659                 ddep->de_FileSize += de_cn2off(pmp, dirclust);
 660         }
 661
 662         /*
 663          * We just read in the cluster with space.  Copy the new directory
 664          * entry in.  Then write it to disk. NOTE:  DOS directories
 665          * do not get smaller as clusters are emptied.
 666          */
 667         error = pcbmap(ddep, de_cluster(pmp, ddep->de_fndoffset),
 668                        &bn, &dirclust, &blsize);
 669         if (error)
 670                 return error;
 671         diroffset = ddep->de_fndoffset;
 672         if (dirclust != MSDOSFSROOT)
 673                 diroffset &= pmp->pm_crbomask;
 674         if ((error = bread(pmp->pm_devvp, bn, blsize, NOCRED, &bp)) != 0) {
 675                 brelse(bp);
 676                 return error;
 677         }
 678         ndep = bptoep(pmp, bp, ddep->de_fndoffset);
 679
 680         DE_EXTERNALIZE(ndep, dep);
 681
 682         /*
 683          * Now write the Win95 long name
 684          */
 685         if (ddep->de_fndcnt > 0) {
 686                 u_int8_t chksum = winChksum(ndep->deName);
 687                 const u_char *un = (const u_char *)cnp->cn_nameptr;
 688                 int unlen = cnp->cn_namelen;
 689                 int cnt = 1;
 690
 691                 while (--ddep->de_fndcnt >= 0) {
 692                         if (!(ddep->de_fndoffset & pmp->pm_crbomask)) {
 693                                 if (DOINGASYNC(DETOV(ddep)))
 694                                         bdwrite(bp);
 695                                 else if ((error = bwrite(bp)) != 0)
 696                                         return error;
 697
 698                                 ddep->de_fndoffset -= sizeof(struct direntry);
 699                                 error = pcbmap(ddep,
 700                                                de_cluster(pmp,
 701                                                           ddep->de_fndoffset),
 702                                                &bn, 0, &blsize);
 703                                 if (error)
 704                                         return error;
 705
 706                                 error = bread(pmp->pm_devvp, bn, blsize,
 707                                               NOCRED, &bp);
 708                                 if (error) {
 709                                         brelse(bp);
 710                                         return error;
 711                                 }
 712                                 ndep = bptoep(pmp, bp, ddep->de_fndoffset);
 713                         } else {
 714                                 ndep--;
 715                                 ddep->de_fndoffset -= sizeof(struct direntry);
 716                         }
 717                         if (!unix2winfn(un, unlen, (struct winentry *)ndep,
 718                                         cnt++, chksum, pmp))
 719                                 break;
 720                 }
 721         }
 722
 723         if (DOINGASYNC(DETOV(ddep)))
 724                 bdwrite(bp);
 725         else if ((error = bwrite(bp)) != 0)
 726                 return error;
 727
 728         /*
 729          * If they want us to return with the denode gotten.
 730          */
 731         if (depp) {
 732                 if (dep->de_Attributes & ATTR_DIRECTORY) {
 733                         dirclust = dep->de_StartCluster;
 734                         if (FAT32(pmp) && dirclust == pmp->pm_rootdirblk)
 735                                 dirclust = MSDOSFSROOT;
 736                         if (dirclust == MSDOSFSROOT)
 737                                 diroffset = MSDOSFSROOT_OFS;
 738                         else
 739                                 diroffset = 0;
 740                 }
 741                 return deget(pmp, dirclust, diroffset, depp);
 742         }
 743
 744         return 0;
 745 }
 746
 747 /*
 748  * Be sure a directory is empty except for "." and "..". Return 1 if empty,
 749  * return 0 if not empty or error.
 750  */
 751 int
 752 dosdirempty(dep)
 753         struct denode *dep;
 754 {
 755         int blsize;
 756         int error;
 757         u_long cn;
 758         daddr_t bn;
 759         struct buf *bp;
 760         struct msdosfsmount *pmp = dep->de_pmp;
 761         struct direntry *dentp;
 762
 763         /*
 764          * Since the filesize field in directory entries for a directory is
 765          * zero, we just have to feel our way through the directory until
 766          * we hit end of file.
 767          */
 768         for (cn = 0;; cn++) {
 769                 if ((error = pcbmap(dep, cn, &bn, 0, &blsize)) != 0) {
 770                         if (error == E2BIG)
 771                                 return (1);     /* it's empty */
 772                         return (0);
 773                 }
 774                 error = bread(pmp->pm_devvp, bn, blsize, NOCRED, &bp);
 775                 if (error) {
 776                         brelse(bp);
 777                         return (0);
 778                 }
 779                 for (dentp = (struct direntry *)bp->b_data;
 780                      (char *)dentp < bp->b_data + blsize;
 781                      dentp++) {
 782                         if (dentp->deName[0] != SLOT_DELETED &&
 783                             (dentp->deAttributes & ATTR_VOLUME) == 0) {
 784                                 /*
 785                                  * In dos directories an entry whose name
 786                                  * starts with SLOT_EMPTY (0) starts the
 787                                  * beginning of the unused part of the
 788                                  * directory, so we can just return that it
 789                                  * is empty.
 790                                  */
 791                                 if (dentp->deName[0] == SLOT_EMPTY) {
 792                                         brelse(bp);
 793                                         return (1);
 794                                 }
 795                                 /*
 796                                  * Any names other than "." and ".." in a
 797                                  * directory mean it is not empty.
 798                                  */
 799                                 if (bcmp(dentp->deName, ".          ", 11) &&
 800                                     bcmp(dentp->deName, "..         ", 11)) {
 801                                         brelse(bp);
 802 #ifdef MSDOSFS_DEBUG
 803                                         printf("dosdirempty(): entry found %02x, %02x\n",
 804                                             dentp->deName[0], dentp->deName[1]);
 805 #endif
 806                                         return (0);     /* not empty */
 807                                 }
 808                         }
 809                 }
 810                 brelse(bp);
 811         }
 812         /* NOTREACHED */
 813 }
 814
 815 /*
 816  * Check to see if the directory described by target is in some
 817  * subdirectory of source.  This prevents something like the following from
 818  * succeeding and leaving a bunch or files and directories orphaned. mv
 819  * /a/b/c /a/b/c/d/e/f Where c and f are directories.
 820  *
 821  * source - the inode for /a/b/c
 822  * target - the inode for /a/b/c/d/e/f
 823  *
 824  * Returns 0 if target is NOT a subdirectory of source.
 825  * Otherwise returns a non-zero error number.
 826  * The target inode is always unlocked on return.
 827  */
 828 int
 829 doscheckpath(source, target)
 830         struct denode *source;
 831         struct denode *target;
 832 {
 833         daddr_t scn;
 834         struct msdosfsmount *pmp;
 835         struct direntry *ep;
 836         struct denode *dep;
 837         struct buf *bp = NULL;
 838         int error = 0;
 839
 840         dep = target;
 841         if ((target->de_Attributes & ATTR_DIRECTORY) == 0 ||
 842             (source->de_Attributes & ATTR_DIRECTORY) == 0) {
 843                 error = ENOTDIR;
 844                 goto out;
 845         }
 846         if (dep->de_StartCluster == source->de_StartCluster) {
 847                 error = EEXIST;
 848                 goto out;
 849         }
 850         if (dep->de_StartCluster == MSDOSFSROOT)
 851                 goto out;
 852         pmp = dep->de_pmp;
 853 #ifdef  DIAGNOSTIC
 854         if (pmp != source->de_pmp)
 855                 panic("doscheckpath: source and target on different filesystems");
 856 #endif
 857         if (FAT32(pmp) && dep->de_StartCluster == pmp->pm_rootdirblk)
 858                 goto out;
 859
 860         for (;;) {
 861                 if ((dep->de_Attributes & ATTR_DIRECTORY) == 0) {
 862                         error = ENOTDIR;
 863                         break;
 864                 }
 865                 scn = dep->de_StartCluster;
 866                 error = bread(pmp->pm_devvp, cntobn(pmp, scn),
 867                               pmp->pm_bpcluster, NOCRED, &bp);
 868                 if (error)
 869                         break;
 870
 871                 ep = (struct direntry *) bp->b_data + 1;
 872                 if ((ep->deAttributes & ATTR_DIRECTORY) == 0 ||
 873                     bcmp(ep->deName, "..         ", 11) != 0) {
 874                         error = ENOTDIR;
 875                         break;
 876                 }
 877                 scn = getushort(ep->deStartCluster);
 878                 if (FAT32(pmp))
 879                         scn |= getushort(ep->deHighClust) << 16;
 880
 881                 if (scn == source->de_StartCluster) {
 882                         error = EINVAL;
 883                         break;
 884                 }
 885                 if (scn == MSDOSFSROOT)
 886                         break;
 887                 if (FAT32(pmp) && scn == pmp->pm_rootdirblk) {
 888                         /*
 889                          * scn should be 0 in this case,
 890                          * but we silently ignore the error.
 891                          */
 892                         break;
 893                 }
 894
 895                 vput(DETOV(dep));
 896                 brelse(bp);
 897                 bp = NULL;
 898                 /* NOTE: deget() clears dep on error */
 899                 if ((error = deget(pmp, scn, 0, &dep)) != 0)
 900                         break;
 901         }
 902 out:;
 903         if (bp)
 904                 brelse(bp);
 905 #ifdef MSDOSFS_DEBUG
 906         if (error == ENOTDIR)
 907                 printf("doscheckpath(): .. not a directory?\n");
 908 #endif
 909         if (dep != NULL)
 910                 vput(DETOV(dep));
 911         return (error);
 912 }
 913
 914 /*
 915  * Read in the disk block containing the directory entry (dirclu, dirofs)
 916  * and return the address of the buf header, and the address of the
 917  * directory entry within the block.
 918  */
 919 int
 920 readep(pmp, dirclust, diroffset, bpp, epp)
 921         struct msdosfsmount *pmp;
 922         u_long dirclust, diroffset;
 923         struct buf **bpp;
 924         struct direntry **epp;
 925 {
 926         int error;
 927         daddr_t bn;
 928         int blsize;
 929
 930         blsize = pmp->pm_bpcluster;
 931         if (dirclust == MSDOSFSROOT
 932             && de_blk(pmp, diroffset + blsize) > pmp->pm_rootdirsize)
 933                 blsize = de_bn2off(pmp, pmp->pm_rootdirsize) & pmp->pm_crbomask;
 934         bn = detobn(pmp, dirclust, diroffset);
 935         if ((error = bread(pmp->pm_devvp, bn, blsize, NOCRED, bpp)) != 0) {
 936                 brelse(*bpp);
 937                 *bpp = NULL;
 938                 return (error);
 939         }
 940         if (epp)
 941                 *epp = bptoep(pmp, *bpp, diroffset);
 942         return (0);
 943 }
 944
 945 /*
 946  * Read in the disk block containing the directory entry dep came from and
 947  * return the address of the buf header, and the address of the directory
 948  * entry within the block.
 949  */
 950 int
 951 readde(dep, bpp, epp)
 952         struct denode *dep;
 953         struct buf **bpp;
 954         struct direntry **epp;
 955 {
 956
 957         return (readep(dep->de_pmp, dep->de_dirclust, dep->de_diroffset,
 958             bpp, epp));
 959 }
 960
 961 /*
 962  * Remove a directory entry. At this point the file represented by the
 963  * directory entry to be removed is still full length until noone has it
 964  * open.  When the file no longer being used msdosfs_inactive() is called
 965  * and will truncate the file to 0 length.  When the vnode containing the
 966  * denode is needed for some other purpose by VFS it will call
 967  * msdosfs_reclaim() which will remove the denode from the denode cache.
 968  */
 969 int
 970 removede(pdep, dep)
 971         struct denode *pdep;    /* directory where the entry is removed */
 972         struct denode *dep;     /* file to be removed */
 973 {
 974         int error;
 975         struct direntry *ep;
 976         struct buf *bp;
 977         daddr_t bn;
 978         int blsize;
 979         struct msdosfsmount *pmp = pdep->de_pmp;
 980         u_long offset = pdep->de_fndoffset;
 981
 982 #ifdef MSDOSFS_DEBUG
 983         printf("removede(): filename %s, dep %p, offset %08lx\n",
 984             dep->de_Name, dep, offset);
 985 #endif
 986
 987         dep->de_refcnt--;
 988         offset += sizeof(struct direntry);
 989         do {
 990                 offset -= sizeof(struct direntry);
 991                 error = pcbmap(pdep, de_cluster(pmp, offset), &bn, 0, &blsize);
 992                 if (error)
 993                         return error;
 994                 error = bread(pmp->pm_devvp, bn, blsize, NOCRED, &bp);
 995                 if (error) {
 996                         brelse(bp);
 997                         return error;
 998                 }
 999                 ep = bptoep(pmp, bp, offset);
1000                 /*
1001                  * Check whether, if we came here the second time, i.e.
1002                  * when underflowing into the previous block, the last
1003                  * entry in this block is a longfilename entry, too.
1004                  */
1005                 if (ep->deAttributes != ATTR_WIN95
1006                     && offset != pdep->de_fndoffset) {
1007                         brelse(bp);
1008                         break;
1009                 }
1010                 offset += sizeof(struct direntry);
1011                 while (1) {
1012                         /*
1013                          * We are a bit agressive here in that we delete any Win95
1014                          * entries preceding this entry, not just the ones we "own".
1015                          * Since these presumably aren't valid anyway,
1016                          * there should be no harm.
1017                          */
1018                         offset -= sizeof(struct direntry);
1019                         ep--->deName[0] = SLOT_DELETED;
1020                         if ((pmp->pm_flags & MSDOSFSMNT_NOWIN95)
1021                             || !(offset & pmp->pm_crbomask)
1022                             || ep->deAttributes != ATTR_WIN95)
1023                                 break;
1024                 }
1025                 if (DOINGASYNC(DETOV(pdep)))
1026                         bdwrite(bp);
1027                 else if ((error = bwrite(bp)) != 0)
1028                         return error;
1029         } while (!(pmp->pm_flags & MSDOSFSMNT_NOWIN95)
1030             && !(offset & pmp->pm_crbomask)
1031             && offset);
1032         return 0;
1033 }
1034
1035 /*
1036  * Create a unique DOS name in dvp
1037  */
1038 int
1039 uniqdosname(dep, cnp, cp)
1040         struct denode *dep;
1041         struct componentname *cnp;
1042         u_char *cp;
1043 {
1044         struct msdosfsmount *pmp = dep->de_pmp;
1045         struct direntry *dentp;
1046         int gen;
1047         int blsize;
1048         u_long cn;
1049         daddr_t bn;
1050         struct buf *bp;
1051         int error;
1052
1053         if (pmp->pm_flags & MSDOSFSMNT_SHORTNAME)
1054                 return (unix2dosfn((const u_char *)cnp->cn_nameptr, cp,
1055                     cnp->cn_namelen, 0, pmp) ? 0 : EINVAL);
1056
1057         for (gen = 1;; gen++) {
1058                 /*
1059                  * Generate DOS name with generation number
1060                  */
1061                 if (!unix2dosfn((const u_char *)cnp->cn_nameptr, cp,
1062                     cnp->cn_namelen, gen, pmp))
1063                         return gen == 1 ? EINVAL : EEXIST;
1064
1065                 /*
1066                  * Now look for a dir entry with this exact name
1067                  */
1068                 for (cn = error = 0; !error; cn++) {
1069                         if ((error = pcbmap(dep, cn, &bn, 0, &blsize)) != 0) {
1070                                 if (error == E2BIG)     /* EOF reached and not found */
1071                                         return 0;
1072                                 return error;
1073                         }
1074                         error = bread(pmp->pm_devvp, bn, blsize, NOCRED, &bp);
1075                         if (error) {
1076                                 brelse(bp);
1077                                 return error;
1078                         }
1079                         for (dentp = (struct direntry *)bp->b_data;
1080                              (char *)dentp < bp->b_data + blsize;
1081                              dentp++) {
1082                                 if (dentp->deName[0] == SLOT_EMPTY) {
1083                                         /*
1084                                          * Last used entry and not found
1085                                          */
1086                                         brelse(bp);
1087                                         return 0;
1088                                 }
1089                                 /*
1090                                  * Ignore volume labels and Win95 entries
1091                                  */
1092                                 if (dentp->deAttributes & ATTR_VOLUME)
1093                                         continue;
1094                                 if (!bcmp(dentp->deName, cp, 11)) {
1095                                         error = EEXIST;
1096                                         break;
1097                                 }
1098                         }
1099                         brelse(bp);
1100                 }
1101         }
1102 }
1103
1104 /*
1105  * Find any Win'95 long filename entry in directory dep
1106  */
1107 int
1108 findwin95(dep)
1109         struct denode *dep;
1110 {
1111         struct msdosfsmount *pmp = dep->de_pmp;
1112         struct direntry *dentp;
1113         int blsize, win95;
1114         u_long cn;
1115         daddr_t bn;
1116         struct buf *bp;
1117
1118         win95 = 1;
1119         /*
1120          * Read through the directory looking for Win'95 entries
1121          * Note: Error currently handled just as EOF                    XXX
1122          */
1123         for (cn = 0;; cn++) {
1124                 if (pcbmap(dep, cn, &bn, 0, &blsize))
1125                         return (win95);
1126                 if (bread(pmp->pm_devvp, bn, blsize, NOCRED, &bp)) {
1127                         brelse(bp);
1128                         return (win95);
1129                 }
1130                 for (dentp = (struct direntry *)bp->b_data;
1131                      (char *)dentp < bp->b_data + blsize;
1132                      dentp++) {
1133                         if (dentp->deName[0] == SLOT_EMPTY) {
1134                                 /*
1135                                  * Last used entry and not found
1136                                  */
1137                                 brelse(bp);
1138                                 return (win95);
1139                         }
1140                         if (dentp->deName[0] == SLOT_DELETED) {
1141                                 /*
1142                                  * Ignore deleted files
1143                                  * Note: might be an indication of Win'95 anyway        XXX
1144                                  */
1145                                 continue;
1146                         }
1147                         if (dentp->deAttributes == ATTR_WIN95) {
1148                                 brelse(bp);
1149                                 return 1;
1150                         }
1151                         win95 = 0;
1152                 }
1153                 brelse(bp);
1154         }
1155 }