altos: Add bit-bang i2c driver
[fw/altos] / src / kernel / ao_mutex.c
1 /*
2  * Copyright © 2009 Keith Packard <keithp@keithp.com>
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 2 of the License, or
7  * (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License along
15  * with this program; if not, write to the Free Software Foundation, Inc.,
16  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
17  */
18
19 #include "ao.h"
20
21 #ifndef HAS_MUTEX_TRY
22 #define HAS_MUTEX_TRY 1
23 #endif
24
25 #if HAS_MUTEX_TRY
26
27 uint8_t
28 ao_mutex_try(uint8_t *mutex, uint8_t task_id) 
29 {
30         uint8_t ret;
31         if (*mutex == task_id)
32                 ao_panic(AO_PANIC_MUTEX);
33         ao_arch_critical(
34                 if (*mutex)
35                         ret = 0;
36                 else {
37                         *mutex = task_id;
38                         ret = 1;
39                 });
40         return ret;
41 }
42 #endif
43
44 void
45 ao_mutex_get(uint8_t *mutex) 
46 {
47         if (*mutex == ao_cur_task->task_id)
48                 ao_panic(AO_PANIC_MUTEX);
49         ao_arch_critical(
50                 while (*mutex)
51                         ao_sleep(mutex);
52                 *mutex = ao_cur_task->task_id;
53                 );
54 }
55
56 void
57 ao_mutex_put(uint8_t *mutex) 
58 {
59         if (*mutex != ao_cur_task->task_id)
60                 ao_panic(AO_PANIC_MUTEX);
61         ao_arch_critical(
62                 *mutex = 0;
63                 ao_wakeup(mutex);
64                 );
65 }