upload tizen1.0 source
[kernel/linux-2.6.36.git] / drivers / staging / comedi / drivers / pcl726.c
1 /*
2     comedi/drivers/pcl726.c
3
4     hardware driver for Advantech cards:
5      card:   PCL-726, PCL-727, PCL-728
6      driver: pcl726,  pcl727,  pcl728
7     and for ADLink cards:
8      card:   ACL-6126, ACL-6128
9      driver: acl6126,  acl6128
10
11     COMEDI - Linux Control and Measurement Device Interface
12     Copyright (C) 1998 David A. Schleef <ds@schleef.org>
13
14     This program is free software; you can redistribute it and/or modify
15     it under the terms of the GNU General Public License as published by
16     the Free Software Foundation; either version 2 of the License, or
17     (at your option) any later version.
18
19     This program is distributed in the hope that it will be useful,
20     but WITHOUT ANY WARRANTY; without even the implied warranty of
21     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22     GNU General Public License for more details.
23
24     You should have received a copy of the GNU General Public License
25     along with this program; if not, write to the Free Software
26     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27
28 */
29 /*
30 Driver: pcl726
31 Description: Advantech PCL-726 & compatibles
32 Author: ds
33 Status: untested
34 Devices: [Advantech] PCL-726 (pcl726), PCL-727 (pcl727), PCL-728 (pcl728),
35   [ADLink] ACL-6126 (acl6126), ACL-6128 (acl6128)
36
37 Interrupts are not supported.
38
39     Options for PCL-726:
40      [0] - IO Base
41      [2]...[7] - D/A output range for channel 1-6:
42                 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
43                 4: 4-20mA, 5: unknown (external reference)
44
45     Options for PCL-727:
46      [0] - IO Base
47      [2]...[13] - D/A output range for channel 1-12:
48                 0: 0-5V, 1: 0-10V, 2: +/-5V,
49                 3: 4-20mA
50
51     Options for PCL-728 and ACL-6128:
52      [0] - IO Base
53      [2], [3] - D/A output range for channel 1 and 2:
54                 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
55                 4: 4-20mA, 5: 0-20mA
56
57     Options for ACL-6126:
58      [0] - IO Base
59      [1] - IRQ (0=disable, 3, 5, 6, 7, 9, 10, 11, 12, 15) (currently ignored)
60      [2]...[7] - D/A output range for channel 1-6:
61                 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
62                 4: 4-20mA
63 */
64
65 /*
66     Thanks to Circuit Specialists for having programming info (!) on
67     their web page.  (http://www.cir.com/)
68 */
69
70 #include "../comedidev.h"
71
72 #include <linux/ioport.h>
73
74 #undef ACL6126_IRQ              /* no interrupt support (yet) */
75
76 #define PCL726_SIZE 16
77 #define PCL727_SIZE 32
78 #define PCL728_SIZE 8
79
80 #define PCL726_DAC0_HI 0
81 #define PCL726_DAC0_LO 1
82
83 #define PCL726_DO_HI 12
84 #define PCL726_DO_LO 13
85 #define PCL726_DI_HI 14
86 #define PCL726_DI_LO 15
87
88 #define PCL727_DO_HI 24
89 #define PCL727_DO_LO 25
90 #define PCL727_DI_HI  0
91 #define PCL727_DI_LO  1
92
93 static const struct comedi_lrange range_4_20mA = { 1, {RANGE_mA(4, 20)} };
94 static const struct comedi_lrange range_0_20mA = { 1, {RANGE_mA(0, 20)} };
95
96 static const struct comedi_lrange *const rangelist_726[] = {
97         &range_unipolar5, &range_unipolar10,
98         &range_bipolar5, &range_bipolar10,
99         &range_4_20mA, &range_unknown
100 };
101
102 static const struct comedi_lrange *const rangelist_727[] = {
103         &range_unipolar5, &range_unipolar10,
104         &range_bipolar5,
105         &range_4_20mA
106 };
107
108 static const struct comedi_lrange *const rangelist_728[] = {
109         &range_unipolar5, &range_unipolar10,
110         &range_bipolar5, &range_bipolar10,
111         &range_4_20mA, &range_0_20mA
112 };
113
114 static int pcl726_attach(struct comedi_device *dev,
115                          struct comedi_devconfig *it);
116 static int pcl726_detach(struct comedi_device *dev);
117
118 struct pcl726_board {
119
120         const char *name;       /*  driver name */
121         int n_aochan;           /*  num of D/A chans */
122         int num_of_ranges;      /*  num of ranges */
123         unsigned int IRQbits;   /*  allowed interrupts */
124         unsigned int io_range;  /*  len of IO space */
125         char have_dio;          /*  1=card have DI/DO ports */
126         int di_hi;              /*  ports for DI/DO operations */
127         int di_lo;
128         int do_hi;
129         int do_lo;
130         const struct comedi_lrange *const *range_type_list;
131         /*  list of supported ranges */
132 };
133
134 static const struct pcl726_board boardtypes[] = {
135         {"pcl726", 6, 6, 0x0000, PCL726_SIZE, 1,
136          PCL726_DI_HI, PCL726_DI_LO, PCL726_DO_HI, PCL726_DO_LO,
137          &rangelist_726[0],},
138         {"pcl727", 12, 4, 0x0000, PCL727_SIZE, 1,
139          PCL727_DI_HI, PCL727_DI_LO, PCL727_DO_HI, PCL727_DO_LO,
140          &rangelist_727[0],},
141         {"pcl728", 2, 6, 0x0000, PCL728_SIZE, 0,
142          0, 0, 0, 0,
143          &rangelist_728[0],},
144         {"acl6126", 6, 5, 0x96e8, PCL726_SIZE, 1,
145          PCL726_DI_HI, PCL726_DI_LO, PCL726_DO_HI, PCL726_DO_LO,
146          &rangelist_726[0],},
147         {"acl6128", 2, 6, 0x0000, PCL728_SIZE, 0,
148          0, 0, 0, 0,
149          &rangelist_728[0],},
150 };
151
152 #define n_boardtypes (sizeof(boardtypes)/sizeof(struct pcl726_board))
153 #define this_board ((const struct pcl726_board *)dev->board_ptr)
154
155 static struct comedi_driver driver_pcl726 = {
156         .driver_name = "pcl726",
157         .module = THIS_MODULE,
158         .attach = pcl726_attach,
159         .detach = pcl726_detach,
160         .board_name = &boardtypes[0].name,
161         .num_names = n_boardtypes,
162         .offset = sizeof(struct pcl726_board),
163 };
164
165 static int __init driver_pcl726_init_module(void)
166 {
167         return comedi_driver_register(&driver_pcl726);
168 }
169
170 static void __exit driver_pcl726_cleanup_module(void)
171 {
172         comedi_driver_unregister(&driver_pcl726);
173 }
174
175 module_init(driver_pcl726_init_module);
176 module_exit(driver_pcl726_cleanup_module);
177
178 struct pcl726_private {
179
180         int bipolar[12];
181         const struct comedi_lrange *rangelist[12];
182         unsigned int ao_readback[12];
183 };
184
185 #define devpriv ((struct pcl726_private *)dev->private)
186
187 static int pcl726_ao_insn(struct comedi_device *dev, struct comedi_subdevice *s,
188                           struct comedi_insn *insn, unsigned int *data)
189 {
190         int hi, lo;
191         int n;
192         int chan = CR_CHAN(insn->chanspec);
193
194         for (n = 0; n < insn->n; n++) {
195                 lo = data[n] & 0xff;
196                 hi = (data[n] >> 8) & 0xf;
197                 if (devpriv->bipolar[chan])
198                         hi ^= 0x8;
199                 /*
200                  * the programming info did not say which order
201                  * to write bytes.  switch the order of the next
202                  * two lines if you get glitches.
203                  */
204                 outb(hi, dev->iobase + PCL726_DAC0_HI + 2 * chan);
205                 outb(lo, dev->iobase + PCL726_DAC0_LO + 2 * chan);
206                 devpriv->ao_readback[chan] = data[n];
207         }
208
209         return n;
210 }
211
212 static int pcl726_ao_insn_read(struct comedi_device *dev,
213                                struct comedi_subdevice *s,
214                                struct comedi_insn *insn, unsigned int *data)
215 {
216         int chan = CR_CHAN(insn->chanspec);
217         int n;
218
219         for (n = 0; n < insn->n; n++)
220                 data[n] = devpriv->ao_readback[chan];
221         return n;
222 }
223
224 static int pcl726_di_insn_bits(struct comedi_device *dev,
225                                struct comedi_subdevice *s,
226                                struct comedi_insn *insn, unsigned int *data)
227 {
228         if (insn->n != 2)
229                 return -EINVAL;
230
231         data[1] = inb(dev->iobase + this_board->di_lo) |
232             (inb(dev->iobase + this_board->di_hi) << 8);
233
234         return 2;
235 }
236
237 static int pcl726_do_insn_bits(struct comedi_device *dev,
238                                struct comedi_subdevice *s,
239                                struct comedi_insn *insn, unsigned int *data)
240 {
241         if (insn->n != 2)
242                 return -EINVAL;
243
244         if (data[0]) {
245                 s->state &= ~data[0];
246                 s->state |= data[0] & data[1];
247         }
248         if (data[1] & 0x00ff)
249                 outb(s->state & 0xff, dev->iobase + this_board->do_lo);
250         if (data[1] & 0xff00)
251                 outb((s->state >> 8), dev->iobase + this_board->do_hi);
252
253         data[1] = s->state;
254
255         return 2;
256 }
257
258 static int pcl726_attach(struct comedi_device *dev, struct comedi_devconfig *it)
259 {
260         struct comedi_subdevice *s;
261         unsigned long iobase;
262         unsigned int iorange;
263         int ret, i;
264 #ifdef ACL6126_IRQ
265         unsigned int irq;
266 #endif
267
268         iobase = it->options[0];
269         iorange = this_board->io_range;
270         printk(KERN_WARNING "comedi%d: pcl726: board=%s, 0x%03lx ", dev->minor,
271                this_board->name, iobase);
272         if (!request_region(iobase, iorange, "pcl726")) {
273                 printk(KERN_WARNING "I/O port conflict\n");
274                 return -EIO;
275         }
276
277         dev->iobase = iobase;
278
279         dev->board_name = this_board->name;
280
281         ret = alloc_private(dev, sizeof(struct pcl726_private));
282         if (ret < 0)
283                 return -ENOMEM;
284
285         for (i = 0; i < 12; i++) {
286                 devpriv->bipolar[i] = 0;
287                 devpriv->rangelist[i] = &range_unknown;
288         }
289
290 #ifdef ACL6126_IRQ
291         irq = 0;
292         if (boardtypes[board].IRQbits != 0) {   /* board support IRQ */
293                 irq = it->options[1];
294                 devpriv->first_chan = 2;
295                 if (irq) {      /* we want to use IRQ */
296                         if (((1 << irq) & boardtypes[board].IRQbits) == 0) {
297                                 printk(KERN_WARNING
298                                         ", IRQ %d is out of allowed range,"
299                                         " DISABLING IT", irq);
300                                 irq = 0;        /* Bad IRQ */
301                         } else {
302                                 if (request_irq(irq, interrupt_pcl818, 0,
303                                                 "pcl726", dev)) {
304                                         printk(KERN_WARNING
305                                                 ", unable to allocate IRQ %d,"
306                                                 " DISABLING IT", irq);
307                                         irq = 0;        /* Can't use IRQ */
308                                 } else {
309                                         printk(", irq=%d", irq);
310                                 }
311                         }
312                 }
313         }
314
315         dev->irq = irq;
316 #endif
317
318         printk("\n");
319
320         ret = alloc_subdevices(dev, 3);
321         if (ret < 0)
322                 return ret;
323
324         s = dev->subdevices + 0;
325         /* ao */
326         s->type = COMEDI_SUBD_AO;
327         s->subdev_flags = SDF_WRITABLE | SDF_GROUND;
328         s->n_chan = this_board->n_aochan;
329         s->maxdata = 0xfff;
330         s->len_chanlist = 1;
331         s->insn_write = pcl726_ao_insn;
332         s->insn_read = pcl726_ao_insn_read;
333         s->range_table_list = devpriv->rangelist;
334         for (i = 0; i < this_board->n_aochan; i++) {
335                 int j;
336
337                 j = it->options[2 + 1];
338                 if ((j < 0) || (j >= this_board->num_of_ranges)) {
339                         printk
340                             ("Invalid range for channel %d! Must be 0<=%d<%d\n",
341                              i, j, this_board->num_of_ranges - 1);
342                         j = 0;
343                 }
344                 devpriv->rangelist[i] = this_board->range_type_list[j];
345                 if (devpriv->rangelist[i]->range[0].min ==
346                     -devpriv->rangelist[i]->range[0].max)
347                         devpriv->bipolar[i] = 1;        /* bipolar range */
348         }
349
350         s = dev->subdevices + 1;
351         /* di */
352         if (!this_board->have_dio) {
353                 s->type = COMEDI_SUBD_UNUSED;
354         } else {
355                 s->type = COMEDI_SUBD_DI;
356                 s->subdev_flags = SDF_READABLE | SDF_GROUND;
357                 s->n_chan = 16;
358                 s->maxdata = 1;
359                 s->len_chanlist = 1;
360                 s->insn_bits = pcl726_di_insn_bits;
361                 s->range_table = &range_digital;
362         }
363
364         s = dev->subdevices + 2;
365         /* do */
366         if (!this_board->have_dio) {
367                 s->type = COMEDI_SUBD_UNUSED;
368         } else {
369                 s->type = COMEDI_SUBD_DO;
370                 s->subdev_flags = SDF_WRITABLE | SDF_GROUND;
371                 s->n_chan = 16;
372                 s->maxdata = 1;
373                 s->len_chanlist = 1;
374                 s->insn_bits = pcl726_do_insn_bits;
375                 s->range_table = &range_digital;
376         }
377
378         return 0;
379 }
380
381 static int pcl726_detach(struct comedi_device *dev)
382 {
383 /* printk("comedi%d: pcl726: remove\n",dev->minor); */
384
385 #ifdef ACL6126_IRQ
386         if (dev->irq)
387                 free_irq(dev->irq, dev);
388 #endif
389
390         if (dev->iobase)
391                 release_region(dev->iobase, this_board->io_range);
392
393         return 0;
394 }
395
396 MODULE_AUTHOR("Comedi http://www.comedi.org");
397 MODULE_DESCRIPTION("Comedi low-level driver");
398 MODULE_LICENSE("GPL");