2 Some comments on the code..
4 - it shouldn't be necessary to use outb_p().
6 - ignoreirq creates a race condition. It needs to be fixed.
11 comedi/drivers/das6402.c
12 An experimental driver for Computerboards' DAS6402 I/O card
14 Copyright (C) 1999 Oystein Svendsen <svendsen@pvv.org>
16 This program is free software; you can redistribute it and/or modify
17 it under the terms of the GNU General Public License as published by
18 the Free Software Foundation; either version 2 of the License, or
19 (at your option) any later version.
21 This program is distributed in the hope that it will be useful,
22 but WITHOUT ANY WARRANTY; without even the implied warranty of
23 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
24 GNU General Public License for more details.
26 You should have received a copy of the GNU General Public License
27 along with this program; if not, write to the Free Software
28 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
33 Description: Keithley Metrabyte DAS6402 (& compatibles)
34 Author: Oystein Svendsen <svendsen@pvv.org>
36 Devices: [Keithley Metrabyte] DAS6402 (das6402)
38 This driver has suffered bitrot.
41 #include "../comedidev.h"
43 #include <linux/ioport.h>
45 #define DAS6402_SIZE 16
47 #define N_WORDS 3000*64
53 #define BYTE unsigned char
54 #define WORD unsigned short
56 /*----- register 8 ----*/
61 #define ARMED 0x20 /* enable conting of post sample conv */
63 #define MHZ 0x80 /* 10 MHz clock */
64 /*---------------------*/
66 /*----- register 9 ----*/
67 #define IRQ (0x04 << 4) /* these two are */
68 #define IRQV 10 /* dependent on each other */
70 #define CONVSRC 0x03 /* trig src is Intarnal pacer */
71 #define BURSTEN 0x04 /* enable burst */
72 #define XINTE 0x08 /* use external int. trig */
73 #define INTE 0x80 /* enable analog interrupts */
74 /*---------------------*/
76 /*----- register 10 ---*/
77 #define TGEN 0x01 /* Use pin DI1 for externl trigging? */
78 #define TGSEL 0x02 /* Use edge triggering */
79 #define TGPOL 0x04 /* active edge is falling */
80 #define PRETRIG 0x08 /* pretrig */
81 /*---------------------*/
83 /*----- register 11 ---*/
85 #define FIFOHFULL 0x08
87 #define FIFONEPTY 0x04
91 /*---------------------*/
101 static int das6402_attach(struct comedi_device
* dev
, struct comedi_devconfig
* it
);
102 static int das6402_detach(struct comedi_device
* dev
);
103 static struct comedi_driver driver_das6402
= {
104 driver_name
:"das6402",
106 attach
:das6402_attach
,
107 detach
:das6402_detach
,
110 COMEDI_INITCLEANUP(driver_das6402
);
112 struct das6402_private
{
113 int ai_bytes_to_read
;
115 int das6402_ignoreirq
;
117 #define devpriv ((struct das6402_private *)dev->private)
119 static void das6402_ai_fifo_dregs(struct comedi_device
* dev
, struct comedi_subdevice
* s
);
121 static void das6402_setcounter(struct comedi_device
* dev
)
124 unsigned short ctrlwrd
;
126 /* set up counter0 first, mode 0 */
128 outb_p(p
, dev
->iobase
+ 15);
130 p
= (BYTE
) (0xff & ctrlwrd
);
131 outb_p(p
, dev
->iobase
+ 12);
132 p
= (BYTE
) (0xff & (ctrlwrd
>> 8));
133 outb_p(p
, dev
->iobase
+ 12);
135 /* set up counter1, mode 2 */
137 outb_p(p
, dev
->iobase
+ 15);
139 p
= (BYTE
) (0xff & ctrlwrd
);
140 outb_p(p
, dev
->iobase
+ 13);
141 p
= (BYTE
) (0xff & (ctrlwrd
>> 8));
142 outb_p(p
, dev
->iobase
+ 13);
144 /* set up counter1, mode 2 */
146 outb_p(p
, dev
->iobase
+ 15);
148 p
= (BYTE
) (0xff & ctrlwrd
);
149 outb_p(p
, dev
->iobase
+ 14);
150 p
= (BYTE
) (0xff & (ctrlwrd
>> 8));
151 outb_p(p
, dev
->iobase
+ 14);
154 static irqreturn_t
intr_handler(int irq
, void *d
)
156 struct comedi_device
*dev
= d
;
157 struct comedi_subdevice
*s
= dev
->subdevices
;
159 if (!dev
->attached
|| devpriv
->das6402_ignoreirq
) {
160 printk("das6402: BUG: spurious interrupt\n");
164 printk("das6402: interrupt! das6402_irqcount=%i\n",
165 devpriv
->das6402_irqcount
);
166 printk("das6402: iobase+2=%i\n", inw_p(dev
->iobase
+ 2));
169 das6402_ai_fifo_dregs(dev
, s
);
171 if (s
->async
->buf_write_count
>= devpriv
->ai_bytes_to_read
) {
172 outw_p(SCANL
, dev
->iobase
+ 2); /* clears the fifo */
173 outb(0x07, dev
->iobase
+ 8); /* clears all flip-flops */
175 printk("das6402: Got %i samples\n\n",
176 devpriv
->das6402_wordsread
- diff
);
178 s
->async
->events
|= COMEDI_CB_EOA
;
179 comedi_event(dev
, s
);
182 outb(0x01, dev
->iobase
+ 8); /* clear only the interrupt flip-flop */
184 comedi_event(dev
, s
);
189 static void das6402_ai_fifo_read(struct comedi_device
* dev
, short * data
, int n
)
193 for (i
= 0; i
< n
; i
++)
194 data
[i
] = inw(dev
->iobase
);
198 static void das6402_ai_fifo_dregs(struct comedi_device
* dev
, struct comedi_subdevice
* s
)
201 if (!(inb(dev
->iobase
+ 8) & 0x01))
203 comedi_buf_put(s
->async
, inw(dev
->iobase
));
207 static int das6402_ai_cancel(struct comedi_device
* dev
, struct comedi_subdevice
* s
)
210 * This function should reset the board from whatever condition it
211 * is in (i.e., acquiring data), to a non-active state.
214 devpriv
->das6402_ignoreirq
= 1;
216 printk("das6402: Stopping acquisition\n");
218 devpriv
->das6402_ignoreirq
= 1;
219 outb_p(0x02, dev
->iobase
+ 10); /* disable external trigging */
220 outw_p(SCANL
, dev
->iobase
+ 2); /* resets the card fifo */
221 outb_p(0, dev
->iobase
+ 9); /* disables interrupts */
223 outw_p(SCANL
, dev
->iobase
+ 2);
229 static int das6402_ai_mode2(struct comedi_device
* dev
, struct comedi_subdevice
* s
,
232 devpriv
->das6402_ignoreirq
= 1;
235 printk("das6402: Starting acquisition\n");
237 outb_p(0x03, dev
->iobase
+ 10); /* enable external trigging */
238 outw_p(SCANL
, dev
->iobase
+ 2); /* resets the card fifo */
239 outb_p(IRQ
| CONVSRC
| BURSTEN
| INTE
, dev
->iobase
+ 9);
241 devpriv
->ai_bytes_to_read
= it
->n
* sizeof(short);
243 /* um... ignoreirq is a nasty race condition */
244 devpriv
->das6402_ignoreirq
= 0;
246 outw_p(SCANL
, dev
->iobase
+ 2);
252 static int board_init(struct comedi_device
* dev
)
256 devpriv
->das6402_ignoreirq
= 1;
258 outb(0x07, dev
->iobase
+ 8);
261 outb_p(MODE
, dev
->iobase
+ 11);
262 b
= BIP
| SEM
| MODE
| GAIN
| FIFOHFULL
;
263 outb_p(b
, dev
->iobase
+ 11);
266 outb_p(EXTEND
, dev
->iobase
+ 8);
268 outb_p(b
, dev
->iobase
+ 8);
269 b
= MHZ
| CLRINT
| CLRXTR
| CLRXIN
;
270 outb_p(b
, dev
->iobase
+ 8);
273 b
= IRQ
| CONVSRC
| BURSTEN
| INTE
;
274 outb_p(b
, dev
->iobase
+ 9);
278 outb_p(b
, dev
->iobase
+ 10);
281 outb_p(b
, dev
->iobase
+ 8);
283 das6402_setcounter(dev
);
285 outw_p(SCANL
, dev
->iobase
+ 2); /* reset card fifo */
287 devpriv
->das6402_ignoreirq
= 0;
292 static int das6402_detach(struct comedi_device
* dev
)
295 comedi_free_irq(dev
->irq
, dev
);
297 release_region(dev
->iobase
, DAS6402_SIZE
);
302 static int das6402_attach(struct comedi_device
* dev
, struct comedi_devconfig
* it
)
305 unsigned long iobase
;
307 struct comedi_subdevice
*s
;
309 dev
->board_name
= "das6402";
311 iobase
= it
->options
[0];
315 printk("comedi%d: das6402: 0x%04lx", dev
->minor
, iobase
);
317 if (!request_region(iobase
, DAS6402_SIZE
, "das6402")) {
318 printk(" I/O port conflict\n");
321 dev
->iobase
= iobase
;
323 /* should do a probe here */
325 irq
= it
->options
[0];
326 printk(" ( irq = %u )", irq
);
327 ret
= comedi_request_irq(irq
, intr_handler
, 0, "das6402", dev
);
329 printk("irq conflict\n");
334 if ((ret
= alloc_private(dev
, sizeof(struct das6402_private
))) < 0)
337 if ((ret
= alloc_subdevices(dev
, 1)) < 0)
341 s
= dev
->subdevices
+ 0;
342 s
->type
= COMEDI_SUBD_AI
;
343 s
->subdev_flags
= SDF_READABLE
| SDF_GROUND
;
345 /* s->trig[2]=das6402_ai_mode2; */
346 s
->cancel
= das6402_ai_cancel
;
347 s
->maxdata
= (1 << 12) - 1;
348 s
->len_chanlist
= 16; /* ? */
349 s
->range_table
= &range_unknown
;