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