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