pcl726.c revision bf7f0610c6c215fb8a8cd26b697902810ee5b9e9
1/* 2 comedi/drivers/pcl726.c 3 4 hardware driver for Advantech cards: 5 card: PCL-726, PCL-727, PCL-728 6 driver: pcl726, pcl727, pcl728 7 and for ADLink cards: 8 card: ACL-6126, ACL-6128 9 driver: acl6126, acl6128 10 11 COMEDI - Linux Control and Measurement Device Interface 12 Copyright (C) 1998 David A. Schleef <ds@schleef.org> 13 14 This program is free software; you can redistribute it and/or modify 15 it under the terms of the GNU General Public License as published by 16 the Free Software Foundation; either version 2 of the License, or 17 (at your option) any later version. 18 19 This program is distributed in the hope that it will be useful, 20 but WITHOUT ANY WARRANTY; without even the implied warranty of 21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 22 GNU General Public License for more details. 23 24 You should have received a copy of the GNU General Public License 25 along with this program; if not, write to the Free Software 26 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 27 28*/ 29/* 30Driver: pcl726 31Description: Advantech PCL-726 & compatibles 32Author: ds 33Status: untested 34Devices: [Advantech] PCL-726 (pcl726), PCL-727 (pcl727), PCL-728 (pcl728), 35 [ADLink] ACL-6126 (acl6126), ACL-6128 (acl6128) 36 37Interrupts are not supported. 38 39 Options for PCL-726: 40 [0] - IO Base 41 [2]...[7] - D/A output range for channel 1-6: 42 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V, 43 4: 4-20mA, 5: unknown (external reference) 44 45 Options for PCL-727: 46 [0] - IO Base 47 [2]...[13] - D/A output range for channel 1-12: 48 0: 0-5V, 1: 0-10V, 2: +/-5V, 49 3: 4-20mA 50 51 Options for PCL-728 and ACL-6128: 52 [0] - IO Base 53 [2], [3] - D/A output range for channel 1 and 2: 54 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V, 55 4: 4-20mA, 5: 0-20mA 56 57 Options for ACL-6126: 58 [0] - IO Base 59 [1] - IRQ (0=disable, 3, 5, 6, 7, 9, 10, 11, 12, 15) (currently ignored) 60 [2]...[7] - D/A output range for channel 1-6: 61 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V, 62 4: 4-20mA 63*/ 64 65/* 66 Thanks to Circuit Specialists for having programming info (!) on 67 their web page. (http://www.cir.com/) 68*/ 69 70#include "../comedidev.h" 71 72#include <linux/ioport.h> 73 74#undef ACL6126_IRQ /* no interrupt support (yet) */ 75 76#define PCL726_SIZE 16 77#define PCL727_SIZE 32 78#define PCL728_SIZE 8 79 80#define PCL726_DAC0_HI 0 81#define PCL726_DAC0_LO 1 82 83#define PCL726_DO_HI 12 84#define PCL726_DO_LO 13 85#define PCL726_DI_HI 14 86#define PCL726_DI_LO 15 87 88#define PCL727_DO_HI 24 89#define PCL727_DO_LO 25 90#define PCL727_DI_HI 0 91#define PCL727_DI_LO 1 92 93static const struct comedi_lrange range_4_20mA = { 1, {RANGE_mA(4, 20)} }; 94static const struct comedi_lrange range_0_20mA = { 1, {RANGE_mA(0, 20)} }; 95 96static const struct comedi_lrange *const rangelist_726[] = { 97 &range_unipolar5, &range_unipolar10, 98 &range_bipolar5, &range_bipolar10, 99 &range_4_20mA, &range_unknown 100}; 101 102static const struct comedi_lrange *const rangelist_727[] = { 103 &range_unipolar5, &range_unipolar10, 104 &range_bipolar5, 105 &range_4_20mA 106}; 107 108static const struct comedi_lrange *const rangelist_728[] = { 109 &range_unipolar5, &range_unipolar10, 110 &range_bipolar5, &range_bipolar10, 111 &range_4_20mA, &range_0_20mA 112}; 113 114static int pcl726_attach(struct comedi_device * dev, struct comedi_devconfig * it); 115static int pcl726_detach(struct comedi_device * dev); 116 117typedef struct { 118 const char *name; // driver name 119 int n_aochan; // num of D/A chans 120 int num_of_ranges; // num of ranges 121 unsigned int IRQbits; // allowed interrupts 122 unsigned int io_range; // len of IO space 123 char have_dio; // 1=card have DI/DO ports 124 int di_hi; // ports for DI/DO operations 125 int di_lo; 126 int do_hi; 127 int do_lo; 128 const struct comedi_lrange *const *range_type_list; // list of supported ranges 129} boardtype; 130 131static const boardtype boardtypes[] = { 132 {"pcl726", 6, 6, 0x0000, PCL726_SIZE, 1, 133 PCL726_DI_HI, PCL726_DI_LO, PCL726_DO_HI, PCL726_DO_LO, 134 &rangelist_726[0],}, 135 {"pcl727", 12, 4, 0x0000, PCL727_SIZE, 1, 136 PCL727_DI_HI, PCL727_DI_LO, PCL727_DO_HI, PCL727_DO_LO, 137 &rangelist_727[0],}, 138 {"pcl728", 2, 6, 0x0000, PCL728_SIZE, 0, 139 0, 0, 0, 0, 140 &rangelist_728[0],}, 141 {"acl6126", 6, 5, 0x96e8, PCL726_SIZE, 1, 142 PCL726_DI_HI, PCL726_DI_LO, PCL726_DO_HI, PCL726_DO_LO, 143 &rangelist_726[0],}, 144 {"acl6128", 2, 6, 0x0000, PCL728_SIZE, 0, 145 0, 0, 0, 0, 146 &rangelist_728[0],}, 147}; 148 149#define n_boardtypes (sizeof(boardtypes)/sizeof(boardtype)) 150#define this_board ((const boardtype *)dev->board_ptr) 151 152static struct comedi_driver driver_pcl726 = { 153 driver_name:"pcl726", 154 module:THIS_MODULE, 155 attach:pcl726_attach, 156 detach:pcl726_detach, 157 board_name:&boardtypes[0].name, 158 num_names:n_boardtypes, 159 offset:sizeof(boardtype), 160}; 161 162COMEDI_INITCLEANUP(driver_pcl726); 163 164struct pcl726_private { 165 166 int bipolar[12]; 167 const struct comedi_lrange *rangelist[12]; 168 unsigned int ao_readback[12]; 169}; 170 171#define devpriv ((struct pcl726_private *)dev->private) 172 173static int pcl726_ao_insn(struct comedi_device * dev, struct comedi_subdevice * s, 174 struct comedi_insn * insn, unsigned int * data) 175{ 176 int hi, lo; 177 int n; 178 int chan = CR_CHAN(insn->chanspec); 179 180 for (n = 0; n < insn->n; n++) { 181 lo = data[n] & 0xff; 182 hi = (data[n] >> 8) & 0xf; 183 if (devpriv->bipolar[chan]) 184 hi ^= 0x8; 185 /* 186 * the programming info did not say which order 187 * to write bytes. switch the order of the next 188 * two lines if you get glitches. 189 */ 190 outb(hi, dev->iobase + PCL726_DAC0_HI + 2 * chan); 191 outb(lo, dev->iobase + PCL726_DAC0_LO + 2 * chan); 192 devpriv->ao_readback[chan] = data[n]; 193 } 194 195 return n; 196} 197 198static int pcl726_ao_insn_read(struct comedi_device * dev, struct comedi_subdevice * s, 199 struct comedi_insn * insn, unsigned int * data) 200{ 201 int chan = CR_CHAN(insn->chanspec); 202 int n; 203 204 for (n = 0; n < insn->n; n++) { 205 data[n] = devpriv->ao_readback[chan]; 206 } 207 return n; 208} 209 210static int pcl726_di_insn_bits(struct comedi_device * dev, struct comedi_subdevice * s, 211 struct comedi_insn * insn, unsigned int * data) 212{ 213 if (insn->n != 2) 214 return -EINVAL; 215 216 data[1] = inb(dev->iobase + this_board->di_lo) | 217 (inb(dev->iobase + this_board->di_hi) << 8); 218 219 return 2; 220} 221 222static int pcl726_do_insn_bits(struct comedi_device * dev, struct comedi_subdevice * s, 223 struct comedi_insn * insn, unsigned int * data) 224{ 225 if (insn->n != 2) 226 return -EINVAL; 227 228 if (data[0]) { 229 s->state &= ~data[0]; 230 s->state |= data[0] & data[1]; 231 } 232 if (data[1] & 0x00ff) 233 outb(s->state & 0xff, dev->iobase + this_board->do_lo); 234 if (data[1] & 0xff00) 235 outb((s->state >> 8), dev->iobase + this_board->do_hi); 236 237 data[1] = s->state; 238 239 return 2; 240} 241 242static int pcl726_attach(struct comedi_device * dev, struct comedi_devconfig * it) 243{ 244 struct comedi_subdevice *s; 245 unsigned long iobase; 246 unsigned int iorange; 247 int ret, i; 248#ifdef ACL6126_IRQ 249 unsigned int irq; 250#endif 251 252 iobase = it->options[0]; 253 iorange = this_board->io_range; 254 printk("comedi%d: pcl726: board=%s, 0x%03lx ", dev->minor, 255 this_board->name, iobase); 256 if (!request_region(iobase, iorange, "pcl726")) { 257 printk("I/O port conflict\n"); 258 return -EIO; 259 } 260 261 dev->iobase = iobase; 262 263 dev->board_name = this_board->name; 264 265 if ((ret = alloc_private(dev, sizeof(struct pcl726_private))) < 0) 266 return -ENOMEM; 267 268 for (i = 0; i < 12; i++) { 269 devpriv->bipolar[i] = 0; 270 devpriv->rangelist[i] = &range_unknown; 271 } 272 273#ifdef ACL6126_IRQ 274 irq = 0; 275 if (boardtypes[board].IRQbits != 0) { /* board support IRQ */ 276 irq = it->options[1]; 277 devpriv->first_chan = 2; 278 if (irq) { /* we want to use IRQ */ 279 if (((1 << irq) & boardtypes[board].IRQbits) == 0) { 280 rt_printk 281 (", IRQ %d is out of allowed range, DISABLING IT", 282 irq); 283 irq = 0; /* Bad IRQ */ 284 } else { 285 if (comedi_request_irq(irq, interrupt_pcl818, 0, 286 "pcl726", dev)) { 287 rt_printk 288 (", unable to allocate IRQ %d, DISABLING IT", 289 irq); 290 irq = 0; /* Can't use IRQ */ 291 } else { 292 rt_printk(", irq=%d", irq); 293 } 294 } 295 } 296 } 297 298 dev->irq = irq; 299#endif 300 301 printk("\n"); 302 303 if ((ret = alloc_subdevices(dev, 3)) < 0) 304 return ret; 305 306 s = dev->subdevices + 0; 307 /* ao */ 308 s->type = COMEDI_SUBD_AO; 309 s->subdev_flags = SDF_WRITABLE | SDF_GROUND; 310 s->n_chan = this_board->n_aochan; 311 s->maxdata = 0xfff; 312 s->len_chanlist = 1; 313 s->insn_write = pcl726_ao_insn; 314 s->insn_read = pcl726_ao_insn_read; 315 s->range_table_list = devpriv->rangelist; 316 for (i = 0; i < this_board->n_aochan; i++) { 317 int j; 318 319 j = it->options[2 + 1]; 320 if ((j < 0) || (j >= this_board->num_of_ranges)) { 321 printk("Invalid range for channel %d! Must be 0<=%d<%d\n", i, j, this_board->num_of_ranges - 1); 322 j = 0; 323 } 324 devpriv->rangelist[i] = this_board->range_type_list[j]; 325 if (devpriv->rangelist[i]->range[0].min == 326 -devpriv->rangelist[i]->range[0].max) 327 devpriv->bipolar[i] = 1; /* bipolar range */ 328 } 329 330 s = dev->subdevices + 1; 331 /* di */ 332 if (!this_board->have_dio) { 333 s->type = COMEDI_SUBD_UNUSED; 334 } else { 335 s->type = COMEDI_SUBD_DI; 336 s->subdev_flags = SDF_READABLE | SDF_GROUND; 337 s->n_chan = 16; 338 s->maxdata = 1; 339 s->len_chanlist = 1; 340 s->insn_bits = pcl726_di_insn_bits; 341 s->range_table = &range_digital; 342 } 343 344 s = dev->subdevices + 2; 345 /* do */ 346 if (!this_board->have_dio) { 347 s->type = COMEDI_SUBD_UNUSED; 348 } else { 349 s->type = COMEDI_SUBD_DO; 350 s->subdev_flags = SDF_WRITABLE | SDF_GROUND; 351 s->n_chan = 16; 352 s->maxdata = 1; 353 s->len_chanlist = 1; 354 s->insn_bits = pcl726_do_insn_bits; 355 s->range_table = &range_digital; 356 } 357 358 return 0; 359} 360 361static int pcl726_detach(struct comedi_device * dev) 362{ 363// printk("comedi%d: pcl726: remove\n",dev->minor); 364 365#ifdef ACL6126_IRQ 366 if (dev->irq) { 367 comedi_free_irq(dev->irq, dev); 368 } 369#endif 370 371 if (dev->iobase) 372 release_region(dev->iobase, this_board->io_range); 373 374 return 0; 375} 376