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/timex.h> 30 #include <linux/smp.h> 31 #include <linux/smp_lock.h> 32 #include <linux/sem.h> 33 #include <linux/msg.h> 34 #include <linux/shm.h> 35 #include <linux/slab.h> 36 #include <linux/uio.h> 37 #include <linux/nfs_fs.h> 38 #include <linux/quota.h> 39 #include <linux/module.h> 40 #include <linux/sunrpc/svc.h> 41 #include <linux/nfsd/nfsd.h> 42 #include <linux/nfsd/cache.h> 43 #include <linux/nfsd/xdr.h> 44 #include <linux/nfsd/syscall.h> 45 #include <linux/poll.h> 46 #include <linux/personality.h> 47 #include <linux/stat.h> 48 #include <linux/filter.h> 49 #include <linux/highmem.h> 50 #include <linux/highuid.h> 51 #include <linux/mman.h> 52 #include <linux/ipv6.h> 53 #include <linux/in.h> 54 #include <linux/icmpv6.h> 55 #include <linux/syscalls.h> 56 #include <linux/sysctl.h> 57 #include <linux/binfmts.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 * filename, u16 user, u16 group) 103 { 104 return sys_chown(filename, low2highuid(user), low2highgid(group)); 105 } 106 107 asmlinkage long sys32_lchown16(const char * 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 *ruid, u16 *euid, u16 *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 *rgid, u16 *egid, u16 *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 *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 *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 *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 *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 *i) 281 { 282 return (!access_ok(VERIFY_READ, tv32, sizeof(*tv32)) || 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 *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 * 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 *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 *tv, struct timezone *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 *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 *tv, struct timezone *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 *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 *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 *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 (!ret && 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 *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 /* Handle adjtimex compatibility. */ 708 709 struct timex32 { 710 u32 modes; 711 s32 offset, freq, maxerror, esterror; 712 s32 status, constant, precision, tolerance; 713 struct compat_timeval time; 714 s32 tick; 715 s32 ppsfreq, jitter, shift, stabil; 716 s32 jitcnt, calcnt, errcnt, stbcnt; 717 s32 :32; s32 :32; s32 :32; s32 :32; 718 s32 :32; s32 :32; s32 :32; s32 :32; 719 s32 :32; s32 :32; s32 :32; s32 :32; 720 }; 721 722 extern int do_adjtimex(struct timex *); 723 724 asmlinkage long sys32_adjtimex(struct timex32 *utp) 725 { 726 struct timex txc; 727 int ret; 728 729 memset(&txc, 0, sizeof(struct timex)); 730 731 if(get_user(txc.modes, &utp->modes) || 732 __get_user(txc.offset, &utp->offset) || 733 __get_user(txc.freq, &utp->freq) || 734 __get_user(txc.maxerror, &utp->maxerror) || 735 __get_user(txc.esterror, &utp->esterror) || 736 __get_user(txc.status, &utp->status) || 737 __get_user(txc.constant, &utp->constant) || 738 __get_user(txc.precision, &utp->precision) || 739 __get_user(txc.tolerance, &utp->tolerance) || 740 __get_user(txc.time.tv_sec, &utp->time.tv_sec) || 741 __get_user(txc.time.tv_usec, &utp->time.tv_usec) || 742 __get_user(txc.tick, &utp->tick) || 743 __get_user(txc.ppsfreq, &utp->ppsfreq) || 744 __get_user(txc.jitter, &utp->jitter) || 745 __get_user(txc.shift, &utp->shift) || 746 __get_user(txc.stabil, &utp->stabil) || 747 __get_user(txc.jitcnt, &utp->jitcnt) || 748 __get_user(txc.calcnt, &utp->calcnt) || 749 __get_user(txc.errcnt, &utp->errcnt) || 750 __get_user(txc.stbcnt, &utp->stbcnt)) 751 return -EFAULT; 752 753 ret = do_adjtimex(&txc); 754 755 if(put_user(txc.modes, &utp->modes) || 756 __put_user(txc.offset, &utp->offset) || 757 __put_user(txc.freq, &utp->freq) || 758 __put_user(txc.maxerror, &utp->maxerror) || 759 __put_user(txc.esterror, &utp->esterror) || 760 __put_user(txc.status, &utp->status) || 761 __put_user(txc.constant, &utp->constant) || 762 __put_user(txc.precision, &utp->precision) || 763 __put_user(txc.tolerance, &utp->tolerance) || 764 __put_user(txc.time.tv_sec, &utp->time.tv_sec) || 765 __put_user(txc.time.tv_usec, &utp->time.tv_usec) || 766 __put_user(txc.tick, &utp->tick) || 767 __put_user(txc.ppsfreq, &utp->ppsfreq) || 768 __put_user(txc.jitter, &utp->jitter) || 769 __put_user(txc.shift, &utp->shift) || 770 __put_user(txc.stabil, &utp->stabil) || 771 __put_user(txc.jitcnt, &utp->jitcnt) || 772 __put_user(txc.calcnt, &utp->calcnt) || 773 __put_user(txc.errcnt, &utp->errcnt) || 774 __put_user(txc.stbcnt, &utp->stbcnt)) 775 ret = -EFAULT; 776 777 return ret; 778 } 779 780 #ifdef CONFIG_SYSCTL 781 struct __sysctl_args32 { 782 u32 name; 783 int nlen; 784 u32 oldval; 785 u32 oldlenp; 786 u32 newval; 787 u32 newlen; 788 u32 __unused[4]; 789 }; 790 791 asmlinkage long sys32_sysctl(struct __sysctl_args32 *args) 792 { 793 struct __sysctl_args32 tmp; 794 int error; 795 size_t oldlen, *oldlenp = NULL; 796 unsigned long addr = (((long)&args->__unused[0]) + 7) & ~7; 797 798 if (copy_from_user(&tmp, args, sizeof(tmp))) 799 return -EFAULT; 800 801 if (tmp.oldval && tmp.oldlenp) { 802 /* Duh, this is ugly and might not work if sysctl_args 803 is in read-only memory, but do_sysctl does indirectly 804 a lot of uaccess in both directions and we'd have to 805 basically copy the whole sysctl.c here, and 806 glibc's __sysctl uses rw memory for the structure 807 anyway. */ 808 if (get_user(oldlen, (u32 *)A(tmp.oldlenp)) || 809 put_user(oldlen, (size_t *)addr)) 810 return -EFAULT; 811 oldlenp = (size_t *)addr; 812 } 813 814 lock_kernel(); 815 error = do_sysctl((int *)A(tmp.name), tmp.nlen, (void *)A(tmp.oldval), 816 oldlenp, (void *)A(tmp.newval), tmp.newlen); 817 unlock_kernel(); 818 if (oldlenp) { 819 if (!error) { 820 if (get_user(oldlen, (size_t *)addr) || 821 put_user(oldlen, (u32 *)A(tmp.oldlenp))) 822 error = -EFAULT; 823 } 824 copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)); 825 } 826 return error; 827 } 828 #endif 829 830 struct stat64_emu31 { 831 unsigned long long st_dev; 832 unsigned int __pad1; 833 #define STAT64_HAS_BROKEN_ST_INO 1 834 u32 __st_ino; 835 unsigned int st_mode; 836 unsigned int st_nlink; 837 u32 st_uid; 838 u32 st_gid; 839 unsigned long long st_rdev; 840 unsigned int __pad3; 841 long st_size; 842 u32 st_blksize; 843 unsigned char __pad4[4]; 844 u32 __pad5; /* future possible st_blocks high bits */ 845 u32 st_blocks; /* Number 512-byte blocks allocated. */ 846 u32 st_atime; 847 u32 __pad6; 848 u32 st_mtime; 849 u32 __pad7; 850 u32 st_ctime; 851 u32 __pad8; /* will be high 32 bits of ctime someday */ 852 unsigned long st_ino; 853 }; 854 855 static int cp_stat64(struct stat64_emu31 *ubuf, struct kstat *stat) 856 { 857 struct stat64_emu31 tmp; 858 859 memset(&tmp, 0, sizeof(tmp)); 860 861 tmp.st_dev = huge_encode_dev(stat->dev); 862 tmp.st_ino = stat->ino; 863 tmp.__st_ino = (u32)stat->ino; 864 tmp.st_mode = stat->mode; 865 tmp.st_nlink = (unsigned int)stat->nlink; 866 tmp.st_uid = stat->uid; 867 tmp.st_gid = stat->gid; 868 tmp.st_rdev = huge_encode_dev(stat->rdev); 869 tmp.st_size = stat->size; 870 tmp.st_blksize = (u32)stat->blksize; 871 tmp.st_blocks = (u32)stat->blocks; 872 tmp.st_atime = (u32)stat->atime.tv_sec; 873 tmp.st_mtime = (u32)stat->mtime.tv_sec; 874 tmp.st_ctime = (u32)stat->ctime.tv_sec; 875 876 return copy_to_user(ubuf,&tmp,sizeof(tmp)) ? -EFAULT : 0; 877 } 878 879 asmlinkage long sys32_stat64(char * filename, struct stat64_emu31 * statbuf) 880 { 881 struct kstat stat; 882 int ret = vfs_stat(filename, &stat); 883 if (!ret) 884 ret = cp_stat64(statbuf, &stat); 885 return ret; 886 } 887 888 asmlinkage long sys32_lstat64(char * filename, struct stat64_emu31 * statbuf) 889 { 890 struct kstat stat; 891 int ret = vfs_lstat(filename, &stat); 892 if (!ret) 893 ret = cp_stat64(statbuf, &stat); 894 return ret; 895 } 896 897 asmlinkage long sys32_fstat64(unsigned long fd, struct stat64_emu31 * statbuf) 898 { 899 struct kstat stat; 900 int ret = vfs_fstat(fd, &stat); 901 if (!ret) 902 ret = cp_stat64(statbuf, &stat); 903 return ret; 904 } 905 906 /* 907 * Linux/i386 didn't use to be able to handle more than 908 * 4 system call parameters, so these system calls used a memory 909 * block for parameter passing.. 910 */ 911 912 struct mmap_arg_struct_emu31 { 913 u32 addr; 914 u32 len; 915 u32 prot; 916 u32 flags; 917 u32 fd; 918 u32 offset; 919 }; 920 921 /* common code for old and new mmaps */ 922 static inline long do_mmap2( 923 unsigned long addr, unsigned long len, 924 unsigned long prot, unsigned long flags, 925 unsigned long fd, unsigned long pgoff) 926 { 927 struct file * file = NULL; 928 unsigned long error = -EBADF; 929 930 flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE); 931 if (!(flags & MAP_ANONYMOUS)) { 932 file = fget(fd); 933 if (!file) 934 goto out; 935 } 936 937 down_write(¤t->mm->mmap_sem); 938 error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff); 939 if (!IS_ERR((void *) error) && error + len >= 0x80000000ULL) { 940 /* Result is out of bounds. */ 941 do_munmap(current->mm, addr, len); 942 error = -ENOMEM; 943 } 944 up_write(¤t->mm->mmap_sem); 945 946 if (file) 947 fput(file); 948 out: 949 return error; 950 } 951 952 953 asmlinkage unsigned long 954 old32_mmap(struct mmap_arg_struct_emu31 *arg) 955 { 956 struct mmap_arg_struct_emu31 a; 957 int error = -EFAULT; 958 959 if (copy_from_user(&a, arg, sizeof(a))) 960 goto out; 961 962 error = -EINVAL; 963 if (a.offset & ~PAGE_MASK) 964 goto out; 965 966 error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset >> PAGE_SHIFT); 967 out: 968 return error; 969 } 970 971 asmlinkage long 972 sys32_mmap2(struct mmap_arg_struct_emu31 *arg) 973 { 974 struct mmap_arg_struct_emu31 a; 975 int error = -EFAULT; 976 977 if (copy_from_user(&a, arg, sizeof(a))) 978 goto out; 979 error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset); 980 out: 981 return error; 982 } 983 984 asmlinkage long sys32_read(unsigned int fd, char * buf, size_t count) 985 { 986 if ((compat_ssize_t) count < 0) 987 return -EINVAL; 988 989 return sys_read(fd, buf, count); 990 } 991 992 asmlinkage long sys32_write(unsigned int fd, char * buf, size_t count) 993 { 994 if ((compat_ssize_t) count < 0) 995 return -EINVAL; 996 997 return sys_write(fd, buf, count); 998 } 999 1000 asmlinkage long sys32_clone(struct pt_regs regs) 1001 { 1002 unsigned long clone_flags; 1003 unsigned long newsp; 1004 int *parent_tidptr, *child_tidptr; 1005 1006 clone_flags = regs.gprs[3] & 0xffffffffUL; 1007 newsp = regs.orig_gpr2 & 0x7fffffffUL; 1008 parent_tidptr = (int *) (regs.gprs[4] & 0x7fffffffUL); 1009 child_tidptr = (int *) (regs.gprs[5] & 0x7fffffffUL); 1010 if (!newsp) 1011 newsp = regs.gprs[15]; 1012 return do_fork(clone_flags, newsp, ®s, 0, 1013 parent_tidptr, child_tidptr); 1014 } 1015 1016 /* 1017 * Wrapper function for sys_timer_create. 1018 */ 1019 extern asmlinkage long 1020 sys_timer_create(clockid_t, struct sigevent *, timer_t *); 1021 1022 asmlinkage long 1023 sys32_timer_create(clockid_t which_clock, struct compat_sigevent *se32, 1024 timer_t *timer_id) 1025 { 1026 struct sigevent se; 1027 timer_t ktimer_id; 1028 mm_segment_t old_fs; 1029 long ret; 1030 1031 if (se32 == NULL) 1032 return sys_timer_create(which_clock, NULL, timer_id); 1033 1034 if (get_compat_sigevent(&se, se32)) 1035 return -EFAULT; 1036 1037 old_fs = get_fs(); 1038 set_fs(KERNEL_DS); 1039 ret = sys_timer_create(which_clock, &se, &ktimer_id); 1040 set_fs(old_fs); 1041 1042 if (!ret) 1043 ret = put_user (ktimer_id, timer_id); 1044 1045 return ret; 1046 } 1047 1048 /* 1049 * 31 bit emulation wrapper functions for sys_fadvise64/fadvise64_64. 1050 * These need to rewrite the advise values for POSIX_FADV_{DONTNEED,NOREUSE} 1051 * because the 31 bit values differ from the 64 bit values. 1052 */ 1053 1054 asmlinkage long 1055 sys32_fadvise64(int fd, loff_t offset, size_t len, int advise) 1056 { 1057 if (advise == 4) 1058 advise = POSIX_FADV_DONTNEED; 1059 else if (advise == 5) 1060 advise = POSIX_FADV_NOREUSE; 1061 return sys_fadvise64(fd, offset, len, advise); 1062 } 1063 1064 struct fadvise64_64_args { 1065 int fd; 1066 long long offset; 1067 long long len; 1068 int advice; 1069 }; 1070 1071 asmlinkage long 1072 sys32_fadvise64_64(struct fadvise64_64_args __user *args) 1073 { 1074 struct fadvise64_64_args a; 1075 1076 if ( copy_from_user(&a, args, sizeof(a)) ) 1077 return -EFAULT; 1078 if (a.advice == 4) 1079 a.advice = POSIX_FADV_DONTNEED; 1080 else if (a.advice == 5) 1081 a.advice = POSIX_FADV_NOREUSE; 1082 return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice); 1083 } 1084