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 <linux/interrupt.h>
42 #include "../comedidev.h"
44 #include <linux/ioport.h>
46 #define DAS6402_SIZE 16
48 #define N_WORDS (3000*64)
54 #define BYTE unsigned char
55 #define WORD unsigned short
57 /*----- register 8 ----*/
62 #define ARMED 0x20 /* enable conting of post sample conv */
64 #define MHZ 0x80 /* 10 MHz clock */
65 /*---------------------*/
67 /*----- register 9 ----*/
68 #define IRQ (0x04 << 4) /* these two are */
69 #define IRQV 10 /* dependent on each other */
71 #define CONVSRC 0x03 /* trig src is Intarnal pacer */
72 #define BURSTEN 0x04 /* enable burst */
73 #define XINTE 0x08 /* use external int. trig */
74 #define INTE 0x80 /* enable analog interrupts */
75 /*---------------------*/
77 /*----- register 10 ---*/
78 #define TGEN 0x01 /* Use pin DI1 for externl trigging? */
79 #define TGSEL 0x02 /* Use edge triggering */
80 #define TGPOL 0x04 /* active edge is falling */
81 #define PRETRIG 0x08 /* pretrig */
82 /*---------------------*/
84 /*----- register 11 ---*/
86 #define FIFOHFULL 0x08
88 #define FIFONEPTY 0x04
92 /*---------------------*/
102 static int das6402_attach(struct comedi_device
*dev
,
103 struct comedi_devconfig
*it
);
104 static int das6402_detach(struct comedi_device
*dev
);
105 static struct comedi_driver driver_das6402
= {
106 .driver_name
= "das6402",
107 .module
= THIS_MODULE
,
108 .attach
= das6402_attach
,
109 .detach
= das6402_detach
,
112 COMEDI_INITCLEANUP(driver_das6402
);
114 struct das6402_private
{
115 int ai_bytes_to_read
;
117 int das6402_ignoreirq
;
119 #define devpriv ((struct das6402_private *)dev->private)
121 static void das6402_ai_fifo_dregs(struct comedi_device
*dev
,
122 struct comedi_subdevice
*s
);
124 static void das6402_setcounter(struct comedi_device
*dev
)
127 unsigned short ctrlwrd
;
129 /* set up counter0 first, mode 0 */
131 outb_p(p
, dev
->iobase
+ 15);
133 p
= (BYTE
) (0xff & ctrlwrd
);
134 outb_p(p
, dev
->iobase
+ 12);
135 p
= (BYTE
) (0xff & (ctrlwrd
>> 8));
136 outb_p(p
, dev
->iobase
+ 12);
138 /* set up counter1, mode 2 */
140 outb_p(p
, dev
->iobase
+ 15);
142 p
= (BYTE
) (0xff & ctrlwrd
);
143 outb_p(p
, dev
->iobase
+ 13);
144 p
= (BYTE
) (0xff & (ctrlwrd
>> 8));
145 outb_p(p
, dev
->iobase
+ 13);
147 /* set up counter1, mode 2 */
149 outb_p(p
, dev
->iobase
+ 15);
151 p
= (BYTE
) (0xff & ctrlwrd
);
152 outb_p(p
, dev
->iobase
+ 14);
153 p
= (BYTE
) (0xff & (ctrlwrd
>> 8));
154 outb_p(p
, dev
->iobase
+ 14);
157 static irqreturn_t
intr_handler(int irq
, void *d
)
159 struct comedi_device
*dev
= d
;
160 struct comedi_subdevice
*s
= dev
->subdevices
;
162 if (!dev
->attached
|| devpriv
->das6402_ignoreirq
) {
163 printk("das6402: BUG: spurious interrupt\n");
167 printk("das6402: interrupt! das6402_irqcount=%i\n",
168 devpriv
->das6402_irqcount
);
169 printk("das6402: iobase+2=%i\n", inw_p(dev
->iobase
+ 2));
172 das6402_ai_fifo_dregs(dev
, s
);
174 if (s
->async
->buf_write_count
>= devpriv
->ai_bytes_to_read
) {
175 outw_p(SCANL
, dev
->iobase
+ 2); /* clears the fifo */
176 outb(0x07, dev
->iobase
+ 8); /* clears all flip-flops */
178 printk("das6402: Got %i samples\n\n",
179 devpriv
->das6402_wordsread
- diff
);
181 s
->async
->events
|= COMEDI_CB_EOA
;
182 comedi_event(dev
, s
);
185 outb(0x01, dev
->iobase
+ 8); /* clear only the interrupt flip-flop */
187 comedi_event(dev
, s
);
192 static void das6402_ai_fifo_read(struct comedi_device
*dev
, short *data
, int n
)
196 for (i
= 0; i
< n
; i
++)
197 data
[i
] = inw(dev
->iobase
);
201 static void das6402_ai_fifo_dregs(struct comedi_device
*dev
,
202 struct comedi_subdevice
*s
)
205 if (!(inb(dev
->iobase
+ 8) & 0x01))
207 comedi_buf_put(s
->async
, inw(dev
->iobase
));
211 static int das6402_ai_cancel(struct comedi_device
*dev
,
212 struct comedi_subdevice
*s
)
215 * This function should reset the board from whatever condition it
216 * is in (i.e., acquiring data), to a non-active state.
219 devpriv
->das6402_ignoreirq
= 1;
221 printk("das6402: Stopping acquisition\n");
223 devpriv
->das6402_ignoreirq
= 1;
224 outb_p(0x02, dev
->iobase
+ 10); /* disable external trigging */
225 outw_p(SCANL
, dev
->iobase
+ 2); /* resets the card fifo */
226 outb_p(0, dev
->iobase
+ 9); /* disables interrupts */
228 outw_p(SCANL
, dev
->iobase
+ 2);
234 static int das6402_ai_mode2(struct comedi_device
*dev
,
235 struct comedi_subdevice
*s
, comedi_trig
* it
)
237 devpriv
->das6402_ignoreirq
= 1;
240 printk("das6402: Starting acquisition\n");
242 outb_p(0x03, dev
->iobase
+ 10); /* enable external trigging */
243 outw_p(SCANL
, dev
->iobase
+ 2); /* resets the card fifo */
244 outb_p(IRQ
| CONVSRC
| BURSTEN
| INTE
, dev
->iobase
+ 9);
246 devpriv
->ai_bytes_to_read
= it
->n
* sizeof(short);
248 /* um... ignoreirq is a nasty race condition */
249 devpriv
->das6402_ignoreirq
= 0;
251 outw_p(SCANL
, dev
->iobase
+ 2);
257 static int board_init(struct comedi_device
*dev
)
261 devpriv
->das6402_ignoreirq
= 1;
263 outb(0x07, dev
->iobase
+ 8);
266 outb_p(MODE
, dev
->iobase
+ 11);
267 b
= BIP
| SEM
| MODE
| GAIN
| FIFOHFULL
;
268 outb_p(b
, dev
->iobase
+ 11);
271 outb_p(EXTEND
, dev
->iobase
+ 8);
273 outb_p(b
, dev
->iobase
+ 8);
274 b
= MHZ
| CLRINT
| CLRXTR
| CLRXIN
;
275 outb_p(b
, dev
->iobase
+ 8);
278 b
= IRQ
| CONVSRC
| BURSTEN
| INTE
;
279 outb_p(b
, dev
->iobase
+ 9);
283 outb_p(b
, dev
->iobase
+ 10);
286 outb_p(b
, dev
->iobase
+ 8);
288 das6402_setcounter(dev
);
290 outw_p(SCANL
, dev
->iobase
+ 2); /* reset card fifo */
292 devpriv
->das6402_ignoreirq
= 0;
297 static int das6402_detach(struct comedi_device
*dev
)
300 free_irq(dev
->irq
, dev
);
302 release_region(dev
->iobase
, DAS6402_SIZE
);
307 static int das6402_attach(struct comedi_device
*dev
,
308 struct comedi_devconfig
*it
)
311 unsigned long iobase
;
313 struct comedi_subdevice
*s
;
315 dev
->board_name
= "das6402";
317 iobase
= it
->options
[0];
321 printk("comedi%d: das6402: 0x%04lx", dev
->minor
, iobase
);
323 if (!request_region(iobase
, DAS6402_SIZE
, "das6402")) {
324 printk(" I/O port conflict\n");
327 dev
->iobase
= iobase
;
329 /* should do a probe here */
331 irq
= it
->options
[0];
332 printk(" ( irq = %u )", irq
);
333 ret
= request_irq(irq
, intr_handler
, 0, "das6402", dev
);
335 printk("irq conflict\n");
340 ret
= alloc_private(dev
, sizeof(struct das6402_private
));
344 ret
= alloc_subdevices(dev
, 1);
349 s
= dev
->subdevices
+ 0;
350 s
->type
= COMEDI_SUBD_AI
;
351 s
->subdev_flags
= SDF_READABLE
| SDF_GROUND
;
353 /* s->trig[2]=das6402_ai_mode2; */
354 s
->cancel
= das6402_ai_cancel
;
355 s
->maxdata
= (1 << 12) - 1;
356 s
->len_chanlist
= 16; /* ? */
357 s
->range_table
= &range_unknown
;