hardware/link-mso19/link-mso19.c

   1 /*
   2  * This file is part of the sigrok project.
   3  *
   4  * Copyright (C) 2011 Daniel Ribeiro <drwyrm@gmail.com>
   5  * Copyright (C) 2012 Renato Caldas <rmsc@fe.up.pt>
   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 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <unistd.h>
  25 #include <fcntl.h>
  26 #include <sys/time.h>
  27 #include <inttypes.h>
  28 #include <glib.h>
  29 #include <libudev.h>
  30 #include <arpa/inet.h>
  31 #include "sigrok.h"
  32 #include "sigrok-internal.h"
  33 #include "link-mso19.h"
  34
  35 #define USB_VENDOR "3195"
  36 #define USB_PRODUCT "f190"
  37
  38 #define NUM_PROBES 8
  39
  40 static int capabilities[] = {
  41         SR_HWCAP_LOGIC_ANALYZER,
  42 //      SR_HWCAP_OSCILLOSCOPE,
  43 //      SR_HWCAP_PAT_GENERATOR,
  44
  45         SR_HWCAP_SAMPLERATE,
  46 //      SR_HWCAP_CAPTURE_RATIO,
  47         SR_HWCAP_LIMIT_SAMPLES,
  48         0,
  49 };
  50
  51 static const char *probe_names[NUM_PROBES + 1] = {
  52         "0",
  53         "1",
  54         "2",
  55         "3",
  56         "4",
  57         "5",
  58         "6",
  59         "7",
  60         NULL,
  61 };
  62
  63 static uint64_t supported_samplerates[] = {
  64         SR_HZ(100),
  65         SR_HZ(200),
  66         SR_HZ(500),
  67         SR_KHZ(1),
  68         SR_KHZ(2),
  69         SR_KHZ(5),
  70         SR_KHZ(10),
  71         SR_KHZ(20),
  72         SR_KHZ(50),
  73         SR_KHZ(100),
  74         SR_KHZ(200),
  75         SR_KHZ(500),
  76         SR_MHZ(1),
  77         SR_MHZ(2),
  78         SR_MHZ(5),
  79         SR_MHZ(10),
  80         SR_MHZ(20),
  81         SR_MHZ(50),
  82         SR_MHZ(100),
  83         SR_MHZ(200),
  84         0,
  85 };
  86
  87 static struct sr_samplerates samplerates = {
  88         SR_HZ(100),
  89         SR_MHZ(200),
  90         SR_HZ(0),
  91         supported_samplerates,
  92 };
  93
  94 static GSList *device_instances = NULL;
  95
  96 static int mso_send_control_message(struct sr_device_instance *sdi,
  97                 uint16_t payload[], int n)
  98 {
  99         int fd = sdi->serial->fd;
 100         int i, w, ret, s = n * 2 + sizeof(mso_head) + sizeof(mso_foot);
 101         char *p, *buf;
 102
 103         ret = SR_ERR;
 104
 105         if (fd < 0)
 106                 goto ret;
 107
 108         if (!(buf = g_try_malloc(s))) {
 109                 sr_err("mso19: %s: buf malloc failed", __func__);
 110                 ret = SR_ERR_MALLOC;
 111                 goto ret;
 112         }
 113
 114         p = buf;
 115         memcpy(p, mso_head, sizeof(mso_head));
 116         p += sizeof(mso_head);
 117
 118         for (i = 0; i < n; i++) {
 119                 *(uint16_t *) p = htons(payload[i]);
 120                 p += 2;
 121         }
 122         memcpy(p, mso_foot, sizeof(mso_foot));
 123
 124         w = 0;
 125         while (w < s) {
 126                 ret = serial_write(fd, buf + w, s - w);
 127                 if (ret < 0) {
 128                         ret = SR_ERR;
 129                         goto free;
 130                 }
 131                 w += ret;
 132         }
 133         ret = SR_OK;
 134 free:
 135         g_free(buf);
 136 ret:
 137         return ret;
 138 }
 139
 140 static int mso_reset_adc(struct sr_device_instance *sdi)
 141 {
 142         struct mso *mso = sdi->priv;
 143         uint16_t ops[2];
 144
 145         ops[0] = mso_trans(REG_CTL1, (mso->ctlbase1 | BIT_CTL1_RESETADC));
 146         ops[1] = mso_trans(REG_CTL1, mso->ctlbase1);
 147         mso->ctlbase1 |= BIT_CTL1_ADC_UNKNOWN4;
 148
 149         sr_dbg("Requesting ADC reset");
 150         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 151 }
 152
 153 static int mso_reset_fsm(struct sr_device_instance *sdi)
 154 {
 155         struct mso *mso = sdi->priv;
 156         uint16_t ops[1];
 157
 158         mso->ctlbase1 |= BIT_CTL1_RESETFSM;
 159         ops[0] = mso_trans(REG_CTL1, mso->ctlbase1);
 160
 161         sr_dbg("Requesting ADC reset");
 162         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 163 }
 164
 165 static int mso_toggle_led(struct sr_device_instance *sdi, int state)
 166 {
 167         struct mso *mso = sdi->priv;
 168         uint16_t ops[1];
 169
 170         mso->ctlbase1 &= ~BIT_CTL1_LED;
 171         if (state)
 172                 mso->ctlbase1 |= BIT_CTL1_LED;
 173         ops[0] = mso_trans(REG_CTL1, mso->ctlbase1);
 174
 175         sr_dbg("Requesting LED toggle");
 176         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 177 }
 178
 179 static int mso_check_trigger(struct sr_device_instance *sdi,
 180                 uint8_t *info)
 181 {
 182         uint16_t ops[] = { mso_trans(REG_TRIGGER, 0) };
 183         char buf[1];
 184         int ret;
 185
 186         sr_dbg("Requesting trigger state");
 187         ret = mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 188         if (info == NULL || ret != SR_OK)
 189                 return ret;
 190
 191         buf[0] = 0;
 192         if (serial_read(sdi->serial->fd, buf, 1) != 1) /* FIXME: Need timeout */
 193                 ret = SR_ERR;
 194         *info = buf[0];
 195
 196         sr_dbg("Trigger state is: 0x%x", *info);
 197         return ret;
 198 }
 199
 200 static int mso_read_buffer(struct sr_device_instance *sdi)
 201 {
 202         uint16_t ops[] = { mso_trans(REG_BUFFER, 0) };
 203
 204         sr_dbg("Requesting buffer dump");
 205         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 206 }
 207
 208 static int mso_arm(struct sr_device_instance *sdi)
 209 {
 210         struct mso *mso = sdi->priv;
 211         uint16_t ops[] = {
 212                 mso_trans(REG_CTL1, mso->ctlbase1 | BIT_CTL1_RESETFSM),
 213                 mso_trans(REG_CTL1, mso->ctlbase1 | BIT_CTL1_ARM),
 214                 mso_trans(REG_CTL1, mso->ctlbase1),
 215         };
 216
 217         sr_dbg("Requesting trigger arm");
 218         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 219 }
 220
 221 static int mso_force_capture(struct sr_device_instance *sdi)
 222 {
 223         struct mso *mso = sdi->priv;
 224         uint16_t ops[] = {
 225                 mso_trans(REG_CTL1, mso->ctlbase1 | 8),
 226                 mso_trans(REG_CTL1, mso->ctlbase1),
 227         };
 228
 229         sr_dbg("Requesting forced capture");
 230         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 231 }
 232
 233 static int mso_dac_out(struct sr_device_instance *sdi, uint16_t val)
 234 {
 235         struct mso *mso = sdi->priv;
 236         uint16_t ops[] = {
 237                 mso_trans(REG_DAC1, (val >> 8) & 0xff),
 238                 mso_trans(REG_DAC2, val & 0xff),
 239                 mso_trans(REG_CTL1, mso->ctlbase1 | BIT_CTL1_RESETADC),
 240         };
 241
 242         sr_dbg("Setting dac word to 0x%x", val);
 243         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 244 }
 245
 246 static int mso_clkrate_out(struct sr_device_instance *sdi, uint16_t val)
 247 {
 248         uint16_t ops[] = {
 249                 mso_trans(REG_CLKRATE1, (val >> 8) & 0xff),
 250                 mso_trans(REG_CLKRATE2, val & 0xff),
 251         };
 252
 253         sr_dbg("Setting clkrate word to 0x%x", val);
 254         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 255 }
 256
 257 static int mso_configure_rate(struct sr_device_instance *sdi,
 258                 uint32_t rate)
 259 {
 260         struct mso *mso = sdi->priv;
 261         unsigned int i;
 262         int ret = SR_ERR;
 263
 264         for (i = 0; i < ARRAY_SIZE(rate_map); i++) {
 265                 if (rate_map[i].rate == rate) {
 266                         mso->ctlbase2 = rate_map[i].slowmode;
 267                         ret = mso_clkrate_out(sdi, rate_map[i].val);
 268                         if (ret == SR_OK)
 269                                 mso->cur_rate = rate;
 270                         return ret;
 271                 }
 272         }
 273         return ret;
 274 }
 275
 276 static inline uint16_t mso_calc_raw_from_mv(struct mso *mso)
 277 {
 278         return (uint16_t) (0x200 -
 279                         ((mso->dso_trigger_voltage / mso->dso_probe_attn) /
 280                          mso->vbit));
 281 }
 282
 283 static int mso_configure_trigger(struct sr_device_instance *sdi)
 284 {
 285         struct mso *mso = sdi->priv;
 286         uint16_t ops[16];
 287         uint16_t dso_trigger = mso_calc_raw_from_mv(mso);
 288
 289         dso_trigger &= 0x3ff;
 290         if ((!mso->trigger_slope && mso->trigger_chan == 1) ||
 291                         (mso->trigger_slope &&
 292                          (mso->trigger_chan == 0 ||
 293                           mso->trigger_chan == 2 ||
 294                           mso->trigger_chan == 3)))
 295                 dso_trigger |= 0x400;
 296
 297         switch (mso->trigger_chan) {
 298         case 1:
 299                 dso_trigger |= 0xe000;
 300         case 2:
 301                 dso_trigger |= 0x4000;
 302                 break;
 303         case 3:
 304                 dso_trigger |= 0x2000;
 305                 break;
 306         case 4:
 307                 dso_trigger |= 0xa000;
 308                 break;
 309         case 5:
 310                 dso_trigger |= 0x8000;
 311                 break;
 312         default:
 313         case 0:
 314                 break;
 315         }
 316
 317         switch (mso->trigger_outsrc) {
 318         case 1:
 319                 dso_trigger |= 0x800;
 320                 break;
 321         case 2:
 322                 dso_trigger |= 0x1000;
 323                 break;
 324         case 3:
 325                 dso_trigger |= 0x1800;
 326                 break;
 327
 328         }
 329
 330         ops[0] = mso_trans(5, mso->la_trigger);
 331         ops[1] = mso_trans(6, mso->la_trigger_mask);
 332         ops[2] = mso_trans(3, dso_trigger & 0xff);
 333         ops[3] = mso_trans(4, (dso_trigger >> 8) & 0xff);
 334         ops[4] = mso_trans(11,
 335                         mso->dso_trigger_width / SR_HZ_TO_NS(mso->cur_rate));
 336
 337         /* Select the SPI/I2C trigger config bank */
 338         ops[5] = mso_trans(REG_CTL2, (mso->ctlbase2 | BITS_CTL2_BANK(2)));
 339         /* Configure the SPI/I2C protocol trigger */
 340         ops[6] = mso_trans(REG_PT_WORD(0), mso->protocol_trigger.word[0]);
 341         ops[7] = mso_trans(REG_PT_WORD(1), mso->protocol_trigger.word[1]);
 342         ops[8] = mso_trans(REG_PT_WORD(2), mso->protocol_trigger.word[2]);
 343         ops[9] = mso_trans(REG_PT_WORD(3), mso->protocol_trigger.word[3]);
 344         ops[10] = mso_trans(REG_PT_MASK(0), mso->protocol_trigger.mask[0]);
 345         ops[11] = mso_trans(REG_PT_MASK(1), mso->protocol_trigger.mask[1]);
 346         ops[12] = mso_trans(REG_PT_MASK(2), mso->protocol_trigger.mask[2]);
 347         ops[13] = mso_trans(REG_PT_MASK(3), mso->protocol_trigger.mask[3]);
 348         ops[14] = mso_trans(REG_PT_SPIMODE, mso->protocol_trigger.spimode);
 349         /* Select the default config bank */
 350         ops[15] = mso_trans(REG_CTL2, mso->ctlbase2);
 351
 352         return mso_send_control_message(sdi, ARRAY_AND_SIZE(ops));
 353 }
 354
 355 static int mso_configure_threshold_level(struct sr_device_instance *sdi)
 356 {
 357         struct mso *mso = sdi->priv;
 358
 359         return mso_dac_out(sdi, la_threshold_map[mso->la_threshold]);
 360 }
 361
 362 static int mso_parse_serial(const char *iSerial, const char *iProduct,
 363                 struct mso *mso)
 364 {
 365         unsigned int u1, u2, u3, u4, u5, u6;
 366
 367         iProduct = iProduct;
 368         /* FIXME: This code is in the original app, but I think its
 369          * used only for the GUI */
 370 /*      if (strstr(iProduct, "REV_02") || strstr(iProduct, "REV_03"))
 371                 mso->num_sample_rates = 0x16;
 372         else
 373                 mso->num_sample_rates = 0x10; */
 374
 375         /* parse iSerial */
 376         if (iSerial[0] != '4' || sscanf(iSerial, "%5u%3u%3u%1u%1u%6u",
 377                                 &u1, &u2, &u3, &u4, &u5, &u6) != 6)
 378                 return SR_ERR;
 379         mso->hwmodel = u4;
 380         mso->hwrev = u5;
 381         mso->serial = u6;
 382         mso->vbit = u1 / 10000;
 383         if (mso->vbit == 0)
 384                 mso->vbit = 4.19195;
 385         mso->dac_offset = u2;
 386         if (mso->dac_offset == 0)
 387                 mso->dac_offset = 0x1ff;
 388         mso->offset_range = u3;
 389         if (mso->offset_range == 0)
 390                 mso->offset_range = 0x17d;
 391
 392         /*
 393          * FIXME: There is more code on the original software to handle
 394          * bigger iSerial strings, but as I can't test on my device
 395          * I will not implement it yet
 396          */
 397
 398         return SR_OK;
 399 }
 400
 401 static int hw_init(const char *deviceinfo)
 402 {
 403         struct sr_device_instance *sdi;
 404         int devcnt = 0;
 405         struct udev *udev;
 406         struct udev_enumerate *enumerate;
 407         struct udev_list_entry *devices, *dev_list_entry;
 408         struct mso *mso;
 409
 410         deviceinfo = deviceinfo;
 411
 412         /* It's easier to map usb<->serial using udev */
 413         /*
 414          * FIXME: On windows we can get the same information from the
 415          * registry, add an #ifdef here later
 416          */
 417         udev = udev_new();
 418         if (!udev) {
 419                 sr_err("Failed to initialize udev.");
 420                 goto ret;
 421         }
 422         enumerate = udev_enumerate_new(udev);
 423         udev_enumerate_add_match_subsystem(enumerate, "usb-serial");
 424         udev_enumerate_scan_devices(enumerate);
 425         devices = udev_enumerate_get_list_entry(enumerate);
 426         udev_list_entry_foreach(dev_list_entry, devices) {
 427                 const char *syspath, *sysname, *idVendor, *idProduct,
 428                         *iSerial, *iProduct;
 429                 char path[32], manufacturer[32], product[32], hwrev[32];
 430                 struct udev_device *dev, *parent;
 431                 size_t s;
 432
 433                 syspath = udev_list_entry_get_name(dev_list_entry);
 434                 dev = udev_device_new_from_syspath(udev, syspath);
 435                 sysname = udev_device_get_sysname(dev);
 436                 parent = udev_device_get_parent_with_subsystem_devtype(
 437                                 dev, "usb", "usb_device");
 438                 if (!parent) {
 439                         sr_err("Unable to find parent usb device for %s",
 440                                sysname);
 441                         continue;
 442                 }
 443
 444                 idVendor = udev_device_get_sysattr_value(parent, "idVendor");
 445                 idProduct = udev_device_get_sysattr_value(parent, "idProduct");
 446                 if (strcmp(USB_VENDOR, idVendor)
 447                                 || strcmp(USB_PRODUCT, idProduct))
 448                         continue;
 449
 450                 iSerial = udev_device_get_sysattr_value(parent, "serial");
 451                 iProduct = udev_device_get_sysattr_value(parent, "product");
 452
 453                 snprintf(path, sizeof(path), "/dev/%s", sysname);
 454
 455                 s = strcspn(iProduct, " ");
 456                 if (s > sizeof(product) ||
 457                                 strlen(iProduct) - s > sizeof(manufacturer)) {
 458                         sr_err("Could not parse iProduct: %s", iProduct);
 459                         continue;
 460                 }
 461                 strncpy(product, iProduct, s);
 462                 product[s] = 0;
 463                 strcpy(manufacturer, iProduct + s);
 464
 465                 if (!(mso = g_try_malloc0(sizeof(struct mso)))) {
 466                         sr_err("mso19: %s: mso malloc failed", __func__);
 467                         continue; /* TODO: Errors handled correctly? */
 468                 }
 469
 470                 if (mso_parse_serial(iSerial, iProduct, mso) != SR_OK) {
 471                         sr_err("Invalid iSerial: %s", iSerial);
 472                         goto err_free_mso;
 473                 }
 474                 sprintf(hwrev, "r%d", mso->hwrev);
 475
 476                 /* hardware initial state */
 477                 mso->ctlbase1 = 0;
 478                 {
 479                         /* Initialize the protocol trigger configuration */
 480                         int i;
 481                         for (i = 0; i < 4; i++)
 482                         {
 483                                 mso->protocol_trigger.word[i] = 0;
 484                                 mso->protocol_trigger.mask[i] = 0xff;
 485                         }
 486                         mso->protocol_trigger.spimode = 0;
 487                 }
 488
 489                 sdi = sr_dev_inst_new(devcnt, SR_ST_INITIALIZING,
 490                         manufacturer, product, hwrev);
 491                 if (!sdi) {
 492                         sr_err("Unable to create device instance for %s",
 493                                sysname);
 494                         goto err_free_mso;
 495                 }
 496
 497                 /* save a pointer to our private instance data */
 498                 sdi->priv = mso;
 499
 500                 sdi->serial = sr_serial_dev_inst_new(path, -1);
 501                 if (!sdi->serial)
 502                         goto err_device_instance_free;
 503
 504                 device_instances = g_slist_append(device_instances, sdi);
 505                 devcnt++;
 506                 continue;
 507
 508 err_device_instance_free:
 509                 sr_dev_inst_free(sdi);
 510 err_free_mso:
 511                 g_free(mso);
 512         }
 513
 514         udev_enumerate_unref(enumerate);
 515         udev_unref(udev);
 516
 517 ret:
 518         return devcnt;
 519 }
 520
 521 static int hw_cleanup(void)
 522 {
 523         GSList *l;
 524         struct sr_device_instance *sdi;
 525         int ret = SR_OK;
 526
 527         /* Properly close all devices. */
 528         for (l = device_instances; l; l = l->next) {
 529                 if (!(sdi = l->data)) {
 530                         /* Log error, but continue cleaning up the rest. */
 531                         sr_err("mso19: %s: sdi was NULL, continuing", __func__);
 532                         ret = SR_ERR_BUG;
 533                         continue;
 534                 }
 535                 if (sdi->serial->fd != -1)
 536                         serial_close(sdi->serial->fd);
 537                 g_free(sdi->priv);
 538                 sdi->priv = NULL;
 539                 sr_dev_inst_free(sdi);
 540         }
 541         g_slist_free(device_instances);
 542         device_instances = NULL;
 543
 544         return SR_OK;
 545 }
 546
 547 static int hw_opendev(int device_index)
 548 {
 549         struct sr_device_instance *sdi;
 550         struct mso *mso;
 551         int ret = SR_ERR;
 552
 553         if (!(sdi = sr_dev_inst_get(device_instances, device_index)))
 554                 return ret;
 555
 556         mso = sdi->priv;
 557         sdi->serial->fd = serial_open(sdi->serial->port, O_RDWR);
 558         if (sdi->serial->fd == -1)
 559                 return ret;
 560
 561         ret = serial_set_params(sdi->serial->fd, 460800, 8, 0, 1, 2);
 562         if (ret != SR_OK)
 563                 return ret;
 564
 565         sdi->status = SR_ST_ACTIVE;
 566
 567         /* FIXME: discard serial buffer */
 568
 569         mso_check_trigger(sdi, &mso->trigger_state);
 570         sr_dbg("trigger state: 0x%x", mso->trigger_state);
 571
 572         ret = mso_reset_adc(sdi);
 573         if (ret != SR_OK)
 574                 return ret;
 575
 576         mso_check_trigger(sdi, &mso->trigger_state);
 577         sr_dbg("trigger state: 0x%x", mso->trigger_state);
 578
 579 //      ret = mso_reset_fsm(sdi);
 580 //      if (ret != SR_OK)
 581 //              return ret;
 582
 583         sr_dbg("Finished %s", __func__);
 584
 585 //      return SR_ERR;
 586         return SR_OK;
 587 }
 588
 589 static int hw_closedev(int device_index)
 590 {
 591         struct sr_device_instance *sdi;
 592
 593         if (!(sdi = sr_dev_inst_get(device_instances, device_index))) {
 594                 sr_err("mso19: %s: sdi was NULL", __func__);
 595                 return SR_ERR; /* TODO: SR_ERR_ARG? */
 596         }
 597
 598         /* TODO */
 599         if (sdi->serial->fd != -1) {
 600                 serial_close(sdi->serial->fd);
 601                 sdi->serial->fd = -1;
 602                 sdi->status = SR_ST_INACTIVE;
 603         }
 604
 605         sr_dbg("finished %s", __func__);
 606         return SR_OK;
 607 }
 608
 609 static void *hw_get_device_info(int device_index, int device_info_id)
 610 {
 611         struct sr_device_instance *sdi;
 612         struct mso *mso;
 613         void *info = NULL;
 614
 615         if (!(sdi = sr_dev_inst_get(device_instances, device_index)))
 616                 return NULL;
 617         mso = sdi->priv;
 618
 619         switch (device_info_id) {
 620         case SR_DI_INSTANCE:
 621                 info = sdi;
 622                 break;
 623         case SR_DI_NUM_PROBES: /* FIXME: How to report analog probe? */
 624                 info = GINT_TO_POINTER(NUM_PROBES);
 625                 break;
 626         case SR_DI_PROBE_NAMES:
 627                 info = probe_names;
 628                 break;
 629         case SR_DI_SAMPLERATES:
 630                 info = &samplerates;
 631                 break;
 632         case SR_DI_TRIGGER_TYPES:
 633                 info = "01"; /* FIXME */
 634                 break;
 635         case SR_DI_CUR_SAMPLERATE:
 636                 info = &mso->cur_rate;
 637                 break;
 638         }
 639         return info;
 640 }
 641
 642 static int hw_get_status(int device_index)
 643 {
 644         struct sr_device_instance *sdi;
 645
 646         if (!(sdi = sr_dev_inst_get(device_instances, device_index)))
 647                 return SR_ST_NOT_FOUND;
 648
 649         return sdi->status;
 650 }
 651
 652 static int *hw_get_capabilities(void)
 653 {
 654         return capabilities;
 655 }
 656
 657 static int hw_set_configuration(int device_index, int capability, void *value)
 658 {
 659         struct sr_device_instance *sdi;
 660
 661         if (!(sdi = sr_dev_inst_get(device_instances, device_index)))
 662                 return SR_ERR;
 663
 664         switch (capability) {
 665         case SR_HWCAP_SAMPLERATE:
 666                 return mso_configure_rate(sdi, *(uint64_t *) value);
 667         case SR_HWCAP_PROBECONFIG:
 668         case SR_HWCAP_LIMIT_SAMPLES:
 669         default:
 670                 return SR_OK; /* FIXME */
 671         }
 672 }
 673
 674 #define MSO_TRIGGER_UNKNOWN     '!'
 675 #define MSO_TRIGGER_UNKNOWN1    '1'
 676 #define MSO_TRIGGER_UNKNOWN2    '2'
 677 #define MSO_TRIGGER_UNKNOWN3    '3'
 678 #define MSO_TRIGGER_WAIT        '4'
 679 #define MSO_TRIGGER_FIRED       '5'
 680 #define MSO_TRIGGER_DATAREADY   '6'
 681
 682 /* FIXME: Pass errors? */
 683 static int receive_data(int fd, int revents, void *user_data)
 684 {
 685         struct sr_device_instance *sdi = user_data;
 686         struct mso *mso = sdi->priv;
 687         struct sr_datafeed_packet packet;
 688         struct sr_datafeed_logic logic;
 689         uint8_t in[1024], logic_out[1024];
 690         double analog_out[1024];
 691         size_t i, s;
 692
 693         revents = revents;
 694
 695         s = serial_read(fd, in, sizeof(in));
 696         if (s <= 0)
 697                 return FALSE;
 698
 699         /* No samples */
 700         if (mso->trigger_state != MSO_TRIGGER_DATAREADY) {
 701                 mso->trigger_state = in[0];
 702                 if (mso->trigger_state == MSO_TRIGGER_DATAREADY) {
 703                         mso_read_buffer(sdi);
 704                         mso->buffer_n = 0;
 705                 } else {
 706                         mso_check_trigger(sdi, NULL);
 707                 }
 708                 return FALSE;
 709         }
 710
 711         /* the hardware always dumps 1024 samples, 24bits each */
 712         if (mso->buffer_n < 3072) {
 713                 memcpy(mso->buffer + mso->buffer_n, in, s);
 714                 mso->buffer_n += s;
 715         }
 716         if (mso->buffer_n < 3072)
 717                 return FALSE;
 718
 719         /* do the conversion */
 720         for (i = 0; i < 1024; i++) {
 721                 /* FIXME: Need to do conversion to mV */
 722                 analog_out[i] = (mso->buffer[i * 3] & 0x3f) |
 723                         ((mso->buffer[i * 3 + 1] & 0xf) << 6);
 724                 logic_out[i] = ((mso->buffer[i * 3 + 1] & 0x30) >> 4) |
 725                         ((mso->buffer[i * 3 + 2] & 0x3f) << 2);
 726         }
 727
 728         packet.type = SR_DF_LOGIC;
 729         packet.payload = &logic;
 730         logic.length = 1024;
 731         logic.unitsize = 1;
 732         logic.data = logic_out;
 733         sr_session_bus(mso->session_id, &packet);
 734
 735         // Dont bother fixing this yet, keep it "old style"
 736         /*
 737         packet.type = SR_DF_ANALOG;
 738         packet.length = 1024;
 739         packet.unitsize = sizeof(double);
 740         packet.payload = analog_out;
 741         sr_session_bus(mso->session_id, &packet);
 742         */
 743
 744         packet.type = SR_DF_END;
 745         sr_session_bus(mso->session_id, &packet);
 746
 747         return TRUE;
 748 }
 749
 750 static int hw_start_acquisition(int device_index, gpointer session_device_id)
 751 {
 752         struct sr_device_instance *sdi;
 753         struct mso *mso;
 754         struct sr_datafeed_packet packet;
 755         struct sr_datafeed_header header;
 756         int ret = SR_ERR;
 757
 758         if (!(sdi = sr_dev_inst_get(device_instances, device_index)))
 759                 return ret;
 760         mso = sdi->priv;
 761
 762         /* FIXME: No need to do full reconfigure every time */
 763 //      ret = mso_reset_fsm(sdi);
 764 //      if (ret != SR_OK)
 765 //              return ret;
 766
 767         /* FIXME: ACDC Mode */
 768         mso->ctlbase1 &= 0x7f;
 769 //      mso->ctlbase1 |= mso->acdcmode;
 770
 771         ret = mso_configure_rate(sdi, mso->cur_rate);
 772         if (ret != SR_OK)
 773                 return ret;
 774
 775         /* set dac offset */
 776         ret = mso_dac_out(sdi, mso->dac_offset);
 777         if (ret != SR_OK)
 778                 return ret;
 779
 780         ret = mso_configure_threshold_level(sdi);
 781         if (ret != SR_OK)
 782                 return ret;
 783
 784         ret = mso_configure_trigger(sdi);
 785         if (ret != SR_OK)
 786                 return ret;
 787
 788         /* FIXME: trigger_position */
 789
 790
 791         /* END of config hardware part */
 792
 793         /* with trigger */
 794         ret = mso_arm(sdi);
 795         if (ret != SR_OK)
 796                 return ret;
 797
 798         /* without trigger */
 799 //      ret = mso_force_capture(sdi);
 800 //      if (ret != SR_OK)
 801 //              return ret;
 802
 803         mso_check_trigger(sdi, &mso->trigger_state);
 804         ret = mso_check_trigger(sdi, NULL);
 805         if (ret != SR_OK)
 806                 return ret;
 807
 808         mso->session_id = session_device_id;
 809         sr_source_add(sdi->serial->fd, G_IO_IN, -1, receive_data, sdi);
 810
 811         packet.type = SR_DF_HEADER;
 812         packet.payload = (unsigned char *) &header;
 813         header.feed_version = 1;
 814         gettimeofday(&header.starttime, NULL);
 815         header.samplerate = mso->cur_rate;
 816         // header.num_analog_probes = 1;
 817         header.num_logic_probes = 8;
 818         sr_session_bus(session_device_id, &packet);
 819
 820         return ret;
 821 }
 822
 823 /* FIXME */
 824 static int hw_stop_acquisition(int device_index, gpointer session_device_id)
 825 {
 826         struct sr_datafeed_packet packet;
 827
 828         device_index = device_index;
 829
 830         packet.type = SR_DF_END;
 831         sr_session_bus(session_device_id, &packet);
 832
 833         return SR_OK;
 834 }
 835
 836 SR_PRIV struct sr_device_plugin link_mso19_plugin_info = {
 837         .name = "link-mso19",
 838         .longname = "Link Instruments MSO-19",
 839         .api_version = 1,
 840         .init = hw_init,
 841         .cleanup = hw_cleanup,
 842         .opendev = hw_opendev,
 843         .closedev = hw_closedev,
 844         .get_device_info = hw_get_device_info,
 845         .get_status = hw_get_status,
 846         .get_capabilities = hw_get_capabilities,
 847         .set_configuration = hw_set_configuration,
 848         .start_acquisition = hw_start_acquisition,
 849         .stop_acquisition = hw_stop_acquisition,
 850 };