merge
[aversive.git] / modules / comm / uart / uart.c
1 /*  
2  *  Copyright Droids Corporation, Microb Technology, Eirbot (2005)
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,
10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  *  GNU General Public License for more details.
13  *
14  *  You should have received a copy of the GNU General Public License
15  *  along with this program; if not, write to the Free Software
16  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
17  *
18  *  Revision : $Id: uart.c,v 1.33.4.7 2009-01-23 23:08:42 zer0 Exp $
19  *
20  */
21
22 /* Olivier MATZ, Droids-corp 2004 - 2009 */
23
24 #include <aversive.h>
25 #include <aversive/list.h>
26
27 #include <uart.h>
28 #include <uart_defs.h>
29 #include <uart_private.h>
30
31 struct cirbuf g_tx_fifo[UART_HW_NUM];
32 struct cirbuf g_rx_fifo[UART_HW_NUM];
33
34 /* global vars are initialized to 0 (NULL) */
35 event *rx_event[UART_HW_NUM];
36 event *tx_event[UART_HW_NUM];
37
38 const struct regs uart_regs[UART_HW_NUM] = {
39 #ifdef UDR0
40         {
41                 .udr = &UDR0,
42                 .ucsra = &UCSR0A,
43                 .ucsrb = &UCSR0B,
44                 .ucsrc = &UCSR0C,
45                 .ubrrl = &UBRR0L,
46                 .ubrrh = &UBRR0H,
47         },
48 #endif
49 #ifdef UDR1
50         {
51                 .udr = &UDR1,
52                 .ucsra = &UCSR1A,
53                 .ucsrb = &UCSR1B,
54                 .ucsrc = &UCSR1C,
55                 .ubrrl = &UBRR1L,
56                 .ubrrh = &UBRR1H,
57         },
58 #endif
59 #ifdef UDR2
60         {
61                 .udr = &UDR2,
62                 .ucsra = &UCSR2A,
63                 .ucsrb = &UCSR2B,
64                 .ucsrc = &UCSR2C,
65                 .ubrrl = &UBRR2L,
66                 .ubrrh = &UBRR2H,
67         },
68 #endif
69 #ifdef UDR3
70         {
71                 .udr = &UDR3,
72                 .ucsra = &UCSR3A,
73                 .ucsrb = &UCSR3B,
74                 .ucsrc = &UCSR3C,
75                 .ubrrl = &UBRR3L,
76                 .ubrrh = &UBRR3H,
77         },
78 #endif
79 };
80
81 /**
82  * This is the interruption function which occurs when the entire
83  * frame in the transmit shift register has been shifted out and 
84  * there is no new data in the transmit buffer.
85  */
86 #ifdef UART0_COMPILE
87 #ifndef SIG_UART0_DATA
88 #define SIG_UART0_DATA SIG_USART0_DATA
89 #endif
90 SIGNAL(SIG_UART0_DATA)
91 {
92         uart_send_next_char(0);
93 }
94 #endif
95 #ifdef UART1_COMPILE
96 #ifndef SIG_UART1_DATA
97 #define SIG_UART1_DATA SIG_USART1_DATA
98 #endif
99 SIGNAL(SIG_UART1_DATA)
100 {
101         uart_send_next_char(1);
102 }
103 #endif
104 #ifdef UART2_COMPILE
105 #ifndef SIG_UART2_DATA
106 #define SIG_UART2_DATA SIG_USART2_DATA
107 #endif
108 SIGNAL(SIG_UART2_DATA)
109 {
110         uart_send_next_char(2);
111 }
112 #endif
113 #ifdef UART3_COMPILE
114 #ifndef SIG_UART3_DATA
115 #define SIG_UART3_DATA SIG_USART3_DATA
116 #endif
117 SIGNAL(SIG_UART3_DATA)
118 {
119         uart_send_next_char(3);
120 }
121 #endif
122
123 static void uart_recv_next_char(uint8_t num);
124
125 /**
126  * This is the interruption function which occurs when there is
127  * a new unread data in the reception buffer.
128  */
129 #ifdef UART0_COMPILE
130 #ifndef SIG_UART0_RECV
131 #define SIG_UART0_RECV SIG_USART0_RECV
132 #endif
133 SIGNAL(SIG_UART0_RECV)
134 {
135         uart_recv_next_char(0);
136 }
137 #endif
138 #ifdef UART1_COMPILE
139 #ifndef SIG_UART1_RECV
140 #define SIG_UART1_RECV SIG_USART1_RECV
141 #endif
142 SIGNAL(SIG_UART1_RECV)
143 {
144         uart_recv_next_char(1);
145 }
146 #endif
147 #ifdef UART2_COMPILE
148 #ifndef SIG_UART2_RECV
149 #define SIG_UART2_RECV SIG_USART2_RECV
150 #endif
151 SIGNAL(SIG_UART2_RECV)
152 {
153         uart_recv_next_char(2);
154 }
155 #endif
156 #ifdef UART3_COMPILE
157 #ifndef SIG_UART3_RECV
158 #define SIG_UART3_RECV SIG_USART3_RECV
159 #endif
160 SIGNAL(SIG_UART3_RECV)
161 {
162         uart_recv_next_char(3);
163 }
164 #endif
165
166
167 /** 
168  * transmit next character of fifo if any, and call the event function.
169  * This function is executed with intr locked.
170  */
171 void uart_send_next_char(uint8_t num)
172 {
173 #ifdef CONFIG_MODULE_UART_9BITS
174         if (uart_getconf_nbits(num) == 9) {
175                 int elt = 0;
176
177                 /* for 9 bits, it uses 2 places in the fifo */
178                 if (CIRBUF_GET_LEN(&g_tx_fifo[num]) < 2) {
179                         cbi(*uart_regs[num].ucsrb, UDRIE);
180                         return;
181                 }
182
183                 cirbuf_get_buf_tail(&g_tx_fifo[num], (char *)&elt, 2);
184                 cirbuf_del_buf_tail(&g_tx_fifo[num], 2);
185
186                 uart_set_udr_9bits(num, elt);
187                 sbi(*uart_regs[num].ucsrb, UDRIE);
188         }
189         else /* 5, 6, 7 or 8 bits */
190 #endif /* CONFIG_MODULE_UART_9BITS */
191         { 
192                 char elt = 0;
193
194                 if (CIRBUF_IS_EMPTY(&g_tx_fifo[num])) {
195                         cbi(*uart_regs[num].ucsrb, UDRIE);
196                         return;
197                 }
198
199                 elt = cirbuf_get_tail(&g_tx_fifo[num]);
200                 cirbuf_del_tail(&g_tx_fifo[num]);
201                 uart_set_udr(num, elt);
202                 sbi(*uart_regs[num].ucsrb, UDRIE);
203         }
204 }
205
206 /**
207  * UART RX Interrupt
208  */
209 static void uart_recv_next_char(uint8_t num)
210 {
211 #ifdef CONFIG_MODULE_UART_9BITS
212         if (uart_getconf_nbits() == 9) {
213                 int elt = 0;
214
215                 elt = uart_get_udr_9bits(num);
216                 if (CIRBUF_GET_FREELEN(&g_rx_fifo[num]) >= 2) {
217                         cirbuf_add_buf_head(&g_rx_fifo[num], (char *)&elt, 2);
218                 }
219
220                 if (rx_event[num])
221                         ((event_9bits *)rx_event[num])(elt);
222         }
223         else 
224 #endif /* CONFIG_MODULE_UART_9BITS */
225         {
226                 char elt = 0;
227
228                 elt = uart_get_udr(num);
229                 if (!CIRBUF_IS_FULL(&g_rx_fifo[num])) {
230                         cirbuf_add_head(&g_rx_fifo[num], elt);
231                 }
232
233                 if (rx_event[num])
234                         rx_event[num](elt);
235         }
236 }
237
238 /* init all uarts */
239 void uart_init(void)
240 {
241 #if (defined UDR0) && (defined UART0_COMPILE)
242         uart_setconf(0, NULL);
243 #endif
244
245 #if (defined UDR1) && (defined UART1_COMPILE)
246         uart_setconf(1, NULL);
247 #endif
248
249 #if (defined UDR2) && (defined UART2_COMPILE)
250         uart_setconf(2, NULL);
251 #endif
252
253 #if (defined UDR3) && (defined UART3_COMPILE)
254         uart_setconf(3, NULL);
255 #endif
256 }