[libsigrok.git] / src / hardware / uni-t-ut32x / api.c

/*
 * This file is part of the libsigrok project.
 *
 * Copyright (C) 2013 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 <string.h>
#include "protocol.h"

static const uint32_t scanopts[] = {
	SR_CONF_CONN,
};

static const uint32_t devopts[] = {
	SR_CONF_THERMOMETER,
	SR_CONF_CONTINUOUS,
	SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_DATA_SOURCE | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
};

static const char *channel_names[] = {
	"T1", "T2", "T1-T2",
};

static const char *data_sources[] = {
	"Live",
	"Memory",
};

static GSList *scan(struct sr_dev_driver *di, GSList *options)
{
	struct drv_context *drvc;
	struct dev_context *devc;
	struct sr_dev_inst *sdi;
	struct sr_config *src;
	GSList *usb_devices, *devices, *l;
	unsigned int i;
	const char *conn;

	drvc = di->context;

	conn = NULL;
	for (l = options; l; l = l->next) {
		src = l->data;
		switch (src->key) {
		case SR_CONF_CONN:
			conn = g_variant_get_string(src->data, NULL);
			break;
		}
	}
	if (!conn)
		return NULL;

	devices = NULL;
	if ((usb_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, conn))) {
		/* We have a list of sr_usb_dev_inst matching the connection
		 * string. Wrap them in sr_dev_inst and we're done. */
		for (l = usb_devices; l; l = l->next) {
			sdi = g_malloc0(sizeof(struct sr_dev_inst));
			sdi->status = SR_ST_INACTIVE;
			sdi->vendor = g_strdup(VENDOR);
			sdi->model = g_strdup(MODEL);
			sdi->inst_type = SR_INST_USB;
			sdi->conn = l->data;
			for (i = 0; i < ARRAY_SIZE(channel_names); i++)
				sr_channel_new(sdi, i, SR_CHANNEL_ANALOG, TRUE,
						channel_names[i]);
			devc = g_malloc0(sizeof(struct dev_context));
			sdi->priv = devc;
			devc->limit_samples = 0;
			devc->data_source = DEFAULT_DATA_SOURCE;
			devices = g_slist_append(devices, sdi);
		}
		g_slist_free(usb_devices);
	} else
		g_slist_free_full(usb_devices, g_free);

	return std_scan_complete(di, devices);
}

static int dev_open(struct sr_dev_inst *sdi)
{
	struct sr_dev_driver *di = sdi->driver;
	struct drv_context *drvc = di->context;
	struct sr_usb_dev_inst *usb;
	int ret;

	usb = sdi->conn;

	if (sr_usb_open(drvc->sr_ctx->libusb_ctx, usb) != SR_OK)
		return SR_ERR;

/*
 * The libusb 1.0.9 Darwin backend is broken: it can report a kernel
 * driver being active, but detaching it always returns an error.
 */
#if !defined(__APPLE__)
	if (libusb_kernel_driver_active(usb->devhdl, USB_INTERFACE) == 1) {
		if ((ret = libusb_detach_kernel_driver(usb->devhdl, USB_INTERFACE)) < 0) {
			sr_err("failed to detach kernel driver: %s",
					libusb_error_name(ret));
			return SR_ERR;
		}
	}
#endif

	if ((ret = libusb_set_configuration(usb->devhdl, USB_CONFIGURATION))) {
		sr_err("Failed to set configuration: %s.", libusb_error_name(ret));
		return SR_ERR;
	}

	if ((ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE))) {
		sr_err("Failed to claim interface: %s.", libusb_error_name(ret));
		return SR_ERR;
	}
	sdi->status = SR_ST_ACTIVE;

	return ret;
}

static int dev_close(struct sr_dev_inst *sdi)
{
	struct sr_usb_dev_inst *usb;

	usb = sdi->conn;
	if (!usb->devhdl)
		/* Nothing to do. */
		return SR_OK;

	libusb_release_interface(usb->devhdl, USB_INTERFACE);
	libusb_close(usb->devhdl);
	usb->devhdl = NULL;
	sdi->status = SR_ST_INACTIVE;

	return SR_OK;
}

static int config_get(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
		const struct sr_channel_group *cg)
{
	struct dev_context *devc;

	(void)cg;

	devc = sdi->priv;
	switch (key) {
	case SR_CONF_LIMIT_SAMPLES:
		*data = g_variant_new_uint64(devc->limit_samples);
		break;
	case SR_CONF_DATA_SOURCE:
		if (devc->data_source == DATA_SOURCE_LIVE)
			*data = g_variant_new_string("Live");
		else
			*data = g_variant_new_string("Memory");
		break;
	default:
		return SR_ERR_NA;
	}

	return SR_OK;
}

static int config_set(uint32_t key, GVariant *data, const struct sr_dev_inst *sdi,
		const struct sr_channel_group *cg)
{
	struct dev_context *devc;
	const char *tmp_str;

	(void)cg;

	devc = sdi->priv;

	switch (key) {
	case SR_CONF_LIMIT_SAMPLES:
		devc->limit_samples = g_variant_get_uint64(data);
		break;
	case SR_CONF_DATA_SOURCE:
		tmp_str = g_variant_get_string(data, NULL);
		if (!strcmp(tmp_str, "Live"))
			devc->data_source = DATA_SOURCE_LIVE;
		else if (!strcmp(tmp_str, "Memory"))
			devc->data_source = DATA_SOURCE_MEMORY;
		else
			return SR_ERR;
		break;
	default:
		return SR_ERR_NA;
	}

	return SR_OK;
}

static int config_list(uint32_t key, GVariant **data, const struct sr_dev_inst *sdi,
		const struct sr_channel_group *cg)
{
	(void)sdi;
	(void)cg;

	switch (key) {
	case SR_CONF_SCAN_OPTIONS:
		*data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
				scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
		break;
	case SR_CONF_DEVICE_OPTIONS:
		*data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
				devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
		break;
	case SR_CONF_DATA_SOURCE:
		*data = g_variant_new_strv(data_sources, ARRAY_SIZE(data_sources));
		break;
	default:
		return SR_ERR_NA;
	}

	return SR_OK;
}

static int dev_acquisition_start(const struct sr_dev_inst *sdi)
{
	struct sr_dev_driver *di = sdi->driver;
	struct drv_context *drvc;
	struct dev_context *devc;
	struct sr_usb_dev_inst *usb;
	int len, ret;
	unsigned char cmd[2];

	drvc = di->context;
	devc = sdi->priv;
	usb = sdi->conn;

	devc->num_samples = 0;
	devc->packet_len = 0;

	/* Configure serial port parameters on USB-UART interface
	 * chip inside the device (just baudrate 2400 actually). */
	cmd[0] = 0x09;
	cmd[1] = 0x60;
	ret = libusb_control_transfer(usb->devhdl, 0x21, 0x09, 0x0300, 0x00,
			cmd, 2, 5);
	if (ret != 2) {
		sr_dbg("Failed to configure CH9325: %s", libusb_error_name(ret));
		return SR_ERR;
	}

	std_session_send_df_header(sdi);

	if (!(devc->xfer = libusb_alloc_transfer(0)))
		return SR_ERR;

	/* Length of payload to follow. */
	cmd[0] = 0x01;
	if (devc->data_source == DATA_SOURCE_LIVE)
		cmd[1] = CMD_GET_LIVE;
	else
		cmd[1] = CMD_GET_STORED;

	ret = libusb_bulk_transfer(usb->devhdl, EP_OUT, cmd, 2, &len, 5);
	if (ret != 0 || len != 2) {
		sr_dbg("Failed to start acquisition: %s", libusb_error_name(ret));
		libusb_free_transfer(devc->xfer);
		return SR_ERR;
	}

	libusb_fill_bulk_transfer(devc->xfer, usb->devhdl, EP_IN, devc->buf,
			8, uni_t_ut32x_receive_transfer, (void *)sdi, 15);
	if (libusb_submit_transfer(devc->xfer) != 0) {
		libusb_free_transfer(devc->xfer);
		return SR_ERR;
	}

	usb_source_add(sdi->session, drvc->sr_ctx, 10,
			uni_t_ut32x_handle_events, (void *)sdi);

	return SR_OK;
}

static int dev_acquisition_stop(struct sr_dev_inst *sdi)
{
	/* Signal USB transfer handler to clean up and stop. */
	sdi->status = SR_ST_STOPPING;

	return SR_OK;
}

static struct sr_dev_driver uni_t_ut32x_driver_info = {
	.name = "uni-t-ut32x",
	.longname = "UNI-T UT32x",
	.api_version = 1,
	.init = std_init,
	.cleanup = std_cleanup,
	.scan = scan,
	.dev_list = std_dev_list,
	.dev_clear = NULL,
	.config_get = config_get,
	.config_set = config_set,
	.config_list = config_list,
	.dev_open = dev_open,
	.dev_close = dev_close,
	.dev_acquisition_start = dev_acquisition_start,
	.dev_acquisition_stop = dev_acquisition_stop,
	.context = NULL,
};
SR_REGISTER_DEV_DRIVER(uni_t_ut32x_driver_info);
Commit	Line	Data
	1	/*
	2	* This file is part of the libsigrok project.
	3	*
	4	* Copyright (C) 2013 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
	20	#include <config.h>
	21	#include <string.h>
	22	#include "protocol.h"
	23
	24	static const uint32_t scanopts[] = {
	25	SR_CONF_CONN,
	26	};
	27
	28	static const uint32_t devopts[] = {
	29	SR_CONF_THERMOMETER,
	30	SR_CONF_CONTINUOUS,
	31	SR_CONF_LIMIT_SAMPLES \| SR_CONF_GET \| SR_CONF_SET,
	32	SR_CONF_DATA_SOURCE \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
	33	};
	34
	35	static const char *channel_names[] = {
	36	"T1", "T2", "T1-T2",
	37	};
	38
	39	static const char *data_sources[] = {
	40	"Live",
	41	"Memory",
	42	};
	43
	44	static GSList scan(struct sr_dev_driver di, GSList *options)
	45	{
	46	struct drv_context *drvc;
	47	struct dev_context *devc;
	48	struct sr_dev_inst *sdi;
	49	struct sr_config *src;
	50	GSList usb_devices, devices, *l;
	51	unsigned int i;
	52	const char *conn;
	53
	54	drvc = di->context;
	55
	56	conn = NULL;
	57	for (l = options; l; l = l->next) {
	58	src = l->data;
	59	switch (src->key) {
	60	case SR_CONF_CONN:
	61	conn = g_variant_get_string(src->data, NULL);
	62	break;
	63	}
	64	}
	65	if (!conn)
	66	return NULL;
	67
	68	devices = NULL;
	69	if ((usb_devices = sr_usb_find(drvc->sr_ctx->libusb_ctx, conn))) {
	70	/* We have a list of sr_usb_dev_inst matching the connection
	71	* string. Wrap them in sr_dev_inst and we're done. */
	72	for (l = usb_devices; l; l = l->next) {
	73	sdi = g_malloc0(sizeof(struct sr_dev_inst));
	74	sdi->status = SR_ST_INACTIVE;
	75	sdi->vendor = g_strdup(VENDOR);
	76	sdi->model = g_strdup(MODEL);
	77	sdi->inst_type = SR_INST_USB;
	78	sdi->conn = l->data;
	79	for (i = 0; i < ARRAY_SIZE(channel_names); i++)
	80	sr_channel_new(sdi, i, SR_CHANNEL_ANALOG, TRUE,
	81	channel_names[i]);
	82	devc = g_malloc0(sizeof(struct dev_context));
	83	sdi->priv = devc;
	84	devc->limit_samples = 0;
	85	devc->data_source = DEFAULT_DATA_SOURCE;
	86	devices = g_slist_append(devices, sdi);
	87	}
	88	g_slist_free(usb_devices);
	89	} else
	90	g_slist_free_full(usb_devices, g_free);
	91
	92	return std_scan_complete(di, devices);
	93	}
	94
	95	static int dev_open(struct sr_dev_inst *sdi)
	96	{
	97	struct sr_dev_driver *di = sdi->driver;
	98	struct drv_context *drvc = di->context;
	99	struct sr_usb_dev_inst *usb;
	100	int ret;
	101
	102	usb = sdi->conn;
	103
	104	if (sr_usb_open(drvc->sr_ctx->libusb_ctx, usb) != SR_OK)
	105	return SR_ERR;
	106
	107	/*
	108	* The libusb 1.0.9 Darwin backend is broken: it can report a kernel
	109	* driver being active, but detaching it always returns an error.
	110	*/
	111	#if !defined(__APPLE__)
	112	if (libusb_kernel_driver_active(usb->devhdl, USB_INTERFACE) == 1) {
	113	if ((ret = libusb_detach_kernel_driver(usb->devhdl, USB_INTERFACE)) < 0) {
	114	sr_err("failed to detach kernel driver: %s",
	115	libusb_error_name(ret));
	116	return SR_ERR;
	117	}
	118	}
	119	#endif
	120
	121	if ((ret = libusb_set_configuration(usb->devhdl, USB_CONFIGURATION))) {
	122	sr_err("Failed to set configuration: %s.", libusb_error_name(ret));
	123	return SR_ERR;
	124	}
	125
	126	if ((ret = libusb_claim_interface(usb->devhdl, USB_INTERFACE))) {
	127	sr_err("Failed to claim interface: %s.", libusb_error_name(ret));
	128	return SR_ERR;
	129	}
	130	sdi->status = SR_ST_ACTIVE;
	131
	132	return ret;
	133	}
	134
	135	static int dev_close(struct sr_dev_inst *sdi)
	136	{
	137	struct sr_usb_dev_inst *usb;
	138
	139	usb = sdi->conn;
	140	if (!usb->devhdl)
	141	/* Nothing to do. */
	142	return SR_OK;
	143
	144	libusb_release_interface(usb->devhdl, USB_INTERFACE);
	145	libusb_close(usb->devhdl);
	146	usb->devhdl = NULL;
	147	sdi->status = SR_ST_INACTIVE;
	148
	149	return SR_OK;
	150	}
	151
	152	static int config_get(uint32_t key, GVariant *data, const struct sr_dev_inst sdi,
	153	const struct sr_channel_group *cg)
	154	{
	155	struct dev_context *devc;
	156
	157	(void)cg;
	158
	159	devc = sdi->priv;
	160	switch (key) {
	161	case SR_CONF_LIMIT_SAMPLES:
	162	*data = g_variant_new_uint64(devc->limit_samples);
	163	break;
	164	case SR_CONF_DATA_SOURCE:
	165	if (devc->data_source == DATA_SOURCE_LIVE)
	166	*data = g_variant_new_string("Live");
	167	else
	168	*data = g_variant_new_string("Memory");
	169	break;
	170	default:
	171	return SR_ERR_NA;
	172	}
	173
	174	return SR_OK;
	175	}
	176
	177	static int config_set(uint32_t key, GVariant data, const struct sr_dev_inst sdi,
	178	const struct sr_channel_group *cg)
	179	{
	180	struct dev_context *devc;
	181	const char *tmp_str;
	182
	183	(void)cg;
	184
	185	devc = sdi->priv;
	186
	187	switch (key) {
	188	case SR_CONF_LIMIT_SAMPLES:
	189	devc->limit_samples = g_variant_get_uint64(data);
	190	break;
	191	case SR_CONF_DATA_SOURCE:
	192	tmp_str = g_variant_get_string(data, NULL);
	193	if (!strcmp(tmp_str, "Live"))
	194	devc->data_source = DATA_SOURCE_LIVE;
	195	else if (!strcmp(tmp_str, "Memory"))
	196	devc->data_source = DATA_SOURCE_MEMORY;
	197	else
	198	return SR_ERR;
	199	break;
	200	default:
	201	return SR_ERR_NA;
	202	}
	203
	204	return SR_OK;
	205	}
	206
	207	static int config_list(uint32_t key, GVariant *data, const struct sr_dev_inst sdi,
	208	const struct sr_channel_group *cg)
	209	{
	210	(void)sdi;
	211	(void)cg;
	212
	213	switch (key) {
	214	case SR_CONF_SCAN_OPTIONS:
	215	*data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
	216	scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
	217	break;
	218	case SR_CONF_DEVICE_OPTIONS:
	219	*data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
	220	devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
	221	break;
	222	case SR_CONF_DATA_SOURCE:
	223	*data = g_variant_new_strv(data_sources, ARRAY_SIZE(data_sources));
	224	break;
	225	default:
	226	return SR_ERR_NA;
	227	}
	228
	229	return SR_OK;
	230	}
	231
	232	static int dev_acquisition_start(const struct sr_dev_inst *sdi)
	233	{
	234	struct sr_dev_driver *di = sdi->driver;
	235	struct drv_context *drvc;
	236	struct dev_context *devc;
	237	struct sr_usb_dev_inst *usb;
	238	int len, ret;
	239	unsigned char cmd[2];
	240
	241	drvc = di->context;
	242	devc = sdi->priv;
	243	usb = sdi->conn;
	244
	245	devc->num_samples = 0;
	246	devc->packet_len = 0;
	247
	248	/* Configure serial port parameters on USB-UART interface
	249	* chip inside the device (just baudrate 2400 actually). */
	250	cmd[0] = 0x09;
	251	cmd[1] = 0x60;
	252	ret = libusb_control_transfer(usb->devhdl, 0x21, 0x09, 0x0300, 0x00,
	253	cmd, 2, 5);
	254	if (ret != 2) {
	255	sr_dbg("Failed to configure CH9325: %s", libusb_error_name(ret));
	256	return SR_ERR;
	257	}
	258
	259	std_session_send_df_header(sdi);
	260
	261	if (!(devc->xfer = libusb_alloc_transfer(0)))
	262	return SR_ERR;
	263
	264	/* Length of payload to follow. */
	265	cmd[0] = 0x01;
	266	if (devc->data_source == DATA_SOURCE_LIVE)
	267	cmd[1] = CMD_GET_LIVE;
	268	else
	269	cmd[1] = CMD_GET_STORED;
	270
	271	ret = libusb_bulk_transfer(usb->devhdl, EP_OUT, cmd, 2, &len, 5);
	272	if (ret != 0 \|\| len != 2) {
	273	sr_dbg("Failed to start acquisition: %s", libusb_error_name(ret));
	274	libusb_free_transfer(devc->xfer);
	275	return SR_ERR;
	276	}
	277
	278	libusb_fill_bulk_transfer(devc->xfer, usb->devhdl, EP_IN, devc->buf,
	279	8, uni_t_ut32x_receive_transfer, (void *)sdi, 15);
	280	if (libusb_submit_transfer(devc->xfer) != 0) {
	281	libusb_free_transfer(devc->xfer);
	282	return SR_ERR;
	283	}
	284
	285	usb_source_add(sdi->session, drvc->sr_ctx, 10,
	286	uni_t_ut32x_handle_events, (void *)sdi);
	287
	288	return SR_OK;
	289	}
	290
	291	static int dev_acquisition_stop(struct sr_dev_inst *sdi)
	292	{
	293	/* Signal USB transfer handler to clean up and stop. */
	294	sdi->status = SR_ST_STOPPING;
	295
	296	return SR_OK;
	297	}
	298
	299	static struct sr_dev_driver uni_t_ut32x_driver_info = {
	300	.name = "uni-t-ut32x",
	301	.longname = "UNI-T UT32x",
	302	.api_version = 1,
	303	.init = std_init,
	304	.cleanup = std_cleanup,
	305	.scan = scan,
	306	.dev_list = std_dev_list,
	307	.dev_clear = NULL,
	308	.config_get = config_get,
	309	.config_set = config_set,
	310	.config_list = config_list,
	311	.dev_open = dev_open,
	312	.dev_close = dev_close,
	313	.dev_acquisition_start = dev_acquisition_start,
	314	.dev_acquisition_stop = dev_acquisition_stop,
	315	.context = NULL,
	316	};
	317	SR_REGISTER_DEV_DRIVER(uni_t_ut32x_driver_info);