c45a3b9b9ac7e22861b5dcd7816a884a15bb62bb
[muen/linux.git] / fs / hpfs / super.c
1 /*
2  *  linux/fs/hpfs/super.c
3  *
4  *  Mikulas Patocka (mikulas@artax.karlin.mff.cuni.cz), 1998-1999
5  *
6  *  mounting, unmounting, error handling
7  */
8
9 #include "hpfs_fn.h"
10 #include <linux/module.h>
11 #include <linux/parser.h>
12 #include <linux/init.h>
13 #include <linux/statfs.h>
14 #include <linux/magic.h>
15 #include <linux/sched.h>
16 #include <linux/bitmap.h>
17 #include <linux/slab.h>
18 #include <linux/seq_file.h>
19
20 /* Mark the filesystem dirty, so that chkdsk checks it when os/2 booted */
21
22 static void mark_dirty(struct super_block *s, int remount)
23 {
24         if (hpfs_sb(s)->sb_chkdsk && (remount || !sb_rdonly(s))) {
25                 struct buffer_head *bh;
26                 struct hpfs_spare_block *sb;
27                 if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
28                         sb->dirty = 1;
29                         sb->old_wrote = 0;
30                         mark_buffer_dirty(bh);
31                         sync_dirty_buffer(bh);
32                         brelse(bh);
33                 }
34         }
35 }
36
37 /* Mark the filesystem clean (mark it dirty for chkdsk if chkdsk==2 or if there
38    were errors) */
39
40 static void unmark_dirty(struct super_block *s)
41 {
42         struct buffer_head *bh;
43         struct hpfs_spare_block *sb;
44         if (sb_rdonly(s)) return;
45         sync_blockdev(s->s_bdev);
46         if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
47                 sb->dirty = hpfs_sb(s)->sb_chkdsk > 1 - hpfs_sb(s)->sb_was_error;
48                 sb->old_wrote = hpfs_sb(s)->sb_chkdsk >= 2 && !hpfs_sb(s)->sb_was_error;
49                 mark_buffer_dirty(bh);
50                 sync_dirty_buffer(bh);
51                 brelse(bh);
52         }
53 }
54
55 /* Filesystem error... */
56 void hpfs_error(struct super_block *s, const char *fmt, ...)
57 {
58         struct va_format vaf;
59         va_list args;
60
61         va_start(args, fmt);
62
63         vaf.fmt = fmt;
64         vaf.va = &args;
65
66         pr_err("filesystem error: %pV", &vaf);
67
68         va_end(args);
69
70         if (!hpfs_sb(s)->sb_was_error) {
71                 if (hpfs_sb(s)->sb_err == 2) {
72                         pr_cont("; crashing the system because you wanted it\n");
73                         mark_dirty(s, 0);
74                         panic("HPFS panic");
75                 } else if (hpfs_sb(s)->sb_err == 1) {
76                         if (sb_rdonly(s))
77                                 pr_cont("; already mounted read-only\n");
78                         else {
79                                 pr_cont("; remounting read-only\n");
80                                 mark_dirty(s, 0);
81                                 s->s_flags |= SB_RDONLY;
82                         }
83                 } else if (sb_rdonly(s))
84                                 pr_cont("; going on - but anything won't be destroyed because it's read-only\n");
85                 else
86                         pr_cont("; corrupted filesystem mounted read/write - your computer will explode within 20 seconds ... but you wanted it so!\n");
87         } else
88                 pr_cont("\n");
89         hpfs_sb(s)->sb_was_error = 1;
90 }
91
92 /* 
93  * A little trick to detect cycles in many hpfs structures and don't let the
94  * kernel crash on corrupted filesystem. When first called, set c2 to 0.
95  *
96  * BTW. chkdsk doesn't detect cycles correctly. When I had 2 lost directories
97  * nested each in other, chkdsk locked up happilly.
98  */
99
100 int hpfs_stop_cycles(struct super_block *s, int key, int *c1, int *c2,
101                 char *msg)
102 {
103         if (*c2 && *c1 == key) {
104                 hpfs_error(s, "cycle detected on key %08x in %s", key, msg);
105                 return 1;
106         }
107         (*c2)++;
108         if (!((*c2 - 1) & *c2)) *c1 = key;
109         return 0;
110 }
111
112 static void free_sbi(struct hpfs_sb_info *sbi)
113 {
114         kfree(sbi->sb_cp_table);
115         kfree(sbi->sb_bmp_dir);
116         kfree(sbi);
117 }
118
119 static void lazy_free_sbi(struct rcu_head *rcu)
120 {
121         free_sbi(container_of(rcu, struct hpfs_sb_info, rcu));
122 }
123
124 static void hpfs_put_super(struct super_block *s)
125 {
126         hpfs_lock(s);
127         unmark_dirty(s);
128         hpfs_unlock(s);
129         call_rcu(&hpfs_sb(s)->rcu, lazy_free_sbi);
130 }
131
132 static unsigned hpfs_count_one_bitmap(struct super_block *s, secno secno)
133 {
134         struct quad_buffer_head qbh;
135         unsigned long *bits;
136         unsigned count;
137
138         bits = hpfs_map_4sectors(s, secno, &qbh, 0);
139         if (!bits)
140                 return (unsigned)-1;
141         count = bitmap_weight(bits, 2048 * BITS_PER_BYTE);
142         hpfs_brelse4(&qbh);
143         return count;
144 }
145
146 static unsigned count_bitmaps(struct super_block *s)
147 {
148         unsigned n, count, n_bands;
149         n_bands = (hpfs_sb(s)->sb_fs_size + 0x3fff) >> 14;
150         count = 0;
151         for (n = 0; n < COUNT_RD_AHEAD; n++) {
152                 hpfs_prefetch_bitmap(s, n);
153         }
154         for (n = 0; n < n_bands; n++) {
155                 unsigned c;
156                 hpfs_prefetch_bitmap(s, n + COUNT_RD_AHEAD);
157                 c = hpfs_count_one_bitmap(s, le32_to_cpu(hpfs_sb(s)->sb_bmp_dir[n]));
158                 if (c != (unsigned)-1)
159                         count += c;
160         }
161         return count;
162 }
163
164 unsigned hpfs_get_free_dnodes(struct super_block *s)
165 {
166         struct hpfs_sb_info *sbi = hpfs_sb(s);
167         if (sbi->sb_n_free_dnodes == (unsigned)-1) {
168                 unsigned c = hpfs_count_one_bitmap(s, sbi->sb_dmap);
169                 if (c == (unsigned)-1)
170                         return 0;
171                 sbi->sb_n_free_dnodes = c;
172         }
173         return sbi->sb_n_free_dnodes;
174 }
175
176 static int hpfs_statfs(struct dentry *dentry, struct kstatfs *buf)
177 {
178         struct super_block *s = dentry->d_sb;
179         struct hpfs_sb_info *sbi = hpfs_sb(s);
180         u64 id = huge_encode_dev(s->s_bdev->bd_dev);
181
182         hpfs_lock(s);
183
184         if (sbi->sb_n_free == (unsigned)-1)
185                 sbi->sb_n_free = count_bitmaps(s);
186
187         buf->f_type = s->s_magic;
188         buf->f_bsize = 512;
189         buf->f_blocks = sbi->sb_fs_size;
190         buf->f_bfree = sbi->sb_n_free;
191         buf->f_bavail = sbi->sb_n_free;
192         buf->f_files = sbi->sb_dirband_size / 4;
193         buf->f_ffree = hpfs_get_free_dnodes(s);
194         buf->f_fsid.val[0] = (u32)id;
195         buf->f_fsid.val[1] = (u32)(id >> 32);
196         buf->f_namelen = 254;
197
198         hpfs_unlock(s);
199
200         return 0;
201 }
202
203
204 long hpfs_ioctl(struct file *file, unsigned cmd, unsigned long arg)
205 {
206         switch (cmd) {
207                 case FITRIM: {
208                         struct fstrim_range range;
209                         secno n_trimmed;
210                         int r;
211                         if (!capable(CAP_SYS_ADMIN))
212                                 return -EPERM;
213                         if (copy_from_user(&range, (struct fstrim_range __user *)arg, sizeof(range)))
214                                 return -EFAULT;
215                         r = hpfs_trim_fs(file_inode(file)->i_sb, range.start >> 9, (range.start + range.len) >> 9, (range.minlen + 511) >> 9, &n_trimmed);
216                         if (r)
217                                 return r;
218                         range.len = (u64)n_trimmed << 9;
219                         if (copy_to_user((struct fstrim_range __user *)arg, &range, sizeof(range)))
220                                 return -EFAULT;
221                         return 0;
222                 }
223                 default: {
224                         return -ENOIOCTLCMD;
225                 }
226         }
227 }
228
229
230 static struct kmem_cache * hpfs_inode_cachep;
231
232 static struct inode *hpfs_alloc_inode(struct super_block *sb)
233 {
234         struct hpfs_inode_info *ei;
235         ei = kmem_cache_alloc(hpfs_inode_cachep, GFP_NOFS);
236         if (!ei)
237                 return NULL;
238         ei->vfs_inode.i_version = 1;
239         return &ei->vfs_inode;
240 }
241
242 static void hpfs_i_callback(struct rcu_head *head)
243 {
244         struct inode *inode = container_of(head, struct inode, i_rcu);
245         kmem_cache_free(hpfs_inode_cachep, hpfs_i(inode));
246 }
247
248 static void hpfs_destroy_inode(struct inode *inode)
249 {
250         call_rcu(&inode->i_rcu, hpfs_i_callback);
251 }
252
253 static void init_once(void *foo)
254 {
255         struct hpfs_inode_info *ei = (struct hpfs_inode_info *) foo;
256
257         inode_init_once(&ei->vfs_inode);
258 }
259
260 static int init_inodecache(void)
261 {
262         hpfs_inode_cachep = kmem_cache_create("hpfs_inode_cache",
263                                              sizeof(struct hpfs_inode_info),
264                                              0, (SLAB_RECLAIM_ACCOUNT|
265                                                 SLAB_MEM_SPREAD|SLAB_ACCOUNT),
266                                              init_once);
267         if (hpfs_inode_cachep == NULL)
268                 return -ENOMEM;
269         return 0;
270 }
271
272 static void destroy_inodecache(void)
273 {
274         /*
275          * Make sure all delayed rcu free inodes are flushed before we
276          * destroy cache.
277          */
278         rcu_barrier();
279         kmem_cache_destroy(hpfs_inode_cachep);
280 }
281
282 /*
283  * A tiny parser for option strings, stolen from dosfs.
284  * Stolen again from read-only hpfs.
285  * And updated for table-driven option parsing.
286  */
287
288 enum {
289         Opt_help, Opt_uid, Opt_gid, Opt_umask, Opt_case_lower, Opt_case_asis,
290         Opt_check_none, Opt_check_normal, Opt_check_strict,
291         Opt_err_cont, Opt_err_ro, Opt_err_panic,
292         Opt_eas_no, Opt_eas_ro, Opt_eas_rw,
293         Opt_chkdsk_no, Opt_chkdsk_errors, Opt_chkdsk_always,
294         Opt_timeshift, Opt_err,
295 };
296
297 static const match_table_t tokens = {
298         {Opt_help, "help"},
299         {Opt_uid, "uid=%u"},
300         {Opt_gid, "gid=%u"},
301         {Opt_umask, "umask=%o"},
302         {Opt_case_lower, "case=lower"},
303         {Opt_case_asis, "case=asis"},
304         {Opt_check_none, "check=none"},
305         {Opt_check_normal, "check=normal"},
306         {Opt_check_strict, "check=strict"},
307         {Opt_err_cont, "errors=continue"},
308         {Opt_err_ro, "errors=remount-ro"},
309         {Opt_err_panic, "errors=panic"},
310         {Opt_eas_no, "eas=no"},
311         {Opt_eas_ro, "eas=ro"},
312         {Opt_eas_rw, "eas=rw"},
313         {Opt_chkdsk_no, "chkdsk=no"},
314         {Opt_chkdsk_errors, "chkdsk=errors"},
315         {Opt_chkdsk_always, "chkdsk=always"},
316         {Opt_timeshift, "timeshift=%d"},
317         {Opt_err, NULL},
318 };
319
320 static int parse_opts(char *opts, kuid_t *uid, kgid_t *gid, umode_t *umask,
321                       int *lowercase, int *eas, int *chk, int *errs,
322                       int *chkdsk, int *timeshift)
323 {
324         char *p;
325         int option;
326
327         if (!opts)
328                 return 1;
329
330         /*pr_info("Parsing opts: '%s'\n",opts);*/
331
332         while ((p = strsep(&opts, ",")) != NULL) {
333                 substring_t args[MAX_OPT_ARGS];
334                 int token;
335                 if (!*p)
336                         continue;
337
338                 token = match_token(p, tokens, args);
339                 switch (token) {
340                 case Opt_help:
341                         return 2;
342                 case Opt_uid:
343                         if (match_int(args, &option))
344                                 return 0;
345                         *uid = make_kuid(current_user_ns(), option);
346                         if (!uid_valid(*uid))
347                                 return 0;
348                         break;
349                 case Opt_gid:
350                         if (match_int(args, &option))
351                                 return 0;
352                         *gid = make_kgid(current_user_ns(), option);
353                         if (!gid_valid(*gid))
354                                 return 0;
355                         break;
356                 case Opt_umask:
357                         if (match_octal(args, &option))
358                                 return 0;
359                         *umask = option;
360                         break;
361                 case Opt_case_lower:
362                         *lowercase = 1;
363                         break;
364                 case Opt_case_asis:
365                         *lowercase = 0;
366                         break;
367                 case Opt_check_none:
368                         *chk = 0;
369                         break;
370                 case Opt_check_normal:
371                         *chk = 1;
372                         break;
373                 case Opt_check_strict:
374                         *chk = 2;
375                         break;
376                 case Opt_err_cont:
377                         *errs = 0;
378                         break;
379                 case Opt_err_ro:
380                         *errs = 1;
381                         break;
382                 case Opt_err_panic:
383                         *errs = 2;
384                         break;
385                 case Opt_eas_no:
386                         *eas = 0;
387                         break;
388                 case Opt_eas_ro:
389                         *eas = 1;
390                         break;
391                 case Opt_eas_rw:
392                         *eas = 2;
393                         break;
394                 case Opt_chkdsk_no:
395                         *chkdsk = 0;
396                         break;
397                 case Opt_chkdsk_errors:
398                         *chkdsk = 1;
399                         break;
400                 case Opt_chkdsk_always:
401                         *chkdsk = 2;
402                         break;
403                 case Opt_timeshift:
404                 {
405                         int m = 1;
406                         char *rhs = args[0].from;
407                         if (!rhs || !*rhs)
408                                 return 0;
409                         if (*rhs == '-') m = -1;
410                         if (*rhs == '+' || *rhs == '-') rhs++;
411                         *timeshift = simple_strtoul(rhs, &rhs, 0) * m;
412                         if (*rhs)
413                                 return 0;
414                         break;
415                 }
416                 default:
417                         return 0;
418                 }
419         }
420         return 1;
421 }
422
423 static inline void hpfs_help(void)
424 {
425         pr_info("\n\
426 HPFS filesystem options:\n\
427       help              do not mount and display this text\n\
428       uid=xxx           set uid of files that don't have uid specified in eas\n\
429       gid=xxx           set gid of files that don't have gid specified in eas\n\
430       umask=xxx         set mode of files that don't have mode specified in eas\n\
431       case=lower        lowercase all files\n\
432       case=asis         do not lowercase files (default)\n\
433       check=none        no fs checks - kernel may crash on corrupted filesystem\n\
434       check=normal      do some checks - it should not crash (default)\n\
435       check=strict      do extra time-consuming checks, used for debugging\n\
436       errors=continue   continue on errors\n\
437       errors=remount-ro remount read-only if errors found (default)\n\
438       errors=panic      panic on errors\n\
439       chkdsk=no         do not mark fs for chkdsking even if there were errors\n\
440       chkdsk=errors     mark fs dirty if errors found (default)\n\
441       chkdsk=always     always mark fs dirty - used for debugging\n\
442       eas=no            ignore extended attributes\n\
443       eas=ro            read but do not write extended attributes\n\
444       eas=rw            r/w eas => enables chmod, chown, mknod, ln -s (default)\n\
445       timeshift=nnn     add nnn seconds to file times\n\
446 \n");
447 }
448
449 static int hpfs_remount_fs(struct super_block *s, int *flags, char *data)
450 {
451         kuid_t uid;
452         kgid_t gid;
453         umode_t umask;
454         int lowercase, eas, chk, errs, chkdsk, timeshift;
455         int o;
456         struct hpfs_sb_info *sbi = hpfs_sb(s);
457
458         sync_filesystem(s);
459
460         *flags |= SB_NOATIME;
461
462         hpfs_lock(s);
463         uid = sbi->sb_uid; gid = sbi->sb_gid;
464         umask = 0777 & ~sbi->sb_mode;
465         lowercase = sbi->sb_lowercase;
466         eas = sbi->sb_eas; chk = sbi->sb_chk; chkdsk = sbi->sb_chkdsk;
467         errs = sbi->sb_err; timeshift = sbi->sb_timeshift;
468
469         if (!(o = parse_opts(data, &uid, &gid, &umask, &lowercase,
470             &eas, &chk, &errs, &chkdsk, &timeshift))) {
471                 pr_err("bad mount options.\n");
472                 goto out_err;
473         }
474         if (o == 2) {
475                 hpfs_help();
476                 goto out_err;
477         }
478         if (timeshift != sbi->sb_timeshift) {
479                 pr_err("timeshift can't be changed using remount.\n");
480                 goto out_err;
481         }
482
483         unmark_dirty(s);
484
485         sbi->sb_uid = uid; sbi->sb_gid = gid;
486         sbi->sb_mode = 0777 & ~umask;
487         sbi->sb_lowercase = lowercase;
488         sbi->sb_eas = eas; sbi->sb_chk = chk; sbi->sb_chkdsk = chkdsk;
489         sbi->sb_err = errs; sbi->sb_timeshift = timeshift;
490
491         if (!(*flags & SB_RDONLY)) mark_dirty(s, 1);
492
493         hpfs_unlock(s);
494         return 0;
495
496 out_err:
497         hpfs_unlock(s);
498         return -EINVAL;
499 }
500
501 static int hpfs_show_options(struct seq_file *seq, struct dentry *root)
502 {
503         struct hpfs_sb_info *sbi = hpfs_sb(root->d_sb);
504
505         seq_printf(seq, ",uid=%u", from_kuid_munged(&init_user_ns, sbi->sb_uid));
506         seq_printf(seq, ",gid=%u", from_kgid_munged(&init_user_ns, sbi->sb_gid));
507         seq_printf(seq, ",umask=%03o", (~sbi->sb_mode & 0777));
508         if (sbi->sb_lowercase)
509                 seq_printf(seq, ",case=lower");
510         if (!sbi->sb_chk)
511                 seq_printf(seq, ",check=none");
512         if (sbi->sb_chk == 2)
513                 seq_printf(seq, ",check=strict");
514         if (!sbi->sb_err)
515                 seq_printf(seq, ",errors=continue");
516         if (sbi->sb_err == 2)
517                 seq_printf(seq, ",errors=panic");
518         if (!sbi->sb_chkdsk)
519                 seq_printf(seq, ",chkdsk=no");
520         if (sbi->sb_chkdsk == 2)
521                 seq_printf(seq, ",chkdsk=always");
522         if (!sbi->sb_eas)
523                 seq_printf(seq, ",eas=no");
524         if (sbi->sb_eas == 1)
525                 seq_printf(seq, ",eas=ro");
526         if (sbi->sb_timeshift)
527                 seq_printf(seq, ",timeshift=%d", sbi->sb_timeshift);
528         return 0;
529 }
530
531 /* Super operations */
532
533 static const struct super_operations hpfs_sops =
534 {
535         .alloc_inode    = hpfs_alloc_inode,
536         .destroy_inode  = hpfs_destroy_inode,
537         .evict_inode    = hpfs_evict_inode,
538         .put_super      = hpfs_put_super,
539         .statfs         = hpfs_statfs,
540         .remount_fs     = hpfs_remount_fs,
541         .show_options   = hpfs_show_options,
542 };
543
544 static int hpfs_fill_super(struct super_block *s, void *options, int silent)
545 {
546         struct buffer_head *bh0, *bh1, *bh2;
547         struct hpfs_boot_block *bootblock;
548         struct hpfs_super_block *superblock;
549         struct hpfs_spare_block *spareblock;
550         struct hpfs_sb_info *sbi;
551         struct inode *root;
552
553         kuid_t uid;
554         kgid_t gid;
555         umode_t umask;
556         int lowercase, eas, chk, errs, chkdsk, timeshift;
557
558         dnode_secno root_dno;
559         struct hpfs_dirent *de = NULL;
560         struct quad_buffer_head qbh;
561
562         int o;
563
564         sbi = kzalloc(sizeof(*sbi), GFP_KERNEL);
565         if (!sbi) {
566                 return -ENOMEM;
567         }
568         s->s_fs_info = sbi;
569
570         mutex_init(&sbi->hpfs_mutex);
571         hpfs_lock(s);
572
573         uid = current_uid();
574         gid = current_gid();
575         umask = current_umask();
576         lowercase = 0;
577         eas = 2;
578         chk = 1;
579         errs = 1;
580         chkdsk = 1;
581         timeshift = 0;
582
583         if (!(o = parse_opts(options, &uid, &gid, &umask, &lowercase,
584             &eas, &chk, &errs, &chkdsk, &timeshift))) {
585                 pr_err("bad mount options.\n");
586                 goto bail0;
587         }
588         if (o==2) {
589                 hpfs_help();
590                 goto bail0;
591         }
592
593         /*sbi->sb_mounting = 1;*/
594         sb_set_blocksize(s, 512);
595         sbi->sb_fs_size = -1;
596         if (!(bootblock = hpfs_map_sector(s, 0, &bh0, 0))) goto bail1;
597         if (!(superblock = hpfs_map_sector(s, 16, &bh1, 1))) goto bail2;
598         if (!(spareblock = hpfs_map_sector(s, 17, &bh2, 0))) goto bail3;
599
600         /* Check magics */
601         if (/*le16_to_cpu(bootblock->magic) != BB_MAGIC
602             ||*/ le32_to_cpu(superblock->magic) != SB_MAGIC
603             || le32_to_cpu(spareblock->magic) != SP_MAGIC) {
604                 if (!silent)
605                         pr_err("Bad magic ... probably not HPFS\n");
606                 goto bail4;
607         }
608
609         /* Check version */
610         if (!sb_rdonly(s) && superblock->funcversion != 2 && superblock->funcversion != 3) {
611                 pr_err("Bad version %d,%d. Mount readonly to go around\n",
612                         (int)superblock->version, (int)superblock->funcversion);
613                 pr_err("please try recent version of HPFS driver at http://artax.karlin.mff.cuni.cz/~mikulas/vyplody/hpfs/index-e.cgi and if it still can't understand this format, contact author - mikulas@artax.karlin.mff.cuni.cz\n");
614                 goto bail4;
615         }
616
617         s->s_flags |= SB_NOATIME;
618
619         /* Fill superblock stuff */
620         s->s_magic = HPFS_SUPER_MAGIC;
621         s->s_op = &hpfs_sops;
622         s->s_d_op = &hpfs_dentry_operations;
623
624         sbi->sb_root = le32_to_cpu(superblock->root);
625         sbi->sb_fs_size = le32_to_cpu(superblock->n_sectors);
626         sbi->sb_bitmaps = le32_to_cpu(superblock->bitmaps);
627         sbi->sb_dirband_start = le32_to_cpu(superblock->dir_band_start);
628         sbi->sb_dirband_size = le32_to_cpu(superblock->n_dir_band);
629         sbi->sb_dmap = le32_to_cpu(superblock->dir_band_bitmap);
630         sbi->sb_uid = uid;
631         sbi->sb_gid = gid;
632         sbi->sb_mode = 0777 & ~umask;
633         sbi->sb_n_free = -1;
634         sbi->sb_n_free_dnodes = -1;
635         sbi->sb_lowercase = lowercase;
636         sbi->sb_eas = eas;
637         sbi->sb_chk = chk;
638         sbi->sb_chkdsk = chkdsk;
639         sbi->sb_err = errs;
640         sbi->sb_timeshift = timeshift;
641         sbi->sb_was_error = 0;
642         sbi->sb_cp_table = NULL;
643         sbi->sb_c_bitmap = -1;
644         sbi->sb_max_fwd_alloc = 0xffffff;
645
646         if (sbi->sb_fs_size >= 0x80000000) {
647                 hpfs_error(s, "invalid size in superblock: %08x",
648                         (unsigned)sbi->sb_fs_size);
649                 goto bail4;
650         }
651
652         if (spareblock->n_spares_used)
653                 hpfs_load_hotfix_map(s, spareblock);
654
655         /* Load bitmap directory */
656         if (!(sbi->sb_bmp_dir = hpfs_load_bitmap_directory(s, le32_to_cpu(superblock->bitmaps))))
657                 goto bail4;
658         
659         /* Check for general fs errors*/
660         if (spareblock->dirty && !spareblock->old_wrote) {
661                 if (errs == 2) {
662                         pr_err("Improperly stopped, not mounted\n");
663                         goto bail4;
664                 }
665                 hpfs_error(s, "improperly stopped");
666         }
667
668         if (!sb_rdonly(s)) {
669                 spareblock->dirty = 1;
670                 spareblock->old_wrote = 0;
671                 mark_buffer_dirty(bh2);
672         }
673
674         if (le32_to_cpu(spareblock->n_dnode_spares) != le32_to_cpu(spareblock->n_dnode_spares_free)) {
675                 if (errs >= 2) {
676                         pr_err("Spare dnodes used, try chkdsk\n");
677                         mark_dirty(s, 0);
678                         goto bail4;
679                 }
680                 hpfs_error(s, "warning: spare dnodes used, try chkdsk");
681                 if (errs == 0)
682                         pr_err("Proceeding, but your filesystem could be corrupted if you delete files or directories\n");
683         }
684         if (chk) {
685                 unsigned a;
686                 if (le32_to_cpu(superblock->dir_band_end) - le32_to_cpu(superblock->dir_band_start) + 1 != le32_to_cpu(superblock->n_dir_band) ||
687                     le32_to_cpu(superblock->dir_band_end) < le32_to_cpu(superblock->dir_band_start) || le32_to_cpu(superblock->n_dir_band) > 0x4000) {
688                         hpfs_error(s, "dir band size mismatch: dir_band_start==%08x, dir_band_end==%08x, n_dir_band==%08x",
689                                 le32_to_cpu(superblock->dir_band_start), le32_to_cpu(superblock->dir_band_end), le32_to_cpu(superblock->n_dir_band));
690                         goto bail4;
691                 }
692                 a = sbi->sb_dirband_size;
693                 sbi->sb_dirband_size = 0;
694                 if (hpfs_chk_sectors(s, le32_to_cpu(superblock->dir_band_start), le32_to_cpu(superblock->n_dir_band), "dir_band") ||
695                     hpfs_chk_sectors(s, le32_to_cpu(superblock->dir_band_bitmap), 4, "dir_band_bitmap") ||
696                     hpfs_chk_sectors(s, le32_to_cpu(superblock->bitmaps), 4, "bitmaps")) {
697                         mark_dirty(s, 0);
698                         goto bail4;
699                 }
700                 sbi->sb_dirband_size = a;
701         } else
702                 pr_err("You really don't want any checks? You are crazy...\n");
703
704         /* Load code page table */
705         if (le32_to_cpu(spareblock->n_code_pages))
706                 if (!(sbi->sb_cp_table = hpfs_load_code_page(s, le32_to_cpu(spareblock->code_page_dir))))
707                         pr_err("code page support is disabled\n");
708
709         brelse(bh2);
710         brelse(bh1);
711         brelse(bh0);
712
713         root = iget_locked(s, sbi->sb_root);
714         if (!root)
715                 goto bail0;
716         hpfs_init_inode(root);
717         hpfs_read_inode(root);
718         unlock_new_inode(root);
719         s->s_root = d_make_root(root);
720         if (!s->s_root)
721                 goto bail0;
722
723         /*
724          * find the root directory's . pointer & finish filling in the inode
725          */
726
727         root_dno = hpfs_fnode_dno(s, sbi->sb_root);
728         if (root_dno)
729                 de = map_dirent(root, root_dno, "\001\001", 2, NULL, &qbh);
730         if (!de)
731                 hpfs_error(s, "unable to find root dir");
732         else {
733                 root->i_atime.tv_sec = local_to_gmt(s, le32_to_cpu(de->read_date));
734                 root->i_atime.tv_nsec = 0;
735                 root->i_mtime.tv_sec = local_to_gmt(s, le32_to_cpu(de->write_date));
736                 root->i_mtime.tv_nsec = 0;
737                 root->i_ctime.tv_sec = local_to_gmt(s, le32_to_cpu(de->creation_date));
738                 root->i_ctime.tv_nsec = 0;
739                 hpfs_i(root)->i_ea_size = le32_to_cpu(de->ea_size);
740                 hpfs_i(root)->i_parent_dir = root->i_ino;
741                 if (root->i_size == -1)
742                         root->i_size = 2048;
743                 if (root->i_blocks == -1)
744                         root->i_blocks = 5;
745                 hpfs_brelse4(&qbh);
746         }
747         hpfs_unlock(s);
748         return 0;
749
750 bail4:  brelse(bh2);
751 bail3:  brelse(bh1);
752 bail2:  brelse(bh0);
753 bail1:
754 bail0:
755         hpfs_unlock(s);
756         free_sbi(sbi);
757         return -EINVAL;
758 }
759
760 static struct dentry *hpfs_mount(struct file_system_type *fs_type,
761         int flags, const char *dev_name, void *data)
762 {
763         return mount_bdev(fs_type, flags, dev_name, data, hpfs_fill_super);
764 }
765
766 static struct file_system_type hpfs_fs_type = {
767         .owner          = THIS_MODULE,
768         .name           = "hpfs",
769         .mount          = hpfs_mount,
770         .kill_sb        = kill_block_super,
771         .fs_flags       = FS_REQUIRES_DEV,
772 };
773 MODULE_ALIAS_FS("hpfs");
774
775 static int __init init_hpfs_fs(void)
776 {
777         int err = init_inodecache();
778         if (err)
779                 goto out1;
780         err = register_filesystem(&hpfs_fs_type);
781         if (err)
782                 goto out;
783         return 0;
784 out:
785         destroy_inodecache();
786 out1:
787         return err;
788 }
789
790 static void __exit exit_hpfs_fs(void)
791 {
792         unregister_filesystem(&hpfs_fs_type);
793         destroy_inodecache();
794 }
795
796 module_init(init_hpfs_fs)
797 module_exit(exit_hpfs_fs)
798 MODULE_LICENSE("GPL");