ebsa285_serial.c

基于ecos的redboot

//==========================================================================
//
//      devs/serial/arm/ebsa285/current/src/ebsa285_serial.c
//
//      ARM EBSA285 Serial I/O Interface Module (interrupt driven)
//
//==========================================================================
//####COPYRIGHTBEGIN####
//                                                                          
// -------------------------------------------                              
// The contents of this file are subject to the Red Hat eCos Public License 
// Version 1.1 (the "License"); you may not use this file except in         
// compliance with the License.  You may obtain a copy of the License at    
// http://www.redhat.com/                                                   
//                                                                          
// Software distributed under the License is distributed on an "AS IS"      
// basis, WITHOUT WARRANTY OF ANY KIND, either express or implied.  See the 
// License for the specific language governing rights and limitations under 
// the License.                                                             
//                                                                          
// The Original Code is eCos - Embedded Configurable Operating System,      
// released September 30, 1998.                                             
//                                                                          
// The Initial Developer of the Original Code is Red Hat.                   
// Portions created by Red Hat are                                          
// Copyright (C) 1998, 1999, 2000 Red Hat, Inc.                             
// All Rights Reserved.                                                     
// -------------------------------------------                              
//                                                                          
//####COPYRIGHTEND####
//==========================================================================
//#####DESCRIPTIONBEGIN####
//
// Author(s):   hmt
// Contributors:  hmt
// Date:        1999-07-26
// Purpose:     EBSA285 Serial I/O module (interrupt driven version)
// Description: 
//
//####DESCRIPTIONEND####
//
//==========================================================================

#include <pkgconf/system.h>
#include <pkgconf/io_serial.h>
#include <pkgconf/io.h>

#ifdef CYGPKG_IO_SERIAL_ARM_EBSA285

#include <cyg/io/io.h>
#include <cyg/hal/hal_intr.h>
#include <cyg/io/devtab.h>
#include <cyg/io/serial.h>
#include <cyg/infra/diag.h>

#include <cyg/hal/hal_ebsa285.h>         // Hardware definitions

// ------------------------------------------------------------------------
// Baud rates and the like, table-driven setup
#define FCLK_MHZ 50

struct _baud {
    unsigned char divisor_high, divisor_low;
};

// The indexing of this table must match the enum in serialio.h
// The arithmetic is (clock/4)/(baud * 16) - 1

#define NONE {0,0}
const static struct _baud bauds[] = {
#if (FCLK_MHZ == 50)
    NONE,                  // unused
    NONE,                  // 50
    NONE,                  // 75
    NONE,                  // 110
    NONE,                  // 134.5
    NONE,                  // 150
    NONE,                  // 200
    { 0xA, 0x2B },         // 300   2603  = 0x0A2B
    { 0x5, 0x15 },         // 600   1301  = 0x0515
    { 0x2, 0x8A },         // 1200  650   = 0x028A
    { 0x1, 0xB1 },         // 1800  433   = 0x01B1
    { 0x1, 0x45 },         // 2400  325   = 0x0145
    { 0x0, 0xD8 },         // 3600  216   = 0x00D8
    { 0x0, 0xA2 },         // 4800  162   = 0x00A2
    { 0x0, 0x6B },         // 7200  107   = 0x006B
    { 0x0, 0x50 },         // 9600  80    = 0x0050
    { 0x0, 0x35 },         // 14400 53    = 0x0035
    { 0x0, 0x28 },         // 19200 40    = 0x0028
    { 0x0, 0x13 },         // 38400 19    = 0x0013
    NONE,                  // 57600 
    NONE,                  // 115200
    NONE                   // 230400
#elif (FCLK_MHZ == 60)
#error NOT SUPPORTED - these figures are more for documentation
    { /*   300, */ 0xC, 0x34},                  /* 2603  = 0x0A2B */
    { /*   600, */ 0x6, 0x19},                  /* 1301  = 0x0515 */
    { /*  1200, */ 0x3, 0x0C},                  /* 650   = 0x028A */
    { /*  2400, */ 0x1, 0x86},                  /* 325   = 0x0145 */
    { /*  4800, */ 0x0, 0xC2},                  /* 162   = 0x00A2 */
    { /*  9600, */ 0x0, 0x61},                  /* 80    = 0x0050 */
    { /* 19200, */ 0x0, 0x30},                  /* 40    = 0x0028 */
    { /* 38400, */ 0x0, 0x17},                  /* 19    = 0x0013 */
#endif
};

static int select_word_length[] = {
    SA110_UART_DATA_LENGTH_5_BITS,      // 5 bits
    SA110_UART_DATA_LENGTH_6_BITS,      // 6 bits
    SA110_UART_DATA_LENGTH_7_BITS,      // 7 bits
    SA110_UART_DATA_LENGTH_8_BITS       // 8 bits
};

static int select_stop_bits[] = {
    -1,                          // unused
    SA110_UART_STOP_BITS_ONE,    // 1 stop bit
    -1,                          // 1.5 stop bit
    SA110_UART_STOP_BITS_TWO     // 2 stop bits
};

static int select_parity[] = {
    SA110_UART_PARITY_DISABLED,                           // No parity
    SA110_UART_PARITY_ENABLED | SA110_UART_PARITY_EVEN,   // Even parity
    SA110_UART_PARITY_ENABLED | SA110_UART_PARITY_ODD,    // Odd parity
    -1,                                                   // Mark parity
    -1                                                    // Space parity
};

// ------------------------------------------------------------------------
// some forward references

struct ebsa285_serial_interrupt {
    CYG_WORD       int_num;
    cyg_interrupt  serial_interrupt;
    cyg_handle_t   serial_interrupt_handle;
};

typedef struct ebsa285_serial_info {
    struct ebsa285_serial_interrupt rx;
    struct ebsa285_serial_interrupt tx;
    int tx_active;
} ebsa285_serial_info;

static bool ebsa285_serial_init(struct cyg_devtab_entry *tab);
static bool ebsa285_serial_putc(serial_channel *chan, unsigned char c);
static Cyg_ErrNo ebsa285_serial_lookup(struct cyg_devtab_entry **tab, 
                                   struct cyg_devtab_entry *sub_tab,
                                   const char *name);
static unsigned char ebsa285_serial_getc(serial_channel *chan);
static Cyg_ErrNo ebsa285_serial_set_config(serial_channel *chan, cyg_uint32 key,
                                           const void *xbuf, cyg_uint32 *len);
                                           
static void ebsa285_serial_start_xmit(serial_channel *chan);
static void ebsa285_serial_stop_xmit(serial_channel *chan);

static cyg_uint32 ebsa285_serial_rx_ISR(cyg_vector_t vector, cyg_addrword_t data);
static void       ebsa285_serial_rx_DSR(cyg_vector_t vector, cyg_ucount32 count, cyg_addrword_t data);
static cyg_uint32 ebsa285_serial_tx_ISR(cyg_vector_t vector, cyg_addrword_t data);
static void       ebsa285_serial_tx_DSR(cyg_vector_t vector, cyg_ucount32 count, cyg_addrword_t data);

static SERIAL_FUNS(ebsa285_serial_funs, 
                   ebsa285_serial_putc, 
                   ebsa285_serial_getc,
                   ebsa285_serial_set_config,
                   ebsa285_serial_start_xmit,
                   ebsa285_serial_stop_xmit
    );


// ------------------------------------------------------------------------
// this is dummy in config: there is only one device on the EBSA285
#ifdef CYGPKG_IO_SERIAL_ARM_EBSA285_SERIAL

static ebsa285_serial_info ebsa285_serial_info1 = {
    { CYGNUM_HAL_INTERRUPT_SERIAL_RX },
    { CYGNUM_HAL_INTERRUPT_SERIAL_TX },
    0
};

#if CYGNUM_IO_SERIAL_ARM_EBSA285_SERIAL_BUFSIZE > 0
static unsigned char ebsa285_serial_out_buf[CYGNUM_IO_SERIAL_ARM_EBSA285_SERIAL_BUFSIZE];
static unsigned char ebsa285_serial_in_buf[CYGNUM_IO_SERIAL_ARM_EBSA285_SERIAL_BUFSIZE];

static SERIAL_CHANNEL_USING_INTERRUPTS(ebsa285_serial_channel,
                                       ebsa285_serial_funs, 
                                       ebsa285_serial_info1,
                                       CYG_SERIAL_BAUD_RATE(CYGNUM_IO_SERIAL_ARM_EBSA285_SERIAL_BAUD),
                                       CYG_SERIAL_STOP_DEFAULT,
                                       CYG_SERIAL_PARITY_DEFAULT,
                                       CYG_SERIAL_WORD_LENGTH_DEFAULT,
                                       CYG_SERIAL_FLAGS_DEFAULT,
                                       &ebsa285_serial_out_buf[0], sizeof(ebsa285_serial_out_buf),
                                       &ebsa285_serial_in_buf[0], sizeof(ebsa285_serial_in_buf)
    );
#else
static SERIAL_CHANNEL(ebsa285_serial_channel,
                      ebsa285_serial_funs, 
                      ebsa285_serial_info1,
                      CYG_SERIAL_BAUD_RATE(CYGNUM_IO_SERIAL_ARM_EBSA285_SERIAL_BAUD),
                      CYG_SERIAL_STOP_DEFAULT,
                      CYG_SERIAL_PARITY_DEFAULT,
                      CYG_SERIAL_WORD_LENGTH_DEFAULT,
                      CYG_SERIAL_FLAGS_DEFAULT
    );
#endif

DEVTAB_ENTRY(ebsa285_serial_io, 
             CYGDAT_IO_SERIAL_ARM_EBSA285_SERIAL_NAME,
             0,                     // Does not depend on a lower level interface
             &cyg_io_serial_devio, 
             ebsa285_serial_init, 
             ebsa285_serial_lookup,     // Serial driver may need initializing
             &ebsa285_serial_channel
    );
#endif //  CYGPKG_IO_SERIAL_ARM_EBSA285_SERIAL

// ------------------------------------------------------------------------


// ------------------------------------------------------------------------
// Internal function to actually configure the hardware to desired baud rate, etc.
static bool
ebsa285_serial_config_port(serial_channel *chan, cyg_serial_info_t *new_config, bool init)