arch/x86/ia32/sys_ia32.c

   1 /*
   2  * sys_ia32.c: Conversion between 32bit and 64bit native syscalls. Based on
   3  *             sys_sparc32
   4  *
   5  * Copyright (C) 2000           VA Linux Co
   6  * Copyright (C) 2000           Don Dugger <n0ano@valinux.com>
   7  * Copyright (C) 1999           Arun Sharma <arun.sharma@intel.com>
   8  * Copyright (C) 1997,1998      Jakub Jelinek (jj@sunsite.mff.cuni.cz)
   9  * Copyright (C) 1997           David S. Miller (davem@caip.rutgers.edu)
  10  * Copyright (C) 2000           Hewlett-Packard Co.
  11  * Copyright (C) 2000           David Mosberger-Tang <davidm@hpl.hp.com>
  12  * Copyright (C) 2000,2001,2002 Andi Kleen, SuSE Labs (x86-64 port)
  13  *
  14  * These routines maintain argument size conversion between 32bit and 64bit
  15  * environment. In 2.5 most of this should be moved to a generic directory.
  16  *
  17  * This file assumes that there is a hole at the end of user address space.
  18  *
  19  * Some of the functions are LE specific currently. These are
  20  * hopefully all marked.  This should be fixed.
  21  */
  22
  23 #include <linux/kernel.h>
  24 #include <linux/sched.h>
  25 #include <linux/fs.h>
  26 #include <linux/file.h>
  27 #include <linux/signal.h>
  28 #include <linux/syscalls.h>
  29 #include <linux/times.h>
  30 #include <linux/utsname.h>
  31 #include <linux/smp_lock.h>
  32 #include <linux/mm.h>
  33 #include <linux/uio.h>
  34 #include <linux/poll.h>
  35 #include <linux/personality.h>
  36 #include <linux/stat.h>
  37 #include <linux/rwsem.h>
  38 #include <linux/compat.h>
  39 #include <linux/vfs.h>
  40 #include <linux/ptrace.h>
  41 #include <linux/highuid.h>
  42 #include <linux/sysctl.h>
  43 #include <linux/slab.h>
  44 #include <asm/mman.h>
  45 #include <asm/types.h>
  46 #include <asm/uaccess.h>
  47 #include <asm/atomic.h>
  48 #include <asm/vgtod.h>
  49 #include <asm/sys_ia32.h>
  50
  51 #define AA(__x)         ((unsigned long)(__x))
  52
  53
  54 asmlinkage long sys32_truncate64(const char __user *filename,
  55                                  unsigned long offset_low,
  56                                  unsigned long offset_high)
  57 {
  58        return sys_truncate(filename, ((loff_t) offset_high << 32) | offset_low);
  59 }
  60
  61 asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long offset_low,
  62                                   unsigned long offset_high)
  63 {
  64        return sys_ftruncate(fd, ((loff_t) offset_high << 32) | offset_low);
  65 }
  66
  67 /*
  68  * Another set for IA32/LFS -- x86_64 struct stat is different due to
  69  * support for 64bit inode numbers.
  70  */
  71 static int cp_stat64(struct stat64 __user *ubuf, struct kstat *stat)
  72 {
  73         typeof(ubuf->st_uid) uid = 0;
  74         typeof(ubuf->st_gid) gid = 0;
  75         SET_UID(uid, stat->uid);
  76         SET_GID(gid, stat->gid);
  77         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(struct stat64)) ||
  78             __put_user(huge_encode_dev(stat->dev), &ubuf->st_dev) ||
  79             __put_user(stat->ino, &ubuf->__st_ino) ||
  80             __put_user(stat->ino, &ubuf->st_ino) ||
  81             __put_user(stat->mode, &ubuf->st_mode) ||
  82             __put_user(stat->nlink, &ubuf->st_nlink) ||
  83             __put_user(uid, &ubuf->st_uid) ||
  84             __put_user(gid, &ubuf->st_gid) ||
  85             __put_user(huge_encode_dev(stat->rdev), &ubuf->st_rdev) ||
  86             __put_user(stat->size, &ubuf->st_size) ||
  87             __put_user(stat->atime.tv_sec, &ubuf->st_atime) ||
  88             __put_user(stat->atime.tv_nsec, &ubuf->st_atime_nsec) ||
  89             __put_user(stat->mtime.tv_sec, &ubuf->st_mtime) ||
  90             __put_user(stat->mtime.tv_nsec, &ubuf->st_mtime_nsec) ||
  91             __put_user(stat->ctime.tv_sec, &ubuf->st_ctime) ||
  92             __put_user(stat->ctime.tv_nsec, &ubuf->st_ctime_nsec) ||
  93             __put_user(stat->blksize, &ubuf->st_blksize) ||
  94             __put_user(stat->blocks, &ubuf->st_blocks))
  95                 return -EFAULT;
  96         return 0;
  97 }
  98
  99 asmlinkage long sys32_stat64(const char __user *filename,
 100                              struct stat64 __user *statbuf)
 101 {
 102         struct kstat stat;
 103         int ret = vfs_stat(filename, &stat);
 104
 105         if (!ret)
 106                 ret = cp_stat64(statbuf, &stat);
 107         return ret;
 108 }
 109
 110 asmlinkage long sys32_lstat64(const char __user *filename,
 111                               struct stat64 __user *statbuf)
 112 {
 113         struct kstat stat;
 114         int ret = vfs_lstat(filename, &stat);
 115         if (!ret)
 116                 ret = cp_stat64(statbuf, &stat);
 117         return ret;
 118 }
 119
 120 asmlinkage long sys32_fstat64(unsigned int fd, struct stat64 __user *statbuf)
 121 {
 122         struct kstat stat;
 123         int ret = vfs_fstat(fd, &stat);
 124         if (!ret)
 125                 ret = cp_stat64(statbuf, &stat);
 126         return ret;
 127 }
 128
 129 asmlinkage long sys32_fstatat(unsigned int dfd, const char __user *filename,
 130                               struct stat64 __user *statbuf, int flag)
 131 {
 132         struct kstat stat;
 133         int error;
 134
 135         error = vfs_fstatat(dfd, filename, &stat, flag);
 136         if (error)
 137                 return error;
 138         return cp_stat64(statbuf, &stat);
 139 }
 140
 141 /*
 142  * Linux/i386 didn't use to be able to handle more than
 143  * 4 system call parameters, so these system calls used a memory
 144  * block for parameter passing..
 145  */
 146
 147 struct mmap_arg_struct32 {
 148         unsigned int addr;
 149         unsigned int len;
 150         unsigned int prot;
 151         unsigned int flags;
 152         unsigned int fd;
 153         unsigned int offset;
 154 };
 155
 156 asmlinkage long sys32_mmap(struct mmap_arg_struct32 __user *arg)
 157 {
 158         struct mmap_arg_struct32 a;
 159
 160         if (copy_from_user(&a, arg, sizeof(a)))
 161                 return -EFAULT;
 162
 163         if (a.offset & ~PAGE_MASK)
 164                 return -EINVAL;
 165
 166         return sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd,
 167                                a.offset>>PAGE_SHIFT);
 168 }
 169
 170 asmlinkage long sys32_mprotect(unsigned long start, size_t len,
 171                                unsigned long prot)
 172 {
 173         return sys_mprotect(start, len, prot);
 174 }
 175
 176 asmlinkage long sys32_rt_sigaction(int sig, struct sigaction32 __user *act,
 177                                    struct sigaction32 __user *oact,
 178                                    unsigned int sigsetsize)
 179 {
 180         struct k_sigaction new_ka, old_ka;
 181         int ret;
 182         compat_sigset_t set32;
 183
 184         /* XXX: Don't preclude handling different sized sigset_t's.  */
 185         if (sigsetsize != sizeof(compat_sigset_t))
 186                 return -EINVAL;
 187
 188         if (act) {
 189                 compat_uptr_t handler, restorer;
 190
 191                 if (!access_ok(VERIFY_READ, act, sizeof(*act)) ||
 192                     __get_user(handler, &act->sa_handler) ||
 193                     __get_user(new_ka.sa.sa_flags, &act->sa_flags) ||
 194                     __get_user(restorer, &act->sa_restorer) ||
 195                     __copy_from_user(&set32, &act->sa_mask,
 196                                      sizeof(compat_sigset_t)))
 197                         return -EFAULT;
 198                 new_ka.sa.sa_handler = compat_ptr(handler);
 199                 new_ka.sa.sa_restorer = compat_ptr(restorer);
 200
 201                 /*
 202                  * FIXME: here we rely on _COMPAT_NSIG_WORS to be >=
 203                  * than _NSIG_WORDS << 1
 204                  */
 205                 switch (_NSIG_WORDS) {
 206                 case 4: new_ka.sa.sa_mask.sig[3] = set32.sig[6]
 207                                 | (((long)set32.sig[7]) << 32);
 208                 case 3: new_ka.sa.sa_mask.sig[2] = set32.sig[4]
 209                                 | (((long)set32.sig[5]) << 32);
 210                 case 2: new_ka.sa.sa_mask.sig[1] = set32.sig[2]
 211                                 | (((long)set32.sig[3]) << 32);
 212                 case 1: new_ka.sa.sa_mask.sig[0] = set32.sig[0]
 213                                 | (((long)set32.sig[1]) << 32);
 214                 }
 215         }
 216
 217         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 218
 219         if (!ret && oact) {
 220                 /*
 221                  * FIXME: here we rely on _COMPAT_NSIG_WORS to be >=
 222                  * than _NSIG_WORDS << 1
 223                  */
 224                 switch (_NSIG_WORDS) {
 225                 case 4:
 226                         set32.sig[7] = (old_ka.sa.sa_mask.sig[3] >> 32);
 227                         set32.sig[6] = old_ka.sa.sa_mask.sig[3];
 228                 case 3:
 229                         set32.sig[5] = (old_ka.sa.sa_mask.sig[2] >> 32);
 230                         set32.sig[4] = old_ka.sa.sa_mask.sig[2];
 231                 case 2:
 232                         set32.sig[3] = (old_ka.sa.sa_mask.sig[1] >> 32);
 233                         set32.sig[2] = old_ka.sa.sa_mask.sig[1];
 234                 case 1:
 235                         set32.sig[1] = (old_ka.sa.sa_mask.sig[0] >> 32);
 236                         set32.sig[0] = old_ka.sa.sa_mask.sig[0];
 237                 }
 238                 if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) ||
 239                     __put_user(ptr_to_compat(old_ka.sa.sa_handler),
 240                                &oact->sa_handler) ||
 241                     __put_user(ptr_to_compat(old_ka.sa.sa_restorer),
 242                                &oact->sa_restorer) ||
 243                     __put_user(old_ka.sa.sa_flags, &oact->sa_flags) ||
 244                     __copy_to_user(&oact->sa_mask, &set32,
 245                                    sizeof(compat_sigset_t)))
 246                         return -EFAULT;
 247         }
 248
 249         return ret;
 250 }
 251
 252 asmlinkage long sys32_sigaction(int sig, struct old_sigaction32 __user *act,
 253                                 struct old_sigaction32 __user *oact)
 254 {
 255         struct k_sigaction new_ka, old_ka;
 256         int ret;
 257
 258         if (act) {
 259                 compat_old_sigset_t mask;
 260                 compat_uptr_t handler, restorer;
 261
 262                 if (!access_ok(VERIFY_READ, act, sizeof(*act)) ||
 263                     __get_user(handler, &act->sa_handler) ||
 264                     __get_user(new_ka.sa.sa_flags, &act->sa_flags) ||
 265                     __get_user(restorer, &act->sa_restorer) ||
 266                     __get_user(mask, &act->sa_mask))
 267                         return -EFAULT;
 268
 269                 new_ka.sa.sa_handler = compat_ptr(handler);
 270                 new_ka.sa.sa_restorer = compat_ptr(restorer);
 271
 272                 siginitset(&new_ka.sa.sa_mask, mask);
 273         }
 274
 275         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 276
 277         if (!ret && oact) {
 278                 if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) ||
 279                     __put_user(ptr_to_compat(old_ka.sa.sa_handler),
 280                                &oact->sa_handler) ||
 281                     __put_user(ptr_to_compat(old_ka.sa.sa_restorer),
 282                                &oact->sa_restorer) ||
 283                     __put_user(old_ka.sa.sa_flags, &oact->sa_flags) ||
 284                     __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask))
 285                         return -EFAULT;
 286         }
 287
 288         return ret;
 289 }
 290
 291 asmlinkage long sys32_rt_sigprocmask(int how, compat_sigset_t __user *set,
 292                                      compat_sigset_t __user *oset,
 293                                      unsigned int sigsetsize)
 294 {
 295         sigset_t s;
 296         compat_sigset_t s32;
 297         int ret;
 298         mm_segment_t old_fs = get_fs();
 299
 300         if (set) {
 301                 if (copy_from_user(&s32, set, sizeof(compat_sigset_t)))
 302                         return -EFAULT;
 303                 switch (_NSIG_WORDS) {
 304                 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
 305                 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
 306                 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
 307                 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
 308                 }
 309         }
 310         set_fs(KERNEL_DS);
 311         ret = sys_rt_sigprocmask(how,
 312                                  set ? (sigset_t __user *)&s : NULL,
 313                                  oset ? (sigset_t __user *)&s : NULL,
 314                                  sigsetsize);
 315         set_fs(old_fs);
 316         if (ret)
 317                 return ret;
 318         if (oset) {
 319                 switch (_NSIG_WORDS) {
 320                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
 321                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
 322                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
 323                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
 324                 }
 325                 if (copy_to_user(oset, &s32, sizeof(compat_sigset_t)))
 326                         return -EFAULT;
 327         }
 328         return 0;
 329 }
 330
 331 asmlinkage long sys32_alarm(unsigned int seconds)
 332 {
 333         return alarm_setitimer(seconds);
 334 }
 335
 336 asmlinkage long sys32_waitpid(compat_pid_t pid, unsigned int *stat_addr,
 337                               int options)
 338 {
 339         return compat_sys_wait4(pid, stat_addr, options, NULL);
 340 }
 341
 342 /* 32-bit timeval and related flotsam.  */
 343
 344 asmlinkage long sys32_sysfs(int option, u32 arg1, u32 arg2)
 345 {
 346         return sys_sysfs(option, arg1, arg2);
 347 }
 348
 349 asmlinkage long sys32_sched_rr_get_interval(compat_pid_t pid,
 350                                     struct compat_timespec __user *interval)
 351 {
 352         struct timespec t;
 353         int ret;
 354         mm_segment_t old_fs = get_fs();
 355
 356         set_fs(KERNEL_DS);
 357         ret = sys_sched_rr_get_interval(pid, (struct timespec __user *)&t);
 358         set_fs(old_fs);
 359         if (put_compat_timespec(&t, interval))
 360                 return -EFAULT;
 361         return ret;
 362 }
 363
 364 asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
 365                                     compat_size_t sigsetsize)
 366 {
 367         sigset_t s;
 368         compat_sigset_t s32;
 369         int ret;
 370         mm_segment_t old_fs = get_fs();
 371
 372         set_fs(KERNEL_DS);
 373         ret = sys_rt_sigpending((sigset_t __user *)&s, sigsetsize);
 374         set_fs(old_fs);
 375         if (!ret) {
 376                 switch (_NSIG_WORDS) {
 377                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
 378                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
 379                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
 380                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
 381                 }
 382                 if (copy_to_user(set, &s32, sizeof(compat_sigset_t)))
 383                         return -EFAULT;
 384         }
 385         return ret;
 386 }
 387
 388 asmlinkage long sys32_rt_sigqueueinfo(int pid, int sig,
 389                                       compat_siginfo_t __user *uinfo)
 390 {
 391         siginfo_t info;
 392         int ret;
 393         mm_segment_t old_fs = get_fs();
 394
 395         if (copy_siginfo_from_user32(&info, uinfo))
 396                 return -EFAULT;
 397         set_fs(KERNEL_DS);
 398         ret = sys_rt_sigqueueinfo(pid, sig, (siginfo_t __user *)&info);
 399         set_fs(old_fs);
 400         return ret;
 401 }
 402
 403 /* warning: next two assume little endian */
 404 asmlinkage long sys32_pread(unsigned int fd, char __user *ubuf, u32 count,
 405                             u32 poslo, u32 poshi)
 406 {
 407         return sys_pread64(fd, ubuf, count,
 408                          ((loff_t)AA(poshi) << 32) | AA(poslo));
 409 }
 410
 411 asmlinkage long sys32_pwrite(unsigned int fd, const char __user *ubuf,
 412                              u32 count, u32 poslo, u32 poshi)
 413 {
 414         return sys_pwrite64(fd, ubuf, count,
 415                           ((loff_t)AA(poshi) << 32) | AA(poslo));
 416 }
 417
 418
 419 asmlinkage long sys32_personality(unsigned long personality)
 420 {
 421         int ret;
 422
 423         if (personality(current->personality) == PER_LINUX32 &&
 424                 personality == PER_LINUX)
 425                 personality = PER_LINUX32;
 426         ret = sys_personality(personality);
 427         if (ret == PER_LINUX32)
 428                 ret = PER_LINUX;
 429         return ret;
 430 }
 431
 432 asmlinkage long sys32_sendfile(int out_fd, int in_fd,
 433                                compat_off_t __user *offset, s32 count)
 434 {
 435         mm_segment_t old_fs = get_fs();
 436         int ret;
 437         off_t of;
 438
 439         if (offset && get_user(of, offset))
 440                 return -EFAULT;
 441
 442         set_fs(KERNEL_DS);
 443         ret = sys_sendfile(out_fd, in_fd, offset ? (off_t __user *)&of : NULL,
 444                            count);
 445         set_fs(old_fs);
 446
 447         if (offset && put_user(of, offset))
 448                 return -EFAULT;
 449         return ret;
 450 }
 451
 452 asmlinkage long sys32_execve(const char __user *name, compat_uptr_t __user *argv,
 453                              compat_uptr_t __user *envp, struct pt_regs *regs)
 454 {
 455         long error;
 456         char *filename;
 457
 458         filename = getname(name);
 459         error = PTR_ERR(filename);
 460         if (IS_ERR(filename))
 461                 return error;
 462         error = compat_do_execve(filename, argv, envp, regs);
 463         putname(filename);
 464         return error;
 465 }
 466
 467 asmlinkage long sys32_clone(unsigned int clone_flags, unsigned int newsp,
 468                             struct pt_regs *regs)
 469 {
 470         void __user *parent_tid = (void __user *)regs->dx;
 471         void __user *child_tid = (void __user *)regs->di;
 472
 473         if (!newsp)
 474                 newsp = regs->sp;
 475         return do_fork(clone_flags, newsp, regs, 0, parent_tid, child_tid);
 476 }
 477
 478 /*
 479  * Some system calls that need sign extended arguments. This could be
 480  * done by a generic wrapper.
 481  */
 482 long sys32_lseek(unsigned int fd, int offset, unsigned int whence)
 483 {
 484         return sys_lseek(fd, offset, whence);
 485 }
 486
 487 long sys32_kill(int pid, int sig)
 488 {
 489         return sys_kill(pid, sig);
 490 }
 491
 492 long sys32_fadvise64_64(int fd, __u32 offset_low, __u32 offset_high,
 493                         __u32 len_low, __u32 len_high, int advice)
 494 {
 495         return sys_fadvise64_64(fd,
 496                                (((u64)offset_high)<<32) | offset_low,
 497                                (((u64)len_high)<<32) | len_low,
 498                                 advice);
 499 }
 500
 501 long sys32_vm86_warning(void)
 502 {
 503         struct task_struct *me = current;
 504         static char lastcomm[sizeof(me->comm)];
 505
 506         if (strncmp(lastcomm, me->comm, sizeof(lastcomm))) {
 507                 compat_printk(KERN_INFO
 508                               "%s: vm86 mode not supported on 64 bit kernel\n",
 509                               me->comm);
 510                 strncpy(lastcomm, me->comm, sizeof(lastcomm));
 511         }
 512         return -ENOSYS;
 513 }
 514
 515 long sys32_lookup_dcookie(u32 addr_low, u32 addr_high,
 516                           char __user *buf, size_t len)
 517 {
 518         return sys_lookup_dcookie(((u64)addr_high << 32) | addr_low, buf, len);
 519 }
 520
 521 asmlinkage ssize_t sys32_readahead(int fd, unsigned off_lo, unsigned off_hi,
 522                                    size_t count)
 523 {
 524         return sys_readahead(fd, ((u64)off_hi << 32) | off_lo, count);
 525 }
 526
 527 asmlinkage long sys32_sync_file_range(int fd, unsigned off_low, unsigned off_hi,
 528                                       unsigned n_low, unsigned n_hi,  int flags)
 529 {
 530         return sys_sync_file_range(fd,
 531                                    ((u64)off_hi << 32) | off_low,
 532                                    ((u64)n_hi << 32) | n_low, flags);
 533 }
 534
 535 asmlinkage long sys32_fadvise64(int fd, unsigned offset_lo, unsigned offset_hi,
 536                                 size_t len, int advice)
 537 {
 538         return sys_fadvise64_64(fd, ((u64)offset_hi << 32) | offset_lo,
 539                                 len, advice);
 540 }
 541
 542 asmlinkage long sys32_fallocate(int fd, int mode, unsigned offset_lo,
 543                                 unsigned offset_hi, unsigned len_lo,
 544                                 unsigned len_hi)
 545 {
 546         return sys_fallocate(fd, mode, ((u64)offset_hi << 32) | offset_lo,
 547                              ((u64)len_hi << 32) | len_lo);
 548 }
 549
 550 asmlinkage long sys32_fanotify_mark(int fanotify_fd, unsigned int flags,
 551                                     u32 mask_lo, u32 mask_hi,
 552                                     int fd, const char  __user *pathname)
 553 {
 554         return sys_fanotify_mark(fanotify_fd, flags,
 555                                  ((u64)mask_hi << 32) | mask_lo,
 556                                  fd, pathname);
 557 }