src/hardware/cem-dt-885x/protocol.c

   1 /*
   2  * This file is part of the libsigrok project.
   3  *
   4  * Copyright (C) 2013 Bert Vermeulen <bert@biot.com>
   5  *
   6  * This program is free software: you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation, either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include <config.h>
  21 #include <string.h>
  22 #include "protocol.h"
  23
  24 /* Length of expected payload for each token. */
  25 static const int token_payloads[][2] = {
  26         { TOKEN_WEIGHT_TIME_FAST, 0 },
  27         { TOKEN_WEIGHT_TIME_SLOW, 0 },
  28         { TOKEN_HOLD_MAX, 0 },
  29         { TOKEN_HOLD_MIN, 0 },
  30         { TOKEN_TIME, 3 },
  31         { TOKEN_MEAS_RANGE_OVER, 0 },
  32         { TOKEN_MEAS_RANGE_UNDER, 0 },
  33         { TOKEN_STORE_FULL, 0 },
  34         { TOKEN_RECORDING_ON, 0 },
  35         { TOKEN_MEAS_WAS_READOUT, 1 },
  36         { TOKEN_MEAS_WAS_BARGRAPH, 0 },
  37         { TOKEN_MEASUREMENT, 2 },
  38         { TOKEN_HOLD_NONE, 0 },
  39         { TOKEN_BATTERY_LOW, 0 },
  40         { TOKEN_MEAS_RANGE_OK, 0 },
  41         { TOKEN_STORE_OK, 0 },
  42         { TOKEN_RECORDING_OFF, 0 },
  43         { TOKEN_WEIGHT_FREQ_A, 1 },
  44         { TOKEN_WEIGHT_FREQ_C, 1 },
  45         { TOKEN_BATTERY_OK, 0 },
  46         { TOKEN_MEAS_RANGE_30_80, 0 },
  47         { TOKEN_MEAS_RANGE_30_130, 0 },
  48         { TOKEN_MEAS_RANGE_50_100, 0 },
  49         { TOKEN_MEAS_RANGE_80_130, 0 },
  50 };
  51
  52 static int find_token_payload_len(unsigned char c)
  53 {
  54         unsigned int i;
  55
  56         for (i = 0; i < ARRAY_SIZE(token_payloads); i++) {
  57                 if (token_payloads[i][0] == c)
  58                         return token_payloads[i][1];
  59         }
  60
  61         return -1;
  62 }
  63
  64 /* Process measurement or setting (0xa5 command). */
  65 static void process_mset(const struct sr_dev_inst *sdi)
  66 {
  67         struct dev_context *devc;
  68         struct sr_datafeed_packet packet;
  69         struct sr_datafeed_analog analog;
  70         GString *dbg;
  71         float fvalue;
  72         int i;
  73
  74         devc = sdi->priv;
  75         if (sr_log_loglevel_get() >= SR_LOG_SPEW) {
  76                 dbg = g_string_sized_new(128);
  77                 g_string_printf(dbg, "got command 0x%.2x token 0x%.2x",
  78                                 devc->cmd, devc->token);
  79                 if (devc->buf_len) {
  80                         g_string_append_printf(dbg, " payload");
  81                         for (i = 0; i < devc->buf_len; i++)
  82                                 g_string_append_printf(dbg, " %.2x", devc->buf[i]);
  83                 }
  84                 sr_spew("%s", dbg->str);
  85                 g_string_free(dbg, TRUE);
  86         }
  87
  88         switch (devc->token) {
  89         case TOKEN_WEIGHT_TIME_FAST:
  90                 devc->cur_mqflags |= SR_MQFLAG_SPL_TIME_WEIGHT_F;
  91                 devc->cur_mqflags &= ~SR_MQFLAG_SPL_TIME_WEIGHT_S;
  92                 break;
  93         case TOKEN_WEIGHT_TIME_SLOW:
  94                 devc->cur_mqflags |= SR_MQFLAG_SPL_TIME_WEIGHT_S;
  95                 devc->cur_mqflags &= ~SR_MQFLAG_SPL_TIME_WEIGHT_F;
  96                 break;
  97         case TOKEN_WEIGHT_FREQ_A:
  98                 devc->cur_mqflags |= SR_MQFLAG_SPL_FREQ_WEIGHT_A;
  99                 devc->cur_mqflags &= ~SR_MQFLAG_SPL_FREQ_WEIGHT_C;
 100                 break;
 101         case TOKEN_WEIGHT_FREQ_C:
 102                 devc->cur_mqflags |= SR_MQFLAG_SPL_FREQ_WEIGHT_C;
 103                 devc->cur_mqflags &= ~SR_MQFLAG_SPL_FREQ_WEIGHT_A;
 104                 break;
 105         case TOKEN_HOLD_MAX:
 106                 devc->cur_mqflags |= SR_MQFLAG_HOLD | SR_MQFLAG_MAX;
 107                 devc->cur_mqflags &= ~SR_MQFLAG_MIN;
 108                 break;
 109         case TOKEN_HOLD_MIN:
 110                 devc->cur_mqflags |= SR_MQFLAG_HOLD | SR_MQFLAG_MIN;
 111                 devc->cur_mqflags &= ~SR_MQFLAG_MAX;
 112                 break;
 113         case TOKEN_HOLD_NONE:
 114                 devc->cur_mqflags &= ~(SR_MQFLAG_MAX | SR_MQFLAG_MIN | SR_MQFLAG_HOLD);
 115                 break;
 116         case TOKEN_MEASUREMENT:
 117                 fvalue = ((devc->buf[0] & 0xf0) >> 4) * 100;
 118                 fvalue += (devc->buf[0] & 0x0f) * 10;
 119                 fvalue += ((devc->buf[1] & 0xf0) >> 4);
 120                 fvalue += (devc->buf[1] & 0x0f) / 10.0;
 121                 devc->last_spl = fvalue;
 122                 break;
 123         case TOKEN_MEAS_WAS_READOUT:
 124         case TOKEN_MEAS_WAS_BARGRAPH:
 125                 if (devc->cur_mqflags & (SR_MQFLAG_MAX | SR_MQFLAG_MIN)) {
 126                         if (devc->token == TOKEN_MEAS_WAS_BARGRAPH) {
 127                                 /* The device still sends bargraph measurements even
 128                                  * when in max/min hold mode. Suppress them here, unless
 129                                  * they're readout values. This duplicates the behavior
 130                                  * of the device display exactly. */
 131                                 break;
 132                         }
 133                 }
 134                 memset(&analog, 0, sizeof(struct sr_datafeed_analog));
 135                 analog.mq = SR_MQ_SOUND_PRESSURE_LEVEL;
 136                 analog.mqflags = devc->cur_mqflags;
 137                 analog.unit = SR_UNIT_DECIBEL_SPL;
 138                 analog.channels = sdi->channels;
 139                 analog.num_samples = 1;
 140                 analog.data = &devc->last_spl;
 141                 packet.type = SR_DF_ANALOG;
 142                 packet.payload = &analog;
 143                 sr_session_send(devc->cb_data, &packet);
 144
 145                 devc->num_samples++;
 146                 if (devc->limit_samples && devc->num_samples >= devc->limit_samples)
 147                         sdi->driver->dev_acquisition_stop((struct sr_dev_inst *)sdi,
 148                                         devc->cb_data);
 149                 break;
 150         case TOKEN_RECORDING_ON:
 151                 devc->recording = TRUE;
 152                 break;
 153         case TOKEN_RECORDING_OFF:
 154                 devc->recording = FALSE;
 155                 break;
 156         case TOKEN_MEAS_RANGE_30_80:
 157         case TOKEN_MEAS_RANGE_30_130:
 158         case TOKEN_MEAS_RANGE_50_100:
 159         case TOKEN_MEAS_RANGE_80_130:
 160                 devc->cur_meas_range = devc->token;
 161                 break;
 162         case TOKEN_TIME:
 163         case TOKEN_STORE_OK:
 164         case TOKEN_STORE_FULL:
 165         case TOKEN_BATTERY_OK:
 166         case TOKEN_BATTERY_LOW:
 167         case TOKEN_MEAS_RANGE_OK:
 168         case TOKEN_MEAS_RANGE_OVER:
 169         case TOKEN_MEAS_RANGE_UNDER:
 170                 /* Not useful, or not expressible in sigrok. */
 171                 break;
 172         }
 173
 174 }
 175
 176 static void send_data(const struct sr_dev_inst *sdi, unsigned char *data,
 177                 uint64_t num_samples)
 178 {
 179         struct dev_context *devc;
 180         struct sr_datafeed_packet packet;
 181         struct sr_datafeed_analog analog;
 182         float fbuf[SAMPLES_PER_PACKET];
 183         unsigned int i;
 184
 185         devc = sdi->priv;
 186
 187         for (i = 0; i < num_samples; i ++) {
 188                 fbuf[i] = ((data[i * 2] & 0xf0) >> 4) * 100;
 189                 fbuf[i] += (data[i * 2] & 0x0f) * 10;
 190                 fbuf[i] += ((data[i * 2 + 1] & 0xf0) >> 4);
 191                 fbuf[i] += (data[i * 2 + 1] & 0x0f) / 10.0;
 192         }
 193         memset(&analog, 0, sizeof(struct sr_datafeed_analog));
 194         analog.mq = SR_MQ_SOUND_PRESSURE_LEVEL;
 195         analog.mqflags = devc->cur_mqflags;
 196         analog.unit = SR_UNIT_DECIBEL_SPL;
 197         analog.channels = sdi->channels;
 198         analog.num_samples = num_samples;
 199         analog.data = fbuf;
 200         packet.type = SR_DF_ANALOG;
 201         packet.payload = &analog;
 202         sr_session_send(devc->cb_data, &packet);
 203
 204         devc->num_samples += analog.num_samples;
 205         if (devc->limit_samples && devc->num_samples >= devc->limit_samples)
 206                 sdi->driver->dev_acquisition_stop((struct sr_dev_inst *)sdi,
 207                                 devc->cb_data);
 208
 209         return;
 210 }
 211
 212 static void process_byte(const struct sr_dev_inst *sdi, const unsigned char c,
 213                 int handle_packets)
 214 {
 215         struct dev_context *devc;
 216         struct sr_datafeed_packet packet;
 217         struct sr_datafeed_meta meta;
 218         struct sr_config *src;
 219         gint64 cur_time;
 220         int len;
 221
 222         if (!(devc = sdi->priv))
 223                 return;
 224
 225         if (c == 0xff) {
 226                 /* Device is in hold mode */
 227                 devc->cur_mqflags |= SR_MQFLAG_HOLD;
 228
 229                 if (devc->hold_last_sent == 0) {
 230                         /* First hold notification. */
 231                         devc->hold_last_sent = g_get_monotonic_time();
 232                         /* When the device leaves hold mode, it starts from scratch. */
 233                         devc->state = ST_INIT;
 234                 } else {
 235                         cur_time = g_get_monotonic_time();
 236                         if (cur_time - devc->hold_last_sent > HOLD_REPEAT_INTERVAL) {
 237                                 /* Force the last measurement out again. */
 238                                 devc->cmd = 0xa5;
 239                                 devc->token = TOKEN_MEAS_WAS_READOUT;
 240                                 if (handle_packets)
 241                                         process_mset(sdi);
 242                                 devc->hold_last_sent = cur_time;
 243                         }
 244                 }
 245
 246                 return;
 247         }
 248         devc->cur_mqflags &= ~SR_MQFLAG_HOLD;
 249         devc->hold_last_sent = 0;
 250
 251         if (devc->state == ST_INIT) {
 252                 if (c == 0xa5) {
 253                         devc->cmd = c;
 254                         devc->token = 0x00;
 255                         devc->state = ST_GET_TOKEN;
 256                 } else if (c == 0xbb) {
 257                         devc->cmd = c;
 258                         devc->buf_len = 0;
 259                         devc->state = ST_GET_LOG_HEADER;
 260                         sr_dbg("got command 0xbb");
 261                 }
 262         } else if (devc->state == ST_GET_TOKEN) {
 263                 devc->token = c;
 264                 devc->buf_len = 0;
 265                 len = find_token_payload_len(devc->token);
 266                 if (len == -1 || len > 0) {
 267                         devc->buf_len = 0;
 268                         devc->state = ST_GET_DATA;
 269                 } else {
 270                         if (handle_packets)
 271                                 process_mset(sdi);
 272                         devc->state = ST_INIT;
 273                 }
 274         } else if (devc->state == ST_GET_DATA) {
 275                 len = find_token_payload_len(devc->token);
 276                 if (len == -1) {
 277                         /* We don't know this token. */
 278                         sr_dbg("Unknown 0xa5 token 0x%.2x", devc->token);
 279                         if (c == 0xa5 || c == 0xbb) {
 280                                 /* Looks like a new command however. */
 281                                 if (handle_packets)
 282                                         process_mset(sdi);
 283                                 devc->state = ST_INIT;
 284                         } else {
 285                                 devc->buf[devc->buf_len++] = c;
 286                                 if (devc->buf_len > BUF_SIZE) {
 287                                         /* Shouldn't happen, ignore. */
 288                                         devc->state = ST_INIT;
 289                                 }
 290                         }
 291                 } else {
 292                         devc->buf[devc->buf_len++] = c;
 293                         if (devc->buf_len == len) {
 294                                 if (handle_packets)
 295                                         process_mset(sdi);
 296                                 devc->state = ST_INIT;
 297                         } else if (devc->buf_len > BUF_SIZE) {
 298                                 /* Shouldn't happen, ignore. */
 299                                 devc->state = ST_INIT;
 300                         }
 301                 }
 302         } else if (devc->state == ST_GET_LOG_HEADER) {
 303                 sr_dbg("log header: 0x%.2x", c);
 304                 if (devc->buf_len < 2)
 305                         devc->buf[devc->buf_len++] = c;
 306                 if (devc->buf_len == 2) {
 307                         sr_dbg("Device says it has %d bytes stored.",
 308                                         ((devc->buf[0] << 8) + devc->buf[1]) - 100);
 309                         devc->buf_len = 0;
 310                         devc->state = ST_GET_LOG_RECORD_META;
 311                 }
 312         } else if (devc->state == ST_GET_LOG_RECORD_META) {
 313                 sr_dbg("log meta: 0x%.2x", c);
 314                 if (c == RECORD_END) {
 315                         devc->state = ST_INIT;
 316                         /* Stop acquisition after transferring all stored
 317                          * records. Otherwise the frontend would have no
 318                          * way to tell where stored data ends and live
 319                          * measurements begin. */
 320                         sdi->driver->dev_acquisition_stop((struct sr_dev_inst *)sdi,
 321                                         devc->cb_data);
 322                 } else if (c == RECORD_DATA) {
 323                         devc->buf_len = 0;
 324                         devc->state = ST_GET_LOG_RECORD_DATA;
 325                 } else {
 326                         /* RECORD_DBA/RECORD_DBC + 7 bytes of metadata */
 327                         devc->buf[devc->buf_len++] = c;
 328                         if (devc->buf_len < 8)
 329                                 /* Keep filling up the record header. */
 330                                 return;
 331                         if (devc->buf[0] == RECORD_DBA)
 332                                 devc->cur_mqflags = SR_MQFLAG_SPL_FREQ_WEIGHT_A;
 333                         else if (devc->buf[0] == RECORD_DBC)
 334                                 devc->cur_mqflags = SR_MQFLAG_SPL_FREQ_WEIGHT_C;
 335                         else {
 336                                 /* Shouldn't happen. */
 337                                 sr_dbg("Unknown record token 0x%.2x", c);
 338                                 return;
 339                         }
 340                         packet.type = SR_DF_META;
 341                         packet.payload = &meta;
 342                         src = sr_config_new(SR_CONF_SAMPLE_INTERVAL,
 343                                         g_variant_new_uint64(devc->buf[7] * 1000));
 344                         meta.config = g_slist_append(NULL, src);
 345                         sr_session_send(devc->cb_data, &packet);
 346                         g_free(src);
 347                         devc->buf_len = 0;
 348                 }
 349         } else if (devc->state == ST_GET_LOG_RECORD_DATA) {
 350                 sr_dbg("log data: 0x%.2x", c);
 351                 if (c == RECORD_DBA || c == RECORD_DBC || c == RECORD_DATA || c == RECORD_END) {
 352                         /* Work around off-by-one bug in device firmware. This
 353                          * happens only on the last record, i.e. before RECORD_END */
 354                         if (devc->buf_len & 1)
 355                                 devc->buf_len--;
 356                         /* Done with this set of samples */
 357                         send_data(sdi, devc->buf, devc->buf_len / 2);
 358                         devc->buf_len = 0;
 359
 360                         /* Process this meta marker in the right state. */
 361                         devc->state = ST_GET_LOG_RECORD_META;
 362                         process_byte(sdi, c, handle_packets);
 363                 } else {
 364                         devc->buf[devc->buf_len++] = c;
 365                         if (devc->buf_len == SAMPLES_PER_PACKET * 2) {
 366                                 send_data(sdi, devc->buf, devc->buf_len / 2);
 367                                 devc->buf_len = 0;
 368                         }
 369                 }
 370         }
 371
 372 }
 373
 374 SR_PRIV int cem_dt_885x_receive_data(int fd, int revents, void *cb_data)
 375 {
 376         const struct sr_dev_inst *sdi;
 377         struct dev_context *devc;
 378         struct sr_serial_dev_inst *serial;
 379         unsigned char c, cmd;
 380
 381         (void)fd;
 382
 383         if (!(sdi = cb_data))
 384                 return TRUE;
 385
 386         devc = sdi->priv;
 387         serial = sdi->conn;
 388         if (revents == G_IO_IN) {
 389                 if (serial_read_nonblocking(serial, &c, 1) != 1)
 390                         return TRUE;
 391                 process_byte(sdi, c, TRUE);
 392
 393                 if (devc->enable_data_source_memory) {
 394                         if (devc->state == ST_GET_LOG_HEADER) {
 395                                 /* Memory transfer started. */
 396                                 devc->enable_data_source_memory = FALSE;
 397                         } else {
 398                                 /* Tell device to start transferring from memory. */
 399                                 cmd = CMD_TRANSFER_MEMORY;
 400                                 serial_write_nonblocking(serial, &cmd, 1);
 401                         }
 402                 }
 403         }
 404
 405         return TRUE;
 406 }
 407
 408 static int wait_for_token(const struct sr_dev_inst *sdi, int8_t *tokens, int timeout)
 409 {
 410         struct dev_context *devc;
 411         struct sr_serial_dev_inst *serial;
 412         gint64 start_time;
 413         int i;
 414         unsigned char c;
 415
 416         serial = sdi->conn;
 417         devc = sdi->priv;
 418         devc->state = ST_INIT;
 419         start_time = g_get_monotonic_time() / 1000;
 420         while (TRUE) {
 421                 if (serial_read_nonblocking(serial, &c, 1) != 1)
 422                         /* Device might have gone away. */
 423                         return SR_ERR;
 424                 process_byte(sdi, c, FALSE);
 425                 if (devc->state != ST_INIT)
 426                         /* Wait for a whole packet to get processed. */
 427                         continue;
 428                 for (i = 0; tokens[i] != -1; i++) {
 429                         if (devc->token == tokens[i]) {
 430                                 sr_spew("wait_for_token: got token 0x%.2x", devc->token);
 431                                 return SR_OK;
 432                         }
 433                 }
 434                 if (timeout && g_get_monotonic_time() / 1000 - start_time > timeout)
 435                         return SR_ERR_TIMEOUT;
 436         }
 437
 438         return SR_OK;
 439 }
 440
 441 /* cmd is the command to send, tokens are the tokens that denote the state
 442  * which the command affects. The first token is the desired state. */
 443 static int cem_dt_885x_toggle(const struct sr_dev_inst *sdi, uint8_t cmd,
 444                 int8_t *tokens, int timeout)
 445 {
 446         struct dev_context *devc;
 447         struct sr_serial_dev_inst *serial;
 448
 449         serial = sdi->conn;
 450         devc = sdi->priv;
 451
 452         /* The device doesn't respond to commands very well. The
 453          * only thing to do is wait for the token that will confirm
 454          * whether the command worked or not, and resend if needed. */
 455         while (TRUE) {
 456                 if (serial_write_nonblocking(serial, (const void *)&cmd, 1) != 1)
 457                         return SR_ERR;
 458                 if (wait_for_token(sdi, tokens, timeout) == SR_ERR)
 459                         return SR_ERR;
 460                 if (devc->token == tokens[0])
 461                         /* It worked. */
 462                         break;
 463         }
 464
 465         return SR_OK;
 466 }
 467
 468 SR_PRIV gboolean cem_dt_885x_recording_get(const struct sr_dev_inst *sdi,
 469                 int *state)
 470 {
 471         struct dev_context *devc;
 472         int8_t tokens[5];
 473
 474         devc = sdi->priv;
 475         if (devc->recording == -1) {
 476                 /* Didn't pick up device state yet. */
 477                 tokens[0] = TOKEN_RECORDING_ON;
 478                 tokens[1] = TOKEN_RECORDING_OFF;
 479                 tokens[2] = -1;
 480                 if (wait_for_token(sdi, tokens, 510) != SR_OK)
 481                         return SR_ERR;
 482         }
 483         *state = devc->token == TOKEN_RECORDING_ON;
 484
 485         return SR_OK;
 486 }
 487
 488 SR_PRIV int cem_dt_885x_recording_set(const struct sr_dev_inst *sdi,
 489                 gboolean state)
 490 {
 491         struct dev_context *devc;
 492         int ret;
 493         int8_t tokens[5];
 494
 495         devc = sdi->priv;
 496
 497         /* The toggle below needs the desired state in first position. */
 498         if (state) {
 499                 tokens[0] = TOKEN_RECORDING_ON;
 500                 tokens[1] = TOKEN_RECORDING_OFF;
 501         } else {
 502                 tokens[0] = TOKEN_RECORDING_OFF;
 503                 tokens[1] = TOKEN_RECORDING_ON;
 504         }
 505         tokens[2] = -1;
 506
 507         if (devc->recording == -1) {
 508                 /* Didn't pick up device state yet. */
 509                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 510                         return SR_ERR;
 511                 if (devc->token == tokens[0])
 512                         /* Nothing to do. */
 513                         return SR_OK;
 514         } else if (devc->recording == state)
 515                 /* Nothing to do. */
 516                 return SR_OK;
 517
 518         /* Recording state notifications are sent at 2Hz, so allow just over
 519          * that, 510ms, for the state to come in. */
 520         ret = cem_dt_885x_toggle(sdi, CMD_TOGGLE_RECORDING, tokens, 510);
 521
 522         return ret;
 523 }
 524
 525 SR_PRIV int cem_dt_885x_weight_freq_get(const struct sr_dev_inst *sdi)
 526 {
 527         struct dev_context *devc;
 528         int cur_setting;
 529         int8_t tokens[5];
 530
 531         devc = sdi->priv;
 532
 533         cur_setting = devc->cur_mqflags & (SR_MQFLAG_SPL_FREQ_WEIGHT_A | SR_MQFLAG_SPL_FREQ_WEIGHT_C);
 534         if (cur_setting == 0) {
 535                 /* Didn't pick up device state yet. */
 536                 tokens[0] = TOKEN_WEIGHT_FREQ_A;
 537                 tokens[1] = TOKEN_WEIGHT_FREQ_C;
 538                 tokens[2] = -1;
 539                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 540                         return SR_ERR;
 541                 if (devc->token == TOKEN_WEIGHT_FREQ_A)
 542                         return SR_MQFLAG_SPL_FREQ_WEIGHT_A;
 543                 else
 544                         return SR_MQFLAG_SPL_FREQ_WEIGHT_C;
 545         } else
 546                 return cur_setting;
 547 }
 548
 549 SR_PRIV int cem_dt_885x_weight_freq_set(const struct sr_dev_inst *sdi, int freqw)
 550 {
 551         struct dev_context *devc;
 552         int cur_setting, ret;
 553         int8_t tokens[5];
 554
 555         devc = sdi->priv;
 556
 557         cur_setting = devc->cur_mqflags & (SR_MQFLAG_SPL_FREQ_WEIGHT_A | SR_MQFLAG_SPL_FREQ_WEIGHT_C);
 558         if (cur_setting == freqw)
 559                 /* Already set to this frequency weighting. */
 560                 return SR_OK;
 561
 562         /* The toggle below needs the desired state in first position. */
 563         if (freqw == SR_MQFLAG_SPL_FREQ_WEIGHT_A) {
 564                 tokens[0] = TOKEN_WEIGHT_FREQ_A;
 565                 tokens[1] = TOKEN_WEIGHT_FREQ_C;
 566         } else {
 567                 tokens[0] = TOKEN_WEIGHT_FREQ_C;
 568                 tokens[1] = TOKEN_WEIGHT_FREQ_A;
 569         }
 570         tokens[2] = -1;
 571
 572         if (cur_setting == 0) {
 573                 /* Didn't pick up device state yet. */
 574                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 575                         return SR_ERR;
 576                 if (devc->token == tokens[0])
 577                         /* Nothing to do. */
 578                         return SR_OK;
 579         }
 580
 581         /* 10ms timeout seems to work best for this. */
 582         ret = cem_dt_885x_toggle(sdi, CMD_TOGGLE_WEIGHT_FREQ, tokens, 10);
 583
 584         return ret;
 585 }
 586
 587 SR_PRIV int cem_dt_885x_weight_time_get(const struct sr_dev_inst *sdi)
 588 {
 589         struct dev_context *devc;
 590         int cur_setting;
 591         int8_t tokens[5];
 592
 593         devc = sdi->priv;
 594
 595         cur_setting = devc->cur_mqflags & (SR_MQFLAG_SPL_TIME_WEIGHT_F | SR_MQFLAG_SPL_TIME_WEIGHT_S);
 596         if (cur_setting == 0) {
 597                 /* Didn't pick up device state yet. */
 598                 tokens[0] = TOKEN_WEIGHT_TIME_FAST;
 599                 tokens[1] = TOKEN_WEIGHT_TIME_SLOW;
 600                 tokens[2] = -1;
 601                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 602                         return SR_ERR;
 603                 if (devc->token == TOKEN_WEIGHT_TIME_FAST)
 604                         return SR_MQFLAG_SPL_TIME_WEIGHT_F;
 605                 else
 606                         return SR_MQFLAG_SPL_TIME_WEIGHT_S;
 607         } else
 608                 return cur_setting;
 609 }
 610
 611 SR_PRIV int cem_dt_885x_weight_time_set(const struct sr_dev_inst *sdi, int timew)
 612 {
 613         struct dev_context *devc;
 614         int cur_setting, ret;
 615         int8_t tokens[5];
 616
 617         devc = sdi->priv;
 618
 619         cur_setting = devc->cur_mqflags & (SR_MQFLAG_SPL_TIME_WEIGHT_F | SR_MQFLAG_SPL_TIME_WEIGHT_S);
 620         if (cur_setting == timew)
 621                 /* Already set to this time weighting. */
 622                 return SR_OK;
 623
 624         /* The toggle below needs the desired state in first position. */
 625         if (timew == SR_MQFLAG_SPL_TIME_WEIGHT_F) {
 626                 tokens[0] = TOKEN_WEIGHT_TIME_FAST;
 627                 tokens[1] = TOKEN_WEIGHT_TIME_SLOW;
 628         } else {
 629                 tokens[0] = TOKEN_WEIGHT_TIME_SLOW;
 630                 tokens[1] = TOKEN_WEIGHT_TIME_FAST;
 631         }
 632         tokens[2] = -1;
 633
 634         if (cur_setting == 0) {
 635                 /* Didn't pick up device state yet. */
 636                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 637                         return SR_ERR;
 638                 if (devc->token == tokens[0])
 639                         /* Nothing to do. */
 640                         return SR_OK;
 641         }
 642
 643         /* 51ms timeout seems to work best for this. */
 644         ret = cem_dt_885x_toggle(sdi, CMD_TOGGLE_WEIGHT_TIME, tokens, 51);
 645
 646         return ret;
 647 }
 648
 649 SR_PRIV int cem_dt_885x_holdmode_get(const struct sr_dev_inst *sdi,
 650                 gboolean *holdmode)
 651 {
 652         struct dev_context *devc;
 653         int8_t tokens[5];
 654
 655         devc = sdi->priv;
 656
 657         if (devc->cur_mqflags == 0) {
 658                 tokens[0] = TOKEN_HOLD_MAX;
 659                 tokens[1] = TOKEN_HOLD_MIN;
 660                 tokens[2] = TOKEN_HOLD_NONE;
 661                 tokens[3] = -1;
 662                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 663                         return SR_ERR;
 664                 if (devc->token == TOKEN_HOLD_MAX)
 665                         devc->cur_mqflags = SR_MQFLAG_MAX;
 666                 else if (devc->token == TOKEN_HOLD_MIN)
 667                         devc->cur_mqflags = SR_MQFLAG_MIN;
 668         }
 669         *holdmode = devc->cur_mqflags & (SR_MQFLAG_MAX | SR_MQFLAG_MIN);
 670
 671         return SR_OK;
 672 }
 673
 674 SR_PRIV int cem_dt_885x_holdmode_set(const struct sr_dev_inst *sdi, int holdmode)
 675 {
 676         struct dev_context *devc;
 677         int cur_setting, ret;
 678         int8_t tokens[5];
 679
 680         devc = sdi->priv;
 681
 682         /* The toggle below needs the desired state in first position. */
 683         if (holdmode == SR_MQFLAG_MAX) {
 684                 tokens[0] = TOKEN_HOLD_MAX;
 685                 tokens[1] = TOKEN_HOLD_MIN;
 686                 tokens[2] = TOKEN_HOLD_NONE;
 687         } else if (holdmode == SR_MQFLAG_MIN) {
 688                 tokens[0] = TOKEN_HOLD_MIN;
 689                 tokens[1] = TOKEN_HOLD_MAX;
 690                 tokens[2] = TOKEN_HOLD_NONE;
 691         } else {
 692                 tokens[0] = TOKEN_HOLD_NONE;
 693                 tokens[1] = TOKEN_HOLD_MAX;
 694                 tokens[2] = TOKEN_HOLD_MIN;
 695         }
 696         tokens[3] = -1;
 697
 698         if (devc->cur_mqflags == 0) {
 699                 /* Didn't pick up device state yet. */
 700                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 701                         return SR_ERR;
 702                 if (devc->token == tokens[0])
 703                         /* Nothing to do. */
 704                         return SR_OK;
 705         } else {
 706                 cur_setting = devc->cur_mqflags & (SR_MQFLAG_MAX | SR_MQFLAG_MIN);
 707                 if (cur_setting == holdmode)
 708                         /* Already set correctly. */
 709                         return SR_OK;
 710         }
 711
 712         /* 51ms timeout seems to work best for this. */
 713         ret = cem_dt_885x_toggle(sdi, CMD_TOGGLE_HOLD_MAX_MIN, tokens, 51);
 714
 715         return ret;
 716 }
 717
 718 SR_PRIV int cem_dt_885x_meas_range_get(const struct sr_dev_inst *sdi,
 719                 uint64_t *low, uint64_t *high)
 720 {
 721         struct dev_context *devc;
 722         int8_t tokens[5];
 723
 724         devc = sdi->priv;
 725         if (devc->cur_meas_range == 0) {
 726                 tokens[0] = TOKEN_MEAS_RANGE_30_130;
 727                 tokens[1] = TOKEN_MEAS_RANGE_30_80;
 728                 tokens[2] = TOKEN_MEAS_RANGE_50_100;
 729                 tokens[3] = TOKEN_MEAS_RANGE_80_130;
 730                 tokens[4] = -1;
 731                 if (wait_for_token(sdi, tokens, 0) != SR_OK)
 732                         return SR_ERR;
 733                 devc->cur_meas_range = devc->token;
 734         }
 735
 736         switch (devc->cur_meas_range) {
 737         case TOKEN_MEAS_RANGE_30_130:
 738                 *low = 30;
 739                 *high = 130;
 740                 break;
 741         case TOKEN_MEAS_RANGE_30_80:
 742                 *low = 30;
 743                 *high = 80;
 744                 break;
 745         case TOKEN_MEAS_RANGE_50_100:
 746                 *low = 50;
 747                 *high = 100;
 748                 break;
 749         case TOKEN_MEAS_RANGE_80_130:
 750                 *low = 80;
 751                 *high = 130;
 752                 break;
 753         default:
 754                 return SR_ERR;
 755         }
 756
 757         return SR_OK;
 758 }
 759
 760 SR_PRIV int cem_dt_885x_meas_range_set(const struct sr_dev_inst *sdi,
 761                 uint64_t low, uint64_t high)
 762 {
 763         struct dev_context *devc;
 764         int ret;
 765         int8_t token, tokens[6];
 766
 767         devc = sdi->priv;
 768         if (low == 30 && high == 130)
 769                 token = TOKEN_MEAS_RANGE_30_130;
 770         else if (low == 30 &&  high == 80)
 771                 token = TOKEN_MEAS_RANGE_30_80;
 772         else if (low == 50 &&  high == 100)
 773                 token = TOKEN_MEAS_RANGE_50_100;
 774         else if (low == 80 &&  high == 130)
 775                 token = TOKEN_MEAS_RANGE_80_130;
 776         else
 777                 return SR_ERR;
 778
 779         sr_dbg("want 0x%.2x", token);
 780         /* The toggle below needs the desired state in first position. */
 781         tokens[0] = token;
 782         tokens[1] = TOKEN_MEAS_RANGE_30_130;
 783         tokens[2] = TOKEN_MEAS_RANGE_30_80;
 784         tokens[3] = TOKEN_MEAS_RANGE_50_100;
 785         tokens[4] = TOKEN_MEAS_RANGE_80_130;
 786         tokens[5] = -1;
 787
 788         if (devc->cur_meas_range == 0) {
 789                 /* 110ms should be enough for two of these announcements */
 790                 if (wait_for_token(sdi, tokens, 110) != SR_OK)
 791                         return SR_ERR;
 792                 devc->cur_meas_range = devc->token;
 793         }
 794
 795         if (devc->cur_meas_range == token)
 796                 /* Already set to this range. */
 797                 return SR_OK;
 798
 799         /* For measurement range, it works best to ignore announcements of the
 800          * current setting and keep resending the toggle quickly. */
 801         tokens[1] = -1;
 802         ret = cem_dt_885x_toggle(sdi, CMD_TOGGLE_MEAS_RANGE, tokens, 11);
 803
 804         return ret;
 805 }
 806
 807 SR_PRIV int cem_dt_885x_power_off(const struct sr_dev_inst *sdi)
 808 {
 809         struct sr_serial_dev_inst *serial;
 810         char c, cmd;
 811
 812         serial = sdi->conn;
 813
 814         cmd = CMD_TOGGLE_POWER_OFF;
 815         while (TRUE) {
 816                 serial_flush(serial);
 817                 if (serial_write_nonblocking(serial, (const void *)&cmd, 1) != 1)
 818                         return SR_ERR;
 819                 /* It never takes more than 23ms for the next token to arrive. */
 820                 g_usleep(25 * 1000);
 821                 if (serial_read_nonblocking(serial, &c, 1) != 1)
 822                         /* Device is no longer responding. Good! */
 823                         break;
 824         }
 825
 826         /* In case the user manually turns on the device again, reset
 827          * the port back to blocking. */
 828         serial_close(serial);
 829         serial_open(serial, SERIAL_RDWR);
 830
 831         return SR_OK;
 832 }