5 COMEDI - Linux Control and Measurement Device Interface
6 Copyright (C) 2000 David A. Schleef <ds@schleef.org>
7 Copyright (C) 2000 Chris R. Baugher <baugher@enteract.com>
8 Copyright (C) 2001,2002 Frank Mori Hess <fmhess@users.sourceforge.net>
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.
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.
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.
24 ************************************************************************
28 Description: DAS16 compatible boards
29 Author: Sam Moore, Warren Jasper, ds, Chris Baugher, Frank Hess, Roman Fietze
30 Devices: [Keithley Metrabyte] DAS-16 (das-16), DAS-16G (das-16g),
31 DAS-16F (das-16f), DAS-1201 (das-1201), DAS-1202 (das-1202),
32 DAS-1401 (das-1401), DAS-1402 (das-1402), DAS-1601 (das-1601),
34 [ComputerBoards] PC104-DAS16/JR (pc104-das16jr),
35 PC104-DAS16JR/16 (pc104-das16jr/16),
36 CIO-DAS16JR/16 (cio-das16jr/16),
37 CIO-DAS16/JR (cio-das16/jr), CIO-DAS1401/12 (cio-das1401/12),
38 CIO-DAS1402/12 (cio-das1402/12), CIO-DAS1402/16 (cio-das1402/16),
39 CIO-DAS1601/12 (cio-das1601/12), CIO-DAS1602/12 (cio-das1602/12),
40 CIO-DAS1602/16 (cio-das1602/16), CIO-DAS16/330 (cio-das16/330)
44 A rewrite of the das16 and das1600 drivers.
47 [1] - irq (does nothing, irq is not used anymore)
48 [2] - dma (optional, required for comedi_command support)
49 [3] - master clock speed in MHz (optional, 1 or 10, ignored if
50 board can probe clock, defaults to 1)
51 [4] - analog input range lowest voltage in microvolts (optional,
52 only useful if your board does not have software
54 [5] - analog input range highest voltage in microvolts (optional,
55 only useful if board does not have software programmable
57 [6] - analog output range lowest voltage in microvolts (optional)
58 [7] - analog output range highest voltage in microvolts (optional)
59 [8] - use timer mode for DMA. Timer mode is needed e.g. for
60 buggy DMA controllers in NS CS5530A (Geode Companion), and for
61 'jr' cards that lack a hardware fifo. This option is no
62 longer needed, since timer mode is _always_ used.
64 Passing a zero for an option is the same as leaving it unspecified.
69 Testing and debugging help provided by Daniel Koch.
73 4919.PDF (das1400, 1600)
75 4923.PDF (das1200, 1400, 1600)
77 Computer boards manuals also available from their website
78 www.measurementcomputing.com
82 #include <linux/pci.h>
83 #include <linux/slab.h>
84 #include <linux/interrupt.h>
86 #include "../comedidev.h"
90 #include "comedi_fc.h"
96 #define DEBUG_PRINT(format, args...) \
97 printk(KERN_DEBUG "das16: " format, ## args)
99 #define DEBUG_PRINT(format, args...)
102 #define DAS16_SIZE 20 /* number of ioports */
103 #define DAS16_DMA_SIZE 0xff00 /* size in bytes of allocated dma buffer */
111 0 a/d bits 0-3 start 12 bit
112 1 a/d bits 4-11 unused
119 8 status eoc uni/bip interrupt reset
120 9 dma, int, trig ctrl set dma, int
121 a pacer control unused
133 0 a/d bits 0-3 start 12 bit
134 1 a/d bits 4-11 unused
138 8 status eoc uni/bip interrupt reset
139 9 dma, int, trig ctrl set dma, int
140 a pacer control unused
141 b gain status gain control
151 0 a/d bits 0-7 start 16 bit
152 1 a/d bits 8-15 unused
156 8 status eoc uni/bip interrupt reset
157 9 dma, int, trig ctrl set dma, int
158 a pacer control unused
159 b gain status gain control
170 0 a/d bits 0-3 start 12 bit
171 1 a/d bits 4-11 unused
178 8 status eoc uni/bip interrupt reset
179 9 dma, int, trig ctrl set dma, int
180 a pacer control unused
181 b gain status gain control
184 404 unused conversion enable
185 405 unused burst enable
186 406 unused das1600 enable
191 /* size in bytes of a sample from board */
192 static const int sample_size = 2;
195 #define DAS16_AI_LSB 0
196 #define DAS16_AI_MSB 1
199 #define DAS16_AO_LSB(x) ((x) ? 6 : 4)
200 #define DAS16_AO_MSB(x) ((x) ? 7 : 5)
201 #define DAS16_STATUS 8
203 #define UNIPOLAR (1<<6)
204 #define DAS16_MUXBIT (1<<5)
205 #define DAS16_INT (1<<4)
206 #define DAS16_CONTROL 9
207 #define DAS16_INTE (1<<7)
208 #define DAS16_IRQ(x) (((x) & 0x7) << 4)
209 #define DMA_ENABLE (1<<2)
210 #define PACING_MASK 0x3
211 #define INT_PACER 0x03
212 #define EXT_PACER 0x02
213 #define DAS16_SOFT 0x00
214 #define DAS16_PACER 0x0A
215 #define DAS16_CTR0 (1<<1)
216 #define DAS16_TRIG0 (1<<0)
217 #define BURST_LEN_BITS(x) (((x) & 0xf) << 4)
218 #define DAS16_GAIN 0x0B
219 #define DAS16_CNTR0_DATA 0x0C
220 #define DAS16_CNTR1_DATA 0x0D
221 #define DAS16_CNTR2_DATA 0x0E
222 #define DAS16_CNTR_CONTROL 0x0F
223 #define DAS16_TERM_CNT 0x00
224 #define DAS16_ONE_SHOT 0x02
225 #define DAS16_RATE_GEN 0x04
226 #define DAS16_CNTR_LSB_MSB 0x30
227 #define DAS16_CNTR0 0x00
228 #define DAS16_CNTR1 0x40
229 #define DAS16_CNTR2 0x80
231 #define DAS1600_CONV 0x404
232 #define DAS1600_CONV_DISABLE 0x40
233 #define DAS1600_BURST 0x405
234 #define DAS1600_BURST_VAL 0x40
235 #define DAS1600_ENABLE 0x406
236 #define DAS1600_ENABLE_VAL 0x40
237 #define DAS1600_STATUS_B 0x407
238 #define DAS1600_BME 0x40
239 #define DAS1600_ME 0x20
240 #define DAS1600_CD 0x10
241 #define DAS1600_WS 0x02
242 #define DAS1600_CLK_10MHZ 0x01
244 static const struct comedi_lrange range_das1x01_bip = { 4, {
252 static const struct comedi_lrange range_das1x01_unip = { 4, {
260 static const struct comedi_lrange range_das1x02_bip = { 4, {
268 static const struct comedi_lrange range_das1x02_unip = { 4, {
276 static const struct comedi_lrange range_das16jr = { 9, {
277 /* also used by 16/330 */
290 static const struct comedi_lrange range_das16jr_16 = { 8, {
302 static const int das16jr_gainlist[] = { 8, 0, 1, 2, 3, 4, 5, 6, 7 };
303 static const int das16jr_16_gainlist[] = { 0, 1, 2, 3, 4, 5, 6, 7 };
304 static const int das1600_gainlist[] = { 0, 1, 2, 3 };
313 static const int *const das16_gainlists[] = {
321 static const struct comedi_lrange *const das16_ai_uni_lranges[] = {
329 static const struct comedi_lrange *const das16_ai_bip_lranges[] = {
339 unsigned have_byte:1;
345 unsigned int ai_nbits;
346 unsigned int ai_speed; /* max conversion speed in nanosec */
349 unsigned int ao_nbits;
353 unsigned int i8255_offset;
354 unsigned int i8254_offset;
360 #define DAS16_TIMEOUT 1000
362 /* Period for timer interrupt in jiffies. It's a function
363 * to deal with possibility of dynamic HZ patches */
364 static inline int timer_period(void)
369 struct das16_private_struct {
370 unsigned int ai_unipolar; /* unipolar flag */
371 unsigned int ai_singleended; /* single ended flag */
372 unsigned int clockbase; /* master clock speed in ns */
373 volatile unsigned int control_state; /* dma, interrupt and trigger control bits */
374 volatile unsigned long adc_byte_count; /* number of bytes remaining */
375 /* divisor dividing master clock to get conversion frequency */
376 unsigned int divisor1;
377 /* divisor dividing master clock to get conversion frequency */
378 unsigned int divisor2;
379 unsigned int dma_chan; /* dma channel */
380 uint16_t *dma_buffer[2];
381 dma_addr_t dma_buffer_addr[2];
382 unsigned int current_buffer;
383 volatile unsigned int dma_transfer_size; /* target number of bytes to transfer per dma shot */
385 * user-defined analog input and output ranges
386 * defined from config options
388 struct comedi_lrange *user_ai_range_table;
389 struct comedi_lrange *user_ao_range_table;
391 struct timer_list timer; /* for timed interrupt */
392 volatile short timer_running;
393 volatile short timer_mode; /* true if using timer mode */
395 #define devpriv ((struct das16_private_struct *)(dev->private))
397 static int das16_cmd_test(struct comedi_device *dev, struct comedi_subdevice *s,
398 struct comedi_cmd *cmd)
400 const struct das16_board *board = comedi_board(dev);
402 int gain, start_chan, i;
405 /* make sure triggers are valid */
406 tmp = cmd->start_src;
407 cmd->start_src &= TRIG_NOW;
408 if (!cmd->start_src || tmp != cmd->start_src)
411 tmp = cmd->scan_begin_src;
413 /* if board supports burst mode */
414 if (board->size > 0x400)
415 mask |= TRIG_TIMER | TRIG_EXT;
416 cmd->scan_begin_src &= mask;
417 if (!cmd->scan_begin_src || tmp != cmd->scan_begin_src)
420 tmp = cmd->convert_src;
421 mask = TRIG_TIMER | TRIG_EXT;
422 /* if board supports burst mode */
423 if (board->size > 0x400)
425 cmd->convert_src &= mask;
426 if (!cmd->convert_src || tmp != cmd->convert_src)
429 tmp = cmd->scan_end_src;
430 cmd->scan_end_src &= TRIG_COUNT;
431 if (!cmd->scan_end_src || tmp != cmd->scan_end_src)
435 cmd->stop_src &= TRIG_COUNT | TRIG_NONE;
436 if (!cmd->stop_src || tmp != cmd->stop_src)
443 * step 2: make sure trigger sources are unique and
444 * mutually compatible
446 if (cmd->scan_begin_src != TRIG_TIMER &&
447 cmd->scan_begin_src != TRIG_EXT &&
448 cmd->scan_begin_src != TRIG_FOLLOW)
450 if (cmd->convert_src != TRIG_TIMER &&
451 cmd->convert_src != TRIG_EXT && cmd->convert_src != TRIG_NOW)
453 if (cmd->stop_src != TRIG_NONE && cmd->stop_src != TRIG_COUNT)
456 /* make sure scan_begin_src and convert_src dont conflict */
457 if (cmd->scan_begin_src == TRIG_FOLLOW && cmd->convert_src == TRIG_NOW)
459 if (cmd->scan_begin_src != TRIG_FOLLOW && cmd->convert_src != TRIG_NOW)
465 /* step 3: make sure arguments are trivially compatible */
466 if (cmd->start_arg != 0) {
471 if (cmd->scan_begin_src == TRIG_FOLLOW) {
472 /* internal trigger */
473 if (cmd->scan_begin_arg != 0) {
474 cmd->scan_begin_arg = 0;
479 if (cmd->scan_end_arg != cmd->chanlist_len) {
480 cmd->scan_end_arg = cmd->chanlist_len;
483 /* check against maximum frequency */
484 if (cmd->scan_begin_src == TRIG_TIMER) {
485 if (cmd->scan_begin_arg <
486 board->ai_speed * cmd->chanlist_len) {
487 cmd->scan_begin_arg =
488 board->ai_speed * cmd->chanlist_len;
492 if (cmd->convert_src == TRIG_TIMER) {
493 if (cmd->convert_arg < board->ai_speed) {
494 cmd->convert_arg = board->ai_speed;
499 if (cmd->stop_src == TRIG_NONE) {
500 if (cmd->stop_arg != 0) {
508 /* step 4: fix up arguments */
509 if (cmd->scan_begin_src == TRIG_TIMER) {
510 unsigned int tmp = cmd->scan_begin_arg;
511 /* set divisors, correct timing arguments */
512 i8253_cascade_ns_to_timer_2div(devpriv->clockbase,
513 &(devpriv->divisor1),
514 &(devpriv->divisor2),
515 &(cmd->scan_begin_arg),
516 cmd->flags & TRIG_ROUND_MASK);
517 err += (tmp != cmd->scan_begin_arg);
519 if (cmd->convert_src == TRIG_TIMER) {
520 unsigned int tmp = cmd->convert_arg;
521 /* set divisors, correct timing arguments */
522 i8253_cascade_ns_to_timer_2div(devpriv->clockbase,
523 &(devpriv->divisor1),
524 &(devpriv->divisor2),
526 cmd->flags & TRIG_ROUND_MASK);
527 err += (tmp != cmd->convert_arg);
532 /* check channel/gain list against card's limitations */
534 gain = CR_RANGE(cmd->chanlist[0]);
535 start_chan = CR_CHAN(cmd->chanlist[0]);
536 for (i = 1; i < cmd->chanlist_len; i++) {
537 if (CR_CHAN(cmd->chanlist[i]) !=
538 (start_chan + i) % s->n_chan) {
540 "entries in chanlist must be "
541 "consecutive channels, "
542 "counting upwards\n");
545 if (CR_RANGE(cmd->chanlist[i]) != gain) {
547 "entries in chanlist must all "
548 "have the same gain\n");
559 /* utility function that suggests a dma transfer size in bytes */
560 static unsigned int das16_suggest_transfer_size(struct comedi_device *dev,
561 struct comedi_cmd cmd)
566 /* if we are using timer interrupt, we don't care how long it
567 * will take to complete transfer since it will be interrupted
568 * by timer interrupt */
569 if (devpriv->timer_mode)
570 return DAS16_DMA_SIZE;
572 /* otherwise, we are relying on dma terminal count interrupt,
573 * so pick a reasonable size */
574 if (cmd.convert_src == TRIG_TIMER)
575 freq = 1000000000 / cmd.convert_arg;
576 else if (cmd.scan_begin_src == TRIG_TIMER)
577 freq = (1000000000 / cmd.scan_begin_arg) * cmd.chanlist_len;
578 /* return some default value */
582 if (cmd.flags & TRIG_WAKE_EOS) {
583 size = sample_size * cmd.chanlist_len;
585 /* make buffer fill in no more than 1/3 second */
586 size = (freq / 3) * sample_size;
589 /* set a minimum and maximum size allowed */
590 if (size > DAS16_DMA_SIZE)
591 size = DAS16_DMA_SIZE - DAS16_DMA_SIZE % sample_size;
592 else if (size < sample_size)
595 if (cmd.stop_src == TRIG_COUNT && size > devpriv->adc_byte_count)
596 size = devpriv->adc_byte_count;
601 static unsigned int das16_set_pacer(struct comedi_device *dev, unsigned int ns,
604 i8253_cascade_ns_to_timer_2div(devpriv->clockbase, &(devpriv->divisor1),
605 &(devpriv->divisor2), &ns,
606 rounding_flags & TRIG_ROUND_MASK);
608 /* Write the values of ctr1 and ctr2 into counters 1 and 2 */
609 i8254_load(dev->iobase + DAS16_CNTR0_DATA, 0, 1, devpriv->divisor1, 2);
610 i8254_load(dev->iobase + DAS16_CNTR0_DATA, 0, 2, devpriv->divisor2, 2);
615 static int das16_cmd_exec(struct comedi_device *dev, struct comedi_subdevice *s)
617 const struct das16_board *board = comedi_board(dev);
618 struct comedi_async *async = s->async;
619 struct comedi_cmd *cmd = &async->cmd;
624 if (devpriv->dma_chan == 0 || (dev->irq == 0
625 && devpriv->timer_mode == 0)) {
627 "irq (or use of 'timer mode') dma required to "
628 "execute comedi_cmd");
631 if (cmd->flags & TRIG_RT) {
632 comedi_error(dev, "isa dma transfers cannot be performed with "
633 "TRIG_RT, aborting");
637 devpriv->adc_byte_count =
638 cmd->stop_arg * cmd->chanlist_len * sizeof(uint16_t);
640 /* disable conversions for das1600 mode */
641 if (board->size > 0x400)
642 outb(DAS1600_CONV_DISABLE, dev->iobase + DAS1600_CONV);
644 /* set scan limits */
645 byte = CR_CHAN(cmd->chanlist[0]);
646 byte |= CR_CHAN(cmd->chanlist[cmd->chanlist_len - 1]) << 4;
647 outb(byte, dev->iobase + DAS16_MUX);
649 /* set gain (this is also burst rate register but according to
650 * computer boards manual, burst rate does nothing, even on
652 if (board->ai_pg != das16_pg_none) {
653 range = CR_RANGE(cmd->chanlist[0]);
654 outb((das16_gainlists[board->ai_pg])[range],
655 dev->iobase + DAS16_GAIN);
658 /* set counter mode and counts */
660 das16_set_pacer(dev, cmd->convert_arg,
661 cmd->flags & TRIG_ROUND_MASK);
662 DEBUG_PRINT("pacer period: %d ns\n", cmd->convert_arg);
664 /* enable counters */
666 /* Enable burst mode if appropriate. */
667 if (board->size > 0x400) {
668 if (cmd->convert_src == TRIG_NOW) {
669 outb(DAS1600_BURST_VAL, dev->iobase + DAS1600_BURST);
670 /* set burst length */
671 byte |= BURST_LEN_BITS(cmd->chanlist_len - 1);
673 outb(0, dev->iobase + DAS1600_BURST);
676 outb(byte, dev->iobase + DAS16_PACER);
678 /* set up dma transfer */
679 flags = claim_dma_lock();
680 disable_dma(devpriv->dma_chan);
681 /* clear flip-flop to make sure 2-byte registers for
682 * count and address get set correctly */
683 clear_dma_ff(devpriv->dma_chan);
684 devpriv->current_buffer = 0;
685 set_dma_addr(devpriv->dma_chan,
686 devpriv->dma_buffer_addr[devpriv->current_buffer]);
687 /* set appropriate size of transfer */
688 devpriv->dma_transfer_size = das16_suggest_transfer_size(dev, *cmd);
689 set_dma_count(devpriv->dma_chan, devpriv->dma_transfer_size);
690 enable_dma(devpriv->dma_chan);
691 release_dma_lock(flags);
693 /* set up interrupt */
694 if (devpriv->timer_mode) {
695 devpriv->timer_running = 1;
696 devpriv->timer.expires = jiffies + timer_period();
697 add_timer(&devpriv->timer);
698 devpriv->control_state &= ~DAS16_INTE;
700 /* clear interrupt bit */
701 outb(0x00, dev->iobase + DAS16_STATUS);
702 /* enable interrupts */
703 devpriv->control_state |= DAS16_INTE;
705 devpriv->control_state |= DMA_ENABLE;
706 devpriv->control_state &= ~PACING_MASK;
707 if (cmd->convert_src == TRIG_EXT)
708 devpriv->control_state |= EXT_PACER;
710 devpriv->control_state |= INT_PACER;
711 outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
713 /* Enable conversions if using das1600 mode */
714 if (board->size > 0x400)
715 outb(0, dev->iobase + DAS1600_CONV);
721 static int das16_cancel(struct comedi_device *dev, struct comedi_subdevice *s)
723 const struct das16_board *board = comedi_board(dev);
726 spin_lock_irqsave(&dev->spinlock, flags);
727 /* disable interrupts, dma and pacer clocked conversions */
728 devpriv->control_state &= ~DAS16_INTE & ~PACING_MASK & ~DMA_ENABLE;
729 outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
730 if (devpriv->dma_chan)
731 disable_dma(devpriv->dma_chan);
733 /* disable SW timer */
734 if (devpriv->timer_mode && devpriv->timer_running) {
735 devpriv->timer_running = 0;
736 del_timer(&devpriv->timer);
739 /* disable burst mode */
740 if (board->size > 0x400)
741 outb(0, dev->iobase + DAS1600_BURST);
744 spin_unlock_irqrestore(&dev->spinlock, flags);
749 static void das16_reset(struct comedi_device *dev)
751 outb(0, dev->iobase + DAS16_STATUS);
752 outb(0, dev->iobase + DAS16_CONTROL);
753 outb(0, dev->iobase + DAS16_PACER);
754 outb(0, dev->iobase + DAS16_CNTR_CONTROL);
757 static int das16_ai_rinsn(struct comedi_device *dev, struct comedi_subdevice *s,
758 struct comedi_insn *insn, unsigned int *data)
760 const struct das16_board *board = comedi_board(dev);
766 /* disable interrupts and pacing */
767 devpriv->control_state &= ~DAS16_INTE & ~DMA_ENABLE & ~PACING_MASK;
768 outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
770 /* set multiplexer */
771 chan = CR_CHAN(insn->chanspec);
772 chan |= CR_CHAN(insn->chanspec) << 4;
773 outb(chan, dev->iobase + DAS16_MUX);
776 if (board->ai_pg != das16_pg_none) {
777 range = CR_RANGE(insn->chanspec);
778 outb((das16_gainlists[board->ai_pg])[range],
779 dev->iobase + DAS16_GAIN);
782 for (n = 0; n < insn->n; n++) {
783 /* trigger conversion */
784 outb_p(0, dev->iobase + DAS16_TRIG);
786 for (i = 0; i < DAS16_TIMEOUT; i++) {
787 if (!(inb(dev->iobase + DAS16_STATUS) & BUSY))
790 if (i == DAS16_TIMEOUT) {
791 printk("das16: timeout\n");
794 msb = inb(dev->iobase + DAS16_AI_MSB);
795 lsb = inb(dev->iobase + DAS16_AI_LSB);
796 if (board->ai_nbits == 12)
797 data[n] = ((lsb >> 4) & 0xf) | (msb << 4);
799 data[n] = lsb | (msb << 8);
806 static int das16_di_rbits(struct comedi_device *dev, struct comedi_subdevice *s,
807 struct comedi_insn *insn, unsigned int *data)
811 bits = inb(dev->iobase + DAS16_DIO) & 0xf;
818 static int das16_do_wbits(struct comedi_device *dev, struct comedi_subdevice *s,
819 struct comedi_insn *insn, unsigned int *data)
823 /* only set bits that have been masked */
826 /* zero bits that have been masked */
828 /* set masked bits */
829 wbits |= data[0] & data[1];
833 outb(s->state, dev->iobase + DAS16_DIO);
838 static int das16_ao_winsn(struct comedi_device *dev, struct comedi_subdevice *s,
839 struct comedi_insn *insn, unsigned int *data)
841 const struct das16_board *board = comedi_board(dev);
846 chan = CR_CHAN(insn->chanspec);
848 for (i = 0; i < insn->n; i++) {
849 if (board->ao_nbits == 12) {
850 lsb = (data[i] << 4) & 0xff;
851 msb = (data[i] >> 4) & 0xff;
853 lsb = data[i] & 0xff;
854 msb = (data[i] >> 8) & 0xff;
856 outb(lsb, dev->iobase + DAS16_AO_LSB(chan));
857 outb(msb, dev->iobase + DAS16_AO_MSB(chan));
863 /* the pc104-das16jr (at least) has problems if the dma
864 transfer is interrupted in the middle of transferring
865 a 16 bit sample, so this function takes care to get
866 an even transfer count after disabling dma
869 static int disable_dma_on_even(struct comedi_device *dev)
873 static const int disable_limit = 100;
874 static const int enable_timeout = 100;
875 disable_dma(devpriv->dma_chan);
876 residue = get_dma_residue(devpriv->dma_chan);
877 for (i = 0; i < disable_limit && (residue % 2); ++i) {
879 enable_dma(devpriv->dma_chan);
880 for (j = 0; j < enable_timeout; ++j) {
883 new_residue = get_dma_residue(devpriv->dma_chan);
884 if (new_residue != residue)
887 disable_dma(devpriv->dma_chan);
888 residue = get_dma_residue(devpriv->dma_chan);
890 if (i == disable_limit) {
891 comedi_error(dev, "failed to get an even dma transfer, "
892 "could be trouble.");
897 static void das16_interrupt(struct comedi_device *dev)
899 const struct das16_board *board = comedi_board(dev);
900 unsigned long dma_flags, spin_flags;
901 struct comedi_subdevice *s = dev->read_subdev;
902 struct comedi_async *async;
903 struct comedi_cmd *cmd;
904 int num_bytes, residue;
907 if (dev->attached == 0) {
908 comedi_error(dev, "premature interrupt");
911 /* initialize async here to make sure it is not NULL */
915 if (devpriv->dma_chan == 0) {
916 comedi_error(dev, "interrupt with no dma channel?");
920 spin_lock_irqsave(&dev->spinlock, spin_flags);
921 if ((devpriv->control_state & DMA_ENABLE) == 0) {
922 spin_unlock_irqrestore(&dev->spinlock, spin_flags);
923 DEBUG_PRINT("interrupt while dma disabled?\n");
927 dma_flags = claim_dma_lock();
928 clear_dma_ff(devpriv->dma_chan);
929 residue = disable_dma_on_even(dev);
931 /* figure out how many points to read */
932 if (residue > devpriv->dma_transfer_size) {
933 comedi_error(dev, "residue > transfer size!\n");
934 async->events |= COMEDI_CB_ERROR | COMEDI_CB_EOA;
937 num_bytes = devpriv->dma_transfer_size - residue;
939 if (cmd->stop_src == TRIG_COUNT &&
940 num_bytes >= devpriv->adc_byte_count) {
941 num_bytes = devpriv->adc_byte_count;
942 async->events |= COMEDI_CB_EOA;
945 buffer_index = devpriv->current_buffer;
946 devpriv->current_buffer = (devpriv->current_buffer + 1) % 2;
947 devpriv->adc_byte_count -= num_bytes;
949 /* figure out how many bytes for next transfer */
950 if (cmd->stop_src == TRIG_COUNT && devpriv->timer_mode == 0 &&
951 devpriv->dma_transfer_size > devpriv->adc_byte_count)
952 devpriv->dma_transfer_size = devpriv->adc_byte_count;
955 if ((async->events & COMEDI_CB_EOA) == 0) {
956 set_dma_addr(devpriv->dma_chan,
957 devpriv->dma_buffer_addr[devpriv->current_buffer]);
958 set_dma_count(devpriv->dma_chan, devpriv->dma_transfer_size);
959 enable_dma(devpriv->dma_chan);
960 /* reenable conversions for das1600 mode, (stupid hardware) */
961 if (board->size > 0x400 && devpriv->timer_mode == 0)
962 outb(0x00, dev->iobase + DAS1600_CONV);
965 release_dma_lock(dma_flags);
967 spin_unlock_irqrestore(&dev->spinlock, spin_flags);
969 cfc_write_array_to_buffer(s,
970 devpriv->dma_buffer[buffer_index], num_bytes);
972 cfc_handle_events(dev, s);
975 static irqreturn_t das16_dma_interrupt(int irq, void *d)
978 struct comedi_device *dev = d;
980 status = inb(dev->iobase + DAS16_STATUS);
982 if ((status & DAS16_INT) == 0) {
983 DEBUG_PRINT("spurious interrupt\n");
987 /* clear interrupt */
988 outb(0x00, dev->iobase + DAS16_STATUS);
989 das16_interrupt(dev);
993 static void das16_timer_interrupt(unsigned long arg)
995 struct comedi_device *dev = (struct comedi_device *)arg;
997 das16_interrupt(dev);
999 if (devpriv->timer_running)
1000 mod_timer(&devpriv->timer, jiffies + timer_period());
1003 static void reg_dump(struct comedi_device *dev)
1005 DEBUG_PRINT("********DAS1600 REGISTER DUMP********\n");
1006 DEBUG_PRINT("DAS16_MUX: %x\n", inb(dev->iobase + DAS16_MUX));
1007 DEBUG_PRINT("DAS16_DIO: %x\n", inb(dev->iobase + DAS16_DIO));
1008 DEBUG_PRINT("DAS16_STATUS: %x\n", inb(dev->iobase + DAS16_STATUS));
1009 DEBUG_PRINT("DAS16_CONTROL: %x\n", inb(dev->iobase + DAS16_CONTROL));
1010 DEBUG_PRINT("DAS16_PACER: %x\n", inb(dev->iobase + DAS16_PACER));
1011 DEBUG_PRINT("DAS16_GAIN: %x\n", inb(dev->iobase + DAS16_GAIN));
1012 DEBUG_PRINT("DAS16_CNTR_CONTROL: %x\n",
1013 inb(dev->iobase + DAS16_CNTR_CONTROL));
1014 DEBUG_PRINT("DAS1600_CONV: %x\n", inb(dev->iobase + DAS1600_CONV));
1015 DEBUG_PRINT("DAS1600_BURST: %x\n", inb(dev->iobase + DAS1600_BURST));
1016 DEBUG_PRINT("DAS1600_ENABLE: %x\n", inb(dev->iobase + DAS1600_ENABLE));
1017 DEBUG_PRINT("DAS1600_STATUS_B: %x\n",
1018 inb(dev->iobase + DAS1600_STATUS_B));
1021 static int das16_probe(struct comedi_device *dev, struct comedi_devconfig *it)
1023 const struct das16_board *board = comedi_board(dev);
1027 /* status is available on all boards */
1029 status = inb(dev->iobase + DAS16_STATUS);
1031 if ((status & UNIPOLAR))
1032 devpriv->ai_unipolar = 1;
1034 devpriv->ai_unipolar = 0;
1037 if ((status & DAS16_MUXBIT))
1038 devpriv->ai_singleended = 1;
1040 devpriv->ai_singleended = 0;
1043 /* diobits indicates boards */
1045 diobits = inb(dev->iobase + DAS16_DIO) & 0xf0;
1047 printk(KERN_INFO " id bits are 0x%02x\n", diobits);
1048 if (board->id != diobits) {
1049 printk(KERN_INFO " requested board's id bits are 0x%x (ignore)\n",
1056 static int das1600_mode_detect(struct comedi_device *dev)
1060 status = inb(dev->iobase + DAS1600_STATUS_B);
1062 if (status & DAS1600_CLK_10MHZ) {
1063 devpriv->clockbase = 100;
1064 printk(KERN_INFO " 10MHz pacer clock\n");
1066 devpriv->clockbase = 1000;
1067 printk(KERN_INFO " 1MHz pacer clock\n");
1075 static void das16_ai_munge(struct comedi_device *dev,
1076 struct comedi_subdevice *s, void *array,
1077 unsigned int num_bytes,
1078 unsigned int start_chan_index)
1080 const struct das16_board *board = comedi_board(dev);
1081 unsigned int i, num_samples = num_bytes / sizeof(short);
1082 short *data = array;
1084 for (i = 0; i < num_samples; i++) {
1085 data[i] = le16_to_cpu(data[i]);
1086 if (board->ai_nbits == 12)
1087 data[i] = (data[i] >> 4) & 0xfff;
1098 * 3 Clock speed (in MHz)
1100 static int das16_attach(struct comedi_device *dev, struct comedi_devconfig *it)
1102 const struct das16_board *board = comedi_board(dev);
1103 struct comedi_subdevice *s;
1106 unsigned long iobase;
1107 unsigned int dma_chan;
1109 unsigned long flags;
1110 struct comedi_krange *user_ai_range, *user_ao_range;
1112 iobase = it->options[0];
1114 irq = it->options[1];
1115 timer_mode = it->options[8];
1117 /* always use time_mode since using irq can drop samples while
1118 * waiting for dma done interrupt (due to hardware limitations) */
1124 printk(KERN_INFO "comedi%d: das16:", dev->minor);
1126 /* check that clock setting is valid */
1127 if (it->options[3]) {
1128 if (it->options[3] != 0 &&
1129 it->options[3] != 1 && it->options[3] != 10) {
1131 ("\n Invalid option. Master clock must be set "
1132 "to 1 or 10 (MHz)\n");
1137 ret = alloc_private(dev, sizeof(struct das16_private_struct));
1141 if (board->size < 0x400) {
1142 printk(" 0x%04lx-0x%04lx\n", iobase, iobase + board->size);
1143 if (!request_region(iobase, board->size, "das16")) {
1144 printk(KERN_ERR " I/O port conflict\n");
1148 printk(KERN_INFO " 0x%04lx-0x%04lx 0x%04lx-0x%04lx\n",
1149 iobase, iobase + 0x0f,
1151 iobase + 0x400 + (board->size & 0x3ff));
1152 if (!request_region(iobase, 0x10, "das16")) {
1153 printk(KERN_ERR " I/O port conflict: 0x%04lx-0x%04lx\n",
1154 iobase, iobase + 0x0f);
1157 if (!request_region(iobase + 0x400, board->size & 0x3ff,
1159 release_region(iobase, 0x10);
1160 printk(KERN_ERR " I/O port conflict: 0x%04lx-0x%04lx\n",
1162 iobase + 0x400 + (board->size & 0x3ff));
1167 dev->iobase = iobase;
1169 /* probe id bits to make sure they are consistent */
1170 if (das16_probe(dev, it)) {
1171 printk(KERN_ERR " id bits do not match selected board, aborting\n");
1174 dev->board_name = board->name;
1176 /* get master clock speed */
1177 if (board->size < 0x400) {
1179 devpriv->clockbase = 1000 / it->options[3];
1181 devpriv->clockbase = 1000; /* 1 MHz default */
1183 das1600_mode_detect(dev);
1186 /* now for the irq */
1187 if (irq > 1 && irq < 8) {
1188 ret = request_irq(irq, das16_dma_interrupt, 0, "das16", dev);
1193 printk(KERN_INFO " ( irq = %u )", irq);
1194 } else if (irq == 0) {
1195 printk(" ( no irq )");
1197 printk(" invalid irq\n");
1201 /* initialize dma */
1202 dma_chan = it->options[2];
1203 if (dma_chan == 1 || dma_chan == 3) {
1204 /* allocate dma buffers */
1206 for (i = 0; i < 2; i++) {
1207 devpriv->dma_buffer[i] = pci_alloc_consistent(
1208 NULL, DAS16_DMA_SIZE,
1209 &devpriv->dma_buffer_addr[i]);
1211 if (devpriv->dma_buffer[i] == NULL)
1214 if (request_dma(dma_chan, "das16")) {
1215 printk(KERN_ERR " failed to allocate dma channel %i\n",
1219 devpriv->dma_chan = dma_chan;
1220 flags = claim_dma_lock();
1221 disable_dma(devpriv->dma_chan);
1222 set_dma_mode(devpriv->dma_chan, DMA_MODE_READ);
1223 release_dma_lock(flags);
1224 printk(KERN_INFO " ( dma = %u)\n", dma_chan);
1225 } else if (dma_chan == 0) {
1226 printk(KERN_INFO " ( no dma )\n");
1228 printk(KERN_ERR " invalid dma channel\n");
1232 /* get any user-defined input range */
1233 if (board->ai_pg == das16_pg_none &&
1234 (it->options[4] || it->options[5])) {
1235 /* allocate single-range range table */
1236 devpriv->user_ai_range_table =
1237 kmalloc(sizeof(struct comedi_lrange) +
1238 sizeof(struct comedi_krange), GFP_KERNEL);
1239 /* initialize ai range */
1240 devpriv->user_ai_range_table->length = 1;
1241 user_ai_range = devpriv->user_ai_range_table->range;
1242 user_ai_range->min = it->options[4];
1243 user_ai_range->max = it->options[5];
1244 user_ai_range->flags = UNIT_volt;
1246 /* get any user-defined output range */
1247 if (it->options[6] || it->options[7]) {
1248 /* allocate single-range range table */
1249 devpriv->user_ao_range_table =
1250 kmalloc(sizeof(struct comedi_lrange) +
1251 sizeof(struct comedi_krange), GFP_KERNEL);
1252 /* initialize ao range */
1253 devpriv->user_ao_range_table->length = 1;
1254 user_ao_range = devpriv->user_ao_range_table->range;
1255 user_ao_range->min = it->options[6];
1256 user_ao_range->max = it->options[7];
1257 user_ao_range->flags = UNIT_volt;
1261 init_timer(&(devpriv->timer));
1262 devpriv->timer.function = das16_timer_interrupt;
1263 devpriv->timer.data = (unsigned long)dev;
1265 devpriv->timer_mode = timer_mode ? 1 : 0;
1267 ret = comedi_alloc_subdevices(dev, 5);
1271 s = dev->subdevices + 0;
1272 dev->read_subdev = s;
1275 s->type = COMEDI_SUBD_AI;
1276 s->subdev_flags = SDF_READABLE | SDF_CMD_READ;
1277 if (devpriv->ai_singleended) {
1279 s->len_chanlist = 16;
1280 s->subdev_flags |= SDF_GROUND;
1283 s->len_chanlist = 8;
1284 s->subdev_flags |= SDF_DIFF;
1286 s->maxdata = (1 << board->ai_nbits) - 1;
1287 if (devpriv->user_ai_range_table) { /* user defined ai range */
1288 s->range_table = devpriv->user_ai_range_table;
1289 } else if (devpriv->ai_unipolar) {
1290 s->range_table = das16_ai_uni_lranges[board->ai_pg];
1292 s->range_table = das16_ai_bip_lranges[board->ai_pg];
1294 s->insn_read = board->ai;
1295 s->do_cmdtest = das16_cmd_test;
1296 s->do_cmd = das16_cmd_exec;
1297 s->cancel = das16_cancel;
1298 s->munge = das16_ai_munge;
1300 s->type = COMEDI_SUBD_UNUSED;
1303 s = dev->subdevices + 1;
1306 s->type = COMEDI_SUBD_AO;
1307 s->subdev_flags = SDF_WRITABLE;
1309 s->maxdata = (1 << board->ao_nbits) - 1;
1310 /* user defined ao range */
1311 if (devpriv->user_ao_range_table)
1312 s->range_table = devpriv->user_ao_range_table;
1314 s->range_table = &range_unknown;
1316 s->insn_write = board->ao;
1318 s->type = COMEDI_SUBD_UNUSED;
1321 s = dev->subdevices + 2;
1324 s->type = COMEDI_SUBD_DI;
1325 s->subdev_flags = SDF_READABLE;
1328 s->range_table = &range_digital;
1329 s->insn_bits = board->di;
1331 s->type = COMEDI_SUBD_UNUSED;
1334 s = dev->subdevices + 3;
1337 s->type = COMEDI_SUBD_DO;
1338 s->subdev_flags = SDF_WRITABLE | SDF_READABLE;
1341 s->range_table = &range_digital;
1342 s->insn_bits = board->do_;
1343 /* initialize digital output lines */
1344 outb(s->state, dev->iobase + DAS16_DIO);
1346 s->type = COMEDI_SUBD_UNUSED;
1349 s = dev->subdevices + 4;
1351 if (board->i8255_offset != 0) {
1352 subdev_8255_init(dev, s, NULL, (dev->iobase +
1353 board->i8255_offset));
1355 s->type = COMEDI_SUBD_UNUSED;
1359 /* set the interrupt level */
1360 devpriv->control_state = DAS16_IRQ(dev->irq);
1361 outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
1363 /* turn on das1600 mode if available */
1364 if (board->size > 0x400) {
1365 outb(DAS1600_ENABLE_VAL, dev->iobase + DAS1600_ENABLE);
1366 outb(0, dev->iobase + DAS1600_CONV);
1367 outb(0, dev->iobase + DAS1600_BURST);
1373 static void das16_detach(struct comedi_device *dev)
1375 const struct das16_board *board = comedi_board(dev);
1378 if (dev->subdevices)
1379 subdev_8255_cleanup(dev, dev->subdevices + 4);
1382 for (i = 0; i < 2; i++) {
1383 if (devpriv->dma_buffer[i])
1384 pci_free_consistent(NULL, DAS16_DMA_SIZE,
1385 devpriv->dma_buffer[i],
1387 dma_buffer_addr[i]);
1389 if (devpriv->dma_chan)
1390 free_dma(devpriv->dma_chan);
1391 kfree(devpriv->user_ai_range_table);
1392 kfree(devpriv->user_ao_range_table);
1395 free_irq(dev->irq, dev);
1397 if (board->size < 0x400) {
1398 release_region(dev->iobase, board->size);
1400 release_region(dev->iobase, 0x10);
1401 release_region(dev->iobase + 0x400,
1402 board->size & 0x3ff);
1407 static const struct das16_board das16_boards[] = {
1410 .ai = das16_ai_rinsn,
1413 .ai_pg = das16_pg_none,
1414 .ao = das16_ao_winsn,
1416 .di = das16_di_rbits,
1417 .do_ = das16_do_wbits,
1418 .i8255_offset = 0x10,
1419 .i8254_offset = 0x0c,
1424 .ai = das16_ai_rinsn,
1427 .ai_pg = das16_pg_none,
1428 .ao = das16_ao_winsn,
1430 .di = das16_di_rbits,
1431 .do_ = das16_do_wbits,
1432 .i8255_offset = 0x10,
1433 .i8254_offset = 0x0c,
1438 .ai = das16_ai_rinsn,
1441 .ai_pg = das16_pg_none,
1442 .ao = das16_ao_winsn,
1444 .di = das16_di_rbits,
1445 .do_ = das16_do_wbits,
1446 .i8255_offset = 0x10,
1447 .i8254_offset = 0x0c,
1451 .name = "cio-das16",
1452 .ai = das16_ai_rinsn,
1455 .ai_pg = das16_pg_none,
1456 .ao = das16_ao_winsn,
1458 .di = das16_di_rbits,
1459 .do_ = das16_do_wbits,
1460 .i8255_offset = 0x10,
1461 .i8254_offset = 0x0c,
1465 .name = "cio-das16/f",
1466 .ai = das16_ai_rinsn,
1469 .ai_pg = das16_pg_none,
1470 .ao = das16_ao_winsn,
1472 .di = das16_di_rbits,
1473 .do_ = das16_do_wbits,
1474 .i8255_offset = 0x10,
1475 .i8254_offset = 0x0c,
1479 .name = "cio-das16/jr",
1480 .ai = das16_ai_rinsn,
1483 .ai_pg = das16_pg_16jr,
1485 .di = das16_di_rbits,
1486 .do_ = das16_do_wbits,
1488 .i8254_offset = 0x0c,
1492 .name = "pc104-das16jr",
1493 .ai = das16_ai_rinsn,
1496 .ai_pg = das16_pg_16jr,
1498 .di = das16_di_rbits,
1499 .do_ = das16_do_wbits,
1501 .i8254_offset = 0x0c,
1505 .name = "cio-das16jr/16",
1506 .ai = das16_ai_rinsn,
1509 .ai_pg = das16_pg_16jr_16,
1511 .di = das16_di_rbits,
1512 .do_ = das16_do_wbits,
1514 .i8254_offset = 0x0c,
1518 .name = "pc104-das16jr/16",
1519 .ai = das16_ai_rinsn,
1522 .ai_pg = das16_pg_16jr_16,
1524 .di = das16_di_rbits,
1525 .do_ = das16_do_wbits,
1527 .i8254_offset = 0x0c,
1532 .ai = das16_ai_rinsn,
1535 .ai_pg = das16_pg_none,
1537 .di = das16_di_rbits,
1538 .do_ = das16_do_wbits,
1539 .i8255_offset = 0x400,
1540 .i8254_offset = 0x0c,
1545 .ai = das16_ai_rinsn,
1548 .ai_pg = das16_pg_none,
1550 .di = das16_di_rbits,
1551 .do_ = das16_do_wbits,
1552 .i8255_offset = 0x400,
1553 .i8254_offset = 0x0c,
1558 .ai = das16_ai_rinsn,
1561 .ai_pg = das16_pg_1601,
1563 .di = das16_di_rbits,
1564 .do_ = das16_do_wbits,
1565 .i8255_offset = 0x0,
1566 .i8254_offset = 0x0c,
1571 .ai = das16_ai_rinsn,
1574 .ai_pg = das16_pg_1602,
1576 .di = das16_di_rbits,
1577 .do_ = das16_do_wbits,
1578 .i8255_offset = 0x0,
1579 .i8254_offset = 0x0c,
1584 .ai = das16_ai_rinsn,
1587 .ai_pg = das16_pg_1601,
1588 .ao = das16_ao_winsn,
1590 .di = das16_di_rbits,
1591 .do_ = das16_do_wbits,
1592 .i8255_offset = 0x400,
1593 .i8254_offset = 0x0c,
1598 .ai = das16_ai_rinsn,
1601 .ai_pg = das16_pg_1602,
1602 .ao = das16_ao_winsn,
1604 .di = das16_di_rbits,
1605 .do_ = das16_do_wbits,
1606 .i8255_offset = 0x400,
1607 .i8254_offset = 0x0c,
1611 .name = "cio-das1401/12",
1612 .ai = das16_ai_rinsn,
1615 .ai_pg = das16_pg_1601,
1617 .di = das16_di_rbits,
1618 .do_ = das16_do_wbits,
1620 .i8254_offset = 0x0c,
1624 .name = "cio-das1402/12",
1625 .ai = das16_ai_rinsn,
1628 .ai_pg = das16_pg_1602,
1630 .di = das16_di_rbits,
1631 .do_ = das16_do_wbits,
1633 .i8254_offset = 0x0c,
1637 .name = "cio-das1402/16",
1638 .ai = das16_ai_rinsn,
1641 .ai_pg = das16_pg_1602,
1643 .di = das16_di_rbits,
1644 .do_ = das16_do_wbits,
1646 .i8254_offset = 0x0c,
1650 .name = "cio-das1601/12",
1651 .ai = das16_ai_rinsn,
1654 .ai_pg = das16_pg_1601,
1655 .ao = das16_ao_winsn,
1657 .di = das16_di_rbits,
1658 .do_ = das16_do_wbits,
1659 .i8255_offset = 0x400,
1660 .i8254_offset = 0x0c,
1664 .name = "cio-das1602/12",
1665 .ai = das16_ai_rinsn,
1668 .ai_pg = das16_pg_1602,
1669 .ao = das16_ao_winsn,
1671 .di = das16_di_rbits,
1672 .do_ = das16_do_wbits,
1673 .i8255_offset = 0x400,
1674 .i8254_offset = 0x0c,
1678 .name = "cio-das1602/16",
1679 .ai = das16_ai_rinsn,
1682 .ai_pg = das16_pg_1602,
1683 .ao = das16_ao_winsn,
1685 .di = das16_di_rbits,
1686 .do_ = das16_do_wbits,
1687 .i8255_offset = 0x400,
1688 .i8254_offset = 0x0c,
1692 .name = "cio-das16/330",
1693 .ai = das16_ai_rinsn,
1696 .ai_pg = das16_pg_16jr,
1698 .di = das16_di_rbits,
1699 .do_ = das16_do_wbits,
1701 .i8254_offset = 0x0c,
1707 static struct comedi_driver das16_driver = {
1708 .driver_name = "das16",
1709 .module = THIS_MODULE,
1710 .attach = das16_attach,
1711 .detach = das16_detach,
1712 .board_name = &das16_boards[0].name,
1713 .num_names = ARRAY_SIZE(das16_boards),
1714 .offset = sizeof(das16_boards[0]),
1716 module_comedi_driver(das16_driver);
1718 MODULE_AUTHOR("Comedi http://www.comedi.org");
1719 MODULE_DESCRIPTION("Comedi low-level driver");
1720 MODULE_LICENSE("GPL");