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