2bd47af1417dd9de3d4090bbc9200e4475110407
[fw/altos] / ao_timer.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; version 2 of the License.
7  *
8  * This program is distributed in the hope that it will be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License along
14  * with this program; if not, write to the Free Software Foundation, Inc.,
15  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
16  */
17
18 #include "ao.h"
19
20 static volatile __data uint16_t ao_tick_count;
21
22 uint16_t ao_time(void)
23 {
24         __data uint16_t ret;
25         __critical {
26                 ret = ao_tick_count;
27         }
28         return ret;
29 }
30
31 void
32 ao_delay(uint16_t ticks)
33 {
34         uint16_t until = ao_time() + ticks;
35
36         while ((int16_t) (until - ao_time()) > 0)
37                 ao_sleep(DATA_TO_XDATA(&ao_tick_count));
38 }
39
40 #define T1_CLOCK_DIVISOR        8       /* 24e6/8 = 3e6 */
41 #define T1_SAMPLE_TIME          30000   /* 3e6/30000 = 100 */
42
43 __data uint8_t  ao_adc_interval = 1;
44 __data uint8_t  ao_adc_count;
45
46 void ao_timer_isr(void) interrupt 9
47 {
48         ++ao_tick_count;
49         if (++ao_adc_count >= ao_adc_interval) {
50                 ao_adc_count = 0;
51                 ao_adc_poll();
52         }
53         ao_wakeup(DATA_TO_XDATA(&ao_tick_count));
54 }
55
56 void
57 ao_timer_init(void)
58 {
59         /* NOTE:  This uses a timer only present on cc1111 architecture. */
60
61         /* disable timer 1 */
62         T1CTL = 0;
63
64         /* set the sample rate */
65         T1CC0H = T1_SAMPLE_TIME >> 8;
66         T1CC0L = T1_SAMPLE_TIME;
67
68         T1CCTL0 = T1CCTL_MODE_COMPARE;
69         T1CCTL1 = 0;
70         T1CCTL2 = 0;
71
72         /* clear timer value */
73         T1CNTL = 0;
74
75         /* enable overflow interrupt */
76         OVFIM = 1;
77         /* enable timer 1 interrupt */
78         T1IE = 1;
79
80         /* enable timer 1 in module mode, dividing by 8 */
81         T1CTL = T1CTL_MODE_MODULO | T1CTL_DIV_8;
82 }
83