[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/smp_lock.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))
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, 	\
			   __func__ , ##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(struct pcmcia_device *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 struct pcmcia_device *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 (!pcmcia_dev_present(dev->p_dev))
		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);
	min_bytes_to_read = min_t(size_t, min_bytes_to_read, READ_WRITE_BUFFER_SIZE);

	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) || (count > READ_WRITE_BUFFER_SIZE)) {
		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 (!pcmcia_dev_present(dev->p_dev))
		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;
	struct pcmcia_device *link;
	int minor = iminor(inode);
	int ret;

	if (minor >= CM_MAX_DEV)
		return -ENODEV;

	lock_kernel();
	link = dev_table[minor];
	if (link == NULL || !pcmcia_dev_present(link)) {
		ret = -ENODEV;
		goto out;
	}

	if (link->open) {
		ret = -EBUSY;
		goto out;
	}

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

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

	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");
	ret = nonseekable_open(inode, filp);
out:
	unlock_kernel();
	return ret;
}

static int cm4040_close(struct inode *inode, struct file *filp)
{
	struct reader_dev *dev = filp->private_data;
	struct pcmcia_device *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(struct pcmcia_device *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 int reader_config(struct pcmcia_device *link, int devno)
{
	struct reader_dev *dev;
	tuple_t tuple;
	cisparse_t parse;
	u_char buf[64];
	int fail_fn, fail_rc;
	int rc;

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

	link->io.BasePort2 = 0;
	link->io.NumPorts2 = 0;
	link->io.Attributes2 = 0;
	tuple.DesiredTuple = CISTPL_CFTABLE_ENTRY;
	for (rc = pcmcia_get_first_tuple(link, &tuple);
	     rc == CS_SUCCESS;
	     rc = pcmcia_get_next_tuple(link, &tuple)) {
		rc = pcmcia_get_tuple_data(link, &tuple);
		if (rc != CS_SUCCESS)
			continue;
		rc = pcmcia_parse_tuple(link, &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(link, &link->io);

		dev_printk(KERN_INFO, &handle_to_dev(link), "foo");
		if (rc == CS_SUCCESS)
			break;
		else
			dev_printk(KERN_INFO, &handle_to_dev(link),
				   "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(link,&link->conf))
								!=CS_SUCCESS) {
		fail_fn = RequestConfiguration;
		dev_printk(KERN_INFO, &handle_to_dev(link),
			   "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 = &dev->node;

	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 0;

cs_release:
	reader_release(link);
	return -ENODEV;
}

static void reader_release(struct pcmcia_device *link)
{
	cm4040_reader_release(link);
	pcmcia_disable_device(link);
}

static int reader_probe(struct pcmcia_device *link)
{
	struct reader_dev *dev;
	int i, ret;

	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 = link;

	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);
	setup_timer(&dev->poll_timer, cm4040_do_poll, 0);

	ret = reader_config(link, i);
	if (ret) {
		dev_table[i] = NULL;
		kfree(dev);
		return ret;
	}

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

	return 0;
}

static void reader_detach(struct pcmcia_device *link)
{
	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;

	reader_release(link);

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

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

	return;
}

static const 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_probe,
	.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 (IS_ERR(cmx_class))
		return PTR_ERR(cmx_class);

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

	rc = pcmcia_register_driver(&reader_driver);
	if (rc < 0) {
		unregister_chrdev(major, DEVICE_NAME);
		class_destroy(cmx_class);
		return rc;
	}

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