[libsigrok.git] / src / hardware / manson-hcs-3xxx / api.c

/*
 * This file is part of the libsigrok project.
 *
 * Copyright (C) 2014 Uwe Hermann <uwe@hermann-uwe.de>
 * Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
 *
 * 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 2 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 "protocol.h"

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

static const uint32_t drvopts[] = {
	SR_CONF_POWER_SUPPLY,
};

static const uint32_t devopts[] = {
	SR_CONF_CONTINUOUS,
	SR_CONF_LIMIT_SAMPLES | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_LIMIT_MSEC | SR_CONF_GET | SR_CONF_SET,
	SR_CONF_VOLTAGE | SR_CONF_GET,
	SR_CONF_VOLTAGE_TARGET | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_CURRENT | SR_CONF_GET,
	SR_CONF_CURRENT_LIMIT | SR_CONF_GET | SR_CONF_SET | SR_CONF_LIST,
	SR_CONF_ENABLED | SR_CONF_GET | SR_CONF_SET,
};

/* Note: All models have one power supply output only. */
static const struct hcs_model models[] = {
	{ MANSON_HCS_3100, "HCS-3100",     "3100", { 1, 18, 0.1 }, { 0, 10,   0.10 } },
	{ MANSON_HCS_3102, "HCS-3102",     "3102", { 1, 36, 0.1 }, { 0,  5,   0.01 } },
	{ MANSON_HCS_3104, "HCS-3104",     "3104", { 1, 60, 0.1 }, { 0,  2.5, 0.01 } },
	{ MANSON_HCS_3150, "HCS-3150",     "3150", { 1, 18, 0.1 }, { 0, 15,   0.10 } },
	{ MANSON_HCS_3200, "HCS-3200",     "3200", { 1, 18, 0.1 }, { 0, 20,   0.10 } },
	{ MANSON_HCS_3202, "HCS-3202",     "3202", { 1, 36, 0.1 }, { 0, 10,   0.10 } },
	{ MANSON_HCS_3204, "HCS-3204",     "3204", { 1, 60, 0.1 }, { 0,  5,   0.01 } },
	{ MANSON_HCS_3300, "HCS-3300-USB", "3300", { 1, 16, 0.1 }, { 0, 30,   0.10 } },
	{ MANSON_HCS_3302, "HCS-3302-USB", "3302", { 1, 32, 0.1 }, { 0, 15,   0.10 } },
	{ MANSON_HCS_3304, "HCS-3304-USB", "3304", { 1, 60, 0.1 }, { 0,  8,   0.10 } },
	{ MANSON_HCS_3400, "HCS-3400-USB", "3400", { 1, 16, 0.1 }, { 0, 40,   0.10 } },
	{ MANSON_HCS_3402, "HCS-3402-USB", "3402", { 1, 32, 0.1 }, { 0, 20,   0.10 } },
	{ MANSON_HCS_3404, "HCS-3404-USB", "3404", { 1, 60, 0.1 }, { 0, 10,   0.10 } },
	{ MANSON_HCS_3600, "HCS-3600-USB", "3600", { 1, 16, 0.1 }, { 0, 60,   0.10 } },
	{ MANSON_HCS_3602, "HCS-3602-USB", "3602", { 1, 32, 0.1 }, { 0, 30,   0.10 } },
	{ MANSON_HCS_3604, "HCS-3604-USB", "3604", { 1, 60, 0.1 }, { 0, 15,   0.10 } },
	ALL_ZERO
};

static GSList *scan(struct sr_dev_driver *di, GSList *options)
{
	int i, model_id;
	struct dev_context *devc;
	struct sr_dev_inst *sdi;
	struct sr_config *src;
	GSList *l;
	const char *conn, *serialcomm;
	struct sr_serial_dev_inst *serial;
	char reply[50], **tokens, *dummy;

	conn = NULL;
	serialcomm = NULL;
	devc = 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;
		case SR_CONF_SERIALCOMM:
			serialcomm = g_variant_get_string(src->data, NULL);
			break;
		default:
			sr_err("Unknown option %d, skipping.", src->key);
			break;
		}
	}

	if (!conn)
		return NULL;
	if (!serialcomm)
		serialcomm = "9600/8n1";

	serial = sr_serial_dev_inst_new(conn, serialcomm);

	if (serial_open(serial, SERIAL_RDWR) != SR_OK)
		return NULL;

	serial_flush(serial);

	sr_info("Probing serial port %s.", conn);

	/* Get the device model. */
	memset(&reply, 0, sizeof(reply));
	if ((hcs_send_cmd(serial, "GMOD\r") < 0) ||
	    (hcs_read_reply(serial, 2, reply, sizeof(reply)) < 0))
		return NULL;
	tokens = g_strsplit((const gchar *)&reply, "\r", 2);

	model_id = -1;
	for (i = 0; models[i].id != NULL; i++) {
		if (!strcmp(models[i].id, tokens[0]))
			model_id = i;
	}
	if (model_id < 0) {
		sr_err("Unknown model ID '%s' detected, aborting.", tokens[0]);
		g_strfreev(tokens);
		return NULL;
	}
	g_strfreev(tokens);

	sdi = g_malloc0(sizeof(struct sr_dev_inst));
	sdi->status = SR_ST_INACTIVE;
	sdi->vendor = g_strdup("Manson");
	sdi->model = g_strdup(models[model_id].name);
	sdi->inst_type = SR_INST_SERIAL;
	sdi->conn = serial;

	sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "CH1");

	devc = g_malloc0(sizeof(struct dev_context));
	sr_sw_limits_init(&devc->limits);
	devc->model = &models[model_id];

	sdi->priv = devc;

	/* Get current voltage, current, status. */
	if ((hcs_send_cmd(serial, "GETD\r") < 0) ||
	    (hcs_read_reply(serial, 2, reply, sizeof(reply)) < 0))
		goto exit_err;
	tokens = g_strsplit((const gchar *)&reply, "\r", 2);
	if (hcs_parse_volt_curr_mode(sdi, tokens) < 0) {
		g_strfreev(tokens);
		goto exit_err;
	}
	g_strfreev(tokens);

	/* Get max. voltage and current. */
	if ((hcs_send_cmd(serial, "GMAX\r") < 0) ||
	    (hcs_read_reply(serial, 2, reply, sizeof(reply)) < 0))
		goto exit_err;
	tokens = g_strsplit((const gchar *)&reply, "\r", 2);
	devc->current_max_device = g_strtod(&tokens[0][3], &dummy) * devc->model->current[2];
	tokens[0][3] = '\0';
	devc->voltage_max_device = g_strtod(tokens[0], &dummy) * devc->model->voltage[2];
	g_strfreev(tokens);

	serial_close(serial);

	return std_scan_complete(di, g_slist_append(NULL, sdi));

exit_err:
	sr_dev_inst_free(sdi);
	g_free(devc);

	return NULL;
}

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;

	if (!sdi)
		return SR_ERR_ARG;

	devc = sdi->priv;

	switch (key) {
	case SR_CONF_LIMIT_SAMPLES:
	case SR_CONF_LIMIT_MSEC:
		return sr_sw_limits_config_get(&devc->limits, key, data);
	case SR_CONF_VOLTAGE:
		*data = g_variant_new_double(devc->voltage);
		break;
	case SR_CONF_VOLTAGE_TARGET:
		*data = g_variant_new_double(devc->voltage_max);
		break;
	case SR_CONF_CURRENT:
		*data = g_variant_new_double(devc->current);
		break;
	case SR_CONF_CURRENT_LIMIT:
		*data = g_variant_new_double(devc->current_max);
		break;
	case SR_CONF_ENABLED:
		*data = g_variant_new_boolean(devc->output_enabled);
		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;
	gboolean bval;
	gdouble dval;

	(void)cg;

	devc = sdi->priv;

	switch (key) {
	case SR_CONF_LIMIT_MSEC:
	case SR_CONF_LIMIT_SAMPLES:
		return sr_sw_limits_config_set(&devc->limits, key, data);
	case SR_CONF_VOLTAGE_TARGET:
		dval = g_variant_get_double(data);
		if (dval < devc->model->voltage[0] || dval > devc->voltage_max_device)
			return SR_ERR_ARG;

		if ((hcs_send_cmd(sdi->conn, "VOLT%03.0f\r",
			(dval / devc->model->voltage[2])) < 0) ||
		    (hcs_read_reply(sdi->conn, 1, devc->buf, sizeof(devc->buf)) < 0))
			return SR_ERR;
		devc->voltage_max = dval;
		break;
	case SR_CONF_CURRENT_LIMIT:
		dval = g_variant_get_double(data);
		if (dval < devc->model->current[0] || dval > devc->current_max_device)
			return SR_ERR_ARG;

		if ((hcs_send_cmd(sdi->conn, "CURR%03.0f\r",
			(dval / devc->model->current[2])) < 0) ||
		    (hcs_read_reply(sdi->conn, 1, devc->buf, sizeof(devc->buf)) < 0))
			return SR_ERR;
		devc->current_max = dval;
		break;
	case SR_CONF_ENABLED:
		bval = g_variant_get_boolean(data);
		if (bval == devc->output_enabled) /* Nothing to do. */
			break;
		if ((hcs_send_cmd(sdi->conn, "SOUT%1d\r", !bval) < 0) ||
		    (hcs_read_reply(sdi->conn, 1, devc->buf, sizeof(devc->buf)) < 0))
			return SR_ERR;
		devc->output_enabled = bval;
		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)
{
	const double *a;
	struct dev_context *devc;

	devc = (sdi) ? sdi->priv : NULL;

	switch (key) {
	case SR_CONF_SCAN_OPTIONS:
	case SR_CONF_DEVICE_OPTIONS:
		return STD_CONFIG_LIST(key, data, sdi, cg, scanopts, drvopts, devopts);
	case SR_CONF_VOLTAGE_TARGET:
		a = devc->model->voltage;
		*data = std_gvar_min_max_step(a[0], devc->voltage_max_device, a[2]);
		break;
	case SR_CONF_CURRENT_LIMIT:
		a = devc->model->current;
		*data = std_gvar_min_max_step(a[0], devc->current_max_device, a[2]);
		break;
	default:
		return SR_ERR_NA;
	}

	return SR_OK;
}

static int dev_acquisition_start(const struct sr_dev_inst *sdi)
{
	struct dev_context *devc;
	struct sr_serial_dev_inst *serial;

	devc = sdi->priv;

	sr_sw_limits_acquisition_start(&devc->limits);
	std_session_send_df_header(sdi);

	devc->reply_pending = FALSE;
	devc->req_sent_at = 0;

	serial = sdi->conn;
	serial_source_add(sdi->session, serial, G_IO_IN, 10,
			hcs_receive_data, (void *)sdi);

	return SR_OK;
}

static struct sr_dev_driver manson_hcs_3xxx_driver_info = {
	.name = "manson-hcs-3xxx",
	.longname = "Manson HCS-3xxx",
	.api_version = 1,
	.init = std_init,
	.cleanup = std_cleanup,
	.scan = scan,
	.dev_list = std_dev_list,
	.dev_clear = std_dev_clear,
	.config_get = config_get,
	.config_set = config_set,
	.config_list = config_list,
	.dev_open = std_serial_dev_open,
	.dev_close = std_serial_dev_close,
	.dev_acquisition_start = dev_acquisition_start,
	.dev_acquisition_stop = std_serial_dev_acquisition_stop,
	.context = NULL,
};
SR_REGISTER_DEV_DRIVER(manson_hcs_3xxx_driver_info);
Commit	Line	Data
8f4e922f UH	1	/*
	2	* This file is part of the libsigrok project.
	3	*
	4	* Copyright (C) 2014 Uwe Hermann <uwe@hermann-uwe.de>
25abc8dd	5	* Copyright (C) 2014 Matthias Heidbrink <m-sigrok@heidbrink.biz>
8f4e922f UH	6	*
	7	* This program is free software; you can redistribute it and/or modify
	8	* it under the terms of the GNU General Public License as published by
	9	* the Free Software Foundation; either version 2 of the License, or
	10	* (at your option) any later version.
	11	*
	12	* This program is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	* GNU General Public License for more details.
	16	*
	17	* You should have received a copy of the GNU General Public License
2ea1fdf1	18	* along with this program; if not, see <http://www.gnu.org/licenses/>.
8f4e922f UH	19	*/
8f4e922f UH	20
6ec6c43b	21	#include <config.h>
8f4e922f UH	22	#include "protocol.h"
8f4e922f UH	23
a0e0bb41	24	static const uint32_t scanopts[] = {
b5e92647 UH	25	SR_CONF_CONN,
	26	SR_CONF_SERIALCOMM,
	27	};
	28
55fb76b3	29	static const uint32_t drvopts[] = {
55fb76b3 UH	30	SR_CONF_POWER_SUPPLY,
	31	};
	32
584560f1	33	static const uint32_t devopts[] = {
b5e92647	34	SR_CONF_CONTINUOUS,
5827f61b BV	35	SR_CONF_LIMIT_SAMPLES \| SR_CONF_GET \| SR_CONF_SET,
5827f61b BV	36	SR_CONF_LIMIT_MSEC \| SR_CONF_GET \| SR_CONF_SET,
7a0b98b5 AJ	37	SR_CONF_VOLTAGE \| SR_CONF_GET,
	38	SR_CONF_VOLTAGE_TARGET \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
	39	SR_CONF_CURRENT \| SR_CONF_GET,
	40	SR_CONF_CURRENT_LIMIT \| SR_CONF_GET \| SR_CONF_SET \| SR_CONF_LIST,
	41	SR_CONF_ENABLED \| SR_CONF_GET \| SR_CONF_SET,
b5e92647 UH	42	};
	43
	44	/* Note: All models have one power supply output only. */
329733d9	45	static const struct hcs_model models[] = {
25abc8dd MH	46	{ MANSON_HCS_3100, "HCS-3100", "3100", { 1, 18, 0.1 }, { 0, 10, 0.10 } },
	47	{ MANSON_HCS_3102, "HCS-3102", "3102", { 1, 36, 0.1 }, { 0, 5, 0.01 } },
	48	{ MANSON_HCS_3104, "HCS-3104", "3104", { 1, 60, 0.1 }, { 0, 2.5, 0.01 } },
	49	{ MANSON_HCS_3150, "HCS-3150", "3150", { 1, 18, 0.1 }, { 0, 15, 0.10 } },
	50	{ MANSON_HCS_3200, "HCS-3200", "3200", { 1, 18, 0.1 }, { 0, 20, 0.10 } },
	51	{ MANSON_HCS_3202, "HCS-3202", "3202", { 1, 36, 0.1 }, { 0, 10, 0.10 } },
	52	{ MANSON_HCS_3204, "HCS-3204", "3204", { 1, 60, 0.1 }, { 0, 5, 0.01 } },
	53	{ MANSON_HCS_3300, "HCS-3300-USB", "3300", { 1, 16, 0.1 }, { 0, 30, 0.10 } },
	54	{ MANSON_HCS_3302, "HCS-3302-USB", "3302", { 1, 32, 0.1 }, { 0, 15, 0.10 } },
	55	{ MANSON_HCS_3304, "HCS-3304-USB", "3304", { 1, 60, 0.1 }, { 0, 8, 0.10 } },
	56	{ MANSON_HCS_3400, "HCS-3400-USB", "3400", { 1, 16, 0.1 }, { 0, 40, 0.10 } },
	57	{ MANSON_HCS_3402, "HCS-3402-USB", "3402", { 1, 32, 0.1 }, { 0, 20, 0.10 } },
	58	{ MANSON_HCS_3404, "HCS-3404-USB", "3404", { 1, 60, 0.1 }, { 0, 10, 0.10 } },
	59	{ MANSON_HCS_3600, "HCS-3600-USB", "3600", { 1, 16, 0.1 }, { 0, 60, 0.10 } },
	60	{ MANSON_HCS_3602, "HCS-3602-USB", "3602", { 1, 32, 0.1 }, { 0, 30, 0.10 } },
	61	{ MANSON_HCS_3604, "HCS-3604-USB", "3604", { 1, 60, 0.1 }, { 0, 15, 0.10 } },
9e9dba7b	62	ALL_ZERO
b5e92647 UH	63	};
b5e92647 UH	64
4f840ce9	65	static GSList scan(struct sr_dev_driver di, GSList *options)
8f4e922f	66	{
b5e92647	67	int i, model_id;
b5e92647 UH	68	struct dev_context *devc;
	69	struct sr_dev_inst *sdi;
	70	struct sr_config *src;
43376f33	71	GSList *l;
b5e92647 UH	72	const char conn, serialcomm;
b5e92647 UH	73	struct sr_serial_dev_inst *serial;
5437a0ad	74	char reply[50], *tokens, dummy;
8f4e922f	75
b5e92647 UH	76	conn = NULL;
b5e92647 UH	77	serialcomm = NULL;
9740d9bf	78	devc = NULL;
b5e92647 UH	79
	80	for (l = options; l; l = l->next) {
	81	src = l->data;
	82	switch (src->key) {
	83	case SR_CONF_CONN:
	84	conn = g_variant_get_string(src->data, NULL);
	85	break;
	86	case SR_CONF_SERIALCOMM:
	87	serialcomm = g_variant_get_string(src->data, NULL);
	88	break;
	89	default:
	90	sr_err("Unknown option %d, skipping.", src->key);
	91	break;
	92	}
	93	}
8f4e922f	94
b5e92647 UH	95	if (!conn)
	96	return NULL;
	97	if (!serialcomm)
	98	serialcomm = "9600/8n1";
8f4e922f	99
91219afc	100	serial = sr_serial_dev_inst_new(conn, serialcomm);
8f4e922f	101
b5e92647 UH	102	if (serial_open(serial, SERIAL_RDWR) != SR_OK)
b5e92647 UH	103	return NULL;
8f4e922f	104
b5e92647	105	serial_flush(serial);
8f4e922f	106
b5e92647	107	sr_info("Probing serial port %s.", conn);
8f4e922f	108
b5e92647 UH	109	/* Get the device model. */
b5e92647 UH	110	memset(&reply, 0, sizeof(reply));
9740d9bf MH	111	if ((hcs_send_cmd(serial, "GMOD\r") < 0) \|\|
	112	(hcs_read_reply(serial, 2, reply, sizeof(reply)) < 0))
	113	return NULL;
b5e92647	114	tokens = g_strsplit((const gchar *)&reply, "\r", 2);
8f4e922f	115
b5e92647	116	model_id = -1;
25abc8dd MH	117	for (i = 0; models[i].id != NULL; i++) {
25abc8dd MH	118	if (!strcmp(models[i].id, tokens[0]))
b5e92647 UH	119	model_id = i;
	120	}
	121	if (model_id < 0) {
6e799d07 UH	122	sr_err("Unknown model ID '%s' detected, aborting.", tokens[0]);
6e799d07 UH	123	g_strfreev(tokens);
b5e92647 UH	124	return NULL;
b5e92647 UH	125	}
6e799d07	126	g_strfreev(tokens);
b5e92647	127
aac29cc1	128	sdi = g_malloc0(sizeof(struct sr_dev_inst));
0af636be UH	129	sdi->status = SR_ST_INACTIVE;
	130	sdi->vendor = g_strdup("Manson");
	131	sdi->model = g_strdup(models[model_id].name);
b5e92647 UH	132	sdi->inst_type = SR_INST_SERIAL;
b5e92647 UH	133	sdi->conn = serial;
b5e92647	134
5e23fcab	135	sr_channel_new(sdi, 0, SR_CHANNEL_ANALOG, TRUE, "CH1");
b5e92647 UH	136
b5e92647 UH	137	devc = g_malloc0(sizeof(struct dev_context));
a655b3fd	138	sr_sw_limits_init(&devc->limits);
b5e92647 UH	139	devc->model = &models[model_id];
	140
	141	sdi->priv = devc;
	142
5437a0ad	143	/* Get current voltage, current, status. */
9740d9bf MH	144	if ((hcs_send_cmd(serial, "GETD\r") < 0) \|\|
9740d9bf MH	145	(hcs_read_reply(serial, 2, reply, sizeof(reply)) < 0))
5437a0ad	146	goto exit_err;
9740d9bf	147	tokens = g_strsplit((const gchar *)&reply, "\r", 2);
6e799d07 UH	148	if (hcs_parse_volt_curr_mode(sdi, tokens) < 0) {
6e799d07 UH	149	g_strfreev(tokens);
9740d9bf	150	goto exit_err;
6e799d07	151	}
5437a0ad MH	152	g_strfreev(tokens);
	153
	154	/* Get max. voltage and current. */
	155	if ((hcs_send_cmd(serial, "GMAX\r") < 0) \|\|
	156	(hcs_read_reply(serial, 2, reply, sizeof(reply)) < 0))
	157	goto exit_err;
	158	tokens = g_strsplit((const gchar *)&reply, "\r", 2);
	159	devc->current_max_device = g_strtod(&tokens[0][3], &dummy) * devc->model->current[2];
	160	tokens[0][3] = '\0';
	161	devc->voltage_max_device = g_strtod(tokens[0], &dummy) * devc->model->voltage[2];
	162	g_strfreev(tokens);
9740d9bf	163
b5e92647	164	serial_close(serial);
b5e92647	165
43376f33	166	return std_scan_complete(di, g_slist_append(NULL, sdi));
9740d9bf MH	167
	168	exit_err:
	169	sr_dev_inst_free(sdi);
b1f83103 UH	170	g_free(devc);
b1f83103 UH	171
9740d9bf	172	return NULL;
b5e92647 UH	173	}
b5e92647 UH	174
dd7a72ea UH	175	static int config_get(uint32_t key, GVariant **data,
dd7a72ea UH	176	const struct sr_dev_inst sdi, const struct sr_channel_group cg)
8f4e922f	177	{
b5e92647	178	struct dev_context *devc;
8f4e922f	179
8f4e922f UH	180	(void)cg;
8f4e922f UH	181
b5e92647 UH	182	if (!sdi)
	183	return SR_ERR_ARG;
	184
	185	devc = sdi->priv;
	186
8f4e922f	187	switch (key) {
b5e92647	188	case SR_CONF_LIMIT_SAMPLES:
b5e92647	189	case SR_CONF_LIMIT_MSEC:
a655b3fd	190	return sr_sw_limits_config_get(&devc->limits, key, data);
7a0b98b5	191	case SR_CONF_VOLTAGE:
ca95e90f BV	192	*data = g_variant_new_double(devc->voltage);
ca95e90f BV	193	break;
7a0b98b5	194	case SR_CONF_VOLTAGE_TARGET:
ca95e90f BV	195	*data = g_variant_new_double(devc->voltage_max);
ca95e90f BV	196	break;
7a0b98b5	197	case SR_CONF_CURRENT:
811d6255 MH	198	*data = g_variant_new_double(devc->current);
811d6255 MH	199	break;
7a0b98b5	200	case SR_CONF_CURRENT_LIMIT:
811d6255 MH	201	*data = g_variant_new_double(devc->current_max);
811d6255 MH	202	break;
7a0b98b5	203	case SR_CONF_ENABLED:
811d6255 MH	204	*data = g_variant_new_boolean(devc->output_enabled);
811d6255 MH	205	break;
8f4e922f UH	206	default:
	207	return SR_ERR_NA;
	208	}
	209
b5e92647	210	return SR_OK;
8f4e922f UH	211	}
8f4e922f UH	212
dd7a72ea UH	213	static int config_set(uint32_t key, GVariant *data,
dd7a72ea UH	214	const struct sr_dev_inst sdi, const struct sr_channel_group cg)
8f4e922f	215	{
b5e92647	216	struct dev_context *devc;
811d6255 MH	217	gboolean bval;
811d6255 MH	218	gdouble dval;
8f4e922f	219
8f4e922f UH	220	(void)cg;
8f4e922f UH	221
b5e92647 UH	222	devc = sdi->priv;
b5e92647 UH	223
8f4e922f	224	switch (key) {
b5e92647	225	case SR_CONF_LIMIT_MSEC:
cd04f641	226	case SR_CONF_LIMIT_SAMPLES:
a655b3fd	227	return sr_sw_limits_config_set(&devc->limits, key, data);
7a0b98b5	228	case SR_CONF_VOLTAGE_TARGET:
ca95e90f BV	229	dval = g_variant_get_double(data);
	230	if (dval < devc->model->voltage[0] \|\| dval > devc->voltage_max_device)
	231	return SR_ERR_ARG;
	232
	233	if ((hcs_send_cmd(sdi->conn, "VOLT%03.0f\r",
	234	(dval / devc->model->voltage[2])) < 0) \|\|
	235	(hcs_read_reply(sdi->conn, 1, devc->buf, sizeof(devc->buf)) < 0))
	236	return SR_ERR;
	237	devc->voltage_max = dval;
	238	break;
7a0b98b5	239	case SR_CONF_CURRENT_LIMIT:
811d6255	240	dval = g_variant_get_double(data);
5437a0ad	241	if (dval < devc->model->current[0] \|\| dval > devc->current_max_device)
811d6255 MH	242	return SR_ERR_ARG;
	243
	244	if ((hcs_send_cmd(sdi->conn, "CURR%03.0f\r",
	245	(dval / devc->model->current[2])) < 0) \|\|
	246	(hcs_read_reply(sdi->conn, 1, devc->buf, sizeof(devc->buf)) < 0))
	247	return SR_ERR;
	248	devc->current_max = dval;
	249	break;
7a0b98b5	250	case SR_CONF_ENABLED:
811d6255 MH	251	bval = g_variant_get_boolean(data);
	252	if (bval == devc->output_enabled) /* Nothing to do. */
	253	break;
	254	if ((hcs_send_cmd(sdi->conn, "SOUT%1d\r", !bval) < 0) \|\|
	255	(hcs_read_reply(sdi->conn, 1, devc->buf, sizeof(devc->buf)) < 0))
	256	return SR_ERR;
	257	devc->output_enabled = bval;
	258	break;
8f4e922f	259	default:
b5e92647	260	return SR_ERR_NA;
8f4e922f UH	261	}
8f4e922f UH	262
b5e92647	263	return SR_OK;
8f4e922f UH	264	}
8f4e922f UH	265
dd7a72ea UH	266	static int config_list(uint32_t key, GVariant **data,
dd7a72ea UH	267	const struct sr_dev_inst sdi, const struct sr_channel_group cg)
8f4e922f	268	{
54d471f4	269	const double *a;
811d6255	270	struct dev_context *devc;
811d6255	271
e66d1892	272	devc = (sdi) ? sdi->priv : NULL;
811d6255	273
8f4e922f	274	switch (key) {
e66d1892	275	case SR_CONF_SCAN_OPTIONS:
b5e92647	276	case SR_CONF_DEVICE_OPTIONS:
e66d1892	277	return STD_CONFIG_LIST(key, data, sdi, cg, scanopts, drvopts, devopts);
7a0b98b5	278	case SR_CONF_VOLTAGE_TARGET:
54d471f4 UH	279	a = devc->model->voltage;
54d471f4 UH	280	*data = std_gvar_min_max_step(a[0], devc->voltage_max_device, a[2]);
811d6255	281	break;
7a0b98b5	282	case SR_CONF_CURRENT_LIMIT:
54d471f4 UH	283	a = devc->model->current;
54d471f4 UH	284	*data = std_gvar_min_max_step(a[0], devc->current_max_device, a[2]);
811d6255	285	break;
8f4e922f UH	286	default:
	287	return SR_ERR_NA;
	288	}
	289
b5e92647	290	return SR_OK;
8f4e922f UH	291	}
8f4e922f UH	292
695dc859	293	static int dev_acquisition_start(const struct sr_dev_inst *sdi)
8f4e922f	294	{
b5e92647 UH	295	struct dev_context *devc;
b5e92647 UH	296	struct sr_serial_dev_inst *serial;
8f4e922f	297
b5e92647	298	devc = sdi->priv;
b5e92647	299
a655b3fd	300	sr_sw_limits_acquisition_start(&devc->limits);
bee2b016	301	std_session_send_df_header(sdi);
b5e92647	302
b5e92647 UH	303	devc->reply_pending = FALSE;
	304	devc->req_sent_at = 0;
	305
b5e92647	306	serial = sdi->conn;
102f1239 BV	307	serial_source_add(sdi->session, serial, G_IO_IN, 10,
102f1239 BV	308	hcs_receive_data, (void *)sdi);
b5e92647	309
8f4e922f UH	310	return SR_OK;
	311	}
	312
dd5c48a6	313	static struct sr_dev_driver manson_hcs_3xxx_driver_info = {
8f4e922f UH	314	.name = "manson-hcs-3xxx",
	315	.longname = "Manson HCS-3xxx",
	316	.api_version = 1,
c2fdcc25	317	.init = std_init,
700d6b64	318	.cleanup = std_cleanup,
8f4e922f	319	.scan = scan,
c01bf34c	320	.dev_list = std_dev_list,
f778bf02	321	.dev_clear = std_dev_clear,
8f4e922f UH	322	.config_get = config_get,
	323	.config_set = config_set,
	324	.config_list = config_list,
b5e92647 UH	325	.dev_open = std_serial_dev_open,
b5e92647 UH	326	.dev_close = std_serial_dev_close,
8f4e922f	327	.dev_acquisition_start = dev_acquisition_start,
4b1a9d5d	328	.dev_acquisition_stop = std_serial_dev_acquisition_stop,
41812aca	329	.context = NULL,
8f4e922f	330	};
dd5c48a6	331	SR_REGISTER_DEV_DRIVER(manson_hcs_3xxx_driver_info);