hardware/hantek-dso/dso.c

   1 /*
   2  * This file is part of the sigrok project.
   3  *
   4  * Copyright (C) 2012 Bert Vermeulen <bert@biot.com>
   5  * With protocol information from the hantekdso project,
   6  * Copyright (C) 2008 Oleg Khudyakov <prcoder@gmail.com>
   7  *
   8  * This program is free software: you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation, either version 3 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20  */
  21
  22 #include "libsigrok.h"
  23 #include "libsigrok-internal.h"
  24 #include "dso.h"
  25 #include <string.h>
  26 #include <glib.h>
  27 #include <libusb.h>
  28
  29 extern struct sr_dev_driver hantek_dso_driver_info;
  30
  31 static int send_begin(struct dev_context *devc)
  32 {
  33         int ret;
  34         unsigned char buffer[] = {0x0f, 0x03, 0x03, 0x03, 0x68, 0xac, 0xfe,
  35         0x00, 0x01, 0x00};
  36
  37         sr_dbg("Sending CTRL_BEGINCOMMAND.");
  38
  39         if ((ret = libusb_control_transfer(devc->usb->devhdl,
  40                         LIBUSB_REQUEST_TYPE_VENDOR, CTRL_BEGINCOMMAND,
  41                         0, 0, buffer, sizeof(buffer), 200)) != sizeof(buffer)) {
  42                 sr_err("Failed to send begincommand: %s.",
  43                        libusb_error_name(ret));
  44                 return SR_ERR;
  45         }
  46
  47         return SR_OK;
  48 }
  49
  50 static int send_bulkcmd(struct dev_context *devc, uint8_t *cmdstring, int cmdlen)
  51 {
  52         int ret, tmp;
  53
  54         if (send_begin(devc) != SR_OK)
  55                 return SR_ERR;
  56
  57         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
  58                         DSO_EP_OUT | LIBUSB_ENDPOINT_OUT,
  59                         cmdstring, cmdlen, &tmp, 200)) != 0)
  60                 return SR_ERR;
  61
  62         return SR_OK;
  63 }
  64
  65 SR_PRIV int dso_getmps(libusb_device *dev)
  66 {
  67         struct libusb_device_descriptor des;
  68         struct libusb_config_descriptor *conf_dsc;
  69         const struct libusb_interface_descriptor *intf_dsc;
  70         int mps;
  71
  72         if (libusb_get_device_descriptor(dev, &des) != 0)
  73                 return 0;
  74
  75         if (des.bNumConfigurations != 1)
  76                 return 0;
  77
  78         if (libusb_get_config_descriptor(dev, 0, &conf_dsc) != 0)
  79                 return 0;
  80
  81         mps = 0;
  82         intf_dsc = &(conf_dsc->interface[0].altsetting[0]);
  83         if (intf_dsc->bNumEndpoints != 2)
  84                 goto err;
  85
  86         if ((intf_dsc->endpoint[0].bEndpointAddress & 0x8f) !=
  87             (2 | LIBUSB_ENDPOINT_OUT))
  88                 /* The first endpoint should be 2 (outbound). */
  89                 goto err;
  90
  91         if ((intf_dsc->endpoint[1].bEndpointAddress & 0x8f) !=
  92             (6 | LIBUSB_ENDPOINT_IN))
  93                 /* The second endpoint should be 6 (inbound). */
  94                 goto err;
  95
  96         mps = intf_dsc->endpoint[1].wMaxPacketSize;
  97
  98 err:
  99         if (conf_dsc)
 100                 libusb_free_config_descriptor(conf_dsc);
 101
 102         return mps;
 103 }
 104
 105 SR_PRIV int dso_open(struct sr_dev_inst *sdi)
 106 {
 107         libusb_device **devlist;
 108         struct libusb_device_descriptor des;
 109         struct dev_context *devc;
 110         struct drv_context *drvc = hantek_dso_driver_info.priv;
 111         int err, skip, i;
 112
 113         devc = sdi->priv;
 114
 115         if (sdi->status == SR_ST_ACTIVE)
 116                 /* already in use */
 117                 return SR_ERR;
 118
 119         skip = 0;
 120         libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
 121         for (i = 0; devlist[i]; i++) {
 122                 if ((err = libusb_get_device_descriptor(devlist[i], &des))) {
 123                         sr_err("Failed to get device descriptor: %s.",
 124                                libusb_error_name(err));
 125                         continue;
 126                 }
 127
 128                 if (des.idVendor != devc->profile->fw_vid
 129                     || des.idProduct != devc->profile->fw_pid)
 130                         continue;
 131
 132                 if (sdi->status == SR_ST_INITIALIZING) {
 133                         if (skip != sdi->index) {
 134                                 /* Skip devices of this type that aren't the one we want. */
 135                                 skip += 1;
 136                                 continue;
 137                         }
 138                 } else if (sdi->status == SR_ST_INACTIVE) {
 139                         /*
 140                          * This device is fully enumerated, so we need to find
 141                          * this device by vendor, product, bus and address.
 142                          */
 143                         if (libusb_get_bus_number(devlist[i]) != devc->usb->bus
 144                                 || libusb_get_device_address(devlist[i]) != devc->usb->address)
 145                                 /* this is not the one */
 146                                 continue;
 147                 }
 148
 149                 if (!(err = libusb_open(devlist[i], &devc->usb->devhdl))) {
 150                         if (devc->usb->address == 0xff)
 151                                 /*
 152                                  * first time we touch this device after firmware upload,
 153                                  * so we don't know the address yet.
 154                                  */
 155                                 devc->usb->address = libusb_get_device_address(devlist[i]);
 156
 157                         if (!(devc->epin_maxpacketsize = dso_getmps(devlist[i])))
 158                                 sr_err("Wrong endpoint profile.");
 159                         else {
 160                                 sdi->status = SR_ST_ACTIVE;
 161                                 sr_info("Opened device %d on %d.%d interface %d.",
 162                                         sdi->index, devc->usb->bus,
 163                                         devc->usb->address, USB_INTERFACE);
 164                         }
 165                 } else {
 166                         sr_err("Failed to open device: %s.",
 167                                libusb_error_name(err));
 168                 }
 169
 170                 /* If we made it here, we handled the device (somehow). */
 171                 break;
 172         }
 173         libusb_free_device_list(devlist, 1);
 174
 175         if (sdi->status != SR_ST_ACTIVE)
 176                 return SR_ERR;
 177
 178         return SR_OK;
 179 }
 180
 181 SR_PRIV void dso_close(struct sr_dev_inst *sdi)
 182 {
 183         struct dev_context *devc;
 184
 185         devc = sdi->priv;
 186
 187         if (devc->usb->devhdl == NULL)
 188                 return;
 189
 190         sr_info("Closing device %d on %d.%d interface %d.", sdi->index,
 191                 devc->usb->bus, devc->usb->address, USB_INTERFACE);
 192         libusb_release_interface(devc->usb->devhdl, USB_INTERFACE);
 193         libusb_close(devc->usb->devhdl);
 194         devc->usb->devhdl = NULL;
 195         sdi->status = SR_ST_INACTIVE;
 196
 197 }
 198
 199 static int get_channel_offsets(struct dev_context *devc)
 200 {
 201         GString *gs;
 202         int chan, v, ret;
 203
 204         sr_dbg("Getting channel offsets.");
 205
 206         ret = libusb_control_transfer(devc->usb->devhdl,
 207                         LIBUSB_ENDPOINT_IN | LIBUSB_REQUEST_TYPE_VENDOR,
 208                         CTRL_READ_EEPROM, EEPROM_CHANNEL_OFFSETS, 0,
 209                         (unsigned char *)&devc->channel_levels,
 210                         sizeof(devc->channel_levels), 200);
 211         if (ret != sizeof(devc->channel_levels)) {
 212                 sr_err("Failed to get channel offsets: %s.",
 213                        libusb_error_name(ret));
 214                 return SR_ERR;
 215         }
 216
 217         /* Comes in as 16-bit numbers with the second byte always 0 on
 218          * the DSO-2090. Guessing this is supposed to be big-endian,
 219          * since that's how voltage offsets are submitted back to the DSO.
 220          * Convert to host order now, so we can use them natively.
 221          */
 222         for (chan = 0; chan < 2; chan++) {
 223                 for (v = 0; v < 9; v++) {
 224                         devc->channel_levels[chan][v][0] =
 225                                 g_ntohs(devc->channel_levels[chan][v][0]);
 226                         devc->channel_levels[chan][v][1] =
 227                                 g_ntohs(devc->channel_levels[chan][v][1]);
 228                 }
 229         }
 230
 231         if (sr_log_loglevel_get() >= SR_LOG_DBG) {
 232                 gs = g_string_sized_new(128);
 233                 for (chan = 0; chan < 2; chan++) {
 234                         g_string_printf(gs, "CH%d:", chan + 1);
 235                         for (v = 0; v < 9; v++) {
 236                                 g_string_append_printf(gs, " %.4x-%.4x",
 237                                         devc->channel_levels[chan][v][0],
 238                                         devc->channel_levels[chan][v][1]);
 239                         }
 240                         sr_dbg("%s", gs->str);
 241                 }
 242                 g_string_free(gs, TRUE);
 243         }
 244
 245         return SR_OK;
 246 }
 247
 248 SR_PRIV int dso_set_trigger_samplerate(struct dev_context *devc)
 249 {
 250         int ret, tmp;
 251         uint8_t cmdstring[12];
 252         uint16_t timebase_small[] = { 0xffff, 0xfffc, 0xfff7, 0xffe8, 0xffce,
 253                 0xff9c, 0xff07, 0xfe0d, 0xfc19, 0xf63d, 0xec79, 0xd8f1 };
 254         uint16_t timebase_large[] = { 0xffff, 0x0000, 0xfffc, 0xfff7, 0xffe8,
 255                 0xffce, 0xff9d, 0xff07, 0xfe0d, 0xfc19, 0xf63d, 0xec79 };
 256
 257         sr_dbg("Preparing CMD_SET_TRIGGER_SAMPLERATE.");
 258
 259         memset(cmdstring, 0, sizeof(cmdstring));
 260         /* Command */
 261         cmdstring[0] = CMD_SET_TRIGGER_SAMPLERATE;
 262
 263         /* Trigger source */
 264         sr_dbg("Trigger source %s.", devc->triggersource);
 265         if (!strcmp("CH2", devc->triggersource))
 266                 tmp = 0;
 267         else if (!strcmp("CH1", devc->triggersource))
 268                 tmp = 1;
 269         else if (!strcmp("EXT", devc->triggersource))
 270                 tmp = 2;
 271         else {
 272                 sr_err("Invalid trigger source: '%s'.", devc->triggersource);
 273                 return SR_ERR_ARG;
 274         }
 275         cmdstring[2] = tmp;
 276
 277         /* Frame size */
 278         sr_dbg("Frame size: %d.", devc->framesize);
 279         cmdstring[2] |= (devc->framesize == FRAMESIZE_SMALL ? 0x01 : 0x02) << 2;
 280
 281         /* Timebase fast */
 282         sr_dbg("Time base index: %d.", devc->timebase);
 283         if (devc->framesize == FRAMESIZE_SMALL) {
 284                 if (devc->timebase < TIME_20us)
 285                         tmp = 0;
 286                 else if (devc->timebase == TIME_20us)
 287                         tmp = 1;
 288                 else if (devc->timebase == TIME_40us)
 289                         tmp = 2;
 290                 else if (devc->timebase == TIME_100us)
 291                         tmp = 3;
 292                 else if (devc->timebase >= TIME_200us)
 293                         tmp = 4;
 294         } else {
 295                 if (devc->timebase < TIME_40us) {
 296                         sr_err("Timebase < 40us only supported with 10K buffer.");
 297                         return SR_ERR_ARG;
 298                 }
 299                 else if (devc->timebase == TIME_40us)
 300                         tmp = 0;
 301                 else if (devc->timebase == TIME_100us)
 302                         tmp = 2;
 303                 else if (devc->timebase == TIME_200us)
 304                         tmp = 3;
 305                 else if (devc->timebase >= TIME_400us)
 306                         tmp = 4;
 307         }
 308         cmdstring[2] |= (tmp & 0x07) << 5;
 309
 310         /* Enabled channels: 00=CH1 01=CH2 10=both */
 311         sr_dbg("Channels CH1=%d CH2=%d", devc->ch1_enabled, devc->ch2_enabled);
 312         tmp = (((devc->ch2_enabled ? 1 : 0) << 1) + (devc->ch1_enabled ? 1 : 0)) - 1;
 313         cmdstring[3] = tmp;
 314
 315         /* Fast rates channel */
 316         /* TODO: Is this right? */
 317         tmp = devc->timebase < TIME_10us ? 1 : 0;
 318         cmdstring[3] |= tmp << 2;
 319
 320         /* Trigger slope: 0=positive 1=negative */
 321         /* TODO: Does this work? */
 322         sr_dbg("Trigger slope: %d.", devc->triggerslope);
 323         cmdstring[3] |= (devc->triggerslope == SLOPE_NEGATIVE ? 1 : 0) << 3;
 324
 325         /* Timebase slow */
 326         if (devc->timebase < TIME_100us)
 327                 tmp = 0;
 328         else if (devc->timebase > TIME_400ms)
 329                 tmp = 0xffed;
 330         else {
 331                 if (devc->framesize == FRAMESIZE_SMALL)
 332                         tmp = timebase_small[devc->timebase - 3];
 333                 else
 334                         tmp = timebase_large[devc->timebase - 3];
 335         }
 336         cmdstring[4] = tmp & 0xff;
 337         cmdstring[5] = (tmp >> 8) & 0xff;
 338
 339         /* Horizontal trigger position */
 340         sr_dbg("Trigger position: %3.2f.", devc->triggerposition);
 341         tmp = 0x77fff + 0x8000 * devc->triggerposition;
 342         cmdstring[6] = tmp & 0xff;
 343         cmdstring[7] = (tmp >> 8) & 0xff;
 344         cmdstring[10] = (tmp >> 16) & 0xff;
 345
 346         if (send_begin(devc) != SR_OK)
 347                 return SR_ERR;
 348
 349         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
 350                         DSO_EP_OUT | LIBUSB_ENDPOINT_OUT,
 351                         cmdstring, sizeof(cmdstring),
 352                         &tmp, 100)) != 0) {
 353                 sr_err("Failed to set trigger/samplerate: %s.",
 354                        libusb_error_name(ret));
 355                 return SR_ERR;
 356         }
 357         sr_dbg("Sent CMD_SET_TRIGGER_SAMPLERATE.");
 358
 359         return SR_OK;
 360 }
 361
 362 SR_PRIV int dso_set_filters(struct dev_context *devc)
 363 {
 364         int ret, tmp;
 365         uint8_t cmdstring[8];
 366
 367         sr_dbg("Preparing CMD_SET_FILTERS.");
 368
 369         memset(cmdstring, 0, sizeof(cmdstring));
 370         cmdstring[0] = CMD_SET_FILTERS;
 371         cmdstring[1] = 0x0f;
 372         if (devc->filter_ch1) {
 373                 sr_dbg("Turning on CH1 filter.");
 374                 cmdstring[2] |= 0x80;
 375         }
 376         if (devc->filter_ch2) {
 377                 sr_dbg("Turning on CH2 filter.");
 378                 cmdstring[2] |= 0x40;
 379         }
 380         if (devc->filter_trigger) {
 381                 /* TODO: supported on the DSO-2090? */
 382                 sr_dbg("Turning on trigger filter.");
 383                 cmdstring[2] |= 0x20;
 384         }
 385
 386         if (send_begin(devc) != SR_OK)
 387                 return SR_ERR;
 388
 389         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
 390                         DSO_EP_OUT | LIBUSB_ENDPOINT_OUT,
 391                         cmdstring, sizeof(cmdstring),
 392                         &tmp, 100)) != 0) {
 393                 sr_err("Failed to set filters: %s.", libusb_error_name(ret));
 394                 return SR_ERR;
 395         }
 396         sr_dbg("Sent CMD_SET_FILTERS.");
 397
 398         return SR_OK;
 399 }
 400
 401 SR_PRIV int dso_set_voltage(struct dev_context *devc)
 402 {
 403         int ret, tmp;
 404         uint8_t cmdstring[8];
 405
 406         sr_dbg("Preparing CMD_SET_VOLTAGE.");
 407
 408         memset(cmdstring, 0, sizeof(cmdstring));
 409         cmdstring[0] = CMD_SET_VOLTAGE;
 410         cmdstring[1] = 0x0f;
 411         cmdstring[2] = 0x30;
 412
 413         /* CH1 volts/div is encoded in bits 0-1 */
 414         sr_dbg("CH1 vdiv index: %d.", devc->voltage_ch1);
 415         switch (devc->voltage_ch1) {
 416         case VDIV_1V:
 417         case VDIV_100MV:
 418         case VDIV_10MV:
 419                 cmdstring[2] |= 0x00;
 420                 break;
 421         case VDIV_2V:
 422         case VDIV_200MV:
 423         case VDIV_20MV:
 424                 cmdstring[2] |= 0x01;
 425                 break;
 426         case VDIV_5V:
 427         case VDIV_500MV:
 428         case VDIV_50MV:
 429                 cmdstring[2] |= 0x02;
 430                 break;
 431         }
 432
 433         /* CH2 volts/div is encoded in bits 2-3 */
 434         sr_dbg("CH2 vdiv index: %d.", devc->voltage_ch2);
 435         switch (devc->voltage_ch2) {
 436         case VDIV_1V:
 437         case VDIV_100MV:
 438         case VDIV_10MV:
 439                 cmdstring[2] |= 0x00;
 440                 break;
 441         case VDIV_2V:
 442         case VDIV_200MV:
 443         case VDIV_20MV:
 444                 cmdstring[2] |= 0x04;
 445                 break;
 446         case VDIV_5V:
 447         case VDIV_500MV:
 448         case VDIV_50MV:
 449                 cmdstring[2] |= 0x08;
 450                 break;
 451         }
 452
 453         if (send_begin(devc) != SR_OK)
 454                 return SR_ERR;
 455
 456         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
 457                         DSO_EP_OUT | LIBUSB_ENDPOINT_OUT,
 458                         cmdstring, sizeof(cmdstring),
 459                         &tmp, 100)) != 0) {
 460                 sr_err("Failed to set voltage: %s.", libusb_error_name(ret));
 461                 return SR_ERR;
 462         }
 463         sr_dbg("Sent CMD_SET_VOLTAGE.");
 464
 465         return SR_OK;
 466 }
 467
 468 SR_PRIV int dso_set_relays(struct dev_context *devc)
 469 {
 470         GString *gs;
 471         int ret, i;
 472         uint8_t relays[17] = { 0x00, 0x04, 0x08, 0x02, 0x20, 0x40, 0x10, 0x01,
 473                         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };
 474
 475         sr_dbg("Preparing CTRL_SETRELAYS.");
 476
 477         if (devc->voltage_ch1 < VDIV_1V)
 478                 relays[1] = ~relays[1];
 479
 480         if (devc->voltage_ch1 < VDIV_100MV)
 481                 relays[2] = ~relays[2];
 482
 483         sr_dbg("CH1 coupling: %d.", devc->coupling_ch1);
 484         if (devc->coupling_ch1 != COUPLING_AC)
 485                 relays[3] = ~relays[3];
 486
 487         if (devc->voltage_ch2 < VDIV_1V)
 488                 relays[4] = ~relays[4];
 489
 490         if (devc->voltage_ch2 < VDIV_100MV)
 491                 relays[5] = ~relays[5];
 492
 493         sr_dbg("CH2 coupling: %d.", devc->coupling_ch1);
 494         if (devc->coupling_ch2 != COUPLING_AC)
 495                 relays[6] = ~relays[6];
 496
 497         if (!strcmp(devc->triggersource, "EXT"))
 498                 relays[7] = ~relays[7];
 499
 500         if (sr_log_loglevel_get() >= SR_LOG_DBG) {
 501                 gs = g_string_sized_new(128);
 502                 g_string_printf(gs, "Relays:");
 503                 for (i = 0; i < 17; i++)
 504                         g_string_append_printf(gs, " %.2x", relays[i]);
 505                 sr_dbg("%s", gs->str);
 506                 g_string_free(gs, TRUE);
 507         }
 508
 509         if ((ret = libusb_control_transfer(devc->usb->devhdl,
 510                         LIBUSB_REQUEST_TYPE_VENDOR, CTRL_SETRELAYS,
 511                         0, 0, relays, 17, 100)) != sizeof(relays)) {
 512                 sr_err("Failed to set relays: %s.", libusb_error_name(ret));
 513                 return SR_ERR;
 514         }
 515         sr_dbg("Sent CTRL_SETRELAYS.");
 516
 517         return SR_OK;
 518 }
 519
 520 SR_PRIV int dso_set_voffsets(struct dev_context *devc)
 521 {
 522         int offset, ret;
 523         uint16_t *ch_levels;
 524         uint8_t offsets[17];
 525
 526         sr_dbg("Preparing CTRL_SETOFFSET.");
 527
 528         memset(offsets, 0, sizeof(offsets));
 529         /* Channel 1 */
 530         ch_levels = devc->channel_levels[0][devc->voltage_ch1];
 531         offset = (ch_levels[1] - ch_levels[0]) * devc->voffset_ch1 + ch_levels[0];
 532         offsets[0] = (offset >> 8) | 0x20;
 533         offsets[1] = offset & 0xff;
 534         sr_dbg("CH1 offset: %3.2f (%.2x%.2x).", devc->voffset_ch1,
 535                offsets[0], offsets[1]);
 536
 537         /* Channel 2 */
 538         ch_levels = devc->channel_levels[1][devc->voltage_ch2];
 539         offset = (ch_levels[1] - ch_levels[0]) * devc->voffset_ch2 + ch_levels[0];
 540         offsets[2] = (offset >> 8) | 0x20;
 541         offsets[3] = offset & 0xff;
 542         sr_dbg("CH2 offset: %3.2f (%.2x%.2x).", devc->voffset_ch2,
 543                offsets[2], offsets[3]);
 544
 545         /* Trigger */
 546         offset = MAX_VERT_TRIGGER * devc->voffset_trigger;
 547         offsets[4] = (offset >> 8) | 0x20;
 548         offsets[5] = offset & 0xff;
 549         sr_dbg("Trigger offset: %3.2f (%.2x%.2x).", devc->voffset_trigger,
 550                         offsets[4], offsets[5]);
 551
 552         if ((ret = libusb_control_transfer(devc->usb->devhdl,
 553                         LIBUSB_REQUEST_TYPE_VENDOR, CTRL_SETOFFSET,
 554                         0, 0, offsets, sizeof(offsets), 100)) != sizeof(offsets)) {
 555                 sr_err("Failed to set offsets: %s.", libusb_error_name(ret));
 556                 return SR_ERR;
 557         }
 558         sr_dbg("Sent CTRL_SETOFFSET.");
 559
 560         return SR_OK;
 561 }
 562
 563 SR_PRIV int dso_enable_trigger(struct dev_context *devc)
 564 {
 565         int ret, tmp;
 566         uint8_t cmdstring[2];
 567
 568         sr_dbg("Sending CMD_ENABLE_TRIGGER.");
 569
 570         memset(cmdstring, 0, sizeof(cmdstring));
 571         cmdstring[0] = CMD_ENABLE_TRIGGER;
 572         cmdstring[1] = 0x00;
 573
 574         if (send_begin(devc) != SR_OK)
 575                 return SR_ERR;
 576
 577         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
 578                         DSO_EP_OUT | LIBUSB_ENDPOINT_OUT,
 579                         cmdstring, sizeof(cmdstring),
 580                         &tmp, 100)) != 0) {
 581                 sr_err("Failed to enable trigger: %s.", libusb_error_name(ret));
 582                 return SR_ERR;
 583         }
 584
 585         return SR_OK;
 586 }
 587
 588 SR_PRIV int dso_force_trigger(struct dev_context *devc)
 589 {
 590         int ret, tmp;
 591         uint8_t cmdstring[2];
 592
 593         sr_dbg("Sending CMD_FORCE_TRIGGER.");
 594
 595         memset(cmdstring, 0, sizeof(cmdstring));
 596         cmdstring[0] = CMD_FORCE_TRIGGER;
 597         cmdstring[1] = 0x00;
 598
 599         if (send_begin(devc) != SR_OK)
 600                 return SR_ERR;
 601
 602         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
 603                         DSO_EP_OUT | LIBUSB_ENDPOINT_OUT,
 604                         cmdstring, sizeof(cmdstring),
 605                         &tmp, 100)) != 0) {
 606                 sr_err("Failed to force trigger: %s.", libusb_error_name(ret));
 607                 return SR_ERR;
 608         }
 609
 610         return SR_OK;
 611 }
 612
 613 SR_PRIV int dso_init(struct dev_context *devc)
 614 {
 615
 616         sr_dbg("Initializing DSO.");
 617
 618         if (get_channel_offsets(devc) != SR_OK)
 619                 return SR_ERR;
 620
 621         if (dso_set_trigger_samplerate(devc) != SR_OK)
 622                 return SR_ERR;
 623
 624         if (dso_set_filters(devc) != SR_OK)
 625                 return SR_ERR;
 626
 627         if (dso_set_voltage(devc) != SR_OK)
 628                 return SR_ERR;
 629
 630         if (dso_set_relays(devc) != SR_OK)
 631                 return SR_ERR;
 632
 633         if (dso_set_voffsets(devc) != SR_OK)
 634                 return SR_ERR;
 635
 636         if (dso_enable_trigger(devc) != SR_OK)
 637                 return SR_ERR;
 638
 639         return SR_OK;
 640 }
 641
 642 SR_PRIV int dso_get_capturestate(struct dev_context *devc,
 643                                  uint8_t *capturestate,
 644                                  uint32_t *trigger_offset)
 645 {
 646         int ret, tmp, i;
 647         unsigned int bitvalue, toff;
 648         uint8_t cmdstring[2], inbuf[512];
 649
 650         sr_dbg("Sending CMD_GET_CAPTURESTATE.");
 651
 652         cmdstring[0] = CMD_GET_CAPTURESTATE;
 653         cmdstring[1] = 0;
 654
 655         if ((ret = send_bulkcmd(devc, cmdstring, sizeof(cmdstring))) != SR_OK) {
 656                 sr_dbg("Failed to send get_capturestate command: %s.",
 657                        libusb_error_name(ret));
 658                 return SR_ERR;
 659         }
 660
 661         if ((ret = libusb_bulk_transfer(devc->usb->devhdl,
 662                         DSO_EP_IN | LIBUSB_ENDPOINT_IN,
 663                         inbuf, 512, &tmp, 100)) != 0) {
 664                 sr_dbg("Failed to get capturestate: %s.",
 665                        libusb_error_name(ret));
 666                 return SR_ERR;
 667         }
 668         *capturestate = inbuf[0];
 669         toff = (inbuf[1] << 16) | (inbuf[3] << 8) | inbuf[2];
 670
 671         /*
 672          * This conversion comes from the openhantek project.
 673          * Each set bit in the 24-bit value inverts all bits with a lower
 674          * value. No idea why the device reports the trigger point this way.
 675          */
 676         bitvalue = 1;
 677         for (i = 0; i < 24; i++) {
 678                 /* Each set bit inverts all bits with a lower value. */
 679                 if(toff & bitvalue)
 680                         toff ^= bitvalue - 1;
 681                 bitvalue <<= 1;
 682         }
 683         *trigger_offset = toff;
 684
 685         return SR_OK;
 686 }
 687
 688 SR_PRIV int dso_capture_start(struct dev_context *devc)
 689 {
 690         int ret;
 691         uint8_t cmdstring[2];
 692
 693         sr_dbg("Sending CMD_CAPTURE_START.");
 694
 695         cmdstring[0] = CMD_CAPTURE_START;
 696         cmdstring[1] = 0;
 697
 698         if ((ret = send_bulkcmd(devc, cmdstring, sizeof(cmdstring))) != SR_OK) {
 699                 sr_err("Failed to send capture_start command: %s.",
 700                        libusb_error_name(ret));
 701                 return SR_ERR;
 702         }
 703
 704         return SR_OK;
 705 }
 706
 707 SR_PRIV int dso_get_channeldata(const struct sr_dev_inst *sdi,
 708                 libusb_transfer_cb_fn cb)
 709 {
 710         struct dev_context *devc;
 711         struct libusb_transfer *transfer;
 712         int num_transfers, ret, i;
 713         uint8_t cmdstring[2];
 714         unsigned char *buf;
 715
 716         devc = sdi->priv;
 717         sr_dbg("Sending CMD_GET_CHANNELDATA.");
 718
 719         cmdstring[0] = CMD_GET_CHANNELDATA;
 720         cmdstring[1] = 0;
 721
 722         if ((ret = send_bulkcmd(devc, cmdstring, sizeof(cmdstring))) != SR_OK) {
 723                 sr_err("Failed to get channel data: %s.",
 724                        libusb_error_name(ret));
 725                 return SR_ERR;
 726         }
 727
 728         /* TODO: DSO-2xxx only. */
 729         num_transfers = devc->framesize *
 730                         sizeof(unsigned short) / devc->epin_maxpacketsize;
 731         sr_dbg("Queueing up %d transfers.", num_transfers);
 732         for (i = 0; i < num_transfers; i++) {
 733                 if (!(buf = g_try_malloc(devc->epin_maxpacketsize))) {
 734                         sr_err("Failed to malloc USB endpoint buffer.");
 735                         return SR_ERR_MALLOC;
 736                 }
 737                 transfer = libusb_alloc_transfer(0);
 738                 libusb_fill_bulk_transfer(transfer, devc->usb->devhdl,
 739                                 DSO_EP_IN | LIBUSB_ENDPOINT_IN, buf,
 740                                 devc->epin_maxpacketsize, cb, (void *)sdi, 40);
 741                 if ((ret = libusb_submit_transfer(transfer)) != 0) {
 742                         sr_err("Failed to submit transfer: %s.",
 743                                libusb_error_name(ret));
 744                         /* TODO: Free them all. */
 745                         libusb_free_transfer(transfer);
 746                         g_free(buf);
 747                         return SR_ERR;
 748                 }
 749         }
 750
 751         return SR_OK;
 752 }