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>
18 #include <linux/seq_file.h>
20 /* Mark the filesystem dirty, so that chkdsk checks it when os/2 booted */
22 static void mark_dirty(struct super_block
*s
, int remount
)
24 if (hpfs_sb(s
)->sb_chkdsk
&& (remount
|| !(s
->s_flags
& MS_RDONLY
))) {
25 struct buffer_head
*bh
;
26 struct hpfs_spare_block
*sb
;
27 if ((sb
= hpfs_map_sector(s
, 17, &bh
, 0))) {
30 mark_buffer_dirty(bh
);
31 sync_dirty_buffer(bh
);
37 /* Mark the filesystem clean (mark it dirty for chkdsk if chkdsk==2 or if there
40 static void unmark_dirty(struct super_block
*s
)
42 struct buffer_head
*bh
;
43 struct hpfs_spare_block
*sb
;
44 if (s
->s_flags
& MS_RDONLY
) 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
);
55 /* Filesystem error... */
56 void hpfs_error(struct super_block
*s
, const char *fmt
, ...)
66 pr_err("filesystem error: %pV", &vaf
);
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");
75 } else if (hpfs_sb(s
)->sb_err
== 1) {
76 if (s
->s_flags
& MS_RDONLY
)
77 pr_cont("; already mounted read-only\n");
79 pr_cont("; remounting read-only\n");
81 s
->s_flags
|= MS_RDONLY
;
83 } else if (s
->s_flags
& MS_RDONLY
)
84 pr_cont("; going on - but anything won't be destroyed because it's read-only\n");
86 pr_cont("; corrupted filesystem mounted read/write - your computer will explode within 20 seconds ... but you wanted it so!\n");
89 hpfs_sb(s
)->sb_was_error
= 1;
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.
96 * BTW. chkdsk doesn't detect cycles correctly. When I had 2 lost directories
97 * nested each in other, chkdsk locked up happilly.
100 int hpfs_stop_cycles(struct super_block
*s
, int key
, int *c1
, int *c2
,
103 if (*c2
&& *c1
== key
) {
104 hpfs_error(s
, "cycle detected on key %08x in %s", key
, msg
);
108 if (!((*c2
- 1) & *c2
)) *c1
= key
;
112 static void free_sbi(struct hpfs_sb_info
*sbi
)
114 kfree(sbi
->sb_cp_table
);
115 kfree(sbi
->sb_bmp_dir
);
119 static void lazy_free_sbi(struct rcu_head
*rcu
)
121 free_sbi(container_of(rcu
, struct hpfs_sb_info
, rcu
));
124 static void hpfs_put_super(struct super_block
*s
)
129 call_rcu(&hpfs_sb(s
)->rcu
, lazy_free_sbi
);
132 static unsigned hpfs_count_one_bitmap(struct super_block
*s
, secno secno
)
134 struct quad_buffer_head qbh
;
138 bits
= hpfs_map_4sectors(s
, secno
, &qbh
, 0);
141 count
= bitmap_weight(bits
, 2048 * BITS_PER_BYTE
);
146 static unsigned count_bitmaps(struct super_block
*s
)
148 unsigned n
, count
, n_bands
;
149 n_bands
= (hpfs_sb(s
)->sb_fs_size
+ 0x3fff) >> 14;
151 for (n
= 0; n
< COUNT_RD_AHEAD
; n
++) {
152 hpfs_prefetch_bitmap(s
, n
);
154 for (n
= 0; n
< n_bands
; n
++) {
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)
164 unsigned hpfs_get_free_dnodes(struct super_block
*s
)
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)
171 sbi
->sb_n_free_dnodes
= c
;
173 return sbi
->sb_n_free_dnodes
;
176 static int hpfs_statfs(struct dentry
*dentry
, struct kstatfs
*buf
)
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
);
184 if (sbi
->sb_n_free
== (unsigned)-1)
185 sbi
->sb_n_free
= count_bitmaps(s
);
187 buf
->f_type
= s
->s_magic
;
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;
204 long hpfs_ioctl(struct file
*file
, unsigned cmd
, unsigned long arg
)
208 struct fstrim_range range
;
211 if (!capable(CAP_SYS_ADMIN
))
213 if (copy_from_user(&range
, (struct fstrim_range __user
*)arg
, sizeof(range
)))
215 r
= hpfs_trim_fs(file_inode(file
)->i_sb
, range
.start
>> 9, (range
.start
+ range
.len
) >> 9, (range
.minlen
+ 511) >> 9, &n_trimmed
);
218 range
.len
= (u64
)n_trimmed
<< 9;
219 if (copy_to_user((struct fstrim_range __user
*)arg
, &range
, sizeof(range
)))
230 static struct kmem_cache
* hpfs_inode_cachep
;
232 static struct inode
*hpfs_alloc_inode(struct super_block
*sb
)
234 struct hpfs_inode_info
*ei
;
235 ei
= kmem_cache_alloc(hpfs_inode_cachep
, GFP_NOFS
);
238 ei
->vfs_inode
.i_version
= 1;
239 return &ei
->vfs_inode
;
242 static void hpfs_i_callback(struct rcu_head
*head
)
244 struct inode
*inode
= container_of(head
, struct inode
, i_rcu
);
245 kmem_cache_free(hpfs_inode_cachep
, hpfs_i(inode
));
248 static void hpfs_destroy_inode(struct inode
*inode
)
250 call_rcu(&inode
->i_rcu
, hpfs_i_callback
);
253 static void init_once(void *foo
)
255 struct hpfs_inode_info
*ei
= (struct hpfs_inode_info
*) foo
;
257 inode_init_once(&ei
->vfs_inode
);
260 static int init_inodecache(void)
262 hpfs_inode_cachep
= kmem_cache_create("hpfs_inode_cache",
263 sizeof(struct hpfs_inode_info
),
264 0, (SLAB_RECLAIM_ACCOUNT
|
267 if (hpfs_inode_cachep
== NULL
)
272 static void destroy_inodecache(void)
275 * Make sure all delayed rcu free inodes are flushed before we
279 kmem_cache_destroy(hpfs_inode_cachep
);
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.
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
,
297 static const match_table_t tokens
= {
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"},
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
)
330 /*pr_info("Parsing opts: '%s'\n",opts);*/
332 while ((p
= strsep(&opts
, ",")) != NULL
) {
333 substring_t args
[MAX_OPT_ARGS
];
338 token
= match_token(p
, tokens
, args
);
343 if (match_int(args
, &option
))
345 *uid
= make_kuid(current_user_ns(), option
);
346 if (!uid_valid(*uid
))
350 if (match_int(args
, &option
))
352 *gid
= make_kgid(current_user_ns(), option
);
353 if (!gid_valid(*gid
))
357 if (match_octal(args
, &option
))
370 case Opt_check_normal
:
373 case Opt_check_strict
:
397 case Opt_chkdsk_errors
:
400 case Opt_chkdsk_always
:
406 char *rhs
= args
[0].from
;
409 if (*rhs
== '-') m
= -1;
410 if (*rhs
== '+' || *rhs
== '-') rhs
++;
411 *timeshift
= simple_strtoul(rhs
, &rhs
, 0) * m
;
423 static inline void hpfs_help(void)
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\
449 static int hpfs_remount_fs(struct super_block
*s
, int *flags
, char *data
)
454 int lowercase
, eas
, chk
, errs
, chkdsk
, timeshift
;
456 struct hpfs_sb_info
*sbi
= hpfs_sb(s
);
460 *flags
|= MS_NOATIME
;
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
;
469 if (!(o
= parse_opts(data
, &uid
, &gid
, &umask
, &lowercase
,
470 &eas
, &chk
, &errs
, &chkdsk
, ×hift
))) {
471 pr_err("bad mount options.\n");
478 if (timeshift
!= sbi
->sb_timeshift
) {
479 pr_err("timeshift can't be changed using remount.\n");
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
;
491 if (!(*flags
& MS_RDONLY
)) mark_dirty(s
, 1);
501 static int hpfs_show_options(struct seq_file
*seq
, struct dentry
*root
)
503 struct hpfs_sb_info
*sbi
= hpfs_sb(root
->d_sb
);
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");
511 seq_printf(seq
, ",check=none");
512 if (sbi
->sb_chk
== 2)
513 seq_printf(seq
, ",check=strict");
515 seq_printf(seq
, ",errors=continue");
516 if (sbi
->sb_err
== 2)
517 seq_printf(seq
, ",errors=panic");
519 seq_printf(seq
, ",chkdsk=no");
520 if (sbi
->sb_chkdsk
== 2)
521 seq_printf(seq
, ",chkdsk=always");
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
);
531 /* Super operations */
533 static const struct super_operations hpfs_sops
=
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
,
544 static int hpfs_fill_super(struct super_block
*s
, void *options
, int silent
)
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
;
556 int lowercase
, eas
, chk
, errs
, chkdsk
, timeshift
;
558 dnode_secno root_dno
;
559 struct hpfs_dirent
*de
= NULL
;
560 struct quad_buffer_head qbh
;
564 sbi
= kzalloc(sizeof(*sbi
), GFP_KERNEL
);
570 mutex_init(&sbi
->hpfs_mutex
);
575 umask
= current_umask();
583 if (!(o
= parse_opts(options
, &uid
, &gid
, &umask
, &lowercase
,
584 &eas
, &chk
, &errs
, &chkdsk
, ×hift
))) {
585 pr_err("bad mount options.\n");
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
;
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
) {
605 pr_err("Bad magic ... probably not HPFS\n");
610 if (!(s
->s_flags
& MS_RDONLY
) &&
611 superblock
->funcversion
!= 2 && superblock
->funcversion
!= 3) {
612 pr_err("Bad version %d,%d. Mount readonly to go around\n",
613 (int)superblock
->version
, (int)superblock
->funcversion
);
614 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");
618 s
->s_flags
|= MS_NOATIME
;
620 /* Fill superblock stuff */
621 s
->s_magic
= HPFS_SUPER_MAGIC
;
622 s
->s_op
= &hpfs_sops
;
623 s
->s_d_op
= &hpfs_dentry_operations
;
625 sbi
->sb_root
= le32_to_cpu(superblock
->root
);
626 sbi
->sb_fs_size
= le32_to_cpu(superblock
->n_sectors
);
627 sbi
->sb_bitmaps
= le32_to_cpu(superblock
->bitmaps
);
628 sbi
->sb_dirband_start
= le32_to_cpu(superblock
->dir_band_start
);
629 sbi
->sb_dirband_size
= le32_to_cpu(superblock
->n_dir_band
);
630 sbi
->sb_dmap
= le32_to_cpu(superblock
->dir_band_bitmap
);
633 sbi
->sb_mode
= 0777 & ~umask
;
635 sbi
->sb_n_free_dnodes
= -1;
636 sbi
->sb_lowercase
= lowercase
;
639 sbi
->sb_chkdsk
= chkdsk
;
641 sbi
->sb_timeshift
= timeshift
;
642 sbi
->sb_was_error
= 0;
643 sbi
->sb_cp_table
= NULL
;
644 sbi
->sb_c_bitmap
= -1;
645 sbi
->sb_max_fwd_alloc
= 0xffffff;
647 if (sbi
->sb_fs_size
>= 0x80000000) {
648 hpfs_error(s
, "invalid size in superblock: %08x",
649 (unsigned)sbi
->sb_fs_size
);
653 if (spareblock
->n_spares_used
)
654 hpfs_load_hotfix_map(s
, spareblock
);
656 /* Load bitmap directory */
657 if (!(sbi
->sb_bmp_dir
= hpfs_load_bitmap_directory(s
, le32_to_cpu(superblock
->bitmaps
))))
660 /* Check for general fs errors*/
661 if (spareblock
->dirty
&& !spareblock
->old_wrote
) {
663 pr_err("Improperly stopped, not mounted\n");
666 hpfs_error(s
, "improperly stopped");
669 if (!(s
->s_flags
& MS_RDONLY
)) {
670 spareblock
->dirty
= 1;
671 spareblock
->old_wrote
= 0;
672 mark_buffer_dirty(bh2
);
675 if (le32_to_cpu(spareblock
->n_dnode_spares
) != le32_to_cpu(spareblock
->n_dnode_spares_free
)) {
677 pr_err("Spare dnodes used, try chkdsk\n");
681 hpfs_error(s
, "warning: spare dnodes used, try chkdsk");
683 pr_err("Proceeding, but your filesystem could be corrupted if you delete files or directories\n");
687 if (le32_to_cpu(superblock
->dir_band_end
) - le32_to_cpu(superblock
->dir_band_start
) + 1 != le32_to_cpu(superblock
->n_dir_band
) ||
688 le32_to_cpu(superblock
->dir_band_end
) < le32_to_cpu(superblock
->dir_band_start
) || le32_to_cpu(superblock
->n_dir_band
) > 0x4000) {
689 hpfs_error(s
, "dir band size mismatch: dir_band_start==%08x, dir_band_end==%08x, n_dir_band==%08x",
690 le32_to_cpu(superblock
->dir_band_start
), le32_to_cpu(superblock
->dir_band_end
), le32_to_cpu(superblock
->n_dir_band
));
693 a
= sbi
->sb_dirband_size
;
694 sbi
->sb_dirband_size
= 0;
695 if (hpfs_chk_sectors(s
, le32_to_cpu(superblock
->dir_band_start
), le32_to_cpu(superblock
->n_dir_band
), "dir_band") ||
696 hpfs_chk_sectors(s
, le32_to_cpu(superblock
->dir_band_bitmap
), 4, "dir_band_bitmap") ||
697 hpfs_chk_sectors(s
, le32_to_cpu(superblock
->bitmaps
), 4, "bitmaps")) {
701 sbi
->sb_dirband_size
= a
;
703 pr_err("You really don't want any checks? You are crazy...\n");
705 /* Load code page table */
706 if (le32_to_cpu(spareblock
->n_code_pages
))
707 if (!(sbi
->sb_cp_table
= hpfs_load_code_page(s
, le32_to_cpu(spareblock
->code_page_dir
))))
708 pr_err("code page support is disabled\n");
714 root
= iget_locked(s
, sbi
->sb_root
);
717 hpfs_init_inode(root
);
718 hpfs_read_inode(root
);
719 unlock_new_inode(root
);
720 s
->s_root
= d_make_root(root
);
725 * find the root directory's . pointer & finish filling in the inode
728 root_dno
= hpfs_fnode_dno(s
, sbi
->sb_root
);
730 de
= map_dirent(root
, root_dno
, "\001\001", 2, NULL
, &qbh
);
732 hpfs_error(s
, "unable to find root dir");
734 root
->i_atime
.tv_sec
= local_to_gmt(s
, le32_to_cpu(de
->read_date
));
735 root
->i_atime
.tv_nsec
= 0;
736 root
->i_mtime
.tv_sec
= local_to_gmt(s
, le32_to_cpu(de
->write_date
));
737 root
->i_mtime
.tv_nsec
= 0;
738 root
->i_ctime
.tv_sec
= local_to_gmt(s
, le32_to_cpu(de
->creation_date
));
739 root
->i_ctime
.tv_nsec
= 0;
740 hpfs_i(root
)->i_ea_size
= le32_to_cpu(de
->ea_size
);
741 hpfs_i(root
)->i_parent_dir
= root
->i_ino
;
742 if (root
->i_size
== -1)
744 if (root
->i_blocks
== -1)
761 static struct dentry
*hpfs_mount(struct file_system_type
*fs_type
,
762 int flags
, const char *dev_name
, void *data
)
764 return mount_bdev(fs_type
, flags
, dev_name
, data
, hpfs_fill_super
);
767 static struct file_system_type hpfs_fs_type
= {
768 .owner
= THIS_MODULE
,
771 .kill_sb
= kill_block_super
,
772 .fs_flags
= FS_REQUIRES_DEV
,
774 MODULE_ALIAS_FS("hpfs");
776 static int __init
init_hpfs_fs(void)
778 int err
= init_inodecache();
781 err
= register_filesystem(&hpfs_fs_type
);
786 destroy_inodecache();
791 static void __exit
exit_hpfs_fs(void)
793 unregister_filesystem(&hpfs_fs_type
);
794 destroy_inodecache();
797 module_init(init_hpfs_fs
)
798 module_exit(exit_hpfs_fs
)
799 MODULE_LICENSE("GPL");