preempt: introduce idle process; timer: use managed irqs for preemption
[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_delayTickes().
96  *
97  * \version $Id$
98  * \author Bernie Innocenti <bernie@codewiz.org>
99  */
100
101 #include "signal.h"
102
103 #include <cfg/debug.h>
104 #include <drv/timer.h>
105 #include <kern/proc.h>
106 #include <kern/proc_p.h>
107
108
109 #if CONFIG_KERN_SIGNALS
110
111 /**
112  * Check if any of the signals in \a sigs has occurred and clear them.
113  * \return the signals that have occurred.
114  */
115 sigmask_t sig_check(sigmask_t sigs)
116 {
117         sigmask_t result;
118         cpuflags_t flags;
119
120         IRQ_SAVE_DISABLE(flags);
121         result = CurrentProcess->sig_recv & sigs;
122         CurrentProcess->sig_recv &= ~sigs;
123         IRQ_RESTORE(flags);
124
125         return result;
126 }
127
128
129 /**
130  * Sleep until any of the signals in \a sigs occurs.
131  * \return the signal(s) that have awoken the process.
132  */
133 sigmask_t sig_wait(sigmask_t sigs)
134 {
135         sigmask_t result;
136         cpuflags_t flags;
137
138         /*
139          * This is subtle: there's a race condition where a concurrent
140          * process or an interrupt calls sig_signal() to set a bit in
141          * out sig_recv just after we have checked for it, but before
142          * we've set sig_wait to tell them we want to be awaken.
143          *
144          * In this case, we'd deadlock with the signal bit already
145          * set and the process never being reinserted into the ready
146          * list.
147          */
148         IRQ_SAVE_DISABLE(flags);
149
150         /* Loop until we get at least one of the signals */
151         while (!(result = CurrentProcess->sig_recv & sigs))
152         {
153                 /*
154                  * Tell "them" that we want to be awaken when any of these
155                  * signals arrives.
156                  */
157                 CurrentProcess->sig_wait = sigs;
158
159                 /*
160                  * Go to sleep and proc_schedule() another process.
161                  *
162                  * We re-enable IRQs because proc_schedule() does not
163                  * guarantee to save and restore the interrupt mask.
164                  */
165                 IRQ_RESTORE(flags);
166                 proc_schedule();
167                 IRQ_SAVE_DISABLE(flags);
168
169                 /*
170                  * When we come back here, the wait mask must have been
171                  * cleared by someone through sig_signal(), and at least
172                  * one of the signals we were expecting must have been
173                  * delivered to us.
174                  */
175                 ASSERT(!CurrentProcess->sig_wait);
176                 ASSERT(CurrentProcess->sig_recv & sigs);
177         }
178
179         /* Signals found: clear them and return */
180         CurrentProcess->sig_recv &= ~sigs;
181
182         IRQ_RESTORE(flags);
183         return result;
184 }
185
186 /**
187  * Sleep until any of the signals in \a sigs or \a timeout ticks elapse.
188  * If the timeout elapse a SIG_TIMEOUT is added to the received signal(s).
189  * \return the signal(s) that have awoken the process.
190  * \note Caller must check return value to check which signal awoke the process.
191  */
192 sigmask_t sig_waitTimeout(sigmask_t sigs, ticks_t timeout)
193 {
194         Timer t;
195         sigmask_t res;
196         cpuflags_t flags;
197
198         ASSERT(!sig_check(SIG_TIMEOUT));
199         ASSERT(!(sigs & SIG_TIMEOUT));
200         /* IRQ are needed to run timer */
201         ASSERT(IRQ_ENABLED());
202
203         timer_set_event_signal(&t, proc_current(), SIG_TIMEOUT);
204         timer_setDelay(&t, timeout);
205         timer_add(&t);
206         res = sig_wait(SIG_TIMEOUT | sigs);
207
208         IRQ_SAVE_DISABLE(flags);
209         /* Remove timer if sigs occur before timer signal */
210         if (!(res & SIG_TIMEOUT) && !sig_check(SIG_TIMEOUT))
211                 timer_abort(&t);
212         IRQ_RESTORE(flags);
213         return res;
214 }
215
216
217 /**
218  * Send the signals \a sigs to the process \a proc.
219  * The process will be awoken if it was waiting for any of them.
220  *
221  * \note This call is interrupt safe.
222  */
223 void sig_signal(Process *proc, sigmask_t sigs)
224 {
225         cpuflags_t flags;
226
227         /* See comment in sig_wait() for why this protection is necessary */
228         IRQ_SAVE_DISABLE(flags);
229
230         /* Set the signals */
231         proc->sig_recv |= sigs;
232
233         /* Check if process needs to be awoken */
234         if (proc->sig_recv & proc->sig_wait)
235         {
236                 /* Wake up process and enqueue in ready list */
237                 proc->sig_wait = 0;
238                 SCHED_ENQUEUE(proc);
239         }
240
241         IRQ_RESTORE(flags);
242 }
243
244 #endif /* CONFIG_KERN_SIGNALS */