vfat: deduplicate hex2bin()
[sfrench/cifs-2.6.git] / fs / fat / namei_vfat.c
1 /*
2  *  linux/fs/vfat/namei.c
3  *
4  *  Written 1992,1993 by Werner Almesberger
5  *
6  *  Windows95/Windows NT compatible extended MSDOS filesystem
7  *    by Gordon Chaffee Copyright (C) 1995.  Send bug reports for the
8  *    VFAT filesystem to <chaffee@cs.berkeley.edu>.  Specify
9  *    what file operation caused you trouble and if you can duplicate
10  *    the problem, send a script that demonstrates it.
11  *
12  *  Short name translation 1999, 2001 by Wolfram Pienkoss <wp@bszh.de>
13  *
14  *  Support Multibyte characters and cleanup by
15  *                              OGAWA Hirofumi <hirofumi@mail.parknet.co.jp>
16  */
17
18 #include <linux/module.h>
19 #include <linux/ctype.h>
20 #include <linux/slab.h>
21 #include <linux/namei.h>
22 #include <linux/kernel.h>
23
24 #include "fat.h"
25
26 static inline unsigned long vfat_d_version(struct dentry *dentry)
27 {
28         return (unsigned long) dentry->d_fsdata;
29 }
30
31 static inline void vfat_d_version_set(struct dentry *dentry,
32                                       unsigned long version)
33 {
34         dentry->d_fsdata = (void *) version;
35 }
36
37 /*
38  * If new entry was created in the parent, it could create the 8.3
39  * alias (the shortname of logname).  So, the parent may have the
40  * negative-dentry which matches the created 8.3 alias.
41  *
42  * If it happened, the negative dentry isn't actually negative
43  * anymore.  So, drop it.
44  */
45 static int vfat_revalidate_shortname(struct dentry *dentry)
46 {
47         int ret = 1;
48         spin_lock(&dentry->d_lock);
49         if (vfat_d_version(dentry) != d_inode(dentry->d_parent)->i_version)
50                 ret = 0;
51         spin_unlock(&dentry->d_lock);
52         return ret;
53 }
54
55 static int vfat_revalidate(struct dentry *dentry, unsigned int flags)
56 {
57         if (flags & LOOKUP_RCU)
58                 return -ECHILD;
59
60         /* This is not negative dentry. Always valid. */
61         if (d_really_is_positive(dentry))
62                 return 1;
63         return vfat_revalidate_shortname(dentry);
64 }
65
66 static int vfat_revalidate_ci(struct dentry *dentry, unsigned int flags)
67 {
68         if (flags & LOOKUP_RCU)
69                 return -ECHILD;
70
71         /*
72          * This is not negative dentry. Always valid.
73          *
74          * Note, rename() to existing directory entry will have ->d_inode,
75          * and will use existing name which isn't specified name by user.
76          *
77          * We may be able to drop this positive dentry here. But dropping
78          * positive dentry isn't good idea. So it's unsupported like
79          * rename("filename", "FILENAME") for now.
80          */
81         if (d_really_is_positive(dentry))
82                 return 1;
83
84         /*
85          * This may be nfsd (or something), anyway, we can't see the
86          * intent of this. So, since this can be for creation, drop it.
87          */
88         if (!flags)
89                 return 0;
90
91         /*
92          * Drop the negative dentry, in order to make sure to use the
93          * case sensitive name which is specified by user if this is
94          * for creation.
95          */
96         if (flags & (LOOKUP_CREATE | LOOKUP_RENAME_TARGET))
97                 return 0;
98
99         return vfat_revalidate_shortname(dentry);
100 }
101
102 /* returns the length of a struct qstr, ignoring trailing dots */
103 static unsigned int __vfat_striptail_len(unsigned int len, const char *name)
104 {
105         while (len && name[len - 1] == '.')
106                 len--;
107         return len;
108 }
109
110 static unsigned int vfat_striptail_len(const struct qstr *qstr)
111 {
112         return __vfat_striptail_len(qstr->len, qstr->name);
113 }
114
115 /*
116  * Compute the hash for the vfat name corresponding to the dentry.
117  * Note: if the name is invalid, we leave the hash code unchanged so
118  * that the existing dentry can be used. The vfat fs routines will
119  * return ENOENT or EINVAL as appropriate.
120  */
121 static int vfat_hash(const struct dentry *dentry, struct qstr *qstr)
122 {
123         qstr->hash = full_name_hash(dentry, qstr->name, vfat_striptail_len(qstr));
124         return 0;
125 }
126
127 /*
128  * Compute the hash for the vfat name corresponding to the dentry.
129  * Note: if the name is invalid, we leave the hash code unchanged so
130  * that the existing dentry can be used. The vfat fs routines will
131  * return ENOENT or EINVAL as appropriate.
132  */
133 static int vfat_hashi(const struct dentry *dentry, struct qstr *qstr)
134 {
135         struct nls_table *t = MSDOS_SB(dentry->d_sb)->nls_io;
136         const unsigned char *name;
137         unsigned int len;
138         unsigned long hash;
139
140         name = qstr->name;
141         len = vfat_striptail_len(qstr);
142
143         hash = init_name_hash(dentry);
144         while (len--)
145                 hash = partial_name_hash(nls_tolower(t, *name++), hash);
146         qstr->hash = end_name_hash(hash);
147
148         return 0;
149 }
150
151 /*
152  * Case insensitive compare of two vfat names.
153  */
154 static int vfat_cmpi(const struct dentry *dentry,
155                 unsigned int len, const char *str, const struct qstr *name)
156 {
157         struct nls_table *t = MSDOS_SB(dentry->d_sb)->nls_io;
158         unsigned int alen, blen;
159
160         /* A filename cannot end in '.' or we treat it like it has none */
161         alen = vfat_striptail_len(name);
162         blen = __vfat_striptail_len(len, str);
163         if (alen == blen) {
164                 if (nls_strnicmp(t, name->name, str, alen) == 0)
165                         return 0;
166         }
167         return 1;
168 }
169
170 /*
171  * Case sensitive compare of two vfat names.
172  */
173 static int vfat_cmp(const struct dentry *dentry,
174                 unsigned int len, const char *str, const struct qstr *name)
175 {
176         unsigned int alen, blen;
177
178         /* A filename cannot end in '.' or we treat it like it has none */
179         alen = vfat_striptail_len(name);
180         blen = __vfat_striptail_len(len, str);
181         if (alen == blen) {
182                 if (strncmp(name->name, str, alen) == 0)
183                         return 0;
184         }
185         return 1;
186 }
187
188 static const struct dentry_operations vfat_ci_dentry_ops = {
189         .d_revalidate   = vfat_revalidate_ci,
190         .d_hash         = vfat_hashi,
191         .d_compare      = vfat_cmpi,
192 };
193
194 static const struct dentry_operations vfat_dentry_ops = {
195         .d_revalidate   = vfat_revalidate,
196         .d_hash         = vfat_hash,
197         .d_compare      = vfat_cmp,
198 };
199
200 /* Characters that are undesirable in an MS-DOS file name */
201
202 static inline wchar_t vfat_bad_char(wchar_t w)
203 {
204         return (w < 0x0020)
205             || (w == '*') || (w == '?') || (w == '<') || (w == '>')
206             || (w == '|') || (w == '"') || (w == ':') || (w == '/')
207             || (w == '\\');
208 }
209
210 static inline wchar_t vfat_replace_char(wchar_t w)
211 {
212         return (w == '[') || (w == ']') || (w == ';') || (w == ',')
213             || (w == '+') || (w == '=');
214 }
215
216 static wchar_t vfat_skip_char(wchar_t w)
217 {
218         return (w == '.') || (w == ' ');
219 }
220
221 static inline int vfat_is_used_badchars(const wchar_t *s, int len)
222 {
223         int i;
224
225         for (i = 0; i < len; i++)
226                 if (vfat_bad_char(s[i]))
227                         return -EINVAL;
228
229         if (s[i - 1] == ' ') /* last character cannot be space */
230                 return -EINVAL;
231
232         return 0;
233 }
234
235 static int vfat_find_form(struct inode *dir, unsigned char *name)
236 {
237         struct fat_slot_info sinfo;
238         int err = fat_scan(dir, name, &sinfo);
239         if (err)
240                 return -ENOENT;
241         brelse(sinfo.bh);
242         return 0;
243 }
244
245 /*
246  * 1) Valid characters for the 8.3 format alias are any combination of
247  * letters, uppercase alphabets, digits, any of the
248  * following special characters:
249  *     $ % ' ` - @ { } ~ ! # ( ) & _ ^
250  * In this case Longfilename is not stored in disk.
251  *
252  * WinNT's Extension:
253  * File name and extension name is contain uppercase/lowercase
254  * only. And it is expressed by CASE_LOWER_BASE and CASE_LOWER_EXT.
255  *
256  * 2) File name is 8.3 format, but it contain the uppercase and
257  * lowercase char, muliti bytes char, etc. In this case numtail is not
258  * added, but Longfilename is stored.
259  *
260  * 3) When the one except for the above, or the following special
261  * character are contained:
262  *        .   [ ] ; , + =
263  * numtail is added, and Longfilename must be stored in disk .
264  */
265 struct shortname_info {
266         unsigned char lower:1,
267                       upper:1,
268                       valid:1;
269 };
270 #define INIT_SHORTNAME_INFO(x)  do {            \
271         (x)->lower = 1;                         \
272         (x)->upper = 1;                         \
273         (x)->valid = 1;                         \
274 } while (0)
275
276 static inline int to_shortname_char(struct nls_table *nls,
277                                     unsigned char *buf, int buf_size,
278                                     wchar_t *src, struct shortname_info *info)
279 {
280         int len;
281
282         if (vfat_skip_char(*src)) {
283                 info->valid = 0;
284                 return 0;
285         }
286         if (vfat_replace_char(*src)) {
287                 info->valid = 0;
288                 buf[0] = '_';
289                 return 1;
290         }
291
292         len = nls->uni2char(*src, buf, buf_size);
293         if (len <= 0) {
294                 info->valid = 0;
295                 buf[0] = '_';
296                 len = 1;
297         } else if (len == 1) {
298                 unsigned char prev = buf[0];
299
300                 if (buf[0] >= 0x7F) {
301                         info->lower = 0;
302                         info->upper = 0;
303                 }
304
305                 buf[0] = nls_toupper(nls, buf[0]);
306                 if (isalpha(buf[0])) {
307                         if (buf[0] == prev)
308                                 info->lower = 0;
309                         else
310                                 info->upper = 0;
311                 }
312         } else {
313                 info->lower = 0;
314                 info->upper = 0;
315         }
316
317         return len;
318 }
319
320 /*
321  * Given a valid longname, create a unique shortname.  Make sure the
322  * shortname does not exist
323  * Returns negative number on error, 0 for a normal
324  * return, and 1 for valid shortname
325  */
326 static int vfat_create_shortname(struct inode *dir, struct nls_table *nls,
327                                  wchar_t *uname, int ulen,
328                                  unsigned char *name_res, unsigned char *lcase)
329 {
330         struct fat_mount_options *opts = &MSDOS_SB(dir->i_sb)->options;
331         wchar_t *ip, *ext_start, *end, *name_start;
332         unsigned char base[9], ext[4], buf[5], *p;
333         unsigned char charbuf[NLS_MAX_CHARSET_SIZE];
334         int chl, chi;
335         int sz = 0, extlen, baselen, i, numtail_baselen, numtail2_baselen;
336         int is_shortname;
337         struct shortname_info base_info, ext_info;
338
339         is_shortname = 1;
340         INIT_SHORTNAME_INFO(&base_info);
341         INIT_SHORTNAME_INFO(&ext_info);
342
343         /* Now, we need to create a shortname from the long name */
344         ext_start = end = &uname[ulen];
345         while (--ext_start >= uname) {
346                 if (*ext_start == 0x002E) {     /* is `.' */
347                         if (ext_start == end - 1) {
348                                 sz = ulen;
349                                 ext_start = NULL;
350                         }
351                         break;
352                 }
353         }
354
355         if (ext_start == uname - 1) {
356                 sz = ulen;
357                 ext_start = NULL;
358         } else if (ext_start) {
359                 /*
360                  * Names which start with a dot could be just
361                  * an extension eg. "...test".  In this case Win95
362                  * uses the extension as the name and sets no extension.
363                  */
364                 name_start = &uname[0];
365                 while (name_start < ext_start) {
366                         if (!vfat_skip_char(*name_start))
367                                 break;
368                         name_start++;
369                 }
370                 if (name_start != ext_start) {
371                         sz = ext_start - uname;
372                         ext_start++;
373                 } else {
374                         sz = ulen;
375                         ext_start = NULL;
376                 }
377         }
378
379         numtail_baselen = 6;
380         numtail2_baselen = 2;
381         for (baselen = i = 0, p = base, ip = uname; i < sz; i++, ip++) {
382                 chl = to_shortname_char(nls, charbuf, sizeof(charbuf),
383                                         ip, &base_info);
384                 if (chl == 0)
385                         continue;
386
387                 if (baselen < 2 && (baselen + chl) > 2)
388                         numtail2_baselen = baselen;
389                 if (baselen < 6 && (baselen + chl) > 6)
390                         numtail_baselen = baselen;
391                 for (chi = 0; chi < chl; chi++) {
392                         *p++ = charbuf[chi];
393                         baselen++;
394                         if (baselen >= 8)
395                                 break;
396                 }
397                 if (baselen >= 8) {
398                         if ((chi < chl - 1) || (ip + 1) - uname < sz)
399                                 is_shortname = 0;
400                         break;
401                 }
402         }
403         if (baselen == 0) {
404                 return -EINVAL;
405         }
406
407         extlen = 0;
408         if (ext_start) {
409                 for (p = ext, ip = ext_start; extlen < 3 && ip < end; ip++) {
410                         chl = to_shortname_char(nls, charbuf, sizeof(charbuf),
411                                                 ip, &ext_info);
412                         if (chl == 0)
413                                 continue;
414
415                         if ((extlen + chl) > 3) {
416                                 is_shortname = 0;
417                                 break;
418                         }
419                         for (chi = 0; chi < chl; chi++) {
420                                 *p++ = charbuf[chi];
421                                 extlen++;
422                         }
423                         if (extlen >= 3) {
424                                 if (ip + 1 != end)
425                                         is_shortname = 0;
426                                 break;
427                         }
428                 }
429         }
430         ext[extlen] = '\0';
431         base[baselen] = '\0';
432
433         /* Yes, it can happen. ".\xe5" would do it. */
434         if (base[0] == DELETED_FLAG)
435                 base[0] = 0x05;
436
437         /* OK, at this point we know that base is not longer than 8 symbols,
438          * ext is not longer than 3, base is nonempty, both don't contain
439          * any bad symbols (lowercase transformed to uppercase).
440          */
441
442         memset(name_res, ' ', MSDOS_NAME);
443         memcpy(name_res, base, baselen);
444         memcpy(name_res + 8, ext, extlen);
445         *lcase = 0;
446         if (is_shortname && base_info.valid && ext_info.valid) {
447                 if (vfat_find_form(dir, name_res) == 0)
448                         return -EEXIST;
449
450                 if (opts->shortname & VFAT_SFN_CREATE_WIN95) {
451                         return (base_info.upper && ext_info.upper);
452                 } else if (opts->shortname & VFAT_SFN_CREATE_WINNT) {
453                         if ((base_info.upper || base_info.lower) &&
454                             (ext_info.upper || ext_info.lower)) {
455                                 if (!base_info.upper && base_info.lower)
456                                         *lcase |= CASE_LOWER_BASE;
457                                 if (!ext_info.upper && ext_info.lower)
458                                         *lcase |= CASE_LOWER_EXT;
459                                 return 1;
460                         }
461                         return 0;
462                 } else {
463                         BUG();
464                 }
465         }
466
467         if (opts->numtail == 0)
468                 if (vfat_find_form(dir, name_res) < 0)
469                         return 0;
470
471         /*
472          * Try to find a unique extension.  This used to
473          * iterate through all possibilities sequentially,
474          * but that gave extremely bad performance.  Windows
475          * only tries a few cases before using random
476          * values for part of the base.
477          */
478
479         if (baselen > 6) {
480                 baselen = numtail_baselen;
481                 name_res[7] = ' ';
482         }
483         name_res[baselen] = '~';
484         for (i = 1; i < 10; i++) {
485                 name_res[baselen + 1] = i + '0';
486                 if (vfat_find_form(dir, name_res) < 0)
487                         return 0;
488         }
489
490         i = jiffies;
491         sz = (jiffies >> 16) & 0x7;
492         if (baselen > 2) {
493                 baselen = numtail2_baselen;
494                 name_res[7] = ' ';
495         }
496         name_res[baselen + 4] = '~';
497         name_res[baselen + 5] = '1' + sz;
498         while (1) {
499                 snprintf(buf, sizeof(buf), "%04X", i & 0xffff);
500                 memcpy(&name_res[baselen], buf, 4);
501                 if (vfat_find_form(dir, name_res) < 0)
502                         break;
503                 i -= 11;
504         }
505         return 0;
506 }
507
508 /* Translate a string, including coded sequences into Unicode */
509 static int
510 xlate_to_uni(const unsigned char *name, int len, unsigned char *outname,
511              int *longlen, int *outlen, int escape, int utf8,
512              struct nls_table *nls)
513 {
514         const unsigned char *ip;
515         unsigned char *op;
516         int i, fill;
517         int charlen;
518
519         if (utf8) {
520                 *outlen = utf8s_to_utf16s(name, len, UTF16_HOST_ENDIAN,
521                                 (wchar_t *) outname, FAT_LFN_LEN + 2);
522                 if (*outlen < 0)
523                         return *outlen;
524                 else if (*outlen > FAT_LFN_LEN)
525                         return -ENAMETOOLONG;
526
527                 op = &outname[*outlen * sizeof(wchar_t)];
528         } else {
529                 for (i = 0, ip = name, op = outname, *outlen = 0;
530                          i < len && *outlen < FAT_LFN_LEN;
531                          *outlen += 1) {
532                         if (escape && (*ip == ':')) {
533                                 u8 uc[2];
534
535                                 if (i > len - 5)
536                                         return -EINVAL;
537
538                                 if (hex2bin(uc, ip + 1, 2) < 0)
539                                         return -EINVAL;
540
541                                 *(wchar_t *)op = uc[0] << 8 | uc[1];
542
543                                 op += 2;
544                                 ip += 5;
545                                 i += 5;
546                         } else {
547                                 charlen = nls->char2uni(ip, len - i,
548                                                         (wchar_t *)op);
549                                 if (charlen < 0)
550                                         return -EINVAL;
551                                 ip += charlen;
552                                 i += charlen;
553                                 op += 2;
554                         }
555                 }
556                 if (i < len)
557                         return -ENAMETOOLONG;
558         }
559
560         *longlen = *outlen;
561         if (*outlen % 13) {
562                 *op++ = 0;
563                 *op++ = 0;
564                 *outlen += 1;
565                 if (*outlen % 13) {
566                         fill = 13 - (*outlen % 13);
567                         for (i = 0; i < fill; i++) {
568                                 *op++ = 0xff;
569                                 *op++ = 0xff;
570                         }
571                         *outlen += fill;
572                 }
573         }
574
575         return 0;
576 }
577
578 static int vfat_build_slots(struct inode *dir, const unsigned char *name,
579                             int len, int is_dir, int cluster,
580                             struct timespec *ts,
581                             struct msdos_dir_slot *slots, int *nr_slots)
582 {
583         struct msdos_sb_info *sbi = MSDOS_SB(dir->i_sb);
584         struct fat_mount_options *opts = &sbi->options;
585         struct msdos_dir_slot *ps;
586         struct msdos_dir_entry *de;
587         unsigned char cksum, lcase;
588         unsigned char msdos_name[MSDOS_NAME];
589         wchar_t *uname;
590         __le16 time, date;
591         u8 time_cs;
592         int err, ulen, usize, i;
593         loff_t offset;
594
595         *nr_slots = 0;
596
597         uname = __getname();
598         if (!uname)
599                 return -ENOMEM;
600
601         err = xlate_to_uni(name, len, (unsigned char *)uname, &ulen, &usize,
602                            opts->unicode_xlate, opts->utf8, sbi->nls_io);
603         if (err)
604                 goto out_free;
605
606         err = vfat_is_used_badchars(uname, ulen);
607         if (err)
608                 goto out_free;
609
610         err = vfat_create_shortname(dir, sbi->nls_disk, uname, ulen,
611                                     msdos_name, &lcase);
612         if (err < 0)
613                 goto out_free;
614         else if (err == 1) {
615                 de = (struct msdos_dir_entry *)slots;
616                 err = 0;
617                 goto shortname;
618         }
619
620         /* build the entry of long file name */
621         cksum = fat_checksum(msdos_name);
622
623         *nr_slots = usize / 13;
624         for (ps = slots, i = *nr_slots; i > 0; i--, ps++) {
625                 ps->id = i;
626                 ps->attr = ATTR_EXT;
627                 ps->reserved = 0;
628                 ps->alias_checksum = cksum;
629                 ps->start = 0;
630                 offset = (i - 1) * 13;
631                 fatwchar_to16(ps->name0_4, uname + offset, 5);
632                 fatwchar_to16(ps->name5_10, uname + offset + 5, 6);
633                 fatwchar_to16(ps->name11_12, uname + offset + 11, 2);
634         }
635         slots[0].id |= 0x40;
636         de = (struct msdos_dir_entry *)ps;
637
638 shortname:
639         /* build the entry of 8.3 alias name */
640         (*nr_slots)++;
641         memcpy(de->name, msdos_name, MSDOS_NAME);
642         de->attr = is_dir ? ATTR_DIR : ATTR_ARCH;
643         de->lcase = lcase;
644         fat_time_unix2fat(sbi, ts, &time, &date, &time_cs);
645         de->time = de->ctime = time;
646         de->date = de->cdate = de->adate = date;
647         de->ctime_cs = time_cs;
648         fat_set_start(de, cluster);
649         de->size = 0;
650 out_free:
651         __putname(uname);
652         return err;
653 }
654
655 static int vfat_add_entry(struct inode *dir, const struct qstr *qname,
656                           int is_dir, int cluster, struct timespec *ts,
657                           struct fat_slot_info *sinfo)
658 {
659         struct msdos_dir_slot *slots;
660         unsigned int len;
661         int err, nr_slots;
662
663         len = vfat_striptail_len(qname);
664         if (len == 0)
665                 return -ENOENT;
666
667         slots = kmalloc(sizeof(*slots) * MSDOS_SLOTS, GFP_NOFS);
668         if (slots == NULL)
669                 return -ENOMEM;
670
671         err = vfat_build_slots(dir, qname->name, len, is_dir, cluster, ts,
672                                slots, &nr_slots);
673         if (err)
674                 goto cleanup;
675
676         err = fat_add_entries(dir, slots, nr_slots, sinfo);
677         if (err)
678                 goto cleanup;
679
680         /* update timestamp */
681         dir->i_ctime = dir->i_mtime = dir->i_atime = *ts;
682         if (IS_DIRSYNC(dir))
683                 (void)fat_sync_inode(dir);
684         else
685                 mark_inode_dirty(dir);
686 cleanup:
687         kfree(slots);
688         return err;
689 }
690
691 static int vfat_find(struct inode *dir, const struct qstr *qname,
692                      struct fat_slot_info *sinfo)
693 {
694         unsigned int len = vfat_striptail_len(qname);
695         if (len == 0)
696                 return -ENOENT;
697         return fat_search_long(dir, qname->name, len, sinfo);
698 }
699
700 /*
701  * (nfsd's) anonymous disconnected dentry?
702  * NOTE: !IS_ROOT() is not anonymous (I.e. d_splice_alias() did the job).
703  */
704 static int vfat_d_anon_disconn(struct dentry *dentry)
705 {
706         return IS_ROOT(dentry) && (dentry->d_flags & DCACHE_DISCONNECTED);
707 }
708
709 static struct dentry *vfat_lookup(struct inode *dir, struct dentry *dentry,
710                                   unsigned int flags)
711 {
712         struct super_block *sb = dir->i_sb;
713         struct fat_slot_info sinfo;
714         struct inode *inode;
715         struct dentry *alias;
716         int err;
717
718         mutex_lock(&MSDOS_SB(sb)->s_lock);
719
720         err = vfat_find(dir, &dentry->d_name, &sinfo);
721         if (err) {
722                 if (err == -ENOENT) {
723                         inode = NULL;
724                         goto out;
725                 }
726                 goto error;
727         }
728
729         inode = fat_build_inode(sb, sinfo.de, sinfo.i_pos);
730         brelse(sinfo.bh);
731         if (IS_ERR(inode)) {
732                 err = PTR_ERR(inode);
733                 goto error;
734         }
735
736         alias = d_find_alias(inode);
737         /*
738          * Checking "alias->d_parent == dentry->d_parent" to make sure
739          * FS is not corrupted (especially double linked dir).
740          */
741         if (alias && alias->d_parent == dentry->d_parent &&
742             !vfat_d_anon_disconn(alias)) {
743                 /*
744                  * This inode has non anonymous-DCACHE_DISCONNECTED
745                  * dentry. This means, the user did ->lookup() by an
746                  * another name (longname vs 8.3 alias of it) in past.
747                  *
748                  * Switch to new one for reason of locality if possible.
749                  */
750                 BUG_ON(d_unhashed(alias));
751                 if (!S_ISDIR(inode->i_mode))
752                         d_move(alias, dentry);
753                 iput(inode);
754                 mutex_unlock(&MSDOS_SB(sb)->s_lock);
755                 return alias;
756         } else
757                 dput(alias);
758
759 out:
760         mutex_unlock(&MSDOS_SB(sb)->s_lock);
761         if (!inode)
762                 vfat_d_version_set(dentry, dir->i_version);
763         return d_splice_alias(inode, dentry);
764 error:
765         mutex_unlock(&MSDOS_SB(sb)->s_lock);
766         return ERR_PTR(err);
767 }
768
769 static int vfat_create(struct inode *dir, struct dentry *dentry, umode_t mode,
770                        bool excl)
771 {
772         struct super_block *sb = dir->i_sb;
773         struct inode *inode;
774         struct fat_slot_info sinfo;
775         struct timespec ts;
776         int err;
777
778         mutex_lock(&MSDOS_SB(sb)->s_lock);
779
780         ts = current_time(dir);
781         err = vfat_add_entry(dir, &dentry->d_name, 0, 0, &ts, &sinfo);
782         if (err)
783                 goto out;
784         dir->i_version++;
785
786         inode = fat_build_inode(sb, sinfo.de, sinfo.i_pos);
787         brelse(sinfo.bh);
788         if (IS_ERR(inode)) {
789                 err = PTR_ERR(inode);
790                 goto out;
791         }
792         inode->i_version++;
793         inode->i_mtime = inode->i_atime = inode->i_ctime = ts;
794         /* timestamp is already written, so mark_inode_dirty() is unneeded. */
795
796         d_instantiate(dentry, inode);
797 out:
798         mutex_unlock(&MSDOS_SB(sb)->s_lock);
799         return err;
800 }
801
802 static int vfat_rmdir(struct inode *dir, struct dentry *dentry)
803 {
804         struct inode *inode = d_inode(dentry);
805         struct super_block *sb = dir->i_sb;
806         struct fat_slot_info sinfo;
807         int err;
808
809         mutex_lock(&MSDOS_SB(sb)->s_lock);
810
811         err = fat_dir_empty(inode);
812         if (err)
813                 goto out;
814         err = vfat_find(dir, &dentry->d_name, &sinfo);
815         if (err)
816                 goto out;
817
818         err = fat_remove_entries(dir, &sinfo);  /* and releases bh */
819         if (err)
820                 goto out;
821         drop_nlink(dir);
822
823         clear_nlink(inode);
824         inode->i_mtime = inode->i_atime = current_time(inode);
825         fat_detach(inode);
826         vfat_d_version_set(dentry, dir->i_version);
827 out:
828         mutex_unlock(&MSDOS_SB(sb)->s_lock);
829
830         return err;
831 }
832
833 static int vfat_unlink(struct inode *dir, struct dentry *dentry)
834 {
835         struct inode *inode = d_inode(dentry);
836         struct super_block *sb = dir->i_sb;
837         struct fat_slot_info sinfo;
838         int err;
839
840         mutex_lock(&MSDOS_SB(sb)->s_lock);
841
842         err = vfat_find(dir, &dentry->d_name, &sinfo);
843         if (err)
844                 goto out;
845
846         err = fat_remove_entries(dir, &sinfo);  /* and releases bh */
847         if (err)
848                 goto out;
849         clear_nlink(inode);
850         inode->i_mtime = inode->i_atime = current_time(inode);
851         fat_detach(inode);
852         vfat_d_version_set(dentry, dir->i_version);
853 out:
854         mutex_unlock(&MSDOS_SB(sb)->s_lock);
855
856         return err;
857 }
858
859 static int vfat_mkdir(struct inode *dir, struct dentry *dentry, umode_t mode)
860 {
861         struct super_block *sb = dir->i_sb;
862         struct inode *inode;
863         struct fat_slot_info sinfo;
864         struct timespec ts;
865         int err, cluster;
866
867         mutex_lock(&MSDOS_SB(sb)->s_lock);
868
869         ts = current_time(dir);
870         cluster = fat_alloc_new_dir(dir, &ts);
871         if (cluster < 0) {
872                 err = cluster;
873                 goto out;
874         }
875         err = vfat_add_entry(dir, &dentry->d_name, 1, cluster, &ts, &sinfo);
876         if (err)
877                 goto out_free;
878         dir->i_version++;
879         inc_nlink(dir);
880
881         inode = fat_build_inode(sb, sinfo.de, sinfo.i_pos);
882         brelse(sinfo.bh);
883         if (IS_ERR(inode)) {
884                 err = PTR_ERR(inode);
885                 /* the directory was completed, just return a error */
886                 goto out;
887         }
888         inode->i_version++;
889         set_nlink(inode, 2);
890         inode->i_mtime = inode->i_atime = inode->i_ctime = ts;
891         /* timestamp is already written, so mark_inode_dirty() is unneeded. */
892
893         d_instantiate(dentry, inode);
894
895         mutex_unlock(&MSDOS_SB(sb)->s_lock);
896         return 0;
897
898 out_free:
899         fat_free_clusters(dir, cluster);
900 out:
901         mutex_unlock(&MSDOS_SB(sb)->s_lock);
902         return err;
903 }
904
905 static int vfat_rename(struct inode *old_dir, struct dentry *old_dentry,
906                        struct inode *new_dir, struct dentry *new_dentry,
907                        unsigned int flags)
908 {
909         struct buffer_head *dotdot_bh;
910         struct msdos_dir_entry *dotdot_de;
911         struct inode *old_inode, *new_inode;
912         struct fat_slot_info old_sinfo, sinfo;
913         struct timespec ts;
914         loff_t new_i_pos;
915         int err, is_dir, update_dotdot, corrupt = 0;
916         struct super_block *sb = old_dir->i_sb;
917
918         if (flags & ~RENAME_NOREPLACE)
919                 return -EINVAL;
920
921         old_sinfo.bh = sinfo.bh = dotdot_bh = NULL;
922         old_inode = d_inode(old_dentry);
923         new_inode = d_inode(new_dentry);
924         mutex_lock(&MSDOS_SB(sb)->s_lock);
925         err = vfat_find(old_dir, &old_dentry->d_name, &old_sinfo);
926         if (err)
927                 goto out;
928
929         is_dir = S_ISDIR(old_inode->i_mode);
930         update_dotdot = (is_dir && old_dir != new_dir);
931         if (update_dotdot) {
932                 if (fat_get_dotdot_entry(old_inode, &dotdot_bh, &dotdot_de)) {
933                         err = -EIO;
934                         goto out;
935                 }
936         }
937
938         ts = current_time(old_dir);
939         if (new_inode) {
940                 if (is_dir) {
941                         err = fat_dir_empty(new_inode);
942                         if (err)
943                                 goto out;
944                 }
945                 new_i_pos = MSDOS_I(new_inode)->i_pos;
946                 fat_detach(new_inode);
947         } else {
948                 err = vfat_add_entry(new_dir, &new_dentry->d_name, is_dir, 0,
949                                      &ts, &sinfo);
950                 if (err)
951                         goto out;
952                 new_i_pos = sinfo.i_pos;
953         }
954         new_dir->i_version++;
955
956         fat_detach(old_inode);
957         fat_attach(old_inode, new_i_pos);
958         if (IS_DIRSYNC(new_dir)) {
959                 err = fat_sync_inode(old_inode);
960                 if (err)
961                         goto error_inode;
962         } else
963                 mark_inode_dirty(old_inode);
964
965         if (update_dotdot) {
966                 fat_set_start(dotdot_de, MSDOS_I(new_dir)->i_logstart);
967                 mark_buffer_dirty_inode(dotdot_bh, old_inode);
968                 if (IS_DIRSYNC(new_dir)) {
969                         err = sync_dirty_buffer(dotdot_bh);
970                         if (err)
971                                 goto error_dotdot;
972                 }
973                 drop_nlink(old_dir);
974                 if (!new_inode)
975                         inc_nlink(new_dir);
976         }
977
978         err = fat_remove_entries(old_dir, &old_sinfo);  /* and releases bh */
979         old_sinfo.bh = NULL;
980         if (err)
981                 goto error_dotdot;
982         old_dir->i_version++;
983         old_dir->i_ctime = old_dir->i_mtime = ts;
984         if (IS_DIRSYNC(old_dir))
985                 (void)fat_sync_inode(old_dir);
986         else
987                 mark_inode_dirty(old_dir);
988
989         if (new_inode) {
990                 drop_nlink(new_inode);
991                 if (is_dir)
992                         drop_nlink(new_inode);
993                 new_inode->i_ctime = ts;
994         }
995 out:
996         brelse(sinfo.bh);
997         brelse(dotdot_bh);
998         brelse(old_sinfo.bh);
999         mutex_unlock(&MSDOS_SB(sb)->s_lock);
1000
1001         return err;
1002
1003 error_dotdot:
1004         /* data cluster is shared, serious corruption */
1005         corrupt = 1;
1006
1007         if (update_dotdot) {
1008                 fat_set_start(dotdot_de, MSDOS_I(old_dir)->i_logstart);
1009                 mark_buffer_dirty_inode(dotdot_bh, old_inode);
1010                 corrupt |= sync_dirty_buffer(dotdot_bh);
1011         }
1012 error_inode:
1013         fat_detach(old_inode);
1014         fat_attach(old_inode, old_sinfo.i_pos);
1015         if (new_inode) {
1016                 fat_attach(new_inode, new_i_pos);
1017                 if (corrupt)
1018                         corrupt |= fat_sync_inode(new_inode);
1019         } else {
1020                 /*
1021                  * If new entry was not sharing the data cluster, it
1022                  * shouldn't be serious corruption.
1023                  */
1024                 int err2 = fat_remove_entries(new_dir, &sinfo);
1025                 if (corrupt)
1026                         corrupt |= err2;
1027                 sinfo.bh = NULL;
1028         }
1029         if (corrupt < 0) {
1030                 fat_fs_error(new_dir->i_sb,
1031                              "%s: Filesystem corrupted (i_pos %lld)",
1032                              __func__, sinfo.i_pos);
1033         }
1034         goto out;
1035 }
1036
1037 static const struct inode_operations vfat_dir_inode_operations = {
1038         .create         = vfat_create,
1039         .lookup         = vfat_lookup,
1040         .unlink         = vfat_unlink,
1041         .mkdir          = vfat_mkdir,
1042         .rmdir          = vfat_rmdir,
1043         .rename         = vfat_rename,
1044         .setattr        = fat_setattr,
1045         .getattr        = fat_getattr,
1046 };
1047
1048 static void setup(struct super_block *sb)
1049 {
1050         MSDOS_SB(sb)->dir_ops = &vfat_dir_inode_operations;
1051         if (MSDOS_SB(sb)->options.name_check != 's')
1052                 sb->s_d_op = &vfat_ci_dentry_ops;
1053         else
1054                 sb->s_d_op = &vfat_dentry_ops;
1055 }
1056
1057 static int vfat_fill_super(struct super_block *sb, void *data, int silent)
1058 {
1059         return fat_fill_super(sb, data, silent, 1, setup);
1060 }
1061
1062 static struct dentry *vfat_mount(struct file_system_type *fs_type,
1063                        int flags, const char *dev_name,
1064                        void *data)
1065 {
1066         return mount_bdev(fs_type, flags, dev_name, data, vfat_fill_super);
1067 }
1068
1069 static struct file_system_type vfat_fs_type = {
1070         .owner          = THIS_MODULE,
1071         .name           = "vfat",
1072         .mount          = vfat_mount,
1073         .kill_sb        = kill_block_super,
1074         .fs_flags       = FS_REQUIRES_DEV,
1075 };
1076 MODULE_ALIAS_FS("vfat");
1077
1078 static int __init init_vfat_fs(void)
1079 {
1080         return register_filesystem(&vfat_fs_type);
1081 }
1082
1083 static void __exit exit_vfat_fs(void)
1084 {
1085         unregister_filesystem(&vfat_fs_type);
1086 }
1087
1088 MODULE_LICENSE("GPL");
1089 MODULE_DESCRIPTION("VFAT filesystem support");
1090 MODULE_AUTHOR("Gordon Chaffee");
1091
1092 module_init(init_vfat_fs)
1093 module_exit(exit_vfat_fs)