/**************************************************************************** * config/xtrs/src/xtr_serial.c * * Copyright (C) 2008 Jacques Pelletier. All rights reserved. * Author: Jacques Pelletier * * This file is a part of NuttX and hence * * Copyright (C) 2008-2009, 2012 Gregory Nutt. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in * the documentation and/or other materials provided with the * distribution. * 3. Neither the name NuttX nor the names of its contributors may be * used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. * ****************************************************************************/ /**************************************************************************** * Included Files ****************************************************************************/ #include #include #include #include #include #include #include #include #include #include #include #include #include "up_arch.h" #include "os_internal.h" #include "up_internal.h" #ifdef USE_SERIAL_DRIVER /**************************************************************************** * Definitions ****************************************************************************/ #define TRSDOS 0 /* TRSDOS 1.3 */ #define LDOS 1 /* LDOS 5.3.1 */ #define MODEM_STATUS 0xe8 #define RESET 0xe8 #define BAUD 0xe9 #define STATUS 0xea #define CONTROL 0xea #define RECV_REG 0xeb #define XMIT_REG 0xeb #define XMIT_REG_EMPTY 0x40 #define WRINTMASK 0xe0 #define MASK_XMIT_INT 0x10 #define MASK_RECV_INT 0x20 #define MASK_ERR_INT 0x40 #if TRSDOS #define WRINTMASK_SHADOW 0x4213 #define XMIT_INT_VECTOR 0x4207 #define RECV_INT_VECTOR 0x420a #endif #if LDOS #define WRINTMASK_SHADOW 0x4474 #define XMIT_INT_VECTOR 0x447D #define RECV_INT_VECTOR 0x447F #endif /**************************************************************************** * Private Types ****************************************************************************/ /**************************************************************************** * Private Function Prototypes ****************************************************************************/ static int up_setup(struct uart_dev_s *dev); static void up_shutdown(struct uart_dev_s *dev); static int up_attach(struct uart_dev_s *dev); static void up_detach(struct uart_dev_s *dev); static int up_ioctl(struct file *filep, int cmd, unsigned long arg); static int up_receive(struct uart_dev_s *dev, uint32_t *status); static void up_rxint(struct uart_dev_s *dev, bool enable); static bool up_rxavailable(struct uart_dev_s *dev); static void up_send(struct uart_dev_s *dev, int ch); static void up_txint(struct uart_dev_s *dev, bool enable); static bool up_txready(struct uart_dev_s *dev); static bool up_txempty(struct uart_dev_s *dev); /**************************************************************************** * Private Variables ****************************************************************************/ struct uart_ops_s g_uart_ops = { up_setup, /* setup */ up_shutdown, /* shutdown */ up_attach, /* attach */ up_detach, /* detach */ up_ioctl, /* ioctl */ up_receive, /* receive */ up_rxint, /* rxint */ up_rxavailable, /* rxavailable */ up_send, /* send */ up_txint, /* txint */ up_txready, /* txready */ up_txempty, /* txempty */ }; /* I/O buffers */ static char g_uartrxbuffer[CONFIG_UART_RXBUFSIZE]; static char g_uarttxbuffer[CONFIG_UART_TXBUFSIZE]; /* This describes the state of the fake UART port. */ static uart_dev_t g_uartport = { 0, /* open_count */ false, /* xmitwaiting */ false, /* recvwaiting */ false, /* isconsole */ { 1 }, /* closesem */ { 0 }, /* xmitsem */ { 0 }, /* recvsem */ { /* xmit */ { 1 }, /* sem */ 0, /* head */ 0, /* tail */ CONFIG_UART_TXBUFSIZE, /* size */ g_uarttxbuffer, /* buffer */ }, { /* recv */ { 1 }, /* sem */ 0, /* head */ 0, /* tail */ CONFIG_UART_RXBUFSIZE, /* size */ g_uartrxbuffer, /* buffer */ }, &g_uart_ops, /* ops */ NULL, /* priv */ }; /**************************************************************************** * Private Functions ****************************************************************************/ /**************************************************************************** * Name: up_setup * * Description: * Configure the UART baud, bits, parity, fifos, etc. This * method is called the first time that the serial port is * opened. * ****************************************************************************/ static int up_setup(struct uart_dev_s *dev) { outp(RESET, 0); outp(CONTROL, ctrl); outp(BAUD, baud); return OK; } /**************************************************************************** * Name: up_shutdown * * Description: * Disable the UART. This method is called when the serial * port is closed * ****************************************************************************/ static void up_shutdown(struct uart_dev_s *dev) { } /**************************************************************************** * Name: up_attach * * Description: * Configure the UART to operation in interrupt driven mode. This method is * called when the serial port is opened. Normally, this is just after the * setup() method is called, however, the serial console may operate in a * non-interrupt driven mode during the boot phase. * * RX and TX interrupts are not enabled by the attach method (unless the * hardware supports multiple levels of interrupt enabling). The RX and TX * interrupts are not enabled until the txint() and rxint() methods are called. * ****************************************************************************/ static int up_attach(struct uart_dev_s *dev) { // SDCC complains here // *((void (*)()) XMIT_INT_VECTOR) = rs232_xmitisr; // *((void (*)()) RECV_INT_VECTOR) = rs232_recvisr; *((int *) XMIT_INT_VECTOR) = (int) rs232_xmitisr; *((int *) RECV_INT_VECTOR) = (int) rs232_recvisr; *(char *)WRINTMASK_SHADOW &= ~(MASK_ERR_INT | MASK_XMIT_INT); outp(WRINTMASK, *(char *)WRINTMASK_SHADOW |= MASK_RECV_INT); return OK; } /**************************************************************************** * Name: up_detach * * Description: * Detach UART interrupts. This method is called when the serial port is * closed normally just before the shutdown method is called. The exception is * the serial console which is never shutdown. * ****************************************************************************/ static void up_detach(struct uart_dev_s *dev) { outp(WRINTMASK, *(char *)WRINTMASK_SHADOW &= ~(MASK_ERR_INT | MASK_RECV_INT | MASK_XMIT_INT)); *((int *) XMIT_INT_VECTOR) = 0x35fa; *((int *) RECV_INT_VECTOR) = 0x35fa; } /**************************************************************************** * Name: up_ioctl * * Description: * All ioctl calls will be routed through this method * ****************************************************************************/ static int up_ioctl(struct file *filep, int cmd, unsigned long arg) { *get_errno_ptr() = ENOTTY; return ERROR; } /**************************************************************************** * Name: up_receive * * Description: * Called (usually) from the interrupt level to receive one * character from the UART. Error bits associated with the * receipt are provided in the return 'status'. * ****************************************************************************/ static int up_receive(struct uart_dev_s *dev, uint32_t *status) { // uint8_t ch = z80_lowputc(); *status = 0; return ch; } /**************************************************************************** * Name: up_rxint * * Description: * Call to enable or disable RX interrupts * ****************************************************************************/ static void up_rxint(struct uart_dev_s *dev, bool enable) { } /**************************************************************************** * Name: up_rxavailable * * Description: * Return true if the receive fifo is not empty * ****************************************************************************/ static bool up_rxavailable(struct uart_dev_s *dev) { return true; } /**************************************************************************** * Name: up_send * * Description: * This method will send one byte on the UART * ****************************************************************************/ static void up_send(struct uart_dev_s *dev, int ch) { z80_lowputc(ch); } /**************************************************************************** * Name: up_txint * * Description: * Call to enable or disable TX interrupts * ****************************************************************************/ static void up_txint(struct uart_dev_s *dev, bool enable) { } /**************************************************************************** * Name: up_txready * * Description: * Return true if the transmit fifo is not full * ****************************************************************************/ static bool up_txready(struct uart_dev_s *dev) { return true; } /**************************************************************************** * Name: up_txempty * * Description: * Return true if the transmit fifo is empty * ****************************************************************************/ static bool up_txempty(struct uart_dev_s *dev) { return true; } /**************************************************************************** * Public Functions ****************************************************************************/ /**************************************************************************** * Name: up_serialinit * * Description: * Performs the low level UART initialization early in * debug so that the serial console will be available * during bootup. This must be called before up_serialinit. * ****************************************************************************/ void up_earlyserialinit(void) { } /**************************************************************************** * Name: up_serialinit * * Description: * Register serial ports. This assumes * that up_earlyserialinit was called previously. * ****************************************************************************/ void up_serialinit(void) { (void)uart_register("/dev/console", &g_uartport); (void)uart_register("/dev/ttyS0", &g_uartport); } #endif /* USE_SERIALDRIVER */ /**************************************************************************** * Name: up_putc * * Description: * Provide priority, low-level access to support OS debug * writes * ****************************************************************************/ int up_putc(int ch) { z80_lowputc(ch); return 0; }