1 /*
2 * comedi/drivers/das08.c
3 * DAS08 driver
4 *
5 * COMEDI - Linux Control and Measurement Device Interface
6 * Copyright (C) 2000 David A. Schleef <ds@schleef.org>
7 * Copyright (C) 2001,2002,2003 Frank Mori Hess <fmhess@users.sourceforge.net>
8 * Copyright (C) 2004 Salvador E. Tropea <set@users.sf.net> <set@ieee.org>
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 *
24 *****************************************************************
25 */
26
27 /*
28 * Driver: das08
29 * Description: DAS-08 compatible boards
30 * Author: Warren Jasper, ds, Frank Hess
31 * Devices: [Keithley Metrabyte] DAS08 (isa-das08),
32 * [ComputerBoards] DAS08 (isa-das08), DAS08-PGM (das08-pgm),
33 * DAS08-PGH (das08-pgh), DAS08-PGL (das08-pgl), DAS08-AOH (das08-aoh),
34 * DAS08-AOL (das08-aol), DAS08-AOM (das08-aom), DAS08/JR-AO (das08/jr-ao),
35 * DAS08/JR-16-AO (das08jr-16-ao), PCI-DAS08 (das08),
36 * PC104-DAS08 (pc104-das08), DAS08/JR/16 (das08jr/16)
37 * Status: works
38 *
39 * This is a rewrite of the das08 and das08jr drivers.
40 *
41 * Options (for ISA cards):
42 * [0] - base io address
43 *
44 * Options (for pci-das08):
45 * [0] - bus (optional)
46 * [1] = slot (optional)
47 *
48 * The das08 driver doesn't support asynchronous commands, since
49 * the cheap das08 hardware doesn't really support them. The
50 * comedi_rt_timer driver can be used to emulate commands for this
51 * driver.
52 */
53
54 #include "../comedidev.h"
55
56 #include <linux/delay.h>
57
58 #include "comedi_pci.h"
59 #include "8255.h"
60 #include "das08.h"
61
62 #define DRV_NAME "das08"
63
64 #define PCI_VENDOR_ID_COMPUTERBOARDS 0x1307
65 #define PCI_DEVICE_ID_PCIDAS08 0x29
66 #define PCIDAS08_SIZE 0x54
67
68 /* pci configuration registers */
69 #define INTCSR 0x4c
70 #define INTR1_ENABLE 0x1
71 #define INTR1_HIGH_POLARITY 0x2
72 #define PCI_INTR_ENABLE 0x40
73 #define INTR1_EDGE_TRIG 0x100 /* requires high polarity */
74 #define CNTRL 0x50
75 #define CNTRL_DIR 0x2
76 #define CNTRL_INTR 0x4
77
78 /*
79 cio-das08.pdf
80
81 "isa-das08"
82
83 0 a/d bits 0-3 start 8 bit
84 1 a/d bits 4-11 start 12 bit
85 2 eoc, ip1-3, irq, mux op1-4, inte, mux
86 3 unused unused
87 4567 8254
88 89ab 8255
89
90 requires hard-wiring for async ai
91
92 */
93
94 #define DAS08_LSB 0
95 #define DAS08_MSB 1
96 #define DAS08_TRIG_12BIT 1
97 #define DAS08_STATUS 2
98 #define DAS08_EOC (1<<7)
99 #define DAS08_IRQ (1<<3)
100 #define DAS08_IP(x) (((x)>>4)&0x7)
101 #define DAS08_CONTROL 2
102 #define DAS08_MUX_MASK 0x7
103 #define DAS08_MUX(x) ((x) & DAS08_MUX_MASK)
104 #define DAS08_INTE (1<<3)
105 #define DAS08_DO_MASK 0xf0
106 #define DAS08_OP(x) (((x) << 4) & DAS08_DO_MASK)
107
108 /*
109 cio-das08jr.pdf
110
111 "das08/jr-ao"
112
113 0 a/d bits 0-3 unused
114 1 a/d bits 4-11 start 12 bit
115 2 eoc, mux mux
116 3 di do
117 4 unused ao0_lsb
118 5 unused ao0_msb
119 6 unused ao1_lsb
120 7 unused ao1_msb
121
122 */
123
124 #define DAS08JR_DIO 3
125 #define DAS08JR_AO_LSB(x) ((x) ? 6 : 4)
126 #define DAS08JR_AO_MSB(x) ((x) ? 7 : 5)
127
128 /*
129 cio-das08_aox.pdf
130
131 "das08-aoh"
132 "das08-aol"
133 "das08-aom"
134
135 0 a/d bits 0-3 start 8 bit
136 1 a/d bits 4-11 start 12 bit
137 2 eoc, ip1-3, irq, mux op1-4, inte, mux
138 3 mux, gain status gain control
139 4567 8254
140 8 unused ao0_lsb
141 9 unused ao0_msb
142 a unused ao1_lsb
143 b unused ao1_msb
144 89ab
145 cdef 8255
146 */
147
148 #define DAS08AO_GAIN_CONTROL 3
149 #define DAS08AO_GAIN_STATUS 3
150
151 #define DAS08AO_AO_LSB(x) ((x) ? 0xa : 8)
152 #define DAS08AO_AO_MSB(x) ((x) ? 0xb : 9)
153 #define DAS08AO_AO_UPDATE 8
154
155 /* gainlist same as _pgx_ below */
156
157 static int das08_ai_rinsn(struct comedi_device *dev, struct comedi_subdevice *s,
158 struct comedi_insn *insn, unsigned int *data);
159 static int das08_di_rbits(struct comedi_device *dev, struct comedi_subdevice *s,
160 struct comedi_insn *insn, unsigned int *data);
161 static int das08_do_wbits(struct comedi_device *dev, struct comedi_subdevice *s,
162 struct comedi_insn *insn, unsigned int *data);
163 static int das08jr_di_rbits(struct comedi_device *dev,
164 struct comedi_subdevice *s,
165 struct comedi_insn *insn, unsigned int *data);
166 static int das08jr_do_wbits(struct comedi_device *dev,
167 struct comedi_subdevice *s,
168 struct comedi_insn *insn, unsigned int *data);
169 static int das08jr_ao_winsn(struct comedi_device *dev,
170 struct comedi_subdevice *s,
171 struct comedi_insn *insn, unsigned int *data);
172 static int das08ao_ao_winsn(struct comedi_device *dev,
173 struct comedi_subdevice *s,
174 struct comedi_insn *insn, unsigned int *data);
175 static void i8254_set_mode_low(unsigned int base, int channel,
176 unsigned int mode);
177
178 static const struct comedi_lrange range_das08_pgl = { 9, {
179 BIP_RANGE(10),
180 BIP_RANGE(5),
181 BIP_RANGE(2.5),
182 BIP_RANGE(1.25),
183 BIP_RANGE(0.625),
184 UNI_RANGE(10),
185 UNI_RANGE(5),
186 UNI_RANGE(2.5),
187 UNI_RANGE(1.25)
188 }
189 };
190
191 static const struct comedi_lrange range_das08_pgh = { 12, {
192 BIP_RANGE(10),
193 BIP_RANGE(5),
194 BIP_RANGE(1),
195 BIP_RANGE(0.5),
196 BIP_RANGE(0.1),
197 BIP_RANGE(0.05),
198 BIP_RANGE(0.01),
199 BIP_RANGE(0.005),
200 UNI_RANGE(10),
201 UNI_RANGE(1),
202 UNI_RANGE(0.1),
203 UNI_RANGE(0.01),
204 }
205 };
206
207 static const struct comedi_lrange range_das08_pgm = { 9, {
208 BIP_RANGE(10),
209 BIP_RANGE(5),
210 BIP_RANGE(0.5),
211 BIP_RANGE(0.05),
212 BIP_RANGE(0.01),
213 UNI_RANGE(10),
214 UNI_RANGE(1),
215 UNI_RANGE(0.1),
216 UNI_RANGE(0.01)
217 }
218 }; /*
219 cio-das08jr.pdf
220
221 "das08/jr-ao"
222
223 0 a/d bits 0-3 unused
224 1 a/d bits 4-11 start 12 bit
225 2 eoc, mux mux
226 3 di do
227 4 unused ao0_lsb
228 5 unused ao0_msb
229 6 unused ao1_lsb
230 7 unused ao1_msb
231
232 */
233
234 static const struct comedi_lrange *const das08_ai_lranges[] = {
235 &range_unknown,
236 &range_bipolar5,
237 &range_das08_pgh,
238 &range_das08_pgl,
239 &range_das08_pgm,
240 };
241
242 static const int das08_pgh_gainlist[] = {
243 8, 0, 10, 2, 12, 4, 14, 6, 1, 3, 5, 7
244 };
245 static const int das08_pgl_gainlist[] = { 8, 0, 2, 4, 6, 1, 3, 5, 7 };
246 static const int das08_pgm_gainlist[] = { 8, 0, 10, 12, 14, 9, 11, 13, 15 };
247
248 static const int *const das08_gainlists[] = {
249 NULL,
250 NULL,
251 das08_pgh_gainlist,
252 das08_pgl_gainlist,
253 das08_pgm_gainlist,
254 };
255
256 static const struct das08_board_struct das08_boards[] = {
257 {
258 .name = "isa-das08", /* cio-das08.pdf */
259 .bustype = isa,
260 .ai = das08_ai_rinsn,
261 .ai_nbits = 12,
262 .ai_pg = das08_pg_none,
263 .ai_encoding = das08_encode12,
264 .ao = NULL,
265 .ao_nbits = 12,
266 .di = das08_di_rbits,
267 .do_ = das08_do_wbits,
268 .do_nchan = 4,
269 .i8255_offset = 8,
270 .i8254_offset = 4,
271 .iosize = 16, /* unchecked */
272 },
273 {
274 .name = "das08-pgm", /* cio-das08pgx.pdf */
275 .bustype = isa,
276 .ai = das08_ai_rinsn,
277 .ai_nbits = 12,
278 .ai_pg = das08_pgm,
279 .ai_encoding = das08_encode12,
280 .ao = NULL,
281 .di = das08_di_rbits,
282 .do_ = das08_do_wbits,
283 .do_nchan = 4,
284 .i8255_offset = 0,
285 .i8254_offset = 0x04,
286 .iosize = 16, /* unchecked */
287 },
288 {
289 .name = "das08-pgh", /* cio-das08pgx.pdf */
290 .bustype = isa,
291 .ai = das08_ai_rinsn,
292 .ai_nbits = 12,
293 .ai_pg = das08_pgh,
294 .ai_encoding = das08_encode12,
295 .ao = NULL,
296 .di = das08_di_rbits,
297 .do_ = das08_do_wbits,
298 .do_nchan = 4,
299 .i8255_offset = 0,
300 .i8254_offset = 0x04,
301 .iosize = 16, /* unchecked */
302 },
303 {
304 .name = "das08-pgl", /* cio-das08pgx.pdf */
305 .bustype = isa,
306 .ai = das08_ai_rinsn,
307 .ai_nbits = 12,
308 .ai_pg = das08_pgl,
309 .ai_encoding = das08_encode12,
310 .ao = NULL,
311 .di = das08_di_rbits,
312 .do_ = das08_do_wbits,
313 .do_nchan = 4,
314 .i8255_offset = 0,
315 .i8254_offset = 0x04,
316 .iosize = 16, /* unchecked */
317 },
318 {
319 .name = "das08-aoh", /* cio-das08_aox.pdf */
320 .bustype = isa,
321 .ai = das08_ai_rinsn,
322 .ai_nbits = 12,
323 .ai_pg = das08_pgh,
324 .ai_encoding = das08_encode12,
325 .ao = das08ao_ao_winsn, /* 8 */
326 .ao_nbits = 12,
327 .di = das08_di_rbits,
328 .do_ = das08_do_wbits,
329 .do_nchan = 4,
330 .i8255_offset = 0x0c,
331 .i8254_offset = 0x04,
332 .iosize = 16, /* unchecked */
333 },
334 {
335 .name = "das08-aol", /* cio-das08_aox.pdf */
336 .bustype = isa,
337 .ai = das08_ai_rinsn,
338 .ai_nbits = 12,
339 .ai_pg = das08_pgl,
340 .ai_encoding = das08_encode12,
341 .ao = das08ao_ao_winsn, /* 8 */
342 .ao_nbits = 12,
343 .di = das08_di_rbits,
344 .do_ = das08_do_wbits,
345 .do_nchan = 4,
346 .i8255_offset = 0x0c,
347 .i8254_offset = 0x04,
348 .iosize = 16, /* unchecked */
349 },
350 {
351 .name = "das08-aom", /* cio-das08_aox.pdf */
352 .bustype = isa,
353 .ai = das08_ai_rinsn,
354 .ai_nbits = 12,
355 .ai_pg = das08_pgm,
356 .ai_encoding = das08_encode12,
357 .ao = das08ao_ao_winsn, /* 8 */
358 .ao_nbits = 12,
359 .di = das08_di_rbits,
360 .do_ = das08_do_wbits,
361 .do_nchan = 4,
362 .i8255_offset = 0x0c,
363 .i8254_offset = 0x04,
364 .iosize = 16, /* unchecked */
365 },
366 {
367 .name = "das08/jr-ao", /* cio-das08-jr-ao.pdf */
368 .bustype = isa,
369 .ai = das08_ai_rinsn,
370 .ai_nbits = 12,
371 .ai_pg = das08_pg_none,
372 .ai_encoding = das08_encode12,
373 .ao = das08jr_ao_winsn,
374 .ao_nbits = 12,
375 .di = das08jr_di_rbits,
376 .do_ = das08jr_do_wbits,
377 .do_nchan = 8,
378 .i8255_offset = 0,
379 .i8254_offset = 0,
380 .iosize = 16, /* unchecked */
381 },
382 {
383 .name = "das08jr-16-ao", /* cio-das08jr-16-ao.pdf */
384 .bustype = isa,
385 .ai = das08_ai_rinsn,
386 .ai_nbits = 16,
387 .ai_pg = das08_pg_none,
388 .ai_encoding = das08_encode12,
389 .ao = das08jr_ao_winsn,
390 .ao_nbits = 16,
391 .di = das08jr_di_rbits,
392 .do_ = das08jr_do_wbits,
393 .do_nchan = 8,
394 .i8255_offset = 0,
395 .i8254_offset = 0x04,
396 .iosize = 16, /* unchecked */
397 },
398 #ifdef CONFIG_COMEDI_PCI
399 {
400 .name = "das08", /* pci-das08 */
401 .id = PCI_DEVICE_ID_PCIDAS08,
402 .bustype = pci,
403 .ai = das08_ai_rinsn,
404 .ai_nbits = 12,
405 .ai_pg = das08_bipolar5,
406 .ai_encoding = das08_encode12,
407 .ao = NULL,
408 .ao_nbits = 0,
409 .di = das08_di_rbits,
410 .do_ = das08_do_wbits,
411 .do_nchan = 4,
412 .i8255_offset = 0,
413 .i8254_offset = 4,
414 .iosize = 8,
415 },
416 #endif
417 {
418 .name = "pc104-das08",
419 .bustype = pc104,
420 .ai = das08_ai_rinsn,
421 .ai_nbits = 12,
422 .ai_pg = das08_pg_none,
423 .ai_encoding = das08_encode12,
424 .ao = NULL,
425 .ao_nbits = 0,
426 .di = das08_di_rbits,
427 .do_ = das08_do_wbits,
428 .do_nchan = 4,
429 .i8255_offset = 0,
430 .i8254_offset = 4,
431 .iosize = 16, /* unchecked */
432 },
433 #if 0
434 {
435 .name = "das08/f",
436 },
437 {
438 .name = "das08jr",
439 },
440 #endif
441 {
442 .name = "das08jr/16",
443 .bustype = isa,
444 .ai = das08_ai_rinsn,
445 .ai_nbits = 16,
446 .ai_pg = das08_pg_none,
447 .ai_encoding = das08_encode16,
448 .ao = NULL,
449 .ao_nbits = 0,
450 .di = das08jr_di_rbits,
451 .do_ = das08jr_do_wbits,
452 .do_nchan = 8,
453 .i8255_offset = 0,
454 .i8254_offset = 0,
455 .iosize = 16, /* unchecked */
456 },
457 #if 0
458 {
459 .name = "das48-pga", /* cio-das48-pga.pdf */
460 },
461 {
462 .name = "das08-pga-g2", /* a KM board */
463 },
464 #endif
465 };
466
467 #ifdef CONFIG_COMEDI_PCMCIA
468 struct das08_board_struct das08_cs_boards[NUM_DAS08_CS_BOARDS] = {
469 {
470 .name = "pcm-das08",
471 .id = 0x0, /* XXX */
472 .bustype = pcmcia,
473 .ai = das08_ai_rinsn,
474 .ai_nbits = 12,
475 .ai_pg = das08_bipolar5,
476 .ai_encoding = das08_pcm_encode12,
477 .ao = NULL,
478 .ao_nbits = 0,
479 .di = das08_di_rbits,
480 .do_ = das08_do_wbits,
481 .do_nchan = 3,
482 .i8255_offset = 0,
483 .i8254_offset = 0,
484 .iosize = 16,
485 },
486 /* duplicate so driver name can be used also */
487 {
488 .name = "das08_cs",
489 .id = 0x0, /* XXX */
490 .bustype = pcmcia,
491 .ai = das08_ai_rinsn,
492 .ai_nbits = 12,
493 .ai_pg = das08_bipolar5,
494 .ai_encoding = das08_pcm_encode12,
495 .ao = NULL,
496 .ao_nbits = 0,
497 .di = das08_di_rbits,
498 .do_ = das08_do_wbits,
499 .do_nchan = 3,
500 .i8255_offset = 0,
501 .i8254_offset = 0,
502 .iosize = 16,
503 },
504 };
505 #endif
506
507 #ifdef CONFIG_COMEDI_PCI
508 static DEFINE_PCI_DEVICE_TABLE(das08_pci_table) = {
509 { PCI_DEVICE(PCI_VENDOR_ID_COMPUTERBOARDS, PCI_DEVICE_ID_PCIDAS08) },
510 {0}
511 };
512
513 MODULE_DEVICE_TABLE(pci, das08_pci_table);
514 #endif
515
516 #define devpriv ((struct das08_private_struct *)dev->private)
517 #define thisboard ((const struct das08_board_struct *)dev->board_ptr)
518
519 #define TIMEOUT 100000
520
das08_ai_rinsn(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)521 static int das08_ai_rinsn(struct comedi_device *dev, struct comedi_subdevice *s,
522 struct comedi_insn *insn, unsigned int *data)
523 {
524 int i, n;
525 int chan;
526 int range;
527 int lsb, msb;
528
529 chan = CR_CHAN(insn->chanspec);
530 range = CR_RANGE(insn->chanspec);
531
532 /* clear crap */
533 inb(dev->iobase + DAS08_LSB);
534 inb(dev->iobase + DAS08_MSB);
535
536 /* set multiplexer */
537 /* lock to prevent race with digital output */
538 spin_lock(&dev->spinlock);
539 devpriv->do_mux_bits &= ~DAS08_MUX_MASK;
540 devpriv->do_mux_bits |= DAS08_MUX(chan);
541 outb(devpriv->do_mux_bits, dev->iobase + DAS08_CONTROL);
542 spin_unlock(&dev->spinlock);
543
544 if (s->range_table->length > 1) {
545 /* set gain/range */
546 range = CR_RANGE(insn->chanspec);
547 outb(devpriv->pg_gainlist[range],
548 dev->iobase + DAS08AO_GAIN_CONTROL);
549 }
550
551 for (n = 0; n < insn->n; n++) {
552 /* clear over-range bits for 16-bit boards */
553 if (thisboard->ai_nbits == 16)
554 if (inb(dev->iobase + DAS08_MSB) & 0x80)
555 printk(KERN_INFO "das08: over-range\n");
556
557 /* trigger conversion */
558 outb_p(0, dev->iobase + DAS08_TRIG_12BIT);
559
560 for (i = 0; i < TIMEOUT; i++) {
561 if (!(inb(dev->iobase + DAS08_STATUS) & DAS08_EOC))
562 break;
563 }
564 if (i == TIMEOUT) {
565 printk(KERN_ERR "das08: timeout\n");
566 return -ETIME;
567 }
568 msb = inb(dev->iobase + DAS08_MSB);
569 lsb = inb(dev->iobase + DAS08_LSB);
570 if (thisboard->ai_encoding == das08_encode12) {
571 data[n] = (lsb >> 4) | (msb << 4);
572 } else if (thisboard->ai_encoding == das08_pcm_encode12) {
573 data[n] = (msb << 8) + lsb;
574 } else if (thisboard->ai_encoding == das08_encode16) {
575 /* FPOS 16-bit boards are sign-magnitude */
576 if (msb & 0x80)
577 data[n] = (1 << 15) | lsb | ((msb & 0x7f) << 8);
578 else
579 data[n] = (1 << 15) - (lsb | (msb & 0x7f) << 8);
580 } else {
581 comedi_error(dev, "bug! unknown ai encoding");
582 return -1;
583 }
584 }
585
586 return n;
587 }
588
das08_di_rbits(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)589 static int das08_di_rbits(struct comedi_device *dev, struct comedi_subdevice *s,
590 struct comedi_insn *insn, unsigned int *data)
591 {
592 data[0] = 0;
593 data[1] = DAS08_IP(inb(dev->iobase + DAS08_STATUS));
594
595 return 2;
596 }
597
das08_do_wbits(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)598 static int das08_do_wbits(struct comedi_device *dev, struct comedi_subdevice *s,
599 struct comedi_insn *insn, unsigned int *data)
600 {
601 int wbits;
602
603 /* get current settings of digital output lines */
604 wbits = (devpriv->do_mux_bits >> 4) & 0xf;
605 /* null bits we are going to set */
606 wbits &= ~data[0];
607 /* set new bit values */
608 wbits |= data[0] & data[1];
609 /* remember digital output bits */
610 /* prevent race with setting of analog input mux */
611 spin_lock(&dev->spinlock);
612 devpriv->do_mux_bits &= ~DAS08_DO_MASK;
613 devpriv->do_mux_bits |= DAS08_OP(wbits);
614 outb(devpriv->do_mux_bits, dev->iobase + DAS08_CONTROL);
615 spin_unlock(&dev->spinlock);
616
617 data[1] = wbits;
618
619 return 2;
620 }
621
das08jr_di_rbits(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)622 static int das08jr_di_rbits(struct comedi_device *dev,
623 struct comedi_subdevice *s,
624 struct comedi_insn *insn, unsigned int *data)
625 {
626 data[0] = 0;
627 data[1] = inb(dev->iobase + DAS08JR_DIO);
628
629 return 2;
630 }
631
das08jr_do_wbits(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)632 static int das08jr_do_wbits(struct comedi_device *dev,
633 struct comedi_subdevice *s,
634 struct comedi_insn *insn, unsigned int *data)
635 {
636 /* null bits we are going to set */
637 devpriv->do_bits &= ~data[0];
638 /* set new bit values */
639 devpriv->do_bits |= data[0] & data[1];
640 outb(devpriv->do_bits, dev->iobase + DAS08JR_DIO);
641
642 data[1] = devpriv->do_bits;
643
644 return 2;
645 }
646
das08jr_ao_winsn(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)647 static int das08jr_ao_winsn(struct comedi_device *dev,
648 struct comedi_subdevice *s,
649 struct comedi_insn *insn, unsigned int *data)
650 {
651 int n;
652 int lsb, msb;
653 int chan;
654
655 lsb = data[0] & 0xff;
656 msb = (data[0] >> 8) & 0xf;
657
658 chan = CR_CHAN(insn->chanspec);
659
660 for (n = 0; n < insn->n; n++) {
661 #if 0
662 outb(lsb, dev->iobase + devpriv->ao_offset_lsb[chan]);
663 outb(msb, dev->iobase + devpriv->ao_offset_msb[chan]);
664 #else
665 outb(lsb, dev->iobase + DAS08JR_AO_LSB(chan));
666 outb(msb, dev->iobase + DAS08JR_AO_MSB(chan));
667 #endif
668
669 /* load DACs */
670 inb(dev->iobase + DAS08JR_DIO);
671 }
672
673 return n;
674 }
675
676 /*
677 *
678 * The -aox boards have the DACs at a different offset and use
679 * a different method to force an update.
680 *
681 */
das08ao_ao_winsn(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)682 static int das08ao_ao_winsn(struct comedi_device *dev,
683 struct comedi_subdevice *s,
684 struct comedi_insn *insn, unsigned int *data)
685 {
686 int n;
687 int lsb, msb;
688 int chan;
689
690 lsb = data[0] & 0xff;
691 msb = (data[0] >> 8) & 0xf;
692
693 chan = CR_CHAN(insn->chanspec);
694
695 for (n = 0; n < insn->n; n++) {
696 #if 0
697 outb(lsb, dev->iobase + devpriv->ao_offset_lsb[chan]);
698 outb(msb, dev->iobase + devpriv->ao_offset_msb[chan]);
699 #else
700 outb(lsb, dev->iobase + DAS08AO_AO_LSB(chan));
701 outb(msb, dev->iobase + DAS08AO_AO_MSB(chan));
702 #endif
703
704 /* load DACs */
705 inb(dev->iobase + DAS08AO_AO_UPDATE);
706 }
707
708 return n;
709 }
710
i8254_read_channel_low(unsigned int base,int chan)711 static unsigned int i8254_read_channel_low(unsigned int base, int chan)
712 {
713 unsigned int msb, lsb;
714
715 /* The following instructions must be in order.
716 We must avoid other process reading the counter's value in the
717 middle.
718 The spin_lock isn't needed since ioctl calls grab the big kernel
719 lock automatically */
720 /*spin_lock(sp); */
721 outb(chan << 6, base + I8254_CTRL);
722 base += chan;
723 lsb = inb(base);
724 msb = inb(base);
725 /*spin_unlock(sp); */
726
727 return lsb | (msb << 8);
728 }
729
i8254_write_channel_low(unsigned int base,int chan,unsigned int value)730 static void i8254_write_channel_low(unsigned int base, int chan,
731 unsigned int value)
732 {
733 unsigned int msb, lsb;
734
735 lsb = value & 0xFF;
736 msb = value >> 8;
737
738 /* write lsb, then msb */
739 base += chan;
740 /* See comments in i8254_read_channel_low */
741 /*spin_lock(sp); */
742 outb(lsb, base);
743 outb(msb, base);
744 /*spin_unlock(sp); */
745 }
746
i8254_read_channel(struct i8254_struct * st,int channel)747 static unsigned int i8254_read_channel(struct i8254_struct *st, int channel)
748 {
749 int chan = st->logic2phys[channel];
750
751 return i8254_read_channel_low(st->iobase, chan);
752 }
753
i8254_write_channel(struct i8254_struct * st,int channel,unsigned int value)754 static void i8254_write_channel(struct i8254_struct *st, int channel,
755 unsigned int value)
756 {
757 int chan = st->logic2phys[channel];
758
759 i8254_write_channel_low(st->iobase, chan, value);
760 }
761
i8254_initialize(struct i8254_struct * st)762 static void i8254_initialize(struct i8254_struct *st)
763 {
764 int i;
765 for (i = 0; i < 3; ++i)
766 i8254_set_mode_low(st->iobase, i, st->mode[i]);
767 }
768
i8254_set_mode_low(unsigned int base,int channel,unsigned int mode)769 static void i8254_set_mode_low(unsigned int base, int channel,
770 unsigned int mode)
771 {
772 outb((channel << 6) | 0x30 | (mode & 0x0F), base + I8254_CTRL);
773 }
774
i8254_set_mode(struct i8254_struct * st,int channel,unsigned int mode)775 static void i8254_set_mode(struct i8254_struct *st, int channel,
776 unsigned int mode)
777 {
778 int chan = st->logic2phys[channel];
779
780 st->mode[chan] = mode;
781 return i8254_set_mode_low(st->iobase, chan, mode);
782 }
783
i8254_read_status_low(unsigned int base,int channel)784 static unsigned int i8254_read_status_low(unsigned int base, int channel)
785 {
786 outb(0xE0 | (2 << channel), base + I8254_CTRL);
787 return inb(base + channel);
788 }
789
i8254_read_status(struct i8254_struct * st,int channel)790 static unsigned int i8254_read_status(struct i8254_struct *st, int channel)
791 {
792 int chan = st->logic2phys[channel];
793
794 return i8254_read_status_low(st->iobase, chan);
795 }
796
das08_counter_read(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)797 static int das08_counter_read(struct comedi_device *dev,
798 struct comedi_subdevice *s,
799 struct comedi_insn *insn, unsigned int *data)
800 {
801 int chan = insn->chanspec;
802
803 /* printk("Reading counter channel %d ",chan); */
804 data[0] = i8254_read_channel(&devpriv->i8254, chan);
805 /* printk("=> 0x%08X\n",data[0]); */
806
807 return 1;
808 }
809
das08_counter_write(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)810 static int das08_counter_write(struct comedi_device *dev,
811 struct comedi_subdevice *s,
812 struct comedi_insn *insn, unsigned int *data)
813 {
814 int chan = insn->chanspec;
815
816 /* printk("Writing counter channel %d with 0x%04X\n",chan,data[0]); */
817 i8254_write_channel(&devpriv->i8254, chan, data[0]);
818
819 return 1;
820 }
821
das08_counter_config(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)822 static int das08_counter_config(struct comedi_device *dev,
823 struct comedi_subdevice *s,
824 struct comedi_insn *insn, unsigned int *data)
825 {
826 int chan = insn->chanspec;
827
828 if (insn->n != 2)
829 return -EINVAL;
830
831 switch (data[0]) {
832 case INSN_CONFIG_SET_COUNTER_MODE:
833 i8254_set_mode(&devpriv->i8254, chan, data[1]);
834 break;
835 case INSN_CONFIG_8254_READ_STATUS:
836 data[1] = i8254_read_status(&devpriv->i8254, chan);
837 break;
838 default:
839 return -EINVAL;
840 break;
841 }
842 return 2;
843 }
844
845 static int das08_attach(struct comedi_device *dev, struct comedi_devconfig *it);
846
847 static struct comedi_driver driver_das08 = {
848 .driver_name = DRV_NAME,
849 .module = THIS_MODULE,
850 .attach = das08_attach,
851 .detach = das08_common_detach,
852 .board_name = &das08_boards[0].name,
853 .num_names = sizeof(das08_boards) / sizeof(struct das08_board_struct),
854 .offset = sizeof(struct das08_board_struct),
855 };
856
das08_common_attach(struct comedi_device * dev,unsigned long iobase)857 int das08_common_attach(struct comedi_device *dev, unsigned long iobase)
858 {
859 struct comedi_subdevice *s;
860 int ret;
861
862 /* allocate ioports for non-pcmcia, non-pci boards */
863 if ((thisboard->bustype != pcmcia) && (thisboard->bustype != pci)) {
864 printk(KERN_INFO " iobase 0x%lx\n", iobase);
865 if (!request_region(iobase, thisboard->iosize, DRV_NAME)) {
866 printk(KERN_ERR " I/O port conflict\n");
867 return -EIO;
868 }
869 }
870 dev->iobase = iobase;
871
872 dev->board_name = thisboard->name;
873
874 ret = alloc_subdevices(dev, 6);
875 if (ret < 0)
876 return ret;
877
878 s = dev->subdevices + 0;
879 /* ai */
880 if (thisboard->ai) {
881 s->type = COMEDI_SUBD_AI;
882 /* XXX some boards actually have differential
883 * inputs instead of single ended.
884 * The driver does nothing with arefs though,
885 * so it's no big deal.
886 */
887 s->subdev_flags = SDF_READABLE | SDF_GROUND;
888 s->n_chan = 8;
889 s->maxdata = (1 << thisboard->ai_nbits) - 1;
890 s->range_table = das08_ai_lranges[thisboard->ai_pg];
891 s->insn_read = thisboard->ai;
892 devpriv->pg_gainlist = das08_gainlists[thisboard->ai_pg];
893 } else {
894 s->type = COMEDI_SUBD_UNUSED;
895 }
896
897 s = dev->subdevices + 1;
898 /* ao */
899 if (thisboard->ao) {
900 s->type = COMEDI_SUBD_AO;
901 /* XXX lacks read-back insn */
902 s->subdev_flags = SDF_WRITABLE;
903 s->n_chan = 2;
904 s->maxdata = (1 << thisboard->ao_nbits) - 1;
905 s->range_table = &range_bipolar5;
906 s->insn_write = thisboard->ao;
907 } else {
908 s->type = COMEDI_SUBD_UNUSED;
909 }
910
911 s = dev->subdevices + 2;
912 /* di */
913 if (thisboard->di) {
914 s->type = COMEDI_SUBD_DI;
915 s->subdev_flags = SDF_READABLE;
916 s->n_chan = (thisboard->di == das08_di_rbits) ? 3 : 8;
917 s->maxdata = 1;
918 s->range_table = &range_digital;
919 s->insn_bits = thisboard->di;
920 } else {
921 s->type = COMEDI_SUBD_UNUSED;
922 }
923
924 s = dev->subdevices + 3;
925 /* do */
926 if (thisboard->do_) {
927 s->type = COMEDI_SUBD_DO;
928 s->subdev_flags = SDF_WRITABLE | SDF_READABLE;
929 s->n_chan = thisboard->do_nchan;
930 s->maxdata = 1;
931 s->range_table = &range_digital;
932 s->insn_bits = thisboard->do_;
933 } else {
934 s->type = COMEDI_SUBD_UNUSED;
935 }
936
937 s = dev->subdevices + 4;
938 /* 8255 */
939 if (thisboard->i8255_offset != 0) {
940 subdev_8255_init(dev, s, NULL, (unsigned long)(dev->iobase +
941 thisboard->
942 i8255_offset));
943 } else {
944 s->type = COMEDI_SUBD_UNUSED;
945 }
946
947 s = dev->subdevices + 5;
948 /* 8254 */
949 if (thisboard->i8254_offset != 0) {
950 s->type = COMEDI_SUBD_COUNTER;
951 s->subdev_flags = SDF_WRITABLE | SDF_READABLE;
952 s->n_chan = 3;
953 s->maxdata = 0xFFFF;
954 s->insn_read = das08_counter_read;
955 s->insn_write = das08_counter_write;
956 s->insn_config = das08_counter_config;
957 /* Set-up the 8254 structure */
958 devpriv->i8254.channels = 3;
959 devpriv->i8254.logic2phys[0] = 0;
960 devpriv->i8254.logic2phys[1] = 1;
961 devpriv->i8254.logic2phys[2] = 2;
962 devpriv->i8254.iobase = iobase + thisboard->i8254_offset;
963 devpriv->i8254.mode[0] =
964 devpriv->i8254.mode[1] =
965 devpriv->i8254.mode[2] = I8254_MODE0 | I8254_BINARY;
966 i8254_initialize(&devpriv->i8254);
967 } else {
968 s->type = COMEDI_SUBD_UNUSED;
969 }
970
971 return 0;
972 }
973 EXPORT_SYMBOL_GPL(das08_common_attach);
974
das08_attach(struct comedi_device * dev,struct comedi_devconfig * it)975 static int das08_attach(struct comedi_device *dev, struct comedi_devconfig *it)
976 {
977 int ret;
978 unsigned long iobase;
979 #ifdef CONFIG_COMEDI_PCI
980 unsigned long pci_iobase = 0;
981 struct pci_dev *pdev = NULL;
982 #endif
983
984 ret = alloc_private(dev, sizeof(struct das08_private_struct));
985 if (ret < 0)
986 return ret;
987
988 printk(KERN_INFO "comedi%d: das08: ", dev->minor);
989 /* deal with a pci board */
990 if (thisboard->bustype == pci) {
991 #ifdef CONFIG_COMEDI_PCI
992 if (it->options[0] || it->options[1]) {
993 printk("bus %i slot %i ",
994 it->options[0], it->options[1]);
995 }
996 printk("\n");
997 /* find card */
998 for_each_pci_dev(pdev) {
999 if (pdev->vendor == PCI_VENDOR_ID_COMPUTERBOARDS
1000 && pdev->device == PCI_DEVICE_ID_PCIDAS08) {
1001 if (it->options[0] || it->options[1]) {
1002 if (pdev->bus->number == it->options[0]
1003 && PCI_SLOT(pdev->devfn) ==
1004 it->options[1]) {
1005 break;
1006 }
1007 } else {
1008 break;
1009 }
1010 }
1011 }
1012 if (!pdev) {
1013 printk(KERN_ERR "No pci das08 cards found\n");
1014 return -EIO;
1015 }
1016 devpriv->pdev = pdev;
1017 /* enable PCI device and reserve I/O spaces */
1018 if (comedi_pci_enable(pdev, DRV_NAME)) {
1019 printk(KERN_ERR " Error enabling PCI device and "
1020 "requesting regions\n");
1021 return -EIO;
1022 }
1023 /* read base addresses */
1024 pci_iobase = pci_resource_start(pdev, 1);
1025 iobase = pci_resource_start(pdev, 2);
1026 printk(KERN_INFO "pcibase 0x%lx iobase 0x%lx\n",
1027 pci_iobase, iobase);
1028 devpriv->pci_iobase = pci_iobase;
1029 #if 0
1030 /* We could enable to pci-das08's interrupt here to make it possible
1031 * to do timed input in this driver, but there is little point since
1032 * conversions would have to be started by the interrupt handler
1033 * so you might as well use comedi_rt_timer to emulate commands
1034 */
1035 /* set source of interrupt trigger to counter2 output */
1036 outb(CNTRL_INTR | CNTRL_DIR, pci_iobase + CNTRL);
1037 /* Enable local interrupt 1 and pci interrupt */
1038 outw(INTR1_ENABLE | PCI_INTR_ENABLE, pci_iobase + INTCSR);
1039 #endif
1040 #else /* CONFIG_COMEDI_PCI */
1041 printk(KERN_ERR "this driver has not been built with PCI support.\n");
1042 return -EINVAL;
1043 #endif /* CONFIG_COMEDI_PCI */
1044 } else {
1045 iobase = it->options[0];
1046 }
1047 printk(KERN_INFO "\n");
1048
1049 return das08_common_attach(dev, iobase);
1050 }
1051
1052
das08_common_detach(struct comedi_device * dev)1053 int das08_common_detach(struct comedi_device *dev)
1054 {
1055 printk(KERN_INFO "comedi%d: das08: remove\n", dev->minor);
1056
1057 if (dev->subdevices)
1058 subdev_8255_cleanup(dev, dev->subdevices + 4);
1059
1060 /* deallocate ioports for non-pcmcia, non-pci boards */
1061 if ((thisboard->bustype != pcmcia) && (thisboard->bustype != pci)) {
1062 if (dev->iobase)
1063 release_region(dev->iobase, thisboard->iosize);
1064 }
1065 #ifdef CONFIG_COMEDI_PCI
1066 if (devpriv) {
1067 if (devpriv->pdev) {
1068 if (devpriv->pci_iobase)
1069 comedi_pci_disable(devpriv->pdev);
1070
1071 pci_dev_put(devpriv->pdev);
1072 }
1073 }
1074 #endif
1075
1076 return 0;
1077 }
1078 EXPORT_SYMBOL_GPL(das08_common_detach);
1079
1080 #ifdef CONFIG_COMEDI_PCI
driver_das08_pci_probe(struct pci_dev * dev,const struct pci_device_id * ent)1081 static int __devinit driver_das08_pci_probe(struct pci_dev *dev,
1082 const struct pci_device_id *ent)
1083 {
1084 return comedi_pci_auto_config(dev, driver_das08.driver_name);
1085 }
1086
driver_das08_pci_remove(struct pci_dev * dev)1087 static void __devexit driver_das08_pci_remove(struct pci_dev *dev)
1088 {
1089 comedi_pci_auto_unconfig(dev);
1090 }
1091
1092 static struct pci_driver driver_das08_pci_driver = {
1093 .id_table = das08_pci_table,
1094 .probe = &driver_das08_pci_probe,
1095 .remove = __devexit_p(&driver_das08_pci_remove)
1096 };
1097
driver_das08_init_module(void)1098 static int __init driver_das08_init_module(void)
1099 {
1100 int retval;
1101
1102 retval = comedi_driver_register(&driver_das08);
1103 if (retval < 0)
1104 return retval;
1105
1106 driver_das08_pci_driver.name = (char *)driver_das08.driver_name;
1107 return pci_register_driver(&driver_das08_pci_driver);
1108 }
1109
driver_das08_cleanup_module(void)1110 static void __exit driver_das08_cleanup_module(void)
1111 {
1112 pci_unregister_driver(&driver_das08_pci_driver);
1113 comedi_driver_unregister(&driver_das08);
1114 }
1115
1116 module_init(driver_das08_init_module);
1117 module_exit(driver_das08_cleanup_module);
1118 #else
driver_das08_init_module(void)1119 static int __init driver_das08_init_module(void)
1120 {
1121 return comedi_driver_register(&driver_das08);
1122 }
1123
driver_das08_cleanup_module(void)1124 static void __exit driver_das08_cleanup_module(void)
1125 {
1126 comedi_driver_unregister(&driver_das08);
1127 }
1128
1129 module_init(driver_das08_init_module);
1130 module_exit(driver_das08_cleanup_module);
1131 #endif
1132
1133 #ifdef CONFIG_COMEDI_PCMCIA
1134 EXPORT_SYMBOL_GPL(das08_cs_boards);
1135 #endif
1136
1137 MODULE_AUTHOR("Comedi http://www.comedi.org");
1138 MODULE_DESCRIPTION("Comedi low-level driver");
1139 MODULE_LICENSE("GPL");
1140