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