]> sigrok.org Git - libsigrok.git/blame_incremental - src/hardware/motech-lps-30x/api.c
projects / libsigrok.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
norma-dmm: Fix blocking serial write timeout.
[libsigrok.git] / src / hardware / motech-lps-30x / api.c
... / ...
CommitLineData
1/*
2 * This file is part of the libsigrok project.
3 *
4 * Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
5 * Copyright (C) 2014 Bert Vermeulen <bert@biot.com> (code from atten-pps3xxx)
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
21/** @file
22 * <em>Motech LPS-30x series</em> power supply driver
23 * @internal
24 */
25
26#include <config.h>
27#include <ctype.h>
28#include <math.h>
29#include <string.h>
30#include "protocol.h"
31
32/* Forward declarations */
33SR_PRIV struct sr_dev_driver motech_lps_301_driver_info;
34SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen);
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);
39
40/* Serial communication parameters */
41#define SERIALCOMM "2400/8n1/dtr=1/rts=1/flow=0"
42
43#define VENDOR_MOTECH "Motech"
44
45/** Driver capabilities generic. */
46static const uint32_t drvopts[] = {
47 /* Device class */
48 SR_CONF_POWER_SUPPLY,
49};
50
51/** Driver scanning options. */
52static const uint32_t scanopts[] = {
53 SR_CONF_CONN,
54 SR_CONF_SERIALCOMM,
55};
56
57/** Hardware capabilities generic. */
58static const uint32_t devopts[] = {
59 /* Device class */
60 SR_CONF_POWER_SUPPLY,
61 /* Acquisition modes. */
62 SR_CONF_CONTINUOUS,
63 SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
64 SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
65 /* Device configuration */
66 SR_CONF_CHANNEL_CONFIG | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
67};
68
69/** Hardware capabilities channel 1, 2. */
70static const uint32_t devopts_ch12[] = {
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,
76};
77
78/** Hardware capabilities channel 3. (LPS-304/305 only). */
79static const uint32_t devopts_ch3[] = {
80 SR_CONF_VOLTAGE | SR_CONF_GET,
81 SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
82};
83
84static const char *channel_modes[] = {
85 "Independent",
86 "Track1",
87 "Track2",
88};
89
90static const struct lps_modelspec models[] = {
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};
135
136static int init_lps301(struct sr_dev_driver *di, struct sr_context *sr_ctx)
137{
138 return std_init(sr_ctx, di, LOG_PREFIX);
139}
140
141/** Send command to device with va_list.
142 */
143SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char *fmt, va_list args)
144{
145 int retc;
146 char auxfmt[LINELEN_MAX];
147 char buf[LINELEN_MAX];
148
149 snprintf(auxfmt, sizeof(auxfmt), "%s\r\n", fmt);
150 vsnprintf(buf, sizeof(buf), auxfmt, args);
151
152 sr_spew("lps_send_va: \"%s\"", buf);
153
154 retc = serial_write_blocking(serial, buf, strlen(buf), 0);
155
156 if (retc < 0)
157 return SR_ERR;
158
159 return SR_OK;
160}
161
162/** Send command to device.
163 */
164SR_PRIV int lps_send_req(struct sr_serial_dev_inst *serial, const char *fmt, ...)
165{
166 int retc;
167 va_list args;
168
169 va_start(args, fmt);
170 retc = lps_send_va(serial, fmt, args);
171 va_end(args);
172
173 return retc;
174}
175
176/** Send command and consume simple OK reply. */
177SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...)
178{
179 int retc;
180 va_list args;
181 char buf[LINELEN_MAX];
182 char *bufptr;
183 int buflen;
184
185 /* Send command */
186 va_start(args, fmt);
187 retc = lps_send_va(serial, fmt, args);
188 va_end(args);
189
190 if (retc != SR_OK)
191 return SR_ERR;
192
193 /* Read reply */
194 buf[0] = '\0';
195 bufptr = buf;
196 buflen = sizeof(buf);
197 retc = lps_read_reply(serial, &bufptr, &buflen);
198 if ((retc == SR_OK) && (buflen == 0))
199 return SR_OK;
200
201 return SR_ERR;
202}
203
204/** Send command and read reply string.
205 * @param reply Pointer to buffer of size LINELEN_MAX. Will be NUL-terminated.
206 */
207SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...)
208{
209 int retc;
210 va_list args;
211 char buf[LINELEN_MAX];
212 char *bufptr;
213 int buflen;
214
215 reply[0] = '\0';
216
217 /* Send command */
218 va_start(args, fmt);
219 retc = lps_send_va(serial, fmt, args);
220 va_end(args);
221
222 if (retc != SR_OK)
223 return SR_ERR;
224
225 /* Read reply */
226 buf[0] = '\0';
227 bufptr = buf;
228 buflen = sizeof(buf);
229 retc = lps_read_reply(serial, &bufptr, &buflen);
230 if ((retc == SR_OK) && (buflen > 0)) {
231 strcpy(reply, buf);
232 return SR_OK;
233 }
234
235 return SR_ERR;
236}
237
238/** Process integer value returned by STATUS command. */
239SR_PRIV int lps_process_status(struct sr_dev_inst *sdi, int stat)
240{
241 struct dev_context *devc;
242 int tracking_mode;
243
244 devc = (struct dev_context *)sdi->priv;
245
246 sr_spew("Status: %d", stat);
247 devc->channel_status[0].cc_mode = (stat & 0x01) != 0;
248 sr_spew("Channel 1 %s mode", devc->channel_status[0].cc_mode?"CC":"CV");
249 if (devc->model->num_channels > 1) {
250 devc->channel_status[1].cc_mode = (stat & 0x02) != 0;
251 sr_spew("Channel 2 %s mode", devc->channel_status[1].cc_mode?"CC":"CV");
252
253 tracking_mode = (stat & 0x0c) >> 2;
254 switch (tracking_mode) {
255 case 0: devc->tracking_mode = 0;
256 break;
257 case 2: devc->tracking_mode = 1;
258 break;
259 case 3: devc->tracking_mode = 2;
260 break;
261 default:
262 sr_err("Illegal channel tracking mode %d!", tracking_mode);
263 devc->tracking_mode = 0;
264 break;
265 }
266
267 sr_spew("Channel tracking: %d", devc->tracking_mode);
268 }
269 devc->channel_status[0].output_enabled = devc->channel_status[1].output_enabled = stat&0x040?TRUE:FALSE;
270 sr_spew("Channel 1%s output: %s", devc->model->num_channels > 1?"+2":"", devc->channel_status[0].output_enabled?"ON":"OFF");
271 if (devc->model->num_channels > 2) {
272 devc->channel_status[2].output_enabled = stat&0x010?TRUE:FALSE;
273 devc->channel_status[2].output_voltage_last = stat&0x020?3.3:5;
274 sr_spew("Channel 3 output: %s, U=%02f V, overload=%d",
275 devc->channel_status[2].output_enabled?"ON":"OFF",
276 devc->channel_status[2].output_voltage_last,
277 stat&0x080?1:0);
278 }
279 sr_spew("Fan=%d, beep=%d, CC output compensated=%d", stat&0x0100?1:0, stat&0x0200?1:0, stat&0x0400?1:0);
280
281 return SR_OK;
282}
283
284/** Send STATUS commend and process status string. */
285SR_PRIV int lps_query_status(struct sr_dev_inst *sdi)
286{
287 char buf[LINELEN_MAX];
288 int stat, ret;
289 struct dev_context *devc;
290
291 devc = (struct dev_context *)sdi->priv;
292
293 devc->req_sent_at = g_get_real_time();
294
295 if ((ret = lps_cmd_reply(buf, sdi->conn, "STATUS")) < 0) {
296 sr_err("%s: Failed to read status: %s.", __func__,
297 sr_strerror(ret));
298 return SR_ERR;
299 }
300
301 if (sr_atoi(buf, &stat) != SR_OK)
302 return SR_ERR;
303
304 return lps_process_status(sdi, stat);
305}
306
307static gint64 calc_timeout_ms(gint64 start_us)
308{
309 gint64 result = REQ_TIMEOUT_MS - ((g_get_real_time() - start_us) / 1000);
310
311 if (result < 0)
312 return 0;
313
314 return result;
315}
316
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)
322{
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 }
348
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 }
367
368 return SR_ERR; /* Timeout! */
369}
370
371/** Scan for LPS-300 series device.
372 */
373static GSList *do_scan(lps_modelid modelid, struct sr_dev_driver *drv, GSList *options)
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, ret;
384 gchar buf[LINELEN_MAX];
385 gchar channel[10];
386 char *verstr;
387
388 sdi = NULL;
389 devc = NULL;
390 conn = serialcomm = NULL;
391 devices = NULL;
392
393 drvc = drv->context;
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. */
405 serial = sr_serial_dev_inst_new(conn, serialcomm);
406
407 if (serial_open(serial, SERIAL_RDWR) != SR_OK)
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 }
434 }
435
436 /* Query version */
437 verstr = NULL;
438 if ((ret = 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 g_strstrip(buf);
445 verstr = buf + 4;
446 }
447 else /* Bug in device FW 1.17: Querying version string fails while output is active.
448 Therefore just print an error message, but do not exit with error. */
449 sr_err("Failed to query for hardware version: %s.",
450 sr_strerror(ret));
451
452 sdi = g_malloc0(sizeof(struct sr_dev_inst));
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);
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);
473 ch = sr_channel_new(sdi, cnt, SR_CHANNEL_ANALOG, TRUE, channel);
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 g_free(devc);
507 if (sdi)
508 sr_dev_inst_free(sdi);
509
510 return NULL;
511}
512
513/** Scan for LPS-301 device. */
514static GSList *scan_lps301(struct sr_dev_driver *di, GSList *options)
515{
516 return do_scan(LPS_301, di, options);
517}
518
519static GSList *dev_list_lps301(const struct sr_dev_driver *di)
520{
521 return ((struct drv_context *)(di->context))->instances;
522}
523
524static void dev_clear_private(struct dev_context *devc)
525{
526 int ch_idx;
527
528 /* Free channel_status.info (list only, data owned by sdi). */
529 for (ch_idx = 0; ch_idx < devc->model->num_channels; ch_idx++)
530 g_slist_free(devc->channel_status[ch_idx].info);
531
532 g_timer_destroy(devc->elapsed_msec);
533}
534
535static int dev_clear_lps301(const struct sr_dev_driver *di)
536{
537 return std_dev_clear(di, (std_dev_clear_callback)dev_clear_private);
538}
539
540static int cleanup(const struct sr_dev_driver *di)
541{
542 return dev_clear_lps301(di);
543}
544
545static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
546 const struct sr_channel_group *cg)
547{
548 struct dev_context *devc;
549 struct sr_channel *ch;
550 int ch_idx;
551
552 if (!sdi)
553 return SR_ERR_ARG;
554
555 devc = sdi->priv;
556
557 if (!cg) {
558 /* No channel group: global options. */
559 switch (key) {
560 case SR_CONF_LIMIT_SAMPLES:
561 *data = g_variant_new_uint64(devc->limit_samples);
562 break;
563 case SR_CONF_LIMIT_MSEC:
564 *data = g_variant_new_uint64(devc->limit_msec);
565 break;
566 case SR_CONF_CHANNEL_CONFIG:
567 *data = g_variant_new_string(channel_modes[devc->tracking_mode]);
568 break;
569 default:
570 return SR_ERR_NA;
571 }
572 } else {
573 /* We only ever have one channel per channel group in this driver. */
574 ch = cg->channels->data;
575 ch_idx = ch->index;
576 switch (key) {
577 case SR_CONF_VOLTAGE:
578 *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_last);
579 break;
580 case SR_CONF_VOLTAGE_TARGET:
581 *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_max);
582 break;
583 case SR_CONF_CURRENT:
584 *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_last);
585 break;
586 case SR_CONF_CURRENT_LIMIT:
587 *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_max);
588 break;
589 case SR_CONF_ENABLED:
590 *data = g_variant_new_boolean(devc->channel_status[ch_idx].output_enabled);
591 break;
592 default:
593 return SR_ERR_NA;
594 }
595 }
596
597 return SR_OK;
598}
599
600static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi,
601 const struct sr_channel_group *cg)
602{
603 struct dev_context *devc;
604 struct sr_channel *ch;
605 gdouble dval;
606 int ch_idx;
607 const char *sval;
608 gboolean bval;
609 int idx;
610 gboolean found;
611
612 if (sdi->status != SR_ST_ACTIVE)
613 return SR_ERR_DEV_CLOSED;
614
615 devc = sdi->priv;
616
617 /* Cannot change settings while acquisition active, would cause a mess with commands.
618 * Changing this would be possible, but tricky. */
619 if (devc->acq_running)
620 return SR_ERR_NA;
621
622 if (!cg) {
623 /* No channel group: global options. */
624 switch (key) {
625 case SR_CONF_LIMIT_MSEC:
626 devc->limit_msec = g_variant_get_uint64(data);
627 break;
628 case SR_CONF_LIMIT_SAMPLES:
629 devc->limit_samples = g_variant_get_uint64(data);
630 break;
631 case SR_CONF_CHANNEL_CONFIG:
632 sval = g_variant_get_string(data, NULL);
633 found = FALSE;
634 for (idx = 0; idx < (int)ARRAY_SIZE(channel_modes); idx++) {
635 if (!strcmp(sval, channel_modes[idx])) {
636 found = TRUE;
637 if (devc->tracking_mode == idx)
638 break; /* Nothing to do! */
639 devc->tracking_mode = idx;
640 if (devc->model->modelid >= LPS_304) /* No use to set anything in the smaller models. */
641 return lps_cmd_ok(sdi->conn, "TRACK%1d", devc->tracking_mode);
642 }
643 if (devc->model->modelid <= LPS_303) /* Only first setting possible for smaller models. */
644 break;
645 }
646 if (!found)
647 return SR_ERR_ARG;
648 break;
649 default:
650 return SR_ERR_NA;
651 }
652 } else {
653 /* Channel group specified: per-channel options. */
654 /* We only ever have one channel per channel group in this driver. */
655 ch = cg->channels->data;
656 ch_idx = ch->index;
657
658 switch (key) {
659 case SR_CONF_VOLTAGE_TARGET:
660 dval = g_variant_get_double(data);
661 if (dval < 0 || dval > devc->model->channels[ch_idx].voltage[1])
662 return SR_ERR_ARG;
663 if (ch_idx == 2) {
664 if (devc->model->modelid < LPS_304)
665 return SR_ERR_ARG;
666
667 if (fabs(dval - 5.000) <= 0.001)
668 dval = 5.0;
669 else if ((devc->model->modelid >= LPS_305) && (fabs(dval - 3.300) <= 0.001))
670 dval = 3.3;
671 else return SR_ERR_ARG;
672 }
673
674 devc->channel_status[ch_idx].output_voltage_max = dval;
675 if (ch_idx == 2)
676 return lps_cmd_ok(sdi->conn, "VDD%1.0f", trunc(dval));
677 else
678 return lps_cmd_ok(sdi->conn, "VSET%d %05.3f", ch_idx+1, dval);
679 break;
680 case SR_CONF_CURRENT_LIMIT:
681 dval = g_variant_get_double(data);
682 if (dval < 0 || dval > devc->model->channels[ch_idx].current[1])
683 return SR_ERR_ARG;
684 if (ch_idx == 2) /* No current setting for CH3. */
685 return SR_ERR_NA;
686 devc->channel_status[ch_idx].output_current_max = dval;
687 return lps_cmd_ok(sdi->conn, "ISET%d %05.4f", ch_idx+1, dval);
688 break;
689 case SR_CONF_ENABLED:
690 bval = g_variant_get_boolean(data);
691 if (bval == devc->channel_status[ch_idx].output_enabled) /* Nothing to do. */
692 break;
693 devc->channel_status[ch_idx].output_enabled = bval;
694 if (ch_idx != 2) { /* Channels 1,2 can be set only together. */
695 devc->channel_status[ch_idx^1].output_enabled = bval;
696 return lps_cmd_ok(sdi->conn, "OUT%1d", (int)bval);
697 } else { /* Channel 3: No command to disable output, set voltage to 0 instead. */
698 if (bval)
699 return lps_cmd_ok(sdi->conn, "VDD%1.0f", devc->channel_status[ch_idx].output_voltage_max);
700 else
701 return lps_cmd_ok(sdi->conn, "VDD0");
702 }
703 break;
704 default:
705 return SR_ERR_NA;
706 }
707 }
708
709 return SR_OK;
710}
711
712static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
713 const struct sr_channel_group *cg)
714{
715 struct dev_context *devc;
716 struct sr_channel *ch;
717 int ch_idx, i;
718 GVariant *gvar;
719 GVariantBuilder gvb;
720
721 /* Driver options, no device instance necessary. */
722 switch (key) {
723 case SR_CONF_SCAN_OPTIONS:
724 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
725 scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
726 return SR_OK;
727 case SR_CONF_DEVICE_OPTIONS:
728 if (sdi != NULL)
729 break;
730 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
731 drvopts, ARRAY_SIZE(drvopts), sizeof(uint32_t));
732 return SR_OK;
733 default:
734 if (!sdi)
735 return SR_ERR_ARG;
736 devc = sdi->priv;
737 break;
738 }
739
740 /* Device options, independent from channel groups. */
741 if (!cg) {
742 switch (key) {
743 case SR_CONF_DEVICE_OPTIONS:
744 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
745 devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
746 return SR_OK;
747 case SR_CONF_CHANNEL_CONFIG:
748 if (devc->model->modelid <= LPS_303) {
749 /* The 1-channel models. */
750 *data = g_variant_new_strv(channel_modes, 1);
751 } else {
752 /* The other models support all modes. */
753 *data = g_variant_new_strv(channel_modes, ARRAY_SIZE(channel_modes));
754 }
755 return SR_OK;
756 default:
757 return SR_ERR_NA;
758 }
759 }
760
761 /* Device options, depending on channel groups. */
762 ch = cg->channels->data;
763 ch_idx = ch->index;
764 switch (key) {
765 case SR_CONF_DEVICE_OPTIONS:
766 if ((ch_idx == 0) || (ch_idx == 1)) /* CH1, CH2 */
767 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
768 devopts_ch12, ARRAY_SIZE(devopts_ch12), sizeof(uint32_t));
769 else /* Must be CH3 */
770 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
771 devopts_ch3, ARRAY_SIZE(devopts_ch3), sizeof(uint32_t));
772 break;
773 case SR_CONF_VOLTAGE_TARGET:
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].voltage[i]);
778 g_variant_builder_add_value(&gvb, gvar);
779 }
780 *data = g_variant_builder_end(&gvb);
781 break;
782 case SR_CONF_CURRENT_LIMIT:
783 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
784 /* Min, max, step. */
785 for (i = 0; i < 3; i++) {
786 gvar = g_variant_new_double(devc->model->channels[ch_idx].current[i]);
787 g_variant_builder_add_value(&gvb, gvar);
788 }
789 *data = g_variant_builder_end(&gvb);
790 break;
791 default:
792 return SR_ERR_NA;
793 }
794
795 return SR_OK;
796}
797
798static int dev_acquisition_start(const struct sr_dev_inst *sdi, void *cb_data)
799{
800 struct dev_context *devc;
801 struct sr_serial_dev_inst *serial;
802
803 if (sdi->status != SR_ST_ACTIVE)
804 return SR_ERR_DEV_CLOSED;
805
806 devc = sdi->priv;
807
808 devc->acq_running = TRUE;
809
810 serial = sdi->conn;
811 serial_source_add(sdi->session, serial, G_IO_IN, 50,
812 motech_lps_30x_receive_data, (void *)sdi);
813 std_session_send_df_header(cb_data, LOG_PREFIX);
814
815 /* Start timer, if required. */
816 if (devc->limit_msec)
817 g_timer_start(devc->elapsed_msec);
818
819 devc->acq_req = AQ_NONE;
820 /* Do not start polling device here, the read function will do it in 50 ms. */
821
822 return SR_OK;
823}
824
825static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
826{
827 struct dev_context *devc;
828
829 /* Stop timer, if required. */
830 if (sdi && (devc = sdi->priv) && devc->limit_msec)
831 g_timer_stop(devc->elapsed_msec);
832
833 return std_serial_dev_acquisition_stop(sdi, cb_data, std_serial_dev_close,
834 sdi->conn, LOG_PREFIX);
835}
836
837SR_PRIV struct sr_dev_driver motech_lps_301_driver_info = {
838 .name = "motech-lps-301",
839 .longname = "Motech LPS-301",
840 .api_version = 1,
841 .init = init_lps301,
842 .cleanup = cleanup,
843 .scan = scan_lps301,
844 .dev_list = dev_list_lps301,
845 .dev_clear = dev_clear_lps301,
846 .config_get = config_get,
847 .config_set = config_set,
848 .config_list = config_list,
849 .dev_open = std_serial_dev_open,
850 .dev_close = std_serial_dev_close,
851 .dev_acquisition_start = dev_acquisition_start,
852 .dev_acquisition_stop = dev_acquisition_stop,
853 .context = NULL,
854};
Hardware access and backend lib