drivers/staging/comedi/drivers/das16.c

   1 /*
   2     comedi/drivers/das16.c
   3     DAS16 driver
   4
   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>
   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 Driver: das16
  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),
  33   DAS-1602 (das-1602),
  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)
  41 Status: works
  42 Updated: 2003-10-12
  43
  44 A rewrite of the das16 and das1600 drivers.
  45 Options:
  46         [0] - base io address
  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
  53                 programmable gain)
  54         [5] - analog input range highest voltage in microvolts (optional,
  55                 only useful if board does not have software programmable
  56                 gain)
  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.
  63
  64 Passing a zero for an option is the same as leaving it unspecified.
  65
  66 */
  67 /*
  68
  69 Testing and debugging help provided by Daniel Koch.
  70
  71 Keithley Manuals:
  72         2309.PDF (das16)
  73         4919.PDF (das1400, 1600)
  74         4922.PDF (das-1400)
  75         4923.PDF (das1200, 1400, 1600)
  76
  77 Computer boards manuals also available from their website
  78 www.measurementcomputing.com
  79
  80 */
  81
  82 #include <linux/pci.h>
  83 #include <linux/slab.h>
  84 #include <linux/interrupt.h>
  85 #include <asm/dma.h>
  86 #include "../comedidev.h"
  87
  88 #include "8253.h"
  89 #include "8255.h"
  90 #include "comedi_fc.h"
  91
  92 #undef DEBUG
  93 /* #define DEBUG */
  94
  95 #ifdef DEBUG
  96 #define DEBUG_PRINT(format, args...)    \
  97         printk(KERN_DEBUG "das16: " format, ## args)
  98 #else
  99 #define DEBUG_PRINT(format, args...)
 100 #endif
 101
 102 #define DAS16_SIZE 20           /*  number of ioports */
 103 #define DAS16_DMA_SIZE 0xff00   /*  size in bytes of allocated dma buffer */
 104
 105 /*
 106     cio-das16.pdf
 107
 108     "das16"
 109     "das16/f"
 110
 111   0     a/d bits 0-3            start 12 bit
 112   1     a/d bits 4-11           unused
 113   2     mux read                mux set
 114   3     di 4 bit                do 4 bit
 115   4     unused                  ao0_lsb
 116   5     unused                  ao0_msb
 117   6     unused                  ao1_lsb
 118   7     unused                  ao1_msb
 119   8     status eoc uni/bip      interrupt reset
 120   9     dma, int, trig ctrl     set dma, int
 121   a     pacer control           unused
 122   b     reserved                reserved
 123   cdef  8254
 124   0123  8255
 125
 126 */
 127
 128 /*
 129     cio-das16jr.pdf
 130
 131     "das16jr"
 132
 133   0     a/d bits 0-3            start 12 bit
 134   1     a/d bits 4-11           unused
 135   2     mux read                mux set
 136   3     di 4 bit                do 4 bit
 137   4567  unused                  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
 142   cdef  8254
 143
 144 */
 145
 146 /*
 147     cio-das16jr_16.pdf
 148
 149     "das16jr_16"
 150
 151   0     a/d bits 0-7            start 16 bit
 152   1     a/d bits 8-15           unused
 153   2     mux read                mux set
 154   3     di 4 bit                do 4 bit
 155   4567  unused                  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
 160   cdef  8254
 161
 162 */
 163 /*
 164     cio-das160x-1x.pdf
 165
 166     "das1601/12"
 167     "das1602/12"
 168     "das1602/16"
 169
 170   0     a/d bits 0-3            start 12 bit
 171   1     a/d bits 4-11           unused
 172   2     mux read                mux set
 173   3     di 4 bit                do 4 bit
 174   4     unused                  ao0_lsb
 175   5     unused                  ao0_msb
 176   6     unused                  ao1_lsb
 177   7     unused                  ao1_msb
 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
 182   cdef  8254
 183   400   8255
 184   404   unused                  conversion enable
 185   405   unused                  burst enable
 186   406   unused                  das1600 enable
 187   407   status
 188
 189 */
 190
 191 /*  size in bytes of a sample from board */
 192 static const int sample_size = 2;
 193
 194 #define DAS16_TRIG              0
 195 #define DAS16_AI_LSB            0
 196 #define DAS16_AI_MSB            1
 197 #define DAS16_MUX               2
 198 #define DAS16_DIO               3
 199 #define DAS16_AO_LSB(x) ((x) ? 6 : 4)
 200 #define DAS16_AO_MSB(x) ((x) ? 7 : 5)
 201 #define DAS16_STATUS            8
 202 #define   BUSY                  (1<<7)
 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
 230
 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
 243
 244 static const struct comedi_lrange range_das1x01_bip = { 4, {
 245                                                             BIP_RANGE(10),
 246                                                             BIP_RANGE(1),
 247                                                             BIP_RANGE(0.1),
 248                                                             BIP_RANGE(0.01),
 249                                                             }
 250 };
 251
 252 static const struct comedi_lrange range_das1x01_unip = { 4, {
 253                                                              UNI_RANGE(10),
 254                                                              UNI_RANGE(1),
 255                                                              UNI_RANGE(0.1),
 256                                                              UNI_RANGE(0.01),
 257                                                              }
 258 };
 259
 260 static const struct comedi_lrange range_das1x02_bip = { 4, {
 261                                                             BIP_RANGE(10),
 262                                                             BIP_RANGE(5),
 263                                                             BIP_RANGE(2.5),
 264                                                             BIP_RANGE(1.25),
 265                                                             }
 266 };
 267
 268 static const struct comedi_lrange range_das1x02_unip = { 4, {
 269                                                              UNI_RANGE(10),
 270                                                              UNI_RANGE(5),
 271                                                              UNI_RANGE(2.5),
 272                                                              UNI_RANGE(1.25),
 273                                                              }
 274 };
 275
 276 static const struct comedi_lrange range_das16jr = { 9, {
 277                                                 /*  also used by 16/330 */
 278                                                         BIP_RANGE(10),
 279                                                         BIP_RANGE(5),
 280                                                         BIP_RANGE(2.5),
 281                                                         BIP_RANGE(1.25),
 282                                                         BIP_RANGE(0.625),
 283                                                         UNI_RANGE(10),
 284                                                         UNI_RANGE(5),
 285                                                         UNI_RANGE(2.5),
 286                                                         UNI_RANGE(1.25),
 287                                                         }
 288 };
 289
 290 static const struct comedi_lrange range_das16jr_16 = { 8, {
 291                                                            BIP_RANGE(10),
 292                                                            BIP_RANGE(5),
 293                                                            BIP_RANGE(2.5),
 294                                                            BIP_RANGE(1.25),
 295                                                            UNI_RANGE(10),
 296                                                            UNI_RANGE(5),
 297                                                            UNI_RANGE(2.5),
 298                                                            UNI_RANGE(1.25),
 299                                                            }
 300 };
 301
 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 };
 305
 306 enum {
 307         das16_pg_none = 0,
 308         das16_pg_16jr,
 309         das16_pg_16jr_16,
 310         das16_pg_1601,
 311         das16_pg_1602,
 312 };
 313 static const int *const das16_gainlists[] = {
 314         NULL,
 315         das16jr_gainlist,
 316         das16jr_16_gainlist,
 317         das1600_gainlist,
 318         das1600_gainlist,
 319 };
 320
 321 static const struct comedi_lrange *const das16_ai_uni_lranges[] = {
 322         &range_unknown,
 323         &range_das16jr,
 324         &range_das16jr_16,
 325         &range_das1x01_unip,
 326         &range_das1x02_unip,
 327 };
 328
 329 static const struct comedi_lrange *const das16_ai_bip_lranges[] = {
 330         &range_unknown,
 331         &range_das16jr,
 332         &range_das16jr_16,
 333         &range_das1x01_bip,
 334         &range_das1x02_bip,
 335 };
 336
 337 struct munge_info {
 338         uint8_t byte;
 339         unsigned have_byte:1;
 340 };
 341
 342 struct das16_board {
 343         const char *name;
 344         void *ai;
 345         unsigned int ai_nbits;
 346         unsigned int ai_speed;  /*  max conversion speed in nanosec */
 347         unsigned int ai_pg;
 348         void *ao;
 349         unsigned int ao_nbits;
 350         void *di;
 351         void *do_;
 352
 353         unsigned int i8255_offset;
 354         unsigned int i8254_offset;
 355
 356         unsigned int size;
 357         unsigned int id;
 358 };
 359
 360 #define DAS16_TIMEOUT 1000
 361
 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)
 365 {
 366         return HZ / 20;
 367 }
 368
 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 */
 384         /**
 385          * user-defined analog input and output ranges
 386          * defined from config options
 387          */
 388         struct comedi_lrange *user_ai_range_table;
 389         struct comedi_lrange *user_ao_range_table;
 390
 391         struct timer_list timer;        /*  for timed interrupt */
 392         volatile short timer_running;
 393         volatile short timer_mode;      /*  true if using timer mode */
 394 };
 395
 396 static int das16_cmd_test(struct comedi_device *dev, struct comedi_subdevice *s,
 397                           struct comedi_cmd *cmd)
 398 {
 399         const struct das16_board *board = comedi_board(dev);
 400         struct das16_private_struct *devpriv = dev->private;
 401         int err = 0, tmp;
 402         int gain, start_chan, i;
 403         int mask;
 404
 405         /* Step 1 : check if triggers are trivially valid */
 406
 407         err |= cfc_check_trigger_src(&cmd->start_src, TRIG_NOW);
 408
 409         mask = TRIG_FOLLOW;
 410         /*  if board supports burst mode */
 411         if (board->size > 0x400)
 412                 mask |= TRIG_TIMER | TRIG_EXT;
 413         err |= cfc_check_trigger_src(&cmd->scan_begin_src, mask);
 414
 415         tmp = cmd->convert_src;
 416         mask = TRIG_TIMER | TRIG_EXT;
 417         /*  if board supports burst mode */
 418         if (board->size > 0x400)
 419                 mask |= TRIG_NOW;
 420         err |= cfc_check_trigger_src(&cmd->convert_src, mask);
 421
 422         err |= cfc_check_trigger_src(&cmd->scan_end_src, TRIG_COUNT);
 423         err |= cfc_check_trigger_src(&cmd->stop_src, TRIG_COUNT | TRIG_NONE);
 424
 425         if (err)
 426                 return 1;
 427
 428         /* Step 2a : make sure trigger sources are unique */
 429
 430         err |= cfc_check_trigger_is_unique(cmd->scan_begin_src);
 431         err |= cfc_check_trigger_is_unique(cmd->convert_src);
 432         err |= cfc_check_trigger_is_unique(cmd->stop_src);
 433
 434         /* Step 2b : and mutually compatible */
 435
 436         /*  make sure scan_begin_src and convert_src dont conflict */
 437         if (cmd->scan_begin_src == TRIG_FOLLOW && cmd->convert_src == TRIG_NOW)
 438                 err |= -EINVAL;
 439         if (cmd->scan_begin_src != TRIG_FOLLOW && cmd->convert_src != TRIG_NOW)
 440                 err |= -EINVAL;
 441
 442         if (err)
 443                 return 2;
 444
 445         /* Step 3: check if arguments are trivially valid */
 446
 447         err |= cfc_check_trigger_arg_is(&cmd->start_arg, 0);
 448
 449         if (cmd->scan_begin_src == TRIG_FOLLOW) /* internal trigger */
 450                 err |= cfc_check_trigger_arg_is(&cmd->scan_begin_arg, 0);
 451
 452         err |= cfc_check_trigger_arg_is(&cmd->scan_end_arg, cmd->chanlist_len);
 453
 454         /* check against maximum frequency */
 455         if (cmd->scan_begin_src == TRIG_TIMER)
 456                 err |= cfc_check_trigger_arg_min(&cmd->scan_begin_arg,
 457                                         board->ai_speed * cmd->chanlist_len);
 458
 459         if (cmd->convert_src == TRIG_TIMER)
 460                 err |= cfc_check_trigger_arg_min(&cmd->convert_arg,
 461                                                  board->ai_speed);
 462
 463         if (cmd->stop_src == TRIG_NONE)
 464                 err |= cfc_check_trigger_arg_is(&cmd->stop_arg, 0);
 465
 466         if (err)
 467                 return 3;
 468
 469         /*  step 4: fix up arguments */
 470         if (cmd->scan_begin_src == TRIG_TIMER) {
 471                 unsigned int tmp = cmd->scan_begin_arg;
 472                 /*  set divisors, correct timing arguments */
 473                 i8253_cascade_ns_to_timer_2div(devpriv->clockbase,
 474                                                &(devpriv->divisor1),
 475                                                &(devpriv->divisor2),
 476                                                &(cmd->scan_begin_arg),
 477                                                cmd->flags & TRIG_ROUND_MASK);
 478                 err += (tmp != cmd->scan_begin_arg);
 479         }
 480         if (cmd->convert_src == TRIG_TIMER) {
 481                 unsigned int tmp = cmd->convert_arg;
 482                 /*  set divisors, correct timing arguments */
 483                 i8253_cascade_ns_to_timer_2div(devpriv->clockbase,
 484                                                &(devpriv->divisor1),
 485                                                &(devpriv->divisor2),
 486                                                &(cmd->convert_arg),
 487                                                cmd->flags & TRIG_ROUND_MASK);
 488                 err += (tmp != cmd->convert_arg);
 489         }
 490         if (err)
 491                 return 4;
 492
 493         /*  check channel/gain list against card's limitations */
 494         if (cmd->chanlist) {
 495                 gain = CR_RANGE(cmd->chanlist[0]);
 496                 start_chan = CR_CHAN(cmd->chanlist[0]);
 497                 for (i = 1; i < cmd->chanlist_len; i++) {
 498                         if (CR_CHAN(cmd->chanlist[i]) !=
 499                             (start_chan + i) % s->n_chan) {
 500                                 comedi_error(dev,
 501                                                 "entries in chanlist must be "
 502                                                 "consecutive channels, "
 503                                                 "counting upwards\n");
 504                                 err++;
 505                         }
 506                         if (CR_RANGE(cmd->chanlist[i]) != gain) {
 507                                 comedi_error(dev,
 508                                                 "entries in chanlist must all "
 509                                                 "have the same gain\n");
 510                                 err++;
 511                         }
 512                 }
 513         }
 514         if (err)
 515                 return 5;
 516
 517         return 0;
 518 }
 519
 520 /* utility function that suggests a dma transfer size in bytes */
 521 static unsigned int das16_suggest_transfer_size(struct comedi_device *dev,
 522                                                 const struct comedi_cmd *cmd)
 523 {
 524         struct das16_private_struct *devpriv = dev->private;
 525         unsigned int size;
 526         unsigned int freq;
 527
 528         /* if we are using timer interrupt, we don't care how long it
 529          * will take to complete transfer since it will be interrupted
 530          * by timer interrupt */
 531         if (devpriv->timer_mode)
 532                 return DAS16_DMA_SIZE;
 533
 534         /* otherwise, we are relying on dma terminal count interrupt,
 535          * so pick a reasonable size */
 536         if (cmd->convert_src == TRIG_TIMER)
 537                 freq = 1000000000 / cmd->convert_arg;
 538         else if (cmd->scan_begin_src == TRIG_TIMER)
 539                 freq = (1000000000 / cmd->scan_begin_arg) * cmd->chanlist_len;
 540         /*  return some default value */
 541         else
 542                 freq = 0xffffffff;
 543
 544         if (cmd->flags & TRIG_WAKE_EOS) {
 545                 size = sample_size * cmd->chanlist_len;
 546         } else {
 547                 /*  make buffer fill in no more than 1/3 second */
 548                 size = (freq / 3) * sample_size;
 549         }
 550
 551         /*  set a minimum and maximum size allowed */
 552         if (size > DAS16_DMA_SIZE)
 553                 size = DAS16_DMA_SIZE - DAS16_DMA_SIZE % sample_size;
 554         else if (size < sample_size)
 555                 size = sample_size;
 556
 557         if (cmd->stop_src == TRIG_COUNT && size > devpriv->adc_byte_count)
 558                 size = devpriv->adc_byte_count;
 559
 560         return size;
 561 }
 562
 563 static unsigned int das16_set_pacer(struct comedi_device *dev, unsigned int ns,
 564                                     int rounding_flags)
 565 {
 566         struct das16_private_struct *devpriv = dev->private;
 567
 568         i8253_cascade_ns_to_timer_2div(devpriv->clockbase, &(devpriv->divisor1),
 569                                        &(devpriv->divisor2), &ns,
 570                                        rounding_flags & TRIG_ROUND_MASK);
 571
 572         /* Write the values of ctr1 and ctr2 into counters 1 and 2 */
 573         i8254_load(dev->iobase + DAS16_CNTR0_DATA, 0, 1, devpriv->divisor1, 2);
 574         i8254_load(dev->iobase + DAS16_CNTR0_DATA, 0, 2, devpriv->divisor2, 2);
 575
 576         return ns;
 577 }
 578
 579 static int das16_cmd_exec(struct comedi_device *dev, struct comedi_subdevice *s)
 580 {
 581         const struct das16_board *board = comedi_board(dev);
 582         struct das16_private_struct *devpriv = dev->private;
 583         struct comedi_async *async = s->async;
 584         struct comedi_cmd *cmd = &async->cmd;
 585         unsigned int byte;
 586         unsigned long flags;
 587         int range;
 588
 589         if (devpriv->dma_chan == 0 || (dev->irq == 0
 590                                        && devpriv->timer_mode == 0)) {
 591                 comedi_error(dev,
 592                                 "irq (or use of 'timer mode') dma required to "
 593                                                         "execute comedi_cmd");
 594                 return -1;
 595         }
 596         if (cmd->flags & TRIG_RT) {
 597                 comedi_error(dev, "isa dma transfers cannot be performed with "
 598                                                         "TRIG_RT, aborting");
 599                 return -1;
 600         }
 601
 602         devpriv->adc_byte_count =
 603             cmd->stop_arg * cmd->chanlist_len * sizeof(uint16_t);
 604
 605         /*  disable conversions for das1600 mode */
 606         if (board->size > 0x400)
 607                 outb(DAS1600_CONV_DISABLE, dev->iobase + DAS1600_CONV);
 608
 609         /*  set scan limits */
 610         byte = CR_CHAN(cmd->chanlist[0]);
 611         byte |= CR_CHAN(cmd->chanlist[cmd->chanlist_len - 1]) << 4;
 612         outb(byte, dev->iobase + DAS16_MUX);
 613
 614         /* set gain (this is also burst rate register but according to
 615          * computer boards manual, burst rate does nothing, even on
 616          * keithley cards) */
 617         if (board->ai_pg != das16_pg_none) {
 618                 range = CR_RANGE(cmd->chanlist[0]);
 619                 outb((das16_gainlists[board->ai_pg])[range],
 620                      dev->iobase + DAS16_GAIN);
 621         }
 622
 623         /* set counter mode and counts */
 624         cmd->convert_arg =
 625             das16_set_pacer(dev, cmd->convert_arg,
 626                             cmd->flags & TRIG_ROUND_MASK);
 627         DEBUG_PRINT("pacer period: %d ns\n", cmd->convert_arg);
 628
 629         /* enable counters */
 630         byte = 0;
 631         /* Enable burst mode if appropriate. */
 632         if (board->size > 0x400) {
 633                 if (cmd->convert_src == TRIG_NOW) {
 634                         outb(DAS1600_BURST_VAL, dev->iobase + DAS1600_BURST);
 635                         /*  set burst length */
 636                         byte |= BURST_LEN_BITS(cmd->chanlist_len - 1);
 637                 } else {
 638                         outb(0, dev->iobase + DAS1600_BURST);
 639                 }
 640         }
 641         outb(byte, dev->iobase + DAS16_PACER);
 642
 643         /*  set up dma transfer */
 644         flags = claim_dma_lock();
 645         disable_dma(devpriv->dma_chan);
 646         /* clear flip-flop to make sure 2-byte registers for
 647          * count and address get set correctly */
 648         clear_dma_ff(devpriv->dma_chan);
 649         devpriv->current_buffer = 0;
 650         set_dma_addr(devpriv->dma_chan,
 651                      devpriv->dma_buffer_addr[devpriv->current_buffer]);
 652         /*  set appropriate size of transfer */
 653         devpriv->dma_transfer_size = das16_suggest_transfer_size(dev, cmd);
 654         set_dma_count(devpriv->dma_chan, devpriv->dma_transfer_size);
 655         enable_dma(devpriv->dma_chan);
 656         release_dma_lock(flags);
 657
 658         /*  set up interrupt */
 659         if (devpriv->timer_mode) {
 660                 devpriv->timer_running = 1;
 661                 devpriv->timer.expires = jiffies + timer_period();
 662                 add_timer(&devpriv->timer);
 663                 devpriv->control_state &= ~DAS16_INTE;
 664         } else {
 665                 /* clear interrupt bit */
 666                 outb(0x00, dev->iobase + DAS16_STATUS);
 667                 /* enable interrupts */
 668                 devpriv->control_state |= DAS16_INTE;
 669         }
 670         devpriv->control_state |= DMA_ENABLE;
 671         devpriv->control_state &= ~PACING_MASK;
 672         if (cmd->convert_src == TRIG_EXT)
 673                 devpriv->control_state |= EXT_PACER;
 674         else
 675                 devpriv->control_state |= INT_PACER;
 676         outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
 677
 678         /* Enable conversions if using das1600 mode */
 679         if (board->size > 0x400)
 680                 outb(0, dev->iobase + DAS1600_CONV);
 681
 682
 683         return 0;
 684 }
 685
 686 static int das16_cancel(struct comedi_device *dev, struct comedi_subdevice *s)
 687 {
 688         const struct das16_board *board = comedi_board(dev);
 689         struct das16_private_struct *devpriv = dev->private;
 690         unsigned long flags;
 691
 692         spin_lock_irqsave(&dev->spinlock, flags);
 693         /* disable interrupts, dma and pacer clocked conversions */
 694         devpriv->control_state &= ~DAS16_INTE & ~PACING_MASK & ~DMA_ENABLE;
 695         outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
 696         if (devpriv->dma_chan)
 697                 disable_dma(devpriv->dma_chan);
 698
 699         /*  disable SW timer */
 700         if (devpriv->timer_mode && devpriv->timer_running) {
 701                 devpriv->timer_running = 0;
 702                 del_timer(&devpriv->timer);
 703         }
 704
 705         /* disable burst mode */
 706         if (board->size > 0x400)
 707                 outb(0, dev->iobase + DAS1600_BURST);
 708
 709
 710         spin_unlock_irqrestore(&dev->spinlock, flags);
 711
 712         return 0;
 713 }
 714
 715 static void das16_reset(struct comedi_device *dev)
 716 {
 717         outb(0, dev->iobase + DAS16_STATUS);
 718         outb(0, dev->iobase + DAS16_CONTROL);
 719         outb(0, dev->iobase + DAS16_PACER);
 720         outb(0, dev->iobase + DAS16_CNTR_CONTROL);
 721 }
 722
 723 static int das16_ai_rinsn(struct comedi_device *dev, struct comedi_subdevice *s,
 724                           struct comedi_insn *insn, unsigned int *data)
 725 {
 726         const struct das16_board *board = comedi_board(dev);
 727         struct das16_private_struct *devpriv = dev->private;
 728         int i, n;
 729         int range;
 730         int chan;
 731         int msb, lsb;
 732
 733         /*  disable interrupts and pacing */
 734         devpriv->control_state &= ~DAS16_INTE & ~DMA_ENABLE & ~PACING_MASK;
 735         outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
 736
 737         /* set multiplexer */
 738         chan = CR_CHAN(insn->chanspec);
 739         chan |= CR_CHAN(insn->chanspec) << 4;
 740         outb(chan, dev->iobase + DAS16_MUX);
 741
 742         /* set gain */
 743         if (board->ai_pg != das16_pg_none) {
 744                 range = CR_RANGE(insn->chanspec);
 745                 outb((das16_gainlists[board->ai_pg])[range],
 746                      dev->iobase + DAS16_GAIN);
 747         }
 748
 749         for (n = 0; n < insn->n; n++) {
 750                 /* trigger conversion */
 751                 outb_p(0, dev->iobase + DAS16_TRIG);
 752
 753                 for (i = 0; i < DAS16_TIMEOUT; i++) {
 754                         if (!(inb(dev->iobase + DAS16_STATUS) & BUSY))
 755                                 break;
 756                 }
 757                 if (i == DAS16_TIMEOUT) {
 758                         printk("das16: timeout\n");
 759                         return -ETIME;
 760                 }
 761                 msb = inb(dev->iobase + DAS16_AI_MSB);
 762                 lsb = inb(dev->iobase + DAS16_AI_LSB);
 763                 if (board->ai_nbits == 12)
 764                         data[n] = ((lsb >> 4) & 0xf) | (msb << 4);
 765                 else
 766                         data[n] = lsb | (msb << 8);
 767
 768         }
 769
 770         return n;
 771 }
 772
 773 static int das16_di_rbits(struct comedi_device *dev, struct comedi_subdevice *s,
 774                           struct comedi_insn *insn, unsigned int *data)
 775 {
 776         unsigned int bits;
 777
 778         bits = inb(dev->iobase + DAS16_DIO) & 0xf;
 779         data[1] = bits;
 780         data[0] = 0;
 781
 782         return insn->n;
 783 }
 784
 785 static int das16_do_wbits(struct comedi_device *dev, struct comedi_subdevice *s,
 786                           struct comedi_insn *insn, unsigned int *data)
 787 {
 788         unsigned int wbits;
 789
 790         /*  only set bits that have been masked */
 791         data[0] &= 0xf;
 792         wbits = s->state;
 793         /*  zero bits that have been masked */
 794         wbits &= ~data[0];
 795         /*  set masked bits */
 796         wbits |= data[0] & data[1];
 797         s->state = wbits;
 798         data[1] = wbits;
 799
 800         outb(s->state, dev->iobase + DAS16_DIO);
 801
 802         return insn->n;
 803 }
 804
 805 static int das16_ao_winsn(struct comedi_device *dev, struct comedi_subdevice *s,
 806                           struct comedi_insn *insn, unsigned int *data)
 807 {
 808         const struct das16_board *board = comedi_board(dev);
 809         int i;
 810         int lsb, msb;
 811         int chan;
 812
 813         chan = CR_CHAN(insn->chanspec);
 814
 815         for (i = 0; i < insn->n; i++) {
 816                 if (board->ao_nbits == 12) {
 817                         lsb = (data[i] << 4) & 0xff;
 818                         msb = (data[i] >> 4) & 0xff;
 819                 } else {
 820                         lsb = data[i] & 0xff;
 821                         msb = (data[i] >> 8) & 0xff;
 822                 }
 823                 outb(lsb, dev->iobase + DAS16_AO_LSB(chan));
 824                 outb(msb, dev->iobase + DAS16_AO_MSB(chan));
 825         }
 826
 827         return i;
 828 }
 829
 830 /* the pc104-das16jr (at least) has problems if the dma
 831         transfer is interrupted in the middle of transferring
 832         a 16 bit sample, so this function takes care to get
 833         an even transfer count after disabling dma
 834         channel.
 835 */
 836 static int disable_dma_on_even(struct comedi_device *dev)
 837 {
 838         struct das16_private_struct *devpriv = dev->private;
 839         int residue;
 840         int i;
 841         static const int disable_limit = 100;
 842         static const int enable_timeout = 100;
 843
 844         disable_dma(devpriv->dma_chan);
 845         residue = get_dma_residue(devpriv->dma_chan);
 846         for (i = 0; i < disable_limit && (residue % 2); ++i) {
 847                 int j;
 848                 enable_dma(devpriv->dma_chan);
 849                 for (j = 0; j < enable_timeout; ++j) {
 850                         int new_residue;
 851                         udelay(2);
 852                         new_residue = get_dma_residue(devpriv->dma_chan);
 853                         if (new_residue != residue)
 854                                 break;
 855                 }
 856                 disable_dma(devpriv->dma_chan);
 857                 residue = get_dma_residue(devpriv->dma_chan);
 858         }
 859         if (i == disable_limit) {
 860                 comedi_error(dev, "failed to get an even dma transfer, "
 861                                                         "could be trouble.");
 862         }
 863         return residue;
 864 }
 865
 866 static void das16_interrupt(struct comedi_device *dev)
 867 {
 868         const struct das16_board *board = comedi_board(dev);
 869         struct das16_private_struct *devpriv = dev->private;
 870         unsigned long dma_flags, spin_flags;
 871         struct comedi_subdevice *s = dev->read_subdev;
 872         struct comedi_async *async;
 873         struct comedi_cmd *cmd;
 874         int num_bytes, residue;
 875         int buffer_index;
 876
 877         if (dev->attached == 0) {
 878                 comedi_error(dev, "premature interrupt");
 879                 return;
 880         }
 881         /*  initialize async here to make sure it is not NULL */
 882         async = s->async;
 883         cmd = &async->cmd;
 884
 885         if (devpriv->dma_chan == 0) {
 886                 comedi_error(dev, "interrupt with no dma channel?");
 887                 return;
 888         }
 889
 890         spin_lock_irqsave(&dev->spinlock, spin_flags);
 891         if ((devpriv->control_state & DMA_ENABLE) == 0) {
 892                 spin_unlock_irqrestore(&dev->spinlock, spin_flags);
 893                 DEBUG_PRINT("interrupt while dma disabled?\n");
 894                 return;
 895         }
 896
 897         dma_flags = claim_dma_lock();
 898         clear_dma_ff(devpriv->dma_chan);
 899         residue = disable_dma_on_even(dev);
 900
 901         /*  figure out how many points to read */
 902         if (residue > devpriv->dma_transfer_size) {
 903                 comedi_error(dev, "residue > transfer size!\n");
 904                 async->events |= COMEDI_CB_ERROR | COMEDI_CB_EOA;
 905                 num_bytes = 0;
 906         } else
 907                 num_bytes = devpriv->dma_transfer_size - residue;
 908
 909         if (cmd->stop_src == TRIG_COUNT &&
 910                                         num_bytes >= devpriv->adc_byte_count) {
 911                 num_bytes = devpriv->adc_byte_count;
 912                 async->events |= COMEDI_CB_EOA;
 913         }
 914
 915         buffer_index = devpriv->current_buffer;
 916         devpriv->current_buffer = (devpriv->current_buffer + 1) % 2;
 917         devpriv->adc_byte_count -= num_bytes;
 918
 919         /*  figure out how many bytes for next transfer */
 920         if (cmd->stop_src == TRIG_COUNT && devpriv->timer_mode == 0 &&
 921             devpriv->dma_transfer_size > devpriv->adc_byte_count)
 922                 devpriv->dma_transfer_size = devpriv->adc_byte_count;
 923
 924         /*  re-enable  dma */
 925         if ((async->events & COMEDI_CB_EOA) == 0) {
 926                 set_dma_addr(devpriv->dma_chan,
 927                              devpriv->dma_buffer_addr[devpriv->current_buffer]);
 928                 set_dma_count(devpriv->dma_chan, devpriv->dma_transfer_size);
 929                 enable_dma(devpriv->dma_chan);
 930                 /* reenable conversions for das1600 mode, (stupid hardware) */
 931                 if (board->size > 0x400 && devpriv->timer_mode == 0)
 932                         outb(0x00, dev->iobase + DAS1600_CONV);
 933
 934         }
 935         release_dma_lock(dma_flags);
 936
 937         spin_unlock_irqrestore(&dev->spinlock, spin_flags);
 938
 939         cfc_write_array_to_buffer(s,
 940                                   devpriv->dma_buffer[buffer_index], num_bytes);
 941
 942         cfc_handle_events(dev, s);
 943 }
 944
 945 static irqreturn_t das16_dma_interrupt(int irq, void *d)
 946 {
 947         int status;
 948         struct comedi_device *dev = d;
 949
 950         status = inb(dev->iobase + DAS16_STATUS);
 951
 952         if ((status & DAS16_INT) == 0) {
 953                 DEBUG_PRINT("spurious interrupt\n");
 954                 return IRQ_NONE;
 955         }
 956
 957         /* clear interrupt */
 958         outb(0x00, dev->iobase + DAS16_STATUS);
 959         das16_interrupt(dev);
 960         return IRQ_HANDLED;
 961 }
 962
 963 static void das16_timer_interrupt(unsigned long arg)
 964 {
 965         struct comedi_device *dev = (struct comedi_device *)arg;
 966         struct das16_private_struct *devpriv = dev->private;
 967
 968         das16_interrupt(dev);
 969
 970         if (devpriv->timer_running)
 971                 mod_timer(&devpriv->timer, jiffies + timer_period());
 972 }
 973
 974 static void reg_dump(struct comedi_device *dev)
 975 {
 976         DEBUG_PRINT("********DAS1600 REGISTER DUMP********\n");
 977         DEBUG_PRINT("DAS16_MUX: %x\n", inb(dev->iobase + DAS16_MUX));
 978         DEBUG_PRINT("DAS16_DIO: %x\n", inb(dev->iobase + DAS16_DIO));
 979         DEBUG_PRINT("DAS16_STATUS: %x\n", inb(dev->iobase + DAS16_STATUS));
 980         DEBUG_PRINT("DAS16_CONTROL: %x\n", inb(dev->iobase + DAS16_CONTROL));
 981         DEBUG_PRINT("DAS16_PACER: %x\n", inb(dev->iobase + DAS16_PACER));
 982         DEBUG_PRINT("DAS16_GAIN: %x\n", inb(dev->iobase + DAS16_GAIN));
 983         DEBUG_PRINT("DAS16_CNTR_CONTROL: %x\n",
 984                     inb(dev->iobase + DAS16_CNTR_CONTROL));
 985         DEBUG_PRINT("DAS1600_CONV: %x\n", inb(dev->iobase + DAS1600_CONV));
 986         DEBUG_PRINT("DAS1600_BURST: %x\n", inb(dev->iobase + DAS1600_BURST));
 987         DEBUG_PRINT("DAS1600_ENABLE: %x\n", inb(dev->iobase + DAS1600_ENABLE));
 988         DEBUG_PRINT("DAS1600_STATUS_B: %x\n",
 989                     inb(dev->iobase + DAS1600_STATUS_B));
 990 }
 991
 992 static int das16_probe(struct comedi_device *dev, struct comedi_devconfig *it)
 993 {
 994         const struct das16_board *board = comedi_board(dev);
 995         struct das16_private_struct *devpriv = dev->private;
 996         int status;
 997         int diobits;
 998
 999         /* status is available on all boards */
1000
1001         status = inb(dev->iobase + DAS16_STATUS);
1002
1003         if ((status & UNIPOLAR))
1004                 devpriv->ai_unipolar = 1;
1005         else
1006                 devpriv->ai_unipolar = 0;
1007
1008
1009         if ((status & DAS16_MUXBIT))
1010                 devpriv->ai_singleended = 1;
1011         else
1012                 devpriv->ai_singleended = 0;
1013
1014
1015         /* diobits indicates boards */
1016
1017         diobits = inb(dev->iobase + DAS16_DIO) & 0xf0;
1018
1019         printk(KERN_INFO " id bits are 0x%02x\n", diobits);
1020         if (board->id != diobits) {
1021                 printk(KERN_INFO " requested board's id bits are 0x%x (ignore)\n",
1022                        board->id);
1023         }
1024
1025         return 0;
1026 }
1027
1028 static int das1600_mode_detect(struct comedi_device *dev)
1029 {
1030         struct das16_private_struct *devpriv = dev->private;
1031         int status = 0;
1032
1033         status = inb(dev->iobase + DAS1600_STATUS_B);
1034
1035         if (status & DAS1600_CLK_10MHZ) {
1036                 devpriv->clockbase = 100;
1037                 printk(KERN_INFO " 10MHz pacer clock\n");
1038         } else {
1039                 devpriv->clockbase = 1000;
1040                 printk(KERN_INFO " 1MHz pacer clock\n");
1041         }
1042
1043         reg_dump(dev);
1044
1045         return 0;
1046 }
1047
1048 static void das16_ai_munge(struct comedi_device *dev,
1049                            struct comedi_subdevice *s, void *array,
1050                            unsigned int num_bytes,
1051                            unsigned int start_chan_index)
1052 {
1053         const struct das16_board *board = comedi_board(dev);
1054         unsigned int i, num_samples = num_bytes / sizeof(short);
1055         short *data = array;
1056
1057         for (i = 0; i < num_samples; i++) {
1058                 data[i] = le16_to_cpu(data[i]);
1059                 if (board->ai_nbits == 12)
1060                         data[i] = (data[i] >> 4) & 0xfff;
1061
1062         }
1063 }
1064
1065 /*
1066  *
1067  * Options list:
1068  *   0  I/O base
1069  *   1  IRQ
1070  *   2  DMA
1071  *   3  Clock speed (in MHz)
1072  */
1073 static int das16_attach(struct comedi_device *dev, struct comedi_devconfig *it)
1074 {
1075         const struct das16_board *board = comedi_board(dev);
1076         struct das16_private_struct *devpriv;
1077         struct comedi_subdevice *s;
1078         int ret;
1079         unsigned int irq;
1080         unsigned long iobase;
1081         unsigned int dma_chan;
1082         int timer_mode;
1083         unsigned long flags;
1084         struct comedi_krange *user_ai_range, *user_ao_range;
1085
1086         iobase = it->options[0];
1087 #if 0
1088         irq = it->options[1];
1089         timer_mode = it->options[8];
1090 #endif
1091         /* always use time_mode since using irq can drop samples while
1092          * waiting for dma done interrupt (due to hardware limitations) */
1093         irq = 0;
1094         timer_mode = 1;
1095         if (timer_mode)
1096                 irq = 0;
1097
1098         printk(KERN_INFO "comedi%d: das16:", dev->minor);
1099
1100         /*  check that clock setting is valid */
1101         if (it->options[3]) {
1102                 if (it->options[3] != 0 &&
1103                     it->options[3] != 1 && it->options[3] != 10) {
1104                         printk
1105                             ("\n Invalid option.  Master clock must be set "
1106                                                         "to 1 or 10 (MHz)\n");
1107                         return -EINVAL;
1108                 }
1109         }
1110
1111         devpriv = kzalloc(sizeof(*devpriv), GFP_KERNEL);
1112         if (!devpriv)
1113                 return -ENOMEM;
1114         dev->private = devpriv;
1115
1116         if (board->size < 0x400) {
1117                 printk(" 0x%04lx-0x%04lx\n", iobase, iobase + board->size);
1118                 if (!request_region(iobase, board->size, "das16")) {
1119                         printk(KERN_ERR " I/O port conflict\n");
1120                         return -EIO;
1121                 }
1122         } else {
1123                 printk(KERN_INFO " 0x%04lx-0x%04lx 0x%04lx-0x%04lx\n",
1124                        iobase, iobase + 0x0f,
1125                        iobase + 0x400,
1126                        iobase + 0x400 + (board->size & 0x3ff));
1127                 if (!request_region(iobase, 0x10, "das16")) {
1128                         printk(KERN_ERR " I/O port conflict:  0x%04lx-0x%04lx\n",
1129                                iobase, iobase + 0x0f);
1130                         return -EIO;
1131                 }
1132                 if (!request_region(iobase + 0x400, board->size & 0x3ff,
1133                                     "das16")) {
1134                         release_region(iobase, 0x10);
1135                         printk(KERN_ERR " I/O port conflict:  0x%04lx-0x%04lx\n",
1136                                iobase + 0x400,
1137                                iobase + 0x400 + (board->size & 0x3ff));
1138                         return -EIO;
1139                 }
1140         }
1141
1142         dev->iobase = iobase;
1143
1144         /*  probe id bits to make sure they are consistent */
1145         if (das16_probe(dev, it)) {
1146                 printk(KERN_ERR " id bits do not match selected board, aborting\n");
1147                 return -EINVAL;
1148         }
1149         dev->board_name = board->name;
1150
1151         /*  get master clock speed */
1152         if (board->size < 0x400) {
1153                 if (it->options[3])
1154                         devpriv->clockbase = 1000 / it->options[3];
1155                 else
1156                         devpriv->clockbase = 1000;      /*  1 MHz default */
1157         } else {
1158                 das1600_mode_detect(dev);
1159         }
1160
1161         /* now for the irq */
1162         if (irq > 1 && irq < 8) {
1163                 ret = request_irq(irq, das16_dma_interrupt, 0, "das16", dev);
1164
1165                 if (ret < 0)
1166                         return ret;
1167                 dev->irq = irq;
1168                 printk(KERN_INFO " ( irq = %u )", irq);
1169         } else if (irq == 0) {
1170                 printk(" ( no irq )");
1171         } else {
1172                 printk(" invalid irq\n");
1173                 return -EINVAL;
1174         }
1175
1176         /*  initialize dma */
1177         dma_chan = it->options[2];
1178         if (dma_chan == 1 || dma_chan == 3) {
1179                 /*  allocate dma buffers */
1180                 int i;
1181                 for (i = 0; i < 2; i++) {
1182                         devpriv->dma_buffer[i] = pci_alloc_consistent(
1183                                                 NULL, DAS16_DMA_SIZE,
1184                                                 &devpriv->dma_buffer_addr[i]);
1185
1186                         if (devpriv->dma_buffer[i] == NULL)
1187                                 return -ENOMEM;
1188                 }
1189                 if (request_dma(dma_chan, "das16")) {
1190                         printk(KERN_ERR " failed to allocate dma channel %i\n",
1191                                dma_chan);
1192                         return -EINVAL;
1193                 }
1194                 devpriv->dma_chan = dma_chan;
1195                 flags = claim_dma_lock();
1196                 disable_dma(devpriv->dma_chan);
1197                 set_dma_mode(devpriv->dma_chan, DMA_MODE_READ);
1198                 release_dma_lock(flags);
1199                 printk(KERN_INFO " ( dma = %u)\n", dma_chan);
1200         } else if (dma_chan == 0) {
1201                 printk(KERN_INFO " ( no dma )\n");
1202         } else {
1203                 printk(KERN_ERR " invalid dma channel\n");
1204                 return -EINVAL;
1205         }
1206
1207         /*  get any user-defined input range */
1208         if (board->ai_pg == das16_pg_none &&
1209             (it->options[4] || it->options[5])) {
1210                 /*  allocate single-range range table */
1211                 devpriv->user_ai_range_table =
1212                     kmalloc(sizeof(struct comedi_lrange) +
1213                             sizeof(struct comedi_krange), GFP_KERNEL);
1214                 /*  initialize ai range */
1215                 devpriv->user_ai_range_table->length = 1;
1216                 user_ai_range = devpriv->user_ai_range_table->range;
1217                 user_ai_range->min = it->options[4];
1218                 user_ai_range->max = it->options[5];
1219                 user_ai_range->flags = UNIT_volt;
1220         }
1221         /*  get any user-defined output range */
1222         if (it->options[6] || it->options[7]) {
1223                 /*  allocate single-range range table */
1224                 devpriv->user_ao_range_table =
1225                     kmalloc(sizeof(struct comedi_lrange) +
1226                             sizeof(struct comedi_krange), GFP_KERNEL);
1227                 /*  initialize ao range */
1228                 devpriv->user_ao_range_table->length = 1;
1229                 user_ao_range = devpriv->user_ao_range_table->range;
1230                 user_ao_range->min = it->options[6];
1231                 user_ao_range->max = it->options[7];
1232                 user_ao_range->flags = UNIT_volt;
1233         }
1234
1235         if (timer_mode) {
1236                 init_timer(&(devpriv->timer));
1237                 devpriv->timer.function = das16_timer_interrupt;
1238                 devpriv->timer.data = (unsigned long)dev;
1239         }
1240         devpriv->timer_mode = timer_mode ? 1 : 0;
1241
1242         ret = comedi_alloc_subdevices(dev, 5);
1243         if (ret)
1244                 return ret;
1245
1246         s = &dev->subdevices[0];
1247         dev->read_subdev = s;
1248         /* ai */
1249         if (board->ai) {
1250                 s->type = COMEDI_SUBD_AI;
1251                 s->subdev_flags = SDF_READABLE | SDF_CMD_READ;
1252                 if (devpriv->ai_singleended) {
1253                         s->n_chan = 16;
1254                         s->len_chanlist = 16;
1255                         s->subdev_flags |= SDF_GROUND;
1256                 } else {
1257                         s->n_chan = 8;
1258                         s->len_chanlist = 8;
1259                         s->subdev_flags |= SDF_DIFF;
1260                 }
1261                 s->maxdata = (1 << board->ai_nbits) - 1;
1262                 if (devpriv->user_ai_range_table) { /*  user defined ai range */
1263                         s->range_table = devpriv->user_ai_range_table;
1264                 } else if (devpriv->ai_unipolar) {
1265                         s->range_table = das16_ai_uni_lranges[board->ai_pg];
1266                 } else {
1267                         s->range_table = das16_ai_bip_lranges[board->ai_pg];
1268                 }
1269                 s->insn_read = board->ai;
1270                 s->do_cmdtest = das16_cmd_test;
1271                 s->do_cmd = das16_cmd_exec;
1272                 s->cancel = das16_cancel;
1273                 s->munge = das16_ai_munge;
1274         } else {
1275                 s->type = COMEDI_SUBD_UNUSED;
1276         }
1277
1278         s = &dev->subdevices[1];
1279         /* ao */
1280         if (board->ao) {
1281                 s->type = COMEDI_SUBD_AO;
1282                 s->subdev_flags = SDF_WRITABLE;
1283                 s->n_chan = 2;
1284                 s->maxdata = (1 << board->ao_nbits) - 1;
1285                 /*  user defined ao range */
1286                 if (devpriv->user_ao_range_table)
1287                         s->range_table = devpriv->user_ao_range_table;
1288                 else
1289                         s->range_table = &range_unknown;
1290
1291                 s->insn_write = board->ao;
1292         } else {
1293                 s->type = COMEDI_SUBD_UNUSED;
1294         }
1295
1296         s = &dev->subdevices[2];
1297         /* di */
1298         if (board->di) {
1299                 s->type = COMEDI_SUBD_DI;
1300                 s->subdev_flags = SDF_READABLE;
1301                 s->n_chan = 4;
1302                 s->maxdata = 1;
1303                 s->range_table = &range_digital;
1304                 s->insn_bits = board->di;
1305         } else {
1306                 s->type = COMEDI_SUBD_UNUSED;
1307         }
1308
1309         s = &dev->subdevices[3];
1310         /* do */
1311         if (board->do_) {
1312                 s->type = COMEDI_SUBD_DO;
1313                 s->subdev_flags = SDF_WRITABLE | SDF_READABLE;
1314                 s->n_chan = 4;
1315                 s->maxdata = 1;
1316                 s->range_table = &range_digital;
1317                 s->insn_bits = board->do_;
1318                 /*  initialize digital output lines */
1319                 outb(s->state, dev->iobase + DAS16_DIO);
1320         } else {
1321                 s->type = COMEDI_SUBD_UNUSED;
1322         }
1323
1324         s = &dev->subdevices[4];
1325         /* 8255 */
1326         if (board->i8255_offset != 0) {
1327                 subdev_8255_init(dev, s, NULL, (dev->iobase +
1328                                                 board->i8255_offset));
1329         } else {
1330                 s->type = COMEDI_SUBD_UNUSED;
1331         }
1332
1333         das16_reset(dev);
1334         /* set the interrupt level */
1335         devpriv->control_state = DAS16_IRQ(dev->irq);
1336         outb(devpriv->control_state, dev->iobase + DAS16_CONTROL);
1337
1338         /*  turn on das1600 mode if available */
1339         if (board->size > 0x400) {
1340                 outb(DAS1600_ENABLE_VAL, dev->iobase + DAS1600_ENABLE);
1341                 outb(0, dev->iobase + DAS1600_CONV);
1342                 outb(0, dev->iobase + DAS1600_BURST);
1343         }
1344
1345         return 0;
1346 }
1347
1348 static void das16_detach(struct comedi_device *dev)
1349 {
1350         const struct das16_board *board = comedi_board(dev);
1351         struct das16_private_struct *devpriv = dev->private;
1352
1353         das16_reset(dev);
1354         if (dev->subdevices)
1355                 subdev_8255_cleanup(dev, &dev->subdevices[4]);
1356         if (devpriv) {
1357                 int i;
1358                 for (i = 0; i < 2; i++) {
1359                         if (devpriv->dma_buffer[i])
1360                                 pci_free_consistent(NULL, DAS16_DMA_SIZE,
1361                                                     devpriv->dma_buffer[i],
1362                                                     devpriv->
1363                                                     dma_buffer_addr[i]);
1364                 }
1365                 if (devpriv->dma_chan)
1366                         free_dma(devpriv->dma_chan);
1367                 kfree(devpriv->user_ai_range_table);
1368                 kfree(devpriv->user_ao_range_table);
1369         }
1370         if (dev->irq)
1371                 free_irq(dev->irq, dev);
1372         if (dev->iobase) {
1373                 if (board->size < 0x400) {
1374                         release_region(dev->iobase, board->size);
1375                 } else {
1376                         release_region(dev->iobase, 0x10);
1377                         release_region(dev->iobase + 0x400,
1378                                        board->size & 0x3ff);
1379                 }
1380         }
1381 }
1382
1383 static const struct das16_board das16_boards[] = {
1384         {
1385                 .name           = "das-16",
1386                 .ai             = das16_ai_rinsn,
1387                 .ai_nbits       = 12,
1388                 .ai_speed       = 15000,
1389                 .ai_pg          = das16_pg_none,
1390                 .ao             = das16_ao_winsn,
1391                 .ao_nbits       = 12,
1392                 .di             = das16_di_rbits,
1393                 .do_            = das16_do_wbits,
1394                 .i8255_offset   = 0x10,
1395                 .i8254_offset   = 0x0c,
1396                 .size           = 0x14,
1397                 .id             = 0x00,
1398         }, {
1399                 .name           = "das-16g",
1400                 .ai             = das16_ai_rinsn,
1401                 .ai_nbits       = 12,
1402                 .ai_speed       = 15000,
1403                 .ai_pg          = das16_pg_none,
1404                 .ao             = das16_ao_winsn,
1405                 .ao_nbits       = 12,
1406                 .di             = das16_di_rbits,
1407                 .do_            = das16_do_wbits,
1408                 .i8255_offset   = 0x10,
1409                 .i8254_offset   = 0x0c,
1410                 .size           = 0x14,
1411                 .id             = 0x00,
1412         }, {
1413                 .name           = "das-16f",
1414                 .ai             = das16_ai_rinsn,
1415                 .ai_nbits       = 12,
1416                 .ai_speed       = 8500,
1417                 .ai_pg          = das16_pg_none,
1418                 .ao             = das16_ao_winsn,
1419                 .ao_nbits       = 12,
1420                 .di             = das16_di_rbits,
1421                 .do_            = das16_do_wbits,
1422                 .i8255_offset   = 0x10,
1423                 .i8254_offset   = 0x0c,
1424                 .size           = 0x14,
1425                 .id             = 0x00,
1426         }, {
1427                 .name           = "cio-das16",
1428                 .ai             = das16_ai_rinsn,
1429                 .ai_nbits       = 12,
1430                 .ai_speed       = 20000,
1431                 .ai_pg          = das16_pg_none,
1432                 .ao             = das16_ao_winsn,
1433                 .ao_nbits       = 12,
1434                 .di             = das16_di_rbits,
1435                 .do_            = das16_do_wbits,
1436                 .i8255_offset   = 0x10,
1437                 .i8254_offset   = 0x0c,
1438                 .size           = 0x14,
1439                 .id             = 0x80,
1440         }, {
1441                 .name           = "cio-das16/f",
1442                 .ai             = das16_ai_rinsn,
1443                 .ai_nbits       = 12,
1444                 .ai_speed       = 10000,
1445                 .ai_pg          = das16_pg_none,
1446                 .ao             = das16_ao_winsn,
1447                 .ao_nbits       = 12,
1448                 .di             = das16_di_rbits,
1449                 .do_            = das16_do_wbits,
1450                 .i8255_offset   = 0x10,
1451                 .i8254_offset   = 0x0c,
1452                 .size           = 0x14,
1453                 .id             = 0x80,
1454         }, {
1455                 .name           = "cio-das16/jr",
1456                 .ai             = das16_ai_rinsn,
1457                 .ai_nbits       = 12,
1458                 .ai_speed       = 7692,
1459                 .ai_pg          = das16_pg_16jr,
1460                 .ao             = NULL,
1461                 .di             = das16_di_rbits,
1462                 .do_            = das16_do_wbits,
1463                 .i8255_offset   = 0,
1464                 .i8254_offset   = 0x0c,
1465                 .size           = 0x10,
1466                 .id             = 0x00,
1467         }, {
1468                 .name           = "pc104-das16jr",
1469                 .ai             = das16_ai_rinsn,
1470                 .ai_nbits       = 12,
1471                 .ai_speed       = 3300,
1472                 .ai_pg          = das16_pg_16jr,
1473                 .ao             = NULL,
1474                 .di             = das16_di_rbits,
1475                 .do_            = das16_do_wbits,
1476                 .i8255_offset   = 0,
1477                 .i8254_offset   = 0x0c,
1478                 .size           = 0x10,
1479                 .id             = 0x00,
1480         }, {
1481                 .name           = "cio-das16jr/16",
1482                 .ai             = das16_ai_rinsn,
1483                 .ai_nbits       = 16,
1484                 .ai_speed       = 10000,
1485                 .ai_pg          = das16_pg_16jr_16,
1486                 .ao             = NULL,
1487                 .di             = das16_di_rbits,
1488                 .do_            = das16_do_wbits,
1489                 .i8255_offset   = 0,
1490                 .i8254_offset   = 0x0c,
1491                 .size           = 0x10,
1492                 .id             = 0x00,
1493         }, {
1494                 .name           = "pc104-das16jr/16",
1495                 .ai             = das16_ai_rinsn,
1496                 .ai_nbits       = 16,
1497                 .ai_speed       = 10000,
1498                 .ai_pg          = das16_pg_16jr_16,
1499                 .ao             = NULL,
1500                 .di             = das16_di_rbits,
1501                 .do_            = das16_do_wbits,
1502                 .i8255_offset   = 0,
1503                 .i8254_offset   = 0x0c,
1504                 .size           = 0x10,
1505                 .id             = 0x00,
1506         }, {
1507                 .name           = "das-1201",
1508                 .ai             = das16_ai_rinsn,
1509                 .ai_nbits       = 12,
1510                 .ai_speed       = 20000,
1511                 .ai_pg          = das16_pg_none,
1512                 .ao             = NULL,
1513                 .di             = das16_di_rbits,
1514                 .do_            = das16_do_wbits,
1515                 .i8255_offset   = 0x400,
1516                 .i8254_offset   = 0x0c,
1517                 .size           = 0x408,
1518                 .id             = 0x20,
1519         }, {
1520                 .name           = "das-1202",
1521                 .ai             = das16_ai_rinsn,
1522                 .ai_nbits       = 12,
1523                 .ai_speed       = 10000,
1524                 .ai_pg          = das16_pg_none,
1525                 .ao             = NULL,
1526                 .di             = das16_di_rbits,
1527                 .do_            = das16_do_wbits,
1528                 .i8255_offset   = 0x400,
1529                 .i8254_offset   = 0x0c,
1530                 .size           = 0x408,
1531                 .id             = 0x20,
1532         }, {
1533                 .name           = "das-1401",
1534                 .ai             = das16_ai_rinsn,
1535                 .ai_nbits       = 12,
1536                 .ai_speed       = 10000,
1537                 .ai_pg          = das16_pg_1601,
1538                 .ao             = NULL,
1539                 .di             = das16_di_rbits,
1540                 .do_            = das16_do_wbits,
1541                 .i8255_offset   = 0x0,
1542                 .i8254_offset   = 0x0c,
1543                 .size           = 0x408,
1544                 .id             = 0xc0,
1545         }, {
1546                 .name           = "das-1402",
1547                 .ai             = das16_ai_rinsn,
1548                 .ai_nbits       = 12,
1549                 .ai_speed       = 10000,
1550                 .ai_pg          = das16_pg_1602,
1551                 .ao             = NULL,
1552                 .di             = das16_di_rbits,
1553                 .do_            = das16_do_wbits,
1554                 .i8255_offset   = 0x0,
1555                 .i8254_offset   = 0x0c,
1556                 .size           = 0x408,
1557                 .id             = 0xc0,
1558         }, {
1559                 .name           = "das-1601",
1560                 .ai             = das16_ai_rinsn,
1561                 .ai_nbits       = 12,
1562                 .ai_speed       = 10000,
1563                 .ai_pg          = das16_pg_1601,
1564                 .ao             = das16_ao_winsn,
1565                 .ao_nbits       = 12,
1566                 .di             = das16_di_rbits,
1567                 .do_            = das16_do_wbits,
1568                 .i8255_offset   = 0x400,
1569                 .i8254_offset   = 0x0c,
1570                 .size           = 0x408,
1571                 .id             = 0xc0,
1572         }, {
1573                 .name           = "das-1602",
1574                 .ai             = das16_ai_rinsn,
1575                 .ai_nbits       = 12,
1576                 .ai_speed       = 10000,
1577                 .ai_pg          = das16_pg_1602,
1578                 .ao             = das16_ao_winsn,
1579                 .ao_nbits       = 12,
1580                 .di             = das16_di_rbits,
1581                 .do_            = das16_do_wbits,
1582                 .i8255_offset   = 0x400,
1583                 .i8254_offset   = 0x0c,
1584                 .size           = 0x408,
1585                 .id             = 0xc0,
1586         }, {
1587                 .name           = "cio-das1401/12",
1588                 .ai             = das16_ai_rinsn,
1589                 .ai_nbits       = 12,
1590                 .ai_speed       = 6250,
1591                 .ai_pg          = das16_pg_1601,
1592                 .ao             = NULL,
1593                 .di             = das16_di_rbits,
1594                 .do_            = das16_do_wbits,
1595                 .i8255_offset   = 0,
1596                 .i8254_offset   = 0x0c,
1597                 .size           = 0x408,
1598                 .id             = 0xc0,
1599         }, {
1600                 .name           = "cio-das1402/12",
1601                 .ai             = das16_ai_rinsn,
1602                 .ai_nbits       = 12,
1603                 .ai_speed       = 6250,
1604                 .ai_pg          = das16_pg_1602,
1605                 .ao             = NULL,
1606                 .di             = das16_di_rbits,
1607                 .do_            = das16_do_wbits,
1608                 .i8255_offset   = 0,
1609                 .i8254_offset   = 0x0c,
1610                 .size           = 0x408,
1611                 .id             = 0xc0,
1612         }, {
1613                 .name           = "cio-das1402/16",
1614                 .ai             = das16_ai_rinsn,
1615                 .ai_nbits       = 16,
1616                 .ai_speed       = 10000,
1617                 .ai_pg          = das16_pg_1602,
1618                 .ao             = NULL,
1619                 .di             = das16_di_rbits,
1620                 .do_            = das16_do_wbits,
1621                 .i8255_offset   = 0,
1622                 .i8254_offset   = 0x0c,
1623                 .size           = 0x408,
1624                 .id             = 0xc0,
1625         }, {
1626                 .name           = "cio-das1601/12",
1627                 .ai             = das16_ai_rinsn,
1628                 .ai_nbits       = 12,
1629                 .ai_speed       = 6250,
1630                 .ai_pg          = das16_pg_1601,
1631                 .ao             = das16_ao_winsn,
1632                 .ao_nbits       = 12,
1633                 .di             = das16_di_rbits,
1634                 .do_            = das16_do_wbits,
1635                 .i8255_offset   = 0x400,
1636                 .i8254_offset   = 0x0c,
1637                 .size           = 0x408,
1638                 .id             = 0xc0,
1639         }, {
1640                 .name           = "cio-das1602/12",
1641                 .ai             = das16_ai_rinsn,
1642                 .ai_nbits       = 12,
1643                 .ai_speed       = 10000,
1644                 .ai_pg          = das16_pg_1602,
1645                 .ao             = das16_ao_winsn,
1646                 .ao_nbits       = 12,
1647                 .di             = das16_di_rbits,
1648                 .do_            = das16_do_wbits,
1649                 .i8255_offset   = 0x400,
1650                 .i8254_offset   = 0x0c,
1651                 .size           = 0x408,
1652                 .id             = 0xc0,
1653         }, {
1654                 .name           = "cio-das1602/16",
1655                 .ai             = das16_ai_rinsn,
1656                 .ai_nbits       = 16,
1657                 .ai_speed       = 10000,
1658                 .ai_pg          = das16_pg_1602,
1659                 .ao             = das16_ao_winsn,
1660                 .ao_nbits       = 12,
1661                 .di             = das16_di_rbits,
1662                 .do_            = das16_do_wbits,
1663                 .i8255_offset   = 0x400,
1664                 .i8254_offset   = 0x0c,
1665                 .size           = 0x408,
1666                 .id             = 0xc0,
1667         }, {
1668                 .name           = "cio-das16/330",
1669                 .ai             = das16_ai_rinsn,
1670                 .ai_nbits       = 12,
1671                 .ai_speed       = 3030,
1672                 .ai_pg          = das16_pg_16jr,
1673                 .ao             = NULL,
1674                 .di             = das16_di_rbits,
1675                 .do_            = das16_do_wbits,
1676                 .i8255_offset   = 0,
1677                 .i8254_offset   = 0x0c,
1678                 .size           = 0x14,
1679                 .id             = 0xf0,
1680         },
1681 };
1682
1683 static struct comedi_driver das16_driver = {
1684         .driver_name    = "das16",
1685         .module         = THIS_MODULE,
1686         .attach         = das16_attach,
1687         .detach         = das16_detach,
1688         .board_name     = &das16_boards[0].name,
1689         .num_names      = ARRAY_SIZE(das16_boards),
1690         .offset         = sizeof(das16_boards[0]),
1691 };
1692 module_comedi_driver(das16_driver);
1693
1694 MODULE_AUTHOR("Comedi http://www.comedi.org");
1695 MODULE_DESCRIPTION("Comedi low-level driver");
1696 MODULE_LICENSE("GPL");