[net-next-2.6.git] / arch / powerpc / platforms / cell / spufs / inode.c

/*
 * SPU file system
 *
 * (C) Copyright IBM Deutschland Entwicklung GmbH 2005
 *
 * Author: Arnd Bergmann <arndb@de.ibm.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include <linux/file.h>
#include <linux/fs.h>
#include <linux/backing-dev.h>
#include <linux/init.h>
#include <linux/ioctl.h>
#include <linux/module.h>
#include <linux/mount.h>
#include <linux/namei.h>
#include <linux/pagemap.h>
#include <linux/poll.h>
#include <linux/slab.h>
#include <linux/parser.h>

#include <asm/prom.h>
#include <asm/semaphore.h>
#include <asm/spu.h>
#include <asm/spu_priv1.h>
#include <asm/uaccess.h>

#include "spufs.h"

static struct kmem_cache *spufs_inode_cache;
char *isolated_loader;

static struct inode *
spufs_alloc_inode(struct super_block *sb)
{
	struct spufs_inode_info *ei;

	ei = kmem_cache_alloc(spufs_inode_cache, GFP_KERNEL);
	if (!ei)
		return NULL;

	ei->i_gang = NULL;
	ei->i_ctx = NULL;
	ei->i_openers = 0;

	return &ei->vfs_inode;
}

static void
spufs_destroy_inode(struct inode *inode)
{
	kmem_cache_free(spufs_inode_cache, SPUFS_I(inode));
}

static void
spufs_init_once(void *p, struct kmem_cache * cachep, unsigned long flags)
{
	struct spufs_inode_info *ei = p;

	inode_init_once(&ei->vfs_inode);
}

static struct inode *
spufs_new_inode(struct super_block *sb, int mode)
{
	struct inode *inode;

	inode = new_inode(sb);
	if (!inode)
		goto out;

	inode->i_mode = mode;
	inode->i_uid = current->fsuid;
	inode->i_gid = current->fsgid;
	inode->i_blocks = 0;
	inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
out:
	return inode;
}

static int
spufs_setattr(struct dentry *dentry, struct iattr *attr)
{
	struct inode *inode = dentry->d_inode;

	if ((attr->ia_valid & ATTR_SIZE) &&
	    (attr->ia_size != inode->i_size))
		return -EINVAL;
	return inode_setattr(inode, attr);
}


static int
spufs_new_file(struct super_block *sb, struct dentry *dentry,
		const struct file_operations *fops, int mode,
		struct spu_context *ctx)
{
	static struct inode_operations spufs_file_iops = {
		.setattr = spufs_setattr,
	};
	struct inode *inode;
	int ret;

	ret = -ENOSPC;
	inode = spufs_new_inode(sb, S_IFREG | mode);
	if (!inode)
		goto out;

	ret = 0;
	inode->i_op = &spufs_file_iops;
	inode->i_fop = fops;
	inode->i_private = SPUFS_I(inode)->i_ctx = get_spu_context(ctx);
	d_add(dentry, inode);
out:
	return ret;
}

static void
spufs_delete_inode(struct inode *inode)
{
	struct spufs_inode_info *ei = SPUFS_I(inode);

	if (ei->i_ctx)
		put_spu_context(ei->i_ctx);
	if (ei->i_gang)
		put_spu_gang(ei->i_gang);
	clear_inode(inode);
}

static void spufs_prune_dir(struct dentry *dir)
{
	struct dentry *dentry, *tmp;

	mutex_lock(&dir->d_inode->i_mutex);
	list_for_each_entry_safe(dentry, tmp, &dir->d_subdirs, d_u.d_child) {
		spin_lock(&dcache_lock);
		spin_lock(&dentry->d_lock);
		if (!(d_unhashed(dentry)) && dentry->d_inode) {
			dget_locked(dentry);
			__d_drop(dentry);
			spin_unlock(&dentry->d_lock);
			simple_unlink(dir->d_inode, dentry);
			spin_unlock(&dcache_lock);
			dput(dentry);
		} else {
			spin_unlock(&dentry->d_lock);
			spin_unlock(&dcache_lock);
		}
	}
	shrink_dcache_parent(dir);
	mutex_unlock(&dir->d_inode->i_mutex);
}

/* Caller must hold parent->i_mutex */
static int spufs_rmdir(struct inode *parent, struct dentry *dir)
{
	/* remove all entries */
	spufs_prune_dir(dir);

	return simple_rmdir(parent, dir);
}

static int spufs_fill_dir(struct dentry *dir, struct tree_descr *files,
			  int mode, struct spu_context *ctx)
{
	struct dentry *dentry;
	int ret;

	while (files->name && files->name[0]) {
		ret = -ENOMEM;
		dentry = d_alloc_name(dir, files->name);
		if (!dentry)
			goto out;
		ret = spufs_new_file(dir->d_sb, dentry, files->ops,
					files->mode & mode, ctx);
		if (ret)
			goto out;
		files++;
	}
	return 0;
out:
	spufs_prune_dir(dir);
	return ret;
}

static int spufs_dir_close(struct inode *inode, struct file *file)
{
	struct spu_context *ctx;
	struct inode *parent;
	struct dentry *dir;
	int ret;

	dir = file->f_path.dentry;
	parent = dir->d_parent->d_inode;
	ctx = SPUFS_I(dir->d_inode)->i_ctx;

	mutex_lock(&parent->i_mutex);
	ret = spufs_rmdir(parent, dir);
	mutex_unlock(&parent->i_mutex);
	WARN_ON(ret);

	/* We have to give up the mm_struct */
	spu_forget(ctx);

	return dcache_dir_close(inode, file);
}

const struct inode_operations spufs_dir_inode_operations = {
	.lookup = simple_lookup,
};

const struct file_operations spufs_context_fops = {
	.open		= dcache_dir_open,
	.release	= spufs_dir_close,
	.llseek		= dcache_dir_lseek,
	.read		= generic_read_dir,
	.readdir	= dcache_readdir,
	.fsync		= simple_sync_file,
};
EXPORT_SYMBOL_GPL(spufs_context_fops);

static int
spufs_mkdir(struct inode *dir, struct dentry *dentry, unsigned int flags,
		int mode)
{
	int ret;
	struct inode *inode;
	struct spu_context *ctx;

	ret = -ENOSPC;
	inode = spufs_new_inode(dir->i_sb, mode | S_IFDIR);
	if (!inode)
		goto out;

	if (dir->i_mode & S_ISGID) {
		inode->i_gid = dir->i_gid;
		inode->i_mode &= S_ISGID;
	}
	ctx = alloc_spu_context(SPUFS_I(dir)->i_gang); /* XXX gang */
	SPUFS_I(inode)->i_ctx = ctx;
	if (!ctx)
		goto out_iput;

	ctx->flags = flags;
	inode->i_op = &spufs_dir_inode_operations;
	inode->i_fop = &simple_dir_operations;
	if (flags & SPU_CREATE_NOSCHED)
		ret = spufs_fill_dir(dentry, spufs_dir_nosched_contents,
					 mode, ctx);
	else
		ret = spufs_fill_dir(dentry, spufs_dir_contents, mode, ctx);

	if (ret)
		goto out_free_ctx;

	d_instantiate(dentry, inode);
	dget(dentry);
	dir->i_nlink++;
	dentry->d_inode->i_nlink++;
	goto out;

out_free_ctx:
	put_spu_context(ctx);
out_iput:
	iput(inode);
out:
	return ret;
}

static int spufs_context_open(struct dentry *dentry, struct vfsmount *mnt)
{
	int ret;
	struct file *filp;

	ret = get_unused_fd();
	if (ret < 0) {
		dput(dentry);
		mntput(mnt);
		goto out;
	}

	filp = dentry_open(dentry, mnt, O_RDONLY);
	if (IS_ERR(filp)) {
		put_unused_fd(ret);
		ret = PTR_ERR(filp);
		goto out;
	}

	filp->f_op = &spufs_context_fops;
	fd_install(ret, filp);
out:
	return ret;
}

static int spufs_create_context(struct inode *inode,
			struct dentry *dentry,
			struct vfsmount *mnt, int flags, int mode)
{
	int ret;

	ret = -EPERM;
	if ((flags & SPU_CREATE_NOSCHED) &&
	    !capable(CAP_SYS_NICE))
		goto out_unlock;

	ret = -EINVAL;
	if ((flags & (SPU_CREATE_NOSCHED | SPU_CREATE_ISOLATE))
	    == SPU_CREATE_ISOLATE)
		goto out_unlock;

	ret = -ENODEV;
	if ((flags & SPU_CREATE_ISOLATE) && !isolated_loader)
		goto out_unlock;

	ret = spufs_mkdir(inode, dentry, flags, mode & S_IRWXUGO);
	if (ret)
		goto out_unlock;

	/*
	 * get references for dget and mntget, will be released
	 * in error path of *_open().
	 */
	ret = spufs_context_open(dget(dentry), mntget(mnt));
	if (ret < 0) {
		WARN_ON(spufs_rmdir(inode, dentry));
		mutex_unlock(&inode->i_mutex);
		spu_forget(SPUFS_I(dentry->d_inode)->i_ctx);
		goto out;
	}

out_unlock:
	mutex_unlock(&inode->i_mutex);
out:
	dput(dentry);
	return ret;
}

static int spufs_rmgang(struct inode *root, struct dentry *dir)
{
	/* FIXME: this fails if the dir is not empty,
	          which causes a leak of gangs. */
	return simple_rmdir(root, dir);
}

static int spufs_gang_close(struct inode *inode, struct file *file)
{
	struct inode *parent;
	struct dentry *dir;
	int ret;

	dir = file->f_path.dentry;
	parent = dir->d_parent->d_inode;

	ret = spufs_rmgang(parent, dir);
	WARN_ON(ret);

	return dcache_dir_close(inode, file);
}

const struct file_operations spufs_gang_fops = {
	.open		= dcache_dir_open,
	.release	= spufs_gang_close,
	.llseek		= dcache_dir_lseek,
	.read		= generic_read_dir,
	.readdir	= dcache_readdir,
	.fsync		= simple_sync_file,
};

static int
spufs_mkgang(struct inode *dir, struct dentry *dentry, int mode)
{
	int ret;
	struct inode *inode;
	struct spu_gang *gang;

	ret = -ENOSPC;
	inode = spufs_new_inode(dir->i_sb, mode | S_IFDIR);
	if (!inode)
		goto out;

	ret = 0;
	if (dir->i_mode & S_ISGID) {
		inode->i_gid = dir->i_gid;
		inode->i_mode &= S_ISGID;
	}
	gang = alloc_spu_gang();
	SPUFS_I(inode)->i_ctx = NULL;
	SPUFS_I(inode)->i_gang = gang;
	if (!gang)
		goto out_iput;

	inode->i_op = &spufs_dir_inode_operations;
	inode->i_fop = &simple_dir_operations;

	d_instantiate(dentry, inode);
	dget(dentry);
	dir->i_nlink++;
	dentry->d_inode->i_nlink++;
	return ret;

out_iput:
	iput(inode);
out:
	return ret;
}

static int spufs_gang_open(struct dentry *dentry, struct vfsmount *mnt)
{
	int ret;
	struct file *filp;

	ret = get_unused_fd();
	if (ret < 0) {
		dput(dentry);
		mntput(mnt);
		goto out;
	}

	filp = dentry_open(dentry, mnt, O_RDONLY);
	if (IS_ERR(filp)) {
		put_unused_fd(ret);
		ret = PTR_ERR(filp);
		goto out;
	}

	filp->f_op = &spufs_gang_fops;
	fd_install(ret, filp);
out:
	return ret;
}

static int spufs_create_gang(struct inode *inode,
			struct dentry *dentry,
			struct vfsmount *mnt, int mode)
{
	int ret;

	ret = spufs_mkgang(inode, dentry, mode & S_IRWXUGO);
	if (ret)
		goto out;

	/*
	 * get references for dget and mntget, will be released
	 * in error path of *_open().
	 */
	ret = spufs_gang_open(dget(dentry), mntget(mnt));
	if (ret < 0)
		WARN_ON(spufs_rmgang(inode, dentry));

out:
	mutex_unlock(&inode->i_mutex);
	dput(dentry);
	return ret;
}


static struct file_system_type spufs_type;

long spufs_create(struct nameidata *nd, unsigned int flags, mode_t mode)
{
	struct dentry *dentry;
	int ret;

	ret = -EINVAL;
	/* check if we are on spufs */
	if (nd->dentry->d_sb->s_type != &spufs_type)
		goto out;

	/* don't accept undefined flags */
	if (flags & (~SPU_CREATE_FLAG_ALL))
		goto out;

	/* only threads can be underneath a gang */
	if (nd->dentry != nd->dentry->d_sb->s_root) {
		if ((flags & SPU_CREATE_GANG) ||
		    !SPUFS_I(nd->dentry->d_inode)->i_gang)
			goto out;
	}

	dentry = lookup_create(nd, 1);
	ret = PTR_ERR(dentry);
	if (IS_ERR(dentry))
		goto out_dir;

	ret = -EEXIST;
	if (dentry->d_inode)
		goto out_dput;

	mode &= ~current->fs->umask;

	if (flags & SPU_CREATE_GANG)
		return spufs_create_gang(nd->dentry->d_inode,
					dentry, nd->mnt, mode);
	else
		return spufs_create_context(nd->dentry->d_inode,
					dentry, nd->mnt, flags, mode);

out_dput:
	dput(dentry);
out_dir:
	mutex_unlock(&nd->dentry->d_inode->i_mutex);
out:
	return ret;
}

/* File system initialization */
enum {
	Opt_uid, Opt_gid, Opt_mode, Opt_err,
};

static match_table_t spufs_tokens = {
	{ Opt_uid,  "uid=%d" },
	{ Opt_gid,  "gid=%d" },
	{ Opt_mode, "mode=%o" },
	{ Opt_err,   NULL  },
};

static int
spufs_parse_options(char *options, struct inode *root)
{
	char *p;
	substring_t args[MAX_OPT_ARGS];

	while ((p = strsep(&options, ",")) != NULL) {
		int token, option;

		if (!*p)
			continue;

		token = match_token(p, spufs_tokens, args);
		switch (token) {
		case Opt_uid:
			if (match_int(&args[0], &option))
				return 0;
			root->i_uid = option;
			break;
		case Opt_gid:
			if (match_int(&args[0], &option))
				return 0;
			root->i_gid = option;
			break;
		case Opt_mode:
			if (match_octal(&args[0], &option))
				return 0;
			root->i_mode = option | S_IFDIR;
			break;
		default:
			return 0;
		}
	}
	return 1;
}

static void spufs_exit_isolated_loader(void)
{
	kfree(isolated_loader);
}

static void
spufs_init_isolated_loader(void)
{
	struct device_node *dn;
	const char *loader;
	int size;

	dn = of_find_node_by_path("/spu-isolation");
	if (!dn)
		return;

	loader = of_get_property(dn, "loader", &size);
	if (!loader)
		return;

	/* kmalloc should align on a 16 byte boundary..* */
	isolated_loader = kmalloc(size, GFP_KERNEL);
	if (!isolated_loader)
		return;

	memcpy(isolated_loader, loader, size);
	printk(KERN_INFO "spufs: SPU isolation mode enabled\n");
}

static int
spufs_create_root(struct super_block *sb, void *data)
{
	struct inode *inode;
	int ret;

	ret = -ENOMEM;
	inode = spufs_new_inode(sb, S_IFDIR | 0775);
	if (!inode)
		goto out;

	inode->i_op = &spufs_dir_inode_operations;
	inode->i_fop = &simple_dir_operations;
	SPUFS_I(inode)->i_ctx = NULL;

	ret = -EINVAL;
	if (!spufs_parse_options(data, inode))
		goto out_iput;

	ret = -ENOMEM;
	sb->s_root = d_alloc_root(inode);
	if (!sb->s_root)
		goto out_iput;

	return 0;
out_iput:
	iput(inode);
out:
	return ret;
}

static int
spufs_fill_super(struct super_block *sb, void *data, int silent)
{
	static struct super_operations s_ops = {
		.alloc_inode = spufs_alloc_inode,
		.destroy_inode = spufs_destroy_inode,
		.statfs = simple_statfs,
		.delete_inode = spufs_delete_inode,
		.drop_inode = generic_delete_inode,
	};

	sb->s_maxbytes = MAX_LFS_FILESIZE;
	sb->s_blocksize = PAGE_CACHE_SIZE;
	sb->s_blocksize_bits = PAGE_CACHE_SHIFT;
	sb->s_magic = SPUFS_MAGIC;
	sb->s_op = &s_ops;

	return spufs_create_root(sb, data);
}

static int
spufs_get_sb(struct file_system_type *fstype, int flags,
		const char *name, void *data, struct vfsmount *mnt)
{
	return get_sb_single(fstype, flags, data, spufs_fill_super, mnt);
}

static struct file_system_type spufs_type = {
	.owner = THIS_MODULE,
	.name = "spufs",
	.get_sb = spufs_get_sb,
	.kill_sb = kill_litter_super,
};

static int __init spufs_init(void)
{
	int ret;

	ret = -ENODEV;
	if (!spu_management_ops)
		goto out;

	ret = -ENOMEM;
	spufs_inode_cache = kmem_cache_create("spufs_inode_cache",
			sizeof(struct spufs_inode_info), 0,
			SLAB_HWCACHE_ALIGN, spufs_init_once, NULL);

	if (!spufs_inode_cache)
		goto out;
	ret = spu_sched_init();
	if (ret)
		goto out_cache;
	ret = register_filesystem(&spufs_type);
	if (ret)
		goto out_sched;
	ret = register_spu_syscalls(&spufs_calls);
	if (ret)
		goto out_fs;
	ret = register_arch_coredump_calls(&spufs_coredump_calls);
	if (ret)
		goto out_syscalls;

	spufs_init_isolated_loader();

	return 0;

out_syscalls:
	unregister_spu_syscalls(&spufs_calls);
out_fs:
	unregister_filesystem(&spufs_type);
out_sched:
	spu_sched_exit();
out_cache:
	kmem_cache_destroy(spufs_inode_cache);
out:
	return ret;
}
module_init(spufs_init);

static void __exit spufs_exit(void)
{
	spu_sched_exit();
	spufs_exit_isolated_loader();
	unregister_arch_coredump_calls(&spufs_coredump_calls);
	unregister_spu_syscalls(&spufs_calls);
	unregister_filesystem(&spufs_type);
	kmem_cache_destroy(spufs_inode_cache);
}
module_exit(spufs_exit);

MODULE_LICENSE("GPL");
MODULE_AUTHOR("Arnd Bergmann <arndb@de.ibm.com>");
Commit	Line	Data
67207b96 AB	1	/*
	2	* SPU file system
	3	*
	4	* (C) Copyright IBM Deutschland Entwicklung GmbH 2005
	5	*
	6	* Author: Arnd Bergmann <arndb@de.ibm.com>
	7	*
	8	* This program is free software; you can redistribute it and/or modify
	9	* it under the terms of the GNU General Public License as published by
	10	* the Free Software Foundation; either version 2, or (at your option)
	11	* any later version.
	12	*
	13	* This program is distributed in the hope that it will be useful,
	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	16	* GNU General Public License for more details.
	17	*
	18	* You should have received a copy of the GNU General Public License
	19	* along with this program; if not, write to the Free Software
	20	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
	21	*/
	22
	23	#include <linux/file.h>
	24	#include <linux/fs.h>
	25	#include <linux/backing-dev.h>
	26	#include <linux/init.h>
	27	#include <linux/ioctl.h>
	28	#include <linux/module.h>
346f4d3c	29	#include <linux/mount.h>
67207b96 AB	30	#include <linux/namei.h>
	31	#include <linux/pagemap.h>
	32	#include <linux/poll.h>
	33	#include <linux/slab.h>
	34	#include <linux/parser.h>
	35
0afacde3	36	#include <asm/prom.h>
67207b96 AB	37	#include <asm/semaphore.h>
67207b96 AB	38	#include <asm/spu.h>
ccf17e9d	39	#include <asm/spu_priv1.h>
67207b96 AB	40	#include <asm/uaccess.h>
	41
	42	#include "spufs.h"
	43
e18b890b	44	static struct kmem_cache *spufs_inode_cache;
c6730ed4	45	char *isolated_loader;
67207b96	46
67207b96 AB	47	static struct inode *
	48	spufs_alloc_inode(struct super_block *sb)
	49	{
	50	struct spufs_inode_info *ei;
	51
e94b1766	52	ei = kmem_cache_alloc(spufs_inode_cache, GFP_KERNEL);
67207b96 AB	53	if (!ei)
67207b96 AB	54	return NULL;
6263203e AB	55
	56	ei->i_gang = NULL;
	57	ei->i_ctx = NULL;
43c2bbd9	58	ei->i_openers = 0;
6263203e	59
67207b96 AB	60	return &ei->vfs_inode;
	61	}
	62
	63	static void
	64	spufs_destroy_inode(struct inode *inode)
	65	{
	66	kmem_cache_free(spufs_inode_cache, SPUFS_I(inode));
	67	}
	68
	69	static void
e18b890b	70	spufs_init_once(void p, struct kmem_cache cachep, unsigned long flags)
67207b96 AB	71	{
	72	struct spufs_inode_info *ei = p;
	73
a35afb83	74	inode_init_once(&ei->vfs_inode);
67207b96 AB	75	}
	76
	77	static struct inode *
	78	spufs_new_inode(struct super_block *sb, int mode)
	79	{
	80	struct inode *inode;
	81
	82	inode = new_inode(sb);
	83	if (!inode)
	84	goto out;
	85
	86	inode->i_mode = mode;
	87	inode->i_uid = current->fsuid;
	88	inode->i_gid = current->fsgid;
67207b96 AB	89	inode->i_blocks = 0;
	90	inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
	91	out:
	92	return inode;
	93	}
	94
	95	static int
	96	spufs_setattr(struct dentry dentry, struct iattr attr)
	97	{
	98	struct inode *inode = dentry->d_inode;
	99
67207b96 AB	100	if ((attr->ia_valid & ATTR_SIZE) &&
	101	(attr->ia_size != inode->i_size))
	102	return -EINVAL;
	103	return inode_setattr(inode, attr);
	104	}
	105
	106
	107	static int
	108	spufs_new_file(struct super_block sb, struct dentry dentry,
99ac48f5	109	const struct file_operations *fops, int mode,
67207b96 AB	110	struct spu_context *ctx)
	111	{
	112	static struct inode_operations spufs_file_iops = {
67207b96	113	.setattr = spufs_setattr,
67207b96 AB	114	};
	115	struct inode *inode;
	116	int ret;
	117
	118	ret = -ENOSPC;
	119	inode = spufs_new_inode(sb, S_IFREG \| mode);
	120	if (!inode)
	121	goto out;
	122
	123	ret = 0;
	124	inode->i_op = &spufs_file_iops;
	125	inode->i_fop = fops;
8e18e294	126	inode->i_private = SPUFS_I(inode)->i_ctx = get_spu_context(ctx);
67207b96 AB	127	d_add(dentry, inode);
	128	out:
	129	return ret;
	130	}
	131
	132	static void
	133	spufs_delete_inode(struct inode *inode)
	134	{
6263203e AB	135	struct spufs_inode_info *ei = SPUFS_I(inode);
	136
	137	if (ei->i_ctx)
	138	put_spu_context(ei->i_ctx);
	139	if (ei->i_gang)
	140	put_spu_gang(ei->i_gang);
67207b96 AB	141	clear_inode(inode);
	142	}
	143
3f51dd91	144	static void spufs_prune_dir(struct dentry *dir)
67207b96	145	{
8b3d6663	146	struct dentry dentry, tmp;
6263203e	147
1b1dcc1b	148	mutex_lock(&dir->d_inode->i_mutex);
c3a9aea7	149	list_for_each_entry_safe(dentry, tmp, &dir->d_subdirs, d_u.d_child) {
8b3d6663	150	spin_lock(&dcache_lock);
67207b96	151	spin_lock(&dentry->d_lock);
8b3d6663 AB	152	if (!(d_unhashed(dentry)) && dentry->d_inode) {
	153	dget_locked(dentry);
	154	__d_drop(dentry);
	155	spin_unlock(&dentry->d_lock);
3f51dd91	156	simple_unlink(dir->d_inode, dentry);
8b3d6663 AB	157	spin_unlock(&dcache_lock);
	158	dput(dentry);
	159	} else {
	160	spin_unlock(&dentry->d_lock);
	161	spin_unlock(&dcache_lock);
	162	}
67207b96	163	}
3f51dd91	164	shrink_dcache_parent(dir);
1b1dcc1b	165	mutex_unlock(&dir->d_inode->i_mutex);
3f51dd91 AB	166	}
3f51dd91 AB	167
6263203e AB	168	/* Caller must hold parent->i_mutex */
6263203e AB	169	static int spufs_rmdir(struct inode parent, struct dentry dir)
3f51dd91	170	{
3f51dd91	171	/* remove all entries */
6263203e	172	spufs_prune_dir(dir);
8b3d6663	173
6263203e	174	return simple_rmdir(parent, dir);
67207b96 AB	175	}
67207b96 AB	176
3f51dd91 AB	177	static int spufs_fill_dir(struct dentry dir, struct tree_descr files,
	178	int mode, struct spu_context *ctx)
	179	{
	180	struct dentry *dentry;
	181	int ret;
	182
	183	while (files->name && files->name[0]) {
	184	ret = -ENOMEM;
	185	dentry = d_alloc_name(dir, files->name);
	186	if (!dentry)
	187	goto out;
	188	ret = spufs_new_file(dir->d_sb, dentry, files->ops,
	189	files->mode & mode, ctx);
	190	if (ret)
	191	goto out;
	192	files++;
	193	}
	194	return 0;
	195	out:
	196	spufs_prune_dir(dir);
	197	return ret;
	198	}
	199
67207b96 AB	200	static int spufs_dir_close(struct inode inode, struct file file)
67207b96 AB	201	{
0309f02d	202	struct spu_context *ctx;
6263203e AB	203	struct inode *parent;
6263203e AB	204	struct dentry *dir;
67207b96 AB	205	int ret;
67207b96 AB	206
b4d1ab58	207	dir = file->f_path.dentry;
6263203e AB	208	parent = dir->d_parent->d_inode;
6263203e AB	209	ctx = SPUFS_I(dir->d_inode)->i_ctx;
c8ca0633	210
6263203e AB	211	mutex_lock(&parent->i_mutex);
	212	ret = spufs_rmdir(parent, dir);
	213	mutex_unlock(&parent->i_mutex);
67207b96	214	WARN_ON(ret);
c8ca0633	215
0309f02d ME	216	/* We have to give up the mm_struct */
	217	spu_forget(ctx);
	218
67207b96 AB	219	return dcache_dir_close(inode, file);
	220	}
	221
754661f1	222	const struct inode_operations spufs_dir_inode_operations = {
67207b96 AB	223	.lookup = simple_lookup,
	224	};
	225
5dfe4c96	226	const struct file_operations spufs_context_fops = {
67207b96 AB	227	.open = dcache_dir_open,
	228	.release = spufs_dir_close,
	229	.llseek = dcache_dir_lseek,
	230	.read = generic_read_dir,
	231	.readdir = dcache_readdir,
	232	.fsync = simple_sync_file,
	233	};
bf1ab978	234	EXPORT_SYMBOL_GPL(spufs_context_fops);
67207b96 AB	235
67207b96 AB	236	static int
9add11da AB	237	spufs_mkdir(struct inode dir, struct dentry dentry, unsigned int flags,
9add11da AB	238	int mode)
67207b96 AB	239	{
	240	int ret;
	241	struct inode *inode;
	242	struct spu_context *ctx;
	243
	244	ret = -ENOSPC;
	245	inode = spufs_new_inode(dir->i_sb, mode \| S_IFDIR);
	246	if (!inode)
	247	goto out;
	248
	249	if (dir->i_mode & S_ISGID) {
	250	inode->i_gid = dir->i_gid;
	251	inode->i_mode &= S_ISGID;
	252	}
6263203e	253	ctx = alloc_spu_context(SPUFS_I(dir)->i_gang); /* XXX gang */
67207b96 AB	254	SPUFS_I(inode)->i_ctx = ctx;
	255	if (!ctx)
	256	goto out_iput;
	257
9add11da	258	ctx->flags = flags;
67207b96 AB	259	inode->i_op = &spufs_dir_inode_operations;
67207b96 AB	260	inode->i_fop = &simple_dir_operations;
5737edd1 MN	261	if (flags & SPU_CREATE_NOSCHED)
	262	ret = spufs_fill_dir(dentry, spufs_dir_nosched_contents,
	263	mode, ctx);
	264	else
	265	ret = spufs_fill_dir(dentry, spufs_dir_contents, mode, ctx);
	266
67207b96 AB	267	if (ret)
	268	goto out_free_ctx;
	269
	270	d_instantiate(dentry, inode);
	271	dget(dentry);
	272	dir->i_nlink++;
346f4d3c	273	dentry->d_inode->i_nlink++;
67207b96 AB	274	goto out;
	275
	276	out_free_ctx:
	277	put_spu_context(ctx);
	278	out_iput:
	279	iput(inode);
	280	out:
	281	return ret;
	282	}
	283
346f4d3c AB	284	static int spufs_context_open(struct dentry dentry, struct vfsmount mnt)
	285	{
	286	int ret;
	287	struct file *filp;
	288
	289	ret = get_unused_fd();
	290	if (ret < 0) {
	291	dput(dentry);
	292	mntput(mnt);
	293	goto out;
	294	}
	295
	296	filp = dentry_open(dentry, mnt, O_RDONLY);
	297	if (IS_ERR(filp)) {
	298	put_unused_fd(ret);
	299	ret = PTR_ERR(filp);
	300	goto out;
	301	}
	302
	303	filp->f_op = &spufs_context_fops;
	304	fd_install(ret, filp);
	305	out:
	306	return ret;
	307	}
	308
6263203e AB	309	static int spufs_create_context(struct inode *inode,
	310	struct dentry *dentry,
	311	struct vfsmount *mnt, int flags, int mode)
	312	{
	313	int ret;
	314
5737edd1 MN	315	ret = -EPERM;
	316	if ((flags & SPU_CREATE_NOSCHED) &&
	317	!capable(CAP_SYS_NICE))
	318	goto out_unlock;
	319
	320	ret = -EINVAL;
	321	if ((flags & (SPU_CREATE_NOSCHED \| SPU_CREATE_ISOLATE))
	322	== SPU_CREATE_ISOLATE)
	323	goto out_unlock;
	324
bd2e5f82 JK	325	ret = -ENODEV;
	326	if ((flags & SPU_CREATE_ISOLATE) && !isolated_loader)
	327	goto out_unlock;
	328
6263203e AB	329	ret = spufs_mkdir(inode, dentry, flags, mode & S_IRWXUGO);
	330	if (ret)
	331	goto out_unlock;
	332
	333	/*
	334	* get references for dget and mntget, will be released
	335	* in error path of *_open().
	336	*/
	337	ret = spufs_context_open(dget(dentry), mntget(mnt));
	338	if (ret < 0) {
	339	WARN_ON(spufs_rmdir(inode, dentry));
	340	mutex_unlock(&inode->i_mutex);
	341	spu_forget(SPUFS_I(dentry->d_inode)->i_ctx);
	342	goto out;
	343	}
	344
	345	out_unlock:
	346	mutex_unlock(&inode->i_mutex);
	347	out:
	348	dput(dentry);
	349	return ret;
	350	}
	351
	352	static int spufs_rmgang(struct inode root, struct dentry dir)
	353	{
	354	/* FIXME: this fails if the dir is not empty,
	355	which causes a leak of gangs. */
	356	return simple_rmdir(root, dir);
	357	}
	358
	359	static int spufs_gang_close(struct inode inode, struct file file)
	360	{
	361	struct inode *parent;
	362	struct dentry *dir;
	363	int ret;
	364
b4d1ab58	365	dir = file->f_path.dentry;
6263203e AB	366	parent = dir->d_parent->d_inode;
	367
	368	ret = spufs_rmgang(parent, dir);
	369	WARN_ON(ret);
	370
	371	return dcache_dir_close(inode, file);
	372	}
	373
5dfe4c96	374	const struct file_operations spufs_gang_fops = {
6263203e AB	375	.open = dcache_dir_open,
	376	.release = spufs_gang_close,
	377	.llseek = dcache_dir_lseek,
	378	.read = generic_read_dir,
	379	.readdir = dcache_readdir,
	380	.fsync = simple_sync_file,
	381	};
	382
	383	static int
	384	spufs_mkgang(struct inode dir, struct dentry dentry, int mode)
	385	{
	386	int ret;
	387	struct inode *inode;
	388	struct spu_gang *gang;
	389
	390	ret = -ENOSPC;
	391	inode = spufs_new_inode(dir->i_sb, mode \| S_IFDIR);
	392	if (!inode)
	393	goto out;
	394
	395	ret = 0;
	396	if (dir->i_mode & S_ISGID) {
	397	inode->i_gid = dir->i_gid;
	398	inode->i_mode &= S_ISGID;
	399	}
	400	gang = alloc_spu_gang();
	401	SPUFS_I(inode)->i_ctx = NULL;
	402	SPUFS_I(inode)->i_gang = gang;
	403	if (!gang)
	404	goto out_iput;
	405
	406	inode->i_op = &spufs_dir_inode_operations;
	407	inode->i_fop = &simple_dir_operations;
	408
	409	d_instantiate(dentry, inode);
	410	dget(dentry);
	411	dir->i_nlink++;
	412	dentry->d_inode->i_nlink++;
	413	return ret;
	414
	415	out_iput:
	416	iput(inode);
	417	out:
	418	return ret;
	419	}
	420
	421	static int spufs_gang_open(struct dentry dentry, struct vfsmount mnt)
	422	{
	423	int ret;
	424	struct file *filp;
	425
	426	ret = get_unused_fd();
	427	if (ret < 0) {
	428	dput(dentry);
	429	mntput(mnt);
	430	goto out;
	431	}
	432
	433	filp = dentry_open(dentry, mnt, O_RDONLY);
	434	if (IS_ERR(filp)) {
	435	put_unused_fd(ret);
	436	ret = PTR_ERR(filp);
	437	goto out;
	438	}
439
440	filp->f_op = &spufs_gang_fops;
441	fd_install(ret, filp);
442	out:
443	return ret;
444	}
445
446	static int spufs_create_gang(struct inode *inode,
447	struct dentry *dentry,
448	struct vfsmount *mnt, int mode)
449	{
450	int ret;
451
452	ret = spufs_mkgang(inode, dentry, mode & S_IRWXUGO);
453	if (ret)
454	goto out;
455
456	/*
457	* get references for dget and mntget, will be released
458	* in error path of *_open().
459	*/
460	ret = spufs_gang_open(dget(dentry), mntget(mnt));
461	if (ret < 0)
462	WARN_ON(spufs_rmgang(inode, dentry));
463
464	out:
465	mutex_unlock(&inode->i_mutex);
466	dput(dentry);
467	return ret;
468	}
469
470
346f4d3c AB	471	static struct file_system_type spufs_type;
346f4d3c AB	472
6263203e	473	long spufs_create(struct nameidata *nd, unsigned int flags, mode_t mode)
67207b96 AB	474	{
67207b96 AB	475	struct dentry *dentry;
67207b96 AB	476	int ret;
67207b96 AB	477
67207b96	478	ret = -EINVAL;
6263203e AB	479	/* check if we are on spufs */
6263203e AB	480	if (nd->dentry->d_sb->s_type != &spufs_type)
67207b96 AB	481	goto out;
67207b96 AB	482
6263203e	483	/* don't accept undefined flags */
9add11da	484	if (flags & (~SPU_CREATE_FLAG_ALL))
c9832948 AB	485	goto out;
c9832948 AB	486
6263203e AB	487	/* only threads can be underneath a gang */
	488	if (nd->dentry != nd->dentry->d_sb->s_root) {
	489	if ((flags & SPU_CREATE_GANG) \|\|
	490	!SPUFS_I(nd->dentry->d_inode)->i_gang)
	491	goto out;
	492	}
	493
67207b96 AB	494	dentry = lookup_create(nd, 1);
	495	ret = PTR_ERR(dentry);
	496	if (IS_ERR(dentry))
	497	goto out_dir;
	498
	499	ret = -EEXIST;
	500	if (dentry->d_inode)
	501	goto out_dput;
	502
	503	mode &= ~current->fs->umask;
67207b96	504
6263203e AB	505	if (flags & SPU_CREATE_GANG)
	506	return spufs_create_gang(nd->dentry->d_inode,
	507	dentry, nd->mnt, mode);
	508	else
	509	return spufs_create_context(nd->dentry->d_inode,
	510	dentry, nd->mnt, flags, mode);
67207b96 AB	511
	512	out_dput:
	513	dput(dentry);
	514	out_dir:
1b1dcc1b	515	mutex_unlock(&nd->dentry->d_inode->i_mutex);
67207b96 AB	516	out:
	517	return ret;
	518	}
	519
	520	/* File system initialization */
	521	enum {
f11f5ee7	522	Opt_uid, Opt_gid, Opt_mode, Opt_err,
67207b96 AB	523	};
	524
	525	static match_table_t spufs_tokens = {
f11f5ee7 JK	526	{ Opt_uid, "uid=%d" },
	527	{ Opt_gid, "gid=%d" },
	528	{ Opt_mode, "mode=%o" },
	529	{ Opt_err, NULL },
67207b96 AB	530	};
	531
	532	static int
	533	spufs_parse_options(char options, struct inode root)
	534	{
	535	char *p;
	536	substring_t args[MAX_OPT_ARGS];
	537
	538	while ((p = strsep(&options, ",")) != NULL) {
	539	int token, option;
	540
	541	if (!*p)
	542	continue;
	543
	544	token = match_token(p, spufs_tokens, args);
	545	switch (token) {
	546	case Opt_uid:
	547	if (match_int(&args[0], &option))
	548	return 0;
	549	root->i_uid = option;
	550	break;
	551	case Opt_gid:
	552	if (match_int(&args[0], &option))
	553	return 0;
	554	root->i_gid = option;
	555	break;
f11f5ee7 JK	556	case Opt_mode:
	557	if (match_octal(&args[0], &option))
	558	return 0;
	559	root->i_mode = option \| S_IFDIR;
	560	break;
67207b96 AB	561	default:
	562	return 0;
	563	}
	564	}
	565	return 1;
	566	}
	567
db1384b4 AM	568	static void spufs_exit_isolated_loader(void)
	569	{
	570	kfree(isolated_loader);
	571	}
	572
0afacde3 AB	573	static void
	574	spufs_init_isolated_loader(void)
	575	{
	576	struct device_node *dn;
	577	const char *loader;
	578	int size;
	579
	580	dn = of_find_node_by_path("/spu-isolation");
	581	if (!dn)
	582	return;
	583
e2eb6392	584	loader = of_get_property(dn, "loader", &size);
0afacde3 AB	585	if (!loader)
	586	return;
	587
	588	/* kmalloc should align on a 16 byte boundary..* */
	589	isolated_loader = kmalloc(size, GFP_KERNEL);
	590	if (!isolated_loader)
	591	return;
	592
	593	memcpy(isolated_loader, loader, size);
	594	printk(KERN_INFO "spufs: SPU isolation mode enabled\n");
	595	}
	596
67207b96	597	static int
8b3d6663 AB	598	spufs_create_root(struct super_block sb, void data)
8b3d6663 AB	599	{
67207b96 AB	600	struct inode *inode;
	601	int ret;
	602
	603	ret = -ENOMEM;
	604	inode = spufs_new_inode(sb, S_IFDIR \| 0775);
	605	if (!inode)
	606	goto out;
	607
	608	inode->i_op = &spufs_dir_inode_operations;
	609	inode->i_fop = &simple_dir_operations;
	610	SPUFS_I(inode)->i_ctx = NULL;
	611
	612	ret = -EINVAL;
	613	if (!spufs_parse_options(data, inode))
	614	goto out_iput;
	615
	616	ret = -ENOMEM;
	617	sb->s_root = d_alloc_root(inode);
	618	if (!sb->s_root)
	619	goto out_iput;
	620
	621	return 0;
	622	out_iput:
	623	iput(inode);
	624	out:
	625	return ret;
	626	}
	627
	628	static int
	629	spufs_fill_super(struct super_block sb, void data, int silent)
	630	{
	631	static struct super_operations s_ops = {
	632	.alloc_inode = spufs_alloc_inode,
	633	.destroy_inode = spufs_destroy_inode,
	634	.statfs = simple_statfs,
	635	.delete_inode = spufs_delete_inode,
	636	.drop_inode = generic_delete_inode,
	637	};
	638
	639	sb->s_maxbytes = MAX_LFS_FILESIZE;
	640	sb->s_blocksize = PAGE_CACHE_SIZE;
	641	sb->s_blocksize_bits = PAGE_CACHE_SHIFT;
	642	sb->s_magic = SPUFS_MAGIC;
	643	sb->s_op = &s_ops;
	644
	645	return spufs_create_root(sb, data);
	646	}
	647
454e2398	648	static int
67207b96	649	spufs_get_sb(struct file_system_type *fstype, int flags,
454e2398	650	const char name, void data, struct vfsmount *mnt)
67207b96	651	{
454e2398	652	return get_sb_single(fstype, flags, data, spufs_fill_super, mnt);
67207b96 AB	653	}
	654
	655	static struct file_system_type spufs_type = {
	656	.owner = THIS_MODULE,
	657	.name = "spufs",
	658	.get_sb = spufs_get_sb,
	659	.kill_sb = kill_litter_super,
	660	};
	661
e78b47a5	662	static int __init spufs_init(void)
67207b96 AB	663	{
67207b96 AB	664	int ret;
bf1ab978	665
ccf17e9d JK	666	ret = -ENODEV;
	667	if (!spu_management_ops)
	668	goto out;
	669
67207b96 AB	670	ret = -ENOMEM;
	671	spufs_inode_cache = kmem_cache_create("spufs_inode_cache",
	672	sizeof(struct spufs_inode_info), 0,
	673	SLAB_HWCACHE_ALIGN, spufs_init_once, NULL);
	674
	675	if (!spufs_inode_cache)
	676	goto out;
c99c1994	677	ret = spu_sched_init();
67207b96 AB	678	if (ret)
67207b96 AB	679	goto out_cache;
c99c1994 AM	680	ret = register_filesystem(&spufs_type);
	681	if (ret)
	682	goto out_sched;
67207b96	683	ret = register_spu_syscalls(&spufs_calls);
bf1ab978 DGM	684	if (ret)
	685	goto out_fs;
	686	ret = register_arch_coredump_calls(&spufs_coredump_calls);
67207b96	687	if (ret)
c99c1994	688	goto out_syscalls;
0afacde3 AB	689
0afacde3 AB	690	spufs_init_isolated_loader();
bf1ab978	691
67207b96	692	return 0;
c99c1994 AM	693
	694	out_syscalls:
	695	unregister_spu_syscalls(&spufs_calls);
67207b96 AB	696	out_fs:
67207b96 AB	697	unregister_filesystem(&spufs_type);
c99c1994 AM	698	out_sched:
c99c1994 AM	699	spu_sched_exit();
67207b96 AB	700	out_cache:
	701	kmem_cache_destroy(spufs_inode_cache);
	702	out:
	703	return ret;
	704	}
	705	module_init(spufs_init);
	706
e78b47a5	707	static void __exit spufs_exit(void)
67207b96	708	{
8b3d6663	709	spu_sched_exit();
db1384b4	710	spufs_exit_isolated_loader();
bf1ab978	711	unregister_arch_coredump_calls(&spufs_coredump_calls);
67207b96 AB	712	unregister_spu_syscalls(&spufs_calls);
	713	unregister_filesystem(&spufs_type);
	714	kmem_cache_destroy(spufs_inode_cache);
	715	}
	716	module_exit(spufs_exit);
	717
	718	MODULE_LICENSE("GPL");
	719	MODULE_AUTHOR("Arnd Bergmann <arndb@de.ibm.com>");
	720