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