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
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.
10 #include <linux/a.out.h>
11 #include <linux/capability.h>
12 #include <linux/errno.h>
13 #include <linux/linkage.h>
15 #include <linux/smp.h>
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>
29 #include <linux/module.h>
31 #include <asm/branch.h>
32 #include <asm/cachectl.h>
33 #include <asm/cacheflush.h>
35 #include <asm/asm-offsets.h>
36 #include <asm/signal.h>
38 #include <asm/shmparam.h>
39 #include <asm/sysmips.h>
40 #include <asm/uaccess.h>
42 asmlinkage
int sys_pipe(nabi_no_regargs
volatile struct pt_regs regs
)
58 unsigned long shm_align_mask
= PAGE_SIZE
- 1; /* Sane caches */
59 unsigned char shm_align_shift
= PAGE_SHIFT
; /* Sane caches */
61 EXPORT_SYMBOL(shm_align_mask
);
62 EXPORT_SYMBOL(shm_align_shift
);
64 #define COLOUR_ALIGN(addr,pgoff) \
65 ((((addr) + shm_align_mask) & ~shm_align_mask) + \
66 (((pgoff) << PAGE_SHIFT) & shm_align_mask))
68 unsigned long arch_get_unmapped_area(struct file
*filp
, unsigned long addr
,
69 unsigned long len
, unsigned long pgoff
, unsigned long flags
)
71 struct vm_area_struct
* vmm
;
73 unsigned long task_size
;
76 task_size
= TASK_SIZE
;
77 #else /* Must be CONFIG_64BIT*/
78 task_size
= test_thread_flag(TIF_32BIT_ADDR
) ? TASK_SIZE32
: TASK_SIZE
;
84 if (flags
& MAP_FIXED
) {
85 /* Even MAP_FIXED mappings must reside within task_size. */
86 if (task_size
- len
< addr
)
90 * We do not accept a shared mapping if it would violate
91 * cache aliasing constraints.
93 if ((flags
& MAP_SHARED
) &&
94 ((addr
- (pgoff
<< PAGE_SHIFT
)) & shm_align_mask
))
100 if (filp
|| (flags
& MAP_SHARED
))
104 addr
= COLOUR_ALIGN(addr
, pgoff
);
106 addr
= PAGE_ALIGN(addr
);
107 vmm
= find_vma(current
->mm
, addr
);
108 if (task_size
- len
>= addr
&&
109 (!vmm
|| addr
+ len
<= vmm
->vm_start
))
112 addr
= TASK_UNMAPPED_BASE
;
114 addr
= COLOUR_ALIGN(addr
, pgoff
);
116 addr
= PAGE_ALIGN(addr
);
118 for (vmm
= find_vma(current
->mm
, addr
); ; vmm
= vmm
->vm_next
) {
119 /* At this point: (!vmm || addr < vmm->vm_end). */
120 if (task_size
- len
< addr
)
122 if (!vmm
|| addr
+ len
<= vmm
->vm_start
)
126 addr
= COLOUR_ALIGN(addr
, pgoff
);
130 /* common code for old and new mmaps */
131 static inline unsigned long
132 do_mmap2(unsigned long addr
, unsigned long len
, unsigned long prot
,
133 unsigned long flags
, unsigned long fd
, unsigned long pgoff
)
135 unsigned long error
= -EBADF
;
136 struct file
* file
= NULL
;
138 flags
&= ~(MAP_EXECUTABLE
| MAP_DENYWRITE
);
139 if (!(flags
& MAP_ANONYMOUS
)) {
145 down_write(¤t
->mm
->mmap_sem
);
146 error
= do_mmap_pgoff(file
, addr
, len
, prot
, flags
, pgoff
);
147 up_write(¤t
->mm
->mmap_sem
);
155 asmlinkage
unsigned long
156 old_mmap(unsigned long addr
, unsigned long len
, int prot
,
157 int flags
, int fd
, off_t offset
)
159 unsigned long result
;
162 if (offset
& ~PAGE_MASK
)
165 result
= do_mmap2(addr
, len
, prot
, flags
, fd
, offset
>> PAGE_SHIFT
);
171 asmlinkage
unsigned long
172 sys_mmap2(unsigned long addr
, unsigned long len
, unsigned long prot
,
173 unsigned long flags
, unsigned long fd
, unsigned long pgoff
)
175 if (pgoff
& (~PAGE_MASK
>> 12))
178 return do_mmap2(addr
, len
, prot
, flags
, fd
, pgoff
>> (PAGE_SHIFT
-12));
181 save_static_function(sys_fork
);
182 __attribute_used__ noinline
static int
183 _sys_fork(nabi_no_regargs
struct pt_regs regs
)
185 return do_fork(SIGCHLD
, regs
.regs
[29], ®s
, 0, NULL
, NULL
);
188 save_static_function(sys_clone
);
189 __attribute_used__ noinline
static int
190 _sys_clone(nabi_no_regargs
struct pt_regs regs
)
192 unsigned long clone_flags
;
194 int __user
*parent_tidptr
, *child_tidptr
;
196 clone_flags
= regs
.regs
[4];
197 newsp
= regs
.regs
[5];
199 newsp
= regs
.regs
[29];
200 parent_tidptr
= (int __user
*) regs
.regs
[6];
202 /* We need to fetch the fifth argument off the stack. */
204 if (clone_flags
& (CLONE_CHILD_SETTID
| CLONE_CHILD_CLEARTID
)) {
205 int __user
*__user
*usp
= (int __user
*__user
*) regs
.regs
[29];
206 if (regs
.regs
[2] == __NR_syscall
) {
207 if (get_user (child_tidptr
, &usp
[5]))
210 else if (get_user (child_tidptr
, &usp
[4]))
214 child_tidptr
= (int __user
*) regs
.regs
[8];
216 return do_fork(clone_flags
, newsp
, ®s
, 0,
217 parent_tidptr
, child_tidptr
);
221 * sys_execve() executes a new program.
223 asmlinkage
int sys_execve(nabi_no_regargs
struct pt_regs regs
)
228 filename
= getname((char __user
*) (long)regs
.regs
[4]);
229 error
= PTR_ERR(filename
);
230 if (IS_ERR(filename
))
232 error
= do_execve(filename
, (char __user
*__user
*) (long)regs
.regs
[5],
233 (char __user
*__user
*) (long)regs
.regs
[6], ®s
);
241 * Compacrapability ...
243 asmlinkage
int sys_uname(struct old_utsname __user
* name
)
245 if (name
&& !copy_to_user(name
, utsname(), sizeof (*name
)))
251 * Compacrapability ...
253 asmlinkage
int sys_olduname(struct oldold_utsname __user
* name
)
259 if (!access_ok(VERIFY_WRITE
,name
,sizeof(struct oldold_utsname
)))
262 error
= __copy_to_user(&name
->sysname
, &utsname()->sysname
,
264 error
-= __put_user(0, name
->sysname
+ __OLD_UTS_LEN
);
265 error
-= __copy_to_user(&name
->nodename
, &utsname()->nodename
,
267 error
-= __put_user(0, name
->nodename
+ __OLD_UTS_LEN
);
268 error
-= __copy_to_user(&name
->release
, &utsname()->release
,
270 error
-= __put_user(0, name
->release
+ __OLD_UTS_LEN
);
271 error
-= __copy_to_user(&name
->version
, &utsname()->version
,
273 error
-= __put_user(0, name
->version
+ __OLD_UTS_LEN
);
274 error
-= __copy_to_user(&name
->machine
, &utsname()->machine
,
276 error
= __put_user(0, name
->machine
+ __OLD_UTS_LEN
);
277 error
= error
? -EFAULT
: 0;
282 asmlinkage
int sys_set_thread_area(unsigned long addr
)
284 struct thread_info
*ti
= task_thread_info(current
);
287 if (cpu_has_userlocal
)
288 write_c0_userlocal(addr
);
293 asmlinkage
int _sys_sysmips(int cmd
, long arg1
, int arg2
, int arg3
)
298 case MIPS_ATOMIC_SET
:
299 printk(KERN_CRIT
"How did I get here?\n");
303 tmp
= current
->thread
.mflags
& ~3;
304 current
->thread
.mflags
= tmp
| (arg1
& 3);
316 * sys_ipc() is the de-multiplexer for the SysV IPC calls..
318 * This is really horribly ugly.
320 asmlinkage
int sys_ipc (unsigned int call
, int first
, int second
,
321 unsigned long third
, void __user
*ptr
, long fifth
)
325 version
= call
>> 16; /* hack for backward compatibility */
330 return sys_semtimedop (first
, (struct sembuf __user
*)ptr
,
333 return sys_semtimedop (first
, (struct sembuf __user
*)ptr
,
335 (const struct timespec __user
*)fifth
);
337 return sys_semget (first
, second
, third
);
342 if (get_user(fourth
.__pad
, (void __user
*__user
*) ptr
))
344 return sys_semctl (first
, second
, third
, fourth
);
348 return sys_msgsnd (first
, (struct msgbuf __user
*) ptr
,
353 struct ipc_kludge tmp
;
357 if (copy_from_user(&tmp
,
358 (struct ipc_kludge __user
*) ptr
,
361 return sys_msgrcv (first
, tmp
.msgp
, second
,
365 return sys_msgrcv (first
,
366 (struct msgbuf __user
*) ptr
,
367 second
, fifth
, third
);
370 return sys_msgget ((key_t
) first
, second
);
372 return sys_msgctl (first
, second
,
373 (struct msqid_ds __user
*) ptr
);
379 ret
= do_shmat (first
, (char __user
*) ptr
, second
,
383 return put_user (raddr
, (unsigned long __user
*) third
);
385 case 1: /* iBCS2 emulator entry point */
386 if (!segment_eq(get_fs(), get_ds()))
388 return do_shmat (first
, (char __user
*) ptr
, second
,
389 (unsigned long *) third
);
392 return sys_shmdt ((char __user
*)ptr
);
394 return sys_shmget (first
, second
, third
);
396 return sys_shmctl (first
, second
,
397 (struct shmid_ds __user
*) ptr
);
404 * No implemented yet ...
406 asmlinkage
int sys_cachectl(char *addr
, int nbytes
, int op
)
412 * If we ever come here the user sp is bad. Zap the process right away.
413 * Due to the bad stack signaling wouldn't work.
415 asmlinkage
void bad_stack(void)
421 * Do a system call from kernel instead of calling sys_execve so we
422 * end up with proper pt_regs.
424 int kernel_execve(const char *filename
, char *const argv
[], char *const envp
[])
426 register unsigned long __a0
asm("$4") = (unsigned long) filename
;
427 register unsigned long __a1
asm("$5") = (unsigned long) argv
;
428 register unsigned long __a2
asm("$6") = (unsigned long) envp
;
429 register unsigned long __a3
asm("$7");
432 __asm__
volatile (" \n"
434 " li $2, %5 # __NR_execve \n"
438 : "=&r" (__v0
), "=r" (__a3
)
439 : "r" (__a0
), "r" (__a1
), "r" (__a2
), "i" (__NR_execve
)
440 : "$2", "$8", "$9", "$10", "$11", "$12", "$13", "$14", "$15", "$24",
450 * Build the string table for the builtin "poor man's strace".
452 #ifdef CONFIG_PRINT_SYSCALLS
453 #define SYS(fun, narg) #fun,
454 static char *sfnames
[] = {
455 #include "syscalls.h"
464 asmlinkage
void strace(struct pt_regs
*regs
)
467 unsigned long scn
, narg
, *pa0
;
468 char *name
, space
[16];
469 extern char sys_call_table
[];
475 pa0
= ®s
->regs
[4];
477 if ((scn
>= __NR_Linux
) && (scn
< (__NR_Linux
+ __NR_Linux_syscalls
))) {
478 name
= sfnames
[scn
- __NR_Linux
];
479 narg
= *(unsigned long *)(((char *)(&sys_call_table
[scn
])) + 4);
481 sprintf(space
, "sc%lu", scn
);
486 printk("%lu[%s:%d]@0x%08lx: %s(", jiffies
, current
->comm
, current
->pid
, regs
->cp0_epc
, name
);
488 if (narg
> 6) narg
= 6;
490 for (i
= 0; i
< narg
; i
++) {
493 printk("0x%08lx", pa0
[i
]);
495 printk("0x%08lx", regs
->pad0
[i
]);