bertos/cpu/i196/drv/ser_i196.c

   1 /**
   2  * \file
   3  * <!--
   4  * This file is part of BeRTOS.
   5  *
   6  * Bertos is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  * As a special exception, you may use this file as part of a free software
  21  * library without restriction.  Specifically, if other files instantiate
  22  * templates or use macros or inline functions from this file, or you compile
  23  * this file and link it with other files to produce an executable, this
  24  * file does not by itself cause the resulting executable to be covered by
  25  * the GNU General Public License.  This exception does not however
  26  * invalidate any other reasons why the executable file might be covered by
  27  * the GNU General Public License.
  28  *
  29  * Copyright (C) 2003,2004 Develer S.r.l. (http://www.develer.com/)
  30  * Copyright (C) 2000 Bernie Innocenti <bernie@codewiz.org>
  31  *
  32  * -->
  33  *
  34  *
  35  * \author Bernie Innocenti <bernie@codewiz.org>
  36  *
  37  * \brief CPU specific serial I/O driver
  38  */
  39
  40 /*#*
  41  *#* $Log$
  42  *#* Revision 1.7  2006/07/19 12:56:26  bernie
  43  *#* Convert to new Doxygen style.
  44  *#*
  45  *#* Revision 1.6  2005/11/04 16:20:02  bernie
  46  *#* Fix reference to README.devlib in header.
  47  *#*
  48  *#* Revision 1.5  2004/12/13 11:51:08  bernie
  49  *#* DISABLE_INTS/ENABLE_INTS: Convert to IRQ_DISABLE/IRQ_ENABLE.
  50  *#*
  51  *#* Revision 1.4  2004/08/25 14:12:08  rasky
  52  *#* Aggiornato il comment block dei log RCS
  53  *#*
  54  *#* Revision 1.3  2004/06/03 11:27:09  bernie
  55  *#* Add dual-license information.
  56  *#*
  57  *#* Revision 1.2  2004/05/23 18:21:53  bernie
  58  *#* Trim CVS logs and cleanup header info.
  59  *#*
  60  *#*/
  61
  62 #include "hw.h"
  63 #include "serhw.h"
  64
  65 #define SER_HW_ENABLE_TX \
  66         ATOMIC( \
  67                 if (!ser_sending) \
  68                 { \
  69                         ser_sending = true; \
  70                         (INT_PEND1 |= INT1F_TI) \
  71                 } \
  72         );
  73
  74 static volatile bool ser_sending;
  75
  76 // Serial TX intr
  77 INTERRUPT(0x30) void TI_interrupt(void)
  78 {
  79         if (CANT_SEND)
  80         {
  81                 ser_sending = false;
  82                 return;
  83         }
  84
  85         /* Can we send two bytes at the same time? */
  86         if (SP_STAT & SPSF_TX_EMPTY)
  87         {
  88                 SBUF = fifo_pop(&ser_txfifo);
  89
  90                 if (CANT_SEND)
  91                 {
  92                         ser_sending = false;
  93                         return;
  94                 }
  95         }
  96
  97         SBUF = fifo_pop(&ser_txfifo);
  98 }
  99
 100 INTERRUPT(0x32) void RI_interrupt(void)
 101 {
 102         ser_status |= SP_STAT &
 103                 (SPSF_OVERRUN_ERROR | SPSF_PARITY_ERROR | SPSF_FRAMING_ERROR);
 104         if (fifo_isfull(&ser_rxfifo))
 105                 ser_status |= SERRF_RXFIFOOVERRUN;
 106         else
 107                 fifo_push(&ser_rxfifo, SBUF);
 108 }
 109
 110 static void ser_setbaudrate(unsigned long rate)
 111 {
 112         // Calcola il periodo per la generazione del baud rate richiesto
 113         uint16_t baud = (uint16_t)(((CPU_FREQ / 16) / rate) - 1) | 0x8000;
 114         BAUD_RATE = (uint8_t)baud;
 115         BAUD_RATE = (uint8_t)(baud >> 8);
 116 }
 117
 118 static void ser_hw_init(void)
 119 {
 120         // Inizializza la porta seriale
 121         SP_CON = SPCF_RECEIVE_ENABLE | SPCF_MODE1;
 122         ioc1_img |= IOC1F_TXD_SEL | IOC1F_EXTINT_SRC;
 123         IOC1 = ioc1_img;
 124
 125         // Svuota il buffer di ricezione
 126         {
 127                 uint8_t dummy = SBUF;
 128         }
 129
 130         // Abilita gli interrupt
 131         INT_MASK1 |= INT1F_TI | INT1F_RI;
 132 }
 133