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 /**
  22  * @file
  23  *
  24  * <em>Motech LPS-30x series</em> power supply driver
  25  *
  26  * @internal
  27  */
  28
  29 #include <config.h>
  30 #include <ctype.h>
  31 #include <math.h>
  32 #include <string.h>
  33 #include "protocol.h"
  34 SR_PRIV int lps_read_reply(struct sr_serial_dev_inst *serial, char **buf, int *buflen);
  35 SR_PRIV int lps_send_va(struct sr_serial_dev_inst *serial, const char *fmt, va_list args);
  36 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...);
  37 SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...);
  38 SR_PRIV int lps_query_status(struct sr_dev_inst *sdi);
  39
  40 /* Serial communication parameters */
  41 #define SERIALCOMM "2400/8n1/dtr=1/rts=1/flow=0"
  42
  43 #define VENDOR_MOTECH "Motech"
  44
  45 /** Driver capabilities generic. */
  46 static const uint32_t drvopts[] = {
  47         /* Device class */
  48         SR_CONF_POWER_SUPPLY,
  49 };
  50
  51 /** Driver scanning options. */
  52 static const uint32_t scanopts[] = {
  53         SR_CONF_CONN,
  54         SR_CONF_SERIALCOMM,
  55 };
  56
  57 /** Hardware capabilities generic. */
  58 static const uint32_t devopts[] = {
  59         /* Device class */
  60         SR_CONF_POWER_SUPPLY,
  61         /* Acquisition modes. */
  62         SR_CONF_CONTINUOUS,
  63         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
  64         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
  65         /* Device configuration */
  66         SR_CONF_CHANNEL_CONFIG | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
  67 };
  68
  69 /** Hardware capabilities channel 1, 2. */
  70 static const uint32_t devopts_ch12[] = {
  71         SR_CONF_VOLTAGE | SR_CONF_GET,
  72         SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
  73         SR_CONF_CURRENT | SR_CONF_GET,
  74         SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
  75         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
  76 };
  77
  78 /** Hardware capabilities channel 3. (LPS-304/305 only). */
  79 static const uint32_t devopts_ch3[] = {
  80         SR_CONF_VOLTAGE | SR_CONF_GET,
  81         SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
  82 };
  83
  84 static const char *channel_modes[] = {
  85         "Independent",
  86         "Track1",
  87         "Track2",
  88 };
  89
  90 static const struct lps_modelspec models[] = {
  91         { LPS_UNKNOWN, "Dummy", 0,
  92                 {
  93
  94                 }
  95         },
  96         { LPS_301, "LPS-301", 1,
  97                 {
  98                         /* Channel 1 */
  99                         { { 0, 32, 0.01 }, { 0.005, 2, 0.001 } },
 100                 },
 101         },
 102         { LPS_302, "LPS-302", 1,
 103                 {
 104                         /* Channel 1 */
 105                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 106                 },
 107         },
 108         { LPS_303, "LPS-303", 1,
 109                 {
 110                         /* Channel 1 */
 111                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 112                 },
 113         },
 114         { LPS_304, "LPS-304", 3,
 115                 {
 116                         /* Channel 1 */
 117                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 118                         /* Channel 2 */
 119                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 120                         /* Channel 3 */
 121                         { { 5, 5, 0.0 }, { 0.005, 3, 0.001 } },
 122                 },
 123         },
 124         { LPS_305, "LPS-305", 3,
 125                 {
 126                         /* Channel 1 */
 127                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 128                         /* Channel 2 */
 129                         { { 0, 32, 0.01 }, { 0.005, 3, 0.001 } },
 130                         /* Channel 3 */
 131                         { { 3.3, 5, 1.7 }, { 0.005, 3, 0.001 } },
 132                 },
 133         },
 134 };
 135
 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_blocking(serial, buf, strlen(buf),
 150                         serial_timeout(serial, strlen(buf)));
 151
 152         if (retc < 0)
 153                 return SR_ERR;
 154
 155         return SR_OK;
 156 }
 157
 158 /** Send command to device.
 159  */
 160 SR_PRIV int lps_send_req(struct sr_serial_dev_inst *serial, const char *fmt, ...)
 161 {
 162         int retc;
 163         va_list args;
 164
 165         va_start(args, fmt);
 166         retc = lps_send_va(serial, fmt, args);
 167         va_end(args);
 168
 169         return retc;
 170 }
 171
 172 /** Send command and consume simple OK reply. */
 173 SR_PRIV int lps_cmd_ok(struct sr_serial_dev_inst *serial, const char *fmt, ...)
 174 {
 175         int retc;
 176         va_list args;
 177         char buf[LINELEN_MAX];
 178         char *bufptr;
 179         int buflen;
 180
 181         /* Send command */
 182         va_start(args, fmt);
 183         retc = lps_send_va(serial, fmt, args);
 184         va_end(args);
 185
 186         if (retc != SR_OK)
 187                 return SR_ERR;
 188
 189         /* Read reply */
 190         buf[0] = '\0';
 191         bufptr = buf;
 192         buflen = sizeof(buf);
 193         retc = lps_read_reply(serial, &bufptr, &buflen);
 194         if ((retc == SR_OK) && (buflen == 0))
 195                 return SR_OK;
 196
 197         return SR_ERR;
 198 }
 199
 200 /**
 201  * Send command and read reply string.
 202  * @param reply Pointer to buffer of size LINELEN_MAX. Will be NUL-terminated.
 203  */
 204 SR_PRIV int lps_cmd_reply(char *reply, struct sr_serial_dev_inst *serial, const char *fmt, ...)
 205 {
 206         int retc;
 207         va_list args;
 208         char buf[LINELEN_MAX];
 209         char *bufptr;
 210         int buflen;
 211
 212         reply[0] = '\0';
 213
 214         /* Send command */
 215         va_start(args, fmt);
 216         retc = lps_send_va(serial, fmt, args);
 217         va_end(args);
 218
 219         if (retc != SR_OK)
 220                 return SR_ERR;
 221
 222         /* Read reply */
 223         buf[0] = '\0';
 224         bufptr = buf;
 225         buflen = sizeof(buf);
 226         retc = lps_read_reply(serial, &bufptr, &buflen);
 227         if ((retc == SR_OK) && (buflen > 0)) {
 228                 strcpy(reply, buf);
 229                 return SR_OK;
 230         }
 231
 232         return SR_ERR;
 233 }
 234
 235 /** Process integer value returned by STATUS command. */
 236 SR_PRIV int lps_process_status(struct sr_dev_inst *sdi, int stat)
 237 {
 238         struct dev_context *devc;
 239         int tracking_mode;
 240
 241         devc = sdi->priv;
 242
 243         sr_spew("Status: %d", stat);
 244         devc->channel_status[0].cc_mode = (stat & 0x01) != 0;
 245         sr_spew("Channel 1 %s mode", devc->channel_status[0].cc_mode?"CC":"CV");
 246         if (devc->model->num_channels > 1) {
 247                 devc->channel_status[1].cc_mode = (stat & 0x02) != 0;
 248                 sr_spew("Channel 2 %s mode", devc->channel_status[1].cc_mode?"CC":"CV");
 249
 250                 tracking_mode = (stat & 0x0c) >> 2;
 251                 switch (tracking_mode) {
 252                 case 0: devc->tracking_mode = 0;
 253                         break;
 254                 case 2: devc->tracking_mode = 1;
 255                         break;
 256                 case 3: devc->tracking_mode = 2;
 257                         break;
 258                 default:
 259                         sr_err("Illegal channel tracking mode %d!", tracking_mode);
 260                         devc->tracking_mode = 0;
 261                         break;
 262                 }
 263
 264                 sr_spew("Channel tracking: %d", devc->tracking_mode);
 265         }
 266         devc->channel_status[0].output_enabled = devc->channel_status[1].output_enabled = stat&0x040?TRUE:FALSE;
 267         sr_spew("Channel 1%s output: %s", devc->model->num_channels > 1?"+2":"", devc->channel_status[0].output_enabled?"ON":"OFF");
 268         if (devc->model->num_channels > 2) {
 269                 devc->channel_status[2].output_enabled = stat&0x010?TRUE:FALSE;
 270                 devc->channel_status[2].output_voltage_last = stat&0x020?3.3:5;
 271                 sr_spew("Channel 3 output: %s, U=%02f V, overload=%d",
 272                         devc->channel_status[2].output_enabled?"ON":"OFF",
 273                         devc->channel_status[2].output_voltage_last,
 274                         stat&0x080?1:0);
 275         }
 276         sr_spew("Fan=%d, beep=%d, CC output compensated=%d", stat&0x0100?1:0, stat&0x0200?1:0, stat&0x0400?1:0);
 277
 278         return SR_OK;
 279 }
 280
 281 /** Send STATUS commend and process status string. */
 282 SR_PRIV int lps_query_status(struct sr_dev_inst *sdi)
 283 {
 284         char buf[LINELEN_MAX];
 285         int stat, ret;
 286         struct dev_context *devc;
 287
 288         devc = sdi->priv;
 289
 290         devc->req_sent_at = g_get_real_time();
 291
 292         if ((ret = lps_cmd_reply(buf, sdi->conn, "STATUS")) < 0) {
 293                 sr_err("%s: Failed to read status: %s.", __func__,
 294                         sr_strerror(ret));
 295                 return SR_ERR;
 296         }
 297
 298         if (sr_atoi(buf, &stat) != SR_OK)
 299                 return SR_ERR;
 300
 301         return lps_process_status(sdi, stat);
 302 }
 303
 304 static gint64 calc_timeout_ms(gint64 start_us)
 305 {
 306         gint64 result = REQ_TIMEOUT_MS - ((g_get_real_time() - start_us) / 1000);
 307
 308         if (result < 0)
 309                 return 0;
 310
 311         return result;
 312 }
 313
 314 /**
 315  * Read message into buf until "OK" received.
 316  *
 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 dev_context *devc;
 376         struct sr_serial_dev_inst *serial;
 377         struct sr_channel *ch;
 378         struct sr_channel_group *cg;
 379         const char *conn, *serialcomm;
 380         int cnt, ret;
 381         gchar buf[LINELEN_MAX];
 382         gchar channel[10];
 383         char *verstr;
 384
 385         sdi = NULL;
 386         devc = NULL;
 387         conn = serialcomm = 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->inst_type = SR_INST_SERIAL;
 451         sdi->conn = serial;
 452
 453         devc = g_malloc0(sizeof(struct dev_context));
 454         sr_sw_limits_init(&devc->limits);
 455         devc->model = &models[modelid];
 456
 457         sdi->priv = devc;
 458
 459         /* Setup channels and channel groups. */
 460         for (cnt = 0; cnt < models[modelid].num_channels; cnt++) {
 461                 snprintf(channel, sizeof(channel), "CH%d", cnt + 1);
 462                 ch = sr_channel_new(sdi, cnt, SR_CHANNEL_ANALOG, TRUE, channel);
 463
 464                 devc->channel_status[cnt].info = g_slist_append(NULL, ch);
 465
 466                 cg = g_malloc(sizeof(struct sr_channel_group));
 467                 snprintf(channel, sizeof(channel), "CG%d", cnt+1);
 468                 cg->name = g_strdup(channel);
 469                 cg->priv = NULL;
 470                 cg->channels = g_slist_append(NULL, ch);
 471
 472                 sdi->channel_groups = g_slist_append(sdi->channel_groups, cg);
 473         }
 474
 475         /* Query status */
 476         if (lps_query_status(sdi) != SR_OK)
 477                 goto exit_err;
 478
 479         serial_close(serial);
 480
 481         return std_scan_complete(drv, g_slist_append(NULL, sdi));
 482
 483 exit_err:
 484         sr_info("%s: Error!", __func__);
 485
 486         if (serial)
 487                 serial_close(serial);
 488         sr_serial_dev_inst_free(serial);
 489         g_free(devc);
 490         sr_dev_inst_free(sdi);
 491
 492         return NULL;
 493 }
 494
 495 /** Scan for LPS-301 device. */
 496 static GSList *scan_lps301(struct sr_dev_driver *di, GSList *options)
 497 {
 498         return do_scan(LPS_301, di, options);
 499 }
 500
 501 static void dev_clear_private(struct dev_context *devc)
 502 {
 503         int ch_idx;
 504
 505         /* Free channel_status.info (list only, data owned by sdi). */
 506         for (ch_idx = 0; ch_idx < devc->model->num_channels; ch_idx++)
 507                 g_slist_free(devc->channel_status[ch_idx].info);
 508 }
 509
 510 static int dev_clear_lps301(const struct sr_dev_driver *di)
 511 {
 512         return std_dev_clear(di, (std_dev_clear_callback)dev_clear_private);
 513 }
 514
 515 static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
 516                 const struct sr_channel_group *cg)
 517 {
 518         struct dev_context *devc;
 519         struct sr_channel *ch;
 520         int ch_idx;
 521
 522         if (!sdi)
 523                 return SR_ERR_ARG;
 524
 525         devc = sdi->priv;
 526
 527         if (!cg) {
 528                 /* No channel group: global options. */
 529                 switch (key) {
 530                 case SR_CONF_LIMIT_SAMPLES:
 531                 case SR_CONF_LIMIT_MSEC:
 532                         return sr_sw_limits_config_get(&devc->limits, key, data);
 533                 case SR_CONF_CHANNEL_CONFIG:
 534                         *data = g_variant_new_string(channel_modes[devc->tracking_mode]);
 535                         break;
 536                 default:
 537                         return SR_ERR_NA;
 538                 }
 539         } else {
 540                 /* We only ever have one channel per channel group in this driver. */
 541                 ch = cg->channels->data;
 542                 ch_idx = ch->index;
 543                 switch (key) {
 544                 case SR_CONF_VOLTAGE:
 545                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_last);
 546                         break;
 547                 case SR_CONF_VOLTAGE_TARGET:
 548                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_voltage_max);
 549                         break;
 550                 case SR_CONF_CURRENT:
 551                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_last);
 552                         break;
 553                 case SR_CONF_CURRENT_LIMIT:
 554                         *data = g_variant_new_double(devc->channel_status[ch_idx].output_current_max);
 555                         break;
 556                 case SR_CONF_ENABLED:
 557                         *data = g_variant_new_boolean(devc->channel_status[ch_idx].output_enabled);
 558                         break;
 559                 default:
 560                         return SR_ERR_NA;
 561                 }
 562         }
 563
 564         return SR_OK;
 565 }
 566
 567 static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi,
 568                 const struct sr_channel_group *cg)
 569 {
 570         struct dev_context *devc;
 571         struct sr_channel *ch;
 572         gdouble dval;
 573         int ch_idx;
 574         const char *sval;
 575         gboolean bval;
 576         int idx;
 577         gboolean found;
 578
 579         if (sdi->status != SR_ST_ACTIVE)
 580                 return SR_ERR_DEV_CLOSED;
 581
 582         devc = sdi->priv;
 583
 584         /* Cannot change settings while acquisition active, would cause a mess with commands.
 585          * Changing this would be possible, but tricky. */
 586         if (devc->acq_running)
 587                 return SR_ERR_NA;
 588
 589         if (!cg) {
 590                 /* No channel group: global options. */
 591                 switch (key) {
 592                 case SR_CONF_LIMIT_MSEC:
 593                 case SR_CONF_LIMIT_SAMPLES:
 594                         return sr_sw_limits_config_set(&devc->limits, key, data);
 595                 case SR_CONF_CHANNEL_CONFIG:
 596                         sval = g_variant_get_string(data, NULL);
 597                         found = FALSE;
 598                         for (idx = 0; idx < (int)ARRAY_SIZE(channel_modes); idx++) {
 599                                 if (!strcmp(sval, channel_modes[idx])) {
 600                                         found = TRUE;
 601                                         if (devc->tracking_mode == idx)
 602                                                 break;  /* Nothing to do! */
 603                                         devc->tracking_mode = idx;
 604                                         if (devc->model->modelid >= LPS_304) /* No use to set anything in the smaller models. */
 605                                                 return lps_cmd_ok(sdi->conn, "TRACK%1d", devc->tracking_mode);
 606                                 }
 607                                 if (devc->model->modelid <= LPS_303) /* Only first setting possible for smaller models. */
 608                                         break;
 609                         }
 610                         if (!found)
 611                                 return SR_ERR_ARG;
 612                         break;
 613                 default:
 614                         return SR_ERR_NA;
 615                 }
 616         } else {
 617                 /* Channel group specified: per-channel options. */
 618                 /* We only ever have one channel per channel group in this driver. */
 619                 ch = cg->channels->data;
 620                 ch_idx = ch->index;
 621
 622                 switch (key) {
 623                 case SR_CONF_VOLTAGE_TARGET:
 624                         dval = g_variant_get_double(data);
 625                         if (dval < 0 || dval > devc->model->channels[ch_idx].voltage[1])
 626                                 return SR_ERR_ARG;
 627                         if (ch_idx == 2) {
 628                                 if (devc->model->modelid < LPS_304)
 629                                         return SR_ERR_ARG;
 630
 631                                 if (fabs(dval - 5.000) <= 0.001)
 632                                         dval = 5.0;
 633                                 else if ((devc->model->modelid >= LPS_305) && (fabs(dval - 3.300) <= 0.001))
 634                                         dval = 3.3;
 635                                 else return SR_ERR_ARG;
 636                         }
 637
 638                         devc->channel_status[ch_idx].output_voltage_max = dval;
 639                         if (ch_idx == 2)
 640                                 return lps_cmd_ok(sdi->conn, "VDD%1.0f", trunc(dval));
 641                         else
 642                                 return lps_cmd_ok(sdi->conn, "VSET%d %05.3f", ch_idx+1, dval);
 643                         break;
 644                 case SR_CONF_CURRENT_LIMIT:
 645                         dval = g_variant_get_double(data);
 646                         if (dval < 0 || dval > devc->model->channels[ch_idx].current[1])
 647                                 return SR_ERR_ARG;
 648                         if (ch_idx == 2) /* No current setting for CH3. */
 649                                 return SR_ERR_NA;
 650                         devc->channel_status[ch_idx].output_current_max = dval;
 651                         return lps_cmd_ok(sdi->conn, "ISET%d %05.4f", ch_idx+1, dval);
 652                         break;
 653                 case SR_CONF_ENABLED:
 654                         bval = g_variant_get_boolean(data);
 655                         if (bval == devc->channel_status[ch_idx].output_enabled) /* Nothing to do. */
 656                                 break;
 657                         devc->channel_status[ch_idx].output_enabled = bval;
 658                         if (ch_idx != 2) { /* Channels 1,2 can be set only together. */
 659                                 devc->channel_status[ch_idx^1].output_enabled = bval;
 660                                 return lps_cmd_ok(sdi->conn, "OUT%1d", (int)bval);
 661                         } else { /* Channel 3: No command to disable output, set voltage to 0 instead. */
 662                                 if (bval)
 663                                         return lps_cmd_ok(sdi->conn, "VDD%1.0f", devc->channel_status[ch_idx].output_voltage_max);
 664                                 else
 665                                         return lps_cmd_ok(sdi->conn, "VDD0");
 666                         }
 667                         break;
 668                 default:
 669                         return SR_ERR_NA;
 670                 }
 671         }
 672
 673         return SR_OK;
 674 }
 675
 676 static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
 677                 const struct sr_channel_group *cg)
 678 {
 679         struct dev_context *devc;
 680         struct sr_channel *ch;
 681         int ch_idx, i;
 682         GVariant *gvar;
 683         GVariantBuilder gvb;
 684
 685         /* Driver options, no device instance necessary. */
 686         switch (key) {
 687         case SR_CONF_SCAN_OPTIONS:
 688                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 689                         scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
 690                 return SR_OK;
 691         case SR_CONF_DEVICE_OPTIONS:
 692                 if (sdi)
 693                         break;
 694                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 695                         drvopts, ARRAY_SIZE(drvopts), sizeof(uint32_t));
 696                 return SR_OK;
 697         default:
 698                 if (!sdi)
 699                         return SR_ERR_ARG;
 700                 devc = sdi->priv;
 701                 break;
 702         }
 703
 704         /* Device options, independent from channel groups. */
 705         if (!cg) {
 706                 switch (key) {
 707                 case SR_CONF_DEVICE_OPTIONS:
 708                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 709                                         devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
 710                         return SR_OK;
 711                 case SR_CONF_CHANNEL_CONFIG:
 712                         if (devc->model->modelid <= LPS_303) {
 713                                 /* The 1-channel models. */
 714                                 *data = g_variant_new_strv(channel_modes, 1);
 715                         } else {
 716                                 /* The other models support all modes. */
 717                                 *data = g_variant_new_strv(channel_modes, ARRAY_SIZE(channel_modes));
 718                         }
 719                         return SR_OK;
 720                 default:
 721                         return SR_ERR_NA;
 722                 }
 723         }
 724
 725         /* Device options, depending on channel groups. */
 726         ch = cg->channels->data;
 727         ch_idx = ch->index;
 728         switch (key) {
 729         case SR_CONF_DEVICE_OPTIONS:
 730                 if ((ch_idx == 0) || (ch_idx == 1)) /* CH1, CH2 */
 731                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 732                                 devopts_ch12, ARRAY_SIZE(devopts_ch12), sizeof(uint32_t));
 733                 else /* Must be CH3 */
 734                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
 735                                 devopts_ch3, ARRAY_SIZE(devopts_ch3), sizeof(uint32_t));
 736                 break;
 737         case SR_CONF_VOLTAGE_TARGET:
 738                 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
 739                 /* Min, max, step. */
 740                 for (i = 0; i < 3; i++) {
 741                         gvar = g_variant_new_double(devc->model->channels[ch_idx].voltage[i]);
 742                         g_variant_builder_add_value(&gvb, gvar);
 743                 }
 744                 *data = g_variant_builder_end(&gvb);
 745                 break;
 746         case SR_CONF_CURRENT_LIMIT:
 747                 g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
 748                 /* Min, max, step. */
 749                 for (i = 0; i < 3; i++) {
 750                         gvar = g_variant_new_double(devc->model->channels[ch_idx].current[i]);
 751                         g_variant_builder_add_value(&gvb, gvar);
 752                 }
 753                 *data = g_variant_builder_end(&gvb);
 754                 break;
 755         default:
 756                 return SR_ERR_NA;
 757         }
 758
 759         return SR_OK;
 760 }
 761
 762 static int dev_acquisition_start(const struct sr_dev_inst *sdi)
 763 {
 764         struct dev_context *devc;
 765         struct sr_serial_dev_inst *serial;
 766
 767         if (sdi->status != SR_ST_ACTIVE)
 768                 return SR_ERR_DEV_CLOSED;
 769
 770         devc = sdi->priv;
 771
 772         devc->acq_running = TRUE;
 773
 774         serial = sdi->conn;
 775         serial_source_add(sdi->session, serial, G_IO_IN, 50,
 776                         motech_lps_30x_receive_data, (void *)sdi);
 777         std_session_send_df_header(sdi);
 778
 779         sr_sw_limits_acquisition_start(&devc->limits);
 780
 781         devc->acq_req = AQ_NONE;
 782         /* Do not start polling device here, the read function will do it in 50 ms. */
 783
 784         return SR_OK;
 785 }
 786
 787 static struct sr_dev_driver motech_lps_301_driver_info = {
 788         .name = "motech-lps-301",
 789         .longname = "Motech LPS-301",
 790         .api_version = 1,
 791         .init = std_init,
 792         .cleanup = std_cleanup,
 793         .scan = scan_lps301,
 794         .dev_list = std_dev_list,
 795         .dev_clear = dev_clear_lps301,
 796         .config_get = config_get,
 797         .config_set = config_set,
 798         .config_list = config_list,
 799         .dev_open = std_serial_dev_open,
 800         .dev_close = std_serial_dev_close,
 801         .dev_acquisition_start = dev_acquisition_start,
 802         .dev_acquisition_stop = std_serial_dev_acquisition_stop,
 803         .context = NULL,
 804 };
 805 SR_REGISTER_DEV_DRIVER(motech_lps_301_driver_info);