fs/select.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * This file contains the procedures for the handling of select and poll
   4  *
   5  * Created for Linux based loosely upon Mathius Lattner's minix
   6  * patches by Peter MacDonald. Heavily edited by Linus.
   7  *
   8  *  4 February 1994
   9  *     COFF/ELF binary emulation. If the process has the STICKY_TIMEOUTS
  10  *     flag set in its personality we do *not* modify the given timeout
  11  *     parameter to reflect time remaining.
  12  *
  13  *  24 January 2000
  14  *     Changed sys_poll()/do_poll() to use PAGE_SIZE chunk-based allocation
  15  *     of fds to overcome nfds < 16390 descriptors limit (Tigran Aivazian).
  16  */
  17
  18 #include <linux/kernel.h>
  19 #include <linux/sched/signal.h>
  20 #include <linux/sched/rt.h>
  21 #include <linux/syscalls.h>
  22 #include <linux/export.h>
  23 #include <linux/slab.h>
  24 #include <linux/poll.h>
  25 #include <linux/personality.h> /* for STICKY_TIMEOUTS */
  26 #include <linux/file.h>
  27 #include <linux/fdtable.h>
  28 #include <linux/fs.h>
  29 #include <linux/rcupdate.h>
  30 #include <linux/hrtimer.h>
  31 #include <linux/freezer.h>
  32 #include <net/busy_poll.h>
  33 #include <linux/vmalloc.h>
  34
  35 #include <linux/uaccess.h>
  36
  37
  38 /*
  39  * Estimate expected accuracy in ns from a timeval.
  40  *
  41  * After quite a bit of churning around, we've settled on
  42  * a simple thing of taking 0.1% of the timeout as the
  43  * slack, with a cap of 100 msec.
  44  * "nice" tasks get a 0.5% slack instead.
  45  *
  46  * Consider this comment an open invitation to come up with even
  47  * better solutions..
  48  */
  49
  50 #define MAX_SLACK       (100 * NSEC_PER_MSEC)
  51
  52 static long __estimate_accuracy(struct timespec64 *tv)
  53 {
  54         long slack;
  55         int divfactor = 1000;
  56
  57         if (tv->tv_sec < 0)
  58                 return 0;
  59
  60         if (task_nice(current) > 0)
  61                 divfactor = divfactor / 5;
  62
  63         if (tv->tv_sec > MAX_SLACK / (NSEC_PER_SEC/divfactor))
  64                 return MAX_SLACK;
  65
  66         slack = tv->tv_nsec / divfactor;
  67         slack += tv->tv_sec * (NSEC_PER_SEC/divfactor);
  68
  69         if (slack > MAX_SLACK)
  70                 return MAX_SLACK;
  71
  72         return slack;
  73 }
  74
  75 u64 select_estimate_accuracy(struct timespec64 *tv)
  76 {
  77         u64 ret;
  78         struct timespec64 now;
  79
  80         /*
  81          * Realtime tasks get a slack of 0 for obvious reasons.
  82          */
  83
  84         if (rt_task(current))
  85                 return 0;
  86
  87         ktime_get_ts64(&now);
  88         now = timespec64_sub(*tv, now);
  89         ret = __estimate_accuracy(&now);
  90         if (ret < current->timer_slack_ns)
  91                 return current->timer_slack_ns;
  92         return ret;
  93 }
  94
  95
  96
  97 struct poll_table_page {
  98         struct poll_table_page * next;
  99         struct poll_table_entry * entry;
 100         struct poll_table_entry entries[];
 101 };
 102
 103 #define POLL_TABLE_FULL(table) \
 104         ((unsigned long)((table)->entry+1) > PAGE_SIZE + (unsigned long)(table))
 105
 106 /*
 107  * Ok, Peter made a complicated, but straightforward multiple_wait() function.
 108  * I have rewritten this, taking some shortcuts: This code may not be easy to
 109  * follow, but it should be free of race-conditions, and it's practical. If you
 110  * understand what I'm doing here, then you understand how the linux
 111  * sleep/wakeup mechanism works.
 112  *
 113  * Two very simple procedures, poll_wait() and poll_freewait() make all the
 114  * work.  poll_wait() is an inline-function defined in <linux/poll.h>,
 115  * as all select/poll functions have to call it to add an entry to the
 116  * poll table.
 117  */
 118 static void __pollwait(struct file *filp, wait_queue_head_t *wait_address,
 119                        poll_table *p);
 120
 121 void poll_initwait(struct poll_wqueues *pwq)
 122 {
 123         init_poll_funcptr(&pwq->pt, __pollwait);
 124         pwq->polling_task = current;
 125         pwq->triggered = 0;
 126         pwq->error = 0;
 127         pwq->table = NULL;
 128         pwq->inline_index = 0;
 129 }
 130 EXPORT_SYMBOL(poll_initwait);
 131
 132 static void free_poll_entry(struct poll_table_entry *entry)
 133 {
 134         remove_wait_queue(entry->wait_address, &entry->wait);
 135         fput(entry->filp);
 136 }
 137
 138 void poll_freewait(struct poll_wqueues *pwq)
 139 {
 140         struct poll_table_page * p = pwq->table;
 141         int i;
 142         for (i = 0; i < pwq->inline_index; i++)
 143                 free_poll_entry(pwq->inline_entries + i);
 144         while (p) {
 145                 struct poll_table_entry * entry;
 146                 struct poll_table_page *old;
 147
 148                 entry = p->entry;
 149                 do {
 150                         entry--;
 151                         free_poll_entry(entry);
 152                 } while (entry > p->entries);
 153                 old = p;
 154                 p = p->next;
 155                 free_page((unsigned long) old);
 156         }
 157 }
 158 EXPORT_SYMBOL(poll_freewait);
 159
 160 static struct poll_table_entry *poll_get_entry(struct poll_wqueues *p)
 161 {
 162         struct poll_table_page *table = p->table;
 163
 164         if (p->inline_index < N_INLINE_POLL_ENTRIES)
 165                 return p->inline_entries + p->inline_index++;
 166
 167         if (!table || POLL_TABLE_FULL(table)) {
 168                 struct poll_table_page *new_table;
 169
 170                 new_table = (struct poll_table_page *) __get_free_page(GFP_KERNEL);
 171                 if (!new_table) {
 172                         p->error = -ENOMEM;
 173                         return NULL;
 174                 }
 175                 new_table->entry = new_table->entries;
 176                 new_table->next = table;
 177                 p->table = new_table;
 178                 table = new_table;
 179         }
 180
 181         return table->entry++;
 182 }
 183
 184 static int __pollwake(wait_queue_entry_t *wait, unsigned mode, int sync, void *key)
 185 {
 186         struct poll_wqueues *pwq = wait->private;
 187         DECLARE_WAITQUEUE(dummy_wait, pwq->polling_task);
 188
 189         /*
 190          * Although this function is called under waitqueue lock, LOCK
 191          * doesn't imply write barrier and the users expect write
 192          * barrier semantics on wakeup functions.  The following
 193          * smp_wmb() is equivalent to smp_wmb() in try_to_wake_up()
 194          * and is paired with smp_store_mb() in poll_schedule_timeout.
 195          */
 196         smp_wmb();
 197         pwq->triggered = 1;
 198
 199         /*
 200          * Perform the default wake up operation using a dummy
 201          * waitqueue.
 202          *
 203          * TODO: This is hacky but there currently is no interface to
 204          * pass in @sync.  @sync is scheduled to be removed and once
 205          * that happens, wake_up_process() can be used directly.
 206          */
 207         return default_wake_function(&dummy_wait, mode, sync, key);
 208 }
 209
 210 static int pollwake(wait_queue_entry_t *wait, unsigned mode, int sync, void *key)
 211 {
 212         struct poll_table_entry *entry;
 213
 214         entry = container_of(wait, struct poll_table_entry, wait);
 215         if (key && !(key_to_poll(key) & entry->key))
 216                 return 0;
 217         return __pollwake(wait, mode, sync, key);
 218 }
 219
 220 /* Add a new entry */
 221 static void __pollwait(struct file *filp, wait_queue_head_t *wait_address,
 222                                 poll_table *p)
 223 {
 224         struct poll_wqueues *pwq = container_of(p, struct poll_wqueues, pt);
 225         struct poll_table_entry *entry = poll_get_entry(pwq);
 226         if (!entry)
 227                 return;
 228         entry->filp = get_file(filp);
 229         entry->wait_address = wait_address;
 230         entry->key = p->_key;
 231         init_waitqueue_func_entry(&entry->wait, pollwake);
 232         entry->wait.private = pwq;
 233         add_wait_queue(wait_address, &entry->wait);
 234 }
 235
 236 int poll_schedule_timeout(struct poll_wqueues *pwq, int state,
 237                           ktime_t *expires, unsigned long slack)
 238 {
 239         int rc = -EINTR;
 240
 241         set_current_state(state);
 242         if (!pwq->triggered)
 243                 rc = schedule_hrtimeout_range(expires, slack, HRTIMER_MODE_ABS);
 244         __set_current_state(TASK_RUNNING);
 245
 246         /*
 247          * Prepare for the next iteration.
 248          *
 249          * The following smp_store_mb() serves two purposes.  First, it's
 250          * the counterpart rmb of the wmb in pollwake() such that data
 251          * written before wake up is always visible after wake up.
 252          * Second, the full barrier guarantees that triggered clearing
 253          * doesn't pass event check of the next iteration.  Note that
 254          * this problem doesn't exist for the first iteration as
 255          * add_wait_queue() has full barrier semantics.
 256          */
 257         smp_store_mb(pwq->triggered, 0);
 258
 259         return rc;
 260 }
 261 EXPORT_SYMBOL(poll_schedule_timeout);
 262
 263 /**
 264  * poll_select_set_timeout - helper function to setup the timeout value
 265  * @to:         pointer to timespec64 variable for the final timeout
 266  * @sec:        seconds (from user space)
 267  * @nsec:       nanoseconds (from user space)
 268  *
 269  * Note, we do not use a timespec for the user space value here, That
 270  * way we can use the function for timeval and compat interfaces as well.
 271  *
 272  * Returns -EINVAL if sec/nsec are not normalized. Otherwise 0.
 273  */
 274 int poll_select_set_timeout(struct timespec64 *to, time64_t sec, long nsec)
 275 {
 276         struct timespec64 ts = {.tv_sec = sec, .tv_nsec = nsec};
 277
 278         if (!timespec64_valid(&ts))
 279                 return -EINVAL;
 280
 281         /* Optimize for the zero timeout value here */
 282         if (!sec && !nsec) {
 283                 to->tv_sec = to->tv_nsec = 0;
 284         } else {
 285                 ktime_get_ts64(to);
 286                 *to = timespec64_add_safe(*to, ts);
 287         }
 288         return 0;
 289 }
 290
 291 enum poll_time_type {
 292         PT_TIMEVAL = 0,
 293         PT_OLD_TIMEVAL = 1,
 294         PT_TIMESPEC = 2,
 295         PT_OLD_TIMESPEC = 3,
 296 };
 297
 298 static int poll_select_finish(struct timespec64 *end_time,
 299                               void __user *p,
 300                               enum poll_time_type pt_type, int ret)
 301 {
 302         struct timespec64 rts;
 303
 304         restore_saved_sigmask_unless(ret == -ERESTARTNOHAND);
 305
 306         if (!p)
 307                 return ret;
 308
 309         if (current->personality & STICKY_TIMEOUTS)
 310                 goto sticky;
 311
 312         /* No update for zero timeout */
 313         if (!end_time->tv_sec && !end_time->tv_nsec)
 314                 return ret;
 315
 316         ktime_get_ts64(&rts);
 317         rts = timespec64_sub(*end_time, rts);
 318         if (rts.tv_sec < 0)
 319                 rts.tv_sec = rts.tv_nsec = 0;
 320
 321
 322         switch (pt_type) {
 323         case PT_TIMEVAL:
 324                 {
 325                         struct __kernel_old_timeval rtv;
 326
 327                         if (sizeof(rtv) > sizeof(rtv.tv_sec) + sizeof(rtv.tv_usec))
 328                                 memset(&rtv, 0, sizeof(rtv));
 329                         rtv.tv_sec = rts.tv_sec;
 330                         rtv.tv_usec = rts.tv_nsec / NSEC_PER_USEC;
 331                         if (!copy_to_user(p, &rtv, sizeof(rtv)))
 332                                 return ret;
 333                 }
 334                 break;
 335         case PT_OLD_TIMEVAL:
 336                 {
 337                         struct old_timeval32 rtv;
 338
 339                         rtv.tv_sec = rts.tv_sec;
 340                         rtv.tv_usec = rts.tv_nsec / NSEC_PER_USEC;
 341                         if (!copy_to_user(p, &rtv, sizeof(rtv)))
 342                                 return ret;
 343                 }
 344                 break;
 345         case PT_TIMESPEC:
 346                 if (!put_timespec64(&rts, p))
 347                         return ret;
 348                 break;
 349         case PT_OLD_TIMESPEC:
 350                 if (!put_old_timespec32(&rts, p))
 351                         return ret;
 352                 break;
 353         default:
 354                 BUG();
 355         }
 356         /*
 357          * If an application puts its timeval in read-only memory, we
 358          * don't want the Linux-specific update to the timeval to
 359          * cause a fault after the select has completed
 360          * successfully. However, because we're not updating the
 361          * timeval, we can't restart the system call.
 362          */
 363
 364 sticky:
 365         if (ret == -ERESTARTNOHAND)
 366                 ret = -EINTR;
 367         return ret;
 368 }
 369
 370 /*
 371  * Scalable version of the fd_set.
 372  */
 373
 374 typedef struct {
 375         unsigned long *in, *out, *ex;
 376         unsigned long *res_in, *res_out, *res_ex;
 377 } fd_set_bits;
 378
 379 /*
 380  * How many longwords for "nr" bits?
 381  */
 382 #define FDS_BITPERLONG  (8*sizeof(long))
 383 #define FDS_LONGS(nr)   (((nr)+FDS_BITPERLONG-1)/FDS_BITPERLONG)
 384 #define FDS_BYTES(nr)   (FDS_LONGS(nr)*sizeof(long))
 385
 386 /*
 387  * Use "unsigned long" accesses to let user-mode fd_set's be long-aligned.
 388  */
 389 static inline
 390 int get_fd_set(unsigned long nr, void __user *ufdset, unsigned long *fdset)
 391 {
 392         nr = FDS_BYTES(nr);
 393         if (ufdset)
 394                 return copy_from_user(fdset, ufdset, nr) ? -EFAULT : 0;
 395
 396         memset(fdset, 0, nr);
 397         return 0;
 398 }
 399
 400 static inline unsigned long __must_check
 401 set_fd_set(unsigned long nr, void __user *ufdset, unsigned long *fdset)
 402 {
 403         if (ufdset)
 404                 return __copy_to_user(ufdset, fdset, FDS_BYTES(nr));
 405         return 0;
 406 }
 407
 408 static inline
 409 void zero_fd_set(unsigned long nr, unsigned long *fdset)
 410 {
 411         memset(fdset, 0, FDS_BYTES(nr));
 412 }
 413
 414 #define FDS_IN(fds, n)          (fds->in + n)
 415 #define FDS_OUT(fds, n)         (fds->out + n)
 416 #define FDS_EX(fds, n)          (fds->ex + n)
 417
 418 #define BITS(fds, n)    (*FDS_IN(fds, n)|*FDS_OUT(fds, n)|*FDS_EX(fds, n))
 419
 420 static int max_select_fd(unsigned long n, fd_set_bits *fds)
 421 {
 422         unsigned long *open_fds;
 423         unsigned long set;
 424         int max;
 425         struct fdtable *fdt;
 426
 427         /* handle last in-complete long-word first */
 428         set = ~(~0UL << (n & (BITS_PER_LONG-1)));
 429         n /= BITS_PER_LONG;
 430         fdt = files_fdtable(current->files);
 431         open_fds = fdt->open_fds + n;
 432         max = 0;
 433         if (set) {
 434                 set &= BITS(fds, n);
 435                 if (set) {
 436                         if (!(set & ~*open_fds))
 437                                 goto get_max;
 438                         return -EBADF;
 439                 }
 440         }
 441         while (n) {
 442                 open_fds--;
 443                 n--;
 444                 set = BITS(fds, n);
 445                 if (!set)
 446                         continue;
 447                 if (set & ~*open_fds)
 448                         return -EBADF;
 449                 if (max)
 450                         continue;
 451 get_max:
 452                 do {
 453                         max++;
 454                         set >>= 1;
 455                 } while (set);
 456                 max += n * BITS_PER_LONG;
 457         }
 458
 459         return max;
 460 }
 461
 462 #define POLLIN_SET (EPOLLRDNORM | EPOLLRDBAND | EPOLLIN | EPOLLHUP | EPOLLERR |\
 463                         EPOLLNVAL)
 464 #define POLLOUT_SET (EPOLLWRBAND | EPOLLWRNORM | EPOLLOUT | EPOLLERR |\
 465                          EPOLLNVAL)
 466 #define POLLEX_SET (EPOLLPRI | EPOLLNVAL)
 467
 468 static inline void wait_key_set(poll_table *wait, unsigned long in,
 469                                 unsigned long out, unsigned long bit,
 470                                 __poll_t ll_flag)
 471 {
 472         wait->_key = POLLEX_SET | ll_flag;
 473         if (in & bit)
 474                 wait->_key |= POLLIN_SET;
 475         if (out & bit)
 476                 wait->_key |= POLLOUT_SET;
 477 }
 478
 479 static int do_select(int n, fd_set_bits *fds, struct timespec64 *end_time)
 480 {
 481         ktime_t expire, *to = NULL;
 482         struct poll_wqueues table;
 483         poll_table *wait;
 484         int retval, i, timed_out = 0;
 485         u64 slack = 0;
 486         __poll_t busy_flag = net_busy_loop_on() ? POLL_BUSY_LOOP : 0;
 487         unsigned long busy_start = 0;
 488
 489         rcu_read_lock();
 490         retval = max_select_fd(n, fds);
 491         rcu_read_unlock();
 492
 493         if (retval < 0)
 494                 return retval;
 495         n = retval;
 496
 497         poll_initwait(&table);
 498         wait = &table.pt;
 499         if (end_time && !end_time->tv_sec && !end_time->tv_nsec) {
 500                 wait->_qproc = NULL;
 501                 timed_out = 1;
 502         }
 503
 504         if (end_time && !timed_out)
 505                 slack = select_estimate_accuracy(end_time);
 506
 507         retval = 0;
 508         for (;;) {
 509                 unsigned long *rinp, *routp, *rexp, *inp, *outp, *exp;
 510                 bool can_busy_loop = false;
 511
 512                 inp = fds->in; outp = fds->out; exp = fds->ex;
 513                 rinp = fds->res_in; routp = fds->res_out; rexp = fds->res_ex;
 514
 515                 for (i = 0; i < n; ++rinp, ++routp, ++rexp) {
 516                         unsigned long in, out, ex, all_bits, bit = 1, j;
 517                         unsigned long res_in = 0, res_out = 0, res_ex = 0;
 518                         __poll_t mask;
 519
 520                         in = *inp++; out = *outp++; ex = *exp++;
 521                         all_bits = in | out | ex;
 522                         if (all_bits == 0) {
 523                                 i += BITS_PER_LONG;
 524                                 continue;
 525                         }
 526
 527                         for (j = 0; j < BITS_PER_LONG; ++j, ++i, bit <<= 1) {
 528                                 struct fd f;
 529                                 if (i >= n)
 530                                         break;
 531                                 if (!(bit & all_bits))
 532                                         continue;
 533                                 mask = EPOLLNVAL;
 534                                 f = fdget(i);
 535                                 if (f.file) {
 536                                         wait_key_set(wait, in, out, bit,
 537                                                      busy_flag);
 538                                         mask = vfs_poll(f.file, wait);
 539
 540                                         fdput(f);
 541                                 }
 542                                 if ((mask & POLLIN_SET) && (in & bit)) {
 543                                         res_in |= bit;
 544                                         retval++;
 545                                         wait->_qproc = NULL;
 546                                 }
 547                                 if ((mask & POLLOUT_SET) && (out & bit)) {
 548                                         res_out |= bit;
 549                                         retval++;
 550                                         wait->_qproc = NULL;
 551                                 }
 552                                 if ((mask & POLLEX_SET) && (ex & bit)) {
 553                                         res_ex |= bit;
 554                                         retval++;
 555                                         wait->_qproc = NULL;
 556                                 }
 557                                 /* got something, stop busy polling */
 558                                 if (retval) {
 559                                         can_busy_loop = false;
 560                                         busy_flag = 0;
 561
 562                                 /*
 563                                  * only remember a returned
 564                                  * POLL_BUSY_LOOP if we asked for it
 565                                  */
 566                                 } else if (busy_flag & mask)
 567                                         can_busy_loop = true;
 568
 569                         }
 570                         if (res_in)
 571                                 *rinp = res_in;
 572                         if (res_out)
 573                                 *routp = res_out;
 574                         if (res_ex)
 575                                 *rexp = res_ex;
 576                         cond_resched();
 577                 }
 578                 wait->_qproc = NULL;
 579                 if (retval || timed_out || signal_pending(current))
 580                         break;
 581                 if (table.error) {
 582                         retval = table.error;
 583                         break;
 584                 }
 585
 586                 /* only if found POLL_BUSY_LOOP sockets && not out of time */
 587                 if (can_busy_loop && !need_resched()) {
 588                         if (!busy_start) {
 589                                 busy_start = busy_loop_current_time();
 590                                 continue;
 591                         }
 592                         if (!busy_loop_timeout(busy_start))
 593                                 continue;
 594                 }
 595                 busy_flag = 0;
 596
 597                 /*
 598                  * If this is the first loop and we have a timeout
 599                  * given, then we convert to ktime_t and set the to
 600                  * pointer to the expiry value.
 601                  */
 602                 if (end_time && !to) {
 603                         expire = timespec64_to_ktime(*end_time);
 604                         to = &expire;
 605                 }
 606
 607                 if (!poll_schedule_timeout(&table, TASK_INTERRUPTIBLE,
 608                                            to, slack))
 609                         timed_out = 1;
 610         }
 611
 612         poll_freewait(&table);
 613
 614         return retval;
 615 }
 616
 617 /*
 618  * We can actually return ERESTARTSYS instead of EINTR, but I'd
 619  * like to be certain this leads to no problems. So I return
 620  * EINTR just for safety.
 621  *
 622  * Update: ERESTARTSYS breaks at least the xview clock binary, so
 623  * I'm trying ERESTARTNOHAND which restart only when you want to.
 624  */
 625 int core_sys_select(int n, fd_set __user *inp, fd_set __user *outp,
 626                            fd_set __user *exp, struct timespec64 *end_time)
 627 {
 628         fd_set_bits fds;
 629         void *bits;
 630         int ret, max_fds;
 631         size_t size, alloc_size;
 632         struct fdtable *fdt;
 633         /* Allocate small arguments on the stack to save memory and be faster */
 634         long stack_fds[SELECT_STACK_ALLOC/sizeof(long)];
 635
 636         ret = -EINVAL;
 637         if (n < 0)
 638                 goto out_nofds;
 639
 640         /* max_fds can increase, so grab it once to avoid race */
 641         rcu_read_lock();
 642         fdt = files_fdtable(current->files);
 643         max_fds = fdt->max_fds;
 644         rcu_read_unlock();
 645         if (n > max_fds)
 646                 n = max_fds;
 647
 648         /*
 649          * We need 6 bitmaps (in/out/ex for both incoming and outgoing),
 650          * since we used fdset we need to allocate memory in units of
 651          * long-words.
 652          */
 653         size = FDS_BYTES(n);
 654         bits = stack_fds;
 655         if (size > sizeof(stack_fds) / 6) {
 656                 /* Not enough space in on-stack array; must use kmalloc */
 657                 ret = -ENOMEM;
 658                 if (size > (SIZE_MAX / 6))
 659                         goto out_nofds;
 660
 661                 alloc_size = 6 * size;
 662                 bits = kvmalloc(alloc_size, GFP_KERNEL);
 663                 if (!bits)
 664                         goto out_nofds;
 665         }
 666         fds.in      = bits;
 667         fds.out     = bits +   size;
 668         fds.ex      = bits + 2*size;
 669         fds.res_in  = bits + 3*size;
 670         fds.res_out = bits + 4*size;
 671         fds.res_ex  = bits + 5*size;
 672
 673         if ((ret = get_fd_set(n, inp, fds.in)) ||
 674             (ret = get_fd_set(n, outp, fds.out)) ||
 675             (ret = get_fd_set(n, exp, fds.ex)))
 676                 goto out;
 677         zero_fd_set(n, fds.res_in);
 678         zero_fd_set(n, fds.res_out);
 679         zero_fd_set(n, fds.res_ex);
 680
 681         ret = do_select(n, &fds, end_time);
 682
 683         if (ret < 0)
 684                 goto out;
 685         if (!ret) {
 686                 ret = -ERESTARTNOHAND;
 687                 if (signal_pending(current))
 688                         goto out;
 689                 ret = 0;
 690         }
 691
 692         if (set_fd_set(n, inp, fds.res_in) ||
 693             set_fd_set(n, outp, fds.res_out) ||
 694             set_fd_set(n, exp, fds.res_ex))
 695                 ret = -EFAULT;
 696
 697 out:
 698         if (bits != stack_fds)
 699                 kvfree(bits);
 700 out_nofds:
 701         return ret;
 702 }
 703
 704 static int kern_select(int n, fd_set __user *inp, fd_set __user *outp,
 705                        fd_set __user *exp, struct __kernel_old_timeval __user *tvp)
 706 {
 707         struct timespec64 end_time, *to = NULL;
 708         struct __kernel_old_timeval tv;
 709         int ret;
 710
 711         if (tvp) {
 712                 if (copy_from_user(&tv, tvp, sizeof(tv)))
 713                         return -EFAULT;
 714
 715                 to = &end_time;
 716                 if (poll_select_set_timeout(to,
 717                                 tv.tv_sec + (tv.tv_usec / USEC_PER_SEC),
 718                                 (tv.tv_usec % USEC_PER_SEC) * NSEC_PER_USEC))
 719                         return -EINVAL;
 720         }
 721
 722         ret = core_sys_select(n, inp, outp, exp, to);
 723         return poll_select_finish(&end_time, tvp, PT_TIMEVAL, ret);
 724 }
 725
 726 SYSCALL_DEFINE5(select, int, n, fd_set __user *, inp, fd_set __user *, outp,
 727                 fd_set __user *, exp, struct __kernel_old_timeval __user *, tvp)
 728 {
 729         return kern_select(n, inp, outp, exp, tvp);
 730 }
 731
 732 static long do_pselect(int n, fd_set __user *inp, fd_set __user *outp,
 733                        fd_set __user *exp, void __user *tsp,
 734                        const sigset_t __user *sigmask, size_t sigsetsize,
 735                        enum poll_time_type type)
 736 {
 737         struct timespec64 ts, end_time, *to = NULL;
 738         int ret;
 739
 740         if (tsp) {
 741                 switch (type) {
 742                 case PT_TIMESPEC:
 743                         if (get_timespec64(&ts, tsp))
 744                                 return -EFAULT;
 745                         break;
 746                 case PT_OLD_TIMESPEC:
 747                         if (get_old_timespec32(&ts, tsp))
 748                                 return -EFAULT;
 749                         break;
 750                 default:
 751                         BUG();
 752                 }
 753
 754                 to = &end_time;
 755                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
 756                         return -EINVAL;
 757         }
 758
 759         ret = set_user_sigmask(sigmask, sigsetsize);
 760         if (ret)
 761                 return ret;
 762
 763         ret = core_sys_select(n, inp, outp, exp, to);
 764         return poll_select_finish(&end_time, tsp, type, ret);
 765 }
 766
 767 /*
 768  * Most architectures can't handle 7-argument syscalls. So we provide a
 769  * 6-argument version where the sixth argument is a pointer to a structure
 770  * which has a pointer to the sigset_t itself followed by a size_t containing
 771  * the sigset size.
 772  */
 773 struct sigset_argpack {
 774         sigset_t __user *p;
 775         size_t size;
 776 };
 777
 778 static inline int get_sigset_argpack(struct sigset_argpack *to,
 779                                      struct sigset_argpack __user *from)
 780 {
 781         // the path is hot enough for overhead of copy_from_user() to matter
 782         if (from) {
 783                 if (!user_read_access_begin(from, sizeof(*from)))
 784                         return -EFAULT;
 785                 unsafe_get_user(to->p, &from->p, Efault);
 786                 unsafe_get_user(to->size, &from->size, Efault);
 787                 user_read_access_end();
 788         }
 789         return 0;
 790 Efault:
 791         user_access_end();
 792         return -EFAULT;
 793 }
 794
 795 SYSCALL_DEFINE6(pselect6, int, n, fd_set __user *, inp, fd_set __user *, outp,
 796                 fd_set __user *, exp, struct __kernel_timespec __user *, tsp,
 797                 void __user *, sig)
 798 {
 799         struct sigset_argpack x = {NULL, 0};
 800
 801         if (get_sigset_argpack(&x, sig))
 802                 return -EFAULT;
 803
 804         return do_pselect(n, inp, outp, exp, tsp, x.p, x.size, PT_TIMESPEC);
 805 }
 806
 807 #if defined(CONFIG_COMPAT_32BIT_TIME) && !defined(CONFIG_64BIT)
 808
 809 SYSCALL_DEFINE6(pselect6_time32, int, n, fd_set __user *, inp, fd_set __user *, outp,
 810                 fd_set __user *, exp, struct old_timespec32 __user *, tsp,
 811                 void __user *, sig)
 812 {
 813         struct sigset_argpack x = {NULL, 0};
 814
 815         if (get_sigset_argpack(&x, sig))
 816                 return -EFAULT;
 817
 818         return do_pselect(n, inp, outp, exp, tsp, x.p, x.size, PT_OLD_TIMESPEC);
 819 }
 820
 821 #endif
 822
 823 #ifdef __ARCH_WANT_SYS_OLD_SELECT
 824 struct sel_arg_struct {
 825         unsigned long n;
 826         fd_set __user *inp, *outp, *exp;
 827         struct __kernel_old_timeval __user *tvp;
 828 };
 829
 830 SYSCALL_DEFINE1(old_select, struct sel_arg_struct __user *, arg)
 831 {
 832         struct sel_arg_struct a;
 833
 834         if (copy_from_user(&a, arg, sizeof(a)))
 835                 return -EFAULT;
 836         return kern_select(a.n, a.inp, a.outp, a.exp, a.tvp);
 837 }
 838 #endif
 839
 840 struct poll_list {
 841         struct poll_list *next;
 842         int len;
 843         struct pollfd entries[];
 844 };
 845
 846 #define POLLFD_PER_PAGE  ((PAGE_SIZE-sizeof(struct poll_list)) / sizeof(struct pollfd))
 847
 848 /*
 849  * Fish for pollable events on the pollfd->fd file descriptor. We're only
 850  * interested in events matching the pollfd->events mask, and the result
 851  * matching that mask is both recorded in pollfd->revents and returned. The
 852  * pwait poll_table will be used by the fd-provided poll handler for waiting,
 853  * if pwait->_qproc is non-NULL.
 854  */
 855 static inline __poll_t do_pollfd(struct pollfd *pollfd, poll_table *pwait,
 856                                      bool *can_busy_poll,
 857                                      __poll_t busy_flag)
 858 {
 859         int fd = pollfd->fd;
 860         __poll_t mask = 0, filter;
 861         struct fd f;
 862
 863         if (fd < 0)
 864                 goto out;
 865         mask = EPOLLNVAL;
 866         f = fdget(fd);
 867         if (!f.file)
 868                 goto out;
 869
 870         /* userland u16 ->events contains POLL... bitmap */
 871         filter = demangle_poll(pollfd->events) | EPOLLERR | EPOLLHUP;
 872         pwait->_key = filter | busy_flag;
 873         mask = vfs_poll(f.file, pwait);
 874         if (mask & busy_flag)
 875                 *can_busy_poll = true;
 876         mask &= filter;         /* Mask out unneeded events. */
 877         fdput(f);
 878
 879 out:
 880         /* ... and so does ->revents */
 881         pollfd->revents = mangle_poll(mask);
 882         return mask;
 883 }
 884
 885 static int do_poll(struct poll_list *list, struct poll_wqueues *wait,
 886                    struct timespec64 *end_time)
 887 {
 888         poll_table* pt = &wait->pt;
 889         ktime_t expire, *to = NULL;
 890         int timed_out = 0, count = 0;
 891         u64 slack = 0;
 892         __poll_t busy_flag = net_busy_loop_on() ? POLL_BUSY_LOOP : 0;
 893         unsigned long busy_start = 0;
 894
 895         /* Optimise the no-wait case */
 896         if (end_time && !end_time->tv_sec && !end_time->tv_nsec) {
 897                 pt->_qproc = NULL;
 898                 timed_out = 1;
 899         }
 900
 901         if (end_time && !timed_out)
 902                 slack = select_estimate_accuracy(end_time);
 903
 904         for (;;) {
 905                 struct poll_list *walk;
 906                 bool can_busy_loop = false;
 907
 908                 for (walk = list; walk != NULL; walk = walk->next) {
 909                         struct pollfd * pfd, * pfd_end;
 910
 911                         pfd = walk->entries;
 912                         pfd_end = pfd + walk->len;
 913                         for (; pfd != pfd_end; pfd++) {
 914                                 /*
 915                                  * Fish for events. If we found one, record it
 916                                  * and kill poll_table->_qproc, so we don't
 917                                  * needlessly register any other waiters after
 918                                  * this. They'll get immediately deregistered
 919                                  * when we break out and return.
 920                                  */
 921                                 if (do_pollfd(pfd, pt, &can_busy_loop,
 922                                               busy_flag)) {
 923                                         count++;
 924                                         pt->_qproc = NULL;
 925                                         /* found something, stop busy polling */
 926                                         busy_flag = 0;
 927                                         can_busy_loop = false;
 928                                 }
 929                         }
 930                 }
 931                 /*
 932                  * All waiters have already been registered, so don't provide
 933                  * a poll_table->_qproc to them on the next loop iteration.
 934                  */
 935                 pt->_qproc = NULL;
 936                 if (!count) {
 937                         count = wait->error;
 938                         if (signal_pending(current))
 939                                 count = -ERESTARTNOHAND;
 940                 }
 941                 if (count || timed_out)
 942                         break;
 943
 944                 /* only if found POLL_BUSY_LOOP sockets && not out of time */
 945                 if (can_busy_loop && !need_resched()) {
 946                         if (!busy_start) {
 947                                 busy_start = busy_loop_current_time();
 948                                 continue;
 949                         }
 950                         if (!busy_loop_timeout(busy_start))
 951                                 continue;
 952                 }
 953                 busy_flag = 0;
 954
 955                 /*
 956                  * If this is the first loop and we have a timeout
 957                  * given, then we convert to ktime_t and set the to
 958                  * pointer to the expiry value.
 959                  */
 960                 if (end_time && !to) {
 961                         expire = timespec64_to_ktime(*end_time);
 962                         to = &expire;
 963                 }
 964
 965                 if (!poll_schedule_timeout(wait, TASK_INTERRUPTIBLE, to, slack))
 966                         timed_out = 1;
 967         }
 968         return count;
 969 }
 970
 971 #define N_STACK_PPS ((sizeof(stack_pps) - sizeof(struct poll_list))  / \
 972                         sizeof(struct pollfd))
 973
 974 static int do_sys_poll(struct pollfd __user *ufds, unsigned int nfds,
 975                 struct timespec64 *end_time)
 976 {
 977         struct poll_wqueues table;
 978         int err = -EFAULT, fdcount, len;
 979         /* Allocate small arguments on the stack to save memory and be
 980            faster - use long to make sure the buffer is aligned properly
 981            on 64 bit archs to avoid unaligned access */
 982         long stack_pps[POLL_STACK_ALLOC/sizeof(long)];
 983         struct poll_list *const head = (struct poll_list *)stack_pps;
 984         struct poll_list *walk = head;
 985         unsigned long todo = nfds;
 986
 987         if (nfds > rlimit(RLIMIT_NOFILE))
 988                 return -EINVAL;
 989
 990         len = min_t(unsigned int, nfds, N_STACK_PPS);
 991         for (;;) {
 992                 walk->next = NULL;
 993                 walk->len = len;
 994                 if (!len)
 995                         break;
 996
 997                 if (copy_from_user(walk->entries, ufds + nfds-todo,
 998                                         sizeof(struct pollfd) * walk->len))
 999                         goto out_fds;
1000
1001                 todo -= walk->len;
1002                 if (!todo)
1003                         break;
1004
1005                 len = min(todo, POLLFD_PER_PAGE);
1006                 walk = walk->next = kmalloc(struct_size(walk, entries, len),
1007                                             GFP_KERNEL);
1008                 if (!walk) {
1009                         err = -ENOMEM;
1010                         goto out_fds;
1011                 }
1012         }
1013
1014         poll_initwait(&table);
1015         fdcount = do_poll(head, &table, end_time);
1016         poll_freewait(&table);
1017
1018         if (!user_write_access_begin(ufds, nfds * sizeof(*ufds)))
1019                 goto out_fds;
1020
1021         for (walk = head; walk; walk = walk->next) {
1022                 struct pollfd *fds = walk->entries;
1023                 int j;
1024
1025                 for (j = walk->len; j; fds++, ufds++, j--)
1026                         unsafe_put_user(fds->revents, &ufds->revents, Efault);
1027         }
1028         user_write_access_end();
1029
1030         err = fdcount;
1031 out_fds:
1032         walk = head->next;
1033         while (walk) {
1034                 struct poll_list *pos = walk;
1035                 walk = walk->next;
1036                 kfree(pos);
1037         }
1038
1039         return err;
1040
1041 Efault:
1042         user_write_access_end();
1043         err = -EFAULT;
1044         goto out_fds;
1045 }
1046
1047 static long do_restart_poll(struct restart_block *restart_block)
1048 {
1049         struct pollfd __user *ufds = restart_block->poll.ufds;
1050         int nfds = restart_block->poll.nfds;
1051         struct timespec64 *to = NULL, end_time;
1052         int ret;
1053
1054         if (restart_block->poll.has_timeout) {
1055                 end_time.tv_sec = restart_block->poll.tv_sec;
1056                 end_time.tv_nsec = restart_block->poll.tv_nsec;
1057                 to = &end_time;
1058         }
1059
1060         ret = do_sys_poll(ufds, nfds, to);
1061
1062         if (ret == -ERESTARTNOHAND)
1063                 ret = set_restart_fn(restart_block, do_restart_poll);
1064
1065         return ret;
1066 }
1067
1068 SYSCALL_DEFINE3(poll, struct pollfd __user *, ufds, unsigned int, nfds,
1069                 int, timeout_msecs)
1070 {
1071         struct timespec64 end_time, *to = NULL;
1072         int ret;
1073
1074         if (timeout_msecs >= 0) {
1075                 to = &end_time;
1076                 poll_select_set_timeout(to, timeout_msecs / MSEC_PER_SEC,
1077                         NSEC_PER_MSEC * (timeout_msecs % MSEC_PER_SEC));
1078         }
1079
1080         ret = do_sys_poll(ufds, nfds, to);
1081
1082         if (ret == -ERESTARTNOHAND) {
1083                 struct restart_block *restart_block;
1084
1085                 restart_block = &current->restart_block;
1086                 restart_block->poll.ufds = ufds;
1087                 restart_block->poll.nfds = nfds;
1088
1089                 if (timeout_msecs >= 0) {
1090                         restart_block->poll.tv_sec = end_time.tv_sec;
1091                         restart_block->poll.tv_nsec = end_time.tv_nsec;
1092                         restart_block->poll.has_timeout = 1;
1093                 } else
1094                         restart_block->poll.has_timeout = 0;
1095
1096                 ret = set_restart_fn(restart_block, do_restart_poll);
1097         }
1098         return ret;
1099 }
1100
1101 SYSCALL_DEFINE5(ppoll, struct pollfd __user *, ufds, unsigned int, nfds,
1102                 struct __kernel_timespec __user *, tsp, const sigset_t __user *, sigmask,
1103                 size_t, sigsetsize)
1104 {
1105         struct timespec64 ts, end_time, *to = NULL;
1106         int ret;
1107
1108         if (tsp) {
1109                 if (get_timespec64(&ts, tsp))
1110                         return -EFAULT;
1111
1112                 to = &end_time;
1113                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1114                         return -EINVAL;
1115         }
1116
1117         ret = set_user_sigmask(sigmask, sigsetsize);
1118         if (ret)
1119                 return ret;
1120
1121         ret = do_sys_poll(ufds, nfds, to);
1122         return poll_select_finish(&end_time, tsp, PT_TIMESPEC, ret);
1123 }
1124
1125 #if defined(CONFIG_COMPAT_32BIT_TIME) && !defined(CONFIG_64BIT)
1126
1127 SYSCALL_DEFINE5(ppoll_time32, struct pollfd __user *, ufds, unsigned int, nfds,
1128                 struct old_timespec32 __user *, tsp, const sigset_t __user *, sigmask,
1129                 size_t, sigsetsize)
1130 {
1131         struct timespec64 ts, end_time, *to = NULL;
1132         int ret;
1133
1134         if (tsp) {
1135                 if (get_old_timespec32(&ts, tsp))
1136                         return -EFAULT;
1137
1138                 to = &end_time;
1139                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1140                         return -EINVAL;
1141         }
1142
1143         ret = set_user_sigmask(sigmask, sigsetsize);
1144         if (ret)
1145                 return ret;
1146
1147         ret = do_sys_poll(ufds, nfds, to);
1148         return poll_select_finish(&end_time, tsp, PT_OLD_TIMESPEC, ret);
1149 }
1150 #endif
1151
1152 #ifdef CONFIG_COMPAT
1153 #define __COMPAT_NFDBITS       (8 * sizeof(compat_ulong_t))
1154
1155 /*
1156  * Ooo, nasty.  We need here to frob 32-bit unsigned longs to
1157  * 64-bit unsigned longs.
1158  */
1159 static
1160 int compat_get_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1161                         unsigned long *fdset)
1162 {
1163         if (ufdset) {
1164                 return compat_get_bitmap(fdset, ufdset, nr);
1165         } else {
1166                 zero_fd_set(nr, fdset);
1167                 return 0;
1168         }
1169 }
1170
1171 static
1172 int compat_set_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1173                       unsigned long *fdset)
1174 {
1175         if (!ufdset)
1176                 return 0;
1177         return compat_put_bitmap(ufdset, fdset, nr);
1178 }
1179
1180
1181 /*
1182  * This is a virtual copy of sys_select from fs/select.c and probably
1183  * should be compared to it from time to time
1184  */
1185
1186 /*
1187  * We can actually return ERESTARTSYS instead of EINTR, but I'd
1188  * like to be certain this leads to no problems. So I return
1189  * EINTR just for safety.
1190  *
1191  * Update: ERESTARTSYS breaks at least the xview clock binary, so
1192  * I'm trying ERESTARTNOHAND which restart only when you want to.
1193  */
1194 static int compat_core_sys_select(int n, compat_ulong_t __user *inp,
1195         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1196         struct timespec64 *end_time)
1197 {
1198         fd_set_bits fds;
1199         void *bits;
1200         int size, max_fds, ret = -EINVAL;
1201         struct fdtable *fdt;
1202         long stack_fds[SELECT_STACK_ALLOC/sizeof(long)];
1203
1204         if (n < 0)
1205                 goto out_nofds;
1206
1207         /* max_fds can increase, so grab it once to avoid race */
1208         rcu_read_lock();
1209         fdt = files_fdtable(current->files);
1210         max_fds = fdt->max_fds;
1211         rcu_read_unlock();
1212         if (n > max_fds)
1213                 n = max_fds;
1214
1215         /*
1216          * We need 6 bitmaps (in/out/ex for both incoming and outgoing),
1217          * since we used fdset we need to allocate memory in units of
1218          * long-words.
1219          */
1220         size = FDS_BYTES(n);
1221         bits = stack_fds;
1222         if (size > sizeof(stack_fds) / 6) {
1223                 bits = kmalloc_array(6, size, GFP_KERNEL);
1224                 ret = -ENOMEM;
1225                 if (!bits)
1226                         goto out_nofds;
1227         }
1228         fds.in      = (unsigned long *)  bits;
1229         fds.out     = (unsigned long *) (bits +   size);
1230         fds.ex      = (unsigned long *) (bits + 2*size);
1231         fds.res_in  = (unsigned long *) (bits + 3*size);
1232         fds.res_out = (unsigned long *) (bits + 4*size);
1233         fds.res_ex  = (unsigned long *) (bits + 5*size);
1234
1235         if ((ret = compat_get_fd_set(n, inp, fds.in)) ||
1236             (ret = compat_get_fd_set(n, outp, fds.out)) ||
1237             (ret = compat_get_fd_set(n, exp, fds.ex)))
1238                 goto out;
1239         zero_fd_set(n, fds.res_in);
1240         zero_fd_set(n, fds.res_out);
1241         zero_fd_set(n, fds.res_ex);
1242
1243         ret = do_select(n, &fds, end_time);
1244
1245         if (ret < 0)
1246                 goto out;
1247         if (!ret) {
1248                 ret = -ERESTARTNOHAND;
1249                 if (signal_pending(current))
1250                         goto out;
1251                 ret = 0;
1252         }
1253
1254         if (compat_set_fd_set(n, inp, fds.res_in) ||
1255             compat_set_fd_set(n, outp, fds.res_out) ||
1256             compat_set_fd_set(n, exp, fds.res_ex))
1257                 ret = -EFAULT;
1258 out:
1259         if (bits != stack_fds)
1260                 kfree(bits);
1261 out_nofds:
1262         return ret;
1263 }
1264
1265 static int do_compat_select(int n, compat_ulong_t __user *inp,
1266         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1267         struct old_timeval32 __user *tvp)
1268 {
1269         struct timespec64 end_time, *to = NULL;
1270         struct old_timeval32 tv;
1271         int ret;
1272
1273         if (tvp) {
1274                 if (copy_from_user(&tv, tvp, sizeof(tv)))
1275                         return -EFAULT;
1276
1277                 to = &end_time;
1278                 if (poll_select_set_timeout(to,
1279                                 tv.tv_sec + (tv.tv_usec / USEC_PER_SEC),
1280                                 (tv.tv_usec % USEC_PER_SEC) * NSEC_PER_USEC))
1281                         return -EINVAL;
1282         }
1283
1284         ret = compat_core_sys_select(n, inp, outp, exp, to);
1285         return poll_select_finish(&end_time, tvp, PT_OLD_TIMEVAL, ret);
1286 }
1287
1288 COMPAT_SYSCALL_DEFINE5(select, int, n, compat_ulong_t __user *, inp,
1289         compat_ulong_t __user *, outp, compat_ulong_t __user *, exp,
1290         struct old_timeval32 __user *, tvp)
1291 {
1292         return do_compat_select(n, inp, outp, exp, tvp);
1293 }
1294
1295 struct compat_sel_arg_struct {
1296         compat_ulong_t n;
1297         compat_uptr_t inp;
1298         compat_uptr_t outp;
1299         compat_uptr_t exp;
1300         compat_uptr_t tvp;
1301 };
1302
1303 COMPAT_SYSCALL_DEFINE1(old_select, struct compat_sel_arg_struct __user *, arg)
1304 {
1305         struct compat_sel_arg_struct a;
1306
1307         if (copy_from_user(&a, arg, sizeof(a)))
1308                 return -EFAULT;
1309         return do_compat_select(a.n, compat_ptr(a.inp), compat_ptr(a.outp),
1310                                 compat_ptr(a.exp), compat_ptr(a.tvp));
1311 }
1312
1313 static long do_compat_pselect(int n, compat_ulong_t __user *inp,
1314         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1315         void __user *tsp, compat_sigset_t __user *sigmask,
1316         compat_size_t sigsetsize, enum poll_time_type type)
1317 {
1318         struct timespec64 ts, end_time, *to = NULL;
1319         int ret;
1320
1321         if (tsp) {
1322                 switch (type) {
1323                 case PT_OLD_TIMESPEC:
1324                         if (get_old_timespec32(&ts, tsp))
1325                                 return -EFAULT;
1326                         break;
1327                 case PT_TIMESPEC:
1328                         if (get_timespec64(&ts, tsp))
1329                                 return -EFAULT;
1330                         break;
1331                 default:
1332                         BUG();
1333                 }
1334
1335                 to = &end_time;
1336                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1337                         return -EINVAL;
1338         }
1339
1340         ret = set_compat_user_sigmask(sigmask, sigsetsize);
1341         if (ret)
1342                 return ret;
1343
1344         ret = compat_core_sys_select(n, inp, outp, exp, to);
1345         return poll_select_finish(&end_time, tsp, type, ret);
1346 }
1347
1348 struct compat_sigset_argpack {
1349         compat_uptr_t p;
1350         compat_size_t size;
1351 };
1352 static inline int get_compat_sigset_argpack(struct compat_sigset_argpack *to,
1353                                             struct compat_sigset_argpack __user *from)
1354 {
1355         if (from) {
1356                 if (!user_read_access_begin(from, sizeof(*from)))
1357                         return -EFAULT;
1358                 unsafe_get_user(to->p, &from->p, Efault);
1359                 unsafe_get_user(to->size, &from->size, Efault);
1360                 user_read_access_end();
1361         }
1362         return 0;
1363 Efault:
1364         user_access_end();
1365         return -EFAULT;
1366 }
1367
1368 COMPAT_SYSCALL_DEFINE6(pselect6_time64, int, n, compat_ulong_t __user *, inp,
1369         compat_ulong_t __user *, outp, compat_ulong_t __user *, exp,
1370         struct __kernel_timespec __user *, tsp, void __user *, sig)
1371 {
1372         struct compat_sigset_argpack x = {0, 0};
1373
1374         if (get_compat_sigset_argpack(&x, sig))
1375                 return -EFAULT;
1376
1377         return do_compat_pselect(n, inp, outp, exp, tsp, compat_ptr(x.p),
1378                                  x.size, PT_TIMESPEC);
1379 }
1380
1381 #if defined(CONFIG_COMPAT_32BIT_TIME)
1382
1383 COMPAT_SYSCALL_DEFINE6(pselect6_time32, int, n, compat_ulong_t __user *, inp,
1384         compat_ulong_t __user *, outp, compat_ulong_t __user *, exp,
1385         struct old_timespec32 __user *, tsp, void __user *, sig)
1386 {
1387         struct compat_sigset_argpack x = {0, 0};
1388
1389         if (get_compat_sigset_argpack(&x, sig))
1390                 return -EFAULT;
1391
1392         return do_compat_pselect(n, inp, outp, exp, tsp, compat_ptr(x.p),
1393                                  x.size, PT_OLD_TIMESPEC);
1394 }
1395
1396 #endif
1397
1398 #if defined(CONFIG_COMPAT_32BIT_TIME)
1399 COMPAT_SYSCALL_DEFINE5(ppoll_time32, struct pollfd __user *, ufds,
1400         unsigned int,  nfds, struct old_timespec32 __user *, tsp,
1401         const compat_sigset_t __user *, sigmask, compat_size_t, sigsetsize)
1402 {
1403         struct timespec64 ts, end_time, *to = NULL;
1404         int ret;
1405
1406         if (tsp) {
1407                 if (get_old_timespec32(&ts, tsp))
1408                         return -EFAULT;
1409
1410                 to = &end_time;
1411                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1412                         return -EINVAL;
1413         }
1414
1415         ret = set_compat_user_sigmask(sigmask, sigsetsize);
1416         if (ret)
1417                 return ret;
1418
1419         ret = do_sys_poll(ufds, nfds, to);
1420         return poll_select_finish(&end_time, tsp, PT_OLD_TIMESPEC, ret);
1421 }
1422 #endif
1423
1424 /* New compat syscall for 64 bit time_t*/
1425 COMPAT_SYSCALL_DEFINE5(ppoll_time64, struct pollfd __user *, ufds,
1426         unsigned int,  nfds, struct __kernel_timespec __user *, tsp,
1427         const compat_sigset_t __user *, sigmask, compat_size_t, sigsetsize)
1428 {
1429         struct timespec64 ts, end_time, *to = NULL;
1430         int ret;
1431
1432         if (tsp) {
1433                 if (get_timespec64(&ts, tsp))
1434                         return -EFAULT;
1435
1436                 to = &end_time;
1437                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1438                         return -EINVAL;
1439         }
1440
1441         ret = set_compat_user_sigmask(sigmask, sigsetsize);
1442         if (ret)
1443                 return ret;
1444
1445         ret = do_sys_poll(ufds, nfds, to);
1446         return poll_select_finish(&end_time, tsp, PT_TIMESPEC, ret);
1447 }
1448
1449 #endif