pcl726.c revision 139dfbdfacb02e3ef3df936d2fabd1ad5f14ea88
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 comedi_lrange range_4_20mA = { 1, {RANGE_mA(4, 20)} }; 94static const comedi_lrange range_0_20mA = { 1, {RANGE_mA(0, 20)} }; 95 96static const 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 comedi_lrange *const rangelist_727[] = { 103 &range_unipolar5, &range_unipolar10, 104 &range_bipolar5, 105 &range_4_20mA 106}; 107 108static const 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, 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 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 164typedef struct { 165 int bipolar[12]; 166 const comedi_lrange *rangelist[12]; 167 unsigned int ao_readback[12]; 168} pcl726_private; 169#define devpriv ((pcl726_private *)dev->private) 170 171static int pcl726_ao_insn(struct comedi_device * dev, struct comedi_subdevice * s, 172 comedi_insn * insn, unsigned int * data) 173{ 174 int hi, lo; 175 int n; 176 int chan = CR_CHAN(insn->chanspec); 177 178 for (n = 0; n < insn->n; n++) { 179 lo = data[n] & 0xff; 180 hi = (data[n] >> 8) & 0xf; 181 if (devpriv->bipolar[chan]) 182 hi ^= 0x8; 183 /* 184 * the programming info did not say which order 185 * to write bytes. switch the order of the next 186 * two lines if you get glitches. 187 */ 188 outb(hi, dev->iobase + PCL726_DAC0_HI + 2 * chan); 189 outb(lo, dev->iobase + PCL726_DAC0_LO + 2 * chan); 190 devpriv->ao_readback[chan] = data[n]; 191 } 192 193 return n; 194} 195 196static int pcl726_ao_insn_read(struct comedi_device * dev, struct comedi_subdevice * s, 197 comedi_insn * insn, unsigned int * data) 198{ 199 int chan = CR_CHAN(insn->chanspec); 200 int n; 201 202 for (n = 0; n < insn->n; n++) { 203 data[n] = devpriv->ao_readback[chan]; 204 } 205 return n; 206} 207 208static int pcl726_di_insn_bits(struct comedi_device * dev, struct comedi_subdevice * s, 209 comedi_insn * insn, unsigned int * data) 210{ 211 if (insn->n != 2) 212 return -EINVAL; 213 214 data[1] = inb(dev->iobase + this_board->di_lo) | 215 (inb(dev->iobase + this_board->di_hi) << 8); 216 217 return 2; 218} 219 220static int pcl726_do_insn_bits(struct comedi_device * dev, struct comedi_subdevice * s, 221 comedi_insn * insn, unsigned int * data) 222{ 223 if (insn->n != 2) 224 return -EINVAL; 225 226 if (data[0]) { 227 s->state &= ~data[0]; 228 s->state |= data[0] & data[1]; 229 } 230 if (data[1] & 0x00ff) 231 outb(s->state & 0xff, dev->iobase + this_board->do_lo); 232 if (data[1] & 0xff00) 233 outb((s->state >> 8), dev->iobase + this_board->do_hi); 234 235 data[1] = s->state; 236 237 return 2; 238} 239 240static int pcl726_attach(struct comedi_device * dev, comedi_devconfig * it) 241{ 242 struct comedi_subdevice *s; 243 unsigned long iobase; 244 unsigned int iorange; 245 int ret, i; 246#ifdef ACL6126_IRQ 247 unsigned int irq; 248#endif 249 250 iobase = it->options[0]; 251 iorange = this_board->io_range; 252 printk("comedi%d: pcl726: board=%s, 0x%03lx ", dev->minor, 253 this_board->name, iobase); 254 if (!request_region(iobase, iorange, "pcl726")) { 255 printk("I/O port conflict\n"); 256 return -EIO; 257 } 258 259 dev->iobase = iobase; 260 261 dev->board_name = this_board->name; 262 263 if ((ret = alloc_private(dev, sizeof(pcl726_private))) < 0) 264 return -ENOMEM; 265 266 for (i = 0; i < 12; i++) { 267 devpriv->bipolar[i] = 0; 268 devpriv->rangelist[i] = &range_unknown; 269 } 270 271#ifdef ACL6126_IRQ 272 irq = 0; 273 if (boardtypes[board].IRQbits != 0) { /* board support IRQ */ 274 irq = it->options[1]; 275 devpriv->first_chan = 2; 276 if (irq) { /* we want to use IRQ */ 277 if (((1 << irq) & boardtypes[board].IRQbits) == 0) { 278 rt_printk 279 (", IRQ %d is out of allowed range, DISABLING IT", 280 irq); 281 irq = 0; /* Bad IRQ */ 282 } else { 283 if (comedi_request_irq(irq, interrupt_pcl818, 0, 284 "pcl726", dev)) { 285 rt_printk 286 (", unable to allocate IRQ %d, DISABLING IT", 287 irq); 288 irq = 0; /* Can't use IRQ */ 289 } else { 290 rt_printk(", irq=%d", irq); 291 } 292 } 293 } 294 } 295 296 dev->irq = irq; 297#endif 298 299 printk("\n"); 300 301 if ((ret = alloc_subdevices(dev, 3)) < 0) 302 return ret; 303 304 s = dev->subdevices + 0; 305 /* ao */ 306 s->type = COMEDI_SUBD_AO; 307 s->subdev_flags = SDF_WRITABLE | SDF_GROUND; 308 s->n_chan = this_board->n_aochan; 309 s->maxdata = 0xfff; 310 s->len_chanlist = 1; 311 s->insn_write = pcl726_ao_insn; 312 s->insn_read = pcl726_ao_insn_read; 313 s->range_table_list = devpriv->rangelist; 314 for (i = 0; i < this_board->n_aochan; i++) { 315 int j; 316 317 j = it->options[2 + 1]; 318 if ((j < 0) || (j >= this_board->num_of_ranges)) { 319 printk("Invalid range for channel %d! Must be 0<=%d<%d\n", i, j, this_board->num_of_ranges - 1); 320 j = 0; 321 } 322 devpriv->rangelist[i] = this_board->range_type_list[j]; 323 if (devpriv->rangelist[i]->range[0].min == 324 -devpriv->rangelist[i]->range[0].max) 325 devpriv->bipolar[i] = 1; /* bipolar range */ 326 } 327 328 s = dev->subdevices + 1; 329 /* di */ 330 if (!this_board->have_dio) { 331 s->type = COMEDI_SUBD_UNUSED; 332 } else { 333 s->type = COMEDI_SUBD_DI; 334 s->subdev_flags = SDF_READABLE | SDF_GROUND; 335 s->n_chan = 16; 336 s->maxdata = 1; 337 s->len_chanlist = 1; 338 s->insn_bits = pcl726_di_insn_bits; 339 s->range_table = &range_digital; 340 } 341 342 s = dev->subdevices + 2; 343 /* do */ 344 if (!this_board->have_dio) { 345 s->type = COMEDI_SUBD_UNUSED; 346 } else { 347 s->type = COMEDI_SUBD_DO; 348 s->subdev_flags = SDF_WRITABLE | SDF_GROUND; 349 s->n_chan = 16; 350 s->maxdata = 1; 351 s->len_chanlist = 1; 352 s->insn_bits = pcl726_do_insn_bits; 353 s->range_table = &range_digital; 354 } 355 356 return 0; 357} 358 359static int pcl726_detach(struct comedi_device * dev) 360{ 361// printk("comedi%d: pcl726: remove\n",dev->minor); 362 363#ifdef ACL6126_IRQ 364 if (dev->irq) { 365 comedi_free_irq(dev->irq, dev); 366 } 367#endif 368 369 if (dev->iobase) 370 release_region(dev->iobase, this_board->io_range); 371 372 return 0; 373} 374