Merge branch 'next/drivers' into HEAD
[deliverable/linux.git] / drivers / staging / comedi / drivers / dmm32at.c
CommitLineData
3c501880
PP
1/*
2 comedi/drivers/dmm32at.c
3 Diamond Systems mm32at code for a Comedi driver
4
5 COMEDI - Linux Control and Measurement Device Interface
6 Copyright (C) 2000 David A. Schleef <ds@schleef.org>
7
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
12
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21
22*/
23/*
24Driver: dmm32at
25Description: Diamond Systems mm32at driver.
26Devices:
27Author: Perry J. Piplani <perry.j.piplani@nasa.gov>
28Updated: Fri Jun 4 09:13:24 CDT 2004
29Status: experimental
30
31This driver is for the Diamond Systems MM-32-AT board
32http://www.diamondsystems.com/products/diamondmm32at It is being used
33on serveral projects inside NASA, without problems so far. For analog
34input commands, TRIG_EXT is not yet supported at all..
35
36Configuration Options:
37 comedi_config /dev/comedi0 dmm32at baseaddr,irq
38*/
39
25436dc9 40#include <linux/interrupt.h>
3c501880
PP
41#include "../comedidev.h"
42#include <linux/ioport.h>
43
27020ffe
HS
44#include "comedi_fc.h"
45
3c501880
PP
46/* Board register addresses */
47
48#define DMM32AT_MEMSIZE 0x10
49
50#define DMM32AT_CONV 0x00
51#define DMM32AT_AILSB 0x00
52#define DMM32AT_AUXDOUT 0x01
53#define DMM32AT_AIMSB 0x01
54#define DMM32AT_AILOW 0x02
55#define DMM32AT_AIHIGH 0x03
56
57#define DMM32AT_DACLSB 0x04
58#define DMM32AT_DACSTAT 0x04
59#define DMM32AT_DACMSB 0x05
60
61#define DMM32AT_FIFOCNTRL 0x07
62#define DMM32AT_FIFOSTAT 0x07
63
64#define DMM32AT_CNTRL 0x08
65#define DMM32AT_AISTAT 0x08
66
67#define DMM32AT_INTCLOCK 0x09
68
69#define DMM32AT_CNTRDIO 0x0a
70
71#define DMM32AT_AICONF 0x0b
72#define DMM32AT_AIRBACK 0x0b
73
74#define DMM32AT_CLK1 0x0d
75#define DMM32AT_CLK2 0x0e
76#define DMM32AT_CLKCT 0x0f
77
78#define DMM32AT_DIOA 0x0c
79#define DMM32AT_DIOB 0x0d
80#define DMM32AT_DIOC 0x0e
81#define DMM32AT_DIOCONF 0x0f
82
3c501880
PP
83/* Board register values. */
84
85/* DMM32AT_DACSTAT 0x04 */
86#define DMM32AT_DACBUSY 0x80
87
88/* DMM32AT_FIFOCNTRL 0x07 */
89#define DMM32AT_FIFORESET 0x02
90#define DMM32AT_SCANENABLE 0x04
91
92/* DMM32AT_CNTRL 0x08 */
93#define DMM32AT_RESET 0x20
94#define DMM32AT_INTRESET 0x08
95#define DMM32AT_CLKACC 0x00
96#define DMM32AT_DIOACC 0x01
97
98/* DMM32AT_AISTAT 0x08 */
99#define DMM32AT_STATUS 0x80
100
101/* DMM32AT_INTCLOCK 0x09 */
102#define DMM32AT_ADINT 0x80
103#define DMM32AT_CLKSEL 0x03
104
105/* DMM32AT_CNTRDIO 0x0a */
106#define DMM32AT_FREQ12 0x80
107
108/* DMM32AT_AICONF 0x0b */
109#define DMM32AT_RANGE_U10 0x0c
110#define DMM32AT_RANGE_U5 0x0d
111#define DMM32AT_RANGE_B10 0x08
112#define DMM32AT_RANGE_B5 0x00
113#define DMM32AT_SCINT_20 0x00
114#define DMM32AT_SCINT_15 0x10
115#define DMM32AT_SCINT_10 0x20
116#define DMM32AT_SCINT_5 0x30
117
118/* DMM32AT_CLKCT 0x0f */
119#define DMM32AT_CLKCT1 0x56 /* mode3 counter 1 - write low byte only */
120#define DMM32AT_CLKCT2 0xb6 /* mode3 counter 2 - write high and low byte */
121
122/* DMM32AT_DIOCONF 0x0f */
123#define DMM32AT_DIENABLE 0x80
124#define DMM32AT_DIRA 0x10
125#define DMM32AT_DIRB 0x02
126#define DMM32AT_DIRCL 0x01
127#define DMM32AT_DIRCH 0x08
128
129/* board AI ranges in comedi structure */
9ced1de6 130static const struct comedi_lrange dmm32at_airanges = {
3c501880
PP
131 4,
132 {
0a85b6f0
MT
133 UNI_RANGE(10),
134 UNI_RANGE(5),
135 BIP_RANGE(10),
136 BIP_RANGE(5),
137 }
3c501880
PP
138};
139
140/* register values for above ranges */
141static const unsigned char dmm32at_rangebits[] = {
142 DMM32AT_RANGE_U10,
143 DMM32AT_RANGE_U5,
144 DMM32AT_RANGE_B10,
145 DMM32AT_RANGE_B5,
146};
147
148/* only one of these ranges is valid, as set by a jumper on the
149 * board. The application should only use the range set by the jumper
150 */
9ced1de6 151static const struct comedi_lrange dmm32at_aoranges = {
3c501880
PP
152 4,
153 {
0a85b6f0
MT
154 UNI_RANGE(10),
155 UNI_RANGE(5),
156 BIP_RANGE(10),
157 BIP_RANGE(5),
158 }
3c501880
PP
159};
160
38baea3a 161struct dmm32at_board {
3c501880 162 const char *name;
38baea3a 163};
3c501880 164
39d31e09 165struct dmm32at_private {
3c501880
PP
166
167 int data;
168 int ai_inuse;
169 unsigned int ai_scans_left;
170
171 /* Used for AO readback */
790c5541 172 unsigned int ao_readback[4];
3c501880
PP
173 unsigned char dio_config;
174
39d31e09 175};
3c501880 176
0a85b6f0
MT
177static int dmm32at_ai_rinsn(struct comedi_device *dev,
178 struct comedi_subdevice *s,
179 struct comedi_insn *insn, unsigned int *data)
3c501880
PP
180{
181 int n, i;
182 unsigned int d;
183 unsigned char status;
184 unsigned short msb, lsb;
185 unsigned char chan;
186 int range;
187
188 /* get the channel and range number */
189
190 chan = CR_CHAN(insn->chanspec) & (s->n_chan - 1);
191 range = CR_RANGE(insn->chanspec);
192
2696fb57 193 /* printk("channel=0x%02x, range=%d\n",chan,range); */
3c501880
PP
194
195 /* zero scan and fifo control and reset fifo */
29f747c2 196 outb(DMM32AT_FIFORESET, dev->iobase + DMM32AT_FIFOCNTRL);
3c501880
PP
197
198 /* write the ai channel range regs */
29f747c2
HS
199 outb(chan, dev->iobase + DMM32AT_AILOW);
200 outb(chan, dev->iobase + DMM32AT_AIHIGH);
3c501880 201 /* set the range bits */
29f747c2 202 outb(dmm32at_rangebits[range], dev->iobase + DMM32AT_AICONF);
3c501880
PP
203
204 /* wait for circuit to settle */
205 for (i = 0; i < 40000; i++) {
99953ea1 206 status = inb(dev->iobase + DMM32AT_AIRBACK);
3c501880
PP
207 if ((status & DMM32AT_STATUS) == 0)
208 break;
209 }
210 if (i == 40000) {
27bf0bc9 211 printk(KERN_WARNING "dmm32at: timeout\n");
3c501880
PP
212 return -ETIMEDOUT;
213 }
214
215 /* convert n samples */
216 for (n = 0; n < insn->n; n++) {
217 /* trigger conversion */
29f747c2 218 outb(0xff, dev->iobase + DMM32AT_CONV);
3c501880
PP
219 /* wait for conversion to end */
220 for (i = 0; i < 40000; i++) {
99953ea1 221 status = inb(dev->iobase + DMM32AT_AISTAT);
3c501880
PP
222 if ((status & DMM32AT_STATUS) == 0)
223 break;
224 }
225 if (i == 40000) {
27bf0bc9 226 printk(KERN_WARNING "dmm32at: timeout\n");
3c501880
PP
227 return -ETIMEDOUT;
228 }
229
230 /* read data */
99953ea1
HS
231 lsb = inb(dev->iobase + DMM32AT_AILSB);
232 msb = inb(dev->iobase + DMM32AT_AIMSB);
3c501880
PP
233
234 /* invert sign bit to make range unsigned, this is an
25985edc 235 idiosyncrasy of the diamond board, it return
3c501880
PP
236 conversions as a signed value, i.e. -32768 to
237 32767, flipping the bit and interpreting it as
238 signed gives you a range of 0 to 65535 which is
239 used by comedi */
240 d = ((msb ^ 0x0080) << 8) + lsb;
241
242 data[n] = d;
243 }
244
245 /* return the number of samples read/written */
246 return n;
247}
248
47ae6a72
HS
249static int dmm32at_ns_to_timer(unsigned int *ns, int round)
250{
251 /* trivial timer */
47ae6a72
HS
252 return *ns;
253}
254
0a85b6f0
MT
255static int dmm32at_ai_cmdtest(struct comedi_device *dev,
256 struct comedi_subdevice *s,
257 struct comedi_cmd *cmd)
3c501880
PP
258{
259 int err = 0;
260 int tmp;
261 int start_chan, gain, i;
262
27020ffe 263 /* Step 1 : check if triggers are trivially valid */
3c501880 264
27020ffe
HS
265 err |= cfc_check_trigger_src(&cmd->start_src, TRIG_NOW);
266 err |= cfc_check_trigger_src(&cmd->scan_begin_src,
267 TRIG_TIMER /*| TRIG_EXT */);
268 err |= cfc_check_trigger_src(&cmd->convert_src,
269 TRIG_TIMER /*| TRIG_EXT */);
270 err |= cfc_check_trigger_src(&cmd->scan_end_src, TRIG_COUNT);
271 err |= cfc_check_trigger_src(&cmd->stop_src, TRIG_COUNT | TRIG_NONE);
3c501880
PP
272
273 if (err)
274 return 1;
275
27020ffe 276 /* Step 2a : make sure trigger sources are unique */
3c501880 277
27020ffe
HS
278 err |= cfc_check_trigger_is_unique(cmd->scan_begin_src);
279 err |= cfc_check_trigger_is_unique(cmd->convert_src);
280 err |= cfc_check_trigger_is_unique(cmd->stop_src);
281
282 /* Step 2b : and mutually compatible */
3c501880
PP
283
284 if (err)
285 return 2;
286
287 /* step 3: make sure arguments are trivially compatible */
288
289 if (cmd->start_arg != 0) {
290 cmd->start_arg = 0;
291 err++;
292 }
293#define MAX_SCAN_SPEED 1000000 /* in nanoseconds */
294#define MIN_SCAN_SPEED 1000000000 /* in nanoseconds */
295
296 if (cmd->scan_begin_src == TRIG_TIMER) {
297 if (cmd->scan_begin_arg < MAX_SCAN_SPEED) {
298 cmd->scan_begin_arg = MAX_SCAN_SPEED;
299 err++;
300 }
301 if (cmd->scan_begin_arg > MIN_SCAN_SPEED) {
302 cmd->scan_begin_arg = MIN_SCAN_SPEED;
303 err++;
304 }
305 } else {
306 /* external trigger */
307 /* should be level/edge, hi/lo specification here */
308 /* should specify multiple external triggers */
309 if (cmd->scan_begin_arg > 9) {
310 cmd->scan_begin_arg = 9;
311 err++;
312 }
313 }
314 if (cmd->convert_src == TRIG_TIMER) {
315 if (cmd->convert_arg >= 17500)
316 cmd->convert_arg = 20000;
317 else if (cmd->convert_arg >= 12500)
318 cmd->convert_arg = 15000;
319 else if (cmd->convert_arg >= 7500)
320 cmd->convert_arg = 10000;
321 else
322 cmd->convert_arg = 5000;
323
324 } else {
325 /* external trigger */
326 /* see above */
327 if (cmd->convert_arg > 9) {
328 cmd->convert_arg = 9;
329 err++;
330 }
331 }
332
333 if (cmd->scan_end_arg != cmd->chanlist_len) {
334 cmd->scan_end_arg = cmd->chanlist_len;
335 err++;
336 }
337 if (cmd->stop_src == TRIG_COUNT) {
338 if (cmd->stop_arg > 0xfffffff0) {
339 cmd->stop_arg = 0xfffffff0;
340 err++;
341 }
342 if (cmd->stop_arg == 0) {
343 cmd->stop_arg = 1;
344 err++;
345 }
346 } else {
347 /* TRIG_NONE */
348 if (cmd->stop_arg != 0) {
349 cmd->stop_arg = 0;
350 err++;
351 }
352 }
353
354 if (err)
355 return 3;
356
357 /* step 4: fix up any arguments */
358
359 if (cmd->scan_begin_src == TRIG_TIMER) {
360 tmp = cmd->scan_begin_arg;
361 dmm32at_ns_to_timer(&cmd->scan_begin_arg,
0a85b6f0 362 cmd->flags & TRIG_ROUND_MASK);
3c501880
PP
363 if (tmp != cmd->scan_begin_arg)
364 err++;
365 }
366 if (cmd->convert_src == TRIG_TIMER) {
367 tmp = cmd->convert_arg;
368 dmm32at_ns_to_timer(&cmd->convert_arg,
0a85b6f0 369 cmd->flags & TRIG_ROUND_MASK);
3c501880
PP
370 if (tmp != cmd->convert_arg)
371 err++;
372 if (cmd->scan_begin_src == TRIG_TIMER &&
0a85b6f0
MT
373 cmd->scan_begin_arg <
374 cmd->convert_arg * cmd->scan_end_arg) {
3c501880 375 cmd->scan_begin_arg =
0a85b6f0 376 cmd->convert_arg * cmd->scan_end_arg;
3c501880
PP
377 err++;
378 }
379 }
380
381 if (err)
382 return 4;
383
384 /* step 5 check the channel list, the channel list for this
385 board must be consecutive and gains must be the same */
386
387 if (cmd->chanlist) {
388 gain = CR_RANGE(cmd->chanlist[0]);
389 start_chan = CR_CHAN(cmd->chanlist[0]);
390 for (i = 1; i < cmd->chanlist_len; i++) {
391 if (CR_CHAN(cmd->chanlist[i]) !=
0a85b6f0 392 (start_chan + i) % s->n_chan) {
3c501880 393 comedi_error(dev,
0a85b6f0 394 "entries in chanlist must be consecutive channels, counting upwards\n");
3c501880
PP
395 err++;
396 }
397 if (CR_RANGE(cmd->chanlist[i]) != gain) {
398 comedi_error(dev,
0a85b6f0 399 "entries in chanlist must all have the same gain\n");
3c501880
PP
400 err++;
401 }
402 }
403 }
404
405 if (err)
406 return 5;
407
408 return 0;
409}
410
47ae6a72
HS
411static void dmm32at_setaitimer(struct comedi_device *dev, unsigned int nansec)
412{
413 unsigned char lo1, lo2, hi2;
414 unsigned short both2;
415
416 /* based on 10mhz clock */
417 lo1 = 200;
418 both2 = nansec / 20000;
419 hi2 = (both2 & 0xff00) >> 8;
420 lo2 = both2 & 0x00ff;
421
422 /* set the counter frequency to 10mhz */
29f747c2 423 outb(0, dev->iobase + DMM32AT_CNTRDIO);
47ae6a72
HS
424
425 /* get access to the clock regs */
29f747c2 426 outb(DMM32AT_CLKACC, dev->iobase + DMM32AT_CNTRL);
47ae6a72
HS
427
428 /* write the counter 1 control word and low byte to counter */
29f747c2
HS
429 outb(DMM32AT_CLKCT1, dev->iobase + DMM32AT_CLKCT);
430 outb(lo1, dev->iobase + DMM32AT_CLK1);
47ae6a72
HS
431
432 /* write the counter 2 control word and low byte then to counter */
29f747c2
HS
433 outb(DMM32AT_CLKCT2, dev->iobase + DMM32AT_CLKCT);
434 outb(lo2, dev->iobase + DMM32AT_CLK2);
435 outb(hi2, dev->iobase + DMM32AT_CLK2);
47ae6a72
HS
436
437 /* enable the ai conversion interrupt and the clock to start scans */
29f747c2 438 outb(DMM32AT_ADINT | DMM32AT_CLKSEL, dev->iobase + DMM32AT_INTCLOCK);
47ae6a72
HS
439}
440
da91b269 441static int dmm32at_ai_cmd(struct comedi_device *dev, struct comedi_subdevice *s)
3c501880 442{
3eff0174 443 struct dmm32at_private *devpriv = dev->private;
ea6d0d4c 444 struct comedi_cmd *cmd = &s->async->cmd;
3c501880
PP
445 int i, range;
446 unsigned char chanlo, chanhi, status;
447
448 if (!cmd->chanlist)
449 return -EINVAL;
450
451 /* get the channel list and range */
452 chanlo = CR_CHAN(cmd->chanlist[0]) & (s->n_chan - 1);
453 chanhi = chanlo + cmd->chanlist_len - 1;
454 if (chanhi >= s->n_chan)
455 return -EINVAL;
456 range = CR_RANGE(cmd->chanlist[0]);
457
458 /* reset fifo */
29f747c2 459 outb(DMM32AT_FIFORESET, dev->iobase + DMM32AT_FIFOCNTRL);
3c501880
PP
460
461 /* set scan enable */
29f747c2 462 outb(DMM32AT_SCANENABLE, dev->iobase + DMM32AT_FIFOCNTRL);
3c501880
PP
463
464 /* write the ai channel range regs */
29f747c2
HS
465 outb(chanlo, dev->iobase + DMM32AT_AILOW);
466 outb(chanhi, dev->iobase + DMM32AT_AIHIGH);
3c501880
PP
467
468 /* set the range bits */
29f747c2 469 outb(dmm32at_rangebits[range], dev->iobase + DMM32AT_AICONF);
3c501880
PP
470
471 /* reset the interrupt just in case */
29f747c2 472 outb(DMM32AT_INTRESET, dev->iobase + DMM32AT_CNTRL);
3c501880
PP
473
474 if (cmd->stop_src == TRIG_COUNT)
475 devpriv->ai_scans_left = cmd->stop_arg;
476 else { /* TRIG_NONE */
27bf0bc9
M
477 devpriv->ai_scans_left = 0xffffffff; /* indicates TRIG_NONE to
478 * isr */
3c501880
PP
479 }
480
481 /* wait for circuit to settle */
482 for (i = 0; i < 40000; i++) {
99953ea1 483 status = inb(dev->iobase + DMM32AT_AIRBACK);
3c501880
PP
484 if ((status & DMM32AT_STATUS) == 0)
485 break;
486 }
487 if (i == 40000) {
27bf0bc9 488 printk(KERN_WARNING "dmm32at: timeout\n");
3c501880
PP
489 return -ETIMEDOUT;
490 }
491
492 if (devpriv->ai_scans_left > 1) {
493 /* start the clock and enable the interrupts */
494 dmm32at_setaitimer(dev, cmd->scan_begin_arg);
495 } else {
496 /* start the interrups and initiate a single scan */
29f747c2
HS
497 outb(DMM32AT_ADINT, dev->iobase + DMM32AT_INTCLOCK);
498 outb(0xff, dev->iobase + DMM32AT_CONV);
3c501880
PP
499 }
500
27bf0bc9 501/* printk("dmmat32 in command\n"); */
3c501880 502
27bf0bc9
M
503/* for(i=0;i<cmd->chanlist_len;i++) */
504/* comedi_buf_put(s->async,i*100); */
3c501880 505
27bf0bc9
M
506/* s->async->events |= COMEDI_CB_EOA; */
507/* comedi_event(dev, s); */
3c501880
PP
508
509 return 0;
510
511}
512
0a85b6f0
MT
513static int dmm32at_ai_cancel(struct comedi_device *dev,
514 struct comedi_subdevice *s)
3c501880 515{
3eff0174
HS
516 struct dmm32at_private *devpriv = dev->private;
517
3c501880
PP
518 devpriv->ai_scans_left = 1;
519 return 0;
520}
521
70265d24 522static irqreturn_t dmm32at_isr(int irq, void *d)
3c501880 523{
3eff0174
HS
524 struct comedi_device *dev = d;
525 struct dmm32at_private *devpriv = dev->private;
3c501880
PP
526 unsigned char intstat;
527 unsigned int samp;
528 unsigned short msb, lsb;
529 int i;
3c501880
PP
530
531 if (!dev->attached) {
532 comedi_error(dev, "spurious interrupt");
533 return IRQ_HANDLED;
534 }
535
99953ea1 536 intstat = inb(dev->iobase + DMM32AT_INTCLOCK);
3c501880
PP
537
538 if (intstat & DMM32AT_ADINT) {
34c43922 539 struct comedi_subdevice *s = dev->read_subdev;
ea6d0d4c 540 struct comedi_cmd *cmd = &s->async->cmd;
3c501880
PP
541
542 for (i = 0; i < cmd->chanlist_len; i++) {
543 /* read data */
99953ea1
HS
544 lsb = inb(dev->iobase + DMM32AT_AILSB);
545 msb = inb(dev->iobase + DMM32AT_AIMSB);
3c501880
PP
546
547 /* invert sign bit to make range unsigned */
548 samp = ((msb ^ 0x0080) << 8) + lsb;
549 comedi_buf_put(s->async, samp);
550 }
551
552 if (devpriv->ai_scans_left != 0xffffffff) { /* TRIG_COUNT */
553 devpriv->ai_scans_left--;
554 if (devpriv->ai_scans_left == 0) {
555 /* disable further interrupts and clocks */
29f747c2 556 outb(0x0, dev->iobase + DMM32AT_INTCLOCK);
3c501880
PP
557 /* set the buffer to be flushed with an EOF */
558 s->async->events |= COMEDI_CB_EOA;
559 }
560
561 }
562 /* flush the buffer */
563 comedi_event(dev, s);
564 }
565
566 /* reset the interrupt */
29f747c2 567 outb(DMM32AT_INTRESET, dev->iobase + DMM32AT_CNTRL);
3c501880
PP
568 return IRQ_HANDLED;
569}
570
0a85b6f0
MT
571static int dmm32at_ao_winsn(struct comedi_device *dev,
572 struct comedi_subdevice *s,
573 struct comedi_insn *insn, unsigned int *data)
3c501880 574{
3eff0174 575 struct dmm32at_private *devpriv = dev->private;
3c501880
PP
576 int i;
577 int chan = CR_CHAN(insn->chanspec);
578 unsigned char hi, lo, status;
579
580 /* Writing a list of values to an AO channel is probably not
581 * very useful, but that's how the interface is defined. */
582 for (i = 0; i < insn->n; i++) {
583
584 devpriv->ao_readback[chan] = data[i];
585
586 /* get the low byte */
587 lo = data[i] & 0x00ff;
588 /* high byte also contains channel number */
589 hi = (data[i] >> 8) + chan * (1 << 6);
2696fb57 590 /* printk("writing 0x%02x 0x%02x\n",hi,lo); */
3c501880 591 /* write the low and high values to the board */
29f747c2
HS
592 outb(lo, dev->iobase + DMM32AT_DACLSB);
593 outb(hi, dev->iobase + DMM32AT_DACMSB);
3c501880
PP
594
595 /* wait for circuit to settle */
596 for (i = 0; i < 40000; i++) {
99953ea1 597 status = inb(dev->iobase + DMM32AT_DACSTAT);
3c501880
PP
598 if ((status & DMM32AT_DACBUSY) == 0)
599 break;
600 }
601 if (i == 40000) {
27bf0bc9 602 printk(KERN_WARNING "dmm32at: timeout\n");
3c501880
PP
603 return -ETIMEDOUT;
604 }
605 /* dummy read to update trigger the output */
99953ea1 606 status = inb(dev->iobase + DMM32AT_DACMSB);
3c501880
PP
607
608 }
609
610 /* return the number of samples read/written */
611 return i;
612}
613
0a85b6f0
MT
614static int dmm32at_ao_rinsn(struct comedi_device *dev,
615 struct comedi_subdevice *s,
616 struct comedi_insn *insn, unsigned int *data)
3c501880 617{
3eff0174 618 struct dmm32at_private *devpriv = dev->private;
3c501880
PP
619 int i;
620 int chan = CR_CHAN(insn->chanspec);
621
622 for (i = 0; i < insn->n; i++)
623 data[i] = devpriv->ao_readback[chan];
624
625 return i;
626}
627
0a85b6f0
MT
628static int dmm32at_dio_insn_bits(struct comedi_device *dev,
629 struct comedi_subdevice *s,
630 struct comedi_insn *insn, unsigned int *data)
3c501880 631{
3eff0174 632 struct dmm32at_private *devpriv = dev->private;
3c501880
PP
633 unsigned char diobits;
634
3c501880
PP
635 /* The insn data is a mask in data[0] and the new data
636 * in data[1], each channel cooresponding to a bit. */
637 if (data[0]) {
638 s->state &= ~data[0];
639 s->state |= data[0] & data[1];
640 /* Write out the new digital output lines */
2696fb57 641 /* outw(s->state,dev->iobase + DMM32AT_DIO); */
3c501880
PP
642 }
643
644 /* get access to the DIO regs */
29f747c2 645 outb(DMM32AT_DIOACC, dev->iobase + DMM32AT_CNTRL);
3c501880
PP
646
647 /* if either part of dio is set for output */
648 if (((devpriv->dio_config & DMM32AT_DIRCL) == 0) ||
0a85b6f0 649 ((devpriv->dio_config & DMM32AT_DIRCH) == 0)) {
3c501880 650 diobits = (s->state & 0x00ff0000) >> 16;
29f747c2 651 outb(diobits, dev->iobase + DMM32AT_DIOC);
3c501880
PP
652 }
653 if ((devpriv->dio_config & DMM32AT_DIRB) == 0) {
654 diobits = (s->state & 0x0000ff00) >> 8;
29f747c2 655 outb(diobits, dev->iobase + DMM32AT_DIOB);
3c501880
PP
656 }
657 if ((devpriv->dio_config & DMM32AT_DIRA) == 0) {
658 diobits = (s->state & 0x000000ff);
29f747c2 659 outb(diobits, dev->iobase + DMM32AT_DIOA);
3c501880
PP
660 }
661
662 /* now read the state back in */
99953ea1 663 s->state = inb(dev->iobase + DMM32AT_DIOC);
3c501880 664 s->state <<= 8;
99953ea1 665 s->state |= inb(dev->iobase + DMM32AT_DIOB);
3c501880 666 s->state <<= 8;
99953ea1 667 s->state |= inb(dev->iobase + DMM32AT_DIOA);
3c501880
PP
668 data[1] = s->state;
669
670 /* on return, data[1] contains the value of the digital
671 * input and output lines. */
2696fb57 672 /* data[1]=inw(dev->iobase + DMM32AT_DIO); */
3c501880
PP
673 /* or we could just return the software copy of the output values if
674 * it was a purely digital output subdevice */
2696fb57 675 /* data[1]=s->state; */
3c501880 676
a2714e3e 677 return insn->n;
3c501880
PP
678}
679
0a85b6f0
MT
680static int dmm32at_dio_insn_config(struct comedi_device *dev,
681 struct comedi_subdevice *s,
682 struct comedi_insn *insn, unsigned int *data)
3c501880 683{
3eff0174 684 struct dmm32at_private *devpriv = dev->private;
3c501880
PP
685 unsigned char chanbit;
686 int chan = CR_CHAN(insn->chanspec);
687
688 if (insn->n != 1)
689 return -EINVAL;
690
691 if (chan < 8)
692 chanbit = DMM32AT_DIRA;
693 else if (chan < 16)
694 chanbit = DMM32AT_DIRB;
695 else if (chan < 20)
696 chanbit = DMM32AT_DIRCL;
697 else
698 chanbit = DMM32AT_DIRCH;
699
700 /* The input or output configuration of each digital line is
701 * configured by a special insn_config instruction. chanspec
702 * contains the channel to be changed, and data[0] contains the
703 * value COMEDI_INPUT or COMEDI_OUTPUT. */
704
705 /* if output clear the bit, otherwise set it */
20962c10 706 if (data[0] == COMEDI_OUTPUT)
3c501880 707 devpriv->dio_config &= ~chanbit;
20962c10 708 else
3c501880 709 devpriv->dio_config |= chanbit;
3c501880 710 /* get access to the DIO regs */
29f747c2 711 outb(DMM32AT_DIOACC, dev->iobase + DMM32AT_CNTRL);
3c501880 712 /* set the DIO's to the new configuration setting */
29f747c2 713 outb(devpriv->dio_config, dev->iobase + DMM32AT_DIOCONF);
3c501880
PP
714
715 return 1;
716}
717
4f793db3
HS
718static int dmm32at_attach(struct comedi_device *dev,
719 struct comedi_devconfig *it)
720{
721 const struct dmm32at_board *board = comedi_board(dev);
3eff0174 722 struct dmm32at_private *devpriv;
4f793db3
HS
723 int ret;
724 struct comedi_subdevice *s;
725 unsigned char aihi, ailo, fifostat, aistat, intstat, airback;
726 unsigned long iobase;
727 unsigned int irq;
728
729 iobase = it->options[0];
730 irq = it->options[1];
731
732 printk(KERN_INFO "comedi%d: dmm32at: attaching\n", dev->minor);
733 printk(KERN_DEBUG "dmm32at: probing at address 0x%04lx, irq %u\n",
734 iobase, irq);
735
736 /* register address space */
737 if (!request_region(iobase, DMM32AT_MEMSIZE, board->name)) {
738 printk(KERN_ERR "comedi%d: dmm32at: I/O port conflict\n",
739 dev->minor);
740 return -EIO;
741 }
742 dev->iobase = iobase;
743
744 /* the following just makes sure the board is there and gets
745 it to a known state */
746
747 /* reset the board */
29f747c2 748 outb(DMM32AT_RESET, dev->iobase + DMM32AT_CNTRL);
4f793db3
HS
749
750 /* allow a millisecond to reset */
751 udelay(1000);
752
753 /* zero scan and fifo control */
29f747c2 754 outb(0x0, dev->iobase + DMM32AT_FIFOCNTRL);
4f793db3
HS
755
756 /* zero interrupt and clock control */
29f747c2 757 outb(0x0, dev->iobase + DMM32AT_INTCLOCK);
4f793db3
HS
758
759 /* write a test channel range, the high 3 bits should drop */
29f747c2
HS
760 outb(0x80, dev->iobase + DMM32AT_AILOW);
761 outb(0xff, dev->iobase + DMM32AT_AIHIGH);
4f793db3
HS
762
763 /* set the range at 10v unipolar */
29f747c2 764 outb(DMM32AT_RANGE_U10, dev->iobase + DMM32AT_AICONF);
4f793db3
HS
765
766 /* should take 10 us to settle, here's a hundred */
767 udelay(100);
768
769 /* read back the values */
99953ea1
HS
770 ailo = inb(dev->iobase + DMM32AT_AILOW);
771 aihi = inb(dev->iobase + DMM32AT_AIHIGH);
772 fifostat = inb(dev->iobase + DMM32AT_FIFOSTAT);
773 aistat = inb(dev->iobase + DMM32AT_AISTAT);
774 intstat = inb(dev->iobase + DMM32AT_INTCLOCK);
775 airback = inb(dev->iobase + DMM32AT_AIRBACK);
4f793db3
HS
776
777 printk(KERN_DEBUG "dmm32at: lo=0x%02x hi=0x%02x fifostat=0x%02x\n",
778 ailo, aihi, fifostat);
779 printk(KERN_DEBUG
780 "dmm32at: aistat=0x%02x intstat=0x%02x airback=0x%02x\n",
781 aistat, intstat, airback);
782
783 if ((ailo != 0x00) || (aihi != 0x1f) || (fifostat != 0x80) ||
784 (aistat != 0x60 || (intstat != 0x00) || airback != 0x0c)) {
785 printk(KERN_ERR "dmmat32: board detection failed\n");
786 return -EIO;
787 }
788
789 /* board is there, register interrupt */
790 if (irq) {
791 ret = request_irq(irq, dmm32at_isr, 0, board->name, dev);
792 if (ret < 0) {
793 printk(KERN_ERR "dmm32at: irq conflict\n");
794 return ret;
795 }
796 dev->irq = irq;
797 }
798
799 dev->board_name = board->name;
800
3eff0174 801 if (alloc_private(dev, sizeof(*devpriv)) < 0)
4f793db3 802 return -ENOMEM;
3eff0174 803 devpriv = dev->private;
4f793db3
HS
804
805 ret = comedi_alloc_subdevices(dev, 3);
806 if (ret)
807 return ret;
808
2930d0ba 809 s = &dev->subdevices[0];
4f793db3
HS
810 dev->read_subdev = s;
811 /* analog input subdevice */
812 s->type = COMEDI_SUBD_AI;
813 /* we support single-ended (ground) and differential */
814 s->subdev_flags = SDF_READABLE | SDF_GROUND | SDF_DIFF | SDF_CMD_READ;
27921828
HS
815 s->n_chan = 32;
816 s->maxdata = 0xffff;
817 s->range_table = &dmm32at_airanges;
4f793db3
HS
818 s->len_chanlist = 32; /* This is the maximum chanlist length that
819 the board can handle */
820 s->insn_read = dmm32at_ai_rinsn;
821 s->do_cmd = dmm32at_ai_cmd;
822 s->do_cmdtest = dmm32at_ai_cmdtest;
823 s->cancel = dmm32at_ai_cancel;
824
2930d0ba 825 s = &dev->subdevices[1];
4f793db3
HS
826 /* analog output subdevice */
827 s->type = COMEDI_SUBD_AO;
828 s->subdev_flags = SDF_WRITABLE;
27921828
HS
829 s->n_chan = 4;
830 s->maxdata = 0x0fff;
831 s->range_table = &dmm32at_aoranges;
4f793db3
HS
832 s->insn_write = dmm32at_ao_winsn;
833 s->insn_read = dmm32at_ao_rinsn;
834
2930d0ba 835 s = &dev->subdevices[2];
4f793db3 836 /* digital i/o subdevice */
27921828
HS
837
838 /* get access to the DIO regs */
839 outb(DMM32AT_DIOACC, dev->iobase + DMM32AT_CNTRL);
840 /* set the DIO's to the defualt input setting */
841 devpriv->dio_config = DMM32AT_DIRA | DMM32AT_DIRB |
842 DMM32AT_DIRCL | DMM32AT_DIRCH | DMM32AT_DIENABLE;
843 outb(devpriv->dio_config, dev->iobase + DMM32AT_DIOCONF);
844
845 /* set up the subdevice */
846 s->type = COMEDI_SUBD_DIO;
847 s->subdev_flags = SDF_READABLE | SDF_WRITABLE;
848 s->n_chan = 24;
849 s->maxdata = 1;
850 s->state = 0;
851 s->range_table = &range_digital;
852 s->insn_bits = dmm32at_dio_insn_bits;
853 s->insn_config = dmm32at_dio_insn_config;
4f793db3
HS
854
855 /* success */
856 printk(KERN_INFO "comedi%d: dmm32at: attached\n", dev->minor);
857
858 return 1;
859
860}
861
862static void dmm32at_detach(struct comedi_device *dev)
863{
864 if (dev->irq)
865 free_irq(dev->irq, dev);
866 if (dev->iobase)
867 release_region(dev->iobase, DMM32AT_MEMSIZE);
868}
869
870static const struct dmm32at_board dmm32at_boards[] = {
871 {
872 .name = "dmm32at",
4f793db3
HS
873 },
874};
875
17f49dd4
HS
876static struct comedi_driver dmm32at_driver = {
877 .driver_name = "dmm32at",
878 .module = THIS_MODULE,
879 .attach = dmm32at_attach,
880 .detach = dmm32at_detach,
881 .board_name = &dmm32at_boards[0].name,
882 .offset = sizeof(struct dmm32at_board),
883 .num_names = ARRAY_SIZE(dmm32at_boards),
884};
885module_comedi_driver(dmm32at_driver);
90f703d3
AT
886
887MODULE_AUTHOR("Comedi http://www.comedi.org");
888MODULE_DESCRIPTION("Comedi low-level driver");
889MODULE_LICENSE("GPL");
This page took 0.495171 seconds and 5 git commands to generate.