[deliverable/linux.git] / drivers / staging / comedi / drivers / pcm3724.c

/*
    comedi/drivers/pcm724.c

    Drew Csillag <drew_csillag@yahoo.com>

    hardware driver for Advantech card:
     card:   PCM-3724
     driver: pcm3724

    Options for PCM-3724
     [0] - IO Base
*/
/*
Driver: pcm3724
Description: Advantech PCM-3724
Author: Drew Csillag <drew_csillag@yahoo.com>
Devices: [Advantech] PCM-3724 (pcm724)
Status: tested

This is driver for digital I/O boards PCM-3724 with 48 DIO.
It needs 8255.o for operations and only immediate mode is supported.
See the source for configuration details.

Copy/pasted/hacked from pcm724.c
*/
/*
 * check_driver overrides:
 *   struct comedi_insn
 */

#include "../comedidev.h"

#include <linux/ioport.h>
#include <linux/delay.h>

#include "8255.h"

#define PCM3724_SIZE   16
#define SIZE_8255	4

#define BUF_C0 0x1
#define BUF_B0 0x2
#define BUF_A0 0x4
#define BUF_C1 0x8
#define BUF_B1 0x10
#define BUF_A1 0x20

#define GATE_A0 0x4
#define GATE_B0	0x2
#define GATE_C0	0x1
#define GATE_A1	0x20
#define GATE_B1	0x10
#define GATE_C1 0x8

/* from 8255.c */
#define CR_CW		0x80
#define _8255_CR 3
#define CR_B_IO		0x02
#define CR_B_MODE	0x04
#define CR_C_IO	        0x09
#define CR_A_IO		0x10
#define CR_A_MODE(a)	((a)<<5)
#define CR_CW		0x80

/* used to track configured dios */
struct priv_pcm3724 {
	int dio_1;
	int dio_2;
};

static int subdev_8255_cb(int dir, int port, int data, unsigned long arg)
{
	unsigned long iobase = arg;
	unsigned char inbres;
	/* printk("8255cb %d %d %d %lx\n", dir,port,data,arg); */
	if (dir) {
		/* printk("8255 cb   outb(%x, %lx)\n", data, iobase+port); */
		outb(data, iobase + port);
		return 0;
	} else {
		inbres = inb(iobase + port);
		/* printk("8255 cb   inb(%lx) = %x\n", iobase+port, inbres); */
		return inbres;
	}
}

static int compute_buffer(int config, int devno, struct comedi_subdevice *s)
{
	/* 1 in io_bits indicates output */
	if (s->io_bits & 0x0000ff) {
		if (devno == 0)
			config |= BUF_A0;
		else
			config |= BUF_A1;
	}
	if (s->io_bits & 0x00ff00) {
		if (devno == 0)
			config |= BUF_B0;
		else
			config |= BUF_B1;
	}
	if (s->io_bits & 0xff0000) {
		if (devno == 0)
			config |= BUF_C0;
		else
			config |= BUF_C1;
	}
	return config;
}

static void do_3724_config(struct comedi_device *dev,
			   struct comedi_subdevice *s, int chanspec)
{
	struct comedi_subdevice *s_dio1 = &dev->subdevices[0];
	struct comedi_subdevice *s_dio2 = &dev->subdevices[1];
	int config;
	int buffer_config;
	unsigned long port_8255_cfg;

	config = CR_CW;
	buffer_config = 0;

	/* 1 in io_bits indicates output, 1 in config indicates input */
	if (!(s->io_bits & 0x0000ff))
		config |= CR_A_IO;

	if (!(s->io_bits & 0x00ff00))
		config |= CR_B_IO;

	if (!(s->io_bits & 0xff0000))
		config |= CR_C_IO;

	buffer_config = compute_buffer(0, 0, s_dio1);
	buffer_config = compute_buffer(buffer_config, 1, s_dio2);

	if (s == s_dio1)
		port_8255_cfg = dev->iobase + _8255_CR;
	else
		port_8255_cfg = dev->iobase + SIZE_8255 + _8255_CR;

	outb(buffer_config, dev->iobase + 8);	/* update buffer register */
	/* printk("pcm3724 buffer_config (%lx) %d, %x\n",
	       dev->iobase + _8255_CR, chanspec, buffer_config); */

	outb(config, port_8255_cfg);
}

static void enable_chan(struct comedi_device *dev, struct comedi_subdevice *s,
			int chanspec)
{
	struct comedi_subdevice *s_dio1 = &dev->subdevices[0];
	unsigned int mask;
	int gatecfg;
	struct priv_pcm3724 *priv;

	gatecfg = 0;
	priv = dev->private;

	mask = 1 << CR_CHAN(chanspec);
	if (s == s_dio1)
		priv->dio_1 |= mask;
	else
		priv->dio_2 |= mask;

	if (priv->dio_1 & 0xff0000)
		gatecfg |= GATE_C0;

	if (priv->dio_1 & 0xff00)
		gatecfg |= GATE_B0;

	if (priv->dio_1 & 0xff)
		gatecfg |= GATE_A0;

	if (priv->dio_2 & 0xff0000)
		gatecfg |= GATE_C1;

	if (priv->dio_2 & 0xff00)
		gatecfg |= GATE_B1;

	if (priv->dio_2 & 0xff)
		gatecfg |= GATE_A1;

	/*       printk("gate control %x\n", gatecfg); */
	outb(gatecfg, dev->iobase + 9);
}

/* overriding the 8255 insn config */
static int subdev_3724_insn_config(struct comedi_device *dev,
				   struct comedi_subdevice *s,
				   struct comedi_insn *insn, unsigned int *data)
{
	unsigned int mask;
	unsigned int bits;

	mask = 1 << CR_CHAN(insn->chanspec);
	if (mask & 0x0000ff)
		bits = 0x0000ff;
	else if (mask & 0x00ff00)
		bits = 0x00ff00;
	else if (mask & 0x0f0000)
		bits = 0x0f0000;
	else
		bits = 0xf00000;

	switch (data[0]) {
	case INSN_CONFIG_DIO_INPUT:
		s->io_bits &= ~bits;
		break;
	case INSN_CONFIG_DIO_OUTPUT:
		s->io_bits |= bits;
		break;
	case INSN_CONFIG_DIO_QUERY:
		data[1] = (s->io_bits & bits) ? COMEDI_OUTPUT : COMEDI_INPUT;
		return insn->n;
		break;
	default:
		return -EINVAL;
	}

	do_3724_config(dev, s, insn->chanspec);
	enable_chan(dev, s, insn->chanspec);
	return 1;
}

static int pcm3724_attach(struct comedi_device *dev,
			  struct comedi_devconfig *it)
{
	struct comedi_subdevice *s;
	unsigned long iobase;
	unsigned int iorange;
	int ret, i;

	dev->board_name = dev->driver->driver_name;

	iobase = it->options[0];
	iorange = PCM3724_SIZE;

	ret = alloc_private(dev, sizeof(struct priv_pcm3724));
	if (ret < 0)
		return -ENOMEM;

	((struct priv_pcm3724 *)(dev->private))->dio_1 = 0;
	((struct priv_pcm3724 *)(dev->private))->dio_2 = 0;

	printk(KERN_INFO "comedi%d: pcm3724: board=%s, 0x%03lx ", dev->minor,
	       dev->board_name, iobase);
	if (!iobase || !request_region(iobase, iorange, "pcm3724")) {
		printk("I/O port conflict\n");
		return -EIO;
	}

	dev->iobase = iobase;
	printk(KERN_INFO "\n");

	ret = comedi_alloc_subdevices(dev, 2);
	if (ret)
		return ret;

	for (i = 0; i < dev->n_subdevices; i++) {
		s = &dev->subdevices[i];
		subdev_8255_init(dev, s, subdev_8255_cb,
				 (unsigned long)(dev->iobase + SIZE_8255 * i));
		s->insn_config = subdev_3724_insn_config;
	}
	return 0;
}

static void pcm3724_detach(struct comedi_device *dev)
{
	struct comedi_subdevice *s;
	int i;

	if (dev->subdevices) {
		for (i = 0; i < dev->n_subdevices; i++) {
			s = &dev->subdevices[i];
			subdev_8255_cleanup(dev, s);
		}
	}
	if (dev->iobase)
		release_region(dev->iobase, PCM3724_SIZE);
}

static struct comedi_driver pcm3724_driver = {
	.driver_name	= "pcm3724",
	.module		= THIS_MODULE,
	.attach		= pcm3724_attach,
	.detach		= pcm3724_detach,
};
module_comedi_driver(pcm3724_driver);

MODULE_AUTHOR("Comedi http://www.comedi.org");
MODULE_DESCRIPTION("Comedi low-level driver");
MODULE_LICENSE("GPL");
Commit	Line	Data
e30ec011 DC	1	/*
	2	comedi/drivers/pcm724.c
	3
	4	Drew Csillag <drew_csillag@yahoo.com>
	5
	6	hardware driver for Advantech card:
	7	card: PCM-3724
	8	driver: pcm3724
	9
	10	Options for PCM-3724
	11	[0] - IO Base
	12	*/
	13	/*
	14	Driver: pcm3724
	15	Description: Advantech PCM-3724
	16	Author: Drew Csillag <drew_csillag@yahoo.com>
	17	Devices: [Advantech] PCM-3724 (pcm724)
	18	Status: tested
	19
	20	This is driver for digital I/O boards PCM-3724 with 48 DIO.
	21	It needs 8255.o for operations and only immediate mode is supported.
	22	See the source for configuration details.
	23
	24	Copy/pasted/hacked from pcm724.c
	25	*/
	26	/*
	27	* check_driver overrides:
90035c08	28	* struct comedi_insn
e30ec011 DC	29	*/
	30
	31	#include "../comedidev.h"
	32
	33	#include <linux/ioport.h>
	34	#include <linux/delay.h>
	35
	36	#include "8255.h"
	37
	38	#define PCM3724_SIZE 16
	39	#define SIZE_8255 4
	40
	41	#define BUF_C0 0x1
	42	#define BUF_B0 0x2
	43	#define BUF_A0 0x4
	44	#define BUF_C1 0x8
	45	#define BUF_B1 0x10
	46	#define BUF_A1 0x20
	47
	48	#define GATE_A0 0x4
	49	#define GATE_B0 0x2
	50	#define GATE_C0 0x1
	51	#define GATE_A1 0x20
	52	#define GATE_B1 0x10
	53	#define GATE_C1 0x8
	54
	55	/* from 8255.c */
	56	#define CR_CW 0x80
	57	#define _8255_CR 3
	58	#define CR_B_IO 0x02
	59	#define CR_B_MODE 0x04
	60	#define CR_C_IO 0x09
	61	#define CR_A_IO 0x10
	62	#define CR_A_MODE(a) ((a)<<5)
	63	#define CR_CW 0x80
	64
2696fb57	65	/* used to track configured dios */
8e7b864b	66	struct priv_pcm3724 {
e30ec011 DC	67	int dio_1;
e30ec011 DC	68	int dio_2;
8e7b864b BP	69	};
8e7b864b BP	70
e30ec011 DC	71	static int subdev_8255_cb(int dir, int port, int data, unsigned long arg)
	72	{
	73	unsigned long iobase = arg;
	74	unsigned char inbres;
2696fb57	75	/* printk("8255cb %d %d %d %lx\n", dir,port,data,arg); */
e30ec011	76	if (dir) {
2696fb57	77	/* printk("8255 cb outb(%x, %lx)\n", data, iobase+port); */
e30ec011 DC	78	outb(data, iobase + port);
	79	return 0;
	80	} else {
	81	inbres = inb(iobase + port);
2696fb57	82	/* printk("8255 cb inb(%lx) = %x\n", iobase+port, inbres); */
e30ec011 DC	83	return inbres;
	84	}
	85	}
	86
da91b269	87	static int compute_buffer(int config, int devno, struct comedi_subdevice *s)
e30ec011 DC	88	{
	89	/* 1 in io_bits indicates output */
	90	if (s->io_bits & 0x0000ff) {
50ae2a52	91	if (devno == 0)
e30ec011	92	config \|= BUF_A0;
50ae2a52	93	else
e30ec011	94	config \|= BUF_A1;
e30ec011 DC	95	}
e30ec011 DC	96	if (s->io_bits & 0x00ff00) {
50ae2a52	97	if (devno == 0)
e30ec011	98	config \|= BUF_B0;
50ae2a52	99	else
e30ec011	100	config \|= BUF_B1;
e30ec011 DC	101	}
e30ec011 DC	102	if (s->io_bits & 0xff0000) {
50ae2a52	103	if (devno == 0)
e30ec011	104	config \|= BUF_C0;
50ae2a52	105	else
e30ec011	106	config \|= BUF_C1;
e30ec011 DC	107	}
	108	return config;
	109	}
	110
0a85b6f0 MT	111	static void do_3724_config(struct comedi_device *dev,
0a85b6f0 MT	112	struct comedi_subdevice *s, int chanspec)
e30ec011	113	{
0a96639f HS	114	struct comedi_subdevice *s_dio1 = &dev->subdevices[0];
0a96639f HS	115	struct comedi_subdevice *s_dio2 = &dev->subdevices[1];
e30ec011 DC	116	int config;
	117	int buffer_config;
	118	unsigned long port_8255_cfg;
	119
	120	config = CR_CW;
	121	buffer_config = 0;
	122
	123	/* 1 in io_bits indicates output, 1 in config indicates input */
50ae2a52	124	if (!(s->io_bits & 0x0000ff))
e30ec011	125	config \|= CR_A_IO;
50ae2a52 BA	126
50ae2a52 BA	127	if (!(s->io_bits & 0x00ff00))
e30ec011	128	config \|= CR_B_IO;
50ae2a52 BA	129
50ae2a52 BA	130	if (!(s->io_bits & 0xff0000))
e30ec011	131	config \|= CR_C_IO;
e30ec011	132
0a96639f HS	133	buffer_config = compute_buffer(0, 0, s_dio1);
0a96639f HS	134	buffer_config = compute_buffer(buffer_config, 1, s_dio2);
e30ec011	135
0a96639f	136	if (s == s_dio1)
e30ec011	137	port_8255_cfg = dev->iobase + _8255_CR;
50ae2a52	138	else
e30ec011	139	port_8255_cfg = dev->iobase + SIZE_8255 + _8255_CR;
50ae2a52	140
e30ec011	141	outb(buffer_config, dev->iobase + 8); /* update buffer register */
50ae2a52 BA	142	/* printk("pcm3724 buffer_config (%lx) %d, %x\n",
	143	dev->iobase + _8255_CR, chanspec, buffer_config); */
	144
e30ec011 DC	145	outb(config, port_8255_cfg);
	146	}
	147
0a85b6f0 MT	148	static void enable_chan(struct comedi_device dev, struct comedi_subdevice s,
0a85b6f0 MT	149	int chanspec)
e30ec011	150	{
0a96639f	151	struct comedi_subdevice *s_dio1 = &dev->subdevices[0];
e30ec011 DC	152	unsigned int mask;
e30ec011 DC	153	int gatecfg;
8e7b864b	154	struct priv_pcm3724 *priv;
e30ec011 DC	155
e30ec011 DC	156	gatecfg = 0;
440a6547	157	priv = dev->private;
e30ec011 DC	158
e30ec011 DC	159	mask = 1 << CR_CHAN(chanspec);
0a96639f	160	if (s == s_dio1)
e30ec011	161	priv->dio_1 \|= mask;
0a96639f	162	else
e30ec011	163	priv->dio_2 \|= mask;
50ae2a52 BA	164
50ae2a52 BA	165	if (priv->dio_1 & 0xff0000)
e30ec011	166	gatecfg \|= GATE_C0;
50ae2a52 BA	167
50ae2a52 BA	168	if (priv->dio_1 & 0xff00)
e30ec011	169	gatecfg \|= GATE_B0;
50ae2a52 BA	170
50ae2a52 BA	171	if (priv->dio_1 & 0xff)
e30ec011	172	gatecfg \|= GATE_A0;
50ae2a52 BA	173
50ae2a52 BA	174	if (priv->dio_2 & 0xff0000)
e30ec011	175	gatecfg \|= GATE_C1;
50ae2a52 BA	176
50ae2a52 BA	177	if (priv->dio_2 & 0xff00)
e30ec011	178	gatecfg \|= GATE_B1;
50ae2a52 BA	179
50ae2a52 BA	180	if (priv->dio_2 & 0xff)
e30ec011	181	gatecfg \|= GATE_A1;
50ae2a52	182
2696fb57	183	/* printk("gate control %x\n", gatecfg); */
e30ec011 DC	184	outb(gatecfg, dev->iobase + 9);
	185	}
	186
	187	/* overriding the 8255 insn config */
0a85b6f0 MT	188	static int subdev_3724_insn_config(struct comedi_device *dev,
	189	struct comedi_subdevice *s,
	190	struct comedi_insn insn, unsigned int data)
e30ec011 DC	191	{
	192	unsigned int mask;
	193	unsigned int bits;
	194
	195	mask = 1 << CR_CHAN(insn->chanspec);
50ae2a52	196	if (mask & 0x0000ff)
e30ec011	197	bits = 0x0000ff;
50ae2a52	198	else if (mask & 0x00ff00)
e30ec011	199	bits = 0x00ff00;
50ae2a52	200	else if (mask & 0x0f0000)
e30ec011	201	bits = 0x0f0000;
50ae2a52	202	else
e30ec011	203	bits = 0xf00000;
e30ec011 DC	204
	205	switch (data[0]) {
	206	case INSN_CONFIG_DIO_INPUT:
	207	s->io_bits &= ~bits;
	208	break;
	209	case INSN_CONFIG_DIO_OUTPUT:
	210	s->io_bits \|= bits;
	211	break;
	212	case INSN_CONFIG_DIO_QUERY:
	213	data[1] = (s->io_bits & bits) ? COMEDI_OUTPUT : COMEDI_INPUT;
	214	return insn->n;
	215	break;
	216	default:
	217	return -EINVAL;
	218	}
	219
	220	do_3724_config(dev, s, insn->chanspec);
	221	enable_chan(dev, s, insn->chanspec);
	222	return 1;
	223	}
	224
0a85b6f0 MT	225	static int pcm3724_attach(struct comedi_device *dev,
0a85b6f0 MT	226	struct comedi_devconfig *it)
e30ec011	227	{
0a96639f	228	struct comedi_subdevice *s;
e30ec011 DC	229	unsigned long iobase;
e30ec011 DC	230	unsigned int iorange;
5f1514bf HS	231	int ret, i;
	232
	233	dev->board_name = dev->driver->driver_name;
e30ec011 DC	234
e30ec011 DC	235	iobase = it->options[0];
5f1514bf	236	iorange = PCM3724_SIZE;
c3744138 BP	237
	238	ret = alloc_private(dev, sizeof(struct priv_pcm3724));
	239	if (ret < 0)
e30ec011 DC	240	return -ENOMEM;
e30ec011 DC	241
0a85b6f0 MT	242	((struct priv_pcm3724 *)(dev->private))->dio_1 = 0;
0a85b6f0 MT	243	((struct priv_pcm3724 *)(dev->private))->dio_2 = 0;
e30ec011	244
50ae2a52	245	printk(KERN_INFO "comedi%d: pcm3724: board=%s, 0x%03lx ", dev->minor,
5f1514bf	246	dev->board_name, iobase);
e30ec011 DC	247	if (!iobase \|\| !request_region(iobase, iorange, "pcm3724")) {
	248	printk("I/O port conflict\n");
	249	return -EIO;
	250	}
	251
	252	dev->iobase = iobase;
50ae2a52	253	printk(KERN_INFO "\n");
e30ec011	254
5f1514bf	255	ret = comedi_alloc_subdevices(dev, 2);
8b6c5694	256	if (ret)
e30ec011 DC	257	return ret;
	258
	259	for (i = 0; i < dev->n_subdevices; i++) {
0a96639f HS	260	s = &dev->subdevices[i];
0a96639f HS	261	subdev_8255_init(dev, s, subdev_8255_cb,
0a85b6f0	262	(unsigned long)(dev->iobase + SIZE_8255 * i));
0a96639f	263	s->insn_config = subdev_3724_insn_config;
273f4bef	264	}
e30ec011 DC	265	return 0;
	266	}
	267
484ecc95	268	static void pcm3724_detach(struct comedi_device *dev)
e30ec011	269	{
0a96639f	270	struct comedi_subdevice *s;
e30ec011 DC	271	int i;
	272
	273	if (dev->subdevices) {
0a96639f HS	274	for (i = 0; i < dev->n_subdevices; i++) {
	275	s = &dev->subdevices[i];
	276	subdev_8255_cleanup(dev, s);
	277	}
e30ec011	278	}
50ae2a52	279	if (dev->iobase)
5f1514bf	280	release_region(dev->iobase, PCM3724_SIZE);
e30ec011	281	}
90f703d3	282
294f930d	283	static struct comedi_driver pcm3724_driver = {
5f01bd51 HS	284	.driver_name = "pcm3724",
	285	.module = THIS_MODULE,
	286	.attach = pcm3724_attach,
	287	.detach = pcm3724_detach,
5f01bd51	288	};
294f930d	289	module_comedi_driver(pcm3724_driver);
5f01bd51	290
90f703d3 AT	291	MODULE_AUTHOR("Comedi http://www.comedi.org");
	292	MODULE_DESCRIPTION("Comedi low-level driver");
	293	MODULE_LICENSE("GPL");