Restore preempt_forbid_cnt as private; supply an accessor macro.
[bertos.git] / bertos / kern / signal.c
1 /**
2  * \file
3  * <!--
4  * This file is part of BeRTOS.
5  *
6  * Bertos is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
19  *
20  * As a special exception, you may use this file as part of a free software
21  * library without restriction.  Specifically, if other files instantiate
22  * templates or use macros or inline functions from this file, or you compile
23  * this file and link it with other files to produce an executable, this
24  * file does not by itself cause the resulting executable to be covered by
25  * the GNU General Public License.  This exception does not however
26  * invalidate any other reasons why the executable file might be covered by
27  * the GNU General Public License.
28  *
29  * Copyright 2004, 2008 Develer S.r.l. (http://www.develer.com/)
30  * Copyright 1999, 2000, 2001 Bernie Innocenti <bernie@codewiz.org>
31  * -->
32  *
33  * \brief IPC signals implementation.
34  *
35  * Signals are a low-level IPC primitive.  A process receives a signal
36  * when some external event has happened.  Like interrupt requests,
37  * signals do not carry any additional information.  If processing a
38  * specific event requires additional data, the process must obtain it
39  * through some other mechanism.
40  *
41  * Despite the name, one shouldn't confuse these signals with POSIX
42  * signals.  POSIX signals are usually executed synchronously, like
43  * software interrupts.
44  *
45  * Signals are very low overhead.  Using them exclusively to wait
46  * for multiple asynchronous events results in very simple dispatch
47  * logic with low processor and resource usage.
48  *
49  * The "event" module is a higher-level interface that can optionally
50  * deliver signals to processes.  Messages provide even higher-level
51  * IPC services built on signals.  Semaphore arbitration is also
52  * implemented using signals.
53  *
54  * In this implementation, each process has a limited set of signal
55  * bits (usually 32) and can wait for multiple signals at the same
56  * time using sig_wait().  Signals can also be polled using sig_check(),
57  * but a process spinning on its signals usually defeats their purpose
58  * of providing a multitasking-friendly infrastructure for event-driven
59  * applications.
60  *
61  * Signals are like flags: they are either active or inactive.  After an
62  * external event has delivered a particular signal, it remains raised until
63  * the process acknowledges it using either sig_wait() or sig_check().
64  * Counting signals is not a reliable way to count how many times a
65  * particular event has occurred, because the same signal may be
66  * delivered twice before the process can notice.
67  *
68  * Any execution context, including an interrupt handler, can deliver
69  * a signal to a process using sig_signal().  Multiple independent signals
70  * may be delivered at once with a single invocation of sig_signal(),
71  * although this is rarely useful.
72  *
73  * \section signal_allocation Signal Allocation
74  *
75  * There's no hardcoded mapping of specific events to signal bits.
76  * The meaning of a particular signal bit is defined by an agreement
77  * between the delivering entity and the receiving process.
78  * For instance, a terminal driver may be designed to deliver
79  * a signal bit called SIG_INT when it reads the CTRL-C sequence
80  * from the keyboard, and a process may react to it by quitting.
81  *
82  * \section sig_single SIG_SINGLE
83  *
84  * The SIG_SINGLE bit is reserved as a convenient shortcut in those
85  * simple scenarios where a process needs to wait on just one event
86  * synchronously.  By using SIG_SINGLE, there's no need to allocate
87  * a specific signal from the free pool.  The constraints for safely
88  * accessing SIG_SINGLE are:
89  *  - The process MUST sig_wait() exclusively on SIG_SINGLE
90  *  - SIG_SIGNAL MUST NOT be left pending after use (sig_wait() will reset
91  *        it automatically)
92  *  - Do not sleep between starting the asynchronous task that will fire
93  *    SIG_SINGLE, and the call to  sig_wait().
94  *  - Do not call system functions that may implicitly sleep, such as
95  *    timer_delayTicks().
96  *
97  * \version $Id$
98  * \author Bernie Innocenti <bernie@codewiz.org>
99  */
100
101 #include "signal.h"
102
103 #include <cfg/cfg_timer.h>
104 #include <cfg/debug.h>
105 #include <cpu/irq.h>
106 #include <kern/proc.h>
107 #include <kern/proc_p.h>
108
109
110 #if CONFIG_KERN_SIGNALS
111
112 /**
113  * Check if any of the signals in \a sigs has occurred and clear them.
114  *
115  * \return the signals that have occurred.
116  */
117 sigmask_t sig_check(sigmask_t sigs)
118 {
119         sigmask_t result;
120         cpuflags_t flags;
121
122         IRQ_SAVE_DISABLE(flags);
123         result = CurrentProcess->sig_recv & sigs;
124         CurrentProcess->sig_recv &= ~sigs;
125         IRQ_RESTORE(flags);
126
127         return result;
128 }
129
130
131 /**
132  * Sleep until any of the signals in \a sigs occurs.
133  * \return the signal(s) that have awoken the process.
134  */
135 sigmask_t sig_wait(sigmask_t sigs)
136 {
137         sigmask_t result;
138         cpuflags_t flags;
139
140         /* Sleeping with IRQs disabled or preemption forbidden is illegal */
141         IRQ_ASSERT_ENABLED();
142         ASSERT(proc_allowed());
143
144         /*
145          * This is subtle: there's a race condition where a concurrent
146          * process or an interrupt may call sig_signal() to set a bit in
147          * Process.sig_recv just after we have checked for it, but before
148          * we've set Process.sig_wait to let them know we want to be awaken.
149          *
150          * In this case, we'd deadlock with the signal bit already set
151          * and the process never being reinserted into the ready list.
152          */
153         // FIXME: just use IRQ_DISABLE() here
154         IRQ_SAVE_DISABLE(flags);
155
156         /* Loop until we get at least one of the signals */
157         while (!(result = CurrentProcess->sig_recv & sigs))
158         {
159                 /*
160                  * Tell "them" that we want to be awaken when any of these
161                  * signals arrives.
162                  */
163                 CurrentProcess->sig_wait = sigs;
164
165                 /*
166                  * Go to sleep and proc_switch() to another process.
167                  *
168                  * We re-enable IRQs because proc_switch() does not
169                  * guarantee to save and restore the interrupt mask.
170                  */
171                 IRQ_RESTORE(flags);
172                 proc_switch();
173                 IRQ_SAVE_DISABLE(flags);
174
175                 /*
176                  * When we come back here, the wait mask must have been
177                  * cleared by someone through sig_signal(), and at least
178                  * one of the signals we were expecting must have been
179                  * delivered to us.
180                  */
181                 ASSERT(!CurrentProcess->sig_wait);
182                 ASSERT(CurrentProcess->sig_recv & sigs);
183         }
184
185         /* Signals found: clear them and return */
186         CurrentProcess->sig_recv &= ~sigs;
187
188         IRQ_RESTORE(flags);
189         return result;
190 }
191
192 #if CONFIG_TIMER_EVENTS
193
194 #include <drv/timer.h>
195 /**
196  * Sleep until any of the signals in \a sigs or \a timeout ticks elapse.
197  * If the timeout elapse a SIG_TIMEOUT is added to the received signal(s).
198  * \return the signal(s) that have awoken the process.
199  * \note Caller must check return value to check which signal awoke the process.
200  */
201 sigmask_t sig_waitTimeout(sigmask_t sigs, ticks_t timeout)
202 {
203         Timer t;
204         sigmask_t res;
205         cpuflags_t flags;
206
207         ASSERT(!sig_check(SIG_TIMEOUT));
208         ASSERT(!(sigs & SIG_TIMEOUT));
209         /* IRQ are needed to run timer */
210         ASSERT(IRQ_ENABLED());
211
212         timer_set_event_signal(&t, proc_current(), SIG_TIMEOUT);
213         timer_setDelay(&t, timeout);
214         timer_add(&t);
215         res = sig_wait(SIG_TIMEOUT | sigs);
216
217         IRQ_SAVE_DISABLE(flags);
218         /* Remove timer if sigs occur before timer signal */
219         if (!(res & SIG_TIMEOUT) && !sig_check(SIG_TIMEOUT))
220                 timer_abort(&t);
221         IRQ_RESTORE(flags);
222         return res;
223 }
224
225 #endif // CONFIG_TIMER_EVENTS
226
227
228 /**
229  * Send the signals \a sigs to the process \a proc.
230  * The process will be awoken if it was waiting for any of them.
231  *
232  * \note This call is interrupt safe.
233  */
234 void sig_signal(Process *proc, sigmask_t sigs)
235 {
236         cpuflags_t flags;
237
238         /* See comment in sig_wait() for why this protection is necessary */
239         IRQ_SAVE_DISABLE(flags);
240
241         /* Set the signals */
242         proc->sig_recv |= sigs;
243
244         /* Check if process needs to be awoken */
245         if (proc->sig_recv & proc->sig_wait)
246         {
247                 /* Wake up process and enqueue in ready list */
248                 proc->sig_wait = 0;
249                 SCHED_ENQUEUE(proc);
250         }
251
252         IRQ_RESTORE(flags);
253 }
254
255 #endif /* CONFIG_KERN_SIGNALS */