[linux.git] / fs / hpfs / super.c

/*
 *  linux/fs/hpfs/super.c
 *
 *  Mikulas Patocka ([email protected]), 1998-1999
 *
 *  mounting, unmounting, error handling
 */

#include "hpfs_fn.h"
#include <linux/module.h>
#include <linux/parser.h>
#include <linux/init.h>
#include <linux/statfs.h>
#include <linux/magic.h>
#include <linux/sched.h>

/* Mark the filesystem dirty, so that chkdsk checks it when os/2 booted */

static void mark_dirty(struct super_block *s)
{
	if (hpfs_sb(s)->sb_chkdsk && !(s->s_flags & MS_RDONLY)) {
		struct buffer_head *bh;
		struct hpfs_spare_block *sb;
		if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
			sb->dirty = 1;
			sb->old_wrote = 0;
			mark_buffer_dirty(bh);
			brelse(bh);
		}
	}
}

/* Mark the filesystem clean (mark it dirty for chkdsk if chkdsk==2 or if there
   were errors) */

static void unmark_dirty(struct super_block *s)
{
	struct buffer_head *bh;
	struct hpfs_spare_block *sb;
	if (s->s_flags & MS_RDONLY) return;
	if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
		sb->dirty = hpfs_sb(s)->sb_chkdsk > 1 - hpfs_sb(s)->sb_was_error;
		sb->old_wrote = hpfs_sb(s)->sb_chkdsk >= 2 && !hpfs_sb(s)->sb_was_error;
		mark_buffer_dirty(bh);
		brelse(bh);
	}
}

/* Filesystem error... */
static char err_buf[1024];

void hpfs_error(struct super_block *s, const char *fmt, ...)
{
	va_list args;

	va_start(args, fmt);
	vsnprintf(err_buf, sizeof(err_buf), fmt, args);
	va_end(args);

	printk("HPFS: filesystem error: %s", err_buf);
	if (!hpfs_sb(s)->sb_was_error) {
		if (hpfs_sb(s)->sb_err == 2) {
			printk("; crashing the system because you wanted it\n");
			mark_dirty(s);
			panic("HPFS panic");
		} else if (hpfs_sb(s)->sb_err == 1) {
			if (s->s_flags & MS_RDONLY) printk("; already mounted read-only\n");
			else {
				printk("; remounting read-only\n");
				mark_dirty(s);
				s->s_flags |= MS_RDONLY;
			}
		} else if (s->s_flags & MS_RDONLY) printk("; going on - but anything won't be destroyed because it's read-only\n");
		else printk("; corrupted filesystem mounted read/write - your computer will explode within 20 seconds ... but you wanted it so!\n");
	} else printk("\n");
	hpfs_sb(s)->sb_was_error = 1;
}

/* 
 * A little trick to detect cycles in many hpfs structures and don't let the
 * kernel crash on corrupted filesystem. When first called, set c2 to 0.
 *
 * BTW. chkdsk doesn't detect cycles correctly. When I had 2 lost directories
 * nested each in other, chkdsk locked up happilly.
 */

int hpfs_stop_cycles(struct super_block *s, int key, int *c1, int *c2,
		char *msg)
{
	if (*c2 && *c1 == key) {
		hpfs_error(s, "cycle detected on key %08x in %s", key, msg);
		return 1;
	}
	(*c2)++;
	if (!((*c2 - 1) & *c2)) *c1 = key;
	return 0;
}

static void hpfs_put_super(struct super_block *s)
{
	struct hpfs_sb_info *sbi = hpfs_sb(s);
	kfree(sbi->sb_cp_table);
	kfree(sbi->sb_bmp_dir);
	unmark_dirty(s);
	s->s_fs_info = NULL;
	kfree(sbi);
}

unsigned hpfs_count_one_bitmap(struct super_block *s, secno secno)
{
	struct quad_buffer_head qbh;
	unsigned *bits;
	unsigned i, count;
	if (!(bits = hpfs_map_4sectors(s, secno, &qbh, 4))) return 0;
	count = 0;
	for (i = 0; i < 2048 / sizeof(unsigned); i++) {
		unsigned b; 
		if (!bits[i]) continue;
		for (b = bits[i]; b; b>>=1) count += b & 1;
	}
	hpfs_brelse4(&qbh);
	return count;
}

static unsigned count_bitmaps(struct super_block *s)
{
	unsigned n, count, n_bands;
	n_bands = (hpfs_sb(s)->sb_fs_size + 0x3fff) >> 14;
	count = 0;
	for (n = 0; n < n_bands; n++)
		count += hpfs_count_one_bitmap(s, hpfs_sb(s)->sb_bmp_dir[n]);
	return count;
}

static int hpfs_statfs(struct dentry *dentry, struct kstatfs *buf)
{
	struct super_block *s = dentry->d_sb;
	struct hpfs_sb_info *sbi = hpfs_sb(s);
	lock_kernel();

	/*if (sbi->sb_n_free == -1) {*/
		sbi->sb_n_free = count_bitmaps(s);
		sbi->sb_n_free_dnodes = hpfs_count_one_bitmap(s, sbi->sb_dmap);
	/*}*/
	buf->f_type = s->s_magic;
	buf->f_bsize = 512;
	buf->f_blocks = sbi->sb_fs_size;
	buf->f_bfree = sbi->sb_n_free;
	buf->f_bavail = sbi->sb_n_free;
	buf->f_files = sbi->sb_dirband_size / 4;
	buf->f_ffree = sbi->sb_n_free_dnodes;
	buf->f_namelen = 254;

	unlock_kernel();

	return 0;
}

static struct kmem_cache * hpfs_inode_cachep;

static struct inode *hpfs_alloc_inode(struct super_block *sb)
{
	struct hpfs_inode_info *ei;
	ei = (struct hpfs_inode_info *)kmem_cache_alloc(hpfs_inode_cachep, GFP_NOFS);
	if (!ei)
		return NULL;
	ei->vfs_inode.i_version = 1;
	return &ei->vfs_inode;
}

static void hpfs_destroy_inode(struct inode *inode)
{
	kmem_cache_free(hpfs_inode_cachep, hpfs_i(inode));
}

static void init_once(void *foo)
{
	struct hpfs_inode_info *ei = (struct hpfs_inode_info *) foo;

	mutex_init(&ei->i_mutex);
	mutex_init(&ei->i_parent_mutex);
	inode_init_once(&ei->vfs_inode);
}

static int init_inodecache(void)
{
	hpfs_inode_cachep = kmem_cache_create("hpfs_inode_cache",
					     sizeof(struct hpfs_inode_info),
					     0, (SLAB_RECLAIM_ACCOUNT|
						SLAB_MEM_SPREAD),
					     init_once);
	if (hpfs_inode_cachep == NULL)
		return -ENOMEM;
	return 0;
}

static void destroy_inodecache(void)
{
	kmem_cache_destroy(hpfs_inode_cachep);
}

/*
 * A tiny parser for option strings, stolen from dosfs.
 * Stolen again from read-only hpfs.
 * And updated for table-driven option parsing.
 */

enum {
	Opt_help, Opt_uid, Opt_gid, Opt_umask, Opt_case_lower, Opt_case_asis,
	Opt_conv_binary, Opt_conv_text, Opt_conv_auto,
	Opt_check_none, Opt_check_normal, Opt_check_strict,
	Opt_err_cont, Opt_err_ro, Opt_err_panic,
	Opt_eas_no, Opt_eas_ro, Opt_eas_rw,
	Opt_chkdsk_no, Opt_chkdsk_errors, Opt_chkdsk_always,
	Opt_timeshift, Opt_err,
};

static const match_table_t tokens = {
	{Opt_help, "help"},
	{Opt_uid, "uid=%u"},
	{Opt_gid, "gid=%u"},
	{Opt_umask, "umask=%o"},
	{Opt_case_lower, "case=lower"},
	{Opt_case_asis, "case=asis"},
	{Opt_conv_binary, "conv=binary"},
	{Opt_conv_text, "conv=text"},
	{Opt_conv_auto, "conv=auto"},
	{Opt_check_none, "check=none"},
	{Opt_check_normal, "check=normal"},
	{Opt_check_strict, "check=strict"},
	{Opt_err_cont, "errors=continue"},
	{Opt_err_ro, "errors=remount-ro"},
	{Opt_err_panic, "errors=panic"},
	{Opt_eas_no, "eas=no"},
	{Opt_eas_ro, "eas=ro"},
	{Opt_eas_rw, "eas=rw"},
	{Opt_chkdsk_no, "chkdsk=no"},
	{Opt_chkdsk_errors, "chkdsk=errors"},
	{Opt_chkdsk_always, "chkdsk=always"},
	{Opt_timeshift, "timeshift=%d"},
	{Opt_err, NULL},
};

static int parse_opts(char *opts, uid_t *uid, gid_t *gid, umode_t *umask,
		      int *lowercase, int *conv, int *eas, int *chk, int *errs,
		      int *chkdsk, int *timeshift)
{
	char *p;
	int option;

	if (!opts)
		return 1;

	/*printk("Parsing opts: '%s'\n",opts);*/

	while ((p = strsep(&opts, ",")) != NULL) {
		substring_t args[MAX_OPT_ARGS];
		int token;
		if (!*p)
			continue;

		token = match_token(p, tokens, args);
		switch (token) {
		case Opt_help:
			return 2;
		case Opt_uid:
			if (match_int(args, &option))
				return 0;
			*uid = option;
			break;
		case Opt_gid:
			if (match_int(args, &option))
				return 0;
			*gid = option;
			break;
		case Opt_umask:
			if (match_octal(args, &option))
				return 0;
			*umask = option;
			break;
		case Opt_case_lower:
			*lowercase = 1;
			break;
		case Opt_case_asis:
			*lowercase = 0;
			break;
		case Opt_conv_binary:
			*conv = CONV_BINARY;
			break;
		case Opt_conv_text:
			*conv = CONV_TEXT;
			break;
		case Opt_conv_auto:
			*conv = CONV_AUTO;
			break;
		case Opt_check_none:
			*chk = 0;
			break;
		case Opt_check_normal:
			*chk = 1;
			break;
		case Opt_check_strict:
			*chk = 2;
			break;
		case Opt_err_cont:
			*errs = 0;
			break;
		case Opt_err_ro:
			*errs = 1;
			break;
		case Opt_err_panic:
			*errs = 2;
			break;
		case Opt_eas_no:
			*eas = 0;
			break;
		case Opt_eas_ro:
			*eas = 1;
			break;
		case Opt_eas_rw:
			*eas = 2;
			break;
		case Opt_chkdsk_no:
			*chkdsk = 0;
			break;
		case Opt_chkdsk_errors:
			*chkdsk = 1;
			break;
		case Opt_chkdsk_always:
			*chkdsk = 2;
			break;
		case Opt_timeshift:
		{
			int m = 1;
			char *rhs = args[0].from;
			if (!rhs || !*rhs)
				return 0;
			if (*rhs == '-') m = -1;
			if (*rhs == '+' || *rhs == '-') rhs++;
			*timeshift = simple_strtoul(rhs, &rhs, 0) * m;
			if (*rhs)
				return 0;
			break;
		}
		default:
			return 0;
		}
	}
	return 1;
}

static inline void hpfs_help(void)
{
	printk("\n\
HPFS filesystem options:\n\
      help              do not mount and display this text\n\
      uid=xxx           set uid of files that don't have uid specified in eas\n\
      gid=xxx           set gid of files that don't have gid specified in eas\n\
      umask=xxx         set mode of files that don't have mode specified in eas\n\
      case=lower        lowercase all files\n\
      case=asis         do not lowercase files (default)\n\
      conv=binary       do not convert CR/LF -> LF (default)\n\
      conv=auto         convert only files with known text extensions\n\
      conv=text         convert all files\n\
      check=none        no fs checks - kernel may crash on corrupted filesystem\n\
      check=normal      do some checks - it should not crash (default)\n\
      check=strict      do extra time-consuming checks, used for debugging\n\
      errors=continue   continue on errors\n\
      errors=remount-ro remount read-only if errors found (default)\n\
      errors=panic      panic on errors\n\
      chkdsk=no         do not mark fs for chkdsking even if there were errors\n\
      chkdsk=errors     mark fs dirty if errors found (default)\n\
      chkdsk=always     always mark fs dirty - used for debugging\n\
      eas=no            ignore extended attributes\n\
      eas=ro            read but do not write extended attributes\n\
      eas=rw            r/w eas => enables chmod, chown, mknod, ln -s (default)\n\
      timeshift=nnn	add nnn seconds to file times\n\
\n");
}

static int hpfs_remount_fs(struct super_block *s, int *flags, char *data)
{
	uid_t uid;
	gid_t gid;
	umode_t umask;
	int lowercase, conv, eas, chk, errs, chkdsk, timeshift;
	int o;
	struct hpfs_sb_info *sbi = hpfs_sb(s);
	char *new_opts = kstrdup(data, GFP_KERNEL);
	
	*flags |= MS_NOATIME;
	
	uid = sbi->sb_uid; gid = sbi->sb_gid;
	umask = 0777 & ~sbi->sb_mode;
	lowercase = sbi->sb_lowercase; conv = sbi->sb_conv;
	eas = sbi->sb_eas; chk = sbi->sb_chk; chkdsk = sbi->sb_chkdsk;
	errs = sbi->sb_err; timeshift = sbi->sb_timeshift;

	if (!(o = parse_opts(data, &uid, &gid, &umask, &lowercase, &conv,
	    &eas, &chk, &errs, &chkdsk, &timeshift))) {
		printk("HPFS: bad mount options.\n");
		goto out_err;
	}
	if (o == 2) {
		hpfs_help();
		goto out_err;
	}
	if (timeshift != sbi->sb_timeshift) {
		printk("HPFS: timeshift can't be changed using remount.\n");
		goto out_err;
	}

	unmark_dirty(s);

	sbi->sb_uid = uid; sbi->sb_gid = gid;
	sbi->sb_mode = 0777 & ~umask;
	sbi->sb_lowercase = lowercase; sbi->sb_conv = conv;
	sbi->sb_eas = eas; sbi->sb_chk = chk; sbi->sb_chkdsk = chkdsk;
	sbi->sb_err = errs; sbi->sb_timeshift = timeshift;

	if (!(*flags & MS_RDONLY)) mark_dirty(s);

	kfree(s->s_options);
	s->s_options = new_opts;

	return 0;

out_err:
	kfree(new_opts);
	return -EINVAL;
}

/* Super operations */

static const struct super_operations hpfs_sops =
{
	.alloc_inode	= hpfs_alloc_inode,
	.destroy_inode	= hpfs_destroy_inode,
	.delete_inode	= hpfs_delete_inode,
	.put_super	= hpfs_put_super,
	.statfs		= hpfs_statfs,
	.remount_fs	= hpfs_remount_fs,
	.show_options	= generic_show_options,
};

static int hpfs_fill_super(struct super_block *s, void *options, int silent)
{
	struct buffer_head *bh0, *bh1, *bh2;
	struct hpfs_boot_block *bootblock;
	struct hpfs_super_block *superblock;
	struct hpfs_spare_block *spareblock;
	struct hpfs_sb_info *sbi;
	struct inode *root;

	uid_t uid;
	gid_t gid;
	umode_t umask;
	int lowercase, conv, eas, chk, errs, chkdsk, timeshift;

	dnode_secno root_dno;
	struct hpfs_dirent *de = NULL;
	struct quad_buffer_head qbh;

	int o;

	save_mount_options(s, options);

	sbi = kzalloc(sizeof(*sbi), GFP_KERNEL);
	if (!sbi)
		return -ENOMEM;
	s->s_fs_info = sbi;

	sbi->sb_bmp_dir = NULL;
	sbi->sb_cp_table = NULL;

	init_MUTEX(&sbi->hpfs_creation_de);

	uid = current_uid();
	gid = current_gid();
	umask = current->fs->umask;
	lowercase = 0;
	conv = CONV_BINARY;
	eas = 2;
	chk = 1;
	errs = 1;
	chkdsk = 1;
	timeshift = 0;

	if (!(o = parse_opts(options, &uid, &gid, &umask, &lowercase, &conv,
	    &eas, &chk, &errs, &chkdsk, &timeshift))) {
		printk("HPFS: bad mount options.\n");
		goto bail0;
	}
	if (o==2) {
		hpfs_help();
		goto bail0;
	}

	/*sbi->sb_mounting = 1;*/
	sb_set_blocksize(s, 512);
	sbi->sb_fs_size = -1;
	if (!(bootblock = hpfs_map_sector(s, 0, &bh0, 0))) goto bail1;
	if (!(superblock = hpfs_map_sector(s, 16, &bh1, 1))) goto bail2;
	if (!(spareblock = hpfs_map_sector(s, 17, &bh2, 0))) goto bail3;

	/* Check magics */
	if (/*bootblock->magic != BB_MAGIC
	    ||*/ superblock->magic != SB_MAGIC
	    || spareblock->magic != SP_MAGIC) {
		if (!silent) printk("HPFS: Bad magic ... probably not HPFS\n");
		goto bail4;
	}

	/* Check version */
	if (!(s->s_flags & MS_RDONLY) &&
	      superblock->funcversion != 2 && superblock->funcversion != 3) {
		printk("HPFS: Bad version %d,%d. Mount readonly to go around\n",
			(int)superblock->version, (int)superblock->funcversion);
		printk("HPFS: please try recent version of HPFS driver at http://artax.karlin.mff.cuni.cz/~mikulas/vyplody/hpfs/index-e.cgi and if it still can't understand this format, contact author - [email protected]\n");
		goto bail4;
	}

	s->s_flags |= MS_NOATIME;

	/* Fill superblock stuff */
	s->s_magic = HPFS_SUPER_MAGIC;
	s->s_op = &hpfs_sops;

	sbi->sb_root = superblock->root;
	sbi->sb_fs_size = superblock->n_sectors;
	sbi->sb_bitmaps = superblock->bitmaps;
	sbi->sb_dirband_start = superblock->dir_band_start;
	sbi->sb_dirband_size = superblock->n_dir_band;
	sbi->sb_dmap = superblock->dir_band_bitmap;
	sbi->sb_uid = uid;
	sbi->sb_gid = gid;
	sbi->sb_mode = 0777 & ~umask;
	sbi->sb_n_free = -1;
	sbi->sb_n_free_dnodes = -1;
	sbi->sb_lowercase = lowercase;
	sbi->sb_conv = conv;
	sbi->sb_eas = eas;
	sbi->sb_chk = chk;
	sbi->sb_chkdsk = chkdsk;
	sbi->sb_err = errs;
	sbi->sb_timeshift = timeshift;
	sbi->sb_was_error = 0;
	sbi->sb_cp_table = NULL;
	sbi->sb_c_bitmap = -1;
	sbi->sb_max_fwd_alloc = 0xffffff;
	
	/* Load bitmap directory */
	if (!(sbi->sb_bmp_dir = hpfs_load_bitmap_directory(s, superblock->bitmaps)))
		goto bail4;
	
	/* Check for general fs errors*/
	if (spareblock->dirty && !spareblock->old_wrote) {
		if (errs == 2) {
			printk("HPFS: Improperly stopped, not mounted\n");
			goto bail4;
		}
		hpfs_error(s, "improperly stopped");
	}

	if (!(s->s_flags & MS_RDONLY)) {
		spareblock->dirty = 1;
		spareblock->old_wrote = 0;
		mark_buffer_dirty(bh2);
	}

	if (spareblock->hotfixes_used || spareblock->n_spares_used) {
		if (errs >= 2) {
			printk("HPFS: Hotfixes not supported here, try chkdsk\n");
			mark_dirty(s);
			goto bail4;
		}
		hpfs_error(s, "hotfixes not supported here, try chkdsk");
		if (errs == 0) printk("HPFS: Proceeding, but your filesystem will be probably corrupted by this driver...\n");
		else printk("HPFS: This driver may read bad files or crash when operating on disk with hotfixes.\n");
	}
	if (spareblock->n_dnode_spares != spareblock->n_dnode_spares_free) {
		if (errs >= 2) {
			printk("HPFS: Spare dnodes used, try chkdsk\n");
			mark_dirty(s);
			goto bail4;
		}
		hpfs_error(s, "warning: spare dnodes used, try chkdsk");
		if (errs == 0) printk("HPFS: Proceeding, but your filesystem could be corrupted if you delete files or directories\n");
	}
	if (chk) {
		unsigned a;
		if (superblock->dir_band_end - superblock->dir_band_start + 1 != superblock->n_dir_band ||
		    superblock->dir_band_end < superblock->dir_band_start || superblock->n_dir_band > 0x4000) {
			hpfs_error(s, "dir band size mismatch: dir_band_start==%08x, dir_band_end==%08x, n_dir_band==%08x",
				superblock->dir_band_start, superblock->dir_band_end, superblock->n_dir_band);
			goto bail4;
		}
		a = sbi->sb_dirband_size;
		sbi->sb_dirband_size = 0;
		if (hpfs_chk_sectors(s, superblock->dir_band_start, superblock->n_dir_band, "dir_band") ||
		    hpfs_chk_sectors(s, superblock->dir_band_bitmap, 4, "dir_band_bitmap") ||
		    hpfs_chk_sectors(s, superblock->bitmaps, 4, "bitmaps")) {
			mark_dirty(s);
			goto bail4;
		}
		sbi->sb_dirband_size = a;
	} else printk("HPFS: You really don't want any checks? You are crazy...\n");

	/* Load code page table */
	if (spareblock->n_code_pages)
		if (!(sbi->sb_cp_table = hpfs_load_code_page(s, spareblock->code_page_dir)))
			printk("HPFS: Warning: code page support is disabled\n");

	brelse(bh2);
	brelse(bh1);
	brelse(bh0);

	root = iget_locked(s, sbi->sb_root);
	if (!root)
		goto bail0;
	hpfs_init_inode(root);
	hpfs_read_inode(root);
	unlock_new_inode(root);
	s->s_root = d_alloc_root(root);
	if (!s->s_root) {
		iput(root);
		goto bail0;
	}
	hpfs_set_dentry_operations(s->s_root);

	/*
	 * find the root directory's . pointer & finish filling in the inode
	 */

	root_dno = hpfs_fnode_dno(s, sbi->sb_root);
	if (root_dno)
		de = map_dirent(root, root_dno, "\001\001", 2, NULL, &qbh);
	if (!de)
		hpfs_error(s, "unable to find root dir");
	else {
		root->i_atime.tv_sec = local_to_gmt(s, de->read_date);
		root->i_atime.tv_nsec = 0;
		root->i_mtime.tv_sec = local_to_gmt(s, de->write_date);
		root->i_mtime.tv_nsec = 0;
		root->i_ctime.tv_sec = local_to_gmt(s, de->creation_date);
		root->i_ctime.tv_nsec = 0;
		hpfs_i(root)->i_ea_size = de->ea_size;
		hpfs_i(root)->i_parent_dir = root->i_ino;
		if (root->i_size == -1)
			root->i_size = 2048;
		if (root->i_blocks == -1)
			root->i_blocks = 5;
		hpfs_brelse4(&qbh);
	}
	return 0;

bail4:	brelse(bh2);
bail3:	brelse(bh1);
bail2:	brelse(bh0);
bail1:
bail0:
	kfree(sbi->sb_bmp_dir);
	kfree(sbi->sb_cp_table);
	s->s_fs_info = NULL;
	kfree(sbi);
	return -EINVAL;
}

static int hpfs_get_sb(struct file_system_type *fs_type,
	int flags, const char *dev_name, void *data, struct vfsmount *mnt)
{
	return get_sb_bdev(fs_type, flags, dev_name, data, hpfs_fill_super,
			   mnt);
}

static struct file_system_type hpfs_fs_type = {
	.owner		= THIS_MODULE,
	.name		= "hpfs",
	.get_sb		= hpfs_get_sb,
	.kill_sb	= kill_block_super,
	.fs_flags	= FS_REQUIRES_DEV,
};

static int __init init_hpfs_fs(void)
{
	int err = init_inodecache();
	if (err)
		goto out1;
	err = register_filesystem(&hpfs_fs_type);
	if (err)
		goto out;
	return 0;
out:
	destroy_inodecache();
out1:
	return err;
}

static void __exit exit_hpfs_fs(void)
{
	unregister_filesystem(&hpfs_fs_type);
	destroy_inodecache();
}

module_init(init_hpfs_fs)
module_exit(exit_hpfs_fs)
MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4 LT	1	/*
	2	* linux/fs/hpfs/super.c
	3	*
	4	* Mikulas Patocka ([email protected]), 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>
e18fa700	14	#include <linux/magic.h>
e8edc6e0	15	#include <linux/sched.h>
1da177e4 LT	16
	17	/* Mark the filesystem dirty, so that chkdsk checks it when os/2 booted */
	18
	19	static void mark_dirty(struct super_block *s)
	20	{
	21	if (hpfs_sb(s)->sb_chkdsk && !(s->s_flags & MS_RDONLY)) {
	22	struct buffer_head *bh;
	23	struct hpfs_spare_block *sb;
	24	if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
	25	sb->dirty = 1;
	26	sb->old_wrote = 0;
	27	mark_buffer_dirty(bh);
	28	brelse(bh);
	29	}
	30	}
	31	}
	32
	33	/* Mark the filesystem clean (mark it dirty for chkdsk if chkdsk==2 or if there
	34	were errors) */
	35
	36	static void unmark_dirty(struct super_block *s)
	37	{
	38	struct buffer_head *bh;
	39	struct hpfs_spare_block *sb;
	40	if (s->s_flags & MS_RDONLY) return;
	41	if ((sb = hpfs_map_sector(s, 17, &bh, 0))) {
	42	sb->dirty = hpfs_sb(s)->sb_chkdsk > 1 - hpfs_sb(s)->sb_was_error;
	43	sb->old_wrote = hpfs_sb(s)->sb_chkdsk >= 2 && !hpfs_sb(s)->sb_was_error;
	44	mark_buffer_dirty(bh);
	45	brelse(bh);
	46	}
	47	}
	48
	49	/* Filesystem error... */
352d94d0	50	static char err_buf[1024];
1da177e4	51
352d94d0	52	void hpfs_error(struct super_block s, const char fmt, ...)
1da177e4	53	{
352d94d0 AD	54	va_list args;
	55
	56	va_start(args, fmt);
	57	vsnprintf(err_buf, sizeof(err_buf), fmt, args);
	58	va_end(args);
	59
	60	printk("HPFS: filesystem error: %s", err_buf);
1da177e4 LT	61	if (!hpfs_sb(s)->sb_was_error) {
	62	if (hpfs_sb(s)->sb_err == 2) {
	63	printk("; crashing the system because you wanted it\n");
	64	mark_dirty(s);
	65	panic("HPFS panic");
	66	} else if (hpfs_sb(s)->sb_err == 1) {
	67	if (s->s_flags & MS_RDONLY) printk("; already mounted read-only\n");
	68	else {
	69	printk("; remounting read-only\n");
	70	mark_dirty(s);
	71	s->s_flags \|= MS_RDONLY;
	72	}
	73	} else if (s->s_flags & MS_RDONLY) printk("; going on - but anything won't be destroyed because it's read-only\n");
	74	else printk("; corrupted filesystem mounted read/write - your computer will explode within 20 seconds ... but you wanted it so!\n");
	75	} else printk("\n");
1da177e4 LT	76	hpfs_sb(s)->sb_was_error = 1;
	77	}
	78
	79	/*
	80	* A little trick to detect cycles in many hpfs structures and don't let the
	81	* kernel crash on corrupted filesystem. When first called, set c2 to 0.
	82	*
	83	* BTW. chkdsk doesn't detect cycles correctly. When I had 2 lost directories
	84	* nested each in other, chkdsk locked up happilly.
	85	*/
	86
	87	int hpfs_stop_cycles(struct super_block s, int key, int c1, int *c2,
	88	char *msg)
	89	{
	90	if (c2 && c1 == key) {
	91	hpfs_error(s, "cycle detected on key %08x in %s", key, msg);
	92	return 1;
	93	}
	94	(*c2)++;
	95	if (!((c2 - 1) & c2)) *c1 = key;
	96	return 0;
	97	}
	98
	99	static void hpfs_put_super(struct super_block *s)
	100	{
	101	struct hpfs_sb_info *sbi = hpfs_sb(s);
f99d49ad JJ	102	kfree(sbi->sb_cp_table);
f99d49ad JJ	103	kfree(sbi->sb_bmp_dir);
1da177e4 LT	104	unmark_dirty(s);
	105	s->s_fs_info = NULL;
	106	kfree(sbi);
	107	}
	108
	109	unsigned hpfs_count_one_bitmap(struct super_block *s, secno secno)
	110	{
	111	struct quad_buffer_head qbh;
	112	unsigned *bits;
	113	unsigned i, count;
	114	if (!(bits = hpfs_map_4sectors(s, secno, &qbh, 4))) return 0;
	115	count = 0;
	116	for (i = 0; i < 2048 / sizeof(unsigned); i++) {
	117	unsigned b;
	118	if (!bits[i]) continue;
	119	for (b = bits[i]; b; b>>=1) count += b & 1;
	120	}
	121	hpfs_brelse4(&qbh);
	122	return count;
	123	}
	124
	125	static unsigned count_bitmaps(struct super_block *s)
	126	{
	127	unsigned n, count, n_bands;
	128	n_bands = (hpfs_sb(s)->sb_fs_size + 0x3fff) >> 14;
	129	count = 0;
	130	for (n = 0; n < n_bands; n++)
	131	count += hpfs_count_one_bitmap(s, hpfs_sb(s)->sb_bmp_dir[n]);
	132	return count;
	133	}
	134
726c3342	135	static int hpfs_statfs(struct dentry dentry, struct kstatfs buf)
1da177e4	136	{
726c3342	137	struct super_block *s = dentry->d_sb;
1da177e4 LT	138	struct hpfs_sb_info *sbi = hpfs_sb(s);
	139	lock_kernel();
	140
	141	/if (sbi->sb_n_free == -1) {/
	142	sbi->sb_n_free = count_bitmaps(s);
	143	sbi->sb_n_free_dnodes = hpfs_count_one_bitmap(s, sbi->sb_dmap);
	144	/}/
	145	buf->f_type = s->s_magic;
	146	buf->f_bsize = 512;
	147	buf->f_blocks = sbi->sb_fs_size;
	148	buf->f_bfree = sbi->sb_n_free;
	149	buf->f_bavail = sbi->sb_n_free;
	150	buf->f_files = sbi->sb_dirband_size / 4;
	151	buf->f_ffree = sbi->sb_n_free_dnodes;
	152	buf->f_namelen = 254;
	153
	154	unlock_kernel();
	155
	156	return 0;
	157	}
	158
e18b890b	159	static struct kmem_cache * hpfs_inode_cachep;
1da177e4 LT	160
	161	static struct inode hpfs_alloc_inode(struct super_block sb)
	162	{
	163	struct hpfs_inode_info *ei;
e6b4f8da	164	ei = (struct hpfs_inode_info *)kmem_cache_alloc(hpfs_inode_cachep, GFP_NOFS);
1da177e4 LT	165	if (!ei)
	166	return NULL;
	167	ei->vfs_inode.i_version = 1;
	168	return &ei->vfs_inode;
	169	}
	170
	171	static void hpfs_destroy_inode(struct inode *inode)
	172	{
	173	kmem_cache_free(hpfs_inode_cachep, hpfs_i(inode));
	174	}
	175
51cc5068	176	static void init_once(void *foo)
1da177e4 LT	177	{
	178	struct hpfs_inode_info ei = (struct hpfs_inode_info ) foo;
	179
a35afb83 CL	180	mutex_init(&ei->i_mutex);
	181	mutex_init(&ei->i_parent_mutex);
	182	inode_init_once(&ei->vfs_inode);
1da177e4	183	}
20c2df83	184
1da177e4 LT	185	static int init_inodecache(void)
	186	{
	187	hpfs_inode_cachep = kmem_cache_create("hpfs_inode_cache",
	188	sizeof(struct hpfs_inode_info),
fffb60f9 PJ	189	0, (SLAB_RECLAIM_ACCOUNT\|
fffb60f9 PJ	190	SLAB_MEM_SPREAD),
20c2df83	191	init_once);
1da177e4 LT	192	if (hpfs_inode_cachep == NULL)
	193	return -ENOMEM;
	194	return 0;
	195	}
	196
	197	static void destroy_inodecache(void)
	198	{
1a1d92c1	199	kmem_cache_destroy(hpfs_inode_cachep);
1da177e4 LT	200	}
	201
	202	/*
	203	* A tiny parser for option strings, stolen from dosfs.
	204	* Stolen again from read-only hpfs.
	205	* And updated for table-driven option parsing.
	206	*/
	207
	208	enum {
	209	Opt_help, Opt_uid, Opt_gid, Opt_umask, Opt_case_lower, Opt_case_asis,
	210	Opt_conv_binary, Opt_conv_text, Opt_conv_auto,
	211	Opt_check_none, Opt_check_normal, Opt_check_strict,
	212	Opt_err_cont, Opt_err_ro, Opt_err_panic,
	213	Opt_eas_no, Opt_eas_ro, Opt_eas_rw,
	214	Opt_chkdsk_no, Opt_chkdsk_errors, Opt_chkdsk_always,
	215	Opt_timeshift, Opt_err,
	216	};
	217
a447c093	218	static const match_table_t tokens = {
1da177e4 LT	219	{Opt_help, "help"},
	220	{Opt_uid, "uid=%u"},
	221	{Opt_gid, "gid=%u"},
	222	{Opt_umask, "umask=%o"},
	223	{Opt_case_lower, "case=lower"},
	224	{Opt_case_asis, "case=asis"},
	225	{Opt_conv_binary, "conv=binary"},
	226	{Opt_conv_text, "conv=text"},
	227	{Opt_conv_auto, "conv=auto"},
	228	{Opt_check_none, "check=none"},
	229	{Opt_check_normal, "check=normal"},
	230	{Opt_check_strict, "check=strict"},
	231	{Opt_err_cont, "errors=continue"},
	232	{Opt_err_ro, "errors=remount-ro"},
	233	{Opt_err_panic, "errors=panic"},
	234	{Opt_eas_no, "eas=no"},
	235	{Opt_eas_ro, "eas=ro"},
	236	{Opt_eas_rw, "eas=rw"},
	237	{Opt_chkdsk_no, "chkdsk=no"},
	238	{Opt_chkdsk_errors, "chkdsk=errors"},
	239	{Opt_chkdsk_always, "chkdsk=always"},
	240	{Opt_timeshift, "timeshift=%d"},
	241	{Opt_err, NULL},
	242	};
	243
	244	static int parse_opts(char opts, uid_t uid, gid_t gid, umode_t umask,
	245	int lowercase, int conv, int eas, int chk, int *errs,
	246	int chkdsk, int timeshift)
	247	{
	248	char *p;
	249	int option;
	250
	251	if (!opts)
	252	return 1;
	253
	254	/printk("Parsing opts: '%s'\n",opts);/
	255
	256	while ((p = strsep(&opts, ",")) != NULL) {
	257	substring_t args[MAX_OPT_ARGS];
	258	int token;
	259	if (!*p)
	260	continue;
	261
	262	token = match_token(p, tokens, args);
	263	switch (token) {
	264	case Opt_help:
	265	return 2;
	266	case Opt_uid:
	267	if (match_int(args, &option))
	268	return 0;
	269	*uid = option;
	270	break;
	271	case Opt_gid:
	272	if (match_int(args, &option))
	273	return 0;
	274	*gid = option;
	275	break;
	276	case Opt_umask:
	277	if (match_octal(args, &option))
	278	return 0;
	279	*umask = option;
	280	break;
	281	case Opt_case_lower:
	282	*lowercase = 1;
283	break;
284	case Opt_case_asis:
285	*lowercase = 0;
286	break;
287	case Opt_conv_binary:
288	*conv = CONV_BINARY;
289	break;
290	case Opt_conv_text:
291	*conv = CONV_TEXT;
292	break;
293	case Opt_conv_auto:
294	*conv = CONV_AUTO;
295	break;
296	case Opt_check_none:
297	*chk = 0;
298	break;
299	case Opt_check_normal:
300	*chk = 1;
301	break;
302	case Opt_check_strict:
303	*chk = 2;
304	break;
305	case Opt_err_cont:
306	*errs = 0;
307	break;
308	case Opt_err_ro:
309	*errs = 1;
310	break;
311	case Opt_err_panic:
312	*errs = 2;
313	break;
314	case Opt_eas_no:
315	*eas = 0;
316	break;
317	case Opt_eas_ro:
318	*eas = 1;
319	break;
320	case Opt_eas_rw:
321	*eas = 2;
322	break;
323	case Opt_chkdsk_no:
324	*chkdsk = 0;
325	break;
326	case Opt_chkdsk_errors:
327	*chkdsk = 1;
328	break;
329	case Opt_chkdsk_always:
330	*chkdsk = 2;
331	break;
332	case Opt_timeshift:
333	{
334	int m = 1;
335	char *rhs = args[0].from;
336	if (!rhs \|\| !*rhs)
337	return 0;
338	if (*rhs == '-') m = -1;
339	if (rhs == '+' \|\| rhs == '-') rhs++;
340	timeshift = simple_strtoul(rhs, &rhs, 0) m;
341	if (*rhs)
342	return 0;
343	break;
344	}
345	default:
346	return 0;
347	}
348	}
349	return 1;
350	}
351
352	static inline void hpfs_help(void)
353	{
354	printk("\n\
355	HPFS filesystem options:\n\
356	help do not mount and display this text\n\
357	uid=xxx set uid of files that don't have uid specified in eas\n\
358	gid=xxx set gid of files that don't have gid specified in eas\n\
359	umask=xxx set mode of files that don't have mode specified in eas\n\
360	case=lower lowercase all files\n\
361	case=asis do not lowercase files (default)\n\
362	conv=binary do not convert CR/LF -> LF (default)\n\
363	conv=auto convert only files with known text extensions\n\
364	conv=text convert all files\n\
365	check=none no fs checks - kernel may crash on corrupted filesystem\n\
366	check=normal do some checks - it should not crash (default)\n\
367	check=strict do extra time-consuming checks, used for debugging\n\
368	errors=continue continue on errors\n\
369	errors=remount-ro remount read-only if errors found (default)\n\
370	errors=panic panic on errors\n\
371	chkdsk=no do not mark fs for chkdsking even if there were errors\n\
372	chkdsk=errors mark fs dirty if errors found (default)\n\
373	chkdsk=always always mark fs dirty - used for debugging\n\
374	eas=no ignore extended attributes\n\
375	eas=ro read but do not write extended attributes\n\
376	eas=rw r/w eas => enables chmod, chown, mknod, ln -s (default)\n\
377	timeshift=nnn add nnn seconds to file times\n\
378	\n");
379	}
380
381	static int hpfs_remount_fs(struct super_block s, int flags, char *data)
382	{
383	uid_t uid;
384	gid_t gid;
385	umode_t umask;
386	int lowercase, conv, eas, chk, errs, chkdsk, timeshift;
387	int o;
388	struct hpfs_sb_info *sbi = hpfs_sb(s);
6d9c1fd4	389	char *new_opts = kstrdup(data, GFP_KERNEL);
1da177e4 LT	390
	391	*flags \|= MS_NOATIME;
	392
	393	uid = sbi->sb_uid; gid = sbi->sb_gid;
	394	umask = 0777 & ~sbi->sb_mode;
	395	lowercase = sbi->sb_lowercase; conv = sbi->sb_conv;
	396	eas = sbi->sb_eas; chk = sbi->sb_chk; chkdsk = sbi->sb_chkdsk;
	397	errs = sbi->sb_err; timeshift = sbi->sb_timeshift;
	398
	399	if (!(o = parse_opts(data, &uid, &gid, &umask, &lowercase, &conv,
	400	&eas, &chk, &errs, &chkdsk, &timeshift))) {
	401	printk("HPFS: bad mount options.\n");
6d9c1fd4	402	goto out_err;
1da177e4 LT	403	}
	404	if (o == 2) {
	405	hpfs_help();
6d9c1fd4	406	goto out_err;
1da177e4 LT	407	}
	408	if (timeshift != sbi->sb_timeshift) {
	409	printk("HPFS: timeshift can't be changed using remount.\n");
6d9c1fd4	410	goto out_err;
1da177e4 LT	411	}
	412
	413	unmark_dirty(s);
	414
	415	sbi->sb_uid = uid; sbi->sb_gid = gid;
	416	sbi->sb_mode = 0777 & ~umask;
	417	sbi->sb_lowercase = lowercase; sbi->sb_conv = conv;
	418	sbi->sb_eas = eas; sbi->sb_chk = chk; sbi->sb_chkdsk = chkdsk;
	419	sbi->sb_err = errs; sbi->sb_timeshift = timeshift;
	420
	421	if (!(*flags & MS_RDONLY)) mark_dirty(s);
	422
6d9c1fd4 MS	423	kfree(s->s_options);
	424	s->s_options = new_opts;
	425
1da177e4	426	return 0;
6d9c1fd4 MS	427
	428	out_err:
	429	kfree(new_opts);
	430	return -EINVAL;
1da177e4 LT	431	}
	432
	433	/* Super operations */
	434
ee9b6d61	435	static const struct super_operations hpfs_sops =
1da177e4 LT	436	{
	437	.alloc_inode = hpfs_alloc_inode,
	438	.destroy_inode = hpfs_destroy_inode,
	439	.delete_inode = hpfs_delete_inode,
	440	.put_super = hpfs_put_super,
	441	.statfs = hpfs_statfs,
	442	.remount_fs = hpfs_remount_fs,
6d9c1fd4	443	.show_options = generic_show_options,
1da177e4 LT	444	};
	445
	446	static int hpfs_fill_super(struct super_block s, void options, int silent)
	447	{
	448	struct buffer_head bh0, bh1, *bh2;
	449	struct hpfs_boot_block *bootblock;
	450	struct hpfs_super_block *superblock;
	451	struct hpfs_spare_block *spareblock;
	452	struct hpfs_sb_info *sbi;
	453	struct inode *root;
	454
	455	uid_t uid;
	456	gid_t gid;
	457	umode_t umask;
	458	int lowercase, conv, eas, chk, errs, chkdsk, timeshift;
	459
	460	dnode_secno root_dno;
	461	struct hpfs_dirent *de = NULL;
	462	struct quad_buffer_head qbh;
	463
	464	int o;
	465
6d9c1fd4 MS	466	save_mount_options(s, options);
6d9c1fd4 MS	467
f8314dc6	468	sbi = kzalloc(sizeof(*sbi), GFP_KERNEL);
1da177e4 LT	469	if (!sbi)
	470	return -ENOMEM;
	471	s->s_fs_info = sbi;
1da177e4 LT	472
	473	sbi->sb_bmp_dir = NULL;
	474	sbi->sb_cp_table = NULL;
	475
	476	init_MUTEX(&sbi->hpfs_creation_de);
	477
de395b8a DH	478	uid = current_uid();
de395b8a DH	479	gid = current_gid();
1da177e4 LT	480	umask = current->fs->umask;
	481	lowercase = 0;
	482	conv = CONV_BINARY;
	483	eas = 2;
	484	chk = 1;
	485	errs = 1;
	486	chkdsk = 1;
	487	timeshift = 0;
	488
	489	if (!(o = parse_opts(options, &uid, &gid, &umask, &lowercase, &conv,
	490	&eas, &chk, &errs, &chkdsk, &timeshift))) {
	491	printk("HPFS: bad mount options.\n");
	492	goto bail0;
	493	}
	494	if (o==2) {
	495	hpfs_help();
	496	goto bail0;
	497	}
	498
	499	/sbi->sb_mounting = 1;/
	500	sb_set_blocksize(s, 512);
	501	sbi->sb_fs_size = -1;
	502	if (!(bootblock = hpfs_map_sector(s, 0, &bh0, 0))) goto bail1;
	503	if (!(superblock = hpfs_map_sector(s, 16, &bh1, 1))) goto bail2;
	504	if (!(spareblock = hpfs_map_sector(s, 17, &bh2, 0))) goto bail3;
	505
	506	/* Check magics */
	507	if (/*bootblock->magic != BB_MAGIC
	508	\|\|*/ superblock->magic != SB_MAGIC
	509	\|\| spareblock->magic != SP_MAGIC) {
	510	if (!silent) printk("HPFS: Bad magic ... probably not HPFS\n");
	511	goto bail4;
	512	}
	513
	514	/* Check version */
	515	if (!(s->s_flags & MS_RDONLY) &&
	516	superblock->funcversion != 2 && superblock->funcversion != 3) {
	517	printk("HPFS: Bad version %d,%d. Mount readonly to go around\n",
	518	(int)superblock->version, (int)superblock->funcversion);
	519	printk("HPFS: please try recent version of HPFS driver at http://artax.karlin.mff.cuni.cz/~mikulas/vyplody/hpfs/index-e.cgi and if it still can't understand this format, contact author - [email protected]\n");
	520	goto bail4;
	521	}
	522
	523	s->s_flags \|= MS_NOATIME;
	524
	525	/* Fill superblock stuff */
	526	s->s_magic = HPFS_SUPER_MAGIC;
	527	s->s_op = &hpfs_sops;
	528
	529	sbi->sb_root = superblock->root;
	530	sbi->sb_fs_size = superblock->n_sectors;
	531	sbi->sb_bitmaps = superblock->bitmaps;
	532	sbi->sb_dirband_start = superblock->dir_band_start;
	533	sbi->sb_dirband_size = superblock->n_dir_band;
	534	sbi->sb_dmap = superblock->dir_band_bitmap;
	535	sbi->sb_uid = uid;
	536	sbi->sb_gid = gid;
	537	sbi->sb_mode = 0777 & ~umask;
	538	sbi->sb_n_free = -1;
	539	sbi->sb_n_free_dnodes = -1;
	540	sbi->sb_lowercase = lowercase;
	541	sbi->sb_conv = conv;
	542	sbi->sb_eas = eas;
	543	sbi->sb_chk = chk;
544	sbi->sb_chkdsk = chkdsk;
545	sbi->sb_err = errs;
546	sbi->sb_timeshift = timeshift;
547	sbi->sb_was_error = 0;
548	sbi->sb_cp_table = NULL;
549	sbi->sb_c_bitmap = -1;
550	sbi->sb_max_fwd_alloc = 0xffffff;
551
552	/* Load bitmap directory */
553	if (!(sbi->sb_bmp_dir = hpfs_load_bitmap_directory(s, superblock->bitmaps)))
554	goto bail4;
555
556	/* Check for general fs errors*/
557	if (spareblock->dirty && !spareblock->old_wrote) {
558	if (errs == 2) {
559	printk("HPFS: Improperly stopped, not mounted\n");
560	goto bail4;
561	}
562	hpfs_error(s, "improperly stopped");
563	}
564
565	if (!(s->s_flags & MS_RDONLY)) {
566	spareblock->dirty = 1;
567	spareblock->old_wrote = 0;
568	mark_buffer_dirty(bh2);
569	}
570
571	if (spareblock->hotfixes_used \|\| spareblock->n_spares_used) {
572	if (errs >= 2) {
573	printk("HPFS: Hotfixes not supported here, try chkdsk\n");
574	mark_dirty(s);
575	goto bail4;
576	}
577	hpfs_error(s, "hotfixes not supported here, try chkdsk");
578	if (errs == 0) printk("HPFS: Proceeding, but your filesystem will be probably corrupted by this driver...\n");
579	else printk("HPFS: This driver may read bad files or crash when operating on disk with hotfixes.\n");
580	}
581	if (spareblock->n_dnode_spares != spareblock->n_dnode_spares_free) {
582	if (errs >= 2) {
583	printk("HPFS: Spare dnodes used, try chkdsk\n");
584	mark_dirty(s);
585	goto bail4;
586	}
587	hpfs_error(s, "warning: spare dnodes used, try chkdsk");
588	if (errs == 0) printk("HPFS: Proceeding, but your filesystem could be corrupted if you delete files or directories\n");
589	}
590	if (chk) {
591	unsigned a;
592	if (superblock->dir_band_end - superblock->dir_band_start + 1 != superblock->n_dir_band \|\|
593	superblock->dir_band_end < superblock->dir_band_start \|\| superblock->n_dir_band > 0x4000) {
594	hpfs_error(s, "dir band size mismatch: dir_band_start==%08x, dir_band_end==%08x, n_dir_band==%08x",
595	superblock->dir_band_start, superblock->dir_band_end, superblock->n_dir_band);
596	goto bail4;
597	}
598	a = sbi->sb_dirband_size;
599	sbi->sb_dirband_size = 0;
600	if (hpfs_chk_sectors(s, superblock->dir_band_start, superblock->n_dir_band, "dir_band") \|\|
601	hpfs_chk_sectors(s, superblock->dir_band_bitmap, 4, "dir_band_bitmap") \|\|
602	hpfs_chk_sectors(s, superblock->bitmaps, 4, "bitmaps")) {
603	mark_dirty(s);
604	goto bail4;
605	}
606	sbi->sb_dirband_size = a;
607	} else printk("HPFS: You really don't want any checks? You are crazy...\n");
608
609	/* Load code page table */
610	if (spareblock->n_code_pages)
611	if (!(sbi->sb_cp_table = hpfs_load_code_page(s, spareblock->code_page_dir)))
612	printk("HPFS: Warning: code page support is disabled\n");
613
614	brelse(bh2);
615	brelse(bh1);
616	brelse(bh0);
617
618	root = iget_locked(s, sbi->sb_root);
619	if (!root)
620	goto bail0;
621	hpfs_init_inode(root);
622	hpfs_read_inode(root);
623	unlock_new_inode(root);
624	s->s_root = d_alloc_root(root);
625	if (!s->s_root) {
626	iput(root);
627	goto bail0;
628	}
629	hpfs_set_dentry_operations(s->s_root);
630
631	/*
632	* find the root directory's . pointer & finish filling in the inode
633	*/
634
635	root_dno = hpfs_fnode_dno(s, sbi->sb_root);
636	if (root_dno)
637	de = map_dirent(root, root_dno, "\001\001", 2, NULL, &qbh);
638	if (!de)
639	hpfs_error(s, "unable to find root dir");
640	else {
641	root->i_atime.tv_sec = local_to_gmt(s, de->read_date);
642	root->i_atime.tv_nsec = 0;
643	root->i_mtime.tv_sec = local_to_gmt(s, de->write_date);
644	root->i_mtime.tv_nsec = 0;
645	root->i_ctime.tv_sec = local_to_gmt(s, de->creation_date);
646	root->i_ctime.tv_nsec = 0;
647	hpfs_i(root)->i_ea_size = de->ea_size;
648	hpfs_i(root)->i_parent_dir = root->i_ino;
649	if (root->i_size == -1)
650	root->i_size = 2048;
651	if (root->i_blocks == -1)
652	root->i_blocks = 5;
653	hpfs_brelse4(&qbh);
654	}
655	return 0;
656
657	bail4: brelse(bh2);
658	bail3: brelse(bh1);
659	bail2: brelse(bh0);
660	bail1:
661	bail0:
f99d49ad JJ	662	kfree(sbi->sb_bmp_dir);
f99d49ad JJ	663	kfree(sbi->sb_cp_table);
1da177e4 LT	664	s->s_fs_info = NULL;
	665	kfree(sbi);
	666	return -EINVAL;
	667	}
	668
454e2398 DH	669	static int hpfs_get_sb(struct file_system_type *fs_type,
454e2398 DH	670	int flags, const char dev_name, void data, struct vfsmount *mnt)
1da177e4	671	{
454e2398 DH	672	return get_sb_bdev(fs_type, flags, dev_name, data, hpfs_fill_super,
454e2398 DH	673	mnt);
1da177e4 LT	674	}
	675
	676	static struct file_system_type hpfs_fs_type = {
	677	.owner = THIS_MODULE,
	678	.name = "hpfs",
	679	.get_sb = hpfs_get_sb,
	680	.kill_sb = kill_block_super,
	681	.fs_flags = FS_REQUIRES_DEV,
	682	};
	683
	684	static int __init init_hpfs_fs(void)
	685	{
	686	int err = init_inodecache();
	687	if (err)
	688	goto out1;
	689	err = register_filesystem(&hpfs_fs_type);
	690	if (err)
	691	goto out;
	692	return 0;
	693	out:
	694	destroy_inodecache();
	695	out1:
	696	return err;
	697	}
	698
	699	static void __exit exit_hpfs_fs(void)
	700	{
	701	unregister_filesystem(&hpfs_fs_type);
	702	destroy_inodecache();
	703	}
	704
	705	module_init(init_hpfs_fs)
	706	module_exit(exit_hpfs_fs)
	707	MODULE_LICENSE("GPL");