Quelle  cb_das16_cs.c   Sprache: C

// SPDX-License-Identifier: GPL-2.0+
/*
 * cb_das16_cs.c
 * Driver for Computer Boards PC-CARD DAS16/16.
 *
 * COMEDI - Linux Control and Measurement Device Interface
 * Copyright (C) 2000, 2001, 2002 David A. Schleef <ds@schleef.org>
 *
 * PCMCIA support code for this driver is adapted from the dummy_cs.c
 * driver of the Linux PCMCIA Card Services package.
 *
 * The initial developer of the original code is David A. Hinds
 * <dahinds@users.sourceforge.net>.  Portions created by David A. Hinds
 * are Copyright (C) 1999 David A. Hinds.  All Rights Reserved.
 */

/*
 * Driver: cb_das16_cs
 * Description: Computer Boards PC-CARD DAS16/16
 * Devices: [ComputerBoards] PC-CARD DAS16/16 (cb_das16_cs),
 *   PC-CARD DAS16/16-AO
 * Author: ds
 * Updated: Mon, 04 Nov 2002 20:04:21 -0800
 * Status: experimental
 */

#include <linux/module.h>
#include <linux/interrupt.h>
#include <linux/delay.h>
#include <linux/comedi/comedi_pcmcia.h>
#include <linux/comedi/comedi_8254.h>

/*
 * Register I/O map
 */
#define DAS16CS_AI_DATA_REG  0x00
#define DAS16CS_AI_MUX_REG  0x02
#define DAS16CS_AI_MUX_HI_CHAN(x) (((x) & 0xf) << 4)
#define DAS16CS_AI_MUX_LO_CHAN(x) (((x) & 0xf) << 0)
#define DAS16CS_AI_MUX_SINGLE_CHAN(x) (DAS16CS_AI_MUX_HI_CHAN(x) | \
      DAS16CS_AI_MUX_LO_CHAN(x))
#define DAS16CS_MISC1_REG  0x04
#define DAS16CS_MISC1_INTE  BIT(15) /* 1=enable; 0=disable */
#define DAS16CS_MISC1_INT_SRC(x) (((x) & 0x7) << 12) /* interrupt src */
#define DAS16CS_MISC1_INT_SRC_NONE DAS16CS_MISC1_INT_SRC(0)
#define DAS16CS_MISC1_INT_SRC_PACER DAS16CS_MISC1_INT_SRC(1)
#define DAS16CS_MISC1_INT_SRC_EXT DAS16CS_MISC1_INT_SRC(2)
#define DAS16CS_MISC1_INT_SRC_FNE DAS16CS_MISC1_INT_SRC(3)
#define DAS16CS_MISC1_INT_SRC_FHF DAS16CS_MISC1_INT_SRC(4)
#define DAS16CS_MISC1_INT_SRC_EOS DAS16CS_MISC1_INT_SRC(5)
#define DAS16CS_MISC1_INT_SRC_MASK DAS16CS_MISC1_INT_SRC(7)
#define DAS16CS_MISC1_OVR  BIT(10) /* ro - 1=FIFO overflow */
#define DAS16CS_MISC1_AI_CONV(x) (((x) & 0x3) << 8) /* AI convert src */
#define DAS16CS_MISC1_AI_CONV_SW DAS16CS_MISC1_AI_CONV(0)
#define DAS16CS_MISC1_AI_CONV_EXT_NEG DAS16CS_MISC1_AI_CONV(1)
#define DAS16CS_MISC1_AI_CONV_EXT_POS DAS16CS_MISC1_AI_CONV(2)
#define DAS16CS_MISC1_AI_CONV_PACER DAS16CS_MISC1_AI_CONV(3)
#define DAS16CS_MISC1_AI_CONV_MASK DAS16CS_MISC1_AI_CONV(3)
#define DAS16CS_MISC1_EOC  BIT(7) /* ro - 0=busy; 1=ready */
#define DAS16CS_MISC1_SEDIFF  BIT(5) /* 0=diff; 1=se */
#define DAS16CS_MISC1_INTB  BIT(4) /* ro - 0=latched; 1=cleared */
#define DAS16CS_MISC1_MA_MASK  (0xf << 0) /* ro - current ai mux */
#define DAS16CS_MISC1_DAC1CS  BIT(3) /* wo - DAC1 chip select */
#define DAS16CS_MISC1_DACCLK  BIT(2) /* wo - Serial DAC clock */
#define DAS16CS_MISC1_DACSD  BIT(1) /* wo - Serial DAC data */
#define DAS16CS_MISC1_DAC0CS  BIT(0) /* wo - DAC0 chip select */
#define DAS16CS_MISC1_DAC_MASK  (0x0f << 0)
#define DAS16CS_MISC2_REG  0x06
#define DAS16CS_MISC2_BME  BIT(14) /* 1=burst enable; 0=disable */
#define DAS16CS_MISC2_AI_GAIN(x) (((x) & 0xf) << 8) /* AI gain */
#define DAS16CS_MISC2_AI_GAIN_1  DAS16CS_MISC2_AI_GAIN(4) /* +/-10V */
#define DAS16CS_MISC2_AI_GAIN_2  DAS16CS_MISC2_AI_GAIN(0) /* +/-5V */
#define DAS16CS_MISC2_AI_GAIN_4  DAS16CS_MISC2_AI_GAIN(1) /* +/-2.5V */
#define DAS16CS_MISC2_AI_GAIN_8  DAS16CS_MISC2_AI_GAIN(2) /* +-1.25V */
#define DAS16CS_MISC2_AI_GAIN_MASK DAS16CS_MISC2_AI_GAIN(0xf)
#define DAS16CS_MISC2_UDIR  BIT(7) /* 1=dio7:4 output; 0=input */
#define DAS16CS_MISC2_LDIR  BIT(6) /* 1=dio3:0 output; 0=input */
#define DAS16CS_MISC2_TRGPOL  BIT(5) /* 1=active lo; 0=hi */
#define DAS16CS_MISC2_TRGSEL  BIT(4) /* 1=edge; 0=level */
#define DAS16CS_MISC2_FFNE  BIT(3) /* ro - 1=FIFO not empty */
#define DAS16CS_MISC2_TRGCLR  BIT(3) /* wo - 1=clr (monstable) */
#define DAS16CS_MISC2_CLK2  BIT(2) /* 1=10 MHz; 0=1 MHz */
#define DAS16CS_MISC2_CTR1  BIT(1) /* 1=int. 100 kHz; 0=ext. clk */
#define DAS16CS_MISC2_TRG0  BIT(0) /* 1=enable; 0=disable */
#define DAS16CS_TIMER_BASE  0x08
#define DAS16CS_DIO_REG   0x10

struct das16cs_board {
 const char *name;
 int device_id;
 unsigned int has_ao:1;
 unsigned int has_4dio:1;
};

static const struct das16cs_board das16cs_boards[] = {
 {
  .name  = "PC-CARD DAS16/16-AO",
  .device_id = 0x0039,
  .has_ao  = 1,
  .has_4dio = 1,
 }, {
  .name  = "PCM-DAS16s/16",
  .device_id = 0x4009,
 }, {
  .name  = "PC-CARD DAS16/16",
  .device_id = 0x0000, /* unknown */
 },
};

struct das16cs_private {
 unsigned short misc1;
 unsigned short misc2;
};

static const struct comedi_lrange das16cs_ai_range = {
 4, {
  BIP_RANGE(10),
  BIP_RANGE(5),
  BIP_RANGE(2.5),
  BIP_RANGE(1.25),
 }
};

static int das16cs_ai_eoc(struct comedi_device *dev,
     struct comedi_subdevice *s,
     struct comedi_insn *insn,
     unsigned long context)
{
 unsigned int status;

 status = inw(dev->iobase + DAS16CS_MISC1_REG);
 if (status & DAS16CS_MISC1_EOC)
  return 0;
 return -EBUSY;
}

static int das16cs_ai_insn_read(struct comedi_device *dev,
    struct comedi_subdevice *s,
    struct comedi_insn *insn,
    unsigned int *data)
{
 struct das16cs_private *devpriv = dev->private;
 int chan = CR_CHAN(insn->chanspec);
 int range = CR_RANGE(insn->chanspec);
 int aref = CR_AREF(insn->chanspec);
 int ret;
 int i;

 outw(DAS16CS_AI_MUX_SINGLE_CHAN(chan),
      dev->iobase + DAS16CS_AI_MUX_REG);

 /* disable interrupts, software convert */
 devpriv->misc1 &= ~(DAS16CS_MISC1_INTE | DAS16CS_MISC1_INT_SRC_MASK |
         DAS16CS_MISC1_AI_CONV_MASK);
 if (aref == AREF_DIFF)
  devpriv->misc1 &= ~DAS16CS_MISC1_SEDIFF;
 else
  devpriv->misc1 |= DAS16CS_MISC1_SEDIFF;
 outw(devpriv->misc1, dev->iobase + DAS16CS_MISC1_REG);

 devpriv->misc2 &= ~(DAS16CS_MISC2_BME | DAS16CS_MISC2_AI_GAIN_MASK);
 switch (range) {
 case 0:
  devpriv->misc2 |= DAS16CS_MISC2_AI_GAIN_1;
  break;
 case 1:
  devpriv->misc2 |= DAS16CS_MISC2_AI_GAIN_2;
  break;
 case 2:
  devpriv->misc2 |= DAS16CS_MISC2_AI_GAIN_4;
  break;
 case 3:
  devpriv->misc2 |= DAS16CS_MISC2_AI_GAIN_8;
  break;
 }
 outw(devpriv->misc2, dev->iobase + DAS16CS_MISC2_REG);

 for (i = 0; i < insn->n; i++) {
  outw(0, dev->iobase + DAS16CS_AI_DATA_REG);

  ret = comedi_timeout(dev, s, insn, das16cs_ai_eoc, 0);
  if (ret)
   return ret;

  data[i] = inw(dev->iobase + DAS16CS_AI_DATA_REG);
 }

 return i;
}

static int das16cs_ao_insn_write(struct comedi_device *dev,
     struct comedi_subdevice *s,
     struct comedi_insn *insn,
     unsigned int *data)
{
 struct das16cs_private *devpriv = dev->private;
 unsigned int chan = CR_CHAN(insn->chanspec);
 unsigned int val = s->readback[chan];
 unsigned short misc1;
 int bit;
 int i;

 for (i = 0; i < insn->n; i++) {
  val = data[i];

  outw(devpriv->misc1, dev->iobase + DAS16CS_MISC1_REG);
  udelay(1);

  /* raise the DACxCS line for the non-selected channel */
  misc1 = devpriv->misc1 & ~DAS16CS_MISC1_DAC_MASK;
  if (chan)
   misc1 |= DAS16CS_MISC1_DAC0CS;
  else
   misc1 |= DAS16CS_MISC1_DAC1CS;

  outw(misc1, dev->iobase + DAS16CS_MISC1_REG);
  udelay(1);

  for (bit = 15; bit >= 0; bit--) {
   if ((val >> bit) & 0x1)
    misc1 |= DAS16CS_MISC1_DACSD;
   else
    misc1 &= ~DAS16CS_MISC1_DACSD;
   outw(misc1, dev->iobase + DAS16CS_MISC1_REG);
   udelay(1);
   outw(misc1 | DAS16CS_MISC1_DACCLK,
        dev->iobase + DAS16CS_MISC1_REG);
   udelay(1);
  }
  /*
 * Make both DAC0CS and DAC1CS high to load
 * the new data and update analog the output
 */
  outw(misc1 | DAS16CS_MISC1_DAC0CS | DAS16CS_MISC1_DAC1CS,
       dev->iobase + DAS16CS_MISC1_REG);
 }
 s->readback[chan] = val;

 return insn->n;
}

static int das16cs_dio_insn_bits(struct comedi_device *dev,
     struct comedi_subdevice *s,
     struct comedi_insn *insn,
     unsigned int *data)
{
 if (comedi_dio_update_state(s, data))
  outw(s->state, dev->iobase + DAS16CS_DIO_REG);

 data[1] = inw(dev->iobase + DAS16CS_DIO_REG);

 return insn->n;
}

static int das16cs_dio_insn_config(struct comedi_device *dev,
       struct comedi_subdevice *s,
       struct comedi_insn *insn,
       unsigned int *data)
{
 struct das16cs_private *devpriv = dev->private;
 unsigned int chan = CR_CHAN(insn->chanspec);
 unsigned int mask;
 int ret;

 if (chan < 4)
  mask = 0x0f;
 else
  mask = 0xf0;

 ret = comedi_dio_insn_config(dev, s, insn, data, mask);
 if (ret)
  return ret;

 if (s->io_bits & 0xf0)
  devpriv->misc2 |= DAS16CS_MISC2_UDIR;
 else
  devpriv->misc2 &= ~DAS16CS_MISC2_UDIR;
 if (s->io_bits & 0x0f)
  devpriv->misc2 |= DAS16CS_MISC2_LDIR;
 else
  devpriv->misc2 &= ~DAS16CS_MISC2_LDIR;
 outw(devpriv->misc2, dev->iobase + DAS16CS_MISC2_REG);

 return insn->n;
}

static int das16cs_counter_insn_config(struct comedi_device *dev,
           struct comedi_subdevice *s,
           struct comedi_insn *insn,
           unsigned int *data)
{
 struct das16cs_private *devpriv = dev->private;

 switch (data[0]) {
 case INSN_CONFIG_SET_CLOCK_SRC:
  switch (data[1]) {
  case 0: /* internal 100 kHz */
   devpriv->misc2 |= DAS16CS_MISC2_CTR1;
   break;
  case 1: /* external */
   devpriv->misc2 &= ~DAS16CS_MISC2_CTR1;
   break;
  default:
   return -EINVAL;
  }
  outw(devpriv->misc2, dev->iobase + DAS16CS_MISC2_REG);
  break;
 case INSN_CONFIG_GET_CLOCK_SRC:
  if (devpriv->misc2 & DAS16CS_MISC2_CTR1) {
   data[1] = 0;
   data[2] = I8254_OSC_BASE_100KHZ;
  } else {
   data[1] = 1;
   data[2] = 0; /* unknown */
  }
  break;
 default:
  return -EINVAL;
 }

 return insn->n;
}

static const void *das16cs_find_boardinfo(struct comedi_device *dev,
       struct pcmcia_device *link)
{
 const struct das16cs_board *board;
 int i;

 for (i = 0; i < ARRAY_SIZE(das16cs_boards); i++) {
  board = &das16cs_boards[i];
  if (board->device_id == link->card_id)
   return board;
 }

 return NULL;
}

static int das16cs_auto_attach(struct comedi_device *dev,
          unsigned long context)
{
 struct pcmcia_device *link = comedi_to_pcmcia_dev(dev);
 const struct das16cs_board *board;
 struct das16cs_private *devpriv;
 struct comedi_subdevice *s;
 int ret;

 board = das16cs_find_boardinfo(dev, link);
 if (!board)
  return -ENODEV;
 dev->board_ptr = board;
 dev->board_name = board->name;

 link->config_flags |= CONF_AUTO_SET_IO | CONF_ENABLE_IRQ;
 ret = comedi_pcmcia_enable(dev, NULL);
 if (ret)
  return ret;
 dev->iobase = link->resource[0]->start;

 link->priv = dev;

 devpriv = comedi_alloc_devpriv(dev, sizeof(*devpriv));
 if (!devpriv)
  return -ENOMEM;

 dev->pacer = comedi_8254_io_alloc(dev->iobase + DAS16CS_TIMER_BASE,
       I8254_OSC_BASE_10MHZ, I8254_IO16, 0);
 if (IS_ERR(dev->pacer))
  return PTR_ERR(dev->pacer);

 ret = comedi_alloc_subdevices(dev, 4);
 if (ret)
  return ret;

 /* Analog Input subdevice */
 s = &dev->subdevices[0];
 s->type  = COMEDI_SUBD_AI;
 s->subdev_flags = SDF_READABLE | SDF_GROUND | SDF_DIFF;
 s->n_chan = 16;
 s->maxdata = 0xffff;
 s->range_table = &das16cs_ai_range;
 s->insn_read = das16cs_ai_insn_read;

 /* Analog Output subdevice */
 s = &dev->subdevices[1];
 if (board->has_ao) {
  s->type  = COMEDI_SUBD_AO;
  s->subdev_flags = SDF_WRITABLE;
  s->n_chan = 2;
  s->maxdata = 0xffff;
  s->range_table = &range_bipolar10;
  s->insn_write = &das16cs_ao_insn_write;

  ret = comedi_alloc_subdev_readback(s);
  if (ret)
   return ret;
 } else {
  s->type  = COMEDI_SUBD_UNUSED;
 }

 /* Digital I/O subdevice */
 s = &dev->subdevices[2];
 s->type  = COMEDI_SUBD_DIO;
 s->subdev_flags = SDF_READABLE | SDF_WRITABLE;
 s->n_chan = board->has_4dio ? 4 : 8;
 s->maxdata = 1;
 s->range_table = &range_digital;
 s->insn_bits = das16cs_dio_insn_bits;
 s->insn_config = das16cs_dio_insn_config;

 /* Counter subdevice (8254) */
 s = &dev->subdevices[3];
 comedi_8254_subdevice_init(s, dev->pacer);

 dev->pacer->insn_config = das16cs_counter_insn_config;

 /* counters 1 and 2 are used internally for the pacer */
 comedi_8254_set_busy(dev->pacer, 1, true);
 comedi_8254_set_busy(dev->pacer, 2, true);

 return 0;
}

static struct comedi_driver driver_das16cs = {
 .driver_name = "cb_das16_cs",
 .module  = THIS_MODULE,
 .auto_attach = das16cs_auto_attach,
 .detach  = comedi_pcmcia_disable,
};

static int das16cs_pcmcia_attach(struct pcmcia_device *link)
{
 return comedi_pcmcia_auto_config(link, &driver_das16cs);
}

static const struct pcmcia_device_id das16cs_id_table[] = {
 PCMCIA_DEVICE_MANF_CARD(0x01c5, 0x0039),
 PCMCIA_DEVICE_MANF_CARD(0x01c5, 0x4009),
 PCMCIA_DEVICE_NULL
};
MODULE_DEVICE_TABLE(pcmcia, das16cs_id_table);

static struct pcmcia_driver das16cs_driver = {
 .name  = "cb_das16_cs",
 .owner  = THIS_MODULE,
 .id_table = das16cs_id_table,
 .probe  = das16cs_pcmcia_attach,
 .remove  = comedi_pcmcia_auto_unconfig,
};
module_comedi_pcmcia_driver(driver_das16cs, das16cs_driver);

MODULE_AUTHOR("David A. Schleef ");
MODULE_DESCRIPTION("Comedi driver for Computer Boards PC-CARD DAS16/16");
MODULE_LICENSE("GPL");