altos: Add TelePyro v0.1 support
[fw/altos] / src / avr / ao_spi_usart.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; 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 /*
21  * Atmega32u4 USART in MSPIM (master SPI mode)
22  */
23
24 __xdata uint8_t ao_spi_mutex;
25
26 /* Send bytes over SPI.
27  *
28  * This just polls; the SPI is set to go as fast as possible,
29  * so using interrupts would take way too long
30  */
31 void
32 ao_spi_send(void __xdata *block, uint16_t len) __reentrant
33 {
34         uint8_t *d = block;
35
36         ao_mutex_get(&ao_spi_mutex);
37         while (len--) {
38                 while (!(UCSR1A & (1 << UDRE1)));
39                 UDR1 = *d++;
40                 while (!(UCSR1A & (1 << RXC1)));
41                 (void) UDR1;
42         }
43         ao_mutex_put(&ao_spi_mutex);
44 }
45
46 /* Receive bytes over SPI.
47  *
48  * This sets up tow DMA engines, one reading the data and another
49  * writing constant values to the SPI transmitter as that is what
50  * clocks the data coming in.
51  */
52 void
53 ao_spi_recv(void __xdata *block, uint16_t len) __reentrant
54 {
55         uint8_t *d = block;
56
57         ao_mutex_get(&ao_spi_mutex);
58         while (len--) {
59                 while (!(UCSR1A & (1 << UDRE1)));
60                 UDR1 = 0;
61                 while (!(UCSR1A & (1 << RXC1)));
62                 *d++ = UDR1;
63         }
64         ao_mutex_put(&ao_spi_mutex);
65 }
66
67 /*
68  * Initialize USART0 for SPI using config alt 2
69  *
70  *      MO      P1_5
71  *      MI      P1_4
72  *      CLK     P1_3
73  *
74  * Chip select is the responsibility of the caller
75  */
76
77 #define XCK1_DDR        DDRD
78 #define XCK1_PORT       PORTD
79 #define XCK1            PORTD5
80 #define XMS1_DDR        DDRE
81 #define XMS1_PORT       PORTE
82 #define XMS1            PORTE6
83
84 void
85 ao_spi_init(void)
86 {
87         /* Ensure the USART is powered */
88         PRR1 &= ~(1 << PRUSART1);
89
90         /*
91          * Set pin directions
92          */
93         XCK1_DDR |= (1 << XCK1);
94
95         /* Clear chip select (which is negated) */
96         XMS1_PORT |= (1 < XMS1);
97         XMS1_DDR |= (1 << XMS1);
98
99         /* Set baud register to zero (required before turning transmitter on) */
100         UBRR1 = 0;
101
102         UCSR1C = ((0x3 << UMSEL10) |    /* Master SPI mode */
103                   (0 << UCSZ10) |       /* SPI mode 0 */
104                   (0 << UCPOL1));       /* SPI mode 0 */
105
106         /* Enable transmitter and receiver */
107         UCSR1B = ((1 << RXEN1) |
108                   (1 << TXEN1));
109
110         /* It says that 0 is a legal value; we'll see... */
111         UBRR1 = 0;
112 }