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