2 * This file is part of the libsigrok project.
4 * Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
5 * Copyright (C) 2014 Bert Vermeulen <bert@biot.com> (code from atten-pps3xxx)
7 * This program is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation, either version 3 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program. If not, see <http://www.gnu.org/licenses/>.
24 * <em>Motech LPS-30x series</em> power supply driver
34 /** Send data packets for current measurements. */
35 static void send_data(struct sr_dev_inst *sdi)
37 struct dev_context *devc;
38 struct sr_datafeed_packet packet;
39 struct sr_datafeed_analog analog;
40 struct sr_analog_encoding encoding;
41 struct sr_analog_meaning meaning;
42 struct sr_analog_spec spec;
44 float data[MAX_CHANNELS];
47 packet.type = SR_DF_ANALOG;
48 packet.payload = &analog;
50 /* Note: digits/spec_digits will be overridden later. */
51 sr_analog_init(&analog, &encoding, &meaning, &spec, 0);
53 analog.meaning->channels = sdi->channels;
54 analog.num_samples = 1;
55 analog.meaning->mq = SR_MQ_VOLTAGE;
56 analog.meaning->unit = SR_UNIT_VOLT;
57 analog.meaning->mqflags = SR_MQFLAG_DC;
58 analog.encoding->digits = 3;
59 analog.spec->spec_digits = 2;
62 for (i = 0; i < devc->model->num_channels; i++)
63 ((float *)analog.data)[i] = devc->channel_status[i].output_voltage_last; /* Value always 3.3 or 5 for channel 3, if present! */
64 sr_session_send(sdi, &packet);
66 analog.meaning->mq = SR_MQ_CURRENT;
67 analog.meaning->unit = SR_UNIT_AMPERE;
68 analog.meaning->mqflags = 0;
69 analog.encoding->digits = 4;
70 analog.spec->spec_digits = 3;
72 for (i = 0; i < devc->model->num_channels; i++)
73 ((float *)analog.data)[i] = devc->channel_status[i].output_current_last; /* Value always 0 for channel 3, if present! */
74 sr_session_send(sdi, &packet);
76 sr_sw_limits_update_samples_read(&devc->limits, 1);
79 /** Process a complete line (without CR/LF) in buf. */
80 static void process_line(struct sr_dev_inst *sdi)
82 struct dev_context *devc;
88 switch (devc->acq_req_pending) {
89 case 0: /* Should not happen... */
91 case 1: /* Waiting for data reply to request */
93 switch (devc->acq_req) {
98 if (sr_atod(devc->buf, &dbl) != SR_OK) {
99 sr_err("Failed to convert '%s' to double, errno=%d %s",
100 devc->buf, errno, g_strerror(errno));
105 if (sr_atoi(devc->buf, &auxint) != SR_OK) {
106 sr_err("Failed to convert '%s' to int, errno=%d %s",
107 devc->buf, errno, g_strerror(errno));
115 switch (devc->acq_req) {
117 devc->channel_status[0].output_voltage_last = dbl;
120 devc->channel_status[0].output_current_last = dbl;
123 devc->channel_status[1].output_voltage_last = dbl;
126 devc->channel_status[1].output_current_last = dbl;
128 case AQ_STATUS: /* Process status and generate data. */
129 if (lps_process_status(sdi, auxint) == SR_OK) {
137 devc->acq_req_pending = 2;
139 case 2: /* Waiting for OK after request */
140 if (strcmp(devc->buf, "OK")) {
141 sr_err("Unexpected reply while waiting for OK: '%s'", devc->buf);
143 devc->acq_req_pending = 0;
151 SR_PRIV int motech_lps_30x_receive_data(int fd, int revents, void *cb_data)
153 struct sr_dev_inst *sdi;
154 struct dev_context *devc;
155 struct sr_serial_dev_inst *serial;
160 if (!(sdi = cb_data))
163 if (!(devc = sdi->priv))
168 if (revents == G_IO_IN) { /* Serial data arrived. */
169 while (LINELEN_MAX - devc->buflen - 2 > 0) {
170 len = serial_read_nonblocking(serial, devc->buf + devc->buflen, 1);
174 /* Eliminate whitespace at beginning of line. */
175 if (g_ascii_isspace(devc->buf[0])) {
182 devc->buf[devc->buflen] = '\0';
184 /* If line complete, process msg. */
185 if ((devc->buflen > 0) && ((devc->buf[devc->buflen-1] == '\r') || devc->buf[devc->buflen-1] == '\n')) {
187 devc->buf[devc->buflen] = '\0';
189 sr_spew("Line complete: \"%s\"", devc->buf);
195 if (sr_sw_limits_check(&devc->limits))
196 sdi->driver->dev_acquisition_stop(sdi);
198 /* Only request the next packet if required. */
199 if (!((sdi->status == SR_ST_ACTIVE) && (devc->acq_running)))
202 if (devc->acq_req_pending) {
203 int64_t elapsed_us = g_get_monotonic_time() - devc->req_sent_at;
204 if (elapsed_us > (REQ_TIMEOUT_MS * 1000)) {
205 sr_spew("Request timeout: req=%d t=%" PRIi64 "us",
206 (int)devc->acq_req, elapsed_us);
207 devc->acq_req_pending = 0;
211 if (devc->acq_req_pending == 0) {
212 switch (devc->acq_req) {
213 case AQ_NONE: /* Fall through */
215 devc->acq_req = AQ_U1;
216 lps_send_req(serial, "VOUT1");
219 devc->acq_req = AQ_I1;
220 lps_send_req(serial, "IOUT1");
223 if (devc->model->num_channels == 1) {
224 devc->acq_req = AQ_STATUS;
225 lps_send_req(serial, "STATUS");
227 devc->acq_req = AQ_U2;
228 lps_send_req(serial, "VOUT2");
232 devc->acq_req = AQ_I2;
233 lps_send_req(serial, "IOUT2");
236 devc->acq_req = AQ_STATUS;
237 lps_send_req(serial, "STATUS");
240 sr_err("Illegal devc->acq_req=%d", devc->acq_req);
243 devc->req_sent_at = g_get_real_time();
244 devc->acq_req_pending = 1;