[libsigrok.git] / src / hardware / lascar-el-usb / protocol.c

/*
 * This file is part of the libsigrok project.
 *
 * Copyright (C) 2012 Bert Vermeulen <bert@biot.com>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <config.h>
#include <stdlib.h>
#include <sys/time.h>
#include <string.h>
#include <math.h>
#include <glib.h>
#include <libsigrok/libsigrok.h>
#include "libsigrok-internal.h"
#include "protocol.h"

extern SR_PRIV struct sr_dev_driver lascar_el_usb_driver_info;
struct sr_dev_driver *di = &lascar_el_usb_driver_info;

static const struct elusb_profile profiles[] = {
	{ 1, "EL-USB-1", LOG_UNSUPPORTED },
	{ 2, "EL-USB-1", LOG_UNSUPPORTED },
	{ 3, "EL-USB-2", LOG_TEMP_RH },
	{ 4, "EL-USB-3", LOG_UNSUPPORTED },
	{ 5, "EL-USB-4", LOG_UNSUPPORTED },
	{ 6, "EL-USB-3", LOG_UNSUPPORTED },
	{ 7, "EL-USB-4", LOG_UNSUPPORTED },
	{ 8, "EL-USB-LITE", LOG_UNSUPPORTED },
	{ 9, "EL-USB-CO", LOG_CO },
	{ 10, "EL-USB-TC", LOG_UNSUPPORTED },
	{ 11, "EL-USB-CO300", LOG_CO },
	{ 12, "EL-USB-2-LCD", LOG_TEMP_RH },
	{ 13, "EL-USB-2+", LOG_TEMP_RH },
	{ 14, "EL-USB-1-PRO", LOG_UNSUPPORTED },
	{ 15, "EL-USB-TC-LCD", LOG_UNSUPPORTED },
	{ 16, "EL-USB-2-LCD+", LOG_TEMP_RH },
	{ 17, "EL-USB-5", LOG_UNSUPPORTED },
	{ 18, "EL-USB-1-RCG", LOG_UNSUPPORTED },
	{ 19, "EL-USB-1-LCD", LOG_UNSUPPORTED },
	{ 20, "EL-OEM-3", LOG_UNSUPPORTED },
	{ 21, "EL-USB-1-LCD", LOG_UNSUPPORTED },
	ALL_ZERO
};

static libusb_device_handle *lascar_open(struct libusb_device *dev)
{
	libusb_device_handle *dev_hdl;
	int ret;

	if ((ret = libusb_open(dev, &dev_hdl)) != 0) {
		sr_dbg("failed to open device for scan: %s",
				libusb_error_name(ret));
		return NULL;
	}

	/* Some of these fail, but it needs doing -- some sort of mode
	 * setup for the SiLabs F32x. */
	libusb_control_transfer(dev_hdl, LIBUSB_REQUEST_TYPE_VENDOR,
			0x00, 0xffff, 0x00, NULL, 0, 50);
	libusb_control_transfer(dev_hdl, LIBUSB_REQUEST_TYPE_VENDOR,
			0x02, 0x0002, 0x00, NULL, 0, 50);
	libusb_control_transfer(dev_hdl, LIBUSB_REQUEST_TYPE_VENDOR,
			0x02, 0x0001, 0x00, NULL, 0, 50);

	return dev_hdl;
}

static void LIBUSB_CALL mark_xfer(struct libusb_transfer *xfer)
{

	xfer->user_data = GINT_TO_POINTER(1);

}

SR_PRIV int lascar_get_config(libusb_device_handle *dev_hdl,
		unsigned char *configblock, int *configlen)
{
	struct drv_context *drvc;
	struct libusb_transfer *xfer_in, *xfer_out;
	struct timeval tv;
	int64_t start;
	int buflen;
	unsigned char cmd[3], buf[MAX_CONFIGBLOCK_SIZE];

	sr_spew("Reading config block.");

	drvc = di->context;
	*configlen = 0;

	if (!(xfer_in = libusb_alloc_transfer(0)) ||
			!(xfer_out = libusb_alloc_transfer(0)))
		return SR_ERR;

	/* Flush anything the F321 still has queued. */
	while (libusb_bulk_transfer(dev_hdl, LASCAR_EP_IN, buf, 256, &buflen,
			5) == 0 && buflen > 0)
		;

	/* Keep a read request waiting in the wings, ready to pounce
	 * the moment the device sends something. */
	libusb_fill_bulk_transfer(xfer_in, dev_hdl, LASCAR_EP_IN,
			buf, 256, mark_xfer, 0, BULK_XFER_TIMEOUT);
	if (libusb_submit_transfer(xfer_in) != 0)
		goto cleanup;

	/* Request device configuration structure. */
	cmd[0] = 0x00;
	cmd[1] = 0xff;
	cmd[2] = 0xff;
	libusb_fill_bulk_transfer(xfer_out, dev_hdl, LASCAR_EP_OUT,
			cmd, 3, mark_xfer, 0, 100);
	if (libusb_submit_transfer(xfer_out) != 0)
		goto cleanup;

	tv.tv_sec = 0;
	tv.tv_usec = 0;
	start = g_get_monotonic_time();
	while (!xfer_in->user_data || !xfer_out->user_data) {
		if (g_get_monotonic_time() - start > SCAN_TIMEOUT) {
			start = 0;
			break;
		}
		g_usleep(SLEEP_US_LONG);
		libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	}
	if (!start) {
		sr_dbg("no response");
		goto cleanup;
	}
	if (xfer_in->actual_length != 3) {
		sr_dbg("expected 3-byte header, got %d bytes", xfer_in->actual_length);
		goto cleanup;
	}

	/* Got configuration structure header. */
	sr_spew("Response to config request: 0x%.2x 0x%.2x 0x%.2x ",
			buf[0], buf[1], buf[2]);
	buflen = buf[1] | (buf[2] << 8);
	if (buf[0] != 0x02 || buflen > MAX_CONFIGBLOCK_SIZE) {
		sr_dbg("Invalid response to config request: "
				"0x%.2x 0x%.2x 0x%.2x ", buf[0], buf[1], buf[2]);
		libusb_close(dev_hdl);
		goto cleanup;
	}

	/* Get configuration structure. */
	xfer_in->length = buflen;
	xfer_in->user_data = 0;
	if (libusb_submit_transfer(xfer_in) != 0)
		goto cleanup;
	while (!xfer_in->user_data) {
		if (g_get_monotonic_time() - start > SCAN_TIMEOUT) {
			start = 0;
			break;
		}
		g_usleep(SLEEP_US_LONG);
		libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	}
	if (!start) {
		sr_dbg("Timeout waiting for configuration structure.");
		goto cleanup;
	}
	if (xfer_in->actual_length != buflen) {
		sr_dbg("expected %d-byte structure, got %d bytes", buflen,
				xfer_in->actual_length);
		goto cleanup;
	}

	memcpy(configblock, buf, buflen);
	*configlen = buflen;

cleanup:
	if (!xfer_in->user_data || !xfer_out->user_data) {
		if (!xfer_in->user_data)
			libusb_cancel_transfer(xfer_in);
		if (!xfer_out->user_data)
			libusb_cancel_transfer(xfer_out);
		start = g_get_monotonic_time();
		while (!xfer_in->user_data || !xfer_out->user_data) {
			if (g_get_monotonic_time() - start > EVENTS_TIMEOUT)
				break;
			g_usleep(SLEEP_US_SHORT);
			libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
		}
	}
	libusb_free_transfer(xfer_in);
	libusb_free_transfer(xfer_out);

	return *configlen ? SR_OK : SR_ERR;
}

static int lascar_save_config(libusb_device_handle *dev_hdl,
		unsigned char *config, int configlen)
{
	struct drv_context *drvc;
	struct libusb_transfer *xfer_in, *xfer_out;
	struct timeval tv;
	int64_t start;
	int buflen, ret;
	unsigned char cmd[3], buf[256];

	sr_spew("Writing config block.");

	drvc = di->context;

	if (!(xfer_in = libusb_alloc_transfer(0)) ||
			!(xfer_out = libusb_alloc_transfer(0)))
		return SR_ERR;

	/* Flush anything the F321 still has queued. */
	while (libusb_bulk_transfer(dev_hdl, LASCAR_EP_IN, buf, 256, &buflen,
			5) == 0 && buflen > 0)
		;
	ret = SR_OK;

	/* Keep a read request waiting in the wings, ready to pounce
	 * the moment the device sends something. */
	libusb_fill_bulk_transfer(xfer_in, dev_hdl, LASCAR_EP_IN,
			buf, 256, mark_xfer, 0, BULK_XFER_TIMEOUT);
	if (libusb_submit_transfer(xfer_in) != 0) {
		ret = SR_ERR;
		goto cleanup;
	}

	/* Request device configuration structure. */
	cmd[0] = 0x01;
	cmd[1] = configlen & 0xff;
	cmd[2] = (configlen >> 8) & 0xff;
	libusb_fill_bulk_transfer(xfer_out, dev_hdl, LASCAR_EP_OUT,
			cmd, 3, mark_xfer, 0, 100);
	if (libusb_submit_transfer(xfer_out) != 0) {
		ret = SR_ERR;
		goto cleanup;
	}
	tv.tv_sec = 0;
	tv.tv_usec = 0;
	while (!xfer_out->user_data) {
		g_usleep(SLEEP_US_LONG);
		libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	}

	libusb_fill_bulk_transfer(xfer_out, dev_hdl, LASCAR_EP_OUT,
			config, configlen, mark_xfer, 0, 100);
	if (libusb_submit_transfer(xfer_out) != 0) {
		ret = SR_ERR;
		goto cleanup;
	}
	while (!xfer_in->user_data || !xfer_out->user_data) {
		g_usleep(SLEEP_US_LONG);
		libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	}

	if (xfer_in->actual_length != 1 || buf[0] != 0xff) {
		sr_dbg("unexpected response after transfer");
		ret = SR_ERR;
	}

cleanup:
	if (!xfer_in->user_data || !xfer_out->user_data) {
		if (!xfer_in->user_data)
			libusb_cancel_transfer(xfer_in);
		if (!xfer_out->user_data)
			libusb_cancel_transfer(xfer_out);
		start = g_get_monotonic_time();
		while (!xfer_in->user_data || !xfer_out->user_data) {
			if (g_get_monotonic_time() - start > EVENTS_TIMEOUT)
				break;
			g_usleep(SLEEP_US_SHORT);
			libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
		}
	}
	libusb_free_transfer(xfer_in);
	libusb_free_transfer(xfer_out);

	return ret;
}

static struct sr_dev_inst *lascar_identify(unsigned char *config)
{
	struct dev_context *devc;
	const struct elusb_profile *profile;
	struct sr_dev_inst *sdi;
	int modelid, i;
	char firmware[5];

	modelid = config[0];
	sdi = NULL;
	if (modelid) {
		profile = NULL;
		for (i = 0; profiles[i].modelid; i++) {
			if (profiles[i].modelid == modelid) {
				profile = &profiles[i];
				break;
			}
		}
		if (!profile) {
			sr_dbg("unknown EL-USB modelid %d", modelid);
			return NULL;
		}

		i = config[52] | (config[53] << 8);
		memcpy(firmware, config + 0x30, 4);
		firmware[4] = '\0';
		sr_dbg("found %s with firmware version %s serial %d",
				profile->modelname, firmware, i);

		if (profile->logformat == LOG_UNSUPPORTED) {
			sr_dbg("unsupported EL-USB logformat for %s", profile->modelname);
			return NULL;
		}

		sdi = g_malloc0(sizeof(struct sr_dev_inst));
		sdi->status = SR_ST_INACTIVE;
		sdi->vendor = g_strdup(LASCAR_VENDOR);
		sdi->model = g_strdup(profile->modelname);
		sdi->version = g_strdup(firmware);

		if (profile->logformat == LOG_TEMP_RH) {
			/* Model this as two channels: temperature and humidity. */
			sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "Temp");
			sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "Hum");
		} else if (profile->logformat == LOG_CO) {
			sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "CO");
		} else {
			sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "P1");
		}

		devc = g_malloc0(sizeof(struct dev_context));
		sdi->priv = devc;
		devc->profile = profile;
	}

	return sdi;
}

SR_PRIV struct sr_dev_inst *lascar_scan(int bus, int address)
{
	struct drv_context *drvc;
	struct sr_dev_inst *sdi;
	struct libusb_device **devlist;
	libusb_device_handle *dev_hdl;
	int dummy, i;
	int ret;
	unsigned char config[MAX_CONFIGBLOCK_SIZE];

	drvc = di->context;
	sdi = NULL;

	ret = libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
	if (ret < 0)
		return NULL;

	for (i = 0; devlist[i]; i++) {
		if (libusb_get_bus_number(devlist[i]) != bus ||
				libusb_get_device_address(devlist[i]) != address)
			continue;

		if (!(dev_hdl = lascar_open(devlist[i])))
			continue;

		if (lascar_get_config(dev_hdl, config, &dummy) != SR_OK)
			continue;

		libusb_close(dev_hdl);
		sdi = lascar_identify(config);
	}
	libusb_free_device_list(devlist, 1);

	return sdi;
}

static void lascar_el_usb_dispatch(struct sr_dev_inst *sdi, unsigned char *buf,
		int buflen)
{
	struct dev_context *devc;
	struct sr_datafeed_packet packet;
	struct sr_datafeed_analog analog;
	struct sr_analog_encoding encoding;
	struct sr_analog_meaning meaning;
	struct sr_analog_spec spec;
	struct sr_channel *ch;
	float *temp, *rh;
	uint16_t s;
	int samples, samples_left, i, j;

	devc = sdi->priv;

	/* Note: digits/spec_digits will be overridden later. */
	sr_analog_init(&analog, &encoding, &meaning, &spec, 0);

	samples = buflen / devc->sample_size;
	samples_left = devc->logged_samples - devc->rcvd_samples;
	if (samples_left < samples)
		samples = samples_left;
	switch (devc->profile->logformat) {
	case LOG_TEMP_RH:
		packet.type = SR_DF_ANALOG;
		packet.payload = &analog;
		analog.meaning->mqflags = 0;
		if (!(temp = g_try_malloc(sizeof(float) * samples)))
			break;
		if (!(rh = g_try_malloc(sizeof(float) * samples)))
			break;
		for (i = 0, j = 0; i < samples; i++) {
			/* Both Celsius and Fahrenheit stored at base -40. */
			if (devc->temp_unit == 0)
				/* Celsius is stored in half-degree increments. */
				temp[j] = buf[i * 2] / 2 - 40;
			else
				temp[j] = buf[i * 2] - 40;

			rh[j] = buf[i * 2 + 1] / 2;

			if (temp[j] == 0.0 && rh[j] == 0.0)
				/* Skip invalid measurement. */
				continue;
			j++;
		}
		analog.num_samples = j;

		ch = sdi->channels->data;
		if (ch->enabled) {
			analog.meaning->channels = g_slist_append(NULL, ch);
			analog.meaning->mq = SR_MQ_TEMPERATURE;
			if (devc->temp_unit == 1) {
				analog.meaning->unit = SR_UNIT_FAHRENHEIT;
				analog.encoding->digits = 0;
				analog.spec->spec_digits = 0;
			} else {
				analog.meaning->unit = SR_UNIT_CELSIUS;
				analog.encoding->digits = 1;
				analog.spec->spec_digits = 1;
			}
			analog.data = (void *)temp;
			sr_session_send(sdi, &packet);
			g_slist_free(analog.meaning->channels);
		}

		ch = sdi->channels->next->data;
		if (ch->enabled) {
			analog.meaning->channels = g_slist_append(NULL, ch);
			analog.meaning->mq = SR_MQ_RELATIVE_HUMIDITY;
			analog.meaning->unit = SR_UNIT_PERCENTAGE;
			analog.encoding->digits = 1;
			analog.spec->spec_digits = 1;
			analog.data = (void *)rh;
			sr_session_send(sdi, &packet);
			g_slist_free(analog.meaning->channels);
		}

		g_free(temp);
		g_free(rh);
		break;
	case LOG_CO:
		packet.type = SR_DF_ANALOG;
		packet.payload = &analog;
		analog.meaning->channels = sdi->channels;
		analog.num_samples = samples;
		analog.meaning->mq = SR_MQ_CARBON_MONOXIDE;
		analog.meaning->unit = SR_UNIT_CONCENTRATION;
		analog.meaning->mqflags = 0;
		if (!(analog.data = g_try_malloc(sizeof(float) * samples)))
			break;
		for (i = 0; i < samples; i++) {
			s = (buf[i * 2] << 8) | buf[i * 2 + 1];
			((float *)analog.data)[i] = (s * devc->co_high + devc->co_low) / (1000 * 1000);
			if (((float *)analog.data)[i] < 0.0)
				((float *)analog.data)[i] = 0.0;
		}
		sr_session_send(sdi, &packet);
		g_free(analog.data);
		break;
	default:
		/* How did we even get this far? */
		break;
	}
	devc->rcvd_samples += samples;

}

SR_PRIV int lascar_el_usb_handle_events(int fd, int revents, void *cb_data)
{
	struct drv_context *drvc = di->context;
	struct sr_dev_inst *sdi;
	struct timeval tv;

	(void)fd;
	(void)revents;

	sdi = cb_data;

	if (sdi->status == SR_ST_STOPPING) {
		usb_source_remove(sdi->session, drvc->sr_ctx);
		std_session_send_df_end(sdi);
	}

	memset(&tv, 0, sizeof(struct timeval));
	libusb_handle_events_timeout_completed(drvc->sr_ctx->libusb_ctx, &tv,
					       NULL);

	return TRUE;
}

SR_PRIV void LIBUSB_CALL lascar_el_usb_receive_transfer(struct libusb_transfer *transfer)
{
	struct dev_context *devc;
	struct sr_dev_inst *sdi;
	int ret;
	gboolean packet_has_error;

	sdi = transfer->user_data;
	devc = sdi->priv;

	packet_has_error = FALSE;
	switch (transfer->status) {
	case LIBUSB_TRANSFER_NO_DEVICE:
		/* USB device was unplugged. */
		sr_dev_acquisition_stop(sdi);
		return;
	case LIBUSB_TRANSFER_COMPLETED:
	case LIBUSB_TRANSFER_TIMED_OUT: /* We may have received some data though */
		break;
	default:
		packet_has_error = TRUE;
		break;
	}

	if (!packet_has_error) {
		if (devc->rcvd_samples < devc->logged_samples)
			lascar_el_usb_dispatch(sdi, transfer->buffer,
					transfer->actual_length);
		devc->rcvd_bytes += transfer->actual_length;
		sr_spew("received %d/%d bytes (%d/%d samples)",
				devc->rcvd_bytes, devc->log_size,
				devc->rcvd_samples, devc->logged_samples);
		if (devc->rcvd_bytes >= devc->log_size)
			sr_dev_acquisition_stop(sdi);
	}

	if (sdi->status == SR_ST_ACTIVE) {
		/* Send the same request again. */
		if ((ret = libusb_submit_transfer(transfer) != 0)) {
			sr_err("Unable to resubmit transfer: %s.",
			       libusb_error_name(ret));
			g_free(transfer->buffer);
			libusb_free_transfer(transfer);
			sr_dev_acquisition_stop(sdi);
		}
	} else {
		/* This was the last transfer we're going to receive, so
		 * clean up now. */
		g_free(transfer->buffer);
		libusb_free_transfer(transfer);
	}

}

static int get_flags(unsigned char *configblock)
{
	int flags;

	flags = (configblock[32] | (configblock[33] << 8)) & 0x1fff;
	sr_spew("Read flags (0x%.4x).", flags);

	return flags;
}

static int set_flags(unsigned char *configblock, int flags)
{

	sr_spew("Setting flags to 0x%.4x.", flags);
	configblock[32] = flags & 0xff;
	configblock[33] = (flags >> 8) & 0x1f;

	return flags;
}

SR_PRIV int lascar_is_logging(const struct sr_dev_inst *sdi)
{
	struct dev_context *devc;
	struct sr_usb_dev_inst *usb;
	int dummy, flags, ret;

	devc = sdi->priv;
	usb = sdi->conn;

	if (lascar_get_config(usb->devhdl, devc->config, &dummy) != SR_OK)
		return -1;

	flags = get_flags(devc->config);
	if (flags & 0x0100)
		ret = 1;
	else
		ret = 0;

	return ret;
}

SR_PRIV int lascar_start_logging(const struct sr_dev_inst *sdi)
{
	struct dev_context *devc;
	struct sr_usb_dev_inst *usb;
	int len, flags, ret;

	devc = sdi->priv;
	usb = sdi->conn;

	if (lascar_get_config(usb->devhdl, devc->config, &len) != SR_OK)
		return SR_ERR;

	/* Turn on logging. */
	flags = get_flags(devc->config);
	flags |= 0x0100;
	set_flags(devc->config, flags);

	/* Start logging in 0 seconds. */
	memset(devc->config + 24, 0, 4);

	ret = lascar_save_config(usb->devhdl, devc->config, len);
	sr_info("Started internal logging.");

	return ret;
}

SR_PRIV int lascar_stop_logging(const struct sr_dev_inst *sdi)
{
	struct dev_context *devc;
	struct sr_usb_dev_inst *usb;
	int len, flags, ret;

	devc = sdi->priv;
	usb = sdi->conn;

	if (lascar_get_config(usb->devhdl, devc->config, &len) != SR_OK)
		return SR_ERR;

	flags = get_flags(devc->config);
	flags &= ~0x0100;
	set_flags(devc->config, flags);

	ret = lascar_save_config(usb->devhdl, devc->config, len);
	sr_info("Stopped internal logging.");

	return ret;
}
Commit	Line	Data
46697e38 BV	1	/*
	2	* This file is part of the libsigrok project.
	3	*
	4	* Copyright (C) 2012 Bert Vermeulen <bert@biot.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
6ec6c43b	20	#include <config.h>
46697e38	21	#include <stdlib.h>
851d5b22 BV	22	#include <sys/time.h>
851d5b22 BV	23	#include <string.h>
6aa1eb4e	24	#include <math.h>
46697e38	25	#include <glib.h>
c1aae900	26	#include <libsigrok/libsigrok.h>
46697e38 BV	27	#include "libsigrok-internal.h"
	28	#include "protocol.h"
	29
0350e2e0	30	extern SR_PRIV struct sr_dev_driver lascar_el_usb_driver_info;
4f840ce9	31	struct sr_dev_driver *di = &lascar_el_usb_driver_info;
851d5b22 BV	32
	33	static const struct elusb_profile profiles[] = {
	34	{ 1, "EL-USB-1", LOG_UNSUPPORTED },
	35	{ 2, "EL-USB-1", LOG_UNSUPPORTED },
	36	{ 3, "EL-USB-2", LOG_TEMP_RH },
	37	{ 4, "EL-USB-3", LOG_UNSUPPORTED },
	38	{ 5, "EL-USB-4", LOG_UNSUPPORTED },
	39	{ 6, "EL-USB-3", LOG_UNSUPPORTED },
	40	{ 7, "EL-USB-4", LOG_UNSUPPORTED },
	41	{ 8, "EL-USB-LITE", LOG_UNSUPPORTED },
	42	{ 9, "EL-USB-CO", LOG_CO },
	43	{ 10, "EL-USB-TC", LOG_UNSUPPORTED },
b6506d5e	44	{ 11, "EL-USB-CO300", LOG_CO },
6787f404 BV	45	{ 12, "EL-USB-2-LCD", LOG_TEMP_RH },
6787f404 BV	46	{ 13, "EL-USB-2+", LOG_TEMP_RH },
851d5b22 BV	47	{ 14, "EL-USB-1-PRO", LOG_UNSUPPORTED },
851d5b22 BV	48	{ 15, "EL-USB-TC-LCD", LOG_UNSUPPORTED },
6787f404	49	{ 16, "EL-USB-2-LCD+", LOG_TEMP_RH },
851d5b22 BV	50	{ 17, "EL-USB-5", LOG_UNSUPPORTED },
	51	{ 18, "EL-USB-1-RCG", LOG_UNSUPPORTED },
	52	{ 19, "EL-USB-1-LCD", LOG_UNSUPPORTED },
	53	{ 20, "EL-OEM-3", LOG_UNSUPPORTED },
	54	{ 21, "EL-USB-1-LCD", LOG_UNSUPPORTED },
9e9dba7b	55	ALL_ZERO
851d5b22 BV	56	};
851d5b22 BV	57
d87c1766	58	static libusb_device_handle lascar_open(struct libusb_device dev)
6aa1eb4e BV	59	{
	60	libusb_device_handle *dev_hdl;
	61	int ret;
	62
	63	if ((ret = libusb_open(dev, &dev_hdl)) != 0) {
	64	sr_dbg("failed to open device for scan: %s",
	65	libusb_error_name(ret));
	66	return NULL;
	67	}
	68
	69	/* Some of these fail, but it needs doing -- some sort of mode
f3f19d11	70	* setup for the SiLabs F32x. */
6aa1eb4e BV	71	libusb_control_transfer(dev_hdl, LIBUSB_REQUEST_TYPE_VENDOR,
	72	0x00, 0xffff, 0x00, NULL, 0, 50);
	73	libusb_control_transfer(dev_hdl, LIBUSB_REQUEST_TYPE_VENDOR,
	74	0x02, 0x0002, 0x00, NULL, 0, 50);
	75	libusb_control_transfer(dev_hdl, LIBUSB_REQUEST_TYPE_VENDOR,
	76	0x02, 0x0001, 0x00, NULL, 0, 50);
	77
	78	return dev_hdl;
	79	}
	80
55462b8b	81	static void LIBUSB_CALL mark_xfer(struct libusb_transfer *xfer)
851d5b22 BV	82	{
	83
	84	xfer->user_data = GINT_TO_POINTER(1);
	85
	86	}
	87
361d1511 BV	88	SR_PRIV int lascar_get_config(libusb_device_handle *dev_hdl,
361d1511 BV	89	unsigned char configblock, int configlen)
851d5b22 BV	90	{
851d5b22 BV	91	struct drv_context *drvc;
851d5b22 BV	92	struct libusb_transfer xfer_in, xfer_out;
	93	struct timeval tv;
	94	int64_t start;
6aa1eb4e	95	int buflen;
361d1511 BV	96	unsigned char cmd[3], buf[MAX_CONFIGBLOCK_SIZE];
	97
	98	sr_spew("Reading config block.");
851d5b22	99
41812aca	100	drvc = di->context;
361d1511	101	*configlen = 0;
851d5b22 BV	102
	103	if (!(xfer_in = libusb_alloc_transfer(0)) \|\|
	104	!(xfer_out = libusb_alloc_transfer(0)))
361d1511	105	return SR_ERR;
851d5b22 BV	106
	107	/* Flush anything the F321 still has queued. */
	108	while (libusb_bulk_transfer(dev_hdl, LASCAR_EP_IN, buf, 256, &buflen,
	109	5) == 0 && buflen > 0)
	110	;
	111
	112	/* Keep a read request waiting in the wings, ready to pounce
	113	* the moment the device sends something. */
	114	libusb_fill_bulk_transfer(xfer_in, dev_hdl, LASCAR_EP_IN,
1a46cc62	115	buf, 256, mark_xfer, 0, BULK_XFER_TIMEOUT);
851d5b22 BV	116	if (libusb_submit_transfer(xfer_in) != 0)
	117	goto cleanup;
	118
	119	/* Request device configuration structure. */
	120	cmd[0] = 0x00;
	121	cmd[1] = 0xff;
	122	cmd[2] = 0xff;
	123	libusb_fill_bulk_transfer(xfer_out, dev_hdl, LASCAR_EP_OUT,
6aa1eb4e	124	cmd, 3, mark_xfer, 0, 100);
851d5b22 BV	125	if (libusb_submit_transfer(xfer_out) != 0)
	126	goto cleanup;
	127
	128	tv.tv_sec = 0;
	129	tv.tv_usec = 0;
	130	start = g_get_monotonic_time();
	131	while (!xfer_in->user_data \|\| !xfer_out->user_data) {
	132	if (g_get_monotonic_time() - start > SCAN_TIMEOUT) {
	133	start = 0;
	134	break;
	135	}
1a46cc62	136	g_usleep(SLEEP_US_LONG);
851d5b22 BV	137	libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	138	}
	139	if (!start) {
	140	sr_dbg("no response");
	141	goto cleanup;
	142	}
	143	if (xfer_in->actual_length != 3) {
	144	sr_dbg("expected 3-byte header, got %d bytes", xfer_in->actual_length);
	145	goto cleanup;
	146	}
	147
	148	/* Got configuration structure header. */
361d1511	149	sr_spew("Response to config request: 0x%.2x 0x%.2x 0x%.2x ",
851d5b22 BV	150	buf[0], buf[1], buf[2]);
851d5b22 BV	151	buflen = buf[1] \| (buf[2] << 8);
361d1511	152	if (buf[0] != 0x02 \|\| buflen > MAX_CONFIGBLOCK_SIZE) {
851d5b22 BV	153	sr_dbg("Invalid response to config request: "
	154	"0x%.2x 0x%.2x 0x%.2x ", buf[0], buf[1], buf[2]);
	155	libusb_close(dev_hdl);
	156	goto cleanup;
	157	}
	158
	159	/* Get configuration structure. */
	160	xfer_in->length = buflen;
	161	xfer_in->user_data = 0;
	162	if (libusb_submit_transfer(xfer_in) != 0)
	163	goto cleanup;
	164	while (!xfer_in->user_data) {
	165	if (g_get_monotonic_time() - start > SCAN_TIMEOUT) {
	166	start = 0;
	167	break;
	168	}
1a46cc62	169	g_usleep(SLEEP_US_LONG);
851d5b22 BV	170	libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	171	}
	172	if (!start) {
	173	sr_dbg("Timeout waiting for configuration structure.");
	174	goto cleanup;
	175	}
	176	if (xfer_in->actual_length != buflen) {
	177	sr_dbg("expected %d-byte structure, got %d bytes", buflen,
	178	xfer_in->actual_length);
	179	goto cleanup;
	180	}
6aa1eb4e	181
361d1511 BV	182	memcpy(configblock, buf, buflen);
361d1511 BV	183	*configlen = buflen;
851d5b22 BV	184
851d5b22 BV	185	cleanup:
9851d35b	186	if (!xfer_in->user_data \|\| !xfer_out->user_data) {
851d5b22 BV	187	if (!xfer_in->user_data)
	188	libusb_cancel_transfer(xfer_in);
	189	if (!xfer_out->user_data)
	190	libusb_cancel_transfer(xfer_out);
	191	start = g_get_monotonic_time();
	192	while (!xfer_in->user_data \|\| !xfer_out->user_data) {
1a46cc62	193	if (g_get_monotonic_time() - start > EVENTS_TIMEOUT)
851d5b22	194	break;
1a46cc62	195	g_usleep(SLEEP_US_SHORT);
851d5b22 BV	196	libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	197	}
	198	}
	199	libusb_free_transfer(xfer_in);
	200	libusb_free_transfer(xfer_out);
	201
361d1511	202	return *configlen ? SR_OK : SR_ERR;
6aa1eb4e BV	203	}
6aa1eb4e BV	204
d87c1766	205	static int lascar_save_config(libusb_device_handle *dev_hdl,
b0c95747 BV	206	unsigned char *config, int configlen)
	207	{
	208	struct drv_context *drvc;
	209	struct libusb_transfer xfer_in, xfer_out;
	210	struct timeval tv;
	211	int64_t start;
	212	int buflen, ret;
	213	unsigned char cmd[3], buf[256];
	214
361d1511 BV	215	sr_spew("Writing config block.");
361d1511 BV	216
41812aca	217	drvc = di->context;
b0c95747 BV	218
	219	if (!(xfer_in = libusb_alloc_transfer(0)) \|\|
	220	!(xfer_out = libusb_alloc_transfer(0)))
	221	return SR_ERR;
	222
	223	/* Flush anything the F321 still has queued. */
	224	while (libusb_bulk_transfer(dev_hdl, LASCAR_EP_IN, buf, 256, &buflen,
	225	5) == 0 && buflen > 0)
	226	;
	227	ret = SR_OK;
	228
	229	/* Keep a read request waiting in the wings, ready to pounce
	230	* the moment the device sends something. */
	231	libusb_fill_bulk_transfer(xfer_in, dev_hdl, LASCAR_EP_IN,
1a46cc62	232	buf, 256, mark_xfer, 0, BULK_XFER_TIMEOUT);
b0c95747 BV	233	if (libusb_submit_transfer(xfer_in) != 0) {
	234	ret = SR_ERR;
	235	goto cleanup;
	236	}
	237
	238	/* Request device configuration structure. */
	239	cmd[0] = 0x01;
	240	cmd[1] = configlen & 0xff;
	241	cmd[2] = (configlen >> 8) & 0xff;
	242	libusb_fill_bulk_transfer(xfer_out, dev_hdl, LASCAR_EP_OUT,
	243	cmd, 3, mark_xfer, 0, 100);
	244	if (libusb_submit_transfer(xfer_out) != 0) {
	245	ret = SR_ERR;
	246	goto cleanup;
	247	}
	248	tv.tv_sec = 0;
	249	tv.tv_usec = 0;
	250	while (!xfer_out->user_data) {
1a46cc62	251	g_usleep(SLEEP_US_LONG);
b0c95747 BV	252	libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	253	}
	254
	255	libusb_fill_bulk_transfer(xfer_out, dev_hdl, LASCAR_EP_OUT,
	256	config, configlen, mark_xfer, 0, 100);
	257	if (libusb_submit_transfer(xfer_out) != 0) {
	258	ret = SR_ERR;
	259	goto cleanup;
	260	}
	261	while (!xfer_in->user_data \|\| !xfer_out->user_data) {
1a46cc62	262	g_usleep(SLEEP_US_LONG);
b0c95747 BV	263	libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	264	}
	265
	266	if (xfer_in->actual_length != 1 \|\| buf[0] != 0xff) {
	267	sr_dbg("unexpected response after transfer");
	268	ret = SR_ERR;
	269	}
	270
	271	cleanup:
9851d35b	272	if (!xfer_in->user_data \|\| !xfer_out->user_data) {
b0c95747 BV	273	if (!xfer_in->user_data)
	274	libusb_cancel_transfer(xfer_in);
	275	if (!xfer_out->user_data)
	276	libusb_cancel_transfer(xfer_out);
	277	start = g_get_monotonic_time();
	278	while (!xfer_in->user_data \|\| !xfer_out->user_data) {
1a46cc62	279	if (g_get_monotonic_time() - start > EVENTS_TIMEOUT)
b0c95747	280	break;
1a46cc62	281	g_usleep(SLEEP_US_SHORT);
b0c95747 BV	282	libusb_handle_events_timeout(drvc->sr_ctx->libusb_ctx, &tv);
	283	}
	284	}
	285	libusb_free_transfer(xfer_in);
	286	libusb_free_transfer(xfer_out);
	287
	288	return ret;
	289	}
	290
6aa1eb4e BV	291	static struct sr_dev_inst lascar_identify(unsigned char config)
	292	{
	293	struct dev_context *devc;
	294	const struct elusb_profile *profile;
	295	struct sr_dev_inst *sdi;
6aa1eb4e BV	296	int modelid, i;
	297	char firmware[5];
	298
	299	modelid = config[0];
851d5b22 BV	300	sdi = NULL;
	301	if (modelid) {
	302	profile = NULL;
	303	for (i = 0; profiles[i].modelid; i++) {
	304	if (profiles[i].modelid == modelid) {
	305	profile = &profiles[i];
	306	break;
	307	}
	308	}
	309	if (!profile) {
	310	sr_dbg("unknown EL-USB modelid %d", modelid);
	311	return NULL;
	312	}
	313
6aa1eb4e BV	314	i = config[52] \| (config[53] << 8);
6aa1eb4e BV	315	memcpy(firmware, config + 0x30, 4);
851d5b22 BV	316	firmware[4] = '\0';
	317	sr_dbg("found %s with firmware version %s serial %d",
	318	profile->modelname, firmware, i);
	319
	320	if (profile->logformat == LOG_UNSUPPORTED) {
	321	sr_dbg("unsupported EL-USB logformat for %s", profile->modelname);
	322	return NULL;
	323	}
	324
aac29cc1	325	sdi = g_malloc0(sizeof(struct sr_dev_inst));
0af636be UH	326	sdi->status = SR_ST_INACTIVE;
	327	sdi->vendor = g_strdup(LASCAR_VENDOR);
	328	sdi->model = g_strdup(profile->modelname);
	329	sdi->version = g_strdup(firmware);
6aa1eb4e	330
1d166757	331	if (profile->logformat == LOG_TEMP_RH) {
ba7dd8bb	332	/* Model this as two channels: temperature and humidity. */
5e23fcab ML	333	sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "Temp");
5e23fcab ML	334	sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "Hum");
1d166757	335	} else if (profile->logformat == LOG_CO) {
5e23fcab	336	sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "CO");
1d166757	337	} else {
5e23fcab	338	sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "P1");
1d166757	339	}
6aa1eb4e	340
f57d8ffe	341	devc = g_malloc0(sizeof(struct dev_context));
6aa1eb4e BV	342	sdi->priv = devc;
6aa1eb4e BV	343	devc->profile = profile;
851d5b22 BV	344	}
	345
	346	return sdi;
	347	}
	348
	349	SR_PRIV struct sr_dev_inst *lascar_scan(int bus, int address)
	350	{
	351	struct drv_context *drvc;
	352	struct sr_dev_inst *sdi;
	353	struct libusb_device **devlist;
851d5b22	354	libusb_device_handle *dev_hdl;
8de8551b	355	int dummy, i;
ceb2da17	356	int ret;
361d1511	357	unsigned char config[MAX_CONFIGBLOCK_SIZE];
851d5b22	358
41812aca	359	drvc = di->context;
851d5b22 BV	360	sdi = NULL;
851d5b22 BV	361
ceb2da17 LPC	362	ret = libusb_get_device_list(drvc->sr_ctx->libusb_ctx, &devlist);
	363	if (ret < 0)
	364	return NULL;
	365
851d5b22	366	for (i = 0; devlist[i]; i++) {
851d5b22 BV	367	if (libusb_get_bus_number(devlist[i]) != bus \|\|
	368	libusb_get_device_address(devlist[i]) != address)
	369	continue;
	370
6aa1eb4e BV	371	if (!(dev_hdl = lascar_open(devlist[i])))
	372	continue;
	373
361d1511	374	if (lascar_get_config(dev_hdl, config, &dummy) != SR_OK)
851d5b22	375	continue;
851d5b22	376
851d5b22	377	libusb_close(dev_hdl);
6aa1eb4e	378	sdi = lascar_identify(config);
851d5b22	379	}
ceb2da17	380	libusb_free_device_list(devlist, 1);
851d5b22 BV	381
	382	return sdi;
	383	}
	384
6aa1eb4e BV	385	static void lascar_el_usb_dispatch(struct sr_dev_inst sdi, unsigned char buf,
	386	int buflen)
	387	{
	388	struct dev_context *devc;
	389	struct sr_datafeed_packet packet;
5ba41759 UH	390	struct sr_datafeed_analog analog;
	391	struct sr_analog_encoding encoding;
	392	struct sr_analog_meaning meaning;
	393	struct sr_analog_spec spec;
ba7dd8bb	394	struct sr_channel *ch;
6787f404	395	float temp, rh;
6aa1eb4e	396	uint16_t s;
6787f404	397	int samples, samples_left, i, j;
6aa1eb4e BV	398
6aa1eb4e BV	399	devc = sdi->priv;
69e19dd7	400
869c8375	401	/* Note: digits/spec_digits will be overridden later. */
5ba41759 UH	402	sr_analog_init(&analog, &encoding, &meaning, &spec, 0);
5ba41759 UH	403
6aa1eb4e BV	404	samples = buflen / devc->sample_size;
	405	samples_left = devc->logged_samples - devc->rcvd_samples;
	406	if (samples_left < samples)
	407	samples = samples_left;
	408	switch (devc->profile->logformat) {
	409	case LOG_TEMP_RH:
5ba41759	410	packet.type = SR_DF_ANALOG;
6787f404	411	packet.payload = &analog;
5ba41759	412	analog.meaning->mqflags = 0;
6787f404 BV	413	if (!(temp = g_try_malloc(sizeof(float) * samples)))
	414	break;
	415	if (!(rh = g_try_malloc(sizeof(float) * samples)))
	416	break;
	417	for (i = 0, j = 0; i < samples; i++) {
f3f19d11	418	/* Both Celsius and Fahrenheit stored at base -40. */
6787f404	419	if (devc->temp_unit == 0)
f3f19d11	420	/* Celsius is stored in half-degree increments. */
6787f404 BV	421	temp[j] = buf[i * 2] / 2 - 40;
	422	else
	423	temp[j] = buf[i * 2] - 40;
	424
	425	rh[j] = buf[i * 2 + 1] / 2;
	426
	427	if (temp[j] == 0.0 && rh[j] == 0.0)
	428	/* Skip invalid measurement. */
	429	continue;
	430	j++;
	431	}
	432	analog.num_samples = j;
	433
ba7dd8bb UH	434	ch = sdi->channels->data;
ba7dd8bb UH	435	if (ch->enabled) {
5ba41759 UH	436	analog.meaning->channels = g_slist_append(NULL, ch);
5ba41759 UH	437	analog.meaning->mq = SR_MQ_TEMPERATURE;
fa2b1922	438	if (devc->temp_unit == 1) {
5ba41759	439	analog.meaning->unit = SR_UNIT_FAHRENHEIT;
fa2b1922 AJ	440	analog.encoding->digits = 0;
	441	analog.spec->spec_digits = 0;
	442	} else {
5ba41759	443	analog.meaning->unit = SR_UNIT_CELSIUS;
fa2b1922 AJ	444	analog.encoding->digits = 1;
	445	analog.spec->spec_digits = 1;
	446	}
5ba41759	447	analog.data = (void *)temp;
695dc859	448	sr_session_send(sdi, &packet);
5ba41759	449	g_slist_free(analog.meaning->channels);
1d166757 BV	450	}
1d166757 BV	451
ba7dd8bb UH	452	ch = sdi->channels->next->data;
ba7dd8bb UH	453	if (ch->enabled) {
5ba41759 UH	454	analog.meaning->channels = g_slist_append(NULL, ch);
	455	analog.meaning->mq = SR_MQ_RELATIVE_HUMIDITY;
	456	analog.meaning->unit = SR_UNIT_PERCENTAGE;
fa2b1922 AJ	457	analog.encoding->digits = 1;
fa2b1922 AJ	458	analog.spec->spec_digits = 1;
5ba41759	459	analog.data = (void *)rh;
695dc859	460	sr_session_send(sdi, &packet);
5ba41759	461	g_slist_free(analog.meaning->channels);
1d166757 BV	462	}
1d166757 BV	463
6787f404 BV	464	g_free(temp);
6787f404 BV	465	g_free(rh);
6aa1eb4e BV	466	break;
6aa1eb4e BV	467	case LOG_CO:
5ba41759	468	packet.type = SR_DF_ANALOG;
6aa1eb4e	469	packet.payload = &analog;
5ba41759	470	analog.meaning->channels = sdi->channels;
6aa1eb4e	471	analog.num_samples = samples;
5ba41759 UH	472	analog.meaning->mq = SR_MQ_CARBON_MONOXIDE;
	473	analog.meaning->unit = SR_UNIT_CONCENTRATION;
	474	analog.meaning->mqflags = 0;
6aa1eb4e BV	475	if (!(analog.data = g_try_malloc(sizeof(float) * samples)))
	476	break;
	477	for (i = 0; i < samples; i++) {
	478	s = (buf[i * 2] << 8) \| buf[i * 2 + 1];
5ba41759 UH	479	((float )analog.data)[i] = (s devc->co_high + devc->co_low) / (1000 * 1000);
	480	if (((float *)analog.data)[i] < 0.0)
	481	((float *)analog.data)[i] = 0.0;
6aa1eb4e	482	}
695dc859	483	sr_session_send(sdi, &packet);
6aa1eb4e BV	484	g_free(analog.data);
	485	break;
	486	default:
	487	/* How did we even get this far? */
	488	break;
	489	}
	490	devc->rcvd_samples += samples;
	491
	492	}
851d5b22	493
6aa1eb4e	494	SR_PRIV int lascar_el_usb_handle_events(int fd, int revents, void *cb_data)
46697e38	495	{
41812aca	496	struct drv_context *drvc = di->context;
6aa1eb4e BV	497	struct sr_dev_inst *sdi;
6aa1eb4e BV	498	struct timeval tv;
46697e38	499
6aa1eb4e BV	500	(void)fd;
6aa1eb4e BV	501	(void)revents;
46697e38	502
6aa1eb4e	503	sdi = cb_data;
46697e38	504
6aa1eb4e	505	if (sdi->status == SR_ST_STOPPING) {
102f1239	506	usb_source_remove(sdi->session, drvc->sr_ctx);
bee2b016	507	std_session_send_df_end(sdi);
46697e38 BV	508	}
46697e38 BV	509
6aa1eb4e BV	510	memset(&tv, 0, sizeof(struct timeval));
	511	libusb_handle_events_timeout_completed(drvc->sr_ctx->libusb_ctx, &tv,
	512	NULL);
	513
46697e38 BV	514	return TRUE;
46697e38 BV	515	}
6aa1eb4e	516
55462b8b	517	SR_PRIV void LIBUSB_CALL lascar_el_usb_receive_transfer(struct libusb_transfer *transfer)
6aa1eb4e BV	518	{
	519	struct dev_context *devc;
	520	struct sr_dev_inst *sdi;
	521	int ret;
	522	gboolean packet_has_error;
	523
	524	sdi = transfer->user_data;
	525	devc = sdi->priv;
	526
	527	packet_has_error = FALSE;
	528	switch (transfer->status) {
	529	case LIBUSB_TRANSFER_NO_DEVICE:
	530	/* USB device was unplugged. */
d2f7c417	531	sr_dev_acquisition_stop(sdi);
6aa1eb4e BV	532	return;
	533	case LIBUSB_TRANSFER_COMPLETED:
	534	case LIBUSB_TRANSFER_TIMED_OUT: /* We may have received some data though */
	535	break;
	536	default:
	537	packet_has_error = TRUE;
	538	break;
	539	}
	540
	541	if (!packet_has_error) {
	542	if (devc->rcvd_samples < devc->logged_samples)
	543	lascar_el_usb_dispatch(sdi, transfer->buffer,
	544	transfer->actual_length);
	545	devc->rcvd_bytes += transfer->actual_length;
	546	sr_spew("received %d/%d bytes (%d/%d samples)",
	547	devc->rcvd_bytes, devc->log_size,
	548	devc->rcvd_samples, devc->logged_samples);
	549	if (devc->rcvd_bytes >= devc->log_size)
d2f7c417	550	sr_dev_acquisition_stop(sdi);
6aa1eb4e BV	551	}
	552
	553	if (sdi->status == SR_ST_ACTIVE) {
	554	/* Send the same request again. */
	555	if ((ret = libusb_submit_transfer(transfer) != 0)) {
	556	sr_err("Unable to resubmit transfer: %s.",
	557	libusb_error_name(ret));
	558	g_free(transfer->buffer);
	559	libusb_free_transfer(transfer);
d2f7c417	560	sr_dev_acquisition_stop(sdi);
6aa1eb4e BV	561	}
	562	} else {
	563	/* This was the last transfer we're going to receive, so
	564	* clean up now. */
	565	g_free(transfer->buffer);
	566	libusb_free_transfer(transfer);
	567	}
	568
	569	}
361d1511 BV	570
	571	static int get_flags(unsigned char *configblock)
	572	{
	573	int flags;
	574
	575	flags = (configblock[32] \| (configblock[33] << 8)) & 0x1fff;
	576	sr_spew("Read flags (0x%.4x).", flags);
	577
	578	return flags;
	579	}
	580
	581	static int set_flags(unsigned char *configblock, int flags)
	582	{
	583
	584	sr_spew("Setting flags to 0x%.4x.", flags);
	585	configblock[32] = flags & 0xff;
	586	configblock[33] = (flags >> 8) & 0x1f;
	587
	588	return flags;
	589	}
	590
	591	SR_PRIV int lascar_is_logging(const struct sr_dev_inst *sdi)
	592	{
	593	struct dev_context *devc;
0f150649	594	struct sr_usb_dev_inst *usb;
361d1511 BV	595	int dummy, flags, ret;
	596
	597	devc = sdi->priv;
0f150649 BV	598	usb = sdi->conn;
	599
	600	if (lascar_get_config(usb->devhdl, devc->config, &dummy) != SR_OK)
361d1511 BV	601	return -1;
	602
	603	flags = get_flags(devc->config);
	604	if (flags & 0x0100)
	605	ret = 1;
	606	else
	607	ret = 0;
	608
	609	return ret;
	610	}
	611
	612	SR_PRIV int lascar_start_logging(const struct sr_dev_inst *sdi)
	613	{
	614	struct dev_context *devc;
0f150649	615	struct sr_usb_dev_inst *usb;
361d1511 BV	616	int len, flags, ret;
	617
	618	devc = sdi->priv;
0f150649 BV	619	usb = sdi->conn;
	620
	621	if (lascar_get_config(usb->devhdl, devc->config, &len) != SR_OK)
361d1511 BV	622	return SR_ERR;
	623
	624	/* Turn on logging. */
	625	flags = get_flags(devc->config);
	626	flags \|= 0x0100;
	627	set_flags(devc->config, flags);
	628
	629	/* Start logging in 0 seconds. */
	630	memset(devc->config + 24, 0, 4);
	631
0f150649	632	ret = lascar_save_config(usb->devhdl, devc->config, len);
361d1511 BV	633	sr_info("Started internal logging.");
	634
	635	return ret;
	636	}
	637
	638	SR_PRIV int lascar_stop_logging(const struct sr_dev_inst *sdi)
	639	{
	640	struct dev_context *devc;
0f150649	641	struct sr_usb_dev_inst *usb;
361d1511 BV	642	int len, flags, ret;
	643
	644	devc = sdi->priv;
0f150649 BV	645	usb = sdi->conn;
	646
	647	if (lascar_get_config(usb->devhdl, devc->config, &len) != SR_OK)
361d1511 BV	648	return SR_ERR;
	649
	650	flags = get_flags(devc->config);
	651	flags &= ~0x0100;
	652	set_flags(devc->config, flags);
	653
0f150649	654	ret = lascar_save_config(usb->devhdl, devc->config, len);
361d1511 BV	655	sr_info("Stopped internal logging.");
	656
	657	return ret;
	658	}