]> sigrok.org Git - libsigrok.git/blob - src/hardware/hantek-6xxx/api.c
hantek-6xxx: sdi might be NULL - don't assign devc until !sdi is checked.
[libsigrok.git] / src / hardware / hantek-6xxx / api.c
1 /*
2  * This file is part of the libsigrok project.
3  *
4  * Copyright (C) 2015 Christer Ekholm <christerekholm@gmail.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 "protocol.h"
22
23 /* Max time in ms before we want to check on USB events */
24 #define TICK 200
25
26 #define RANGE(ch) (((float)vdivs[devc->voltage[ch]][0] / vdivs[devc->voltage[ch]][1]) * VDIV_MULTIPLIER)
27
28 static const uint32_t scanopts[] = {
29         SR_CONF_CONN,
30 };
31
32 static const uint32_t drvopts[] = {
33         SR_CONF_OSCILLOSCOPE,
34 };
35
36 static const uint32_t devopts[] = {
37         SR_CONF_CONN | SR_CONF_GET,
38         SR_CONF_SAMPLERATE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
39         SR_CONF_NUM_VDIV | SR_CONF_GET,
40         SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
41         SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
42 };
43
44 static const uint32_t devopts_cg[] = {
45         SR_CONF_VDIV | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
46         SR_CONF_COUPLING | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
47 };
48
49 static const char *channel_names[] = {
50         "CH1", "CH2",
51 };
52
53 static const char *dc_coupling[] = {
54         "DC", "DC",
55 };
56
57 static const char *acdc_coupling[] = {
58         "AC", "DC",
59 };
60
61 static const struct hantek_6xxx_profile dev_profiles[] = {
62         {
63                 0x04b4, 0x6022, 0x04b5, 0x6022,
64                 "Hantek", "6022BE", "hantek-6022be.fw",
65                 dc_coupling, ARRAY_SIZE(dc_coupling),
66         },
67         {
68                 0x8102, 0x8102, 0x1D50, 0x608E,
69                 "Sainsmart", "DDS120", "sainsmart-dds120.fw",
70                 acdc_coupling, ARRAY_SIZE(acdc_coupling),
71         },
72         ALL_ZERO
73 };
74
75 static const uint64_t samplerates[] = {
76         SAMPLERATE_VALUES
77 };
78
79 static const uint64_t vdivs[][2] = {
80         VDIV_VALUES
81 };
82
83 static int read_channel(const struct sr_dev_inst *sdi, uint32_t amount);
84
85 static int dev_acquisition_stop(struct sr_dev_inst *sdi);
86
87 static struct sr_dev_inst *hantek_6xxx_dev_new(const struct hantek_6xxx_profile *prof)
88 {
89         struct sr_dev_inst *sdi;
90         struct sr_channel *ch;
91         struct sr_channel_group *cg;
92         struct dev_context *devc;
93         unsigned int i;
94
95         sdi = g_malloc0(sizeof(struct sr_dev_inst));
96         sdi->status = SR_ST_INITIALIZING;
97         sdi->vendor = g_strdup(prof->vendor);
98         sdi->model = g_strdup(prof->model);
99
100         for (i = 0; i < ARRAY_SIZE(channel_names); i++) {
101                 ch = sr_channel_new(sdi, i, SR_CHANNEL_ANALOG, TRUE, channel_names[i]);
102                 cg = g_malloc0(sizeof(struct sr_channel_group));
103                 cg->name = g_strdup(channel_names[i]);
104                 cg->channels = g_slist_append(cg->channels, ch);
105                 sdi->channel_groups = g_slist_append(sdi->channel_groups, cg);
106         }
107
108         devc = g_malloc0(sizeof(struct dev_context));
109
110         for (i = 0; i < NUM_CHANNELS; i++) {
111                 devc->ch_enabled[i] = TRUE;
112                 devc->voltage[i] = DEFAULT_VOLTAGE;
113                 devc->coupling[i] = DEFAULT_COUPLING;
114         }
115         devc->coupling_vals = prof->coupling_vals;
116         devc->coupling_tab_size = prof->coupling_tab_size;
117
118         devc->sample_buf = NULL;
119         devc->sample_buf_write = 0;
120         devc->sample_buf_size = 0;
121
122         devc->profile = prof;
123         devc->dev_state = IDLE;
124         devc->samplerate = DEFAULT_SAMPLERATE;
125
126         sdi->priv = devc;
127
128         return sdi;
129 }
130
131 static int configure_channels(const struct sr_dev_inst *sdi)
132 {
133         struct dev_context *devc;
134         const GSList *l;
135         int p;
136         struct sr_channel *ch;
137         devc = sdi->priv;
138
139         g_slist_free(devc->enabled_channels);
140         devc->enabled_channels = NULL;
141         memset(devc->ch_enabled, 0, sizeof(devc->ch_enabled));
142
143         for (l = sdi->channels, p = 0; l; l = l->next, p++) {
144                 ch = l->data;
145                 if (p < NUM_CHANNELS) {
146                         devc->ch_enabled[p] = ch->enabled;
147                         devc->enabled_channels = g_slist_append(devc->enabled_channels, ch);
148                 }
149         }
150
151         return SR_OK;
152 }
153
154 static void clear_dev_context(void *priv)
155 {
156         struct dev_context *devc;
157
158         devc = priv;
159         g_slist_free(devc->enabled_channels);
160         g_free(devc);
161 }
162
163 static int dev_clear(const struct sr_dev_driver *di)
164 {
165         return std_dev_clear(di, clear_dev_context);
166 }
167
168 static GSList *scan(struct sr_dev_driver *di, GSList *options)
169 {
170         struct drv_context *drvc;
171         struct dev_context *devc;
172         struct sr_dev_inst *sdi;
173         struct sr_usb_dev_inst *usb;
174         struct sr_config *src;
175         const struct hantek_6xxx_profile *prof;
176         GSList *l, *devices, *conn_devices;
177         struct libusb_device_descriptor des;
178         libusb_device **devlist;
179         int i, j;
180         const char *conn;
181         char connection_id[64];
182
183         drvc = di->context;
184
185         devices = 0;
186
187         conn = NULL;
188         for (l = options; l; l = l->next) {
189                 src = l->data;
190                 if (src->key == SR_CONF_CONN) {
191                         conn = g_variant_get_string(src->data, NULL);
192                         break;
193                 }
194         }
195         if (conn)
196                 conn_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, conn);
197         else
198                 conn_devices = NULL;
199
200         /* Find all Hantek 60xx devices and upload firmware to all of them. */
201         libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
202         for (i = 0; devlist[i]; i++) {
203                 if (conn) {
204                         usb = NULL;
205                         for (l = conn_devices; l; l = l->next) {
206                                 usb = l->data;
207                                 if (usb->bus == libusb_get_bus_number(devlist[i])
208                                         && usb->address == libusb_get_device_address(devlist[i]))
209                                         break;
210                         }
211                         if (!l)
212                                 /* This device matched none of the ones that
213                                  * matched the conn specification. */
214                                 continue;
215                 }
216
217                 libusb_get_device_descriptor(devlist[i], &des);
218
219                 usb_get_port_path(devlist[i], connection_id, sizeof(connection_id));
220
221                 prof = NULL;
222                 for (j = 0; dev_profiles[j].orig_vid; j++) {
223                         if (des.idVendor == dev_profiles[j].orig_vid
224                                 && des.idProduct == dev_profiles[j].orig_pid) {
225                                 /* Device matches the pre-firmware profile. */
226                                 prof = &dev_profiles[j];
227                                 sr_dbg("Found a %s %s.", prof->vendor, prof->model);
228                                 sdi = hantek_6xxx_dev_new(prof);
229                                 sdi->connection_id = g_strdup(connection_id);
230                                 devices = g_slist_append(devices, sdi);
231                                 devc = sdi->priv;
232                                 if (ezusb_upload_firmware(drvc->sr_ctx, devlist[i],
233                                                 USB_CONFIGURATION, prof->firmware) == SR_OK)
234                                         /* Remember when the firmware on this device was updated. */
235                                         devc->fw_updated = g_get_monotonic_time();
236                                 else
237                                         sr_err("Firmware upload failed.");
238                                 /* Dummy USB address of 0xff will get overwritten later. */
239                                 sdi->conn = sr_usb_dev_inst_new(
240                                                 libusb_get_bus_number(devlist[i]), 0xff, NULL);
241                                 break;
242                         } else if (des.idVendor == dev_profiles[j].fw_vid
243                                 && des.idProduct == dev_profiles[j].fw_pid) {
244                                 /* Device matches the post-firmware profile. */
245                                 prof = &dev_profiles[j];
246                                 sr_dbg("Found a %s %s.", prof->vendor, prof->model);
247                                 sdi = hantek_6xxx_dev_new(prof);
248                                 sdi->connection_id = g_strdup(connection_id);
249                                 sdi->status = SR_ST_INACTIVE;
250                                 devices = g_slist_append(devices, sdi);
251                                 sdi->inst_type = SR_INST_USB;
252                                 sdi->conn = sr_usb_dev_inst_new(
253                                                 libusb_get_bus_number(devlist[i]),
254                                                 libusb_get_device_address(devlist[i]), NULL);
255                                 break;
256                         }
257                 }
258                 if (!prof)
259                         /* Not a supported VID/PID. */
260                         continue;
261         }
262         libusb_free_device_list(devlist, 1);
263
264         return std_scan_complete(di, devices);
265 }
266
267 static int dev_open(struct sr_dev_inst *sdi)
268 {
269         struct dev_context *devc;
270         struct sr_usb_dev_inst *usb;
271         int64_t timediff_us, timediff_ms;
272         int err;
273
274         devc = sdi->priv;
275         usb = sdi->conn;
276
277         /*
278          * If the firmware was recently uploaded, wait up to MAX_RENUM_DELAY_MS
279          * for the FX2 to renumerate.
280          */
281         err = SR_ERR;
282         if (devc->fw_updated > 0) {
283                 sr_info("Waiting for device to reset.");
284                 /* Takes >= 300ms for the FX2 to be gone from the USB bus. */
285                 g_usleep(300 * 1000);
286                 timediff_ms = 0;
287                 while (timediff_ms < MAX_RENUM_DELAY_MS) {
288                         if ((err = hantek_6xxx_open(sdi)) == SR_OK)
289                                 break;
290                         g_usleep(100 * 1000);
291                         timediff_us = g_get_monotonic_time() - devc->fw_updated;
292                         timediff_ms = timediff_us / 1000;
293                         sr_spew("Waited %" PRIi64 " ms.", timediff_ms);
294                 }
295                 if (timediff_ms < MAX_RENUM_DELAY_MS)
296                         sr_info("Device came back after %"PRIu64" ms.", timediff_ms);
297         } else {
298                 err = hantek_6xxx_open(sdi);
299         }
300
301         if (err != SR_OK) {
302                 sr_err("Unable to open device.");
303                 return SR_ERR;
304         }
305
306         err = libusb_claim_interface(usb->devhdl, USB_INTERFACE);
307         if (err != 0) {
308                 sr_err("Unable to claim interface: %s.",
309                            libusb_error_name(err));
310                 return SR_ERR;
311         }
312
313         return SR_OK;
314 }
315
316 static int dev_close(struct sr_dev_inst *sdi)
317 {
318         hantek_6xxx_close(sdi);
319
320         return SR_OK;
321 }
322
323 static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
324                 const struct sr_channel_group *cg)
325 {
326         struct dev_context *devc;
327         struct sr_usb_dev_inst *usb;
328         char str[128];
329         const uint64_t *vdiv;
330         int ch_idx;
331
332         switch (key) {
333         case SR_CONF_NUM_VDIV:
334                 *data = g_variant_new_int32(ARRAY_SIZE(vdivs));
335                 break;
336         }
337
338         if (!sdi)
339                 return SR_ERR_ARG;
340
341         devc = sdi->priv;
342         if (!cg) {
343                 switch (key) {
344                 case SR_CONF_SAMPLERATE:
345                         *data = g_variant_new_uint64(devc->samplerate);
346                         break;
347                 case SR_CONF_LIMIT_MSEC:
348                         *data = g_variant_new_uint64(devc->limit_msec);
349                         break;
350                 case SR_CONF_LIMIT_SAMPLES:
351                         *data = g_variant_new_uint64(devc->limit_samples);
352                         break;
353                 case SR_CONF_CONN:
354                         if (!sdi->conn)
355                                 return SR_ERR_ARG;
356                         usb = sdi->conn;
357                         if (usb->address == 255)
358                                 /* Device still needs to re-enumerate after firmware
359                                  * upload, so we don't know its (future) address. */
360                                 return SR_ERR;
361                         snprintf(str, 128, "%d.%d", usb->bus, usb->address);
362                         *data = g_variant_new_string(str);
363                         break;
364                 default:
365                         return SR_ERR_NA;
366                 }
367         } else {
368                 if (sdi->channel_groups->data == cg)
369                         ch_idx = 0;
370                 else if (sdi->channel_groups->next->data == cg)
371                         ch_idx = 1;
372                 else
373                         return SR_ERR_ARG;
374                 switch (key) {
375                 case SR_CONF_VDIV:
376                         vdiv = vdivs[devc->voltage[ch_idx]];
377                         *data = g_variant_new("(tt)", vdiv[0], vdiv[1]);
378                         break;
379                 case SR_CONF_COUPLING:
380                         *data = g_variant_new_string(devc->coupling_vals[devc->coupling[ch_idx]]);
381                         break;
382                 }
383         }
384
385         return SR_OK;
386 }
387
388 static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi,
389                 const struct sr_channel_group *cg)
390 {
391         struct dev_context *devc;
392         uint64_t p, q;
393         int tmp_int, ch_idx, ret;
394         unsigned int i;
395         const char *tmp_str;
396
397         if (sdi->status != SR_ST_ACTIVE)
398                 return SR_ERR_DEV_CLOSED;
399
400         ret = SR_OK;
401         devc = sdi->priv;
402         if (!cg) {
403                 switch (key) {
404                 case SR_CONF_SAMPLERATE:
405                         devc->samplerate = g_variant_get_uint64(data);
406                         hantek_6xxx_update_samplerate(sdi);
407                         break;
408                 case SR_CONF_LIMIT_MSEC:
409                         devc->limit_msec = g_variant_get_uint64(data);
410                         break;
411                 case SR_CONF_LIMIT_SAMPLES:
412                         devc->limit_samples = g_variant_get_uint64(data);
413                         break;
414                 default:
415                         ret = SR_ERR_NA;
416                         break;
417                 }
418         } else {
419                 if (sdi->channel_groups->data == cg)
420                         ch_idx = 0;
421                 else if (sdi->channel_groups->next->data == cg)
422                         ch_idx = 1;
423                 else
424                         return SR_ERR_ARG;
425                 switch (key) {
426                 case SR_CONF_VDIV:
427                         g_variant_get(data, "(tt)", &p, &q);
428                         tmp_int = -1;
429                         for (i = 0; i < ARRAY_SIZE(vdivs); i++) {
430                                 if (vdivs[i][0] == p && vdivs[i][1] == q) {
431                                         tmp_int = i;
432                                         break;
433                                 }
434                         }
435                         if (tmp_int >= 0) {
436                                 devc->voltage[ch_idx] = tmp_int;
437                                 hantek_6xxx_update_vdiv(sdi);
438                         } else
439                                 ret = SR_ERR_ARG;
440                         break;
441                 case SR_CONF_COUPLING:
442                         tmp_str = g_variant_get_string(data, NULL);
443                         for (i = 0; devc->coupling_vals[i]; i++) {
444                                 if (!strcmp(tmp_str, devc->coupling_vals[i])) {
445                                         devc->coupling[ch_idx] = i;
446                                         break;
447                                 }
448                         }
449                         if (devc->coupling_vals[i] == 0)
450                                 ret = SR_ERR_ARG;
451                         break;
452                 default:
453                         ret = SR_ERR_NA;
454                         break;
455                 }
456         }
457
458         return ret;
459 }
460
461 static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
462                 const struct sr_channel_group *cg)
463 {
464         GVariant *tuple, *rational[2];
465         GVariantBuilder gvb;
466         unsigned int i;
467         GVariant *gvar;
468         struct dev_context *devc;
469
470         if (key == SR_CONF_SCAN_OPTIONS) {
471                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
472                         scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
473                 return SR_OK;
474         } else if (key == SR_CONF_DEVICE_OPTIONS && !sdi) {
475                 *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
476                         drvopts, ARRAY_SIZE(drvopts), sizeof(uint32_t));
477                 return SR_OK;
478         }
479
480         if (!sdi)
481                 return SR_ERR_ARG;
482
483         devc = sdi->priv;
484
485         if (!cg) {
486                 switch (key) {
487                 case SR_CONF_DEVICE_OPTIONS:
488                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
489                                 devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
490                         break;
491                 case SR_CONF_SAMPLERATE:
492                         g_variant_builder_init(&gvb, G_VARIANT_TYPE("a{sv}"));
493                         gvar = g_variant_new_fixed_array(G_VARIANT_TYPE("t"),
494                                 samplerates, ARRAY_SIZE(samplerates),
495                                 sizeof(uint64_t));
496                         g_variant_builder_add(&gvb, "{sv}", "samplerates", gvar);
497                         *data = g_variant_builder_end(&gvb);
498                         break;
499                 default:
500                         return SR_ERR_NA;
501                 }
502         } else {
503                 switch (key) {
504                 case SR_CONF_DEVICE_OPTIONS:
505                         *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
506                                 devopts_cg, ARRAY_SIZE(devopts_cg), sizeof(uint32_t));
507                         break;
508                 case SR_CONF_COUPLING:
509                         *data = g_variant_new_strv(devc->coupling_vals, devc->coupling_tab_size);
510                         break;
511                 case SR_CONF_VDIV:
512                         g_variant_builder_init(&gvb, G_VARIANT_TYPE_ARRAY);
513                         for (i = 0; i < ARRAY_SIZE(vdivs); i++) {
514                                 rational[0] = g_variant_new_uint64(vdivs[i][0]);
515                                 rational[1] = g_variant_new_uint64(vdivs[i][1]);
516                                 tuple = g_variant_new_tuple(rational, 2);
517                                 g_variant_builder_add_value(&gvb, tuple);
518                         }
519                         *data = g_variant_builder_end(&gvb);
520                         break;
521                 default:
522                         return SR_ERR_NA;
523                 }
524         }
525
526         return SR_OK;
527 }
528
529 /* Minimise data amount for limit_samples and limit_msec limits. */
530 static uint32_t data_amount(const struct sr_dev_inst *sdi)
531 {
532         struct dev_context *devc = sdi->priv;
533         uint32_t data_left, data_left_2, i;
534         int32_t time_left;
535
536         if (devc->limit_msec) {
537                 time_left = devc->limit_msec - (g_get_monotonic_time() - devc->aq_started) / 1000;
538                 data_left = devc->samplerate * MAX(time_left, 0) * NUM_CHANNELS / 1000;
539         } else if (devc->limit_samples) {
540                 data_left = (devc->limit_samples - devc->samp_received) * NUM_CHANNELS;
541         } else {
542                 data_left = devc->samplerate * NUM_CHANNELS;
543         }
544
545         /* Round up to nearest power of two. */
546         for (i = MIN_PACKET_SIZE; i < data_left; i *= 2)
547                 ;
548         data_left_2 = i;
549
550         sr_spew("data_amount: %u (rounded to power of 2: %u)", data_left, data_left_2);
551
552         return data_left_2;
553 }
554
555 static void send_chunk(struct sr_dev_inst *sdi, unsigned char *buf,
556                 int num_samples)
557 {
558         struct sr_datafeed_packet packet;
559         struct sr_datafeed_analog analog;
560         struct sr_analog_encoding encoding;
561         struct sr_analog_meaning meaning;
562         struct sr_analog_spec spec;
563         struct dev_context *devc = sdi->priv;
564         int num_channels, data_offset, i;
565
566         const float ch1_bit = RANGE(0) / 255;
567         const float ch2_bit = RANGE(1) / 255;
568         const float ch1_center = RANGE(0) / 2;
569         const float ch2_center = RANGE(1) / 2;
570
571         const gboolean ch1_ena = !!devc->ch_enabled[0];
572         const gboolean ch2_ena = !!devc->ch_enabled[1];
573
574         sr_analog_init(&analog, &encoding, &meaning, &spec, 0);
575
576         num_channels = (ch1_ena && ch2_ena) ? 2 : 1;
577         packet.type = SR_DF_ANALOG;
578         packet.payload = &analog;
579
580         analog.meaning->channels = devc->enabled_channels;
581         analog.num_samples = num_samples;
582         analog.meaning->mq = SR_MQ_VOLTAGE;
583         analog.meaning->unit = SR_UNIT_VOLT;
584         analog.meaning->mqflags = 0;
585
586         analog.data = g_try_malloc(analog.num_samples * sizeof(float) * num_channels);
587         if (!analog.data) {
588                 sr_err("Analog data buffer malloc failed.");
589                 devc->dev_state = STOPPING;
590                 return;
591         }
592
593         data_offset = 0;
594         for (i = 0; i < num_samples; i++) {
595                 /*
596                  * The device always sends data for both channels. If a channel
597                  * is disabled, it contains a copy of the enabled channel's
598                  * data. However, we only send the requested channels to
599                  * the bus.
600                  *
601                  * Voltage values are encoded as a value 0-255, where the
602                  * value is a point in the range represented by the vdiv
603                  * setting. There are 10 vertical divs, so e.g. 500mV/div
604                  * represents 5V peak-to-peak where 0 = -2.5V and 255 = +2.5V.
605                  */
606                 if (ch1_ena)
607                         ((float *)analog.data)[data_offset++] = (ch1_bit * *(buf + i * 2) - ch1_center);
608                 if (ch2_ena)
609                         ((float *)analog.data)[data_offset++] = (ch2_bit * *(buf + i * 2 + 1) - ch2_center);
610         }
611
612         sr_session_send(sdi, &packet);
613         g_free(analog.data);
614 }
615
616 static void send_data(struct sr_dev_inst *sdi, struct libusb_transfer *buf[], uint64_t samples)
617 {
618         int i = 0;
619         uint64_t send = 0;
620         uint32_t chunk;
621
622         while (send < samples) {
623                 chunk = MIN(samples - send, (uint64_t)(buf[i]->actual_length / NUM_CHANNELS));
624                 send += chunk;
625                 send_chunk(sdi, buf[i]->buffer, chunk);
626
627                 /*
628                  * Everything in this transfer was either copied to the buffer
629                  * or sent to the session bus.
630                  */
631                 g_free(buf[i]->buffer);
632                 libusb_free_transfer(buf[i]);
633                 i++;
634         }
635 }
636
637 /*
638  * Called by libusb (as triggered by handle_event()) when a transfer comes in.
639  * Only channel data comes in asynchronously, and all transfers for this are
640  * queued up beforehand, so this just needs to chuck the incoming data onto
641  * the libsigrok session bus.
642  */
643 static void LIBUSB_CALL receive_transfer(struct libusb_transfer *transfer)
644 {
645         struct sr_dev_inst *sdi;
646         struct dev_context *devc;
647
648         sdi = transfer->user_data;
649         devc = sdi->priv;
650
651         if (devc->dev_state == FLUSH) {
652                 g_free(transfer->buffer);
653                 libusb_free_transfer(transfer);
654                 devc->dev_state = CAPTURE;
655                 devc->aq_started = g_get_monotonic_time();
656                 read_channel(sdi, data_amount(sdi));
657                 return;
658         }
659
660         if (devc->dev_state != CAPTURE)
661                 return;
662
663         if (!devc->sample_buf) {
664                 devc->sample_buf_size = 10;
665                 devc->sample_buf = g_try_malloc(devc->sample_buf_size * sizeof(transfer));
666                 devc->sample_buf_write = 0;
667         }
668
669         if (devc->sample_buf_write >= devc->sample_buf_size) {
670                 devc->sample_buf_size += 10;
671                 devc->sample_buf = g_try_realloc(devc->sample_buf,
672                                 devc->sample_buf_size * sizeof(transfer));
673                 if (!devc->sample_buf) {
674                         sr_err("Sample buffer malloc failed.");
675                         devc->dev_state = STOPPING;
676                         return;
677                 }
678         }
679
680         devc->sample_buf[devc->sample_buf_write++] = transfer;
681         devc->samp_received += transfer->actual_length / NUM_CHANNELS;
682
683         sr_spew("receive_transfer(): calculated samplerate == %" PRIu64 "ks/s",
684                 (uint64_t)(transfer->actual_length * 1000 /
685                 (g_get_monotonic_time() - devc->read_start_ts + 1) /
686                 NUM_CHANNELS));
687
688         sr_spew("receive_transfer(): status %s received %d bytes.",
689                 libusb_error_name(transfer->status), transfer->actual_length);
690
691         if (transfer->actual_length == 0)
692                 /* Nothing to send to the bus. */
693                 return;
694
695         if (devc->limit_samples && devc->samp_received >= devc->limit_samples) {
696                 sr_info("Requested number of samples reached, stopping. %"
697                         PRIu64 " <= %" PRIu64, devc->limit_samples,
698                         devc->samp_received);
699                 send_data(sdi, devc->sample_buf, devc->limit_samples);
700                 sdi->driver->dev_acquisition_stop(sdi);
701         } else if (devc->limit_msec && (g_get_monotonic_time() -
702                         devc->aq_started) / 1000 >= devc->limit_msec) {
703                 sr_info("Requested time limit reached, stopping. %d <= %d",
704                         (uint32_t)devc->limit_msec,
705                         (uint32_t)(g_get_monotonic_time() - devc->aq_started) / 1000);
706                 send_data(sdi, devc->sample_buf, devc->samp_received);
707                 g_free(devc->sample_buf);
708                 devc->sample_buf = NULL;
709                 sdi->driver->dev_acquisition_stop(sdi);
710         } else {
711                 read_channel(sdi, data_amount(sdi));
712         }
713 }
714
715 static int read_channel(const struct sr_dev_inst *sdi, uint32_t amount)
716 {
717         int ret;
718         struct dev_context *devc;
719
720         devc = sdi->priv;
721
722         amount = MIN(amount, MAX_PACKET_SIZE);
723         ret = hantek_6xxx_get_channeldata(sdi, receive_transfer, amount);
724         devc->read_start_ts = g_get_monotonic_time();
725         devc->read_data_amount = amount;
726
727         return ret;
728 }
729
730 static int handle_event(int fd, int revents, void *cb_data)
731 {
732         const struct sr_dev_inst *sdi;
733         struct timeval tv;
734         struct sr_dev_driver *di;
735         struct dev_context *devc;
736         struct drv_context *drvc;
737
738         (void)fd;
739         (void)revents;
740
741         sdi = cb_data;
742         di = sdi->driver;
743         drvc = di->context;
744         devc = sdi->priv;
745
746         /* Always handle pending libusb events. */
747         tv.tv_sec = tv.tv_usec = 0;
748         libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
749
750         if (devc->dev_state == STOPPING) {
751                 /* We've been told to wind up the acquisition. */
752                 sr_dbg("Stopping acquisition.");
753
754                 hantek_6xxx_stop_data_collecting(sdi);
755                 /*
756                  * TODO: Doesn't really cancel pending transfers so they might
757                  * come in after SR_DF_END is sent.
758                  */
759                 usb_source_remove(sdi->session, drvc->sr_ctx);
760
761                 std_session_send_df_end(sdi);
762
763                 devc->dev_state = IDLE;
764
765                 return TRUE;
766         }
767
768         return TRUE;
769 }
770
771 static int dev_acquisition_start(const struct sr_dev_inst *sdi)
772 {
773         struct dev_context *devc;
774         struct sr_dev_driver *di = sdi->driver;
775         struct drv_context *drvc = di->context;
776
777         if (sdi->status != SR_ST_ACTIVE)
778                 return SR_ERR_DEV_CLOSED;
779
780         devc = sdi->priv;
781
782         if (configure_channels(sdi) != SR_OK) {
783                 sr_err("Failed to configure channels.");
784                 return SR_ERR;
785         }
786
787         if (hantek_6xxx_init(sdi) != SR_OK)
788                 return SR_ERR;
789
790         std_session_send_df_header(sdi);
791
792         devc->samp_received = 0;
793         devc->dev_state = FLUSH;
794
795         usb_source_add(sdi->session, drvc->sr_ctx, TICK,
796                        handle_event, (void *)sdi);
797
798         hantek_6xxx_start_data_collecting(sdi);
799
800         read_channel(sdi, FLUSH_PACKET_SIZE);
801
802         return SR_OK;
803 }
804
805 static int dev_acquisition_stop(struct sr_dev_inst *sdi)
806 {
807         struct dev_context *devc;
808
809         if (sdi->status != SR_ST_ACTIVE)
810                 return SR_ERR;
811
812         devc = sdi->priv;
813         devc->dev_state = STOPPING;
814
815         g_free(devc->sample_buf); devc->sample_buf = NULL;
816
817         return SR_OK;
818 }
819
820 static struct sr_dev_driver hantek_6xxx_driver_info = {
821         .name = "hantek-6xxx",
822         .longname = "Hantek 6xxx",
823         .api_version = 1,
824         .init = std_init,
825         .cleanup = std_cleanup,
826         .scan = scan,
827         .dev_list = std_dev_list,
828         .dev_clear = dev_clear,
829         .config_get = config_get,
830         .config_set = config_set,
831         .config_list = config_list,
832         .dev_open = dev_open,
833         .dev_close = dev_close,
834         .dev_acquisition_start = dev_acquisition_start,
835         .dev_acquisition_stop = dev_acquisition_stop,
836         .context = NULL,
837 };
838 SR_REGISTER_DEV_DRIVER(hantek_6xxx_driver_info);