Merge branch 'x86-apic-for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git...
[cascardo/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(I8254_OSC_BASE_10MHZ,
238                                           &div1, &div2,
239                                           &cmd->scan_begin_arg, cmd->flags);
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(I8254_OSC_BASE_10MHZ,
248                                           &div1, &div2,
249                                           &cmd->scan_begin_arg, cmd->flags);
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,
329                                  unsigned int *data)
330 {
331         if (comedi_dio_update_state(s, data))
332                 outw(s->state, dev->iobase + DAS16CS_DIO);
333
334         data[1] = inw(dev->iobase + DAS16CS_DIO);
335
336         return insn->n;
337 }
338
339 static int das16cs_dio_insn_config(struct comedi_device *dev,
340                                    struct comedi_subdevice *s,
341                                    struct comedi_insn *insn,
342                                    unsigned int *data)
343 {
344         struct das16cs_private *devpriv = dev->private;
345         unsigned int chan = CR_CHAN(insn->chanspec);
346         unsigned int mask;
347         int ret;
348
349         if (chan < 4)
350                 mask = 0x0f;
351         else
352                 mask = 0xf0;
353
354         ret = comedi_dio_insn_config(dev, s, insn, data, mask);
355         if (ret)
356                 return ret;
357
358         devpriv->status2 &= ~0x00c0;
359         devpriv->status2 |= (s->io_bits & 0xf0) ? 0x0080 : 0;
360         devpriv->status2 |= (s->io_bits & 0x0f) ? 0x0040 : 0;
361
362         outw(devpriv->status2, dev->iobase + DAS16CS_MISC2);
363
364         return insn->n;
365 }
366
367 static const void *das16cs_find_boardinfo(struct comedi_device *dev,
368                                           struct pcmcia_device *link)
369 {
370         const struct das16cs_board *board;
371         int i;
372
373         for (i = 0; i < ARRAY_SIZE(das16cs_boards); i++) {
374                 board = &das16cs_boards[i];
375                 if (board->device_id == link->card_id)
376                         return board;
377         }
378
379         return NULL;
380 }
381
382 static int das16cs_auto_attach(struct comedi_device *dev,
383                                unsigned long context)
384 {
385         struct pcmcia_device *link = comedi_to_pcmcia_dev(dev);
386         const struct das16cs_board *board;
387         struct das16cs_private *devpriv;
388         struct comedi_subdevice *s;
389         int ret;
390
391         board = das16cs_find_boardinfo(dev, link);
392         if (!board)
393                 return -ENODEV;
394         dev->board_ptr = board;
395         dev->board_name = board->name;
396
397         link->config_flags |= CONF_AUTO_SET_IO | CONF_ENABLE_IRQ;
398         ret = comedi_pcmcia_enable(dev, NULL);
399         if (ret)
400                 return ret;
401         dev->iobase = link->resource[0]->start;
402
403         link->priv = dev;
404         ret = pcmcia_request_irq(link, das16cs_interrupt);
405         if (ret)
406                 return ret;
407         dev->irq = link->irq;
408
409         devpriv = comedi_alloc_devpriv(dev, sizeof(*devpriv));
410         if (!devpriv)
411                 return -ENOMEM;
412
413         ret = comedi_alloc_subdevices(dev, 3);
414         if (ret)
415                 return ret;
416
417         s = &dev->subdevices[0];
418         dev->read_subdev = s;
419         /* analog input subdevice */
420         s->type         = COMEDI_SUBD_AI;
421         s->subdev_flags = SDF_READABLE | SDF_GROUND | SDF_DIFF | SDF_CMD_READ;
422         s->n_chan       = 16;
423         s->maxdata      = 0xffff;
424         s->range_table  = &das16cs_ai_range;
425         s->len_chanlist = 16;
426         s->insn_read    = das16cs_ai_rinsn;
427         s->do_cmd       = das16cs_ai_cmd;
428         s->do_cmdtest   = das16cs_ai_cmdtest;
429
430         s = &dev->subdevices[1];
431         /* analog output subdevice */
432         if (board->n_ao_chans) {
433                 s->type         = COMEDI_SUBD_AO;
434                 s->subdev_flags = SDF_WRITABLE;
435                 s->n_chan       = board->n_ao_chans;
436                 s->maxdata      = 0xffff;
437                 s->range_table  = &range_bipolar10;
438                 s->insn_write   = &das16cs_ao_winsn;
439                 s->insn_read    = &das16cs_ao_rinsn;
440         } else {
441                 s->type         = COMEDI_SUBD_UNUSED;
442         }
443
444         s = &dev->subdevices[2];
445         /* digital i/o subdevice */
446         s->type         = COMEDI_SUBD_DIO;
447         s->subdev_flags = SDF_READABLE | SDF_WRITABLE;
448         s->n_chan       = 8;
449         s->maxdata      = 1;
450         s->range_table  = &range_digital;
451         s->insn_bits    = das16cs_dio_insn_bits;
452         s->insn_config  = das16cs_dio_insn_config;
453
454         dev_info(dev->class_dev, "%s: %s, I/O base=0x%04lx, irq=%u\n",
455                 dev->driver->driver_name, dev->board_name,
456                 dev->iobase, dev->irq);
457
458         return 0;
459 }
460
461 static struct comedi_driver driver_das16cs = {
462         .driver_name    = "cb_das16_cs",
463         .module         = THIS_MODULE,
464         .auto_attach    = das16cs_auto_attach,
465         .detach         = comedi_pcmcia_disable,
466 };
467
468 static int das16cs_pcmcia_attach(struct pcmcia_device *link)
469 {
470         return comedi_pcmcia_auto_config(link, &driver_das16cs);
471 }
472
473 static const struct pcmcia_device_id das16cs_id_table[] = {
474         PCMCIA_DEVICE_MANF_CARD(0x01c5, 0x0039),
475         PCMCIA_DEVICE_MANF_CARD(0x01c5, 0x4009),
476         PCMCIA_DEVICE_NULL
477 };
478 MODULE_DEVICE_TABLE(pcmcia, das16cs_id_table);
479
480 static struct pcmcia_driver das16cs_driver = {
481         .name           = "cb_das16_cs",
482         .owner          = THIS_MODULE,
483         .id_table       = das16cs_id_table,
484         .probe          = das16cs_pcmcia_attach,
485         .remove         = comedi_pcmcia_auto_unconfig,
486 };
487 module_comedi_pcmcia_driver(driver_das16cs, das16cs_driver);
488
489 MODULE_AUTHOR("David A. Schleef <ds@schleef.org>");
490 MODULE_DESCRIPTION("Comedi driver for Computer Boards PC-CARD DAS16/16");
491 MODULE_LICENSE("GPL");