xref: /openbmc/linux/fs/hpfs/super.c (revision 55fd7e02)
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 
23 static 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 
41 static 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... */
57 void 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 
101 int 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 
113 static 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 
120 static void lazy_free_sbi(struct rcu_head *rcu)
121 {
122 	free_sbi(container_of(rcu, struct hpfs_sb_info, rcu));
123 }
124 
125 static 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 
133 static 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 
147 static 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 
165 unsigned 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 
177 static 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.val[0] = (u32)id;
196 	buf->f_fsid.val[1] = (u32)(id >> 32);
197 	buf->f_namelen = 254;
198 
199 	hpfs_unlock(s);
200 
201 	return 0;
202 }
203 
204 
205 long hpfs_ioctl(struct file *file, unsigned cmd, unsigned long arg)
206 {
207 	switch (cmd) {
208 		case FITRIM: {
209 			struct fstrim_range range;
210 			secno n_trimmed;
211 			int r;
212 			if (!capable(CAP_SYS_ADMIN))
213 				return -EPERM;
214 			if (copy_from_user(&range, (struct fstrim_range __user *)arg, sizeof(range)))
215 				return -EFAULT;
216 			r = hpfs_trim_fs(file_inode(file)->i_sb, range.start >> 9, (range.start + range.len) >> 9, (range.minlen + 511) >> 9, &n_trimmed);
217 			if (r)
218 				return r;
219 			range.len = (u64)n_trimmed << 9;
220 			if (copy_to_user((struct fstrim_range __user *)arg, &range, sizeof(range)))
221 				return -EFAULT;
222 			return 0;
223 		}
224 		default: {
225 			return -ENOIOCTLCMD;
226 		}
227 	}
228 }
229 
230 
231 static struct kmem_cache * hpfs_inode_cachep;
232 
233 static struct inode *hpfs_alloc_inode(struct super_block *sb)
234 {
235 	struct hpfs_inode_info *ei;
236 	ei = kmem_cache_alloc(hpfs_inode_cachep, GFP_NOFS);
237 	if (!ei)
238 		return NULL;
239 	return &ei->vfs_inode;
240 }
241 
242 static void hpfs_free_inode(struct inode *inode)
243 {
244 	kmem_cache_free(hpfs_inode_cachep, hpfs_i(inode));
245 }
246 
247 static void init_once(void *foo)
248 {
249 	struct hpfs_inode_info *ei = (struct hpfs_inode_info *) foo;
250 
251 	inode_init_once(&ei->vfs_inode);
252 }
253 
254 static int init_inodecache(void)
255 {
256 	hpfs_inode_cachep = kmem_cache_create("hpfs_inode_cache",
257 					     sizeof(struct hpfs_inode_info),
258 					     0, (SLAB_RECLAIM_ACCOUNT|
259 						SLAB_MEM_SPREAD|SLAB_ACCOUNT),
260 					     init_once);
261 	if (hpfs_inode_cachep == NULL)
262 		return -ENOMEM;
263 	return 0;
264 }
265 
266 static void destroy_inodecache(void)
267 {
268 	/*
269 	 * Make sure all delayed rcu free inodes are flushed before we
270 	 * destroy cache.
271 	 */
272 	rcu_barrier();
273 	kmem_cache_destroy(hpfs_inode_cachep);
274 }
275 
276 /*
277  * A tiny parser for option strings, stolen from dosfs.
278  * Stolen again from read-only hpfs.
279  * And updated for table-driven option parsing.
280  */
281 
282 enum {
283 	Opt_help, Opt_uid, Opt_gid, Opt_umask, Opt_case_lower, Opt_case_asis,
284 	Opt_check_none, Opt_check_normal, Opt_check_strict,
285 	Opt_err_cont, Opt_err_ro, Opt_err_panic,
286 	Opt_eas_no, Opt_eas_ro, Opt_eas_rw,
287 	Opt_chkdsk_no, Opt_chkdsk_errors, Opt_chkdsk_always,
288 	Opt_timeshift, Opt_err,
289 };
290 
291 static const match_table_t tokens = {
292 	{Opt_help, "help"},
293 	{Opt_uid, "uid=%u"},
294 	{Opt_gid, "gid=%u"},
295 	{Opt_umask, "umask=%o"},
296 	{Opt_case_lower, "case=lower"},
297 	{Opt_case_asis, "case=asis"},
298 	{Opt_check_none, "check=none"},
299 	{Opt_check_normal, "check=normal"},
300 	{Opt_check_strict, "check=strict"},
301 	{Opt_err_cont, "errors=continue"},
302 	{Opt_err_ro, "errors=remount-ro"},
303 	{Opt_err_panic, "errors=panic"},
304 	{Opt_eas_no, "eas=no"},
305 	{Opt_eas_ro, "eas=ro"},
306 	{Opt_eas_rw, "eas=rw"},
307 	{Opt_chkdsk_no, "chkdsk=no"},
308 	{Opt_chkdsk_errors, "chkdsk=errors"},
309 	{Opt_chkdsk_always, "chkdsk=always"},
310 	{Opt_timeshift, "timeshift=%d"},
311 	{Opt_err, NULL},
312 };
313 
314 static int parse_opts(char *opts, kuid_t *uid, kgid_t *gid, umode_t *umask,
315 		      int *lowercase, int *eas, int *chk, int *errs,
316 		      int *chkdsk, int *timeshift)
317 {
318 	char *p;
319 	int option;
320 
321 	if (!opts)
322 		return 1;
323 
324 	/*pr_info("Parsing opts: '%s'\n",opts);*/
325 
326 	while ((p = strsep(&opts, ",")) != NULL) {
327 		substring_t args[MAX_OPT_ARGS];
328 		int token;
329 		if (!*p)
330 			continue;
331 
332 		token = match_token(p, tokens, args);
333 		switch (token) {
334 		case Opt_help:
335 			return 2;
336 		case Opt_uid:
337 			if (match_int(args, &option))
338 				return 0;
339 			*uid = make_kuid(current_user_ns(), option);
340 			if (!uid_valid(*uid))
341 				return 0;
342 			break;
343 		case Opt_gid:
344 			if (match_int(args, &option))
345 				return 0;
346 			*gid = make_kgid(current_user_ns(), option);
347 			if (!gid_valid(*gid))
348 				return 0;
349 			break;
350 		case Opt_umask:
351 			if (match_octal(args, &option))
352 				return 0;
353 			*umask = option;
354 			break;
355 		case Opt_case_lower:
356 			*lowercase = 1;
357 			break;
358 		case Opt_case_asis:
359 			*lowercase = 0;
360 			break;
361 		case Opt_check_none:
362 			*chk = 0;
363 			break;
364 		case Opt_check_normal:
365 			*chk = 1;
366 			break;
367 		case Opt_check_strict:
368 			*chk = 2;
369 			break;
370 		case Opt_err_cont:
371 			*errs = 0;
372 			break;
373 		case Opt_err_ro:
374 			*errs = 1;
375 			break;
376 		case Opt_err_panic:
377 			*errs = 2;
378 			break;
379 		case Opt_eas_no:
380 			*eas = 0;
381 			break;
382 		case Opt_eas_ro:
383 			*eas = 1;
384 			break;
385 		case Opt_eas_rw:
386 			*eas = 2;
387 			break;
388 		case Opt_chkdsk_no:
389 			*chkdsk = 0;
390 			break;
391 		case Opt_chkdsk_errors:
392 			*chkdsk = 1;
393 			break;
394 		case Opt_chkdsk_always:
395 			*chkdsk = 2;
396 			break;
397 		case Opt_timeshift:
398 		{
399 			int m = 1;
400 			char *rhs = args[0].from;
401 			if (!rhs || !*rhs)
402 				return 0;
403 			if (*rhs == '-') m = -1;
404 			if (*rhs == '+' || *rhs == '-') rhs++;
405 			*timeshift = simple_strtoul(rhs, &rhs, 0) * m;
406 			if (*rhs)
407 				return 0;
408 			break;
409 		}
410 		default:
411 			return 0;
412 		}
413 	}
414 	return 1;
415 }
416 
417 static inline void hpfs_help(void)
418 {
419 	pr_info("\n\
420 HPFS filesystem options:\n\
421       help              do not mount and display this text\n\
422       uid=xxx           set uid of files that don't have uid specified in eas\n\
423       gid=xxx           set gid of files that don't have gid specified in eas\n\
424       umask=xxx         set mode of files that don't have mode specified in eas\n\
425       case=lower        lowercase all files\n\
426       case=asis         do not lowercase files (default)\n\
427       check=none        no fs checks - kernel may crash on corrupted filesystem\n\
428       check=normal      do some checks - it should not crash (default)\n\
429       check=strict      do extra time-consuming checks, used for debugging\n\
430       errors=continue   continue on errors\n\
431       errors=remount-ro remount read-only if errors found (default)\n\
432       errors=panic      panic on errors\n\
433       chkdsk=no         do not mark fs for chkdsking even if there were errors\n\
434       chkdsk=errors     mark fs dirty if errors found (default)\n\
435       chkdsk=always     always mark fs dirty - used for debugging\n\
436       eas=no            ignore extended attributes\n\
437       eas=ro            read but do not write extended attributes\n\
438       eas=rw            r/w eas => enables chmod, chown, mknod, ln -s (default)\n\
439       timeshift=nnn	add nnn seconds to file times\n\
440 \n");
441 }
442 
443 static int hpfs_remount_fs(struct super_block *s, int *flags, char *data)
444 {
445 	kuid_t uid;
446 	kgid_t gid;
447 	umode_t umask;
448 	int lowercase, eas, chk, errs, chkdsk, timeshift;
449 	int o;
450 	struct hpfs_sb_info *sbi = hpfs_sb(s);
451 
452 	sync_filesystem(s);
453 
454 	*flags |= SB_NOATIME;
455 
456 	hpfs_lock(s);
457 	uid = sbi->sb_uid; gid = sbi->sb_gid;
458 	umask = 0777 & ~sbi->sb_mode;
459 	lowercase = sbi->sb_lowercase;
460 	eas = sbi->sb_eas; chk = sbi->sb_chk; chkdsk = sbi->sb_chkdsk;
461 	errs = sbi->sb_err; timeshift = sbi->sb_timeshift;
462 
463 	if (!(o = parse_opts(data, &uid, &gid, &umask, &lowercase,
464 	    &eas, &chk, &errs, &chkdsk, &timeshift))) {
465 		pr_err("bad mount options.\n");
466 		goto out_err;
467 	}
468 	if (o == 2) {
469 		hpfs_help();
470 		goto out_err;
471 	}
472 	if (timeshift != sbi->sb_timeshift) {
473 		pr_err("timeshift can't be changed using remount.\n");
474 		goto out_err;
475 	}
476 
477 	unmark_dirty(s);
478 
479 	sbi->sb_uid = uid; sbi->sb_gid = gid;
480 	sbi->sb_mode = 0777 & ~umask;
481 	sbi->sb_lowercase = lowercase;
482 	sbi->sb_eas = eas; sbi->sb_chk = chk; sbi->sb_chkdsk = chkdsk;
483 	sbi->sb_err = errs; sbi->sb_timeshift = timeshift;
484 
485 	if (!(*flags & SB_RDONLY)) mark_dirty(s, 1);
486 
487 	hpfs_unlock(s);
488 	return 0;
489 
490 out_err:
491 	hpfs_unlock(s);
492 	return -EINVAL;
493 }
494 
495 static int hpfs_show_options(struct seq_file *seq, struct dentry *root)
496 {
497 	struct hpfs_sb_info *sbi = hpfs_sb(root->d_sb);
498 
499 	seq_printf(seq, ",uid=%u", from_kuid_munged(&init_user_ns, sbi->sb_uid));
500 	seq_printf(seq, ",gid=%u", from_kgid_munged(&init_user_ns, sbi->sb_gid));
501 	seq_printf(seq, ",umask=%03o", (~sbi->sb_mode & 0777));
502 	if (sbi->sb_lowercase)
503 		seq_printf(seq, ",case=lower");
504 	if (!sbi->sb_chk)
505 		seq_printf(seq, ",check=none");
506 	if (sbi->sb_chk == 2)
507 		seq_printf(seq, ",check=strict");
508 	if (!sbi->sb_err)
509 		seq_printf(seq, ",errors=continue");
510 	if (sbi->sb_err == 2)
511 		seq_printf(seq, ",errors=panic");
512 	if (!sbi->sb_chkdsk)
513 		seq_printf(seq, ",chkdsk=no");
514 	if (sbi->sb_chkdsk == 2)
515 		seq_printf(seq, ",chkdsk=always");
516 	if (!sbi->sb_eas)
517 		seq_printf(seq, ",eas=no");
518 	if (sbi->sb_eas == 1)
519 		seq_printf(seq, ",eas=ro");
520 	if (sbi->sb_timeshift)
521 		seq_printf(seq, ",timeshift=%d", sbi->sb_timeshift);
522 	return 0;
523 }
524 
525 /* Super operations */
526 
527 static const struct super_operations hpfs_sops =
528 {
529 	.alloc_inode	= hpfs_alloc_inode,
530 	.free_inode	= hpfs_free_inode,
531 	.evict_inode	= hpfs_evict_inode,
532 	.put_super	= hpfs_put_super,
533 	.statfs		= hpfs_statfs,
534 	.remount_fs	= hpfs_remount_fs,
535 	.show_options	= hpfs_show_options,
536 };
537 
538 static int hpfs_fill_super(struct super_block *s, void *options, int silent)
539 {
540 	struct buffer_head *bh0, *bh1, *bh2;
541 	struct hpfs_boot_block *bootblock;
542 	struct hpfs_super_block *superblock;
543 	struct hpfs_spare_block *spareblock;
544 	struct hpfs_sb_info *sbi;
545 	struct inode *root;
546 
547 	kuid_t uid;
548 	kgid_t gid;
549 	umode_t umask;
550 	int lowercase, eas, chk, errs, chkdsk, timeshift;
551 
552 	dnode_secno root_dno;
553 	struct hpfs_dirent *de = NULL;
554 	struct quad_buffer_head qbh;
555 
556 	int o;
557 
558 	sbi = kzalloc(sizeof(*sbi), GFP_KERNEL);
559 	if (!sbi) {
560 		return -ENOMEM;
561 	}
562 	s->s_fs_info = sbi;
563 
564 	mutex_init(&sbi->hpfs_mutex);
565 	hpfs_lock(s);
566 
567 	uid = current_uid();
568 	gid = current_gid();
569 	umask = current_umask();
570 	lowercase = 0;
571 	eas = 2;
572 	chk = 1;
573 	errs = 1;
574 	chkdsk = 1;
575 	timeshift = 0;
576 
577 	if (!(o = parse_opts(options, &uid, &gid, &umask, &lowercase,
578 	    &eas, &chk, &errs, &chkdsk, &timeshift))) {
579 		pr_err("bad mount options.\n");
580 		goto bail0;
581 	}
582 	if (o==2) {
583 		hpfs_help();
584 		goto bail0;
585 	}
586 
587 	/*sbi->sb_mounting = 1;*/
588 	sb_set_blocksize(s, 512);
589 	sbi->sb_fs_size = -1;
590 	if (!(bootblock = hpfs_map_sector(s, 0, &bh0, 0))) goto bail1;
591 	if (!(superblock = hpfs_map_sector(s, 16, &bh1, 1))) goto bail2;
592 	if (!(spareblock = hpfs_map_sector(s, 17, &bh2, 0))) goto bail3;
593 
594 	/* Check magics */
595 	if (/*le16_to_cpu(bootblock->magic) != BB_MAGIC
596 	    ||*/ le32_to_cpu(superblock->magic) != SB_MAGIC
597 	    || le32_to_cpu(spareblock->magic) != SP_MAGIC) {
598 		if (!silent)
599 			pr_err("Bad magic ... probably not HPFS\n");
600 		goto bail4;
601 	}
602 
603 	/* Check version */
604 	if (!sb_rdonly(s) && superblock->funcversion != 2 && superblock->funcversion != 3) {
605 		pr_err("Bad version %d,%d. Mount readonly to go around\n",
606 			(int)superblock->version, (int)superblock->funcversion);
607 		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");
608 		goto bail4;
609 	}
610 
611 	s->s_flags |= SB_NOATIME;
612 
613 	/* Fill superblock stuff */
614 	s->s_magic = HPFS_SUPER_MAGIC;
615 	s->s_op = &hpfs_sops;
616 	s->s_d_op = &hpfs_dentry_operations;
617 	s->s_time_min =  local_to_gmt(s, 0);
618 	s->s_time_max =  local_to_gmt(s, U32_MAX);
619 
620 	sbi->sb_root = le32_to_cpu(superblock->root);
621 	sbi->sb_fs_size = le32_to_cpu(superblock->n_sectors);
622 	sbi->sb_bitmaps = le32_to_cpu(superblock->bitmaps);
623 	sbi->sb_dirband_start = le32_to_cpu(superblock->dir_band_start);
624 	sbi->sb_dirband_size = le32_to_cpu(superblock->n_dir_band);
625 	sbi->sb_dmap = le32_to_cpu(superblock->dir_band_bitmap);
626 	sbi->sb_uid = uid;
627 	sbi->sb_gid = gid;
628 	sbi->sb_mode = 0777 & ~umask;
629 	sbi->sb_n_free = -1;
630 	sbi->sb_n_free_dnodes = -1;
631 	sbi->sb_lowercase = lowercase;
632 	sbi->sb_eas = eas;
633 	sbi->sb_chk = chk;
634 	sbi->sb_chkdsk = chkdsk;
635 	sbi->sb_err = errs;
636 	sbi->sb_timeshift = timeshift;
637 	sbi->sb_was_error = 0;
638 	sbi->sb_cp_table = NULL;
639 	sbi->sb_c_bitmap = -1;
640 	sbi->sb_max_fwd_alloc = 0xffffff;
641 
642 	if (sbi->sb_fs_size >= 0x80000000) {
643 		hpfs_error(s, "invalid size in superblock: %08x",
644 			(unsigned)sbi->sb_fs_size);
645 		goto bail4;
646 	}
647 
648 	if (spareblock->n_spares_used)
649 		hpfs_load_hotfix_map(s, spareblock);
650 
651 	/* Load bitmap directory */
652 	if (!(sbi->sb_bmp_dir = hpfs_load_bitmap_directory(s, le32_to_cpu(superblock->bitmaps))))
653 		goto bail4;
654 
655 	/* Check for general fs errors*/
656 	if (spareblock->dirty && !spareblock->old_wrote) {
657 		if (errs == 2) {
658 			pr_err("Improperly stopped, not mounted\n");
659 			goto bail4;
660 		}
661 		hpfs_error(s, "improperly stopped");
662 	}
663 
664 	if (!sb_rdonly(s)) {
665 		spareblock->dirty = 1;
666 		spareblock->old_wrote = 0;
667 		mark_buffer_dirty(bh2);
668 	}
669 
670 	if (le32_to_cpu(spareblock->n_dnode_spares) != le32_to_cpu(spareblock->n_dnode_spares_free)) {
671 		if (errs >= 2) {
672 			pr_err("Spare dnodes used, try chkdsk\n");
673 			mark_dirty(s, 0);
674 			goto bail4;
675 		}
676 		hpfs_error(s, "warning: spare dnodes used, try chkdsk");
677 		if (errs == 0)
678 			pr_err("Proceeding, but your filesystem could be corrupted if you delete files or directories\n");
679 	}
680 	if (chk) {
681 		unsigned a;
682 		if (le32_to_cpu(superblock->dir_band_end) - le32_to_cpu(superblock->dir_band_start) + 1 != le32_to_cpu(superblock->n_dir_band) ||
683 		    le32_to_cpu(superblock->dir_band_end) < le32_to_cpu(superblock->dir_band_start) || le32_to_cpu(superblock->n_dir_band) > 0x4000) {
684 			hpfs_error(s, "dir band size mismatch: dir_band_start==%08x, dir_band_end==%08x, n_dir_band==%08x",
685 				le32_to_cpu(superblock->dir_band_start), le32_to_cpu(superblock->dir_band_end), le32_to_cpu(superblock->n_dir_band));
686 			goto bail4;
687 		}
688 		a = sbi->sb_dirband_size;
689 		sbi->sb_dirband_size = 0;
690 		if (hpfs_chk_sectors(s, le32_to_cpu(superblock->dir_band_start), le32_to_cpu(superblock->n_dir_band), "dir_band") ||
691 		    hpfs_chk_sectors(s, le32_to_cpu(superblock->dir_band_bitmap), 4, "dir_band_bitmap") ||
692 		    hpfs_chk_sectors(s, le32_to_cpu(superblock->bitmaps), 4, "bitmaps")) {
693 			mark_dirty(s, 0);
694 			goto bail4;
695 		}
696 		sbi->sb_dirband_size = a;
697 	} else
698 		pr_err("You really don't want any checks? You are crazy...\n");
699 
700 	/* Load code page table */
701 	if (le32_to_cpu(spareblock->n_code_pages))
702 		if (!(sbi->sb_cp_table = hpfs_load_code_page(s, le32_to_cpu(spareblock->code_page_dir))))
703 			pr_err("code page support is disabled\n");
704 
705 	brelse(bh2);
706 	brelse(bh1);
707 	brelse(bh0);
708 
709 	root = iget_locked(s, sbi->sb_root);
710 	if (!root)
711 		goto bail0;
712 	hpfs_init_inode(root);
713 	hpfs_read_inode(root);
714 	unlock_new_inode(root);
715 	s->s_root = d_make_root(root);
716 	if (!s->s_root)
717 		goto bail0;
718 
719 	/*
720 	 * find the root directory's . pointer & finish filling in the inode
721 	 */
722 
723 	root_dno = hpfs_fnode_dno(s, sbi->sb_root);
724 	if (root_dno)
725 		de = map_dirent(root, root_dno, "\001\001", 2, NULL, &qbh);
726 	if (!de)
727 		hpfs_error(s, "unable to find root dir");
728 	else {
729 		root->i_atime.tv_sec = local_to_gmt(s, le32_to_cpu(de->read_date));
730 		root->i_atime.tv_nsec = 0;
731 		root->i_mtime.tv_sec = local_to_gmt(s, le32_to_cpu(de->write_date));
732 		root->i_mtime.tv_nsec = 0;
733 		root->i_ctime.tv_sec = local_to_gmt(s, le32_to_cpu(de->creation_date));
734 		root->i_ctime.tv_nsec = 0;
735 		hpfs_i(root)->i_ea_size = le32_to_cpu(de->ea_size);
736 		hpfs_i(root)->i_parent_dir = root->i_ino;
737 		if (root->i_size == -1)
738 			root->i_size = 2048;
739 		if (root->i_blocks == -1)
740 			root->i_blocks = 5;
741 		hpfs_brelse4(&qbh);
742 	}
743 	hpfs_unlock(s);
744 	return 0;
745 
746 bail4:	brelse(bh2);
747 bail3:	brelse(bh1);
748 bail2:	brelse(bh0);
749 bail1:
750 bail0:
751 	hpfs_unlock(s);
752 	free_sbi(sbi);
753 	return -EINVAL;
754 }
755 
756 static struct dentry *hpfs_mount(struct file_system_type *fs_type,
757 	int flags, const char *dev_name, void *data)
758 {
759 	return mount_bdev(fs_type, flags, dev_name, data, hpfs_fill_super);
760 }
761 
762 static struct file_system_type hpfs_fs_type = {
763 	.owner		= THIS_MODULE,
764 	.name		= "hpfs",
765 	.mount		= hpfs_mount,
766 	.kill_sb	= kill_block_super,
767 	.fs_flags	= FS_REQUIRES_DEV,
768 };
769 MODULE_ALIAS_FS("hpfs");
770 
771 static int __init init_hpfs_fs(void)
772 {
773 	int err = init_inodecache();
774 	if (err)
775 		goto out1;
776 	err = register_filesystem(&hpfs_fs_type);
777 	if (err)
778 		goto out;
779 	return 0;
780 out:
781 	destroy_inodecache();
782 out1:
783 	return err;
784 }
785 
786 static void __exit exit_hpfs_fs(void)
787 {
788 	unregister_filesystem(&hpfs_fs_type);
789 	destroy_inodecache();
790 }
791 
792 module_init(init_hpfs_fs)
793 module_exit(exit_hpfs_fs)
794 MODULE_LICENSE("GPL");
795