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 <ctype.h>
  27 #include <math.h>
  28 #include <string.h>
  29 #include "protocol.h"
  30
  31 /* Forward declarations */
  32 SR_PRIV struct sr_dev_driver motech_lps_301_driver_info;
  33 SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen);
  34 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char *fmt, va_list args);
  35 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...);
  36 SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...);
  37 SR_PRIV int lps_query_status(struct sr_dev_inst *sdi);
  38
  39 /* Serial communication parameters */
  40 #define SERIALCOMM "2400/8n1/dtr=1/rts=1/flow=0"
  41
  42 #define VENDOR_MOTECH "Motech"
  43
  44 /** Driver capabilities generic. */
  45 static const uint32_t drvopts[] = {
  46         /* Device class */
  47         SR_CONF_POWER_SUPPLY,
  48 };
  49
  50 /** Driver scanning options. */
  51 static const uint32_t scanopts[] = {
  52         SR_CONF_CONN,
  53         SR_CONF_SERIALCOMM,
  54 };
  55
  56 /** Hardware capabilities generic. */
  57 static const uint32_t devopts[] = {
  58         /* Device class */
  59         SR_CONF_POWER_SUPPLY,
  60         /* Acquisition modes. */
  61         SR_CONF_CONTINUOUS,
  62         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
  63         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
  64         /* Device configuration */
  65         SR_CONF_CHANNEL_CONFIG | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
  66 };
  67
  68 /** Hardware capabilities channel 1, 2. */
  69 static const uint32_t devopts_ch12[] = {
  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,
  75 };
  76
  77 /** Hardware capabilities channel 3. (LPS-304/305 only). */
  78 static const uint32_t devopts_ch3[] = {
  79         SR_CONF_VOLTAGE | SR_CONF_GET,
  80         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
  81 };
  82
  83 static const char *channel_modes[] = {
  84         "Independent",
  85         "Track1",
  86         "Track2",
  87 };
  88
  89 static const struct lps_modelspec models[] = {
  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 };
 134
 135 static int init_lps301(struct sr_dev_driver *di, struct sr_context *sr_ctx)
 136 {
 137         return std_init(sr_ctx, di, LOG_PREFIX);
 138 }
 139
 140 /** Send command to device with va_list.
 141  */
 142 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char *fmt, va_list args)
 143 {
 144         int retc;
 145         char auxfmt[LINELEN_MAX];
 146         char buf[LINELEN_MAX];
 147
 148         snprintf(auxfmt, sizeof(auxfmt), "%s\r\n", fmt);
 149         vsnprintf(buf, sizeof(buf), auxfmt, args);
 150
 151         sr_spew("lps_send_va: \"%s\"", buf);
 152
 153         retc = serial_write_blocking(serial, buf, strlen(buf), 0);
 154
 155         if (retc < 0)
 156                 return SR_ERR;
 157
 158         return SR_OK;
 159 }
 160
 161 /** Send command to device.
 162  */
 163 SR_PRIV int lps_send_req(struct sr_serial_dev_inst *serial, const char *fmt, ...)
 164 {
 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;
 173 }
 174
 175 /** Send command and consume simple OK reply. */
 176 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...)
 177 {
 178         int retc;
 179         va_list args;
 180         char buf[LINELEN_MAX];
 181         char *bufptr;
 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;
 201 }
 202
 203 /** Send command and read reply string.
 204  *  @param reply Pointer to buffer of size LINELEN_MAX. Will be NUL-terminated.
 205  */
 206 SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...)
 207 {
 208         int retc;
 209         va_list args;
 210         char buf[LINELEN_MAX];
 211         char *bufptr;
 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         }
 233
 234         return SR_ERR;
 235 }
 236
 237 /** Process integer value returned by STATUS command. */
 238 SR_PRIV int lps_process_status(struct sr_dev_inst *sdi, int stat)
 239 {
 240         struct dev_context *devc;
 241         int tracking_mode;
 242
 243         devc = (struct dev_context *)sdi->priv;
 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);
 279
 280         return SR_OK;
 281 }
 282
 283 /** Send STATUS commend and process status string. */
 284 SR_PRIV int lps_query_status(struct sr_dev_inst *sdi)
 285 {
 286         char buf[LINELEN_MAX];
 287         int stat, ret;
 288         struct dev_context *devc;
 289
 290         devc = (struct dev_context *)sdi->priv;
 291
 292         devc->req_sent_at = g_get_real_time();
 293
 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));
 297                 return SR_ERR;
 298         }
 299
 300         if (sr_atoi(buf, &stat) != SR_OK)
 301                 return SR_ERR;
 302
 303         return lps_process_status(sdi, stat);
 304 }
 305
 306 static gint64 calc_timeout_ms(gint64 start_us)
 307 {
 308         gint64 result = REQ_TIMEOUT_MS - ((g_get_real_time() - start_us) / 1000);
 309
 310         if (result < 0)
 311                 return 0;
 312
 313         return result;
 314 }
 315
 316 /** Read message into buf until "OK" received.
 317  *  @retval SR_OK Msg received; buf and buflen contain result, if any except OK.
 318  *  @retval SR_ERR Error, including timeout.
 319 */
 320 SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen)
 321 {
 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         }
 347
 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         }
 366
 367         return SR_ERR; /* Timeout! */
 368 }
 369
 370 /** Scan for LPS-300 series device.
 371  */
 372 static GSList *do_scan(lps_modelid modelid, struct sr_dev_driver *drv, GSList *options)
 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;
 382         int cnt, ret;
 383         gchar buf[LINELEN_MAX];
 384         gchar channel[10];
 385         char *verstr;
 386
 387         sdi = NULL;
 388         devc = NULL;
 389         conn = serialcomm = NULL;
 390         devices = NULL;
 391
 392         drvc = drv->context;
 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. */
 404         serial = sr_serial_dev_inst_new(conn, serialcomm);
 405
 406         if (serial_open(serial, SERIAL_RDWR) != SR_OK)
 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                 }
 433         }
 434
 435         /* Query version */
 436         verstr = NULL;
 437         if ((ret = lps_cmd_reply(buf, serial, "VERSION")) == SR_OK) {
 438                 if (strncmp(buf, "Ver-", 4)) {
 439                         sr_spew("Version string %s not recognized.", buf);
 440                         goto exit_err;
 441                 }
 442
 443                 g_strstrip(buf);
 444                 verstr = buf + 4;
 445         }
 446         else  /* Bug in device FW 1.17: Querying version string fails while output is active.
 447                 Therefore just print an error message, but do not exit with error. */
 448                 sr_err("Failed to query for hardware version: %s.",
 449                         sr_strerror(ret));
 450
 451         sdi = g_malloc0(sizeof(struct sr_dev_inst));
 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);
 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);
 472                 ch = sr_channel_new(sdi, cnt, SR_CHANNEL_ANALOG, TRUE, channel);
 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
 498 exit_err:
 499         sr_info("%s: Error!", __func__);
 500
 501         if (serial) {
 502                 serial_close(serial);
 503                 sr_serial_dev_inst_free(serial);
 504         }
 505         g_free(devc);
 506         if (sdi)
 507                 sr_dev_inst_free(sdi);
 508
 509         return NULL;
 510 }
 511
 512 /** Scan for LPS-301 device. */
 513 static GSList *scan_lps301(struct sr_dev_driver *di, GSList *options)
 514 {
 515         return do_scan(LPS_301, di, options);
 516 }
 517
 518 static GSList *dev_list_lps301(const struct sr_dev_driver *di)
 519 {
 520         return ((struct drv_context *)(di->context))->instances;
 521 }
 522
 523 static void dev_clear_private(struct dev_context *devc)
 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
 534 static int dev_clear_lps301(const struct sr_dev_driver *di)
 535 {
 536         return std_dev_clear(di, (std_dev_clear_callback)dev_clear_private);
 537 }
 538
 539 static int cleanup(const struct sr_dev_driver *di)
 540 {
 541         return dev_clear_lps301(di);
 542 }
 543
 544 static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
 545                 const struct sr_channel_group *cg)
 546 {
 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;
 565                 case SR_CONF_CHANNEL_CONFIG:
 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) {
 576                 case SR_CONF_VOLTAGE:
 577                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_last);
 578                         break;
 579                 case SR_CONF_VOLTAGE_TARGET:
 580                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_max);
 581                         break;
 582                 case SR_CONF_CURRENT:
 583                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_last);
 584                         break;
 585                 case SR_CONF_CURRENT_LIMIT:
 586                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_max);
 587                         break;
 588                 case SR_CONF_ENABLED:
 589                         *data = g_variant_new_boolean(devc->channel_status[ch_idx].output_enabled);
 590                         break;
 591                 default:
 592                         return SR_ERR_NA;
 593                 }
 594         }
 595
 596         return SR_OK;
 597 }
 598
 599 static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi,
 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;
 610
 611         if (sdi->status != SR_ST_ACTIVE)
 612                 return SR_ERR_DEV_CLOSED;
 613
 614         devc = sdi->priv;
 615
 616         /* Cannot change settings while acquisition active, would cause a mess with commands.
 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:
 625                         devc->limit_msec = g_variant_get_uint64(data);
 626                         break;
 627                 case SR_CONF_LIMIT_SAMPLES:
 628                         devc->limit_samples = g_variant_get_uint64(data);
 629                         break;
 630                 case SR_CONF_CHANNEL_CONFIG:
 631                         sval = g_variant_get_string(data, NULL);
 632                         found = FALSE;
 633                         for (idx = 0; idx < (int)ARRAY_SIZE(channel_modes); idx++) {
 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                         }
 645                         if (!found)
 646                                 return SR_ERR_ARG;
 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) {
 658                 case SR_CONF_VOLTAGE_TARGET:
 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;
 679                 case SR_CONF_CURRENT_LIMIT:
 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;
 688                 case SR_CONF_ENABLED:
 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                 }
 706         }
 707
 708         return SR_OK;
 709 }
 710
 711 static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
 712                 const struct sr_channel_group *cg)
 713 {
 714         struct dev_context *devc;
 715         struct sr_channel *ch;
 716         int ch_idx, i;
 717         GVariant *gvar;
 718         GVariantBuilder gvb;
 719
 720         /* Driver options, no device instance necessary. */
 721         switch (key) {
 722         case SR_CONF_SCAN_OPTIONS:
 723                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 724                         scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
 725                 return SR_OK;
 726         case SR_CONF_DEVICE_OPTIONS:
 727                 if (sdi != NULL)
 728                         break;
 729                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 730                         drvopts, ARRAY_SIZE(drvopts), sizeof(uint32_t));
 731                 return SR_OK;
 732         default:
 733                 if (!sdi)
 734                         return SR_ERR_ARG;
 735                 devc = sdi->priv;
 736                 break;
 737         }
 738
 739         /* Device options, independent from channel groups. */
 740         if (!cg) {
 741                 switch (key) {
 742                 case SR_CONF_DEVICE_OPTIONS:
 743                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 744                                         devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
 745                         return SR_OK;
 746                 case SR_CONF_CHANNEL_CONFIG:
 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;
 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 */
 766                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 767                                   devopts_ch12, ARRAY_SIZE(devopts_ch12), sizeof(uint32_t));
 768                 else /* Must be CH3 */
 769                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 770                                   devopts_ch3, ARRAY_SIZE(devopts_ch3), sizeof(uint32_t));
 771                 break;
 772         case SR_CONF_VOLTAGE_TARGET:
 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;
 781         case SR_CONF_CURRENT_LIMIT:
 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;
 790         default:
 791                 return SR_ERR_NA;
 792         }
 793
 794         return SR_OK;
 795 }
 796
 797 static int dev_acquisition_start(const struct sr_dev_inst *sdi, void *cb_data)
 798 {
 799         struct dev_context *devc;
 800         struct sr_serial_dev_inst *serial;
 801
 802         if (sdi->status != SR_ST_ACTIVE)
 803                 return SR_ERR_DEV_CLOSED;
 804
 805         devc = sdi->priv;
 806
 807         devc->acq_running = TRUE;
 808
 809         serial = sdi->conn;
 810         serial_source_add(sdi->session, serial, G_IO_IN, 50,
 811                         motech_lps_30x_receive_data, (void *)sdi);
 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. */
 820
 821         return SR_OK;
 822 }
 823
 824 static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
 825 {
 826         struct dev_context *devc;
 827
 828         /* Stop timer, if required. */
 829         if (sdi && (devc = sdi->priv) && devc->limit_msec)
 830                 g_timer_stop(devc->elapsed_msec);
 831
 832         return std_serial_dev_acquisition_stop(sdi, cb_data, std_serial_dev_close,
 833                         sdi->conn, LOG_PREFIX);
 834 }
 835
 836 SR_PRIV struct sr_dev_driver motech_lps_301_driver_info = {
 837         .name = "motech-lps-301",
 838         .longname = "Motech LPS-301",
 839         .api_version = 1,
 840         .init = init_lps301,
 841         .cleanup = cleanup,
 842         .scan = scan_lps301,
 843         .dev_list = dev_list_lps301,
 844         .dev_clear = dev_clear_lps301,
 845         .config_get = config_get,
 846         .config_set = config_set,
 847         .config_list = config_list,
 848         .dev_open = std_serial_dev_open,
 849         .dev_close = std_serial_dev_close,
 850         .dev_acquisition_start = dev_acquisition_start,
 851         .dev_acquisition_stop = dev_acquisition_stop,
 852         .context = NULL,
 853 };