hardware/fx2lafw/api.c

   1 /*
   2  * This file is part of the libsigrok project.
   3  *
   4  * Copyright (C) 2013 Bert Vermeulen <bert@biot.com>
   5  * Copyright (C) 2012 Joel Holdsworth <joel@airwebreathe.org.uk>
   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 "protocol.h"
  22
  23 static const struct fx2lafw_profile supported_fx2[] = {
  24         /*
  25          * CWAV USBee AX
  26          * EE Electronics ESLA201A
  27          * ARMFLY AX-Pro
  28          */
  29         { 0x08a9, 0x0014, "CWAV", "USBee AX", NULL,
  30                 FIRMWARE_DIR "/fx2lafw-cwav-usbeeax.fw",
  31                 0, NULL, NULL},
  32         /*
  33          * CWAV USBee DX
  34          * XZL-Studio DX
  35          */
  36         { 0x08a9, 0x0015, "CWAV", "USBee DX", NULL,
  37                 FIRMWARE_DIR "/fx2lafw-cwav-usbeedx.fw",
  38                 DEV_CAPS_16BIT, NULL, NULL },
  39
  40         /*
  41          * CWAV USBee SX
  42          */
  43         { 0x08a9, 0x0009, "CWAV", "USBee SX", NULL,
  44                 FIRMWARE_DIR "/fx2lafw-cwav-usbeesx.fw",
  45                 0, NULL, NULL},
  46
  47         /*
  48          * Saleae Logic
  49          * EE Electronics ESLA100
  50          * Robomotic MiniLogic
  51          * Robomotic BugLogic 3
  52          */
  53         { 0x0925, 0x3881, "Saleae", "Logic", NULL,
  54                 FIRMWARE_DIR "/fx2lafw-saleae-logic.fw",
  55                 0, NULL, NULL},
  56
  57         /*
  58          * Default Cypress FX2 without EEPROM, e.g.:
  59          * Lcsoft Mini Board
  60          * Braintechnology USB Interface V2.x
  61          */
  62         { 0x04B4, 0x8613, "Cypress", "FX2", NULL,
  63                 FIRMWARE_DIR "/fx2lafw-cypress-fx2.fw",
  64                 DEV_CAPS_16BIT, NULL, NULL },
  65
  66         /*
  67          * Braintechnology USB-LPS
  68          */
  69         { 0x16d0, 0x0498, "Braintechnology", "USB-LPS", NULL,
  70                 FIRMWARE_DIR "/fx2lafw-braintechnology-usb-lps.fw",
  71                 DEV_CAPS_16BIT, NULL, NULL },
  72
  73         { 0, 0, 0, 0, 0, 0, 0, 0, 0 }
  74 };
  75
  76 static const int32_t hwopts[] = {
  77         SR_CONF_CONN,
  78 };
  79
  80 static const int32_t hwcaps[] = {
  81         SR_CONF_LOGIC_ANALYZER,
  82         SR_CONF_TRIGGER_MATCH,
  83         SR_CONF_SAMPLERATE,
  84
  85         /* These are really implemented in the driver, not the hardware. */
  86         SR_CONF_LIMIT_SAMPLES,
  87         SR_CONF_CONTINUOUS,
  88 };
  89
  90 static const char *channel_names[] = {
  91         "0",  "1",  "2",  "3",  "4",  "5",  "6",  "7",
  92         "8",  "9", "10", "11", "12", "13", "14", "15",
  93         NULL,
  94 };
  95
  96 static const int32_t soft_trigger_matches[] = {
  97         SR_TRIGGER_ZERO,
  98         SR_TRIGGER_ONE,
  99         SR_TRIGGER_RISING,
 100         SR_TRIGGER_FALLING,
 101         SR_TRIGGER_EDGE,
 102 };
 103
 104 static const uint64_t samplerates[] = {
 105         SR_KHZ(20),
 106         SR_KHZ(25),
 107         SR_KHZ(50),
 108         SR_KHZ(100),
 109         SR_KHZ(200),
 110         SR_KHZ(250),
 111         SR_KHZ(500),
 112         SR_MHZ(1),
 113         SR_MHZ(2),
 114         SR_MHZ(3),
 115         SR_MHZ(4),
 116         SR_MHZ(6),
 117         SR_MHZ(8),
 118         SR_MHZ(12),
 119         SR_MHZ(16),
 120         SR_MHZ(24),
 121 };
 122
 123 SR_PRIV struct sr_dev_driver fx2lafw_driver_info;
 124 static struct sr_dev_driver *di = &fx2lafw_driver_info;
 125
 126 static int init(struct sr_context *sr_ctx)
 127 {
 128         return std_init(sr_ctx, di, LOG_PREFIX);
 129 }
 130
 131 static GSList *scan(GSList *options)
 132 {
 133         struct drv_context *drvc;
 134         struct dev_context *devc;
 135         struct sr_dev_inst *sdi;
 136         struct sr_usb_dev_inst *usb;
 137         struct sr_channel *ch;
 138         struct sr_config *src;
 139         const struct fx2lafw_profile *prof;
 140         GSList *l, *devices, *conn_devices;
 141         struct libusb_device_descriptor des;
 142         libusb_device **devlist;
 143         struct libusb_device_handle *hdl;
 144         int devcnt, num_logic_channels, ret, i, j;
 145         const char *conn;
 146         char manufacturer[64], product[64];
 147
 148         drvc = di->priv;
 149
 150         conn = NULL;
 151         for (l = options; l; l = l->next) {
 152                 src = l->data;
 153                 switch (src->key) {
 154                 case SR_CONF_CONN:
 155                         conn = g_variant_get_string(src->data, NULL);
 156                         break;
 157                 }
 158         }
 159         if (conn)
 160                 conn_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, conn);
 161         else
 162                 conn_devices = NULL;
 163
 164         /* Find all fx2lafw compatible devices and upload firmware to them. */
 165         devices = NULL;
 166         libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
 167         for (i = 0; devlist[i]; i++) {
 168                 if (conn) {
 169                         usb = NULL;
 170                         for (l = conn_devices; l; l = l->next) {
 171                                 usb = l->data;
 172                                 if (usb->bus == libusb_get_bus_number(devlist[i])
 173                                         && usb->address == libusb_get_device_address(devlist[i]))
 174                                         break;
 175                         }
 176                         if (!l)
 177                                 /* This device matched none of the ones that
 178                                  * matched the conn specification. */
 179                                 continue;
 180                 }
 181
 182                 if ((ret = libusb_get_device_descriptor( devlist[i], &des)) != 0) {
 183                         sr_warn("Failed to get device descriptor: %s.",
 184                                 libusb_error_name(ret));
 185                         continue;
 186                 }
 187
 188                 if ((ret = libusb_open(devlist[i], &hdl)) < 0)
 189                         continue;
 190
 191                 if (des.iManufacturer == 0) {
 192                         manufacturer[0] = '\0';
 193                 } else if ((ret = libusb_get_string_descriptor_ascii(hdl,
 194                                 des.iManufacturer, (unsigned char *) manufacturer,
 195                                 sizeof(manufacturer))) < 0) {
 196                         sr_warn("Failed to get manufacturer string descriptor: %s.",
 197                                 libusb_error_name(ret));
 198                         continue;
 199                 }
 200
 201                 if (des.iProduct == 0) {
 202                         product[0] = '\0';
 203                 } else if ((ret = libusb_get_string_descriptor_ascii(hdl,
 204                                 des.iProduct, (unsigned char *) product,
 205                                 sizeof(product))) < 0) {
 206                         sr_warn("Failed to get product string descriptor: %s.",
 207                                 libusb_error_name(ret));
 208                         continue;
 209                 }
 210
 211                 libusb_close(hdl);
 212
 213                 prof = NULL;
 214                 for (j = 0; supported_fx2[j].vid; j++) {
 215                         if (des.idVendor == supported_fx2[j].vid &&
 216                                         des.idProduct == supported_fx2[j].pid &&
 217                                         (!supported_fx2[j].usb_manufacturer ||
 218                                          !strcmp(manufacturer, supported_fx2[j].usb_manufacturer)) &&
 219                                         (!supported_fx2[j].usb_manufacturer ||
 220                                          !strcmp(product, supported_fx2[j].usb_product))) {
 221                                 prof = &supported_fx2[j];
 222                                 break;
 223                         }
 224                 }
 225
 226                 /* Skip if the device was not found. */
 227                 if (!prof)
 228                         continue;
 229
 230                 devcnt = g_slist_length(drvc->instances);
 231                 sdi = sr_dev_inst_new(devcnt, SR_ST_INITIALIZING,
 232                         prof->vendor, prof->model, prof->model_version);
 233                 if (!sdi)
 234                         return NULL;
 235                 sdi->driver = di;
 236
 237                 /* Fill in channellist according to this device's profile. */
 238                 num_logic_channels = prof->dev_caps & DEV_CAPS_16BIT ? 16 : 8;
 239                 for (j = 0; j < num_logic_channels; j++) {
 240                         if (!(ch = sr_channel_new(j, SR_CHANNEL_LOGIC, TRUE,
 241                                         channel_names[j])))
 242                                 return NULL;
 243                         sdi->channels = g_slist_append(sdi->channels, ch);
 244                 }
 245
 246                 devc = fx2lafw_dev_new();
 247                 devc->profile = prof;
 248                 sdi->priv = devc;
 249                 drvc->instances = g_slist_append(drvc->instances, sdi);
 250                 devices = g_slist_append(devices, sdi);
 251
 252                 if (fx2lafw_check_conf_profile(devlist[i])) {
 253                         /* Already has the firmware, so fix the new address. */
 254                         sr_dbg("Found an fx2lafw device.");
 255                         sdi->status = SR_ST_INACTIVE;
 256                         sdi->inst_type = SR_INST_USB;
 257                         sdi->conn = sr_usb_dev_inst_new(libusb_get_bus_number(devlist[i]),
 258                                         libusb_get_device_address(devlist[i]), NULL);
 259                 } else {
 260                         if (ezusb_upload_firmware(devlist[i], USB_CONFIGURATION,
 261                                 prof->firmware) == SR_OK)
 262                                 /* Store when this device's FW was updated. */
 263                                 devc->fw_updated = g_get_monotonic_time();
 264                         else
 265                                 sr_err("Firmware upload failed for "
 266                                        "device %d.", devcnt);
 267                         sdi->inst_type = SR_INST_USB;
 268                         sdi->conn = sr_usb_dev_inst_new(libusb_get_bus_number(devlist[i]),
 269                                         0xff, NULL);
 270                 }
 271         }
 272         libusb_free_device_list(devlist, 1);
 273         g_slist_free_full(conn_devices, (GDestroyNotify)sr_usb_dev_inst_free);
 274
 275         return devices;
 276 }
 277
 278 static GSList *dev_list(void)
 279 {
 280         return ((struct drv_context *)(di->priv))->instances;
 281 }
 282
 283 static int dev_open(struct sr_dev_inst *sdi)
 284 {
 285         struct sr_usb_dev_inst *usb;
 286         struct dev_context *devc;
 287         int ret;
 288         int64_t timediff_us, timediff_ms;
 289
 290         devc = sdi->priv;
 291         usb = sdi->conn;
 292
 293         /*
 294          * If the firmware was recently uploaded, wait up to MAX_RENUM_DELAY_MS
 295          * milliseconds for the FX2 to renumerate.
 296          */
 297         ret = SR_ERR;
 298         if (devc->fw_updated > 0) {
 299                 sr_info("Waiting for device to reset.");
 300                 /* Takes >= 300ms for the FX2 to be gone from the USB bus. */
 301                 g_usleep(300 * 1000);
 302                 timediff_ms = 0;
 303                 while (timediff_ms < MAX_RENUM_DELAY_MS) {
 304                         if ((ret = fx2lafw_dev_open(sdi, di)) == SR_OK)
 305                                 break;
 306                         g_usleep(100 * 1000);
 307
 308                         timediff_us = g_get_monotonic_time() - devc->fw_updated;
 309                         timediff_ms = timediff_us / 1000;
 310                         sr_spew("Waited %" PRIi64 "ms.", timediff_ms);
 311                 }
 312                 if (ret != SR_OK) {
 313                         sr_err("Device failed to renumerate.");
 314                         return SR_ERR;
 315                 }
 316                 sr_info("Device came back after %" PRIi64 "ms.", timediff_ms);
 317         } else {
 318                 sr_info("Firmware upload was not needed.");
 319                 ret = fx2lafw_dev_open(sdi, di);
 320         }
 321
 322         if (ret != SR_OK) {
 323                 sr_err("Unable to open device.");
 324                 return SR_ERR;
 325         }
 326
 327         ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE);
 328         if (ret != 0) {
 329                 switch (ret) {
 330                 case LIBUSB_ERROR_BUSY:
 331                         sr_err("Unable to claim USB interface. Another "
 332                                "program or driver has already claimed it.");
 333                         break;
 334                 case LIBUSB_ERROR_NO_DEVICE:
 335                         sr_err("Device has been disconnected.");
 336                         break;
 337                 default:
 338                         sr_err("Unable to claim interface: %s.",
 339                                libusb_error_name(ret));
 340                         break;
 341                 }
 342
 343                 return SR_ERR;
 344         }
 345
 346         if (devc->cur_samplerate == 0) {
 347                 /* Samplerate hasn't been set; default to the slowest one. */
 348                 devc->cur_samplerate = samplerates[0];
 349         }
 350
 351         return SR_OK;
 352 }
 353
 354 static int dev_close(struct sr_dev_inst *sdi)
 355 {
 356         struct sr_usb_dev_inst *usb;
 357
 358         usb = sdi->conn;
 359         if (usb->devhdl == NULL)
 360                 return SR_ERR;
 361
 362         sr_info("fx2lafw: Closing device %d on %d.%d interface %d.",
 363                 sdi->index, usb->bus, usb->address, USB_INTERFACE);
 364         libusb_release_interface(usb->devhdl, USB_INTERFACE);
 365         libusb_close(usb->devhdl);
 366         usb->devhdl = NULL;
 367         sdi->status = SR_ST_INACTIVE;
 368
 369         return SR_OK;
 370 }
 371
 372 static int cleanup(void)
 373 {
 374         int ret;
 375         struct drv_context *drvc;
 376
 377         if (!(drvc = di->priv))
 378                 return SR_OK;
 379
 380         ret = std_dev_clear(di, NULL);
 381
 382         g_free(drvc);
 383         di->priv = NULL;
 384
 385         return ret;
 386 }
 387
 388 static int config_get(int id, GVariant **data, const struct sr_dev_inst *sdi,
 389                 const struct sr_channel_group *cg)
 390 {
 391         struct dev_context *devc;
 392         struct sr_usb_dev_inst *usb;
 393         char str[128];
 394
 395         (void)cg;
 396
 397         if (!sdi)
 398                 return SR_ERR_ARG;
 399
 400         devc = sdi->priv;
 401
 402         switch (id) {
 403         case SR_CONF_CONN:
 404                 if (!sdi->conn)
 405                         return SR_ERR_ARG;
 406                 usb = sdi->conn;
 407                 if (usb->address == 255)
 408                         /* Device still needs to re-enumerate after firmware
 409                          * upload, so we don't know its (future) address. */
 410                         return SR_ERR;
 411                 snprintf(str, 128, "%d.%d", usb->bus, usb->address);
 412                 *data = g_variant_new_string(str);
 413                 break;
 414         case SR_CONF_LIMIT_SAMPLES:
 415                 *data = g_variant_new_uint64(devc->limit_samples);
 416                 break;
 417         case SR_CONF_SAMPLERATE:
 418                 *data = g_variant_new_uint64(devc->cur_samplerate);
 419                 break;
 420         default:
 421                 return SR_ERR_NA;
 422         }
 423
 424         return SR_OK;
 425 }
 426
 427 static int config_set(int id, GVariant *data, const struct sr_dev_inst *sdi,
 428                 const struct sr_channel_group *cg)
 429 {
 430         struct dev_context *devc;
 431         int ret;
 432
 433         (void)cg;
 434
 435         if (!sdi)
 436                 return SR_ERR_ARG;
 437
 438         if (sdi->status != SR_ST_ACTIVE)
 439                 return SR_ERR;
 440
 441         devc = sdi->priv;
 442
 443         ret = SR_OK;
 444
 445         switch (id)
 446         {
 447                 case SR_CONF_SAMPLERATE:
 448                         devc->cur_samplerate = g_variant_get_uint64(data);
 449                         break;
 450                 case SR_CONF_LIMIT_SAMPLES:
 451                         devc->limit_samples = g_variant_get_uint64(data);
 452                         break;
 453                 default:
 454                         ret = SR_ERR_NA;
 455         }
 456
 457         return ret;
 458 }
 459
 460 static int config_list(int key, GVariant **data, const struct sr_dev_inst *sdi,
 461                 const struct sr_channel_group *cg)
 462 {
 463         GVariant *gvar;
 464         GVariantBuilder gvb;
 465
 466         (void)sdi;
 467         (void)cg;
 468
 469         switch (key) {
 470         case SR_CONF_SCAN_OPTIONS:
 471                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 472                                 hwopts, ARRAY_SIZE(hwopts), sizeof(int32_t));
 473                 break;
 474         case SR_CONF_DEVICE_OPTIONS:
 475                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 476                                 hwcaps, ARRAY_SIZE(hwcaps), sizeof(int32_t));
 477                 break;
 478         case SR_CONF_SAMPLERATE:
 479                 g_variant_builder_init(&gvb, G_VARIANT_TYPE("a{sv}"));
 480                 gvar = g_variant_new_fixed_array(G_VARIANT_TYPE("t"), samplerates,
 481                                 ARRAY_SIZE(samplerates), sizeof(uint64_t));
 482                 g_variant_builder_add(&gvb, "{sv}", "samplerates", gvar);
 483                 *data = g_variant_builder_end(&gvb);
 484                 break;
 485         case SR_CONF_TRIGGER_MATCH:
 486                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
 487                                 soft_trigger_matches, ARRAY_SIZE(soft_trigger_matches),
 488                                 sizeof(int32_t));
 489                 break;
 490         default:
 491                 return SR_ERR_NA;
 492         }
 493
 494         return SR_OK;
 495 }
 496
 497 static int receive_data(int fd, int revents, void *cb_data)
 498 {
 499         struct timeval tv;
 500         struct drv_context *drvc;
 501
 502         (void)fd;
 503         (void)revents;
 504         (void)cb_data;
 505
 506         drvc = di->priv;
 507
 508         tv.tv_sec = tv.tv_usec = 0;
 509         libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
 510
 511         return TRUE;
 512 }
 513
 514 static int dev_acquisition_start(const struct sr_dev_inst *sdi, void *cb_data)
 515 {
 516         struct dev_context *devc;
 517         struct drv_context *drvc;
 518         struct sr_usb_dev_inst *usb;
 519         struct sr_trigger *trigger;
 520         struct libusb_transfer *transfer;
 521         unsigned int i, timeout, num_transfers;
 522         int ret;
 523         unsigned char *buf;
 524         size_t size;
 525
 526         if (sdi->status != SR_ST_ACTIVE)
 527                 return SR_ERR_DEV_CLOSED;
 528
 529         drvc = di->priv;
 530         devc = sdi->priv;
 531         usb = sdi->conn;
 532
 533         devc->cb_data = cb_data;
 534         devc->sent_samples = 0;
 535         devc->acq_aborted = FALSE;
 536         devc->empty_transfer_count = 0;
 537
 538         if ((trigger = sr_session_trigger_get(sdi->session))) {
 539                 devc->stl = soft_trigger_logic_new(sdi, trigger);
 540                 devc->trigger_fired = FALSE;
 541         } else
 542                 devc->trigger_fired = TRUE;
 543
 544         timeout = fx2lafw_get_timeout(devc);
 545         num_transfers = fx2lafw_get_number_of_transfers(devc);
 546         size = fx2lafw_get_buffer_size(devc);
 547         devc->submitted_transfers = 0;
 548
 549         devc->transfers = g_try_malloc0(sizeof(*devc->transfers) * num_transfers);
 550         if (!devc->transfers) {
 551                 sr_err("USB transfers malloc failed.");
 552                 return SR_ERR_MALLOC;
 553         }
 554
 555         devc->num_transfers = num_transfers;
 556         for (i = 0; i < num_transfers; i++) {
 557                 if (!(buf = g_try_malloc(size))) {
 558                         sr_err("USB transfer buffer malloc failed.");
 559                         return SR_ERR_MALLOC;
 560                 }
 561                 transfer = libusb_alloc_transfer(0);
 562                 libusb_fill_bulk_transfer(transfer, usb->devhdl,
 563                                 2 | LIBUSB_ENDPOINT_IN, buf, size,
 564                                 fx2lafw_receive_transfer, (void *)sdi, timeout);
 565                 if ((ret = libusb_submit_transfer(transfer)) != 0) {
 566                         sr_err("Failed to submit transfer: %s.",
 567                                libusb_error_name(ret));
 568                         libusb_free_transfer(transfer);
 569                         g_free(buf);
 570                         fx2lafw_abort_acquisition(devc);
 571                         return SR_ERR;
 572                 }
 573                 devc->transfers[i] = transfer;
 574                 devc->submitted_transfers++;
 575         }
 576
 577         devc->ctx = drvc->sr_ctx;
 578
 579         usb_source_add(sdi->session, devc->ctx, timeout, receive_data, NULL);
 580
 581         /* Send header packet to the session bus. */
 582         std_session_send_df_header(cb_data, LOG_PREFIX);
 583
 584         if ((ret = fx2lafw_command_start_acquisition(sdi)) != SR_OK) {
 585                 fx2lafw_abort_acquisition(devc);
 586                 return ret;
 587         }
 588
 589         return SR_OK;
 590 }
 591
 592 static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
 593 {
 594         (void)cb_data;
 595
 596         fx2lafw_abort_acquisition(sdi->priv);
 597
 598         return SR_OK;
 599 }
 600
 601 SR_PRIV struct sr_dev_driver fx2lafw_driver_info = {
 602         .name = "fx2lafw",
 603         .longname = "fx2lafw (generic driver for FX2 based LAs)",
 604         .api_version = 1,
 605         .init = init,
 606         .cleanup = cleanup,
 607         .scan = scan,
 608         .dev_list = dev_list,
 609         .dev_clear = NULL,
 610         .config_get = config_get,
 611         .config_set = config_set,
 612         .config_list = config_list,
 613         .dev_open = dev_open,
 614         .dev_close = dev_close,
 615         .dev_acquisition_start = dev_acquisition_start,
 616         .dev_acquisition_stop = dev_acquisition_stop,
 617         .priv = NULL,
 618 };