[deliverable/linux.git] / drivers / char / pcmcia / cm4040_cs.c

/*
 * A driver for the Omnikey PCMCIA smartcard reader CardMan 4040
 *
 * (c) 2000-2004 Omnikey AG (http://www.omnikey.com/)
 *
 * (C) 2005-2006 Harald Welte <laforge@gnumonks.org>
 * 	- add support for poll()
 * 	- driver cleanup
 * 	- add waitqueues
 * 	- adhere to linux kernel coding style and policies
 * 	- support 2.6.13 "new style" pcmcia interface
 * 	- add class interface for udev device creation
 *
 * The device basically is a USB CCID compliant device that has been
 * attached to an I/O-Mapped FIFO.
 *
 * All rights reserved, Dual BSD/GPL Licensed.
 */

/* #define PCMCIA_DEBUG 6 */

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/slab.h>
#include <linux/init.h>
#include <linux/fs.h>
#include <linux/delay.h>
#include <linux/poll.h>
#include <linux/wait.h>
#include <asm/uaccess.h>
#include <asm/io.h>

#include <pcmcia/cs_types.h>
#include <pcmcia/cs.h>
#include <pcmcia/cistpl.h>
#include <pcmcia/cisreg.h>
#include <pcmcia/ciscode.h>
#include <pcmcia/ds.h>

#include "cm4040_cs.h"


#ifdef PCMCIA_DEBUG
#define reader_to_dev(x)	(&handle_to_dev(x->p_dev->handle))
static int pc_debug = PCMCIA_DEBUG;
module_param(pc_debug, int, 0600);
#define DEBUGP(n, rdr, x, args...) do { 				\
	if (pc_debug >= (n)) 						\
		dev_printk(KERN_DEBUG, reader_to_dev(rdr), "%s:" x, 	\
			   __FUNCTION__ , ##args); 			\
	} while (0)
#else
#define DEBUGP(n, rdr, x, args...)
#endif

static char *version =
"OMNIKEY CardMan 4040 v1.1.0gm5 - All bugs added by Harald Welte";

#define	CCID_DRIVER_BULK_DEFAULT_TIMEOUT  	(150*HZ)
#define	CCID_DRIVER_ASYNC_POWERUP_TIMEOUT 	(35*HZ)
#define	CCID_DRIVER_MINIMUM_TIMEOUT 		(3*HZ)
#define READ_WRITE_BUFFER_SIZE 512
#define POLL_LOOP_COUNT				1000

/* how often to poll for fifo status change */
#define POLL_PERIOD 				msecs_to_jiffies(10)

static void reader_release(dev_link_t *link);

static int major;
static struct class *cmx_class;

#define		BS_READABLE	0x01
#define		BS_WRITABLE	0x02

struct reader_dev {
	struct pcmcia_device	*p_dev;
	dev_node_t		node;
	wait_queue_head_t	devq;
	wait_queue_head_t	poll_wait;
	wait_queue_head_t	read_wait;
	wait_queue_head_t	write_wait;
	unsigned long 	  	buffer_status;
	unsigned long     	timeout;
	unsigned char     	s_buf[READ_WRITE_BUFFER_SIZE];
	unsigned char     	r_buf[READ_WRITE_BUFFER_SIZE];
	struct timer_list 	poll_timer;
};

static dev_link_t *dev_table[CM_MAX_DEV];

#ifndef PCMCIA_DEBUG
#define	xoutb	outb
#define	xinb	inb
#else
static inline void xoutb(unsigned char val, unsigned short port)
{
	if (pc_debug >= 7)
		printk(KERN_DEBUG "outb(val=%.2x,port=%.4x)\n", val, port);
	outb(val, port);
}

static inline unsigned char xinb(unsigned short port)
{
	unsigned char val;

	val = inb(port);
	if (pc_debug >= 7)
		printk(KERN_DEBUG "%.2x=inb(%.4x)\n", val, port);
	return val;
}
#endif

/* poll the device fifo status register.  not to be confused with
 * the poll syscall. */
static void cm4040_do_poll(unsigned long dummy)
{
	struct reader_dev *dev = (struct reader_dev *) dummy;
	unsigned int obs = xinb(dev->p_dev->io.BasePort1
				+ REG_OFFSET_BUFFER_STATUS);

	if ((obs & BSR_BULK_IN_FULL)) {
		set_bit(BS_READABLE, &dev->buffer_status);
		DEBUGP(4, dev, "waking up read_wait\n");
		wake_up_interruptible(&dev->read_wait);
	} else
		clear_bit(BS_READABLE, &dev->buffer_status);

	if (!(obs & BSR_BULK_OUT_FULL)) {
		set_bit(BS_WRITABLE, &dev->buffer_status);
		DEBUGP(4, dev, "waking up write_wait\n");
		wake_up_interruptible(&dev->write_wait);
	} else
		clear_bit(BS_WRITABLE, &dev->buffer_status);

	if (dev->buffer_status)
		wake_up_interruptible(&dev->poll_wait);

	mod_timer(&dev->poll_timer, jiffies + POLL_PERIOD);
}

static void cm4040_stop_poll(struct reader_dev *dev)
{
	del_timer_sync(&dev->poll_timer);
}

static int wait_for_bulk_out_ready(struct reader_dev *dev)
{
	int i, rc;
	int iobase = dev->p_dev->io.BasePort1;

	for (i = 0; i < POLL_LOOP_COUNT; i++) {
		if ((xinb(iobase + REG_OFFSET_BUFFER_STATUS)
		    & BSR_BULK_OUT_FULL) == 0) {
			DEBUGP(4, dev, "BulkOut empty (i=%d)\n", i);
			return 1;
		}
	}

	DEBUGP(4, dev, "wait_event_interruptible_timeout(timeout=%ld\n",
		dev->timeout);
	rc = wait_event_interruptible_timeout(dev->write_wait,
					      test_and_clear_bit(BS_WRITABLE,
						       &dev->buffer_status),
					      dev->timeout);

	if (rc > 0)
		DEBUGP(4, dev, "woke up: BulkOut empty\n");
	else if (rc == 0)
		DEBUGP(4, dev, "woke up: BulkOut full, returning 0 :(\n");
	else if (rc < 0)
		DEBUGP(4, dev, "woke up: signal arrived\n");

	return rc;
}

/* Write to Sync Control Register */
static int write_sync_reg(unsigned char val, struct reader_dev *dev)
{
	int iobase = dev->p_dev->io.BasePort1;
	int rc;

	rc = wait_for_bulk_out_ready(dev);
	if (rc <= 0)
		return rc;

	xoutb(val, iobase + REG_OFFSET_SYNC_CONTROL);
	rc = wait_for_bulk_out_ready(dev);
	if (rc <= 0)
		return rc;

	return 1;
}

static int wait_for_bulk_in_ready(struct reader_dev *dev)
{
	int i, rc;
	int iobase = dev->p_dev->io.BasePort1;

	for (i = 0; i < POLL_LOOP_COUNT; i++) {
		if ((xinb(iobase + REG_OFFSET_BUFFER_STATUS)
		    & BSR_BULK_IN_FULL) == BSR_BULK_IN_FULL) {
			DEBUGP(3, dev, "BulkIn full (i=%d)\n", i);
			return 1;
		}
	}

	DEBUGP(4, dev, "wait_event_interruptible_timeout(timeout=%ld\n",
		dev->timeout);
	rc = wait_event_interruptible_timeout(dev->read_wait,
					      test_and_clear_bit(BS_READABLE,
						 	&dev->buffer_status),
					      dev->timeout);
	if (rc > 0)
		DEBUGP(4, dev, "woke up: BulkIn full\n");
	else if (rc == 0)
		DEBUGP(4, dev, "woke up: BulkIn not full, returning 0 :(\n");
	else if (rc < 0)
		DEBUGP(4, dev, "woke up: signal arrived\n");

	return rc;
}

static ssize_t cm4040_read(struct file *filp, char __user *buf,
			size_t count, loff_t *ppos)
{
	struct reader_dev *dev = filp->private_data;
	int iobase = dev->p_dev->io.BasePort1;
	size_t bytes_to_read;
	unsigned long i;
	size_t min_bytes_to_read;
	int rc;
	unsigned char uc;

	DEBUGP(2, dev, "-> cm4040_read(%s,%d)\n", current->comm, current->pid);

	if (count == 0)
		return 0;

	if (count < 10)
		return -EFAULT;

	if (filp->f_flags & O_NONBLOCK) {
		DEBUGP(4, dev, "filep->f_flags O_NONBLOCK set\n");
		DEBUGP(2, dev, "<- cm4040_read (failure)\n");
		return -EAGAIN;
	}

	if ((dev->p_dev->state & DEV_PRESENT)==0)
		return -ENODEV;

	for (i = 0; i < 5; i++) {
		rc = wait_for_bulk_in_ready(dev);
		if (rc <= 0) {
			DEBUGP(5, dev, "wait_for_bulk_in_ready rc=%.2x\n", rc);
			DEBUGP(2, dev, "<- cm4040_read (failed)\n");
			if (rc == -ERESTARTSYS)
				return rc;
			return -EIO;
		}
	  	dev->r_buf[i] = xinb(iobase + REG_OFFSET_BULK_IN);
#ifdef PCMCIA_DEBUG
		if (pc_debug >= 6)
			printk(KERN_DEBUG "%lu:%2x ", i, dev->r_buf[i]);
	}
	printk("\n");
#else
	}
#endif

	bytes_to_read = 5 + le32_to_cpu(*(__le32 *)&dev->r_buf[1]);

	DEBUGP(6, dev, "BytesToRead=%lu\n", bytes_to_read);

	min_bytes_to_read = min(count, bytes_to_read + 5);

	DEBUGP(6, dev, "Min=%lu\n", min_bytes_to_read);

	for (i = 0; i < (min_bytes_to_read-5); i++) {
		rc = wait_for_bulk_in_ready(dev);
		if (rc <= 0) {
			DEBUGP(5, dev, "wait_for_bulk_in_ready rc=%.2x\n", rc);
			DEBUGP(2, dev, "<- cm4040_read (failed)\n");
			if (rc == -ERESTARTSYS)
				return rc;
			return -EIO;
		}
		dev->r_buf[i+5] = xinb(iobase + REG_OFFSET_BULK_IN);
#ifdef PCMCIA_DEBUG
		if (pc_debug >= 6)
			printk(KERN_DEBUG "%lu:%2x ", i, dev->r_buf[i]);
	}
	printk("\n");
#else
	}
#endif

	*ppos = min_bytes_to_read;
	if (copy_to_user(buf, dev->r_buf, min_bytes_to_read))
		return -EFAULT;

	rc = wait_for_bulk_in_ready(dev);
	if (rc <= 0) {
		DEBUGP(5, dev, "wait_for_bulk_in_ready rc=%.2x\n", rc);
		DEBUGP(2, dev, "<- cm4040_read (failed)\n");
		if (rc == -ERESTARTSYS)
			return rc;
		return -EIO;
	}

	rc = write_sync_reg(SCR_READER_TO_HOST_DONE, dev);
	if (rc <= 0) {
		DEBUGP(5, dev, "write_sync_reg c=%.2x\n", rc);
		DEBUGP(2, dev, "<- cm4040_read (failed)\n");
		if (rc == -ERESTARTSYS)
			return rc;
		else
			return -EIO;
	}

	uc = xinb(iobase + REG_OFFSET_BULK_IN);

	DEBUGP(2, dev, "<- cm4040_read (successfully)\n");
	return min_bytes_to_read;
}

static ssize_t cm4040_write(struct file *filp, const char __user *buf,
			 size_t count, loff_t *ppos)
{
	struct reader_dev *dev = filp->private_data;
	int iobase = dev->p_dev->io.BasePort1;
	ssize_t rc;
	int i;
	unsigned int bytes_to_write;

	DEBUGP(2, dev, "-> cm4040_write(%s,%d)\n", current->comm, current->pid);

	if (count == 0) {
		DEBUGP(2, dev, "<- cm4040_write empty read (successfully)\n");
		return 0;
	}

	if (count < 5) {
		DEBUGP(2, dev, "<- cm4040_write buffersize=%Zd < 5\n", count);
		return -EIO;
	}

	if (filp->f_flags & O_NONBLOCK) {
		DEBUGP(4, dev, "filep->f_flags O_NONBLOCK set\n");
		DEBUGP(4, dev, "<- cm4040_write (failure)\n");
		return -EAGAIN;
	}

	if ((dev->p_dev->state & DEV_PRESENT) == 0)
		return -ENODEV;

	bytes_to_write = count;
	if (copy_from_user(dev->s_buf, buf, bytes_to_write))
		return -EFAULT;

	switch (dev->s_buf[0]) {
		case CMD_PC_TO_RDR_XFRBLOCK:
		case CMD_PC_TO_RDR_SECURE:
		case CMD_PC_TO_RDR_TEST_SECURE:
		case CMD_PC_TO_RDR_OK_SECURE:
			dev->timeout = CCID_DRIVER_BULK_DEFAULT_TIMEOUT;
			break;

		case CMD_PC_TO_RDR_ICCPOWERON:
			dev->timeout = CCID_DRIVER_ASYNC_POWERUP_TIMEOUT;
			break;

		case CMD_PC_TO_RDR_GETSLOTSTATUS:
		case CMD_PC_TO_RDR_ICCPOWEROFF:
		case CMD_PC_TO_RDR_GETPARAMETERS:
		case CMD_PC_TO_RDR_RESETPARAMETERS:
		case CMD_PC_TO_RDR_SETPARAMETERS:
		case CMD_PC_TO_RDR_ESCAPE:
		case CMD_PC_TO_RDR_ICCCLOCK:
		default:
			dev->timeout = CCID_DRIVER_MINIMUM_TIMEOUT;
			break;
	}

	rc = write_sync_reg(SCR_HOST_TO_READER_START, dev);
	if (rc <= 0) {
		DEBUGP(5, dev, "write_sync_reg c=%.2Zx\n", rc);
		DEBUGP(2, dev, "<- cm4040_write (failed)\n");
		if (rc == -ERESTARTSYS)
			return rc;
		else
			return -EIO;
	}

	DEBUGP(4, dev, "start \n");

	for (i = 0; i < bytes_to_write; i++) {
		rc = wait_for_bulk_out_ready(dev);
		if (rc <= 0) {
			DEBUGP(5, dev, "wait_for_bulk_out_ready rc=%.2Zx\n",
			       rc);
			DEBUGP(2, dev, "<- cm4040_write (failed)\n");
			if (rc == -ERESTARTSYS)
				return rc;
			else
				return -EIO;
		}

		xoutb(dev->s_buf[i],iobase + REG_OFFSET_BULK_OUT);
	}
	DEBUGP(4, dev, "end\n");

	rc = write_sync_reg(SCR_HOST_TO_READER_DONE, dev);

	if (rc <= 0) {
		DEBUGP(5, dev, "write_sync_reg c=%.2Zx\n", rc);
		DEBUGP(2, dev, "<- cm4040_write (failed)\n");
		if (rc == -ERESTARTSYS)
			return rc;
		else
			return -EIO;
	}

	DEBUGP(2, dev, "<- cm4040_write (successfully)\n");
	return count;
}

static unsigned int cm4040_poll(struct file *filp, poll_table *wait)
{
	struct reader_dev *dev = filp->private_data;
	unsigned int mask = 0;

	poll_wait(filp, &dev->poll_wait, wait);

	if (test_and_clear_bit(BS_READABLE, &dev->buffer_status))
		mask |= POLLIN | POLLRDNORM;
	if (test_and_clear_bit(BS_WRITABLE, &dev->buffer_status))
		mask |= POLLOUT | POLLWRNORM;

	DEBUGP(2, dev, "<- cm4040_poll(%u)\n", mask);

	return mask;
}

static int cm4040_open(struct inode *inode, struct file *filp)
{
	struct reader_dev *dev;
	dev_link_t *link;
	int minor = iminor(inode);

	if (minor >= CM_MAX_DEV)
		return -ENODEV;

	link = dev_table[minor];
	if (link == NULL || !(DEV_OK(link)))
		return -ENODEV;

	if (link->open)
		return -EBUSY;

	dev = link->priv;
	filp->private_data = dev;

	if (filp->f_flags & O_NONBLOCK) {
		DEBUGP(4, dev, "filep->f_flags O_NONBLOCK set\n");
		return -EAGAIN;
	}

	link->open = 1;

	dev->poll_timer.data = (unsigned long) dev;
	mod_timer(&dev->poll_timer, jiffies + POLL_PERIOD);

	DEBUGP(2, dev, "<- cm4040_open (successfully)\n");
	return nonseekable_open(inode, filp);
}

static int cm4040_close(struct inode *inode, struct file *filp)
{
	struct reader_dev *dev = filp->private_data;
	dev_link_t *link;
	int minor = iminor(inode);

	DEBUGP(2, dev, "-> cm4040_close(maj/min=%d.%d)\n", imajor(inode),
	      iminor(inode));

	if (minor >= CM_MAX_DEV)
		return -ENODEV;

	link = dev_table[minor];
	if (link == NULL)
		return -ENODEV;

	cm4040_stop_poll(dev);

	link->open = 0;
	wake_up(&dev->devq);

	DEBUGP(2, dev, "<- cm4040_close\n");
	return 0;
}

static void cm4040_reader_release(dev_link_t *link)
{
	struct reader_dev *dev = link->priv;

	DEBUGP(3, dev, "-> cm4040_reader_release\n");
	while (link->open) {
		DEBUGP(3, dev, KERN_INFO MODULE_NAME ": delaying release "
		       "until process has terminated\n");
 		wait_event(dev->devq, (link->open == 0));
	}
	DEBUGP(3, dev, "<- cm4040_reader_release\n");
	return;
}

static void reader_config(dev_link_t *link, int devno)
{
	client_handle_t handle;
	struct reader_dev *dev;
	tuple_t tuple;
	cisparse_t parse;
	u_char buf[64];
	int fail_fn, fail_rc;
	int rc;

	handle = link->handle;

	tuple.DesiredTuple = CISTPL_CONFIG;
	tuple.Attributes = 0;
	tuple.TupleData = buf;
	tuple.TupleDataMax = sizeof(buf);
 	tuple.TupleOffset = 0;

	if ((fail_rc = pcmcia_get_first_tuple(handle, &tuple)) != CS_SUCCESS) {
		fail_fn = GetFirstTuple;
		goto cs_failed;
	}
	if ((fail_rc = pcmcia_get_tuple_data(handle, &tuple)) != CS_SUCCESS) {
		fail_fn = GetTupleData;
		goto cs_failed;
	}
	if ((fail_rc = pcmcia_parse_tuple(handle, &tuple, &parse))
							!= CS_SUCCESS) {
		fail_fn = ParseTuple;
		goto cs_failed;
	}

	link->state |= DEV_CONFIG;
	link->conf.ConfigBase = parse.config.base;
	link->conf.Present = parse.config.rmask[0];

	link->io.BasePort2 = 0;
	link->io.NumPorts2 = 0;
	link->io.Attributes2 = 0;
	tuple.DesiredTuple = CISTPL_CFTABLE_ENTRY;
	for (rc = pcmcia_get_first_tuple(handle, &tuple);
	     rc == CS_SUCCESS;
	     rc = pcmcia_get_next_tuple(handle, &tuple)) {
		rc = pcmcia_get_tuple_data(handle, &tuple);
		if (rc != CS_SUCCESS)
			continue;
		rc = pcmcia_parse_tuple(handle, &tuple, &parse);
		if (rc != CS_SUCCESS)
			continue;

		link->conf.ConfigIndex = parse.cftable_entry.index;

		if (!parse.cftable_entry.io.nwin)
			continue;

		link->io.BasePort1 = parse.cftable_entry.io.win[0].base;
		link->io.NumPorts1 = parse.cftable_entry.io.win[0].len;
		link->io.Attributes1 = IO_DATA_PATH_WIDTH_AUTO;
		if (!(parse.cftable_entry.io.flags & CISTPL_IO_8BIT))
			link->io.Attributes1 = IO_DATA_PATH_WIDTH_16;
		if (!(parse.cftable_entry.io.flags & CISTPL_IO_16BIT))
			link->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
		link->io.IOAddrLines = parse.cftable_entry.io.flags
						& CISTPL_IO_LINES_MASK;
		rc = pcmcia_request_io(handle, &link->io);

		dev_printk(KERN_INFO, &handle_to_dev(handle), "foo");
		if (rc == CS_SUCCESS)
			break;
		else
			dev_printk(KERN_INFO, &handle_to_dev(handle),
				   "pcmcia_request_io failed 0x%x\n", rc);
	}
	if (rc != CS_SUCCESS)
		goto cs_release;

	link->conf.IntType = 00000002;

	if ((fail_rc = pcmcia_request_configuration(handle,&link->conf))
								!=CS_SUCCESS) {
		fail_fn = RequestConfiguration;
		dev_printk(KERN_INFO, &handle_to_dev(handle),
			   "pcmcia_request_configuration failed 0x%x\n",
			   fail_rc);
		goto cs_release;
	}

	dev = link->priv;
	sprintf(dev->node.dev_name, DEVICE_NAME "%d", devno);
	dev->node.major = major;
	dev->node.minor = devno;
	dev->node.next = NULL;
	link->dev_node = &dev->node;
	link->state &= ~DEV_CONFIG_PENDING;

	DEBUGP(2, dev, "device " DEVICE_NAME "%d at 0x%.4x-0x%.4x\n", devno,
	      link->io.BasePort1, link->io.BasePort1+link->io.NumPorts1);
	DEBUGP(2, dev, "<- reader_config (succ)\n");

	return;

cs_failed:
	cs_error(handle, fail_fn, fail_rc);
cs_release:
	reader_release(link);
	link->state &= ~DEV_CONFIG_PENDING;
}

static void reader_release(dev_link_t *link)
{
	cm4040_reader_release(link->priv);
	pcmcia_disable_device(link->handle);
}

static int reader_attach(struct pcmcia_device *p_dev)
{
	struct reader_dev *dev;
	int i;
	dev_link_t *link = dev_to_instance(p_dev);

	for (i = 0; i < CM_MAX_DEV; i++) {
		if (dev_table[i] == NULL)
			break;
	}

	if (i == CM_MAX_DEV)
		return -ENODEV;

	dev = kzalloc(sizeof(struct reader_dev), GFP_KERNEL);
	if (dev == NULL)
		return -ENOMEM;

	dev->timeout = CCID_DRIVER_MINIMUM_TIMEOUT;
	dev->buffer_status = 0;

	link->priv = dev;
	dev->p_dev = p_dev;

	link->conf.IntType = INT_MEMORY_AND_IO;
	dev_table[i] = link;

	init_waitqueue_head(&dev->devq);
	init_waitqueue_head(&dev->poll_wait);
	init_waitqueue_head(&dev->read_wait);
	init_waitqueue_head(&dev->write_wait);
	init_timer(&dev->poll_timer);
	dev->poll_timer.function = &cm4040_do_poll;

	link->state |= DEV_PRESENT | DEV_CONFIG_PENDING;
	reader_config(link, i);

	class_device_create(cmx_class, NULL, MKDEV(major, i), NULL,
			    "cmx%d", i);

	return 0;
}

static void reader_detach(struct pcmcia_device *p_dev)
{
	dev_link_t *link = dev_to_instance(p_dev);
	struct reader_dev *dev = link->priv;
	int devno;

	/* find device */
	for (devno = 0; devno < CM_MAX_DEV; devno++) {
		if (dev_table[devno] == link)
			break;
	}
	if (devno == CM_MAX_DEV)
		return;

	link->state &= ~DEV_PRESENT;

	if (link->state & DEV_CONFIG)
		reader_release(link);

	dev_table[devno] = NULL;
	kfree(dev);

	class_device_destroy(cmx_class, MKDEV(major, devno));

	return;
}

static struct file_operations reader_fops = {
	.owner		= THIS_MODULE,
	.read		= cm4040_read,
	.write		= cm4040_write,
	.open		= cm4040_open,
	.release	= cm4040_close,
	.poll		= cm4040_poll,
};

static struct pcmcia_device_id cm4040_ids[] = {
	PCMCIA_DEVICE_MANF_CARD(0x0223, 0x0200),
	PCMCIA_DEVICE_PROD_ID12("OMNIKEY", "CardMan 4040",
				0xE32CDD8C, 0x8F23318B),
	PCMCIA_DEVICE_NULL,
};
MODULE_DEVICE_TABLE(pcmcia, cm4040_ids);

static struct pcmcia_driver reader_driver = {
  	.owner		= THIS_MODULE,
  	.drv		= {
		.name	= "cm4040_cs",
	},
	.probe		= reader_attach,
	.remove		= reader_detach,
	.id_table	= cm4040_ids,
};

static int __init cm4040_init(void)
{
	int rc;

	printk(KERN_INFO "%s\n", version);
	cmx_class = class_create(THIS_MODULE, "cardman_4040");
	if (!cmx_class)
		return -1;

	rc = pcmcia_register_driver(&reader_driver);
	if (rc < 0)
		return rc;

	major = register_chrdev(0, DEVICE_NAME, &reader_fops);
	if (major < 0) {
		printk(KERN_WARNING MODULE_NAME
			": could not get major number\n");
		return -1;
	}
	return 0;
}

static void __exit cm4040_exit(void)
{
	printk(KERN_INFO MODULE_NAME ": unloading\n");
	pcmcia_unregister_driver(&reader_driver);
	unregister_chrdev(major, DEVICE_NAME);
	class_destroy(cmx_class);
}

module_init(cm4040_init);
module_exit(cm4040_exit);
MODULE_LICENSE("Dual BSD/GPL");
Commit	Line	Data
77c44ab1 HW	1	/*
	2	* A driver for the Omnikey PCMCIA smartcard reader CardMan 4040
	3	*
	4	* (c) 2000-2004 Omnikey AG (http://www.omnikey.com/)
	5	*
67bc6200	6	* (C) 2005-2006 Harald Welte <laforge@gnumonks.org>
77c44ab1 HW	7	* - add support for poll()
	8	* - driver cleanup
	9	* - add waitqueues
	10	* - adhere to linux kernel coding style and policies
	11	* - support 2.6.13 "new style" pcmcia interface
67bc6200	12	* - add class interface for udev device creation
77c44ab1 HW	13	*
	14	* The device basically is a USB CCID compliant device that has been
	15	* attached to an I/O-Mapped FIFO.
	16	*
	17	* All rights reserved, Dual BSD/GPL Licensed.
	18	*/
	19
	20	/* #define PCMCIA_DEBUG 6 */
	21
	22	#include <linux/kernel.h>
	23	#include <linux/module.h>
	24	#include <linux/slab.h>
	25	#include <linux/init.h>
	26	#include <linux/fs.h>
	27	#include <linux/delay.h>
	28	#include <linux/poll.h>
	29	#include <linux/wait.h>
	30	#include <asm/uaccess.h>
	31	#include <asm/io.h>
	32
	33	#include <pcmcia/cs_types.h>
	34	#include <pcmcia/cs.h>
	35	#include <pcmcia/cistpl.h>
	36	#include <pcmcia/cisreg.h>
	37	#include <pcmcia/ciscode.h>
	38	#include <pcmcia/ds.h>
	39
	40	#include "cm4040_cs.h"
	41
	42
	43	#ifdef PCMCIA_DEBUG
fd238232	44	#define reader_to_dev(x) (&handle_to_dev(x->p_dev->handle))
77c44ab1 HW	45	static int pc_debug = PCMCIA_DEBUG;
	46	module_param(pc_debug, int, 0600);
	47	#define DEBUGP(n, rdr, x, args...) do { \
	48	if (pc_debug >= (n)) \
	49	dev_printk(KERN_DEBUG, reader_to_dev(rdr), "%s:" x, \
	50	__FUNCTION__ , ##args); \
	51	} while (0)
	52	#else
	53	#define DEBUGP(n, rdr, x, args...)
	54	#endif
	55
	56	static char *version =
67bc6200	57	"OMNIKEY CardMan 4040 v1.1.0gm5 - All bugs added by Harald Welte";
77c44ab1 HW	58
	59	#define CCID_DRIVER_BULK_DEFAULT_TIMEOUT (150*HZ)
	60	#define CCID_DRIVER_ASYNC_POWERUP_TIMEOUT (35*HZ)
	61	#define CCID_DRIVER_MINIMUM_TIMEOUT (3*HZ)
	62	#define READ_WRITE_BUFFER_SIZE 512
	63	#define POLL_LOOP_COUNT 1000
	64
	65	/* how often to poll for fifo status change */
	66	#define POLL_PERIOD msecs_to_jiffies(10)
	67
	68	static void reader_release(dev_link_t *link);
77c44ab1 HW	69
77c44ab1 HW	70	static int major;
67bc6200	71	static struct class *cmx_class;
77c44ab1 HW	72
	73	#define BS_READABLE 0x01
	74	#define BS_WRITABLE 0x02
	75
	76	struct reader_dev {
fd238232	77	struct pcmcia_device *p_dev;
77c44ab1 HW	78	dev_node_t node;
	79	wait_queue_head_t devq;
	80	wait_queue_head_t poll_wait;
	81	wait_queue_head_t read_wait;
	82	wait_queue_head_t write_wait;
	83	unsigned long buffer_status;
	84	unsigned long timeout;
	85	unsigned char s_buf[READ_WRITE_BUFFER_SIZE];
	86	unsigned char r_buf[READ_WRITE_BUFFER_SIZE];
	87	struct timer_list poll_timer;
	88	};
	89
77c44ab1 HW	90	static dev_link_t *dev_table[CM_MAX_DEV];
	91
	92	#ifndef PCMCIA_DEBUG
	93	#define xoutb outb
	94	#define xinb inb
	95	#else
	96	static inline void xoutb(unsigned char val, unsigned short port)
	97	{
	98	if (pc_debug >= 7)
	99	printk(KERN_DEBUG "outb(val=%.2x,port=%.4x)\n", val, port);
	100	outb(val, port);
	101	}
	102
	103	static inline unsigned char xinb(unsigned short port)
	104	{
	105	unsigned char val;
	106
	107	val = inb(port);
	108	if (pc_debug >= 7)
	109	printk(KERN_DEBUG "%.2x=inb(%.4x)\n", val, port);
	110	return val;
	111	}
	112	#endif
	113
	114	/* poll the device fifo status register. not to be confused with
	115	* the poll syscall. */
	116	static void cm4040_do_poll(unsigned long dummy)
	117	{
	118	struct reader_dev dev = (struct reader_dev ) dummy;
fd238232	119	unsigned int obs = xinb(dev->p_dev->io.BasePort1
77c44ab1 HW	120	+ REG_OFFSET_BUFFER_STATUS);
	121
	122	if ((obs & BSR_BULK_IN_FULL)) {
	123	set_bit(BS_READABLE, &dev->buffer_status);
	124	DEBUGP(4, dev, "waking up read_wait\n");
	125	wake_up_interruptible(&dev->read_wait);
	126	} else
	127	clear_bit(BS_READABLE, &dev->buffer_status);
	128
	129	if (!(obs & BSR_BULK_OUT_FULL)) {
	130	set_bit(BS_WRITABLE, &dev->buffer_status);
	131	DEBUGP(4, dev, "waking up write_wait\n");
	132	wake_up_interruptible(&dev->write_wait);
	133	} else
	134	clear_bit(BS_WRITABLE, &dev->buffer_status);
	135
	136	if (dev->buffer_status)
	137	wake_up_interruptible(&dev->poll_wait);
	138
	139	mod_timer(&dev->poll_timer, jiffies + POLL_PERIOD);
	140	}
	141
	142	static void cm4040_stop_poll(struct reader_dev *dev)
	143	{
	144	del_timer_sync(&dev->poll_timer);
	145	}
	146
	147	static int wait_for_bulk_out_ready(struct reader_dev *dev)
	148	{
	149	int i, rc;
fd238232	150	int iobase = dev->p_dev->io.BasePort1;
77c44ab1 HW	151
	152	for (i = 0; i < POLL_LOOP_COUNT; i++) {
	153	if ((xinb(iobase + REG_OFFSET_BUFFER_STATUS)
	154	& BSR_BULK_OUT_FULL) == 0) {
	155	DEBUGP(4, dev, "BulkOut empty (i=%d)\n", i);
	156	return 1;
	157	}
	158	}
	159
	160	DEBUGP(4, dev, "wait_event_interruptible_timeout(timeout=%ld\n",
	161	dev->timeout);
	162	rc = wait_event_interruptible_timeout(dev->write_wait,
	163	test_and_clear_bit(BS_WRITABLE,
	164	&dev->buffer_status),
	165	dev->timeout);
	166
	167	if (rc > 0)
	168	DEBUGP(4, dev, "woke up: BulkOut empty\n");
	169	else if (rc == 0)
	170	DEBUGP(4, dev, "woke up: BulkOut full, returning 0 :(\n");
	171	else if (rc < 0)
	172	DEBUGP(4, dev, "woke up: signal arrived\n");
	173
	174	return rc;
	175	}
	176
	177	/* Write to Sync Control Register */
	178	static int write_sync_reg(unsigned char val, struct reader_dev *dev)
	179	{
fd238232	180	int iobase = dev->p_dev->io.BasePort1;
77c44ab1 HW	181	int rc;
	182
	183	rc = wait_for_bulk_out_ready(dev);
	184	if (rc <= 0)
	185	return rc;
	186
	187	xoutb(val, iobase + REG_OFFSET_SYNC_CONTROL);
	188	rc = wait_for_bulk_out_ready(dev);
	189	if (rc <= 0)
	190	return rc;
	191
	192	return 1;
	193	}
	194
	195	static int wait_for_bulk_in_ready(struct reader_dev *dev)
	196	{
	197	int i, rc;
fd238232	198	int iobase = dev->p_dev->io.BasePort1;
77c44ab1 HW	199
	200	for (i = 0; i < POLL_LOOP_COUNT; i++) {
	201	if ((xinb(iobase + REG_OFFSET_BUFFER_STATUS)
	202	& BSR_BULK_IN_FULL) == BSR_BULK_IN_FULL) {
	203	DEBUGP(3, dev, "BulkIn full (i=%d)\n", i);
	204	return 1;
	205	}
	206	}
	207
	208	DEBUGP(4, dev, "wait_event_interruptible_timeout(timeout=%ld\n",
	209	dev->timeout);
	210	rc = wait_event_interruptible_timeout(dev->read_wait,
	211	test_and_clear_bit(BS_READABLE,
	212	&dev->buffer_status),
	213	dev->timeout);
	214	if (rc > 0)
	215	DEBUGP(4, dev, "woke up: BulkIn full\n");
	216	else if (rc == 0)
	217	DEBUGP(4, dev, "woke up: BulkIn not full, returning 0 :(\n");
	218	else if (rc < 0)
	219	DEBUGP(4, dev, "woke up: signal arrived\n");
	220
	221	return rc;
	222	}
	223
	224	static ssize_t cm4040_read(struct file filp, char __user buf,
	225	size_t count, loff_t *ppos)
	226	{
	227	struct reader_dev *dev = filp->private_data;
fd238232	228	int iobase = dev->p_dev->io.BasePort1;
77c44ab1 HW	229	size_t bytes_to_read;
	230	unsigned long i;
	231	size_t min_bytes_to_read;
	232	int rc;
	233	unsigned char uc;
	234
	235	DEBUGP(2, dev, "-> cm4040_read(%s,%d)\n", current->comm, current->pid);
	236
	237	if (count == 0)
	238	return 0;
	239
	240	if (count < 10)
	241	return -EFAULT;
	242
	243	if (filp->f_flags & O_NONBLOCK) {
	244	DEBUGP(4, dev, "filep->f_flags O_NONBLOCK set\n");
	245	DEBUGP(2, dev, "<- cm4040_read (failure)\n");
	246	return -EAGAIN;
	247	}
	248
fd238232	249	if ((dev->p_dev->state & DEV_PRESENT)==0)
77c44ab1 HW	250	return -ENODEV;
	251
	252	for (i = 0; i < 5; i++) {
	253	rc = wait_for_bulk_in_ready(dev);
	254	if (rc <= 0) {
	255	DEBUGP(5, dev, "wait_for_bulk_in_ready rc=%.2x\n", rc);
	256	DEBUGP(2, dev, "<- cm4040_read (failed)\n");
	257	if (rc == -ERESTARTSYS)
	258	return rc;
	259	return -EIO;
	260	}
	261	dev->r_buf[i] = xinb(iobase + REG_OFFSET_BULK_IN);
	262	#ifdef PCMCIA_DEBUG
	263	if (pc_debug >= 6)
	264	printk(KERN_DEBUG "%lu:%2x ", i, dev->r_buf[i]);
	265	}
	266	printk("\n");
	267	#else
	268	}
	269	#endif
	270
	271	bytes_to_read = 5 + le32_to_cpu((__le32 )&dev->r_buf[1]);
	272
	273	DEBUGP(6, dev, "BytesToRead=%lu\n", bytes_to_read);
	274
	275	min_bytes_to_read = min(count, bytes_to_read + 5);
	276
	277	DEBUGP(6, dev, "Min=%lu\n", min_bytes_to_read);
	278
	279	for (i = 0; i < (min_bytes_to_read-5); i++) {
	280	rc = wait_for_bulk_in_ready(dev);
	281	if (rc <= 0) {
	282	DEBUGP(5, dev, "wait_for_bulk_in_ready rc=%.2x\n", rc);
	283	DEBUGP(2, dev, "<- cm4040_read (failed)\n");
	284	if (rc == -ERESTARTSYS)
	285	return rc;
	286	return -EIO;
	287	}
	288	dev->r_buf[i+5] = xinb(iobase + REG_OFFSET_BULK_IN);
	289	#ifdef PCMCIA_DEBUG
	290	if (pc_debug >= 6)
	291	printk(KERN_DEBUG "%lu:%2x ", i, dev->r_buf[i]);
	292	}
	293	printk("\n");
	294	#else
	295	}
	296	#endif
	297
	298	*ppos = min_bytes_to_read;
	299	if (copy_to_user(buf, dev->r_buf, min_bytes_to_read))
	300	return -EFAULT;
	301
	302	rc = wait_for_bulk_in_ready(dev);
	303	if (rc <= 0) {
	304	DEBUGP(5, dev, "wait_for_bulk_in_ready rc=%.2x\n", rc);
	305	DEBUGP(2, dev, "<- cm4040_read (failed)\n");
	306	if (rc == -ERESTARTSYS)
	307	return rc;
	308	return -EIO;
	309	}
	310
	311	rc = write_sync_reg(SCR_READER_TO_HOST_DONE, dev);
	312	if (rc <= 0) {
	313	DEBUGP(5, dev, "write_sync_reg c=%.2x\n", rc);
314	DEBUGP(2, dev, "<- cm4040_read (failed)\n");
315	if (rc == -ERESTARTSYS)
316	return rc;
317	else
318	return -EIO;
319	}
320
321	uc = xinb(iobase + REG_OFFSET_BULK_IN);
322
323	DEBUGP(2, dev, "<- cm4040_read (successfully)\n");
324	return min_bytes_to_read;
325	}
326
327	static ssize_t cm4040_write(struct file filp, const char __user buf,
328	size_t count, loff_t *ppos)
329	{
330	struct reader_dev *dev = filp->private_data;
fd238232	331	int iobase = dev->p_dev->io.BasePort1;
77c44ab1 HW	332	ssize_t rc;
	333	int i;
	334	unsigned int bytes_to_write;
	335
	336	DEBUGP(2, dev, "-> cm4040_write(%s,%d)\n", current->comm, current->pid);
	337
	338	if (count == 0) {
	339	DEBUGP(2, dev, "<- cm4040_write empty read (successfully)\n");
	340	return 0;
	341	}
	342
	343	if (count < 5) {
	344	DEBUGP(2, dev, "<- cm4040_write buffersize=%Zd < 5\n", count);
	345	return -EIO;
	346	}
	347
	348	if (filp->f_flags & O_NONBLOCK) {
	349	DEBUGP(4, dev, "filep->f_flags O_NONBLOCK set\n");
	350	DEBUGP(4, dev, "<- cm4040_write (failure)\n");
	351	return -EAGAIN;
	352	}
	353
fd238232	354	if ((dev->p_dev->state & DEV_PRESENT) == 0)
77c44ab1 HW	355	return -ENODEV;
	356
	357	bytes_to_write = count;
	358	if (copy_from_user(dev->s_buf, buf, bytes_to_write))
	359	return -EFAULT;
	360
	361	switch (dev->s_buf[0]) {
	362	case CMD_PC_TO_RDR_XFRBLOCK:
	363	case CMD_PC_TO_RDR_SECURE:
	364	case CMD_PC_TO_RDR_TEST_SECURE:
	365	case CMD_PC_TO_RDR_OK_SECURE:
	366	dev->timeout = CCID_DRIVER_BULK_DEFAULT_TIMEOUT;
	367	break;
	368
	369	case CMD_PC_TO_RDR_ICCPOWERON:
	370	dev->timeout = CCID_DRIVER_ASYNC_POWERUP_TIMEOUT;
	371	break;
	372
	373	case CMD_PC_TO_RDR_GETSLOTSTATUS:
	374	case CMD_PC_TO_RDR_ICCPOWEROFF:
	375	case CMD_PC_TO_RDR_GETPARAMETERS:
	376	case CMD_PC_TO_RDR_RESETPARAMETERS:
	377	case CMD_PC_TO_RDR_SETPARAMETERS:
	378	case CMD_PC_TO_RDR_ESCAPE:
	379	case CMD_PC_TO_RDR_ICCCLOCK:
	380	default:
	381	dev->timeout = CCID_DRIVER_MINIMUM_TIMEOUT;
	382	break;
	383	}
	384
	385	rc = write_sync_reg(SCR_HOST_TO_READER_START, dev);
	386	if (rc <= 0) {
	387	DEBUGP(5, dev, "write_sync_reg c=%.2Zx\n", rc);
	388	DEBUGP(2, dev, "<- cm4040_write (failed)\n");
	389	if (rc == -ERESTARTSYS)
	390	return rc;
	391	else
	392	return -EIO;
	393	}
	394
	395	DEBUGP(4, dev, "start \n");
	396
	397	for (i = 0; i < bytes_to_write; i++) {
	398	rc = wait_for_bulk_out_ready(dev);
	399	if (rc <= 0) {
	400	DEBUGP(5, dev, "wait_for_bulk_out_ready rc=%.2Zx\n",
	401	rc);
	402	DEBUGP(2, dev, "<- cm4040_write (failed)\n");
	403	if (rc == -ERESTARTSYS)
	404	return rc;
	405	else
	406	return -EIO;
	407	}
	408
	409	xoutb(dev->s_buf[i],iobase + REG_OFFSET_BULK_OUT);
	410	}
	411	DEBUGP(4, dev, "end\n");
	412
	413	rc = write_sync_reg(SCR_HOST_TO_READER_DONE, dev);
	414
	415	if (rc <= 0) {
	416	DEBUGP(5, dev, "write_sync_reg c=%.2Zx\n", rc);
	417	DEBUGP(2, dev, "<- cm4040_write (failed)\n");
	418	if (rc == -ERESTARTSYS)
419	return rc;
420	else
421	return -EIO;
422	}
423
424	DEBUGP(2, dev, "<- cm4040_write (successfully)\n");
425	return count;
426	}
427
428	static unsigned int cm4040_poll(struct file filp, poll_table wait)
429	{
430	struct reader_dev *dev = filp->private_data;
431	unsigned int mask = 0;
432
433	poll_wait(filp, &dev->poll_wait, wait);
434
435	if (test_and_clear_bit(BS_READABLE, &dev->buffer_status))
436	mask \|= POLLIN \| POLLRDNORM;
437	if (test_and_clear_bit(BS_WRITABLE, &dev->buffer_status))
438	mask \|= POLLOUT \| POLLWRNORM;
439
440	DEBUGP(2, dev, "<- cm4040_poll(%u)\n", mask);
441
442	return mask;
443	}
444
445	static int cm4040_open(struct inode inode, struct file filp)
446	{
447	struct reader_dev *dev;
448	dev_link_t *link;
449	int minor = iminor(inode);
450
451	if (minor >= CM_MAX_DEV)
452	return -ENODEV;
453
454	link = dev_table[minor];
455	if (link == NULL \|\| !(DEV_OK(link)))
456	return -ENODEV;
457
458	if (link->open)
459	return -EBUSY;
460
461	dev = link->priv;
462	filp->private_data = dev;
463
464	if (filp->f_flags & O_NONBLOCK) {
465	DEBUGP(4, dev, "filep->f_flags O_NONBLOCK set\n");
466	return -EAGAIN;
467	}
468
469	link->open = 1;
470
471	dev->poll_timer.data = (unsigned long) dev;
472	mod_timer(&dev->poll_timer, jiffies + POLL_PERIOD);
473
474	DEBUGP(2, dev, "<- cm4040_open (successfully)\n");
475	return nonseekable_open(inode, filp);
476	}
477
478	static int cm4040_close(struct inode inode, struct file filp)
479	{
480	struct reader_dev *dev = filp->private_data;
481	dev_link_t *link;
482	int minor = iminor(inode);
483
484	DEBUGP(2, dev, "-> cm4040_close(maj/min=%d.%d)\n", imajor(inode),
485	iminor(inode));
486
487	if (minor >= CM_MAX_DEV)
488	return -ENODEV;
489
490	link = dev_table[minor];
491	if (link == NULL)
492	return -ENODEV;
493
494	cm4040_stop_poll(dev);
495
496	link->open = 0;
497	wake_up(&dev->devq);
498
499	DEBUGP(2, dev, "<- cm4040_close\n");
500	return 0;
501	}
502
503	static void cm4040_reader_release(dev_link_t *link)
504	{
505	struct reader_dev *dev = link->priv;
506
507	DEBUGP(3, dev, "-> cm4040_reader_release\n");
508	while (link->open) {
509	DEBUGP(3, dev, KERN_INFO MODULE_NAME ": delaying release "
510	"until process has terminated\n");
511	wait_event(dev->devq, (link->open == 0));
512	}
513	DEBUGP(3, dev, "<- cm4040_reader_release\n");
514	return;
515	}
516
517	static void reader_config(dev_link_t *link, int devno)
518	{
519	client_handle_t handle;
520	struct reader_dev *dev;
521	tuple_t tuple;
522	cisparse_t parse;
77c44ab1 HW	523	u_char buf[64];
	524	int fail_fn, fail_rc;
	525	int rc;
	526
	527	handle = link->handle;
	528
	529	tuple.DesiredTuple = CISTPL_CONFIG;
	530	tuple.Attributes = 0;
	531	tuple.TupleData = buf;
	532	tuple.TupleDataMax = sizeof(buf);
	533	tuple.TupleOffset = 0;
	534
	535	if ((fail_rc = pcmcia_get_first_tuple(handle, &tuple)) != CS_SUCCESS) {
	536	fail_fn = GetFirstTuple;
	537	goto cs_failed;
	538	}
	539	if ((fail_rc = pcmcia_get_tuple_data(handle, &tuple)) != CS_SUCCESS) {
	540	fail_fn = GetTupleData;
	541	goto cs_failed;
	542	}
	543	if ((fail_rc = pcmcia_parse_tuple(handle, &tuple, &parse))
	544	!= CS_SUCCESS) {
	545	fail_fn = ParseTuple;
	546	goto cs_failed;
	547	}
77c44ab1 HW	548
	549	link->state \|= DEV_CONFIG;
	550	link->conf.ConfigBase = parse.config.base;
	551	link->conf.Present = parse.config.rmask[0];
77c44ab1 HW	552
	553	link->io.BasePort2 = 0;
	554	link->io.NumPorts2 = 0;
	555	link->io.Attributes2 = 0;
	556	tuple.DesiredTuple = CISTPL_CFTABLE_ENTRY;
	557	for (rc = pcmcia_get_first_tuple(handle, &tuple);
	558	rc == CS_SUCCESS;
	559	rc = pcmcia_get_next_tuple(handle, &tuple)) {
	560	rc = pcmcia_get_tuple_data(handle, &tuple);
	561	if (rc != CS_SUCCESS)
	562	continue;
	563	rc = pcmcia_parse_tuple(handle, &tuple, &parse);
	564	if (rc != CS_SUCCESS)
	565	continue;
	566
	567	link->conf.ConfigIndex = parse.cftable_entry.index;
	568
	569	if (!parse.cftable_entry.io.nwin)
	570	continue;
	571
	572	link->io.BasePort1 = parse.cftable_entry.io.win[0].base;
	573	link->io.NumPorts1 = parse.cftable_entry.io.win[0].len;
	574	link->io.Attributes1 = IO_DATA_PATH_WIDTH_AUTO;
	575	if (!(parse.cftable_entry.io.flags & CISTPL_IO_8BIT))
	576	link->io.Attributes1 = IO_DATA_PATH_WIDTH_16;
	577	if (!(parse.cftable_entry.io.flags & CISTPL_IO_16BIT))
	578	link->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
	579	link->io.IOAddrLines = parse.cftable_entry.io.flags
	580	& CISTPL_IO_LINES_MASK;
	581	rc = pcmcia_request_io(handle, &link->io);
	582
	583	dev_printk(KERN_INFO, &handle_to_dev(handle), "foo");
	584	if (rc == CS_SUCCESS)
	585	break;
	586	else
	587	dev_printk(KERN_INFO, &handle_to_dev(handle),
	588	"pcmcia_request_io failed 0x%x\n", rc);
	589	}
	590	if (rc != CS_SUCCESS)
	591	goto cs_release;
	592
	593	link->conf.IntType = 00000002;
	594
	595	if ((fail_rc = pcmcia_request_configuration(handle,&link->conf))
	596	!=CS_SUCCESS) {
	597	fail_fn = RequestConfiguration;
	598	dev_printk(KERN_INFO, &handle_to_dev(handle),
	599	"pcmcia_request_configuration failed 0x%x\n",
	600	fail_rc);
	601	goto cs_release;
	602	}
	603
	604	dev = link->priv;
	605	sprintf(dev->node.dev_name, DEVICE_NAME "%d", devno);
	606	dev->node.major = major;
	607	dev->node.minor = devno;
	608	dev->node.next = NULL;
fd238232	609	link->dev_node = &dev->node;
77c44ab1 HW	610	link->state &= ~DEV_CONFIG_PENDING;
	611
	612	DEBUGP(2, dev, "device " DEVICE_NAME "%d at 0x%.4x-0x%.4x\n", devno,
	613	link->io.BasePort1, link->io.BasePort1+link->io.NumPorts1);
	614	DEBUGP(2, dev, "<- reader_config (succ)\n");
	615
	616	return;
	617
	618	cs_failed:
	619	cs_error(handle, fail_fn, fail_rc);
	620	cs_release:
	621	reader_release(link);
	622	link->state &= ~DEV_CONFIG_PENDING;
	623	}
	624
77c44ab1 HW	625	static void reader_release(dev_link_t *link)
	626	{
	627	cm4040_reader_release(link->priv);
5f2a71fc	628	pcmcia_disable_device(link->handle);
77c44ab1 HW	629	}
77c44ab1 HW	630
f8cfa618	631	static int reader_attach(struct pcmcia_device *p_dev)
77c44ab1 HW	632	{
77c44ab1 HW	633	struct reader_dev *dev;
77c44ab1	634	int i;
fd238232	635	dev_link_t *link = dev_to_instance(p_dev);
77c44ab1 HW	636
	637	for (i = 0; i < CM_MAX_DEV; i++) {
	638	if (dev_table[i] == NULL)
	639	break;
	640	}
	641
	642	if (i == CM_MAX_DEV)
f8cfa618	643	return -ENODEV;
77c44ab1 HW	644
	645	dev = kzalloc(sizeof(struct reader_dev), GFP_KERNEL);
	646	if (dev == NULL)
f8cfa618	647	return -ENOMEM;
77c44ab1 HW	648
	649	dev->timeout = CCID_DRIVER_MINIMUM_TIMEOUT;
	650	dev->buffer_status = 0;
	651
77c44ab1	652	link->priv = dev;
fd238232	653	dev->p_dev = p_dev;
77c44ab1 HW	654
	655	link->conf.IntType = INT_MEMORY_AND_IO;
	656	dev_table[i] = link;
	657
77c44ab1 HW	658	init_waitqueue_head(&dev->devq);
	659	init_waitqueue_head(&dev->poll_wait);
	660	init_waitqueue_head(&dev->read_wait);
	661	init_waitqueue_head(&dev->write_wait);
	662	init_timer(&dev->poll_timer);
	663	dev->poll_timer.function = &cm4040_do_poll;
	664
f8cfa618 DB	665	link->state \|= DEV_PRESENT \| DEV_CONFIG_PENDING;
	666	reader_config(link, i);
	667
67bc6200 HW	668	class_device_create(cmx_class, NULL, MKDEV(major, i), NULL,
	669	"cmx%d", i);
	670
f8cfa618	671	return 0;
77c44ab1 HW	672	}
77c44ab1 HW	673
cc3b4866	674	static void reader_detach(struct pcmcia_device *p_dev)
77c44ab1	675	{
cc3b4866	676	dev_link_t *link = dev_to_instance(p_dev);
77c44ab1	677	struct reader_dev *dev = link->priv;
cc3b4866	678	int devno;
77c44ab1 HW	679
77c44ab1 HW	680	/* find device */
cc3b4866 DB	681	for (devno = 0; devno < CM_MAX_DEV; devno++) {
cc3b4866 DB	682	if (dev_table[devno] == link)
77c44ab1 HW	683	break;
77c44ab1 HW	684	}
cc3b4866	685	if (devno == CM_MAX_DEV)
77c44ab1 HW	686	return;
77c44ab1 HW	687
cc3b4866 DB	688	link->state &= ~DEV_PRESENT;
	689
	690	if (link->state & DEV_CONFIG)
	691	reader_release(link);
	692
	693	dev_table[devno] = NULL;
	694	kfree(dev);
	695
67bc6200 HW	696	class_device_destroy(cmx_class, MKDEV(major, devno));
67bc6200 HW	697
77c44ab1 HW	698	return;
	699	}
	700
	701	static struct file_operations reader_fops = {
	702	.owner = THIS_MODULE,
	703	.read = cm4040_read,
	704	.write = cm4040_write,
	705	.open = cm4040_open,
	706	.release = cm4040_close,
	707	.poll = cm4040_poll,
	708	};
	709
	710	static struct pcmcia_device_id cm4040_ids[] = {
	711	PCMCIA_DEVICE_MANF_CARD(0x0223, 0x0200),
	712	PCMCIA_DEVICE_PROD_ID12("OMNIKEY", "CardMan 4040",
	713	0xE32CDD8C, 0x8F23318B),
	714	PCMCIA_DEVICE_NULL,
	715	};
	716	MODULE_DEVICE_TABLE(pcmcia, cm4040_ids);
	717
	718	static struct pcmcia_driver reader_driver = {
	719	.owner = THIS_MODULE,
	720	.drv = {
	721	.name = "cm4040_cs",
	722	},
f8cfa618	723	.probe = reader_attach,
cc3b4866	724	.remove = reader_detach,
77c44ab1 HW	725	.id_table = cm4040_ids,
	726	};
	727
	728	static int __init cm4040_init(void)
	729	{
67bc6200 HW	730	int rc;
67bc6200 HW	731
77c44ab1	732	printk(KERN_INFO "%s\n", version);
67bc6200 HW	733	cmx_class = class_create(THIS_MODULE, "cardman_4040");
	734	if (!cmx_class)
	735	return -1;
	736
	737	rc = pcmcia_register_driver(&reader_driver);
	738	if (rc < 0)
	739	return rc;
	740
77c44ab1 HW	741	major = register_chrdev(0, DEVICE_NAME, &reader_fops);
	742	if (major < 0) {
	743	printk(KERN_WARNING MODULE_NAME
	744	": could not get major number\n");
	745	return -1;
	746	}
	747	return 0;
	748	}
	749
	750	static void __exit cm4040_exit(void)
	751	{
77c44ab1 HW	752	printk(KERN_INFO MODULE_NAME ": unloading\n");
77c44ab1 HW	753	pcmcia_unregister_driver(&reader_driver);
77c44ab1	754	unregister_chrdev(major, DEVICE_NAME);
67bc6200	755	class_destroy(cmx_class);
77c44ab1 HW	756	}
	757
	758	module_init(cm4040_init);
	759	module_exit(cm4040_exit);
	760	MODULE_LICENSE("Dual BSD/GPL");