2 * linux/kernel/signal.c
4 * Copyright (C) 1991, 1992 Linus Torvalds
6 * 1997-11-02 Modified for POSIX.1b signals by Richard Henderson
8 * 2003-06-02 Jim Houston - Concurrent Computer Corp.
9 * Changes to use preallocated sigqueue structures
10 * to allow signals to be sent reliably.
13 #include <linux/config.h>
14 #include <linux/slab.h>
15 #include <linux/module.h>
16 #include <linux/smp_lock.h>
17 #include <linux/init.h>
18 #include <linux/sched.h>
20 #include <linux/tty.h>
21 #include <linux/binfmts.h>
22 #include <linux/security.h>
23 #include <linux/syscalls.h>
24 #include <linux/ptrace.h>
25 #include <linux/posix-timers.h>
26 #include <linux/signal.h>
27 #include <linux/audit.h>
28 #include <asm/param.h>
29 #include <asm/uaccess.h>
30 #include <asm/unistd.h>
31 #include <asm/siginfo.h>
34 * SLAB caches for signal bits.
37 static kmem_cache_t *sigqueue_cachep;
40 * In POSIX a signal is sent either to a specific thread (Linux task)
41 * or to the process as a whole (Linux thread group). How the signal
42 * is sent determines whether it's to one thread or the whole group,
43 * which determines which signal mask(s) are involved in blocking it
44 * from being delivered until later. When the signal is delivered,
45 * either it's caught or ignored by a user handler or it has a default
46 * effect that applies to the whole thread group (POSIX process).
48 * The possible effects an unblocked signal set to SIG_DFL can have are:
49 * ignore - Nothing Happens
50 * terminate - kill the process, i.e. all threads in the group,
51 * similar to exit_group. The group leader (only) reports
52 * WIFSIGNALED status to its parent.
53 * coredump - write a core dump file describing all threads using
54 * the same mm and then kill all those threads
55 * stop - stop all the threads in the group, i.e. TASK_STOPPED state
57 * SIGKILL and SIGSTOP cannot be caught, blocked, or ignored.
58 * Other signals when not blocked and set to SIG_DFL behaves as follows.
59 * The job control signals also have other special effects.
61 * +--------------------+------------------+
62 * | POSIX signal | default action |
63 * +--------------------+------------------+
64 * | SIGHUP | terminate |
65 * | SIGINT | terminate |
66 * | SIGQUIT | coredump |
67 * | SIGILL | coredump |
68 * | SIGTRAP | coredump |
69 * | SIGABRT/SIGIOT | coredump |
70 * | SIGBUS | coredump |
71 * | SIGFPE | coredump |
72 * | SIGKILL | terminate(+) |
73 * | SIGUSR1 | terminate |
74 * | SIGSEGV | coredump |
75 * | SIGUSR2 | terminate |
76 * | SIGPIPE | terminate |
77 * | SIGALRM | terminate |
78 * | SIGTERM | terminate |
79 * | SIGCHLD | ignore |
80 * | SIGCONT | ignore(*) |
81 * | SIGSTOP | stop(*)(+) |
82 * | SIGTSTP | stop(*) |
83 * | SIGTTIN | stop(*) |
84 * | SIGTTOU | stop(*) |
86 * | SIGXCPU | coredump |
87 * | SIGXFSZ | coredump |
88 * | SIGVTALRM | terminate |
89 * | SIGPROF | terminate |
90 * | SIGPOLL/SIGIO | terminate |
91 * | SIGSYS/SIGUNUSED | coredump |
92 * | SIGSTKFLT | terminate |
93 * | SIGWINCH | ignore |
94 * | SIGPWR | terminate |
95 * | SIGRTMIN-SIGRTMAX | terminate |
96 * +--------------------+------------------+
97 * | non-POSIX signal | default action |
98 * +--------------------+------------------+
99 * | SIGEMT | coredump |
100 * +--------------------+------------------+
102 * (+) For SIGKILL and SIGSTOP the action is "always", not just "default".
103 * (*) Special job control effects:
104 * When SIGCONT is sent, it resumes the process (all threads in the group)
105 * from TASK_STOPPED state and also clears any pending/queued stop signals
106 * (any of those marked with "stop(*)"). This happens regardless of blocking,
107 * catching, or ignoring SIGCONT. When any stop signal is sent, it clears
108 * any pending/queued SIGCONT signals; this happens regardless of blocking,
109 * catching, or ignored the stop signal, though (except for SIGSTOP) the
110 * default action of stopping the process may happen later or never.
114 #define M_SIGEMT M(SIGEMT)
119 #if SIGRTMIN > BITS_PER_LONG
120 #define M(sig) (1ULL << ((sig)-1))
122 #define M(sig) (1UL << ((sig)-1))
124 #define T(sig, mask) (M(sig) & (mask))
126 #define SIG_KERNEL_ONLY_MASK (\
127 M(SIGKILL) | M(SIGSTOP) )
129 #define SIG_KERNEL_STOP_MASK (\
130 M(SIGSTOP) | M(SIGTSTP) | M(SIGTTIN) | M(SIGTTOU) )
132 #define SIG_KERNEL_COREDUMP_MASK (\
133 M(SIGQUIT) | M(SIGILL) | M(SIGTRAP) | M(SIGABRT) | \
134 M(SIGFPE) | M(SIGSEGV) | M(SIGBUS) | M(SIGSYS) | \
135 M(SIGXCPU) | M(SIGXFSZ) | M_SIGEMT )
137 #define SIG_KERNEL_IGNORE_MASK (\
138 M(SIGCONT) | M(SIGCHLD) | M(SIGWINCH) | M(SIGURG) )
140 #define sig_kernel_only(sig) \
141 (((sig) < SIGRTMIN) && T(sig, SIG_KERNEL_ONLY_MASK))
142 #define sig_kernel_coredump(sig) \
143 (((sig) < SIGRTMIN) && T(sig, SIG_KERNEL_COREDUMP_MASK))
144 #define sig_kernel_ignore(sig) \
145 (((sig) < SIGRTMIN) && T(sig, SIG_KERNEL_IGNORE_MASK))
146 #define sig_kernel_stop(sig) \
147 (((sig) < SIGRTMIN) && T(sig, SIG_KERNEL_STOP_MASK))
149 #define sig_user_defined(t, signr) \
150 (((t)->sighand->action[(signr)-1].sa.sa_handler != SIG_DFL) && \
151 ((t)->sighand->action[(signr)-1].sa.sa_handler != SIG_IGN))
153 #define sig_fatal(t, signr) \
154 (!T(signr, SIG_KERNEL_IGNORE_MASK|SIG_KERNEL_STOP_MASK) && \
155 (t)->sighand->action[(signr)-1].sa.sa_handler == SIG_DFL)
157 static int sig_ignored(struct task_struct *t, int sig)
159 void __user * handler;
162 * Tracers always want to know about signals..
164 if (t->ptrace & PT_PTRACED)
168 * Blocked signals are never ignored, since the
169 * signal handler may change by the time it is
172 if (sigismember(&t->blocked, sig))
175 /* Is it explicitly or implicitly ignored? */
176 handler = t->sighand->action[sig-1].sa.sa_handler;
177 return handler == SIG_IGN ||
178 (handler == SIG_DFL && sig_kernel_ignore(sig));
182 * Re-calculate pending state from the set of locally pending
183 * signals, globally pending signals, and blocked signals.
185 static inline int has_pending_signals(sigset_t *signal, sigset_t *blocked)
190 switch (_NSIG_WORDS) {
192 for (i = _NSIG_WORDS, ready = 0; --i >= 0 ;)
193 ready |= signal->sig[i] &~ blocked->sig[i];
196 case 4: ready = signal->sig[3] &~ blocked->sig[3];
197 ready |= signal->sig[2] &~ blocked->sig[2];
198 ready |= signal->sig[1] &~ blocked->sig[1];
199 ready |= signal->sig[0] &~ blocked->sig[0];
202 case 2: ready = signal->sig[1] &~ blocked->sig[1];
203 ready |= signal->sig[0] &~ blocked->sig[0];
206 case 1: ready = signal->sig[0] &~ blocked->sig[0];
211 #define PENDING(p,b) has_pending_signals(&(p)->signal, (b))
213 fastcall void recalc_sigpending_tsk(struct task_struct *t)
215 if (t->signal->group_stop_count > 0 ||
217 PENDING(&t->pending, &t->blocked) ||
218 PENDING(&t->signal->shared_pending, &t->blocked))
219 set_tsk_thread_flag(t, TIF_SIGPENDING);
221 clear_tsk_thread_flag(t, TIF_SIGPENDING);
224 void recalc_sigpending(void)
226 recalc_sigpending_tsk(current);
229 /* Given the mask, find the first available signal that should be serviced. */
232 next_signal(struct sigpending *pending, sigset_t *mask)
234 unsigned long i, *s, *m, x;
237 s = pending->signal.sig;
239 switch (_NSIG_WORDS) {
241 for (i = 0; i < _NSIG_WORDS; ++i, ++s, ++m)
242 if ((x = *s &~ *m) != 0) {
243 sig = ffz(~x) + i*_NSIG_BPW + 1;
248 case 2: if ((x = s[0] &~ m[0]) != 0)
250 else if ((x = s[1] &~ m[1]) != 0)
257 case 1: if ((x = *s &~ *m) != 0)
265 static struct sigqueue *__sigqueue_alloc(struct task_struct *t, gfp_t flags,
268 struct sigqueue *q = NULL;
270 atomic_inc(&t->user->sigpending);
271 if (override_rlimit ||
272 atomic_read(&t->user->sigpending) <=
273 t->signal->rlim[RLIMIT_SIGPENDING].rlim_cur)
274 q = kmem_cache_alloc(sigqueue_cachep, flags);
275 if (unlikely(q == NULL)) {
276 atomic_dec(&t->user->sigpending);
278 INIT_LIST_HEAD(&q->list);
281 q->user = get_uid(t->user);
286 static inline void __sigqueue_free(struct sigqueue *q)
288 if (q->flags & SIGQUEUE_PREALLOC)
290 atomic_dec(&q->user->sigpending);
292 kmem_cache_free(sigqueue_cachep, q);
295 static void flush_sigqueue(struct sigpending *queue)
299 sigemptyset(&queue->signal);
300 while (!list_empty(&queue->list)) {
301 q = list_entry(queue->list.next, struct sigqueue , list);
302 list_del_init(&q->list);
308 * Flush all pending signals for a task.
312 flush_signals(struct task_struct *t)
316 spin_lock_irqsave(&t->sighand->siglock, flags);
317 clear_tsk_thread_flag(t,TIF_SIGPENDING);
318 flush_sigqueue(&t->pending);
319 flush_sigqueue(&t->signal->shared_pending);
320 spin_unlock_irqrestore(&t->sighand->siglock, flags);
324 * This function expects the tasklist_lock write-locked.
326 void __exit_sighand(struct task_struct *tsk)
328 struct sighand_struct * sighand = tsk->sighand;
330 /* Ok, we're done with the signal handlers */
332 if (atomic_dec_and_test(&sighand->count))
333 kmem_cache_free(sighand_cachep, sighand);
336 void exit_sighand(struct task_struct *tsk)
338 write_lock_irq(&tasklist_lock);
340 write_unlock_irq(&tasklist_lock);
344 * This function expects the tasklist_lock write-locked.
346 void __exit_signal(struct task_struct *tsk)
348 struct signal_struct * sig = tsk->signal;
349 struct sighand_struct * sighand = tsk->sighand;
353 if (!atomic_read(&sig->count))
355 spin_lock(&sighand->siglock);
356 posix_cpu_timers_exit(tsk);
357 if (atomic_dec_and_test(&sig->count)) {
358 posix_cpu_timers_exit_group(tsk);
359 if (tsk == sig->curr_target)
360 sig->curr_target = next_thread(tsk);
362 spin_unlock(&sighand->siglock);
363 flush_sigqueue(&sig->shared_pending);
366 * If there is any task waiting for the group exit
369 if (sig->group_exit_task && atomic_read(&sig->count) == sig->notify_count) {
370 wake_up_process(sig->group_exit_task);
371 sig->group_exit_task = NULL;
373 if (tsk == sig->curr_target)
374 sig->curr_target = next_thread(tsk);
377 * Accumulate here the counters for all threads but the
378 * group leader as they die, so they can be added into
379 * the process-wide totals when those are taken.
380 * The group leader stays around as a zombie as long
381 * as there are other threads. When it gets reaped,
382 * the exit.c code will add its counts into these totals.
383 * We won't ever get here for the group leader, since it
384 * will have been the last reference on the signal_struct.
386 sig->utime = cputime_add(sig->utime, tsk->utime);
387 sig->stime = cputime_add(sig->stime, tsk->stime);
388 sig->min_flt += tsk->min_flt;
389 sig->maj_flt += tsk->maj_flt;
390 sig->nvcsw += tsk->nvcsw;
391 sig->nivcsw += tsk->nivcsw;
392 sig->sched_time += tsk->sched_time;
393 spin_unlock(&sighand->siglock);
394 sig = NULL; /* Marker for below. */
396 clear_tsk_thread_flag(tsk,TIF_SIGPENDING);
397 flush_sigqueue(&tsk->pending);
400 * We are cleaning up the signal_struct here.
402 exit_thread_group_keys(sig);
403 kmem_cache_free(signal_cachep, sig);
407 void exit_signal(struct task_struct *tsk)
409 atomic_dec(&tsk->signal->live);
411 write_lock_irq(&tasklist_lock);
413 write_unlock_irq(&tasklist_lock);
417 * Flush all handlers for a task.
421 flush_signal_handlers(struct task_struct *t, int force_default)
424 struct k_sigaction *ka = &t->sighand->action[0];
425 for (i = _NSIG ; i != 0 ; i--) {
426 if (force_default || ka->sa.sa_handler != SIG_IGN)
427 ka->sa.sa_handler = SIG_DFL;
429 sigemptyset(&ka->sa.sa_mask);
435 /* Notify the system that a driver wants to block all signals for this
436 * process, and wants to be notified if any signals at all were to be
437 * sent/acted upon. If the notifier routine returns non-zero, then the
438 * signal will be acted upon after all. If the notifier routine returns 0,
439 * then then signal will be blocked. Only one block per process is
440 * allowed. priv is a pointer to private data that the notifier routine
441 * can use to determine if the signal should be blocked or not. */
444 block_all_signals(int (*notifier)(void *priv), void *priv, sigset_t *mask)
448 spin_lock_irqsave(¤t->sighand->siglock, flags);
449 current->notifier_mask = mask;
450 current->notifier_data = priv;
451 current->notifier = notifier;
452 spin_unlock_irqrestore(¤t->sighand->siglock, flags);
455 /* Notify the system that blocking has ended. */
458 unblock_all_signals(void)
462 spin_lock_irqsave(¤t->sighand->siglock, flags);
463 current->notifier = NULL;
464 current->notifier_data = NULL;
466 spin_unlock_irqrestore(¤t->sighand->siglock, flags);
469 static inline int collect_signal(int sig, struct sigpending *list, siginfo_t *info)
471 struct sigqueue *q, *first = NULL;
472 int still_pending = 0;
474 if (unlikely(!sigismember(&list->signal, sig)))
478 * Collect the siginfo appropriate to this signal. Check if
479 * there is another siginfo for the same signal.
481 list_for_each_entry(q, &list->list, list) {
482 if (q->info.si_signo == sig) {
491 list_del_init(&first->list);
492 copy_siginfo(info, &first->info);
493 __sigqueue_free(first);
495 sigdelset(&list->signal, sig);
498 /* Ok, it wasn't in the queue. This must be
499 a fast-pathed signal or we must have been
500 out of queue space. So zero out the info.
502 sigdelset(&list->signal, sig);
503 info->si_signo = sig;
512 static int __dequeue_signal(struct sigpending *pending, sigset_t *mask,
517 /* SIGKILL must have priority, otherwise it is quite easy
518 * to create an unkillable process, sending sig < SIGKILL
520 if (unlikely(sigismember(&pending->signal, SIGKILL))) {
521 if (!sigismember(mask, SIGKILL))
526 sig = next_signal(pending, mask);
528 if (current->notifier) {
529 if (sigismember(current->notifier_mask, sig)) {
530 if (!(current->notifier)(current->notifier_data)) {
531 clear_thread_flag(TIF_SIGPENDING);
537 if (!collect_signal(sig, pending, info))
547 * Dequeue a signal and return the element to the caller, which is
548 * expected to free it.
550 * All callers have to hold the siglock.
552 int dequeue_signal(struct task_struct *tsk, sigset_t *mask, siginfo_t *info)
554 int signr = __dequeue_signal(&tsk->pending, mask, info);
556 signr = __dequeue_signal(&tsk->signal->shared_pending,
558 if (signr && unlikely(sig_kernel_stop(signr))) {
560 * Set a marker that we have dequeued a stop signal. Our
561 * caller might release the siglock and then the pending
562 * stop signal it is about to process is no longer in the
563 * pending bitmasks, but must still be cleared by a SIGCONT
564 * (and overruled by a SIGKILL). So those cases clear this
565 * shared flag after we've set it. Note that this flag may
566 * remain set after the signal we return is ignored or
567 * handled. That doesn't matter because its only purpose
568 * is to alert stop-signal processing code when another
569 * processor has come along and cleared the flag.
571 if (!(tsk->signal->flags & SIGNAL_GROUP_EXIT))
572 tsk->signal->flags |= SIGNAL_STOP_DEQUEUED;
575 ((info->si_code & __SI_MASK) == __SI_TIMER) &&
576 info->si_sys_private){
578 * Release the siglock to ensure proper locking order
579 * of timer locks outside of siglocks. Note, we leave
580 * irqs disabled here, since the posix-timers code is
581 * about to disable them again anyway.
583 spin_unlock(&tsk->sighand->siglock);
584 do_schedule_next_timer(info);
585 spin_lock(&tsk->sighand->siglock);
591 * Tell a process that it has a new active signal..
593 * NOTE! we rely on the previous spin_lock to
594 * lock interrupts for us! We can only be called with
595 * "siglock" held, and the local interrupt must
596 * have been disabled when that got acquired!
598 * No need to set need_resched since signal event passing
599 * goes through ->blocked
601 void signal_wake_up(struct task_struct *t, int resume)
605 set_tsk_thread_flag(t, TIF_SIGPENDING);
608 * For SIGKILL, we want to wake it up in the stopped/traced case.
609 * We don't check t->state here because there is a race with it
610 * executing another processor and just now entering stopped state.
611 * By using wake_up_state, we ensure the process will wake up and
612 * handle its death signal.
614 mask = TASK_INTERRUPTIBLE;
616 mask |= TASK_STOPPED | TASK_TRACED;
617 if (!wake_up_state(t, mask))
622 * Remove signals in mask from the pending set and queue.
623 * Returns 1 if any signals were found.
625 * All callers must be holding the siglock.
627 static int rm_from_queue(unsigned long mask, struct sigpending *s)
629 struct sigqueue *q, *n;
631 if (!sigtestsetmask(&s->signal, mask))
634 sigdelsetmask(&s->signal, mask);
635 list_for_each_entry_safe(q, n, &s->list, list) {
636 if (q->info.si_signo < SIGRTMIN &&
637 (mask & sigmask(q->info.si_signo))) {
638 list_del_init(&q->list);
646 * Bad permissions for sending the signal
648 static int check_kill_permission(int sig, struct siginfo *info,
649 struct task_struct *t)
652 if (!valid_signal(sig))
655 if ((!info || ((unsigned long)info != 1 &&
656 (unsigned long)info != 2 && SI_FROMUSER(info)))
657 && ((sig != SIGCONT) ||
658 (current->signal->session != t->signal->session))
659 && (current->euid ^ t->suid) && (current->euid ^ t->uid)
660 && (current->uid ^ t->suid) && (current->uid ^ t->uid)
661 && !capable(CAP_KILL))
664 error = security_task_kill(t, info, sig);
666 audit_signal_info(sig, t); /* Let audit system see the signal */
671 static void do_notify_parent_cldstop(struct task_struct *tsk,
676 * Handle magic process-wide effects of stop/continue signals.
677 * Unlike the signal actions, these happen immediately at signal-generation
678 * time regardless of blocking, ignoring, or handling. This does the
679 * actual continuing for SIGCONT, but not the actual stopping for stop
680 * signals. The process stop is done as a signal action for SIG_DFL.
682 static void handle_stop_signal(int sig, struct task_struct *p)
684 struct task_struct *t;
686 if (p->signal->flags & SIGNAL_GROUP_EXIT)
688 * The process is in the middle of dying already.
692 if (sig_kernel_stop(sig)) {
694 * This is a stop signal. Remove SIGCONT from all queues.
696 rm_from_queue(sigmask(SIGCONT), &p->signal->shared_pending);
699 rm_from_queue(sigmask(SIGCONT), &t->pending);
702 } else if (sig == SIGCONT) {
704 * Remove all stop signals from all queues,
705 * and wake all threads.
707 if (unlikely(p->signal->group_stop_count > 0)) {
709 * There was a group stop in progress. We'll
710 * pretend it finished before we got here. We are
711 * obliged to report it to the parent: if the
712 * SIGSTOP happened "after" this SIGCONT, then it
713 * would have cleared this pending SIGCONT. If it
714 * happened "before" this SIGCONT, then the parent
715 * got the SIGCHLD about the stop finishing before
716 * the continue happened. We do the notification
717 * now, and it's as if the stop had finished and
718 * the SIGCHLD was pending on entry to this kill.
720 p->signal->group_stop_count = 0;
721 p->signal->flags = SIGNAL_STOP_CONTINUED;
722 spin_unlock(&p->sighand->siglock);
723 do_notify_parent_cldstop(p, (p->ptrace & PT_PTRACED), CLD_STOPPED);
724 spin_lock(&p->sighand->siglock);
726 rm_from_queue(SIG_KERNEL_STOP_MASK, &p->signal->shared_pending);
730 rm_from_queue(SIG_KERNEL_STOP_MASK, &t->pending);
733 * If there is a handler for SIGCONT, we must make
734 * sure that no thread returns to user mode before
735 * we post the signal, in case it was the only
736 * thread eligible to run the signal handler--then
737 * it must not do anything between resuming and
738 * running the handler. With the TIF_SIGPENDING
739 * flag set, the thread will pause and acquire the
740 * siglock that we hold now and until we've queued
741 * the pending signal.
743 * Wake up the stopped thread _after_ setting
746 state = TASK_STOPPED;
747 if (sig_user_defined(t, SIGCONT) && !sigismember(&t->blocked, SIGCONT)) {
748 set_tsk_thread_flag(t, TIF_SIGPENDING);
749 state |= TASK_INTERRUPTIBLE;
751 wake_up_state(t, state);
756 if (p->signal->flags & SIGNAL_STOP_STOPPED) {
758 * We were in fact stopped, and are now continued.
759 * Notify the parent with CLD_CONTINUED.
761 p->signal->flags = SIGNAL_STOP_CONTINUED;
762 p->signal->group_exit_code = 0;
763 spin_unlock(&p->sighand->siglock);
764 do_notify_parent_cldstop(p, (p->ptrace & PT_PTRACED), CLD_CONTINUED);
765 spin_lock(&p->sighand->siglock);
768 * We are not stopped, but there could be a stop
769 * signal in the middle of being processed after
770 * being removed from the queue. Clear that too.
772 p->signal->flags = 0;
774 } else if (sig == SIGKILL) {
776 * Make sure that any pending stop signal already dequeued
777 * is undone by the wakeup for SIGKILL.
779 p->signal->flags = 0;
783 static int send_signal(int sig, struct siginfo *info, struct task_struct *t,
784 struct sigpending *signals)
786 struct sigqueue * q = NULL;
790 * fast-pathed signals for kernel-internal things like SIGSTOP
793 if ((unsigned long)info == 2)
796 /* Real-time signals must be queued if sent by sigqueue, or
797 some other real-time mechanism. It is implementation
798 defined whether kill() does so. We attempt to do so, on
799 the principle of least surprise, but since kill is not
800 allowed to fail with EAGAIN when low on memory we just
801 make sure at least one signal gets delivered and don't
802 pass on the info struct. */
804 q = __sigqueue_alloc(t, GFP_ATOMIC, (sig < SIGRTMIN &&
805 ((unsigned long) info < 2 ||
806 info->si_code >= 0)));
808 list_add_tail(&q->list, &signals->list);
809 switch ((unsigned long) info) {
811 q->info.si_signo = sig;
812 q->info.si_errno = 0;
813 q->info.si_code = SI_USER;
814 q->info.si_pid = current->pid;
815 q->info.si_uid = current->uid;
818 q->info.si_signo = sig;
819 q->info.si_errno = 0;
820 q->info.si_code = SI_KERNEL;
825 copy_siginfo(&q->info, info);
829 if (sig >= SIGRTMIN && info && (unsigned long)info != 1
830 && info->si_code != SI_USER)
832 * Queue overflow, abort. We may abort if the signal was rt
833 * and sent by user using something other than kill().
836 if (((unsigned long)info > 1) && (info->si_code == SI_TIMER))
838 * Set up a return to indicate that we dropped
841 ret = info->si_sys_private;
845 sigaddset(&signals->signal, sig);
849 #define LEGACY_QUEUE(sigptr, sig) \
850 (((sig) < SIGRTMIN) && sigismember(&(sigptr)->signal, (sig)))
854 specific_send_sig_info(int sig, struct siginfo *info, struct task_struct *t)
858 if (!irqs_disabled())
860 assert_spin_locked(&t->sighand->siglock);
862 if (((unsigned long)info > 2) && (info->si_code == SI_TIMER))
864 * Set up a return to indicate that we dropped the signal.
866 ret = info->si_sys_private;
868 /* Short-circuit ignored signals. */
869 if (sig_ignored(t, sig))
872 /* Support queueing exactly one non-rt signal, so that we
873 can get more detailed information about the cause of
875 if (LEGACY_QUEUE(&t->pending, sig))
878 ret = send_signal(sig, info, t, &t->pending);
879 if (!ret && !sigismember(&t->blocked, sig))
880 signal_wake_up(t, sig == SIGKILL);
886 * Force a signal that the process can't ignore: if necessary
887 * we unblock the signal and change any SIG_IGN to SIG_DFL.
891 force_sig_info(int sig, struct siginfo *info, struct task_struct *t)
893 unsigned long int flags;
896 spin_lock_irqsave(&t->sighand->siglock, flags);
897 if (sigismember(&t->blocked, sig) || t->sighand->action[sig-1].sa.sa_handler == SIG_IGN) {
898 t->sighand->action[sig-1].sa.sa_handler = SIG_DFL;
899 sigdelset(&t->blocked, sig);
900 recalc_sigpending_tsk(t);
902 ret = specific_send_sig_info(sig, info, t);
903 spin_unlock_irqrestore(&t->sighand->siglock, flags);
909 force_sig_specific(int sig, struct task_struct *t)
911 unsigned long int flags;
913 spin_lock_irqsave(&t->sighand->siglock, flags);
914 if (t->sighand->action[sig-1].sa.sa_handler == SIG_IGN)
915 t->sighand->action[sig-1].sa.sa_handler = SIG_DFL;
916 sigdelset(&t->blocked, sig);
917 recalc_sigpending_tsk(t);
918 specific_send_sig_info(sig, (void *)2, t);
919 spin_unlock_irqrestore(&t->sighand->siglock, flags);
923 * Test if P wants to take SIG. After we've checked all threads with this,
924 * it's equivalent to finding no threads not blocking SIG. Any threads not
925 * blocking SIG were ruled out because they are not running and already
926 * have pending signals. Such threads will dequeue from the shared queue
927 * as soon as they're available, so putting the signal on the shared queue
928 * will be equivalent to sending it to one such thread.
930 static inline int wants_signal(int sig, struct task_struct *p)
932 if (sigismember(&p->blocked, sig))
934 if (p->flags & PF_EXITING)
938 if (p->state & (TASK_STOPPED | TASK_TRACED))
940 return task_curr(p) || !signal_pending(p);
944 __group_complete_signal(int sig, struct task_struct *p)
946 struct task_struct *t;
949 * Now find a thread we can wake up to take the signal off the queue.
951 * If the main thread wants the signal, it gets first crack.
952 * Probably the least surprising to the average bear.
954 if (wants_signal(sig, p))
956 else if (thread_group_empty(p))
958 * There is just one thread and it does not need to be woken.
959 * It will dequeue unblocked signals before it runs again.
964 * Otherwise try to find a suitable thread.
966 t = p->signal->curr_target;
968 /* restart balancing at this thread */
969 t = p->signal->curr_target = p;
970 BUG_ON(t->tgid != p->tgid);
972 while (!wants_signal(sig, t)) {
974 if (t == p->signal->curr_target)
976 * No thread needs to be woken.
977 * Any eligible threads will see
978 * the signal in the queue soon.
982 p->signal->curr_target = t;
986 * Found a killable thread. If the signal will be fatal,
987 * then start taking the whole group down immediately.
989 if (sig_fatal(p, sig) && !(p->signal->flags & SIGNAL_GROUP_EXIT) &&
990 !sigismember(&t->real_blocked, sig) &&
991 (sig == SIGKILL || !(t->ptrace & PT_PTRACED))) {
993 * This signal will be fatal to the whole group.
995 if (!sig_kernel_coredump(sig)) {
997 * Start a group exit and wake everybody up.
998 * This way we don't have other threads
999 * running and doing things after a slower
1000 * thread has the fatal signal pending.
1002 p->signal->flags = SIGNAL_GROUP_EXIT;
1003 p->signal->group_exit_code = sig;
1004 p->signal->group_stop_count = 0;
1007 sigaddset(&t->pending.signal, SIGKILL);
1008 signal_wake_up(t, 1);
1015 * There will be a core dump. We make all threads other
1016 * than the chosen one go into a group stop so that nothing
1017 * happens until it gets scheduled, takes the signal off
1018 * the shared queue, and does the core dump. This is a
1019 * little more complicated than strictly necessary, but it
1020 * keeps the signal state that winds up in the core dump
1021 * unchanged from the death state, e.g. which thread had
1022 * the core-dump signal unblocked.
1024 rm_from_queue(SIG_KERNEL_STOP_MASK, &t->pending);
1025 rm_from_queue(SIG_KERNEL_STOP_MASK, &p->signal->shared_pending);
1026 p->signal->group_stop_count = 0;
1027 p->signal->group_exit_task = t;
1030 p->signal->group_stop_count++;
1031 signal_wake_up(t, 0);
1034 wake_up_process(p->signal->group_exit_task);
1039 * The signal is already in the shared-pending queue.
1040 * Tell the chosen thread to wake up and dequeue it.
1042 signal_wake_up(t, sig == SIGKILL);
1047 __group_send_sig_info(int sig, struct siginfo *info, struct task_struct *p)
1051 assert_spin_locked(&p->sighand->siglock);
1052 handle_stop_signal(sig, p);
1054 if (((unsigned long)info > 2) && (info->si_code == SI_TIMER))
1056 * Set up a return to indicate that we dropped the signal.
1058 ret = info->si_sys_private;
1060 /* Short-circuit ignored signals. */
1061 if (sig_ignored(p, sig))
1064 if (LEGACY_QUEUE(&p->signal->shared_pending, sig))
1065 /* This is a non-RT signal and we already have one queued. */
1069 * Put this signal on the shared-pending queue, or fail with EAGAIN.
1070 * We always use the shared queue for process-wide signals,
1071 * to avoid several races.
1073 ret = send_signal(sig, info, p, &p->signal->shared_pending);
1077 __group_complete_signal(sig, p);
1082 * Nuke all other threads in the group.
1084 void zap_other_threads(struct task_struct *p)
1086 struct task_struct *t;
1088 p->signal->flags = SIGNAL_GROUP_EXIT;
1089 p->signal->group_stop_count = 0;
1091 if (thread_group_empty(p))
1094 for (t = next_thread(p); t != p; t = next_thread(t)) {
1096 * Don't bother with already dead threads
1102 * We don't want to notify the parent, since we are
1103 * killed as part of a thread group due to another
1104 * thread doing an execve() or similar. So set the
1105 * exit signal to -1 to allow immediate reaping of
1106 * the process. But don't detach the thread group
1109 if (t != p->group_leader)
1110 t->exit_signal = -1;
1112 sigaddset(&t->pending.signal, SIGKILL);
1113 rm_from_queue(SIG_KERNEL_STOP_MASK, &t->pending);
1114 signal_wake_up(t, 1);
1119 * Must be called with the tasklist_lock held for reading!
1121 int group_send_sig_info(int sig, struct siginfo *info, struct task_struct *p)
1123 unsigned long flags;
1126 ret = check_kill_permission(sig, info, p);
1127 if (!ret && sig && p->sighand) {
1128 spin_lock_irqsave(&p->sighand->siglock, flags);
1129 ret = __group_send_sig_info(sig, info, p);
1130 spin_unlock_irqrestore(&p->sighand->siglock, flags);
1137 * kill_pg_info() sends a signal to a process group: this is what the tty
1138 * control characters do (^C, ^Z etc)
1141 int __kill_pg_info(int sig, struct siginfo *info, pid_t pgrp)
1143 struct task_struct *p = NULL;
1144 int retval, success;
1151 do_each_task_pid(pgrp, PIDTYPE_PGID, p) {
1152 int err = group_send_sig_info(sig, info, p);
1155 } while_each_task_pid(pgrp, PIDTYPE_PGID, p);
1156 return success ? 0 : retval;
1160 kill_pg_info(int sig, struct siginfo *info, pid_t pgrp)
1164 read_lock(&tasklist_lock);
1165 retval = __kill_pg_info(sig, info, pgrp);
1166 read_unlock(&tasklist_lock);
1172 kill_proc_info(int sig, struct siginfo *info, pid_t pid)
1175 struct task_struct *p;
1177 read_lock(&tasklist_lock);
1178 p = find_task_by_pid(pid);
1181 error = group_send_sig_info(sig, info, p);
1182 read_unlock(&tasklist_lock);
1186 /* like kill_proc_info(), but doesn't use uid/euid of "current" */
1187 int kill_proc_info_as_uid(int sig, struct siginfo *info, pid_t pid,
1188 uid_t uid, uid_t euid)
1191 struct task_struct *p;
1193 if (!valid_signal(sig))
1196 read_lock(&tasklist_lock);
1197 p = find_task_by_pid(pid);
1202 if ((!info || ((unsigned long)info != 1 &&
1203 (unsigned long)info != 2 && SI_FROMUSER(info)))
1204 && (euid != p->suid) && (euid != p->uid)
1205 && (uid != p->suid) && (uid != p->uid)) {
1209 if (sig && p->sighand) {
1210 unsigned long flags;
1211 spin_lock_irqsave(&p->sighand->siglock, flags);
1212 ret = __group_send_sig_info(sig, info, p);
1213 spin_unlock_irqrestore(&p->sighand->siglock, flags);
1216 read_unlock(&tasklist_lock);
1219 EXPORT_SYMBOL_GPL(kill_proc_info_as_uid);
1222 * kill_something_info() interprets pid in interesting ways just like kill(2).
1224 * POSIX specifies that kill(-1,sig) is unspecified, but what we have
1225 * is probably wrong. Should make it like BSD or SYSV.
1228 static int kill_something_info(int sig, struct siginfo *info, int pid)
1231 return kill_pg_info(sig, info, process_group(current));
1232 } else if (pid == -1) {
1233 int retval = 0, count = 0;
1234 struct task_struct * p;
1236 read_lock(&tasklist_lock);
1237 for_each_process(p) {
1238 if (p->pid > 1 && p->tgid != current->tgid) {
1239 int err = group_send_sig_info(sig, info, p);
1245 read_unlock(&tasklist_lock);
1246 return count ? retval : -ESRCH;
1247 } else if (pid < 0) {
1248 return kill_pg_info(sig, info, -pid);
1250 return kill_proc_info(sig, info, pid);
1255 * These are for backward compatibility with the rest of the kernel source.
1259 * These two are the most common entry points. They send a signal
1260 * just to the specific thread.
1263 send_sig_info(int sig, struct siginfo *info, struct task_struct *p)
1266 unsigned long flags;
1269 * Make sure legacy kernel users don't send in bad values
1270 * (normal paths check this in check_kill_permission).
1272 if (!valid_signal(sig))
1276 * We need the tasklist lock even for the specific
1277 * thread case (when we don't need to follow the group
1278 * lists) in order to avoid races with "p->sighand"
1279 * going away or changing from under us.
1281 read_lock(&tasklist_lock);
1282 spin_lock_irqsave(&p->sighand->siglock, flags);
1283 ret = specific_send_sig_info(sig, info, p);
1284 spin_unlock_irqrestore(&p->sighand->siglock, flags);
1285 read_unlock(&tasklist_lock);
1290 send_sig(int sig, struct task_struct *p, int priv)
1292 return send_sig_info(sig, (void*)(long)(priv != 0), p);
1296 * This is the entry point for "process-wide" signals.
1297 * They will go to an appropriate thread in the thread group.
1300 send_group_sig_info(int sig, struct siginfo *info, struct task_struct *p)
1303 read_lock(&tasklist_lock);
1304 ret = group_send_sig_info(sig, info, p);
1305 read_unlock(&tasklist_lock);
1310 force_sig(int sig, struct task_struct *p)
1312 force_sig_info(sig, (void*)1L, p);
1316 * When things go south during signal handling, we
1317 * will force a SIGSEGV. And if the signal that caused
1318 * the problem was already a SIGSEGV, we'll want to
1319 * make sure we don't even try to deliver the signal..
1322 force_sigsegv(int sig, struct task_struct *p)
1324 if (sig == SIGSEGV) {
1325 unsigned long flags;
1326 spin_lock_irqsave(&p->sighand->siglock, flags);
1327 p->sighand->action[sig - 1].sa.sa_handler = SIG_DFL;
1328 spin_unlock_irqrestore(&p->sighand->siglock, flags);
1330 force_sig(SIGSEGV, p);
1335 kill_pg(pid_t pgrp, int sig, int priv)
1337 return kill_pg_info(sig, (void *)(long)(priv != 0), pgrp);
1341 kill_proc(pid_t pid, int sig, int priv)
1343 return kill_proc_info(sig, (void *)(long)(priv != 0), pid);
1347 * These functions support sending signals using preallocated sigqueue
1348 * structures. This is needed "because realtime applications cannot
1349 * afford to lose notifications of asynchronous events, like timer
1350 * expirations or I/O completions". In the case of Posix Timers
1351 * we allocate the sigqueue structure from the timer_create. If this
1352 * allocation fails we are able to report the failure to the application
1353 * with an EAGAIN error.
1356 struct sigqueue *sigqueue_alloc(void)
1360 if ((q = __sigqueue_alloc(current, GFP_KERNEL, 0)))
1361 q->flags |= SIGQUEUE_PREALLOC;
1365 void sigqueue_free(struct sigqueue *q)
1367 unsigned long flags;
1368 BUG_ON(!(q->flags & SIGQUEUE_PREALLOC));
1370 * If the signal is still pending remove it from the
1373 if (unlikely(!list_empty(&q->list))) {
1374 read_lock(&tasklist_lock);
1375 spin_lock_irqsave(q->lock, flags);
1376 if (!list_empty(&q->list))
1377 list_del_init(&q->list);
1378 spin_unlock_irqrestore(q->lock, flags);
1379 read_unlock(&tasklist_lock);
1381 q->flags &= ~SIGQUEUE_PREALLOC;
1386 send_sigqueue(int sig, struct sigqueue *q, struct task_struct *p)
1388 unsigned long flags;
1391 BUG_ON(!(q->flags & SIGQUEUE_PREALLOC));
1392 read_lock(&tasklist_lock);
1394 if (unlikely(p->flags & PF_EXITING)) {
1399 spin_lock_irqsave(&p->sighand->siglock, flags);
1401 if (unlikely(!list_empty(&q->list))) {
1403 * If an SI_TIMER entry is already queue just increment
1404 * the overrun count.
1406 if (q->info.si_code != SI_TIMER)
1408 q->info.si_overrun++;
1411 /* Short-circuit ignored signals. */
1412 if (sig_ignored(p, sig)) {
1417 q->lock = &p->sighand->siglock;
1418 list_add_tail(&q->list, &p->pending.list);
1419 sigaddset(&p->pending.signal, sig);
1420 if (!sigismember(&p->blocked, sig))
1421 signal_wake_up(p, sig == SIGKILL);
1424 spin_unlock_irqrestore(&p->sighand->siglock, flags);
1426 read_unlock(&tasklist_lock);
1432 send_group_sigqueue(int sig, struct sigqueue *q, struct task_struct *p)
1434 unsigned long flags;
1437 BUG_ON(!(q->flags & SIGQUEUE_PREALLOC));
1438 read_lock(&tasklist_lock);
1439 spin_lock_irqsave(&p->sighand->siglock, flags);
1440 handle_stop_signal(sig, p);
1442 /* Short-circuit ignored signals. */
1443 if (sig_ignored(p, sig)) {
1448 if (unlikely(!list_empty(&q->list))) {
1450 * If an SI_TIMER entry is already queue just increment
1451 * the overrun count. Other uses should not try to
1452 * send the signal multiple times.
1454 if (q->info.si_code != SI_TIMER)
1456 q->info.si_overrun++;
1461 * Put this signal on the shared-pending queue.
1462 * We always use the shared queue for process-wide signals,
1463 * to avoid several races.
1465 q->lock = &p->sighand->siglock;
1466 list_add_tail(&q->list, &p->signal->shared_pending.list);
1467 sigaddset(&p->signal->shared_pending.signal, sig);
1469 __group_complete_signal(sig, p);
1471 spin_unlock_irqrestore(&p->sighand->siglock, flags);
1472 read_unlock(&tasklist_lock);
1477 * Wake up any threads in the parent blocked in wait* syscalls.
1479 static inline void __wake_up_parent(struct task_struct *p,
1480 struct task_struct *parent)
1482 wake_up_interruptible_sync(&parent->signal->wait_chldexit);
1486 * Let a parent know about the death of a child.
1487 * For a stopped/continued status change, use do_notify_parent_cldstop instead.
1490 void do_notify_parent(struct task_struct *tsk, int sig)
1492 struct siginfo info;
1493 unsigned long flags;
1494 struct sighand_struct *psig;
1498 /* do_notify_parent_cldstop should have been called instead. */
1499 BUG_ON(tsk->state & (TASK_STOPPED|TASK_TRACED));
1501 BUG_ON(!tsk->ptrace &&
1502 (tsk->group_leader != tsk || !thread_group_empty(tsk)));
1504 info.si_signo = sig;
1506 info.si_pid = tsk->pid;
1507 info.si_uid = tsk->uid;
1509 /* FIXME: find out whether or not this is supposed to be c*time. */
1510 info.si_utime = cputime_to_jiffies(cputime_add(tsk->utime,
1511 tsk->signal->utime));
1512 info.si_stime = cputime_to_jiffies(cputime_add(tsk->stime,
1513 tsk->signal->stime));
1515 info.si_status = tsk->exit_code & 0x7f;
1516 if (tsk->exit_code & 0x80)
1517 info.si_code = CLD_DUMPED;
1518 else if (tsk->exit_code & 0x7f)
1519 info.si_code = CLD_KILLED;
1521 info.si_code = CLD_EXITED;
1522 info.si_status = tsk->exit_code >> 8;
1525 psig = tsk->parent->sighand;
1526 spin_lock_irqsave(&psig->siglock, flags);
1527 if (sig == SIGCHLD &&
1528 (psig->action[SIGCHLD-1].sa.sa_handler == SIG_IGN ||
1529 (psig->action[SIGCHLD-1].sa.sa_flags & SA_NOCLDWAIT))) {
1531 * We are exiting and our parent doesn't care. POSIX.1
1532 * defines special semantics for setting SIGCHLD to SIG_IGN
1533 * or setting the SA_NOCLDWAIT flag: we should be reaped
1534 * automatically and not left for our parent's wait4 call.
1535 * Rather than having the parent do it as a magic kind of
1536 * signal handler, we just set this to tell do_exit that we
1537 * can be cleaned up without becoming a zombie. Note that
1538 * we still call __wake_up_parent in this case, because a
1539 * blocked sys_wait4 might now return -ECHILD.
1541 * Whether we send SIGCHLD or not for SA_NOCLDWAIT
1542 * is implementation-defined: we do (if you don't want
1543 * it, just use SIG_IGN instead).
1545 tsk->exit_signal = -1;
1546 if (psig->action[SIGCHLD-1].sa.sa_handler == SIG_IGN)
1549 if (valid_signal(sig) && sig > 0)
1550 __group_send_sig_info(sig, &info, tsk->parent);
1551 __wake_up_parent(tsk, tsk->parent);
1552 spin_unlock_irqrestore(&psig->siglock, flags);
1555 static void do_notify_parent_cldstop(struct task_struct *tsk, int to_self, int why)
1557 struct siginfo info;
1558 unsigned long flags;
1559 struct task_struct *parent;
1560 struct sighand_struct *sighand;
1563 parent = tsk->parent;
1565 tsk = tsk->group_leader;
1566 parent = tsk->real_parent;
1569 info.si_signo = SIGCHLD;
1571 info.si_pid = tsk->pid;
1572 info.si_uid = tsk->uid;
1574 /* FIXME: find out whether or not this is supposed to be c*time. */
1575 info.si_utime = cputime_to_jiffies(tsk->utime);
1576 info.si_stime = cputime_to_jiffies(tsk->stime);
1581 info.si_status = SIGCONT;
1584 info.si_status = tsk->signal->group_exit_code & 0x7f;
1587 info.si_status = tsk->exit_code & 0x7f;
1593 sighand = parent->sighand;
1594 spin_lock_irqsave(&sighand->siglock, flags);
1595 if (sighand->action[SIGCHLD-1].sa.sa_handler != SIG_IGN &&
1596 !(sighand->action[SIGCHLD-1].sa.sa_flags & SA_NOCLDSTOP))
1597 __group_send_sig_info(SIGCHLD, &info, parent);
1599 * Even if SIGCHLD is not generated, we must wake up wait4 calls.
1601 __wake_up_parent(tsk, parent);
1602 spin_unlock_irqrestore(&sighand->siglock, flags);
1606 * This must be called with current->sighand->siglock held.
1608 * This should be the path for all ptrace stops.
1609 * We always set current->last_siginfo while stopped here.
1610 * That makes it a way to test a stopped process for
1611 * being ptrace-stopped vs being job-control-stopped.
1613 * If we actually decide not to stop at all because the tracer is gone,
1614 * we leave nostop_code in current->exit_code.
1616 static void ptrace_stop(int exit_code, int nostop_code, siginfo_t *info)
1619 * If there is a group stop in progress,
1620 * we must participate in the bookkeeping.
1622 if (current->signal->group_stop_count > 0)
1623 --current->signal->group_stop_count;
1625 current->last_siginfo = info;
1626 current->exit_code = exit_code;
1628 /* Let the debugger run. */
1629 set_current_state(TASK_TRACED);
1630 spin_unlock_irq(¤t->sighand->siglock);
1631 read_lock(&tasklist_lock);
1632 if (likely(current->ptrace & PT_PTRACED) &&
1633 likely(current->parent != current->real_parent ||
1634 !(current->ptrace & PT_ATTACHED)) &&
1635 (likely(current->parent->signal != current->signal) ||
1636 !unlikely(current->signal->flags & SIGNAL_GROUP_EXIT))) {
1637 do_notify_parent_cldstop(current, 1, CLD_TRAPPED);
1638 read_unlock(&tasklist_lock);
1642 * By the time we got the lock, our tracer went away.
1645 read_unlock(&tasklist_lock);
1646 set_current_state(TASK_RUNNING);
1647 current->exit_code = nostop_code;
1651 * We are back. Now reacquire the siglock before touching
1652 * last_siginfo, so that we are sure to have synchronized with
1653 * any signal-sending on another CPU that wants to examine it.
1655 spin_lock_irq(¤t->sighand->siglock);
1656 current->last_siginfo = NULL;
1659 * Queued signals ignored us while we were stopped for tracing.
1660 * So check for any that we should take before resuming user mode.
1662 recalc_sigpending();
1665 void ptrace_notify(int exit_code)
1669 BUG_ON((exit_code & (0x7f | ~0xffff)) != SIGTRAP);
1671 memset(&info, 0, sizeof info);
1672 info.si_signo = SIGTRAP;
1673 info.si_code = exit_code;
1674 info.si_pid = current->pid;
1675 info.si_uid = current->uid;
1677 /* Let the debugger run. */
1678 spin_lock_irq(¤t->sighand->siglock);
1679 ptrace_stop(exit_code, 0, &info);
1680 spin_unlock_irq(¤t->sighand->siglock);
1684 finish_stop(int stop_count)
1689 * If there are no other threads in the group, or if there is
1690 * a group stop in progress and we are the last to stop,
1691 * report to the parent. When ptraced, every thread reports itself.
1693 if (stop_count < 0 || (current->ptrace & PT_PTRACED))
1695 else if (stop_count == 0)
1700 read_lock(&tasklist_lock);
1701 do_notify_parent_cldstop(current, to_self, CLD_STOPPED);
1702 read_unlock(&tasklist_lock);
1707 * Now we don't run again until continued.
1709 current->exit_code = 0;
1713 * This performs the stopping for SIGSTOP and other stop signals.
1714 * We have to stop all threads in the thread group.
1715 * Returns nonzero if we've actually stopped and released the siglock.
1716 * Returns zero if we didn't stop and still hold the siglock.
1719 do_signal_stop(int signr)
1721 struct signal_struct *sig = current->signal;
1722 struct sighand_struct *sighand = current->sighand;
1723 int stop_count = -1;
1725 if (!likely(sig->flags & SIGNAL_STOP_DEQUEUED))
1728 if (sig->group_stop_count > 0) {
1730 * There is a group stop in progress. We don't need to
1731 * start another one.
1733 signr = sig->group_exit_code;
1734 stop_count = --sig->group_stop_count;
1735 current->exit_code = signr;
1736 set_current_state(TASK_STOPPED);
1737 if (stop_count == 0)
1738 sig->flags = SIGNAL_STOP_STOPPED;
1739 spin_unlock_irq(&sighand->siglock);
1741 else if (thread_group_empty(current)) {
1743 * Lock must be held through transition to stopped state.
1745 current->exit_code = current->signal->group_exit_code = signr;
1746 set_current_state(TASK_STOPPED);
1747 sig->flags = SIGNAL_STOP_STOPPED;
1748 spin_unlock_irq(&sighand->siglock);
1752 * There is no group stop already in progress.
1753 * We must initiate one now, but that requires
1754 * dropping siglock to get both the tasklist lock
1755 * and siglock again in the proper order. Note that
1756 * this allows an intervening SIGCONT to be posted.
1757 * We need to check for that and bail out if necessary.
1759 struct task_struct *t;
1761 spin_unlock_irq(&sighand->siglock);
1763 /* signals can be posted during this window */
1765 read_lock(&tasklist_lock);
1766 spin_lock_irq(&sighand->siglock);
1768 if (!likely(sig->flags & SIGNAL_STOP_DEQUEUED)) {
1770 * Another stop or continue happened while we
1771 * didn't have the lock. We can just swallow this
1772 * signal now. If we raced with a SIGCONT, that
1773 * should have just cleared it now. If we raced
1774 * with another processor delivering a stop signal,
1775 * then the SIGCONT that wakes us up should clear it.
1777 read_unlock(&tasklist_lock);
1781 if (sig->group_stop_count == 0) {
1782 sig->group_exit_code = signr;
1784 for (t = next_thread(current); t != current;
1787 * Setting state to TASK_STOPPED for a group
1788 * stop is always done with the siglock held,
1789 * so this check has no races.
1791 if (!t->exit_state &&
1792 !(t->state & (TASK_STOPPED|TASK_TRACED))) {
1794 signal_wake_up(t, 0);
1796 sig->group_stop_count = stop_count;
1799 /* A race with another thread while unlocked. */
1800 signr = sig->group_exit_code;
1801 stop_count = --sig->group_stop_count;
1804 current->exit_code = signr;
1805 set_current_state(TASK_STOPPED);
1806 if (stop_count == 0)
1807 sig->flags = SIGNAL_STOP_STOPPED;
1809 spin_unlock_irq(&sighand->siglock);
1810 read_unlock(&tasklist_lock);
1813 finish_stop(stop_count);
1818 * Do appropriate magic when group_stop_count > 0.
1819 * We return nonzero if we stopped, after releasing the siglock.
1820 * We return zero if we still hold the siglock and should look
1821 * for another signal without checking group_stop_count again.
1823 static inline int handle_group_stop(void)
1827 if (current->signal->group_exit_task == current) {
1829 * Group stop is so we can do a core dump,
1830 * We are the initiating thread, so get on with it.
1832 current->signal->group_exit_task = NULL;
1836 if (current->signal->flags & SIGNAL_GROUP_EXIT)
1838 * Group stop is so another thread can do a core dump,
1839 * or else we are racing against a death signal.
1840 * Just punt the stop so we can get the next signal.
1845 * There is a group stop in progress. We stop
1846 * without any associated signal being in our queue.
1848 stop_count = --current->signal->group_stop_count;
1849 if (stop_count == 0)
1850 current->signal->flags = SIGNAL_STOP_STOPPED;
1851 current->exit_code = current->signal->group_exit_code;
1852 set_current_state(TASK_STOPPED);
1853 spin_unlock_irq(¤t->sighand->siglock);
1854 finish_stop(stop_count);
1858 int get_signal_to_deliver(siginfo_t *info, struct k_sigaction *return_ka,
1859 struct pt_regs *regs, void *cookie)
1861 sigset_t *mask = ¤t->blocked;
1865 spin_lock_irq(¤t->sighand->siglock);
1867 struct k_sigaction *ka;
1869 if (unlikely(current->signal->group_stop_count > 0) &&
1870 handle_group_stop())
1873 signr = dequeue_signal(current, mask, info);
1876 break; /* will return 0 */
1878 if ((current->ptrace & PT_PTRACED) && signr != SIGKILL) {
1879 ptrace_signal_deliver(regs, cookie);
1881 /* Let the debugger run. */
1882 ptrace_stop(signr, signr, info);
1884 /* We're back. Did the debugger cancel the sig? */
1885 signr = current->exit_code;
1889 current->exit_code = 0;
1891 /* Update the siginfo structure if the signal has
1892 changed. If the debugger wanted something
1893 specific in the siginfo structure then it should
1894 have updated *info via PTRACE_SETSIGINFO. */
1895 if (signr != info->si_signo) {
1896 info->si_signo = signr;
1898 info->si_code = SI_USER;
1899 info->si_pid = current->parent->pid;
1900 info->si_uid = current->parent->uid;
1903 /* If the (new) signal is now blocked, requeue it. */
1904 if (sigismember(¤t->blocked, signr)) {
1905 specific_send_sig_info(signr, info, current);
1910 ka = ¤t->sighand->action[signr-1];
1911 if (ka->sa.sa_handler == SIG_IGN) /* Do nothing. */
1913 if (ka->sa.sa_handler != SIG_DFL) {
1914 /* Run the handler. */
1917 if (ka->sa.sa_flags & SA_ONESHOT)
1918 ka->sa.sa_handler = SIG_DFL;
1920 break; /* will return non-zero "signr" value */
1924 * Now we are doing the default action for this signal.
1926 if (sig_kernel_ignore(signr)) /* Default is nothing. */
1929 /* Init gets no signals it doesn't want. */
1930 if (current->pid == 1)
1933 if (sig_kernel_stop(signr)) {
1935 * The default action is to stop all threads in
1936 * the thread group. The job control signals
1937 * do nothing in an orphaned pgrp, but SIGSTOP
1938 * always works. Note that siglock needs to be
1939 * dropped during the call to is_orphaned_pgrp()
1940 * because of lock ordering with tasklist_lock.
1941 * This allows an intervening SIGCONT to be posted.
1942 * We need to check for that and bail out if necessary.
1944 if (signr != SIGSTOP) {
1945 spin_unlock_irq(¤t->sighand->siglock);
1947 /* signals can be posted during this window */
1949 if (is_orphaned_pgrp(process_group(current)))
1952 spin_lock_irq(¤t->sighand->siglock);
1955 if (likely(do_signal_stop(signr))) {
1956 /* It released the siglock. */
1961 * We didn't actually stop, due to a race
1962 * with SIGCONT or something like that.
1967 spin_unlock_irq(¤t->sighand->siglock);
1970 * Anything else is fatal, maybe with a core dump.
1972 current->flags |= PF_SIGNALED;
1973 if (sig_kernel_coredump(signr)) {
1975 * If it was able to dump core, this kills all
1976 * other threads in the group and synchronizes with
1977 * their demise. If we lost the race with another
1978 * thread getting here, it set group_exit_code
1979 * first and our do_group_exit call below will use
1980 * that value and ignore the one we pass it.
1982 do_coredump((long)signr, signr, regs);
1986 * Death signals, no core dump.
1988 do_group_exit(signr);
1991 spin_unlock_irq(¤t->sighand->siglock);
1995 EXPORT_SYMBOL(recalc_sigpending);
1996 EXPORT_SYMBOL_GPL(dequeue_signal);
1997 EXPORT_SYMBOL(flush_signals);
1998 EXPORT_SYMBOL(force_sig);
1999 EXPORT_SYMBOL(kill_pg);
2000 EXPORT_SYMBOL(kill_proc);
2001 EXPORT_SYMBOL(ptrace_notify);
2002 EXPORT_SYMBOL(send_sig);
2003 EXPORT_SYMBOL(send_sig_info);
2004 EXPORT_SYMBOL(sigprocmask);
2005 EXPORT_SYMBOL(block_all_signals);
2006 EXPORT_SYMBOL(unblock_all_signals);
2010 * System call entry points.
2013 asmlinkage long sys_restart_syscall(void)
2015 struct restart_block *restart = ¤t_thread_info()->restart_block;
2016 return restart->fn(restart);
2019 long do_no_restart_syscall(struct restart_block *param)
2025 * We don't need to get the kernel lock - this is all local to this
2026 * particular thread.. (and that's good, because this is _heavily_
2027 * used by various programs)
2031 * This is also useful for kernel threads that want to temporarily
2032 * (or permanently) block certain signals.
2034 * NOTE! Unlike the user-mode sys_sigprocmask(), the kernel
2035 * interface happily blocks "unblockable" signals like SIGKILL
2038 int sigprocmask(int how, sigset_t *set, sigset_t *oldset)
2043 spin_lock_irq(¤t->sighand->siglock);
2044 old_block = current->blocked;
2048 sigorsets(¤t->blocked, ¤t->blocked, set);
2051 signandsets(¤t->blocked, ¤t->blocked, set);
2054 current->blocked = *set;
2059 recalc_sigpending();
2060 spin_unlock_irq(¤t->sighand->siglock);
2062 *oldset = old_block;
2067 sys_rt_sigprocmask(int how, sigset_t __user *set, sigset_t __user *oset, size_t sigsetsize)
2069 int error = -EINVAL;
2070 sigset_t old_set, new_set;
2072 /* XXX: Don't preclude handling different sized sigset_t's. */
2073 if (sigsetsize != sizeof(sigset_t))
2078 if (copy_from_user(&new_set, set, sizeof(*set)))
2080 sigdelsetmask(&new_set, sigmask(SIGKILL)|sigmask(SIGSTOP));
2082 error = sigprocmask(how, &new_set, &old_set);
2088 spin_lock_irq(¤t->sighand->siglock);
2089 old_set = current->blocked;
2090 spin_unlock_irq(¤t->sighand->siglock);
2094 if (copy_to_user(oset, &old_set, sizeof(*oset)))
2102 long do_sigpending(void __user *set, unsigned long sigsetsize)
2104 long error = -EINVAL;
2107 if (sigsetsize > sizeof(sigset_t))
2110 spin_lock_irq(¤t->sighand->siglock);
2111 sigorsets(&pending, ¤t->pending.signal,
2112 ¤t->signal->shared_pending.signal);
2113 spin_unlock_irq(¤t->sighand->siglock);
2115 /* Outside the lock because only this thread touches it. */
2116 sigandsets(&pending, ¤t->blocked, &pending);
2119 if (!copy_to_user(set, &pending, sigsetsize))
2127 sys_rt_sigpending(sigset_t __user *set, size_t sigsetsize)
2129 return do_sigpending(set, sigsetsize);
2132 #ifndef HAVE_ARCH_COPY_SIGINFO_TO_USER
2134 int copy_siginfo_to_user(siginfo_t __user *to, siginfo_t *from)
2138 if (!access_ok (VERIFY_WRITE, to, sizeof(siginfo_t)))
2140 if (from->si_code < 0)
2141 return __copy_to_user(to, from, sizeof(siginfo_t))
2144 * If you change siginfo_t structure, please be sure
2145 * this code is fixed accordingly.
2146 * It should never copy any pad contained in the structure
2147 * to avoid security leaks, but must copy the generic
2148 * 3 ints plus the relevant union member.
2150 err = __put_user(from->si_signo, &to->si_signo);
2151 err |= __put_user(from->si_errno, &to->si_errno);
2152 err |= __put_user((short)from->si_code, &to->si_code);
2153 switch (from->si_code & __SI_MASK) {
2155 err |= __put_user(from->si_pid, &to->si_pid);
2156 err |= __put_user(from->si_uid, &to->si_uid);
2159 err |= __put_user(from->si_tid, &to->si_tid);
2160 err |= __put_user(from->si_overrun, &to->si_overrun);
2161 err |= __put_user(from->si_ptr, &to->si_ptr);
2164 err |= __put_user(from->si_band, &to->si_band);
2165 err |= __put_user(from->si_fd, &to->si_fd);
2168 err |= __put_user(from->si_addr, &to->si_addr);
2169 #ifdef __ARCH_SI_TRAPNO
2170 err |= __put_user(from->si_trapno, &to->si_trapno);
2174 err |= __put_user(from->si_pid, &to->si_pid);
2175 err |= __put_user(from->si_uid, &to->si_uid);
2176 err |= __put_user(from->si_status, &to->si_status);
2177 err |= __put_user(from->si_utime, &to->si_utime);
2178 err |= __put_user(from->si_stime, &to->si_stime);
2180 case __SI_RT: /* This is not generated by the kernel as of now. */
2181 case __SI_MESGQ: /* But this is */
2182 err |= __put_user(from->si_pid, &to->si_pid);
2183 err |= __put_user(from->si_uid, &to->si_uid);
2184 err |= __put_user(from->si_ptr, &to->si_ptr);
2186 default: /* this is just in case for now ... */
2187 err |= __put_user(from->si_pid, &to->si_pid);
2188 err |= __put_user(from->si_uid, &to->si_uid);
2197 sys_rt_sigtimedwait(const sigset_t __user *uthese,
2198 siginfo_t __user *uinfo,
2199 const struct timespec __user *uts,
2208 /* XXX: Don't preclude handling different sized sigset_t's. */
2209 if (sigsetsize != sizeof(sigset_t))
2212 if (copy_from_user(&these, uthese, sizeof(these)))
2216 * Invert the set of allowed signals to get those we
2219 sigdelsetmask(&these, sigmask(SIGKILL)|sigmask(SIGSTOP));
2223 if (copy_from_user(&ts, uts, sizeof(ts)))
2225 if (ts.tv_nsec >= 1000000000L || ts.tv_nsec < 0
2230 spin_lock_irq(¤t->sighand->siglock);
2231 sig = dequeue_signal(current, &these, &info);
2233 timeout = MAX_SCHEDULE_TIMEOUT;
2235 timeout = (timespec_to_jiffies(&ts)
2236 + (ts.tv_sec || ts.tv_nsec));
2239 /* None ready -- temporarily unblock those we're
2240 * interested while we are sleeping in so that we'll
2241 * be awakened when they arrive. */
2242 current->real_blocked = current->blocked;
2243 sigandsets(¤t->blocked, ¤t->blocked, &these);
2244 recalc_sigpending();
2245 spin_unlock_irq(¤t->sighand->siglock);
2247 timeout = schedule_timeout_interruptible(timeout);
2250 spin_lock_irq(¤t->sighand->siglock);
2251 sig = dequeue_signal(current, &these, &info);
2252 current->blocked = current->real_blocked;
2253 siginitset(¤t->real_blocked, 0);
2254 recalc_sigpending();
2257 spin_unlock_irq(¤t->sighand->siglock);
2262 if (copy_siginfo_to_user(uinfo, &info))
2275 sys_kill(int pid, int sig)
2277 struct siginfo info;
2279 info.si_signo = sig;
2281 info.si_code = SI_USER;
2282 info.si_pid = current->tgid;
2283 info.si_uid = current->uid;
2285 return kill_something_info(sig, &info, pid);
2289 * sys_tgkill - send signal to one specific thread
2290 * @tgid: the thread group ID of the thread
2291 * @pid: the PID of the thread
2292 * @sig: signal to be sent
2294 * This syscall also checks the tgid and returns -ESRCH even if the PID
2295 * exists but it's not belonging to the target process anymore. This
2296 * method solves the problem of threads exiting and PIDs getting reused.
2298 asmlinkage long sys_tgkill(int tgid, int pid, int sig)
2300 struct siginfo info;
2302 struct task_struct *p;
2304 /* This is only valid for single tasks */
2305 if (pid <= 0 || tgid <= 0)
2308 info.si_signo = sig;
2310 info.si_code = SI_TKILL;
2311 info.si_pid = current->tgid;
2312 info.si_uid = current->uid;
2314 read_lock(&tasklist_lock);
2315 p = find_task_by_pid(pid);
2317 if (p && (p->tgid == tgid)) {
2318 error = check_kill_permission(sig, &info, p);
2320 * The null signal is a permissions and process existence
2321 * probe. No signal is actually delivered.
2323 if (!error && sig && p->sighand) {
2324 spin_lock_irq(&p->sighand->siglock);
2325 handle_stop_signal(sig, p);
2326 error = specific_send_sig_info(sig, &info, p);
2327 spin_unlock_irq(&p->sighand->siglock);
2330 read_unlock(&tasklist_lock);
2335 * Send a signal to only one task, even if it's a CLONE_THREAD task.
2338 sys_tkill(int pid, int sig)
2340 struct siginfo info;
2342 struct task_struct *p;
2344 /* This is only valid for single tasks */
2348 info.si_signo = sig;
2350 info.si_code = SI_TKILL;
2351 info.si_pid = current->tgid;
2352 info.si_uid = current->uid;
2354 read_lock(&tasklist_lock);
2355 p = find_task_by_pid(pid);
2358 error = check_kill_permission(sig, &info, p);
2360 * The null signal is a permissions and process existence
2361 * probe. No signal is actually delivered.
2363 if (!error && sig && p->sighand) {
2364 spin_lock_irq(&p->sighand->siglock);
2365 handle_stop_signal(sig, p);
2366 error = specific_send_sig_info(sig, &info, p);
2367 spin_unlock_irq(&p->sighand->siglock);
2370 read_unlock(&tasklist_lock);
2375 sys_rt_sigqueueinfo(int pid, int sig, siginfo_t __user *uinfo)
2379 if (copy_from_user(&info, uinfo, sizeof(siginfo_t)))
2382 /* Not even root can pretend to send signals from the kernel.
2383 Nor can they impersonate a kill(), which adds source info. */
2384 if (info.si_code >= 0)
2386 info.si_signo = sig;
2388 /* POSIX.1b doesn't mention process groups. */
2389 return kill_proc_info(sig, &info, pid);
2393 do_sigaction(int sig, const struct k_sigaction *act, struct k_sigaction *oact)
2395 struct k_sigaction *k;
2397 if (!valid_signal(sig) || sig < 1 || (act && sig_kernel_only(sig)))
2400 k = ¤t->sighand->action[sig-1];
2402 spin_lock_irq(¤t->sighand->siglock);
2403 if (signal_pending(current)) {
2405 * If there might be a fatal signal pending on multiple
2406 * threads, make sure we take it before changing the action.
2408 spin_unlock_irq(¤t->sighand->siglock);
2409 return -ERESTARTNOINTR;
2418 * "Setting a signal action to SIG_IGN for a signal that is
2419 * pending shall cause the pending signal to be discarded,
2420 * whether or not it is blocked."
2422 * "Setting a signal action to SIG_DFL for a signal that is
2423 * pending and whose default action is to ignore the signal
2424 * (for example, SIGCHLD), shall cause the pending signal to
2425 * be discarded, whether or not it is blocked"
2427 if (act->sa.sa_handler == SIG_IGN ||
2428 (act->sa.sa_handler == SIG_DFL &&
2429 sig_kernel_ignore(sig))) {
2431 * This is a fairly rare case, so we only take the
2432 * tasklist_lock once we're sure we'll need it.
2433 * Now we must do this little unlock and relock
2434 * dance to maintain the lock hierarchy.
2436 struct task_struct *t = current;
2437 spin_unlock_irq(&t->sighand->siglock);
2438 read_lock(&tasklist_lock);
2439 spin_lock_irq(&t->sighand->siglock);
2441 sigdelsetmask(&k->sa.sa_mask,
2442 sigmask(SIGKILL) | sigmask(SIGSTOP));
2443 rm_from_queue(sigmask(sig), &t->signal->shared_pending);
2445 rm_from_queue(sigmask(sig), &t->pending);
2446 recalc_sigpending_tsk(t);
2448 } while (t != current);
2449 spin_unlock_irq(¤t->sighand->siglock);
2450 read_unlock(&tasklist_lock);
2455 sigdelsetmask(&k->sa.sa_mask,
2456 sigmask(SIGKILL) | sigmask(SIGSTOP));
2459 spin_unlock_irq(¤t->sighand->siglock);
2464 do_sigaltstack (const stack_t __user *uss, stack_t __user *uoss, unsigned long sp)
2470 oss.ss_sp = (void __user *) current->sas_ss_sp;
2471 oss.ss_size = current->sas_ss_size;
2472 oss.ss_flags = sas_ss_flags(sp);
2481 if (!access_ok(VERIFY_READ, uss, sizeof(*uss))
2482 || __get_user(ss_sp, &uss->ss_sp)
2483 || __get_user(ss_flags, &uss->ss_flags)
2484 || __get_user(ss_size, &uss->ss_size))
2488 if (on_sig_stack(sp))
2494 * Note - this code used to test ss_flags incorrectly
2495 * old code may have been written using ss_flags==0
2496 * to mean ss_flags==SS_ONSTACK (as this was the only
2497 * way that worked) - this fix preserves that older
2500 if (ss_flags != SS_DISABLE && ss_flags != SS_ONSTACK && ss_flags != 0)
2503 if (ss_flags == SS_DISABLE) {
2508 if (ss_size < MINSIGSTKSZ)
2512 current->sas_ss_sp = (unsigned long) ss_sp;
2513 current->sas_ss_size = ss_size;
2518 if (copy_to_user(uoss, &oss, sizeof(oss)))
2527 #ifdef __ARCH_WANT_SYS_SIGPENDING
2530 sys_sigpending(old_sigset_t __user *set)
2532 return do_sigpending(set, sizeof(*set));
2537 #ifdef __ARCH_WANT_SYS_SIGPROCMASK
2538 /* Some platforms have their own version with special arguments others
2539 support only sys_rt_sigprocmask. */
2542 sys_sigprocmask(int how, old_sigset_t __user *set, old_sigset_t __user *oset)
2545 old_sigset_t old_set, new_set;
2549 if (copy_from_user(&new_set, set, sizeof(*set)))
2551 new_set &= ~(sigmask(SIGKILL) | sigmask(SIGSTOP));
2553 spin_lock_irq(¤t->sighand->siglock);
2554 old_set = current->blocked.sig[0];
2562 sigaddsetmask(¤t->blocked, new_set);
2565 sigdelsetmask(¤t->blocked, new_set);
2568 current->blocked.sig[0] = new_set;
2572 recalc_sigpending();
2573 spin_unlock_irq(¤t->sighand->siglock);
2579 old_set = current->blocked.sig[0];
2582 if (copy_to_user(oset, &old_set, sizeof(*oset)))
2589 #endif /* __ARCH_WANT_SYS_SIGPROCMASK */
2591 #ifdef __ARCH_WANT_SYS_RT_SIGACTION
2593 sys_rt_sigaction(int sig,
2594 const struct sigaction __user *act,
2595 struct sigaction __user *oact,
2598 struct k_sigaction new_sa, old_sa;
2601 /* XXX: Don't preclude handling different sized sigset_t's. */
2602 if (sigsetsize != sizeof(sigset_t))
2606 if (copy_from_user(&new_sa.sa, act, sizeof(new_sa.sa)))
2610 ret = do_sigaction(sig, act ? &new_sa : NULL, oact ? &old_sa : NULL);
2613 if (copy_to_user(oact, &old_sa.sa, sizeof(old_sa.sa)))
2619 #endif /* __ARCH_WANT_SYS_RT_SIGACTION */
2621 #ifdef __ARCH_WANT_SYS_SGETMASK
2624 * For backwards compatibility. Functionality superseded by sigprocmask.
2630 return current->blocked.sig[0];
2634 sys_ssetmask(int newmask)
2638 spin_lock_irq(¤t->sighand->siglock);
2639 old = current->blocked.sig[0];
2641 siginitset(¤t->blocked, newmask & ~(sigmask(SIGKILL)|
2643 recalc_sigpending();
2644 spin_unlock_irq(¤t->sighand->siglock);
2648 #endif /* __ARCH_WANT_SGETMASK */
2650 #ifdef __ARCH_WANT_SYS_SIGNAL
2652 * For backwards compatibility. Functionality superseded by sigaction.
2654 asmlinkage unsigned long
2655 sys_signal(int sig, __sighandler_t handler)
2657 struct k_sigaction new_sa, old_sa;
2660 new_sa.sa.sa_handler = handler;
2661 new_sa.sa.sa_flags = SA_ONESHOT | SA_NOMASK;
2663 ret = do_sigaction(sig, &new_sa, &old_sa);
2665 return ret ? ret : (unsigned long)old_sa.sa.sa_handler;
2667 #endif /* __ARCH_WANT_SYS_SIGNAL */
2669 #ifdef __ARCH_WANT_SYS_PAUSE
2674 current->state = TASK_INTERRUPTIBLE;
2676 return -ERESTARTNOHAND;
2681 void __init signals_init(void)
2684 kmem_cache_create("sigqueue",
2685 sizeof(struct sigqueue),
2686 __alignof__(struct sigqueue),
2687 SLAB_PANIC, NULL, NULL);