]> git.karo-electronics.de Git - karo-tx-linux.git/blob - drivers/staging/comedi/drivers/cb_das16_cs.c
Merge branch 'next' of git://git.kernel.org/pub/scm/virt/kvm/kvm
[karo-tx-linux.git] / drivers / staging / comedi / drivers / cb_das16_cs.c
1 /*
2     comedi/drivers/das16cs.c
3     Driver for Computer Boards PC-CARD DAS16/16.
4
5     COMEDI - Linux Control and Measurement Device Interface
6     Copyright (C) 2000, 2001, 2002 David A. Schleef <ds@schleef.org>
7
8     This program is free software; you can redistribute it and/or modify
9     it under the terms of the GNU General Public License as published by
10     the Free Software Foundation; either version 2 of the License, or
11     (at your option) any later version.
12
13     This program is distributed in the hope that it will be useful,
14     but WITHOUT ANY WARRANTY; without even the implied warranty of
15     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16     GNU General Public License for more details.
17
18     PCMCIA support code for this driver is adapted from the dummy_cs.c
19     driver of the Linux PCMCIA Card Services package.
20
21     The initial developer of the original code is David A. Hinds
22     <dahinds@users.sourceforge.net>.  Portions created by David A. Hinds
23     are Copyright (C) 1999 David A. Hinds.  All Rights Reserved.
24
25 */
26 /*
27 Driver: cb_das16_cs
28 Description: Computer Boards PC-CARD DAS16/16
29 Devices: [ComputerBoards] PC-CARD DAS16/16 (cb_das16_cs), PC-CARD DAS16/16-AO
30 Author: ds
31 Updated: Mon, 04 Nov 2002 20:04:21 -0800
32 Status: experimental
33
34
35 */
36
37 #include <linux/module.h>
38 #include <linux/interrupt.h>
39 #include <linux/delay.h>
40
41 #include "../comedidev.h"
42
43 #include <pcmcia/cistpl.h>
44 #include <pcmcia/ds.h>
45
46 #include "comedi_fc.h"
47 #include "8253.h"
48
49 #define DAS16CS_SIZE                    18
50
51 #define DAS16CS_ADC_DATA                0
52 #define DAS16CS_DIO_MUX                 2
53 #define DAS16CS_MISC1                   4
54 #define DAS16CS_MISC2                   6
55 #define DAS16CS_CTR0                    8
56 #define DAS16CS_CTR1                    10
57 #define DAS16CS_CTR2                    12
58 #define DAS16CS_CTR_CONTROL             14
59 #define DAS16CS_DIO                     16
60
61 struct das16cs_board {
62         const char *name;
63         int device_id;
64         int n_ao_chans;
65 };
66
67 static const struct das16cs_board das16cs_boards[] = {
68         {
69                 .name           = "PC-CARD DAS16/16-AO",
70                 .device_id      = 0x0039,
71                 .n_ao_chans     = 2,
72         }, {
73                 .name           = "PCM-DAS16s/16",
74                 .device_id      = 0x4009,
75                 .n_ao_chans     = 0,
76         }, {
77                 .name           = "PC-CARD DAS16/16",
78                 .device_id      = 0x0000,       /* unknown */
79                 .n_ao_chans     = 0,
80         },
81 };
82
83 struct das16cs_private {
84         unsigned int ao_readback[2];
85         unsigned short status1;
86         unsigned short status2;
87 };
88
89 static const struct comedi_lrange das16cs_ai_range = {
90         4, {
91                 BIP_RANGE(10),
92                 BIP_RANGE(5),
93                 BIP_RANGE(2.5),
94                 BIP_RANGE(1.25),
95         }
96 };
97
98 static irqreturn_t das16cs_interrupt(int irq, void *d)
99 {
100         /* struct comedi_device *dev = d; */
101         return IRQ_HANDLED;
102 }
103
104 static int das16cs_ai_rinsn(struct comedi_device *dev,
105                             struct comedi_subdevice *s,
106                             struct comedi_insn *insn, unsigned int *data)
107 {
108         struct das16cs_private *devpriv = dev->private;
109         int chan = CR_CHAN(insn->chanspec);
110         int range = CR_RANGE(insn->chanspec);
111         int aref = CR_AREF(insn->chanspec);
112         int i;
113         int to;
114
115         outw(chan, dev->iobase + DAS16CS_DIO_MUX);
116
117         devpriv->status1 &= ~0xf320;
118         devpriv->status1 |= (aref == AREF_DIFF) ? 0 : 0x0020;
119         outw(devpriv->status1, dev->iobase + DAS16CS_MISC1);
120
121         devpriv->status2 &= ~0xff00;
122         switch (range) {
123         case 0:
124                 devpriv->status2 |= 0x800;
125                 break;
126         case 1:
127                 devpriv->status2 |= 0x000;
128                 break;
129         case 2:
130                 devpriv->status2 |= 0x100;
131                 break;
132         case 3:
133                 devpriv->status2 |= 0x200;
134                 break;
135         }
136         outw(devpriv->status2, dev->iobase + DAS16CS_MISC2);
137
138         for (i = 0; i < insn->n; i++) {
139                 outw(0, dev->iobase + DAS16CS_ADC_DATA);
140
141 #define TIMEOUT 1000
142                 for (to = 0; to < TIMEOUT; to++) {
143                         if (inw(dev->iobase + DAS16CS_MISC1) & 0x0080)
144                                 break;
145                 }
146                 if (to == TIMEOUT) {
147                         dev_dbg(dev->class_dev, "cb_das16_cs: ai timeout\n");
148                         return -ETIME;
149                 }
150                 data[i] = inw(dev->iobase + DAS16CS_ADC_DATA);
151         }
152
153         return i;
154 }
155
156 static int das16cs_ai_cmd(struct comedi_device *dev, struct comedi_subdevice *s)
157 {
158         return -EINVAL;
159 }
160
161 static int das16cs_ai_cmdtest(struct comedi_device *dev,
162                               struct comedi_subdevice *s,
163                               struct comedi_cmd *cmd)
164 {
165         int err = 0;
166         int tmp;
167
168         /* Step 1 : check if triggers are trivially valid */
169
170         err |= cfc_check_trigger_src(&cmd->start_src, TRIG_NOW);
171         err |= cfc_check_trigger_src(&cmd->scan_begin_src,
172                                         TRIG_TIMER | TRIG_EXT);
173         err |= cfc_check_trigger_src(&cmd->convert_src,
174                                         TRIG_TIMER | TRIG_EXT);
175         err |= cfc_check_trigger_src(&cmd->scan_end_src, TRIG_COUNT);
176         err |= cfc_check_trigger_src(&cmd->stop_src, TRIG_COUNT | TRIG_NONE);
177
178         if (err)
179                 return 1;
180
181         /* Step 2a : make sure trigger sources are unique */
182
183         err |= cfc_check_trigger_is_unique(cmd->scan_begin_src);
184         err |= cfc_check_trigger_is_unique(cmd->convert_src);
185         err |= cfc_check_trigger_is_unique(cmd->stop_src);
186
187         /* Step 2b : and mutually compatible */
188
189         if (err)
190                 return 2;
191
192         /* Step 3: check if arguments are trivially valid */
193
194         err |= cfc_check_trigger_arg_is(&cmd->start_arg, 0);
195
196 #define MAX_SPEED       10000   /* in nanoseconds */
197 #define MIN_SPEED       1000000000      /* in nanoseconds */
198
199         if (cmd->scan_begin_src == TRIG_TIMER) {
200                 err |= cfc_check_trigger_arg_min(&cmd->scan_begin_arg,
201                                                  MAX_SPEED);
202                 err |= cfc_check_trigger_arg_max(&cmd->scan_begin_arg,
203                                                  MIN_SPEED);
204         } else {
205                 /* external trigger */
206                 /* should be level/edge, hi/lo specification here */
207                 /* should specify multiple external triggers */
208                 err |= cfc_check_trigger_arg_max(&cmd->scan_begin_arg, 9);
209         }
210         if (cmd->convert_src == TRIG_TIMER) {
211                 err |= cfc_check_trigger_arg_min(&cmd->convert_arg,
212                                                  MAX_SPEED);
213                 err |= cfc_check_trigger_arg_max(&cmd->convert_arg,
214                                                  MIN_SPEED);
215         } else {
216                 /* external trigger */
217                 /* see above */
218                 err |= cfc_check_trigger_arg_max(&cmd->convert_arg, 9);
219         }
220
221         err |= cfc_check_trigger_arg_is(&cmd->scan_end_arg, cmd->chanlist_len);
222
223         if (cmd->stop_src == TRIG_COUNT)
224                 err |= cfc_check_trigger_arg_max(&cmd->stop_arg, 0x00ffffff);
225         else    /* TRIG_NONE */
226                 err |= cfc_check_trigger_arg_is(&cmd->stop_arg, 0);
227
228         if (err)
229                 return 3;
230
231         /* step 4: fix up any arguments */
232
233         if (cmd->scan_begin_src == TRIG_TIMER) {
234                 unsigned int div1 = 0, div2 = 0;
235
236                 tmp = cmd->scan_begin_arg;
237                 i8253_cascade_ns_to_timer(100, &div1, &div2,
238                                           &cmd->scan_begin_arg,
239                                           cmd->flags & TRIG_ROUND_MASK);
240                 if (tmp != cmd->scan_begin_arg)
241                         err++;
242         }
243         if (cmd->convert_src == TRIG_TIMER) {
244                 unsigned int div1 = 0, div2 = 0;
245
246                 tmp = cmd->convert_arg;
247                 i8253_cascade_ns_to_timer(100, &div1, &div2,
248                                           &cmd->scan_begin_arg,
249                                           cmd->flags & TRIG_ROUND_MASK);
250                 if (tmp != cmd->convert_arg)
251                         err++;
252                 if (cmd->scan_begin_src == TRIG_TIMER &&
253                     cmd->scan_begin_arg <
254                     cmd->convert_arg * cmd->scan_end_arg) {
255                         cmd->scan_begin_arg =
256                             cmd->convert_arg * cmd->scan_end_arg;
257                         err++;
258                 }
259         }
260
261         if (err)
262                 return 4;
263
264         return 0;
265 }
266
267 static int das16cs_ao_winsn(struct comedi_device *dev,
268                             struct comedi_subdevice *s,
269                             struct comedi_insn *insn, unsigned int *data)
270 {
271         struct das16cs_private *devpriv = dev->private;
272         int i;
273         int chan = CR_CHAN(insn->chanspec);
274         unsigned short status1;
275         unsigned short d;
276         int bit;
277
278         for (i = 0; i < insn->n; i++) {
279                 devpriv->ao_readback[chan] = data[i];
280                 d = data[i];
281
282                 outw(devpriv->status1, dev->iobase + DAS16CS_MISC1);
283                 udelay(1);
284
285                 status1 = devpriv->status1 & ~0xf;
286                 if (chan)
287                         status1 |= 0x0001;
288                 else
289                         status1 |= 0x0008;
290
291                 outw(status1, dev->iobase + DAS16CS_MISC1);
292                 udelay(1);
293
294                 for (bit = 15; bit >= 0; bit--) {
295                         int b = (d >> bit) & 0x1;
296                         b <<= 1;
297                         outw(status1 | b | 0x0000, dev->iobase + DAS16CS_MISC1);
298                         udelay(1);
299                         outw(status1 | b | 0x0004, dev->iobase + DAS16CS_MISC1);
300                         udelay(1);
301                 }
302                 /*
303                  * Make both DAC0CS and DAC1CS high to load
304                  * the new data and update analog the output
305                  */
306                 outw(status1 | 0x9, dev->iobase + DAS16CS_MISC1);
307         }
308
309         return i;
310 }
311
312 static int das16cs_ao_rinsn(struct comedi_device *dev,
313                             struct comedi_subdevice *s,
314                             struct comedi_insn *insn, unsigned int *data)
315 {
316         struct das16cs_private *devpriv = dev->private;
317         int i;
318         int chan = CR_CHAN(insn->chanspec);
319
320         for (i = 0; i < insn->n; i++)
321                 data[i] = devpriv->ao_readback[chan];
322
323         return i;
324 }
325
326 static int das16cs_dio_insn_bits(struct comedi_device *dev,
327                                  struct comedi_subdevice *s,
328                                  struct comedi_insn *insn, unsigned int *data)
329 {
330         if (data[0]) {
331                 s->state &= ~data[0];
332                 s->state |= data[0] & data[1];
333
334                 outw(s->state, dev->iobase + DAS16CS_DIO);
335         }
336
337         data[1] = inw(dev->iobase + DAS16CS_DIO);
338
339         return insn->n;
340 }
341
342 static int das16cs_dio_insn_config(struct comedi_device *dev,
343                                    struct comedi_subdevice *s,
344                                    struct comedi_insn *insn,
345                                    unsigned int *data)
346 {
347         struct das16cs_private *devpriv = dev->private;
348         unsigned int chan = CR_CHAN(insn->chanspec);
349         unsigned int mask;
350         int ret;
351
352         if (chan < 4)
353                 mask = 0x0f;
354         else
355                 mask = 0xf0;
356
357         ret = comedi_dio_insn_config(dev, s, insn, data, mask);
358         if (ret)
359                 return ret;
360
361         devpriv->status2 &= ~0x00c0;
362         devpriv->status2 |= (s->io_bits & 0xf0) ? 0x0080 : 0;
363         devpriv->status2 |= (s->io_bits & 0x0f) ? 0x0040 : 0;
364
365         outw(devpriv->status2, dev->iobase + DAS16CS_MISC2);
366
367         return insn->n;
368 }
369
370 static const void *das16cs_find_boardinfo(struct comedi_device *dev,
371                                           struct pcmcia_device *link)
372 {
373         const struct das16cs_board *board;
374         int i;
375
376         for (i = 0; i < ARRAY_SIZE(das16cs_boards); i++) {
377                 board = &das16cs_boards[i];
378                 if (board->device_id == link->card_id)
379                         return board;
380         }
381
382         return NULL;
383 }
384
385 static int das16cs_auto_attach(struct comedi_device *dev,
386                                unsigned long context)
387 {
388         struct pcmcia_device *link = comedi_to_pcmcia_dev(dev);
389         const struct das16cs_board *board;
390         struct das16cs_private *devpriv;
391         struct comedi_subdevice *s;
392         int ret;
393
394         board = das16cs_find_boardinfo(dev, link);
395         if (!board)
396                 return -ENODEV;
397         dev->board_ptr = board;
398         dev->board_name = board->name;
399
400         link->config_flags |= CONF_AUTO_SET_IO | CONF_ENABLE_IRQ;
401         ret = comedi_pcmcia_enable(dev, NULL);
402         if (ret)
403                 return ret;
404         dev->iobase = link->resource[0]->start;
405
406         link->priv = dev;
407         ret = pcmcia_request_irq(link, das16cs_interrupt);
408         if (ret)
409                 return ret;
410         dev->irq = link->irq;
411
412         devpriv = comedi_alloc_devpriv(dev, sizeof(*devpriv));
413         if (!devpriv)
414                 return -ENOMEM;
415
416         ret = comedi_alloc_subdevices(dev, 3);
417         if (ret)
418                 return ret;
419
420         s = &dev->subdevices[0];
421         dev->read_subdev = s;
422         /* analog input subdevice */
423         s->type         = COMEDI_SUBD_AI;
424         s->subdev_flags = SDF_READABLE | SDF_GROUND | SDF_DIFF | SDF_CMD_READ;
425         s->n_chan       = 16;
426         s->maxdata      = 0xffff;
427         s->range_table  = &das16cs_ai_range;
428         s->len_chanlist = 16;
429         s->insn_read    = das16cs_ai_rinsn;
430         s->do_cmd       = das16cs_ai_cmd;
431         s->do_cmdtest   = das16cs_ai_cmdtest;
432
433         s = &dev->subdevices[1];
434         /* analog output subdevice */
435         if (board->n_ao_chans) {
436                 s->type         = COMEDI_SUBD_AO;
437                 s->subdev_flags = SDF_WRITABLE;
438                 s->n_chan       = board->n_ao_chans;
439                 s->maxdata      = 0xffff;
440                 s->range_table  = &range_bipolar10;
441                 s->insn_write   = &das16cs_ao_winsn;
442                 s->insn_read    = &das16cs_ao_rinsn;
443         } else {
444                 s->type         = COMEDI_SUBD_UNUSED;
445         }
446
447         s = &dev->subdevices[2];
448         /* digital i/o subdevice */
449         s->type         = COMEDI_SUBD_DIO;
450         s->subdev_flags = SDF_READABLE | SDF_WRITABLE;
451         s->n_chan       = 8;
452         s->maxdata      = 1;
453         s->range_table  = &range_digital;
454         s->insn_bits    = das16cs_dio_insn_bits;
455         s->insn_config  = das16cs_dio_insn_config;
456
457         dev_info(dev->class_dev, "%s: %s, I/O base=0x%04lx, irq=%u\n",
458                 dev->driver->driver_name, dev->board_name,
459                 dev->iobase, dev->irq);
460
461         return 0;
462 }
463
464 static struct comedi_driver driver_das16cs = {
465         .driver_name    = "cb_das16_cs",
466         .module         = THIS_MODULE,
467         .auto_attach    = das16cs_auto_attach,
468         .detach         = comedi_pcmcia_disable,
469 };
470
471 static int das16cs_pcmcia_attach(struct pcmcia_device *link)
472 {
473         return comedi_pcmcia_auto_config(link, &driver_das16cs);
474 }
475
476 static const struct pcmcia_device_id das16cs_id_table[] = {
477         PCMCIA_DEVICE_MANF_CARD(0x01c5, 0x0039),
478         PCMCIA_DEVICE_MANF_CARD(0x01c5, 0x4009),
479         PCMCIA_DEVICE_NULL
480 };
481 MODULE_DEVICE_TABLE(pcmcia, das16cs_id_table);
482
483 static struct pcmcia_driver das16cs_driver = {
484         .name           = "cb_das16_cs",
485         .owner          = THIS_MODULE,
486         .id_table       = das16cs_id_table,
487         .probe          = das16cs_pcmcia_attach,
488         .remove         = comedi_pcmcia_auto_unconfig,
489 };
490 module_comedi_pcmcia_driver(driver_das16cs, das16cs_driver);
491
492 MODULE_AUTHOR("David A. Schleef <ds@schleef.org>");
493 MODULE_DESCRIPTION("Comedi driver for Computer Boards PC-CARD DAS16/16");
494 MODULE_LICENSE("GPL");