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 <errno.h>
  28 #include <math.h>
  29 #include <string.h>
  30
  31 #include "protocol.h"
  32
  33 /* Forward declarations */
  34 SR_PRIV struct sr_dev_driver motech_lps_301_driver_info;
  35 SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen);
  36 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char* fmt, va_list args);
  37 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char* fmt, ...);
  38 SR_PRIV int lps_cmd_reply(char* reply, struct sr_serial_dev_inst *serial, const char* fmt, ...);
  39 SR_PRIV int lps_query_status(struct sr_dev_inst* sdi);
  40
  41 /* Serial communication parameters */
  42 #define SERIALCOMM "2400/8n1/dtr=1/rts=1/flow=0"
  43
  44 #define VENDOR_MOTECH "Motech"
  45
  46 /** Driver scanning options. */
  47 static const int32_t hwopts[] = {
  48         SR_CONF_CONN,
  49         SR_CONF_SERIALCOMM,
  50 };
  51
  52 /** Hardware capabilities generic. */
  53 static const int32_t hwcaps[] = {
  54         /* Device class */
  55         SR_CONF_POWER_SUPPLY,
  56         /* Aquisition modes. */
  57         SR_CONF_LIMIT_SAMPLES,
  58         SR_CONF_LIMIT_MSEC,
  59         SR_CONF_CONTINUOUS,
  60         /* Device configuration */
  61         SR_CONF_OUTPUT_CHANNEL,
  62 };
  63
  64 /** Hardware capabilities channel 1, 2. */
  65 static const int32_t hwcaps_ch12[] = {
  66         SR_CONF_OUTPUT_VOLTAGE,
  67         SR_CONF_OUTPUT_VOLTAGE_MAX,
  68         SR_CONF_OUTPUT_CURRENT,
  69         SR_CONF_OUTPUT_CURRENT_MAX,
  70         SR_CONF_OUTPUT_ENABLED,
  71 };
  72
  73 /** Hardware capabilities channel 3. (LPS-304/305 only). */
  74 static const int32_t hwcaps_ch3[] = {
  75         SR_CONF_OUTPUT_VOLTAGE,
  76         SR_CONF_OUTPUT_ENABLED,
  77 };
  78
  79 static const char *channel_modes[] = {
  80         "Independent",
  81         "Track1",
  82         "Track2",
  83 };
  84
  85 static struct lps_modelspec models[] = {
  86         { LPS_UNKNOWN, "Dummy", 0,
  87                 {
  88
  89                 }
  90         },
  91         { LPS_301, "LPS-301", 1,
  92                 {
  93                         /* Channel 1 */
  94                         { { 0, 32, 0.01 }, { 0.005, 2, 0.001 } },
  95                 },
  96         },
  97         { LPS_302, "LPS-302", 1,
  98                 {
  99                         /* Channel 1 */
 100                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 101                 },
 102         },
 103         { LPS_303, "LPS-303", 1,
 104                 {
 105                         /* Channel 1 */
 106                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 107                 },
 108         },
 109         { LPS_304, "LPS-304", 3,
 110                 {
 111                         /* Channel 1 */
 112                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 113                         /* Channel 2 */
 114                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 115                         /* Channel 3 */
 116                         { { 5, 5, 0.0 }, { 0.005, 3, 0.001 } },
 117                 },
 118         },
 119         { LPS_305, "LPS-305", 3,
 120                 {
 121                         /* Channel 1 */
 122                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 123                         /* Channel 2 */
 124                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 125                         /* Channel 3 */
 126                         { { 3.3, 5, 1.7 }, { 0.005, 3, 0.001 } },
 127                 },
 128         },
 129 };
 130
 131 static int init_lps301(struct sr_context *sr_ctx)
 132 {
 133         return std_init(sr_ctx, &motech_lps_301_driver_info, LOG_PREFIX);
 134 }
 135
 136 /** Send command to device with va_list.
 137  */
 138 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char* fmt, va_list args)
 139 {
 140         int retc;
 141         char auxfmt[LINELEN_MAX];
 142         char buf[LINELEN_MAX];
 143
 144         snprintf(auxfmt, sizeof(auxfmt), "%s\r\n", fmt);
 145         vsnprintf(buf, sizeof(buf), auxfmt, args);
 146
 147         sr_spew("lps_send_va: \"%s\"", buf);
 148
 149         retc = serial_write_nonblocking(serial, buf, strlen(buf));
 150
 151         if (retc < 0)
 152                 return SR_ERR;
 153
 154         return SR_OK;
 155 }
 156
 157 /** Send command to device.
 158  */
 159 SR_PRIV int lps_send_req(struct sr_serial_dev_inst *serial, const char* fmt, ...)
 160 {
 161         int retc;
 162         va_list args;
 163
 164         va_start(args, fmt);
 165         retc = lps_send_va(serial, fmt, args);
 166         va_end(args);
 167
 168         return retc;
 169 }
 170
 171 /** Send command and consume simple OK reply. */
 172 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char* fmt, ...)
 173 {
 174         int retc;
 175         va_list args;
 176         char buf[LINELEN_MAX];
 177         char* bufptr;
 178         int  buflen;
 179
 180         /* Send command */
 181         va_start(args, fmt);
 182         retc = lps_send_va(serial, fmt, args);
 183         va_end(args);
 184
 185         if (retc != SR_OK)
 186                 return SR_ERR;
 187
 188         /* Read reply */
 189         buf[0] = '\0';
 190         bufptr = buf;
 191         buflen = sizeof(buf);
 192         retc = lps_read_reply(serial, &bufptr, &buflen);
 193         if ((retc == SR_OK) && (buflen == 0))
 194                 return SR_OK;
 195
 196         return SR_ERR;
 197 }
 198
 199 /** Send command and read reply string.
 200  *  \param reply Pointer to buffer of size LINELEN_MAX. Will be NUL-terminated.
 201  */
 202 SR_PRIV int lps_cmd_reply(char* reply, struct sr_serial_dev_inst *serial, const char* fmt, ...)
 203 {
 204         int retc;
 205         va_list args;
 206         char buf[LINELEN_MAX];
 207         char* bufptr;
 208         int  buflen;
 209
 210         reply[0] = '\0';
 211
 212         /* Send command */
 213         va_start(args, fmt);
 214         retc = lps_send_va(serial, fmt, args);
 215         va_end(args);
 216
 217         if (retc != SR_OK)
 218                 return SR_ERR;
 219
 220         /* Read reply */
 221         buf[0] = '\0';
 222         bufptr = buf;
 223         buflen = sizeof(buf);
 224         retc = lps_read_reply(serial, &bufptr, &buflen);
 225         if ((retc == SR_OK) && (buflen > 0)) {
 226                 strcpy(reply, buf);
 227                 return SR_OK;
 228         }
 229
 230         return SR_ERR;
 231 }
 232
 233 /** Process integer value returned by STATUS command. */
 234 SR_PRIV int lps_process_status(struct sr_dev_inst* sdi, int stat)
 235 {
 236         struct dev_context* devc;
 237         int tracking_mode;
 238
 239         devc = (struct dev_context*)sdi->priv;
 240
 241         sr_spew("Status: %d", stat);
 242         devc->channel_status[0].cc_mode = (stat & 0x01) != 0;
 243         sr_spew("Channel 1 %s mode", devc->channel_status[0].cc_mode?"CC":"CV");
 244         if (devc->model->num_channels > 1) {
 245                 devc->channel_status[1].cc_mode = (stat & 0x02) != 0;
 246                 sr_spew("Channel 2 %s mode", devc->channel_status[1].cc_mode?"CC":"CV");
 247
 248                 tracking_mode = (stat & 0x0c) >> 2;
 249                 switch (tracking_mode) {
 250                 case 0: devc->tracking_mode = 0;
 251                         break;
 252                 case 2: devc->tracking_mode = 1;
 253                         break;
 254                 case 3: devc->tracking_mode = 2;
 255                         break;
 256                 default:
 257                         sr_err("Illegal channel tracking mode %d!", tracking_mode);
 258                         devc->tracking_mode = 0;
 259                         break;
 260                 }
 261
 262                 sr_spew("Channel tracking: %d", devc->tracking_mode);
 263         }
 264         devc->channel_status[0].output_enabled = devc->channel_status[1].output_enabled = stat&0x040?TRUE:FALSE;
 265         sr_spew("Channel 1%s output: %s", devc->model->num_channels > 1?"+2":"", devc->channel_status[0].output_enabled?"ON":"OFF");
 266         if (devc->model->num_channels > 2) {
 267                 devc->channel_status[2].output_enabled = stat&0x010?TRUE:FALSE;
 268                 devc->channel_status[2].output_voltage_last = stat&0x020?3.3:5;
 269                 sr_spew("Channel 3 output: %s, U=%02f V, overload=%d",
 270                         devc->channel_status[2].output_enabled?"ON":"OFF",
 271                         devc->channel_status[2].output_voltage_last,
 272                         stat&0x080?1:0);
 273         }
 274         sr_spew("Fan=%d, beep=%d, CC output compensated=%d", stat&0x0100?1:0, stat&0x0200?1:0, stat&0x0400?1:0);
 275
 276         return SR_OK;
 277 }
 278
 279 /** Send STATUS commend and process status string. */
 280 SR_PRIV int lps_query_status(struct sr_dev_inst* sdi)
 281 {
 282         char buf[LINELEN_MAX];
 283         int stat;
 284         const char* ptr;
 285         struct dev_context* devc;
 286
 287         devc = (struct dev_context*)sdi->priv;
 288
 289         devc->req_sent_at = g_get_real_time();
 290
 291         if (lps_cmd_reply(buf, sdi->conn, "STATUS") < 0) {
 292                 sr_err("%s: Failed to read status: %d %s", __func__, errno, strerror(errno));
 293                 return SR_ERR;
 294         }
 295
 296         /* Jump across leading zeros to prevent sr_atoi() believing this to be octal. */
 297         for (ptr = buf; isspace(*buf) || (*ptr == '0'); ptr++)
 298                 ;
 299
 300         if (sr_atoi(ptr, &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 *doScan(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;
 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->priv;
 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         if (!(serial = sr_serial_dev_inst_new(conn, serialcomm)))
 405                 return NULL;
 406
 407         if (serial_open(serial, SERIAL_RDWR | SERIAL_NONBLOCK) != 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 (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
 445                 g_strstrip(buf);
 446                 verstr = buf + 4;
 447         }
 448         else  /* Bug in device FW 1.17: Quering version string fails while output is active.
 449                 Therefore just print an error message, but do not exit with error. */
 450                 sr_err("Failed to query for hardware version: %d %s", errno, strerror(errno));
 451
 452         sdi = sr_dev_inst_new(0, SR_ST_INACTIVE, VENDOR_MOTECH, models[modelid].modelstr, verstr);
 453         sdi->driver = drv;
 454         sdi->inst_type = SR_INST_SERIAL;
 455         sdi->conn = serial;
 456
 457         devc = g_malloc0(sizeof(struct dev_context));
 458         devc->model = &models[modelid];
 459         devc->limit_samples = 0;
 460         devc->limit_msec = 0;
 461         devc->num_samples = 0;
 462         devc->elapsed_msec = g_timer_new();
 463
 464         sdi->priv = devc;
 465
 466         /* Setup channels and channel groups. */
 467         for (cnt = 0; cnt < models[modelid].num_channels; cnt++) {
 468                 snprintf(channel, sizeof(channel), "CH%d", cnt + 1);
 469                 ch = sr_channel_new(cnt, SR_CHANNEL_ANALOG, TRUE, channel);
 470                 sdi->channels = g_slist_append(sdi->channels, ch);
 471
 472                 devc->channel_status[cnt].info = g_slist_append(NULL, ch);
 473
 474                 cg = g_malloc(sizeof(struct sr_channel_group));
 475                 snprintf(channel, sizeof(channel), "CG%d", cnt+1);
 476                 cg->name = g_strdup(channel);
 477                 cg->priv = NULL;
 478                 cg->channels = g_slist_append(NULL, ch);
 479
 480                 sdi->channel_groups = g_slist_append(sdi->channel_groups, cg);
 481         }
 482
 483         drvc->instances = g_slist_append(drvc->instances, sdi);
 484         devices = g_slist_append(devices, sdi);
 485
 486         /* Query status */
 487         if (lps_query_status(sdi) != SR_OK)
 488                 goto exit_err;
 489
 490         serial_close(serial);
 491         if (!devices)
 492                 sr_serial_dev_inst_free(serial);
 493
 494         return devices;
 495
 496 exit_err:
 497         sr_info("%s: Error!", __func__);
 498
 499         if (serial) {
 500                 serial_close(serial);
 501                 sr_serial_dev_inst_free(serial);
 502         }
 503         if (devc)
 504                 g_free(devc);
 505         if (sdi)
 506                 sr_dev_inst_free(sdi);
 507
 508         return NULL;
 509 }
 510
 511 /** Scan for LPS-301 device. */
 512 static GSList *scan_lps301(GSList *options)
 513 {
 514         return doScan(LPS_301, &motech_lps_301_driver_info, options);
 515 }
 516
 517 static GSList *doDevList(struct sr_dev_driver *drv)
 518 {
 519         return ((struct drv_context *)(drv->priv))->instances;
 520 }
 521
 522 static GSList *dev_list_lps301(void)
 523 {
 524         return doDevList(&motech_lps_301_driver_info);
 525 }
 526
 527 static void dev_clear_private(struct dev_context* devc)
 528 {
 529         int ch_idx;
 530
 531         /* Free channel_status.info (list only, data owned by sdi). */
 532         for (ch_idx = 0; ch_idx < devc->model->num_channels; ch_idx++)
 533                 g_slist_free(devc->channel_status[ch_idx].info);
 534
 535         g_timer_destroy(devc->elapsed_msec);
 536 }
 537
 538 static int dev_clear_lps301(void)
 539 {
 540         return std_dev_clear(&motech_lps_301_driver_info, (std_dev_clear_callback)dev_clear_private);
 541 }
 542
 543 static int cleanup(void)
 544 {
 545         return dev_clear_lps301();
 546 }
 547
 548 static int config_get(int key, GVariant **data, const struct sr_dev_inst *sdi,
 549                 const struct sr_channel_group *cg)
 550 {
 551         struct dev_context *devc;
 552         struct sr_channel *ch;
 553         int ch_idx;
 554
 555         if (!sdi)
 556                 return SR_ERR_ARG;
 557
 558         devc = sdi->priv;
 559
 560         if (!cg) {
 561                 /* No channel group: global options. */
 562                 switch (key) {
 563                 case SR_CONF_LIMIT_SAMPLES:
 564                         *data = g_variant_new_uint64(devc->limit_samples);
 565                         break;
 566                 case SR_CONF_LIMIT_MSEC:
 567                         *data = g_variant_new_uint64(devc->limit_msec);
 568                         break;
 569                 case SR_CONF_OUTPUT_CHANNEL:
 570                         *data = g_variant_new_string(channel_modes[devc->tracking_mode]);
 571                         break;
 572                 default:
 573                         return SR_ERR_NA;
 574                 }
 575         } else {
 576                 /* We only ever have one channel per channel group in this driver. */
 577                 ch = cg->channels->data;
 578                 ch_idx = ch->index;
 579                 switch (key) {
 580                 case SR_CONF_OUTPUT_VOLTAGE:
 581                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_last);
 582                         break;
 583                 case SR_CONF_OUTPUT_VOLTAGE_MAX:
 584                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_max);
 585                         break;
 586                 case SR_CONF_OUTPUT_CURRENT:
 587                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_last);
 588                         break;
 589                 case SR_CONF_OUTPUT_CURRENT_MAX:
 590                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_max);
 591                         break;
 592                 case SR_CONF_OUTPUT_ENABLED:
 593                         *data = g_variant_new_boolean(devc->channel_status[ch_idx].output_enabled);
 594                         break;
 595                 default:
 596                         return SR_ERR_NA;
 597                 }
 598         }
 599
 600         return SR_OK;
 601 }
 602
 603 static int config_set(int key, GVariant *data, const struct sr_dev_inst *sdi,
 604                 const struct sr_channel_group *cg)
 605 {
 606         struct dev_context *devc;
 607         struct sr_channel *ch;
 608         gdouble dval;
 609         int ch_idx;
 610         const char *sval;
 611         gboolean bval;
 612         int idx;
 613         gboolean found;
 614
 615         if (sdi->status != SR_ST_ACTIVE)
 616                 return SR_ERR_DEV_CLOSED;
 617
 618         devc = sdi->priv;
 619
 620         /* Cannot change settings while aquisition active, would cause a mess with commands.
 621          * Changing this would be possible, but tricky. */
 622         if (devc->acq_running)
 623                 return SR_ERR_NA;
 624
 625         if (!cg) {
 626                 /* No channel group: global options. */
 627                 switch (key) {
 628                 case SR_CONF_LIMIT_MSEC:
 629                         if (g_variant_get_uint64(data) == 0) {
 630                                 sr_err("LIMIT_MSEC can't be 0.");
 631                                 return SR_ERR;
 632                         }
 633                         devc->limit_msec = g_variant_get_uint64(data);
 634                         sr_dbg("Setting time limit to %" PRIu64 "ms.",
 635                                 devc->limit_msec);
 636                         break;
 637                 case SR_CONF_LIMIT_SAMPLES:
 638                         devc->limit_samples = g_variant_get_uint64(data);
 639                         sr_dbg("Setting sample limit to %" PRIu64 ".",
 640                                 devc->limit_samples);
 641                         break;
 642                 case SR_CONF_OUTPUT_CHANNEL:
 643                         sval = g_variant_get_string(data, NULL);
 644                         found = FALSE;
 645                         for (idx = 0; idx < (int)ARRAY_SIZE(channel_modes); idx++)
 646                         {
 647                                 if (!strcmp(sval, channel_modes[idx])) {
 648                                         found = TRUE;
 649                                         if (devc->tracking_mode == idx)
 650                                                 break;  /* Nothing to do! */
 651                                         devc->tracking_mode = idx;
 652                                         if (devc->model->modelid >= LPS_304) /* No use to set anything in the smaller models. */
 653                                                 return lps_cmd_ok(sdi->conn, "TRACK%1d", devc->tracking_mode);
 654                                 }
 655                                 if (devc->model->modelid <= LPS_303) /* Only first setting possible for smaller models. */
 656                                         break;
 657                         }
 658                         if (!found) {
 659                                 return SR_ERR_ARG;
 660                         }
 661                         break;
 662                 default:
 663                         return SR_ERR_NA;
 664                 }
 665         } else {
 666                 /* Channel group specified: per-channel options. */
 667                 /* We only ever have one channel per channel group in this driver. */
 668                 ch = cg->channels->data;
 669                 ch_idx = ch->index;
 670
 671                 switch (key) {
 672                 case SR_CONF_OUTPUT_VOLTAGE_MAX:
 673                         dval = g_variant_get_double(data);
 674                         if (dval < 0 || dval > devc->model->channels[ch_idx].voltage[1])
 675                                 return SR_ERR_ARG;
 676                         if (ch_idx == 2) {
 677                                 if (devc->model->modelid < LPS_304)
 678                                         return SR_ERR_ARG;
 679
 680                                 if (fabs(dval - 5.000) <= 0.001)
 681                                         dval = 5.0;
 682                                 else if ((devc->model->modelid >= LPS_305) && (fabs(dval - 3.300) <= 0.001))
 683                                         dval = 3.3;
 684                                 else return SR_ERR_ARG;
 685                         }
 686
 687                         devc->channel_status[ch_idx].output_voltage_max = dval;
 688                         if (ch_idx == 2)
 689                                 return lps_cmd_ok(sdi->conn, "VDD%1.0f", trunc(dval));
 690                         else
 691                                 return lps_cmd_ok(sdi->conn, "VSET%d %05.3f", ch_idx+1, dval);
 692                         break;
 693                 case SR_CONF_OUTPUT_CURRENT_MAX:
 694                         dval = g_variant_get_double(data);
 695                         if (dval < 0 || dval > devc->model->channels[ch_idx].current[1])
 696                                 return SR_ERR_ARG;
 697                         if (ch_idx == 2) /* No current setting for CH3. */
 698                                 return SR_ERR_NA;
 699                         devc->channel_status[ch_idx].output_current_max = dval;
 700                         return lps_cmd_ok(sdi->conn, "ISET%d %05.4f", ch_idx+1, dval);
 701                         break;
 702                 case SR_CONF_OUTPUT_ENABLED:
 703                         bval = g_variant_get_boolean(data);
 704                         if (bval == devc->channel_status[ch_idx].output_enabled) /* Nothing to do. */
 705                                 break;
 706                         devc->channel_status[ch_idx].output_enabled = bval;
 707                         if (ch_idx != 2) { /* Channels 1,2 can be set only together. */
 708                                 devc->channel_status[ch_idx^1].output_enabled = bval;
 709                                 return lps_cmd_ok(sdi->conn, "OUT%1d", (int)bval);
 710                         } else { /* Channel 3: No command to disable output, set voltage to 0 instead. */
 711                                 if (bval)
 712                                         return lps_cmd_ok(sdi->conn, "VDD%1.0f", devc->channel_status[ch_idx].output_voltage_max);
 713                                 else
 714                                         return lps_cmd_ok(sdi->conn, "VDD0");
 715                         }
 716                         break;
 717                 default:
 718                         return SR_ERR_NA;
 719                 }
 720         }
 721
 722         return SR_OK;
 723 }
 724
 725 static int config_list(int key, GVariant **data, const struct sr_dev_inst *sdi,
 726                 const struct sr_channel_group *cg)
 727 {
 728         struct dev_context *devc;
 729         struct sr_channel *ch;
 730         int ch_idx, i;
 731         GVariant *gvar;
 732         GVariantBuilder gvb;
 733
 734         (void)data;
 735
 736         /* Driver options, no device instance necessary. */
 737         switch (key) {
 738         case SR_CONF_SCAN_OPTIONS:
 739                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 740                                                   hwopts, ARRAY_SIZE(hwopts), sizeof(int32_t));
 741                 return SR_OK;
 742         default:
 743                 if (sdi == NULL)
 744                         return SR_ERR_ARG;
 745
 746                 devc = sdi->priv;
 747         }
 748
 749         /* Device options, independant from channel groups. */
 750         if (cg == NULL) {
 751                 switch (key) {
 752                 case SR_CONF_DEVICE_OPTIONS:
 753                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 754                                                           hwcaps, ARRAY_SIZE(hwcaps), sizeof(int32_t));
 755                         return SR_OK;
 756                 case SR_CONF_OUTPUT_CHANNEL:
 757                         if (devc->model->modelid <= LPS_303) {
 758                                 /* The 1-channel models. */
 759                                 *data = g_variant_new_strv(channel_modes, 1);
 760                         } else {
 761                                 /* The other models support all modes. */
 762                                 *data = g_variant_new_strv(channel_modes, ARRAY_SIZE(channel_modes));
 763                         }
 764                         return SR_OK;
 765                         break;
 766                 default:
 767                         return SR_ERR_NA;
 768                 }
 769         }
 770
 771         /* Device options, depending on channel groups. */
 772         ch = cg->channels->data;
 773         ch_idx = ch->index;
 774         switch (key) {
 775         case SR_CONF_DEVICE_OPTIONS:
 776                 if ((ch_idx == 0) || (ch_idx == 1)) /* CH1, CH2 */
 777                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 778                                   hwcaps_ch12, ARRAY_SIZE(hwcaps_ch12), sizeof(int32_t));
 779                 else /* Must be CH3 */
 780                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 781                                   hwcaps_ch3, ARRAY_SIZE(hwcaps_ch3), sizeof(int32_t));
 782                 break;
 783         case SR_CONF_OUTPUT_VOLTAGE_MAX:
 784                 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
 785                 /* Min, max, step. */
 786                 for (i = 0; i < 3; i++) {
 787                         gvar = g_variant_new_double(devc->model->channels[ch_idx].voltage[i]);
 788                         g_variant_builder_add_value(&gvb, gvar);
 789                 }
 790                 *data = g_variant_builder_end(&gvb);
 791                 break;
 792         case SR_CONF_OUTPUT_CURRENT_MAX:
 793                 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
 794                 /* Min, max, step. */
 795                 for (i = 0; i < 3; i++) {
 796                         gvar = g_variant_new_double(devc->model->channels[ch_idx].current[i]);
 797                         g_variant_builder_add_value(&gvb, gvar);
 798                 }
 799                 *data = g_variant_builder_end(&gvb);
 800                 break;
 801         default:
 802                 return SR_ERR_NA;
 803         }
 804
 805         return SR_OK;
 806 }
 807
 808 static int dev_acquisition_start(const struct sr_dev_inst *sdi,
 809                                     void *cb_data)
 810 {
 811         struct dev_context *devc;
 812         struct sr_serial_dev_inst *serial;
 813
 814         if (sdi->status != SR_ST_ACTIVE)
 815                 return SR_ERR_DEV_CLOSED;
 816
 817         devc = sdi->priv;
 818
 819         devc->acq_running = TRUE;
 820
 821         serial = sdi->conn;
 822         serial_source_add(serial, G_IO_IN, 50, motech_lps_30x_receive_data, (void *)sdi);
 823         std_session_send_df_header(cb_data, LOG_PREFIX);
 824
 825         /* Start timer, if required. */
 826         if (devc->limit_msec)
 827                 g_timer_start(devc->elapsed_msec);
 828
 829         devc->acq_req = AQ_NONE;
 830         /* Do not start polling device here, the read function will do it in 50 ms. */
 831
 832         return SR_OK;
 833 }
 834
 835 static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
 836 {
 837         struct dev_context *devc;
 838
 839         /* Stop timer, if required. */
 840         if (sdi && (devc = sdi->priv) && devc->limit_msec)
 841                 g_timer_stop(devc->elapsed_msec);
 842
 843         return std_serial_dev_acquisition_stop(sdi, cb_data, std_serial_dev_close,
 844                         sdi->conn, LOG_PREFIX);
 845 }
 846
 847 SR_PRIV struct sr_dev_driver motech_lps_301_driver_info = {
 848         .name = "motech-lps-301",
 849         .longname = "Motech LPS-301",
 850         .api_version = 1,
 851         .init = init_lps301,
 852         .cleanup = cleanup,
 853         .scan = scan_lps301,
 854         .dev_list = dev_list_lps301,
 855         .dev_clear = dev_clear_lps301,
 856         .config_get = config_get,
 857         .config_set = config_set,
 858         .config_list = config_list,
 859         .dev_open = std_serial_dev_open,
 860         .dev_close = std_serial_dev_close,
 861         .dev_acquisition_start = dev_acquisition_start,
 862         .dev_acquisition_stop = dev_acquisition_stop,
 863         .priv = NULL,
 864 };