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