]> sigrok.org Git - libsigrok.git/blame - src/hardware/motech-lps-30x/api.c
Pass driver struct pointer to driver callbacks.
[libsigrok.git] / src / hardware / motech-lps-30x / api.c
CommitLineData
41b7bd01
MH
1/*
2 * This file is part of the libsigrok project.
3 *
4 * Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
1c3d002b 5 * Copyright (C) 2014 Bert Vermeulen <bert@biot.com> (code from atten-pps3xxx)
41b7bd01
MH
6 *
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.
11 *
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.
16 *
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/>.
19 */
20
1c3d002b
MH
21/** @file
22 * <em>Motech LPS-30x series</em> power supply driver
23 * @internal
24 */
25
26#include <ctype.h>
27#include <errno.h>
28#include <math.h>
29#include <string.h>
30
41b7bd01
MH
31#include "protocol.h"
32
1c3d002b 33/* Forward declarations */
41b7bd01 34SR_PRIV struct sr_dev_driver motech_lps_301_driver_info;
1c3d002b
MH
35SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen);
36SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char* fmt, va_list args);
37SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char* fmt, ...);
38SR_PRIV int lps_cmd_reply(char* reply, struct sr_serial_dev_inst *serial, const char* fmt, ...);
39SR_PRIV int lps_query_status(struct sr_dev_inst* sdi);
40
41/* Serial communication parameters */
42#define SERIALCOMM "2400/8n1/dtr=1/rts=1/flow=0"
43
44#define VENDOR_MOTECH "Motech"
45
413f1944
AJ
46/** Driver capabilities generic. */
47static const uint32_t drvopts[] = {
48 /* Device class */
49 SR_CONF_POWER_SUPPLY,
50};
51
1c3d002b 52/** Driver scanning options. */
a0e0bb41 53static const uint32_t scanopts[] = {
1c3d002b
MH
54 SR_CONF_CONN,
55 SR_CONF_SERIALCOMM,
56};
57
58/** Hardware capabilities generic. */
f254bc4b 59static const uint32_t devopts[] = {
1c3d002b
MH
60 /* Device class */
61 SR_CONF_POWER_SUPPLY,
62 /* Aquisition modes. */
1c3d002b 63 SR_CONF_CONTINUOUS,
5827f61b
BV
64 SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
65 SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
1c3d002b 66 /* Device configuration */
5827f61b 67 SR_CONF_OUTPUT_CHANNEL_CONFIG | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
1c3d002b
MH
68};
69
70/** Hardware capabilities channel 1, 2. */
f254bc4b 71static const uint32_t devopts_ch12[] = {
5827f61b 72 SR_CONF_OUTPUT_VOLTAGE | SR_CONF_GET,
ca95e90f 73 SR_CONF_OUTPUT_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
5827f61b 74 SR_CONF_OUTPUT_CURRENT | SR_CONF_GET,
ca95e90f 75 SR_CONF_OUTPUT_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
5827f61b 76 SR_CONF_OUTPUT_ENABLED | SR_CONF_GET | SR_CONF_SET,
1c3d002b
MH
77};
78
79/** Hardware capabilities channel 3. (LPS-304/305 only). */
f254bc4b 80static const uint32_t devopts_ch3[] = {
5827f61b
BV
81 SR_CONF_OUTPUT_VOLTAGE | SR_CONF_GET,
82 SR_CONF_OUTPUT_ENABLED | SR_CONF_GET | SR_CONF_SET,
1c3d002b
MH
83};
84
85static const char *channel_modes[] = {
86 "Independent",
87 "Track1",
88 "Track2",
89};
90
91static struct lps_modelspec models[] = {
92 { LPS_UNKNOWN, "Dummy", 0,
93 {
94
95 }
96 },
97 { LPS_301, "LPS-301", 1,
98 {
99 /* Channel 1 */
100 { { 0, 32, 0.01 }, { 0.005, 2, 0.001 } },
101 },
102 },
103 { LPS_302, "LPS-302", 1,
104 {
105 /* Channel 1 */
106 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
107 },
108 },
109 { LPS_303, "LPS-303", 1,
110 {
111 /* Channel 1 */
112 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
113 },
114 },
115 { LPS_304, "LPS-304", 3,
116 {
117 /* Channel 1 */
118 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
119 /* Channel 2 */
120 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
121 /* Channel 3 */
122 { { 5, 5, 0.0 }, { 0.005, 3, 0.001 } },
123 },
124 },
125 { LPS_305, "LPS-305", 3,
126 {
127 /* Channel 1 */
128 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
129 /* Channel 2 */
130 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
131 /* Channel 3 */
132 { { 3.3, 5, 1.7 }, { 0.005, 3, 0.001 } },
133 },
134 },
135};
41b7bd01 136
4f840ce9 137static int init_lps301(struct sr_dev_driver *di, struct sr_context *sr_ctx)
41b7bd01 138{
4f840ce9 139 return std_init(sr_ctx, di, LOG_PREFIX);
41b7bd01
MH
140}
141
1c3d002b
MH
142/** Send command to device with va_list.
143 */
144SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char* fmt, va_list args)
41b7bd01 145{
1c3d002b
MH
146 int retc;
147 char auxfmt[LINELEN_MAX];
148 char buf[LINELEN_MAX];
41b7bd01 149
1c3d002b
MH
150 snprintf(auxfmt, sizeof(auxfmt), "%s\r\n", fmt);
151 vsnprintf(buf, sizeof(buf), auxfmt, args);
41b7bd01 152
1c3d002b 153 sr_spew("lps_send_va: \"%s\"", buf);
41b7bd01 154
eead2782 155 retc = serial_write_blocking(serial, buf, strlen(buf), 0);
41b7bd01 156
1c3d002b
MH
157 if (retc < 0)
158 return SR_ERR;
159
160 return SR_OK;
41b7bd01
MH
161}
162
1c3d002b
MH
163/** Send command to device.
164 */
165SR_PRIV int lps_send_req(struct sr_serial_dev_inst *serial, const char* fmt, ...)
41b7bd01 166{
1c3d002b
MH
167 int retc;
168 va_list args;
169
170 va_start(args, fmt);
171 retc = lps_send_va(serial, fmt, args);
172 va_end(args);
173
174 return retc;
41b7bd01
MH
175}
176
1c3d002b
MH
177/** Send command and consume simple OK reply. */
178SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char* fmt, ...)
41b7bd01 179{
1c3d002b
MH
180 int retc;
181 va_list args;
182 char buf[LINELEN_MAX];
183 char* bufptr;
184 int buflen;
185
186 /* Send command */
187 va_start(args, fmt);
188 retc = lps_send_va(serial, fmt, args);
189 va_end(args);
190
191 if (retc != SR_OK)
192 return SR_ERR;
193
194 /* Read reply */
195 buf[0] = '\0';
196 bufptr = buf;
197 buflen = sizeof(buf);
198 retc = lps_read_reply(serial, &bufptr, &buflen);
199 if ((retc == SR_OK) && (buflen == 0))
200 return SR_OK;
201
202 return SR_ERR;
41b7bd01
MH
203}
204
1c3d002b
MH
205/** Send command and read reply string.
206 * \param reply Pointer to buffer of size LINELEN_MAX. Will be NUL-terminated.
207 */
208SR_PRIV int lps_cmd_reply(char* reply, struct sr_serial_dev_inst *serial, const char* fmt, ...)
41b7bd01 209{
1c3d002b
MH
210 int retc;
211 va_list args;
212 char buf[LINELEN_MAX];
213 char* bufptr;
214 int buflen;
215
216 reply[0] = '\0';
217
218 /* Send command */
219 va_start(args, fmt);
220 retc = lps_send_va(serial, fmt, args);
221 va_end(args);
222
223 if (retc != SR_OK)
224 return SR_ERR;
225
226 /* Read reply */
227 buf[0] = '\0';
228 bufptr = buf;
229 buflen = sizeof(buf);
230 retc = lps_read_reply(serial, &bufptr, &buflen);
231 if ((retc == SR_OK) && (buflen > 0)) {
232 strcpy(reply, buf);
233 return SR_OK;
234 }
41b7bd01 235
1c3d002b
MH
236 return SR_ERR;
237}
41b7bd01 238
1c3d002b
MH
239/** Process integer value returned by STATUS command. */
240SR_PRIV int lps_process_status(struct sr_dev_inst* sdi, int stat)
241{
242 struct dev_context* devc;
243 int tracking_mode;
244
245 devc = (struct dev_context*)sdi->priv;
246
247 sr_spew("Status: %d", stat);
248 devc->channel_status[0].cc_mode = (stat & 0x01) != 0;
249 sr_spew("Channel 1 %s mode", devc->channel_status[0].cc_mode?"CC":"CV");
250 if (devc->model->num_channels > 1) {
251 devc->channel_status[1].cc_mode = (stat & 0x02) != 0;
252 sr_spew("Channel 2 %s mode", devc->channel_status[1].cc_mode?"CC":"CV");
253
254 tracking_mode = (stat & 0x0c) >> 2;
255 switch (tracking_mode) {
256 case 0: devc->tracking_mode = 0;
257 break;
258 case 2: devc->tracking_mode = 1;
259 break;
260 case 3: devc->tracking_mode = 2;
261 break;
262 default:
263 sr_err("Illegal channel tracking mode %d!", tracking_mode);
264 devc->tracking_mode = 0;
265 break;
266 }
267
268 sr_spew("Channel tracking: %d", devc->tracking_mode);
269 }
270 devc->channel_status[0].output_enabled = devc->channel_status[1].output_enabled = stat&0x040?TRUE:FALSE;
271 sr_spew("Channel 1%s output: %s", devc->model->num_channels > 1?"+2":"", devc->channel_status[0].output_enabled?"ON":"OFF");
272 if (devc->model->num_channels > 2) {
273 devc->channel_status[2].output_enabled = stat&0x010?TRUE:FALSE;
274 devc->channel_status[2].output_voltage_last = stat&0x020?3.3:5;
275 sr_spew("Channel 3 output: %s, U=%02f V, overload=%d",
276 devc->channel_status[2].output_enabled?"ON":"OFF",
277 devc->channel_status[2].output_voltage_last,
278 stat&0x080?1:0);
279 }
280 sr_spew("Fan=%d, beep=%d, CC output compensated=%d", stat&0x0100?1:0, stat&0x0200?1:0, stat&0x0400?1:0);
41b7bd01
MH
281
282 return SR_OK;
283}
284
1c3d002b
MH
285/** Send STATUS commend and process status string. */
286SR_PRIV int lps_query_status(struct sr_dev_inst* sdi)
41b7bd01 287{
1c3d002b
MH
288 char buf[LINELEN_MAX];
289 int stat;
1c3d002b 290 struct dev_context* devc;
41b7bd01 291
1c3d002b 292 devc = (struct dev_context*)sdi->priv;
41b7bd01 293
1c3d002b 294 devc->req_sent_at = g_get_real_time();
41b7bd01 295
1c3d002b
MH
296 if (lps_cmd_reply(buf, sdi->conn, "STATUS") < 0) {
297 sr_err("%s: Failed to read status: %d %s", __func__, errno, strerror(errno));
298 return SR_ERR;
299 }
300
1f7da0c2 301 if (sr_atoi(buf, &stat) != SR_OK)
1c3d002b
MH
302 return SR_ERR;
303
304 return lps_process_status(sdi, stat);
41b7bd01
MH
305}
306
1c3d002b 307static gint64 calc_timeout_ms(gint64 start_us)
41b7bd01 308{
1c3d002b 309 gint64 result = REQ_TIMEOUT_MS - ((g_get_real_time() - start_us) / 1000);
41b7bd01 310
1c3d002b
MH
311 if (result < 0)
312 return 0;
41b7bd01 313
1c3d002b 314 return result;
41b7bd01
MH
315}
316
1c3d002b
MH
317/** Read message into buf until "OK" received.
318 * \retval SR_OK Msg received; buf and buflen contain result, if any except OK.
319 * \retval SR_ERR Error, including timeout.
320*/
321SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen)
41b7bd01 322{
1c3d002b
MH
323 int retries;
324 char buf2[LINELEN_MAX];
325 char *buf2ptr;
326 int buf2len;
327 gint64 timeout_start;
328
329 *buf[0] = '\0';
330
331 /* Read one line. It is either a data message or "OK". */
332 timeout_start = g_get_real_time();
333 buf2len = *buflen;
334 /* Up to 5 tries because serial_readline() will consume only one CR or LF per
335 * call, but device sends up to 4 in a row. */
336 for (retries = 0; retries < 5; retries++) {
337 *buflen = buf2len;
338 if (serial_readline(serial, buf, buflen, calc_timeout_ms(timeout_start)) != SR_OK)
339 return SR_ERR;
340 if (!strcmp(*buf, "OK")) { /* We got an OK! */
341 *buf[0] = '\0';
342 *buflen = 0;
343 return SR_OK;
344 }
345 if (*buflen > 0) /* We got a msg! */
346 break;
347 }
41b7bd01 348
1c3d002b
MH
349 /* A data msg is in buf (possibly ERROR), need to consume "OK". */
350 buf2[0] = '\0';
351 buf2ptr = buf2;
352 for (retries = 0; retries < 5; retries++) {
353 buf2len = sizeof(buf2);
354 if (serial_readline(serial, &buf2ptr, &buf2len, calc_timeout_ms(timeout_start)) != SR_OK)
355 return SR_ERR;
356
357 if (!strcmp(buf2ptr, "OK")) { /* We got an OK! */
358 if (!strcmp(*buf, "ERROR")) { /* OK came after msg ERROR! */
359 sr_spew("ERROR found!");
360 *buf[0] = '\0';
361 *buflen = 0;
362 return SR_ERR;
363 }
364 return SR_OK;
365 }
366 }
41b7bd01 367
1c3d002b
MH
368 return SR_ERR; /* Timeout! */
369}
370
371/** Scan for LPS-300 series device.
372 */
1f7da0c2 373static GSList *do_scan(lps_modelid modelid, struct sr_dev_driver *drv, GSList *options)
1c3d002b
MH
374{
375 struct sr_dev_inst *sdi;
376 struct drv_context *drvc;
377 struct dev_context *devc;
378 struct sr_serial_dev_inst *serial;
379 struct sr_channel *ch;
380 struct sr_channel_group *cg;
381 GSList *devices;
382 const char *conn, *serialcomm;
383 int cnt;
0af636be 384 gchar buf[LINELEN_MAX];
1c3d002b 385 gchar channel[10];
0af636be 386 char *verstr;
1c3d002b
MH
387
388 sdi = NULL;
389 devc = NULL;
390 conn = serialcomm = NULL;
391 devices = NULL;
392
393 drvc = drv->priv;
394 drvc->instances = NULL;
395
396 sr_spew("scan() called!");
397
398 /* Process and check options. */
399 if (sr_serial_extract_options(options, &conn, &serialcomm) != SR_OK)
400 return NULL;
401 if (!serialcomm)
402 serialcomm = SERIALCOMM;
403
404 /* Init serial port. */
91219afc 405 serial = sr_serial_dev_inst_new(conn, serialcomm);
1c3d002b 406
5b980134 407 if (serial_open(serial, SERIAL_RDWR) != SR_OK)
1c3d002b
MH
408 goto exit_err;
409
410 /* Query and verify model string. */
411 serial_flush(serial);
412 if (lps_cmd_reply(buf, serial, "MODEL") != SR_OK)
413 return NULL;
414
415 /* Check model string. */
416 if (strncmp(buf, "LPS-", 4)) {
417 sr_spew("Unknown model code \"%s\"!", buf);
418 return NULL;
419 }
420
421 /* Bug in device FW 1.17, model number is empty, so this can't work with this FW! */
422 if (modelid == LPS_UNKNOWN) {
423 g_strstrip(buf);
424 for (cnt = LPS_301; cnt <= LPS_305; cnt++) {
425 if (!strcmp(buf, models[cnt].modelstr)) {
426 modelid = cnt;
427 break;
428 }
429 }
430 if (modelid == LPS_UNKNOWN) {
431 sr_err("Unable to detect model from model string '%s'!", buf);
432 return NULL;
433 }
41b7bd01
MH
434 }
435
1c3d002b
MH
436 /* Query version */
437 verstr = NULL;
438 if (lps_cmd_reply(buf, serial, "VERSION") == SR_OK) {
439 if (strncmp(buf, "Ver-", 4)) {
440 sr_spew("Version string %s not recognized.", buf);
441 goto exit_err;
442 }
443
444
445 g_strstrip(buf);
446 verstr = buf + 4;
447 }
448 else /* Bug in device FW 1.17: Quering version string fails while output is active.
449 Therefore just print an error message, but do not exit with error. */
450 sr_err("Failed to query for hardware version: %d %s", errno, strerror(errno));
451
aac29cc1 452 sdi = g_malloc0(sizeof(struct sr_dev_inst));
0af636be
UH
453 sdi->status = SR_ST_INACTIVE;
454 sdi->vendor = g_strdup(VENDOR_MOTECH);
455 sdi->model = g_strdup(models[modelid].modelstr);
456 sdi->version = g_strdup(verstr);
1c3d002b
MH
457 sdi->driver = drv;
458 sdi->inst_type = SR_INST_SERIAL;
459 sdi->conn = serial;
460
461 devc = g_malloc0(sizeof(struct dev_context));
462 devc->model = &models[modelid];
463 devc->limit_samples = 0;
464 devc->limit_msec = 0;
465 devc->num_samples = 0;
466 devc->elapsed_msec = g_timer_new();
467
468 sdi->priv = devc;
469
470 /* Setup channels and channel groups. */
471 for (cnt = 0; cnt < models[modelid].num_channels; cnt++) {
472 snprintf(channel, sizeof(channel), "CH%d", cnt + 1);
5e23fcab 473 ch = sr_channel_new(sdi, cnt, SR_CHANNEL_ANALOG, TRUE, channel);
1c3d002b
MH
474
475 devc->channel_status[cnt].info = g_slist_append(NULL, ch);
476
477 cg = g_malloc(sizeof(struct sr_channel_group));
478 snprintf(channel, sizeof(channel), "CG%d", cnt+1);
479 cg->name = g_strdup(channel);
480 cg->priv = NULL;
481 cg->channels = g_slist_append(NULL, ch);
482
483 sdi->channel_groups = g_slist_append(sdi->channel_groups, cg);
484 }
485
486 drvc->instances = g_slist_append(drvc->instances, sdi);
487 devices = g_slist_append(devices, sdi);
488
489 /* Query status */
490 if (lps_query_status(sdi) != SR_OK)
491 goto exit_err;
492
493 serial_close(serial);
494 if (!devices)
495 sr_serial_dev_inst_free(serial);
496
497 return devices;
498
499exit_err:
500 sr_info("%s: Error!", __func__);
501
502 if (serial) {
503 serial_close(serial);
504 sr_serial_dev_inst_free(serial);
505 }
506 if (devc)
507 g_free(devc);
508 if (sdi)
509 sr_dev_inst_free(sdi);
510
511 return NULL;
41b7bd01
MH
512}
513
1c3d002b 514/** Scan for LPS-301 device. */
4f840ce9 515static GSList *scan_lps301(struct sr_dev_driver *di, GSList *options)
1c3d002b 516{
4f840ce9 517 return do_scan(LPS_301, di, options);
1c3d002b
MH
518}
519
4f840ce9 520static GSList *dev_list_lps301(const struct sr_dev_driver *di)
1c3d002b 521{
4f840ce9 522 return ((struct drv_context *)(di->priv))->instances;
1c3d002b
MH
523}
524
525static void dev_clear_private(struct dev_context* devc)
526{
527 int ch_idx;
528
529 /* Free channel_status.info (list only, data owned by sdi). */
530 for (ch_idx = 0; ch_idx < devc->model->num_channels; ch_idx++)
531 g_slist_free(devc->channel_status[ch_idx].info);
532
533 g_timer_destroy(devc->elapsed_msec);
534}
535
4f840ce9 536static int dev_clear_lps301(const struct sr_dev_driver *di)
1c3d002b 537{
4f840ce9 538 return std_dev_clear(di, (std_dev_clear_callback)dev_clear_private);
1c3d002b
MH
539}
540
4f840ce9 541static int cleanup(const struct sr_dev_driver *di)
1c3d002b 542{
4f840ce9 543 return dev_clear_lps301(di);
1c3d002b
MH
544}
545
584560f1 546static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
41b7bd01
MH
547 const struct sr_channel_group *cg)
548{
1c3d002b
MH
549 struct dev_context *devc;
550 struct sr_channel *ch;
551 int ch_idx;
552
553 if (!sdi)
554 return SR_ERR_ARG;
555
556 devc = sdi->priv;
557
558 if (!cg) {
559 /* No channel group: global options. */
560 switch (key) {
561 case SR_CONF_LIMIT_SAMPLES:
562 *data = g_variant_new_uint64(devc->limit_samples);
563 break;
564 case SR_CONF_LIMIT_MSEC:
565 *data = g_variant_new_uint64(devc->limit_msec);
566 break;
a1eaa9e0 567 case SR_CONF_OUTPUT_CHANNEL_CONFIG:
1c3d002b
MH
568 *data = g_variant_new_string(channel_modes[devc->tracking_mode]);
569 break;
570 default:
571 return SR_ERR_NA;
572 }
573 } else {
574 /* We only ever have one channel per channel group in this driver. */
575 ch = cg->channels->data;
576 ch_idx = ch->index;
577 switch (key) {
578 case SR_CONF_OUTPUT_VOLTAGE:
579 *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_last);
580 break;
ca95e90f 581 case SR_CONF_OUTPUT_VOLTAGE_TARGET:
1c3d002b
MH
582 *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_max);
583 break;
584 case SR_CONF_OUTPUT_CURRENT:
585 *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_last);
586 break;
ca95e90f 587 case SR_CONF_OUTPUT_CURRENT_LIMIT:
1c3d002b
MH
588 *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_max);
589 break;
590 case SR_CONF_OUTPUT_ENABLED:
591 *data = g_variant_new_boolean(devc->channel_status[ch_idx].output_enabled);
592 break;
593 default:
594 return SR_ERR_NA;
595 }
596 }
41b7bd01 597
1c3d002b
MH
598 return SR_OK;
599}
600
584560f1 601static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi,
1c3d002b
MH
602 const struct sr_channel_group *cg)
603{
604 struct dev_context *devc;
605 struct sr_channel *ch;
606 gdouble dval;
607 int ch_idx;
608 const char *sval;
609 gboolean bval;
610 int idx;
611 gboolean found;
41b7bd01
MH
612
613 if (sdi->status != SR_ST_ACTIVE)
614 return SR_ERR_DEV_CLOSED;
615
1c3d002b
MH
616 devc = sdi->priv;
617
419bfb50 618 /* Cannot change settings while acquisition active, would cause a mess with commands.
1c3d002b
MH
619 * Changing this would be possible, but tricky. */
620 if (devc->acq_running)
621 return SR_ERR_NA;
622
623 if (!cg) {
624 /* No channel group: global options. */
625 switch (key) {
626 case SR_CONF_LIMIT_MSEC:
627 if (g_variant_get_uint64(data) == 0) {
628 sr_err("LIMIT_MSEC can't be 0.");
629 return SR_ERR;
630 }
631 devc->limit_msec = g_variant_get_uint64(data);
632 sr_dbg("Setting time limit to %" PRIu64 "ms.",
633 devc->limit_msec);
634 break;
635 case SR_CONF_LIMIT_SAMPLES:
636 devc->limit_samples = g_variant_get_uint64(data);
637 sr_dbg("Setting sample limit to %" PRIu64 ".",
638 devc->limit_samples);
639 break;
a1eaa9e0 640 case SR_CONF_OUTPUT_CHANNEL_CONFIG:
1c3d002b
MH
641 sval = g_variant_get_string(data, NULL);
642 found = FALSE;
643 for (idx = 0; idx < (int)ARRAY_SIZE(channel_modes); idx++)
644 {
645 if (!strcmp(sval, channel_modes[idx])) {
646 found = TRUE;
647 if (devc->tracking_mode == idx)
648 break; /* Nothing to do! */
649 devc->tracking_mode = idx;
650 if (devc->model->modelid >= LPS_304) /* No use to set anything in the smaller models. */
651 return lps_cmd_ok(sdi->conn, "TRACK%1d", devc->tracking_mode);
652 }
653 if (devc->model->modelid <= LPS_303) /* Only first setting possible for smaller models. */
654 break;
655 }
656 if (!found) {
657 return SR_ERR_ARG;
658 }
659 break;
660 default:
661 return SR_ERR_NA;
662 }
663 } else {
664 /* Channel group specified: per-channel options. */
665 /* We only ever have one channel per channel group in this driver. */
666 ch = cg->channels->data;
667 ch_idx = ch->index;
668
669 switch (key) {
ca95e90f 670 case SR_CONF_OUTPUT_VOLTAGE_TARGET:
1c3d002b
MH
671 dval = g_variant_get_double(data);
672 if (dval < 0 || dval > devc->model->channels[ch_idx].voltage[1])
673 return SR_ERR_ARG;
674 if (ch_idx == 2) {
675 if (devc->model->modelid < LPS_304)
676 return SR_ERR_ARG;
677
678 if (fabs(dval - 5.000) <= 0.001)
679 dval = 5.0;
680 else if ((devc->model->modelid >= LPS_305) && (fabs(dval - 3.300) <= 0.001))
681 dval = 3.3;
682 else return SR_ERR_ARG;
683 }
684
685 devc->channel_status[ch_idx].output_voltage_max = dval;
686 if (ch_idx == 2)
687 return lps_cmd_ok(sdi->conn, "VDD%1.0f", trunc(dval));
688 else
689 return lps_cmd_ok(sdi->conn, "VSET%d %05.3f", ch_idx+1, dval);
690 break;
ca95e90f 691 case SR_CONF_OUTPUT_CURRENT_LIMIT:
1c3d002b
MH
692 dval = g_variant_get_double(data);
693 if (dval < 0 || dval > devc->model->channels[ch_idx].current[1])
694 return SR_ERR_ARG;
695 if (ch_idx == 2) /* No current setting for CH3. */
696 return SR_ERR_NA;
697 devc->channel_status[ch_idx].output_current_max = dval;
698 return lps_cmd_ok(sdi->conn, "ISET%d %05.4f", ch_idx+1, dval);
699 break;
700 case SR_CONF_OUTPUT_ENABLED:
701 bval = g_variant_get_boolean(data);
702 if (bval == devc->channel_status[ch_idx].output_enabled) /* Nothing to do. */
703 break;
704 devc->channel_status[ch_idx].output_enabled = bval;
705 if (ch_idx != 2) { /* Channels 1,2 can be set only together. */
706 devc->channel_status[ch_idx^1].output_enabled = bval;
707 return lps_cmd_ok(sdi->conn, "OUT%1d", (int)bval);
708 } else { /* Channel 3: No command to disable output, set voltage to 0 instead. */
709 if (bval)
710 return lps_cmd_ok(sdi->conn, "VDD%1.0f", devc->channel_status[ch_idx].output_voltage_max);
711 else
712 return lps_cmd_ok(sdi->conn, "VDD0");
713 }
714 break;
715 default:
716 return SR_ERR_NA;
717 }
41b7bd01
MH
718 }
719
1c3d002b 720 return SR_OK;
41b7bd01
MH
721}
722
584560f1 723static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
41b7bd01
MH
724 const struct sr_channel_group *cg)
725{
1c3d002b
MH
726 struct dev_context *devc;
727 struct sr_channel *ch;
728 int ch_idx, i;
729 GVariant *gvar;
730 GVariantBuilder gvb;
41b7bd01 731
41b7bd01 732 (void)data;
41b7bd01 733
1c3d002b 734 /* Driver options, no device instance necessary. */
41b7bd01 735 switch (key) {
1c3d002b 736 case SR_CONF_SCAN_OPTIONS:
584560f1 737 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
a0e0bb41 738 scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
1c3d002b 739 return SR_OK;
413f1944
AJ
740 case SR_CONF_DEVICE_OPTIONS:
741 if (sdi != NULL)
742 break;
743 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
744 drvopts, ARRAY_SIZE(drvopts), sizeof(uint32_t));
745 return SR_OK;
1c3d002b
MH
746 default:
747 if (sdi == NULL)
748 return SR_ERR_ARG;
749
750 devc = sdi->priv;
751 }
752
584560f1 753 /* Device options, independent from channel groups. */
1c3d002b
MH
754 if (cg == NULL) {
755 switch (key) {
756 case SR_CONF_DEVICE_OPTIONS:
584560f1 757 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
f254bc4b 758 devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
1c3d002b 759 return SR_OK;
a1eaa9e0 760 case SR_CONF_OUTPUT_CHANNEL_CONFIG:
1c3d002b
MH
761 if (devc->model->modelid <= LPS_303) {
762 /* The 1-channel models. */
763 *data = g_variant_new_strv(channel_modes, 1);
764 } else {
765 /* The other models support all modes. */
766 *data = g_variant_new_strv(channel_modes, ARRAY_SIZE(channel_modes));
767 }
768 return SR_OK;
769 break;
770 default:
771 return SR_ERR_NA;
772 }
773 }
774
775 /* Device options, depending on channel groups. */
776 ch = cg->channels->data;
777 ch_idx = ch->index;
778 switch (key) {
779 case SR_CONF_DEVICE_OPTIONS:
780 if ((ch_idx == 0) || (ch_idx == 1)) /* CH1, CH2 */
584560f1 781 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
f254bc4b 782 devopts_ch12, ARRAY_SIZE(devopts_ch12), sizeof(uint32_t));
1c3d002b 783 else /* Must be CH3 */
584560f1 784 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
f254bc4b 785 devopts_ch3, ARRAY_SIZE(devopts_ch3), sizeof(uint32_t));
1c3d002b 786 break;
ca95e90f 787 case SR_CONF_OUTPUT_VOLTAGE_TARGET:
1c3d002b
MH
788 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
789 /* Min, max, step. */
790 for (i = 0; i < 3; i++) {
791 gvar = g_variant_new_double(devc->model->channels[ch_idx].voltage[i]);
792 g_variant_builder_add_value(&gvb, gvar);
793 }
794 *data = g_variant_builder_end(&gvb);
795 break;
ca95e90f 796 case SR_CONF_OUTPUT_CURRENT_LIMIT:
1c3d002b
MH
797 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
798 /* Min, max, step. */
799 for (i = 0; i < 3; i++) {
800 gvar = g_variant_new_double(devc->model->channels[ch_idx].current[i]);
801 g_variant_builder_add_value(&gvb, gvar);
802 }
803 *data = g_variant_builder_end(&gvb);
804 break;
41b7bd01
MH
805 default:
806 return SR_ERR_NA;
807 }
808
1c3d002b 809 return SR_OK;
41b7bd01
MH
810}
811
812static int dev_acquisition_start(const struct sr_dev_inst *sdi,
813 void *cb_data)
814{
1c3d002b
MH
815 struct dev_context *devc;
816 struct sr_serial_dev_inst *serial;
41b7bd01
MH
817
818 if (sdi->status != SR_ST_ACTIVE)
819 return SR_ERR_DEV_CLOSED;
820
1c3d002b
MH
821 devc = sdi->priv;
822
823 devc->acq_running = TRUE;
824
825 serial = sdi->conn;
102f1239
BV
826 serial_source_add(sdi->session, serial, G_IO_IN, 50,
827 motech_lps_30x_receive_data, (void *)sdi);
1c3d002b
MH
828 std_session_send_df_header(cb_data, LOG_PREFIX);
829
830 /* Start timer, if required. */
831 if (devc->limit_msec)
832 g_timer_start(devc->elapsed_msec);
833
834 devc->acq_req = AQ_NONE;
835 /* Do not start polling device here, the read function will do it in 50 ms. */
41b7bd01
MH
836
837 return SR_OK;
838}
839
840static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
841{
1c3d002b 842 struct dev_context *devc;
41b7bd01 843
1c3d002b
MH
844 /* Stop timer, if required. */
845 if (sdi && (devc = sdi->priv) && devc->limit_msec)
846 g_timer_stop(devc->elapsed_msec);
41b7bd01 847
1c3d002b
MH
848 return std_serial_dev_acquisition_stop(sdi, cb_data, std_serial_dev_close,
849 sdi->conn, LOG_PREFIX);
41b7bd01
MH
850}
851
852SR_PRIV struct sr_dev_driver motech_lps_301_driver_info = {
853 .name = "motech-lps-301",
854 .longname = "Motech LPS-301",
855 .api_version = 1,
1c3d002b 856 .init = init_lps301,
41b7bd01 857 .cleanup = cleanup,
1c3d002b
MH
858 .scan = scan_lps301,
859 .dev_list = dev_list_lps301,
860 .dev_clear = dev_clear_lps301,
41b7bd01
MH
861 .config_get = config_get,
862 .config_set = config_set,
863 .config_list = config_list,
1c3d002b
MH
864 .dev_open = std_serial_dev_open,
865 .dev_close = std_serial_dev_close,
41b7bd01
MH
866 .dev_acquisition_start = dev_acquisition_start,
867 .dev_acquisition_stop = dev_acquisition_stop,
868 .priv = NULL,
869};