1 /* linux/arch/sparc/kernel/sys_sparc.c 2 * 3 * This file contains various random system calls that 4 * have a non-standard calling sequence on the Linux/sparc 5 * platform. 6 */ 7 8 #include <linux/errno.h> 9 #include <linux/types.h> 10 #include <linux/sched.h> 11 #include <linux/mm.h> 12 #include <linux/fs.h> 13 #include <linux/file.h> 14 #include <linux/sem.h> 15 #include <linux/msg.h> 16 #include <linux/shm.h> 17 #include <linux/stat.h> 18 #include <linux/syscalls.h> 19 #include <linux/mman.h> 20 #include <linux/utsname.h> 21 #include <linux/smp.h> 22 #include <linux/ipc.h> 23 24 #include <asm/uaccess.h> 25 #include <asm/unistd.h> 26 27 /* #define DEBUG_UNIMP_SYSCALL */ 28 29 /* XXX Make this per-binary type, this way we can detect the type of 30 * XXX a binary. Every Sparc executable calls this very early on. 31 */ 32 asmlinkage unsigned long sys_getpagesize(void) 33 { 34 return PAGE_SIZE; /* Possibly older binaries want 8192 on sun4's? */ 35 } 36 37 #define COLOUR_ALIGN(addr) (((addr)+SHMLBA-1)&~(SHMLBA-1)) 38 39 unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr, unsigned long len, unsigned long pgoff, unsigned long flags) 40 { 41 struct vm_area_struct * vmm; 42 43 if (flags & MAP_FIXED) { 44 /* We do not accept a shared mapping if it would violate 45 * cache aliasing constraints. 46 */ 47 if ((flags & MAP_SHARED) && 48 ((addr - (pgoff << PAGE_SHIFT)) & (SHMLBA - 1))) 49 return -EINVAL; 50 return addr; 51 } 52 53 /* See asm-sparc/uaccess.h */ 54 if (len > TASK_SIZE - PAGE_SIZE) 55 return -ENOMEM; 56 if (!addr) 57 addr = TASK_UNMAPPED_BASE; 58 59 if (flags & MAP_SHARED) 60 addr = COLOUR_ALIGN(addr); 61 else 62 addr = PAGE_ALIGN(addr); 63 64 for (vmm = find_vma(current->mm, addr); ; vmm = vmm->vm_next) { 65 /* At this point: (!vmm || addr < vmm->vm_end). */ 66 if (TASK_SIZE - PAGE_SIZE - len < addr) 67 return -ENOMEM; 68 if (!vmm || addr + len <= vmm->vm_start) 69 return addr; 70 addr = vmm->vm_end; 71 if (flags & MAP_SHARED) 72 addr = COLOUR_ALIGN(addr); 73 } 74 } 75 76 /* 77 * sys_pipe() is the normal C calling standard for creating 78 * a pipe. It's not the way unix traditionally does this, though. 79 */ 80 asmlinkage int sparc_pipe(struct pt_regs *regs) 81 { 82 int fd[2]; 83 int error; 84 85 error = do_pipe_flags(fd, 0); 86 if (error) 87 goto out; 88 regs->u_regs[UREG_I1] = fd[1]; 89 error = fd[0]; 90 out: 91 return error; 92 } 93 94 int sparc_mmap_check(unsigned long addr, unsigned long len) 95 { 96 /* See asm-sparc/uaccess.h */ 97 if (len > TASK_SIZE - PAGE_SIZE || addr + len > TASK_SIZE - PAGE_SIZE) 98 return -EINVAL; 99 100 return 0; 101 } 102 103 /* Linux version of mmap */ 104 105 asmlinkage unsigned long sys_mmap2(unsigned long addr, unsigned long len, 106 unsigned long prot, unsigned long flags, unsigned long fd, 107 unsigned long pgoff) 108 { 109 /* Make sure the shift for mmap2 is constant (12), no matter what PAGE_SIZE 110 we have. */ 111 return sys_mmap_pgoff(addr, len, prot, flags, fd, 112 pgoff >> (PAGE_SHIFT - 12)); 113 } 114 115 asmlinkage unsigned long sys_mmap(unsigned long addr, unsigned long len, 116 unsigned long prot, unsigned long flags, unsigned long fd, 117 unsigned long off) 118 { 119 /* no alignment check? */ 120 return sys_mmap_pgoff(addr, len, prot, flags, fd, off >> PAGE_SHIFT); 121 } 122 123 long sparc_remap_file_pages(unsigned long start, unsigned long size, 124 unsigned long prot, unsigned long pgoff, 125 unsigned long flags) 126 { 127 /* This works on an existing mmap so we don't need to validate 128 * the range as that was done at the original mmap call. 129 */ 130 return sys_remap_file_pages(start, size, prot, 131 (pgoff >> (PAGE_SHIFT - 12)), flags); 132 } 133 134 /* we come to here via sys_nis_syscall so it can setup the regs argument */ 135 asmlinkage unsigned long 136 c_sys_nis_syscall (struct pt_regs *regs) 137 { 138 static int count = 0; 139 140 if (count++ > 5) 141 return -ENOSYS; 142 printk ("%s[%d]: Unimplemented SPARC system call %d\n", 143 current->comm, task_pid_nr(current), (int)regs->u_regs[1]); 144 #ifdef DEBUG_UNIMP_SYSCALL 145 show_regs (regs); 146 #endif 147 return -ENOSYS; 148 } 149 150 /* #define DEBUG_SPARC_BREAKPOINT */ 151 152 asmlinkage void 153 sparc_breakpoint (struct pt_regs *regs) 154 { 155 siginfo_t info; 156 157 #ifdef DEBUG_SPARC_BREAKPOINT 158 printk ("TRAP: Entering kernel PC=%x, nPC=%x\n", regs->pc, regs->npc); 159 #endif 160 info.si_signo = SIGTRAP; 161 info.si_errno = 0; 162 info.si_code = TRAP_BRKPT; 163 info.si_addr = (void __user *)regs->pc; 164 info.si_trapno = 0; 165 force_sig_info(SIGTRAP, &info, current); 166 167 #ifdef DEBUG_SPARC_BREAKPOINT 168 printk ("TRAP: Returning to space: PC=%x nPC=%x\n", regs->pc, regs->npc); 169 #endif 170 } 171 172 asmlinkage int 173 sparc_sigaction (int sig, const struct old_sigaction __user *act, 174 struct old_sigaction __user *oact) 175 { 176 struct k_sigaction new_ka, old_ka; 177 int ret; 178 179 WARN_ON_ONCE(sig >= 0); 180 sig = -sig; 181 182 if (act) { 183 unsigned long mask; 184 185 if (!access_ok(VERIFY_READ, act, sizeof(*act)) || 186 __get_user(new_ka.sa.sa_handler, &act->sa_handler) || 187 __get_user(new_ka.sa.sa_restorer, &act->sa_restorer)) 188 return -EFAULT; 189 __get_user(new_ka.sa.sa_flags, &act->sa_flags); 190 __get_user(mask, &act->sa_mask); 191 siginitset(&new_ka.sa.sa_mask, mask); 192 new_ka.ka_restorer = NULL; 193 } 194 195 ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL); 196 197 if (!ret && oact) { 198 /* In the clone() case we could copy half consistent 199 * state to the user, however this could sleep and 200 * deadlock us if we held the signal lock on SMP. So for 201 * now I take the easy way out and do no locking. 202 */ 203 if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) || 204 __put_user(old_ka.sa.sa_handler, &oact->sa_handler) || 205 __put_user(old_ka.sa.sa_restorer, &oact->sa_restorer)) 206 return -EFAULT; 207 __put_user(old_ka.sa.sa_flags, &oact->sa_flags); 208 __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask); 209 } 210 211 return ret; 212 } 213 214 asmlinkage long 215 sys_rt_sigaction(int sig, 216 const struct sigaction __user *act, 217 struct sigaction __user *oact, 218 void __user *restorer, 219 size_t sigsetsize) 220 { 221 struct k_sigaction new_ka, old_ka; 222 int ret; 223 224 /* XXX: Don't preclude handling different sized sigset_t's. */ 225 if (sigsetsize != sizeof(sigset_t)) 226 return -EINVAL; 227 228 if (act) { 229 new_ka.ka_restorer = restorer; 230 if (copy_from_user(&new_ka.sa, act, sizeof(*act))) 231 return -EFAULT; 232 } 233 234 ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL); 235 236 if (!ret && oact) { 237 if (copy_to_user(oact, &old_ka.sa, sizeof(*oact))) 238 return -EFAULT; 239 } 240 241 return ret; 242 } 243 244 asmlinkage int sys_getdomainname(char __user *name, int len) 245 { 246 int nlen, err; 247 248 if (len < 0) 249 return -EINVAL; 250 251 down_read(&uts_sem); 252 253 nlen = strlen(utsname()->domainname) + 1; 254 err = -EINVAL; 255 if (nlen > len) 256 goto out; 257 258 err = -EFAULT; 259 if (!copy_to_user(name, utsname()->domainname, nlen)) 260 err = 0; 261 262 out: 263 up_read(&uts_sem); 264 return err; 265 } 266 267 /* 268 * Do a system call from kernel instead of calling sys_execve so we 269 * end up with proper pt_regs. 270 */ 271 int kernel_execve(const char *filename, 272 const char *const argv[], 273 const char *const envp[]) 274 { 275 long __res; 276 register long __g1 __asm__ ("g1") = __NR_execve; 277 register long __o0 __asm__ ("o0") = (long)(filename); 278 register long __o1 __asm__ ("o1") = (long)(argv); 279 register long __o2 __asm__ ("o2") = (long)(envp); 280 asm volatile ("t 0x10\n\t" 281 "bcc 1f\n\t" 282 "mov %%o0, %0\n\t" 283 "sub %%g0, %%o0, %0\n\t" 284 "1:\n\t" 285 : "=r" (__res), "=&r" (__o0) 286 : "1" (__o0), "r" (__o1), "r" (__o2), "r" (__g1) 287 : "cc"); 288 return __res; 289 } 290