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  * \version $Id$
  35  *
  36  * \author Bernie Innocenti <bernie@codewiz.org>
  37  *
  38  * \brief CPU specific serial I/O driver
  39  */
  40
  41 /*#*
  42  *#* $Log$
  43  *#* Revision 1.7  2006/07/19 12:56:26  bernie
  44  *#* Convert to new Doxygen style.
  45  *#*
  46  *#* Revision 1.6  2005/11/04 16:20:02  bernie
  47  *#* Fix reference to README.devlib in header.
  48  *#*
  49  *#* Revision 1.5  2004/12/13 11:51:08  bernie
  50  *#* DISABLE_INTS/ENABLE_INTS: Convert to IRQ_DISABLE/IRQ_ENABLE.
  51  *#*
  52  *#* Revision 1.4  2004/08/25 14:12:08  rasky
  53  *#* Aggiornato il comment block dei log RCS
  54  *#*
  55  *#* Revision 1.3  2004/06/03 11:27:09  bernie
  56  *#* Add dual-license information.
  57  *#*
  58  *#* Revision 1.2  2004/05/23 18:21:53  bernie
  59  *#* Trim CVS logs and cleanup header info.
  60  *#*
  61  *#*/
  62
  63 #include "hw.h"
  64 #include "serhw.h"
  65
  66 #define SER_HW_ENABLE_TX \
  67         ATOMIC( \
  68                 if (!ser_sending) \
  69                 { \
  70                         ser_sending = true; \
  71                         (INT_PEND1 |= INT1F_TI) \
  72                 } \
  73         );
  74
  75 static volatile bool ser_sending;
  76
  77 // Serial TX intr
  78 INTERRUPT(0x30) void TI_interrupt(void)
  79 {
  80         if (CANT_SEND)
  81         {
  82                 ser_sending = false;
  83                 return;
  84         }
  85
  86         /* Can we send two bytes at the same time? */
  87         if (SP_STAT & SPSF_TX_EMPTY)
  88         {
  89                 SBUF = fifo_pop(&ser_txfifo);
  90
  91                 if (CANT_SEND)
  92                 {
  93                         ser_sending = false;
  94                         return;
  95                 }
  96         }
  97
  98         SBUF = fifo_pop(&ser_txfifo);
  99 }
 100
 101 INTERRUPT(0x32) void RI_interrupt(void)
 102 {
 103         ser_status |= SP_STAT &
 104                 (SPSF_OVERRUN_ERROR | SPSF_PARITY_ERROR | SPSF_FRAMING_ERROR);
 105         if (fifo_isfull(&ser_rxfifo))
 106                 ser_status |= SERRF_RXFIFOOVERRUN;
 107         else
 108                 fifo_push(&ser_rxfifo, SBUF);
 109 }
 110
 111 static void ser_setbaudrate(unsigned long rate)
 112 {
 113         // Calcola il periodo per la generazione del baud rate richiesto
 114         uint16_t baud = (uint16_t)(((CLOCK_FREQ / 16) / rate) - 1) | 0x8000;
 115         BAUD_RATE = (uint8_t)baud;
 116         BAUD_RATE = (uint8_t)(baud >> 8);
 117 }
 118
 119 static void ser_hw_init(void)
 120 {
 121         // Inizializza la porta seriale
 122         SP_CON = SPCF_RECEIVE_ENABLE | SPCF_MODE1;
 123         ioc1_img |= IOC1F_TXD_SEL | IOC1F_EXTINT_SRC;
 124         IOC1 = ioc1_img;
 125
 126         // Svuota il buffer di ricezione
 127         {
 128                 uint8_t dummy = SBUF;
 129         }
 130
 131         // Abilita gli interrupt
 132         INT_MASK1 |= INT1F_TI | INT1F_RI;
 133 }
 134