62ff5a49f65644f843c3f32d3765129bdca738b9
[dragonfly.git] / sys / vfs / msdosfs / msdosfs_lookup.c
1 /* $FreeBSD: src/sys/msdosfs/msdosfs_lookup.c,v 1.30.2.1 2000/11/03 15:55:39 bp Exp $ */
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/vnode.h>
55 #include <sys/proc.h>
56 #include <sys/namei.h>
57 #include <sys/mount.h>
58
59 #include <sys/buf2.h>
60
61 #include "bpb.h"
62 #include "direntry.h"
63 #include "denode.h"
64 #include "msdosfsmount.h"
65 #include "fat.h"
66
67 /*
68  * When we search a directory the blocks containing directory entries are
69  * read and examined.  The directory entries contain information that would
70  * normally be in the inode of a unix filesystem.  This means that some of
71  * a directory's contents may also be in memory resident denodes (sort of
72  * an inode).  This can cause problems if we are searching while some other
73  * process is modifying a directory.  To prevent one process from accessing
74  * incompletely modified directory information we depend upon being the
75  * sole owner of a directory block.  bread/brelse provide this service.
76  * This being the case, when a process modifies a directory it must first
77  * acquire the disk block that contains the directory entry to be modified.
78  * Then update the disk block and the denode, and then write the disk block
79  * out to disk.  This way disk blocks containing directory entries and in
80  * memory denode's will be in synch.
81  *
82  * msdosfs_lookup(struct vnode *a_dvp, struct vnode **a_vpp,
83  *                struct componentname *a_cnp)
84  */
85 int
86 msdosfs_lookup(struct vop_old_lookup_args *ap)
87 {
88         struct mbnambuf nb;
89         struct vnode *vdp = ap->a_dvp;
90         struct vnode **vpp = ap->a_vpp;
91         struct componentname *cnp = ap->a_cnp;
92         daddr_t bn;
93         int error;
94         int lockparent;
95         int wantparent;
96         int slotcount;
97         int slotoffset = 0;
98         int frcn;
99         u_long cluster;
100         int blkoff;
101         int diroff;
102         int blsize;
103         int isadir;             /* ~0 if found direntry is a directory   */
104         u_long scn;             /* starting cluster number               */
105         struct vnode *pdp;
106         struct denode *dp;
107         struct denode *tdp;
108         struct msdosfsmount *pmp;
109         struct buf *bp = NULL;
110         struct direntry *dep = NULL;
111         u_char dosfilename[12];
112         int flags = cnp->cn_flags;
113         int nameiop = cnp->cn_nameiop;
114         int unlen;
115
116         int wincnt = 1;
117         int chksum = -1;
118         int olddos = 1;
119         cnp->cn_flags &= ~CNP_PDIRUNLOCK;
120
121 #ifdef MSDOSFS_DEBUG
122         kprintf("msdosfs_lookup(): looking for %s\n", cnp->cn_nameptr);
123 #endif
124         dp = VTODE(vdp);
125         pmp = dp->de_pmp;
126         *vpp = NULL;
127         lockparent = flags & CNP_LOCKPARENT;
128         wantparent = flags & (CNP_LOCKPARENT | CNP_WANTPARENT);
129 #ifdef MSDOSFS_DEBUG
130         kprintf("msdosfs_lookup(): vdp %p, dp %p, Attr %02x\n",
131             vdp, dp, dp->de_Attributes);
132 #endif
133
134         /*
135          * If they are going after the . or .. entry in the root directory,
136          * they won't find it.  DOS filesystems don't have them in the root
137          * directory.  So, we fake it. deget() is in on this scam too.
138          */
139         if ((vdp->v_flag & VROOT) && cnp->cn_nameptr[0] == '.' &&
140             (cnp->cn_namelen == 1 ||
141                 (cnp->cn_namelen == 2 && cnp->cn_nameptr[1] == '.'))) {
142                 isadir = ATTR_DIRECTORY;
143                 scn = MSDOSFSROOT;
144 #ifdef MSDOSFS_DEBUG
145                 kprintf("msdosfs_lookup(): looking for . or .. in root directory\n");
146 #endif
147                 cluster = MSDOSFSROOT;
148                 blkoff = MSDOSFSROOT_OFS;
149                 goto foundroot;
150         }
151         switch (unix2dosfn((const u_char *)cnp->cn_nameptr, dosfilename,
152             cnp->cn_namelen, 0, pmp)) {
153         case 0:
154                 return (EINVAL);
155         case 1:
156                 break;
157         case 2:
158                 wincnt = winSlotCnt((const u_char *)cnp->cn_nameptr,
159                     cnp->cn_namelen, pmp) + 1;
160                 break;
161         case 3:
162                 olddos = 0;
163                 wincnt = winSlotCnt((const u_char *)cnp->cn_nameptr,
164                     cnp->cn_namelen, pmp) + 1;
165                 break;
166         }
167         if (pmp->pm_flags & MSDOSFSMNT_SHORTNAME) {
168                 wincnt = 1;
169                 olddos = 1;
170         }
171         unlen = winLenFixup(cnp->cn_nameptr, cnp->cn_namelen);
172
173         /*
174          * Suppress search for slots unless creating
175          * file and at end of pathname, in which case
176          * we watch for a place to put the new file in
177          * case it doesn't already exist.
178          */
179         slotcount = wincnt;
180         if (nameiop == NAMEI_CREATE || nameiop == NAMEI_RENAME)
181                 slotcount = 0;
182
183 #ifdef MSDOSFS_DEBUG
184         kprintf("msdosfs_lookup(): dos version of filename %s, length %ld\n",
185             dosfilename, cnp->cn_namelen);
186 #endif
187         /*
188          * Search the directory pointed at by vdp for the name pointed at
189          * by cnp->cn_nameptr.
190          */
191         tdp = NULL;
192         mbnambuf_init(&nb);
193         /*
194          * The outer loop ranges over the clusters that make up the
195          * directory.  Note that the root directory is different from all
196          * other directories.  It has a fixed number of blocks that are not
197          * part of the pool of allocatable clusters.  So, we treat it a
198          * little differently. The root directory starts at "cluster" 0.
199          */
200         diroff = 0;
201         for (frcn = 0;; frcn++) {
202                 error = pcbmap(dp, frcn, &bn, &cluster, &blsize);
203                 if (error) {
204                         if (error == E2BIG)
205                                 break;
206                         return (error);
207                 }
208                 error = bread(pmp->pm_devvp, de_bntodoff(pmp, bn), blsize, &bp);
209                 if (error) {
210                         brelse(bp);
211                         return (error);
212                 }
213                 for (blkoff = 0; blkoff < blsize;
214                      blkoff += sizeof(struct direntry),
215                      diroff += sizeof(struct direntry)) {
216                         dep = (struct direntry *)(bp->b_data + blkoff);
217                         /*
218                          * If the slot is empty and we are still looking
219                          * for an empty then remember this one.  If the
220                          * slot is not empty then check to see if it
221                          * matches what we are looking for.  If the slot
222                          * has never been filled with anything, then the
223                          * remainder of the directory has never been used,
224                          * so there is no point in searching it.
225                          */
226                         if (dep->deName[0] == SLOT_EMPTY ||
227                             dep->deName[0] == SLOT_DELETED) {
228                                 /*
229                                  * Drop memory of previous long matches
230                                  */
231                                 chksum = -1;
232                                 mbnambuf_init(&nb);
233
234                                 if (slotcount < wincnt) {
235                                         slotcount++;
236                                         slotoffset = diroff;
237                                 }
238                                 if (dep->deName[0] == SLOT_EMPTY) {
239                                         brelse(bp);
240                                         goto notfound;
241                                 }
242                         } else {
243                                 /*
244                                  * If there wasn't enough space for our winentries,
245                                  * forget about the empty space
246                                  */
247                                 if (slotcount < wincnt)
248                                         slotcount = 0;
249
250                                 /*
251                                  * Check for Win95 long filename entry
252                                  */
253                                 if (dep->deAttributes == ATTR_WIN95) {
254                                 if (pmp->pm_flags & MSDOSFSMNT_SHORTNAME)
255                                                 continue;
256                                         chksum = win2unixfn(&nb,
257                                             (struct winentry *)dep, chksum,
258                                             pmp);
259                                         continue;
260                                 }
261
262                                 chksum = winChkName(&nb,
263                                     (const u_char *)cnp->cn_nameptr, unlen,
264                                     chksum, pmp);
265                                 if (chksum == -2) {
266                                         chksum = -1;
267                                         continue;
268                                 }
269
270                                 /*
271                                  * Ignore volume labels (anywhere, not just
272                                  * the root directory).
273                                  */
274                                 if (dep->deAttributes & ATTR_VOLUME) {
275                                         chksum = -1;
276                                         continue;
277                                 }
278
279                                 /*
280                                  * Check for a checksum or name match
281                                  */
282                                 if (chksum != winChksum(dep->deName)
283                                     && (!olddos || bcmp(dosfilename,
284                                     dep->deName, 11))) {
285                                         chksum = -1;
286                                         continue;
287                                 }
288 #ifdef MSDOSFS_DEBUG
289                                 kprintf("msdosfs_lookup(): match blkoff %d, diroff %d\n",
290                                     blkoff, diroff);
291 #endif
292                                 /*
293                                  * Remember where this directory
294                                  * entry came from for whoever did
295                                  * this lookup.
296                                  */
297                                 dp->de_fndoffset = diroff;
298                                 dp->de_fndcnt = wincnt - 1;
299
300                                 goto found;
301                         }
302                 }       /* for (blkoff = 0; .... */
303                 /*
304                  * Release the buffer holding the directory cluster just
305                  * searched.
306                  */
307                 brelse(bp);
308         }       /* for (frcn = 0; ; frcn++) */
309
310 notfound:
311         /*
312          * We hold no disk buffers at this point.
313          */
314
315         /*
316          * Fixup the slot description to point to the place where
317          * we might put the new DOS direntry (putting the Win95
318          * long name entries before that)
319          */
320         if (!slotcount) {
321                 slotcount = 1;
322                 slotoffset = diroff;
323         }
324         if (wincnt > slotcount)
325                 slotoffset += sizeof(struct direntry) * (wincnt - slotcount);
326
327         /*
328          * If we get here we didn't find the entry we were looking for. But
329          * that's ok if we are creating or renaming and are at the end of
330          * the pathname and the directory hasn't been removed.
331          */
332 #ifdef MSDOSFS_DEBUG
333         kprintf("msdosfs_lookup(): op %d, refcnt %ld\n",
334             nameiop, dp->de_refcnt);
335         kprintf("               slotcount %d, slotoffset %d\n",
336                slotcount, slotoffset);
337 #endif
338         if ((nameiop == NAMEI_CREATE || nameiop == NAMEI_RENAME) &&
339             dp->de_refcnt > 0) {
340                 /*
341                  * Access for write is interpreted as allowing
342                  * creation of files in the directory.
343                  */
344                 error = VOP_EACCESS(vdp, VWRITE, cnp->cn_cred);
345                 if (error)
346                         return (error);
347                 /*
348                  * Return an indication of where the new directory
349                  * entry should be put.
350                  */
351                 dp->de_fndoffset = slotoffset;
352                 dp->de_fndcnt = wincnt - 1;
353
354                 /*
355                  * We return with the directory locked, so that
356                  * the parameters we set up above will still be
357                  * valid if we actually decide to do a direnter().
358                  * We return ni_vp == NULL to indicate that the entry
359                  * does not currently exist; we leave a pointer to
360                  * the (locked) directory inode in ndp->ni_dvp.
361                  * The pathname buffer is saved so that the name
362                  * can be obtained later.
363                  *
364                  * NB - if the directory is unlocked, then this
365                  * information cannot be used.
366                  */
367                 if (!lockparent) {
368                         vn_unlock(vdp);
369                         cnp->cn_flags |= CNP_PDIRUNLOCK;
370                 }
371                 return (EJUSTRETURN);
372         }
373         return (ENOENT);
374
375 found:
376         /*
377          * NOTE:  We still have the buffer with matched directory entry at
378          * this point.
379          */
380         isadir = dep->deAttributes & ATTR_DIRECTORY;
381         scn = getushort(dep->deStartCluster);
382         if (FAT32(pmp)) {
383                 scn |= getushort(dep->deHighClust) << 16;
384                 if (scn == pmp->pm_rootdirblk) {
385                         /*
386                          * There should actually be 0 here.
387                          * Just ignore the error.
388                          */
389                         scn = MSDOSFSROOT;
390                 }
391         }
392
393         if (isadir) {
394                 cluster = scn;
395                 if (cluster == MSDOSFSROOT)
396                         blkoff = MSDOSFSROOT_OFS;
397                 else
398                         blkoff = 0;
399         } else if (cluster == MSDOSFSROOT)
400                 blkoff = diroff;
401
402         /*
403          * Now release buf to allow deget to read the entry again.
404          * Reserving it here and giving it to deget could result
405          * in a deadlock.
406          */
407         brelse(bp);
408         bp = NULL;
409
410 foundroot:
411         /*
412          * If we entered at foundroot, then we are looking for the . or ..
413          * entry of the filesystems root directory.  isadir and scn were
414          * setup before jumping here.  And, bp is already null.
415          */
416         if (FAT32(pmp) && scn == MSDOSFSROOT)
417                 scn = pmp->pm_rootdirblk;
418
419         /*
420          * If deleting, and at end of pathname, return
421          * parameters which can be used to remove file.
422          * If the wantparent flag isn't set, we return only
423          * the directory (in ndp->ni_dvp), otherwise we go
424          * on and lock the inode, being careful with ".".
425          */
426         if (nameiop == NAMEI_DELETE) {
427                 /*
428                  * Don't allow deleting the root.
429                  */
430                 if (blkoff == MSDOSFSROOT_OFS)
431                         return EROFS;   /* really? XXX */
432
433                 /*
434                  * Write access to directory required to delete files.
435                  */
436                 error = VOP_EACCESS(vdp, VWRITE, cnp->cn_cred);
437                 if (error)
438                         return (error);
439
440                 /*
441                  * Return pointer to current entry in dp->i_offset.
442                  * Save directory inode pointer in ndp->ni_dvp for dirremove().
443                  */
444                 if (dp->de_StartCluster == scn && isadir) {     /* "." */
445                         vref(vdp);
446                         *vpp = vdp;
447                         return (0);
448                 }
449                 error = deget(pmp, cluster, blkoff, &tdp);
450                 if (error)
451                         return (error);
452                 *vpp = DETOV(tdp);
453                 if (!lockparent) {
454                         vn_unlock(vdp);
455                         cnp->cn_flags |= CNP_PDIRUNLOCK;
456                 }
457                 return (0);
458         }
459
460         /*
461          * If rewriting (RENAME), return the inode and the
462          * information required to rewrite the present directory
463          * Must get inode of directory entry to verify it's a
464          * regular file, or empty directory.
465          */
466         if (nameiop == NAMEI_RENAME && wantparent) {
467                 if (blkoff == MSDOSFSROOT_OFS)
468                         return EROFS;                   /* really? XXX */
469
470                 error = VOP_EACCESS(vdp, VWRITE, cnp->cn_cred);
471                 if (error)
472                         return (error);
473
474                 /*
475                  * Careful about locking second inode.
476                  * This can only occur if the target is ".".
477                  */
478                 if (dp->de_StartCluster == scn && isadir)
479                         return (EISDIR);
480
481                 if ((error = deget(pmp, cluster, blkoff, &tdp)) != 0)
482                         return (error);
483                 *vpp = DETOV(tdp);
484                 if (!lockparent) {
485                         vn_unlock(vdp);
486                         cnp->cn_flags |= CNP_PDIRUNLOCK;
487                 }
488                 return (0);
489         }
490
491         /*
492          * Step through the translation in the name.  We do not `vput' the
493          * directory because we may need it again if a symbolic link
494          * is relative to the current directory.  Instead we save it
495          * unlocked as "pdp".  We must get the target inode before unlocking
496          * the directory to insure that the inode will not be removed
497          * before we get it.  We prevent deadlock by always fetching
498          * inodes from the root, moving down the directory tree. Thus
499          * when following backward pointers ".." we must unlock the
500          * parent directory before getting the requested directory.
501          * There is a potential race condition here if both the current
502          * and parent directories are removed before the VFS_VGET for the
503          * inode associated with ".." returns.  We hope that this occurs
504          * infrequently since we cannot avoid this race condition without
505          * implementing a sophisticated deadlock detection algorithm.
506          * Note also that this simple deadlock detection scheme will not
507          * work if the file system has any hard links other than ".."
508          * that point backwards in the directory structure.
509          */
510         pdp = vdp;
511         if (flags & CNP_ISDOTDOT) {
512                 vn_unlock(pdp);
513                 cnp->cn_flags |= CNP_PDIRUNLOCK;
514                 error = deget(pmp, cluster, blkoff,  &tdp);
515                 if (error) {
516                         vn_lock(pdp, LK_EXCLUSIVE | LK_RETRY);
517                         cnp->cn_flags &= ~CNP_PDIRUNLOCK;
518                         return (error);
519                 }
520                 if (lockparent) {
521                         error = vn_lock(pdp, LK_EXCLUSIVE | LK_FAILRECLAIM);
522                         if (error) {
523                                 vput(DETOV(tdp));
524                                 return (error);
525                         }
526                         cnp->cn_flags &= ~CNP_PDIRUNLOCK;
527                 }
528                 *vpp = DETOV(tdp);
529         } else if (dp->de_StartCluster == scn && isadir) {
530                 vref(vdp);      /* we want ourself, ie "." */
531                 *vpp = vdp;
532         } else {
533                 if ((error = deget(pmp, cluster, blkoff, &tdp)) != 0)
534                         return (error);
535                 if (!lockparent) {
536                         vn_unlock(pdp);
537                         cnp->cn_flags |= CNP_PDIRUNLOCK;
538                 }
539                 *vpp = DETOV(tdp);
540         }
541         return (0);
542 }
543
544 /*
545  * dep  - directory entry to copy into the directory
546  * ddep - directory to add to
547  * depp - return the address of the denode for the created directory entry
548  *        if depp != 0
549  * cnp  - componentname needed for Win95 long filenames
550  */
551 int
552 createde(struct denode *dep, struct denode *ddep, struct denode **depp,
553          struct componentname *cnp)
554 {
555         int error;
556         u_long dirclust, diroffset;
557         struct direntry *ndep;
558         struct msdosfsmount *pmp = ddep->de_pmp;
559         struct buf *bp;
560         daddr_t bn;
561         int blsize;
562
563 #ifdef MSDOSFS_DEBUG
564         kprintf("createde(dep %p, ddep %p, depp %p, cnp %p)\n",
565             dep, ddep, depp, cnp);
566 #endif
567
568         /*
569          * If no space left in the directory then allocate another cluster
570          * and chain it onto the end of the file.  There is one exception
571          * to this.  That is, if the root directory has no more space it
572          * can NOT be expanded.  extendfile() checks for and fails attempts
573          * to extend the root directory.  We just return an error in that
574          * case.
575          */
576         if (ddep->de_fndoffset >= ddep->de_FileSize) {
577                 diroffset = ddep->de_fndoffset + sizeof(struct direntry)
578                     - ddep->de_FileSize;
579                 dirclust = de_clcount(pmp, diroffset);
580                 error = extendfile(ddep, dirclust, 0, 0, DE_CLEAR);
581                 if (error) {
582                         detrunc(ddep, ddep->de_FileSize, 0);
583                         return error;
584                 }
585
586                 /*
587                  * Update the size of the directory
588                  */
589                 ddep->de_FileSize += de_cn2off(pmp, dirclust);
590         }
591
592         /*
593          * We just read in the cluster with space.  Copy the new directory
594          * entry in.  Then write it to disk. NOTE:  DOS directories
595          * do not get smaller as clusters are emptied.
596          */
597         error = pcbmap(ddep, de_cluster(pmp, ddep->de_fndoffset),
598                        &bn, &dirclust, &blsize);
599         if (error)
600                 return error;
601         diroffset = ddep->de_fndoffset;
602         if (dirclust != MSDOSFSROOT)
603                 diroffset &= pmp->pm_crbomask;
604         if ((error = bread(pmp->pm_devvp, de_bntodoff(pmp, bn), blsize, &bp)) != 0) {
605                 brelse(bp);
606                 return error;
607         }
608         ndep = bptoep(pmp, bp, ddep->de_fndoffset);
609
610         DE_EXTERNALIZE(ndep, dep);
611
612         /*
613          * Now write the Win95 long name
614          */
615         if (ddep->de_fndcnt > 0) {
616                 u_int8_t chksum = winChksum(ndep->deName);
617                 const u_char *un = (const u_char *)cnp->cn_nameptr;
618                 int unlen = cnp->cn_namelen;
619                 int cnt = 1;
620
621                 while (--ddep->de_fndcnt >= 0) {
622                         if (!(ddep->de_fndoffset & pmp->pm_crbomask)) {
623                                 if ((error = bwrite(bp)) != 0)
624                                         return error;
625
626                                 ddep->de_fndoffset -= sizeof(struct direntry);
627                                 error = pcbmap(ddep,
628                                                de_cluster(pmp,
629                                                           ddep->de_fndoffset),
630                                                &bn, NULL, &blsize);
631                                 if (error)
632                                         return error;
633
634                                 error = bread(pmp->pm_devvp,
635                                               de_bntodoff(pmp, bn), blsize,
636                                               &bp);
637                                 if (error) {
638                                         brelse(bp);
639                                         return error;
640                                 }
641                                 ndep = bptoep(pmp, bp, ddep->de_fndoffset);
642                         } else {
643                                 ndep--;
644                                 ddep->de_fndoffset -= sizeof(struct direntry);
645                         }
646                         if (!unix2winfn(un, unlen, (struct winentry *)ndep,
647                                         cnt++, chksum,
648                                         pmp))
649                                 break;
650                 }
651         }
652
653         if ((error = bwrite(bp)) != 0)
654                 return error;
655
656         /*
657          * If they want us to return with the denode gotten.
658          */
659         if (depp) {
660                 if (dep->de_Attributes & ATTR_DIRECTORY) {
661                         dirclust = dep->de_StartCluster;
662                         if (FAT32(pmp) && dirclust == pmp->pm_rootdirblk)
663                                 dirclust = MSDOSFSROOT;
664                         if (dirclust == MSDOSFSROOT)
665                                 diroffset = MSDOSFSROOT_OFS;
666                         else
667                                 diroffset = 0;
668                 }
669                 return deget(pmp, dirclust, diroffset, depp);
670         }
671
672         return 0;
673 }
674
675 /*
676  * Be sure a directory is empty except for "." and "..". Return 1 if empty,
677  * return 0 if not empty or error.
678  */
679 int
680 dosdirempty(struct denode *dep)
681 {
682         int blsize;
683         int error;
684         u_long cn;
685         daddr_t bn;
686         struct buf *bp;
687         struct msdosfsmount *pmp = dep->de_pmp;
688         struct direntry *dentp;
689
690         /*
691          * Since the filesize field in directory entries for a directory is
692          * zero, we just have to feel our way through the directory until
693          * we hit end of file.
694          */
695         for (cn = 0;; cn++) {
696                 if ((error = pcbmap(dep, cn, &bn, NULL, &blsize)) != 0) {
697                         if (error == E2BIG)
698                                 return (1);     /* it's empty */
699                         return (0);
700                 }
701                 error = bread(pmp->pm_devvp, de_bntodoff(pmp, bn), blsize, &bp);
702                 if (error) {
703                         brelse(bp);
704                         return (0);
705                 }
706                 for (dentp = (struct direntry *)bp->b_data;
707                      (char *)dentp < bp->b_data + blsize;
708                      dentp++) {
709                         if (dentp->deName[0] != SLOT_DELETED &&
710                             (dentp->deAttributes & ATTR_VOLUME) == 0) {
711                                 /*
712                                  * In dos directories an entry whose name
713                                  * starts with SLOT_EMPTY (0) starts the
714                                  * beginning of the unused part of the
715                                  * directory, so we can just return that it
716                                  * is empty.
717                                  */
718                                 if (dentp->deName[0] == SLOT_EMPTY) {
719                                         brelse(bp);
720                                         return (1);
721                                 }
722                                 /*
723                                  * Any names other than "." and ".." in a
724                                  * directory mean it is not empty.
725                                  */
726                                 if (bcmp(dentp->deName, ".          ", 11) &&
727                                     bcmp(dentp->deName, "..         ", 11)) {
728                                         brelse(bp);
729 #ifdef MSDOSFS_DEBUG
730                                         kprintf("dosdirempty(): entry found %02x, %02x\n",
731                                             dentp->deName[0], dentp->deName[1]);
732 #endif
733                                         return (0);     /* not empty */
734                                 }
735                         }
736                 }
737                 brelse(bp);
738         }
739         /* NOTREACHED */
740 }
741
742 /*
743  * Check to see if the directory described by target is in some
744  * subdirectory of source.  This prevents something like the following from
745  * succeeding and leaving a bunch or files and directories orphaned. mv
746  * /a/b/c /a/b/c/d/e/f Where c and f are directories.
747  *
748  * source - the inode for /a/b/c
749  * target - the inode for /a/b/c/d/e/f
750  *
751  * Returns 0 if target is NOT a subdirectory of source.
752  * Otherwise returns a non-zero error number.
753  * The target inode is always unlocked on return.
754  */
755 int
756 doscheckpath(struct denode *source, struct denode *target)
757 {
758         daddr_t scn;
759         struct msdosfsmount *pmp;
760         struct direntry *ep;
761         struct denode *dep;
762         struct buf *bp = NULL;
763         int error = 0;
764
765         dep = target;
766         if ((target->de_Attributes & ATTR_DIRECTORY) == 0 ||
767             (source->de_Attributes & ATTR_DIRECTORY) == 0) {
768                 error = ENOTDIR;
769                 goto out;
770         }
771         if (dep->de_StartCluster == source->de_StartCluster) {
772                 error = EEXIST;
773                 goto out;
774         }
775         if (dep->de_StartCluster == MSDOSFSROOT)
776                 goto out;
777         pmp = dep->de_pmp;
778 #ifdef  DIAGNOSTIC
779         if (pmp != source->de_pmp)
780                 panic("doscheckpath: source and target on different filesystems");
781 #endif
782         if (FAT32(pmp) && dep->de_StartCluster == pmp->pm_rootdirblk)
783                 goto out;
784
785         for (;;) {
786                 if ((dep->de_Attributes & ATTR_DIRECTORY) == 0) {
787                         error = ENOTDIR;
788                         break;
789                 }
790                 scn = dep->de_StartCluster;
791                 error = bread(pmp->pm_devvp, xcntodoff(pmp, scn),
792                               pmp->pm_bpcluster, &bp);
793                 if (error)
794                         break;
795
796                 ep = (struct direntry *) bp->b_data + 1;
797                 if ((ep->deAttributes & ATTR_DIRECTORY) == 0 ||
798                     bcmp(ep->deName, "..         ", 11) != 0) {
799                         error = ENOTDIR;
800                         break;
801                 }
802                 scn = getushort(ep->deStartCluster);
803                 if (FAT32(pmp))
804                         scn |= getushort(ep->deHighClust) << 16;
805
806                 if (scn == source->de_StartCluster) {
807                         error = EINVAL;
808                         break;
809                 }
810                 if (scn == MSDOSFSROOT)
811                         break;
812                 if (FAT32(pmp) && scn == pmp->pm_rootdirblk) {
813                         /*
814                          * scn should be 0 in this case,
815                          * but we silently ignore the error.
816                          */
817                         break;
818                 }
819
820                 vput(DETOV(dep));
821                 brelse(bp);
822                 bp = NULL;
823                 /* NOTE: deget() clears dep on error */
824                 if ((error = deget(pmp, scn, 0, &dep)) != 0)
825                         break;
826         }
827 out:;
828         if (bp)
829                 brelse(bp);
830         if (error == ENOTDIR)
831                 kprintf("doscheckpath(): .. not a directory?\n");
832         if (dep != NULL)
833                 vput(DETOV(dep));
834         return (error);
835 }
836
837 /*
838  * Read in the disk block containing the directory entry (dirclu, dirofs)
839  * and return the address of the buf header, and the address of the
840  * directory entry within the block.
841  */
842 int
843 readep(struct msdosfsmount *pmp, u_long dirclust, u_long diroffset,
844        struct buf **bpp, struct direntry **epp)
845 {
846         int error;
847         daddr_t bn;
848         int blsize;
849
850         blsize = pmp->pm_bpcluster;
851         if (dirclust == MSDOSFSROOT
852             && de_blk(pmp, diroffset + blsize) > pmp->pm_rootdirsize)
853                 blsize = de_bn2off(pmp, pmp->pm_rootdirsize) & pmp->pm_crbomask;
854         bn = detobn(pmp, dirclust, diroffset);
855         if ((error = bread(pmp->pm_devvp, de_bntodoff(pmp, bn), blsize, bpp)) != 0) {
856                 brelse(*bpp);
857                 *bpp = NULL;
858                 return (error);
859         }
860         if (epp)
861                 *epp = bptoep(pmp, *bpp, diroffset);
862         return (0);
863 }
864
865 /*
866  * Read in the disk block containing the directory entry dep came from and
867  * return the address of the buf header, and the address of the directory
868  * entry within the block.
869  */
870 int
871 readde(struct denode *dep, struct buf **bpp, struct direntry **epp)
872 {
873         return (readep(dep->de_pmp, dep->de_dirclust, dep->de_diroffset,
874             bpp, epp));
875 }
876
877 /*
878  * Remove a directory entry. At this point the file represented by the
879  * directory entry to be removed is still full length until noone has it
880  * open.  When the file no longer being used msdosfs_inactive() is called
881  * and will truncate the file to 0 length.  When the vnode containing the
882  * denode is needed for some other purpose by VFS it will call
883  * msdosfs_reclaim() which will remove the denode from the denode cache.
884  */
885 int
886 removede(struct denode *pdep,   /* directory where the entry is removed */
887          struct denode *dep)    /* file to be removed */
888 {
889         int error;
890         struct direntry *ep;
891         struct buf *bp;
892         daddr_t bn;
893         int blsize;
894         struct msdosfsmount *pmp = pdep->de_pmp;
895         u_long offset = pdep->de_fndoffset;
896
897 #ifdef MSDOSFS_DEBUG
898         kprintf("removede(): filename %s, dep %p, offset %08lx\n",
899             dep->de_Name, dep, offset);
900 #endif
901
902         KKASSERT(dep->de_refcnt > 0);
903         dep->de_refcnt--;
904         offset += sizeof(struct direntry);
905         do {
906                 offset -= sizeof(struct direntry);
907                 error = pcbmap(pdep, de_cluster(pmp, offset),
908                                &bn, NULL, &blsize);
909                 if (error)
910                         return error;
911                 error = bread(pmp->pm_devvp, de_bntodoff(pmp, bn), blsize, &bp);
912                 if (error) {
913                         brelse(bp);
914                         return error;
915                 }
916                 ep = bptoep(pmp, bp, offset);
917                 /*
918                  * Check whether, if we came here the second time, i.e.
919                  * when underflowing into the previous block, the last
920                  * entry in this block is a longfilename entry, too.
921                  */
922                 if (ep->deAttributes != ATTR_WIN95
923                     && offset != pdep->de_fndoffset) {
924                         brelse(bp);
925                         break;
926                 }
927                 offset += sizeof(struct direntry);
928                 while (1) {
929                         /*
930                          * We are a bit agressive here in that we delete any Win95
931                          * entries preceding this entry, not just the ones we "own".
932                          * Since these presumably aren't valid anyway,
933                          * there should be no harm.
934                          */
935                         offset -= sizeof(struct direntry);
936                         ep--->deName[0] = SLOT_DELETED;
937                         if ((pmp->pm_flags & MSDOSFSMNT_NOWIN95)
938                             || !(offset & pmp->pm_crbomask)
939                             || ep->deAttributes != ATTR_WIN95)
940                                 break;
941                 }
942                 if ((error = bwrite(bp)) != 0)
943                         return error;
944         } while (!(pmp->pm_flags & MSDOSFSMNT_NOWIN95)
945             && !(offset & pmp->pm_crbomask)
946             && offset);
947         return 0;
948 }
949
950 /*
951  * Create a unique DOS name in dvp
952  */
953 int
954 uniqdosname(struct denode *dep, struct componentname *cnp, u_char *cp)
955 {
956         struct msdosfsmount *pmp = dep->de_pmp;
957         struct direntry *dentp;
958         int gen;
959         int blsize;
960         u_long cn;
961         daddr_t bn;
962         struct buf *bp;
963         int error;
964
965         if (pmp->pm_flags & MSDOSFSMNT_SHORTNAME)
966                 return (unix2dosfn((const u_char *)cnp->cn_nameptr, cp,
967                     cnp->cn_namelen, 0, pmp) ?
968                     0 : EINVAL);
969
970         for (gen = 1;; gen++) {
971                 /*
972                  * Generate DOS name with generation number
973                  */
974                 if (!unix2dosfn((const u_char *)cnp->cn_nameptr, cp,
975                     cnp->cn_namelen, gen, pmp))
976                         return gen == 1 ? EINVAL : EEXIST;
977
978                 /*
979                  * Now look for a dir entry with this exact name
980                  */
981                 for (cn = error = 0; !error; cn++) {
982                         if ((error = pcbmap(dep, cn, &bn, 0, &blsize)) != 0) {
983                                 if (error == E2BIG)     /* EOF reached and not found */
984                                         return 0;
985                                 return error;
986                         }
987                         error = bread(pmp->pm_devvp, de_bntodoff(pmp, bn),
988                                       blsize, &bp);
989                         if (error) {
990                                 brelse(bp);
991                                 return error;
992                         }
993                         for (dentp = (struct direntry *)bp->b_data;
994                              (char *)dentp < bp->b_data + blsize;
995                              dentp++) {
996                                 if (dentp->deName[0] == SLOT_EMPTY) {
997                                         /*
998                                          * Last used entry and not found
999                                          */
1000                                         brelse(bp);
1001                                         return 0;
1002                                 }
1003                                 /*
1004                                  * Ignore volume labels and Win95 entries
1005                                  */
1006                                 if (dentp->deAttributes & ATTR_VOLUME)
1007                                         continue;
1008                                 if (!bcmp(dentp->deName, cp, 11)) {
1009                                         error = EEXIST;
1010                                         break;
1011                                 }
1012                         }
1013                         brelse(bp);
1014                 }
1015         }
1016 }
1017
1018 /*
1019  * Find any Win'95 long filename entry in directory dep
1020  */
1021 int
1022 findwin95(struct denode *dep)
1023 {
1024         struct msdosfsmount *pmp = dep->de_pmp;
1025         struct direntry *dentp;
1026         int blsize, win95;
1027         u_long cn;
1028         daddr_t bn;
1029         struct buf *bp;
1030
1031         win95 = 1;
1032         /*
1033          * Read through the directory looking for Win'95 entries
1034          * Note: Error currently handled just as EOF XXX
1035          */
1036         for (cn = 0;; cn++) {
1037                 if (pcbmap(dep, cn, &bn, 0, &blsize))
1038                         return (win95);
1039                 if (bread(pmp->pm_devvp, de_bntodoff(pmp, bn), blsize, &bp)) {
1040                         brelse(bp);
1041                         return (win95);
1042                 }
1043                 for (dentp = (struct direntry *)bp->b_data;
1044                      (char *)dentp < bp->b_data + blsize;
1045                      dentp++) {
1046                         if (dentp->deName[0] == SLOT_EMPTY) {
1047                                 /*
1048                                  * Last used entry and not found
1049                                  */
1050                                 brelse(bp);
1051                                 return (win95);
1052                         }
1053                         if (dentp->deName[0] == SLOT_DELETED) {
1054                                 /*
1055                                  * Ignore deleted files
1056                                  * Note: might be an indication of Win'95 anyway XXX
1057                                  */
1058                                 continue;
1059                         }
1060                         if (dentp->deAttributes == ATTR_WIN95) {
1061                                 brelse(bp);
1062                                 return 1;
1063                         }
1064                         win95 = 0;
1065                 }
1066                 brelse(bp);
1067         }
1068 }