[linux-2.6-block.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/capability.h>
#include <linux/errno.h>
#include <linux/linkage.h>
#include <linux/mm.h>
#include <linux/fs.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 <linux/ipc.h>
#include <linux/uaccess.h>

#include <asm/asm.h>
#include <asm/branch.h>
#include <asm/cachectl.h>
#include <asm/cacheflush.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>

/*
 * For historic reasons the pipe(2) syscall on MIPS has an unusual calling
 * convention.  It returns results in registers $v0 / $v1 which means there
 * is no need for it to do verify the validity of a userspace pointer
 * argument.  Historically that used to be expensive in Linux.  These days
 * the performance advantage is negligible.
 */
asmlinkage int sysm_pipe(nabi_no_regargs volatile struct pt_regs regs)
{
	int fd[2];
	int error, res;

	error = do_pipe_flags(fd, 0);
	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 (len > task_size)
		return -ENOMEM;

	if (flags & MAP_FIXED) {
		/* Even MAP_FIXED mappings must reside within task_size.  */
		if (task_size - len < addr)
			return -EINVAL;

		/*
		 * 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;
	}

	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;
}

SYSCALL_DEFINE6(mips_mmap, unsigned long, addr, unsigned long, len,
	unsigned long, prot, unsigned long, flags, unsigned long,
	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;
}

SYSCALL_DEFINE6(mips_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 ...
 */
SYSCALL_DEFINE1(uname, struct old_utsname __user *, name)
{
	if (name && !copy_to_user(name, utsname(), sizeof (*name)))
		return 0;
	return -EFAULT;
}

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

SYSCALL_DEFINE1(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;
}

static inline int mips_atomic_set(struct pt_regs *regs,
	unsigned long addr, unsigned long new)
{
	unsigned long old, tmp;
	unsigned int err;

	if (unlikely(addr & 3))
		return -EINVAL;

	if (unlikely(!access_ok(VERIFY_WRITE, addr, 4)))
		return -EINVAL;

	if (cpu_has_llsc && R10000_LLSC_WAR) {
		__asm__ __volatile__ (
		"	.set	mips3					\n"
		"	li	%[err], 0				\n"
		"1:	ll	%[old], (%[addr])			\n"
		"	move	%[tmp], %[new]				\n"
		"2:	sc	%[tmp], (%[addr])			\n"
		"	beqzl	%[tmp], 1b				\n"
		"3:							\n"
		"	.section .fixup,\"ax\"				\n"
		"4:	li	%[err], %[efault]			\n"
		"	j	3b					\n"
		"	.previous					\n"
		"	.section __ex_table,\"a\"			\n"
		"	"STR(PTR)"	1b, 4b				\n"
		"	"STR(PTR)"	2b, 4b				\n"
		"	.previous					\n"
		"	.set	mips0					\n"
		: [old] "=&r" (old),
		  [err] "=&r" (err),
		  [tmp] "=&r" (tmp)
		: [addr] "r" (addr),
		  [new] "r" (new),
		  [efault] "i" (-EFAULT)
		: "memory");
	} else if (cpu_has_llsc) {
		__asm__ __volatile__ (
		"	.set	mips3					\n"
		"	li	%[err], 0				\n"
		"1:	ll	%[old], (%[addr])			\n"
		"	move	%[tmp], %[new]				\n"
		"2:	sc	%[tmp], (%[addr])			\n"
		"	bnez	%[tmp], 4f				\n"
		"3:							\n"
		"	.subsection 2					\n"
		"4:	b	1b					\n"
		"	.previous					\n"
		"							\n"
		"	.section .fixup,\"ax\"				\n"
		"5:	li	%[err], %[efault]			\n"
		"	j	3b					\n"
		"	.previous					\n"
		"	.section __ex_table,\"a\"			\n"
		"	"STR(PTR)"	1b, 5b				\n"
		"	"STR(PTR)"	2b, 5b				\n"
		"	.previous					\n"
		"	.set	mips0					\n"
		: [old] "=&r" (old),
		  [err] "=&r" (err),
		  [tmp] "=&r" (tmp)
		: [addr] "r" (addr),
		  [new] "r" (new),
		  [efault] "i" (-EFAULT)
		: "memory");
	} else {
		do {
			preempt_disable();
			ll_bit = 1;
			ll_task = current;
			preempt_enable();

			err = __get_user(old, (unsigned int *) addr);
			err |= __put_user(new, (unsigned int *) addr);
			if (err)
				break;
			rmb();
		} while (!ll_bit);
	}

	if (unlikely(err))
		return err;

	regs->regs[2] = old;
	regs->regs[7] = 0;	/* No error */

	/*
	 * Don't let your children do this ...
	 */
	__asm__ __volatile__(
	"	move	$29, %0						\n"
	"	j	syscall_exit					\n"
	: /* no outputs */
	: "r" (regs));

	/* unreached.  Honestly.  */
	while (1);
}

save_static_function(sys_sysmips);
static int __used noinline
_sys_sysmips(nabi_no_regargs struct pt_regs regs)
{
	long cmd, arg1, arg2, arg3;

	cmd = regs.regs[4];
	arg1 = regs.regs[5];
	arg2 = regs.regs[6];
	arg3 = regs.regs[7];

	switch (cmd) {
	case MIPS_ATOMIC_SET:
		return mips_atomic_set(&regs, arg1, arg2);

	case MIPS_FIXADE:
		if (arg1 & ~3)
			return -EINVAL;

		if (arg1 & 1)
			set_thread_flag(TIF_FIXADE);
		else
			clear_thread_flag(TIF_FIXADE);
		if (arg1 & 2)
			set_thread_flag(TIF_LOGADE);
		else
			clear_thread_flag(TIF_FIXADE);

		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.
 */
SYSCALL_DEFINE6(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 ...
 */
SYSCALL_DEFINE3(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	*/
a9415644	10	#include <linux/capability.h>
1da177e4 LT	11	#include <linux/errno.h>
	12	#include <linux/linkage.h>
	13	#include <linux/mm.h>
4e950f6f	14	#include <linux/fs.h>
1da177e4	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>
cba4fbbf	30	#include <linux/ipc.h>
f1e39a4a	31	#include <linux/uaccess.h>
1da177e4	32
f1e39a4a	33	#include <asm/asm.h>
1da177e4 LT	34	#include <asm/branch.h>
	35	#include <asm/cachectl.h>
	36	#include <asm/cacheflush.h>
048eb582	37	#include <asm/asm-offsets.h>
1da177e4 LT	38	#include <asm/signal.h>
	39	#include <asm/sim.h>
	40	#include <asm/shmparam.h>
	41	#include <asm/sysmips.h>
	42	#include <asm/uaccess.h>
	43
8213bbf9 RB	44	/*
	45	* For historic reasons the pipe(2) syscall on MIPS has an unusual calling
	46	* convention. It returns results in registers $v0 / $v1 which means there
	47	* is no need for it to do verify the validity of a userspace pointer
	48	* argument. Historically that used to be expensive in Linux. These days
	49	* the performance advantage is negligible.
	50	*/
	51	asmlinkage int sysm_pipe(nabi_no_regargs volatile struct pt_regs regs)
1da177e4 LT	52	{
	53	int fd[2];
	54	int error, res;
	55
ed8cae8b	56	error = do_pipe_flags(fd, 0);
1da177e4 LT	57	if (error) {
	58	res = error;
	59	goto out;
	60	}
	61	regs.regs[3] = fd[1];
	62	res = fd[0];
	63	out:
	64	return res;
	65	}
	66
	67	unsigned long shm_align_mask = PAGE_SIZE - 1; /* Sane caches */
	68
9ff77c46 RB	69	EXPORT_SYMBOL(shm_align_mask);
9ff77c46 RB	70
1da177e4 LT	71	#define COLOUR_ALIGN(addr,pgoff) \
	72	((((addr) + shm_align_mask) & ~shm_align_mask) + \
	73	(((pgoff) << PAGE_SHIFT) & shm_align_mask))
	74
	75	unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr,
	76	unsigned long len, unsigned long pgoff, unsigned long flags)
	77	{
	78	struct vm_area_struct * vmm;
	79	int do_color_align;
	80	unsigned long task_size;
	81
	82	task_size = STACK_TOP;
	83
098362e7 DD	84	if (len > task_size)
	85	return -ENOMEM;
	86
1da177e4	87	if (flags & MAP_FIXED) {
098362e7 DD	88	/* Even MAP_FIXED mappings must reside within task_size. */
	89	if (task_size - len < addr)
	90	return -EINVAL;
	91
1da177e4 LT	92	/*
	93	* We do not accept a shared mapping if it would violate
	94	* cache aliasing constraints.
	95	*/
	96	if ((flags & MAP_SHARED) && (addr & shm_align_mask))
	97	return -EINVAL;
	98	return addr;
	99	}
	100
1da177e4 LT	101	do_color_align = 0;
	102	if (filp \|\| (flags & MAP_SHARED))
	103	do_color_align = 1;
	104	if (addr) {
	105	if (do_color_align)
	106	addr = COLOUR_ALIGN(addr, pgoff);
	107	else
	108	addr = PAGE_ALIGN(addr);
	109	vmm = find_vma(current->mm, addr);
	110	if (task_size - len >= addr &&
	111	(!vmm \|\| addr + len <= vmm->vm_start))
	112	return addr;
	113	}
	114	addr = TASK_UNMAPPED_BASE;
	115	if (do_color_align)
	116	addr = COLOUR_ALIGN(addr, pgoff);
	117	else
	118	addr = PAGE_ALIGN(addr);
	119
	120	for (vmm = find_vma(current->mm, addr); ; vmm = vmm->vm_next) {
	121	/* At this point: (!vmm \|\| addr < vmm->vm_end). */
	122	if (task_size - len < addr)
	123	return -ENOMEM;
	124	if (!vmm \|\| addr + len <= vmm->vm_start)
	125	return addr;
	126	addr = vmm->vm_end;
	127	if (do_color_align)
	128	addr = COLOUR_ALIGN(addr, pgoff);
	129	}
	130	}
	131
	132	/* common code for old and new mmaps */
	133	static inline unsigned long
	134	do_mmap2(unsigned long addr, unsigned long len, unsigned long prot,
	135	unsigned long flags, unsigned long fd, unsigned long pgoff)
	136	{
	137	unsigned long error = -EBADF;
	138	struct file * file = NULL;
	139
	140	flags &= ~(MAP_EXECUTABLE \| MAP_DENYWRITE);
	141	if (!(flags & MAP_ANONYMOUS)) {
	142	file = fget(fd);
	143	if (!file)
	144	goto out;
	145	}
	146
	147	down_write(&current->mm->mmap_sem);
	148	error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
	149	up_write(&current->mm->mmap_sem);
	150
	151	if (file)
	152	fput(file);
	153	out:
	154	return error;
	155	}
	156
dbda6ac0 RB	157	SYSCALL_DEFINE6(mips_mmap, unsigned long, addr, unsigned long, len,
	158	unsigned long, prot, unsigned long, flags, unsigned long,
	159	fd, off_t, offset)
1da177e4 LT	160	{
	161	unsigned long result;
	162
	163	result = -EINVAL;
	164	if (offset & ~PAGE_MASK)
	165	goto out;
	166
	167	result = do_mmap2(addr, len, prot, flags, fd, offset >> PAGE_SHIFT);
	168
	169	out:
	170	return result;
	171	}
	172
dbda6ac0 RB	173	SYSCALL_DEFINE6(mips_mmap2, unsigned long, addr, unsigned long, len,
	174	unsigned long, prot, unsigned long, flags, unsigned long, fd,
	175	unsigned long, pgoff)
1da177e4	176	{
947df17c PA	177	if (pgoff & (~PAGE_MASK >> 12))
	178	return -EINVAL;
	179
	180	return do_mmap2(addr, len, prot, flags, fd, pgoff >> (PAGE_SHIFT-12));
1da177e4 LT	181	}
	182
	183	save_static_function(sys_fork);
f5dbeaf5	184	static int __used noinline
1da177e4 LT	185	_sys_fork(nabi_no_regargs struct pt_regs regs)
	186	{
	187	return do_fork(SIGCHLD, regs.regs[29], &regs, 0, NULL, NULL);
	188	}
	189
	190	save_static_function(sys_clone);
f5dbeaf5	191	static int __used noinline
1da177e4 LT	192	_sys_clone(nabi_no_regargs struct pt_regs regs)
	193	{
	194	unsigned long clone_flags;
	195	unsigned long newsp;
3c37026d	196	int __user parent_tidptr, child_tidptr;
1da177e4 LT	197
	198	clone_flags = regs.regs[4];
	199	newsp = regs.regs[5];
	200	if (!newsp)
	201	newsp = regs.regs[29];
3c37026d RB	202	parent_tidptr = (int __user *) regs.regs[6];
	203	#ifdef CONFIG_32BIT
	204	/* We need to fetch the fifth argument off the stack. */
	205	child_tidptr = NULL;
	206	if (clone_flags & (CLONE_CHILD_SETTID \| CLONE_CHILD_CLEARTID)) {
	207	int __user __user usp = (int __user __user ) regs.regs[29];
	208	if (regs.regs[2] == __NR_syscall) {
	209	if (get_user (child_tidptr, &usp[5]))
	210	return -EFAULT;
	211	}
	212	else if (get_user (child_tidptr, &usp[4]))
	213	return -EFAULT;
	214	}
	215	#else
	216	child_tidptr = (int __user *) regs.regs[8];
	217	#endif
1da177e4 LT	218	return do_fork(clone_flags, newsp, &regs, 0,
	219	parent_tidptr, child_tidptr);
	220	}
	221
	222	/*
	223	* sys_execve() executes a new program.
	224	*/
	225	asmlinkage int sys_execve(nabi_no_regargs struct pt_regs regs)
	226	{
	227	int error;
	228	char * filename;
	229
be6e518b	230	filename = getname((char __user *) (long)regs.regs[4]);
1da177e4 LT	231	error = PTR_ERR(filename);
	232	if (IS_ERR(filename))
	233	goto out;
be6e518b AN	234	error = do_execve(filename, (char __user __user ) (long)regs.regs[5],
be6e518b AN	235	(char __user __user ) (long)regs.regs[6], &regs);
1da177e4 LT	236	putname(filename);
	237
	238	out:
	239	return error;
	240	}
	241
	242	/*
	243	* Compacrapability ...
	244	*/
dbda6ac0	245	SYSCALL_DEFINE1(uname, struct old_utsname __user *, name)
1da177e4	246	{
e9ff3990	247	if (name && !copy_to_user(name, utsname(), sizeof (*name)))
1da177e4 LT	248	return 0;
	249	return -EFAULT;
	250	}
	251
	252	/*
	253	* Compacrapability ...
	254	*/
dbda6ac0	255	SYSCALL_DEFINE1(olduname, struct oldold_utsname __user *, name)
1da177e4 LT	256	{
	257	int error;
	258
	259	if (!name)
	260	return -EFAULT;
21a151d8	261	if (!access_ok(VERIFY_WRITE, name, sizeof(struct oldold_utsname)))
1da177e4 LT	262	return -EFAULT;
1da177e4 LT	263
e9ff3990 SH	264	error = __copy_to_user(&name->sysname, &utsname()->sysname,
	265	__OLD_UTS_LEN);
	266	error -= __put_user(0, name->sysname + __OLD_UTS_LEN);
	267	error -= __copy_to_user(&name->nodename, &utsname()->nodename,
	268	__OLD_UTS_LEN);
	269	error -= __put_user(0, name->nodename + __OLD_UTS_LEN);
	270	error -= __copy_to_user(&name->release, &utsname()->release,
	271	__OLD_UTS_LEN);
	272	error -= __put_user(0, name->release + __OLD_UTS_LEN);
	273	error -= __copy_to_user(&name->version, &utsname()->version,
	274	__OLD_UTS_LEN);
	275	error -= __put_user(0, name->version + __OLD_UTS_LEN);
	276	error -= __copy_to_user(&name->machine, &utsname()->machine,
	277	__OLD_UTS_LEN);
	278	error = __put_user(0, name->machine + __OLD_UTS_LEN);
1da177e4 LT	279	error = error ? -EFAULT : 0;
	280
	281	return error;
	282	}
	283
dbda6ac0	284	SYSCALL_DEFINE1(set_thread_area, unsigned long, addr)
3c37026d	285	{
dc8f6029	286	struct thread_info *ti = task_thread_info(current);
3c37026d RB	287
3c37026d RB	288	ti->tp_value = addr;
a3692020 RB	289	if (cpu_has_userlocal)
a3692020 RB	290	write_c0_userlocal(addr);
06be375b RB	291
06be375b RB	292	return 0;
3c37026d RB	293	}
3c37026d RB	294
f1e39a4a RB	295	static inline int mips_atomic_set(struct pt_regs *regs,
f1e39a4a RB	296	unsigned long addr, unsigned long new)
1da177e4	297	{
f1e39a4a RB	298	unsigned long old, tmp;
	299	unsigned int err;
	300
	301	if (unlikely(addr & 3))
	302	return -EINVAL;
	303
	304	if (unlikely(!access_ok(VERIFY_WRITE, addr, 4)))
	305	return -EINVAL;
	306
	307	if (cpu_has_llsc && R10000_LLSC_WAR) {
	308	__asm__ __volatile__ (
a91be9ee	309	" .set mips3 \n"
f1e39a4a RB	310	" li %[err], 0 \n"
	311	"1: ll %[old], (%[addr]) \n"
	312	" move %[tmp], %[new] \n"
	313	"2: sc %[tmp], (%[addr]) \n"
	314	" beqzl %[tmp], 1b \n"
	315	"3: \n"
	316	" .section .fixup,\"ax\" \n"
	317	"4: li %[err], %[efault] \n"
	318	" j 3b \n"
	319	" .previous \n"
	320	" .section __ex_table,\"a\" \n"
	321	" "STR(PTR)" 1b, 4b \n"
	322	" "STR(PTR)" 2b, 4b \n"
	323	" .previous \n"
a91be9ee	324	" .set mips0 \n"
f1e39a4a RB	325	: [old] "=&r" (old),
	326	[err] "=&r" (err),
	327	[tmp] "=&r" (tmp)
	328	: [addr] "r" (addr),
	329	[new] "r" (new),
	330	[efault] "i" (-EFAULT)
	331	: "memory");
	332	} else if (cpu_has_llsc) {
	333	__asm__ __volatile__ (
a91be9ee	334	" .set mips3 \n"
f1e39a4a RB	335	" li %[err], 0 \n"
	336	"1: ll %[old], (%[addr]) \n"
	337	" move %[tmp], %[new] \n"
	338	"2: sc %[tmp], (%[addr]) \n"
	339	" bnez %[tmp], 4f \n"
	340	"3: \n"
	341	" .subsection 2 \n"
	342	"4: b 1b \n"
	343	" .previous \n"
	344	" \n"
	345	" .section .fixup,\"ax\" \n"
	346	"5: li %[err], %[efault] \n"
	347	" j 3b \n"
	348	" .previous \n"
	349	" .section __ex_table,\"a\" \n"
	350	" "STR(PTR)" 1b, 5b \n"
	351	" "STR(PTR)" 2b, 5b \n"
	352	" .previous \n"
a91be9ee	353	" .set mips0 \n"
f1e39a4a RB	354	: [old] "=&r" (old),
	355	[err] "=&r" (err),
	356	[tmp] "=&r" (tmp)
	357	: [addr] "r" (addr),
	358	[new] "r" (new),
	359	[efault] "i" (-EFAULT)
	360	: "memory");
	361	} else {
	362	do {
	363	preempt_disable();
	364	ll_bit = 1;
	365	ll_task = current;
	366	preempt_enable();
	367
	368	err = __get_user(old, (unsigned int *) addr);
	369	err \|= __put_user(new, (unsigned int *) addr);
	370	if (err)
	371	break;
	372	rmb();
	373	} while (!ll_bit);
	374	}
	375
	376	if (unlikely(err))
	377	return err;
	378
	379	regs->regs[2] = old;
	380	regs->regs[7] = 0; /* No error */
	381
	382	/*
	383	* Don't let your children do this ...
	384	*/
	385	__asm__ __volatile__(
	386	" move $29, %0 \n"
	387	" j syscall_exit \n"
	388	: /* no outputs */
	389	: "r" (regs));
	390
	391	/* unreached. Honestly. */
	392	while (1);
	393	}
	394
	395	save_static_function(sys_sysmips);
	396	static int __used noinline
	397	_sys_sysmips(nabi_no_regargs struct pt_regs regs)
	398	{
	399	long cmd, arg1, arg2, arg3;
	400
	401	cmd = regs.regs[4];
	402	arg1 = regs.regs[5];
	403	arg2 = regs.regs[6];
	404	arg3 = regs.regs[7];
	405
293c5bd1	406	switch (cmd) {
1da177e4	407	case MIPS_ATOMIC_SET:
f1e39a4a	408	return mips_atomic_set(&regs, arg1, arg2);
1da177e4 LT	409
1da177e4 LT	410	case MIPS_FIXADE:
293c5bd1 RB	411	if (arg1 & ~3)
	412	return -EINVAL;
	413
	414	if (arg1 & 1)
	415	set_thread_flag(TIF_FIXADE);
	416	else
	417	clear_thread_flag(TIF_FIXADE);
	418	if (arg1 & 2)
	419	set_thread_flag(TIF_LOGADE);
	420	else
	421	clear_thread_flag(TIF_FIXADE);
	422
1da177e4 LT	423	return 0;
	424
	425	case FLUSH_CACHE:
	426	__flush_cache_all();
	427	return 0;
1da177e4 LT	428	}
	429
	430	return -EINVAL;
	431	}
	432
	433	/*
	434	* sys_ipc() is the de-multiplexer for the SysV IPC calls..
	435	*
	436	* This is really horribly ugly.
	437	*/
dbda6ac0 RB	438	SYSCALL_DEFINE6(ipc, unsigned int, call, int, first, int, second,
dbda6ac0 RB	439	unsigned long, third, void __user *, ptr, long, fifth)
1da177e4 LT	440	{
	441	int version, ret;
	442
	443	version = call >> 16; /* hack for backward compatibility */
	444	call &= 0xffff;
	445
	446	switch (call) {
	447	case SEMOP:
49a89efb RB	448	return sys_semtimedop(first, (struct sembuf __user *)ptr,
49a89efb RB	449	second, NULL);
1da177e4	450	case SEMTIMEDOP:
49a89efb RB	451	return sys_semtimedop(first, (struct sembuf __user *)ptr,
	452	second,
	453	(const struct timespec __user *)fifth);
1da177e4	454	case SEMGET:
49a89efb	455	return sys_semget(first, second, third);
1da177e4 LT	456	case SEMCTL: {
	457	union semun fourth;
	458	if (!ptr)
	459	return -EINVAL;
219ac73a	460	if (get_user(fourth.__pad, (void __user __user ) ptr))
1da177e4	461	return -EFAULT;
49a89efb	462	return sys_semctl(first, second, third, fourth);
1da177e4 LT	463	}
	464
	465	case MSGSND:
49a89efb RB	466	return sys_msgsnd(first, (struct msgbuf __user *) ptr,
49a89efb RB	467	second, third);
1da177e4 LT	468	case MSGRCV:
	469	switch (version) {
	470	case 0: {
	471	struct ipc_kludge tmp;
	472	if (!ptr)
	473	return -EINVAL;
	474
	475	if (copy_from_user(&tmp,
be6e518b	476	(struct ipc_kludge __user *) ptr,
49a89efb	477	sizeof(tmp)))
1da177e4	478	return -EFAULT;
49a89efb RB	479	return sys_msgrcv(first, tmp.msgp, second,
49a89efb RB	480	tmp.msgtyp, third);
1da177e4 LT	481	}
1da177e4 LT	482	default:
49a89efb RB	483	return sys_msgrcv(first,
	484	(struct msgbuf __user *) ptr,
	485	second, fifth, third);
1da177e4 LT	486	}
1da177e4 LT	487	case MSGGET:
49a89efb	488	return sys_msgget((key_t) first, second);
1da177e4	489	case MSGCTL:
49a89efb RB	490	return sys_msgctl(first, second,
49a89efb RB	491	(struct msqid_ds __user *) ptr);
1da177e4 LT	492
	493	case SHMAT:
	494	switch (version) {
	495	default: {
fc103349	496	unsigned long raddr;
49a89efb RB	497	ret = do_shmat(first, (char __user *) ptr, second,
49a89efb RB	498	&raddr);
1da177e4 LT	499	if (ret)
1da177e4 LT	500	return ret;
49a89efb	501	return put_user(raddr, (unsigned long __user *) third);
1da177e4 LT	502	}
	503	case 1: /* iBCS2 emulator entry point */
	504	if (!segment_eq(get_fs(), get_ds()))
	505	return -EINVAL;
49a89efb RB	506	return do_shmat(first, (char __user *) ptr, second,
49a89efb RB	507	(unsigned long *) third);
1da177e4 LT	508	}
1da177e4 LT	509	case SHMDT:
49a89efb	510	return sys_shmdt((char __user *)ptr);
1da177e4	511	case SHMGET:
49a89efb	512	return sys_shmget(first, second, third);
1da177e4	513	case SHMCTL:
49a89efb RB	514	return sys_shmctl(first, second,
49a89efb RB	515	(struct shmid_ds __user *) ptr);
1da177e4 LT	516	default:
	517	return -ENOSYS;
	518	}
	519	}
	520
1da177e4 LT	521	/*
	522	* No implemented yet ...
	523	*/
dbda6ac0	524	SYSCALL_DEFINE3(cachectl, char *, addr, int, nbytes, int, op)
1da177e4 LT	525	{
	526	return -ENOSYS;
	527	}
	528
	529	/*
	530	* If we ever come here the user sp is bad. Zap the process right away.
	531	* Due to the bad stack signaling wouldn't work.
	532	*/
	533	asmlinkage void bad_stack(void)
	534	{
	535	do_exit(SIGSEGV);
	536	}
fe74290d AB	537
	538	/*
	539	* Do a system call from kernel instead of calling sys_execve so we
	540	* end up with proper pt_regs.
	541	*/
	542	int kernel_execve(const char filename, char const argv[], char *const envp[])
	543	{
	544	register unsigned long __a0 asm("$4") = (unsigned long) filename;
	545	register unsigned long __a1 asm("$5") = (unsigned long) argv;
	546	register unsigned long __a2 asm("$6") = (unsigned long) envp;
	547	register unsigned long __a3 asm("$7");
	548	unsigned long __v0;
	549
	550	__asm__ volatile (" \n"
	551	" .set noreorder \n"
	552	" li $2, %5 # __NR_execve \n"
	553	" syscall \n"
	554	" move %0, $2 \n"
	555	" .set reorder \n"
	556	: "=&r" (__v0), "=r" (__a3)
	557	: "r" (__a0), "r" (__a1), "r" (__a2), "i" (__NR_execve)
	558	: "$2", "$8", "$9", "$10", "$11", "$12", "$13", "$14", "$15", "$24",
	559	"memory");
	560
	561	if (__a3 == 0)
	562	return __v0;
	563
	564	return -__v0;
	565	}