[GitHub/mt8127/android_kernel_alcatel_ttab.git] / arch / mips / kernel / syscall.c

/*
 * This file is subject to the terms and conditions of the GNU General Public
 * License.  See the file "COPYING" in the main directory of this archive
 * for more details.
 *
 * Copyright (C) 1995, 1996, 1997, 2000, 2001, 05 by Ralf Baechle
 * Copyright (C) 1999, 2000 Silicon Graphics, Inc.
 * Copyright (C) 2001 MIPS Technologies, Inc.
 */
#include <linux/a.out.h>
#include <linux/capability.h>
#include <linux/errno.h>
#include <linux/linkage.h>
#include <linux/mm.h>
#include <linux/smp.h>
#include <linux/mman.h>
#include <linux/ptrace.h>
#include <linux/sched.h>
#include <linux/string.h>
#include <linux/syscalls.h>
#include <linux/file.h>
#include <linux/slab.h>
#include <linux/utsname.h>
#include <linux/unistd.h>
#include <linux/sem.h>
#include <linux/msg.h>
#include <linux/shm.h>
#include <linux/compiler.h>
#include <linux/module.h>

#include <asm/branch.h>
#include <asm/cachectl.h>
#include <asm/cacheflush.h>
#include <asm/ipc.h>
#include <asm/asm-offsets.h>
#include <asm/signal.h>
#include <asm/sim.h>
#include <asm/shmparam.h>
#include <asm/sysmips.h>
#include <asm/uaccess.h>

asmlinkage int sys_pipe(nabi_no_regargs volatile struct pt_regs regs)
{
	int fd[2];
	int error, res;

	error = do_pipe(fd);
	if (error) {
		res = error;
		goto out;
	}
	regs.regs[3] = fd[1];
	res = fd[0];
out:
	return res;
}

unsigned long shm_align_mask = PAGE_SIZE - 1;	/* Sane caches */

EXPORT_SYMBOL(shm_align_mask);

#define COLOUR_ALIGN(addr,pgoff)				\
	((((addr) + shm_align_mask) & ~shm_align_mask) +	\
	 (((pgoff) << PAGE_SHIFT) & shm_align_mask))

unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr,
	unsigned long len, unsigned long pgoff, unsigned long flags)
{
	struct vm_area_struct * vmm;
	int do_color_align;
	unsigned long task_size;

	task_size = STACK_TOP;

	if (flags & MAP_FIXED) {
		/*
		 * We do not accept a shared mapping if it would violate
		 * cache aliasing constraints.
		 */
		if ((flags & MAP_SHARED) && (addr & shm_align_mask))
			return -EINVAL;
		return addr;
	}

	if (len > task_size)
		return -ENOMEM;
	do_color_align = 0;
	if (filp || (flags & MAP_SHARED))
		do_color_align = 1;
	if (addr) {
		if (do_color_align)
			addr = COLOUR_ALIGN(addr, pgoff);
		else
			addr = PAGE_ALIGN(addr);
		vmm = find_vma(current->mm, addr);
		if (task_size - len >= addr &&
		    (!vmm || addr + len <= vmm->vm_start))
			return addr;
	}
	addr = TASK_UNMAPPED_BASE;
	if (do_color_align)
		addr = COLOUR_ALIGN(addr, pgoff);
	else
		addr = PAGE_ALIGN(addr);

	for (vmm = find_vma(current->mm, addr); ; vmm = vmm->vm_next) {
		/* At this point:  (!vmm || addr < vmm->vm_end). */
		if (task_size - len < addr)
			return -ENOMEM;
		if (!vmm || addr + len <= vmm->vm_start)
			return addr;
		addr = vmm->vm_end;
		if (do_color_align)
			addr = COLOUR_ALIGN(addr, pgoff);
	}
}

/* common code for old and new mmaps */
static inline unsigned long
do_mmap2(unsigned long addr, unsigned long len, unsigned long prot,
        unsigned long flags, unsigned long fd, unsigned long pgoff)
{
	unsigned long error = -EBADF;
	struct file * file = NULL;

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

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

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

asmlinkage unsigned long
old_mmap(unsigned long addr, unsigned long len, int prot,
	int flags, int fd, off_t offset)
{
	unsigned long result;

	result = -EINVAL;
	if (offset & ~PAGE_MASK)
		goto out;

	result = do_mmap2(addr, len, prot, flags, fd, offset >> PAGE_SHIFT);

out:
	return result;
}

asmlinkage unsigned long
sys_mmap2(unsigned long addr, unsigned long len, unsigned long prot,
          unsigned long flags, unsigned long fd, unsigned long pgoff)
{
	if (pgoff & (~PAGE_MASK >> 12))
		return -EINVAL;

	return do_mmap2(addr, len, prot, flags, fd, pgoff >> (PAGE_SHIFT-12));
}

save_static_function(sys_fork);
static int __used noinline
_sys_fork(nabi_no_regargs struct pt_regs regs)
{
	return do_fork(SIGCHLD, regs.regs[29], &regs, 0, NULL, NULL);
}

save_static_function(sys_clone);
static int __used noinline
_sys_clone(nabi_no_regargs struct pt_regs regs)
{
	unsigned long clone_flags;
	unsigned long newsp;
	int __user *parent_tidptr, *child_tidptr;

	clone_flags = regs.regs[4];
	newsp = regs.regs[5];
	if (!newsp)
		newsp = regs.regs[29];
	parent_tidptr = (int __user *) regs.regs[6];
#ifdef CONFIG_32BIT
	/* We need to fetch the fifth argument off the stack.  */
	child_tidptr = NULL;
	if (clone_flags & (CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)) {
		int __user *__user *usp = (int __user *__user *) regs.regs[29];
		if (regs.regs[2] == __NR_syscall) {
			if (get_user (child_tidptr, &usp[5]))
				return -EFAULT;
		}
		else if (get_user (child_tidptr, &usp[4]))
			return -EFAULT;
	}
#else
	child_tidptr = (int __user *) regs.regs[8];
#endif
	return do_fork(clone_flags, newsp, &regs, 0,
	               parent_tidptr, child_tidptr);
}

/*
 * sys_execve() executes a new program.
 */
asmlinkage int sys_execve(nabi_no_regargs struct pt_regs regs)
{
	int error;
	char * filename;

	filename = getname((char __user *) (long)regs.regs[4]);
	error = PTR_ERR(filename);
	if (IS_ERR(filename))
		goto out;
	error = do_execve(filename, (char __user *__user *) (long)regs.regs[5],
	                  (char __user *__user *) (long)regs.regs[6], &regs);
	putname(filename);

out:
	return error;
}

/*
 * Compacrapability ...
 */
asmlinkage int sys_uname(struct old_utsname __user * name)
{
	if (name && !copy_to_user(name, utsname(), sizeof (*name)))
		return 0;
	return -EFAULT;
}

/*
 * Compacrapability ...
 */
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;

	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);
	error = error ? -EFAULT : 0;

	return error;
}

asmlinkage int sys_set_thread_area(unsigned long addr)
{
	struct thread_info *ti = task_thread_info(current);

	ti->tp_value = addr;
	if (cpu_has_userlocal)
		write_c0_userlocal(addr);

	return 0;
}

asmlinkage int _sys_sysmips(int cmd, long arg1, int arg2, int arg3)
{
	int	tmp;

	switch(cmd) {
	case MIPS_ATOMIC_SET:
		printk(KERN_CRIT "How did I get here?\n");
		return -EINVAL;

	case MIPS_FIXADE:
		tmp = current->thread.mflags & ~3;
		current->thread.mflags = tmp | (arg1 & 3);
		return 0;

	case FLUSH_CACHE:
		__flush_cache_all();
		return 0;
	}

	return -EINVAL;
}

/*
 * sys_ipc() is the de-multiplexer for the SysV IPC calls..
 *
 * This is really horribly ugly.
 */
asmlinkage int sys_ipc (unsigned int call, int first, int second,
			unsigned long 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: {
			unsigned long raddr;
			ret = do_shmat (first, (char __user *) ptr, second,
					&raddr);
			if (ret)
				return ret;
			return put_user (raddr, (unsigned long __user *) third);
		}
		case 1:	/* iBCS2 emulator entry point */
			if (!segment_eq(get_fs(), get_ds()))
				return -EINVAL;
			return do_shmat (first, (char __user *) ptr, second,
					 (unsigned long *) 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;
	}
}

/*
 * No implemented yet ...
 */
asmlinkage int sys_cachectl(char *addr, int nbytes, int op)
{
	return -ENOSYS;
}

/*
 * If we ever come here the user sp is bad.  Zap the process right away.
 * Due to the bad stack signaling wouldn't work.
 */
asmlinkage void bad_stack(void)
{
	do_exit(SIGSEGV);
}

/*
 * 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[])
{
	register unsigned long __a0 asm("$4") = (unsigned long) filename;
	register unsigned long __a1 asm("$5") = (unsigned long) argv;
	register unsigned long __a2 asm("$6") = (unsigned long) envp;
	register unsigned long __a3 asm("$7");
	unsigned long __v0;

	__asm__ volatile ("					\n"
	"	.set	noreorder				\n"
	"	li	$2, %5		# __NR_execve		\n"
	"	syscall						\n"
	"	move	%0, $2					\n"
	"	.set	reorder					\n"
	: "=&r" (__v0), "=r" (__a3)
	: "r" (__a0), "r" (__a1), "r" (__a2), "i" (__NR_execve)
	: "$2", "$8", "$9", "$10", "$11", "$12", "$13", "$14", "$15", "$24",
	  "memory");

	if (__a3 == 0)
		return __v0;

	return -__v0;
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* This file is subject to the terms and conditions of the GNU General Public
	3	* License. See the file "COPYING" in the main directory of this archive
	4	* for more details.
	5	*
	6	* Copyright (C) 1995, 1996, 1997, 2000, 2001, 05 by Ralf Baechle
	7	* Copyright (C) 1999, 2000 Silicon Graphics, Inc.
	8	* Copyright (C) 2001 MIPS Technologies, Inc.
	9	*/
	10	#include <linux/a.out.h>
a9415644	11	#include <linux/capability.h>
1da177e4 LT	12	#include <linux/errno.h>
	13	#include <linux/linkage.h>
	14	#include <linux/mm.h>
	15	#include <linux/smp.h>
1da177e4 LT	16	#include <linux/mman.h>
	17	#include <linux/ptrace.h>
	18	#include <linux/sched.h>
	19	#include <linux/string.h>
	20	#include <linux/syscalls.h>
	21	#include <linux/file.h>
	22	#include <linux/slab.h>
	23	#include <linux/utsname.h>
	24	#include <linux/unistd.h>
	25	#include <linux/sem.h>
	26	#include <linux/msg.h>
	27	#include <linux/shm.h>
	28	#include <linux/compiler.h>
9ff77c46	29	#include <linux/module.h>
1da177e4 LT	30
	31	#include <asm/branch.h>
	32	#include <asm/cachectl.h>
	33	#include <asm/cacheflush.h>
	34	#include <asm/ipc.h>
048eb582	35	#include <asm/asm-offsets.h>
1da177e4 LT	36	#include <asm/signal.h>
	37	#include <asm/sim.h>
	38	#include <asm/shmparam.h>
	39	#include <asm/sysmips.h>
	40	#include <asm/uaccess.h>
	41
	42	asmlinkage int sys_pipe(nabi_no_regargs volatile struct pt_regs regs)
	43	{
	44	int fd[2];
	45	int error, res;
	46
	47	error = do_pipe(fd);
	48	if (error) {
	49	res = error;
	50	goto out;
	51	}
	52	regs.regs[3] = fd[1];
	53	res = fd[0];
	54	out:
	55	return res;
	56	}
	57
	58	unsigned long shm_align_mask = PAGE_SIZE - 1; /* Sane caches */
	59
9ff77c46 RB	60	EXPORT_SYMBOL(shm_align_mask);
9ff77c46 RB	61
1da177e4 LT	62	#define COLOUR_ALIGN(addr,pgoff) \
	63	((((addr) + shm_align_mask) & ~shm_align_mask) + \
	64	(((pgoff) << PAGE_SHIFT) & shm_align_mask))
	65
	66	unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr,
	67	unsigned long len, unsigned long pgoff, unsigned long flags)
	68	{
	69	struct vm_area_struct * vmm;
	70	int do_color_align;
	71	unsigned long task_size;
	72
	73	task_size = STACK_TOP;
	74
	75	if (flags & MAP_FIXED) {
	76	/*
	77	* We do not accept a shared mapping if it would violate
	78	* cache aliasing constraints.
	79	*/
	80	if ((flags & MAP_SHARED) && (addr & shm_align_mask))
	81	return -EINVAL;
	82	return addr;
	83	}
	84
	85	if (len > task_size)
	86	return -ENOMEM;
	87	do_color_align = 0;
	88	if (filp \|\| (flags & MAP_SHARED))
	89	do_color_align = 1;
	90	if (addr) {
	91	if (do_color_align)
	92	addr = COLOUR_ALIGN(addr, pgoff);
	93	else
	94	addr = PAGE_ALIGN(addr);
	95	vmm = find_vma(current->mm, addr);
	96	if (task_size - len >= addr &&
	97	(!vmm \|\| addr + len <= vmm->vm_start))
	98	return addr;
	99	}
	100	addr = TASK_UNMAPPED_BASE;
	101	if (do_color_align)
	102	addr = COLOUR_ALIGN(addr, pgoff);
	103	else
	104	addr = PAGE_ALIGN(addr);
	105
	106	for (vmm = find_vma(current->mm, addr); ; vmm = vmm->vm_next) {
	107	/* At this point: (!vmm \|\| addr < vmm->vm_end). */
	108	if (task_size - len < addr)
	109	return -ENOMEM;
	110	if (!vmm \|\| addr + len <= vmm->vm_start)
	111	return addr;
	112	addr = vmm->vm_end;
	113	if (do_color_align)
	114	addr = COLOUR_ALIGN(addr, pgoff);
	115	}
	116	}
	117
	118	/* common code for old and new mmaps */
	119	static inline unsigned long
	120	do_mmap2(unsigned long addr, unsigned long len, unsigned long prot,
	121	unsigned long flags, unsigned long fd, unsigned long pgoff)
	122	{
	123	unsigned long error = -EBADF;
	124	struct file * file = NULL;
	125
126	flags &= ~(MAP_EXECUTABLE \| MAP_DENYWRITE);
127	if (!(flags & MAP_ANONYMOUS)) {
128	file = fget(fd);
129	if (!file)
130	goto out;
131	}
132
133	down_write(&current->mm->mmap_sem);
134	error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
135	up_write(&current->mm->mmap_sem);
136
137	if (file)
138	fput(file);
139	out:
140	return error;
141	}
142
143	asmlinkage unsigned long
144	old_mmap(unsigned long addr, unsigned long len, int prot,
145	int flags, int fd, off_t offset)
146	{
147	unsigned long result;
148
149	result = -EINVAL;
150	if (offset & ~PAGE_MASK)
151	goto out;
152
153	result = do_mmap2(addr, len, prot, flags, fd, offset >> PAGE_SHIFT);
154
155	out:
156	return result;
157	}
158
159	asmlinkage unsigned long
160	sys_mmap2(unsigned long addr, unsigned long len, unsigned long prot,
161	unsigned long flags, unsigned long fd, unsigned long pgoff)
162	{
947df17c PA	163	if (pgoff & (~PAGE_MASK >> 12))
	164	return -EINVAL;
	165
	166	return do_mmap2(addr, len, prot, flags, fd, pgoff >> (PAGE_SHIFT-12));
1da177e4 LT	167	}
	168
	169	save_static_function(sys_fork);
f5dbeaf5	170	static int __used noinline
1da177e4 LT	171	_sys_fork(nabi_no_regargs struct pt_regs regs)
	172	{
	173	return do_fork(SIGCHLD, regs.regs[29], &regs, 0, NULL, NULL);
	174	}
	175
	176	save_static_function(sys_clone);
f5dbeaf5	177	static int __used noinline
1da177e4 LT	178	_sys_clone(nabi_no_regargs struct pt_regs regs)
	179	{
	180	unsigned long clone_flags;
	181	unsigned long newsp;
3c37026d	182	int __user parent_tidptr, child_tidptr;
1da177e4 LT	183
	184	clone_flags = regs.regs[4];
	185	newsp = regs.regs[5];
	186	if (!newsp)
	187	newsp = regs.regs[29];
3c37026d RB	188	parent_tidptr = (int __user *) regs.regs[6];
	189	#ifdef CONFIG_32BIT
	190	/* We need to fetch the fifth argument off the stack. */
	191	child_tidptr = NULL;
	192	if (clone_flags & (CLONE_CHILD_SETTID \| CLONE_CHILD_CLEARTID)) {
	193	int __user __user usp = (int __user __user ) regs.regs[29];
	194	if (regs.regs[2] == __NR_syscall) {
	195	if (get_user (child_tidptr, &usp[5]))
	196	return -EFAULT;
	197	}
	198	else if (get_user (child_tidptr, &usp[4]))
	199	return -EFAULT;
	200	}
	201	#else
	202	child_tidptr = (int __user *) regs.regs[8];
	203	#endif
1da177e4 LT	204	return do_fork(clone_flags, newsp, &regs, 0,
	205	parent_tidptr, child_tidptr);
	206	}
	207
	208	/*
	209	* sys_execve() executes a new program.
	210	*/
	211	asmlinkage int sys_execve(nabi_no_regargs struct pt_regs regs)
	212	{
	213	int error;
	214	char * filename;
	215
be6e518b	216	filename = getname((char __user *) (long)regs.regs[4]);
1da177e4 LT	217	error = PTR_ERR(filename);
	218	if (IS_ERR(filename))
	219	goto out;
be6e518b AN	220	error = do_execve(filename, (char __user __user ) (long)regs.regs[5],
be6e518b AN	221	(char __user __user ) (long)regs.regs[6], &regs);
1da177e4 LT	222	putname(filename);
	223
	224	out:
	225	return error;
	226	}
	227
	228	/*
	229	* Compacrapability ...
	230	*/
be6e518b	231	asmlinkage int sys_uname(struct old_utsname __user * name)
1da177e4	232	{
e9ff3990	233	if (name && !copy_to_user(name, utsname(), sizeof (*name)))
1da177e4 LT	234	return 0;
	235	return -EFAULT;
	236	}
	237
	238	/*
	239	* Compacrapability ...
	240	*/
be6e518b	241	asmlinkage int sys_olduname(struct oldold_utsname __user * name)
1da177e4 LT	242	{
	243	int error;
	244
	245	if (!name)
	246	return -EFAULT;
	247	if (!access_ok(VERIFY_WRITE,name,sizeof(struct oldold_utsname)))
	248	return -EFAULT;
	249
e9ff3990 SH	250	error = __copy_to_user(&name->sysname, &utsname()->sysname,
	251	__OLD_UTS_LEN);
	252	error -= __put_user(0, name->sysname + __OLD_UTS_LEN);
	253	error -= __copy_to_user(&name->nodename, &utsname()->nodename,
	254	__OLD_UTS_LEN);
	255	error -= __put_user(0, name->nodename + __OLD_UTS_LEN);
	256	error -= __copy_to_user(&name->release, &utsname()->release,
	257	__OLD_UTS_LEN);
	258	error -= __put_user(0, name->release + __OLD_UTS_LEN);
	259	error -= __copy_to_user(&name->version, &utsname()->version,
	260	__OLD_UTS_LEN);
	261	error -= __put_user(0, name->version + __OLD_UTS_LEN);
	262	error -= __copy_to_user(&name->machine, &utsname()->machine,
	263	__OLD_UTS_LEN);
	264	error = __put_user(0, name->machine + __OLD_UTS_LEN);
1da177e4 LT	265	error = error ? -EFAULT : 0;
	266
	267	return error;
	268	}
	269
06be375b	270	asmlinkage int sys_set_thread_area(unsigned long addr)
3c37026d	271	{
dc8f6029	272	struct thread_info *ti = task_thread_info(current);
3c37026d RB	273
3c37026d RB	274	ti->tp_value = addr;
a3692020 RB	275	if (cpu_has_userlocal)
a3692020 RB	276	write_c0_userlocal(addr);
06be375b RB	277
06be375b RB	278	return 0;
3c37026d RB	279	}
3c37026d RB	280
1da177e4 LT	281	asmlinkage int _sys_sysmips(int cmd, long arg1, int arg2, int arg3)
1da177e4 LT	282	{
ecf52d3c	283	int tmp;
1da177e4 LT	284
1da177e4 LT	285	switch(cmd) {
1da177e4 LT	286	case MIPS_ATOMIC_SET:
	287	printk(KERN_CRIT "How did I get here?\n");
	288	return -EINVAL;
	289
	290	case MIPS_FIXADE:
	291	tmp = current->thread.mflags & ~3;
	292	current->thread.mflags = tmp \| (arg1 & 3);
	293	return 0;
	294
	295	case FLUSH_CACHE:
	296	__flush_cache_all();
	297	return 0;
1da177e4 LT	298	}
	299
	300	return -EINVAL;
	301	}
	302
	303	/*
	304	* sys_ipc() is the de-multiplexer for the SysV IPC calls..
	305	*
	306	* This is really horribly ugly.
	307	*/
fc103349	308	asmlinkage int sys_ipc (unsigned int call, int first, int second,
be6e518b	309	unsigned long third, void __user *ptr, long fifth)
1da177e4 LT	310	{
	311	int version, ret;
	312
	313	version = call >> 16; /* hack for backward compatibility */
	314	call &= 0xffff;
	315
	316	switch (call) {
	317	case SEMOP:
be6e518b AN	318	return sys_semtimedop (first, (struct sembuf __user *)ptr,
be6e518b AN	319	second, NULL);
1da177e4	320	case SEMTIMEDOP:
be6e518b AN	321	return sys_semtimedop (first, (struct sembuf __user *)ptr,
	322	second,
	323	(const struct timespec __user *)fifth);
1da177e4 LT	324	case SEMGET:
	325	return sys_semget (first, second, third);
	326	case SEMCTL: {
	327	union semun fourth;
	328	if (!ptr)
	329	return -EINVAL;
219ac73a	330	if (get_user(fourth.__pad, (void __user __user ) ptr))
1da177e4 LT	331	return -EFAULT;
	332	return sys_semctl (first, second, third, fourth);
	333	}
	334
	335	case MSGSND:
be6e518b	336	return sys_msgsnd (first, (struct msgbuf __user *) ptr,
1da177e4 LT	337	second, third);
	338	case MSGRCV:
	339	switch (version) {
	340	case 0: {
	341	struct ipc_kludge tmp;
	342	if (!ptr)
	343	return -EINVAL;
	344
	345	if (copy_from_user(&tmp,
be6e518b	346	(struct ipc_kludge __user *) ptr,
1da177e4 LT	347	sizeof (tmp)))
	348	return -EFAULT;
	349	return sys_msgrcv (first, tmp.msgp, second,
	350	tmp.msgtyp, third);
	351	}
	352	default:
	353	return sys_msgrcv (first,
be6e518b	354	(struct msgbuf __user *) ptr,
1da177e4 LT	355	second, fifth, third);
	356	}
	357	case MSGGET:
	358	return sys_msgget ((key_t) first, second);
	359	case MSGCTL:
be6e518b AN	360	return sys_msgctl (first, second,
be6e518b AN	361	(struct msqid_ds __user *) ptr);
1da177e4 LT	362
	363	case SHMAT:
	364	switch (version) {
	365	default: {
fc103349	366	unsigned long raddr;
be6e518b AN	367	ret = do_shmat (first, (char __user *) ptr, second,
be6e518b AN	368	&raddr);
1da177e4 LT	369	if (ret)
1da177e4 LT	370	return ret;
fc103349	371	return put_user (raddr, (unsigned long __user *) third);
1da177e4 LT	372	}
	373	case 1: /* iBCS2 emulator entry point */
	374	if (!segment_eq(get_fs(), get_ds()))
	375	return -EINVAL;
be6e518b	376	return do_shmat (first, (char __user *) ptr, second,
fc103349	377	(unsigned long *) third);
1da177e4 LT	378	}
1da177e4 LT	379	case SHMDT:
be6e518b	380	return sys_shmdt ((char __user *)ptr);
1da177e4 LT	381	case SHMGET:
	382	return sys_shmget (first, second, third);
	383	case SHMCTL:
	384	return sys_shmctl (first, second,
be6e518b	385	(struct shmid_ds __user *) ptr);
1da177e4 LT	386	default:
	387	return -ENOSYS;
	388	}
	389	}
	390
1da177e4 LT	391	/*
	392	* No implemented yet ...
	393	*/
	394	asmlinkage int sys_cachectl(char *addr, int nbytes, int op)
	395	{
	396	return -ENOSYS;
	397	}
	398
	399	/*
	400	* If we ever come here the user sp is bad. Zap the process right away.
	401	* Due to the bad stack signaling wouldn't work.
	402	*/
	403	asmlinkage void bad_stack(void)
	404	{
	405	do_exit(SIGSEGV);
	406	}
fe74290d AB	407
	408	/*
	409	* Do a system call from kernel instead of calling sys_execve so we
	410	* end up with proper pt_regs.
	411	*/
	412	int kernel_execve(const char filename, char const argv[], char *const envp[])
	413	{
	414	register unsigned long __a0 asm("$4") = (unsigned long) filename;
	415	register unsigned long __a1 asm("$5") = (unsigned long) argv;
	416	register unsigned long __a2 asm("$6") = (unsigned long) envp;
	417	register unsigned long __a3 asm("$7");
	418	unsigned long __v0;
	419
	420	__asm__ volatile (" \n"
	421	" .set noreorder \n"
	422	" li $2, %5 # __NR_execve \n"
	423	" syscall \n"
	424	" move %0, $2 \n"
	425	" .set reorder \n"
	426	: "=&r" (__v0), "=r" (__a3)
	427	: "r" (__a0), "r" (__a1), "r" (__a2), "i" (__NR_execve)
	428	: "$2", "$8", "$9", "$10", "$11", "$12", "$13", "$14", "$15", "$24",
	429	"memory");
	430
	431	if (__a3 == 0)
	432	return __v0;
	433
	434	return -__v0;
	435	}