drv/ser_i196.c

   1 /*!
   2  * \file
   3  * <!--
   4  * Copyright (C) 2003,2004 Develer S.r.l. (http://www.develer.com/)
   5  * Copyright (C) 2000 Bernardo Innocenti <bernie@codewiz.org>
   6  * This file is part of DevLib - See devlib/README for information.
   7  * -->
   8  *
   9  * \version $Id$
  10  *
  11  * \author Bernardo Innocenti <bernie@develer.com>
  12  *
  13  * \brief CPU specific serial I/O driver
  14  */
  15
  16 /*#*
  17  *#* $Log$
  18  *#* Revision 1.5  2004/12/13 11:51:08  bernie
  19  *#* DISABLE_INTS/ENABLE_INTS: Convert to IRQ_DISABLE/IRQ_ENABLE.
  20  *#*
  21  *#* Revision 1.4  2004/08/25 14:12:08  rasky
  22  *#* Aggiornato il comment block dei log RCS
  23  *#*
  24  *#* Revision 1.3  2004/06/03 11:27:09  bernie
  25  *#* Add dual-license information.
  26  *#*
  27  *#* Revision 1.2  2004/05/23 18:21:53  bernie
  28  *#* Trim CVS logs and cleanup header info.
  29  *#*
  30  *#*/
  31
  32 #include "hw.h"
  33 #include "serhw.h"
  34
  35 #define SER_HW_ENABLE_TX \
  36         ATOMIC( \
  37                 if (!ser_sending) \
  38                 { \
  39                         ser_sending = true; \
  40                         (INT_PEND1 |= INT1F_TI) \
  41                 } \
  42         );
  43
  44 static volatile bool ser_sending;
  45
  46 // Serial TX intr
  47 INTERRUPT(0x30) void TI_interrupt(void)
  48 {
  49         if (CANT_SEND)
  50         {
  51                 ser_sending = false;
  52                 return;
  53         }
  54
  55         /* Can we send two bytes at the same time? */
  56         if (SP_STAT & SPSF_TX_EMPTY)
  57         {
  58                 SBUF = fifo_pop(&ser_txfifo);
  59
  60                 if (CANT_SEND)
  61                 {
  62                         ser_sending = false;
  63                         return;
  64                 }
  65         }
  66
  67         SBUF = fifo_pop(&ser_txfifo);
  68 }
  69
  70 INTERRUPT(0x32) void RI_interrupt(void)
  71 {
  72         ser_status |= SP_STAT &
  73                 (SPSF_OVERRUN_ERROR | SPSF_PARITY_ERROR | SPSF_FRAMING_ERROR);
  74         if (fifo_isfull(&ser_rxfifo))
  75                 ser_status |= SERRF_RXFIFOOVERRUN;
  76         else
  77                 fifo_push(&ser_rxfifo, SBUF);
  78 }
  79
  80 static void ser_setbaudrate(unsigned long rate)
  81 {
  82         // Calcola il periodo per la generazione del baud rate richiesto
  83         uint16_t baud = (uint16_t)(((CLOCK_FREQ / 16) / rate) - 1) | 0x8000;
  84         BAUD_RATE = (uint8_t)baud;
  85         BAUD_RATE = (uint8_t)(baud >> 8);
  86 }
  87
  88 static void ser_hw_init(void)
  89 {
  90         // Inizializza la porta seriale
  91         SP_CON = SPCF_RECEIVE_ENABLE | SPCF_MODE1;
  92         ioc1_img |= IOC1F_TXD_SEL | IOC1F_EXTINT_SRC;
  93         IOC1 = ioc1_img;
  94
  95         // Svuota il buffer di ricezione
  96         {
  97                 uint8_t dummy = SBUF;
  98         }
  99
 100         // Abilita gli interrupt
 101         INT_MASK1 |= INT1F_TI | INT1F_RI;
 102 }
 103