Staging: comedi: add pcl726 driver
authorDavid Schleef <ds@schleef.org>
Thu, 19 Feb 2009 17:29:20 +0000 (09:29 -0800)
committerGreg Kroah-Hartman <gregkh@suse.de>
Fri, 3 Apr 2009 21:53:47 +0000 (14:53 -0700)
Driver for Advantech PCL-726 & compatibles

From: David Schleef <ds@schleef.org>
Cc: Ian Abbott <abbotti@mev.co.uk>
Cc: Frank Mori Hess <fmhess@users.sourceforge.net>
Signed-off-by: Greg Kroah-Hartman <gregkh@suse.de>
drivers/staging/comedi/drivers/pcl726.c [new file with mode: 0644]

diff --git a/drivers/staging/comedi/drivers/pcl726.c b/drivers/staging/comedi/drivers/pcl726.c
new file mode 100644 (file)
index 0000000..4850266
--- /dev/null
@@ -0,0 +1,373 @@
+/*
+    comedi/drivers/pcl726.c
+
+    hardware driver for Advantech cards:
+     card:   PCL-726, PCL-727, PCL-728
+     driver: pcl726,  pcl727,  pcl728
+    and for ADLink cards:
+     card:   ACL-6126, ACL-6128
+     driver: acl6126,  acl6128
+
+    COMEDI - Linux Control and Measurement Device Interface
+    Copyright (C) 1998 David A. Schleef <ds@schleef.org>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+*/
+/*
+Driver: pcl726
+Description: Advantech PCL-726 & compatibles
+Author: ds
+Status: untested
+Devices: [Advantech] PCL-726 (pcl726), PCL-727 (pcl727), PCL-728 (pcl728),
+  [ADLink] ACL-6126 (acl6126), ACL-6128 (acl6128)
+
+Interrupts are not supported.
+
+    Options for PCL-726:
+     [0] - IO Base
+     [2]...[7] - D/A output range for channel 1-6:
+               0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
+              4: 4-20mA, 5: unknown (external reference)
+
+    Options for PCL-727:
+     [0] - IO Base
+     [2]...[13] - D/A output range for channel 1-12:
+               0: 0-5V, 1: 0-10V, 2: +/-5V,
+              3: 4-20mA
+
+    Options for PCL-728 and ACL-6128:
+     [0] - IO Base
+     [2], [3] - D/A output range for channel 1 and 2:
+               0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
+              4: 4-20mA, 5: 0-20mA
+
+    Options for ACL-6126:
+     [0] - IO Base
+     [1] - IRQ (0=disable, 3, 5, 6, 7, 9, 10, 11, 12, 15) (currently ignored)
+     [2]...[7] - D/A output range for channel 1-6:
+               0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
+              4: 4-20mA
+*/
+
+/*
+    Thanks to Circuit Specialists for having programming info (!) on
+    their web page.  (http://www.cir.com/)
+*/
+
+#include "../comedidev.h"
+
+#include <linux/ioport.h>
+
+#undef ACL6126_IRQ             /* no interrupt support (yet) */
+
+#define PCL726_SIZE 16
+#define PCL727_SIZE 32
+#define PCL728_SIZE 8
+
+#define PCL726_DAC0_HI 0
+#define PCL726_DAC0_LO 1
+
+#define PCL726_DO_HI 12
+#define PCL726_DO_LO 13
+#define PCL726_DI_HI 14
+#define PCL726_DI_LO 15
+
+#define PCL727_DO_HI 24
+#define PCL727_DO_LO 25
+#define PCL727_DI_HI  0
+#define PCL727_DI_LO  1
+
+static const comedi_lrange range_4_20mA = { 1, {RANGE_mA(4, 20)} };
+static const comedi_lrange range_0_20mA = { 1, {RANGE_mA(0, 20)} };
+
+static const comedi_lrange *const rangelist_726[] = {
+       &range_unipolar5, &range_unipolar10,
+       &range_bipolar5, &range_bipolar10,
+       &range_4_20mA, &range_unknown
+};
+
+static const comedi_lrange *const rangelist_727[] = {
+       &range_unipolar5, &range_unipolar10,
+       &range_bipolar5,
+       &range_4_20mA
+};
+
+static const comedi_lrange *const rangelist_728[] = {
+       &range_unipolar5, &range_unipolar10,
+       &range_bipolar5, &range_bipolar10,
+       &range_4_20mA, &range_0_20mA
+};
+
+static int pcl726_attach(comedi_device * dev, comedi_devconfig * it);
+static int pcl726_detach(comedi_device * dev);
+
+typedef struct {
+       const char *name;       // driver name
+       int n_aochan;           // num of D/A chans
+       int num_of_ranges;      // num of ranges
+       unsigned int IRQbits;   // allowed interrupts
+       unsigned int io_range;  // len of IO space
+       char have_dio;          // 1=card have DI/DO ports
+       int di_hi;              // ports for DI/DO operations
+       int di_lo;
+       int do_hi;
+       int do_lo;
+       const comedi_lrange *const *range_type_list;    // list of supported ranges
+} boardtype;
+
+static const boardtype boardtypes[] = {
+       {"pcl726", 6, 6, 0x0000, PCL726_SIZE, 1,
+                       PCL726_DI_HI, PCL726_DI_LO, PCL726_DO_HI, PCL726_DO_LO,
+               &rangelist_726[0],},
+       {"pcl727", 12, 4, 0x0000, PCL727_SIZE, 1,
+                       PCL727_DI_HI, PCL727_DI_LO, PCL727_DO_HI, PCL727_DO_LO,
+               &rangelist_727[0],},
+       {"pcl728", 2, 6, 0x0000, PCL728_SIZE, 0,
+                       0, 0, 0, 0,
+               &rangelist_728[0],},
+       {"acl6126", 6, 5, 0x96e8, PCL726_SIZE, 1,
+                       PCL726_DI_HI, PCL726_DI_LO, PCL726_DO_HI, PCL726_DO_LO,
+               &rangelist_726[0],},
+       {"acl6128", 2, 6, 0x0000, PCL728_SIZE, 0,
+                       0, 0, 0, 0,
+               &rangelist_728[0],},
+};
+
+#define n_boardtypes (sizeof(boardtypes)/sizeof(boardtype))
+#define this_board ((const boardtype *)dev->board_ptr)
+
+static comedi_driver driver_pcl726 = {
+      driver_name:"pcl726",
+      module:THIS_MODULE,
+      attach:pcl726_attach,
+      detach:pcl726_detach,
+      board_name:&boardtypes[0].name,
+      num_names:n_boardtypes,
+      offset:sizeof(boardtype),
+};
+
+COMEDI_INITCLEANUP(driver_pcl726);
+
+typedef struct {
+       int bipolar[12];
+       const comedi_lrange *rangelist[12];
+       lsampl_t ao_readback[12];
+} pcl726_private;
+#define devpriv ((pcl726_private *)dev->private)
+
+static int pcl726_ao_insn(comedi_device * dev, comedi_subdevice * s,
+       comedi_insn * insn, lsampl_t * data)
+{
+       int hi, lo;
+       int n;
+       int chan = CR_CHAN(insn->chanspec);
+
+       for (n = 0; n < insn->n; n++) {
+               lo = data[n] & 0xff;
+               hi = (data[n] >> 8) & 0xf;
+               if (devpriv->bipolar[chan])
+                       hi ^= 0x8;
+               /*
+                * the programming info did not say which order
+                * to write bytes.  switch the order of the next
+                * two lines if you get glitches.
+                */
+               outb(hi, dev->iobase + PCL726_DAC0_HI + 2 * chan);
+               outb(lo, dev->iobase + PCL726_DAC0_LO + 2 * chan);
+               devpriv->ao_readback[chan] = data[n];
+       }
+
+       return n;
+}
+
+static int pcl726_ao_insn_read(comedi_device * dev, comedi_subdevice * s,
+       comedi_insn * insn, lsampl_t * data)
+{
+       int chan = CR_CHAN(insn->chanspec);
+       int n;
+
+       for (n = 0; n < insn->n; n++) {
+               data[n] = devpriv->ao_readback[chan];
+       }
+       return n;
+}
+
+static int pcl726_di_insn_bits(comedi_device * dev, comedi_subdevice * s,
+       comedi_insn * insn, lsampl_t * data)
+{
+       if (insn->n != 2)
+               return -EINVAL;
+
+       data[1] = inb(dev->iobase + this_board->di_lo) |
+               (inb(dev->iobase + this_board->di_hi) << 8);
+
+       return 2;
+}
+
+static int pcl726_do_insn_bits(comedi_device * dev, comedi_subdevice * s,
+       comedi_insn * insn, lsampl_t * data)
+{
+       if (insn->n != 2)
+               return -EINVAL;
+
+       if (data[0]) {
+               s->state &= ~data[0];
+               s->state |= data[0] & data[1];
+       }
+       if (data[1] & 0x00ff)
+               outb(s->state & 0xff, dev->iobase + this_board->do_lo);
+       if (data[1] & 0xff00)
+               outb((s->state >> 8), dev->iobase + this_board->do_hi);
+
+       data[1] = s->state;
+
+       return 2;
+}
+
+static int pcl726_attach(comedi_device * dev, comedi_devconfig * it)
+{
+       comedi_subdevice *s;
+       unsigned long iobase;
+       unsigned int iorange;
+       int ret, i;
+#ifdef ACL6126_IRQ
+       unsigned int irq;
+#endif
+
+       iobase = it->options[0];
+       iorange = this_board->io_range;
+       printk("comedi%d: pcl726: board=%s, 0x%03lx ", dev->minor,
+               this_board->name, iobase);
+       if (!request_region(iobase, iorange, "pcl726")) {
+               printk("I/O port conflict\n");
+               return -EIO;
+       }
+
+       dev->iobase = iobase;
+
+       dev->board_name = this_board->name;
+
+       if ((ret = alloc_private(dev, sizeof(pcl726_private))) < 0)
+               return -ENOMEM;
+
+       for (i = 0; i < 12; i++) {
+               devpriv->bipolar[i] = 0;
+               devpriv->rangelist[i] = &range_unknown;
+       }
+
+#ifdef ACL6126_IRQ
+       irq = 0;
+       if (boardtypes[board].IRQbits != 0) {   /* board support IRQ */
+               irq = it->options[1];
+               devpriv->first_chan = 2;
+               if (irq) {      /* we want to use IRQ */
+                       if (((1 << irq) & boardtypes[board].IRQbits) == 0) {
+                               rt_printk
+                                       (", IRQ %d is out of allowed range, DISABLING IT",
+                                       irq);
+                               irq = 0;        /* Bad IRQ */
+                       } else {
+                               if (comedi_request_irq(irq, interrupt_pcl818, 0,
+                                               "pcl726", dev)) {
+                                       rt_printk
+                                               (", unable to allocate IRQ %d, DISABLING IT",
+                                               irq);
+                                       irq = 0;        /* Can't use IRQ */
+                               } else {
+                                       rt_printk(", irq=%d", irq);
+                               }
+                       }
+               }
+       }
+
+       dev->irq = irq;
+#endif
+
+       printk("\n");
+
+       if ((ret = alloc_subdevices(dev, 3)) < 0)
+               return ret;
+
+       s = dev->subdevices + 0;
+       /* ao */
+       s->type = COMEDI_SUBD_AO;
+       s->subdev_flags = SDF_WRITABLE | SDF_GROUND;
+       s->n_chan = this_board->n_aochan;
+       s->maxdata = 0xfff;
+       s->len_chanlist = 1;
+       s->insn_write = pcl726_ao_insn;
+       s->insn_read = pcl726_ao_insn_read;
+       s->range_table_list = devpriv->rangelist;
+       for (i = 0; i < this_board->n_aochan; i++) {
+               int j;
+
+               j = it->options[2 + 1];
+               if ((j < 0) || (j >= this_board->num_of_ranges)) {
+                       printk("Invalid range for channel %d! Must be 0<=%d<%d\n", i, j, this_board->num_of_ranges - 1);
+                       j = 0;
+               }
+               devpriv->rangelist[i] = this_board->range_type_list[j];
+               if (devpriv->rangelist[i]->range[0].min ==
+                       -devpriv->rangelist[i]->range[0].max)
+                       devpriv->bipolar[i] = 1;        /* bipolar range */
+       }
+
+       s = dev->subdevices + 1;
+       /* di */
+       if (!this_board->have_dio) {
+               s->type = COMEDI_SUBD_UNUSED;
+       } else {
+               s->type = COMEDI_SUBD_DI;
+               s->subdev_flags = SDF_READABLE | SDF_GROUND;
+               s->n_chan = 16;
+               s->maxdata = 1;
+               s->len_chanlist = 1;
+               s->insn_bits = pcl726_di_insn_bits;
+               s->range_table = &range_digital;
+       }
+
+       s = dev->subdevices + 2;
+       /* do */
+       if (!this_board->have_dio) {
+               s->type = COMEDI_SUBD_UNUSED;
+       } else {
+               s->type = COMEDI_SUBD_DO;
+               s->subdev_flags = SDF_WRITABLE | SDF_GROUND;
+               s->n_chan = 16;
+               s->maxdata = 1;
+               s->len_chanlist = 1;
+               s->insn_bits = pcl726_do_insn_bits;
+               s->range_table = &range_digital;
+       }
+
+       return 0;
+}
+
+static int pcl726_detach(comedi_device * dev)
+{
+//      printk("comedi%d: pcl726: remove\n",dev->minor);
+
+#ifdef ACL6126_IRQ
+       if (dev->irq) {
+               comedi_free_irq(dev->irq, dev);
+       }
+#endif
+
+       if (dev->iobase)
+               release_region(dev->iobase, this_board->io_range);
+
+       return 0;
+}