arch/sparc/kernel/sys_sparc32.c

   1 /* sys_sparc32.c: Conversion between 32bit and 64bit native syscalls.
   2  *
   3  * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
   4  * Copyright (C) 1997, 2007 David S. Miller (davem@davemloft.net)
   5  *
   6  * These routines maintain argument size conversion between 32bit and 64bit
   7  * environment.
   8  */
   9
  10 #include <linux/kernel.h>
  11 #include <linux/sched.h>
  12 #include <linux/capability.h>
  13 #include <linux/fs.h>
  14 #include <linux/mm.h>
  15 #include <linux/file.h>
  16 #include <linux/signal.h>
  17 #include <linux/resource.h>
  18 #include <linux/times.h>
  19 #include <linux/smp.h>
  20 #include <linux/smp_lock.h>
  21 #include <linux/sem.h>
  22 #include <linux/msg.h>
  23 #include <linux/shm.h>
  24 #include <linux/uio.h>
  25 #include <linux/nfs_fs.h>
  26 #include <linux/quota.h>
  27 #include <linux/module.h>
  28 #include <linux/poll.h>
  29 #include <linux/personality.h>
  30 #include <linux/stat.h>
  31 #include <linux/filter.h>
  32 #include <linux/highmem.h>
  33 #include <linux/highuid.h>
  34 #include <linux/mman.h>
  35 #include <linux/ipv6.h>
  36 #include <linux/in.h>
  37 #include <linux/icmpv6.h>
  38 #include <linux/syscalls.h>
  39 #include <linux/sysctl.h>
  40 #include <linux/binfmts.h>
  41 #include <linux/dnotify.h>
  42 #include <linux/security.h>
  43 #include <linux/compat.h>
  44 #include <linux/vfs.h>
  45 #include <linux/ptrace.h>
  46 #include <linux/slab.h>
  47
  48 #include <asm/types.h>
  49 #include <asm/uaccess.h>
  50 #include <asm/fpumacro.h>
  51 #include <asm/mmu_context.h>
  52 #include <asm/compat_signal.h>
  53
  54 #ifdef CONFIG_SYSVIPC
  55 asmlinkage long compat_sys_ipc(u32 call, u32 first, u32 second, u32 third, compat_uptr_t ptr, u32 fifth)
  56 {
  57         int version;
  58
  59         version = call >> 16; /* hack for backward compatibility */
  60         call &= 0xffff;
  61
  62         switch (call) {
  63         case SEMTIMEDOP:
  64                 if (fifth)
  65                         /* sign extend semid */
  66                         return compat_sys_semtimedop((int)first,
  67                                                      compat_ptr(ptr), second,
  68                                                      compat_ptr(fifth));
  69                 /* else fall through for normal semop() */
  70         case SEMOP:
  71                 /* struct sembuf is the same on 32 and 64bit :)) */
  72                 /* sign extend semid */
  73                 return sys_semtimedop((int)first, compat_ptr(ptr), second,
  74                                       NULL);
  75         case SEMGET:
  76                 /* sign extend key, nsems */
  77                 return sys_semget((int)first, (int)second, third);
  78         case SEMCTL:
  79                 /* sign extend semid, semnum */
  80                 return compat_sys_semctl((int)first, (int)second, third,
  81                                          compat_ptr(ptr));
  82
  83         case MSGSND:
  84                 /* sign extend msqid */
  85                 return compat_sys_msgsnd((int)first, (int)second, third,
  86                                          compat_ptr(ptr));
  87         case MSGRCV:
  88                 /* sign extend msqid, msgtyp */
  89                 return compat_sys_msgrcv((int)first, second, (int)fifth,
  90                                          third, version, compat_ptr(ptr));
  91         case MSGGET:
  92                 /* sign extend key */
  93                 return sys_msgget((int)first, second);
  94         case MSGCTL:
  95                 /* sign extend msqid */
  96                 return compat_sys_msgctl((int)first, second, compat_ptr(ptr));
  97
  98         case SHMAT:
  99                 /* sign extend shmid */
 100                 return compat_sys_shmat((int)first, second, third, version,
 101                                         compat_ptr(ptr));
 102         case SHMDT:
 103                 return sys_shmdt(compat_ptr(ptr));
 104         case SHMGET:
 105                 /* sign extend key_t */
 106                 return sys_shmget((int)first, second, third);
 107         case SHMCTL:
 108                 /* sign extend shmid */
 109                 return compat_sys_shmctl((int)first, second, compat_ptr(ptr));
 110
 111         default:
 112                 return -ENOSYS;
 113         };
 114
 115         return -ENOSYS;
 116 }
 117 #endif
 118
 119 asmlinkage long sys32_truncate64(const char __user * path, unsigned long high, unsigned long low)
 120 {
 121         if ((int)high < 0)
 122                 return -EINVAL;
 123         else
 124                 return sys_truncate(path, (high << 32) | low);
 125 }
 126
 127 asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
 128 {
 129         if ((int)high < 0)
 130                 return -EINVAL;
 131         else
 132                 return sys_ftruncate(fd, (high << 32) | low);
 133 }
 134
 135 static int cp_compat_stat64(struct kstat *stat,
 136                             struct compat_stat64 __user *statbuf)
 137 {
 138         int err;
 139
 140         err  = put_user(huge_encode_dev(stat->dev), &statbuf->st_dev);
 141         err |= put_user(stat->ino, &statbuf->st_ino);
 142         err |= put_user(stat->mode, &statbuf->st_mode);
 143         err |= put_user(stat->nlink, &statbuf->st_nlink);
 144         err |= put_user(stat->uid, &statbuf->st_uid);
 145         err |= put_user(stat->gid, &statbuf->st_gid);
 146         err |= put_user(huge_encode_dev(stat->rdev), &statbuf->st_rdev);
 147         err |= put_user(0, (unsigned long __user *) &statbuf->__pad3[0]);
 148         err |= put_user(stat->size, &statbuf->st_size);
 149         err |= put_user(stat->blksize, &statbuf->st_blksize);
 150         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[0]);
 151         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[4]);
 152         err |= put_user(stat->blocks, &statbuf->st_blocks);
 153         err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
 154         err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
 155         err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
 156         err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
 157         err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
 158         err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
 159         err |= put_user(0, &statbuf->__unused4);
 160         err |= put_user(0, &statbuf->__unused5);
 161
 162         return err;
 163 }
 164
 165 asmlinkage long compat_sys_stat64(const char __user * filename,
 166                 struct compat_stat64 __user *statbuf)
 167 {
 168         struct kstat stat;
 169         int error = vfs_stat(filename, &stat);
 170
 171         if (!error)
 172                 error = cp_compat_stat64(&stat, statbuf);
 173         return error;
 174 }
 175
 176 asmlinkage long compat_sys_lstat64(const char __user * filename,
 177                 struct compat_stat64 __user *statbuf)
 178 {
 179         struct kstat stat;
 180         int error = vfs_lstat(filename, &stat);
 181
 182         if (!error)
 183                 error = cp_compat_stat64(&stat, statbuf);
 184         return error;
 185 }
 186
 187 asmlinkage long compat_sys_fstat64(unsigned int fd,
 188                 struct compat_stat64 __user * statbuf)
 189 {
 190         struct kstat stat;
 191         int error = vfs_fstat(fd, &stat);
 192
 193         if (!error)
 194                 error = cp_compat_stat64(&stat, statbuf);
 195         return error;
 196 }
 197
 198 asmlinkage long compat_sys_fstatat64(unsigned int dfd,
 199                 const char __user *filename,
 200                 struct compat_stat64 __user * statbuf, int flag)
 201 {
 202         struct kstat stat;
 203         int error;
 204
 205         error = vfs_fstatat(dfd, filename, &stat, flag);
 206         if (error)
 207                 return error;
 208         return cp_compat_stat64(&stat, statbuf);
 209 }
 210
 211 asmlinkage long compat_sys_sysfs(int option, u32 arg1, u32 arg2)
 212 {
 213         return sys_sysfs(option, arg1, arg2);
 214 }
 215
 216 asmlinkage long compat_sys_sched_rr_get_interval(compat_pid_t pid, struct compat_timespec __user *interval)
 217 {
 218         struct timespec t;
 219         int ret;
 220         mm_segment_t old_fs = get_fs ();
 221
 222         set_fs (KERNEL_DS);
 223         ret = sys_sched_rr_get_interval(pid, (struct timespec __user *) &t);
 224         set_fs (old_fs);
 225         if (put_compat_timespec(&t, interval))
 226                 return -EFAULT;
 227         return ret;
 228 }
 229
 230 asmlinkage long compat_sys_rt_sigprocmask(int how,
 231                                           compat_sigset_t __user *set,
 232                                           compat_sigset_t __user *oset,
 233                                           compat_size_t sigsetsize)
 234 {
 235         sigset_t s;
 236         compat_sigset_t s32;
 237         int ret;
 238         mm_segment_t old_fs = get_fs();
 239
 240         if (set) {
 241                 if (copy_from_user (&s32, set, sizeof(compat_sigset_t)))
 242                         return -EFAULT;
 243                 switch (_NSIG_WORDS) {
 244                 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
 245                 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
 246                 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
 247                 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
 248                 }
 249         }
 250         set_fs (KERNEL_DS);
 251         ret = sys_rt_sigprocmask(how,
 252                                  set ? (sigset_t __user *) &s : NULL,
 253                                  oset ? (sigset_t __user *) &s : NULL,
 254                                  sigsetsize);
 255         set_fs (old_fs);
 256         if (ret) return ret;
 257         if (oset) {
 258                 switch (_NSIG_WORDS) {
 259                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
 260                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
 261                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
 262                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
 263                 }
 264                 if (copy_to_user (oset, &s32, sizeof(compat_sigset_t)))
 265                         return -EFAULT;
 266         }
 267         return 0;
 268 }
 269
 270 asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
 271                                     compat_size_t sigsetsize)
 272 {
 273         sigset_t s;
 274         compat_sigset_t s32;
 275         int ret;
 276         mm_segment_t old_fs = get_fs();
 277
 278         set_fs (KERNEL_DS);
 279         ret = sys_rt_sigpending((sigset_t __user *) &s, sigsetsize);
 280         set_fs (old_fs);
 281         if (!ret) {
 282                 switch (_NSIG_WORDS) {
 283                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
 284                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
 285                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
 286                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
 287                 }
 288                 if (copy_to_user (set, &s32, sizeof(compat_sigset_t)))
 289                         return -EFAULT;
 290         }
 291         return ret;
 292 }
 293
 294 asmlinkage long compat_sys_rt_sigqueueinfo(int pid, int sig,
 295                                            struct compat_siginfo __user *uinfo)
 296 {
 297         siginfo_t info;
 298         int ret;
 299         mm_segment_t old_fs = get_fs();
 300
 301         if (copy_siginfo_from_user32(&info, uinfo))
 302                 return -EFAULT;
 303
 304         set_fs (KERNEL_DS);
 305         ret = sys_rt_sigqueueinfo(pid, sig, (siginfo_t __user *) &info);
 306         set_fs (old_fs);
 307         return ret;
 308 }
 309
 310 asmlinkage long compat_sys_sigaction(int sig, struct old_sigaction32 __user *act,
 311                                      struct old_sigaction32 __user *oact)
 312 {
 313         struct k_sigaction new_ka, old_ka;
 314         int ret;
 315
 316         WARN_ON_ONCE(sig >= 0);
 317         sig = -sig;
 318
 319         if (act) {
 320                 compat_old_sigset_t mask;
 321                 u32 u_handler, u_restorer;
 322
 323                 ret = get_user(u_handler, &act->sa_handler);
 324                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
 325                 ret |= __get_user(u_restorer, &act->sa_restorer);
 326                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
 327                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
 328                 ret |= __get_user(mask, &act->sa_mask);
 329                 if (ret)
 330                         return ret;
 331                 new_ka.ka_restorer = NULL;
 332                 siginitset(&new_ka.sa.sa_mask, mask);
 333         }
 334
 335         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 336
 337         if (!ret && oact) {
 338                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
 339                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
 340                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
 341                 ret |= __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask);
 342         }
 343
 344         return ret;
 345 }
 346
 347 asmlinkage long compat_sys_rt_sigaction(int sig,
 348                                         struct sigaction32 __user *act,
 349                                         struct sigaction32 __user *oact,
 350                                         void __user *restorer,
 351                                         compat_size_t sigsetsize)
 352 {
 353         struct k_sigaction new_ka, old_ka;
 354         int ret;
 355         compat_sigset_t set32;
 356
 357         /* XXX: Don't preclude handling different sized sigset_t's.  */
 358         if (sigsetsize != sizeof(compat_sigset_t))
 359                 return -EINVAL;
 360
 361         if (act) {
 362                 u32 u_handler, u_restorer;
 363
 364                 new_ka.ka_restorer = restorer;
 365                 ret = get_user(u_handler, &act->sa_handler);
 366                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
 367                 ret |= __copy_from_user(&set32, &act->sa_mask, sizeof(compat_sigset_t));
 368                 switch (_NSIG_WORDS) {
 369                 case 4: new_ka.sa.sa_mask.sig[3] = set32.sig[6] | (((long)set32.sig[7]) << 32);
 370                 case 3: new_ka.sa.sa_mask.sig[2] = set32.sig[4] | (((long)set32.sig[5]) << 32);
 371                 case 2: new_ka.sa.sa_mask.sig[1] = set32.sig[2] | (((long)set32.sig[3]) << 32);
 372                 case 1: new_ka.sa.sa_mask.sig[0] = set32.sig[0] | (((long)set32.sig[1]) << 32);
 373                 }
 374                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
 375                 ret |= __get_user(u_restorer, &act->sa_restorer);
 376                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
 377                 if (ret)
 378                         return -EFAULT;
 379         }
 380
 381         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 382
 383         if (!ret && oact) {
 384                 switch (_NSIG_WORDS) {
 385                 case 4: set32.sig[7] = (old_ka.sa.sa_mask.sig[3] >> 32); set32.sig[6] = old_ka.sa.sa_mask.sig[3];
 386                 case 3: set32.sig[5] = (old_ka.sa.sa_mask.sig[2] >> 32); set32.sig[4] = old_ka.sa.sa_mask.sig[2];
 387                 case 2: set32.sig[3] = (old_ka.sa.sa_mask.sig[1] >> 32); set32.sig[2] = old_ka.sa.sa_mask.sig[1];
 388                 case 1: set32.sig[1] = (old_ka.sa.sa_mask.sig[0] >> 32); set32.sig[0] = old_ka.sa.sa_mask.sig[0];
 389                 }
 390                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
 391                 ret |= __copy_to_user(&oact->sa_mask, &set32, sizeof(compat_sigset_t));
 392                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
 393                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
 394                 if (ret)
 395                         ret = -EFAULT;
 396         }
 397
 398         return ret;
 399 }
 400
 401 /*
 402  * sparc32_execve() executes a new program after the asm stub has set
 403  * things up for us.  This should basically do what I want it to.
 404  */
 405 asmlinkage long sparc32_execve(struct pt_regs *regs)
 406 {
 407         int error, base = 0;
 408         char *filename;
 409
 410         /* User register window flush is done by entry.S */
 411
 412         /* Check for indirect call. */
 413         if ((u32)regs->u_regs[UREG_G1] == 0)
 414                 base = 1;
 415
 416         filename = getname(compat_ptr(regs->u_regs[base + UREG_I0]));
 417         error = PTR_ERR(filename);
 418         if (IS_ERR(filename))
 419                 goto out;
 420
 421         error = compat_do_execve(filename,
 422                                  compat_ptr(regs->u_regs[base + UREG_I1]),
 423                                  compat_ptr(regs->u_regs[base + UREG_I2]), regs);
 424
 425         putname(filename);
 426
 427         if (!error) {
 428                 fprs_write(0);
 429                 current_thread_info()->xfsr[0] = 0;
 430                 current_thread_info()->fpsaved[0] = 0;
 431                 regs->tstate &= ~TSTATE_PEF;
 432         }
 433 out:
 434         return error;
 435 }
 436
 437 #ifdef CONFIG_MODULES
 438
 439 asmlinkage long sys32_init_module(void __user *umod, u32 len,
 440                                   const char __user *uargs)
 441 {
 442         return sys_init_module(umod, len, uargs);
 443 }
 444
 445 asmlinkage long sys32_delete_module(const char __user *name_user,
 446                                     unsigned int flags)
 447 {
 448         return sys_delete_module(name_user, flags);
 449 }
 450
 451 #else /* CONFIG_MODULES */
 452
 453 asmlinkage long sys32_init_module(const char __user *name_user,
 454                                   struct module __user *mod_user)
 455 {
 456         return -ENOSYS;
 457 }
 458
 459 asmlinkage long sys32_delete_module(const char __user *name_user)
 460 {
 461         return -ENOSYS;
 462 }
 463
 464 #endif  /* CONFIG_MODULES */
 465
 466 asmlinkage compat_ssize_t sys32_pread64(unsigned int fd,
 467                                         char __user *ubuf,
 468                                         compat_size_t count,
 469                                         unsigned long poshi,
 470                                         unsigned long poslo)
 471 {
 472         return sys_pread64(fd, ubuf, count, (poshi << 32) | poslo);
 473 }
 474
 475 asmlinkage compat_ssize_t sys32_pwrite64(unsigned int fd,
 476                                          char __user *ubuf,
 477                                          compat_size_t count,
 478                                          unsigned long poshi,
 479                                          unsigned long poslo)
 480 {
 481         return sys_pwrite64(fd, ubuf, count, (poshi << 32) | poslo);
 482 }
 483
 484 asmlinkage long compat_sys_readahead(int fd,
 485                                      unsigned long offhi,
 486                                      unsigned long offlo,
 487                                      compat_size_t count)
 488 {
 489         return sys_readahead(fd, (offhi << 32) | offlo, count);
 490 }
 491
 492 long compat_sys_fadvise64(int fd,
 493                           unsigned long offhi,
 494                           unsigned long offlo,
 495                           compat_size_t len, int advice)
 496 {
 497         return sys_fadvise64_64(fd, (offhi << 32) | offlo, len, advice);
 498 }
 499
 500 long compat_sys_fadvise64_64(int fd,
 501                              unsigned long offhi, unsigned long offlo,
 502                              unsigned long lenhi, unsigned long lenlo,
 503                              int advice)
 504 {
 505         return sys_fadvise64_64(fd,
 506                                 (offhi << 32) | offlo,
 507                                 (lenhi << 32) | lenlo,
 508                                 advice);
 509 }
 510
 511 asmlinkage long compat_sys_sendfile(int out_fd, int in_fd,
 512                                     compat_off_t __user *offset,
 513                                     compat_size_t count)
 514 {
 515         mm_segment_t old_fs = get_fs();
 516         int ret;
 517         off_t of;
 518
 519         if (offset && get_user(of, offset))
 520                 return -EFAULT;
 521
 522         set_fs(KERNEL_DS);
 523         ret = sys_sendfile(out_fd, in_fd,
 524                            offset ? (off_t __user *) &of : NULL,
 525                            count);
 526         set_fs(old_fs);
 527
 528         if (offset && put_user(of, offset))
 529                 return -EFAULT;
 530
 531         return ret;
 532 }
 533
 534 asmlinkage long compat_sys_sendfile64(int out_fd, int in_fd,
 535                                       compat_loff_t __user *offset,
 536                                       compat_size_t count)
 537 {
 538         mm_segment_t old_fs = get_fs();
 539         int ret;
 540         loff_t lof;
 541
 542         if (offset && get_user(lof, offset))
 543                 return -EFAULT;
 544
 545         set_fs(KERNEL_DS);
 546         ret = sys_sendfile64(out_fd, in_fd,
 547                              offset ? (loff_t __user *) &lof : NULL,
 548                              count);
 549         set_fs(old_fs);
 550
 551         if (offset && put_user(lof, offset))
 552                 return -EFAULT;
 553
 554         return ret;
 555 }
 556
 557 /* This is just a version for 32-bit applications which does
 558  * not force O_LARGEFILE on.
 559  */
 560
 561 asmlinkage long sparc32_open(const char __user *filename,
 562                              int flags, int mode)
 563 {
 564         return do_sys_open(AT_FDCWD, filename, flags, mode);
 565 }
 566
 567 long sys32_lookup_dcookie(unsigned long cookie_high,
 568                           unsigned long cookie_low,
 569                           char __user *buf, size_t len)
 570 {
 571         return sys_lookup_dcookie((cookie_high << 32) | cookie_low,
 572                                   buf, len);
 573 }
 574
 575 long compat_sync_file_range(int fd, unsigned long off_high, unsigned long off_low, unsigned long nb_high, unsigned long nb_low, int flags)
 576 {
 577         return sys_sync_file_range(fd,
 578                                    (off_high << 32) | off_low,
 579                                    (nb_high << 32) | nb_low,
 580                                    flags);
 581 }
 582
 583 asmlinkage long compat_sys_fallocate(int fd, int mode, u32 offhi, u32 offlo,
 584                                      u32 lenhi, u32 lenlo)
 585 {
 586         return sys_fallocate(fd, mode, ((loff_t)offhi << 32) | offlo,
 587                              ((loff_t)lenhi << 32) | lenlo);
 588 }