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/capability.h> 11 #include <linux/errno.h> 12 #include <linux/linkage.h> 13 #include <linux/fs.h> 14 #include <linux/smp.h> 15 #include <linux/ptrace.h> 16 #include <linux/string.h> 17 #include <linux/syscalls.h> 18 #include <linux/file.h> 19 #include <linux/utsname.h> 20 #include <linux/unistd.h> 21 #include <linux/sem.h> 22 #include <linux/msg.h> 23 #include <linux/shm.h> 24 #include <linux/compiler.h> 25 #include <linux/ipc.h> 26 #include <linux/uaccess.h> 27 #include <linux/slab.h> 28 #include <linux/elf.h> 29 30 #include <asm/asm.h> 31 #include <asm/branch.h> 32 #include <asm/cachectl.h> 33 #include <asm/cacheflush.h> 34 #include <asm/asm-offsets.h> 35 #include <asm/signal.h> 36 #include <asm/sim.h> 37 #include <asm/shmparam.h> 38 #include <asm/sysmips.h> 39 #include <asm/uaccess.h> 40 41 /* 42 * For historic reasons the pipe(2) syscall on MIPS has an unusual calling 43 * convention. It returns results in registers $v0 / $v1 which means there 44 * is no need for it to do verify the validity of a userspace pointer 45 * argument. Historically that used to be expensive in Linux. These days 46 * the performance advantage is negligible. 47 */ 48 asmlinkage int sysm_pipe(nabi_no_regargs volatile struct pt_regs regs) 49 { 50 int fd[2]; 51 int error, res; 52 53 error = do_pipe_flags(fd, 0); 54 if (error) { 55 res = error; 56 goto out; 57 } 58 regs.regs[3] = fd[1]; 59 res = fd[0]; 60 out: 61 return res; 62 } 63 64 SYSCALL_DEFINE6(mips_mmap, unsigned long, addr, unsigned long, len, 65 unsigned long, prot, unsigned long, flags, unsigned long, 66 fd, off_t, offset) 67 { 68 unsigned long result; 69 70 result = -EINVAL; 71 if (offset & ~PAGE_MASK) 72 goto out; 73 74 result = sys_mmap_pgoff(addr, len, prot, flags, fd, offset >> PAGE_SHIFT); 75 76 out: 77 return result; 78 } 79 80 SYSCALL_DEFINE6(mips_mmap2, unsigned long, addr, unsigned long, len, 81 unsigned long, prot, unsigned long, flags, unsigned long, fd, 82 unsigned long, pgoff) 83 { 84 if (pgoff & (~PAGE_MASK >> 12)) 85 return -EINVAL; 86 87 return sys_mmap_pgoff(addr, len, prot, flags, fd, pgoff >> (PAGE_SHIFT-12)); 88 } 89 90 save_static_function(sys_fork); 91 static int __used noinline 92 _sys_fork(nabi_no_regargs struct pt_regs regs) 93 { 94 return do_fork(SIGCHLD, regs.regs[29], ®s, 0, NULL, NULL); 95 } 96 97 save_static_function(sys_clone); 98 static int __used noinline 99 _sys_clone(nabi_no_regargs struct pt_regs regs) 100 { 101 unsigned long clone_flags; 102 unsigned long newsp; 103 int __user *parent_tidptr, *child_tidptr; 104 105 clone_flags = regs.regs[4]; 106 newsp = regs.regs[5]; 107 if (!newsp) 108 newsp = regs.regs[29]; 109 parent_tidptr = (int __user *) regs.regs[6]; 110 #ifdef CONFIG_32BIT 111 /* We need to fetch the fifth argument off the stack. */ 112 child_tidptr = NULL; 113 if (clone_flags & (CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)) { 114 int __user *__user *usp = (int __user *__user *) regs.regs[29]; 115 if (regs.regs[2] == __NR_syscall) { 116 if (get_user (child_tidptr, &usp[5])) 117 return -EFAULT; 118 } 119 else if (get_user (child_tidptr, &usp[4])) 120 return -EFAULT; 121 } 122 #else 123 child_tidptr = (int __user *) regs.regs[8]; 124 #endif 125 return do_fork(clone_flags, newsp, ®s, 0, 126 parent_tidptr, child_tidptr); 127 } 128 129 /* 130 * sys_execve() executes a new program. 131 */ 132 asmlinkage int sys_execve(nabi_no_regargs struct pt_regs regs) 133 { 134 int error; 135 char * filename; 136 137 filename = getname((const char __user *) (long)regs.regs[4]); 138 error = PTR_ERR(filename); 139 if (IS_ERR(filename)) 140 goto out; 141 error = do_execve(filename, 142 (const char __user *const __user *) (long)regs.regs[5], 143 (const char __user *const __user *) (long)regs.regs[6], 144 ®s); 145 putname(filename); 146 147 out: 148 return error; 149 } 150 151 SYSCALL_DEFINE1(set_thread_area, unsigned long, addr) 152 { 153 struct thread_info *ti = task_thread_info(current); 154 155 ti->tp_value = addr; 156 if (cpu_has_userlocal) 157 write_c0_userlocal(addr); 158 159 return 0; 160 } 161 162 static inline int mips_atomic_set(struct pt_regs *regs, 163 unsigned long addr, unsigned long new) 164 { 165 unsigned long old, tmp; 166 unsigned int err; 167 168 if (unlikely(addr & 3)) 169 return -EINVAL; 170 171 if (unlikely(!access_ok(VERIFY_WRITE, addr, 4))) 172 return -EINVAL; 173 174 if (cpu_has_llsc && R10000_LLSC_WAR) { 175 __asm__ __volatile__ ( 176 " .set mips3 \n" 177 " li %[err], 0 \n" 178 "1: ll %[old], (%[addr]) \n" 179 " move %[tmp], %[new] \n" 180 "2: sc %[tmp], (%[addr]) \n" 181 " beqzl %[tmp], 1b \n" 182 "3: \n" 183 " .section .fixup,\"ax\" \n" 184 "4: li %[err], %[efault] \n" 185 " j 3b \n" 186 " .previous \n" 187 " .section __ex_table,\"a\" \n" 188 " "STR(PTR)" 1b, 4b \n" 189 " "STR(PTR)" 2b, 4b \n" 190 " .previous \n" 191 " .set mips0 \n" 192 : [old] "=&r" (old), 193 [err] "=&r" (err), 194 [tmp] "=&r" (tmp) 195 : [addr] "r" (addr), 196 [new] "r" (new), 197 [efault] "i" (-EFAULT) 198 : "memory"); 199 } else if (cpu_has_llsc) { 200 __asm__ __volatile__ ( 201 " .set mips3 \n" 202 " li %[err], 0 \n" 203 "1: ll %[old], (%[addr]) \n" 204 " move %[tmp], %[new] \n" 205 "2: sc %[tmp], (%[addr]) \n" 206 " bnez %[tmp], 4f \n" 207 "3: \n" 208 " .subsection 2 \n" 209 "4: b 1b \n" 210 " .previous \n" 211 " \n" 212 " .section .fixup,\"ax\" \n" 213 "5: li %[err], %[efault] \n" 214 " j 3b \n" 215 " .previous \n" 216 " .section __ex_table,\"a\" \n" 217 " "STR(PTR)" 1b, 5b \n" 218 " "STR(PTR)" 2b, 5b \n" 219 " .previous \n" 220 " .set mips0 \n" 221 : [old] "=&r" (old), 222 [err] "=&r" (err), 223 [tmp] "=&r" (tmp) 224 : [addr] "r" (addr), 225 [new] "r" (new), 226 [efault] "i" (-EFAULT) 227 : "memory"); 228 } else { 229 do { 230 preempt_disable(); 231 ll_bit = 1; 232 ll_task = current; 233 preempt_enable(); 234 235 err = __get_user(old, (unsigned int *) addr); 236 err |= __put_user(new, (unsigned int *) addr); 237 if (err) 238 break; 239 rmb(); 240 } while (!ll_bit); 241 } 242 243 if (unlikely(err)) 244 return err; 245 246 regs->regs[2] = old; 247 regs->regs[7] = 0; /* No error */ 248 249 /* 250 * Don't let your children do this ... 251 */ 252 __asm__ __volatile__( 253 " move $29, %0 \n" 254 " j syscall_exit \n" 255 : /* no outputs */ 256 : "r" (regs)); 257 258 /* unreached. Honestly. */ 259 while (1); 260 } 261 262 save_static_function(sys_sysmips); 263 static int __used noinline 264 _sys_sysmips(nabi_no_regargs struct pt_regs regs) 265 { 266 long cmd, arg1, arg2; 267 268 cmd = regs.regs[4]; 269 arg1 = regs.regs[5]; 270 arg2 = regs.regs[6]; 271 272 switch (cmd) { 273 case MIPS_ATOMIC_SET: 274 return mips_atomic_set(®s, arg1, arg2); 275 276 case MIPS_FIXADE: 277 if (arg1 & ~3) 278 return -EINVAL; 279 280 if (arg1 & 1) 281 set_thread_flag(TIF_FIXADE); 282 else 283 clear_thread_flag(TIF_FIXADE); 284 if (arg1 & 2) 285 set_thread_flag(TIF_LOGADE); 286 else 287 clear_thread_flag(TIF_LOGADE); 288 289 return 0; 290 291 case FLUSH_CACHE: 292 __flush_cache_all(); 293 return 0; 294 } 295 296 return -EINVAL; 297 } 298 299 /* 300 * No implemented yet ... 301 */ 302 SYSCALL_DEFINE3(cachectl, char *, addr, int, nbytes, int, op) 303 { 304 return -ENOSYS; 305 } 306 307 /* 308 * If we ever come here the user sp is bad. Zap the process right away. 309 * Due to the bad stack signaling wouldn't work. 310 */ 311 asmlinkage void bad_stack(void) 312 { 313 do_exit(SIGSEGV); 314 } 315 316 /* 317 * Do a system call from kernel instead of calling sys_execve so we 318 * end up with proper pt_regs. 319 */ 320 int kernel_execve(const char *filename, 321 const char *const argv[], 322 const char *const envp[]) 323 { 324 register unsigned long __a0 asm("$4") = (unsigned long) filename; 325 register unsigned long __a1 asm("$5") = (unsigned long) argv; 326 register unsigned long __a2 asm("$6") = (unsigned long) envp; 327 register unsigned long __a3 asm("$7"); 328 unsigned long __v0; 329 330 __asm__ volatile (" \n" 331 " .set noreorder \n" 332 " li $2, %5 # __NR_execve \n" 333 " syscall \n" 334 " move %0, $2 \n" 335 " .set reorder \n" 336 : "=&r" (__v0), "=r" (__a3) 337 : "r" (__a0), "r" (__a1), "r" (__a2), "i" (__NR_execve) 338 : "$2", "$8", "$9", "$10", "$11", "$12", "$13", "$14", "$15", "$24", 339 "memory"); 340 341 if (__a3 == 0) 342 return __v0; 343 344 return -__v0; 345 } 346