Merge branch 'master' of ssh://git.gag.com/scm/git/fw/altos
[fw/altos] / src / stm-demo / ao_demo.c
1 /*
2  * Copyright © 2011 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 #include <ao_exti.h>
21 #include <ao_event.h>
22 #include <ao_quadrature.h>
23 #include <ao_button.h>
24 #include <ao_boot.h>
25
26 struct ao_task demo_task;
27
28 static inline int min(int a, int b) { return a < b ? a : b; }
29
30 void
31 ao_demo(void)
32 {
33         char    message[] = "Hello, Mike & Bdale --- ";
34         char    part[7];
35         int     i = 0;
36         int     len = sizeof(message) - 1;
37         int     first, second;
38
39         part[6] = '\0';
40         for (;;) {
41                 ao_delay(AO_MS_TO_TICKS(150));
42                 first = min(6, len - i);
43                 second = 6 - first;
44                 memcpy(part, message + i, first);
45                 memcpy(part + first, message, second);
46                 ao_lcd_font_string(part);
47                 if (++i >= len)
48                         i = 0;
49         }
50 }
51
52 void _close() { }
53 void _sbrk() { }
54 void _isatty() { }
55 void _lseek() { }
56 void _exit () { }
57 void _read () { }
58 void _fstat() { }
59
60 #define AO_DMA_TEST_INDEX       STM_DMA_INDEX(4)
61
62 static void
63 ao_dma_test(void) {
64         static char     src[20] = "hello, world";
65         static char     dst[20];
66         
67         dst[0] = '\0';
68         ao_dma_set_transfer(AO_DMA_TEST_INDEX, dst, src, 13,
69                             (1 << STM_DMA_CCR_MEM2MEM) |
70                             (STM_DMA_CCR_PL_LOW << STM_DMA_CCR_PL) |
71                             (STM_DMA_CCR_MSIZE_8 << STM_DMA_CCR_MSIZE) |
72                             (STM_DMA_CCR_PSIZE_8 << STM_DMA_CCR_PSIZE) |
73                             (1 << STM_DMA_CCR_MINC) |
74                             (1 << STM_DMA_CCR_PINC) |
75                             (0 << STM_DMA_CCR_CIRC) |
76                             (STM_DMA_CCR_DIR_MEM_TO_PER << STM_DMA_CCR_DIR));
77         ao_dma_start(AO_DMA_TEST_INDEX);
78         ao_arch_critical(
79                 while (!ao_dma_done[AO_DMA_TEST_INDEX])
80                         ao_sleep(&ao_dma_done[AO_DMA_TEST_INDEX]);
81                 );
82         ao_dma_done_transfer(AO_DMA_TEST_INDEX);
83         printf ("copied %s\n", dst);
84 }
85
86 static void
87 ao_spi_write(void) {
88         unsigned char   data[] = { 0x55, 0xaa, 0xff, 0x00 };
89         int i;
90
91         for (i = 0; i < 10; i++) {
92                 ao_spi_get(0, AO_SPI_SPEED_FAST);
93                 stm_gpio_set(&stm_gpioc, 12, 0);
94                 ao_spi_send(data, 4, 0);
95                 stm_gpio_set(&stm_gpioc, 12, 1);
96                 ao_spi_put(0);
97                 printf(".");
98                 flush();
99                 ao_delay(100);
100         }
101 }
102
103 static void
104 ao_spi_read(void) {
105         unsigned char   data[4];
106         int i;
107
108         for (i = 0; i < 10; i++) {
109                 ao_spi_get(0, AO_SPI_SPEED_FAST);
110                 stm_gpio_set(&stm_gpioc, 12, 0);
111                 ao_spi_recv(data, 4, 0);
112                 stm_gpio_set(&stm_gpioc, 12, 1);
113                 ao_spi_put(0);
114                 printf(".");
115                 flush();
116                 ao_delay(100);
117         }
118 }
119
120 static void
121 ao_i2c_write(void) {
122         unsigned char   data[] = { 0x55, 0xaa, 0xff, 0x00 };
123         int i;
124
125         for (i = 0; i < 10; i++) {
126                 ao_i2c_get(0);
127                 if (ao_i2c_start(0, 0x55))
128                         ao_i2c_send(data, 4, 0, true);
129                 else {
130                         printf ("i2c start failed\n");
131                         ao_i2c_put(0);
132                         break;
133                 }
134                 ao_i2c_put(0);
135                 printf(".");
136                 flush();
137                 ao_delay(100);
138         }
139 }
140
141 static void
142 ao_temp (void)
143 {
144         struct ao_data  packet;
145         int temp;
146
147         ao_data_get(&packet);
148
149         /*
150          * r = (110 - 25) / (ts_cal_hot - ts_cal_cold)
151          * 25 + (110 - 25) * (temp - ts_cal_cold) / (ts_cal_hot - ts_cal_cold)
152          */
153         temp = 25 + (110 - 25) * (packet.adc.temp - stm_temp_cal.ts_cal_cold) / (stm_temp_cal.ts_cal_hot - stm_temp_cal.ts_cal_cold);
154         printf ("temp: %d\n", temp);
155 }
156
157 #if 0
158 static void
159 ao_event(void)
160 {
161         struct ao_event event;
162
163         for (;;) {
164                 flush();
165                 ao_event_get(&event);
166                 printf ("type %1d unit %1d tick %5u value %ld\n",
167                         event.type, event.unit, event.tick, event.value);
168                 if (event.value == 100)
169                         break;
170         }
171
172 }
173 #endif
174
175 static uint8_t ao_blinking = 0;
176
177 static void
178 ao_blink(void)
179 {
180         for (;;) {
181                 while (!ao_blinking)
182                         ao_sleep(&ao_blinking);
183                 while (ao_blinking) {
184                         ao_led_toggle(AO_LED_BLUE|AO_LED_GREEN);
185                         ao_delay(AO_MS_TO_TICKS(500));
186                 }
187         }
188 }
189
190 static struct ao_task ao_blink_task;
191
192 static void
193 ao_blink_toggle(void)
194 {
195         ao_blinking = !ao_blinking;
196         ao_wakeup(&ao_blinking);
197 }
198
199
200 const struct ao_cmds ao_demo_cmds[] = {
201         { ao_dma_test,  "D\0DMA test" },
202         { ao_spi_write, "W\0SPI write" },
203         { ao_spi_read, "R\0SPI read" },
204         { ao_i2c_write, "i\0I2C write" },
205         { ao_temp, "t\0Show temp" },
206         { ao_blink_toggle, "b\0Toggle LED blinking" },
207 /*      { ao_event, "e\0Monitor event queue" }, */
208         { 0, NULL }
209 };
210
211 int
212 main(void)
213 {
214         ao_clock_init();
215         
216         ao_task_init();
217
218         ao_led_init(LEDS_AVAILABLE);
219         ao_led_on(AO_LED_GREEN);
220         ao_led_off(AO_LED_BLUE);
221         ao_timer_init();
222         ao_dma_init();
223         ao_cmd_init();
224 //      ao_lcd_stm_init();
225 //      ao_lcd_font_init();
226         ao_spi_init();
227 //      ao_i2c_init();
228 //      ao_exti_init();
229 //      ao_quadrature_init();
230 //      ao_button_init();
231         ao_storage_init();
232
233 //      ao_timer_set_adc_interval(100);
234
235 //      ao_adc_init();
236         ao_usb_init();
237
238         ao_add_task(&ao_blink_task, ao_blink, "blink");
239         ao_cmd_register(&ao_demo_cmds[0]);
240         
241         ao_start_scheduler();
242         return 0;
243 }