/*
   *  Driver for NEC VR4100 series Serial Interface Unit.
   *

   *  Copyright (C) 2004-2007  Yoichi Yuasa <yoichi_yuasa@tripeaks.co.jp>

   *
   *  Based on drivers/serial/8250.c, by Russell King.
   *
   *  This program is free software; you can redistribute it and/or modify
   *  it under the terms of the GNU General Public License as published by
   *  the Free Software Foundation; either version 2 of the License, or
   *  (at your option) any later version.
   *
   *  This program is distributed in the hope that it will be useful,
   *  but WITHOUT ANY WARRANTY; without even the implied warranty of
   *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   *  GNU General Public License for more details.
   *
   *  You should have received a copy of the GNU General Public License
   *  along with this program; if not, write to the Free Software
   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
   */

  
  #if defined(CONFIG_SERIAL_VR41XX_CONSOLE) && defined(CONFIG_MAGIC_SYSRQ)
  #define SUPPORT_SYSRQ
  #endif
  
  #include <linux/console.h>

  #include <linux/errno.h>

  #include <linux/init.h>
  #include <linux/interrupt.h>

  #include <linux/ioport.h>

  #include <linux/module.h>

  #include <linux/platform_device.h>

  #include <linux/serial.h>
  #include <linux/serial_core.h>
  #include <linux/serial_reg.h>
  #include <linux/tty.h>
  #include <linux/tty_flip.h>
  
  #include <asm/io.h>
  #include <asm/vr41xx/siu.h>
  #include <asm/vr41xx/vr41xx.h>

  #define SIU_BAUD_BASE	1152000
  #define SIU_MAJOR	204
  #define SIU_MINOR_BASE	82
  
  #define RX_MAX_COUNT	256
  #define TX_MAX_COUNT	15
  
  #define SIUIRSEL	0x08
   #define TMICMODE	0x20
   #define TMICTX		0x10
   #define IRMSEL		0x0c
   #define IRMSEL_HP	0x08
   #define IRMSEL_TEMIC	0x04
   #define IRMSEL_SHARP	0x00
   #define IRUSESEL	0x02
   #define SIRSEL		0x01

  static struct uart_port siu_uart_ports[SIU_PORTS_MAX] = {
  	[0 ... SIU_PORTS_MAX-1] = {
  		.lock	= __SPIN_LOCK_UNLOCKED(siu_uart_ports->lock),
  		.irq	= -1,
  	},

  };

  static uint8_t lsr_break_flag[SIU_PORTS_MAX];
  
  #define siu_read(port, offset)		readb((port)->membase + (offset))
  #define siu_write(port, offset, value)	writeb((value), (port)->membase + (offset))
  
  void vr41xx_select_siu_interface(siu_interface_t interface)
  {
  	struct uart_port *port;
  	unsigned long flags;
  	uint8_t irsel;
  
  	port = &siu_uart_ports[0];
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	irsel = siu_read(port, SIUIRSEL);
  	if (interface == SIU_INTERFACE_IRDA)
  		irsel |= SIRSEL;
  	else
  		irsel &= ~SIRSEL;
  	siu_write(port, SIUIRSEL, irsel);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }

  EXPORT_SYMBOL_GPL(vr41xx_select_siu_interface);
  
  void vr41xx_use_irda(irda_use_t use)
  {
  	struct uart_port *port;
  	unsigned long flags;
  	uint8_t irsel;
  
  	port = &siu_uart_ports[0];
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	irsel = siu_read(port, SIUIRSEL);
  	if (use == FIR_USE_IRDA)
  		irsel |= IRUSESEL;
  	else
  		irsel &= ~IRUSESEL;
  	siu_write(port, SIUIRSEL, irsel);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }

  EXPORT_SYMBOL_GPL(vr41xx_use_irda);
  
  void vr41xx_select_irda_module(irda_module_t module, irda_speed_t speed)
  {
  	struct uart_port *port;
  	unsigned long flags;
  	uint8_t irsel;
  
  	port = &siu_uart_ports[0];
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	irsel = siu_read(port, SIUIRSEL);
  	irsel &= ~(IRMSEL | TMICTX | TMICMODE);
  	switch (module) {
  	case SHARP_IRDA:
  		irsel |= IRMSEL_SHARP;
  		break;
  	case TEMIC_IRDA:
  		irsel |= IRMSEL_TEMIC | TMICMODE;
  		if (speed == IRDA_TX_4MBPS)
  			irsel |= TMICTX;
  		break;
  	case HP_IRDA:
  		irsel |= IRMSEL_HP;
  		break;
  	default:
  		break;
  	}
  	siu_write(port, SIUIRSEL, irsel);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }

  EXPORT_SYMBOL_GPL(vr41xx_select_irda_module);
  
  static inline void siu_clear_fifo(struct uart_port *port)
  {
  	siu_write(port, UART_FCR, UART_FCR_ENABLE_FIFO);
  	siu_write(port, UART_FCR, UART_FCR_ENABLE_FIFO | UART_FCR_CLEAR_RCVR |
  	                          UART_FCR_CLEAR_XMIT);
  	siu_write(port, UART_FCR, 0);
  }

  static inline unsigned long siu_port_size(struct uart_port *port)
  {
  	switch (port->type) {
  	case PORT_VR41XX_SIU:
  		return 11UL;
  	case PORT_VR41XX_DSIU:
  		return 8UL;
  	}
  
  	return 0;
  }
  
  static inline unsigned int siu_check_type(struct uart_port *port)
  {

  	if (port->line == 0)
  		return PORT_VR41XX_SIU;
  	if (port->line == 1 && port->irq != -1)
  		return PORT_VR41XX_DSIU;

  
  	return PORT_UNKNOWN;
  }
  
  static inline const char *siu_type_name(struct uart_port *port)
  {
  	switch (port->type) {
  	case PORT_VR41XX_SIU:
  		return "SIU";
  	case PORT_VR41XX_DSIU:
  		return "DSIU";
  	}

  	return NULL;

  }
  
  static unsigned int siu_tx_empty(struct uart_port *port)
  {
  	uint8_t lsr;
  
  	lsr = siu_read(port, UART_LSR);
  	if (lsr & UART_LSR_TEMT)
  		return TIOCSER_TEMT;
  
  	return 0;
  }
  
  static void siu_set_mctrl(struct uart_port *port, unsigned int mctrl)
  {
  	uint8_t mcr = 0;
  
  	if (mctrl & TIOCM_DTR)
  		mcr |= UART_MCR_DTR;
  	if (mctrl & TIOCM_RTS)
  		mcr |= UART_MCR_RTS;
  	if (mctrl & TIOCM_OUT1)
  		mcr |= UART_MCR_OUT1;
  	if (mctrl & TIOCM_OUT2)
  		mcr |= UART_MCR_OUT2;
  	if (mctrl & TIOCM_LOOP)
  		mcr |= UART_MCR_LOOP;
  
  	siu_write(port, UART_MCR, mcr);
  }
  
  static unsigned int siu_get_mctrl(struct uart_port *port)
  {
  	uint8_t msr;
  	unsigned int mctrl = 0;
  
  	msr = siu_read(port, UART_MSR);
  	if (msr & UART_MSR_DCD)
  		mctrl |= TIOCM_CAR;
  	if (msr & UART_MSR_RI)
  		mctrl |= TIOCM_RNG;
  	if (msr & UART_MSR_DSR)
  		mctrl |= TIOCM_DSR;
  	if (msr & UART_MSR_CTS)
  		mctrl |= TIOCM_CTS;
  
  	return mctrl;
  }

  static void siu_stop_tx(struct uart_port *port)

  {
  	unsigned long flags;
  	uint8_t ier;
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	ier = siu_read(port, UART_IER);
  	ier &= ~UART_IER_THRI;
  	siu_write(port, UART_IER, ier);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }

  static void siu_start_tx(struct uart_port *port)

  {
  	unsigned long flags;
  	uint8_t ier;
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	ier = siu_read(port, UART_IER);
  	ier |= UART_IER_THRI;
  	siu_write(port, UART_IER, ier);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }
  
  static void siu_stop_rx(struct uart_port *port)
  {
  	unsigned long flags;
  	uint8_t ier;
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	ier = siu_read(port, UART_IER);
  	ier &= ~UART_IER_RLSI;
  	siu_write(port, UART_IER, ier);
  
  	port->read_status_mask &= ~UART_LSR_DR;
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }
  
  static void siu_enable_ms(struct uart_port *port)
  {
  	unsigned long flags;
  	uint8_t ier;
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	ier = siu_read(port, UART_IER);
  	ier |= UART_IER_MSI;
  	siu_write(port, UART_IER, ier);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }
  
  static void siu_break_ctl(struct uart_port *port, int ctl)
  {
  	unsigned long flags;
  	uint8_t lcr;
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	lcr = siu_read(port, UART_LCR);
  	if (ctl == -1)
  		lcr |= UART_LCR_SBC;
  	else
  		lcr &= ~UART_LCR_SBC;
  	siu_write(port, UART_LCR, lcr);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }

  static inline void receive_chars(struct uart_port *port, uint8_t *status)

  {
  	struct tty_struct *tty;
  	uint8_t lsr, ch;
  	char flag;
  	int max_count = RX_MAX_COUNT;
  
  	tty = port->info->tty;
  	lsr = *status;
  
  	do {

  		ch = siu_read(port, UART_RX);
  		port->icount.rx++;
  		flag = TTY_NORMAL;
  
  #ifdef CONFIG_SERIAL_VR41XX_CONSOLE
  		lsr |= lsr_break_flag[port->line];
  		lsr_break_flag[port->line] = 0;
  #endif
  		if (unlikely(lsr & (UART_LSR_BI | UART_LSR_FE |
  		                    UART_LSR_PE | UART_LSR_OE))) {
  			if (lsr & UART_LSR_BI) {
  				lsr &= ~(UART_LSR_FE | UART_LSR_PE);
  				port->icount.brk++;
  
  				if (uart_handle_break(port))
  					goto ignore_char;
  			}
  
  			if (lsr & UART_LSR_FE)
  				port->icount.frame++;
  			if (lsr & UART_LSR_PE)
  				port->icount.parity++;
  			if (lsr & UART_LSR_OE)
  				port->icount.overrun++;
  
  			lsr &= port->read_status_mask;
  			if (lsr & UART_LSR_BI)
  				flag = TTY_BREAK;
  			if (lsr & UART_LSR_FE)
  				flag = TTY_FRAME;
  			if (lsr & UART_LSR_PE)
  				flag = TTY_PARITY;
  		}

  		if (uart_handle_sysrq_char(port, ch))

  			goto ignore_char;

  
  		uart_insert_char(port, lsr, UART_LSR_OE, ch, flag);

  
  	ignore_char:
  		lsr = siu_read(port, UART_LSR);
  	} while ((lsr & UART_LSR_DR) && (max_count-- > 0));
  
  	tty_flip_buffer_push(tty);
  
  	*status = lsr;
  }
  
  static inline void check_modem_status(struct uart_port *port)
  {
  	uint8_t msr;
  
  	msr = siu_read(port, UART_MSR);
  	if ((msr & UART_MSR_ANY_DELTA) == 0)
  		return;
  	if (msr & UART_MSR_DDCD)
  		uart_handle_dcd_change(port, msr & UART_MSR_DCD);
  	if (msr & UART_MSR_TERI)
  		port->icount.rng++;
  	if (msr & UART_MSR_DDSR)
  		port->icount.dsr++;
  	if (msr & UART_MSR_DCTS)
  		uart_handle_cts_change(port, msr & UART_MSR_CTS);
  
  	wake_up_interruptible(&port->info->delta_msr_wait);
  }
  
  static inline void transmit_chars(struct uart_port *port)
  {
  	struct circ_buf *xmit;
  	int max_count = TX_MAX_COUNT;
  
  	xmit = &port->info->xmit;
  
  	if (port->x_char) {
  		siu_write(port, UART_TX, port->x_char);
  		port->icount.tx++;
  		port->x_char = 0;
  		return;
  	}
  
  	if (uart_circ_empty(xmit) || uart_tx_stopped(port)) {

  		siu_stop_tx(port);

  		return;
  	}
  
  	do {
  		siu_write(port, UART_TX, xmit->buf[xmit->tail]);
  		xmit->tail = (xmit->tail + 1) & (UART_XMIT_SIZE - 1);
  		port->icount.tx++;
  		if (uart_circ_empty(xmit))
  			break;
  	} while (max_count-- > 0);
  
  	if (uart_circ_chars_pending(xmit) < WAKEUP_CHARS)
  		uart_write_wakeup(port);
  
  	if (uart_circ_empty(xmit))

  		siu_stop_tx(port);

  }

  static irqreturn_t siu_interrupt(int irq, void *dev_id)

  {
  	struct uart_port *port;
  	uint8_t iir, lsr;

  	port = (struct uart_port *)dev_id;
  
  	iir = siu_read(port, UART_IIR);
  	if (iir & UART_IIR_NO_INT)
  		return IRQ_NONE;
  
  	lsr = siu_read(port, UART_LSR);
  	if (lsr & UART_LSR_DR)

  		receive_chars(port, &lsr);

  
  	check_modem_status(port);
  
  	if (lsr & UART_LSR_THRE)
  		transmit_chars(port);
  
  	return IRQ_HANDLED;
  }
  
  static int siu_startup(struct uart_port *port)
  {
  	int retval;

  	if (port->membase == NULL)
  		return -ENODEV;

  	siu_clear_fifo(port);
  
  	(void)siu_read(port, UART_LSR);
  	(void)siu_read(port, UART_RX);
  	(void)siu_read(port, UART_IIR);
  	(void)siu_read(port, UART_MSR);
  
  	if (siu_read(port, UART_LSR) == 0xff)
  		return -ENODEV;
  
  	retval = request_irq(port->irq, siu_interrupt, 0, siu_type_name(port), port);
  	if (retval)
  		return retval;
  
  	if (port->type == PORT_VR41XX_DSIU)
  		vr41xx_enable_dsiuint(DSIUINT_ALL);
  
  	siu_write(port, UART_LCR, UART_LCR_WLEN8);
  
  	spin_lock_irq(&port->lock);
  	siu_set_mctrl(port, port->mctrl);
  	spin_unlock_irq(&port->lock);
  
  	siu_write(port, UART_IER, UART_IER_RLSI | UART_IER_RDI);
  
  	(void)siu_read(port, UART_LSR);
  	(void)siu_read(port, UART_RX);
  	(void)siu_read(port, UART_IIR);
  	(void)siu_read(port, UART_MSR);
  
  	return 0;
  }
  
  static void siu_shutdown(struct uart_port *port)
  {
  	unsigned long flags;
  	uint8_t lcr;

  	siu_write(port, UART_IER, 0);
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	port->mctrl &= ~TIOCM_OUT2;
  	siu_set_mctrl(port, port->mctrl);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  
  	lcr = siu_read(port, UART_LCR);
  	lcr &= ~UART_LCR_SBC;
  	siu_write(port, UART_LCR, lcr);
  
  	siu_clear_fifo(port);
  
  	(void)siu_read(port, UART_RX);
  
  	if (port->type == PORT_VR41XX_DSIU)
  		vr41xx_disable_dsiuint(DSIUINT_ALL);
  
  	free_irq(port->irq, port);
  }

  static void siu_set_termios(struct uart_port *port, struct ktermios *new,
                              struct ktermios *old)

  {
  	tcflag_t c_cflag, c_iflag;
  	uint8_t lcr, fcr, ier;
  	unsigned int baud, quot;
  	unsigned long flags;
  
  	c_cflag = new->c_cflag;
  	switch (c_cflag & CSIZE) {
  	case CS5:
  		lcr = UART_LCR_WLEN5;
  		break;
  	case CS6:
  		lcr = UART_LCR_WLEN6;
  		break;
  	case CS7:
  		lcr = UART_LCR_WLEN7;
  		break;
  	default:
  		lcr = UART_LCR_WLEN8;
  		break;
  	}
  
  	if (c_cflag & CSTOPB)
  		lcr |= UART_LCR_STOP;
  	if (c_cflag & PARENB)
  		lcr |= UART_LCR_PARITY;
  	if ((c_cflag & PARODD) != PARODD)
  		lcr |= UART_LCR_EPAR;
  	if (c_cflag & CMSPAR)
  		lcr |= UART_LCR_SPAR;
  
  	baud = uart_get_baud_rate(port, new, old, 0, port->uartclk/16);
  	quot = uart_get_divisor(port, baud);
  
  	fcr = UART_FCR_ENABLE_FIFO | UART_FCR_R_TRIG_10;
  
  	spin_lock_irqsave(&port->lock, flags);
  
  	uart_update_timeout(port, c_cflag, baud);
  
  	c_iflag = new->c_iflag;
  
  	port->read_status_mask = UART_LSR_THRE | UART_LSR_OE | UART_LSR_DR;
  	if (c_iflag & INPCK)
  		port->read_status_mask |= UART_LSR_FE | UART_LSR_PE;
  	if (c_iflag & (BRKINT | PARMRK))
  		port->read_status_mask |= UART_LSR_BI;
  
  	port->ignore_status_mask = 0;
  	if (c_iflag & IGNPAR)
  		port->ignore_status_mask |= UART_LSR_FE | UART_LSR_PE;
  	if (c_iflag & IGNBRK) {
  		port->ignore_status_mask |= UART_LSR_BI;
  		if (c_iflag & IGNPAR)
  			port->ignore_status_mask |= UART_LSR_OE;
  	}
  
  	if ((c_cflag & CREAD) == 0)
  		port->ignore_status_mask |= UART_LSR_DR;
  
  	ier = siu_read(port, UART_IER);
  	ier &= ~UART_IER_MSI;
  	if (UART_ENABLE_MS(port, c_cflag))
  		ier |= UART_IER_MSI;
  	siu_write(port, UART_IER, ier);
  
  	siu_write(port, UART_LCR, lcr | UART_LCR_DLAB);
  
  	siu_write(port, UART_DLL, (uint8_t)quot);
  	siu_write(port, UART_DLM, (uint8_t)(quot >> 8));
  
  	siu_write(port, UART_LCR, lcr);
  
  	siu_write(port, UART_FCR, fcr);
  
  	siu_set_mctrl(port, port->mctrl);
  
  	spin_unlock_irqrestore(&port->lock, flags);
  }
  
  static void siu_pm(struct uart_port *port, unsigned int state, unsigned int oldstate)
  {
  	switch (state) {
  	case 0:
  		switch (port->type) {
  		case PORT_VR41XX_SIU:
  			vr41xx_supply_clock(SIU_CLOCK);
  			break;
  		case PORT_VR41XX_DSIU:
  			vr41xx_supply_clock(DSIU_CLOCK);
  			break;
  		}
  		break;
  	case 3:
  		switch (port->type) {
  		case PORT_VR41XX_SIU:
  			vr41xx_mask_clock(SIU_CLOCK);
  			break;
  		case PORT_VR41XX_DSIU:
  			vr41xx_mask_clock(DSIU_CLOCK);
  			break;
  		}
  		break;
  	}
  }
  
  static const char *siu_type(struct uart_port *port)
  {
  	return siu_type_name(port);
  }
  
  static void siu_release_port(struct uart_port *port)
  {
  	unsigned long size;
  
  	if (port->flags	& UPF_IOREMAP) {
  		iounmap(port->membase);
  		port->membase = NULL;
  	}
  
  	size = siu_port_size(port);
  	release_mem_region(port->mapbase, size);
  }
  
  static int siu_request_port(struct uart_port *port)
  {
  	unsigned long size;
  	struct resource *res;
  
  	size = siu_port_size(port);
  	res = request_mem_region(port->mapbase, size, siu_type_name(port));
  	if (res == NULL)
  		return -EBUSY;
  
  	if (port->flags & UPF_IOREMAP) {
  		port->membase = ioremap(port->mapbase, size);
  		if (port->membase == NULL) {
  			release_resource(res);
  			return -ENOMEM;
  		}
  	}
  
  	return 0;
  }
  
  static void siu_config_port(struct uart_port *port, int flags)
  {
  	if (flags & UART_CONFIG_TYPE) {
  		port->type = siu_check_type(port);
  		(void)siu_request_port(port);
  	}
  }
  
  static int siu_verify_port(struct uart_port *port, struct serial_struct *serial)
  {
  	if (port->type != PORT_VR41XX_SIU && port->type != PORT_VR41XX_DSIU)
  		return -EINVAL;
  	if (port->irq != serial->irq)
  		return -EINVAL;
  	if (port->iotype != serial->io_type)
  		return -EINVAL;
  	if (port->mapbase != (unsigned long)serial->iomem_base)
  		return -EINVAL;
  
  	return 0;
  }
  
  static struct uart_ops siu_uart_ops = {
  	.tx_empty	= siu_tx_empty,
  	.set_mctrl	= siu_set_mctrl,
  	.get_mctrl	= siu_get_mctrl,
  	.stop_tx	= siu_stop_tx,
  	.start_tx	= siu_start_tx,
  	.stop_rx	= siu_stop_rx,
  	.enable_ms	= siu_enable_ms,
  	.break_ctl	= siu_break_ctl,
  	.startup	= siu_startup,
  	.shutdown	= siu_shutdown,
  	.set_termios	= siu_set_termios,
  	.pm		= siu_pm,
  	.type		= siu_type,
  	.release_port	= siu_release_port,
  	.request_port	= siu_request_port,
  	.config_port	= siu_config_port,
  	.verify_port	= siu_verify_port,
  };

  static int siu_init_ports(struct platform_device *pdev)

  {

  	struct uart_port *port;

  	struct resource *res;
  	int *type = pdev->dev.platform_data;
  	int i;

  	if (!type)

  		return 0;

  
  	port = siu_uart_ports;

  	for (i = 0; i < SIU_PORTS_MAX; i++) {
  		port->type = type[i];
  		if (port->type == PORT_UNKNOWN)
  			continue;
  		port->irq = platform_get_irq(pdev, i);

  		port->uartclk = SIU_BAUD_BASE * 16;
  		port->fifosize = 16;
  		port->regshift = 0;
  		port->iotype = UPIO_MEM;
  		port->flags = UPF_IOREMAP | UPF_BOOT_AUTOCONF;

  		port->line = i;

  		res = platform_get_resource(pdev, IORESOURCE_MEM, i);
  		port->mapbase = res->start;

  		port++;
  	}

  	return i;

  }
  
  #ifdef CONFIG_SERIAL_VR41XX_CONSOLE

  #define BOTH_EMPTY	(UART_LSR_TEMT | UART_LSR_THRE)
  
  static void wait_for_xmitr(struct uart_port *port)
  {
  	int timeout = 10000;
  	uint8_t lsr, msr;
  
  	do {
  		lsr = siu_read(port, UART_LSR);
  		if (lsr & UART_LSR_BI)
  			lsr_break_flag[port->line] = UART_LSR_BI;
  
  		if ((lsr & BOTH_EMPTY) == BOTH_EMPTY)
  			break;
  	} while (timeout-- > 0);
  
  	if (port->flags & UPF_CONS_FLOW) {
  		timeout = 1000000;
  
  		do {
  			msr = siu_read(port, UART_MSR);
  			if ((msr & UART_MSR_CTS) != 0)
  				break;
  		} while (timeout-- > 0);
  	}
  }

  static void siu_console_putchar(struct uart_port *port, int ch)
  {
  	wait_for_xmitr(port);
  	siu_write(port, UART_TX, ch);
  }

  static void siu_console_write(struct console *con, const char *s, unsigned count)
  {
  	struct uart_port *port;
  	uint8_t ier;

  
  	port = &siu_uart_ports[con->index];
  
  	ier = siu_read(port, UART_IER);
  	siu_write(port, UART_IER, 0);

  	uart_console_write(port, s, count, siu_console_putchar);

  
  	wait_for_xmitr(port);
  	siu_write(port, UART_IER, ier);
  }
  
  static int siu_console_setup(struct console *con, char *options)
  {
  	struct uart_port *port;
  	int baud = 9600;
  	int parity = 'n';
  	int bits = 8;
  	int flow = 'n';
  
  	if (con->index >= SIU_PORTS_MAX)
  		con->index = 0;
  
  	port = &siu_uart_ports[con->index];
  	if (port->membase == NULL) {
  		if (port->mapbase == 0)
  			return -ENODEV;

  		port->membase = ioremap(port->mapbase, siu_port_size(port));

  	}
  
  	vr41xx_select_siu_interface(SIU_INTERFACE_RS232C);
  
  	if (options != NULL)
  		uart_parse_options(options, &baud, &parity, &bits, &flow);
  
  	return uart_set_options(port, con, baud, parity, bits, flow);
  }
  
  static struct uart_driver siu_uart_driver;
  
  static struct console siu_console = {
  	.name	= "ttyVR",
  	.write	= siu_console_write,
  	.device	= uart_console_device,
  	.setup	= siu_console_setup,
  	.flags	= CON_PRINTBUFFER,
  	.index	= -1,
  	.data	= &siu_uart_driver,
  };
  
  static int __devinit siu_console_init(void)
  {
  	struct uart_port *port;

  	int i;

  	for (i = 0; i < SIU_PORTS_MAX; i++) {

  		port = &siu_uart_ports[i];

  		port->ops = &siu_uart_ops;

  	}
  
  	register_console(&siu_console);
  
  	return 0;
  }
  
  console_initcall(siu_console_init);
  
  #define SERIAL_VR41XX_CONSOLE	&siu_console
  #else
  #define SERIAL_VR41XX_CONSOLE	NULL
  #endif
  
  static struct uart_driver siu_uart_driver = {
  	.owner		= THIS_MODULE,
  	.driver_name	= "SIU",
  	.dev_name	= "ttyVR",

  	.major		= SIU_MAJOR,
  	.minor		= SIU_MINOR_BASE,
  	.cons		= SERIAL_VR41XX_CONSOLE,
  };

  static int __devinit siu_probe(struct platform_device *dev)

  {
  	struct uart_port *port;
  	int num, i, retval;

  	num = siu_init_ports(dev);

  	if (num <= 0)
  		return -ENODEV;
  
  	siu_uart_driver.nr = num;
  	retval = uart_register_driver(&siu_uart_driver);
  	if (retval)
  		return retval;
  
  	for (i = 0; i < num; i++) {
  		port = &siu_uart_ports[i];
  		port->ops = &siu_uart_ops;

  		port->dev = &dev->dev;

  
  		retval = uart_add_one_port(&siu_uart_driver, port);

  		if (retval < 0) {
  			port->dev = NULL;

  			break;

  		}

  	}
  
  	if (i == 0 && retval < 0) {
  		uart_unregister_driver(&siu_uart_driver);
  		return retval;
  	}
  
  	return 0;
  }

  static int __devexit siu_remove(struct platform_device *dev)

  {
  	struct uart_port *port;
  	int i;
  
  	for (i = 0; i < siu_uart_driver.nr; i++) {
  		port = &siu_uart_ports[i];

  		if (port->dev == &dev->dev) {

  			uart_remove_one_port(&siu_uart_driver, port);
  			port->dev = NULL;
  		}
  	}
  
  	uart_unregister_driver(&siu_uart_driver);
  
  	return 0;
  }

  static int siu_suspend(struct platform_device *dev, pm_message_t state)

  {
  	struct uart_port *port;
  	int i;

  	for (i = 0; i < siu_uart_driver.nr; i++) {
  		port = &siu_uart_ports[i];
  		if ((port->type == PORT_VR41XX_SIU ||

  		     port->type == PORT_VR41XX_DSIU) && port->dev == &dev->dev)

  			uart_suspend_port(&siu_uart_driver, port);
  
  	}
  
  	return 0;
  }

  static int siu_resume(struct platform_device *dev)

  {
  	struct uart_port *port;
  	int i;

  	for (i = 0; i < siu_uart_driver.nr; i++) {
  		port = &siu_uart_ports[i];
  		if ((port->type == PORT_VR41XX_SIU ||

  		     port->type == PORT_VR41XX_DSIU) && port->dev == &dev->dev)

  			uart_resume_port(&siu_uart_driver, port);
  	}
  
  	return 0;
  }

  static struct platform_driver siu_device_driver = {

  	.probe		= siu_probe,

  	.remove		= __devexit_p(siu_remove),

  	.suspend	= siu_suspend,
  	.resume		= siu_resume,

  	.driver		= {
  		.name	= "SIU",

  		.owner	= THIS_MODULE,

  	},

  };

  static int __init vr41xx_siu_init(void)

  {

  	return platform_driver_register(&siu_device_driver);

  }

  static void __exit vr41xx_siu_exit(void)

  {

  	platform_driver_unregister(&siu_device_driver);

  }
  
  module_init(vr41xx_siu_init);
  module_exit(vr41xx_siu_exit);