Import drv/ modules.
[bertos.git] / drv / ser_i196.c
1 /**
2  * \file
3  * Copyright (C) 2000 Bernardo Innocenti <bernie@codewiz.org>
4  * Copyright (C) 2003 Develer S.r.l. (http://www.develer.com/)
5  * All Rights Reserved.
6  *
7  * \version $Id$
8  *
9  * \author Bernardo Innocenti <bernie@develer.com>
10  *
11  * \brief CPU specific serial I/O driver
12  */
13
14 /*
15  * $Log$
16  * Revision 1.1  2004/05/23 18:10:11  bernie
17  * Import drv/ modules.
18  *
19  * Revision 1.1  2003/11/20 22:30:21  aleph
20  * Add serial driver
21  *
22  */
23
24 #include "hw.h"
25 #include "serhw.h"
26
27 #define SER_HW_ENABLE_TX \
28         DISABLE_INTS; \
29         if (!ser_sending) \
30         { \
31                 ser_sending = true; \
32                 (INT_PEND1 |= INT1F_TI) \
33         } \
34         ENABLE_INTS;
35
36 static volatile bool ser_sending;
37
38 // Serial TX intr
39 INTERRUPT(0x30) void TI_interrupt(void)
40 {
41         if (CANT_SEND)
42         {
43                 ser_sending = false;
44                 return;
45         }
46
47         /* Can we send two bytes at the same time? */
48         if (SP_STAT & SPSF_TX_EMPTY)
49         {
50                 SBUF = fifo_pop(&ser_txfifo);
51
52                 if (CANT_SEND)
53                 {
54                         ser_sending = false;
55                         return;
56                 }
57         }
58
59         SBUF = fifo_pop(&ser_txfifo);
60 }
61
62 INTERRUPT(0x32) void RI_interrupt(void)
63 {
64         ser_status |= SP_STAT &
65                 (SPSF_OVERRUN_ERROR | SPSF_PARITY_ERROR | SPSF_FRAMING_ERROR);
66         if (fifo_isfull(&ser_rxfifo))
67                 ser_status |= SERRF_RXFIFOOVERRUN;
68         else
69                 fifo_push(&ser_rxfifo, SBUF);
70 }
71
72 static void ser_setbaudrate(unsigned long rate)
73 {
74         // Calcola il periodo per la generazione del baud rate richiesto
75         uint16_t baud = (uint16_t)(((CLOCK_FREQ / 16) / rate) - 1) | 0x8000;
76         BAUD_RATE = (uint8_t)baud;
77         BAUD_RATE = (uint8_t)(baud >> 8);
78 }
79
80 static void ser_hw_init(void)
81 {
82         // Inizializza la porta seriale
83         SP_CON = SPCF_RECEIVE_ENABLE | SPCF_MODE1;
84         ioc1_img |= IOC1F_TXD_SEL | IOC1F_EXTINT_SRC;
85         IOC1 = ioc1_img;
86
87         // Svuota il buffer di ricezione
88         {
89                 uint8_t dummy = SBUF;
90         }
91
92         // Abilita gli interrupt
93         INT_MASK1 |= INT1F_TI | INT1F_RI;
94 }
95