2 * This file is part of the libsigrok project.
4 * Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
5 * Copyright (C) 2014 Bert Vermeulen <bert@biot.com> (code from atten-pps3xxx)
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.
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.
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/>.
27 SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen);
28 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char *fmt, va_list args);
29 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...);
30 SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...);
31 SR_PRIV int lps_query_status(struct sr_dev_inst *sdi);
33 #define SERIALCOMM "2400/8n1/dtr=1/rts=1/flow=0"
35 static const uint32_t scanopts[] = {
40 static const uint32_t drvopts[] = {
44 static const uint32_t devopts[] = {
46 SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
47 SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
48 SR_CONF_CHANNEL_CONFIG | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
51 /** Hardware capabilities channel 1, 2. */
52 static const uint32_t devopts_cg_ch12[] = {
53 SR_CONF_VOLTAGE | SR_CONF_GET,
54 SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
55 SR_CONF_CURRENT | SR_CONF_GET,
56 SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
57 SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
60 /** Hardware capabilities channel 3 (LPS-304/305 only). */
61 static const uint32_t devopts_cg_ch3[] = {
62 SR_CONF_VOLTAGE | SR_CONF_GET,
63 SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
66 static const char *channel_modes[] = {
72 static const struct lps_modelspec models[] = {
73 { LPS_UNKNOWN, "Dummy", 0,
78 { LPS_301, "LPS-301", 1,
81 { { 0, 32, 0.01 }, { 0.005, 2, 0.001 } },
84 { LPS_302, "LPS-302", 1,
87 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
90 { LPS_303, "LPS-303", 1,
93 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
96 { LPS_304, "LPS-304", 3,
99 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
101 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
103 { { 5, 5, 0.0 }, { 0.005, 3, 0.001 } },
106 { LPS_305, "LPS-305", 3,
109 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
111 { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
113 { { 3.3, 5, 1.7 }, { 0.005, 3, 0.001 } },
118 /** Send command to device with va_list. */
119 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char *fmt, va_list args)
122 char auxfmt[LINELEN_MAX];
123 char buf[LINELEN_MAX];
125 snprintf(auxfmt, sizeof(auxfmt), "%s\r\n", fmt);
126 vsnprintf(buf, sizeof(buf), auxfmt, args);
128 sr_spew("lps_send_va: \"%s\"", buf);
130 retc = serial_write_blocking(serial, buf, strlen(buf),
131 serial_timeout(serial, strlen(buf)));
139 /** Send command to device. */
140 SR_PRIV int lps_send_req(struct sr_serial_dev_inst *serial, const char *fmt, ...)
146 retc = lps_send_va(serial, fmt, args);
152 /** Send command and consume simple OK reply. */
153 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...)
157 char buf[LINELEN_MAX];
163 retc = lps_send_va(serial, fmt, args);
172 buflen = sizeof(buf);
173 retc = lps_read_reply(serial, &bufptr, &buflen);
174 if ((retc == SR_OK) && (buflen == 0))
181 * Send command and read reply string.
182 * @param reply Pointer to buffer of size LINELEN_MAX. Will be NUL-terminated.
184 SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...)
188 char buf[LINELEN_MAX];
196 retc = lps_send_va(serial, fmt, args);
205 buflen = sizeof(buf);
206 retc = lps_read_reply(serial, &bufptr, &buflen);
207 if ((retc == SR_OK) && (buflen > 0)) {
215 /** Process integer value returned by STATUS command. */
216 SR_PRIV int lps_process_status(struct sr_dev_inst *sdi, int stat)
218 struct dev_context *devc;
223 sr_spew("Status: %d", stat);
224 devc->channel_status[0].cc_mode = (stat & 0x01) != 0;
225 sr_spew("Channel 1 %s mode", devc->channel_status[0].cc_mode?"CC":"CV");
226 if (devc->model->num_channels > 1) {
227 devc->channel_status[1].cc_mode = (stat & 0x02) != 0;
228 sr_spew("Channel 2 %s mode", devc->channel_status[1].cc_mode?"CC":"CV");
230 tracking_mode = (stat & 0x0c) >> 2;
231 switch (tracking_mode) {
232 case 0: devc->tracking_mode = 0;
234 case 2: devc->tracking_mode = 1;
236 case 3: devc->tracking_mode = 2;
239 sr_err("Illegal channel tracking mode %d!", tracking_mode);
240 devc->tracking_mode = 0;
244 sr_spew("Channel tracking: %d", devc->tracking_mode);
246 devc->channel_status[0].output_enabled = devc->channel_status[1].output_enabled = stat&0x040?TRUE:FALSE;
247 sr_spew("Channel 1%s output: %s", devc->model->num_channels > 1?"+2":"", devc->channel_status[0].output_enabled?"ON":"OFF");
248 if (devc->model->num_channels > 2) {
249 devc->channel_status[2].output_enabled = stat&0x010?TRUE:FALSE;
250 devc->channel_status[2].output_voltage_last = stat&0x020?3.3:5;
251 sr_spew("Channel 3 output: %s, U=%02f V, overload=%d",
252 devc->channel_status[2].output_enabled?"ON":"OFF",
253 devc->channel_status[2].output_voltage_last,
256 sr_spew("Fan=%d, beep=%d, CC output compensated=%d", stat&0x0100?1:0, stat&0x0200?1:0, stat&0x0400?1:0);
261 /** Send STATUS commend and process status string. */
262 SR_PRIV int lps_query_status(struct sr_dev_inst *sdi)
264 char buf[LINELEN_MAX];
266 struct dev_context *devc;
270 devc->req_sent_at = g_get_real_time();
272 if ((ret = lps_cmd_reply(buf, sdi->conn, "STATUS")) < 0) {
273 sr_err("%s: Failed to read status: %s.", __func__,
278 if (sr_atoi(buf, &stat) != SR_OK)
281 return lps_process_status(sdi, stat);
284 static gint64 calc_timeout_ms(gint64 start_us)
286 gint64 result = REQ_TIMEOUT_MS - ((g_get_real_time() - start_us) / 1000);
295 * Read message into buf until "OK" received.
297 * @retval SR_OK Msg received; buf and buflen contain result, if any except OK.
298 * @retval SR_ERR Error, including timeout.
300 SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen)
303 char buf2[LINELEN_MAX];
306 gint64 timeout_start;
310 /* Read one line. It is either a data message or "OK". */
311 timeout_start = g_get_real_time();
313 /* Up to 5 tries because serial_readline() will consume only one CR or LF per
314 * call, but device sends up to 4 in a row. */
315 for (retries = 0; retries < 5; retries++) {
317 if (serial_readline(serial, buf, buflen, calc_timeout_ms(timeout_start)) != SR_OK)
319 if (!strcmp(*buf, "OK")) { /* We got an OK! */
324 if (*buflen > 0) /* We got a msg! */
328 /* A data msg is in buf (possibly ERROR), need to consume "OK". */
331 for (retries = 0; retries < 5; retries++) {
332 buf2len = sizeof(buf2);
333 if (serial_readline(serial, &buf2ptr, &buf2len, calc_timeout_ms(timeout_start)) != SR_OK)
336 if (!strcmp(buf2ptr, "OK")) { /* We got an OK! */
337 if (!strcmp(*buf, "ERROR")) { /* OK came after msg ERROR! */
338 sr_spew("ERROR found!");
347 return SR_ERR; /* Timeout! */
350 /** Scan for LPS-300 series device. */
351 static GSList *do_scan(lps_modelid modelid, struct sr_dev_driver *drv, GSList *options)
353 struct sr_dev_inst *sdi;
354 struct dev_context *devc;
355 struct sr_serial_dev_inst *serial;
356 struct sr_channel *ch;
357 struct sr_channel_group *cg;
358 const char *conn, *serialcomm;
360 gchar buf[LINELEN_MAX];
366 conn = serialcomm = NULL;
368 /* Process and check options. */
369 if (sr_serial_extract_options(options, &conn, &serialcomm) != SR_OK)
372 serialcomm = SERIALCOMM;
374 /* Init serial port. */
375 serial = sr_serial_dev_inst_new(conn, serialcomm);
377 if (serial_open(serial, SERIAL_RDWR) != SR_OK)
380 /* Query and verify model string. */
381 serial_flush(serial);
382 if (lps_cmd_reply(buf, serial, "MODEL") != SR_OK)
385 /* Check model string. */
386 if (strncmp(buf, "LPS-", 4)) {
387 sr_spew("Unknown model code \"%s\"!", buf);
391 /* Bug in device FW 1.17, model number is empty, so this can't work with this FW! */
392 if (modelid == LPS_UNKNOWN) {
394 for (cnt = LPS_301; cnt <= LPS_305; cnt++) {
395 if (!strcmp(buf, models[cnt].modelstr)) {
400 if (modelid == LPS_UNKNOWN) {
401 sr_err("Unable to detect model from model string '%s'!", buf);
408 if ((ret = lps_cmd_reply(buf, serial, "VERSION")) == SR_OK) {
409 if (strncmp(buf, "Ver-", 4)) {
410 sr_spew("Version string %s not recognized.", buf);
417 else /* Bug in device FW 1.17: Querying version string fails while output is active.
418 Therefore just print an error message, but do not exit with error. */
419 sr_err("Failed to query for hardware version: %s.",
422 sdi = g_malloc0(sizeof(struct sr_dev_inst));
423 sdi->status = SR_ST_INACTIVE;
424 sdi->vendor = g_strdup("Motech");
425 sdi->model = g_strdup(models[modelid].modelstr);
426 sdi->version = g_strdup(verstr);
427 sdi->inst_type = SR_INST_SERIAL;
430 devc = g_malloc0(sizeof(struct dev_context));
431 sr_sw_limits_init(&devc->limits);
432 devc->model = &models[modelid];
436 /* Setup channels and channel groups. */
437 for (cnt = 0; cnt < models[modelid].num_channels; cnt++) {
438 snprintf(channel, sizeof(channel), "CH%d", cnt + 1);
439 ch = sr_channel_new(sdi, cnt, SR_CHANNEL_ANALOG, TRUE, channel);
441 devc->channel_status[cnt].info = g_slist_append(NULL, ch);
443 cg = g_malloc(sizeof(struct sr_channel_group));
444 snprintf(channel, sizeof(channel), "CG%d", cnt+1);
445 cg->name = g_strdup(channel);
447 cg->channels = g_slist_append(NULL, ch);
449 sdi->channel_groups = g_slist_append(sdi->channel_groups, cg);
453 if (lps_query_status(sdi) != SR_OK)
456 serial_close(serial);
458 return std_scan_complete(drv, g_slist_append(NULL, sdi));
461 sr_info("%s: Error!", __func__);
464 serial_close(serial);
465 sr_serial_dev_inst_free(serial);
467 sr_dev_inst_free(sdi);
472 /** Scan for LPS-301 device. */
473 static GSList *scan_lps301(struct sr_dev_driver *di, GSList *options)
475 return do_scan(LPS_301, di, options);
478 static void clear_helper(struct dev_context *devc)
482 /* Free channel_status.info (list only, data owned by sdi). */
483 for (ch_idx = 0; ch_idx < devc->model->num_channels; ch_idx++)
484 g_slist_free(devc->channel_status[ch_idx].info);
487 static int dev_clear(const struct sr_dev_driver *di)
489 return std_dev_clear_with_callback(di, (std_dev_clear_callback)clear_helper);
492 static int config_get(uint32_t key, GVariant **data,
493 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
495 struct dev_context *devc;
496 struct sr_channel *ch;
506 case SR_CONF_LIMIT_SAMPLES:
507 case SR_CONF_LIMIT_MSEC:
508 return sr_sw_limits_config_get(&devc->limits, key, data);
509 case SR_CONF_CHANNEL_CONFIG:
510 *data = g_variant_new_string(channel_modes[devc->tracking_mode]);
516 /* We only ever have one channel per channel group in this driver. */
517 ch = cg->channels->data;
521 case SR_CONF_VOLTAGE:
522 *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_last);
524 case SR_CONF_VOLTAGE_TARGET:
525 *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_max);
527 case SR_CONF_CURRENT:
528 *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_last);
530 case SR_CONF_CURRENT_LIMIT:
531 *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_max);
533 case SR_CONF_ENABLED:
534 *data = g_variant_new_boolean(devc->channel_status[ch_idx].output_enabled);
544 static int config_set(uint32_t key, GVariant *data,
545 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
547 struct dev_context *devc;
548 struct sr_channel *ch;
556 /* Cannot change settings while acquisition active, would cause a mess with commands.
557 * Changing this would be possible, but tricky. */
558 if (devc->acq_running)
563 case SR_CONF_LIMIT_MSEC:
564 case SR_CONF_LIMIT_SAMPLES:
565 return sr_sw_limits_config_set(&devc->limits, key, data);
566 case SR_CONF_CHANNEL_CONFIG:
567 if ((idx = std_str_idx(data, ARRAY_AND_SIZE(channel_modes))) < 0)
569 if (devc->model->modelid <= LPS_303 && idx != 0)
570 break; /* Only first setting possible for smaller models. */
571 if (devc->tracking_mode == idx)
572 break; /* Nothing to do! */
573 devc->tracking_mode = idx;
574 if (devc->model->modelid >= LPS_304) /* No use to set anything in the smaller models. */
575 return lps_cmd_ok(sdi->conn, "TRACK%1d", devc->tracking_mode);
581 /* We only ever have one channel per channel group in this driver. */
582 ch = cg->channels->data;
586 case SR_CONF_VOLTAGE_TARGET:
587 dval = g_variant_get_double(data);
588 if (dval < 0 || dval > devc->model->channels[ch_idx].voltage[1])
591 if (devc->model->modelid < LPS_304)
594 if (fabs(dval - 5.000) <= 0.001)
596 else if ((devc->model->modelid >= LPS_305) && (fabs(dval - 3.300) <= 0.001))
598 else return SR_ERR_ARG;
601 devc->channel_status[ch_idx].output_voltage_max = dval;
603 return lps_cmd_ok(sdi->conn, "VDD%1.0f", trunc(dval));
605 return lps_cmd_ok(sdi->conn, "VSET%d %05.3f", ch_idx+1, dval);
607 case SR_CONF_CURRENT_LIMIT:
608 dval = g_variant_get_double(data);
609 if (dval < 0 || dval > devc->model->channels[ch_idx].current[1])
611 if (ch_idx == 2) /* No current setting for CH3. */
613 devc->channel_status[ch_idx].output_current_max = dval;
614 return lps_cmd_ok(sdi->conn, "ISET%d %05.4f", ch_idx+1, dval);
615 case SR_CONF_ENABLED:
616 bval = g_variant_get_boolean(data);
617 if (bval == devc->channel_status[ch_idx].output_enabled) /* Nothing to do. */
619 devc->channel_status[ch_idx].output_enabled = bval;
620 if (ch_idx != 2) { /* Channels 1,2 can be set only together. */
621 devc->channel_status[ch_idx^1].output_enabled = bval;
622 return lps_cmd_ok(sdi->conn, "OUT%1d", (int)bval);
623 } else { /* Channel 3: No command to disable output, set voltage to 0 instead. */
625 return lps_cmd_ok(sdi->conn, "VDD%1.0f", devc->channel_status[ch_idx].output_voltage_max);
627 return lps_cmd_ok(sdi->conn, "VDD0");
638 static int config_list(uint32_t key, GVariant **data,
639 const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
641 struct dev_context *devc;
642 struct sr_channel *ch;
645 devc = (sdi) ? sdi->priv : NULL;
649 case SR_CONF_SCAN_OPTIONS:
650 case SR_CONF_DEVICE_OPTIONS:
651 return STD_CONFIG_LIST(key, data, sdi, cg, scanopts, drvopts, devopts);
652 case SR_CONF_CHANNEL_CONFIG:
653 if (!devc || !devc->model)
655 if (devc->model->modelid <= LPS_303) {
656 /* The 1-channel models. */
657 *data = g_variant_new_strv(channel_modes, 1);
659 /* The other models support all modes. */
660 *data = g_variant_new_strv(ARRAY_AND_SIZE(channel_modes));
668 /* We only ever have one channel per channel group in this driver. */
669 ch = cg->channels->data;
673 case SR_CONF_DEVICE_OPTIONS:
674 if ((ch_idx == 0) || (ch_idx == 1)) /* CH1, CH2 */
675 *data = std_gvar_array_u32(ARRAY_AND_SIZE(devopts_cg_ch12));
676 else /* Must be CH3 */
677 *data = std_gvar_array_u32(ARRAY_AND_SIZE(devopts_cg_ch3));
679 case SR_CONF_VOLTAGE_TARGET:
680 if (!devc || !devc->model)
682 *data = std_gvar_min_max_step_array(devc->model->channels[ch_idx].voltage);
684 case SR_CONF_CURRENT_LIMIT:
685 if (!devc || !devc->model)
687 *data = std_gvar_min_max_step_array(devc->model->channels[ch_idx].current);
696 static int dev_acquisition_start(const struct sr_dev_inst *sdi)
698 struct dev_context *devc;
699 struct sr_serial_dev_inst *serial;
703 devc->acq_running = TRUE;
706 serial_source_add(sdi->session, serial, G_IO_IN, 50,
707 motech_lps_30x_receive_data, (void *)sdi);
708 std_session_send_df_header(sdi);
710 sr_sw_limits_acquisition_start(&devc->limits);
712 devc->acq_req = AQ_NONE;
713 /* Do not start polling device here, the read function will do it in 50 ms. */
718 static struct sr_dev_driver motech_lps_301_driver_info = {
719 .name = "motech-lps-301",
720 .longname = "Motech LPS-301",
723 .cleanup = std_cleanup,
725 .dev_list = std_dev_list,
726 .dev_clear = dev_clear,
727 .config_get = config_get,
728 .config_set = config_set,
729 .config_list = config_list,
730 .dev_open = std_serial_dev_open,
731 .dev_close = std_serial_dev_close,
732 .dev_acquisition_start = dev_acquisition_start,
733 .dev_acquisition_stop = std_serial_dev_acquisition_stop,
736 SR_REGISTER_DEV_DRIVER(motech_lps_301_driver_info);