ARM: prevent VM_GROWSDOWN mmaps extending below FIRST_USER_ADDRESS
[linux-flexiantxendom0-3.2.10.git] / kernel / compat.c
1 /*
2  *  linux/kernel/compat.c
3  *
4  *  Kernel compatibililty routines for e.g. 32 bit syscall support
5  *  on 64 bit kernels.
6  *
7  *  Copyright (C) 2002-2003 Stephen Rothwell, IBM Corporation
8  *
9  *  This program is free software; you can redistribute it and/or modify
10  *  it under the terms of the GNU General Public License version 2 as
11  *  published by the Free Software Foundation.
12  */
13
14 #include <linux/linkage.h>
15 #include <linux/compat.h>
16 #include <linux/errno.h>
17 #include <linux/time.h>
18 #include <linux/signal.h>
19 #include <linux/sched.h>        /* for MAX_SCHEDULE_TIMEOUT */
20 #include <linux/syscalls.h>
21 #include <linux/unistd.h>
22 #include <linux/security.h>
23 #include <linux/timex.h>
24 #include <linux/export.h>
25 #include <linux/migrate.h>
26 #include <linux/posix-timers.h>
27 #include <linux/times.h>
28 #include <linux/ptrace.h>
29 #include <linux/gfp.h>
30
31 #include <asm/uaccess.h>
32
33 /*
34  * Get/set struct timeval with struct timespec on the native side
35  */
36 static int compat_get_timeval_convert(struct timespec *o,
37                                       struct compat_timeval __user *i)
38 {
39         long usec;
40
41         if (get_user(o->tv_sec, &i->tv_sec) ||
42             get_user(usec, &i->tv_usec))
43                 return -EFAULT;
44         o->tv_nsec = usec * 1000;
45         return 0;
46 }
47
48 static int compat_put_timeval_convert(struct compat_timeval __user *o,
49                                       struct timeval *i)
50 {
51         return (put_user(i->tv_sec, &o->tv_sec) ||
52                 put_user(i->tv_usec, &o->tv_usec)) ? -EFAULT : 0;
53 }
54
55 static int compat_get_timex(struct timex *txc, struct compat_timex __user *utp)
56 {
57         memset(txc, 0, sizeof(struct timex));
58
59         if (!access_ok(VERIFY_READ, utp, sizeof(struct compat_timex)) ||
60                         __get_user(txc->modes, &utp->modes) ||
61                         __get_user(txc->offset, &utp->offset) ||
62                         __get_user(txc->freq, &utp->freq) ||
63                         __get_user(txc->maxerror, &utp->maxerror) ||
64                         __get_user(txc->esterror, &utp->esterror) ||
65                         __get_user(txc->status, &utp->status) ||
66                         __get_user(txc->constant, &utp->constant) ||
67                         __get_user(txc->precision, &utp->precision) ||
68                         __get_user(txc->tolerance, &utp->tolerance) ||
69                         __get_user(txc->time.tv_sec, &utp->time.tv_sec) ||
70                         __get_user(txc->time.tv_usec, &utp->time.tv_usec) ||
71                         __get_user(txc->tick, &utp->tick) ||
72                         __get_user(txc->ppsfreq, &utp->ppsfreq) ||
73                         __get_user(txc->jitter, &utp->jitter) ||
74                         __get_user(txc->shift, &utp->shift) ||
75                         __get_user(txc->stabil, &utp->stabil) ||
76                         __get_user(txc->jitcnt, &utp->jitcnt) ||
77                         __get_user(txc->calcnt, &utp->calcnt) ||
78                         __get_user(txc->errcnt, &utp->errcnt) ||
79                         __get_user(txc->stbcnt, &utp->stbcnt))
80                 return -EFAULT;
81
82         return 0;
83 }
84
85 static int compat_put_timex(struct compat_timex __user *utp, struct timex *txc)
86 {
87         if (!access_ok(VERIFY_WRITE, utp, sizeof(struct compat_timex)) ||
88                         __put_user(txc->modes, &utp->modes) ||
89                         __put_user(txc->offset, &utp->offset) ||
90                         __put_user(txc->freq, &utp->freq) ||
91                         __put_user(txc->maxerror, &utp->maxerror) ||
92                         __put_user(txc->esterror, &utp->esterror) ||
93                         __put_user(txc->status, &utp->status) ||
94                         __put_user(txc->constant, &utp->constant) ||
95                         __put_user(txc->precision, &utp->precision) ||
96                         __put_user(txc->tolerance, &utp->tolerance) ||
97                         __put_user(txc->time.tv_sec, &utp->time.tv_sec) ||
98                         __put_user(txc->time.tv_usec, &utp->time.tv_usec) ||
99                         __put_user(txc->tick, &utp->tick) ||
100                         __put_user(txc->ppsfreq, &utp->ppsfreq) ||
101                         __put_user(txc->jitter, &utp->jitter) ||
102                         __put_user(txc->shift, &utp->shift) ||
103                         __put_user(txc->stabil, &utp->stabil) ||
104                         __put_user(txc->jitcnt, &utp->jitcnt) ||
105                         __put_user(txc->calcnt, &utp->calcnt) ||
106                         __put_user(txc->errcnt, &utp->errcnt) ||
107                         __put_user(txc->stbcnt, &utp->stbcnt) ||
108                         __put_user(txc->tai, &utp->tai))
109                 return -EFAULT;
110         return 0;
111 }
112
113 asmlinkage long compat_sys_gettimeofday(struct compat_timeval __user *tv,
114                 struct timezone __user *tz)
115 {
116         if (tv) {
117                 struct timeval ktv;
118                 do_gettimeofday(&ktv);
119                 if (compat_put_timeval_convert(tv, &ktv))
120                         return -EFAULT;
121         }
122         if (tz) {
123                 if (copy_to_user(tz, &sys_tz, sizeof(sys_tz)))
124                         return -EFAULT;
125         }
126
127         return 0;
128 }
129
130 asmlinkage long compat_sys_settimeofday(struct compat_timeval __user *tv,
131                 struct timezone __user *tz)
132 {
133         struct timespec kts;
134         struct timezone ktz;
135
136         if (tv) {
137                 if (compat_get_timeval_convert(&kts, tv))
138                         return -EFAULT;
139         }
140         if (tz) {
141                 if (copy_from_user(&ktz, tz, sizeof(ktz)))
142                         return -EFAULT;
143         }
144
145         return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL);
146 }
147
148 int get_compat_timeval(struct timeval *tv, const struct compat_timeval __user *ctv)
149 {
150         return (!access_ok(VERIFY_READ, ctv, sizeof(*ctv)) ||
151                         __get_user(tv->tv_sec, &ctv->tv_sec) ||
152                         __get_user(tv->tv_usec, &ctv->tv_usec)) ? -EFAULT : 0;
153 }
154 EXPORT_SYMBOL_GPL(get_compat_timeval);
155
156 int put_compat_timeval(const struct timeval *tv, struct compat_timeval __user *ctv)
157 {
158         return (!access_ok(VERIFY_WRITE, ctv, sizeof(*ctv)) ||
159                         __put_user(tv->tv_sec, &ctv->tv_sec) ||
160                         __put_user(tv->tv_usec, &ctv->tv_usec)) ? -EFAULT : 0;
161 }
162 EXPORT_SYMBOL_GPL(put_compat_timeval);
163
164 int get_compat_timespec(struct timespec *ts, const struct compat_timespec __user *cts)
165 {
166         return (!access_ok(VERIFY_READ, cts, sizeof(*cts)) ||
167                         __get_user(ts->tv_sec, &cts->tv_sec) ||
168                         __get_user(ts->tv_nsec, &cts->tv_nsec)) ? -EFAULT : 0;
169 }
170 EXPORT_SYMBOL_GPL(get_compat_timespec);
171
172 int put_compat_timespec(const struct timespec *ts, struct compat_timespec __user *cts)
173 {
174         return (!access_ok(VERIFY_WRITE, cts, sizeof(*cts)) ||
175                         __put_user(ts->tv_sec, &cts->tv_sec) ||
176                         __put_user(ts->tv_nsec, &cts->tv_nsec)) ? -EFAULT : 0;
177 }
178 EXPORT_SYMBOL_GPL(put_compat_timespec);
179
180 int compat_get_timeval(struct timeval *tv, const void __user *utv)
181 {
182         if (COMPAT_USE_64BIT_TIME)
183                 return copy_from_user(tv, utv, sizeof *tv) ? -EFAULT : 0;
184         else
185                 return get_compat_timeval(tv, utv);
186 }
187 EXPORT_SYMBOL_GPL(compat_get_timeval);
188
189 int compat_put_timeval(const struct timeval *tv, void __user *utv)
190 {
191         if (COMPAT_USE_64BIT_TIME)
192                 return copy_to_user(utv, tv, sizeof *tv) ? -EFAULT : 0;
193         else
194                 return put_compat_timeval(tv, utv);
195 }
196 EXPORT_SYMBOL_GPL(compat_put_timeval);
197
198 int compat_get_timespec(struct timespec *ts, const void __user *uts)
199 {
200         if (COMPAT_USE_64BIT_TIME)
201                 return copy_from_user(ts, uts, sizeof *ts) ? -EFAULT : 0;
202         else
203                 return get_compat_timespec(ts, uts);
204 }
205 EXPORT_SYMBOL_GPL(compat_get_timespec);
206
207 int compat_put_timespec(const struct timespec *ts, void __user *uts)
208 {
209         if (COMPAT_USE_64BIT_TIME)
210                 return copy_to_user(uts, ts, sizeof *ts) ? -EFAULT : 0;
211         else
212                 return put_compat_timespec(ts, uts);
213 }
214 EXPORT_SYMBOL_GPL(compat_put_timespec);
215
216 static long compat_nanosleep_restart(struct restart_block *restart)
217 {
218         struct compat_timespec __user *rmtp;
219         struct timespec rmt;
220         mm_segment_t oldfs;
221         long ret;
222
223         restart->nanosleep.rmtp = (struct timespec __user *) &rmt;
224         oldfs = get_fs();
225         set_fs(KERNEL_DS);
226         ret = hrtimer_nanosleep_restart(restart);
227         set_fs(oldfs);
228
229         if (ret) {
230                 rmtp = restart->nanosleep.compat_rmtp;
231
232                 if (rmtp && put_compat_timespec(&rmt, rmtp))
233                         return -EFAULT;
234         }
235
236         return ret;
237 }
238
239 asmlinkage long compat_sys_nanosleep(struct compat_timespec __user *rqtp,
240                                      struct compat_timespec __user *rmtp)
241 {
242         struct timespec tu, rmt;
243         mm_segment_t oldfs;
244         long ret;
245
246         if (get_compat_timespec(&tu, rqtp))
247                 return -EFAULT;
248
249         if (!timespec_valid(&tu))
250                 return -EINVAL;
251
252         oldfs = get_fs();
253         set_fs(KERNEL_DS);
254         ret = hrtimer_nanosleep(&tu,
255                                 rmtp ? (struct timespec __user *)&rmt : NULL,
256                                 HRTIMER_MODE_REL, CLOCK_MONOTONIC);
257         set_fs(oldfs);
258
259         if (ret) {
260                 struct restart_block *restart
261                         = &current_thread_info()->restart_block;
262
263                 restart->fn = compat_nanosleep_restart;
264                 restart->nanosleep.compat_rmtp = rmtp;
265
266                 if (rmtp && put_compat_timespec(&rmt, rmtp))
267                         return -EFAULT;
268         }
269
270         return ret;
271 }
272
273 static inline long get_compat_itimerval(struct itimerval *o,
274                 struct compat_itimerval __user *i)
275 {
276         return (!access_ok(VERIFY_READ, i, sizeof(*i)) ||
277                 (__get_user(o->it_interval.tv_sec, &i->it_interval.tv_sec) |
278                  __get_user(o->it_interval.tv_usec, &i->it_interval.tv_usec) |
279                  __get_user(o->it_value.tv_sec, &i->it_value.tv_sec) |
280                  __get_user(o->it_value.tv_usec, &i->it_value.tv_usec)));
281 }
282
283 static inline long put_compat_itimerval(struct compat_itimerval __user *o,
284                 struct itimerval *i)
285 {
286         return (!access_ok(VERIFY_WRITE, o, sizeof(*o)) ||
287                 (__put_user(i->it_interval.tv_sec, &o->it_interval.tv_sec) |
288                  __put_user(i->it_interval.tv_usec, &o->it_interval.tv_usec) |
289                  __put_user(i->it_value.tv_sec, &o->it_value.tv_sec) |
290                  __put_user(i->it_value.tv_usec, &o->it_value.tv_usec)));
291 }
292
293 asmlinkage long compat_sys_getitimer(int which,
294                 struct compat_itimerval __user *it)
295 {
296         struct itimerval kit;
297         int error;
298
299         error = do_getitimer(which, &kit);
300         if (!error && put_compat_itimerval(it, &kit))
301                 error = -EFAULT;
302         return error;
303 }
304
305 asmlinkage long compat_sys_setitimer(int which,
306                 struct compat_itimerval __user *in,
307                 struct compat_itimerval __user *out)
308 {
309         struct itimerval kin, kout;
310         int error;
311
312         if (in) {
313                 if (get_compat_itimerval(&kin, in))
314                         return -EFAULT;
315         } else
316                 memset(&kin, 0, sizeof(kin));
317
318         error = do_setitimer(which, &kin, out ? &kout : NULL);
319         if (error || !out)
320                 return error;
321         if (put_compat_itimerval(out, &kout))
322                 return -EFAULT;
323         return 0;
324 }
325
326 static compat_clock_t clock_t_to_compat_clock_t(clock_t x)
327 {
328         return compat_jiffies_to_clock_t(clock_t_to_jiffies(x));
329 }
330
331 asmlinkage long compat_sys_times(struct compat_tms __user *tbuf)
332 {
333         if (tbuf) {
334                 struct tms tms;
335                 struct compat_tms tmp;
336
337                 do_sys_times(&tms);
338                 /* Convert our struct tms to the compat version. */
339                 tmp.tms_utime = clock_t_to_compat_clock_t(tms.tms_utime);
340                 tmp.tms_stime = clock_t_to_compat_clock_t(tms.tms_stime);
341                 tmp.tms_cutime = clock_t_to_compat_clock_t(tms.tms_cutime);
342                 tmp.tms_cstime = clock_t_to_compat_clock_t(tms.tms_cstime);
343                 if (copy_to_user(tbuf, &tmp, sizeof(tmp)))
344                         return -EFAULT;
345         }
346         force_successful_syscall_return();
347         return compat_jiffies_to_clock_t(jiffies);
348 }
349
350 #ifdef __ARCH_WANT_SYS_SIGPENDING
351
352 /*
353  * Assumption: old_sigset_t and compat_old_sigset_t are both
354  * types that can be passed to put_user()/get_user().
355  */
356
357 asmlinkage long compat_sys_sigpending(compat_old_sigset_t __user *set)
358 {
359         old_sigset_t s;
360         long ret;
361         mm_segment_t old_fs = get_fs();
362
363         set_fs(KERNEL_DS);
364         ret = sys_sigpending((old_sigset_t __user *) &s);
365         set_fs(old_fs);
366         if (ret == 0)
367                 ret = put_user(s, set);
368         return ret;
369 }
370
371 #endif
372
373 #ifdef __ARCH_WANT_SYS_SIGPROCMASK
374
375 asmlinkage long compat_sys_sigprocmask(int how, compat_old_sigset_t __user *set,
376                 compat_old_sigset_t __user *oset)
377 {
378         old_sigset_t s;
379         long ret;
380         mm_segment_t old_fs;
381
382         if (set && get_user(s, set))
383                 return -EFAULT;
384         old_fs = get_fs();
385         set_fs(KERNEL_DS);
386         ret = sys_sigprocmask(how,
387                               set ? (old_sigset_t __user *) &s : NULL,
388                               oset ? (old_sigset_t __user *) &s : NULL);
389         set_fs(old_fs);
390         if (ret == 0)
391                 if (oset)
392                         ret = put_user(s, oset);
393         return ret;
394 }
395
396 #endif
397
398 asmlinkage long compat_sys_setrlimit(unsigned int resource,
399                 struct compat_rlimit __user *rlim)
400 {
401         struct rlimit r;
402
403         if (!access_ok(VERIFY_READ, rlim, sizeof(*rlim)) ||
404             __get_user(r.rlim_cur, &rlim->rlim_cur) ||
405             __get_user(r.rlim_max, &rlim->rlim_max))
406                 return -EFAULT;
407
408         if (r.rlim_cur == COMPAT_RLIM_INFINITY)
409                 r.rlim_cur = RLIM_INFINITY;
410         if (r.rlim_max == COMPAT_RLIM_INFINITY)
411                 r.rlim_max = RLIM_INFINITY;
412         return do_prlimit(current, resource, &r, NULL);
413 }
414
415 #ifdef COMPAT_RLIM_OLD_INFINITY
416
417 asmlinkage long compat_sys_old_getrlimit(unsigned int resource,
418                 struct compat_rlimit __user *rlim)
419 {
420         struct rlimit r;
421         int ret;
422         mm_segment_t old_fs = get_fs();
423
424         set_fs(KERNEL_DS);
425         ret = sys_old_getrlimit(resource, &r);
426         set_fs(old_fs);
427
428         if (!ret) {
429                 if (r.rlim_cur > COMPAT_RLIM_OLD_INFINITY)
430                         r.rlim_cur = COMPAT_RLIM_INFINITY;
431                 if (r.rlim_max > COMPAT_RLIM_OLD_INFINITY)
432                         r.rlim_max = COMPAT_RLIM_INFINITY;
433
434                 if (!access_ok(VERIFY_WRITE, rlim, sizeof(*rlim)) ||
435                     __put_user(r.rlim_cur, &rlim->rlim_cur) ||
436                     __put_user(r.rlim_max, &rlim->rlim_max))
437                         return -EFAULT;
438         }
439         return ret;
440 }
441
442 #endif
443
444 asmlinkage long compat_sys_getrlimit(unsigned int resource,
445                 struct compat_rlimit __user *rlim)
446 {
447         struct rlimit r;
448         int ret;
449
450         ret = do_prlimit(current, resource, NULL, &r);
451         if (!ret) {
452                 if (r.rlim_cur > COMPAT_RLIM_INFINITY)
453                         r.rlim_cur = COMPAT_RLIM_INFINITY;
454                 if (r.rlim_max > COMPAT_RLIM_INFINITY)
455                         r.rlim_max = COMPAT_RLIM_INFINITY;
456
457                 if (!access_ok(VERIFY_WRITE, rlim, sizeof(*rlim)) ||
458                     __put_user(r.rlim_cur, &rlim->rlim_cur) ||
459                     __put_user(r.rlim_max, &rlim->rlim_max))
460                         return -EFAULT;
461         }
462         return ret;
463 }
464
465 int put_compat_rusage(const struct rusage *r, struct compat_rusage __user *ru)
466 {
467         if (!access_ok(VERIFY_WRITE, ru, sizeof(*ru)) ||
468             __put_user(r->ru_utime.tv_sec, &ru->ru_utime.tv_sec) ||
469             __put_user(r->ru_utime.tv_usec, &ru->ru_utime.tv_usec) ||
470             __put_user(r->ru_stime.tv_sec, &ru->ru_stime.tv_sec) ||
471             __put_user(r->ru_stime.tv_usec, &ru->ru_stime.tv_usec) ||
472             __put_user(r->ru_maxrss, &ru->ru_maxrss) ||
473             __put_user(r->ru_ixrss, &ru->ru_ixrss) ||
474             __put_user(r->ru_idrss, &ru->ru_idrss) ||
475             __put_user(r->ru_isrss, &ru->ru_isrss) ||
476             __put_user(r->ru_minflt, &ru->ru_minflt) ||
477             __put_user(r->ru_majflt, &ru->ru_majflt) ||
478             __put_user(r->ru_nswap, &ru->ru_nswap) ||
479             __put_user(r->ru_inblock, &ru->ru_inblock) ||
480             __put_user(r->ru_oublock, &ru->ru_oublock) ||
481             __put_user(r->ru_msgsnd, &ru->ru_msgsnd) ||
482             __put_user(r->ru_msgrcv, &ru->ru_msgrcv) ||
483             __put_user(r->ru_nsignals, &ru->ru_nsignals) ||
484             __put_user(r->ru_nvcsw, &ru->ru_nvcsw) ||
485             __put_user(r->ru_nivcsw, &ru->ru_nivcsw))
486                 return -EFAULT;
487         return 0;
488 }
489
490 asmlinkage long compat_sys_getrusage(int who, struct compat_rusage __user *ru)
491 {
492         struct rusage r;
493         int ret;
494         mm_segment_t old_fs = get_fs();
495
496         set_fs(KERNEL_DS);
497         ret = sys_getrusage(who, (struct rusage __user *) &r);
498         set_fs(old_fs);
499
500         if (ret)
501                 return ret;
502
503         if (put_compat_rusage(&r, ru))
504                 return -EFAULT;
505
506         return 0;
507 }
508
509 asmlinkage long
510 compat_sys_wait4(compat_pid_t pid, compat_uint_t __user *stat_addr, int options,
511         struct compat_rusage __user *ru)
512 {
513         if (!ru) {
514                 return sys_wait4(pid, stat_addr, options, NULL);
515         } else {
516                 struct rusage r;
517                 int ret;
518                 unsigned int status;
519                 mm_segment_t old_fs = get_fs();
520
521                 set_fs (KERNEL_DS);
522                 ret = sys_wait4(pid,
523                                 (stat_addr ?
524                                  (unsigned int __user *) &status : NULL),
525                                 options, (struct rusage __user *) &r);
526                 set_fs (old_fs);
527
528                 if (ret > 0) {
529                         if (put_compat_rusage(&r, ru))
530                                 return -EFAULT;
531                         if (stat_addr && put_user(status, stat_addr))
532                                 return -EFAULT;
533                 }
534                 return ret;
535         }
536 }
537
538 asmlinkage long compat_sys_waitid(int which, compat_pid_t pid,
539                 struct compat_siginfo __user *uinfo, int options,
540                 struct compat_rusage __user *uru)
541 {
542         siginfo_t info;
543         struct rusage ru;
544         long ret;
545         mm_segment_t old_fs = get_fs();
546
547         memset(&info, 0, sizeof(info));
548
549         set_fs(KERNEL_DS);
550         ret = sys_waitid(which, pid, (siginfo_t __user *)&info, options,
551                          uru ? (struct rusage __user *)&ru : NULL);
552         set_fs(old_fs);
553
554         if ((ret < 0) || (info.si_signo == 0))
555                 return ret;
556
557         if (uru) {
558                 ret = put_compat_rusage(&ru, uru);
559                 if (ret)
560                         return ret;
561         }
562
563         BUG_ON(info.si_code & __SI_MASK);
564         info.si_code |= __SI_CHLD;
565         return copy_siginfo_to_user32(uinfo, &info);
566 }
567
568 static int compat_get_user_cpu_mask(compat_ulong_t __user *user_mask_ptr,
569                                     unsigned len, struct cpumask *new_mask)
570 {
571         unsigned long *k;
572
573         if (len < cpumask_size())
574                 memset(new_mask, 0, cpumask_size());
575         else if (len > cpumask_size())
576                 len = cpumask_size();
577
578         k = cpumask_bits(new_mask);
579         return compat_get_bitmap(k, user_mask_ptr, len * 8);
580 }
581
582 asmlinkage long compat_sys_sched_setaffinity(compat_pid_t pid,
583                                              unsigned int len,
584                                              compat_ulong_t __user *user_mask_ptr)
585 {
586         cpumask_var_t new_mask;
587         int retval;
588
589         if (!alloc_cpumask_var(&new_mask, GFP_KERNEL))
590                 return -ENOMEM;
591
592         retval = compat_get_user_cpu_mask(user_mask_ptr, len, new_mask);
593         if (retval)
594                 goto out;
595
596         retval = sched_setaffinity(pid, new_mask);
597 out:
598         free_cpumask_var(new_mask);
599         return retval;
600 }
601
602 asmlinkage long compat_sys_sched_getaffinity(compat_pid_t pid, unsigned int len,
603                                              compat_ulong_t __user *user_mask_ptr)
604 {
605         int ret;
606         cpumask_var_t mask;
607
608         if ((len * BITS_PER_BYTE) < nr_cpu_ids)
609                 return -EINVAL;
610         if (len & (sizeof(compat_ulong_t)-1))
611                 return -EINVAL;
612
613         if (!alloc_cpumask_var(&mask, GFP_KERNEL))
614                 return -ENOMEM;
615
616         ret = sched_getaffinity(pid, mask);
617         if (ret == 0) {
618                 size_t retlen = min_t(size_t, len, cpumask_size());
619
620                 if (compat_put_bitmap(user_mask_ptr, cpumask_bits(mask), retlen * 8))
621                         ret = -EFAULT;
622                 else
623                         ret = retlen;
624         }
625         free_cpumask_var(mask);
626
627         return ret;
628 }
629
630 int get_compat_itimerspec(struct itimerspec *dst,
631                           const struct compat_itimerspec __user *src)
632 {
633         if (get_compat_timespec(&dst->it_interval, &src->it_interval) ||
634             get_compat_timespec(&dst->it_value, &src->it_value))
635                 return -EFAULT;
636         return 0;
637 }
638
639 int put_compat_itimerspec(struct compat_itimerspec __user *dst,
640                           const struct itimerspec *src)
641 {
642         if (put_compat_timespec(&src->it_interval, &dst->it_interval) ||
643             put_compat_timespec(&src->it_value, &dst->it_value))
644                 return -EFAULT;
645         return 0;
646 }
647
648 long compat_sys_timer_create(clockid_t which_clock,
649                         struct compat_sigevent __user *timer_event_spec,
650                         timer_t __user *created_timer_id)
651 {
652         struct sigevent __user *event = NULL;
653
654         if (timer_event_spec) {
655                 struct sigevent kevent;
656
657                 event = compat_alloc_user_space(sizeof(*event));
658                 if (get_compat_sigevent(&kevent, timer_event_spec) ||
659                     copy_to_user(event, &kevent, sizeof(*event)))
660                         return -EFAULT;
661         }
662
663         return sys_timer_create(which_clock, event, created_timer_id);
664 }
665
666 long compat_sys_timer_settime(timer_t timer_id, int flags,
667                           struct compat_itimerspec __user *new,
668                           struct compat_itimerspec __user *old)
669 {
670         long err;
671         mm_segment_t oldfs;
672         struct itimerspec newts, oldts;
673
674         if (!new)
675                 return -EINVAL;
676         if (get_compat_itimerspec(&newts, new))
677                 return -EFAULT;
678         oldfs = get_fs();
679         set_fs(KERNEL_DS);
680         err = sys_timer_settime(timer_id, flags,
681                                 (struct itimerspec __user *) &newts,
682                                 (struct itimerspec __user *) &oldts);
683         set_fs(oldfs);
684         if (!err && old && put_compat_itimerspec(old, &oldts))
685                 return -EFAULT;
686         return err;
687 }
688
689 long compat_sys_timer_gettime(timer_t timer_id,
690                 struct compat_itimerspec __user *setting)
691 {
692         long err;
693         mm_segment_t oldfs;
694         struct itimerspec ts;
695
696         oldfs = get_fs();
697         set_fs(KERNEL_DS);
698         err = sys_timer_gettime(timer_id,
699                                 (struct itimerspec __user *) &ts);
700         set_fs(oldfs);
701         if (!err && put_compat_itimerspec(setting, &ts))
702                 return -EFAULT;
703         return err;
704 }
705
706 long compat_sys_clock_settime(clockid_t which_clock,
707                 struct compat_timespec __user *tp)
708 {
709         long err;
710         mm_segment_t oldfs;
711         struct timespec ts;
712
713         if (get_compat_timespec(&ts, tp))
714                 return -EFAULT;
715         oldfs = get_fs();
716         set_fs(KERNEL_DS);
717         err = sys_clock_settime(which_clock,
718                                 (struct timespec __user *) &ts);
719         set_fs(oldfs);
720         return err;
721 }
722
723 long compat_sys_clock_gettime(clockid_t which_clock,
724                 struct compat_timespec __user *tp)
725 {
726         long err;
727         mm_segment_t oldfs;
728         struct timespec ts;
729
730         oldfs = get_fs();
731         set_fs(KERNEL_DS);
732         err = sys_clock_gettime(which_clock,
733                                 (struct timespec __user *) &ts);
734         set_fs(oldfs);
735         if (!err && put_compat_timespec(&ts, tp))
736                 return -EFAULT;
737         return err;
738 }
739
740 long compat_sys_clock_adjtime(clockid_t which_clock,
741                 struct compat_timex __user *utp)
742 {
743         struct timex txc;
744         mm_segment_t oldfs;
745         int err, ret;
746
747         err = compat_get_timex(&txc, utp);
748         if (err)
749                 return err;
750
751         oldfs = get_fs();
752         set_fs(KERNEL_DS);
753         ret = sys_clock_adjtime(which_clock, (struct timex __user *) &txc);
754         set_fs(oldfs);
755
756         err = compat_put_timex(utp, &txc);
757         if (err)
758                 return err;
759
760         return ret;
761 }
762
763 long compat_sys_clock_getres(clockid_t which_clock,
764                 struct compat_timespec __user *tp)
765 {
766         long err;
767         mm_segment_t oldfs;
768         struct timespec ts;
769
770         oldfs = get_fs();
771         set_fs(KERNEL_DS);
772         err = sys_clock_getres(which_clock,
773                                (struct timespec __user *) &ts);
774         set_fs(oldfs);
775         if (!err && tp && put_compat_timespec(&ts, tp))
776                 return -EFAULT;
777         return err;
778 }
779
780 static long compat_clock_nanosleep_restart(struct restart_block *restart)
781 {
782         long err;
783         mm_segment_t oldfs;
784         struct timespec tu;
785         struct compat_timespec *rmtp = restart->nanosleep.compat_rmtp;
786
787         restart->nanosleep.rmtp = (struct timespec __user *) &tu;
788         oldfs = get_fs();
789         set_fs(KERNEL_DS);
790         err = clock_nanosleep_restart(restart);
791         set_fs(oldfs);
792
793         if ((err == -ERESTART_RESTARTBLOCK) && rmtp &&
794             put_compat_timespec(&tu, rmtp))
795                 return -EFAULT;
796
797         if (err == -ERESTART_RESTARTBLOCK) {
798                 restart->fn = compat_clock_nanosleep_restart;
799                 restart->nanosleep.compat_rmtp = rmtp;
800         }
801         return err;
802 }
803
804 long compat_sys_clock_nanosleep(clockid_t which_clock, int flags,
805                             struct compat_timespec __user *rqtp,
806                             struct compat_timespec __user *rmtp)
807 {
808         long err;
809         mm_segment_t oldfs;
810         struct timespec in, out;
811         struct restart_block *restart;
812
813         if (get_compat_timespec(&in, rqtp))
814                 return -EFAULT;
815
816         oldfs = get_fs();
817         set_fs(KERNEL_DS);
818         err = sys_clock_nanosleep(which_clock, flags,
819                                   (struct timespec __user *) &in,
820                                   (struct timespec __user *) &out);
821         set_fs(oldfs);
822
823         if ((err == -ERESTART_RESTARTBLOCK) && rmtp &&
824             put_compat_timespec(&out, rmtp))
825                 return -EFAULT;
826
827         if (err == -ERESTART_RESTARTBLOCK) {
828                 restart = &current_thread_info()->restart_block;
829                 restart->fn = compat_clock_nanosleep_restart;
830                 restart->nanosleep.compat_rmtp = rmtp;
831         }
832         return err;
833 }
834
835 /*
836  * We currently only need the following fields from the sigevent
837  * structure: sigev_value, sigev_signo, sig_notify and (sometimes
838  * sigev_notify_thread_id).  The others are handled in user mode.
839  * We also assume that copying sigev_value.sival_int is sufficient
840  * to keep all the bits of sigev_value.sival_ptr intact.
841  */
842 int get_compat_sigevent(struct sigevent *event,
843                 const struct compat_sigevent __user *u_event)
844 {
845         memset(event, 0, sizeof(*event));
846         return (!access_ok(VERIFY_READ, u_event, sizeof(*u_event)) ||
847                 __get_user(event->sigev_value.sival_int,
848                         &u_event->sigev_value.sival_int) ||
849                 __get_user(event->sigev_signo, &u_event->sigev_signo) ||
850                 __get_user(event->sigev_notify, &u_event->sigev_notify) ||
851                 __get_user(event->sigev_notify_thread_id,
852                         &u_event->sigev_notify_thread_id))
853                 ? -EFAULT : 0;
854 }
855
856 long compat_get_bitmap(unsigned long *mask, const compat_ulong_t __user *umask,
857                        unsigned long bitmap_size)
858 {
859         int i, j;
860         unsigned long m;
861         compat_ulong_t um;
862         unsigned long nr_compat_longs;
863
864         /* align bitmap up to nearest compat_long_t boundary */
865         bitmap_size = ALIGN(bitmap_size, BITS_PER_COMPAT_LONG);
866
867         if (!access_ok(VERIFY_READ, umask, bitmap_size / 8))
868                 return -EFAULT;
869
870         nr_compat_longs = BITS_TO_COMPAT_LONGS(bitmap_size);
871
872         for (i = 0; i < BITS_TO_LONGS(bitmap_size); i++) {
873                 m = 0;
874
875                 for (j = 0; j < sizeof(m)/sizeof(um); j++) {
876                         /*
877                          * We dont want to read past the end of the userspace
878                          * bitmap. We must however ensure the end of the
879                          * kernel bitmap is zeroed.
880                          */
881                         if (nr_compat_longs-- > 0) {
882                                 if (__get_user(um, umask))
883                                         return -EFAULT;
884                         } else {
885                                 um = 0;
886                         }
887
888                         umask++;
889                         m |= (long)um << (j * BITS_PER_COMPAT_LONG);
890                 }
891                 *mask++ = m;
892         }
893
894         return 0;
895 }
896
897 long compat_put_bitmap(compat_ulong_t __user *umask, unsigned long *mask,
898                        unsigned long bitmap_size)
899 {
900         int i, j;
901         unsigned long m;
902         compat_ulong_t um;
903         unsigned long nr_compat_longs;
904
905         /* align bitmap up to nearest compat_long_t boundary */
906         bitmap_size = ALIGN(bitmap_size, BITS_PER_COMPAT_LONG);
907
908         if (!access_ok(VERIFY_WRITE, umask, bitmap_size / 8))
909                 return -EFAULT;
910
911         nr_compat_longs = BITS_TO_COMPAT_LONGS(bitmap_size);
912
913         for (i = 0; i < BITS_TO_LONGS(bitmap_size); i++) {
914                 m = *mask++;
915
916                 for (j = 0; j < sizeof(m)/sizeof(um); j++) {
917                         um = m;
918
919                         /*
920                          * We dont want to write past the end of the userspace
921                          * bitmap.
922                          */
923                         if (nr_compat_longs-- > 0) {
924                                 if (__put_user(um, umask))
925                                         return -EFAULT;
926                         }
927
928                         umask++;
929                         m >>= 4*sizeof(um);
930                         m >>= 4*sizeof(um);
931                 }
932         }
933
934         return 0;
935 }
936
937 void
938 sigset_from_compat (sigset_t *set, compat_sigset_t *compat)
939 {
940         switch (_NSIG_WORDS) {
941         case 4: set->sig[3] = compat->sig[6] | (((long)compat->sig[7]) << 32 );
942         case 3: set->sig[2] = compat->sig[4] | (((long)compat->sig[5]) << 32 );
943         case 2: set->sig[1] = compat->sig[2] | (((long)compat->sig[3]) << 32 );
944         case 1: set->sig[0] = compat->sig[0] | (((long)compat->sig[1]) << 32 );
945         }
946 }
947 EXPORT_SYMBOL_GPL(sigset_from_compat);
948
949 asmlinkage long
950 compat_sys_rt_sigtimedwait (compat_sigset_t __user *uthese,
951                 struct compat_siginfo __user *uinfo,
952                 struct compat_timespec __user *uts, compat_size_t sigsetsize)
953 {
954         compat_sigset_t s32;
955         sigset_t s;
956         struct timespec t;
957         siginfo_t info;
958         long ret;
959
960         if (sigsetsize != sizeof(sigset_t))
961                 return -EINVAL;
962
963         if (copy_from_user(&s32, uthese, sizeof(compat_sigset_t)))
964                 return -EFAULT;
965         sigset_from_compat(&s, &s32);
966
967         if (uts) {
968                 if (get_compat_timespec(&t, uts))
969                         return -EFAULT;
970         }
971
972         ret = do_sigtimedwait(&s, &info, uts ? &t : NULL);
973
974         if (ret > 0 && uinfo) {
975                 if (copy_siginfo_to_user32(uinfo, &info))
976                         ret = -EFAULT;
977         }
978
979         return ret;
980
981 }
982
983 asmlinkage long
984 compat_sys_rt_tgsigqueueinfo(compat_pid_t tgid, compat_pid_t pid, int sig,
985                              struct compat_siginfo __user *uinfo)
986 {
987         siginfo_t info;
988
989         if (copy_siginfo_from_user32(&info, uinfo))
990                 return -EFAULT;
991         return do_rt_tgsigqueueinfo(tgid, pid, sig, &info);
992 }
993
994 #ifdef __ARCH_WANT_COMPAT_SYS_TIME
995
996 /* compat_time_t is a 32 bit "long" and needs to get converted. */
997
998 asmlinkage long compat_sys_time(compat_time_t __user * tloc)
999 {
1000         compat_time_t i;
1001         struct timeval tv;
1002
1003         do_gettimeofday(&tv);
1004         i = tv.tv_sec;
1005
1006         if (tloc) {
1007                 if (put_user(i,tloc))
1008                         return -EFAULT;
1009         }
1010         force_successful_syscall_return();
1011         return i;
1012 }
1013
1014 asmlinkage long compat_sys_stime(compat_time_t __user *tptr)
1015 {
1016         struct timespec tv;
1017         int err;
1018
1019         if (get_user(tv.tv_sec, tptr))
1020                 return -EFAULT;
1021
1022         tv.tv_nsec = 0;
1023
1024         err = security_settime(&tv, NULL);
1025         if (err)
1026                 return err;
1027
1028         do_settimeofday(&tv);
1029         return 0;
1030 }
1031
1032 #endif /* __ARCH_WANT_COMPAT_SYS_TIME */
1033
1034 #ifdef __ARCH_WANT_COMPAT_SYS_RT_SIGSUSPEND
1035 asmlinkage long compat_sys_rt_sigsuspend(compat_sigset_t __user *unewset, compat_size_t sigsetsize)
1036 {
1037         sigset_t newset;
1038         compat_sigset_t newset32;
1039
1040         /* XXX: Don't preclude handling different sized sigset_t's.  */
1041         if (sigsetsize != sizeof(sigset_t))
1042                 return -EINVAL;
1043
1044         if (copy_from_user(&newset32, unewset, sizeof(compat_sigset_t)))
1045                 return -EFAULT;
1046         sigset_from_compat(&newset, &newset32);
1047         sigdelsetmask(&newset, sigmask(SIGKILL)|sigmask(SIGSTOP));
1048
1049         current->saved_sigmask = current->blocked;
1050         set_current_blocked(&newset);
1051
1052         current->state = TASK_INTERRUPTIBLE;
1053         schedule();
1054         set_restore_sigmask();
1055         return -ERESTARTNOHAND;
1056 }
1057 #endif /* __ARCH_WANT_COMPAT_SYS_RT_SIGSUSPEND */
1058
1059 asmlinkage long compat_sys_adjtimex(struct compat_timex __user *utp)
1060 {
1061         struct timex txc;
1062         int err, ret;
1063
1064         err = compat_get_timex(&txc, utp);
1065         if (err)
1066                 return err;
1067
1068         ret = do_adjtimex(&txc);
1069
1070         err = compat_put_timex(utp, &txc);
1071         if (err)
1072                 return err;
1073
1074         return ret;
1075 }
1076
1077 #ifdef CONFIG_NUMA
1078 asmlinkage long compat_sys_move_pages(pid_t pid, unsigned long nr_pages,
1079                 compat_uptr_t __user *pages32,
1080                 const int __user *nodes,
1081                 int __user *status,
1082                 int flags)
1083 {
1084         const void __user * __user *pages;
1085         int i;
1086
1087         pages = compat_alloc_user_space(nr_pages * sizeof(void *));
1088         for (i = 0; i < nr_pages; i++) {
1089                 compat_uptr_t p;
1090
1091                 if (get_user(p, pages32 + i) ||
1092                         put_user(compat_ptr(p), pages + i))
1093                         return -EFAULT;
1094         }
1095         return sys_move_pages(pid, nr_pages, pages, nodes, status, flags);
1096 }
1097
1098 asmlinkage long compat_sys_migrate_pages(compat_pid_t pid,
1099                         compat_ulong_t maxnode,
1100                         const compat_ulong_t __user *old_nodes,
1101                         const compat_ulong_t __user *new_nodes)
1102 {
1103         unsigned long __user *old = NULL;
1104         unsigned long __user *new = NULL;
1105         nodemask_t tmp_mask;
1106         unsigned long nr_bits;
1107         unsigned long size;
1108
1109         nr_bits = min_t(unsigned long, maxnode - 1, MAX_NUMNODES);
1110         size = ALIGN(nr_bits, BITS_PER_LONG) / 8;
1111         if (old_nodes) {
1112                 if (compat_get_bitmap(nodes_addr(tmp_mask), old_nodes, nr_bits))
1113                         return -EFAULT;
1114                 old = compat_alloc_user_space(new_nodes ? size * 2 : size);
1115                 if (new_nodes)
1116                         new = old + size / sizeof(unsigned long);
1117                 if (copy_to_user(old, nodes_addr(tmp_mask), size))
1118                         return -EFAULT;
1119         }
1120         if (new_nodes) {
1121                 if (compat_get_bitmap(nodes_addr(tmp_mask), new_nodes, nr_bits))
1122                         return -EFAULT;
1123                 if (new == NULL)
1124                         new = compat_alloc_user_space(size);
1125                 if (copy_to_user(new, nodes_addr(tmp_mask), size))
1126                         return -EFAULT;
1127         }
1128         return sys_migrate_pages(pid, nr_bits + 1, old, new);
1129 }
1130 #endif
1131
1132 struct compat_sysinfo {
1133         s32 uptime;
1134         u32 loads[3];
1135         u32 totalram;
1136         u32 freeram;
1137         u32 sharedram;
1138         u32 bufferram;
1139         u32 totalswap;
1140         u32 freeswap;
1141         u16 procs;
1142         u16 pad;
1143         u32 totalhigh;
1144         u32 freehigh;
1145         u32 mem_unit;
1146         char _f[20-2*sizeof(u32)-sizeof(int)];
1147 };
1148
1149 asmlinkage long
1150 compat_sys_sysinfo(struct compat_sysinfo __user *info)
1151 {
1152         struct sysinfo s;
1153
1154         do_sysinfo(&s);
1155
1156         /* Check to see if any memory value is too large for 32-bit and scale
1157          *  down if needed
1158          */
1159         if ((s.totalram >> 32) || (s.totalswap >> 32)) {
1160                 int bitcount = 0;
1161
1162                 while (s.mem_unit < PAGE_SIZE) {
1163                         s.mem_unit <<= 1;
1164                         bitcount++;
1165                 }
1166
1167                 s.totalram >>= bitcount;
1168                 s.freeram >>= bitcount;
1169                 s.sharedram >>= bitcount;
1170                 s.bufferram >>= bitcount;
1171                 s.totalswap >>= bitcount;
1172                 s.freeswap >>= bitcount;
1173                 s.totalhigh >>= bitcount;
1174                 s.freehigh >>= bitcount;
1175         }
1176
1177         if (!access_ok(VERIFY_WRITE, info, sizeof(struct compat_sysinfo)) ||
1178             __put_user (s.uptime, &info->uptime) ||
1179             __put_user (s.loads[0], &info->loads[0]) ||
1180             __put_user (s.loads[1], &info->loads[1]) ||
1181             __put_user (s.loads[2], &info->loads[2]) ||
1182             __put_user (s.totalram, &info->totalram) ||
1183             __put_user (s.freeram, &info->freeram) ||
1184             __put_user (s.sharedram, &info->sharedram) ||
1185             __put_user (s.bufferram, &info->bufferram) ||
1186             __put_user (s.totalswap, &info->totalswap) ||
1187             __put_user (s.freeswap, &info->freeswap) ||
1188             __put_user (s.procs, &info->procs) ||
1189             __put_user (s.totalhigh, &info->totalhigh) ||
1190             __put_user (s.freehigh, &info->freehigh) ||
1191             __put_user (s.mem_unit, &info->mem_unit))
1192                 return -EFAULT;
1193
1194         return 0;
1195 }
1196
1197 /*
1198  * Allocate user-space memory for the duration of a single system call,
1199  * in order to marshall parameters inside a compat thunk.
1200  */
1201 void __user *compat_alloc_user_space(unsigned long len)
1202 {
1203         void __user *ptr;
1204
1205         /* If len would occupy more than half of the entire compat space... */
1206         if (unlikely(len > (((compat_uptr_t)~0) >> 1)))
1207                 return NULL;
1208
1209         ptr = arch_compat_alloc_user_space(len);
1210
1211         if (unlikely(!access_ok(VERIFY_WRITE, ptr, len)))
1212                 return NULL;
1213
1214         return ptr;
1215 }
1216 EXPORT_SYMBOL_GPL(compat_alloc_user_space);