]> sigrok.org Git - libsigrok.git/blobdiff - src/hardware/arachnid-labs-re-load-pro/protocol.c
scpi-pps: Add support for Owon P4000 series.
[libsigrok.git] / src / hardware / arachnid-labs-re-load-pro / protocol.c
index 31c51581e4c7849551e5198c64bc5dc1222b6fbd..36785b2cf7eb89959e3c5d0f791d45b2d5a696ca 100644 (file)
@@ -22,7 +22,7 @@
 #include <string.h>
 #include "protocol.h"
 
-#define READ_TIMEOUT_MS 1000
+#define READ_TIMEOUT_MS 500
 
 static int send_cmd(const struct sr_dev_inst *sdi, const char *cmd,
                char *replybuf, int replybufsize)
@@ -66,55 +66,67 @@ static int send_cmd(const struct sr_dev_inst *sdi, const char *cmd,
 }
 
 SR_PRIV int reloadpro_set_current_limit(const struct sr_dev_inst *sdi,
-                                       float current)
+                                       float current_limit)
 {
+       struct dev_context *devc;
        int ret, ma;
        char buf[100];
        char *cmd;
 
-       if (current < 0 || current > 6) {
-               sr_err("The current limit must be 0-6 A (was %f A).", current);
+       devc = sdi->priv;
+
+       if (current_limit < 0 || current_limit > 6) {
+               sr_err("The current limit must be 0-6 A (was %f A).", current_limit);
                return SR_ERR_ARG;
        }
 
-       /* Hardware expects current in mA, integer (0..6000). */
-       ma = (int)round(current * 1000);
-
-       sr_spew("Setting current limit to %f A (%d mA).", current, ma);
+       /* Hardware expects current limit in mA, integer (0..6000). */
+       ma = (int)round(current_limit * 1000);
 
        cmd = g_strdup_printf("set %d\n", ma);
-       if ((ret = send_cmd(sdi, cmd, (char *)&buf, sizeof(buf))) < 0) {
+       g_mutex_lock(&devc->acquisition_mutex);
+       ret = send_cmd(sdi, cmd, (char *)&buf, sizeof(buf));
+       g_mutex_unlock(&devc->acquisition_mutex);
+       g_free(cmd);
+
+       if (ret < 0) {
                sr_err("Error sending current limit command: %d.", ret);
-               g_free(cmd);
                return SR_ERR;
        }
-       g_free(cmd);
-
        return SR_OK;
 }
 
 SR_PRIV int reloadpro_set_on_off(const struct sr_dev_inst *sdi, gboolean on)
 {
+       struct dev_context *devc;
        int ret;
        char buf[100];
        const char *cmd;
 
+       devc = sdi->priv;
+
        cmd = (on) ? "on\n" : "off\n";
-       if ((ret = send_cmd(sdi, cmd, (char *)&buf, sizeof(buf))) < 0) {
+       g_mutex_lock(&devc->acquisition_mutex);
+       ret = send_cmd(sdi, cmd, (char *)&buf, sizeof(buf));
+       g_mutex_unlock(&devc->acquisition_mutex);
+
+       if (ret < 0) {
                sr_err("Error sending on/off command: %d.", ret);
                return SR_ERR;
        }
-
        return SR_OK;
 }
 
 SR_PRIV int reloadpro_set_under_voltage_threshold(const struct sr_dev_inst *sdi,
                                        float voltage)
 {
+       struct dev_context *devc;
        int ret, mv;
        char buf[100];
        char *cmd;
 
+       devc = sdi->priv;
+
        if (voltage < 0 || voltage > 60) {
                sr_err("The under voltage threshold must be 0-60 V (was %f V).",
                        voltage);
@@ -127,56 +139,86 @@ SR_PRIV int reloadpro_set_under_voltage_threshold(const struct sr_dev_inst *sdi,
        sr_spew("Setting under voltage threshold to %f V (%d mV).", voltage, mv);
 
        cmd = g_strdup_printf("uvlo %d\n", mv);
-       if ((ret = send_cmd(sdi, cmd, (char *)&buf, sizeof(buf))) < 0) {
+       g_mutex_lock(&devc->acquisition_mutex);
+       ret = send_cmd(sdi, cmd, (char *)&buf, sizeof(buf));
+       g_mutex_unlock(&devc->acquisition_mutex);
+       g_free(cmd);
+
+       if (ret < 0) {
                sr_err("Error sending under voltage threshold command: %d.", ret);
-               g_free(cmd);
                return SR_ERR;
        }
-       g_free(cmd);
-
        return SR_OK;
 }
 
 SR_PRIV int reloadpro_get_current_limit(const struct sr_dev_inst *sdi,
-                                       float *current)
+                                       float *current_limit)
 {
+       struct dev_context *devc;
        int ret;
        char buf[100];
-       struct dev_context *devc;
+       gint64 end_time;
 
        devc = sdi->priv;
 
+       g_mutex_lock(&devc->acquisition_mutex);
        if ((ret = send_cmd(sdi, "set\n", (char *)&buf, sizeof(buf))) < 0) {
                sr_err("Error sending current limit query: %d.", ret);
                return SR_ERR;
        }
 
-       if (!devc->acquisition_running) {
-               /* Hardware sends current in mA, integer (0..6000). */
-               *current = g_ascii_strtod(buf + 4, NULL) / 1000;
+       if (devc->acquisition_running) {
+               end_time = g_get_monotonic_time () + 5 * G_TIME_SPAN_SECOND;
+               if (!g_cond_wait_until(&devc->current_limit_cond,
+                               &devc->acquisition_mutex, end_time)) {
+                       /* Timeout has passed. */
+                       g_mutex_unlock(&devc->acquisition_mutex);
+                       return SR_ERR;
+               }
+       } else {
+               /* Hardware sends current limit in mA, integer (0..6000). */
+               devc->current_limit = g_ascii_strtod(buf + 4, NULL) / 1000;
        }
+       g_mutex_unlock(&devc->acquisition_mutex);
+
+       if (current_limit)
+               *current_limit = devc->current_limit;
 
        return SR_OK;
 }
 
 SR_PRIV int reloadpro_get_under_voltage_threshold(const struct sr_dev_inst *sdi,
-                                       float *voltage)
+                                       float *uvc_threshold)
 {
+       struct dev_context *devc;
        int ret;
        char buf[100];
-       struct dev_context *devc;
+       gint64 end_time;
 
        devc = sdi->priv;
 
+       g_mutex_lock(&devc->acquisition_mutex);
        if ((ret = send_cmd(sdi, "uvlo\n", (char *)&buf, sizeof(buf))) < 0) {
                sr_err("Error sending under voltage threshold query: %d.", ret);
                return SR_ERR;
        }
 
-       if (!devc->acquisition_running) {
+       if (devc->acquisition_running) {
+               end_time = g_get_monotonic_time () + 5 * G_TIME_SPAN_SECOND;
+               if (!g_cond_wait_until(&devc->uvc_threshold_cond,
+                               &devc->acquisition_mutex, end_time)) {
+                       /* Timeout has passed. */
+                       g_mutex_unlock(&devc->acquisition_mutex);
+                       return SR_ERR;
+               }
+       } else {
                /* Hardware sends voltage in mV, integer (0..60000). */
-               *voltage = g_ascii_strtod(buf + 5, NULL) / 1000;
+               devc->uvc_threshold = g_ascii_strtod(buf + 5, NULL) / 1000;
        }
+       g_mutex_unlock(&devc->acquisition_mutex);
+
+       if (uvc_threshold)
+               *uvc_threshold = devc->uvc_threshold;
 
        return SR_OK;
 }
@@ -184,59 +226,47 @@ SR_PRIV int reloadpro_get_under_voltage_threshold(const struct sr_dev_inst *sdi,
 SR_PRIV int reloadpro_get_voltage_current(const struct sr_dev_inst *sdi,
                float *voltage, float *current)
 {
+       struct dev_context *devc;
        int ret;
        char buf[100];
        char **tokens;
-       struct dev_context *devc;
+       gint64 end_time;
 
        devc = sdi->priv;
 
+       g_mutex_lock(&devc->acquisition_mutex);
        if ((ret = send_cmd(sdi, "read\n", (char *)&buf, sizeof(buf))) < 0) {
                sr_err("Error sending voltage/current query: %d.", ret);
                return SR_ERR;
        }
 
-       if (!devc->acquisition_running) {
+       if (devc->acquisition_running) {
+               end_time = g_get_monotonic_time () + 5 * G_TIME_SPAN_SECOND;
+               if (!g_cond_wait_until(&devc->voltage_cond,
+                               &devc->acquisition_mutex, end_time)) {
+                       /* Timeout has passed. */
+                       g_mutex_unlock(&devc->acquisition_mutex);
+                       return SR_ERR;
+               }
+       } else {
                /* Reply: "read <current> <voltage>". */
                tokens = g_strsplit((const char *)&buf, " ", 3);
-               if (voltage)
-                       *voltage = g_ascii_strtod(tokens[2], NULL) / 1000;
-               if (current)
-                       *current = g_ascii_strtod(tokens[1], NULL) / 1000;
+               devc->voltage = g_ascii_strtod(tokens[2], NULL) / 1000;
+               devc->current = g_ascii_strtod(tokens[1], NULL) / 1000;
                g_strfreev(tokens);
        }
+       g_mutex_unlock(&devc->acquisition_mutex);
 
-       return SR_OK;
-}
+       if (voltage)
+               *voltage = devc->voltage;
+       if (current)
+               *current = devc->current;
 
-static int send_config_update_key(const struct sr_dev_inst *sdi,
-               uint32_t key, GVariant *var)
-{
-       struct sr_config *cfg;
-       struct sr_datafeed_packet packet;
-       struct sr_datafeed_meta meta;
-       int ret;
-
-       cfg = sr_config_new(key, var);
-       if (!cfg)
-               return SR_ERR;
-
-       memset(&meta, 0, sizeof(meta));
-
-       packet.type = SR_DF_META;
-       packet.payload = &meta;
-
-       meta.config = g_slist_append(meta.config, cfg);
-
-       ret = sr_session_send(sdi, &packet);
-       sr_config_free(cfg);
-
-       return ret;
+       return SR_OK;
 }
 
 static void handle_packet(const struct sr_dev_inst *sdi)
 {
-       float voltage, current;
        struct sr_datafeed_packet packet;
        struct sr_datafeed_analog analog;
        struct sr_analog_encoding encoding;
@@ -251,7 +281,7 @@ static void handle_packet(const struct sr_dev_inst *sdi)
        if (g_str_has_prefix((const char *)devc->buf, "overtemp")) {
                sr_warn("Overtemperature condition!");
                devc->otp_active = TRUE;
-               send_config_update_key(sdi, SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE,
+               sr_session_send_meta(sdi, SR_CONF_OVER_TEMPERATURE_PROTECTION_ACTIVE,
                        g_variant_new_boolean(TRUE));
                return;
        }
@@ -259,7 +289,7 @@ static void handle_packet(const struct sr_dev_inst *sdi)
        if (g_str_has_prefix((const char *)devc->buf, "undervolt")) {
                sr_warn("Undervoltage condition!");
                devc->uvc_active = TRUE;
-               send_config_update_key(sdi, SR_CONF_UNDER_VOLTAGE_CONDITION_ACTIVE,
+               sr_session_send_meta(sdi, SR_CONF_UNDER_VOLTAGE_CONDITION_ACTIVE,
                        g_variant_new_boolean(TRUE));
                return;
        }
@@ -271,26 +301,28 @@ static void handle_packet(const struct sr_dev_inst *sdi)
 
        if (g_str_has_prefix((const char *)devc->buf, "set ")) {
                tokens = g_strsplit((const char *)devc->buf, " ", 2);
-               current = g_ascii_strtod(tokens[1], NULL) / 1000;
+               devc->current_limit = g_ascii_strtod(tokens[1], NULL) / 1000;
                g_strfreev(tokens);
-               send_config_update_key(sdi, SR_CONF_CURRENT_LIMIT,
-                       g_variant_new_double(current));
+               g_cond_signal(&devc->current_limit_cond);
+               sr_session_send_meta(sdi, SR_CONF_CURRENT_LIMIT,
+                       g_variant_new_double(devc->current_limit));
                return;
        }
 
        if (g_str_has_prefix((const char *)devc->buf, "uvlo ")) {
                tokens = g_strsplit((const char *)devc->buf, " ", 2);
-               voltage = g_ascii_strtod(tokens[1], NULL) / 1000;
+               devc->uvc_threshold = g_ascii_strtod(tokens[1], NULL) / 1000;
                g_strfreev(tokens);
-               if (voltage == .0) {
-                       send_config_update_key(sdi, SR_CONF_UNDER_VOLTAGE_CONDITION,
+               g_cond_signal(&devc->uvc_threshold_cond);
+               if (devc->uvc_threshold == .0) {
+                       sr_session_send_meta(sdi, SR_CONF_UNDER_VOLTAGE_CONDITION,
                                g_variant_new_boolean(FALSE));
                } else {
-                       send_config_update_key(sdi, SR_CONF_UNDER_VOLTAGE_CONDITION,
+                       sr_session_send_meta(sdi, SR_CONF_UNDER_VOLTAGE_CONDITION,
                                g_variant_new_boolean(TRUE));
-                       send_config_update_key(sdi,
+                       sr_session_send_meta(sdi,
                                SR_CONF_UNDER_VOLTAGE_CONDITION_THRESHOLD,
-                               g_variant_new_double(voltage));
+                               g_variant_new_double(devc->uvc_threshold));
                }
                return;
        }
@@ -301,14 +333,13 @@ static void handle_packet(const struct sr_dev_inst *sdi)
        }
 
        tokens = g_strsplit((const char *)devc->buf, " ", 3);
-       voltage = g_ascii_strtod(tokens[2], NULL) / 1000;
-       current = g_ascii_strtod(tokens[1], NULL) / 1000;
+       devc->voltage = g_ascii_strtod(tokens[2], NULL) / 1000;
+       devc->current = g_ascii_strtod(tokens[1], NULL) / 1000;
        g_strfreev(tokens);
+       g_cond_signal(&devc->voltage_cond);
 
        /* Begin frame. */
-       packet.type = SR_DF_FRAME_BEGIN;
-       packet.payload = NULL;
-       sr_session_send(sdi, &packet);
+       std_session_send_df_frame_begin(sdi);
 
        sr_analog_init(&analog, &encoding, &meaning, &spec, 4);
 
@@ -323,7 +354,8 @@ static void handle_packet(const struct sr_dev_inst *sdi)
        meaning.mq = SR_MQ_VOLTAGE;
        meaning.mqflags = SR_MQFLAG_DC;
        meaning.unit = SR_UNIT_VOLT;
-       analog.data = &voltage;
+       encoding.digits = 3;
+       analog.data = &devc->voltage;
        sr_session_send(sdi, &packet);
        g_slist_free(l);
 
@@ -334,14 +366,13 @@ static void handle_packet(const struct sr_dev_inst *sdi)
        meaning.mq = SR_MQ_CURRENT;
        meaning.mqflags = SR_MQFLAG_DC;
        meaning.unit = SR_UNIT_AMPERE;
-       analog.data = &current;
+       encoding.digits = 3;
+       analog.data = &devc->current;
        sr_session_send(sdi, &packet);
        g_slist_free(l);
 
        /* End frame. */
-       packet.type = SR_DF_FRAME_END;
-       packet.payload = NULL;
-       sr_session_send(sdi, &packet);
+       std_session_send_df_frame_end(sdi);
 
        sr_sw_limits_update_samples_read(&devc->limits, 1);
 }
@@ -358,20 +389,25 @@ static void handle_new_data(const struct sr_dev_inst *sdi)
 
        len = RELOADPRO_BUFSIZE - devc->buflen;
        buf = devc->buf;
+       g_mutex_lock(&devc->acquisition_mutex);
        if (serial_readline(serial, &buf, &len, 250) != SR_OK) {
-               sr_err("Err: ");
+               g_mutex_unlock(&devc->acquisition_mutex);
                return;
        }
 
-       if (len == 0)
+       if (len == 0) {
+               g_mutex_unlock(&devc->acquisition_mutex);
                return; /* No new bytes, nothing to do. */
+       }
        if (len < 0) {
                sr_err("Serial port read error: %d.", len);
+               g_mutex_unlock(&devc->acquisition_mutex);
                return;
        }
        devc->buflen += len;
 
        handle_packet(sdi);
+       g_mutex_unlock(&devc->acquisition_mutex);
        memset(devc->buf, 0, RELOADPRO_BUFSIZE);
        devc->buflen = 0;
 }