/*
 *      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.
 *
 *      Original driver code supplied by Multi-Tech
 *
 *      Changes
 *      1/9/98  alan@lxorguk.ukuu.org.uk
 *                                      Merge to 2.0.x kernel tree
 *                                      Obtain and use official major/minors
 *                                      Loader switched to a misc device
 *                                      (fixed range check bug as a side effect)
 *                                      Printk clean up
 *      9/12/98 alan@lxorguk.ukuu.org.uk
 *                                      Rough port to 2.1.x
 *
 *      10/6/99 sameer                  Merged the ISA and PCI drivers to
 *                                      a new unified driver.
 *
 *      3/9/99  sameer                  Added support for ISI4616 cards.
 *
 *      16/9/99 sameer                  We do not force RTS low anymore.
 *                                      This is to prevent the firmware
 *                                      from getting confused.
 *
 *      26/10/99 sameer                 Cosmetic changes:The driver now
 *                                      dumps the Port Count information
 *                                      along with I/O address and IRQ.
 *
 *      13/12/99 sameer                 Fixed the problem with IRQ sharing.
 *
 *      10/5/00  sameer                 Fixed isicom_shutdown_board()
 *                                      to not lower DTR on all the ports
 *                                      when the last port on the card is
 *                                      closed.
 *
 *      10/5/00  sameer                 Signal mask setup command added
 *                                      to  isicom_setup_port and
 *                                      isicom_shutdown_port.
 *
 *      24/5/00  sameer                 The driver is now SMP aware.
 *
 *
 *      27/11/00 Vinayak P Risbud       Fixed the Driver Crash Problem
 *
 *
 *      03/01/01  anil .s               Added support for resetting the
 *                                      internal modems on ISI cards.
 *
 *      08/02/01  anil .s               Upgraded the driver for kernel
 *                                      2.4.x
 *
 *      11/04/01  Kevin                 Fixed firmware load problem with
 *                                      ISIHP-4X card
 *
 *      30/04/01  anil .s               Fixed the remote login through
 *                                      ISI port problem. Now the link
 *                                      does not go down before password
 *                                      prompt.
 *
 *      03/05/01  anil .s               Fixed the problem with IRQ sharing
 *                                      among ISI-PCI cards.
 *
 *      03/05/01  anil .s               Added support to display the version
 *                                      info during insmod as well as module
 *                                      listing by lsmod.
 *
 *      10/05/01  anil .s               Done the modifications to the source
 *                                      file and Install script so that the
 *                                      same installation can be used for
 *                                      2.2.x and 2.4.x kernel.
 *
 *      06/06/01  anil .s               Now we drop both dtr and rts during
 *                                      shutdown_port as well as raise them
 *                                      during isicom_config_port.
 *
 *      09/06/01 acme@conectiva.com.br  use capable, not suser, do
 *                                      restore_flags on failure in
 *                                      isicom_send_break, verify put_user
 *                                      result
 *
 *      11/02/03  ranjeeth              Added support for 230 Kbps and 460 Kbps
 *                                      Baud index extended to 21
 *
 *      20/03/03  ranjeeth              Made to work for Linux Advanced server.
 *                                      Taken care of license warning.
 *
 *      10/12/03  Ravindra              Made to work for Fedora Core 1 of
 *                                      Red Hat Distribution
 *
 *      06/01/05  Alan Cox              Merged the ISI and base kernel strands
 *                                      into a single 2.6 driver
 *
 *      ***********************************************************
 *
 *      To use this driver you also need the support package. You
 *      can find this in RPM format on
 *              ftp://ftp.linux.org.uk/pub/linux/alan
 *
 *      You can find the original tools for this direct from Multitech
 *              ftp://ftp.multitech.com/ISI-Cards/
 *
 *      Having installed the cards the module options (/etc/modprobe.conf)
 *
 *      options isicom   io=card1,card2,card3,card4 irq=card1,card2,card3,card4
 *
 *      Omit those entries for boards you don't have installed.
 *
 *      TODO
 *              Merge testing
 *              64-bit verification
 */

#include <linux/module.h>
#include <linux/firmware.h>
#include <linux/kernel.h>
#include <linux/tty.h>
#include <linux/tty_flip.h>
#include <linux/termios.h>
#include <linux/fs.h>
#include <linux/sched.h>
#include <linux/serial.h>
#include <linux/smp_lock.h>
#include <linux/mm.h>
#include <linux/interrupt.h>
#include <linux/timer.h>
#include <linux/delay.h>
#include <linux/ioport.h>

#include <linux/uaccess.h>
#include <linux/io.h>
#include <asm/system.h>

#include <linux/pci.h>

#include <linux/isicom.h>

#define InterruptTheCard(base) outw(0, (base) + 0xc)
#define ClearInterrupt(base) inw((base) + 0x0a)

#define pr_dbg(str...) pr_debug("ISICOM: " str)
#ifdef DEBUG
#define isicom_paranoia_check(a, b, c) __isicom_paranoia_check((a), (b), (c))
#else
#define isicom_paranoia_check(a, b, c) 0
#endif

static int isicom_probe(struct pci_dev *, const struct pci_device_id *);
static void __devexit isicom_remove(struct pci_dev *);

static struct pci_device_id isicom_pci_tbl[] = {
        { PCI_DEVICE(VENDOR_ID, 0x2028) },
        { PCI_DEVICE(VENDOR_ID, 0x2051) },
        { PCI_DEVICE(VENDOR_ID, 0x2052) },
        { PCI_DEVICE(VENDOR_ID, 0x2053) },
        { PCI_DEVICE(VENDOR_ID, 0x2054) },
        { PCI_DEVICE(VENDOR_ID, 0x2055) },
        { PCI_DEVICE(VENDOR_ID, 0x2056) },
        { PCI_DEVICE(VENDOR_ID, 0x2057) },
        { PCI_DEVICE(VENDOR_ID, 0x2058) },
        { 0 }
};
MODULE_DEVICE_TABLE(pci, isicom_pci_tbl);

static struct pci_driver isicom_driver = {
        .name           = "isicom",
        .id_table       = isicom_pci_tbl,
        .probe          = isicom_probe,
        .remove         = __devexit_p(isicom_remove)
};

static int prev_card = 3;       /*      start servicing isi_card[0]     */
static struct tty_driver *isicom_normal;

static void isicom_tx(unsigned long _data);
static void isicom_start(struct tty_struct *tty);

static DEFINE_TIMER(tx, isicom_tx, 0, 0);

/*   baud index mappings from linux defns to isi */

static signed char linuxb_to_isib[] = {
        -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 13, 15, 16, 17, 18, 19, 20, 21
};

struct  isi_board {
        unsigned long           base;
        int                     irq;
        unsigned char           port_count;
        unsigned short          status;
        unsigned short          port_status; /* each bit for each port */
        unsigned short          shift_count;
        struct isi_port         *ports;
        signed char             count;
        spinlock_t              card_lock; /* Card wide lock 11/5/00 -sameer */
        unsigned long           flags;
        unsigned int            index;
};

struct  isi_port {
        unsigned short          magic;
        struct tty_port         port;
        u16                     channel;
        u16                     status;
        struct isi_board        *card;
        unsigned char           *xmit_buf;
        int                     xmit_head;
        int                     xmit_tail;
        int                     xmit_cnt;
};

static struct isi_board isi_card[BOARD_COUNT];
static struct isi_port  isi_ports[PORT_COUNT];

/*
 *      Locking functions for card level locking. We need to own both
 *      the kernel lock for the card and have the card in a position that
 *      it wants to talk.
 */

static inline int WaitTillCardIsFree(unsigned long base)
{
        unsigned int count = 0;
        unsigned int a = in_atomic(); /* do we run under spinlock? */

        while (!(inw(base + 0xe) & 0x1) && count++ < 100)
                if (a)
                        mdelay(1);
                else
                        msleep(1);

        return !(inw(base + 0xe) & 0x1);
}

static int lock_card(struct isi_board *card)
{
        unsigned long base = card->base;
        unsigned int retries, a;

        for (retries = 0; retries < 10; retries++) {
                spin_lock_irqsave(&card->card_lock, card->flags);
                for (a = 0; a < 10; a++) {
                        if (inw(base + 0xe) & 0x1)
                                return 1;
                        udelay(10);
                }
                spin_unlock_irqrestore(&card->card_lock, card->flags);
                msleep(10);
        }
        printk(KERN_WARNING "ISICOM: Failed to lock Card (0x%lx)\n",
                card->base);

        return 0;       /* Failed to acquire the card! */
}

static void unlock_card(struct isi_board *card)
{
        spin_unlock_irqrestore(&card->card_lock, card->flags);
}

/*
 *  ISI Card specific ops ...
 */

/* card->lock HAS to be held */
static void raise_dtr(struct isi_port *port)
{
        struct isi_board *card = port->card;
        unsigned long base = card->base;
        u16 channel = port->channel;

        if (WaitTillCardIsFree(base))
                return;

        outw(0x8000 | (channel << card->shift_count) | 0x02, base);
        outw(0x0504, base);
        InterruptTheCard(base);
        port->status |= ISI_DTR;
}

/* card->lock HAS to be held */
static inline void drop_dtr(struct isi_port *port)
{
        struct isi_board *card = port->card;
        unsigned long base = card->base;
        u16 channel = port->channel;

        if (WaitTillCardIsFree(base))
                return;

        outw(0x8000 | (channel << card->shift_count) | 0x02, base);
        outw(0x0404, base);
        InterruptTheCard(base);
        port->status &= ~ISI_DTR;
}

/* card->lock HAS to be held */
static inline void raise_rts(struct isi_port *port)
{
        struct isi_board *card = port->card;
        unsigned long base = card->base;
        u16 channel = port->channel;

        if (WaitTillCardIsFree(base))
                return;

        outw(0x8000 | (channel << card->shift_count) | 0x02, base);
        outw(0x0a04, base);
        InterruptTheCard(base);
        port->status |= ISI_RTS;
}

/* card->lock HAS to be held */
static inline void drop_rts(struct isi_port *port)
{
        struct isi_board *card = port->card;
        unsigned long base = card->base;
        u16 channel = port->channel;

        if (WaitTillCardIsFree(base))
                return;

        outw(0x8000 | (channel << card->shift_count) | 0x02, base);
        outw(0x0804, base);
        InterruptTheCard(base);
        port->status &= ~ISI_RTS;
}

/* card->lock MUST NOT be held */

static void isicom_dtr_rts(struct tty_port *port, int on)
{
        struct isi_port *ip = container_of(port, struct isi_port, port);
        struct isi_board *card = ip->card;
        unsigned long base = card->base;
        u16 channel = ip->channel;

        if (!lock_card(card))
                return;

        if (on) {
                outw(0x8000 | (channel << card->shift_count) | 0x02, base);
                outw(0x0f04, base);
                InterruptTheCard(base);
                ip->status |= (ISI_DTR | ISI_RTS);
        } else {
                outw(0x8000 | (channel << card->shift_count) | 0x02, base);
                outw(0x0C04, base);
                InterruptTheCard(base);
                ip->status &= ~(ISI_DTR | ISI_RTS);
        }
        unlock_card(card);
}

/* card->lock HAS to be held */
static void drop_dtr_rts(struct isi_port *port)
{
        struct isi_board *card = port->card;
        unsigned long base = card->base;
        u16 channel = port->channel;

        if (WaitTillCardIsFree(base))
                return;

        outw(0x8000 | (channel << card->shift_count) | 0x02, base);
        outw(0x0c04, base);
        InterruptTheCard(base);
        port->status &= ~(ISI_RTS | ISI_DTR);
}

/*
 *      ISICOM Driver specific routines ...
 *
 */

static inline int __isicom_paranoia_check(struct isi_port const *port,
        char *name, const char *routine)
{
        if (!port) {
                printk(KERN_WARNING "ISICOM: Warning: bad isicom magic for "
                        "dev %s in %s.\n", name, routine);
                return 1;
        }
        if (port->magic != ISICOM_MAGIC) {
                printk(KERN_WARNING "ISICOM: Warning: NULL isicom port for "
                        "dev %s in %s.\n", name, routine);
                return 1;
        }

        return 0;
}

/*
 *      Transmitter.
 *
 *      We shovel data into the card buffers on a regular basis. The card
 *      will do the rest of the work for us.
 */

static void isicom_tx(unsigned long _data)
{
        unsigned long flags, base;
        unsigned int retries;
        short count = (BOARD_COUNT-1), card;
        short txcount, wrd, residue, word_count, cnt;
        struct isi_port *port;
        struct tty_struct *tty;

        /*      find next active board  */
        card = (prev_card + 1) & 0x0003;
        while (count-- > 0) {
                if (isi_card[card].status & BOARD_ACTIVE)
                        break;
                card = (card + 1) & 0x0003;
        }
        if (!(isi_card[card].status & BOARD_ACTIVE))
                goto sched_again;

        prev_card = card;

        count = isi_card[card].port_count;
        port = isi_card[card].ports;
        base = isi_card[card].base;

        spin_lock_irqsave(&isi_card[card].card_lock, flags);
        for (retries = 0; retries < 100; retries++) {
                if (inw(base + 0xe) & 0x1)
                        break;
                udelay(2);
        }
        if (retries >= 100)
                goto unlock;

        tty = tty_port_tty_get(&port->port);
        if (tty == NULL)
                goto put_unlock;

        for (; count > 0; count--, port++) {
                /* port not active or tx disabled to force flow control */
                if (!(port->port.flags & ASYNC_INITIALIZED) ||
                                !(port->status & ISI_TXOK))
                        continue;

                txcount = min_t(short, TX_SIZE, port->xmit_cnt);
                if (txcount <= 0 || tty->stopped || tty->hw_stopped)
                        continue;

                if (!(inw(base + 0x02) & (1 << port->channel)))
                        continue;

                pr_dbg("txing %d bytes, port%d.\n", txcount,
                        port->channel + 1);
                outw((port->channel << isi_card[card].shift_count) | txcount,
                        base);
                residue = NO;
                wrd = 0;
                while (1) {
                        cnt = min_t(int, txcount, (SERIAL_XMIT_SIZE
                                        - port->xmit_tail));
                        if (residue == YES) {
                                residue = NO;
                                if (cnt > 0) {
                                        wrd |= (port->port.xmit_buf[port->xmit_tail]
                                                                        << 8);
                                        port->xmit_tail = (port->xmit_tail + 1)
                                                & (SERIAL_XMIT_SIZE - 1);
                                        port->xmit_cnt--;
                                        txcount--;
                                        cnt--;
                                        outw(wrd, base);
                                } else {
                                        outw(wrd, base);
                                        break;
                                }
                        }
                        if (cnt <= 0)
                                break;
                        word_count = cnt >> 1;
                        outsw(base, port->port.xmit_buf+port->xmit_tail, word_count);
                        port->xmit_tail = (port->xmit_tail
                                + (word_count << 1)) & (SERIAL_XMIT_SIZE - 1);
                        txcount -= (word_count << 1);
                        port->xmit_cnt -= (word_count << 1);
                        if (cnt & 0x0001) {
                                residue = YES;
                                wrd = port->port.xmit_buf[port->xmit_tail];
                                port->xmit_tail = (port->xmit_tail + 1)
                                        & (SERIAL_XMIT_SIZE - 1);
                                port->xmit_cnt--;
                                txcount--;
                        }
                }

                InterruptTheCard(base);
                if (port->xmit_cnt <= 0)
                        port->status &= ~ISI_TXOK;
                if (port->xmit_cnt <= WAKEUP_CHARS)
                        tty_wakeup(tty);
        }

put_unlock:
        tty_kref_put(tty);
unlock:
        spin_unlock_irqrestore(&isi_card[card].card_lock, flags);
        /*      schedule another tx for hopefully in about 10ms */
sched_again:
        mod_timer(&tx, jiffies + msecs_to_jiffies(10));
}

/*
 *      Main interrupt handler routine
 */

static irqreturn_t isicom_interrupt(int irq, void *dev_id)
{
        struct isi_board *card = dev_id;
        struct isi_port *port;
        struct tty_struct *tty;
        unsigned long base;
        u16 header, word_count, count, channel;
        short byte_count;
        unsigned char *rp;

        if (!card || !(card->status & FIRMWARE_LOADED))
                return IRQ_NONE;

        base = card->base;

        /* did the card interrupt us? */
        if (!(inw(base + 0x0e) & 0x02))
                return IRQ_NONE;

        spin_lock(&card->card_lock);

        /*
         * disable any interrupts from the PCI card and lower the
         * interrupt line
         */
        outw(0x8000, base+0x04);
        ClearInterrupt(base);

        inw(base);              /* get the dummy word out */
        header = inw(base);
        channel = (header & 0x7800) >> card->shift_count;
        byte_count = header & 0xff;

        if (channel + 1 > card->port_count) {
                printk(KERN_WARNING "ISICOM: isicom_interrupt(0x%lx): "
                        "%d(channel) > port_count.\n", base, channel+1);
                outw(0x0000, base+0x04); /* enable interrupts */
                spin_unlock(&card->card_lock);
                return IRQ_HANDLED;
        }
        port = card->ports + channel;
        if (!(port->port.flags & ASYNC_INITIALIZED)) {
                outw(0x0000, base+0x04); /* enable interrupts */
                spin_unlock(&card->card_lock);
                return IRQ_HANDLED;
        }

        tty = tty_port_tty_get(&port->port);
        if (tty == NULL) {
                word_count = byte_count >> 1;
                while (byte_count > 1) {
                        inw(base);
                        byte_count -= 2;
                }
                if (byte_count & 0x01)
                        inw(base);
                outw(0x0000, base+0x04); /* enable interrupts */
                spin_unlock(&card->card_lock);
                return IRQ_HANDLED;
        }

        if (header & 0x8000) {          /* Status Packet */
                header = inw(base);
                switch (header & 0xff) {
                case 0: /* Change in EIA signals */
                        if (port->port.flags & ASYNC_CHECK_CD) {
                                if (port->status & ISI_DCD) {
                                        if (!(header & ISI_DCD)) {
                                        /* Carrier has been lost  */
                                                pr_dbg("interrupt: DCD->low.\n"
                                                        );
                                                port->status &= ~ISI_DCD;
                                                tty_hangup(tty);
                                        }
                                } else if (header & ISI_DCD) {
                                /* Carrier has been detected */
                                        pr_dbg("interrupt: DCD->high.\n");
                                        port->status |= ISI_DCD;
                                        wake_up_interruptible(&port->port.open_wait);
                                }
                        } else {
                                if (header & ISI_DCD)
                                        port->status |= ISI_DCD;
                                else
                                        port->status &= ~ISI_DCD;
                        }

                        if (port->port.flags & ASYNC_CTS_FLOW) {
                                if (tty->hw_stopped) {
                                        if (header & ISI_CTS) {
                                                port->port.tty->hw_stopped = 0;
                                                /* start tx ing */
                                                port->status |= (ISI_TXOK
                                                        | ISI_CTS);
                                                tty_wakeup(tty);
                                        }
                                } else if (!(header & ISI_CTS)) {
                                        tty->hw_stopped = 1;
                                        /* stop tx ing */
                                        port->status &= ~(ISI_TXOK | ISI_CTS);
                                }
                        } else {
                                if (header & ISI_CTS)
                                        port->status |= ISI_CTS;
                                else
                                        port->status &= ~ISI_CTS;
                        }

                        if (header & ISI_DSR)
                                port->status |= ISI_DSR;
                        else
                                port->status &= ~ISI_DSR;

                        if (header & ISI_RI)
                                port->status |= ISI_RI;
                        else
                                port->status &= ~ISI_RI;

                        break;

                case 1: /* Received Break !!! */
                        tty_insert_flip_char(tty, 0, TTY_BREAK);
                        if (port->port.flags & ASYNC_SAK)
                                do_SAK(tty);
                        tty_flip_buffer_push(tty);
                        break;

                case 2: /* Statistics            */
                        pr_dbg("isicom_interrupt: stats!!!.\n");
                        break;

                default:
                        pr_dbg("Intr: Unknown code in status packet.\n");
                        break;
                }
        } else {                                /* Data   Packet */

                count = tty_prepare_flip_string(tty, &rp, byte_count & ~1);
                pr_dbg("Intr: Can rx %d of %d bytes.\n", count, byte_count);
                word_count = count >> 1;
                insw(base, rp, word_count);
                byte_count -= (word_count << 1);
                if (count & 0x0001) {
                        tty_insert_flip_char(tty,  inw(base) & 0xff,
                                TTY_NORMAL);
                        byte_count -= 2;
                }
                if (byte_count > 0) {
                        pr_dbg("Intr(0x%lx:%d): Flip buffer overflow! dropping "
                                "bytes...\n", base, channel + 1);
                /* drain out unread xtra data */
                while (byte_count > 0) {
                                inw(base);
                                byte_count -= 2;
                        }
                }
                tty_flip_buffer_push(tty);
        }
        outw(0x0000, base+0x04); /* enable interrupts */
        spin_unlock(&card->card_lock);
        tty_kref_put(tty);

        return IRQ_HANDLED;
}

static void isicom_config_port(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;
        unsigned long baud;
        unsigned long base = card->base;
        u16 channel_setup, channel = port->channel,
                shift_count = card->shift_count;
        unsigned char flow_ctrl;

        /* FIXME: Switch to new tty baud API */
        baud = C_BAUD(tty);
        if (baud & CBAUDEX) {
                baud &= ~CBAUDEX;

                /*  if CBAUDEX bit is on and the baud is set to either 50 or 75
                 *  then the card is programmed for 57.6Kbps or 115Kbps
                 *  respectively.
                 */

                /* 1,2,3,4 => 57.6, 115.2, 230, 460 kbps resp. */
                if (baud < 1 || baud > 4)
                        tty->termios->c_cflag &= ~CBAUDEX;
                else
                        baud += 15;
        }
        if (baud == 15) {

                /*  the ASYNC_SPD_HI and ASYNC_SPD_VHI options are set
                 *  by the set_serial_info ioctl ... this is done by
                 *  the 'setserial' utility.
                 */

                if ((port->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
                        baud++; /*  57.6 Kbps */
                if ((port->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
                        baud += 2; /*  115  Kbps */
                if ((port->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
                        baud += 3; /* 230 kbps*/
                if ((port->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
                        baud += 4; /* 460 kbps*/
        }
        if (linuxb_to_isib[baud] == -1) {
                /* hang up */
                drop_dtr(port);
                return;
        } else
                raise_dtr(port);

        if (WaitTillCardIsFree(base) == 0) {
                outw(0x8000 | (channel << shift_count) | 0x03, base);
                outw(linuxb_to_isib[baud] << 8 | 0x03, base);
                channel_setup = 0;
                switch (C_CSIZE(tty)) {
                case CS5:
                        channel_setup |= ISICOM_CS5;
                        break;
                case CS6:
                        channel_setup |= ISICOM_CS6;
                        break;
                case CS7:
                        channel_setup |= ISICOM_CS7;
                        break;
                case CS8:
                        channel_setup |= ISICOM_CS8;
                        break;
                }

                if (C_CSTOPB(tty))
                        channel_setup |= ISICOM_2SB;
                if (C_PARENB(tty)) {
                        channel_setup |= ISICOM_EVPAR;
                        if (C_PARODD(tty))
                                channel_setup |= ISICOM_ODPAR;
                }
                outw(channel_setup, base);
                InterruptTheCard(base);
        }
        if (C_CLOCAL(tty))
                port->port.flags &= ~ASYNC_CHECK_CD;
        else
                port->port.flags |= ASYNC_CHECK_CD;

        /* flow control settings ...*/
        flow_ctrl = 0;
        port->port.flags &= ~ASYNC_CTS_FLOW;
        if (C_CRTSCTS(tty)) {
                port->port.flags |= ASYNC_CTS_FLOW;
                flow_ctrl |= ISICOM_CTSRTS;
        }
        if (I_IXON(tty))
                flow_ctrl |= ISICOM_RESPOND_XONXOFF;
        if (I_IXOFF(tty))
                flow_ctrl |= ISICOM_INITIATE_XONXOFF;

        if (WaitTillCardIsFree(base) == 0) {
                outw(0x8000 | (channel << shift_count) | 0x04, base);
                outw(flow_ctrl << 8 | 0x05, base);
                outw((STOP_CHAR(tty)) << 8 | (START_CHAR(tty)), base);
                InterruptTheCard(base);
        }

        /*      rx enabled -> enable port for rx on the card    */
        if (C_CREAD(tty)) {
                card->port_status |= (1 << channel);
                outw(card->port_status, base + 0x02);
        }
}

/* open et all */

static inline void isicom_setup_board(struct isi_board *bp)
{
        int channel;
        struct isi_port *port;
        unsigned long flags;

        spin_lock_irqsave(&bp->card_lock, flags);
        if (bp->status & BOARD_ACTIVE) {
                spin_unlock_irqrestore(&bp->card_lock, flags);
                return;
        }
        port = bp->ports;
        bp->status |= BOARD_ACTIVE;
        for (channel = 0; channel < bp->port_count; channel++, port++)
                drop_dtr_rts(port);
        spin_unlock_irqrestore(&bp->card_lock, flags);
}

static int isicom_setup_port(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;
        unsigned long flags;

        if (port->port.flags & ASYNC_INITIALIZED)
                return 0;
        if (tty_port_alloc_xmit_buf(&port->port) < 0)
                return -ENOMEM;

        spin_lock_irqsave(&card->card_lock, flags);
        clear_bit(TTY_IO_ERROR, &tty->flags);
        if (port->port.count == 1)
                card->count++;

        port->xmit_cnt = port->xmit_head = port->xmit_tail = 0;

        /*      discard any residual data       */
        if (WaitTillCardIsFree(card->base) == 0) {
                outw(0x8000 | (port->channel << card->shift_count) | 0x02,
                                card->base);
                outw(((ISICOM_KILLTX | ISICOM_KILLRX) << 8) | 0x06, card->base);
                InterruptTheCard(card->base);
        }

        isicom_config_port(tty);
        port->port.flags |= ASYNC_INITIALIZED;
        spin_unlock_irqrestore(&card->card_lock, flags);

        return 0;
}

static int isicom_carrier_raised(struct tty_port *port)
{
        struct isi_port *ip = container_of(port, struct isi_port, port);
        return (ip->status & ISI_DCD)?1 : 0;
}

static struct tty_port *isicom_find_port(struct tty_struct *tty)
{
        struct isi_port *port;
        struct isi_board *card;
        unsigned int board;
        int line = tty->index;

        if (line < 0 || line > PORT_COUNT-1)
                return NULL;
        board = BOARD(line);
        card = &isi_card[board];

        if (!(card->status & FIRMWARE_LOADED))
                return NULL;

        /*  open on a port greater than the port count for the card !!! */
        if (line > ((board * 16) + card->port_count - 1))
                return NULL;

        port = &isi_ports[line];
        if (isicom_paranoia_check(port, tty->name, "isicom_open"))
                return NULL;

        return &port->port;
}
        
static int isicom_open(struct tty_struct *tty, struct file *filp)
{
        struct isi_port *port;
        struct isi_board *card;
        struct tty_port *tport;
        int error = 0;

        tport = isicom_find_port(tty);
        if (tport == NULL)
                return -ENODEV;
        port = container_of(tport, struct isi_port, port);
        card = &isi_card[BOARD(tty->index)];
        isicom_setup_board(card);

        /* FIXME: locking on port.count etc */
        port->port.count++;
        tty->driver_data = port;
        tty_port_tty_set(&port->port, tty);
        /* FIXME: Locking on Initialized flag */
        if (!test_bit(ASYNCB_INITIALIZED, &tport->flags))
                error = isicom_setup_port(tty);
        if (error == 0)
                error = tty_port_block_til_ready(&port->port, tty, filp);
        return error;
}

/* close et all */

static inline void isicom_shutdown_board(struct isi_board *bp)
{
        if (bp->status & BOARD_ACTIVE)
                bp->status &= ~BOARD_ACTIVE;
}

/* card->lock HAS to be held */
static void isicom_shutdown_port(struct isi_port *port)
{
        struct isi_board *card = port->card;
        struct tty_struct *tty;

        tty = tty_port_tty_get(&port->port);

        if (!(port->port.flags & ASYNC_INITIALIZED)) {
                tty_kref_put(tty);
                return;
        }

        tty_port_free_xmit_buf(&port->port);
        port->port.flags &= ~ASYNC_INITIALIZED;
        /* 3rd October 2000 : Vinayak P Risbud */
        tty_port_tty_set(&port->port, NULL);

        /*Fix done by Anil .S on 30-04-2001
        remote login through isi port has dtr toggle problem
        due to which the carrier drops before the password prompt
        appears on the remote end. Now we drop the dtr only if the
        HUPCL(Hangup on close) flag is set for the tty*/

        if (C_HUPCL(tty))
                /* drop dtr on this port */
                drop_dtr(port);

        /* any other port uninits  */
        if (tty)
                set_bit(TTY_IO_ERROR, &tty->flags);

        if (--card->count < 0) {
                pr_dbg("isicom_shutdown_port: bad board(0x%lx) count %d.\n",
                        card->base, card->count);
                card->count = 0;
        }

        /* last port was closed, shutdown that boad too */
        if (C_HUPCL(tty)) {
                if (!card->count)
                        isicom_shutdown_board(card);
        }
        tty_kref_put(tty);
}

static void isicom_flush_buffer(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;
        unsigned long flags;

        if (isicom_paranoia_check(port, tty->name, "isicom_flush_buffer"))
                return;

        spin_lock_irqsave(&card->card_lock, flags);
        port->xmit_cnt = port->xmit_head = port->xmit_tail = 0;
        spin_unlock_irqrestore(&card->card_lock, flags);

        tty_wakeup(tty);
}

static void isicom_close_port(struct tty_port *port)
{
        struct isi_port *ip = container_of(port, struct isi_port, port);
        struct isi_board *card = ip->card;
        unsigned long flags;

        /* indicate to the card that no more data can be received
           on this port */
        spin_lock_irqsave(&card->card_lock, flags);
        if (port->flags & ASYNC_INITIALIZED) {
                card->port_status &= ~(1 << ip->channel);
                outw(card->port_status, card->base + 0x02);
        }
        isicom_shutdown_port(ip);
        spin_unlock_irqrestore(&card->card_lock, flags);
}

static void isicom_close(struct tty_struct *tty, struct file *filp)
{
        struct isi_port *ip = tty->driver_data;
        struct tty_port *port = &ip->port;
        if (isicom_paranoia_check(ip, tty->name, "isicom_close"))
                return;

        if (tty_port_close_start(port, tty, filp) == 0)
                return;
        isicom_close_port(port);
        isicom_flush_buffer(tty);
        tty_port_close_end(port, tty);
}

/* write et all */
static int isicom_write(struct tty_struct *tty, const unsigned char *buf,
        int count)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;
        unsigned long flags;
        int cnt, total = 0;

        if (isicom_paranoia_check(port, tty->name, "isicom_write"))
                return 0;

        spin_lock_irqsave(&card->card_lock, flags);

        while (1) {
                cnt = min_t(int, count, min(SERIAL_XMIT_SIZE - port->xmit_cnt
                                - 1, SERIAL_XMIT_SIZE - port->xmit_head));
                if (cnt <= 0)
                        break;

                memcpy(port->port.xmit_buf + port->xmit_head, buf, cnt);
                port->xmit_head = (port->xmit_head + cnt) & (SERIAL_XMIT_SIZE
                        - 1);
                port->xmit_cnt += cnt;
                buf += cnt;
                count -= cnt;
                total += cnt;
        }
        if (port->xmit_cnt && !tty->stopped && !tty->hw_stopped)
                port->status |= ISI_TXOK;
        spin_unlock_irqrestore(&card->card_lock, flags);
        return total;
}

/* put_char et all */
static int isicom_put_char(struct tty_struct *tty, unsigned char ch)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;
        unsigned long flags;

        if (isicom_paranoia_check(port, tty->name, "isicom_put_char"))
                return 0;

        spin_lock_irqsave(&card->card_lock, flags);
        if (port->xmit_cnt >= SERIAL_XMIT_SIZE - 1) {
                spin_unlock_irqrestore(&card->card_lock, flags);
                return 0;
        }

        port->port.xmit_buf[port->xmit_head++] = ch;
        port->xmit_head &= (SERIAL_XMIT_SIZE - 1);
        port->xmit_cnt++;
        spin_unlock_irqrestore(&card->card_lock, flags);
        return 1;
}

/* flush_chars et all */
static void isicom_flush_chars(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;

        if (isicom_paranoia_check(port, tty->name, "isicom_flush_chars"))
                return;

        if (port->xmit_cnt <= 0 || tty->stopped || tty->hw_stopped ||
                        !port->port.xmit_buf)
                return;

        /* this tells the transmitter to consider this port for
           data output to the card ... that's the best we can do. */
        port->status |= ISI_TXOK;
}

/* write_room et all */
static int isicom_write_room(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        int free;

        if (isicom_paranoia_check(port, tty->name, "isicom_write_room"))
                return 0;

        free = SERIAL_XMIT_SIZE - port->xmit_cnt - 1;
        if (free < 0)
                free = 0;
        return free;
}

/* chars_in_buffer et all */
static int isicom_chars_in_buffer(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        if (isicom_paranoia_check(port, tty->name, "isicom_chars_in_buffer"))
                return 0;
        return port->xmit_cnt;
}

/* ioctl et all */
static int isicom_send_break(struct tty_struct *tty, int length)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;
        unsigned long base = card->base;

        if (length == -1)
                return -EOPNOTSUPP;

        if (!lock_card(card))
                return -EINVAL;

        outw(0x8000 | ((port->channel) << (card->shift_count)) | 0x3, base);
        outw((length & 0xff) << 8 | 0x00, base);
        outw((length & 0xff00), base);
        InterruptTheCard(base);

        unlock_card(card);
        return 0;
}

static int isicom_tiocmget(struct tty_struct *tty, struct file *file)
{
        struct isi_port *port = tty->driver_data;
        /* just send the port status */
        u16 status = port->status;

        if (isicom_paranoia_check(port, tty->name, "isicom_ioctl"))
                return -ENODEV;

        return  ((status & ISI_RTS) ? TIOCM_RTS : 0) |
                ((status & ISI_DTR) ? TIOCM_DTR : 0) |
                ((status & ISI_DCD) ? TIOCM_CAR : 0) |
                ((status & ISI_DSR) ? TIOCM_DSR : 0) |
                ((status & ISI_CTS) ? TIOCM_CTS : 0) |
                ((status & ISI_RI ) ? TIOCM_RI  : 0);
}

static int isicom_tiocmset(struct tty_struct *tty, struct file *file,
        unsigned int set, unsigned int clear)
{
        struct isi_port *port = tty->driver_data;
        unsigned long flags;

        if (isicom_paranoia_check(port, tty->name, "isicom_ioctl"))
                return -ENODEV;

        spin_lock_irqsave(&port->card->card_lock, flags);
        if (set & TIOCM_RTS)
                raise_rts(port);
        if (set & TIOCM_DTR)
                raise_dtr(port);

        if (clear & TIOCM_RTS)
                drop_rts(port);
        if (clear & TIOCM_DTR)
                drop_dtr(port);
        spin_unlock_irqrestore(&port->card->card_lock, flags);

        return 0;
}

static int isicom_set_serial_info(struct tty_struct *tty,
                                        struct serial_struct __user *info)
{
        struct isi_port *port = tty->driver_data;
        struct serial_struct newinfo;
        int reconfig_port;

        if (copy_from_user(&newinfo, info, sizeof(newinfo)))
                return -EFAULT;

        lock_kernel();

        reconfig_port = ((port->port.flags & ASYNC_SPD_MASK) !=
                (newinfo.flags & ASYNC_SPD_MASK));

        if (!capable(CAP_SYS_ADMIN)) {
                if ((newinfo.close_delay != port->port.close_delay) ||
                                (newinfo.closing_wait != port->port.closing_wait) ||
                                ((newinfo.flags & ~ASYNC_USR_MASK) !=
                                (port->port.flags & ~ASYNC_USR_MASK))) {
                        unlock_kernel();
                        return -EPERM;
                }
                port->port.flags = ((port->port.flags & ~ASYNC_USR_MASK) |
                                (newinfo.flags & ASYNC_USR_MASK));
        } else {
                port->port.close_delay = newinfo.close_delay;
                port->port.closing_wait = newinfo.closing_wait;
                port->port.flags = ((port->port.flags & ~ASYNC_FLAGS) |
                                (newinfo.flags & ASYNC_FLAGS));
        }
        if (reconfig_port) {
                unsigned long flags;
                spin_lock_irqsave(&port->card->card_lock, flags);
                isicom_config_port(tty);
                spin_unlock_irqrestore(&port->card->card_lock, flags);
        }
        unlock_kernel();
        return 0;
}

static int isicom_get_serial_info(struct isi_port *port,
        struct serial_struct __user *info)
{
        struct serial_struct out_info;

        lock_kernel();
        memset(&out_info, 0, sizeof(out_info));
/*      out_info.type = ? */
        out_info.line = port - isi_ports;
        out_info.port = port->card->base;
        out_info.irq = port->card->irq;
        out_info.flags = port->port.flags;
/*      out_info.baud_base = ? */
        out_info.close_delay = port->port.close_delay;
        out_info.closing_wait = port->port.closing_wait;
        unlock_kernel();
        if (copy_to_user(info, &out_info, sizeof(out_info)))
                return -EFAULT;
        return 0;
}

static int isicom_ioctl(struct tty_struct *tty, struct file *filp,
        unsigned int cmd, unsigned long arg)
{
        struct isi_port *port = tty->driver_data;
        void __user *argp = (void __user *)arg;

        if (isicom_paranoia_check(port, tty->name, "isicom_ioctl"))
                return -ENODEV;

        switch (cmd) {
        case TIOCGSERIAL:
                return isicom_get_serial_info(port, argp);

        case TIOCSSERIAL:
                return isicom_set_serial_info(tty, argp);

        default:
                return -ENOIOCTLCMD;
        }
        return 0;
}

/* set_termios et all */
static void isicom_set_termios(struct tty_struct *tty,
        struct ktermios *old_termios)
{
        struct isi_port *port = tty->driver_data;
        unsigned long flags;

        if (isicom_paranoia_check(port, tty->name, "isicom_set_termios"))
                return;

        if (tty->termios->c_cflag == old_termios->c_cflag &&
                        tty->termios->c_iflag == old_termios->c_iflag)
                return;

        spin_lock_irqsave(&port->card->card_lock, flags);
        isicom_config_port(tty);
        spin_unlock_irqrestore(&port->card->card_lock, flags);

        if ((old_termios->c_cflag & CRTSCTS) &&
                        !(tty->termios->c_cflag & CRTSCTS)) {
                tty->hw_stopped = 0;
                isicom_start(tty);
        }
}

/* throttle et all */
static void isicom_throttle(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;

        if (isicom_paranoia_check(port, tty->name, "isicom_throttle"))
                return;

        /* tell the card that this port cannot handle any more data for now */
        card->port_status &= ~(1 << port->channel);
        outw(card->port_status, card->base + 0x02);
}

/* unthrottle et all */
static void isicom_unthrottle(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        struct isi_board *card = port->card;

        if (isicom_paranoia_check(port, tty->name, "isicom_unthrottle"))
                return;

        /* tell the card that this port is ready to accept more data */
        card->port_status |= (1 << port->channel);
        outw(card->port_status, card->base + 0x02);
}

/* stop et all */
static void isicom_stop(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;

        if (isicom_paranoia_check(port, tty->name, "isicom_stop"))
                return;

        /* this tells the transmitter not to consider this port for
           data output to the card. */
        port->status &= ~ISI_TXOK;
}

/* start et all */
static void isicom_start(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;

        if (isicom_paranoia_check(port, tty->name, "isicom_start"))
                return;

        /* this tells the transmitter to consider this port for
           data output to the card. */
        port->status |= ISI_TXOK;
}

static void isicom_hangup(struct tty_struct *tty)
{
        struct isi_port *port = tty->driver_data;
        unsigned long flags;

        if (isicom_paranoia_check(port, tty->name, "isicom_hangup"))
                return;

        spin_lock_irqsave(&port->card->card_lock, flags);
        isicom_shutdown_port(port);
        spin_unlock_irqrestore(&port->card->card_lock, flags);

        tty_port_hangup(&port->port);
}


/*
 * Driver init and deinit functions
 */

static const struct tty_operations isicom_ops = {
        .open                   = isicom_open,
        .close                  = isicom_close,
        .write                  = isicom_write,
        .put_char               = isicom_put_char,
        .flush_chars            = isicom_flush_chars,
        .write_room             = isicom_write_room,
        .chars_in_buffer        = isicom_chars_in_buffer,
        .ioctl                  = isicom_ioctl,
        .set_termios            = isicom_set_termios,
        .throttle               = isicom_throttle,
        .unthrottle             = isicom_unthrottle,
        .stop                   = isicom_stop,
        .start                  = isicom_start,
        .hangup                 = isicom_hangup,
        .flush_buffer           = isicom_flush_buffer,
        .tiocmget               = isicom_tiocmget,
        .tiocmset               = isicom_tiocmset,
        .break_ctl              = isicom_send_break,
};

static const struct tty_port_operations isicom_port_ops = {
        .carrier_raised         = isicom_carrier_raised,
        .dtr_rts                = isicom_dtr_rts,
};

static int __devinit reset_card(struct pci_dev *pdev,
        const unsigned int card, unsigned int *signature)
{
        struct isi_board *board = pci_get_drvdata(pdev);
        unsigned long base = board->base;
        unsigned int sig, portcount = 0;
        int retval = 0;

        dev_dbg(&pdev->dev, "ISILoad:Resetting Card%d at 0x%lx\n", card + 1,
                base);

        inw(base + 0x8);

        msleep(10);

        outw(0, base + 0x8); /* Reset */

        msleep(1000);

        sig = inw(base + 0x4) & 0xff;

        if (sig != 0xa5 && sig != 0xbb && sig != 0xcc && sig != 0xdd &&
                        sig != 0xee) {
                dev_warn(&pdev->dev, "ISILoad:Card%u reset failure (Possible "
                        "bad I/O Port Address 0x%lx).\n", card + 1, base);
                dev_dbg(&pdev->dev, "Sig=0x%x\n", sig);
                retval = -EIO;
                goto end;
        }

        msleep(10);

        portcount = inw(base + 0x2);
        if (!(inw(base + 0xe) & 0x1) || (portcount != 0 && portcount != 4 &&
                                portcount != 8 && portcount != 16)) {
                dev_err(&pdev->dev, "ISILoad:PCI Card%d reset failure.\n",
                        card + 1);
                retval = -EIO;
                goto end;
        }

        switch (sig) {
        case 0xa5:
        case 0xbb:
        case 0xdd:
                board->port_count = (portcount == 4) ? 4 : 8;
                board->shift_count = 12;
                break;
        case 0xcc:
        case 0xee:
                board->port_count = 16;
                board->shift_count = 11;
                break;
        }
        dev_info(&pdev->dev, "-Done\n");
        *signature = sig;

end:
        return retval;
}

static int __devinit load_firmware(struct pci_dev *pdev,
        const unsigned int index, const unsigned int signature)
{
        struct isi_board *board = pci_get_drvdata(pdev);
        const struct firmware *fw;
        unsigned long base = board->base;
        unsigned int a;
        u16 word_count, status;
        int retval = -EIO;
        char *name;
        u8 *data;

        struct stframe {
                u16     addr;
                u16     count;
                u8      data[0];
        } *frame;

        switch (signature) {
        case 0xa5:
                name = "isi608.bin";
                break;
        case 0xbb:
                name = "isi608em.bin";
                break;
        case 0xcc:
                name = "isi616em.bin";
                break;
        case 0xdd:
                name = "isi4608.bin";
                break;
        case 0xee:
                name = "isi4616.bin";
                break;
        default:
                dev_err(&pdev->dev, "Unknown signature.\n");
                goto end;
        }

        retval = request_firmware(&fw, name, &pdev->dev);
        if (retval)
                goto end;

        retval = -EIO;

        for (frame = (struct stframe *)fw->data;
                        frame < (struct stframe *)(fw->data + fw->size);
                        frame = (struct stframe *)((u8 *)(frame + 1) +
                                frame->count)) {
                if (WaitTillCardIsFree(base))
                        goto errrelfw;

                outw(0xf0, base);       /* start upload sequence */
                outw(0x00, base);
                outw(frame->addr, base); /* lsb of address */

                word_count = frame->count / 2 + frame->count % 2;
                outw(word_count, base);
                InterruptTheCard(base);

                udelay(100); /* 0x2f */

                if (WaitTillCardIsFree(base))
                        goto errrelfw;

                status = inw(base + 0x4);
                if (status != 0) {
                        dev_warn(&pdev->dev, "Card%d rejected load header:\n"
                                 "Address:0x%x\n"
                                 "Count:0x%x\n"
                                 "Status:0x%x\n",
                                 index + 1, frame->addr, frame->count, status);
                        goto errrelfw;
                }
                outsw(base, frame->data, word_count);

                InterruptTheCard(base);

                udelay(50); /* 0x0f */

                if (WaitTillCardIsFree(base))
                        goto errrelfw;

                status = inw(base + 0x4);
                if (status != 0) {
                        dev_err(&pdev->dev, "Card%d got out of sync.Card "
                                "Status:0x%x\n", index + 1, status);
                        goto errrelfw;
                }
        }

/* XXX: should we test it by reading it back and comparing with original like
 * in load firmware package? */
        for (frame = (struct stframe *)fw->data;
                        frame < (struct stframe *)(fw->data + fw->size);
                        frame = (struct stframe *)((u8 *)(frame + 1) +
                                frame->count)) {
                if (WaitTillCardIsFree(base))
                        goto errrelfw;

                outw(0xf1, base); /* start download sequence */
                outw(0x00, base);
                outw(frame->addr, base); /* lsb of address */

                word_count = (frame->count >> 1) + frame->count % 2;
                outw(word_count + 1, base);
                InterruptTheCard(base);

                udelay(50); /* 0xf */

                if (WaitTillCardIsFree(base))
                        goto errrelfw;

                status = inw(base + 0x4);
                if (status != 0) {
                        dev_warn(&pdev->dev, "Card%d rejected verify header:\n"
                                 "Address:0x%x\n"
                                 "Count:0x%x\n"
                                 "Status: 0x%x\n",
                                 index + 1, frame->addr, frame->count, status);
                        goto errrelfw;
                }

                data = kmalloc(word_count * 2, GFP_KERNEL);
                if (data == NULL) {
                        dev_err(&pdev->dev, "Card%d, firmware upload "
                                "failed, not enough memory\n", index + 1);
                        goto errrelfw;
                }
                inw(base);
                insw(base, data, word_count);
                InterruptTheCard(base);

                for (a = 0; a < frame->count; a++)
                        if (data[a] != frame->data[a]) {
                                kfree(data);
                                dev_err(&pdev->dev, "Card%d, firmware upload "
                                        "failed\n", index + 1);
                                goto errrelfw;
                        }
                kfree(data);

                udelay(50); /* 0xf */

                if (WaitTillCardIsFree(base))
                        goto errrelfw;

                status = inw(base + 0x4);
                if (status != 0) {
                        dev_err(&pdev->dev, "Card%d verify got out of sync. "
                                "Card Status:0x%x\n", index + 1, status);
                        goto errrelfw;
                }
        }

        /* xfer ctrl */
        if (WaitTillCardIsFree(base))
                goto errrelfw;

        outw(0xf2, base);
        outw(0x800, base);
        outw(0x0, base);
        outw(0x0, base);
        InterruptTheCard(base);
        outw(0x0, base + 0x4); /* for ISI4608 cards */

        board->status |= FIRMWARE_LOADED;
        retval = 0;

errrelfw:
        release_firmware(fw);
end:
        return retval;
}

/*
 *      Insmod can set static symbols so keep these static
 */
static unsigned int card_count;

static int __devinit isicom_probe(struct pci_dev *pdev,
        const struct pci_device_id *ent)
{
        unsigned int uninitialized_var(signature), index;
        int retval = -EPERM;
        struct isi_board *board = NULL;

        if (card_count >= BOARD_COUNT)
                goto err;

        retval = pci_enable_device(pdev);
        if (retval) {
                dev_err(&pdev->dev, "failed to enable\n");
                goto err;
        }

        dev_info(&pdev->dev, "ISI PCI Card(Device ID 0x%x)\n", ent->device);

        /* allot the first empty slot in the array */
        for (index = 0; index < BOARD_COUNT; index++)
                if (isi_card[index].base == 0) {
                        board = &isi_card[index];
                        break;
                }

        board->index = index;
        board->base = pci_resource_start(pdev, 3);
        board->irq = pdev->irq;
        card_count++;

        pci_set_drvdata(pdev, board);

        retval = pci_request_region(pdev, 3, ISICOM_NAME);
        if (retval) {
                dev_err(&pdev->dev, "I/O Region 0x%lx-0x%lx is busy. Card%d "
                        "will be disabled.\n", board->base, board->base + 15,
                        index + 1);
                retval = -EBUSY;
                goto errdec;
        }

        retval = request_irq(board->irq, isicom_interrupt,
                        IRQF_SHARED | IRQF_DISABLED, ISICOM_NAME, board);
        if (retval < 0) {
                dev_err(&pdev->dev, "Could not install handler at Irq %d. "
                        "Card%d will be disabled.\n", board->irq, index + 1);
                goto errunrr;
        }

        retval = reset_card(pdev, index, &signature);
        if (retval < 0)
                goto errunri;

        retval = load_firmware(pdev, index, signature);
        if (retval < 0)
                goto errunri;

        for (index = 0; index < board->port_count; index++)
                tty_register_device(isicom_normal, board->index * 16 + index,
                                &pdev->dev);

        return 0;

errunri:
        free_irq(board->irq, board);
errunrr:
        pci_release_region(pdev, 3);
errdec:
        board->base = 0;
        card_count--;
        pci_disable_device(pdev);
err:
        return retval;
}

static void __devexit isicom_remove(struct pci_dev *pdev)
{
        struct isi_board *board = pci_get_drvdata(pdev);
        unsigned int i;

        for (i = 0; i < board->port_count; i++)
                tty_unregister_device(isicom_normal, board->index * 16 + i);

        free_irq(board->irq, board);
        pci_release_region(pdev, 3);
        board->base = 0;
        card_count--;
        pci_disable_device(pdev);
}

static int __init isicom_init(void)
{
        int retval, idx, channel;
        struct isi_port *port;

        for (idx = 0; idx < BOARD_COUNT; idx++) {
                port = &isi_ports[idx * 16];
                isi_card[idx].ports = port;
                spin_lock_init(&isi_card[idx].card_lock);
                for (channel = 0; channel < 16; channel++, port++) {
                        tty_port_init(&port->port);
                        port->port.ops = &isicom_port_ops;
                        port->magic = ISICOM_MAGIC;
                        port->card = &isi_card[idx];
                        port->channel = channel;
                        port->port.close_delay = 50 * HZ/100;
                        port->port.closing_wait = 3000 * HZ/100;
                        port->status = 0;
                        /*  . . .  */
                }
                isi_card[idx].base = 0;
                isi_card[idx].irq = 0;
        }

        /* tty driver structure initialization */
        isicom_normal = alloc_tty_driver(PORT_COUNT);
        if (!isicom_normal) {
                retval = -ENOMEM;
                goto error;
        }

        isicom_normal->owner                    = THIS_MODULE;
        isicom_normal->name                     = "ttyM";
        isicom_normal->major                    = ISICOM_NMAJOR;
        isicom_normal->minor_start              = 0;
        isicom_normal->type                     = TTY_DRIVER_TYPE_SERIAL;
        isicom_normal->subtype                  = SERIAL_TYPE_NORMAL;
        isicom_normal->init_termios             = tty_std_termios;
        isicom_normal->init_termios.c_cflag     = B9600 | CS8 | CREAD | HUPCL |
                CLOCAL;
        isicom_normal->flags                    = TTY_DRIVER_REAL_RAW |
                TTY_DRIVER_DYNAMIC_DEV | TTY_DRIVER_HARDWARE_BREAK;
        tty_set_operations(isicom_normal, &isicom_ops);

        retval = tty_register_driver(isicom_normal);
        if (retval) {
                pr_dbg("Couldn't register the dialin driver\n");
                goto err_puttty;
        }

        retval = pci_register_driver(&isicom_driver);
        if (retval < 0) {
                printk(KERN_ERR "ISICOM: Unable to register pci driver.\n");
                goto err_unrtty;
        }

        mod_timer(&tx, jiffies + 1);

        return 0;
err_unrtty:
        tty_unregister_driver(isicom_normal);
err_puttty:
        put_tty_driver(isicom_normal);
error:
        return retval;
}

static void __exit isicom_exit(void)
{
        del_timer_sync(&tx);

        pci_unregister_driver(&isicom_driver);
        tty_unregister_driver(isicom_normal);
        put_tty_driver(isicom_normal);
}

module_init(isicom_init);
module_exit(isicom_exit);

MODULE_AUTHOR("MultiTech");
MODULE_DESCRIPTION("Driver for the ISI series of cards by MultiTech");
MODULE_LICENSE("GPL");