2 comedi/drivers/pcl726.c
4 hardware driver for Advantech cards:
5 card: PCL-726, PCL-727, PCL-728
6 driver: pcl726, pcl727, pcl728
8 card: ACL-6126, ACL-6128
9 driver: acl6126, acl6128
11 COMEDI - Linux Control and Measurement Device Interface
12 Copyright (C) 1998 David A. Schleef <ds@schleef.org>
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.
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.
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.
31 Description: Advantech PCL-726 & compatibles
34 Devices: [Advantech] PCL-726 (pcl726), PCL-727 (pcl727), PCL-728 (pcl728),
35 [ADLink] ACL-6126 (acl6126), ACL-6128 (acl6128)
37 Interrupts are not supported.
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)
47 [2]...[13] - D/A output range for channel 1-12:
48 0: 0-5V, 1: 0-10V, 2: +/-5V,
51 Options for PCL-728 and ACL-6128:
53 [2], [3] - D/A output range for channel 1 and 2:
54 0: 0-5V, 1: 0-10V, 2: +/-5V, 3: +/-10V,
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,
66 Thanks to Circuit Specialists for having programming info (!) on
67 their web page. (http://www.cir.com/)
70 #include "../comedidev.h"
72 #include <linux/ioport.h>
74 #undef ACL6126_IRQ /* no interrupt support (yet) */
76 #define PCL726_SIZE 16
77 #define PCL727_SIZE 32
80 #define PCL726_DAC0_HI 0
81 #define PCL726_DAC0_LO 1
83 #define PCL726_DO_HI 12
84 #define PCL726_DO_LO 13
85 #define PCL726_DI_HI 14
86 #define PCL726_DI_LO 15
88 #define PCL727_DO_HI 24
89 #define PCL727_DO_LO 25
90 #define PCL727_DI_HI 0
91 #define PCL727_DI_LO 1
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)} };
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
102 static const struct comedi_lrange
*const rangelist_727
[] = {
103 &range_unipolar5
, &range_unipolar10
,
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
114 static int pcl726_attach(struct comedi_device
* dev
, comedi_devconfig
* it
);
115 static int pcl726_detach(struct comedi_device
* dev
);
118 const char *name
; // driver name
119 int n_aochan
; // num of D/A chans
120 int num_of_ranges
; // num of ranges
121 unsigned int IRQbits
; // allowed interrupts
122 unsigned int io_range
; // len of IO space
123 char have_dio
; // 1=card have DI/DO ports
124 int di_hi
; // ports for DI/DO operations
128 const struct comedi_lrange
*const *range_type_list
; // list of supported ranges
131 static const boardtype boardtypes
[] = {
132 {"pcl726", 6, 6, 0x0000, PCL726_SIZE
, 1,
133 PCL726_DI_HI
, PCL726_DI_LO
, PCL726_DO_HI
, PCL726_DO_LO
,
135 {"pcl727", 12, 4, 0x0000, PCL727_SIZE
, 1,
136 PCL727_DI_HI
, PCL727_DI_LO
, PCL727_DO_HI
, PCL727_DO_LO
,
138 {"pcl728", 2, 6, 0x0000, PCL728_SIZE
, 0,
141 {"acl6126", 6, 5, 0x96e8, PCL726_SIZE
, 1,
142 PCL726_DI_HI
, PCL726_DI_LO
, PCL726_DO_HI
, PCL726_DO_LO
,
144 {"acl6128", 2, 6, 0x0000, PCL728_SIZE
, 0,
149 #define n_boardtypes (sizeof(boardtypes)/sizeof(boardtype))
150 #define this_board ((const boardtype *)dev->board_ptr)
152 static struct comedi_driver driver_pcl726
= {
153 driver_name
:"pcl726",
155 attach
:pcl726_attach
,
156 detach
:pcl726_detach
,
157 board_name
:&boardtypes
[0].name
,
158 num_names
:n_boardtypes
,
159 offset
:sizeof(boardtype
),
162 COMEDI_INITCLEANUP(driver_pcl726
);
166 const struct comedi_lrange
*rangelist
[12];
167 unsigned int ao_readback
[12];
169 #define devpriv ((pcl726_private *)dev->private)
171 static int pcl726_ao_insn(struct comedi_device
* dev
, struct comedi_subdevice
* s
,
172 struct comedi_insn
* insn
, unsigned int * data
)
176 int chan
= CR_CHAN(insn
->chanspec
);
178 for (n
= 0; n
< insn
->n
; n
++) {
180 hi
= (data
[n
] >> 8) & 0xf;
181 if (devpriv
->bipolar
[chan
])
184 * the programming info did not say which order
185 * to write bytes. switch the order of the next
186 * two lines if you get glitches.
188 outb(hi
, dev
->iobase
+ PCL726_DAC0_HI
+ 2 * chan
);
189 outb(lo
, dev
->iobase
+ PCL726_DAC0_LO
+ 2 * chan
);
190 devpriv
->ao_readback
[chan
] = data
[n
];
196 static int pcl726_ao_insn_read(struct comedi_device
* dev
, struct comedi_subdevice
* s
,
197 struct comedi_insn
* insn
, unsigned int * data
)
199 int chan
= CR_CHAN(insn
->chanspec
);
202 for (n
= 0; n
< insn
->n
; n
++) {
203 data
[n
] = devpriv
->ao_readback
[chan
];
208 static int pcl726_di_insn_bits(struct comedi_device
* dev
, struct comedi_subdevice
* s
,
209 struct comedi_insn
* insn
, unsigned int * data
)
214 data
[1] = inb(dev
->iobase
+ this_board
->di_lo
) |
215 (inb(dev
->iobase
+ this_board
->di_hi
) << 8);
220 static int pcl726_do_insn_bits(struct comedi_device
* dev
, struct comedi_subdevice
* s
,
221 struct comedi_insn
* insn
, unsigned int * data
)
227 s
->state
&= ~data
[0];
228 s
->state
|= data
[0] & data
[1];
230 if (data
[1] & 0x00ff)
231 outb(s
->state
& 0xff, dev
->iobase
+ this_board
->do_lo
);
232 if (data
[1] & 0xff00)
233 outb((s
->state
>> 8), dev
->iobase
+ this_board
->do_hi
);
240 static int pcl726_attach(struct comedi_device
* dev
, comedi_devconfig
* it
)
242 struct comedi_subdevice
*s
;
243 unsigned long iobase
;
244 unsigned int iorange
;
250 iobase
= it
->options
[0];
251 iorange
= this_board
->io_range
;
252 printk("comedi%d: pcl726: board=%s, 0x%03lx ", dev
->minor
,
253 this_board
->name
, iobase
);
254 if (!request_region(iobase
, iorange
, "pcl726")) {
255 printk("I/O port conflict\n");
259 dev
->iobase
= iobase
;
261 dev
->board_name
= this_board
->name
;
263 if ((ret
= alloc_private(dev
, sizeof(pcl726_private
))) < 0)
266 for (i
= 0; i
< 12; i
++) {
267 devpriv
->bipolar
[i
] = 0;
268 devpriv
->rangelist
[i
] = &range_unknown
;
273 if (boardtypes
[board
].IRQbits
!= 0) { /* board support IRQ */
274 irq
= it
->options
[1];
275 devpriv
->first_chan
= 2;
276 if (irq
) { /* we want to use IRQ */
277 if (((1 << irq
) & boardtypes
[board
].IRQbits
) == 0) {
279 (", IRQ %d is out of allowed range, DISABLING IT",
281 irq
= 0; /* Bad IRQ */
283 if (comedi_request_irq(irq
, interrupt_pcl818
, 0,
286 (", unable to allocate IRQ %d, DISABLING IT",
288 irq
= 0; /* Can't use IRQ */
290 rt_printk(", irq=%d", irq
);
301 if ((ret
= alloc_subdevices(dev
, 3)) < 0)
304 s
= dev
->subdevices
+ 0;
306 s
->type
= COMEDI_SUBD_AO
;
307 s
->subdev_flags
= SDF_WRITABLE
| SDF_GROUND
;
308 s
->n_chan
= this_board
->n_aochan
;
311 s
->insn_write
= pcl726_ao_insn
;
312 s
->insn_read
= pcl726_ao_insn_read
;
313 s
->range_table_list
= devpriv
->rangelist
;
314 for (i
= 0; i
< this_board
->n_aochan
; i
++) {
317 j
= it
->options
[2 + 1];
318 if ((j
< 0) || (j
>= this_board
->num_of_ranges
)) {
319 printk("Invalid range for channel %d! Must be 0<=%d<%d\n", i
, j
, this_board
->num_of_ranges
- 1);
322 devpriv
->rangelist
[i
] = this_board
->range_type_list
[j
];
323 if (devpriv
->rangelist
[i
]->range
[0].min
==
324 -devpriv
->rangelist
[i
]->range
[0].max
)
325 devpriv
->bipolar
[i
] = 1; /* bipolar range */
328 s
= dev
->subdevices
+ 1;
330 if (!this_board
->have_dio
) {
331 s
->type
= COMEDI_SUBD_UNUSED
;
333 s
->type
= COMEDI_SUBD_DI
;
334 s
->subdev_flags
= SDF_READABLE
| SDF_GROUND
;
338 s
->insn_bits
= pcl726_di_insn_bits
;
339 s
->range_table
= &range_digital
;
342 s
= dev
->subdevices
+ 2;
344 if (!this_board
->have_dio
) {
345 s
->type
= COMEDI_SUBD_UNUSED
;
347 s
->type
= COMEDI_SUBD_DO
;
348 s
->subdev_flags
= SDF_WRITABLE
| SDF_GROUND
;
352 s
->insn_bits
= pcl726_do_insn_bits
;
353 s
->range_table
= &range_digital
;
359 static int pcl726_detach(struct comedi_device
* dev
)
361 // printk("comedi%d: pcl726: remove\n",dev->minor);
365 comedi_free_irq(dev
->irq
, dev
);
370 release_region(dev
->iobase
, this_board
->io_range
);