2012-09-10 20:31:29 +00:00
|
|
|
/*
|
2013-04-23 20:24:30 +00:00
|
|
|
* This file is part of the libsigrok project.
|
2012-09-10 20:31:29 +00:00
|
|
|
*
|
|
|
|
* 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 <glib.h>
|
2012-09-11 18:11:13 +00:00
|
|
|
#include <sys/types.h>
|
|
|
|
#include <sys/stat.h>
|
|
|
|
#include <fcntl.h>
|
|
|
|
#include <string.h>
|
|
|
|
#include <errno.h>
|
2012-10-30 18:59:21 +00:00
|
|
|
#include "libsigrok.h"
|
|
|
|
#include "libsigrok-internal.h"
|
|
|
|
#include "fluke-dmm.h"
|
2012-09-10 20:31:29 +00:00
|
|
|
|
2013-03-30 18:29:44 +00:00
|
|
|
static const int32_t hwopts[] = {
|
2013-01-21 22:22:47 +00:00
|
|
|
SR_CONF_CONN,
|
|
|
|
SR_CONF_SERIALCOMM,
|
2012-09-17 14:31:15 +00:00
|
|
|
};
|
|
|
|
|
2013-03-30 18:29:44 +00:00
|
|
|
static const int32_t hwcaps[] = {
|
2013-01-21 22:22:47 +00:00
|
|
|
SR_CONF_MULTIMETER,
|
|
|
|
SR_CONF_LIMIT_SAMPLES,
|
|
|
|
SR_CONF_LIMIT_MSEC,
|
|
|
|
SR_CONF_CONTINUOUS,
|
2012-09-17 14:31:15 +00:00
|
|
|
};
|
|
|
|
|
2012-09-15 16:28:43 +00:00
|
|
|
SR_PRIV struct sr_dev_driver flukedmm_driver_info;
|
|
|
|
static struct sr_dev_driver *di = &flukedmm_driver_info;
|
2012-09-10 20:31:29 +00:00
|
|
|
|
2012-12-24 09:56:54 +00:00
|
|
|
static char *scan_conn[] = {
|
|
|
|
/* 287/289 */
|
|
|
|
"115200/8n1",
|
|
|
|
/* 187/189 */
|
|
|
|
"9600/8n1",
|
|
|
|
/* Scopemeter 190 series */
|
|
|
|
"1200/8n1",
|
|
|
|
NULL
|
|
|
|
};
|
|
|
|
|
2012-09-11 18:11:13 +00:00
|
|
|
static const struct flukedmm_profile supported_flukedmm[] = {
|
2012-12-24 09:40:04 +00:00
|
|
|
{ FLUKE_187, "187", 100, 1000 },
|
2014-03-05 09:04:17 +00:00
|
|
|
{ FLUKE_189, "189", 100, 1000 },
|
2012-12-24 09:40:04 +00:00
|
|
|
{ FLUKE_287, "287", 100, 1000 },
|
|
|
|
{ FLUKE_190, "199B", 1000, 3500 },
|
2012-09-11 18:11:13 +00:00
|
|
|
};
|
|
|
|
|
2013-05-10 17:37:54 +00:00
|
|
|
static int init(struct sr_context *sr_ctx)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2013-05-31 13:46:57 +00:00
|
|
|
return std_init(sr_ctx, di, LOG_PREFIX);
|
2012-09-10 20:31:29 +00:00
|
|
|
}
|
|
|
|
|
2012-09-17 13:40:41 +00:00
|
|
|
static GSList *fluke_scan(const char *conn, const char *serialcomm)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2012-09-11 18:11:13 +00:00
|
|
|
struct sr_dev_inst *sdi;
|
2012-09-10 20:31:29 +00:00
|
|
|
struct drv_context *drvc;
|
2012-09-11 18:11:13 +00:00
|
|
|
struct dev_context *devc;
|
|
|
|
struct sr_probe *probe;
|
2012-11-12 01:25:17 +00:00
|
|
|
struct sr_serial_dev_inst *serial;
|
2012-09-17 13:40:41 +00:00
|
|
|
GSList *devices;
|
2012-11-12 01:25:17 +00:00
|
|
|
int retry, len, i, s;
|
2012-09-16 19:07:17 +00:00
|
|
|
char buf[128], *b, **tokens;
|
2012-09-10 20:31:29 +00:00
|
|
|
|
2012-11-12 01:25:17 +00:00
|
|
|
if (!(serial = sr_serial_dev_inst_new(conn, serialcomm)))
|
2012-09-11 18:11:13 +00:00
|
|
|
return NULL;
|
2012-11-12 01:25:17 +00:00
|
|
|
|
2012-12-02 11:45:54 +00:00
|
|
|
if (serial_open(serial, SERIAL_RDWR | SERIAL_NONBLOCK) != SR_OK)
|
2012-09-11 18:11:13 +00:00
|
|
|
return NULL;
|
|
|
|
|
2012-09-17 13:40:41 +00:00
|
|
|
drvc = di->priv;
|
2012-09-16 19:07:17 +00:00
|
|
|
b = buf;
|
|
|
|
retry = 0;
|
2012-09-17 13:40:41 +00:00
|
|
|
devices = NULL;
|
2012-09-16 19:07:17 +00:00
|
|
|
/* We'll try the discovery sequence three times in case the device
|
|
|
|
* is not in an idle state when we send ID. */
|
|
|
|
while (!devices && retry < 3) {
|
|
|
|
retry++;
|
2012-11-12 01:25:17 +00:00
|
|
|
serial_flush(serial);
|
|
|
|
if (serial_write(serial, "ID\r", 3) == -1) {
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_err("Unable to send ID string: %s.",
|
|
|
|
strerror(errno));
|
2012-09-16 19:07:17 +00:00
|
|
|
continue;
|
|
|
|
}
|
2012-09-11 18:11:13 +00:00
|
|
|
|
2012-09-16 19:07:17 +00:00
|
|
|
/* Response is first a CMD_ACK byte (ASCII '0' for OK,
|
|
|
|
* or '1' to signify an error. */
|
|
|
|
len = 128;
|
2012-11-12 01:25:17 +00:00
|
|
|
serial_readline(serial, &b, &len, 150);
|
2012-09-16 19:07:17 +00:00
|
|
|
if (len != 1)
|
|
|
|
continue;
|
2012-09-17 13:40:41 +00:00
|
|
|
if (buf[0] != '0')
|
2012-09-16 19:07:17 +00:00
|
|
|
continue;
|
2012-09-11 18:11:13 +00:00
|
|
|
|
2012-09-16 19:07:17 +00:00
|
|
|
/* If CMD_ACK was OK, ID string follows. */
|
|
|
|
len = 128;
|
2012-12-24 09:56:54 +00:00
|
|
|
serial_readline(serial, &b, &len, 850);
|
2012-09-16 19:07:17 +00:00
|
|
|
if (len < 10)
|
|
|
|
continue;
|
2012-12-24 09:56:54 +00:00
|
|
|
if (strcspn(buf, ",") < 15)
|
|
|
|
/* Looks like it's comma-separated. */
|
|
|
|
tokens = g_strsplit(buf, ",", 3);
|
|
|
|
else
|
|
|
|
/* Fluke 199B, at least, uses semicolon. */
|
|
|
|
tokens = g_strsplit(buf, ";", 3);
|
2012-09-16 19:07:17 +00:00
|
|
|
if (!strncmp("FLUKE", tokens[0], 5)
|
|
|
|
&& tokens[1] && tokens[2]) {
|
|
|
|
for (i = 0; supported_flukedmm[i].model; i++) {
|
|
|
|
if (strcmp(supported_flukedmm[i].modelname, tokens[0] + 6))
|
|
|
|
continue;
|
|
|
|
/* Skip leading spaces in version number. */
|
|
|
|
for (s = 0; tokens[1][s] == ' '; s++);
|
|
|
|
if (!(sdi = sr_dev_inst_new(0, SR_ST_INACTIVE, "Fluke",
|
|
|
|
tokens[0] + 6, tokens[1] + s)))
|
|
|
|
return NULL;
|
|
|
|
if (!(devc = g_try_malloc0(sizeof(struct dev_context)))) {
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_err("Device context malloc failed.");
|
2012-09-16 19:07:17 +00:00
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
devc->profile = &supported_flukedmm[i];
|
2013-05-31 12:20:34 +00:00
|
|
|
sdi->inst_type = SR_INST_SERIAL;
|
2013-04-21 23:07:35 +00:00
|
|
|
sdi->conn = serial;
|
2012-09-16 19:07:17 +00:00
|
|
|
sdi->priv = devc;
|
|
|
|
sdi->driver = di;
|
|
|
|
if (!(probe = sr_probe_new(0, SR_PROBE_ANALOG, TRUE, "P1")))
|
|
|
|
return NULL;
|
|
|
|
sdi->probes = g_slist_append(sdi->probes, probe);
|
|
|
|
drvc->instances = g_slist_append(drvc->instances, sdi);
|
|
|
|
devices = g_slist_append(devices, sdi);
|
|
|
|
break;
|
2012-09-11 18:11:13 +00:00
|
|
|
}
|
|
|
|
}
|
2012-09-16 19:07:17 +00:00
|
|
|
g_strfreev(tokens);
|
2012-12-24 09:56:54 +00:00
|
|
|
if (devices)
|
|
|
|
/* Found one. */
|
|
|
|
break;
|
2012-09-11 18:11:13 +00:00
|
|
|
}
|
2012-11-12 01:25:17 +00:00
|
|
|
serial_close(serial);
|
|
|
|
if (!devices)
|
|
|
|
sr_serial_dev_inst_free(serial);
|
2012-09-10 20:31:29 +00:00
|
|
|
|
|
|
|
return devices;
|
|
|
|
}
|
|
|
|
|
2013-05-10 17:37:54 +00:00
|
|
|
static GSList *scan(GSList *options)
|
2012-09-17 13:40:41 +00:00
|
|
|
{
|
2013-01-06 16:41:30 +00:00
|
|
|
struct sr_config *src;
|
2012-09-17 13:40:41 +00:00
|
|
|
GSList *l, *devices;
|
2012-12-24 09:56:54 +00:00
|
|
|
int i;
|
2012-09-17 13:40:41 +00:00
|
|
|
const char *conn, *serialcomm;
|
|
|
|
|
|
|
|
conn = serialcomm = NULL;
|
|
|
|
for (l = options; l; l = l->next) {
|
2013-01-06 16:41:30 +00:00
|
|
|
src = l->data;
|
|
|
|
switch (src->key) {
|
2013-01-21 22:22:47 +00:00
|
|
|
case SR_CONF_CONN:
|
2013-03-30 18:29:44 +00:00
|
|
|
conn = g_variant_get_string(src->data, NULL);
|
2012-09-17 13:40:41 +00:00
|
|
|
break;
|
2013-01-21 22:22:47 +00:00
|
|
|
case SR_CONF_SERIALCOMM:
|
2013-03-30 18:29:44 +00:00
|
|
|
serialcomm = g_variant_get_string(src->data, NULL);
|
2012-09-17 13:40:41 +00:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (!conn)
|
|
|
|
return NULL;
|
|
|
|
|
|
|
|
if (serialcomm) {
|
|
|
|
/* Use the provided comm specs. */
|
|
|
|
devices = fluke_scan(conn, serialcomm);
|
|
|
|
} else {
|
2012-12-24 09:56:54 +00:00
|
|
|
for (i = 0; scan_conn[i]; i++) {
|
|
|
|
if ((devices = fluke_scan(conn, scan_conn[i])))
|
|
|
|
break;
|
|
|
|
/* The Scopemeter 199B, at least, requires this
|
|
|
|
* after all the 115k/9.6k confusion. */
|
|
|
|
g_usleep(5000);
|
|
|
|
}
|
2012-09-17 13:40:41 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
return devices;
|
|
|
|
}
|
|
|
|
|
2013-05-10 17:37:54 +00:00
|
|
|
static GSList *dev_list(void)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2013-02-02 18:52:26 +00:00
|
|
|
return ((struct drv_context *)(di->priv))->instances;
|
2012-09-10 20:31:29 +00:00
|
|
|
}
|
|
|
|
|
2013-05-10 17:37:54 +00:00
|
|
|
static int cleanup(void)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2014-02-26 20:37:18 +00:00
|
|
|
return std_dev_clear(di, NULL);
|
2012-09-10 20:31:29 +00:00
|
|
|
}
|
|
|
|
|
2013-04-20 00:00:49 +00:00
|
|
|
static int config_set(int id, GVariant *data, const struct sr_dev_inst *sdi,
|
2014-03-20 20:58:01 +00:00
|
|
|
const struct sr_channel_group *cg)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2012-09-17 14:31:15 +00:00
|
|
|
struct dev_context *devc;
|
2012-09-10 20:31:29 +00:00
|
|
|
|
2014-03-20 20:58:01 +00:00
|
|
|
(void)cg;
|
2013-04-20 00:00:49 +00:00
|
|
|
|
2012-09-10 20:31:29 +00:00
|
|
|
if (sdi->status != SR_ST_ACTIVE)
|
2013-04-23 13:14:42 +00:00
|
|
|
return SR_ERR_DEV_CLOSED;
|
2012-09-10 20:31:29 +00:00
|
|
|
|
2012-09-17 14:31:15 +00:00
|
|
|
if (!(devc = sdi->priv)) {
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_err("sdi->priv was NULL.");
|
2012-09-17 14:31:15 +00:00
|
|
|
return SR_ERR_BUG;
|
|
|
|
}
|
|
|
|
|
2013-01-24 18:19:09 +00:00
|
|
|
switch (id) {
|
2013-01-21 22:22:47 +00:00
|
|
|
case SR_CONF_LIMIT_MSEC:
|
2012-09-17 14:31:15 +00:00
|
|
|
/* TODO: not yet implemented */
|
2013-03-30 18:29:44 +00:00
|
|
|
if (g_variant_get_uint64(data) == 0) {
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_err("LIMIT_MSEC can't be 0.");
|
2012-09-17 14:31:15 +00:00
|
|
|
return SR_ERR;
|
|
|
|
}
|
2013-03-30 18:29:44 +00:00
|
|
|
devc->limit_msec = g_variant_get_uint64(data);
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_dbg("Setting time limit to %" PRIu64 "ms.",
|
2012-09-17 14:31:15 +00:00
|
|
|
devc->limit_msec);
|
|
|
|
break;
|
2013-01-21 22:22:47 +00:00
|
|
|
case SR_CONF_LIMIT_SAMPLES:
|
2013-03-30 18:29:44 +00:00
|
|
|
devc->limit_samples = g_variant_get_uint64(data);
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_dbg("Setting sample limit to %" PRIu64 ".",
|
2012-09-17 14:31:15 +00:00
|
|
|
devc->limit_samples);
|
|
|
|
break;
|
2012-09-10 20:31:29 +00:00
|
|
|
default:
|
2013-04-16 00:33:03 +00:00
|
|
|
return SR_ERR_NA;
|
2012-09-10 20:31:29 +00:00
|
|
|
}
|
|
|
|
|
2012-09-17 14:31:15 +00:00
|
|
|
return SR_OK;
|
2012-09-10 20:31:29 +00:00
|
|
|
}
|
|
|
|
|
2013-04-20 00:00:49 +00:00
|
|
|
static int config_list(int key, GVariant **data, const struct sr_dev_inst *sdi,
|
2014-03-20 20:58:01 +00:00
|
|
|
const struct sr_channel_group *cg)
|
2013-01-25 01:32:05 +00:00
|
|
|
{
|
|
|
|
(void)sdi;
|
2014-03-20 20:58:01 +00:00
|
|
|
(void)cg;
|
2013-01-25 01:32:05 +00:00
|
|
|
|
|
|
|
switch (key) {
|
2013-01-25 14:09:20 +00:00
|
|
|
case SR_CONF_SCAN_OPTIONS:
|
2013-03-30 18:29:44 +00:00
|
|
|
*data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
|
|
|
|
hwopts, ARRAY_SIZE(hwopts), sizeof(int32_t));
|
2013-01-25 14:09:20 +00:00
|
|
|
break;
|
2013-01-25 14:01:49 +00:00
|
|
|
case SR_CONF_DEVICE_OPTIONS:
|
2013-03-30 18:29:44 +00:00
|
|
|
*data = g_variant_new_fixed_array(G_VARIANT_TYPE_INT32,
|
|
|
|
hwcaps, ARRAY_SIZE(hwcaps), sizeof(int32_t));
|
2013-01-25 14:01:49 +00:00
|
|
|
break;
|
2013-01-25 01:32:05 +00:00
|
|
|
default:
|
2013-04-16 00:33:03 +00:00
|
|
|
return SR_ERR_NA;
|
2013-01-25 01:32:05 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
return SR_OK;
|
|
|
|
}
|
|
|
|
|
2013-05-10 17:37:54 +00:00
|
|
|
static int dev_acquisition_start(const struct sr_dev_inst *sdi, void *cb_data)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2012-09-17 14:31:15 +00:00
|
|
|
struct dev_context *devc;
|
2013-04-21 23:07:35 +00:00
|
|
|
struct sr_serial_dev_inst *serial;
|
2012-09-17 14:31:15 +00:00
|
|
|
|
2013-04-23 13:14:42 +00:00
|
|
|
if (sdi->status != SR_ST_ACTIVE)
|
|
|
|
return SR_ERR_DEV_CLOSED;
|
|
|
|
|
2012-09-17 14:31:15 +00:00
|
|
|
if (!(devc = sdi->priv)) {
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_err("sdi->priv was NULL.");
|
2012-09-17 14:31:15 +00:00
|
|
|
return SR_ERR_BUG;
|
|
|
|
}
|
|
|
|
|
|
|
|
devc->cb_data = cb_data;
|
|
|
|
|
|
|
|
/* Send header packet to the session bus. */
|
2013-05-03 19:59:32 +00:00
|
|
|
std_session_send_df_header(cb_data, LOG_PREFIX);
|
2012-09-10 20:31:29 +00:00
|
|
|
|
2012-09-17 14:31:15 +00:00
|
|
|
/* Poll every 100ms, or whenever some data comes in. */
|
2013-04-21 23:07:35 +00:00
|
|
|
serial = sdi->conn;
|
2013-11-30 12:54:02 +00:00
|
|
|
serial_source_add(serial, G_IO_IN, 50, fluke_receive_data, (void *)sdi);
|
2012-09-25 17:38:59 +00:00
|
|
|
|
2013-04-21 23:07:35 +00:00
|
|
|
if (serial_write(serial, "QM\r", 3) == -1) {
|
2012-10-30 17:48:33 +00:00
|
|
|
sr_err("Unable to send QM: %s.", strerror(errno));
|
2012-09-25 17:38:59 +00:00
|
|
|
return SR_ERR;
|
|
|
|
}
|
|
|
|
devc->cmd_sent_at = g_get_monotonic_time() / 1000;
|
|
|
|
devc->expect_response = TRUE;
|
2012-09-10 20:31:29 +00:00
|
|
|
|
|
|
|
return SR_OK;
|
|
|
|
}
|
|
|
|
|
2013-05-10 17:37:54 +00:00
|
|
|
static int dev_acquisition_stop(struct sr_dev_inst *sdi, void *cb_data)
|
2012-09-10 20:31:29 +00:00
|
|
|
{
|
2013-12-07 19:39:55 +00:00
|
|
|
return std_serial_dev_acquisition_stop(sdi, cb_data, std_serial_dev_close,
|
2013-05-31 13:46:57 +00:00
|
|
|
sdi->conn, LOG_PREFIX);
|
2012-09-10 20:31:29 +00:00
|
|
|
}
|
|
|
|
|
2012-09-15 16:28:43 +00:00
|
|
|
SR_PRIV struct sr_dev_driver flukedmm_driver_info = {
|
2012-09-10 20:31:29 +00:00
|
|
|
.name = "fluke-dmm",
|
|
|
|
.longname = "Fluke 18x/28x series DMMs",
|
|
|
|
.api_version = 1,
|
2013-05-10 17:37:54 +00:00
|
|
|
.init = init,
|
|
|
|
.cleanup = cleanup,
|
|
|
|
.scan = scan,
|
|
|
|
.dev_list = dev_list,
|
2014-02-26 20:37:18 +00:00
|
|
|
.dev_clear = NULL,
|
2013-02-06 21:35:24 +00:00
|
|
|
.config_get = NULL,
|
2013-01-24 18:19:09 +00:00
|
|
|
.config_set = config_set,
|
2013-01-25 01:32:05 +00:00
|
|
|
.config_list = config_list,
|
2013-12-07 20:36:27 +00:00
|
|
|
.dev_open = std_serial_dev_open,
|
2013-12-07 18:47:43 +00:00
|
|
|
.dev_close = std_serial_dev_close,
|
2013-05-10 17:37:54 +00:00
|
|
|
.dev_acquisition_start = dev_acquisition_start,
|
|
|
|
.dev_acquisition_stop = dev_acquisition_stop,
|
2012-09-10 20:31:29 +00:00
|
|
|
.priv = NULL,
|
|
|
|
};
|