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/capability.h>
11 #include <linux/errno.h>
12 #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>
30 #include <linux/ipc.h>
31 #include <linux/uaccess.h>
34 #include <asm/branch.h>
35 #include <asm/cachectl.h>
36 #include <asm/cacheflush.h>
37 #include <asm/asm-offsets.h>
38 #include <asm/signal.h>
40 #include <asm/shmparam.h>
41 #include <asm/sysmips.h>
42 #include <asm/uaccess.h>
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.
51 asmlinkage int sysm_pipe(nabi_no_regargs volatile struct pt_regs regs)
56 error = do_pipe_flags(fd, 0);
67 unsigned long shm_align_mask = PAGE_SIZE - 1; /* Sane caches */
69 EXPORT_SYMBOL(shm_align_mask);
71 #define COLOUR_ALIGN(addr,pgoff) \
72 ((((addr) + shm_align_mask) & ~shm_align_mask) + \
73 (((pgoff) << PAGE_SHIFT) & shm_align_mask))
75 unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr,
76 unsigned long len, unsigned long pgoff, unsigned long flags)
78 struct vm_area_struct * vmm;
80 unsigned long task_size;
82 task_size = STACK_TOP;
87 if (flags & MAP_FIXED) {
88 /* Even MAP_FIXED mappings must reside within task_size. */
89 if (task_size - len < addr)
93 * We do not accept a shared mapping if it would violate
94 * cache aliasing constraints.
96 if ((flags & MAP_SHARED) &&
97 ((addr - (pgoff << PAGE_SHIFT)) & shm_align_mask))
103 if (filp || (flags & MAP_SHARED))
107 addr = COLOUR_ALIGN(addr, pgoff);
109 addr = PAGE_ALIGN(addr);
110 vmm = find_vma(current->mm, addr);
111 if (task_size - len >= addr &&
112 (!vmm || addr + len <= vmm->vm_start))
115 addr = TASK_UNMAPPED_BASE;
117 addr = COLOUR_ALIGN(addr, pgoff);
119 addr = PAGE_ALIGN(addr);
121 for (vmm = find_vma(current->mm, addr); ; vmm = vmm->vm_next) {
122 /* At this point: (!vmm || addr < vmm->vm_end). */
123 if (task_size - len < addr)
125 if (!vmm || addr + len <= vmm->vm_start)
129 addr = COLOUR_ALIGN(addr, pgoff);
133 SYSCALL_DEFINE6(mips_mmap, unsigned long, addr, unsigned long, len,
134 unsigned long, prot, unsigned long, flags, unsigned long,
137 unsigned long result;
140 if (offset & ~PAGE_MASK)
143 result = sys_mmap_pgoff(addr, len, prot, flags, fd, offset >> PAGE_SHIFT);
149 SYSCALL_DEFINE6(mips_mmap2, unsigned long, addr, unsigned long, len,
150 unsigned long, prot, unsigned long, flags, unsigned long, fd,
151 unsigned long, pgoff)
153 if (pgoff & (~PAGE_MASK >> 12))
156 return sys_mmap_pgoff(addr, len, prot, flags, fd, pgoff >> (PAGE_SHIFT-12));
159 save_static_function(sys_fork);
160 static int __used noinline
161 _sys_fork(nabi_no_regargs struct pt_regs regs)
163 return do_fork(SIGCHLD, regs.regs[29], ®s, 0, NULL, NULL);
166 save_static_function(sys_clone);
167 static int __used noinline
168 _sys_clone(nabi_no_regargs struct pt_regs regs)
170 unsigned long clone_flags;
172 int __user *parent_tidptr, *child_tidptr;
174 clone_flags = regs.regs[4];
175 newsp = regs.regs[5];
177 newsp = regs.regs[29];
178 parent_tidptr = (int __user *) regs.regs[6];
180 /* We need to fetch the fifth argument off the stack. */
182 if (clone_flags & (CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)) {
183 int __user *__user *usp = (int __user *__user *) regs.regs[29];
184 if (regs.regs[2] == __NR_syscall) {
185 if (get_user (child_tidptr, &usp[5]))
188 else if (get_user (child_tidptr, &usp[4]))
192 child_tidptr = (int __user *) regs.regs[8];
194 return do_fork(clone_flags, newsp, ®s, 0,
195 parent_tidptr, child_tidptr);
199 * sys_execve() executes a new program.
201 asmlinkage int sys_execve(nabi_no_regargs struct pt_regs regs)
206 filename = getname((char __user *) (long)regs.regs[4]);
207 error = PTR_ERR(filename);
208 if (IS_ERR(filename))
210 error = do_execve(filename, (char __user *__user *) (long)regs.regs[5],
211 (char __user *__user *) (long)regs.regs[6], ®s);
219 * Compacrapability ...
221 SYSCALL_DEFINE1(uname, struct old_utsname __user *, name)
223 if (name && !copy_to_user(name, utsname(), sizeof (*name)))
229 * Compacrapability ...
231 SYSCALL_DEFINE1(olduname, struct oldold_utsname __user *, name)
237 if (!access_ok(VERIFY_WRITE, name, sizeof(struct oldold_utsname)))
240 error = __copy_to_user(&name->sysname, &utsname()->sysname,
242 error -= __put_user(0, name->sysname + __OLD_UTS_LEN);
243 error -= __copy_to_user(&name->nodename, &utsname()->nodename,
245 error -= __put_user(0, name->nodename + __OLD_UTS_LEN);
246 error -= __copy_to_user(&name->release, &utsname()->release,
248 error -= __put_user(0, name->release + __OLD_UTS_LEN);
249 error -= __copy_to_user(&name->version, &utsname()->version,
251 error -= __put_user(0, name->version + __OLD_UTS_LEN);
252 error -= __copy_to_user(&name->machine, &utsname()->machine,
254 error = __put_user(0, name->machine + __OLD_UTS_LEN);
255 error = error ? -EFAULT : 0;
260 SYSCALL_DEFINE1(set_thread_area, unsigned long, addr)
262 struct thread_info *ti = task_thread_info(current);
265 if (cpu_has_userlocal)
266 write_c0_userlocal(addr);
271 static inline int mips_atomic_set(struct pt_regs *regs,
272 unsigned long addr, unsigned long new)
274 unsigned long old, tmp;
277 if (unlikely(addr & 3))
280 if (unlikely(!access_ok(VERIFY_WRITE, addr, 4)))
283 if (cpu_has_llsc && R10000_LLSC_WAR) {
284 __asm__ __volatile__ (
287 "1: ll %[old], (%[addr]) \n"
288 " move %[tmp], %[new] \n"
289 "2: sc %[tmp], (%[addr]) \n"
290 " beqzl %[tmp], 1b \n"
292 " .section .fixup,\"ax\" \n"
293 "4: li %[err], %[efault] \n"
296 " .section __ex_table,\"a\" \n"
297 " "STR(PTR)" 1b, 4b \n"
298 " "STR(PTR)" 2b, 4b \n"
306 [efault] "i" (-EFAULT)
308 } else if (cpu_has_llsc) {
309 __asm__ __volatile__ (
312 "1: ll %[old], (%[addr]) \n"
313 " move %[tmp], %[new] \n"
314 "2: sc %[tmp], (%[addr]) \n"
315 " bnez %[tmp], 4f \n"
321 " .section .fixup,\"ax\" \n"
322 "5: li %[err], %[efault] \n"
325 " .section __ex_table,\"a\" \n"
326 " "STR(PTR)" 1b, 5b \n"
327 " "STR(PTR)" 2b, 5b \n"
335 [efault] "i" (-EFAULT)
344 err = __get_user(old, (unsigned int *) addr);
345 err |= __put_user(new, (unsigned int *) addr);
356 regs->regs[7] = 0; /* No error */
359 * Don't let your children do this ...
361 __asm__ __volatile__(
367 /* unreached. Honestly. */
371 save_static_function(sys_sysmips);
372 static int __used noinline
373 _sys_sysmips(nabi_no_regargs struct pt_regs regs)
375 long cmd, arg1, arg2, arg3;
383 case MIPS_ATOMIC_SET:
384 return mips_atomic_set(®s, arg1, arg2);
391 set_thread_flag(TIF_FIXADE);
393 clear_thread_flag(TIF_FIXADE);
395 set_thread_flag(TIF_LOGADE);
397 clear_thread_flag(TIF_FIXADE);
410 * sys_ipc() is the de-multiplexer for the SysV IPC calls..
412 * This is really horribly ugly.
414 SYSCALL_DEFINE6(ipc, unsigned int, call, int, first, int, second,
415 unsigned long, third, void __user *, ptr, long, fifth)
419 version = call >> 16; /* hack for backward compatibility */
424 return sys_semtimedop(first, (struct sembuf __user *)ptr,
427 return sys_semtimedop(first, (struct sembuf __user *)ptr,
429 (const struct timespec __user *)fifth);
431 return sys_semget(first, second, third);
436 if (get_user(fourth.__pad, (void __user *__user *) ptr))
438 return sys_semctl(first, second, third, fourth);
442 return sys_msgsnd(first, (struct msgbuf __user *) ptr,
447 struct ipc_kludge tmp;
451 if (copy_from_user(&tmp,
452 (struct ipc_kludge __user *) ptr,
455 return sys_msgrcv(first, tmp.msgp, second,
459 return sys_msgrcv(first,
460 (struct msgbuf __user *) ptr,
461 second, fifth, third);
464 return sys_msgget((key_t) first, second);
466 return sys_msgctl(first, second,
467 (struct msqid_ds __user *) ptr);
473 ret = do_shmat(first, (char __user *) ptr, second,
477 return put_user(raddr, (unsigned long __user *) third);
479 case 1: /* iBCS2 emulator entry point */
480 if (!segment_eq(get_fs(), get_ds()))
482 return do_shmat(first, (char __user *) ptr, second,
483 (unsigned long *) third);
486 return sys_shmdt((char __user *)ptr);
488 return sys_shmget(first, second, third);
490 return sys_shmctl(first, second,
491 (struct shmid_ds __user *) ptr);
498 * No implemented yet ...
500 SYSCALL_DEFINE3(cachectl, char *, addr, int, nbytes, int, op)
506 * If we ever come here the user sp is bad. Zap the process right away.
507 * Due to the bad stack signaling wouldn't work.
509 asmlinkage void bad_stack(void)
515 * Do a system call from kernel instead of calling sys_execve so we
516 * end up with proper pt_regs.
518 int kernel_execve(const char *filename, char *const argv[], char *const envp[])
520 register unsigned long __a0 asm("$4") = (unsigned long) filename;
521 register unsigned long __a1 asm("$5") = (unsigned long) argv;
522 register unsigned long __a2 asm("$6") = (unsigned long) envp;
523 register unsigned long __a3 asm("$7");
526 __asm__ volatile (" \n"
528 " li $2, %5 # __NR_execve \n"
532 : "=&r" (__v0), "=r" (__a3)
533 : "r" (__a0), "r" (__a1), "r" (__a2), "i" (__NR_execve)
534 : "$2", "$8", "$9", "$10", "$11", "$12", "$13", "$14", "$15", "$24",