*/
#include <config.h>
+#include <scpi.h>
+#include <string.h>
#include "protocol.h"
+static const uint32_t scanopts[] = {
+ SR_CONF_CONN,
+};
+
+static const uint32_t drvopts[] = {
+ SR_CONF_MULTIMETER,
+};
+
+static const uint32_t devopts[] = {
+ SR_CONF_CONTINUOUS | SR_CONF_SET,
+ SR_CONF_LIMIT_SAMPLES | SR_CONF_SET,
+ SR_CONF_MEASURED_QUANTITY | SR_CONF_SET,
+ SR_CONF_ADC_POWERLINE_CYCLES | SR_CONF_SET | SR_CONF_GET,
+};
+
SR_PRIV struct sr_dev_driver hp_3457a_driver_info;
-static int init(struct sr_dev_driver *di, struct sr_context *sr_ctx)
+static int create_front_channel(struct sr_dev_inst *sdi, int chan_idx)
{
- return std_init(sr_ctx, di, LOG_PREFIX);
+ struct sr_channel *channel;
+ struct sr_channel_group *front;
+
+ channel = sr_channel_new(sdi, chan_idx++, SR_CHANNEL_ANALOG,
+ TRUE, "Front");
+
+ front = g_malloc0(sizeof(*front));
+ front->name = g_strdup("Front");
+ front->channels = g_slist_append(front->channels, channel);
+ sdi->channel_groups = g_slist_append(sdi->channel_groups, front);
+
+ return chan_idx;
}
-static GSList *scan(struct sr_dev_driver *di, GSList *options)
+static int create_rear_channels(struct sr_dev_inst *sdi, int chan_idx,
+ const struct rear_card_info *card)
+{
+ (void) sdi;
+
+ /* When card is NULL, we couldn't identify the type of card. */
+ if (!card)
+ return chan_idx;
+
+ /* TODO: Create channel descriptor for plug-in cards here. */
+ return chan_idx;
+}
+
+static gchar *get_revision(struct sr_scpi_dev_inst *scpi)
{
- struct drv_context *drvc;
- GSList *devices;
+ int ret, major, minor;
+ GArray *rev_numbers;
+
+ /* Report a version of '0.0' if we can't parse the response. */
+ major = minor = 0;
+
+ ret = sr_scpi_get_floatv(scpi, "REV?", &rev_numbers);
+ if ((ret == SR_OK) && (rev_numbers->len >= 2)) {
+ major = (int)g_array_index(rev_numbers, float, 0);
+ minor = (int)g_array_index(rev_numbers, float, 1);
+ }
- (void)options;
+ g_array_free(rev_numbers, TRUE);
- devices = NULL;
- drvc = di->context;
- drvc->instances = NULL;
+ return g_strdup_printf("%d.%d", major, minor);
+}
- /* TODO: scan for devices, either based on a SR_CONF_CONN option
- * or on a USB scan. */
+static struct sr_dev_inst *probe_device(struct sr_scpi_dev_inst *scpi)
+{
+ int ret, idx;
+ char *response;
+ struct sr_dev_inst *sdi;
+ struct dev_context *devc;
+
+ /*
+ * This command ensures we receive an EOI after every response, so that
+ * we don't wait the entire timeout after the response is received.
+ */
+ if (sr_scpi_send(scpi, "END ALWAYS") != SR_OK)
+ return NULL;
+
+ ret = sr_scpi_get_string(scpi, "ID?", &response);
+ if ((ret != SR_OK) || !response)
+ return NULL;
+
+ if (strcmp(response, "HP3457A"))
+ return NULL;
+
+ g_free(response);
+
+ devc = g_malloc0(sizeof(struct dev_context));
+ sdi = g_malloc0(sizeof(struct sr_dev_inst));
+ sdi->vendor = g_strdup("Hewlett-Packard");
+ sdi->model = g_strdup("3457A");
+ sdi->version = get_revision(scpi);
+ sdi->conn = scpi;
+ sdi->driver = &hp_3457a_driver_info;
+ sdi->inst_type = SR_INST_SCPI;
+ sdi->priv = devc;
+
+ /* There is no way to probe the measurement mode. It must be set. */
+ devc->measurement_mq = 0;
+ devc->measurement_unit = 0;
+
+ /* Probe rear card option and create channels accordingly (TODO). */
+ devc->rear_card = hp_3457a_probe_rear_card(scpi);
+ idx = 0;
+ idx = create_front_channel(sdi, idx);
+ create_rear_channels(sdi, idx, devc->rear_card);
+
+ return sdi;
+}
- return devices;
+static int init(struct sr_dev_driver *di, struct sr_context *sr_ctx)
+{
+ return std_init(sr_ctx, di, LOG_PREFIX);
+}
+
+static GSList *scan(struct sr_dev_driver *di, GSList *options)
+{
+ return sr_scpi_scan(di->context, options, probe_device);
}
static GSList *dev_list(const struct sr_dev_driver *di)
return std_dev_clear(di, NULL);
}
+/*
+ * We need to set the HP 3457A to a known state, and there are quite a number
+ * of knobs to tweak. Here's a brief explanation of what's going on. For more
+ * details, print out and consult the user manual.
+ * PRESET
+ * Set the instrument to a pre-determined state. This is easier and faster
+ * than sending a few dozen commands. Some of the PRESET defaults include
+ * ASCII output format, and synchronous triggering. See user manual for
+ * more details.
+ *
+ * After the PRESET command, the instrument is in a known state, and only those
+ * parameters for which the default is unsuitable are modified:
+ * INBUF ON
+ * Enable the HP-IB input buffer. This allows the instrument to release the
+ * HP-IB bus before processing the command, and increases throughput on
+ * GPIB buses with more than one device.
+ * TRIG HOLD
+ * Do not trigger new measurements until instructed to do so.
+ */
static int dev_open(struct sr_dev_inst *sdi)
{
- (void)sdi;
+ struct sr_scpi_dev_inst *scpi = sdi->conn;
+ struct dev_context *devc;
+
+ if (sr_scpi_open(scpi) != SR_OK)
+ return SR_ERR;
- /* TODO: get handle from sdi->conn and open it. */
+ devc=sdi->priv;
+
+ sr_scpi_send(scpi, "PRESET");
+ sr_scpi_send(scpi, "INBUF ON");
+ sr_scpi_send(scpi, "TRIG HOLD");
+ sr_scpi_get_float(scpi, "NPLC?", &devc->nplc);
sdi->status = SR_ST_ACTIVE;
static int dev_close(struct sr_dev_inst *sdi)
{
- (void)sdi;
+ struct sr_scpi_dev_inst *scpi = sdi->conn;
+
+ if (sdi->status != SR_ST_ACTIVE)
+ return SR_ERR_DEV_CLOSED;
- /* TODO: get handle from sdi->conn and close it. */
+ /* Switch back to auto-triggering. */
+ sr_scpi_send(scpi, "TRIG AUTO");
+
+ sr_scpi_close(scpi);
sdi->status = SR_ST_INACTIVE;
static int cleanup(const struct sr_dev_driver *di)
{
- dev_clear(di);
-
- /* TODO: free other driver resources, if any. */
-
- return SR_OK;
+ return dev_clear(di);
}
static int config_get(uint32_t key, GVariant **data,
const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
{
int ret;
+ struct dev_context *devc;
- (void)sdi;
- (void)data;
(void)cg;
+ devc = sdi->priv;
+
ret = SR_OK;
switch (key) {
- /* TODO */
+ case SR_CONF_ADC_POWERLINE_CYCLES:
+ *data = g_variant_new_double(devc->nplc);
+ break;
default:
return SR_ERR_NA;
}
}
static int config_set(uint32_t key, GVariant *data,
- const struct sr_dev_inst *sdi, const struct sr_channel_group *cg)
+ const struct sr_dev_inst *sdi,
+ const struct sr_channel_group *cg)
{
int ret;
+ enum sr_mq mq;
+ struct dev_context *devc;
+ GVariant *tuple_child;
- (void)data;
(void)cg;
if (sdi->status != SR_ST_ACTIVE)
return SR_ERR_DEV_CLOSED;
+ devc = sdi->priv;
+
ret = SR_OK;
switch (key) {
- /* TODO */
+ case SR_CONF_LIMIT_SAMPLES:
+ devc->limit_samples = g_variant_get_uint64(data);
+ break;
+ case SR_CONF_MEASURED_QUANTITY:
+ tuple_child = g_variant_get_child_value(data, 0);
+ mq = g_variant_get_uint32(tuple_child);
+ ret = hp_3457a_set_mq(sdi, mq);
+ g_variant_unref(tuple_child);
+ break;
+ case SR_CONF_ADC_POWERLINE_CYCLES:
+ ret = hp_3457a_set_nplc(sdi, g_variant_get_double(data));
+ break;
default:
ret = SR_ERR_NA;
}
{
int ret;
- (void)sdi;
- (void)data;
- (void)cg;
+ if (key == SR_CONF_SCAN_OPTIONS) {
+ *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
+ scanopts, ARRAY_SIZE(scanopts), sizeof(uint32_t));
+ return SR_OK;
+ } else if ((key == SR_CONF_DEVICE_OPTIONS) && !sdi) {
+ *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
+ drvopts, ARRAY_SIZE(drvopts), sizeof(uint32_t));
+ return SR_OK;
+ } else if ((key == SR_CONF_DEVICE_OPTIONS) && !cg) {
+ *data = g_variant_new_fixed_array(G_VARIANT_TYPE_UINT32,
+ devopts, ARRAY_SIZE(devopts), sizeof(uint32_t));
+ return SR_OK;
+ }
+
+ /* From here on, we're only concerned with channel group config. */
+ if (!cg)
+ return SR_ERR_NA;
+
+ /*
+ * TODO: Implement channel group configuration when adding support for
+ * plug-in cards.
+ */
ret = SR_OK;
switch (key) {
- /* TODO */
default:
- return SR_ERR_NA;
+ ret = SR_ERR_NA;
}
return ret;
}
+/*
+ * TRIG SGL
+ * Trigger the first measurement, then hold. We can't let the instrument
+ * auto-trigger because we read several registers to make a complete
+ * reading. If the instrument were auto-triggering, we could get the
+ * reading for sample N, but a new measurement is made and when we read the
+ * HIRES register, it contains data for sample N+1. This would produce
+ * wrong readings.
+ */
static int dev_acquisition_start(const struct sr_dev_inst *sdi, void *cb_data)
{
- (void)sdi;
+ int ret;
+ struct sr_scpi_dev_inst *scpi;
+ struct dev_context *devc;
+
(void)cb_data;
if (sdi->status != SR_ST_ACTIVE)
return SR_ERR_DEV_CLOSED;
- /* TODO: configure hardware, reset acquisition state, set up
- * callbacks and send header packet. */
+ scpi = sdi->conn;
+ devc = sdi->priv;
+
+ ret = sr_scpi_source_add(sdi->session, scpi, G_IO_IN, 100,
+ hp_3457a_receive_data, (void *)sdi);
+ if (ret != SR_OK)
+ return ret;
+
+ std_session_send_df_header(sdi, LOG_PREFIX);
+
+ /* Start first measurement. */
+ sr_scpi_send(scpi, "TRIG SGL");
+ devc->acq_state = ACQ_TRIGGERED_MEASUREMENT;
+ devc->num_samples = 0;
return SR_OK;
}
if (sdi->status != SR_ST_ACTIVE)
return SR_ERR_DEV_CLOSED;
- /* TODO: stop acquisition. */
-
return SR_OK;
}
projects / libsigrok.git / blobdiff