[net-next-2.6.git] / arch / x86 / kernel / sys_i386_32.c

/*
 * This file contains various random system calls that
 * have a non-standard calling sequence on the Linux/i386
 * platform.
 */

#include <linux/errno.h>
#include <linux/sched.h>
#include <linux/mm.h>
#include <linux/fs.h>
#include <linux/smp.h>
#include <linux/sem.h>
#include <linux/msg.h>
#include <linux/shm.h>
#include <linux/stat.h>
#include <linux/syscalls.h>
#include <linux/mman.h>
#include <linux/file.h>
#include <linux/utsname.h>

#include <asm/uaccess.h>
#include <asm/unistd.h>
#include <asm/ipc.h>

/*
 * sys_pipe() is the normal C calling standard for creating
 * a pipe. It's not the way Unix traditionally does this, though.
 */
asmlinkage int sys_pipe(unsigned long __user * fildes)
{
	int fd[2];
	int error;

	error = do_pipe(fd);
	if (!error) {
		if (copy_to_user(fildes, fd, 2*sizeof(int)))
			error = -EFAULT;
	}
	return error;
}

asmlinkage long sys_mmap2(unsigned long addr, unsigned long len,
			  unsigned long prot, unsigned long flags,
			  unsigned long fd, unsigned long pgoff)
{
	int error = -EBADF;
	struct file *file = NULL;
	struct mm_struct *mm = current->mm;

	flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
	if (!(flags & MAP_ANONYMOUS)) {
		file = fget(fd);
		if (!file)
			goto out;
	}

	down_write(&mm->mmap_sem);
	error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
	up_write(&mm->mmap_sem);

	if (file)
		fput(file);
out:
	return error;
}

/*
 * Perform the select(nd, in, out, ex, tv) and mmap() system
 * calls. Linux/i386 didn't use to be able to handle more than
 * 4 system call parameters, so these system calls used a memory
 * block for parameter passing..
 */

struct mmap_arg_struct {
	unsigned long addr;
	unsigned long len;
	unsigned long prot;
	unsigned long flags;
	unsigned long fd;
	unsigned long offset;
};

asmlinkage int old_mmap(struct mmap_arg_struct __user *arg)
{
	struct mmap_arg_struct a;
	int err = -EFAULT;

	if (copy_from_user(&a, arg, sizeof(a)))
		goto out;

	err = -EINVAL;
	if (a.offset & ~PAGE_MASK)
		goto out;

	err = sys_mmap2(a.addr, a.len, a.prot, a.flags,
			a.fd, a.offset >> PAGE_SHIFT);
out:
	return err;
}


struct sel_arg_struct {
	unsigned long n;
	fd_set __user *inp, *outp, *exp;
	struct timeval __user *tvp;
};

asmlinkage int old_select(struct sel_arg_struct __user *arg)
{
	struct sel_arg_struct a;

	if (copy_from_user(&a, arg, sizeof(a)))
		return -EFAULT;
	/* sys_select() does the appropriate kernel locking */
	return sys_select(a.n, a.inp, a.outp, a.exp, a.tvp);
}

/*
 * sys_ipc() is the de-multiplexer for the SysV IPC calls..
 *
 * This is really horribly ugly.
 */
asmlinkage int sys_ipc (uint call, int first, int second,
			int third, void __user *ptr, long fifth)
{
	int version, ret;

	version = call >> 16; /* hack for backward compatibility */
	call &= 0xffff;

	switch (call) {
	case SEMOP:
		return sys_semtimedop (first, (struct sembuf __user *)ptr, second, NULL);
	case SEMTIMEDOP:
		return sys_semtimedop(first, (struct sembuf __user *)ptr, second,
					(const struct timespec __user *)fifth);

	case SEMGET:
		return sys_semget (first, second, third);
	case SEMCTL: {
		union semun fourth;
		if (!ptr)
			return -EINVAL;
		if (get_user(fourth.__pad, (void __user * __user *) ptr))
			return -EFAULT;
		return sys_semctl (first, second, third, fourth);
	}

	case MSGSND:
		return sys_msgsnd (first, (struct msgbuf __user *) ptr, 
				   second, third);
	case MSGRCV:
		switch (version) {
		case 0: {
			struct ipc_kludge tmp;
			if (!ptr)
				return -EINVAL;
			
			if (copy_from_user(&tmp,
					   (struct ipc_kludge __user *) ptr, 
					   sizeof (tmp)))
				return -EFAULT;
			return sys_msgrcv (first, tmp.msgp, second,
					   tmp.msgtyp, third);
		}
		default:
			return sys_msgrcv (first,
					   (struct msgbuf __user *) ptr,
					   second, fifth, third);
		}
	case MSGGET:
		return sys_msgget ((key_t) first, second);
	case MSGCTL:
		return sys_msgctl (first, second, (struct msqid_ds __user *) ptr);

	case SHMAT:
		switch (version) {
		default: {
			ulong raddr;
			ret = do_shmat (first, (char __user *) ptr, second, &raddr);
			if (ret)
				return ret;
			return put_user (raddr, (ulong __user *) third);
		}
		case 1:	/* iBCS2 emulator entry point */
			if (!segment_eq(get_fs(), get_ds()))
				return -EINVAL;
			/* The "(ulong *) third" is valid _only_ because of the kernel segment thing */
			return do_shmat (first, (char __user *) ptr, second, (ulong *) third);
		}
	case SHMDT: 
		return sys_shmdt ((char __user *)ptr);
	case SHMGET:
		return sys_shmget (first, second, third);
	case SHMCTL:
		return sys_shmctl (first, second,
				   (struct shmid_ds __user *) ptr);
	default:
		return -ENOSYS;
	}
}

/*
 * Old cruft
 */
asmlinkage int sys_uname(struct old_utsname __user * name)
{
	int err;
	if (!name)
		return -EFAULT;
	down_read(&uts_sem);
	err = copy_to_user(name, utsname(), sizeof (*name));
	up_read(&uts_sem);
	return err?-EFAULT:0;
}

asmlinkage int sys_olduname(struct oldold_utsname __user * name)
{
	int error;

	if (!name)
		return -EFAULT;
	if (!access_ok(VERIFY_WRITE,name,sizeof(struct oldold_utsname)))
		return -EFAULT;
  
  	down_read(&uts_sem);
	
	error = __copy_to_user(&name->sysname, &utsname()->sysname,
			       __OLD_UTS_LEN);
	error |= __put_user(0, name->sysname + __OLD_UTS_LEN);
	error |= __copy_to_user(&name->nodename, &utsname()->nodename,
				__OLD_UTS_LEN);
	error |= __put_user(0, name->nodename + __OLD_UTS_LEN);
	error |= __copy_to_user(&name->release, &utsname()->release,
				__OLD_UTS_LEN);
	error |= __put_user(0, name->release + __OLD_UTS_LEN);
	error |= __copy_to_user(&name->version, &utsname()->version,
				__OLD_UTS_LEN);
	error |= __put_user(0, name->version + __OLD_UTS_LEN);
	error |= __copy_to_user(&name->machine, &utsname()->machine,
				__OLD_UTS_LEN);
	error |= __put_user(0, name->machine + __OLD_UTS_LEN);
	
	up_read(&uts_sem);
	
	error = error ? -EFAULT : 0;

	return error;
}


/*
 * Do a system call from kernel instead of calling sys_execve so we
 * end up with proper pt_regs.
 */
int kernel_execve(const char *filename, char *const argv[], char *const envp[])
{
	long __res;
	asm volatile ("push %%ebx ; movl %2,%%ebx ; int $0x80 ; pop %%ebx"
	: "=a" (__res)
	: "0" (__NR_execve),"ri" (filename),"c" (argv), "d" (envp) : "memory");
	return __res;
}
Commit	Line	Data
1da177e4	1	/*
1da177e4 LT	2	* This file contains various random system calls that
	3	* have a non-standard calling sequence on the Linux/i386
	4	* platform.
	5	*/
	6
	7	#include <linux/errno.h>
	8	#include <linux/sched.h>
	9	#include <linux/mm.h>
4e950f6f	10	#include <linux/fs.h>
1da177e4	11	#include <linux/smp.h>
1da177e4 LT	12	#include <linux/sem.h>
	13	#include <linux/msg.h>
	14	#include <linux/shm.h>
	15	#include <linux/stat.h>
	16	#include <linux/syscalls.h>
	17	#include <linux/mman.h>
	18	#include <linux/file.h>
	19	#include <linux/utsname.h>
	20
	21	#include <asm/uaccess.h>
fe74290d	22	#include <asm/unistd.h>
1da177e4 LT	23	#include <asm/ipc.h>
	24
	25	/*
	26	* sys_pipe() is the normal C calling standard for creating
	27	* a pipe. It's not the way Unix traditionally does this, though.
	28	*/
	29	asmlinkage int sys_pipe(unsigned long __user * fildes)
	30	{
	31	int fd[2];
	32	int error;
	33
	34	error = do_pipe(fd);
	35	if (!error) {
	36	if (copy_to_user(fildes, fd, 2*sizeof(int)))
	37	error = -EFAULT;
	38	}
	39	return error;
	40	}
	41
a7290ee0 MB	42	asmlinkage long sys_mmap2(unsigned long addr, unsigned long len,
	43	unsigned long prot, unsigned long flags,
	44	unsigned long fd, unsigned long pgoff)
1da177e4 LT	45	{
1da177e4 LT	46	int error = -EBADF;
a7290ee0 MB	47	struct file *file = NULL;
a7290ee0 MB	48	struct mm_struct *mm = current->mm;
1da177e4 LT	49
	50	flags &= ~(MAP_EXECUTABLE \| MAP_DENYWRITE);
	51	if (!(flags & MAP_ANONYMOUS)) {
	52	file = fget(fd);
	53	if (!file)
	54	goto out;
	55	}
	56
a7290ee0	57	down_write(&mm->mmap_sem);
1da177e4	58	error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
a7290ee0	59	up_write(&mm->mmap_sem);
1da177e4 LT	60
	61	if (file)
	62	fput(file);
	63	out:
	64	return error;
	65	}
	66
1da177e4 LT	67	/*
	68	* Perform the select(nd, in, out, ex, tv) and mmap() system
	69	* calls. Linux/i386 didn't use to be able to handle more than
	70	* 4 system call parameters, so these system calls used a memory
	71	* block for parameter passing..
	72	*/
	73
	74	struct mmap_arg_struct {
	75	unsigned long addr;
	76	unsigned long len;
	77	unsigned long prot;
	78	unsigned long flags;
	79	unsigned long fd;
	80	unsigned long offset;
	81	};
	82
	83	asmlinkage int old_mmap(struct mmap_arg_struct __user *arg)
	84	{
	85	struct mmap_arg_struct a;
	86	int err = -EFAULT;
	87
	88	if (copy_from_user(&a, arg, sizeof(a)))
	89	goto out;
	90
	91	err = -EINVAL;
	92	if (a.offset & ~PAGE_MASK)
	93	goto out;
	94
a7290ee0 MB	95	err = sys_mmap2(a.addr, a.len, a.prot, a.flags,
a7290ee0 MB	96	a.fd, a.offset >> PAGE_SHIFT);
1da177e4 LT	97	out:
	98	return err;
	99	}
	100
	101
	102	struct sel_arg_struct {
	103	unsigned long n;
	104	fd_set __user inp, outp, *exp;
	105	struct timeval __user *tvp;
	106	};
	107
	108	asmlinkage int old_select(struct sel_arg_struct __user *arg)
	109	{
	110	struct sel_arg_struct a;
	111
	112	if (copy_from_user(&a, arg, sizeof(a)))
	113	return -EFAULT;
	114	/* sys_select() does the appropriate kernel locking */
	115	return sys_select(a.n, a.inp, a.outp, a.exp, a.tvp);
	116	}
	117
	118	/*
	119	* sys_ipc() is the de-multiplexer for the SysV IPC calls..
	120	*
	121	* This is really horribly ugly.
	122	*/
	123	asmlinkage int sys_ipc (uint call, int first, int second,
	124	int third, void __user *ptr, long fifth)
	125	{
	126	int version, ret;
	127
	128	version = call >> 16; /* hack for backward compatibility */
	129	call &= 0xffff;
	130
	131	switch (call) {
	132	case SEMOP:
	133	return sys_semtimedop (first, (struct sembuf __user *)ptr, second, NULL);
	134	case SEMTIMEDOP:
	135	return sys_semtimedop(first, (struct sembuf __user *)ptr, second,
	136	(const struct timespec __user *)fifth);
	137
	138	case SEMGET:
	139	return sys_semget (first, second, third);
	140	case SEMCTL: {
	141	union semun fourth;
	142	if (!ptr)
	143	return -EINVAL;
	144	if (get_user(fourth.__pad, (void __user * __user *) ptr))
	145	return -EFAULT;
	146	return sys_semctl (first, second, third, fourth);
	147	}
	148
	149	case MSGSND:
	150	return sys_msgsnd (first, (struct msgbuf __user *) ptr,
	151	second, third);
	152	case MSGRCV:
	153	switch (version) {
	154	case 0: {
	155	struct ipc_kludge tmp;
	156	if (!ptr)
	157	return -EINVAL;
	158
	159	if (copy_from_user(&tmp,
	160	(struct ipc_kludge __user *) ptr,
161	sizeof (tmp)))
162	return -EFAULT;
163	return sys_msgrcv (first, tmp.msgp, second,
164	tmp.msgtyp, third);
165	}
166	default:
167	return sys_msgrcv (first,
168	(struct msgbuf __user *) ptr,
169	second, fifth, third);
170	}
171	case MSGGET:
172	return sys_msgget ((key_t) first, second);
173	case MSGCTL:
174	return sys_msgctl (first, second, (struct msqid_ds __user *) ptr);
175
176	case SHMAT:
177	switch (version) {
178	default: {
179	ulong raddr;
180	ret = do_shmat (first, (char __user *) ptr, second, &raddr);
181	if (ret)
182	return ret;
183	return put_user (raddr, (ulong __user *) third);
184	}
185	case 1: /* iBCS2 emulator entry point */
186	if (!segment_eq(get_fs(), get_ds()))
187	return -EINVAL;
188	/* The "(ulong ) third" is valid _only_ because of the kernel segment thing /
189	return do_shmat (first, (char __user ) ptr, second, (ulong ) third);
190	}
191	case SHMDT:
192	return sys_shmdt ((char __user *)ptr);
193	case SHMGET:
194	return sys_shmget (first, second, third);
195	case SHMCTL:
196	return sys_shmctl (first, second,
197	(struct shmid_ds __user *) ptr);
198	default:
199	return -ENOSYS;
200	}
201	}
202
203	/*
204	* Old cruft
205	*/
206	asmlinkage int sys_uname(struct old_utsname __user * name)
207	{
208	int err;
209	if (!name)
210	return -EFAULT;
211	down_read(&uts_sem);
e9ff3990	212	err = copy_to_user(name, utsname(), sizeof (*name));
1da177e4 LT	213	up_read(&uts_sem);
	214	return err?-EFAULT:0;
	215	}
	216
	217	asmlinkage int sys_olduname(struct oldold_utsname __user * name)
	218	{
	219	int error;
	220
	221	if (!name)
	222	return -EFAULT;
	223	if (!access_ok(VERIFY_WRITE,name,sizeof(struct oldold_utsname)))
	224	return -EFAULT;
	225
	226	down_read(&uts_sem);
	227
e9ff3990 SH	228	error = __copy_to_user(&name->sysname, &utsname()->sysname,
	229	__OLD_UTS_LEN);
	230	error \|= __put_user(0, name->sysname + __OLD_UTS_LEN);
	231	error \|= __copy_to_user(&name->nodename, &utsname()->nodename,
	232	__OLD_UTS_LEN);
	233	error \|= __put_user(0, name->nodename + __OLD_UTS_LEN);
	234	error \|= __copy_to_user(&name->release, &utsname()->release,
	235	__OLD_UTS_LEN);
	236	error \|= __put_user(0, name->release + __OLD_UTS_LEN);
	237	error \|= __copy_to_user(&name->version, &utsname()->version,
	238	__OLD_UTS_LEN);
	239	error \|= __put_user(0, name->version + __OLD_UTS_LEN);
	240	error \|= __copy_to_user(&name->machine, &utsname()->machine,
	241	__OLD_UTS_LEN);
	242	error \|= __put_user(0, name->machine + __OLD_UTS_LEN);
1da177e4 LT	243
	244	up_read(&uts_sem);
	245
	246	error = error ? -EFAULT : 0;
	247
	248	return error;
	249	}
fe74290d AB	250
	251
	252	/*
	253	* Do a system call from kernel instead of calling sys_execve so we
	254	* end up with proper pt_regs.
	255	*/
	256	int kernel_execve(const char filename, char const argv[], char *const envp[])
	257	{
	258	long __res;
	259	asm volatile ("push %%ebx ; movl %2,%%ebx ; int $0x80 ; pop %%ebx"
	260	: "=a" (__res)
	261	: "0" (__NR_execve),"ri" (filename),"c" (argv), "d" (envp) : "memory");
	262	return __res;
	263	}