2005-06-24 01:01:16 -04:00
|
|
|
/*
|
|
|
|
* arch/xtensa/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) 2001 - 2005 Tensilica Inc.
|
|
|
|
* Copyright (C) 2000 Silicon Graphics, Inc.
|
|
|
|
* Copyright (C) 1995 - 2000 by Ralf Baechle
|
|
|
|
*
|
|
|
|
* Joe Taylor <joe@tensilica.com, joetylr@yahoo.com>
|
|
|
|
* Marc Gauthier <marc@tensilica.com, marc@alumni.uwaterloo.ca>
|
|
|
|
* Chris Zankel <chris@zankel.net>
|
|
|
|
* Kevin Chea
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
#define DEBUG 0
|
|
|
|
|
|
|
|
#include <linux/config.h>
|
|
|
|
#include <linux/linkage.h>
|
|
|
|
#include <linux/mm.h>
|
|
|
|
#include <linux/smp.h>
|
|
|
|
#include <linux/smp_lock.h>
|
|
|
|
#include <linux/mman.h>
|
|
|
|
#include <linux/sched.h>
|
|
|
|
#include <linux/file.h>
|
|
|
|
#include <linux/slab.h>
|
|
|
|
#include <linux/utsname.h>
|
|
|
|
#include <linux/unistd.h>
|
|
|
|
#include <linux/stringify.h>
|
|
|
|
#include <linux/syscalls.h>
|
|
|
|
#include <linux/sem.h>
|
|
|
|
#include <linux/msg.h>
|
|
|
|
#include <linux/shm.h>
|
|
|
|
#include <linux/errno.h>
|
|
|
|
#include <asm/ptrace.h>
|
|
|
|
#include <asm/signal.h>
|
|
|
|
#include <asm/uaccess.h>
|
|
|
|
#include <asm/hardirq.h>
|
|
|
|
#include <asm/mman.h>
|
|
|
|
#include <asm/shmparam.h>
|
|
|
|
#include <asm/page.h>
|
|
|
|
|
|
|
|
extern void do_syscall_trace(void);
|
|
|
|
typedef int (*syscall_t)(void *a0,...);
|
|
|
|
extern syscall_t sys_call_table[];
|
|
|
|
extern unsigned char sys_narg_table[];
|
|
|
|
|
|
|
|
/*
|
|
|
|
* sys_pipe() is the normal C calling standard for creating a pipe. It's not
|
|
|
|
* the way unix traditional does this, though.
|
|
|
|
*/
|
|
|
|
|
|
|
|
int sys_pipe(int __user *userfds)
|
|
|
|
{
|
|
|
|
int fd[2];
|
|
|
|
int error;
|
|
|
|
|
|
|
|
error = do_pipe(fd);
|
|
|
|
if (!error) {
|
|
|
|
if (copy_to_user(userfds, fd, 2 * sizeof(int)))
|
|
|
|
error = -EFAULT;
|
|
|
|
}
|
|
|
|
return error;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Common code for old and new mmaps.
|
|
|
|
*/
|
2005-07-12 16:58:25 -04:00
|
|
|
long sys_mmap(unsigned long addr, unsigned long len, unsigned long prot,
|
|
|
|
unsigned long flags, unsigned long fd, unsigned long pgoff)
|
2005-06-24 01:01:16 -04:00
|
|
|
{
|
|
|
|
int error = -EBADF;
|
|
|
|
struct file * file = NULL;
|
|
|
|
|
|
|
|
flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
|
|
|
|
if (!(flags & MAP_ANONYMOUS)) {
|
|
|
|
file = fget(fd);
|
|
|
|
if (!file)
|
|
|
|
goto out;
|
|
|
|
}
|
|
|
|
|
|
|
|
down_write(¤t->mm->mmap_sem);
|
|
|
|
error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
|
|
|
|
up_write(¤t->mm->mmap_sem);
|
|
|
|
|
|
|
|
if (file)
|
|
|
|
fput(file);
|
|
|
|
out:
|
|
|
|
return error;
|
|
|
|
}
|
|
|
|
|
|
|
|
int sys_clone(struct pt_regs *regs)
|
|
|
|
{
|
|
|
|
unsigned long clone_flags;
|
|
|
|
unsigned long newsp;
|
|
|
|
int __user *parent_tidptr, *child_tidptr;
|
|
|
|
clone_flags = regs->areg[4];
|
|
|
|
newsp = regs->areg[3];
|
|
|
|
parent_tidptr = (int __user *)regs->areg[5];
|
|
|
|
child_tidptr = (int __user *)regs->areg[6];
|
|
|
|
if (!newsp)
|
|
|
|
newsp = regs->areg[1];
|
|
|
|
return do_fork(clone_flags,newsp,regs,0,parent_tidptr,child_tidptr);
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* sys_execve() executes a new program.
|
|
|
|
*/
|
|
|
|
|
|
|
|
int sys_execve(struct pt_regs *regs)
|
|
|
|
{
|
|
|
|
int error;
|
|
|
|
char * filename;
|
|
|
|
|
|
|
|
filename = getname((char *) (long)regs->areg[5]);
|
|
|
|
error = PTR_ERR(filename);
|
|
|
|
if (IS_ERR(filename))
|
|
|
|
goto out;
|
|
|
|
error = do_execve(filename, (char **) (long)regs->areg[3],
|
|
|
|
(char **) (long)regs->areg[4], regs);
|
|
|
|
putname(filename);
|
|
|
|
|
|
|
|
out:
|
|
|
|
return error;
|
|
|
|
}
|
|
|
|
|
|
|
|
int sys_uname(struct old_utsname * name)
|
|
|
|
{
|
|
|
|
if (name && !copy_to_user(name, &system_utsname, sizeof (*name)))
|
|
|
|
return 0;
|
|
|
|
return -EFAULT;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Build the string table for the builtin "poor man's strace".
|
|
|
|
*/
|
|
|
|
|
|
|
|
#if DEBUG
|
|
|
|
#define SYSCALL(fun, narg) #fun,
|
|
|
|
static char *sfnames[] = {
|
|
|
|
#include "syscalls.h"
|
|
|
|
};
|
|
|
|
#undef SYS
|
|
|
|
#endif
|
|
|
|
|
|
|
|
void system_call (struct pt_regs *regs)
|
|
|
|
{
|
|
|
|
syscall_t syscall;
|
|
|
|
unsigned long parm0, parm1, parm2, parm3, parm4, parm5;
|
|
|
|
int nargs, res;
|
|
|
|
unsigned int syscallnr;
|
|
|
|
int ps;
|
|
|
|
|
|
|
|
#if DEBUG
|
|
|
|
int i;
|
|
|
|
unsigned long parms[6];
|
|
|
|
char *sysname;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
regs->syscall = regs->areg[2];
|
|
|
|
|
|
|
|
do_syscall_trace();
|
|
|
|
|
|
|
|
/* Have to load after syscall_trace because strace
|
|
|
|
* sometimes changes regs->syscall.
|
|
|
|
*/
|
|
|
|
syscallnr = regs->syscall;
|
|
|
|
|
|
|
|
parm0 = parm1 = parm2 = parm3 = parm4 = parm5 = 0;
|
|
|
|
|
|
|
|
/* Restore interrupt level to syscall invoker's.
|
|
|
|
* If this were in assembly, we wouldn't disable
|
|
|
|
* interrupts in the first place:
|
|
|
|
*/
|
|
|
|
local_save_flags (ps);
|
|
|
|
local_irq_restore((ps & ~XCHAL_PS_INTLEVEL_MASK) |
|
|
|
|
(regs->ps & XCHAL_PS_INTLEVEL_MASK) );
|
|
|
|
|
|
|
|
if (syscallnr > __NR_Linux_syscalls) {
|
|
|
|
regs->areg[2] = -ENOSYS;
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
syscall = sys_call_table[syscallnr];
|
|
|
|
nargs = sys_narg_table[syscallnr];
|
|
|
|
|
|
|
|
if (syscall == NULL) {
|
|
|
|
regs->areg[2] = -ENOSYS;
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
/* There shouldn't be more than six arguments in the table! */
|
|
|
|
|
|
|
|
if (nargs > 6)
|
|
|
|
panic("Internal error - too many syscall arguments (%d)!\n",
|
|
|
|
nargs);
|
|
|
|
|
|
|
|
/* Linux takes system-call arguments in registers. The ABI
|
|
|
|
* and Xtensa software conventions require the system-call
|
|
|
|
* number in a2. If an argument exists in a2, we move it to
|
|
|
|
* the next available register. Note that for improved
|
|
|
|
* efficiency, we do NOT shift all parameters down one
|
|
|
|
* register to maintain the original order.
|
|
|
|
*
|
|
|
|
* At best case (zero arguments), we just write the syscall
|
|
|
|
* number to a2. At worst case (1 to 6 arguments), we move
|
|
|
|
* the argument in a2 to the next available register, then
|
|
|
|
* write the syscall number to a2.
|
|
|
|
*
|
|
|
|
* For clarity, the following truth table enumerates all
|
|
|
|
* possibilities.
|
|
|
|
*
|
|
|
|
* arguments syscall number arg0, arg1, arg2, arg3, arg4, arg5
|
|
|
|
* --------- -------------- ----------------------------------
|
|
|
|
* 0 a2
|
|
|
|
* 1 a2 a3
|
|
|
|
* 2 a2 a4, a3
|
|
|
|
* 3 a2 a5, a3, a4
|
|
|
|
* 4 a2 a6, a3, a4, a5
|
|
|
|
* 5 a2 a7, a3, a4, a5, a6
|
|
|
|
* 6 a2 a8, a3, a4, a5, a6, a7
|
|
|
|
*/
|
|
|
|
if (nargs) {
|
|
|
|
parm0 = regs->areg[nargs+2];
|
|
|
|
parm1 = regs->areg[3];
|
|
|
|
parm2 = regs->areg[4];
|
|
|
|
parm3 = regs->areg[5];
|
|
|
|
parm4 = regs->areg[6];
|
|
|
|
parm5 = regs->areg[7];
|
|
|
|
} else /* nargs == 0 */
|
|
|
|
parm0 = (unsigned long) regs;
|
|
|
|
|
|
|
|
#if DEBUG
|
|
|
|
parms[0] = parm0;
|
|
|
|
parms[1] = parm1;
|
|
|
|
parms[2] = parm2;
|
|
|
|
parms[3] = parm3;
|
|
|
|
parms[4] = parm4;
|
|
|
|
parms[5] = parm5;
|
|
|
|
|
|
|
|
sysname = sfnames[syscallnr];
|
|
|
|
if (strncmp(sysname, "sys_", 4) == 0)
|
|
|
|
sysname = sysname + 4;
|
|
|
|
|
|
|
|
printk("\017SYSCALL:I:%x:%d:%s %s(", regs->pc, current->pid,
|
|
|
|
current->comm, sysname);
|
|
|
|
for (i = 0; i < nargs; i++)
|
|
|
|
printk((i>0) ? ", %#lx" : "%#lx", parms[i]);
|
|
|
|
printk(")\n");
|
|
|
|
#endif
|
|
|
|
|
|
|
|
res = syscall((void *)parm0, parm1, parm2, parm3, parm4, parm5);
|
|
|
|
|
|
|
|
#if DEBUG
|
|
|
|
printk("\017SYSCALL:O:%d:%s %s(",current->pid, current->comm, sysname);
|
|
|
|
for (i = 0; i < nargs; i++)
|
|
|
|
printk((i>0) ? ", %#lx" : "%#lx", parms[i]);
|
|
|
|
if (res < 4096)
|
|
|
|
printk(") = %d\n", res);
|
|
|
|
else
|
|
|
|
printk(") = %#x\n", res);
|
|
|
|
#endif /* DEBUG */
|
|
|
|
|
|
|
|
regs->areg[2] = res;
|
|
|
|
do_syscall_trace();
|
|
|
|
}
|