[net-next-2.6.git] / arch / parisc / hpux / fs.c

/*
 *    Implements HPUX syscalls.
 *
 *    Copyright (C) 1999 Matthew Wilcox <willy with parisc-linux.org>
 *    Copyright (C) 2000 Michael Ang <mang with subcarrier.org>
 *    Copyright (C) 2000 John Marvin <jsm with parisc-linux.org>
 *    Copyright (C) 2000 Philipp Rumpf
 *
 *    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 of the License, 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include <linux/kernel.h>
#include <linux/mm.h>
#include <linux/fs.h>
#include <linux/sched.h>
#include <linux/file.h>
#include <linux/ptrace.h>
#include <linux/slab.h>
#include <asm/errno.h>
#include <asm/uaccess.h>

int hpux_execve(struct pt_regs *regs)
{
	int error;
	char *filename;

	filename = getname((const char __user *) regs->gr[26]);
	error = PTR_ERR(filename);
	if (IS_ERR(filename))
		goto out;

	error = do_execve(filename, (char __user * __user *) regs->gr[25],
		(char __user * __user *) regs->gr[24], regs);

	putname(filename);

out:
	return error;
}

struct hpux_dirent {
	loff_t	d_off;
	ino_t	d_ino;
	short	d_reclen;
	short	d_namlen;
	char	d_name[1];
};

struct getdents_callback {
	struct hpux_dirent __user *current_dir;
	struct hpux_dirent __user *previous;
	int count;
	int error;
};

#define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))

static int filldir(void * __buf, const char * name, int namlen, loff_t offset,
		u64 ino, unsigned d_type)
{
	struct hpux_dirent __user * dirent;
	struct getdents_callback * buf = (struct getdents_callback *) __buf;
	ino_t d_ino;
	int reclen = ALIGN(NAME_OFFSET(dirent) + namlen + 1, sizeof(long));

	buf->error = -EINVAL;	/* only used if we fail.. */
	if (reclen > buf->count)
		return -EINVAL;
	d_ino = ino;
	if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
		buf->error = -EOVERFLOW;
		return -EOVERFLOW;
	}
	dirent = buf->previous;
	if (dirent)
		if (put_user(offset, &dirent->d_off))
			goto Efault;
	dirent = buf->current_dir;
	if (put_user(d_ino, &dirent->d_ino) ||
	    put_user(reclen, &dirent->d_reclen) ||
	    put_user(namlen, &dirent->d_namlen) ||
	    copy_to_user(dirent->d_name, name, namlen) ||
	    put_user(0, dirent->d_name + namlen))
		goto Efault;
	buf->previous = dirent;
	buf->current_dir = (void __user *)dirent + reclen;
	buf->count -= reclen;
	return 0;
Efault:
	buf->error = -EFAULT;
	return -EFAULT;
}

#undef NAME_OFFSET

int hpux_getdents(unsigned int fd, struct hpux_dirent __user *dirent, unsigned int count)
{
	struct file * file;
	struct hpux_dirent __user * lastdirent;
	struct getdents_callback buf;
	int error = -EBADF;

	file = fget(fd);
	if (!file)
		goto out;

	buf.current_dir = dirent;
	buf.previous = NULL;
	buf.count = count;
	buf.error = 0;

	error = vfs_readdir(file, filldir, &buf);
	if (error >= 0)
		error = buf.error;
	lastdirent = buf.previous;
	if (lastdirent) {
		if (put_user(file->f_pos, &lastdirent->d_off))
			error = -EFAULT;
		else
			error = count - buf.count;
	}

	fput(file);
out:
	return error;
}

int hpux_mount(const char *fs, const char *path, int mflag,
		const char *fstype, const char *dataptr, int datalen)
{
	return -ENOSYS;
}

static int cp_hpux_stat(struct kstat *stat, struct hpux_stat64 __user *statbuf)
{
	struct hpux_stat64 tmp;

	/* we probably want a different split here - is hpux 12:20? */

	if (!new_valid_dev(stat->dev) || !new_valid_dev(stat->rdev))
		return -EOVERFLOW;

	memset(&tmp, 0, sizeof(tmp));
	tmp.st_dev = new_encode_dev(stat->dev);
	tmp.st_ino = stat->ino;
	tmp.st_mode = stat->mode;
	tmp.st_nlink = stat->nlink;
	tmp.st_uid = stat->uid;
	tmp.st_gid = stat->gid;
	tmp.st_rdev = new_encode_dev(stat->rdev);
	tmp.st_size = stat->size;
	tmp.st_atime = stat->atime.tv_sec;
	tmp.st_mtime = stat->mtime.tv_sec;
	tmp.st_ctime = stat->ctime.tv_sec;
	tmp.st_blocks = stat->blocks;
	tmp.st_blksize = stat->blksize;
	return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
}

long hpux_stat64(const char __user *filename, struct hpux_stat64 __user *statbuf)
{
	struct kstat stat;
	int error = vfs_stat(filename, &stat);

	if (!error)
		error = cp_hpux_stat(&stat, statbuf);

	return error;
}

long hpux_fstat64(unsigned int fd, struct hpux_stat64 __user *statbuf)
{
	struct kstat stat;
	int error = vfs_fstat(fd, &stat);

	if (!error)
		error = cp_hpux_stat(&stat, statbuf);

	return error;
}

long hpux_lstat64(const char __user *filename,
		  struct hpux_stat64 __user *statbuf)
{
	struct kstat stat;
	int error = vfs_lstat(filename, &stat);

	if (!error)
		error = cp_hpux_stat(&stat, statbuf);

	return error;
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* Implements HPUX syscalls.
	3	*
	4	* Copyright (C) 1999 Matthew Wilcox <willy with parisc-linux.org>
	5	* Copyright (C) 2000 Michael Ang <mang with subcarrier.org>
	6	* Copyright (C) 2000 John Marvin <jsm with parisc-linux.org>
	7	* Copyright (C) 2000 Philipp Rumpf
	8	*
	9	* This program is free software; you can redistribute it and/or modify
	10	* it under the terms of the GNU General Public License as published by
	11	* the Free Software Foundation; either version 2 of the License, or
	12	* (at your option) any later version.
	13	*
	14	* This program is distributed in the hope that it will be useful,
	15	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	16	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	17	* GNU General Public License for more details.
	18	*
	19	* You should have received a copy of the GNU General Public License
	20	* along with this program; if not, write to the Free Software
	21	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	22	*/
	23
ea743429	24	#include <linux/kernel.h>
1da177e4	25	#include <linux/mm.h>
4e950f6f	26	#include <linux/fs.h>
1da177e4 LT	27	#include <linux/sched.h>
1da177e4 LT	28	#include <linux/file.h>
1da177e4	29	#include <linux/ptrace.h>
5a0e3ad6	30	#include <linux/slab.h>
1da177e4 LT	31	#include <asm/errno.h>
	32	#include <asm/uaccess.h>
	33
	34	int hpux_execve(struct pt_regs *regs)
	35	{
	36	int error;
	37	char *filename;
	38
c7887325	39	filename = getname((const char __user *) regs->gr[26]);
1da177e4 LT	40	error = PTR_ERR(filename);
	41	if (IS_ERR(filename))
	42	goto out;
	43
e51ec241 MW	44	error = do_execve(filename, (char __user * __user *) regs->gr[25],
e51ec241 MW	45	(char __user * __user *) regs->gr[24], regs);
1da177e4	46
1da177e4 LT	47	putname(filename);
	48
	49	out:
	50	return error;
	51	}
	52
	53	struct hpux_dirent {
	54	loff_t d_off;
	55	ino_t d_ino;
	56	short d_reclen;
	57	short d_namlen;
	58	char d_name[1];
	59	};
	60
	61	struct getdents_callback {
e51ec241 MW	62	struct hpux_dirent __user *current_dir;
e51ec241 MW	63	struct hpux_dirent __user *previous;
1da177e4 LT	64	int count;
	65	int error;
	66	};
	67
e51ec241	68	#define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
1da177e4 LT	69
1da177e4 LT	70	static int filldir(void * __buf, const char * name, int namlen, loff_t offset,
15c130c1	71	u64 ino, unsigned d_type)
1da177e4	72	{
e51ec241	73	struct hpux_dirent __user * dirent;
1da177e4	74	struct getdents_callback * buf = (struct getdents_callback *) __buf;
afefdbb2	75	ino_t d_ino;
ea743429	76	int reclen = ALIGN(NAME_OFFSET(dirent) + namlen + 1, sizeof(long));
1da177e4 LT	77
	78	buf->error = -EINVAL; /* only used if we fail.. */
	79	if (reclen > buf->count)
	80	return -EINVAL;
afefdbb2	81	d_ino = ino;
da574983 AV	82	if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
da574983 AV	83	buf->error = -EOVERFLOW;
afefdbb2	84	return -EOVERFLOW;
da574983	85	}
1da177e4 LT	86	dirent = buf->previous;
1da177e4 LT	87	if (dirent)
da574983 AV	88	if (put_user(offset, &dirent->d_off))
da574983 AV	89	goto Efault;
1da177e4	90	dirent = buf->current_dir;
da574983 AV	91	if (put_user(d_ino, &dirent->d_ino) \|\|
	92	put_user(reclen, &dirent->d_reclen) \|\|
	93	put_user(namlen, &dirent->d_namlen) \|\|
	94	copy_to_user(dirent->d_name, name, namlen) \|\|
	95	put_user(0, dirent->d_name + namlen))
	96	goto Efault;
1da177e4	97	buf->previous = dirent;
da574983	98	buf->current_dir = (void __user *)dirent + reclen;
1da177e4 LT	99	buf->count -= reclen;
1da177e4 LT	100	return 0;
da574983	101	Efault:
2ecbf813	102	buf->error = -EFAULT;
da574983	103	return -EFAULT;
1da177e4 LT	104	}
	105
	106	#undef NAME_OFFSET
1da177e4	107
e51ec241	108	int hpux_getdents(unsigned int fd, struct hpux_dirent __user *dirent, unsigned int count)
1da177e4 LT	109	{
1da177e4 LT	110	struct file * file;
e51ec241	111	struct hpux_dirent __user * lastdirent;
1da177e4 LT	112	struct getdents_callback buf;
	113	int error = -EBADF;
	114
	115	file = fget(fd);
	116	if (!file)
	117	goto out;
	118
	119	buf.current_dir = dirent;
	120	buf.previous = NULL;
	121	buf.count = count;
	122	buf.error = 0;
	123
	124	error = vfs_readdir(file, filldir, &buf);
53c9c5c0 AV	125	if (error >= 0)
53c9c5c0 AV	126	error = buf.error;
1da177e4 LT	127	lastdirent = buf.previous;
1da177e4 LT	128	if (lastdirent) {
da574983 AV	129	if (put_user(file->f_pos, &lastdirent->d_off))
	130	error = -EFAULT;
	131	else
	132	error = count - buf.count;
1da177e4 LT	133	}
1da177e4 LT	134
1da177e4 LT	135	fput(file);
	136	out:
	137	return error;
	138	}
	139
	140	int hpux_mount(const char fs, const char path, int mflag,
	141	const char fstype, const char dataptr, int datalen)
	142	{
	143	return -ENOSYS;
	144	}
	145
e51ec241	146	static int cp_hpux_stat(struct kstat stat, struct hpux_stat64 __user statbuf)
1da177e4 LT	147	{
	148	struct hpux_stat64 tmp;
	149
	150	/* we probably want a different split here - is hpux 12:20? */
	151
	152	if (!new_valid_dev(stat->dev) \|\| !new_valid_dev(stat->rdev))
	153	return -EOVERFLOW;
	154
	155	memset(&tmp, 0, sizeof(tmp));
	156	tmp.st_dev = new_encode_dev(stat->dev);
	157	tmp.st_ino = stat->ino;
	158	tmp.st_mode = stat->mode;
	159	tmp.st_nlink = stat->nlink;
	160	tmp.st_uid = stat->uid;
	161	tmp.st_gid = stat->gid;
	162	tmp.st_rdev = new_encode_dev(stat->rdev);
	163	tmp.st_size = stat->size;
	164	tmp.st_atime = stat->atime.tv_sec;
	165	tmp.st_mtime = stat->mtime.tv_sec;
	166	tmp.st_ctime = stat->ctime.tv_sec;
	167	tmp.st_blocks = stat->blocks;
	168	tmp.st_blksize = stat->blksize;
	169	return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
	170	}
	171
c7887325	172	long hpux_stat64(const char __user filename, struct hpux_stat64 __user statbuf)
1da177e4 LT	173	{
	174	struct kstat stat;
	175	int error = vfs_stat(filename, &stat);
	176
	177	if (!error)
	178	error = cp_hpux_stat(&stat, statbuf);
	179
	180	return error;
	181	}
	182
e51ec241	183	long hpux_fstat64(unsigned int fd, struct hpux_stat64 __user *statbuf)
1da177e4 LT	184	{
	185	struct kstat stat;
	186	int error = vfs_fstat(fd, &stat);
	187
	188	if (!error)
	189	error = cp_hpux_stat(&stat, statbuf);
	190
	191	return error;
	192	}
	193
c7887325 DH	194	long hpux_lstat64(const char __user *filename,
c7887325 DH	195	struct hpux_stat64 __user *statbuf)
1da177e4 LT	196	{
	197	struct kstat stat;
	198	int error = vfs_lstat(filename, &stat);
	199
	200	if (!error)
	201	error = cp_hpux_stat(&stat, statbuf);
	202
	203	return error;
	204	}