1 /* 2 * arch/s390x/kernel/linux32.c 3 * 4 * S390 version 5 * Copyright (C) 2000 IBM Deutschland Entwicklung GmbH, IBM Corporation 6 * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com), 7 * Gerhard Tonn (ton@de.ibm.com) 8 * Thomas Spatzier (tspat@de.ibm.com) 9 * 10 * Conversion between 31bit and 64bit native syscalls. 11 * 12 * Heavily inspired by the 32-bit Sparc compat code which is 13 * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz) 14 * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu) 15 * 16 */ 17 18 19 #include <linux/config.h> 20 #include <linux/kernel.h> 21 #include <linux/sched.h> 22 #include <linux/fs.h> 23 #include <linux/mm.h> 24 #include <linux/file.h> 25 #include <linux/signal.h> 26 #include <linux/resource.h> 27 #include <linux/times.h> 28 #include <linux/utsname.h> 29 #include <linux/smp.h> 30 #include <linux/smp_lock.h> 31 #include <linux/sem.h> 32 #include <linux/msg.h> 33 #include <linux/shm.h> 34 #include <linux/slab.h> 35 #include <linux/uio.h> 36 #include <linux/nfs_fs.h> 37 #include <linux/quota.h> 38 #include <linux/module.h> 39 #include <linux/sunrpc/svc.h> 40 #include <linux/nfsd/nfsd.h> 41 #include <linux/nfsd/cache.h> 42 #include <linux/nfsd/xdr.h> 43 #include <linux/nfsd/syscall.h> 44 #include <linux/poll.h> 45 #include <linux/personality.h> 46 #include <linux/stat.h> 47 #include <linux/filter.h> 48 #include <linux/highmem.h> 49 #include <linux/highuid.h> 50 #include <linux/mman.h> 51 #include <linux/ipv6.h> 52 #include <linux/in.h> 53 #include <linux/icmpv6.h> 54 #include <linux/syscalls.h> 55 #include <linux/sysctl.h> 56 #include <linux/binfmts.h> 57 #include <linux/capability.h> 58 #include <linux/compat.h> 59 #include <linux/vfs.h> 60 #include <linux/ptrace.h> 61 #include <linux/fadvise.h> 62 63 #include <asm/types.h> 64 #include <asm/ipc.h> 65 #include <asm/uaccess.h> 66 #include <asm/semaphore.h> 67 68 #include <net/scm.h> 69 #include <net/sock.h> 70 71 #include "compat_linux.h" 72 73 74 /* For this source file, we want overflow handling. */ 75 76 #undef high2lowuid 77 #undef high2lowgid 78 #undef low2highuid 79 #undef low2highgid 80 #undef SET_UID16 81 #undef SET_GID16 82 #undef NEW_TO_OLD_UID 83 #undef NEW_TO_OLD_GID 84 #undef SET_OLDSTAT_UID 85 #undef SET_OLDSTAT_GID 86 #undef SET_STAT_UID 87 #undef SET_STAT_GID 88 89 #define high2lowuid(uid) ((uid) > 65535) ? (u16)overflowuid : (u16)(uid) 90 #define high2lowgid(gid) ((gid) > 65535) ? (u16)overflowgid : (u16)(gid) 91 #define low2highuid(uid) ((uid) == (u16)-1) ? (uid_t)-1 : (uid_t)(uid) 92 #define low2highgid(gid) ((gid) == (u16)-1) ? (gid_t)-1 : (gid_t)(gid) 93 #define SET_UID16(var, uid) var = high2lowuid(uid) 94 #define SET_GID16(var, gid) var = high2lowgid(gid) 95 #define NEW_TO_OLD_UID(uid) high2lowuid(uid) 96 #define NEW_TO_OLD_GID(gid) high2lowgid(gid) 97 #define SET_OLDSTAT_UID(stat, uid) (stat).st_uid = high2lowuid(uid) 98 #define SET_OLDSTAT_GID(stat, gid) (stat).st_gid = high2lowgid(gid) 99 #define SET_STAT_UID(stat, uid) (stat).st_uid = high2lowuid(uid) 100 #define SET_STAT_GID(stat, gid) (stat).st_gid = high2lowgid(gid) 101 102 asmlinkage long sys32_chown16(const char __user * filename, u16 user, u16 group) 103 { 104 return sys_chown(filename, low2highuid(user), low2highgid(group)); 105 } 106 107 asmlinkage long sys32_lchown16(const char __user * filename, u16 user, u16 group) 108 { 109 return sys_lchown(filename, low2highuid(user), low2highgid(group)); 110 } 111 112 asmlinkage long sys32_fchown16(unsigned int fd, u16 user, u16 group) 113 { 114 return sys_fchown(fd, low2highuid(user), low2highgid(group)); 115 } 116 117 asmlinkage long sys32_setregid16(u16 rgid, u16 egid) 118 { 119 return sys_setregid(low2highgid(rgid), low2highgid(egid)); 120 } 121 122 asmlinkage long sys32_setgid16(u16 gid) 123 { 124 return sys_setgid((gid_t)gid); 125 } 126 127 asmlinkage long sys32_setreuid16(u16 ruid, u16 euid) 128 { 129 return sys_setreuid(low2highuid(ruid), low2highuid(euid)); 130 } 131 132 asmlinkage long sys32_setuid16(u16 uid) 133 { 134 return sys_setuid((uid_t)uid); 135 } 136 137 asmlinkage long sys32_setresuid16(u16 ruid, u16 euid, u16 suid) 138 { 139 return sys_setresuid(low2highuid(ruid), low2highuid(euid), 140 low2highuid(suid)); 141 } 142 143 asmlinkage long sys32_getresuid16(u16 __user *ruid, u16 __user *euid, u16 __user *suid) 144 { 145 int retval; 146 147 if (!(retval = put_user(high2lowuid(current->uid), ruid)) && 148 !(retval = put_user(high2lowuid(current->euid), euid))) 149 retval = put_user(high2lowuid(current->suid), suid); 150 151 return retval; 152 } 153 154 asmlinkage long sys32_setresgid16(u16 rgid, u16 egid, u16 sgid) 155 { 156 return sys_setresgid(low2highgid(rgid), low2highgid(egid), 157 low2highgid(sgid)); 158 } 159 160 asmlinkage long sys32_getresgid16(u16 __user *rgid, u16 __user *egid, u16 __user *sgid) 161 { 162 int retval; 163 164 if (!(retval = put_user(high2lowgid(current->gid), rgid)) && 165 !(retval = put_user(high2lowgid(current->egid), egid))) 166 retval = put_user(high2lowgid(current->sgid), sgid); 167 168 return retval; 169 } 170 171 asmlinkage long sys32_setfsuid16(u16 uid) 172 { 173 return sys_setfsuid((uid_t)uid); 174 } 175 176 asmlinkage long sys32_setfsgid16(u16 gid) 177 { 178 return sys_setfsgid((gid_t)gid); 179 } 180 181 static int groups16_to_user(u16 __user *grouplist, struct group_info *group_info) 182 { 183 int i; 184 u16 group; 185 186 for (i = 0; i < group_info->ngroups; i++) { 187 group = (u16)GROUP_AT(group_info, i); 188 if (put_user(group, grouplist+i)) 189 return -EFAULT; 190 } 191 192 return 0; 193 } 194 195 static int groups16_from_user(struct group_info *group_info, u16 __user *grouplist) 196 { 197 int i; 198 u16 group; 199 200 for (i = 0; i < group_info->ngroups; i++) { 201 if (get_user(group, grouplist+i)) 202 return -EFAULT; 203 GROUP_AT(group_info, i) = (gid_t)group; 204 } 205 206 return 0; 207 } 208 209 asmlinkage long sys32_getgroups16(int gidsetsize, u16 __user *grouplist) 210 { 211 int i; 212 213 if (gidsetsize < 0) 214 return -EINVAL; 215 216 get_group_info(current->group_info); 217 i = current->group_info->ngroups; 218 if (gidsetsize) { 219 if (i > gidsetsize) { 220 i = -EINVAL; 221 goto out; 222 } 223 if (groups16_to_user(grouplist, current->group_info)) { 224 i = -EFAULT; 225 goto out; 226 } 227 } 228 out: 229 put_group_info(current->group_info); 230 return i; 231 } 232 233 asmlinkage long sys32_setgroups16(int gidsetsize, u16 __user *grouplist) 234 { 235 struct group_info *group_info; 236 int retval; 237 238 if (!capable(CAP_SETGID)) 239 return -EPERM; 240 if ((unsigned)gidsetsize > NGROUPS_MAX) 241 return -EINVAL; 242 243 group_info = groups_alloc(gidsetsize); 244 if (!group_info) 245 return -ENOMEM; 246 retval = groups16_from_user(group_info, grouplist); 247 if (retval) { 248 put_group_info(group_info); 249 return retval; 250 } 251 252 retval = set_current_groups(group_info); 253 put_group_info(group_info); 254 255 return retval; 256 } 257 258 asmlinkage long sys32_getuid16(void) 259 { 260 return high2lowuid(current->uid); 261 } 262 263 asmlinkage long sys32_geteuid16(void) 264 { 265 return high2lowuid(current->euid); 266 } 267 268 asmlinkage long sys32_getgid16(void) 269 { 270 return high2lowgid(current->gid); 271 } 272 273 asmlinkage long sys32_getegid16(void) 274 { 275 return high2lowgid(current->egid); 276 } 277 278 /* 32-bit timeval and related flotsam. */ 279 280 static inline long get_tv32(struct timeval *o, struct compat_timeval __user *i) 281 { 282 return (!access_ok(VERIFY_READ, o, sizeof(*o)) || 283 (__get_user(o->tv_sec, &i->tv_sec) || 284 __get_user(o->tv_usec, &i->tv_usec))); 285 } 286 287 static inline long put_tv32(struct compat_timeval __user *o, struct timeval *i) 288 { 289 return (!access_ok(VERIFY_WRITE, o, sizeof(*o)) || 290 (__put_user(i->tv_sec, &o->tv_sec) || 291 __put_user(i->tv_usec, &o->tv_usec))); 292 } 293 294 /* 295 * sys32_ipc() is the de-multiplexer for the SysV IPC calls in 32bit emulation. 296 * 297 * This is really horribly ugly. 298 */ 299 asmlinkage long sys32_ipc(u32 call, int first, int second, int third, u32 ptr) 300 { 301 if (call >> 16) /* hack for backward compatibility */ 302 return -EINVAL; 303 304 call &= 0xffff; 305 306 switch (call) { 307 case SEMTIMEDOP: 308 return compat_sys_semtimedop(first, compat_ptr(ptr), 309 second, compat_ptr(third)); 310 case SEMOP: 311 /* struct sembuf is the same on 32 and 64bit :)) */ 312 return sys_semtimedop(first, compat_ptr(ptr), 313 second, NULL); 314 case SEMGET: 315 return sys_semget(first, second, third); 316 case SEMCTL: 317 return compat_sys_semctl(first, second, third, 318 compat_ptr(ptr)); 319 case MSGSND: 320 return compat_sys_msgsnd(first, second, third, 321 compat_ptr(ptr)); 322 case MSGRCV: 323 return compat_sys_msgrcv(first, second, 0, third, 324 0, compat_ptr(ptr)); 325 case MSGGET: 326 return sys_msgget((key_t) first, second); 327 case MSGCTL: 328 return compat_sys_msgctl(first, second, compat_ptr(ptr)); 329 case SHMAT: 330 return compat_sys_shmat(first, second, third, 331 0, compat_ptr(ptr)); 332 case SHMDT: 333 return sys_shmdt(compat_ptr(ptr)); 334 case SHMGET: 335 return sys_shmget(first, (unsigned)second, third); 336 case SHMCTL: 337 return compat_sys_shmctl(first, second, compat_ptr(ptr)); 338 } 339 340 return -ENOSYS; 341 } 342 343 asmlinkage long sys32_truncate64(const char __user * path, unsigned long high, unsigned long low) 344 { 345 if ((int)high < 0) 346 return -EINVAL; 347 else 348 return sys_truncate(path, (high << 32) | low); 349 } 350 351 asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low) 352 { 353 if ((int)high < 0) 354 return -EINVAL; 355 else 356 return sys_ftruncate(fd, (high << 32) | low); 357 } 358 359 int cp_compat_stat(struct kstat *stat, struct compat_stat __user *statbuf) 360 { 361 int err; 362 363 if (!old_valid_dev(stat->dev) || !old_valid_dev(stat->rdev)) 364 return -EOVERFLOW; 365 366 err = put_user(old_encode_dev(stat->dev), &statbuf->st_dev); 367 err |= put_user(stat->ino, &statbuf->st_ino); 368 err |= put_user(stat->mode, &statbuf->st_mode); 369 err |= put_user(stat->nlink, &statbuf->st_nlink); 370 err |= put_user(high2lowuid(stat->uid), &statbuf->st_uid); 371 err |= put_user(high2lowgid(stat->gid), &statbuf->st_gid); 372 err |= put_user(old_encode_dev(stat->rdev), &statbuf->st_rdev); 373 err |= put_user(stat->size, &statbuf->st_size); 374 err |= put_user(stat->atime.tv_sec, &statbuf->st_atime); 375 err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec); 376 err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime); 377 err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec); 378 err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime); 379 err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec); 380 err |= put_user(stat->blksize, &statbuf->st_blksize); 381 err |= put_user(stat->blocks, &statbuf->st_blocks); 382 /* fixme 383 err |= put_user(0, &statbuf->__unused4[0]); 384 err |= put_user(0, &statbuf->__unused4[1]); 385 */ 386 return err; 387 } 388 389 struct sysinfo32 { 390 s32 uptime; 391 u32 loads[3]; 392 u32 totalram; 393 u32 freeram; 394 u32 sharedram; 395 u32 bufferram; 396 u32 totalswap; 397 u32 freeswap; 398 unsigned short procs; 399 unsigned short pads; 400 u32 totalhigh; 401 u32 freehigh; 402 unsigned int mem_unit; 403 char _f[8]; 404 }; 405 406 asmlinkage long sys32_sysinfo(struct sysinfo32 __user *info) 407 { 408 struct sysinfo s; 409 int ret, err; 410 mm_segment_t old_fs = get_fs (); 411 412 set_fs (KERNEL_DS); 413 ret = sys_sysinfo(&s); 414 set_fs (old_fs); 415 err = put_user (s.uptime, &info->uptime); 416 err |= __put_user (s.loads[0], &info->loads[0]); 417 err |= __put_user (s.loads[1], &info->loads[1]); 418 err |= __put_user (s.loads[2], &info->loads[2]); 419 err |= __put_user (s.totalram, &info->totalram); 420 err |= __put_user (s.freeram, &info->freeram); 421 err |= __put_user (s.sharedram, &info->sharedram); 422 err |= __put_user (s.bufferram, &info->bufferram); 423 err |= __put_user (s.totalswap, &info->totalswap); 424 err |= __put_user (s.freeswap, &info->freeswap); 425 err |= __put_user (s.procs, &info->procs); 426 err |= __put_user (s.totalhigh, &info->totalhigh); 427 err |= __put_user (s.freehigh, &info->freehigh); 428 err |= __put_user (s.mem_unit, &info->mem_unit); 429 if (err) 430 return -EFAULT; 431 return ret; 432 } 433 434 asmlinkage long sys32_sched_rr_get_interval(compat_pid_t pid, 435 struct compat_timespec __user *interval) 436 { 437 struct timespec t; 438 int ret; 439 mm_segment_t old_fs = get_fs (); 440 441 set_fs (KERNEL_DS); 442 ret = sys_sched_rr_get_interval(pid, &t); 443 set_fs (old_fs); 444 if (put_compat_timespec(&t, interval)) 445 return -EFAULT; 446 return ret; 447 } 448 449 asmlinkage long sys32_rt_sigprocmask(int how, compat_sigset_t __user *set, 450 compat_sigset_t __user *oset, size_t sigsetsize) 451 { 452 sigset_t s; 453 compat_sigset_t s32; 454 int ret; 455 mm_segment_t old_fs = get_fs(); 456 457 if (set) { 458 if (copy_from_user (&s32, set, sizeof(compat_sigset_t))) 459 return -EFAULT; 460 switch (_NSIG_WORDS) { 461 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32); 462 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32); 463 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32); 464 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32); 465 } 466 } 467 set_fs (KERNEL_DS); 468 ret = sys_rt_sigprocmask(how, set ? &s : NULL, oset ? &s : NULL, sigsetsize); 469 set_fs (old_fs); 470 if (ret) return ret; 471 if (oset) { 472 switch (_NSIG_WORDS) { 473 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3]; 474 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2]; 475 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1]; 476 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0]; 477 } 478 if (copy_to_user (oset, &s32, sizeof(compat_sigset_t))) 479 return -EFAULT; 480 } 481 return 0; 482 } 483 484 asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set, 485 size_t sigsetsize) 486 { 487 sigset_t s; 488 compat_sigset_t s32; 489 int ret; 490 mm_segment_t old_fs = get_fs(); 491 492 set_fs (KERNEL_DS); 493 ret = sys_rt_sigpending(&s, sigsetsize); 494 set_fs (old_fs); 495 if (!ret) { 496 switch (_NSIG_WORDS) { 497 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3]; 498 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2]; 499 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1]; 500 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0]; 501 } 502 if (copy_to_user (set, &s32, sizeof(compat_sigset_t))) 503 return -EFAULT; 504 } 505 return ret; 506 } 507 508 asmlinkage long 509 sys32_rt_sigqueueinfo(int pid, int sig, compat_siginfo_t __user *uinfo) 510 { 511 siginfo_t info; 512 int ret; 513 mm_segment_t old_fs = get_fs(); 514 515 if (copy_siginfo_from_user32(&info, uinfo)) 516 return -EFAULT; 517 set_fs (KERNEL_DS); 518 ret = sys_rt_sigqueueinfo(pid, sig, &info); 519 set_fs (old_fs); 520 return ret; 521 } 522 523 /* 524 * sys32_execve() executes a new program after the asm stub has set 525 * things up for us. This should basically do what I want it to. 526 */ 527 asmlinkage long 528 sys32_execve(struct pt_regs regs) 529 { 530 int error; 531 char * filename; 532 533 filename = getname(compat_ptr(regs.orig_gpr2)); 534 error = PTR_ERR(filename); 535 if (IS_ERR(filename)) 536 goto out; 537 error = compat_do_execve(filename, compat_ptr(regs.gprs[3]), 538 compat_ptr(regs.gprs[4]), ®s); 539 if (error == 0) 540 { 541 task_lock(current); 542 current->ptrace &= ~PT_DTRACE; 543 task_unlock(current); 544 current->thread.fp_regs.fpc=0; 545 __asm__ __volatile__ 546 ("sr 0,0\n\t" 547 "sfpc 0,0\n\t" 548 : : :"0"); 549 } 550 putname(filename); 551 out: 552 return error; 553 } 554 555 556 #ifdef CONFIG_MODULES 557 558 asmlinkage long 559 sys32_init_module(void __user *umod, unsigned long len, 560 const char __user *uargs) 561 { 562 return sys_init_module(umod, len, uargs); 563 } 564 565 asmlinkage long 566 sys32_delete_module(const char __user *name_user, unsigned int flags) 567 { 568 return sys_delete_module(name_user, flags); 569 } 570 571 #else /* CONFIG_MODULES */ 572 573 asmlinkage long 574 sys32_init_module(void __user *umod, unsigned long len, 575 const char __user *uargs) 576 { 577 return -ENOSYS; 578 } 579 580 asmlinkage long 581 sys32_delete_module(const char __user *name_user, unsigned int flags) 582 { 583 return -ENOSYS; 584 } 585 586 #endif /* CONFIG_MODULES */ 587 588 /* Translations due to time_t size differences. Which affects all 589 sorts of things, like timeval and itimerval. */ 590 591 extern struct timezone sys_tz; 592 593 asmlinkage long sys32_gettimeofday(struct compat_timeval __user *tv, struct timezone __user *tz) 594 { 595 if (tv) { 596 struct timeval ktv; 597 do_gettimeofday(&ktv); 598 if (put_tv32(tv, &ktv)) 599 return -EFAULT; 600 } 601 if (tz) { 602 if (copy_to_user(tz, &sys_tz, sizeof(sys_tz))) 603 return -EFAULT; 604 } 605 return 0; 606 } 607 608 static inline long get_ts32(struct timespec *o, struct compat_timeval __user *i) 609 { 610 long usec; 611 612 if (!access_ok(VERIFY_READ, i, sizeof(*i))) 613 return -EFAULT; 614 if (__get_user(o->tv_sec, &i->tv_sec)) 615 return -EFAULT; 616 if (__get_user(usec, &i->tv_usec)) 617 return -EFAULT; 618 o->tv_nsec = usec * 1000; 619 return 0; 620 } 621 622 asmlinkage long sys32_settimeofday(struct compat_timeval __user *tv, struct timezone __user *tz) 623 { 624 struct timespec kts; 625 struct timezone ktz; 626 627 if (tv) { 628 if (get_ts32(&kts, tv)) 629 return -EFAULT; 630 } 631 if (tz) { 632 if (copy_from_user(&ktz, tz, sizeof(ktz))) 633 return -EFAULT; 634 } 635 636 return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL); 637 } 638 639 /* These are here just in case some old sparc32 binary calls it. */ 640 asmlinkage long sys32_pause(void) 641 { 642 current->state = TASK_INTERRUPTIBLE; 643 schedule(); 644 return -ERESTARTNOHAND; 645 } 646 647 asmlinkage long sys32_pread64(unsigned int fd, char __user *ubuf, 648 size_t count, u32 poshi, u32 poslo) 649 { 650 if ((compat_ssize_t) count < 0) 651 return -EINVAL; 652 return sys_pread64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo)); 653 } 654 655 asmlinkage long sys32_pwrite64(unsigned int fd, const char __user *ubuf, 656 size_t count, u32 poshi, u32 poslo) 657 { 658 if ((compat_ssize_t) count < 0) 659 return -EINVAL; 660 return sys_pwrite64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo)); 661 } 662 663 asmlinkage compat_ssize_t sys32_readahead(int fd, u32 offhi, u32 offlo, s32 count) 664 { 665 return sys_readahead(fd, ((loff_t)AA(offhi) << 32) | AA(offlo), count); 666 } 667 668 asmlinkage long sys32_sendfile(int out_fd, int in_fd, compat_off_t __user *offset, size_t count) 669 { 670 mm_segment_t old_fs = get_fs(); 671 int ret; 672 off_t of; 673 674 if (offset && get_user(of, offset)) 675 return -EFAULT; 676 677 set_fs(KERNEL_DS); 678 ret = sys_sendfile(out_fd, in_fd, offset ? &of : NULL, count); 679 set_fs(old_fs); 680 681 if (offset && put_user(of, offset)) 682 return -EFAULT; 683 684 return ret; 685 } 686 687 asmlinkage long sys32_sendfile64(int out_fd, int in_fd, 688 compat_loff_t __user *offset, s32 count) 689 { 690 mm_segment_t old_fs = get_fs(); 691 int ret; 692 loff_t lof; 693 694 if (offset && get_user(lof, offset)) 695 return -EFAULT; 696 697 set_fs(KERNEL_DS); 698 ret = sys_sendfile64(out_fd, in_fd, offset ? &lof : NULL, count); 699 set_fs(old_fs); 700 701 if (offset && put_user(lof, offset)) 702 return -EFAULT; 703 704 return ret; 705 } 706 707 #ifdef CONFIG_SYSCTL 708 struct __sysctl_args32 { 709 u32 name; 710 int nlen; 711 u32 oldval; 712 u32 oldlenp; 713 u32 newval; 714 u32 newlen; 715 u32 __unused[4]; 716 }; 717 718 asmlinkage long sys32_sysctl(struct __sysctl_args32 __user *args) 719 { 720 struct __sysctl_args32 tmp; 721 int error; 722 size_t oldlen; 723 size_t __user *oldlenp = NULL; 724 unsigned long addr = (((unsigned long)&args->__unused[0]) + 7) & ~7; 725 726 if (copy_from_user(&tmp, args, sizeof(tmp))) 727 return -EFAULT; 728 729 if (tmp.oldval && tmp.oldlenp) { 730 /* Duh, this is ugly and might not work if sysctl_args 731 is in read-only memory, but do_sysctl does indirectly 732 a lot of uaccess in both directions and we'd have to 733 basically copy the whole sysctl.c here, and 734 glibc's __sysctl uses rw memory for the structure 735 anyway. */ 736 if (get_user(oldlen, (u32 __user *)compat_ptr(tmp.oldlenp)) || 737 put_user(oldlen, (size_t __user *)addr)) 738 return -EFAULT; 739 oldlenp = (size_t __user *)addr; 740 } 741 742 lock_kernel(); 743 error = do_sysctl(compat_ptr(tmp.name), tmp.nlen, compat_ptr(tmp.oldval), 744 oldlenp, compat_ptr(tmp.newval), tmp.newlen); 745 unlock_kernel(); 746 if (oldlenp) { 747 if (!error) { 748 if (get_user(oldlen, (size_t __user *)addr) || 749 put_user(oldlen, (u32 __user *)compat_ptr(tmp.oldlenp))) 750 error = -EFAULT; 751 } 752 copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)); 753 } 754 return error; 755 } 756 #endif 757 758 struct stat64_emu31 { 759 unsigned long long st_dev; 760 unsigned int __pad1; 761 #define STAT64_HAS_BROKEN_ST_INO 1 762 u32 __st_ino; 763 unsigned int st_mode; 764 unsigned int st_nlink; 765 u32 st_uid; 766 u32 st_gid; 767 unsigned long long st_rdev; 768 unsigned int __pad3; 769 long st_size; 770 u32 st_blksize; 771 unsigned char __pad4[4]; 772 u32 __pad5; /* future possible st_blocks high bits */ 773 u32 st_blocks; /* Number 512-byte blocks allocated. */ 774 u32 st_atime; 775 u32 __pad6; 776 u32 st_mtime; 777 u32 __pad7; 778 u32 st_ctime; 779 u32 __pad8; /* will be high 32 bits of ctime someday */ 780 unsigned long st_ino; 781 }; 782 783 static int cp_stat64(struct stat64_emu31 __user *ubuf, struct kstat *stat) 784 { 785 struct stat64_emu31 tmp; 786 787 memset(&tmp, 0, sizeof(tmp)); 788 789 tmp.st_dev = huge_encode_dev(stat->dev); 790 tmp.st_ino = stat->ino; 791 tmp.__st_ino = (u32)stat->ino; 792 tmp.st_mode = stat->mode; 793 tmp.st_nlink = (unsigned int)stat->nlink; 794 tmp.st_uid = stat->uid; 795 tmp.st_gid = stat->gid; 796 tmp.st_rdev = huge_encode_dev(stat->rdev); 797 tmp.st_size = stat->size; 798 tmp.st_blksize = (u32)stat->blksize; 799 tmp.st_blocks = (u32)stat->blocks; 800 tmp.st_atime = (u32)stat->atime.tv_sec; 801 tmp.st_mtime = (u32)stat->mtime.tv_sec; 802 tmp.st_ctime = (u32)stat->ctime.tv_sec; 803 804 return copy_to_user(ubuf,&tmp,sizeof(tmp)) ? -EFAULT : 0; 805 } 806 807 asmlinkage long sys32_stat64(char __user * filename, struct stat64_emu31 __user * statbuf) 808 { 809 struct kstat stat; 810 int ret = vfs_stat(filename, &stat); 811 if (!ret) 812 ret = cp_stat64(statbuf, &stat); 813 return ret; 814 } 815 816 asmlinkage long sys32_lstat64(char __user * filename, struct stat64_emu31 __user * statbuf) 817 { 818 struct kstat stat; 819 int ret = vfs_lstat(filename, &stat); 820 if (!ret) 821 ret = cp_stat64(statbuf, &stat); 822 return ret; 823 } 824 825 asmlinkage long sys32_fstat64(unsigned long fd, struct stat64_emu31 __user * statbuf) 826 { 827 struct kstat stat; 828 int ret = vfs_fstat(fd, &stat); 829 if (!ret) 830 ret = cp_stat64(statbuf, &stat); 831 return ret; 832 } 833 834 asmlinkage long sys32_fstatat64(unsigned int dfd, char __user *filename, 835 struct stat64_emu31 __user* statbuf, int flag) 836 { 837 struct kstat stat; 838 int error = -EINVAL; 839 840 if ((flag & ~AT_SYMLINK_NOFOLLOW) != 0) 841 goto out; 842 843 if (flag & AT_SYMLINK_NOFOLLOW) 844 error = vfs_lstat_fd(dfd, filename, &stat); 845 else 846 error = vfs_stat_fd(dfd, filename, &stat); 847 848 if (!error) 849 error = cp_stat64(statbuf, &stat); 850 out: 851 return error; 852 } 853 854 /* 855 * Linux/i386 didn't use to be able to handle more than 856 * 4 system call parameters, so these system calls used a memory 857 * block for parameter passing.. 858 */ 859 860 struct mmap_arg_struct_emu31 { 861 u32 addr; 862 u32 len; 863 u32 prot; 864 u32 flags; 865 u32 fd; 866 u32 offset; 867 }; 868 869 /* common code for old and new mmaps */ 870 static inline long do_mmap2( 871 unsigned long addr, unsigned long len, 872 unsigned long prot, unsigned long flags, 873 unsigned long fd, unsigned long pgoff) 874 { 875 struct file * file = NULL; 876 unsigned long error = -EBADF; 877 878 flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE); 879 if (!(flags & MAP_ANONYMOUS)) { 880 file = fget(fd); 881 if (!file) 882 goto out; 883 } 884 885 down_write(¤t->mm->mmap_sem); 886 error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff); 887 if (!IS_ERR((void *) error) && error + len >= 0x80000000ULL) { 888 /* Result is out of bounds. */ 889 do_munmap(current->mm, addr, len); 890 error = -ENOMEM; 891 } 892 up_write(¤t->mm->mmap_sem); 893 894 if (file) 895 fput(file); 896 out: 897 return error; 898 } 899 900 901 asmlinkage unsigned long 902 old32_mmap(struct mmap_arg_struct_emu31 __user *arg) 903 { 904 struct mmap_arg_struct_emu31 a; 905 int error = -EFAULT; 906 907 if (copy_from_user(&a, arg, sizeof(a))) 908 goto out; 909 910 error = -EINVAL; 911 if (a.offset & ~PAGE_MASK) 912 goto out; 913 914 error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset >> PAGE_SHIFT); 915 out: 916 return error; 917 } 918 919 asmlinkage long 920 sys32_mmap2(struct mmap_arg_struct_emu31 __user *arg) 921 { 922 struct mmap_arg_struct_emu31 a; 923 int error = -EFAULT; 924 925 if (copy_from_user(&a, arg, sizeof(a))) 926 goto out; 927 error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset); 928 out: 929 return error; 930 } 931 932 asmlinkage long sys32_read(unsigned int fd, char __user * buf, size_t count) 933 { 934 if ((compat_ssize_t) count < 0) 935 return -EINVAL; 936 937 return sys_read(fd, buf, count); 938 } 939 940 asmlinkage long sys32_write(unsigned int fd, char __user * buf, size_t count) 941 { 942 if ((compat_ssize_t) count < 0) 943 return -EINVAL; 944 945 return sys_write(fd, buf, count); 946 } 947 948 asmlinkage long sys32_clone(struct pt_regs regs) 949 { 950 unsigned long clone_flags; 951 unsigned long newsp; 952 int __user *parent_tidptr, *child_tidptr; 953 954 clone_flags = regs.gprs[3] & 0xffffffffUL; 955 newsp = regs.orig_gpr2 & 0x7fffffffUL; 956 parent_tidptr = compat_ptr(regs.gprs[4]); 957 child_tidptr = compat_ptr(regs.gprs[5]); 958 if (!newsp) 959 newsp = regs.gprs[15]; 960 return do_fork(clone_flags, newsp, ®s, 0, 961 parent_tidptr, child_tidptr); 962 } 963 964 /* 965 * 31 bit emulation wrapper functions for sys_fadvise64/fadvise64_64. 966 * These need to rewrite the advise values for POSIX_FADV_{DONTNEED,NOREUSE} 967 * because the 31 bit values differ from the 64 bit values. 968 */ 969 970 asmlinkage long 971 sys32_fadvise64(int fd, loff_t offset, size_t len, int advise) 972 { 973 if (advise == 4) 974 advise = POSIX_FADV_DONTNEED; 975 else if (advise == 5) 976 advise = POSIX_FADV_NOREUSE; 977 return sys_fadvise64(fd, offset, len, advise); 978 } 979 980 struct fadvise64_64_args { 981 int fd; 982 long long offset; 983 long long len; 984 int advice; 985 }; 986 987 asmlinkage long 988 sys32_fadvise64_64(struct fadvise64_64_args __user *args) 989 { 990 struct fadvise64_64_args a; 991 992 if ( copy_from_user(&a, args, sizeof(a)) ) 993 return -EFAULT; 994 if (a.advice == 4) 995 a.advice = POSIX_FADV_DONTNEED; 996 else if (a.advice == 5) 997 a.advice = POSIX_FADV_NOREUSE; 998 return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice); 999 } 1000