Merge branch 'linus' into perfcounters/core
[safe/jmp/linux-2.6] / kernel / sys.c
1 /*
2  *  linux/kernel/sys.c
3  *
4  *  Copyright (C) 1991, 1992  Linus Torvalds
5  */
6
7 #include <linux/module.h>
8 #include <linux/mm.h>
9 #include <linux/utsname.h>
10 #include <linux/mman.h>
11 #include <linux/smp_lock.h>
12 #include <linux/notifier.h>
13 #include <linux/reboot.h>
14 #include <linux/prctl.h>
15 #include <linux/highuid.h>
16 #include <linux/fs.h>
17 #include <linux/perf_counter.h>
18 #include <linux/resource.h>
19 #include <linux/kernel.h>
20 #include <linux/kexec.h>
21 #include <linux/workqueue.h>
22 #include <linux/capability.h>
23 #include <linux/device.h>
24 #include <linux/key.h>
25 #include <linux/times.h>
26 #include <linux/posix-timers.h>
27 #include <linux/security.h>
28 #include <linux/dcookies.h>
29 #include <linux/suspend.h>
30 #include <linux/tty.h>
31 #include <linux/signal.h>
32 #include <linux/cn_proc.h>
33 #include <linux/getcpu.h>
34 #include <linux/task_io_accounting_ops.h>
35 #include <linux/seccomp.h>
36 #include <linux/cpu.h>
37
38 #include <linux/compat.h>
39 #include <linux/syscalls.h>
40 #include <linux/kprobes.h>
41 #include <linux/user_namespace.h>
42
43 #include <asm/uaccess.h>
44 #include <asm/io.h>
45 #include <asm/unistd.h>
46
47 #ifndef SET_UNALIGN_CTL
48 # define SET_UNALIGN_CTL(a,b)   (-EINVAL)
49 #endif
50 #ifndef GET_UNALIGN_CTL
51 # define GET_UNALIGN_CTL(a,b)   (-EINVAL)
52 #endif
53 #ifndef SET_FPEMU_CTL
54 # define SET_FPEMU_CTL(a,b)     (-EINVAL)
55 #endif
56 #ifndef GET_FPEMU_CTL
57 # define GET_FPEMU_CTL(a,b)     (-EINVAL)
58 #endif
59 #ifndef SET_FPEXC_CTL
60 # define SET_FPEXC_CTL(a,b)     (-EINVAL)
61 #endif
62 #ifndef GET_FPEXC_CTL
63 # define GET_FPEXC_CTL(a,b)     (-EINVAL)
64 #endif
65 #ifndef GET_ENDIAN
66 # define GET_ENDIAN(a,b)        (-EINVAL)
67 #endif
68 #ifndef SET_ENDIAN
69 # define SET_ENDIAN(a,b)        (-EINVAL)
70 #endif
71 #ifndef GET_TSC_CTL
72 # define GET_TSC_CTL(a)         (-EINVAL)
73 #endif
74 #ifndef SET_TSC_CTL
75 # define SET_TSC_CTL(a)         (-EINVAL)
76 #endif
77
78 /*
79  * this is where the system-wide overflow UID and GID are defined, for
80  * architectures that now have 32-bit UID/GID but didn't in the past
81  */
82
83 int overflowuid = DEFAULT_OVERFLOWUID;
84 int overflowgid = DEFAULT_OVERFLOWGID;
85
86 #ifdef CONFIG_UID16
87 EXPORT_SYMBOL(overflowuid);
88 EXPORT_SYMBOL(overflowgid);
89 #endif
90
91 /*
92  * the same as above, but for filesystems which can only store a 16-bit
93  * UID and GID. as such, this is needed on all architectures
94  */
95
96 int fs_overflowuid = DEFAULT_FS_OVERFLOWUID;
97 int fs_overflowgid = DEFAULT_FS_OVERFLOWUID;
98
99 EXPORT_SYMBOL(fs_overflowuid);
100 EXPORT_SYMBOL(fs_overflowgid);
101
102 /*
103  * this indicates whether you can reboot with ctrl-alt-del: the default is yes
104  */
105
106 int C_A_D = 1;
107 struct pid *cad_pid;
108 EXPORT_SYMBOL(cad_pid);
109
110 /*
111  * If set, this is used for preparing the system to power off.
112  */
113
114 void (*pm_power_off_prepare)(void);
115
116 /*
117  * set the priority of a task
118  * - the caller must hold the RCU read lock
119  */
120 static int set_one_prio(struct task_struct *p, int niceval, int error)
121 {
122         const struct cred *cred = current_cred(), *pcred = __task_cred(p);
123         int no_nice;
124
125         if (pcred->uid  != cred->euid &&
126             pcred->euid != cred->euid && !capable(CAP_SYS_NICE)) {
127                 error = -EPERM;
128                 goto out;
129         }
130         if (niceval < task_nice(p) && !can_nice(p, niceval)) {
131                 error = -EACCES;
132                 goto out;
133         }
134         no_nice = security_task_setnice(p, niceval);
135         if (no_nice) {
136                 error = no_nice;
137                 goto out;
138         }
139         if (error == -ESRCH)
140                 error = 0;
141         set_user_nice(p, niceval);
142 out:
143         return error;
144 }
145
146 asmlinkage long sys_setpriority(int which, int who, int niceval)
147 {
148         struct task_struct *g, *p;
149         struct user_struct *user;
150         const struct cred *cred = current_cred();
151         int error = -EINVAL;
152         struct pid *pgrp;
153
154         if (which > PRIO_USER || which < PRIO_PROCESS)
155                 goto out;
156
157         /* normalize: avoid signed division (rounding problems) */
158         error = -ESRCH;
159         if (niceval < -20)
160                 niceval = -20;
161         if (niceval > 19)
162                 niceval = 19;
163
164         read_lock(&tasklist_lock);
165         switch (which) {
166                 case PRIO_PROCESS:
167                         if (who)
168                                 p = find_task_by_vpid(who);
169                         else
170                                 p = current;
171                         if (p)
172                                 error = set_one_prio(p, niceval, error);
173                         break;
174                 case PRIO_PGRP:
175                         if (who)
176                                 pgrp = find_vpid(who);
177                         else
178                                 pgrp = task_pgrp(current);
179                         do_each_pid_thread(pgrp, PIDTYPE_PGID, p) {
180                                 error = set_one_prio(p, niceval, error);
181                         } while_each_pid_thread(pgrp, PIDTYPE_PGID, p);
182                         break;
183                 case PRIO_USER:
184                         user = (struct user_struct *) cred->user;
185                         if (!who)
186                                 who = cred->uid;
187                         else if ((who != cred->uid) &&
188                                  !(user = find_user(who)))
189                                 goto out_unlock;        /* No processes for this user */
190
191                         do_each_thread(g, p)
192                                 if (__task_cred(p)->uid == who)
193                                         error = set_one_prio(p, niceval, error);
194                         while_each_thread(g, p);
195                         if (who != cred->uid)
196                                 free_uid(user);         /* For find_user() */
197                         break;
198         }
199 out_unlock:
200         read_unlock(&tasklist_lock);
201 out:
202         return error;
203 }
204
205 /*
206  * Ugh. To avoid negative return values, "getpriority()" will
207  * not return the normal nice-value, but a negated value that
208  * has been offset by 20 (ie it returns 40..1 instead of -20..19)
209  * to stay compatible.
210  */
211 asmlinkage long sys_getpriority(int which, int who)
212 {
213         struct task_struct *g, *p;
214         struct user_struct *user;
215         const struct cred *cred = current_cred();
216         long niceval, retval = -ESRCH;
217         struct pid *pgrp;
218
219         if (which > PRIO_USER || which < PRIO_PROCESS)
220                 return -EINVAL;
221
222         read_lock(&tasklist_lock);
223         switch (which) {
224                 case PRIO_PROCESS:
225                         if (who)
226                                 p = find_task_by_vpid(who);
227                         else
228                                 p = current;
229                         if (p) {
230                                 niceval = 20 - task_nice(p);
231                                 if (niceval > retval)
232                                         retval = niceval;
233                         }
234                         break;
235                 case PRIO_PGRP:
236                         if (who)
237                                 pgrp = find_vpid(who);
238                         else
239                                 pgrp = task_pgrp(current);
240                         do_each_pid_thread(pgrp, PIDTYPE_PGID, p) {
241                                 niceval = 20 - task_nice(p);
242                                 if (niceval > retval)
243                                         retval = niceval;
244                         } while_each_pid_thread(pgrp, PIDTYPE_PGID, p);
245                         break;
246                 case PRIO_USER:
247                         user = (struct user_struct *) cred->user;
248                         if (!who)
249                                 who = cred->uid;
250                         else if ((who != cred->uid) &&
251                                  !(user = find_user(who)))
252                                 goto out_unlock;        /* No processes for this user */
253
254                         do_each_thread(g, p)
255                                 if (__task_cred(p)->uid == who) {
256                                         niceval = 20 - task_nice(p);
257                                         if (niceval > retval)
258                                                 retval = niceval;
259                                 }
260                         while_each_thread(g, p);
261                         if (who != cred->uid)
262                                 free_uid(user);         /* for find_user() */
263                         break;
264         }
265 out_unlock:
266         read_unlock(&tasklist_lock);
267
268         return retval;
269 }
270
271 /**
272  *      emergency_restart - reboot the system
273  *
274  *      Without shutting down any hardware or taking any locks
275  *      reboot the system.  This is called when we know we are in
276  *      trouble so this is our best effort to reboot.  This is
277  *      safe to call in interrupt context.
278  */
279 void emergency_restart(void)
280 {
281         machine_emergency_restart();
282 }
283 EXPORT_SYMBOL_GPL(emergency_restart);
284
285 void kernel_restart_prepare(char *cmd)
286 {
287         blocking_notifier_call_chain(&reboot_notifier_list, SYS_RESTART, cmd);
288         system_state = SYSTEM_RESTART;
289         device_shutdown();
290         sysdev_shutdown();
291 }
292
293 /**
294  *      kernel_restart - reboot the system
295  *      @cmd: pointer to buffer containing command to execute for restart
296  *              or %NULL
297  *
298  *      Shutdown everything and perform a clean reboot.
299  *      This is not safe to call in interrupt context.
300  */
301 void kernel_restart(char *cmd)
302 {
303         kernel_restart_prepare(cmd);
304         if (!cmd)
305                 printk(KERN_EMERG "Restarting system.\n");
306         else
307                 printk(KERN_EMERG "Restarting system with command '%s'.\n", cmd);
308         machine_restart(cmd);
309 }
310 EXPORT_SYMBOL_GPL(kernel_restart);
311
312 static void kernel_shutdown_prepare(enum system_states state)
313 {
314         blocking_notifier_call_chain(&reboot_notifier_list,
315                 (state == SYSTEM_HALT)?SYS_HALT:SYS_POWER_OFF, NULL);
316         system_state = state;
317         device_shutdown();
318 }
319 /**
320  *      kernel_halt - halt the system
321  *
322  *      Shutdown everything and perform a clean system halt.
323  */
324 void kernel_halt(void)
325 {
326         kernel_shutdown_prepare(SYSTEM_HALT);
327         sysdev_shutdown();
328         printk(KERN_EMERG "System halted.\n");
329         machine_halt();
330 }
331
332 EXPORT_SYMBOL_GPL(kernel_halt);
333
334 /**
335  *      kernel_power_off - power_off the system
336  *
337  *      Shutdown everything and perform a clean system power_off.
338  */
339 void kernel_power_off(void)
340 {
341         kernel_shutdown_prepare(SYSTEM_POWER_OFF);
342         if (pm_power_off_prepare)
343                 pm_power_off_prepare();
344         disable_nonboot_cpus();
345         sysdev_shutdown();
346         printk(KERN_EMERG "Power down.\n");
347         machine_power_off();
348 }
349 EXPORT_SYMBOL_GPL(kernel_power_off);
350 /*
351  * Reboot system call: for obvious reasons only root may call it,
352  * and even root needs to set up some magic numbers in the registers
353  * so that some mistake won't make this reboot the whole machine.
354  * You can also set the meaning of the ctrl-alt-del-key here.
355  *
356  * reboot doesn't sync: do that yourself before calling this.
357  */
358 asmlinkage long sys_reboot(int magic1, int magic2, unsigned int cmd, void __user * arg)
359 {
360         char buffer[256];
361
362         /* We only trust the superuser with rebooting the system. */
363         if (!capable(CAP_SYS_BOOT))
364                 return -EPERM;
365
366         /* For safety, we require "magic" arguments. */
367         if (magic1 != LINUX_REBOOT_MAGIC1 ||
368             (magic2 != LINUX_REBOOT_MAGIC2 &&
369                         magic2 != LINUX_REBOOT_MAGIC2A &&
370                         magic2 != LINUX_REBOOT_MAGIC2B &&
371                         magic2 != LINUX_REBOOT_MAGIC2C))
372                 return -EINVAL;
373
374         /* Instead of trying to make the power_off code look like
375          * halt when pm_power_off is not set do it the easy way.
376          */
377         if ((cmd == LINUX_REBOOT_CMD_POWER_OFF) && !pm_power_off)
378                 cmd = LINUX_REBOOT_CMD_HALT;
379
380         lock_kernel();
381         switch (cmd) {
382         case LINUX_REBOOT_CMD_RESTART:
383                 kernel_restart(NULL);
384                 break;
385
386         case LINUX_REBOOT_CMD_CAD_ON:
387                 C_A_D = 1;
388                 break;
389
390         case LINUX_REBOOT_CMD_CAD_OFF:
391                 C_A_D = 0;
392                 break;
393
394         case LINUX_REBOOT_CMD_HALT:
395                 kernel_halt();
396                 unlock_kernel();
397                 do_exit(0);
398                 break;
399
400         case LINUX_REBOOT_CMD_POWER_OFF:
401                 kernel_power_off();
402                 unlock_kernel();
403                 do_exit(0);
404                 break;
405
406         case LINUX_REBOOT_CMD_RESTART2:
407                 if (strncpy_from_user(&buffer[0], arg, sizeof(buffer) - 1) < 0) {
408                         unlock_kernel();
409                         return -EFAULT;
410                 }
411                 buffer[sizeof(buffer) - 1] = '\0';
412
413                 kernel_restart(buffer);
414                 break;
415
416 #ifdef CONFIG_KEXEC
417         case LINUX_REBOOT_CMD_KEXEC:
418                 {
419                         int ret;
420                         ret = kernel_kexec();
421                         unlock_kernel();
422                         return ret;
423                 }
424 #endif
425
426 #ifdef CONFIG_HIBERNATION
427         case LINUX_REBOOT_CMD_SW_SUSPEND:
428                 {
429                         int ret = hibernate();
430                         unlock_kernel();
431                         return ret;
432                 }
433 #endif
434
435         default:
436                 unlock_kernel();
437                 return -EINVAL;
438         }
439         unlock_kernel();
440         return 0;
441 }
442
443 static void deferred_cad(struct work_struct *dummy)
444 {
445         kernel_restart(NULL);
446 }
447
448 /*
449  * This function gets called by ctrl-alt-del - ie the keyboard interrupt.
450  * As it's called within an interrupt, it may NOT sync: the only choice
451  * is whether to reboot at once, or just ignore the ctrl-alt-del.
452  */
453 void ctrl_alt_del(void)
454 {
455         static DECLARE_WORK(cad_work, deferred_cad);
456
457         if (C_A_D)
458                 schedule_work(&cad_work);
459         else
460                 kill_cad_pid(SIGINT, 1);
461 }
462         
463 /*
464  * Unprivileged users may change the real gid to the effective gid
465  * or vice versa.  (BSD-style)
466  *
467  * If you set the real gid at all, or set the effective gid to a value not
468  * equal to the real gid, then the saved gid is set to the new effective gid.
469  *
470  * This makes it possible for a setgid program to completely drop its
471  * privileges, which is often a useful assertion to make when you are doing
472  * a security audit over a program.
473  *
474  * The general idea is that a program which uses just setregid() will be
475  * 100% compatible with BSD.  A program which uses just setgid() will be
476  * 100% compatible with POSIX with saved IDs. 
477  *
478  * SMP: There are not races, the GIDs are checked only by filesystem
479  *      operations (as far as semantic preservation is concerned).
480  */
481 asmlinkage long sys_setregid(gid_t rgid, gid_t egid)
482 {
483         const struct cred *old;
484         struct cred *new;
485         int retval;
486
487         new = prepare_creds();
488         if (!new)
489                 return -ENOMEM;
490         old = current_cred();
491
492         retval = security_task_setgid(rgid, egid, (gid_t)-1, LSM_SETID_RE);
493         if (retval)
494                 goto error;
495
496         retval = -EPERM;
497         if (rgid != (gid_t) -1) {
498                 if (old->gid == rgid ||
499                     old->egid == rgid ||
500                     capable(CAP_SETGID))
501                         new->gid = rgid;
502                 else
503                         goto error;
504         }
505         if (egid != (gid_t) -1) {
506                 if (old->gid == egid ||
507                     old->egid == egid ||
508                     old->sgid == egid ||
509                     capable(CAP_SETGID))
510                         new->egid = egid;
511                 else
512                         goto error;
513         }
514
515         if (rgid != (gid_t) -1 ||
516             (egid != (gid_t) -1 && egid != old->gid))
517                 new->sgid = new->egid;
518         new->fsgid = new->egid;
519
520         return commit_creds(new);
521
522 error:
523         abort_creds(new);
524         return retval;
525 }
526
527 /*
528  * setgid() is implemented like SysV w/ SAVED_IDS 
529  *
530  * SMP: Same implicit races as above.
531  */
532 asmlinkage long sys_setgid(gid_t gid)
533 {
534         const struct cred *old;
535         struct cred *new;
536         int retval;
537
538         new = prepare_creds();
539         if (!new)
540                 return -ENOMEM;
541         old = current_cred();
542
543         retval = security_task_setgid(gid, (gid_t)-1, (gid_t)-1, LSM_SETID_ID);
544         if (retval)
545                 goto error;
546
547         retval = -EPERM;
548         if (capable(CAP_SETGID))
549                 new->gid = new->egid = new->sgid = new->fsgid = gid;
550         else if (gid == old->gid || gid == old->sgid)
551                 new->egid = new->fsgid = gid;
552         else
553                 goto error;
554
555         return commit_creds(new);
556
557 error:
558         abort_creds(new);
559         return retval;
560 }
561   
562 /*
563  * change the user struct in a credentials set to match the new UID
564  */
565 static int set_user(struct cred *new)
566 {
567         struct user_struct *new_user;
568
569         new_user = alloc_uid(current_user_ns(), new->uid);
570         if (!new_user)
571                 return -EAGAIN;
572
573         if (atomic_read(&new_user->processes) >=
574                                 current->signal->rlim[RLIMIT_NPROC].rlim_cur &&
575                         new_user != INIT_USER) {
576                 free_uid(new_user);
577                 return -EAGAIN;
578         }
579
580         free_uid(new->user);
581         new->user = new_user;
582         return 0;
583 }
584
585 /*
586  * Unprivileged users may change the real uid to the effective uid
587  * or vice versa.  (BSD-style)
588  *
589  * If you set the real uid at all, or set the effective uid to a value not
590  * equal to the real uid, then the saved uid is set to the new effective uid.
591  *
592  * This makes it possible for a setuid program to completely drop its
593  * privileges, which is often a useful assertion to make when you are doing
594  * a security audit over a program.
595  *
596  * The general idea is that a program which uses just setreuid() will be
597  * 100% compatible with BSD.  A program which uses just setuid() will be
598  * 100% compatible with POSIX with saved IDs. 
599  */
600 asmlinkage long sys_setreuid(uid_t ruid, uid_t euid)
601 {
602         const struct cred *old;
603         struct cred *new;
604         int retval;
605
606         new = prepare_creds();
607         if (!new)
608                 return -ENOMEM;
609         old = current_cred();
610
611         retval = security_task_setuid(ruid, euid, (uid_t)-1, LSM_SETID_RE);
612         if (retval)
613                 goto error;
614
615         retval = -EPERM;
616         if (ruid != (uid_t) -1) {
617                 new->uid = ruid;
618                 if (old->uid != ruid &&
619                     old->euid != ruid &&
620                     !capable(CAP_SETUID))
621                         goto error;
622         }
623
624         if (euid != (uid_t) -1) {
625                 new->euid = euid;
626                 if (old->uid != euid &&
627                     old->euid != euid &&
628                     old->suid != euid &&
629                     !capable(CAP_SETUID))
630                         goto error;
631         }
632
633         retval = -EAGAIN;
634         if (new->uid != old->uid && set_user(new) < 0)
635                 goto error;
636
637         if (ruid != (uid_t) -1 ||
638             (euid != (uid_t) -1 && euid != old->uid))
639                 new->suid = new->euid;
640         new->fsuid = new->euid;
641
642         retval = security_task_fix_setuid(new, old, LSM_SETID_RE);
643         if (retval < 0)
644                 goto error;
645
646         return commit_creds(new);
647
648 error:
649         abort_creds(new);
650         return retval;
651 }
652                 
653 /*
654  * setuid() is implemented like SysV with SAVED_IDS 
655  * 
656  * Note that SAVED_ID's is deficient in that a setuid root program
657  * like sendmail, for example, cannot set its uid to be a normal 
658  * user and then switch back, because if you're root, setuid() sets
659  * the saved uid too.  If you don't like this, blame the bright people
660  * in the POSIX committee and/or USG.  Note that the BSD-style setreuid()
661  * will allow a root program to temporarily drop privileges and be able to
662  * regain them by swapping the real and effective uid.  
663  */
664 asmlinkage long sys_setuid(uid_t uid)
665 {
666         const struct cred *old;
667         struct cred *new;
668         int retval;
669
670         new = prepare_creds();
671         if (!new)
672                 return -ENOMEM;
673         old = current_cred();
674
675         retval = security_task_setuid(uid, (uid_t)-1, (uid_t)-1, LSM_SETID_ID);
676         if (retval)
677                 goto error;
678
679         retval = -EPERM;
680         if (capable(CAP_SETUID)) {
681                 new->suid = new->uid = uid;
682                 if (uid != old->uid && set_user(new) < 0) {
683                         retval = -EAGAIN;
684                         goto error;
685                 }
686         } else if (uid != old->uid && uid != new->suid) {
687                 goto error;
688         }
689
690         new->fsuid = new->euid = uid;
691
692         retval = security_task_fix_setuid(new, old, LSM_SETID_ID);
693         if (retval < 0)
694                 goto error;
695
696         return commit_creds(new);
697
698 error:
699         abort_creds(new);
700         return retval;
701 }
702
703
704 /*
705  * This function implements a generic ability to update ruid, euid,
706  * and suid.  This allows you to implement the 4.4 compatible seteuid().
707  */
708 asmlinkage long sys_setresuid(uid_t ruid, uid_t euid, uid_t suid)
709 {
710         const struct cred *old;
711         struct cred *new;
712         int retval;
713
714         new = prepare_creds();
715         if (!new)
716                 return -ENOMEM;
717
718         retval = security_task_setuid(ruid, euid, suid, LSM_SETID_RES);
719         if (retval)
720                 goto error;
721         old = current_cred();
722
723         retval = -EPERM;
724         if (!capable(CAP_SETUID)) {
725                 if (ruid != (uid_t) -1 && ruid != old->uid &&
726                     ruid != old->euid  && ruid != old->suid)
727                         goto error;
728                 if (euid != (uid_t) -1 && euid != old->uid &&
729                     euid != old->euid  && euid != old->suid)
730                         goto error;
731                 if (suid != (uid_t) -1 && suid != old->uid &&
732                     suid != old->euid  && suid != old->suid)
733                         goto error;
734         }
735
736         retval = -EAGAIN;
737         if (ruid != (uid_t) -1) {
738                 new->uid = ruid;
739                 if (ruid != old->uid && set_user(new) < 0)
740                         goto error;
741         }
742         if (euid != (uid_t) -1)
743                 new->euid = euid;
744         if (suid != (uid_t) -1)
745                 new->suid = suid;
746         new->fsuid = new->euid;
747
748         retval = security_task_fix_setuid(new, old, LSM_SETID_RES);
749         if (retval < 0)
750                 goto error;
751
752         return commit_creds(new);
753
754 error:
755         abort_creds(new);
756         return retval;
757 }
758
759 asmlinkage long sys_getresuid(uid_t __user *ruid, uid_t __user *euid, uid_t __user *suid)
760 {
761         const struct cred *cred = current_cred();
762         int retval;
763
764         if (!(retval   = put_user(cred->uid,  ruid)) &&
765             !(retval   = put_user(cred->euid, euid)))
766                 retval = put_user(cred->suid, suid);
767
768         return retval;
769 }
770
771 /*
772  * Same as above, but for rgid, egid, sgid.
773  */
774 asmlinkage long sys_setresgid(gid_t rgid, gid_t egid, gid_t sgid)
775 {
776         const struct cred *old;
777         struct cred *new;
778         int retval;
779
780         new = prepare_creds();
781         if (!new)
782                 return -ENOMEM;
783         old = current_cred();
784
785         retval = security_task_setgid(rgid, egid, sgid, LSM_SETID_RES);
786         if (retval)
787                 goto error;
788
789         retval = -EPERM;
790         if (!capable(CAP_SETGID)) {
791                 if (rgid != (gid_t) -1 && rgid != old->gid &&
792                     rgid != old->egid  && rgid != old->sgid)
793                         goto error;
794                 if (egid != (gid_t) -1 && egid != old->gid &&
795                     egid != old->egid  && egid != old->sgid)
796                         goto error;
797                 if (sgid != (gid_t) -1 && sgid != old->gid &&
798                     sgid != old->egid  && sgid != old->sgid)
799                         goto error;
800         }
801
802         if (rgid != (gid_t) -1)
803                 new->gid = rgid;
804         if (egid != (gid_t) -1)
805                 new->egid = egid;
806         if (sgid != (gid_t) -1)
807                 new->sgid = sgid;
808         new->fsgid = new->egid;
809
810         return commit_creds(new);
811
812 error:
813         abort_creds(new);
814         return retval;
815 }
816
817 asmlinkage long sys_getresgid(gid_t __user *rgid, gid_t __user *egid, gid_t __user *sgid)
818 {
819         const struct cred *cred = current_cred();
820         int retval;
821
822         if (!(retval   = put_user(cred->gid,  rgid)) &&
823             !(retval   = put_user(cred->egid, egid)))
824                 retval = put_user(cred->sgid, sgid);
825
826         return retval;
827 }
828
829
830 /*
831  * "setfsuid()" sets the fsuid - the uid used for filesystem checks. This
832  * is used for "access()" and for the NFS daemon (letting nfsd stay at
833  * whatever uid it wants to). It normally shadows "euid", except when
834  * explicitly set by setfsuid() or for access..
835  */
836 asmlinkage long sys_setfsuid(uid_t uid)
837 {
838         const struct cred *old;
839         struct cred *new;
840         uid_t old_fsuid;
841
842         new = prepare_creds();
843         if (!new)
844                 return current_fsuid();
845         old = current_cred();
846         old_fsuid = old->fsuid;
847
848         if (security_task_setuid(uid, (uid_t)-1, (uid_t)-1, LSM_SETID_FS) < 0)
849                 goto error;
850
851         if (uid == old->uid  || uid == old->euid  ||
852             uid == old->suid || uid == old->fsuid ||
853             capable(CAP_SETUID)) {
854                 if (uid != old_fsuid) {
855                         new->fsuid = uid;
856                         if (security_task_fix_setuid(new, old, LSM_SETID_FS) == 0)
857                                 goto change_okay;
858                 }
859         }
860
861 error:
862         abort_creds(new);
863         return old_fsuid;
864
865 change_okay:
866         commit_creds(new);
867         return old_fsuid;
868 }
869
870 /*
871  * Samma pÃ¥ svenska..
872  */
873 asmlinkage long sys_setfsgid(gid_t gid)
874 {
875         const struct cred *old;
876         struct cred *new;
877         gid_t old_fsgid;
878
879         new = prepare_creds();
880         if (!new)
881                 return current_fsgid();
882         old = current_cred();
883         old_fsgid = old->fsgid;
884
885         if (security_task_setgid(gid, (gid_t)-1, (gid_t)-1, LSM_SETID_FS))
886                 goto error;
887
888         if (gid == old->gid  || gid == old->egid  ||
889             gid == old->sgid || gid == old->fsgid ||
890             capable(CAP_SETGID)) {
891                 if (gid != old_fsgid) {
892                         new->fsgid = gid;
893                         goto change_okay;
894                 }
895         }
896
897 error:
898         abort_creds(new);
899         return old_fsgid;
900
901 change_okay:
902         commit_creds(new);
903         return old_fsgid;
904 }
905
906 void do_sys_times(struct tms *tms)
907 {
908         struct task_cputime cputime;
909         cputime_t cutime, cstime;
910
911         spin_lock_irq(&current->sighand->siglock);
912         thread_group_cputime(current, &cputime);
913         cutime = current->signal->cutime;
914         cstime = current->signal->cstime;
915         spin_unlock_irq(&current->sighand->siglock);
916         tms->tms_utime = cputime_to_clock_t(cputime.utime);
917         tms->tms_stime = cputime_to_clock_t(cputime.stime);
918         tms->tms_cutime = cputime_to_clock_t(cutime);
919         tms->tms_cstime = cputime_to_clock_t(cstime);
920 }
921
922 asmlinkage long sys_times(struct tms __user * tbuf)
923 {
924         if (tbuf) {
925                 struct tms tmp;
926
927                 do_sys_times(&tmp);
928                 if (copy_to_user(tbuf, &tmp, sizeof(struct tms)))
929                         return -EFAULT;
930         }
931         return (long) jiffies_64_to_clock_t(get_jiffies_64());
932 }
933
934 /*
935  * This needs some heavy checking ...
936  * I just haven't the stomach for it. I also don't fully
937  * understand sessions/pgrp etc. Let somebody who does explain it.
938  *
939  * OK, I think I have the protection semantics right.... this is really
940  * only important on a multi-user system anyway, to make sure one user
941  * can't send a signal to a process owned by another.  -TYT, 12/12/91
942  *
943  * Auch. Had to add the 'did_exec' flag to conform completely to POSIX.
944  * LBT 04.03.94
945  */
946 asmlinkage long sys_setpgid(pid_t pid, pid_t pgid)
947 {
948         struct task_struct *p;
949         struct task_struct *group_leader = current->group_leader;
950         struct pid *pgrp;
951         int err;
952
953         if (!pid)
954                 pid = task_pid_vnr(group_leader);
955         if (!pgid)
956                 pgid = pid;
957         if (pgid < 0)
958                 return -EINVAL;
959
960         /* From this point forward we keep holding onto the tasklist lock
961          * so that our parent does not change from under us. -DaveM
962          */
963         write_lock_irq(&tasklist_lock);
964
965         err = -ESRCH;
966         p = find_task_by_vpid(pid);
967         if (!p)
968                 goto out;
969
970         err = -EINVAL;
971         if (!thread_group_leader(p))
972                 goto out;
973
974         if (same_thread_group(p->real_parent, group_leader)) {
975                 err = -EPERM;
976                 if (task_session(p) != task_session(group_leader))
977                         goto out;
978                 err = -EACCES;
979                 if (p->did_exec)
980                         goto out;
981         } else {
982                 err = -ESRCH;
983                 if (p != group_leader)
984                         goto out;
985         }
986
987         err = -EPERM;
988         if (p->signal->leader)
989                 goto out;
990
991         pgrp = task_pid(p);
992         if (pgid != pid) {
993                 struct task_struct *g;
994
995                 pgrp = find_vpid(pgid);
996                 g = pid_task(pgrp, PIDTYPE_PGID);
997                 if (!g || task_session(g) != task_session(group_leader))
998                         goto out;
999         }
1000
1001         err = security_task_setpgid(p, pgid);
1002         if (err)
1003                 goto out;
1004
1005         if (task_pgrp(p) != pgrp) {
1006                 change_pid(p, PIDTYPE_PGID, pgrp);
1007                 set_task_pgrp(p, pid_nr(pgrp));
1008         }
1009
1010         err = 0;
1011 out:
1012         /* All paths lead to here, thus we are safe. -DaveM */
1013         write_unlock_irq(&tasklist_lock);
1014         return err;
1015 }
1016
1017 asmlinkage long sys_getpgid(pid_t pid)
1018 {
1019         struct task_struct *p;
1020         struct pid *grp;
1021         int retval;
1022
1023         rcu_read_lock();
1024         if (!pid)
1025                 grp = task_pgrp(current);
1026         else {
1027                 retval = -ESRCH;
1028                 p = find_task_by_vpid(pid);
1029                 if (!p)
1030                         goto out;
1031                 grp = task_pgrp(p);
1032                 if (!grp)
1033                         goto out;
1034
1035                 retval = security_task_getpgid(p);
1036                 if (retval)
1037                         goto out;
1038         }
1039         retval = pid_vnr(grp);
1040 out:
1041         rcu_read_unlock();
1042         return retval;
1043 }
1044
1045 #ifdef __ARCH_WANT_SYS_GETPGRP
1046
1047 asmlinkage long sys_getpgrp(void)
1048 {
1049         return sys_getpgid(0);
1050 }
1051
1052 #endif
1053
1054 asmlinkage long sys_getsid(pid_t pid)
1055 {
1056         struct task_struct *p;
1057         struct pid *sid;
1058         int retval;
1059
1060         rcu_read_lock();
1061         if (!pid)
1062                 sid = task_session(current);
1063         else {
1064                 retval = -ESRCH;
1065                 p = find_task_by_vpid(pid);
1066                 if (!p)
1067                         goto out;
1068                 sid = task_session(p);
1069                 if (!sid)
1070                         goto out;
1071
1072                 retval = security_task_getsid(p);
1073                 if (retval)
1074                         goto out;
1075         }
1076         retval = pid_vnr(sid);
1077 out:
1078         rcu_read_unlock();
1079         return retval;
1080 }
1081
1082 asmlinkage long sys_setsid(void)
1083 {
1084         struct task_struct *group_leader = current->group_leader;
1085         struct pid *sid = task_pid(group_leader);
1086         pid_t session = pid_vnr(sid);
1087         int err = -EPERM;
1088
1089         write_lock_irq(&tasklist_lock);
1090         /* Fail if I am already a session leader */
1091         if (group_leader->signal->leader)
1092                 goto out;
1093
1094         /* Fail if a process group id already exists that equals the
1095          * proposed session id.
1096          */
1097         if (pid_task(sid, PIDTYPE_PGID))
1098                 goto out;
1099
1100         group_leader->signal->leader = 1;
1101         __set_special_pids(sid);
1102
1103         proc_clear_tty(group_leader);
1104
1105         err = session;
1106 out:
1107         write_unlock_irq(&tasklist_lock);
1108         return err;
1109 }
1110
1111 /*
1112  * Supplementary group IDs
1113  */
1114
1115 /* init to 2 - one for init_task, one to ensure it is never freed */
1116 struct group_info init_groups = { .usage = ATOMIC_INIT(2) };
1117
1118 struct group_info *groups_alloc(int gidsetsize)
1119 {
1120         struct group_info *group_info;
1121         int nblocks;
1122         int i;
1123
1124         nblocks = (gidsetsize + NGROUPS_PER_BLOCK - 1) / NGROUPS_PER_BLOCK;
1125         /* Make sure we always allocate at least one indirect block pointer */
1126         nblocks = nblocks ? : 1;
1127         group_info = kmalloc(sizeof(*group_info) + nblocks*sizeof(gid_t *), GFP_USER);
1128         if (!group_info)
1129                 return NULL;
1130         group_info->ngroups = gidsetsize;
1131         group_info->nblocks = nblocks;
1132         atomic_set(&group_info->usage, 1);
1133
1134         if (gidsetsize <= NGROUPS_SMALL)
1135                 group_info->blocks[0] = group_info->small_block;
1136         else {
1137                 for (i = 0; i < nblocks; i++) {
1138                         gid_t *b;
1139                         b = (void *)__get_free_page(GFP_USER);
1140                         if (!b)
1141                                 goto out_undo_partial_alloc;
1142                         group_info->blocks[i] = b;
1143                 }
1144         }
1145         return group_info;
1146
1147 out_undo_partial_alloc:
1148         while (--i >= 0) {
1149                 free_page((unsigned long)group_info->blocks[i]);
1150         }
1151         kfree(group_info);
1152         return NULL;
1153 }
1154
1155 EXPORT_SYMBOL(groups_alloc);
1156
1157 void groups_free(struct group_info *group_info)
1158 {
1159         if (group_info->blocks[0] != group_info->small_block) {
1160                 int i;
1161                 for (i = 0; i < group_info->nblocks; i++)
1162                         free_page((unsigned long)group_info->blocks[i]);
1163         }
1164         kfree(group_info);
1165 }
1166
1167 EXPORT_SYMBOL(groups_free);
1168
1169 /* export the group_info to a user-space array */
1170 static int groups_to_user(gid_t __user *grouplist,
1171                           const struct group_info *group_info)
1172 {
1173         int i;
1174         unsigned int count = group_info->ngroups;
1175
1176         for (i = 0; i < group_info->nblocks; i++) {
1177                 unsigned int cp_count = min(NGROUPS_PER_BLOCK, count);
1178                 unsigned int len = cp_count * sizeof(*grouplist);
1179
1180                 if (copy_to_user(grouplist, group_info->blocks[i], len))
1181                         return -EFAULT;
1182
1183                 grouplist += NGROUPS_PER_BLOCK;
1184                 count -= cp_count;
1185         }
1186         return 0;
1187 }
1188
1189 /* fill a group_info from a user-space array - it must be allocated already */
1190 static int groups_from_user(struct group_info *group_info,
1191     gid_t __user *grouplist)
1192 {
1193         int i;
1194         unsigned int count = group_info->ngroups;
1195
1196         for (i = 0; i < group_info->nblocks; i++) {
1197                 unsigned int cp_count = min(NGROUPS_PER_BLOCK, count);
1198                 unsigned int len = cp_count * sizeof(*grouplist);
1199
1200                 if (copy_from_user(group_info->blocks[i], grouplist, len))
1201                         return -EFAULT;
1202
1203                 grouplist += NGROUPS_PER_BLOCK;
1204                 count -= cp_count;
1205         }
1206         return 0;
1207 }
1208
1209 /* a simple Shell sort */
1210 static void groups_sort(struct group_info *group_info)
1211 {
1212         int base, max, stride;
1213         int gidsetsize = group_info->ngroups;
1214
1215         for (stride = 1; stride < gidsetsize; stride = 3 * stride + 1)
1216                 ; /* nothing */
1217         stride /= 3;
1218
1219         while (stride) {
1220                 max = gidsetsize - stride;
1221                 for (base = 0; base < max; base++) {
1222                         int left = base;
1223                         int right = left + stride;
1224                         gid_t tmp = GROUP_AT(group_info, right);
1225
1226                         while (left >= 0 && GROUP_AT(group_info, left) > tmp) {
1227                                 GROUP_AT(group_info, right) =
1228                                     GROUP_AT(group_info, left);
1229                                 right = left;
1230                                 left -= stride;
1231                         }
1232                         GROUP_AT(group_info, right) = tmp;
1233                 }
1234                 stride /= 3;
1235         }
1236 }
1237
1238 /* a simple bsearch */
1239 int groups_search(const struct group_info *group_info, gid_t grp)
1240 {
1241         unsigned int left, right;
1242
1243         if (!group_info)
1244                 return 0;
1245
1246         left = 0;
1247         right = group_info->ngroups;
1248         while (left < right) {
1249                 unsigned int mid = (left+right)/2;
1250                 int cmp = grp - GROUP_AT(group_info, mid);
1251                 if (cmp > 0)
1252                         left = mid + 1;
1253                 else if (cmp < 0)
1254                         right = mid;
1255                 else
1256                         return 1;
1257         }
1258         return 0;
1259 }
1260
1261 /**
1262  * set_groups - Change a group subscription in a set of credentials
1263  * @new: The newly prepared set of credentials to alter
1264  * @group_info: The group list to install
1265  *
1266  * Validate a group subscription and, if valid, insert it into a set
1267  * of credentials.
1268  */
1269 int set_groups(struct cred *new, struct group_info *group_info)
1270 {
1271         int retval;
1272
1273         retval = security_task_setgroups(group_info);
1274         if (retval)
1275                 return retval;
1276
1277         put_group_info(new->group_info);
1278         groups_sort(group_info);
1279         get_group_info(group_info);
1280         new->group_info = group_info;
1281         return 0;
1282 }
1283
1284 EXPORT_SYMBOL(set_groups);
1285
1286 /**
1287  * set_current_groups - Change current's group subscription
1288  * @group_info: The group list to impose
1289  *
1290  * Validate a group subscription and, if valid, impose it upon current's task
1291  * security record.
1292  */
1293 int set_current_groups(struct group_info *group_info)
1294 {
1295         struct cred *new;
1296         int ret;
1297
1298         new = prepare_creds();
1299         if (!new)
1300                 return -ENOMEM;
1301
1302         ret = set_groups(new, group_info);
1303         if (ret < 0) {
1304                 abort_creds(new);
1305                 return ret;
1306         }
1307
1308         return commit_creds(new);
1309 }
1310
1311 EXPORT_SYMBOL(set_current_groups);
1312
1313 asmlinkage long sys_getgroups(int gidsetsize, gid_t __user *grouplist)
1314 {
1315         const struct cred *cred = current_cred();
1316         int i;
1317
1318         if (gidsetsize < 0)
1319                 return -EINVAL;
1320
1321         /* no need to grab task_lock here; it cannot change */
1322         i = cred->group_info->ngroups;
1323         if (gidsetsize) {
1324                 if (i > gidsetsize) {
1325                         i = -EINVAL;
1326                         goto out;
1327                 }
1328                 if (groups_to_user(grouplist, cred->group_info)) {
1329                         i = -EFAULT;
1330                         goto out;
1331                 }
1332         }
1333 out:
1334         return i;
1335 }
1336
1337 /*
1338  *      SMP: Our groups are copy-on-write. We can set them safely
1339  *      without another task interfering.
1340  */
1341  
1342 asmlinkage long sys_setgroups(int gidsetsize, gid_t __user *grouplist)
1343 {
1344         struct group_info *group_info;
1345         int retval;
1346
1347         if (!capable(CAP_SETGID))
1348                 return -EPERM;
1349         if ((unsigned)gidsetsize > NGROUPS_MAX)
1350                 return -EINVAL;
1351
1352         group_info = groups_alloc(gidsetsize);
1353         if (!group_info)
1354                 return -ENOMEM;
1355         retval = groups_from_user(group_info, grouplist);
1356         if (retval) {
1357                 put_group_info(group_info);
1358                 return retval;
1359         }
1360
1361         retval = set_current_groups(group_info);
1362         put_group_info(group_info);
1363
1364         return retval;
1365 }
1366
1367 /*
1368  * Check whether we're fsgid/egid or in the supplemental group..
1369  */
1370 int in_group_p(gid_t grp)
1371 {
1372         const struct cred *cred = current_cred();
1373         int retval = 1;
1374
1375         if (grp != cred->fsgid)
1376                 retval = groups_search(cred->group_info, grp);
1377         return retval;
1378 }
1379
1380 EXPORT_SYMBOL(in_group_p);
1381
1382 int in_egroup_p(gid_t grp)
1383 {
1384         const struct cred *cred = current_cred();
1385         int retval = 1;
1386
1387         if (grp != cred->egid)
1388                 retval = groups_search(cred->group_info, grp);
1389         return retval;
1390 }
1391
1392 EXPORT_SYMBOL(in_egroup_p);
1393
1394 DECLARE_RWSEM(uts_sem);
1395
1396 asmlinkage long sys_newuname(struct new_utsname __user * name)
1397 {
1398         int errno = 0;
1399
1400         down_read(&uts_sem);
1401         if (copy_to_user(name, utsname(), sizeof *name))
1402                 errno = -EFAULT;
1403         up_read(&uts_sem);
1404         return errno;
1405 }
1406
1407 asmlinkage long sys_sethostname(char __user *name, int len)
1408 {
1409         int errno;
1410         char tmp[__NEW_UTS_LEN];
1411
1412         if (!capable(CAP_SYS_ADMIN))
1413                 return -EPERM;
1414         if (len < 0 || len > __NEW_UTS_LEN)
1415                 return -EINVAL;
1416         down_write(&uts_sem);
1417         errno = -EFAULT;
1418         if (!copy_from_user(tmp, name, len)) {
1419                 struct new_utsname *u = utsname();
1420
1421                 memcpy(u->nodename, tmp, len);
1422                 memset(u->nodename + len, 0, sizeof(u->nodename) - len);
1423                 errno = 0;
1424         }
1425         up_write(&uts_sem);
1426         return errno;
1427 }
1428
1429 #ifdef __ARCH_WANT_SYS_GETHOSTNAME
1430
1431 asmlinkage long sys_gethostname(char __user *name, int len)
1432 {
1433         int i, errno;
1434         struct new_utsname *u;
1435
1436         if (len < 0)
1437                 return -EINVAL;
1438         down_read(&uts_sem);
1439         u = utsname();
1440         i = 1 + strlen(u->nodename);
1441         if (i > len)
1442                 i = len;
1443         errno = 0;
1444         if (copy_to_user(name, u->nodename, i))
1445                 errno = -EFAULT;
1446         up_read(&uts_sem);
1447         return errno;
1448 }
1449
1450 #endif
1451
1452 /*
1453  * Only setdomainname; getdomainname can be implemented by calling
1454  * uname()
1455  */
1456 asmlinkage long sys_setdomainname(char __user *name, int len)
1457 {
1458         int errno;
1459         char tmp[__NEW_UTS_LEN];
1460
1461         if (!capable(CAP_SYS_ADMIN))
1462                 return -EPERM;
1463         if (len < 0 || len > __NEW_UTS_LEN)
1464                 return -EINVAL;
1465
1466         down_write(&uts_sem);
1467         errno = -EFAULT;
1468         if (!copy_from_user(tmp, name, len)) {
1469                 struct new_utsname *u = utsname();
1470
1471                 memcpy(u->domainname, tmp, len);
1472                 memset(u->domainname + len, 0, sizeof(u->domainname) - len);
1473                 errno = 0;
1474         }
1475         up_write(&uts_sem);
1476         return errno;
1477 }
1478
1479 asmlinkage long sys_getrlimit(unsigned int resource, struct rlimit __user *rlim)
1480 {
1481         if (resource >= RLIM_NLIMITS)
1482                 return -EINVAL;
1483         else {
1484                 struct rlimit value;
1485                 task_lock(current->group_leader);
1486                 value = current->signal->rlim[resource];
1487                 task_unlock(current->group_leader);
1488                 return copy_to_user(rlim, &value, sizeof(*rlim)) ? -EFAULT : 0;
1489         }
1490 }
1491
1492 #ifdef __ARCH_WANT_SYS_OLD_GETRLIMIT
1493
1494 /*
1495  *      Back compatibility for getrlimit. Needed for some apps.
1496  */
1497  
1498 asmlinkage long sys_old_getrlimit(unsigned int resource, struct rlimit __user *rlim)
1499 {
1500         struct rlimit x;
1501         if (resource >= RLIM_NLIMITS)
1502                 return -EINVAL;
1503
1504         task_lock(current->group_leader);
1505         x = current->signal->rlim[resource];
1506         task_unlock(current->group_leader);
1507         if (x.rlim_cur > 0x7FFFFFFF)
1508                 x.rlim_cur = 0x7FFFFFFF;
1509         if (x.rlim_max > 0x7FFFFFFF)
1510                 x.rlim_max = 0x7FFFFFFF;
1511         return copy_to_user(rlim, &x, sizeof(x))?-EFAULT:0;
1512 }
1513
1514 #endif
1515
1516 asmlinkage long sys_setrlimit(unsigned int resource, struct rlimit __user *rlim)
1517 {
1518         struct rlimit new_rlim, *old_rlim;
1519         int retval;
1520
1521         if (resource >= RLIM_NLIMITS)
1522                 return -EINVAL;
1523         if (copy_from_user(&new_rlim, rlim, sizeof(*rlim)))
1524                 return -EFAULT;
1525         old_rlim = current->signal->rlim + resource;
1526         if ((new_rlim.rlim_max > old_rlim->rlim_max) &&
1527             !capable(CAP_SYS_RESOURCE))
1528                 return -EPERM;
1529
1530         if (resource == RLIMIT_NOFILE) {
1531                 if (new_rlim.rlim_max == RLIM_INFINITY)
1532                         new_rlim.rlim_max = sysctl_nr_open;
1533                 if (new_rlim.rlim_cur == RLIM_INFINITY)
1534                         new_rlim.rlim_cur = sysctl_nr_open;
1535                 if (new_rlim.rlim_max > sysctl_nr_open)
1536                         return -EPERM;
1537         }
1538
1539         if (new_rlim.rlim_cur > new_rlim.rlim_max)
1540                 return -EINVAL;
1541
1542         retval = security_task_setrlimit(resource, &new_rlim);
1543         if (retval)
1544                 return retval;
1545
1546         if (resource == RLIMIT_CPU && new_rlim.rlim_cur == 0) {
1547                 /*
1548                  * The caller is asking for an immediate RLIMIT_CPU
1549                  * expiry.  But we use the zero value to mean "it was
1550                  * never set".  So let's cheat and make it one second
1551                  * instead
1552                  */
1553                 new_rlim.rlim_cur = 1;
1554         }
1555
1556         task_lock(current->group_leader);
1557         *old_rlim = new_rlim;
1558         task_unlock(current->group_leader);
1559
1560         if (resource != RLIMIT_CPU)
1561                 goto out;
1562
1563         /*
1564          * RLIMIT_CPU handling.   Note that the kernel fails to return an error
1565          * code if it rejected the user's attempt to set RLIMIT_CPU.  This is a
1566          * very long-standing error, and fixing it now risks breakage of
1567          * applications, so we live with it
1568          */
1569         if (new_rlim.rlim_cur == RLIM_INFINITY)
1570                 goto out;
1571
1572         update_rlimit_cpu(new_rlim.rlim_cur);
1573 out:
1574         return 0;
1575 }
1576
1577 /*
1578  * It would make sense to put struct rusage in the task_struct,
1579  * except that would make the task_struct be *really big*.  After
1580  * task_struct gets moved into malloc'ed memory, it would
1581  * make sense to do this.  It will make moving the rest of the information
1582  * a lot simpler!  (Which we're not doing right now because we're not
1583  * measuring them yet).
1584  *
1585  * When sampling multiple threads for RUSAGE_SELF, under SMP we might have
1586  * races with threads incrementing their own counters.  But since word
1587  * reads are atomic, we either get new values or old values and we don't
1588  * care which for the sums.  We always take the siglock to protect reading
1589  * the c* fields from p->signal from races with exit.c updating those
1590  * fields when reaping, so a sample either gets all the additions of a
1591  * given child after it's reaped, or none so this sample is before reaping.
1592  *
1593  * Locking:
1594  * We need to take the siglock for CHILDEREN, SELF and BOTH
1595  * for  the cases current multithreaded, non-current single threaded
1596  * non-current multithreaded.  Thread traversal is now safe with
1597  * the siglock held.
1598  * Strictly speaking, we donot need to take the siglock if we are current and
1599  * single threaded,  as no one else can take our signal_struct away, no one
1600  * else can  reap the  children to update signal->c* counters, and no one else
1601  * can race with the signal-> fields. If we do not take any lock, the
1602  * signal-> fields could be read out of order while another thread was just
1603  * exiting. So we should  place a read memory barrier when we avoid the lock.
1604  * On the writer side,  write memory barrier is implied in  __exit_signal
1605  * as __exit_signal releases  the siglock spinlock after updating the signal->
1606  * fields. But we don't do this yet to keep things simple.
1607  *
1608  */
1609
1610 static void accumulate_thread_rusage(struct task_struct *t, struct rusage *r)
1611 {
1612         r->ru_nvcsw += t->nvcsw;
1613         r->ru_nivcsw += t->nivcsw;
1614         r->ru_minflt += t->min_flt;
1615         r->ru_majflt += t->maj_flt;
1616         r->ru_inblock += task_io_get_inblock(t);
1617         r->ru_oublock += task_io_get_oublock(t);
1618 }
1619
1620 static void k_getrusage(struct task_struct *p, int who, struct rusage *r)
1621 {
1622         struct task_struct *t;
1623         unsigned long flags;
1624         cputime_t utime, stime;
1625         struct task_cputime cputime;
1626
1627         memset((char *) r, 0, sizeof *r);
1628         utime = stime = cputime_zero;
1629
1630         if (who == RUSAGE_THREAD) {
1631                 accumulate_thread_rusage(p, r);
1632                 goto out;
1633         }
1634
1635         if (!lock_task_sighand(p, &flags))
1636                 return;
1637
1638         switch (who) {
1639                 case RUSAGE_BOTH:
1640                 case RUSAGE_CHILDREN:
1641                         utime = p->signal->cutime;
1642                         stime = p->signal->cstime;
1643                         r->ru_nvcsw = p->signal->cnvcsw;
1644                         r->ru_nivcsw = p->signal->cnivcsw;
1645                         r->ru_minflt = p->signal->cmin_flt;
1646                         r->ru_majflt = p->signal->cmaj_flt;
1647                         r->ru_inblock = p->signal->cinblock;
1648                         r->ru_oublock = p->signal->coublock;
1649
1650                         if (who == RUSAGE_CHILDREN)
1651                                 break;
1652
1653                 case RUSAGE_SELF:
1654                         thread_group_cputime(p, &cputime);
1655                         utime = cputime_add(utime, cputime.utime);
1656                         stime = cputime_add(stime, cputime.stime);
1657                         r->ru_nvcsw += p->signal->nvcsw;
1658                         r->ru_nivcsw += p->signal->nivcsw;
1659                         r->ru_minflt += p->signal->min_flt;
1660                         r->ru_majflt += p->signal->maj_flt;
1661                         r->ru_inblock += p->signal->inblock;
1662                         r->ru_oublock += p->signal->oublock;
1663                         t = p;
1664                         do {
1665                                 accumulate_thread_rusage(t, r);
1666                                 t = next_thread(t);
1667                         } while (t != p);
1668                         break;
1669
1670                 default:
1671                         BUG();
1672         }
1673         unlock_task_sighand(p, &flags);
1674
1675 out:
1676         cputime_to_timeval(utime, &r->ru_utime);
1677         cputime_to_timeval(stime, &r->ru_stime);
1678 }
1679
1680 int getrusage(struct task_struct *p, int who, struct rusage __user *ru)
1681 {
1682         struct rusage r;
1683         k_getrusage(p, who, &r);
1684         return copy_to_user(ru, &r, sizeof(r)) ? -EFAULT : 0;
1685 }
1686
1687 asmlinkage long sys_getrusage(int who, struct rusage __user *ru)
1688 {
1689         if (who != RUSAGE_SELF && who != RUSAGE_CHILDREN &&
1690             who != RUSAGE_THREAD)
1691                 return -EINVAL;
1692         return getrusage(current, who, ru);
1693 }
1694
1695 asmlinkage long sys_umask(int mask)
1696 {
1697         mask = xchg(&current->fs->umask, mask & S_IRWXUGO);
1698         return mask;
1699 }
1700
1701 asmlinkage long sys_prctl(int option, unsigned long arg2, unsigned long arg3,
1702                           unsigned long arg4, unsigned long arg5)
1703 {
1704         struct task_struct *me = current;
1705         unsigned char comm[sizeof(me->comm)];
1706         long error;
1707
1708         error = security_task_prctl(option, arg2, arg3, arg4, arg5);
1709         if (error != -ENOSYS)
1710                 return error;
1711
1712         error = 0;
1713         switch (option) {
1714                 case PR_SET_PDEATHSIG:
1715                         if (!valid_signal(arg2)) {
1716                                 error = -EINVAL;
1717                                 break;
1718                         }
1719                         me->pdeath_signal = arg2;
1720                         error = 0;
1721                         break;
1722                 case PR_GET_PDEATHSIG:
1723                         error = put_user(me->pdeath_signal, (int __user *)arg2);
1724                         break;
1725                 case PR_GET_DUMPABLE:
1726                         error = get_dumpable(me->mm);
1727                         break;
1728                 case PR_SET_DUMPABLE:
1729                         if (arg2 < 0 || arg2 > 1) {
1730                                 error = -EINVAL;
1731                                 break;
1732                         }
1733                         set_dumpable(me->mm, arg2);
1734                         error = 0;
1735                         break;
1736
1737                 case PR_SET_UNALIGN:
1738                         error = SET_UNALIGN_CTL(me, arg2);
1739                         break;
1740                 case PR_GET_UNALIGN:
1741                         error = GET_UNALIGN_CTL(me, arg2);
1742                         break;
1743                 case PR_SET_FPEMU:
1744                         error = SET_FPEMU_CTL(me, arg2);
1745                         break;
1746                 case PR_GET_FPEMU:
1747                         error = GET_FPEMU_CTL(me, arg2);
1748                         break;
1749                 case PR_SET_FPEXC:
1750                         error = SET_FPEXC_CTL(me, arg2);
1751                         break;
1752                 case PR_GET_FPEXC:
1753                         error = GET_FPEXC_CTL(me, arg2);
1754                         break;
1755                 case PR_GET_TIMING:
1756                         error = PR_TIMING_STATISTICAL;
1757                         break;
1758                 case PR_SET_TIMING:
1759                         if (arg2 != PR_TIMING_STATISTICAL)
1760                                 error = -EINVAL;
1761                         else
1762                                 error = 0;
1763                         break;
1764
1765                 case PR_SET_NAME:
1766                         comm[sizeof(me->comm)-1] = 0;
1767                         if (strncpy_from_user(comm, (char __user *)arg2,
1768                                               sizeof(me->comm) - 1) < 0)
1769                                 return -EFAULT;
1770                         set_task_comm(me, comm);
1771                         return 0;
1772                 case PR_GET_NAME:
1773                         get_task_comm(comm, me);
1774                         if (copy_to_user((char __user *)arg2, comm,
1775                                          sizeof(comm)))
1776                                 return -EFAULT;
1777                         return 0;
1778                 case PR_GET_ENDIAN:
1779                         error = GET_ENDIAN(me, arg2);
1780                         break;
1781                 case PR_SET_ENDIAN:
1782                         error = SET_ENDIAN(me, arg2);
1783                         break;
1784
1785                 case PR_GET_SECCOMP:
1786                         error = prctl_get_seccomp();
1787                         break;
1788                 case PR_SET_SECCOMP:
1789                         error = prctl_set_seccomp(arg2);
1790                         break;
1791                 case PR_GET_TSC:
1792                         error = GET_TSC_CTL(arg2);
1793                         break;
1794                 case PR_SET_TSC:
1795                         error = SET_TSC_CTL(arg2);
1796                         break;
1797                 case PR_TASK_PERF_COUNTERS_DISABLE:
1798                         error = perf_counter_task_disable();
1799                         break;
1800                 case PR_TASK_PERF_COUNTERS_ENABLE:
1801                         error = perf_counter_task_enable();
1802                         break;
1803                 case PR_GET_TIMERSLACK:
1804                         error = current->timer_slack_ns;
1805                         break;
1806                 case PR_SET_TIMERSLACK:
1807                         if (arg2 <= 0)
1808                                 current->timer_slack_ns =
1809                                         current->default_timer_slack_ns;
1810                         else
1811                                 current->timer_slack_ns = arg2;
1812                         error = 0;
1813                         break;
1814                 default:
1815                         error = -EINVAL;
1816                         break;
1817         }
1818         return error;
1819 }
1820
1821 asmlinkage long sys_getcpu(unsigned __user *cpup, unsigned __user *nodep,
1822                            struct getcpu_cache __user *unused)
1823 {
1824         int err = 0;
1825         int cpu = raw_smp_processor_id();
1826         if (cpup)
1827                 err |= put_user(cpu, cpup);
1828         if (nodep)
1829                 err |= put_user(cpu_to_node(cpu), nodep);
1830         return err ? -EFAULT : 0;
1831 }
1832
1833 char poweroff_cmd[POWEROFF_CMD_PATH_LEN] = "/sbin/poweroff";
1834
1835 static void argv_cleanup(char **argv, char **envp)
1836 {
1837         argv_free(argv);
1838 }
1839
1840 /**
1841  * orderly_poweroff - Trigger an orderly system poweroff
1842  * @force: force poweroff if command execution fails
1843  *
1844  * This may be called from any context to trigger a system shutdown.
1845  * If the orderly shutdown fails, it will force an immediate shutdown.
1846  */
1847 int orderly_poweroff(bool force)
1848 {
1849         int argc;
1850         char **argv = argv_split(GFP_ATOMIC, poweroff_cmd, &argc);
1851         static char *envp[] = {
1852                 "HOME=/",
1853                 "PATH=/sbin:/bin:/usr/sbin:/usr/bin",
1854                 NULL
1855         };
1856         int ret = -ENOMEM;
1857         struct subprocess_info *info;
1858
1859         if (argv == NULL) {
1860                 printk(KERN_WARNING "%s failed to allocate memory for \"%s\"\n",
1861                        __func__, poweroff_cmd);
1862                 goto out;
1863         }
1864
1865         info = call_usermodehelper_setup(argv[0], argv, envp, GFP_ATOMIC);
1866         if (info == NULL) {
1867                 argv_free(argv);
1868                 goto out;
1869         }
1870
1871         call_usermodehelper_setcleanup(info, argv_cleanup);
1872
1873         ret = call_usermodehelper_exec(info, UMH_NO_WAIT);
1874
1875   out:
1876         if (ret && force) {
1877                 printk(KERN_WARNING "Failed to start orderly shutdown: "
1878                        "forcing the issue\n");
1879
1880                 /* I guess this should try to kick off some daemon to
1881                    sync and poweroff asap.  Or not even bother syncing
1882                    if we're doing an emergency shutdown? */
1883                 emergency_sync();
1884                 kernel_power_off();
1885         }
1886
1887         return ret;
1888 }
1889 EXPORT_SYMBOL_GPL(orderly_poweroff);