9583a388d26983e01b0b9bdb2788ba3073d06f43
[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         volatile bit ea_save;
25         __data uint16_t ret;
26         
27         ea_save = EA;
28         ret = ao_tick_count;
29         EA = ea_save;
30         return ret;
31 }
32
33 void
34 ao_delay(uint16_t ticks)
35 {
36         uint16_t until = ao_time() + ticks;
37
38         while ((int16_t) (until - ao_time()) > 0)
39                 ao_sleep(DATA_TO_XDATA(&ao_tick_count));
40 }
41
42 #define T1_CLOCK_DIVISOR        8       /* 24e6/8 = 3e6 */
43 #define T1_SAMPLE_TIME          30000   /* 3e6/30000 = 100 */
44
45 void ao_timer_isr(void) interrupt 9
46 {
47         ++ao_tick_count;
48         ao_adc_poll();
49         ao_wakeup(DATA_TO_XDATA(&ao_tick_count));
50 }
51
52 void
53 ao_timer_init(void)
54 {
55         /* NOTE:  This uses a timer only present on cc1111 architecture. */
56
57         /* disable timer 1 */
58         T1CTL = 0;
59
60         /* set the sample rate */
61         T1CC0H = T1_SAMPLE_TIME >> 8;
62         T1CC0L = T1_SAMPLE_TIME;
63
64         T1CCTL0 = T1CCTL_MODE_COMPARE;
65         T1CCTL1 = 0;
66         T1CCTL2 = 0;
67
68         /* clear timer value */
69         T1CNTL = 0;
70
71         /* enable overflow interrupt */
72         OVFIM = 1;
73         /* enable timer 1 interrupt */
74         T1IE = 1;
75
76         /* enable timer 1 in module mode, dividing by 8 */
77         T1CTL = T1CTL_MODE_MODULO | T1CTL_DIV_8;
78 }
79