2 * linux/fs/hpfs/super.c
4 * Mikulas Patocka (mikulas@artax.karlin.mff.cuni.cz), 1998-1999
6 * mounting, unmounting, error handling
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>
19 /* Mark the filesystem dirty, so that chkdsk checks it when os/2 booted */
21 static void mark_dirty(struct super_block *s, int remount)
23 if (hpfs_sb(s)->sb_chkdsk && (remount || !(s->s_flags & MS_RDONLY))) {
24 struct buffer_head *bh;
25 struct hpfs_spare_block *sb;
26 if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
29 mark_buffer_dirty(bh);
30 sync_dirty_buffer(bh);
36 /* Mark the filesystem clean (mark it dirty for chkdsk if chkdsk==2 or if there
39 static void unmark_dirty(struct super_block *s)
41 struct buffer_head *bh;
42 struct hpfs_spare_block *sb;
43 if (s->s_flags & MS_RDONLY) return;
44 sync_blockdev(s->s_bdev);
45 if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
46 sb->dirty = hpfs_sb(s)->sb_chkdsk > 1 - hpfs_sb(s)->sb_was_error;
47 sb->old_wrote = hpfs_sb(s)->sb_chkdsk >= 2 && !hpfs_sb(s)->sb_was_error;
48 mark_buffer_dirty(bh);
49 sync_dirty_buffer(bh);
54 /* Filesystem error... */
55 static char err_buf[1024];
57 void hpfs_error(struct super_block *s, const char *fmt, ...)
62 vsnprintf(err_buf, sizeof(err_buf), fmt, args);
65 printk("HPFS: filesystem error: %s", err_buf);
66 if (!hpfs_sb(s)->sb_was_error) {
67 if (hpfs_sb(s)->sb_err == 2) {
68 printk("; crashing the system because you wanted it\n");
71 } else if (hpfs_sb(s)->sb_err == 1) {
72 if (s->s_flags & MS_RDONLY) printk("; already mounted read-only\n");
74 printk("; remounting read-only\n");
76 s->s_flags |= MS_RDONLY;
78 } else if (s->s_flags & MS_RDONLY) printk("; going on - but anything won't be destroyed because it's read-only\n");
79 else printk("; corrupted filesystem mounted read/write - your computer will explode within 20 seconds ... but you wanted it so!\n");
81 hpfs_sb(s)->sb_was_error = 1;
85 * A little trick to detect cycles in many hpfs structures and don't let the
86 * kernel crash on corrupted filesystem. When first called, set c2 to 0.
88 * BTW. chkdsk doesn't detect cycles correctly. When I had 2 lost directories
89 * nested each in other, chkdsk locked up happilly.
92 int hpfs_stop_cycles(struct super_block *s, int key, int *c1, int *c2,
95 if (*c2 && *c1 == key) {
96 hpfs_error(s, "cycle detected on key %08x in %s", key, msg);
100 if (!((*c2 - 1) & *c2)) *c1 = key;
104 static void hpfs_put_super(struct super_block *s)
106 struct hpfs_sb_info *sbi = hpfs_sb(s);
112 kfree(sbi->sb_cp_table);
113 kfree(sbi->sb_bmp_dir);
118 static unsigned hpfs_count_one_bitmap(struct super_block *s, secno secno)
120 struct quad_buffer_head qbh;
124 bits = hpfs_map_4sectors(s, secno, &qbh, 4);
127 count = bitmap_weight(bits, 2048 * BITS_PER_BYTE);
132 static unsigned count_bitmaps(struct super_block *s)
134 unsigned n, count, n_bands;
135 n_bands = (hpfs_sb(s)->sb_fs_size + 0x3fff) >> 14;
137 for (n = 0; n < n_bands; n++) {
139 c = hpfs_count_one_bitmap(s, le32_to_cpu(hpfs_sb(s)->sb_bmp_dir[n]));
140 if (c != (unsigned)-1)
146 unsigned hpfs_get_free_dnodes(struct super_block *s)
148 struct hpfs_sb_info *sbi = hpfs_sb(s);
149 if (sbi->sb_n_free_dnodes == (unsigned)-1) {
150 unsigned c = hpfs_count_one_bitmap(s, sbi->sb_dmap);
151 if (c == (unsigned)-1)
153 sbi->sb_n_free_dnodes = c;
155 return sbi->sb_n_free_dnodes;
158 static int hpfs_statfs(struct dentry *dentry, struct kstatfs *buf)
160 struct super_block *s = dentry->d_sb;
161 struct hpfs_sb_info *sbi = hpfs_sb(s);
162 u64 id = huge_encode_dev(s->s_bdev->bd_dev);
166 if (sbi->sb_n_free == (unsigned)-1)
167 sbi->sb_n_free = count_bitmaps(s);
169 buf->f_type = s->s_magic;
171 buf->f_blocks = sbi->sb_fs_size;
172 buf->f_bfree = sbi->sb_n_free;
173 buf->f_bavail = sbi->sb_n_free;
174 buf->f_files = sbi->sb_dirband_size / 4;
175 buf->f_ffree = hpfs_get_free_dnodes(s);
176 buf->f_fsid.val[0] = (u32)id;
177 buf->f_fsid.val[1] = (u32)(id >> 32);
178 buf->f_namelen = 254;
185 static struct kmem_cache * hpfs_inode_cachep;
187 static struct inode *hpfs_alloc_inode(struct super_block *sb)
189 struct hpfs_inode_info *ei;
190 ei = (struct hpfs_inode_info *)kmem_cache_alloc(hpfs_inode_cachep, GFP_NOFS);
193 ei->vfs_inode.i_version = 1;
194 return &ei->vfs_inode;
197 static void hpfs_i_callback(struct rcu_head *head)
199 struct inode *inode = container_of(head, struct inode, i_rcu);
200 INIT_LIST_HEAD(&inode->i_dentry);
201 kmem_cache_free(hpfs_inode_cachep, hpfs_i(inode));
204 static void hpfs_destroy_inode(struct inode *inode)
206 call_rcu(&inode->i_rcu, hpfs_i_callback);
209 static void init_once(void *foo)
211 struct hpfs_inode_info *ei = (struct hpfs_inode_info *) foo;
213 inode_init_once(&ei->vfs_inode);
216 static int init_inodecache(void)
218 hpfs_inode_cachep = kmem_cache_create("hpfs_inode_cache",
219 sizeof(struct hpfs_inode_info),
220 0, (SLAB_RECLAIM_ACCOUNT|
223 if (hpfs_inode_cachep == NULL)
228 static void destroy_inodecache(void)
230 kmem_cache_destroy(hpfs_inode_cachep);
234 * A tiny parser for option strings, stolen from dosfs.
235 * Stolen again from read-only hpfs.
236 * And updated for table-driven option parsing.
240 Opt_help, Opt_uid, Opt_gid, Opt_umask, Opt_case_lower, Opt_case_asis,
241 Opt_check_none, Opt_check_normal, Opt_check_strict,
242 Opt_err_cont, Opt_err_ro, Opt_err_panic,
243 Opt_eas_no, Opt_eas_ro, Opt_eas_rw,
244 Opt_chkdsk_no, Opt_chkdsk_errors, Opt_chkdsk_always,
245 Opt_timeshift, Opt_err,
248 static const match_table_t tokens = {
252 {Opt_umask, "umask=%o"},
253 {Opt_case_lower, "case=lower"},
254 {Opt_case_asis, "case=asis"},
255 {Opt_check_none, "check=none"},
256 {Opt_check_normal, "check=normal"},
257 {Opt_check_strict, "check=strict"},
258 {Opt_err_cont, "errors=continue"},
259 {Opt_err_ro, "errors=remount-ro"},
260 {Opt_err_panic, "errors=panic"},
261 {Opt_eas_no, "eas=no"},
262 {Opt_eas_ro, "eas=ro"},
263 {Opt_eas_rw, "eas=rw"},
264 {Opt_chkdsk_no, "chkdsk=no"},
265 {Opt_chkdsk_errors, "chkdsk=errors"},
266 {Opt_chkdsk_always, "chkdsk=always"},
267 {Opt_timeshift, "timeshift=%d"},
271 static int parse_opts(char *opts, uid_t *uid, gid_t *gid, umode_t *umask,
272 int *lowercase, int *eas, int *chk, int *errs,
273 int *chkdsk, int *timeshift)
281 /*printk("Parsing opts: '%s'\n",opts);*/
283 while ((p = strsep(&opts, ",")) != NULL) {
284 substring_t args[MAX_OPT_ARGS];
289 token = match_token(p, tokens, args);
294 if (match_int(args, &option))
299 if (match_int(args, &option))
304 if (match_octal(args, &option))
317 case Opt_check_normal:
320 case Opt_check_strict:
344 case Opt_chkdsk_errors:
347 case Opt_chkdsk_always:
353 char *rhs = args[0].from;
356 if (*rhs == '-') m = -1;
357 if (*rhs == '+' || *rhs == '-') rhs++;
358 *timeshift = simple_strtoul(rhs, &rhs, 0) * m;
370 static inline void hpfs_help(void)
373 HPFS filesystem options:\n\
374 help do not mount and display this text\n\
375 uid=xxx set uid of files that don't have uid specified in eas\n\
376 gid=xxx set gid of files that don't have gid specified in eas\n\
377 umask=xxx set mode of files that don't have mode specified in eas\n\
378 case=lower lowercase all files\n\
379 case=asis do not lowercase files (default)\n\
380 check=none no fs checks - kernel may crash on corrupted filesystem\n\
381 check=normal do some checks - it should not crash (default)\n\
382 check=strict do extra time-consuming checks, used for debugging\n\
383 errors=continue continue on errors\n\
384 errors=remount-ro remount read-only if errors found (default)\n\
385 errors=panic panic on errors\n\
386 chkdsk=no do not mark fs for chkdsking even if there were errors\n\
387 chkdsk=errors mark fs dirty if errors found (default)\n\
388 chkdsk=always always mark fs dirty - used for debugging\n\
389 eas=no ignore extended attributes\n\
390 eas=ro read but do not write extended attributes\n\
391 eas=rw r/w eas => enables chmod, chown, mknod, ln -s (default)\n\
392 timeshift=nnn add nnn seconds to file times\n\
396 static int hpfs_remount_fs(struct super_block *s, int *flags, char *data)
401 int lowercase, eas, chk, errs, chkdsk, timeshift;
403 struct hpfs_sb_info *sbi = hpfs_sb(s);
404 char *new_opts = kstrdup(data, GFP_KERNEL);
406 *flags |= MS_NOATIME;
410 uid = sbi->sb_uid; gid = sbi->sb_gid;
411 umask = 0777 & ~sbi->sb_mode;
412 lowercase = sbi->sb_lowercase;
413 eas = sbi->sb_eas; chk = sbi->sb_chk; chkdsk = sbi->sb_chkdsk;
414 errs = sbi->sb_err; timeshift = sbi->sb_timeshift;
416 if (!(o = parse_opts(data, &uid, &gid, &umask, &lowercase,
417 &eas, &chk, &errs, &chkdsk, ×hift))) {
418 printk("HPFS: bad mount options.\n");
425 if (timeshift != sbi->sb_timeshift) {
426 printk("HPFS: timeshift can't be changed using remount.\n");
432 sbi->sb_uid = uid; sbi->sb_gid = gid;
433 sbi->sb_mode = 0777 & ~umask;
434 sbi->sb_lowercase = lowercase;
435 sbi->sb_eas = eas; sbi->sb_chk = chk; sbi->sb_chkdsk = chkdsk;
436 sbi->sb_err = errs; sbi->sb_timeshift = timeshift;
438 if (!(*flags & MS_RDONLY)) mark_dirty(s, 1);
440 replace_mount_options(s, new_opts);
453 /* Super operations */
455 static const struct super_operations hpfs_sops =
457 .alloc_inode = hpfs_alloc_inode,
458 .destroy_inode = hpfs_destroy_inode,
459 .evict_inode = hpfs_evict_inode,
460 .put_super = hpfs_put_super,
461 .statfs = hpfs_statfs,
462 .remount_fs = hpfs_remount_fs,
463 .show_options = generic_show_options,
466 static int hpfs_fill_super(struct super_block *s, void *options, int silent)
468 struct buffer_head *bh0, *bh1, *bh2;
469 struct hpfs_boot_block *bootblock;
470 struct hpfs_super_block *superblock;
471 struct hpfs_spare_block *spareblock;
472 struct hpfs_sb_info *sbi;
478 int lowercase, eas, chk, errs, chkdsk, timeshift;
480 dnode_secno root_dno;
481 struct hpfs_dirent *de = NULL;
482 struct quad_buffer_head qbh;
486 save_mount_options(s, options);
488 sbi = kzalloc(sizeof(*sbi), GFP_KERNEL);
494 sbi->sb_bmp_dir = NULL;
495 sbi->sb_cp_table = NULL;
497 mutex_init(&sbi->hpfs_mutex);
502 umask = current_umask();
510 if (!(o = parse_opts(options, &uid, &gid, &umask, &lowercase,
511 &eas, &chk, &errs, &chkdsk, ×hift))) {
512 printk("HPFS: bad mount options.\n");
520 /*sbi->sb_mounting = 1;*/
521 sb_set_blocksize(s, 512);
522 sbi->sb_fs_size = -1;
523 if (!(bootblock = hpfs_map_sector(s, 0, &bh0, 0))) goto bail1;
524 if (!(superblock = hpfs_map_sector(s, 16, &bh1, 1))) goto bail2;
525 if (!(spareblock = hpfs_map_sector(s, 17, &bh2, 0))) goto bail3;
528 if (/*le16_to_cpu(bootblock->magic) != BB_MAGIC
529 ||*/ le32_to_cpu(superblock->magic) != SB_MAGIC
530 || le32_to_cpu(spareblock->magic) != SP_MAGIC) {
531 if (!silent) printk("HPFS: Bad magic ... probably not HPFS\n");
536 if (!(s->s_flags & MS_RDONLY) &&
537 superblock->funcversion != 2 && superblock->funcversion != 3) {
538 printk("HPFS: Bad version %d,%d. Mount readonly to go around\n",
539 (int)superblock->version, (int)superblock->funcversion);
540 printk("HPFS: 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");
544 s->s_flags |= MS_NOATIME;
546 /* Fill superblock stuff */
547 s->s_magic = HPFS_SUPER_MAGIC;
548 s->s_op = &hpfs_sops;
549 s->s_d_op = &hpfs_dentry_operations;
551 sbi->sb_root = le32_to_cpu(superblock->root);
552 sbi->sb_fs_size = le32_to_cpu(superblock->n_sectors);
553 sbi->sb_bitmaps = le32_to_cpu(superblock->bitmaps);
554 sbi->sb_dirband_start = le32_to_cpu(superblock->dir_band_start);
555 sbi->sb_dirband_size = le32_to_cpu(superblock->n_dir_band);
556 sbi->sb_dmap = le32_to_cpu(superblock->dir_band_bitmap);
559 sbi->sb_mode = 0777 & ~umask;
561 sbi->sb_n_free_dnodes = -1;
562 sbi->sb_lowercase = lowercase;
565 sbi->sb_chkdsk = chkdsk;
567 sbi->sb_timeshift = timeshift;
568 sbi->sb_was_error = 0;
569 sbi->sb_cp_table = NULL;
570 sbi->sb_c_bitmap = -1;
571 sbi->sb_max_fwd_alloc = 0xffffff;
573 if (sbi->sb_fs_size >= 0x80000000) {
574 hpfs_error(s, "invalid size in superblock: %08x",
575 (unsigned)sbi->sb_fs_size);
579 /* Load bitmap directory */
580 if (!(sbi->sb_bmp_dir = hpfs_load_bitmap_directory(s, le32_to_cpu(superblock->bitmaps))))
583 /* Check for general fs errors*/
584 if (spareblock->dirty && !spareblock->old_wrote) {
586 printk("HPFS: Improperly stopped, not mounted\n");
589 hpfs_error(s, "improperly stopped");
592 if (!(s->s_flags & MS_RDONLY)) {
593 spareblock->dirty = 1;
594 spareblock->old_wrote = 0;
595 mark_buffer_dirty(bh2);
598 if (le32_to_cpu(spareblock->hotfixes_used) || le32_to_cpu(spareblock->n_spares_used)) {
600 printk("HPFS: Hotfixes not supported here, try chkdsk\n");
604 hpfs_error(s, "hotfixes not supported here, try chkdsk");
605 if (errs == 0) printk("HPFS: Proceeding, but your filesystem will be probably corrupted by this driver...\n");
606 else printk("HPFS: This driver may read bad files or crash when operating on disk with hotfixes.\n");
608 if (le32_to_cpu(spareblock->n_dnode_spares) != le32_to_cpu(spareblock->n_dnode_spares_free)) {
610 printk("HPFS: Spare dnodes used, try chkdsk\n");
614 hpfs_error(s, "warning: spare dnodes used, try chkdsk");
615 if (errs == 0) printk("HPFS: Proceeding, but your filesystem could be corrupted if you delete files or directories\n");
619 if (le32_to_cpu(superblock->dir_band_end) - le32_to_cpu(superblock->dir_band_start) + 1 != le32_to_cpu(superblock->n_dir_band) ||
620 le32_to_cpu(superblock->dir_band_end) < le32_to_cpu(superblock->dir_band_start) || le32_to_cpu(superblock->n_dir_band) > 0x4000) {
621 hpfs_error(s, "dir band size mismatch: dir_band_start==%08x, dir_band_end==%08x, n_dir_band==%08x",
622 le32_to_cpu(superblock->dir_band_start), le32_to_cpu(superblock->dir_band_end), le32_to_cpu(superblock->n_dir_band));
625 a = sbi->sb_dirband_size;
626 sbi->sb_dirband_size = 0;
627 if (hpfs_chk_sectors(s, le32_to_cpu(superblock->dir_band_start), le32_to_cpu(superblock->n_dir_band), "dir_band") ||
628 hpfs_chk_sectors(s, le32_to_cpu(superblock->dir_band_bitmap), 4, "dir_band_bitmap") ||
629 hpfs_chk_sectors(s, le32_to_cpu(superblock->bitmaps), 4, "bitmaps")) {
633 sbi->sb_dirband_size = a;
634 } else printk("HPFS: You really don't want any checks? You are crazy...\n");
636 /* Load code page table */
637 if (le32_to_cpu(spareblock->n_code_pages))
638 if (!(sbi->sb_cp_table = hpfs_load_code_page(s, le32_to_cpu(spareblock->code_page_dir))))
639 printk("HPFS: Warning: code page support is disabled\n");
645 root = iget_locked(s, sbi->sb_root);
648 hpfs_init_inode(root);
649 hpfs_read_inode(root);
650 unlock_new_inode(root);
651 s->s_root = d_alloc_root(root);
658 * find the root directory's . pointer & finish filling in the inode
661 root_dno = hpfs_fnode_dno(s, sbi->sb_root);
663 de = map_dirent(root, root_dno, "\001\001", 2, NULL, &qbh);
665 hpfs_error(s, "unable to find root dir");
667 root->i_atime.tv_sec = local_to_gmt(s, le32_to_cpu(de->read_date));
668 root->i_atime.tv_nsec = 0;
669 root->i_mtime.tv_sec = local_to_gmt(s, le32_to_cpu(de->write_date));
670 root->i_mtime.tv_nsec = 0;
671 root->i_ctime.tv_sec = local_to_gmt(s, le32_to_cpu(de->creation_date));
672 root->i_ctime.tv_nsec = 0;
673 hpfs_i(root)->i_ea_size = le16_to_cpu(de->ea_size);
674 hpfs_i(root)->i_parent_dir = root->i_ino;
675 if (root->i_size == -1)
677 if (root->i_blocks == -1)
690 kfree(sbi->sb_bmp_dir);
691 kfree(sbi->sb_cp_table);
697 static struct dentry *hpfs_mount(struct file_system_type *fs_type,
698 int flags, const char *dev_name, void *data)
700 return mount_bdev(fs_type, flags, dev_name, data, hpfs_fill_super);
703 static struct file_system_type hpfs_fs_type = {
704 .owner = THIS_MODULE,
707 .kill_sb = kill_block_super,
708 .fs_flags = FS_REQUIRES_DEV,
711 static int __init init_hpfs_fs(void)
713 int err = init_inodecache();
716 err = register_filesystem(&hpfs_fs_type);
721 destroy_inodecache();
726 static void __exit exit_hpfs_fs(void)
728 unregister_filesystem(&hpfs_fs_type);
729 destroy_inodecache();
732 module_init(init_hpfs_fs)
733 module_exit(exit_hpfs_fs)
734 MODULE_LICENSE("GPL");