2 * This file is part of the libsigrok project.
4 * Copyright (C) 2020 Florian Schmidt <schmidt_florian@gmx.de>
5 * Copyright (C) 2013 Marcus Comstedt <marcus@mc.pp.se>
6 * Copyright (C) 2013 Bert Vermeulen <bert@biot.com>
7 * Copyright (C) 2012 Joel Holdsworth <joel@airwebreathe.org.uk>
9 * This program is free software: you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation, either version 3 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program. If not, see <http://www.gnu.org/licenses/>.
23 /* mostly stolen from src/hardware/saleae-logic16/ */
31 #include <libsigrok/libsigrok.h>
32 #include "libsigrok-internal.h"
35 static const uint32_t scanopts[] = {
39 static const uint32_t drvopts[] = {
40 SR_CONF_LOGIC_ANALYZER,
43 static const uint32_t devopts[] = {
44 /* TODO: SR_CONF_CONTINUOUS, */
45 SR_CONF_CONN | SR_CONF_GET,
46 SR_CONF_SAMPLERATE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
47 SR_CONF_LIMIT_SAMPLES | SR_CONF_SET | SR_CONF_GET | SR_CONF_LIST,
48 SR_CONF_VOLTAGE_THRESHOLD | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
49 SR_CONF_LOGIC_THRESHOLD | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
50 SR_CONF_LOGIC_THRESHOLD_CUSTOM | SR_CONF_GET | SR_CONF_SET,
51 SR_CONF_TRIGGER_MATCH | SR_CONF_LIST,
52 SR_CONF_CAPTURE_RATIO | SR_CONF_GET | SR_CONF_SET,
55 static const int32_t trigger_matches[] = {
62 static const char *channel_names[] = {
63 "0", "1", "2", "3", "4", "5", "6", "7", "8",
64 "9", "10", "11", "12", "13", "14", "15",
67 static const uint64_t samplerates[] = {
85 static const float logic_threshold_value[] = {
97 static const char *logic_threshold[] = {
110 #define MAX_NUM_LOGIC_THRESHOLD_ENTRIES ARRAY_SIZE(logic_threshold)
112 static GSList *scan(struct sr_dev_driver *di, GSList *options)
114 struct drv_context *drvc;
115 struct dev_context *devc;
116 struct sr_dev_inst *sdi;
117 struct sr_usb_dev_inst *usb;
118 struct sr_config *src;
121 GSList *conn_devices;
122 struct libusb_device_descriptor des;
123 libusb_device **devlist;
126 char connection_id[64];
128 unsigned int dev_addr;
133 for (l = options; l; l = l->next) {
137 conn = g_variant_get_string(src->data, NULL);
142 conn_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, conn);
146 /* Find all LA2016 devices and upload firmware to them. */
148 libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
149 for (i = 0; devlist[i]; i++) {
152 for (l = conn_devices; l; l = l->next) {
154 if (usb->bus == libusb_get_bus_number(devlist[i])
155 && usb->address == libusb_get_device_address(devlist[i]))
159 /* This device matched none of the ones that
160 * matched the conn specification. */
164 libusb_get_device_descriptor(devlist[i], &des);
166 if (usb_get_port_path(devlist[i], connection_id, sizeof(connection_id)) < 0)
169 if (des.idVendor != LA2016_VID || des.idProduct != LA2016_PID)
172 /* Already has the firmware */
173 sr_dbg("Found a LA2016 device.");
174 sdi = g_malloc0(sizeof(struct sr_dev_inst));
175 sdi->status = SR_ST_INITIALIZING;
176 sdi->connection_id = g_strdup(connection_id);
179 dev_addr = libusb_get_device_address(devlist[i]);
180 if (des.iProduct != 2) {
181 sr_info("device at '%s' has no firmware loaded!", connection_id);
183 if (la2016_upload_firmware(drvc->sr_ctx, devlist[i], des.idProduct) != SR_OK) {
184 sr_err("uC firmware upload failed!");
185 g_free(sdi->connection_id);
189 fw_updated = g_get_monotonic_time();
190 dev_addr = 0xff; /* to mark that we don't know address yet... ugly */
193 sdi->vendor = g_strdup("Kingst");
194 sdi->model = g_strdup("LA2016");
196 for (j = 0; j < ARRAY_SIZE(channel_names); j++)
197 sr_channel_new(sdi, j, SR_CHANNEL_LOGIC, TRUE, channel_names[j]);
199 devices = g_slist_append(devices, sdi);
201 devc = g_malloc0(sizeof(struct dev_context));
203 devc->fw_updated = fw_updated;
204 devc->threshold_voltage_idx = 0;
205 devc->threshold_voltage = logic_threshold_value[devc->threshold_voltage_idx];
207 sdi->status = SR_ST_INACTIVE;
208 sdi->inst_type = SR_INST_USB;
210 sdi->conn = sr_usb_dev_inst_new(
211 libusb_get_bus_number(devlist[i]),
214 libusb_free_device_list(devlist, 1);
215 g_slist_free_full(conn_devices, (GDestroyNotify)sr_usb_dev_inst_free);
217 return std_scan_complete(di, devices);
220 static int la2016_dev_open(struct sr_dev_inst *sdi)
222 struct sr_dev_driver *di;
223 libusb_device **devlist;
224 struct sr_usb_dev_inst *usb;
225 struct libusb_device_descriptor des;
226 struct drv_context *drvc;
227 int ret, i, device_count;
228 char connection_id[64];
235 device_count = libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
236 if (device_count < 0) {
237 sr_err("Failed to get device list: %s.", libusb_error_name(device_count));
241 for (i = 0; i < device_count; i++) {
242 libusb_get_device_descriptor(devlist[i], &des);
244 if (des.idVendor != LA2016_VID || des.idProduct != LA2016_PID || des.iProduct != 2)
247 if ((sdi->status == SR_ST_INITIALIZING) || (sdi->status == SR_ST_INACTIVE)) {
249 * Check device by its physical USB bus/port address.
251 if (usb_get_port_path(devlist[i], connection_id, sizeof(connection_id)) < 0)
254 if (strcmp(sdi->connection_id, connection_id))
255 /* This is not the one. */
259 if (!(ret = libusb_open(devlist[i], &usb->devhdl))) {
260 if (usb->address == 0xff)
262 * First time we touch this device after FW
263 * upload, so we don't know the address yet.
265 usb->address = libusb_get_device_address(devlist[i]);
267 sr_err("Failed to open device: %s.", libusb_error_name(ret));
272 ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE);
273 if (ret == LIBUSB_ERROR_BUSY) {
274 sr_err("Unable to claim USB interface. Another "
275 "program or driver has already claimed it.");
278 } else if (ret == LIBUSB_ERROR_NO_DEVICE) {
279 sr_err("Device has been disconnected.");
282 } else if (ret != 0) {
283 sr_err("Unable to claim interface: %s.", libusb_error_name(ret));
288 if ((ret = la2016_init_device(sdi)) != SR_OK) {
289 sr_err("Failed to init device.");
293 sr_info("Opened device on %d.%d (logical) / %s (physical), interface %d.",
294 usb->bus, usb->address, sdi->connection_id, USB_INTERFACE);
301 libusb_free_device_list(devlist, 1);
305 libusb_release_interface(usb->devhdl, USB_INTERFACE);
306 libusb_close(usb->devhdl);
315 static int dev_open(struct sr_dev_inst *sdi)
317 struct dev_context *devc;
318 int64_t timediff_us, timediff_ms;
326 * If the firmware was recently uploaded, wait up to MAX_RENUM_DELAY_MS
327 * milliseconds for the FX2 to renumerate.
330 if (devc->fw_updated > 0) {
331 sr_info("Waiting for device to reset after firmware upload.");
332 /* Takes >= 2000ms for the uC to be gone from the USB bus. */
333 reset_done = devc->fw_updated + 18 * (uint64_t)1e5; /* 1.8 seconds */
334 now = g_get_monotonic_time();
335 if (reset_done > now)
336 g_usleep(reset_done - now);
338 while (timediff_ms < MAX_RENUM_DELAY_MS) {
339 g_usleep(200 * 1000);
341 timediff_us = g_get_monotonic_time() - devc->fw_updated;
342 timediff_ms = timediff_us / 1000;
344 if ((ret = la2016_dev_open(sdi)) == SR_OK)
346 sr_spew("Waited %" PRIi64 "ms.", timediff_ms);
349 sr_err("Device failed to re-enumerate.");
352 sr_info("Device came back after %" PRIi64 "ms.", timediff_ms);
354 ret = la2016_dev_open(sdi);
357 sr_err("Unable to open device.");
364 static int dev_close(struct sr_dev_inst *sdi)
366 struct sr_usb_dev_inst *usb;
373 la2016_deinit_device(sdi);
375 sr_info("Closing device on %d.%d (logical) / %s (physical) interface %d.",
376 usb->bus, usb->address, sdi->connection_id, USB_INTERFACE);
377 libusb_release_interface(usb->devhdl, USB_INTERFACE);
378 libusb_close(usb->devhdl);
384 static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
386 struct dev_context *devc;
387 struct sr_usb_dev_inst *usb;
401 if (usb->address == 255)
402 /* Device still needs to re-enumerate after firmware
403 * upload, so we don't know its (future) address. */
405 *data = g_variant_new_printf("%d.%d", usb->bus, usb->address);
407 case SR_CONF_SAMPLERATE:
408 *data = g_variant_new_uint64(devc->cur_samplerate);
410 case SR_CONF_LIMIT_SAMPLES:
411 *data = g_variant_new_uint64(devc->limit_samples);
413 case SR_CONF_CAPTURE_RATIO:
414 *data = g_variant_new_uint64(devc->capture_ratio);
416 case SR_CONF_VOLTAGE_THRESHOLD:
417 rounded = (int)(devc->threshold_voltage / 0.1) * 0.1;
418 *data = std_gvar_tuple_double(rounded, rounded + 0.1);
420 case SR_CONF_LOGIC_THRESHOLD:
421 *data = g_variant_new_string(logic_threshold[devc->threshold_voltage_idx]);
423 case SR_CONF_LOGIC_THRESHOLD_CUSTOM:
424 *data = g_variant_new_double(devc->threshold_voltage);
434 static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
436 struct dev_context *devc;
445 case SR_CONF_SAMPLERATE:
446 devc->cur_samplerate = g_variant_get_uint64(data);
448 case SR_CONF_LIMIT_SAMPLES:
449 devc->limit_samples = g_variant_get_uint64(data);
451 case SR_CONF_CAPTURE_RATIO:
452 devc->capture_ratio = g_variant_get_uint64(data);
454 case SR_CONF_VOLTAGE_THRESHOLD:
455 g_variant_get(data, "(dd)", &low, &high);
456 devc->threshold_voltage = (low + high) / 2.0;
457 devc->threshold_voltage_idx = MAX_NUM_LOGIC_THRESHOLD_ENTRIES - 1; /* USER */
459 case SR_CONF_LOGIC_THRESHOLD: {
460 if ((idx = std_str_idx(data, logic_threshold, MAX_NUM_LOGIC_THRESHOLD_ENTRIES)) < 0)
462 if (idx == MAX_NUM_LOGIC_THRESHOLD_ENTRIES - 1) {
465 devc->threshold_voltage = logic_threshold_value[idx];
467 devc->threshold_voltage_idx = idx;
470 case SR_CONF_LOGIC_THRESHOLD_CUSTOM:
471 devc->threshold_voltage = g_variant_get_double(data);
480 static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
483 case SR_CONF_SCAN_OPTIONS:
484 case SR_CONF_DEVICE_OPTIONS:
485 return STD_CONFIG_LIST(key, data, sdi, cg, scanopts, drvopts, devopts);
486 case SR_CONF_SAMPLERATE:
487 *data = std_gvar_samplerates(ARRAY_AND_SIZE(samplerates));
489 case SR_CONF_LIMIT_SAMPLES:
490 *data = std_gvar_tuple_u64(LA2016_NUM_SAMPLES_MIN, LA2016_NUM_SAMPLES_MAX);
492 case SR_CONF_VOLTAGE_THRESHOLD:
493 *data = std_gvar_min_max_step_thresholds(
494 LA2016_THR_VOLTAGE_MIN,
495 LA2016_THR_VOLTAGE_MAX, 0.1);
497 case SR_CONF_TRIGGER_MATCH:
498 *data = std_gvar_array_i32(ARRAY_AND_SIZE(trigger_matches));
500 case SR_CONF_LOGIC_THRESHOLD:
501 *data = g_variant_new_strv(logic_threshold, MAX_NUM_LOGIC_THRESHOLD_ENTRIES);
510 static void send_chunk(struct sr_dev_inst *sdi, const uint8_t *packets, unsigned int num_tfers)
512 struct dev_context *devc;
513 struct sr_datafeed_logic logic;
514 struct sr_datafeed_packet sr_packet;
515 unsigned int max_samples, n_samples, total_samples, free_n_samples;
516 unsigned int i, j, k;
517 int do_signal_trigger;
526 logic.data = devc->convbuffer;
528 sr_packet.type = SR_DF_LOGIC;
529 sr_packet.payload = &logic;
531 max_samples = devc->convbuffer_size / 2;
533 wp = (uint16_t*)devc->convbuffer;
535 do_signal_trigger = 0;
537 if (devc->had_triggers_configured && devc->reading_behind_trigger == 0 && devc->info.n_rep_packets_before_trigger == 0) {
538 std_session_send_df_trigger(sdi);
539 devc->reading_behind_trigger = 1;
543 for (i = 0; i < num_tfers; i++) {
544 for (k = 0; k < NUM_PACKETS_IN_CHUNK; k++) {
545 free_n_samples = max_samples - n_samples;
546 if (free_n_samples < 256 || do_signal_trigger) {
547 logic.length = n_samples * 2;
548 sr_session_send(sdi, &sr_packet);
550 wp = (uint16_t*)devc->convbuffer;
551 if (do_signal_trigger) {
552 std_session_send_df_trigger(sdi);
553 do_signal_trigger = 0;
557 state = read_u16le_inc(&rp);
558 repetitions = read_u8_inc(&rp);
559 for (j = 0; j < repetitions; j++)
562 n_samples += repetitions;
563 total_samples += repetitions;
564 devc->total_samples += repetitions;
565 if (!devc->reading_behind_trigger) {
566 devc->n_reps_until_trigger --;
567 if (devc->n_reps_until_trigger == 0) {
568 devc->reading_behind_trigger = 1;
569 do_signal_trigger = 1;
570 sr_dbg(" here is trigger position after %" PRIu64 " samples, %.6fms",
572 (double)devc->total_samples / devc->cur_samplerate * 1e3);
576 (void)read_u8_inc(&rp); /* Skip sequence number. */
579 logic.length = n_samples * 2;
580 sr_session_send(sdi, &sr_packet);
581 if (do_signal_trigger) {
582 std_session_send_df_trigger(sdi);
585 sr_dbg("send_chunk done after %d samples", total_samples);
588 static void LIBUSB_CALL receive_transfer(struct libusb_transfer *transfer)
590 struct sr_dev_inst *sdi;
591 struct dev_context *devc;
592 struct sr_usb_dev_inst *usb;
595 sdi = transfer->user_data;
599 sr_dbg("receive_transfer(): status %s received %d bytes.",
600 libusb_error_name(transfer->status), transfer->actual_length);
602 if (transfer->status == LIBUSB_TRANSFER_TIMED_OUT) {
603 sr_err("bulk transfer timeout!");
604 devc->transfer_finished = 1;
606 send_chunk(sdi, transfer->buffer, transfer->actual_length / TRANSFER_PACKET_LENGTH);
608 devc->n_bytes_to_read -= transfer->actual_length;
609 if (devc->n_bytes_to_read) {
610 uint32_t to_read = devc->n_bytes_to_read;
611 if (to_read > LA2016_BULK_MAX)
612 to_read = LA2016_BULK_MAX;
613 libusb_fill_bulk_transfer(
614 transfer, usb->devhdl,
615 0x86, transfer->buffer, to_read,
616 receive_transfer, (void*)sdi, DEFAULT_TIMEOUT_MS);
618 if ((ret = libusb_submit_transfer(transfer)) == 0)
620 sr_err("Failed to submit further transfer: %s.", libusb_error_name(ret));
623 g_free(transfer->buffer);
624 libusb_free_transfer(transfer);
625 devc->transfer_finished = 1;
628 static int handle_event(int fd, int revents, void *cb_data)
630 const struct sr_dev_inst *sdi;
631 struct dev_context *devc;
632 struct drv_context *drvc;
640 drvc = sdi->driver->context;
642 if (devc->have_trigger == 0) {
643 if (la2016_has_triggered(sdi) == 0) {
644 sr_dbg("not yet ready for download...");
647 devc->have_trigger = 1;
648 devc->transfer_finished = 0;
649 devc->reading_behind_trigger = 0;
650 devc->total_samples = 0;
651 /* we can start retrieving data! */
652 if (la2016_start_retrieval(sdi, receive_transfer) != SR_OK) {
653 sr_err("failed to start retrieval!");
656 sr_dbg("retrieval is started...");
657 std_session_send_df_frame_begin(sdi);
662 tv.tv_sec = tv.tv_usec = 0;
663 libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
665 if (devc->transfer_finished) {
666 sr_dbg("transfer is finished!");
667 std_session_send_df_frame_end(sdi);
669 usb_source_remove(sdi->session, drvc->sr_ctx);
670 std_session_send_df_end(sdi);
672 la2016_stop_acquisition(sdi);
674 g_free(devc->convbuffer);
675 devc->convbuffer = NULL;
677 sr_dbg("transfer is now finished");
683 static void abort_acquisition(struct dev_context *devc)
686 libusb_cancel_transfer(devc->transfer);
689 static int configure_channels(const struct sr_dev_inst *sdi)
691 struct dev_context *devc;
694 devc->cur_channels = 0;
695 devc->num_channels = 0;
697 for (GSList *l = sdi->channels; l; l = l->next) {
698 struct sr_channel *ch = (struct sr_channel*)l->data;
699 if (ch->enabled == FALSE)
701 devc->cur_channels |= 1 << (ch->index);
702 devc->num_channels++;
708 static int dev_acquisition_start(const struct sr_dev_inst *sdi)
710 struct sr_dev_driver *di;
711 struct drv_context *drvc;
712 struct dev_context *devc;
719 if (configure_channels(sdi) != SR_OK) {
720 sr_err("Failed to configure channels.");
724 devc->convbuffer_size = 4 * 1024 * 1024;
725 if (!(devc->convbuffer = g_try_malloc(devc->convbuffer_size))) {
726 sr_err("Conversion buffer malloc failed.");
727 return SR_ERR_MALLOC;
730 if ((ret = la2016_setup_acquisition(sdi)) != SR_OK) {
731 g_free(devc->convbuffer);
732 devc->convbuffer = NULL;
736 devc->ctx = drvc->sr_ctx;
738 if ((ret = la2016_start_acquisition(sdi)) != SR_OK) {
739 abort_acquisition(devc);
743 devc->have_trigger = 0;
744 usb_source_add(sdi->session, drvc->sr_ctx, 50, handle_event, (void*)sdi);
746 std_session_send_df_header(sdi);
751 static int dev_acquisition_stop(struct sr_dev_inst *sdi)
755 ret = la2016_abort_acquisition(sdi);
756 abort_acquisition(sdi->priv);
761 static struct sr_dev_driver kingst_la2016_driver_info = {
762 .name = "kingst-la2016",
763 .longname = "Kingst LA2016",
766 .cleanup = std_cleanup,
768 .dev_list = std_dev_list,
769 .dev_clear = std_dev_clear,
770 .config_get = config_get,
771 .config_set = config_set,
772 .config_list = config_list,
773 .dev_open = dev_open,
774 .dev_close = dev_close,
775 .dev_acquisition_start = dev_acquisition_start,
776 .dev_acquisition_stop = dev_acquisition_stop,
779 SR_REGISTER_DEV_DRIVER(kingst_la2016_driver_info);