drivers/staging/comedi/drivers/pcm3724.c

   1 /*
   2     comedi/drivers/pcm724.c
   3
   4     Drew Csillag <drew_csillag@yahoo.com>
   5
   6     hardware driver for Advantech card:
   7      card:   PCM-3724
   8      driver: pcm3724
   9
  10     Options for PCM-3724
  11      [0] - IO Base
  12 */
  13 /*
  14 Driver: pcm3724
  15 Description: Advantech PCM-3724
  16 Author: Drew Csillag <drew_csillag@yahoo.com>
  17 Devices: [Advantech] PCM-3724 (pcm724)
  18 Status: tested
  19
  20 This is driver for digital I/O boards PCM-3724 with 48 DIO.
  21 It needs 8255.o for operations and only immediate mode is supported.
  22 See the source for configuration details.
  23
  24 Copy/pasted/hacked from pcm724.c
  25 */
  26 /*
  27  * check_driver overrides:
  28  *   struct comedi_insn
  29  */
  30
  31 #include "../comedidev.h"
  32
  33 #include <linux/ioport.h>
  34 #include <linux/delay.h>
  35
  36 #include "8255.h"
  37
  38 #define PCM3724_SIZE   16
  39 #define SIZE_8255       4
  40
  41 #define BUF_C0 0x1
  42 #define BUF_B0 0x2
  43 #define BUF_A0 0x4
  44 #define BUF_C1 0x8
  45 #define BUF_B1 0x10
  46 #define BUF_A1 0x20
  47
  48 #define GATE_A0 0x4
  49 #define GATE_B0 0x2
  50 #define GATE_C0 0x1
  51 #define GATE_A1 0x20
  52 #define GATE_B1 0x10
  53 #define GATE_C1 0x8
  54
  55 /* from 8255.c */
  56 #define CR_CW           0x80
  57 #define _8255_CR 3
  58 #define CR_B_IO         0x02
  59 #define CR_B_MODE       0x04
  60 #define CR_C_IO         0x09
  61 #define CR_A_IO         0x10
  62 #define CR_A_MODE(a)    ((a)<<5)
  63 #define CR_CW           0x80
  64
  65 static int pcm3724_attach(struct comedi_device * dev, struct comedi_devconfig * it);
  66 static int pcm3724_detach(struct comedi_device * dev);
  67
  68 struct pcm3724_board {
  69         const char *name;       // driver name
  70         int dio;                // num of DIO
  71         int numofports;         // num of 8255 subdevices
  72         unsigned int IRQbits;   // allowed interrupts
  73         unsigned int io_range;  // len of IO space
  74 };
  75
  76 //used to track configured dios
  77 struct priv_pcm3724 {
  78         int dio_1;
  79         int dio_2;
  80 };
  81
  82 static const struct pcm3724_board boardtypes[] = {
  83         {"pcm3724", 48, 2, 0x00fc, PCM3724_SIZE,},
  84 };
  85
  86 #define n_boardtypes (sizeof(boardtypes)/sizeof(struct pcm3724_board))
  87 #define this_board ((const struct pcm3724_board *)dev->board_ptr)
  88
  89 static struct comedi_driver driver_pcm3724 = {
  90       driver_name:"pcm3724",
  91       module:THIS_MODULE,
  92       attach:pcm3724_attach,
  93       detach:pcm3724_detach,
  94       board_name:&boardtypes[0].name,
  95       num_names:n_boardtypes,
  96       offset:sizeof(struct pcm3724_board),
  97 };
  98
  99 COMEDI_INITCLEANUP(driver_pcm3724);
 100
 101 //          (setq c-basic-offset 8)
 102
 103 static int subdev_8255_cb(int dir, int port, int data, unsigned long arg)
 104 {
 105         unsigned long iobase = arg;
 106         unsigned char inbres;
 107         //printk("8255cb %d %d %d %lx\n", dir,port,data,arg);
 108         if (dir) {
 109                 //printk("8255 cb   outb(%x, %lx)\n", data, iobase+port);
 110                 outb(data, iobase + port);
 111                 return 0;
 112         } else {
 113                 inbres = inb(iobase + port);
 114                 //printk("8255 cb   inb(%lx) = %x\n", iobase+port, inbres);
 115                 return inbres;
 116         }
 117 }
 118
 119 static int compute_buffer(int config, int devno, struct comedi_subdevice * s)
 120 {
 121         /* 1 in io_bits indicates output */
 122         if (s->io_bits & 0x0000ff) {
 123                 if (devno == 0) {
 124                         config |= BUF_A0;
 125                 } else {
 126                         config |= BUF_A1;
 127                 }
 128         }
 129         if (s->io_bits & 0x00ff00) {
 130                 if (devno == 0) {
 131                         config |= BUF_B0;
 132                 } else {
 133                         config |= BUF_B1;
 134                 }
 135         }
 136         if (s->io_bits & 0xff0000) {
 137                 if (devno == 0) {
 138                         config |= BUF_C0;
 139                 } else {
 140                         config |= BUF_C1;
 141                 }
 142         }
 143         return config;
 144 }
 145
 146 static void do_3724_config(struct comedi_device * dev, struct comedi_subdevice * s,
 147         int chanspec)
 148 {
 149         int config;
 150         int buffer_config;
 151         unsigned long port_8255_cfg;
 152
 153         config = CR_CW;
 154         buffer_config = 0;
 155
 156         /* 1 in io_bits indicates output, 1 in config indicates input */
 157         if (!(s->io_bits & 0x0000ff)) {
 158                 config |= CR_A_IO;
 159         }
 160         if (!(s->io_bits & 0x00ff00)) {
 161                 config |= CR_B_IO;
 162         }
 163         if (!(s->io_bits & 0xff0000)) {
 164                 config |= CR_C_IO;
 165         }
 166
 167         buffer_config = compute_buffer(0, 0, dev->subdevices);
 168         buffer_config = compute_buffer(buffer_config, 1, (dev->subdevices) + 1);
 169
 170         if (s == dev->subdevices) {
 171                 port_8255_cfg = dev->iobase + _8255_CR;
 172         } else {
 173                 port_8255_cfg = dev->iobase + SIZE_8255 + _8255_CR;
 174         }
 175         outb(buffer_config, dev->iobase + 8);   /* update buffer register */
 176         //printk("pcm3724 buffer_config (%lx) %d, %x\n", dev->iobase + _8255_CR, chanspec, buffer_config);
 177         outb(config, port_8255_cfg);
 178 }
 179
 180 static void enable_chan(struct comedi_device * dev, struct comedi_subdevice * s, int chanspec)
 181 {
 182         unsigned int mask;
 183         int gatecfg;
 184         struct priv_pcm3724 *priv;
 185
 186         gatecfg = 0;
 187         priv = (struct priv_pcm3724 *) (dev->private);
 188
 189         mask = 1 << CR_CHAN(chanspec);
 190         if (s == dev->subdevices) {     // subdev 0
 191                 priv->dio_1 |= mask;
 192         } else {                //subdev 1
 193                 priv->dio_2 |= mask;
 194         }
 195         if (priv->dio_1 & 0xff0000) {
 196                 gatecfg |= GATE_C0;
 197         }
 198         if (priv->dio_1 & 0xff00) {
 199                 gatecfg |= GATE_B0;
 200         }
 201         if (priv->dio_1 & 0xff) {
 202                 gatecfg |= GATE_A0;
 203         }
 204         if (priv->dio_2 & 0xff0000) {
 205                 gatecfg |= GATE_C1;
 206         }
 207         if (priv->dio_2 & 0xff00) {
 208                 gatecfg |= GATE_B1;
 209         }
 210         if (priv->dio_2 & 0xff) {
 211                 gatecfg |= GATE_A1;
 212         }
 213         //      printk("gate control %x\n", gatecfg);
 214         outb(gatecfg, dev->iobase + 9);
 215 }
 216
 217 /* overriding the 8255 insn config */
 218 static int subdev_3724_insn_config(struct comedi_device * dev, struct comedi_subdevice * s,
 219         struct comedi_insn * insn, unsigned int * data)
 220 {
 221         unsigned int mask;
 222         unsigned int bits;
 223
 224         mask = 1 << CR_CHAN(insn->chanspec);
 225         if (mask & 0x0000ff) {
 226                 bits = 0x0000ff;
 227         } else if (mask & 0x00ff00) {
 228                 bits = 0x00ff00;
 229         } else if (mask & 0x0f0000) {
 230                 bits = 0x0f0000;
 231         } else {
 232                 bits = 0xf00000;
 233         }
 234
 235         switch (data[0]) {
 236         case INSN_CONFIG_DIO_INPUT:
 237                 s->io_bits &= ~bits;
 238                 break;
 239         case INSN_CONFIG_DIO_OUTPUT:
 240                 s->io_bits |= bits;
 241                 break;
 242         case INSN_CONFIG_DIO_QUERY:
 243                 data[1] = (s->io_bits & bits) ? COMEDI_OUTPUT : COMEDI_INPUT;
 244                 return insn->n;
 245                 break;
 246         default:
 247                 return -EINVAL;
 248         }
 249
 250         do_3724_config(dev, s, insn->chanspec);
 251         enable_chan(dev, s, insn->chanspec);
 252         return 1;
 253 }
 254
 255 static int pcm3724_attach(struct comedi_device * dev, struct comedi_devconfig * it)
 256 {
 257         unsigned long iobase;
 258         unsigned int iorange;
 259         int ret, i, n_subdevices;
 260
 261         iobase = it->options[0];
 262         iorange = this_board->io_range;
 263         if ((ret = alloc_private(dev, sizeof(struct priv_pcm3724))) < 0)
 264                 return -ENOMEM;
 265
 266         ((struct priv_pcm3724 *) (dev->private))->dio_1 = 0;
 267         ((struct priv_pcm3724 *) (dev->private))->dio_2 = 0;
 268
 269         printk("comedi%d: pcm3724: board=%s, 0x%03lx ", dev->minor,
 270                 this_board->name, iobase);
 271         if (!iobase || !request_region(iobase, iorange, "pcm3724")) {
 272                 printk("I/O port conflict\n");
 273                 return -EIO;
 274         }
 275
 276         dev->iobase = iobase;
 277         dev->board_name = this_board->name;
 278         printk("\n");
 279
 280         n_subdevices = this_board->numofports;
 281
 282         if ((ret = alloc_subdevices(dev, n_subdevices)) < 0)
 283                 return ret;
 284
 285         for (i = 0; i < dev->n_subdevices; i++) {
 286                 subdev_8255_init(dev, dev->subdevices + i, subdev_8255_cb,
 287                         (unsigned long)(dev->iobase + SIZE_8255 * i));
 288                 ((dev->subdevices) + i)->insn_config = subdev_3724_insn_config;
 289         };
 290         return 0;
 291 }
 292
 293 static int pcm3724_detach(struct comedi_device * dev)
 294 {
 295         int i;
 296
 297         if (dev->subdevices) {
 298                 for (i = 0; i < dev->n_subdevices; i++) {
 299                         subdev_8255_cleanup(dev, dev->subdevices + i);
 300                 }
 301         }
 302         if (dev->iobase) {
 303                 release_region(dev->iobase, this_board->io_range);
 304         }
 305
 306         return 0;
 307 }