1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * comedi/drivers/dt2815.c
4  * Hardware driver for Data Translation DT2815
5  *
6  * COMEDI - Linux Control and Measurement Device Interface
7  * Copyright (C) 1999 Anders Blomdell <anders.blomdell@control.lth.se>
8  */
9 /*
10  * Driver: dt2815
11  * Description: Data Translation DT2815
12  * Author: ds
13  * Status: mostly complete, untested
14  * Devices: [Data Translation] DT2815 (dt2815)
15  *
16  * I'm not sure anyone has ever tested this board.  If you have information
17  * contrary, please update.
18  *
19  * Configuration options:
20  * [0] - I/O port base base address
21  * [1] - IRQ (unused)
22  * [2] - Voltage unipolar/bipolar configuration
23  *	0 == unipolar 5V  (0V -- +5V)
24  *	1 == bipolar 5V  (-5V -- +5V)
25  * [3] - Current offset configuration
26  *	0 == disabled  (0mA -- +32mAV)
27  *	1 == enabled  (+4mA -- +20mAV)
28  * [4] - Firmware program configuration
29  *	0 == program 1 (see manual table 5-4)
30  *	1 == program 2 (see manual table 5-4)
31  *	2 == program 3 (see manual table 5-4)
32  *	3 == program 4 (see manual table 5-4)
33  * [5] - Analog output 0 range configuration
34  *	0 == voltage
35  *	1 == current
36  * [6] - Analog output 1 range configuration (same options)
37  * [7] - Analog output 2 range configuration (same options)
38  * [8] - Analog output 3 range configuration (same options)
39  * [9] - Analog output 4 range configuration (same options)
40  * [10] - Analog output 5 range configuration (same options)
41  * [11] - Analog output 6 range configuration (same options)
42  * [12] - Analog output 7 range configuration (same options)
43  */
44 
45 #include <linux/module.h>
46 #include <linux/comedi/comedidev.h>
47 #include <linux/delay.h>
48 
49 #define DT2815_DATA 0
50 #define DT2815_STATUS 1
51 
52 struct dt2815_private {
53 	const struct comedi_lrange *range_type_list[8];
54 	unsigned int ao_readback[8];
55 };
56 
dt2815_ao_status(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned long context)57 static int dt2815_ao_status(struct comedi_device *dev,
58 			    struct comedi_subdevice *s,
59 			    struct comedi_insn *insn,
60 			    unsigned long context)
61 {
62 	unsigned int status;
63 
64 	status = inb(dev->iobase + DT2815_STATUS);
65 	if (status == context)
66 		return 0;
67 	return -EBUSY;
68 }
69 
dt2815_ao_insn_read(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)70 static int dt2815_ao_insn_read(struct comedi_device *dev,
71 			       struct comedi_subdevice *s,
72 			       struct comedi_insn *insn, unsigned int *data)
73 {
74 	struct dt2815_private *devpriv = dev->private;
75 	int i;
76 	int chan = CR_CHAN(insn->chanspec);
77 
78 	for (i = 0; i < insn->n; i++)
79 		data[i] = devpriv->ao_readback[chan];
80 
81 	return i;
82 }
83 
dt2815_ao_insn(struct comedi_device * dev,struct comedi_subdevice * s,struct comedi_insn * insn,unsigned int * data)84 static int dt2815_ao_insn(struct comedi_device *dev, struct comedi_subdevice *s,
85 			  struct comedi_insn *insn, unsigned int *data)
86 {
87 	struct dt2815_private *devpriv = dev->private;
88 	int i;
89 	int chan = CR_CHAN(insn->chanspec);
90 	unsigned int lo, hi;
91 	int ret;
92 
93 	for (i = 0; i < insn->n; i++) {
94 		/* FIXME: lo bit 0 chooses voltage output or current output */
95 		lo = ((data[i] & 0x0f) << 4) | (chan << 1) | 0x01;
96 		hi = (data[i] & 0xff0) >> 4;
97 
98 		ret = comedi_timeout(dev, s, insn, dt2815_ao_status, 0x00);
99 		if (ret)
100 			return ret;
101 
102 		outb(lo, dev->iobase + DT2815_DATA);
103 
104 		ret = comedi_timeout(dev, s, insn, dt2815_ao_status, 0x10);
105 		if (ret)
106 			return ret;
107 
108 		outb(hi, dev->iobase + DT2815_DATA);
109 
110 		devpriv->ao_readback[chan] = data[i];
111 	}
112 	return i;
113 }
114 
115 /*
116  * options[0]   Board base address
117  * options[1]   IRQ (not applicable)
118  * options[2]   Voltage unipolar/bipolar configuration
119  *		0 == unipolar 5V  (0V -- +5V)
120  *		1 == bipolar 5V  (-5V -- +5V)
121  * options[3]   Current offset configuration
122  *		0 == disabled  (0mA -- +32mAV)
123  *		1 == enabled  (+4mA -- +20mAV)
124  * options[4]   Firmware program configuration
125  *		0 == program 1 (see manual table 5-4)
126  *		1 == program 2 (see manual table 5-4)
127  *		2 == program 3 (see manual table 5-4)
128  *		3 == program 4 (see manual table 5-4)
129  * options[5]   Analog output 0 range configuration
130  *		0 == voltage
131  *		1 == current
132  * options[6]   Analog output 1 range configuration
133  * ...
134  * options[12]   Analog output 7 range configuration
135  *		0 == voltage
136  *		1 == current
137  */
138 
dt2815_attach(struct comedi_device * dev,struct comedi_devconfig * it)139 static int dt2815_attach(struct comedi_device *dev, struct comedi_devconfig *it)
140 {
141 	struct dt2815_private *devpriv;
142 	struct comedi_subdevice *s;
143 	int i;
144 	const struct comedi_lrange *current_range_type, *voltage_range_type;
145 	int ret;
146 
147 	ret = comedi_request_region(dev, it->options[0], 0x2);
148 	if (ret)
149 		return ret;
150 
151 	ret = comedi_alloc_subdevices(dev, 1);
152 	if (ret)
153 		return ret;
154 
155 	devpriv = comedi_alloc_devpriv(dev, sizeof(*devpriv));
156 	if (!devpriv)
157 		return -ENOMEM;
158 
159 	s = &dev->subdevices[0];
160 	/* ao subdevice */
161 	s->type = COMEDI_SUBD_AO;
162 	s->subdev_flags = SDF_WRITABLE;
163 	s->maxdata = 0xfff;
164 	s->n_chan = 8;
165 	s->insn_write = dt2815_ao_insn;
166 	s->insn_read = dt2815_ao_insn_read;
167 	s->range_table_list = devpriv->range_type_list;
168 
169 	current_range_type = (it->options[3])
170 	    ? &range_4_20mA : &range_0_32mA;
171 	voltage_range_type = (it->options[2])
172 	    ? &range_bipolar5 : &range_unipolar5;
173 	for (i = 0; i < 8; i++) {
174 		devpriv->range_type_list[i] = (it->options[5 + i])
175 		    ? current_range_type : voltage_range_type;
176 	}
177 
178 	/* Init the 2815 */
179 	outb(0x00, dev->iobase + DT2815_STATUS);
180 	for (i = 0; i < 100; i++) {
181 		/* This is incredibly slow (approx 20 ms) */
182 		unsigned int status;
183 
184 		usleep_range(1000, 3000);
185 		status = inb(dev->iobase + DT2815_STATUS);
186 		if (status == 4) {
187 			unsigned int program;
188 
189 			program = (it->options[4] & 0x3) << 3 | 0x7;
190 			outb(program, dev->iobase + DT2815_DATA);
191 			dev_dbg(dev->class_dev, "program: 0x%x (@t=%d)\n",
192 				program, i);
193 			break;
194 		} else if (status != 0x00) {
195 			dev_dbg(dev->class_dev,
196 				"unexpected status 0x%x (@t=%d)\n",
197 				status, i);
198 			if (status & 0x60)
199 				outb(0x00, dev->iobase + DT2815_STATUS);
200 		}
201 	}
202 
203 	return 0;
204 }
205 
206 static struct comedi_driver dt2815_driver = {
207 	.driver_name	= "dt2815",
208 	.module		= THIS_MODULE,
209 	.attach		= dt2815_attach,
210 	.detach		= comedi_legacy_detach,
211 };
212 module_comedi_driver(dt2815_driver);
213 
214 MODULE_AUTHOR("Comedi https://www.comedi.org");
215 MODULE_DESCRIPTION("Comedi low-level driver");
216 MODULE_LICENSE("GPL");
217