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