1 /* 2 * Conversion between 32-bit and 64-bit native system calls. 3 * 4 * Copyright (C) 2000 Silicon Graphics, Inc. 5 * Written by Ulf Carlsson (ulfc@engr.sgi.com) 6 * sys32_execve from ia64/ia32 code, Feb 2000, Kanoj Sarcar (kanoj@sgi.com) 7 */ 8 #include <linux/compiler.h> 9 #include <linux/mm.h> 10 #include <linux/errno.h> 11 #include <linux/file.h> 12 #include <linux/smp_lock.h> 13 #include <linux/highuid.h> 14 #include <linux/resource.h> 15 #include <linux/highmem.h> 16 #include <linux/time.h> 17 #include <linux/times.h> 18 #include <linux/poll.h> 19 #include <linux/slab.h> 20 #include <linux/skbuff.h> 21 #include <linux/filter.h> 22 #include <linux/shm.h> 23 #include <linux/sem.h> 24 #include <linux/msg.h> 25 #include <linux/icmpv6.h> 26 #include <linux/syscalls.h> 27 #include <linux/sysctl.h> 28 #include <linux/utime.h> 29 #include <linux/utsname.h> 30 #include <linux/personality.h> 31 #include <linux/dnotify.h> 32 #include <linux/module.h> 33 #include <linux/binfmts.h> 34 #include <linux/security.h> 35 #include <linux/compat.h> 36 #include <linux/vfs.h> 37 #include <linux/ipc.h> 38 39 #include <net/sock.h> 40 #include <net/scm.h> 41 42 #include <asm/compat-signal.h> 43 #include <asm/sim.h> 44 #include <asm/uaccess.h> 45 #include <asm/mmu_context.h> 46 #include <asm/mman.h> 47 48 /* Use this to get at 32-bit user passed pointers. */ 49 /* A() macro should be used for places where you e.g. 50 have some internal variable u32 and just want to get 51 rid of a compiler warning. AA() has to be used in 52 places where you want to convert a function argument 53 to 32bit pointer or when you e.g. access pt_regs 54 structure and want to consider 32bit registers only. 55 */ 56 #define A(__x) ((unsigned long)(__x)) 57 #define AA(__x) ((unsigned long)((int)__x)) 58 59 #ifdef __MIPSEB__ 60 #define merge_64(r1, r2) ((((r1) & 0xffffffffUL) << 32) + ((r2) & 0xffffffffUL)) 61 #endif 62 #ifdef __MIPSEL__ 63 #define merge_64(r1, r2) ((((r2) & 0xffffffffUL) << 32) + ((r1) & 0xffffffffUL)) 64 #endif 65 66 SYSCALL_DEFINE6(32_mmap2, unsigned long, addr, unsigned long, len, 67 unsigned long, prot, unsigned long, flags, unsigned long, fd, 68 unsigned long, pgoff) 69 { 70 struct file * file = NULL; 71 unsigned long error; 72 73 error = -EINVAL; 74 if (pgoff & (~PAGE_MASK >> 12)) 75 goto out; 76 pgoff >>= PAGE_SHIFT-12; 77 78 if (!(flags & MAP_ANONYMOUS)) { 79 error = -EBADF; 80 file = fget(fd); 81 if (!file) 82 goto out; 83 } 84 flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE); 85 86 down_write(¤t->mm->mmap_sem); 87 error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff); 88 up_write(¤t->mm->mmap_sem); 89 if (file) 90 fput(file); 91 92 out: 93 return error; 94 } 95 96 /* 97 * sys_execve() executes a new program. 98 */ 99 asmlinkage int sys32_execve(nabi_no_regargs struct pt_regs regs) 100 { 101 int error; 102 char * filename; 103 104 filename = getname(compat_ptr(regs.regs[4])); 105 error = PTR_ERR(filename); 106 if (IS_ERR(filename)) 107 goto out; 108 error = compat_do_execve(filename, compat_ptr(regs.regs[5]), 109 compat_ptr(regs.regs[6]), ®s); 110 putname(filename); 111 112 out: 113 return error; 114 } 115 116 #define RLIM_INFINITY32 0x7fffffff 117 #define RESOURCE32(x) ((x > RLIM_INFINITY32) ? RLIM_INFINITY32 : x) 118 119 struct rlimit32 { 120 int rlim_cur; 121 int rlim_max; 122 }; 123 124 SYSCALL_DEFINE4(32_truncate64, const char __user *, path, 125 unsigned long, __dummy, unsigned long, a2, unsigned long, a3) 126 { 127 return sys_truncate(path, merge_64(a2, a3)); 128 } 129 130 SYSCALL_DEFINE4(32_ftruncate64, unsigned long, fd, unsigned long, __dummy, 131 unsigned long, a2, unsigned long, a3) 132 { 133 return sys_ftruncate(fd, merge_64(a2, a3)); 134 } 135 136 SYSCALL_DEFINE5(32_llseek, unsigned int, fd, unsigned int, offset_high, 137 unsigned int, offset_low, loff_t __user *, result, 138 unsigned int, origin) 139 { 140 return sys_llseek(fd, offset_high, offset_low, result, origin); 141 } 142 143 /* From the Single Unix Spec: pread & pwrite act like lseek to pos + op + 144 lseek back to original location. They fail just like lseek does on 145 non-seekable files. */ 146 147 SYSCALL_DEFINE6(32_pread, unsigned long, fd, char __user *, buf, size_t, count, 148 unsigned long, unused, unsigned long, a4, unsigned long, a5) 149 { 150 return sys_pread64(fd, buf, count, merge_64(a4, a5)); 151 } 152 153 SYSCALL_DEFINE6(32_pwrite, unsigned int, fd, const char __user *, buf, 154 size_t, count, u32, unused, u64, a4, u64, a5) 155 { 156 return sys_pwrite64(fd, buf, count, merge_64(a4, a5)); 157 } 158 159 SYSCALL_DEFINE2(32_sched_rr_get_interval, compat_pid_t, pid, 160 struct compat_timespec __user *, interval) 161 { 162 struct timespec t; 163 int ret; 164 mm_segment_t old_fs = get_fs(); 165 166 set_fs(KERNEL_DS); 167 ret = sys_sched_rr_get_interval(pid, (struct timespec __user *)&t); 168 set_fs(old_fs); 169 if (put_user (t.tv_sec, &interval->tv_sec) || 170 __put_user(t.tv_nsec, &interval->tv_nsec)) 171 return -EFAULT; 172 return ret; 173 } 174 175 #ifdef CONFIG_SYSVIPC 176 177 SYSCALL_DEFINE6(32_ipc, u32, call, long, first, long, second, long, third, 178 unsigned long, ptr, unsigned long, fifth) 179 { 180 int version, err; 181 182 version = call >> 16; /* hack for backward compatibility */ 183 call &= 0xffff; 184 185 switch (call) { 186 case SEMOP: 187 /* struct sembuf is the same on 32 and 64bit :)) */ 188 err = sys_semtimedop(first, compat_ptr(ptr), second, NULL); 189 break; 190 case SEMTIMEDOP: 191 err = compat_sys_semtimedop(first, compat_ptr(ptr), second, 192 compat_ptr(fifth)); 193 break; 194 case SEMGET: 195 err = sys_semget(first, second, third); 196 break; 197 case SEMCTL: 198 err = compat_sys_semctl(first, second, third, compat_ptr(ptr)); 199 break; 200 case MSGSND: 201 err = compat_sys_msgsnd(first, second, third, compat_ptr(ptr)); 202 break; 203 case MSGRCV: 204 err = compat_sys_msgrcv(first, second, fifth, third, 205 version, compat_ptr(ptr)); 206 break; 207 case MSGGET: 208 err = sys_msgget((key_t) first, second); 209 break; 210 case MSGCTL: 211 err = compat_sys_msgctl(first, second, compat_ptr(ptr)); 212 break; 213 case SHMAT: 214 err = compat_sys_shmat(first, second, third, version, 215 compat_ptr(ptr)); 216 break; 217 case SHMDT: 218 err = sys_shmdt(compat_ptr(ptr)); 219 break; 220 case SHMGET: 221 err = sys_shmget(first, (unsigned)second, third); 222 break; 223 case SHMCTL: 224 err = compat_sys_shmctl(first, second, compat_ptr(ptr)); 225 break; 226 default: 227 err = -EINVAL; 228 break; 229 } 230 231 return err; 232 } 233 234 #else 235 236 SYSCALL_DEFINE6(32_ipc, u32, call, int, first, int, second, int, third, 237 u32, ptr, u32, fifth) 238 { 239 return -ENOSYS; 240 } 241 242 #endif /* CONFIG_SYSVIPC */ 243 244 #ifdef CONFIG_MIPS32_N32 245 SYSCALL_DEFINE4(n32_semctl, int, semid, int, semnum, int, cmd, u32, arg) 246 { 247 /* compat_sys_semctl expects a pointer to union semun */ 248 u32 __user *uptr = compat_alloc_user_space(sizeof(u32)); 249 if (put_user(arg, uptr)) 250 return -EFAULT; 251 return compat_sys_semctl(semid, semnum, cmd, uptr); 252 } 253 254 SYSCALL_DEFINE4(n32_msgsnd, int, msqid, u32, msgp, unsigned int, msgsz, 255 int, msgflg) 256 { 257 return compat_sys_msgsnd(msqid, msgsz, msgflg, compat_ptr(msgp)); 258 } 259 260 SYSCALL_DEFINE5(n32_msgrcv, int, msqid, u32, msgp, size_t, msgsz, 261 int, msgtyp, int, msgflg) 262 { 263 return compat_sys_msgrcv(msqid, msgsz, msgtyp, msgflg, IPC_64, 264 compat_ptr(msgp)); 265 } 266 #endif 267 268 struct sysctl_args32 269 { 270 compat_caddr_t name; 271 int nlen; 272 compat_caddr_t oldval; 273 compat_caddr_t oldlenp; 274 compat_caddr_t newval; 275 compat_size_t newlen; 276 unsigned int __unused[4]; 277 }; 278 279 #ifdef CONFIG_SYSCTL_SYSCALL 280 281 SYSCALL_DEFINE1(32_sysctl, struct sysctl_args32 __user *, args) 282 { 283 struct sysctl_args32 tmp; 284 int error; 285 size_t oldlen; 286 size_t __user *oldlenp = NULL; 287 unsigned long addr = (((unsigned long)&args->__unused[0]) + 7) & ~7; 288 289 if (copy_from_user(&tmp, args, sizeof(tmp))) 290 return -EFAULT; 291 292 if (tmp.oldval && tmp.oldlenp) { 293 /* Duh, this is ugly and might not work if sysctl_args 294 is in read-only memory, but do_sysctl does indirectly 295 a lot of uaccess in both directions and we'd have to 296 basically copy the whole sysctl.c here, and 297 glibc's __sysctl uses rw memory for the structure 298 anyway. */ 299 if (get_user(oldlen, (u32 __user *)A(tmp.oldlenp)) || 300 put_user(oldlen, (size_t __user *)addr)) 301 return -EFAULT; 302 oldlenp = (size_t __user *)addr; 303 } 304 305 lock_kernel(); 306 error = do_sysctl((int __user *)A(tmp.name), tmp.nlen, (void __user *)A(tmp.oldval), 307 oldlenp, (void __user *)A(tmp.newval), tmp.newlen); 308 unlock_kernel(); 309 if (oldlenp) { 310 if (!error) { 311 if (get_user(oldlen, (size_t __user *)addr) || 312 put_user(oldlen, (u32 __user *)A(tmp.oldlenp))) 313 error = -EFAULT; 314 } 315 copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)); 316 } 317 return error; 318 } 319 320 #else 321 322 SYSCALL_DEFINE1(32_sysctl, struct sysctl_args32 __user *, args) 323 { 324 return -ENOSYS; 325 } 326 327 #endif /* CONFIG_SYSCTL_SYSCALL */ 328 329 SYSCALL_DEFINE1(32_newuname, struct new_utsname __user *, name) 330 { 331 int ret = 0; 332 333 down_read(&uts_sem); 334 if (copy_to_user(name, utsname(), sizeof *name)) 335 ret = -EFAULT; 336 up_read(&uts_sem); 337 338 if (current->personality == PER_LINUX32 && !ret) 339 if (copy_to_user(name->machine, "mips\0\0\0", 8)) 340 ret = -EFAULT; 341 342 return ret; 343 } 344 345 SYSCALL_DEFINE1(32_personality, unsigned long, personality) 346 { 347 int ret; 348 personality &= 0xffffffff; 349 if (personality(current->personality) == PER_LINUX32 && 350 personality == PER_LINUX) 351 personality = PER_LINUX32; 352 ret = sys_personality(personality); 353 if (ret == PER_LINUX32) 354 ret = PER_LINUX; 355 return ret; 356 } 357 358 SYSCALL_DEFINE4(32_sendfile, long, out_fd, long, in_fd, 359 compat_off_t __user *, offset, s32, count) 360 { 361 mm_segment_t old_fs = get_fs(); 362 int ret; 363 off_t of; 364 365 if (offset && get_user(of, offset)) 366 return -EFAULT; 367 368 set_fs(KERNEL_DS); 369 ret = sys_sendfile(out_fd, in_fd, offset ? (off_t __user *)&of : NULL, count); 370 set_fs(old_fs); 371 372 if (offset && put_user(of, offset)) 373 return -EFAULT; 374 375 return ret; 376 } 377 378 asmlinkage ssize_t sys32_readahead(int fd, u32 pad0, u64 a2, u64 a3, 379 size_t count) 380 { 381 return sys_readahead(fd, merge_64(a2, a3), count); 382 } 383 384 asmlinkage long sys32_sync_file_range(int fd, int __pad, 385 unsigned long a2, unsigned long a3, 386 unsigned long a4, unsigned long a5, 387 int flags) 388 { 389 return sys_sync_file_range(fd, 390 merge_64(a2, a3), merge_64(a4, a5), 391 flags); 392 } 393 394 asmlinkage long sys32_fadvise64_64(int fd, int __pad, 395 unsigned long a2, unsigned long a3, 396 unsigned long a4, unsigned long a5, 397 int flags) 398 { 399 return sys_fadvise64_64(fd, 400 merge_64(a2, a3), merge_64(a4, a5), 401 flags); 402 } 403 404 asmlinkage long sys32_fallocate(int fd, int mode, unsigned offset_a2, 405 unsigned offset_a3, unsigned len_a4, unsigned len_a5) 406 { 407 return sys_fallocate(fd, mode, merge_64(offset_a2, offset_a3), 408 merge_64(len_a4, len_a5)); 409 } 410 411 save_static_function(sys32_clone); 412 static int noinline __used 413 _sys32_clone(nabi_no_regargs struct pt_regs regs) 414 { 415 unsigned long clone_flags; 416 unsigned long newsp; 417 int __user *parent_tidptr, *child_tidptr; 418 419 clone_flags = regs.regs[4]; 420 newsp = regs.regs[5]; 421 if (!newsp) 422 newsp = regs.regs[29]; 423 parent_tidptr = (int __user *) regs.regs[6]; 424 425 /* Use __dummy4 instead of getting it off the stack, so that 426 syscall() works. */ 427 child_tidptr = (int __user *) __dummy4; 428 return do_fork(clone_flags, newsp, ®s, 0, 429 parent_tidptr, child_tidptr); 430 } 431