config NOZOMI

	tristate "HSDPA Broadband Wireless Data Card - Globe Trotter"

	depends on PCI && EXPERIMENTAL

	help

	  If you have a HSDPA driver Broadband Wireless Data Card -

	  Globe Trotter PCMCIA card, say Y here.

	  To compile this driver as a module, choose M here, the module

	  will be called nozomi.

obj-$(CONFIG_NOZOMI)		+= nozomi.o

/*

 * nozomi.c  -- HSDPA driver Broadband Wireless Data Card - Globe Trotter

 *

 * Written by: Ulf Jakobsson,

 *             Jan �erfeldt,

 *             Stefan Thomasson,

 *

 * Maintained by: Paul Hardwick (p.hardwick@option.com)

 *

 * Patches:

 *          Locking code changes for Vodafone by Sphere Systems Ltd,

 *                              Andrew Bird (ajb@spheresystems.co.uk )

 *                              & Phil Sanderson

 *

 * Source has been ported from an implementation made by Filip Aben @ Option

 *

 * --------------------------------------------------------------------------

 *

 * Copyright (c) 2005,2006 Option Wireless Sweden AB

 * Copyright (c) 2006 Sphere Systems Ltd

 * Copyright (c) 2006 Option Wireless n/v

 * All rights Reserved.

 *

 * 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., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

 *

 * --------------------------------------------------------------------------

 */

/*

 * CHANGELOG

 * Version 2.1b

 * 07-August-2007 Frank Seidel

 * - Minor cleanups

 * - theoretical multicard support

 *

 * Version 2.1

 * 03-July-2006 Paul Hardwick

 *

 * - Stability Improvements. Incorporated spinlock wraps patch.

 * - Updated for newer 2.6.14+ kernels (tty_buffer_request_room)

 * - using __devexit macro for tty

 *

 *

 * Version 2.0

 * 08-feb-2006 15:34:10:Ulf

 *

 * -Fixed issue when not waking up line disipine layer, could probably result

 *  in better uplink performance for 2.4.

 *

 * -Fixed issue with big endian during initalization, now proper toggle flags

 *  are handled between preloader and maincode.

 *

 * -Fixed flow control issue.

 *

 * -Added support for setting DTR.

 *

 * -For 2.4 kernels, removing temporary buffer that's not needed.

 *

 * -Reading CTS only for modem port (only port that supports it).

 *

 * -Return 0 in write_room instead of netative value, it's not handled in

 *  upper layer.

 *

 * --------------------------------------------------------------------------

 * Version 1.0

 *

 * First version of driver, only tested with card of type F32_2.

 * Works fine with 2.4 and 2.6 kernels.

 * Driver also support big endian architecture.

 */

/* Enable this to have a lot of debug printouts */

#define DEBUG

#include <linux/module.h>

#include <linux/pci.h>

#include <linux/ioport.h>

#include <linux/tty.h>

#include <linux/tty_driver.h>

#include <linux/tty_flip.h>

#include <linux/serial.h>

#include <linux/interrupt.h>

#include <linux/kmod.h>

#include <linux/init.h>

#include <linux/kfifo.h>

#include <linux/list.h>

#include <linux/uaccess.h>

#include <asm/atomic.h>

#include <linux/delay.h>

#define VERSION_STRING DRIVER_DESC " 2.1b (build date: " \

					__DATE__ " " __TIME__ ")"

/*    Macros definitions */

/* Default debug printout level */

#define NOZOMI_DEBUG_LEVEL 0x00

#define P_BUF_SIZE 128

#define NFO(_err_flag_, args...)				\

do {								\

	char tmp[P_BUF_SIZE];					\

	snprintf(tmp, sizeof(tmp), ##args);			\

	printk(_err_flag_ "[%d] %s(): %s\n", __LINE__,		\

		__FUNCTION__, tmp);				\

} while (0)

#define DBG1(args...) D_(0x01, ##args)

#define DBG2(args...) D_(0x02, ##args)

#define DBG3(args...) D_(0x04, ##args)

#define DBG4(args...) D_(0x08, ##args)

#define DBG5(args...) D_(0x10, ##args)

#define DBG6(args...) D_(0x20, ##args)

#define DBG7(args...) D_(0x40, ##args)

#define DBG8(args...) D_(0x80, ##args)

#ifdef DEBUG

/* Do we need this settable at runtime? */

static int debug = NOZOMI_DEBUG_LEVEL;

#define D(lvl, args...)  do {if (lvl & debug) NFO(KERN_DEBUG, ##args); } \

				while (0)

#define D_(lvl, args...) D(lvl, ##args)

/* These printouts are always printed */

#else

static int debug;

#define D_(lvl, args...)

#endif

/* TODO: rewrite to optimize macros... */

#define TMP_BUF_MAX 256

#define DUMP(buf__,len__) \

  do {  \

    char tbuf[TMP_BUF_MAX] = {0};\

    if (len__ > 1) {\

	snprintf(tbuf, len__ > TMP_BUF_MAX ? TMP_BUF_MAX : len__, "%s", buf__);\

	if (tbuf[len__-2] == '\r') {\

		tbuf[len__-2] = 'r';\

	} \

	DBG1("SENDING: '%s' (%d+n)", tbuf, len__);\

    } else {\

	DBG1("SENDING: '%s' (%d)", tbuf, len__);\

    } \

} while (0)

/*    Defines */

#define NOZOMI_NAME		"nozomi"

#define NOZOMI_NAME_TTY		"nozomi_tty"

#define DRIVER_DESC		"Nozomi driver"

#define NTTY_TTY_MAJOR		241

#define NTTY_TTY_MINORS		MAX_PORT

#define NTTY_FIFO_BUFFER_SIZE	8192

/* Must be power of 2 */

#define FIFO_BUFFER_SIZE_UL	8192

/* Size of tmp send buffer to card */

#define SEND_BUF_MAX		1024

#define RECEIVE_BUF_MAX		4

/* Define all types of vendors and devices to support */

#define VENDOR1		0x1931	/* Vendor Option */

#define DEVICE1		0x000c	/* HSDPA card */

#define R_IIR		0x0000	/* Interrupt Identity Register */

#define R_FCR		0x0000	/* Flow Control Register */

#define R_IER		0x0004	/* Interrupt Enable Register */

#define CONFIG_MAGIC	0xEFEFFEFE

#define TOGGLE_VALID	0x0000

/* Definition of interrupt tokens */

#define MDM_DL1		0x0001

#define MDM_UL1		0x0002

#define MDM_DL2		0x0004

#define MDM_UL2		0x0008

#define DIAG_DL1	0x0010

#define DIAG_DL2	0x0020

#define DIAG_UL		0x0040

#define APP1_DL		0x0080

#define APP1_UL		0x0100

#define APP2_DL		0x0200

#define APP2_UL		0x0400

#define CTRL_DL		0x0800

#define CTRL_UL		0x1000

#define RESET		0x8000

#define MDM_DL		(MDM_DL1  | MDM_DL2)

#define MDM_UL		(MDM_UL1  | MDM_UL2)

#define DIAG_DL		(DIAG_DL1 | DIAG_DL2)

/* modem signal definition */

#define CTRL_DSR	0x0001

#define CTRL_DCD	0x0002

#define CTRL_RI		0x0004

#define CTRL_CTS	0x0008

#define CTRL_DTR	0x0001

#define CTRL_RTS	0x0002

#define MAX_PORT		4

#define NOZOMI_MAX_PORTS	5

/*    Type definitions */

/*

 * There are two types of nozomi cards,

 * one with 2048 memory and with 8192 memory

 */

enum card_type {

	F32_2 = 2048,	/* 512 bytes downlink + uplink * 2 -> 2048 */

	F32_8 = 8192,	/* 3072 bytes downl. + 1024 bytes uplink * 2 -> 8192 */

};

/* Two different toggle channels exist */

enum channel_type {

	CH_A = 0,

	CH_B = 1,

};

/* Port definition for the card regarding flow control */

enum ctrl_port_type {

	CTRL_CMD	= 0,

	CTRL_MDM	= 1,

	CTRL_DIAG	= 2,

	CTRL_APP1	= 3,

	CTRL_APP2	= 4,

	CTRL_ERROR	= -1,

};

/* Ports that the nozomi has */

enum port_type {

	PORT_MDM	= 0,

	PORT_DIAG	= 1,

	PORT_APP1	= 2,

	PORT_APP2	= 3,

	PORT_CTRL	= 4,

	PORT_ERROR	= -1,

};

#ifdef __ARMEB__

/* Big endian */

struct toggles {

	unsigned enabled:5;	/*

				 * Toggle fields are valid if enabled is 0,

				 * else A-channels must always be used.

				 */

	unsigned diag_dl:1;

	unsigned mdm_dl:1;

	unsigned mdm_ul:1;

} __attribute__ ((packed));

/* Configuration table to read at startup of card */

/* Is for now only needed during initialization phase */

struct config_table {

	u32 signature;

	u16 product_information;

	u16 version;

	u8 pad3[3];

	struct toggles toggle;

	u8 pad1[4];

	u16 dl_mdm_len1;	/*

				 * If this is 64, it can hold

				 * 60 bytes + 4 that is length field

				 */

	u16 dl_start;

	u16 dl_diag_len1;

	u16 dl_mdm_len2;	/*

				 * If this is 64, it can hold

				 * 60 bytes + 4 that is length field

				 */

	u16 dl_app1_len;

	u16 dl_diag_len2;

	u16 dl_ctrl_len;

	u16 dl_app2_len;

	u8 pad2[16];

	u16 ul_mdm_len1;

	u16 ul_start;

	u16 ul_diag_len;

	u16 ul_mdm_len2;

	u16 ul_app1_len;

	u16 ul_app2_len;

	u16 ul_ctrl_len;

} __attribute__ ((packed));

/* This stores all control downlink flags */

struct ctrl_dl {

	u8 port;

	unsigned reserved:4;

	unsigned CTS:1;

	unsigned RI:1;

	unsigned DCD:1;

	unsigned DSR:1;

} __attribute__ ((packed));

/* This stores all control uplink flags */

struct ctrl_ul {

	u8 port;

	unsigned reserved:6;

	unsigned RTS:1;

	unsigned DTR:1;

} __attribute__ ((packed));

#else

/* Little endian */

/* This represents the toggle information */

struct toggles {

	unsigned mdm_ul:1;

	unsigned mdm_dl:1;

	unsigned diag_dl:1;

	unsigned enabled:5;	/*

				 * Toggle fields are valid if enabled is 0,

				 * else A-channels must always be used.

				 */

} __attribute__ ((packed));

/* Configuration table to read at startup of card */

struct config_table {

	u32 signature;

	u16 version;

	u16 product_information;

	struct toggles toggle;

	u8 pad1[7];

	u16 dl_start;

	u16 dl_mdm_len1;	/*

				 * If this is 64, it can hold

				 * 60 bytes + 4 that is length field

				 */

	u16 dl_mdm_len2;

	u16 dl_diag_len1;

	u16 dl_diag_len2;

	u16 dl_app1_len;

	u16 dl_app2_len;

	u16 dl_ctrl_len;

	u8 pad2[16];

	u16 ul_start;

	u16 ul_mdm_len2;

	u16 ul_mdm_len1;

	u16 ul_diag_len;

	u16 ul_app1_len;

	u16 ul_app2_len;

	u16 ul_ctrl_len;

} __attribute__ ((packed));

/* This stores all control downlink flags */

struct ctrl_dl {

	unsigned DSR:1;

	unsigned DCD:1;

	unsigned RI:1;

	unsigned CTS:1;

	unsigned reserverd:4;

	u8 port;

} __attribute__ ((packed));

/* This stores all control uplink flags */

struct ctrl_ul {

	unsigned DTR:1;

	unsigned RTS:1;

	unsigned reserved:6;

	u8 port;

} __attribute__ ((packed));

#endif

/* This holds all information that is needed regarding a port */

struct port {

	u8 update_flow_control;

	struct ctrl_ul ctrl_ul;

	struct ctrl_dl ctrl_dl;

	struct kfifo *fifo_ul;

	void __iomem *dl_addr[2];

	u32 dl_size[2];

	u8 toggle_dl;

	void __iomem *ul_addr[2];

	u32 ul_size[2];

	u8 toggle_ul;

	u16 token_dl;

	struct tty_struct *tty;

	int tty_open_count;

	struct semaphore tty_sem;

	wait_queue_head_t tty_wait;

	struct async_icount tty_icount;

	int tty_index;

	u32 rx_data, tx_data;

	u8 tty_dont_flip;

};

/* Private data one for each card in the system */

struct nozomi {

	void __iomem *base_addr;

	u8 closing;

	/* Pointers to registers */

	void __iomem *reg_iir;

	void __iomem *reg_fcr;

	void __iomem *reg_ier;

	u16 last_ier;

	enum card_type card_type;

	struct config_table config_table;	/* Configuration table */

	struct pci_dev *pdev;

	struct port port[NOZOMI_MAX_PORTS];

	u8 *send_buf;

	struct tty_driver *tty_driver;

	struct workqueue_struct *tty_flip_wq;

	struct work_struct tty_flip_wq_struct;

	struct ktermios *tty_termios[NTTY_TTY_MINORS];

	struct ktermios *tty_termios_locked[NTTY_TTY_MINORS];

	spinlock_t spin_mutex;	/* secures access to registers and tty */

	u32 open_ttys;

};

/* This is a data packet that is read or written to/from card */

struct buffer {

	u32 size;		/* size is the length of the data buffer */

	u8 *data;

} __attribute__ ((packed));

/*    Function declarations */

static int ntty_tty_init(struct nozomi *dc);

/*    Global variables */

static struct pci_device_id nozomi_pci_tbl[] = {

	{PCI_DEVICE(VENDOR1, DEVICE1)},

	{},

};

MODULE_DEVICE_TABLE(pci, nozomi_pci_tbl);

/* Used to store interrupt variables */

struct irq {

	u16 read_iir;		/* Holds current interrupt tokens */

};

/* Representing the pci device of interest */

struct nozomi_devices {

	struct list_head list;

	struct nozomi *my_dev;

	struct irq my_irq;

	int index_start;

};

static atomic_t cards_found = ATOMIC_INIT(0);

static LIST_HEAD(my_devices);

/*

 * find card by tty_index

 */

static struct nozomi *get_dc_by_index(s32 index)

{

	struct list_head *p;

	struct nozomi_devices *curdev;

	int devidx;

	if (likely(atomic_read(&cards_found) == 1)) {

		curdev = list_first_entry(&my_devices,

					struct nozomi_devices, list);

		return curdev->my_dev;

	} else {

		devidx = index - (index % NTTY_TTY_MINORS);

		list_for_each(p, &my_devices) {

			curdev = list_entry(p, struct nozomi_devices, list);

			if (curdev->index_start == devidx)

				return curdev->my_dev;

		}

	}

	printk(KERN_ALERT "Fatal error: could not find device" \

		" for tty-index %d\n", index);

	return NULL;

}

static struct port *get_port_by_tty(const struct tty_struct *tty)

{

	struct nozomi *ndev = get_dc_by_index(tty->index);

	return ndev ? &ndev->port[tty->index] : NULL;

}

static struct nozomi *get_dc_by_tty(const struct tty_struct *tty)

{

	return get_dc_by_index(tty->index);

}

/*

 * TODO:

 * -Optimize

 * -Rewrite cleaner

 */

static void read_mem32(u32 *buf, const void __iomem *mem_addr_start,

			u32 size_bytes)

{

	u32 i = 0;

#ifdef __ARMEB__

	const u32 *ptr = (u32 *) mem_addr_start;

#else

	const u32 *ptr = (__force u32 *) mem_addr_start;

#endif

	u16 *buf16;

	if (unlikely(!ptr || !buf))

		goto out;

	/* shortcut for extremely often used cases */

	switch (size_bytes) {

	case 2:	/* 2 bytes */

		buf16 = (u16 *) buf;

#ifdef __ARMEB__

		*buf16 = __le16_to_cpu(readw(ptr));

#else

		*buf16 = readw((void __iomem *)ptr);

#endif

		goto out;

		break;

	case 4:	/* 4 bytes */

#ifdef __ARMEB__

		*(buf) = __le32_to_cpu(readl(ptr));

#else

		*(buf) = readl((void __iomem *)ptr);

#endif

		goto out;

		break;

	}

	while (i < size_bytes) {

		if (size_bytes - i == 2) {

			/* Handle 2 bytes in the end */

			buf16 = (u16 *) buf;

#ifdef __ARMEB__

			*(buf16) = __le16_to_cpu(readw(ptr));

#else

			*(buf16) = readw((void __iomem *)ptr);

#endif

			i += 2;

		} else {

			/* Read 4 bytes */

#ifdef __ARMEB__

			*(buf) = __le32_to_cpu(readl(ptr));

#else

			*(buf) = readl((void __iomem *)ptr);

#endif

			i += 4;

		}

		buf++;

		ptr++;

	}

out:

	return;

}

/*

 * TODO:

 * -Optimize

 * -Rewrite cleaner

 */

static u32 write_mem32(void __iomem *mem_addr_start, u32 *buf,

			u32 size_bytes)

{

	u32 i = 0;

#ifdef __ARMEB__

	u32 *ptr = (u32 *) mem_addr_start;

#else

	u32 *ptr = (__force u32 *) mem_addr_start;

#endif

	u16 *buf16;

	if (unlikely(!ptr || !buf))

		return 0;

	/* shortcut for extremely often used cases */

	switch (size_bytes) {

	case 2:	/* 2 bytes */

		buf16 = (u16 *) buf;

#ifdef __ARMEB__

		writew(__le16_to_cpu(*buf16), ptr);

#else

		writew(*buf16, (void __iomem *)ptr);

#endif

		return 2;

		break;

	case 4: /* 4 bytes */

#ifdef __ARMEB__

		writel(__cpu_to_le32(*buf), ptr);

#else

		writel(*buf, (void __iomem *)ptr);

#endif

		return 4;

		break;

	}

	while (i < size_bytes) {

		if (size_bytes - i == 2) {

			/* 2 bytes */

			buf16 = (u16 *) buf;

#ifdef __ARMEB__

			writew(__le16_to_cpu(*buf16), ptr);

#else

			writew(*buf16, (void __iomem *)ptr);

#endif

			i += 2;

		} else {

			/* 4 bytes */

#ifdef __ARMEB__

			writel(__cpu_to_le32(*buf), ptr);

#else

			writel(*buf, (void __iomem *)ptr);

#endif

			i += 4;

		}

		buf++;

		ptr++;

	}

	return i;

}

/* Setup pointers to different channels and also setup buffer sizes. */

static void setup_memory(struct nozomi *dc)

{

	void __iomem *offset = dc->base_addr + dc->config_table.dl_start;

	/* The length reported is including the length field of 4 bytes,

	 * hence subtract with 4.

	 */

	const u16 buff_offset = 4;

	/* Modem port dl configuration */

	dc->port[PORT_MDM].dl_addr[CH_A] = offset;

	dc->port[PORT_MDM].dl_addr[CH_B] =

				(offset += dc->config_table.dl_mdm_len1);

	dc->port[PORT_MDM].dl_size[CH_A] =

				dc->config_table.dl_mdm_len1 - buff_offset;

	dc->port[PORT_MDM].dl_size[CH_B] =

				dc->config_table.dl_mdm_len2 - buff_offset;

	/* Diag port dl configuration */

	dc->port[PORT_DIAG].dl_addr[CH_A] =

				(offset += dc->config_table.dl_mdm_len2);

	dc->port[PORT_DIAG].dl_size[CH_A] =

				dc->config_table.dl_diag_len1 - buff_offset;

	dc->port[PORT_DIAG].dl_addr[CH_B] =

				(offset += dc->config_table.dl_diag_len1);

	dc->port[PORT_DIAG].dl_size[CH_B] =

				dc->config_table.dl_diag_len2 - buff_offset;

	/* App1 port dl configuration */

	dc->port[PORT_APP1].dl_addr[CH_A] =

				(offset += dc->config_table.dl_diag_len2);

	dc->port[PORT_APP1].dl_size[CH_A] =

				dc->config_table.dl_app1_len - buff_offset;

	/* App2 port dl configuration */

	dc->port[PORT_APP2].dl_addr[CH_A] =

				(offset += dc->config_table.dl_app1_len);

	dc->port[PORT_APP2].dl_size[CH_A] =

				dc->config_table.dl_app2_len - buff_offset;

	/* Ctrl dl configuration */

	dc->port[PORT_CTRL].dl_addr[CH_A] =

				(offset += dc->config_table.dl_app2_len);

	dc->port[PORT_CTRL].dl_size[CH_A] =

				dc->config_table.dl_ctrl_len - buff_offset;

	offset = dc->base_addr + dc->config_table.ul_start;

	/* Modem Port ul configuration */

	dc->port[PORT_MDM].ul_addr[CH_A] = offset;

	dc->port[PORT_MDM].ul_size[CH_A] =

				dc->config_table.ul_mdm_len1 - buff_offset;

	dc->port[PORT_MDM].ul_addr[CH_B] =

				(offset += dc->config_table.ul_mdm_len1);

	dc->port[PORT_MDM].ul_size[CH_B] =

				dc->config_table.ul_mdm_len2 - buff_offset;

	/* Diag port ul configuration */

	dc->port[PORT_DIAG].ul_addr[CH_A] =

				(offset += dc->config_table.ul_mdm_len2);

	dc->port[PORT_DIAG].ul_size[CH_A] =

				dc->config_table.ul_diag_len - buff_offset;

	/* App1 port ul configuration */

	dc->port[PORT_APP1].ul_addr[CH_A] =

				(offset += dc->config_table.ul_diag_len);

	dc->port[PORT_APP1].ul_size[CH_A] =

				dc->config_table.ul_app1_len - buff_offset;

	/* App2 port ul configuration */

	dc->port[PORT_APP2].ul_addr[CH_A] =

				(offset += dc->config_table.ul_app1_len);

	dc->port[PORT_APP2].ul_size[CH_A] =

				dc->config_table.ul_app2_len - buff_offset;

	/* Ctrl ul configuration */

	dc->port[PORT_CTRL].ul_addr[CH_A] =

				(offset += dc->config_table.ul_app2_len);

	dc->port[PORT_CTRL].ul_size[CH_A] =

				dc->config_table.ul_ctrl_len - buff_offset;

}

/* Dump config table under initalization phase */

#ifdef DEBUG

static void dump_table(const struct nozomi *dc)

{

	DBG3("signature: 0x%08X", dc->config_table.signature);

	DBG3("version: 0x%04X", dc->config_table.version);

	DBG3("product_information: 0x%04X", \

				dc->config_table.product_information);

	DBG3("toggle enabled: %d", dc->config_table.toggle.enabled);

	DBG3("toggle up_mdm: %d", dc->config_table.toggle.mdm_ul);

	DBG3("toggle dl_mdm: %d", dc->config_table.toggle.mdm_dl);

	DBG3("toggle dl_dbg: %d", dc->config_table.toggle.diag_dl);

	DBG3("dl_start: 0x%04X", dc->config_table.dl_start);

	DBG3("dl_mdm_len0: 0x%04X, %d", dc->config_table.dl_mdm_len1,

	   dc->config_table.dl_mdm_len1);

	DBG3("dl_mdm_len1: 0x%04X, %d", dc->config_table.dl_mdm_len2,

	   dc->config_table.dl_mdm_len2);

	DBG3("dl_diag_len0: 0x%04X, %d", dc->config_table.dl_diag_len1,

	   dc->config_table.dl_diag_len1);

	DBG3("dl_diag_len1: 0x%04X, %d", dc->config_table.dl_diag_len2,

	   dc->config_table.dl_diag_len2);

	DBG3("dl_app1_len: 0x%04X, %d", dc->config_table.dl_app1_len,

	   dc->config_table.dl_app1_len);

	DBG3("dl_app2_len: 0x%04X, %d", dc->config_table.dl_app2_len,

	   dc->config_table.dl_app2_len);

	DBG3("dl_ctrl_len: 0x%04X, %d", dc->config_table.dl_ctrl_len,

	   dc->config_table.dl_ctrl_len);

	DBG3("ul_start: 0x%04X, %d", dc->config_table.ul_start,

	   dc->config_table.ul_start);

	DBG3("ul_mdm_len[0]: 0x%04X, %d", dc->config_table.ul_mdm_len1,

	   dc->config_table.ul_mdm_len1);

	DBG3("ul_mdm_len[1]: 0x%04X, %d", dc->config_table.ul_mdm_len2,

	   dc->config_table.ul_mdm_len2);

	DBG3("ul_diag_len: 0x%04X, %d", dc->config_table.ul_diag_len,

	   dc->config_table.ul_diag_len);

	DBG3("ul_app1_len: 0x%04X, %d", dc->config_table.ul_app1_len,

	   dc->config_table.ul_app1_len);

	DBG3("ul_app2_len: 0x%04X, %d", dc->config_table.ul_app2_len,

	   dc->config_table.ul_app2_len);

	DBG3("ul_ctrl_len: 0x%04X, %d", dc->config_table.ul_ctrl_len,

	   dc->config_table.ul_ctrl_len);

}

#else

static __inline__ void dump_table(const struct nozomi *dc) { }

#endif

/*

 * Read configuration table from card under intalization phase

 * Returns 1 if ok, else 0

 */

static int nozomi_read_config_table(struct nozomi *dc)

{

	read_mem32((u32 *) &dc->config_table, dc->base_addr + 0,

						sizeof(struct config_table));

	if (dc->config_table.signature != CONFIG_MAGIC) {

		dev_err(&dc->pdev->dev, "ConfigTable Bad! 0x%08X != 0x%08X\n",

			dc->config_table.signature, CONFIG_MAGIC);

		return 0;

	}

	if ((dc->config_table.version == 0)

	    || (dc->config_table.toggle.enabled == TOGGLE_VALID)) {

		int i;

		DBG1("Second phase, configuring card");

		setup_memory(dc);

		dc->port[PORT_MDM].toggle_ul = dc->config_table.toggle.mdm_ul;

		dc->port[PORT_MDM].toggle_dl = dc->config_table.toggle.mdm_dl;

		dc->port[PORT_DIAG].toggle_dl = dc->config_table.toggle.diag_dl;

		DBG1("toggle ports: MDM UL:%d MDM DL:%d, DIAG DL:%d",

		   dc->port[PORT_MDM].toggle_ul,

		   dc->port[PORT_MDM].toggle_dl, dc->port[PORT_DIAG].toggle_dl);

		dump_table(dc);

		for (i = PORT_MDM; i < MAX_PORT; i++) {

			dc->port[i].fifo_ul =

			    kfifo_alloc(FIFO_BUFFER_SIZE_UL, GFP_ATOMIC, NULL);

			memset(&dc->port[i].ctrl_dl, 0, sizeof(struct ctrl_dl));

			memset(&dc->port[i].ctrl_ul, 0, sizeof(struct ctrl_ul));

		}

		/* Enable control channel */

		dc->last_ier = (dc->last_ier & ~CTRL_DL) | CTRL_DL;

		writew(dc->last_ier, dc->reg_ier);

		dev_info(&dc->pdev->dev, "Initialization OK!\n");

		return 1;

	}

	if ((dc->config_table.version > 0)

	    && (dc->config_table.toggle.enabled != TOGGLE_VALID)) {

		u32 offset = 0;

		DBG1("First phase: pushing upload buffers, clearing download");

		dev_info(&dc->pdev->dev, "Version of card: %d\n",

			 dc->config_table.version);

		/* Here we should disable all I/O over F32. */

		setup_memory(dc);

		/*

		 * We should send ALL channel pair tokens back along

		 * with reset token

		 */

		/* push upload modem buffers */

		write_mem32(dc->port[PORT_MDM].ul_addr[CH_A],

			(u32 *) &offset, 4);

		write_mem32(dc->port[PORT_MDM].ul_addr[CH_B],

			(u32 *) &offset, 4);

		writew(MDM_UL | DIAG_DL | MDM_DL, dc->reg_fcr);

		DBG1("First phase done");

	}

	return 1;

}

/* Enable uplink interrupts  */

static void enable_transmit_ul(enum port_type port, struct nozomi *dc)

{

	switch (port) {

	case PORT_MDM:

		dc->last_ier = (dc->last_ier & ~MDM_UL) | MDM_UL;

		break;

	case PORT_DIAG:

		dc->last_ier = (dc->last_ier & ~DIAG_UL) | DIAG_UL;

		break;

	case PORT_APP1:

		dc->last_ier = (dc->last_ier & ~APP1_UL) | APP1_UL;

		break;

	case PORT_APP2:

		dc->last_ier = (dc->last_ier & ~APP2_UL) | APP2_UL;

		break;

	case PORT_CTRL:

		dc->last_ier = (dc->last_ier & ~CTRL_UL) | CTRL_UL;

		break;

	default:

		dev_err(&dc->pdev->dev, "Called with wrong port?\n");

		return;

		break;

	};

	writew(dc->last_ier, dc->reg_ier);

}

/* Disable uplink interrupts  */

static void disable_transmit_ul(enum port_type port, struct nozomi *dc)

{

	switch (port) {

	case PORT_MDM:

		dc->last_ier &= ~MDM_UL;

		break;

	case PORT_DIAG:

		dc->last_ier &= ~DIAG_UL;

		break;

	case PORT_APP1:

		dc->last_ier &= ~APP1_UL;

		break;

	case PORT_APP2:

		dc->last_ier &= ~APP2_UL;

		break;

	case PORT_CTRL:

		dc->last_ier &= ~CTRL_UL;

		break;

	default:

		dev_err(&dc->pdev->dev, "Called with wrong port?\n");

		return;

		break;

	};

	writew(dc->last_ier, dc->reg_ier);

}

/* Enable downlink interrupts */

static void enable_transmit_dl(enum port_type port, struct nozomi *dc)

{

	switch (port) {

	case PORT_MDM:

		dc->last_ier = (dc->last_ier & ~MDM_DL) | MDM_DL;

		break;

	case PORT_DIAG:

		dc->last_ier = (dc->last_ier & ~DIAG_DL) | DIAG_DL;

		break;

	case PORT_APP1:

		dc->last_ier = (dc->last_ier & ~APP1_DL) | APP1_DL;

		break;

	case PORT_APP2:

		dc->last_ier = (dc->last_ier & ~APP2_DL) | APP2_DL;

		break;

	case PORT_CTRL:

		dc->last_ier = (dc->last_ier & ~CTRL_DL) | CTRL_DL;

		break;

	default:

		dev_err(&dc->pdev->dev, "Called with wrong port?\n");

		return;

		break;

	};

	writew(dc->last_ier, dc->reg_ier);

}

/* Disable downlink interrupts */

static void disable_transmit_dl(enum port_type port, struct nozomi *dc)

{

	switch (port) {

	case PORT_MDM:

		dc->last_ier &= ~MDM_DL;

		break;

	case PORT_DIAG:

		dc->last_ier &= ~DIAG_DL;

		break;

	case PORT_APP1:

		dc->last_ier &= ~APP1_DL;

		break;

	case PORT_APP2:

		dc->last_ier &= ~APP2_DL;

		break;

	case PORT_CTRL:

		dc->last_ier &= ~CTRL_DL;

		break;

	default:

		dev_err(&dc->pdev->dev, "Called with wrong port?\n");

		return;

		break;

	};

	writew(dc->last_ier, dc->reg_ier);

}

/*

 * Return 1 - send buffer to card and ack.

 * Return 0 - don't ack, don't send buffer to card.

 */

static int send_data(enum port_type index, struct nozomi *dc)

{

	u32 size = 0;

	struct port *port = &dc->port[index];

	u8 toggle = port->toggle_ul;

	void __iomem *addr = port->ul_addr[toggle];

	u32 ul_size = port->ul_size[toggle];

	struct tty_struct *tty = port->tty;

	/* Get data from tty and place in buf for now */

	size = __kfifo_get(port->fifo_ul, dc->send_buf,

			   ul_size < SEND_BUF_MAX ? ul_size : SEND_BUF_MAX);

	if (size == 0) {

		DBG4("No more data to send, disable link:");

		return 0;

	}

	port->tx_data += size;

	/* DUMP(buf, size); */

	/* Write length + data */

	write_mem32(addr, (u32 *) &size, 4);

	write_mem32(addr + 4, (u32 *) dc->send_buf, size);

	if (tty)

		tty_wakeup(tty);

	return 1;

}

/* If all data has been read, return 1, else 0 */

static int receive_data(enum port_type index, struct nozomi *dc)

{

	u8 buf[RECEIVE_BUF_MAX] = { 0 };

	int size;

	u32 offset = 4;

	struct port *port = &dc->port[index];

	void __iomem *addr = port->dl_addr[port->toggle_dl];

	struct tty_struct *tty = port->tty;

	int i;

	if (unlikely(!tty)) {

		DBG1("tty not open for port: %d?", index);

		return 1;

	}

	read_mem32((u32 *) &size, addr, 4);

	/*  DBG1( "%d bytes port: %d", size, index); */

	if (test_bit(TTY_THROTTLED, &tty->flags)) {

		DBG1("No room in tty, don't read data, don't ack interrupt, "

			"disable interrupt");

		/* disable interrupt in downlink... */

		disable_transmit_dl(index, dc);

		return 0;

	}

	if (unlikely(size == 0)) {

		dev_err(&dc->pdev->dev, "size == 0?\n");

		return 1;

	}

	port->rx_data += size;

	tty_buffer_request_room(tty, size);

	while (size > 0) {

		read_mem32((u32 *) buf, addr + offset, RECEIVE_BUF_MAX);

		if (size == 1) {

			tty_insert_flip_char(tty, buf[0], TTY_NORMAL);

			size = 0;

		} else if (size < RECEIVE_BUF_MAX) {

			size -= tty_insert_flip_string(tty, (char *) buf, size);

		} else {

			i = tty_insert_flip_string(tty, \

						(char *) buf, RECEIVE_BUF_MAX);

			size -= i;

			offset += i;

		}

	}

	tty_flip_buffer_push(tty);

	return 1;

}

/* Debug for interrupts */

#ifdef DEBUG

static char *interrupt2str(u16 interrupt)

{

	static char buf[TMP_BUF_MAX];

	char *p = buf;

	interrupt & MDM_DL1 ? p += snprintf(p, TMP_BUF_MAX, "MDM_DL1 ") : NULL;

	interrupt & MDM_DL2 ? p += snprintf(p, TMP_BUF_MAX, "MDM_DL2 ") : NULL;

	interrupt & MDM_UL1 ? p += snprintf(p, TMP_BUF_MAX, "MDM_UL1 ") : NULL;

	interrupt & MDM_UL2 ? p += snprintf(p, TMP_BUF_MAX, "MDM_UL2 ") : NULL;

	interrupt & DIAG_DL1 ? p += snprintf(p, \

					TMP_BUF_MAX, "DIAG_DL1 ") : NULL;

	interrupt & DIAG_DL2 ? p += snprintf(p, \

					TMP_BUF_MAX, "DIAG_DL2 ") : NULL;

	interrupt & DIAG_UL ? p += snprintf(p, TMP_BUF_MAX, "DIAG_UL ") : NULL;

	interrupt & APP1_DL ? p += snprintf(p, TMP_BUF_MAX, "APP1_DL ") : NULL;

	interrupt & APP2_DL ? p += snprintf(p, TMP_BUF_MAX, "APP2_DL ") : NULL;

	interrupt & APP1_UL ? p += snprintf(p, TMP_BUF_MAX, "APP1_UL ") : NULL;

	interrupt & APP2_UL ? p += snprintf(p, TMP_BUF_MAX, "APP2_UL ") : NULL;

	interrupt & CTRL_DL ? p += snprintf(p, TMP_BUF_MAX, "CTRL_DL ") : NULL;

	interrupt & CTRL_UL ? p += snprintf(p, TMP_BUF_MAX, "CTRL_UL ") : NULL;

	interrupt & RESET ? p += snprintf(p, TMP_BUF_MAX, "RESET ") : NULL;

	return buf;

}

#endif

/*

 * Receive flow control

 * Return 1 - If ok, else 0

 */

static int receive_flow_control(struct nozomi *dc, struct irq *m)

{

	enum port_type port = PORT_MDM;

	struct ctrl_dl ctrl_dl;

	struct ctrl_dl old_ctrl;

	u16 enable_ier = 0;

	read_mem32((u32 *) &ctrl_dl, dc->port[PORT_CTRL].dl_addr[CH_A], 2);

	switch (ctrl_dl.port) {

	case CTRL_CMD:

		DBG1("The Base Band sends this value as a response to a "

			"request for IMSI detach sent over the control "

			"channel uplink (see section 7.6.1).");

		break;

	case CTRL_MDM:

		port = PORT_MDM;

		enable_ier = MDM_DL;

		break;

	case CTRL_DIAG:

		port = PORT_DIAG;

		enable_ier = DIAG_DL;

		break;

	case CTRL_APP1:

		port = PORT_APP1;

		enable_ier = APP1_DL;

		break;

	case CTRL_APP2:

		port = PORT_APP2;

		enable_ier = APP2_DL;

		break;

	default:

		dev_err(&dc->pdev->dev,

			"ERROR: flow control received for non-existing port\n");

		return 0;

	};

	DBG1("0x%04X->0x%04X", *((u16 *) & dc->port[port].ctrl_dl),

	   *((u16 *) & ctrl_dl));

	old_ctrl = dc->port[port].ctrl_dl;

	dc->port[port].ctrl_dl = ctrl_dl;

	if (old_ctrl.CTS == 1 && ctrl_dl.CTS == 0) {

		DBG1("Disable interrupt (0x%04X) on port: %d",

			enable_ier, port);

		disable_transmit_ul(port, dc);

	} else if (old_ctrl.CTS == 0 && ctrl_dl.CTS == 1) {

		if (__kfifo_len(dc->port[port].fifo_ul)) {

			DBG1("Enable interrupt (0x%04X) on port: %d",

				enable_ier, port);

			DBG1("Data in buffer [%d], enable transmit! ",

				__kfifo_len(dc->port[port].fifo_ul));

			enable_transmit_ul(port, dc);

		} else {

			DBG1("No data in buffer...");

		}

	}

	if (*(u16 *) & old_ctrl == *(u16 *) & ctrl_dl) {

		DBG1(" No change in mctrl");

		return 1;

	}

	/* Update statistics */

	if (old_ctrl.CTS != ctrl_dl.CTS)

		dc->port[port].tty_icount.cts++;

	if (old_ctrl.DSR != ctrl_dl.DSR)

		dc->port[port].tty_icount.dsr++;

	if (old_ctrl.RI != ctrl_dl.RI)

		dc->port[port].tty_icount.rng++;

	if (old_ctrl.DCD != ctrl_dl.DCD)

		dc->port[port].tty_icount.dcd++;

	DBG1("port: %d DCD(%d), CTS(%d), RI(%d), DSR(%d)",

	   port,

	   dc->port[port].tty_icount.dcd, dc->port[port].tty_icount.cts,

	   dc->port[port].tty_icount.rng, dc->port[port].tty_icount.dsr);

	return 1;

}

static enum ctrl_port_type port2ctrl(enum port_type port,

					const struct nozomi *dc)

{

	switch (port) {

	case PORT_MDM:

		return CTRL_MDM;

	case PORT_DIAG:

		return CTRL_DIAG;

	case PORT_APP1:

		return CTRL_APP1;

	case PORT_APP2:

		return CTRL_APP2;

	default:

		dev_err(&dc->pdev->dev,

			"ERROR: send flow control " \

			"received for non-existing port\n");

	};

	return CTRL_ERROR;

}

/*

 * Send flow control, can only update one channel at a time

 * Return 0 - If we have updated all flow control

 * Return 1 - If we need to update more flow control, ack current enable more

 */

static int send_flow_control(struct nozomi *dc)

{

	u32 i, more_flow_control_to_be_updated = 0;

	u16 *ctrl;

	for (i = PORT_MDM; i < MAX_PORT; i++) {

		if (dc->port[i].update_flow_control) {

			if (more_flow_control_to_be_updated) {

				/* We have more flow control to be updated */

				return 1;

			}

			dc->port[i].ctrl_ul.port = port2ctrl(i, dc);

			ctrl = (u16 *) & dc->port[i].ctrl_ul;

			write_mem32(dc->port[PORT_CTRL].ul_addr[0], \

				(u32 *) ctrl, 2);

			dc->port[i].update_flow_control = 0;

			more_flow_control_to_be_updated = 1;

		}

	}

	return 0;

}

/*

 * Handle donlink data, ports that are handled are modem and diagnostics

 * Return 1 - ok

 * Return 0 - toggle fields are out of sync

 */

static int handle_data_dl(struct nozomi *dc, struct irq *m, enum port_type port,

			  u8 *toggle, u16 mask1, u16 mask2)

{

	if (*toggle == 0 && m->read_iir & mask1) {

		if (receive_data(port, dc)) {

			writew(mask1, dc->reg_fcr);

			*toggle = !(*toggle);

		}

		if (m->read_iir & mask2) {

			if (receive_data(port, dc)) {

				writew(mask2, dc->reg_fcr);

				*toggle = !(*toggle);

			}

		}

	} else if (*toggle == 1 && m->read_iir & mask2) {

		if (receive_data(port, dc)) {

			writew(mask2, dc->reg_fcr);

			*toggle = !(*toggle);

		}

		if (m->read_iir & mask1) {

			if (receive_data(port, dc)) {

				writew(mask1, dc->reg_fcr);

				*toggle = !(*toggle);

			}

		}

	} else {

		dev_err(&dc->pdev->dev, "port out of sync!, toggle:%d\n",

			*toggle);

		return 0;

	}

	return 1;

}

/*

 * Handle uplink data, this is currently for the modem port

 * Return 1 - ok

 * Return 0 - toggle field are out of sync

 */

static int handle_data_ul(struct nozomi *dc, struct irq *m, enum port_type port)

{

	u8 *toggle = &(dc->port[port].toggle_ul);

	if (*toggle == 0 && m->read_iir & MDM_UL1) {

		dc->last_ier &= ~MDM_UL;

		writew(dc->last_ier, dc->reg_ier);

		if (send_data(port, dc)) {

			writew(MDM_UL1, dc->reg_fcr);

			dc->last_ier = (dc->last_ier & ~MDM_UL) | MDM_UL;

			writew(dc->last_ier, dc->reg_ier);

			*toggle = !*toggle;

		}

		if (m->read_iir & MDM_UL2) {

			dc->last_ier &= ~MDM_UL;

			writew(dc->last_ier, dc->reg_ier);

			if (send_data(port, dc)) {

				writew(MDM_UL2, dc->reg_fcr);

				dc->last_ier = \

					(dc->last_ier & ~MDM_UL) | MDM_UL;

				writew(dc->last_ier, dc->reg_ier);

				*toggle = !*toggle;

			}

		}

	} else if (*toggle == 1 && m->read_iir & MDM_UL2) {

		dc->last_ier &= ~MDM_UL;

		writew(dc->last_ier, dc->reg_ier);

		if (send_data(port, dc)) {

			writew(MDM_UL2, dc->reg_fcr);

			dc->last_ier = (dc->last_ier & ~MDM_UL) | MDM_UL;

			writew(dc->last_ier, dc->reg_ier);

			*toggle = !*toggle;

		}

		if (m->read_iir & MDM_UL1) {

			dc->last_ier &= ~MDM_UL;

			writew(dc->last_ier, dc->reg_ier);

			if (send_data(port, dc)) {

				writew(MDM_UL1, dc->reg_fcr);

				dc->last_ier = \

					(dc->last_ier & ~MDM_UL) | MDM_UL;

				writew(dc->last_ier, dc->reg_ier);

				*toggle = !*toggle;

			}

		}

	} else {

		writew(m->read_iir & MDM_UL, dc->reg_fcr);

		dev_err(&dc->pdev->dev, "port out of sync!\n");

		return 0;

	}

	return 1;

}

static irqreturn_t interrupt_handler(int irq, void *dev_id)

{

	struct nozomi_devices *ndev = dev_id;

	struct nozomi *dc;

	struct irq *m;

	if (!ndev)

		return IRQ_NONE;

	dc = ndev->my_dev;

	m = &ndev->my_irq;

	spin_lock(&dc->spin_mutex);

	m->read_iir = readw(dc->reg_iir);

	/* Card removed */

	if (m->read_iir == (u16)-1)

		goto none;

	/*

	 * Just handle interrupt enabled in IER

	 * (by masking with dc->last_ier)

	 */

	m->read_iir &= dc->last_ier;

	if (m->read_iir == 0)

		goto none;

	DBG4("%s irq:0x%04X, prev:0x%04X", interrupt2str(m->read_iir),

	   m->read_iir, dc->last_ier);

	if (m->read_iir & RESET) {

		if (unlikely(!nozomi_read_config_table(dc))) {

			dc->last_ier = 0x0;

			writew(dc->last_ier, dc->reg_ier);

			dev_err(&dc->pdev->dev, "Could not read status from "

				"card, we should disable interface\n");

		} else {

			writew(RESET, dc->reg_fcr);

		}

		/* No more useful info if this was the reset interrupt. */

		goto exit_handler;

	}

	if (m->read_iir & CTRL_UL) {

		DBG1("CTRL_UL");

		dc->last_ier &= ~CTRL_UL;

		writew(dc->last_ier, dc->reg_ier);

		if (send_flow_control(dc)) {

			writew(CTRL_UL, dc->reg_fcr);

			dc->last_ier = (dc->last_ier & ~CTRL_UL) | CTRL_UL;

			writew(dc->last_ier, dc->reg_ier);

		}

	}

	if (m->read_iir & CTRL_DL) {

		receive_flow_control(dc, m);

		writew(CTRL_DL, dc->reg_fcr);

	}

	if (m->read_iir & MDM_DL) {

		if (!handle_data_dl(dc, m, PORT_MDM,

				&(dc->port[PORT_MDM].toggle_dl), MDM_DL1,

				MDM_DL2)) {

			dev_err(&dc->pdev->dev, "MDM_DL out of sync!\n");

			goto exit_handler;

		}

	}

	if (m->read_iir & MDM_UL) {

		if (!handle_data_ul(dc, m, PORT_MDM)) {

			dev_err(&dc->pdev->dev, "MDM_UL out of sync!\n");

			goto exit_handler;

		}

	}

	if (m->read_iir & DIAG_DL) {

		if (!handle_data_dl(dc, m, PORT_DIAG,

				&(dc->port[PORT_DIAG].toggle_dl), DIAG_DL1,

				DIAG_DL2)) {

			dev_err(&dc->pdev->dev, "DIAG_DL out of sync!\n");

			goto exit_handler;

		}

	}

	if (m->read_iir & DIAG_UL) {

		dc->last_ier &= ~DIAG_UL;

		writew(dc->last_ier, dc->reg_ier);

		if (send_data(PORT_DIAG, dc)) {

			writew(DIAG_UL, dc->reg_fcr);

			dc->last_ier = (dc->last_ier & ~DIAG_UL) | DIAG_UL;

			writew(dc->last_ier, dc->reg_ier);

		}

	}

	if (m->read_iir & APP1_DL) {

		if (receive_data(PORT_APP1, dc))

			writew(APP1_DL, dc->reg_fcr);

	}

	if (m->read_iir & APP1_UL) {

		dc->last_ier &= ~APP1_UL;

		writew(dc->last_ier, dc->reg_ier);

		if (send_data(PORT_APP1, dc)) {

			writew(APP1_UL, dc->reg_fcr);

			dc->last_ier = (dc->last_ier & ~APP1_UL) | APP1_UL;

			writew(dc->last_ier, dc->reg_ier);

		}

	}

	if (m->read_iir & APP2_DL) {

		if (receive_data(PORT_APP2, dc))

			writew(APP2_DL, dc->reg_fcr);

	}

	if (m->read_iir & APP2_UL) {

		dc->last_ier &= ~APP2_UL;

		writew(dc->last_ier, dc->reg_ier);

		if (send_data(PORT_APP2, dc)) {

			writew(APP2_UL, dc->reg_fcr);

			dc->last_ier = (dc->last_ier & ~APP2_UL) | APP2_UL;

			writew(dc->last_ier, dc->reg_ier);

		}

	}

exit_handler:

	spin_unlock(&dc->spin_mutex);

	return IRQ_HANDLED;

none:

	spin_unlock(&dc->spin_mutex);

	return IRQ_NONE;

}

/* Request a shared IRQ from system */

static int nozomi_setup_interrupt(struct nozomi_devices *ndev)

{

	int rval;

	rval = request_irq(ndev->my_dev->pdev->irq, &interrupt_handler,

				IRQF_SHARED, NOZOMI_NAME, ndev);

	if (unlikely(rval))

		dev_err(&ndev->my_dev->pdev->dev, "Cannot open because IRQ %d "

			"is already in use.\n", ndev->my_dev->pdev->irq);

	return rval;

}

static void nozomi_get_card_type(struct nozomi *dc)

{

	int i;

	u32 size = 0;

	for (i = 0; i < 6; i++)

		size += pci_resource_len(dc->pdev, i);

	/* Assume card type F32_8 if no match */

	dc->card_type = size == 2048 ? F32_2 : F32_8;

	dev_info(&dc->pdev->dev, "Card type is: %d\n", dc->card_type);

}

static void nozomi_setup_private_data(struct nozomi *dc)

{

	void __iomem *offset = dc->base_addr + dc->card_type / 2;

	int i;

	dc->reg_fcr = (void __iomem *)(offset + R_FCR);

	dc->reg_iir = (void __iomem *)(offset + R_IIR);

	dc->reg_ier = (void __iomem *)(offset + R_IER);

	dc->last_ier = 0;

	dc->closing = 0;

	dc->port[PORT_MDM].token_dl = MDM_DL;

	dc->port[PORT_DIAG].token_dl = DIAG_DL;

	dc->port[PORT_APP1].token_dl = APP1_DL;

	dc->port[PORT_APP2].token_dl = APP2_DL;

	for (i = PORT_MDM; i < MAX_PORT; ++i) {

		dc->port[i].rx_data = 0;

		dc->port[i].tx_data = 0;

		dc->port[i].tty_dont_flip = 0;

	}

}

static void tty_flip_queue_function(struct work_struct *work)

{

	struct nozomi *dc = container_of(work, struct nozomi,

						tty_flip_wq_struct);

	int i;

	unsigned long flags;

	/* Enable interrupt for that port */

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

		if (dc->port[i].tty_dont_flip) {

			DBG6("Enable for port: %d", i);

			dc->port[i].tty_dont_flip = 0;

			spin_lock_irqsave(&dc->spin_mutex, flags);

			enable_transmit_dl(dc->port[i].tty_index, dc);

			spin_unlock_irqrestore(&dc->spin_mutex, flags);

		}

	}

}

static ssize_t card_type_show(struct device *dev, struct device_attribute *attr,

			  char *buf)

{

	struct pci_dev *pdev = to_pci_dev(dev);

	struct nozomi_devices *deventry = pci_get_drvdata(pdev);

	return sprintf(buf, "%d\n", deventry->my_dev->card_type);

}

static DEVICE_ATTR(card_type, 0444, card_type_show, NULL);

static ssize_t open_ttys_show(struct device *dev, struct device_attribute *attr,

			  char *buf)

{

	struct pci_dev *pdev = to_pci_dev(dev);

	struct nozomi_devices *deventry = pci_get_drvdata(pdev);

	return sprintf(buf, "%u\n", deventry->my_dev->open_ttys);

}

static DEVICE_ATTR(open_ttys, 0444, open_ttys_show, NULL);

static void make_sysfs_files(struct nozomi *dc)

{

	if (device_create_file(&dc->pdev->dev, &dev_attr_card_type))

		dev_err(&dc->pdev->dev,

			"Could not create sysfs file for card_type\n");

	if (device_create_file(&dc->pdev->dev, &dev_attr_open_ttys))

		dev_err(&dc->pdev->dev,

			"Could not create sysfs file for open_ttys\n");

}

static void remove_sysfs_files(struct nozomi *dc)

{

	device_remove_file(&dc->pdev->dev, &dev_attr_card_type);

	device_remove_file(&dc->pdev->dev, &dev_attr_open_ttys);

}

/* Allocate memory for one device */

static int __devinit nozomi_card_init(struct pci_dev *pdev,

				      const struct pci_device_id *ent)

{

	resource_size_t start;

	int ret = -EIO;

	struct nozomi *dc = NULL;

	struct nozomi_devices *newdev = NULL;

	int i;

	atomic_inc(&cards_found);

	dev_dbg(&pdev->dev, "Init, cards_found: %d\n",

		atomic_read(&cards_found));

	dc = kzalloc(sizeof(struct nozomi), GFP_KERNEL);

	if (unlikely(!dc)) {

		dev_err(&pdev->dev, "Could not allocate memory\n");

		return -ENOMEM;

	}

	newdev = kzalloc(sizeof(struct nozomi_devices), GFP_KERNEL);

	if (unlikely(!newdev)) {

		dev_err(&pdev->dev, "Could not allocate memory\n");

		kfree(dc);

		return -ENOMEM;

	}

	dc->pdev = pdev;

	pci_set_drvdata(pdev, dc);

	newdev->my_dev = dc;

	/* Find out what card type it is */

	nozomi_get_card_type(dc);

	if (pci_enable_device(dc->pdev)) {

		dev_err(&pdev->dev, "Not possible to enable PCI Device\n");

		kfree(dc);

		kfree(newdev);

		return -ENODEV;

	}

	start = pci_resource_start(dc->pdev, 0);

	if (start == 0x0000) {

		dev_err(&pdev->dev, "No I/O-Address for card detected\n");

		ret = -ENODEV;

		goto err_disable_device;

	}

	dc->base_addr = ioremap(start, dc->card_type);

	if (!dc->base_addr) {

		dev_err(&pdev->dev, "No I/O-Address for card detected\n");

		ret = -ENODEV;

		goto err_disable_device;

	}

	dc->open_ttys = 0;

	nozomi_setup_private_data(dc);

	if (pci_request_regions(dc->pdev, NOZOMI_NAME)) {

		dev_err(&pdev->dev, "I/O address 0x%04x already in use\n",

			(int) /* nozomi_private.io_addr */ 0);

		ret = -EIO;

		goto err_disable_regions;

	}

	dc->send_buf = kmalloc(SEND_BUF_MAX, GFP_KERNEL);

	if (!dc->send_buf) {

		dev_err(&pdev->dev, "Could not allocate send buffer?\n");

		goto err_disable_regions;

	}

	/* Disable all interrupts */

	dc->last_ier = 0;

	writew(dc->last_ier, dc->reg_ier);

	/* Setup interrupt handler */

	if (nozomi_setup_interrupt(newdev)) {

		ret = -EIO;

		goto err_disable_regions;

	}

	DBG1("base_addr: %p", dc->base_addr);

	dc->tty_flip_wq = create_singlethread_workqueue(NOZOMI_NAME);

	if (!dc->tty_flip_wq) {

		dev_err(&dc->pdev->dev, "Could not create workqueue?\n");

		return -ENOMEM;

	}

	INIT_WORK(&dc->tty_flip_wq_struct, tty_flip_queue_function);

	spin_lock_init(&dc->spin_mutex);

	make_sysfs_files(dc);

	if (atomic_read(&cards_found) == 1) {

		ntty_tty_init(dc);

		newdev->index_start = 0;

	} else {

		dc->tty_driver->num += NTTY_TTY_MINORS;

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

			init_MUTEX(&dc->port[i].tty_sem);

			dc->port[i].tty_open_count = 0;

			dc->port[i].tty = NULL;

			tty_register_device(dc->tty_driver,

				i + (atomic_read(&cards_found)

							* NTTY_TTY_MINORS),

				&dc->pdev->dev);

		}

		newdev->index_start =

				atomic_read(&cards_found) * NTTY_TTY_MINORS;

	}

	/* Enable  RESET interrupt. */

	dc->last_ier = RESET;

	writew(dc->last_ier, dc->reg_ier);

	INIT_LIST_HEAD(&newdev->list);

	list_add_tail(&newdev->list, &my_devices);

	pci_set_drvdata(pdev, newdev);

	return 0;

err_disable_regions:

	pci_release_regions(pdev);

	iounmap(dc->base_addr);

	dc->base_addr = NULL;

err_disable_device:

	pci_disable_device(pdev);

	kfree(dc);

	kfree(newdev);

	return ret;

}

static void tty_do_close(struct nozomi *dc, struct port *port)

{

	unsigned long flags;

	if (!dc || !port)

		return;

	if (down_interruptible(&port->tty_sem))

		return;

	if (!port->tty_open_count)

		goto exit;

	dc->open_ttys--;

	port->tty_open_count--;

	if (port->tty_open_count == 0) {

		DBG1("close: %d", port->token_dl);

		spin_lock_irqsave(&dc->spin_mutex, flags);

		dc->last_ier &= ~(port->token_dl);

		writew(dc->last_ier, dc->reg_ier);

		spin_unlock_irqrestore(&dc->spin_mutex, flags);

	}

exit:

	up(&port->tty_sem);

}

static void __devexit tty_exit(struct nozomi_devices *ndev)

{

	struct nozomi *dc = ndev->my_dev;

	int i, ret;

	DBG1(" ");

	flush_scheduled_work();

	for (i = ndev->index_start; i < ndev->index_start + NTTY_TTY_MINORS; \

									++i)

		if (dc->port[i].tty && \

				list_empty(&dc->port[i].tty->hangup_work.entry))

			tty_hangup(dc->port[i].tty);

	while (dc->open_ttys)

		msleep_interruptible(1);

	for (i = ndev->index_start; i < ndev->index_start + NTTY_TTY_MINORS; \

									++i)

		tty_unregister_device(dc->tty_driver, i);

	ret = tty_unregister_driver(dc->tty_driver);

	if (ret)

		printk(KERN_ERR "Unable to unregister the tty driver !"

							" (%d)\n", ret);

	put_tty_driver(dc->tty_driver);

}

/* Deallocate memory for one device */

static void __devexit nozomi_card_exit(struct pci_dev *pdev)

{

	int i;

	struct ctrl_ul ctrl;

	struct nozomi_devices *deventry = pci_get_drvdata(pdev);

	struct nozomi *dc = deventry->my_dev;

	/* Disable all interrupts */

	dc->last_ier = 0;

	writew(dc->last_ier, dc->reg_ier);

	tty_exit(deventry);

	/* Send 0x0001, command card to resend the reset token.  */

	/* This is to get the reset when the module is reloaded. */

	ctrl.port = 0x00;

	ctrl.reserved = 0;

	ctrl.RTS = 0;

	ctrl.DTR = 1;

	DBG1("sending flow control 0x%04X", *((u16 *) & ctrl));

	/* Setup dc->reg addresses to we can use defines here */

	nozomi_setup_private_data(dc);

	write_mem32(dc->port[PORT_CTRL].ul_addr[0], (u32 *) & ctrl, 2);

	writew(CTRL_UL, dc->reg_fcr);	/* push the token to the card. */

	DBG1("pci_release_regions");

	pci_release_regions(pdev);

	if (dc->base_addr)

		iounmap(dc->base_addr);

	DBG1("pci_disable_device");

	pci_disable_device(pdev);

	free_irq(pdev->irq, deventry);

	for (i = PORT_MDM; i < MAX_PORT; i++)

		kfree(dc->port[i].fifo_ul);

	kfree(dc->send_buf);

	remove_sysfs_files(dc);

	destroy_workqueue(dc->tty_flip_wq);

	kfree(dc);

	deventry->my_dev = 0;

	list_del(&deventry->list);

	kfree(deventry);

	atomic_dec(&cards_found);

}

static void set_rts(int index, int rts)

{

	struct nozomi *dc = get_dc_by_index(index);

	dc->port[index].ctrl_ul.RTS = rts;

	dc->port[index].update_flow_control = 1;

	enable_transmit_ul(PORT_CTRL, dc);

}

static void set_dtr(int index, int dtr)

{

	struct nozomi *dc = get_dc_by_index(index);

	DBG1("SETTING DTR index: %d, dtr: %d", index, dtr);

	dc->port[index].ctrl_ul.DTR = dtr;

	dc->port[index].update_flow_control = 1;

	enable_transmit_ul(PORT_CTRL, dc);

}

/*

 * ----------------------------------------------------------------------------

 * TTY code

 * ----------------------------------------------------------------------------

 */

/* Called when the userspace process opens the tty, /dev/noz*.  */

static int ntty_open(struct tty_struct *tty, struct file *file)

{

	struct port *port = get_port_by_tty(tty);

	struct nozomi *dc = get_dc_by_tty(tty);

	unsigned long flags;

	if (down_interruptible(&port->tty_sem))

		return -ERESTARTSYS;

	port->tty_open_count++;

	dc->open_ttys++;

	/* Enable interrupt downlink for channel */

	if (port->tty_open_count == 1) {

		tty->low_latency = 1;

		tty->driver_data = port;

		port->tty = tty;

		port->tty_index = tty->index;

		port->rx_data = 0;

		port->tx_data = 0;

		DBG1("open: %d", port->token_dl);

		spin_lock_irqsave(&dc->spin_mutex, flags);

		dc->last_ier =

			(dc->last_ier & ~(port->token_dl)) | port->token_dl;

		writew(dc->last_ier, dc->reg_ier);

		spin_unlock_irqrestore(&dc->spin_mutex, flags);

	}

	up(&port->tty_sem);

	return 0;

}

/* Called when the userspace process close the tty, /dev/noz*. */

static void ntty_close(struct tty_struct *tty, struct file *file)

{

	struct nozomi *dc = get_dc_by_tty(tty);

	tty_do_close(dc, (struct port *)tty->driver_data);

}

/*

 * called when the userspace process writes to the tty (/dev/noz*).

 * Data is inserted into a fifo, which is then read and transfered to the modem.

 */

static int ntty_write(struct tty_struct *tty, const unsigned char *buffer,

		      int count)

{

	int rval = -EINVAL;

	struct nozomi *dc = get_dc_by_tty(tty);

	struct port *port = (struct port *)tty->driver_data;

	unsigned long flags;

	/* DBG1( "WRITEx: %d, index = %d", count, index); */

	if (!dc || !port)

		return -ENODEV;

	if (unlikely(down_trylock(&port->tty_sem))) {

		/*

		 * must test lock as tty layer wraps calls

		 * to this function with BKL

		 */

		dev_err(&dc->pdev->dev, "Would have deadlocked - "

			"return ERESTARTSYS\n");

		return -ERESTARTSYS;

	}

	if (unlikely(!port->tty_open_count)) {

		DBG1(" ");

		goto exit;

	}

	rval = __kfifo_put(port->fifo_ul, (unsigned char *)buffer, count);

	/* notify card */

	if (unlikely(dc == NULL)) {

		DBG1("No device context?");

		goto exit;

	}

	spin_lock_irqsave(&dc->spin_mutex, flags);

	/* CTS is only valid on the modem channel */

	if (port == &(dc->port[PORT_MDM])) {

		if (port->ctrl_dl.CTS) {

			DBG4("Enable interrupt");

			enable_transmit_ul(port->tty_index, dc);

		} else {

			dev_err(&dc->pdev->dev,

				"CTS not active on modem port?\n");

		}

	} else {

		enable_transmit_ul(port->tty_index, dc);

	}