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 asmlinkage unsigned long 67 sys32_mmap2(unsigned long addr, unsigned long len, unsigned long prot, 68 unsigned long flags, unsigned long fd, 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 asmlinkage long sys32_truncate64(const char __user * path, 125 unsigned long __dummy, int a2, int a3) 126 { 127 return sys_truncate(path, merge_64(a2, a3)); 128 } 129 130 asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long __dummy, 131 int a2, int a3) 132 { 133 return sys_ftruncate(fd, merge_64(a2, a3)); 134 } 135 136 asmlinkage int sys32_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 asmlinkage ssize_t sys32_pread(unsigned int fd, char __user * buf, 148 size_t count, u32 unused, u64 a4, u64 a5) 149 { 150 return sys_pread64(fd, buf, count, merge_64(a4, a5)); 151 } 152 153 asmlinkage ssize_t sys32_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 asmlinkage int sys32_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 asmlinkage long 178 sys32_ipc(u32 call, int first, int second, int third, u32 ptr, u32 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 asmlinkage long 237 sys32_ipc(u32 call, int first, int second, int third, u32 ptr, u32 fifth) 238 { 239 return -ENOSYS; 240 } 241 242 #endif /* CONFIG_SYSVIPC */ 243 244 #ifdef CONFIG_MIPS32_N32 245 asmlinkage long sysn32_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 asmlinkage long sysn32_msgsnd(int msqid, u32 msgp, unsigned msgsz, int msgflg) 255 { 256 return compat_sys_msgsnd(msqid, msgsz, msgflg, compat_ptr(msgp)); 257 } 258 259 asmlinkage long sysn32_msgrcv(int msqid, u32 msgp, size_t msgsz, int msgtyp, 260 int msgflg) 261 { 262 return compat_sys_msgrcv(msqid, msgsz, msgtyp, msgflg, IPC_64, 263 compat_ptr(msgp)); 264 } 265 #endif 266 267 struct sysctl_args32 268 { 269 compat_caddr_t name; 270 int nlen; 271 compat_caddr_t oldval; 272 compat_caddr_t oldlenp; 273 compat_caddr_t newval; 274 compat_size_t newlen; 275 unsigned int __unused[4]; 276 }; 277 278 #ifdef CONFIG_SYSCTL_SYSCALL 279 280 asmlinkage long sys32_sysctl(struct sysctl_args32 __user *args) 281 { 282 struct sysctl_args32 tmp; 283 int error; 284 size_t oldlen; 285 size_t __user *oldlenp = NULL; 286 unsigned long addr = (((unsigned long)&args->__unused[0]) + 7) & ~7; 287 288 if (copy_from_user(&tmp, args, sizeof(tmp))) 289 return -EFAULT; 290 291 if (tmp.oldval && tmp.oldlenp) { 292 /* Duh, this is ugly and might not work if sysctl_args 293 is in read-only memory, but do_sysctl does indirectly 294 a lot of uaccess in both directions and we'd have to 295 basically copy the whole sysctl.c here, and 296 glibc's __sysctl uses rw memory for the structure 297 anyway. */ 298 if (get_user(oldlen, (u32 __user *)A(tmp.oldlenp)) || 299 put_user(oldlen, (size_t __user *)addr)) 300 return -EFAULT; 301 oldlenp = (size_t __user *)addr; 302 } 303 304 lock_kernel(); 305 error = do_sysctl((int __user *)A(tmp.name), tmp.nlen, (void __user *)A(tmp.oldval), 306 oldlenp, (void __user *)A(tmp.newval), tmp.newlen); 307 unlock_kernel(); 308 if (oldlenp) { 309 if (!error) { 310 if (get_user(oldlen, (size_t __user *)addr) || 311 put_user(oldlen, (u32 __user *)A(tmp.oldlenp))) 312 error = -EFAULT; 313 } 314 copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)); 315 } 316 return error; 317 } 318 319 #endif /* CONFIG_SYSCTL_SYSCALL */ 320 321 asmlinkage long sys32_newuname(struct new_utsname __user * name) 322 { 323 int ret = 0; 324 325 down_read(&uts_sem); 326 if (copy_to_user(name, utsname(), sizeof *name)) 327 ret = -EFAULT; 328 up_read(&uts_sem); 329 330 if (current->personality == PER_LINUX32 && !ret) 331 if (copy_to_user(name->machine, "mips\0\0\0", 8)) 332 ret = -EFAULT; 333 334 return ret; 335 } 336 337 asmlinkage int sys32_personality(unsigned long personality) 338 { 339 int ret; 340 personality &= 0xffffffff; 341 if (personality(current->personality) == PER_LINUX32 && 342 personality == PER_LINUX) 343 personality = PER_LINUX32; 344 ret = sys_personality(personality); 345 if (ret == PER_LINUX32) 346 ret = PER_LINUX; 347 return ret; 348 } 349 350 /* ustat compatibility */ 351 struct ustat32 { 352 compat_daddr_t f_tfree; 353 compat_ino_t f_tinode; 354 char f_fname[6]; 355 char f_fpack[6]; 356 }; 357 358 extern asmlinkage long sys_ustat(dev_t dev, struct ustat __user * ubuf); 359 360 asmlinkage int sys32_ustat(dev_t dev, struct ustat32 __user * ubuf32) 361 { 362 int err; 363 struct ustat tmp; 364 struct ustat32 tmp32; 365 mm_segment_t old_fs = get_fs(); 366 367 set_fs(KERNEL_DS); 368 err = sys_ustat(dev, (struct ustat __user *)&tmp); 369 set_fs(old_fs); 370 371 if (err) 372 goto out; 373 374 memset(&tmp32, 0, sizeof(struct ustat32)); 375 tmp32.f_tfree = tmp.f_tfree; 376 tmp32.f_tinode = tmp.f_tinode; 377 378 err = copy_to_user(ubuf32, &tmp32, sizeof(struct ustat32)) ? -EFAULT : 0; 379 380 out: 381 return err; 382 } 383 384 asmlinkage int sys32_sendfile(int out_fd, int in_fd, compat_off_t __user *offset, 385 s32 count) 386 { 387 mm_segment_t old_fs = get_fs(); 388 int ret; 389 off_t of; 390 391 if (offset && get_user(of, offset)) 392 return -EFAULT; 393 394 set_fs(KERNEL_DS); 395 ret = sys_sendfile(out_fd, in_fd, offset ? (off_t __user *)&of : NULL, count); 396 set_fs(old_fs); 397 398 if (offset && put_user(of, offset)) 399 return -EFAULT; 400 401 return ret; 402 } 403 404 asmlinkage ssize_t sys32_readahead(int fd, u32 pad0, u64 a2, u64 a3, 405 size_t count) 406 { 407 return sys_readahead(fd, merge_64(a2, a3), count); 408 } 409 410 asmlinkage long sys32_sync_file_range(int fd, int __pad, 411 unsigned long a2, unsigned long a3, 412 unsigned long a4, unsigned long a5, 413 int flags) 414 { 415 return sys_sync_file_range(fd, 416 merge_64(a2, a3), merge_64(a4, a5), 417 flags); 418 } 419 420 asmlinkage long sys32_fadvise64_64(int fd, int __pad, 421 unsigned long a2, unsigned long a3, 422 unsigned long a4, unsigned long a5, 423 int flags) 424 { 425 return sys_fadvise64_64(fd, 426 merge_64(a2, a3), merge_64(a4, a5), 427 flags); 428 } 429 430 asmlinkage long sys32_fallocate(int fd, int mode, unsigned offset_a2, 431 unsigned offset_a3, unsigned len_a4, unsigned len_a5) 432 { 433 return sys_fallocate(fd, mode, merge_64(offset_a2, offset_a3), 434 merge_64(len_a4, len_a5)); 435 } 436 437 save_static_function(sys32_clone); 438 static int noinline __used 439 _sys32_clone(nabi_no_regargs struct pt_regs regs) 440 { 441 unsigned long clone_flags; 442 unsigned long newsp; 443 int __user *parent_tidptr, *child_tidptr; 444 445 clone_flags = regs.regs[4]; 446 newsp = regs.regs[5]; 447 if (!newsp) 448 newsp = regs.regs[29]; 449 parent_tidptr = (int __user *) regs.regs[6]; 450 451 /* Use __dummy4 instead of getting it off the stack, so that 452 syscall() works. */ 453 child_tidptr = (int __user *) __dummy4; 454 return do_fork(clone_flags, newsp, ®s, 0, 455 parent_tidptr, child_tidptr); 456 } 457