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 __get_user(new_ka.sa.sa_flags, &act->sa_flags) || 189 __get_user(mask, &act->sa_mask)) 190 return -EFAULT; 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 if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) || 199 __put_user(old_ka.sa.sa_handler, &oact->sa_handler) || 200 __put_user(old_ka.sa.sa_restorer, &oact->sa_restorer) || 201 __put_user(old_ka.sa.sa_flags, &oact->sa_flags) || 202 __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask)) 203 return -EFAULT; 204 } 205 206 return ret; 207 } 208 209 asmlinkage long 210 sys_rt_sigaction(int sig, 211 const struct sigaction __user *act, 212 struct sigaction __user *oact, 213 void __user *restorer, 214 size_t sigsetsize) 215 { 216 struct k_sigaction new_ka, old_ka; 217 int ret; 218 219 /* XXX: Don't preclude handling different sized sigset_t's. */ 220 if (sigsetsize != sizeof(sigset_t)) 221 return -EINVAL; 222 223 if (act) { 224 new_ka.ka_restorer = restorer; 225 if (copy_from_user(&new_ka.sa, act, sizeof(*act))) 226 return -EFAULT; 227 } 228 229 ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL); 230 231 if (!ret && oact) { 232 if (copy_to_user(oact, &old_ka.sa, sizeof(*oact))) 233 return -EFAULT; 234 } 235 236 return ret; 237 } 238 239 asmlinkage int sys_getdomainname(char __user *name, int len) 240 { 241 int nlen, err; 242 243 if (len < 0) 244 return -EINVAL; 245 246 down_read(&uts_sem); 247 248 nlen = strlen(utsname()->domainname) + 1; 249 err = -EINVAL; 250 if (nlen > len) 251 goto out; 252 253 err = -EFAULT; 254 if (!copy_to_user(name, utsname()->domainname, nlen)) 255 err = 0; 256 257 out: 258 up_read(&uts_sem); 259 return err; 260 } 261 262 /* 263 * Do a system call from kernel instead of calling sys_execve so we 264 * end up with proper pt_regs. 265 */ 266 int kernel_execve(const char *filename, 267 const char *const argv[], 268 const char *const envp[]) 269 { 270 long __res; 271 register long __g1 __asm__ ("g1") = __NR_execve; 272 register long __o0 __asm__ ("o0") = (long)(filename); 273 register long __o1 __asm__ ("o1") = (long)(argv); 274 register long __o2 __asm__ ("o2") = (long)(envp); 275 asm volatile ("t 0x10\n\t" 276 "bcc 1f\n\t" 277 "mov %%o0, %0\n\t" 278 "sub %%g0, %%o0, %0\n\t" 279 "1:\n\t" 280 : "=r" (__res), "=&r" (__o0) 281 : "1" (__o0), "r" (__o1), "r" (__o2), "r" (__g1) 282 : "cc"); 283 return __res; 284 } 285