]> sigrok.org Git - libsigrok.git/blobdiff - output/gnuplot.c
build: Portability fixes.
[libsigrok.git] / output / gnuplot.c
index a2124bb16e0218d29add9f1e7612297de2e33add..a9feec67ba056f2f55daeed75990fca6eb1619e9 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * This file is part of the sigrok project.
+ * This file is part of the libsigrok project.
  *
  * Copyright (C) 2010 Uwe Hermann <uwe@hermann-uwe.de>
  *
 #include <stdlib.h>
 #include <string.h>
 #include <glib.h>
-#include "config.h"
+#include "config.h" /* Needed for PACKAGE_STRING and others. */
 #include "libsigrok.h"
 #include "libsigrok-internal.h"
 
+#define LOG_PREFIX "output/gnuplot"
+
 struct context {
-       unsigned int num_enabled_probes;
-       unsigned int unitsize;
-       char *probelist[SR_MAX_NUM_PROBES + 1];
-       char *header;
+       unsigned int num_enabled_channels;
+       uint64_t samplerate;
+       uint64_t samplecount;
+       gboolean header_done;
+       uint8_t *prevsample;
+       int *channel_index;
 };
 
-#define MAX_HEADER_LEN \
-       (1024 + (SR_MAX_NUM_PROBES * (SR_MAX_PROBENAME_LEN + 10)))
-
 static const char *gnuplot_header = "\
-# Sample data in space-separated columns format usable by gnuplot\n\
-#\n\
-# Generated by: %s on %s%s\
-# Period: %s\n\
-#\n\
-# Column\tProbe\n\
-# -------------------------------------\
-----------------------------------------\n\
-# 0\t\tSample counter (for internal gnuplot purposes)\n%s\n";
-
-static const char *gnuplot_header_comment = "\
-# Comment: Acquisition with %d/%d probes at %s\n";
+# Sample data in space-separated columns format usable by gnuplot.\n";
+static const char *gnuplot_header2 = "\
+#\n# Column\tChannel\n\
+# -----------------------------------------------------------------------------\n\
+# 0\t\tSample counter (for internal gnuplot purposes)\n";
+
 
 static int init(struct sr_output *o)
 {
        struct context *ctx;
-       struct sr_probe *probe;
+       struct sr_channel *ch;
        GSList *l;
-       uint64_t *samplerate;
        unsigned int i;
-       int b, num_probes;
-       char *c, *frequency_s;
-       char wbuf[1000], comment[128];
-       time_t t;
-
-       if (!o) {
-               sr_err("gnuplot out: %s: o was NULL", __func__);
-               return SR_ERR_ARG;
-       }
-
-       if (!o->sdi) {
-               sr_err("gnuplot out: %s: o->sdi was NULL", __func__);
-               return SR_ERR_ARG;
-       }
 
-       if (!o->sdi->driver) {
-               sr_err("gnuplot out: %s: o->sdi->driver was NULL", __func__);
+       if (!o || !o->sdi)
                return SR_ERR_ARG;
-       }
-
-       if (!(ctx = g_try_malloc0(sizeof(struct context)))) {
-               sr_err("gnuplot out: %s: ctx malloc failed", __func__);
-               return SR_ERR_MALLOC;
-       }
-
-       if (!(ctx->header = g_try_malloc0(MAX_HEADER_LEN + 1))) {
-               sr_err("gnuplot out: %s: ctx->header malloc failed", __func__);
-               g_free(ctx);
-               return SR_ERR_MALLOC;
-       }
 
+       ctx = g_malloc0(sizeof(struct context));
        o->internal = ctx;
-       ctx->num_enabled_probes = 0;
-       for (l = o->sdi->probes; l; l = l->next) {
-               probe = l->data; /* TODO: Error checks. */
-               if (!probe->enabled)
+       ctx->num_enabled_channels = 0;
+       for (l = o->sdi->channels; l; l = l->next) {
+               ch = l->data;
+               if (ch->type != SR_CHANNEL_LOGIC)
                        continue;
-               ctx->probelist[ctx->num_enabled_probes++] = probe->name;
-       }
-       ctx->probelist[ctx->num_enabled_probes] = 0;
-       ctx->unitsize = (ctx->num_enabled_probes + 7) / 8;
-
-       num_probes = g_slist_length(o->sdi->probes);
-       comment[0] = '\0';
-       if (sr_dev_has_hwcap(o->sdi, SR_HWCAP_SAMPLERATE)) {
-               o->sdi->driver->info_get(SR_DI_CUR_SAMPLERATE,
-                               (const void **)&samplerate, o->sdi);
-               if (!(frequency_s = sr_samplerate_string(*samplerate))) {
-                       sr_err("gnuplot out: %s: sr_samplerate_string failed",
-                              __func__);
-                       g_free(ctx->header);
-                       g_free(ctx);
-                       return SR_ERR;
-               }
-               snprintf(comment, 127, gnuplot_header_comment,
-                       ctx->num_enabled_probes, num_probes, frequency_s);
-               g_free(frequency_s);
-       }
-
-       /* Columns / channels */
-       wbuf[0] = '\0';
-       for (i = 0; i < ctx->num_enabled_probes; i++) {
-               c = (char *)&wbuf + strlen((const char *)&wbuf);
-               sprintf(c, "# %d\t\t%s\n", i + 1, ctx->probelist[i]);
+               if (!ch->enabled)
+                       continue;
+               ctx->num_enabled_channels++;
        }
-
-       if (!(frequency_s = sr_period_string(*samplerate))) {
-               sr_err("gnuplot out: %s: sr_period_string failed", __func__);
-               g_free(ctx->header);
-               g_free(ctx);
+       if (ctx->num_enabled_channels <= 0) {
+               sr_err("No logic channel enabled.");
                return SR_ERR;
        }
+       ctx->channel_index = g_malloc(sizeof(int) * ctx->num_enabled_channels);
 
-       t = time(NULL);
-       b = snprintf(ctx->header, MAX_HEADER_LEN, gnuplot_header,
-                    PACKAGE_STRING, ctime(&t), comment, frequency_s,
-                    (char *)&wbuf);
-       g_free(frequency_s);
-
-       if (b < 0) {
-               sr_err("gnuplot out: %s: sprintf failed", __func__);
-               g_free(ctx->header);
-               g_free(ctx);
-               return SR_ERR;
+       /* Once more to map the enabled channels. */
+       for (i = 0, l = o->sdi->channels; l; l = l->next) {
+               ch = l->data;
+               if (ch->type != SR_CHANNEL_LOGIC)
+                       continue;
+               if (!ch->enabled)
+                       continue;
+               ctx->channel_index[i++] = ch->index;
        }
 
-       return 0;
+       return SR_OK;
 }
 
-static int event(struct sr_output *o, int event_type, uint8_t **data_out,
-                uint64_t *length_out)
+static GString *gen_header(struct sr_output *o)
 {
-       if (!o) {
-               sr_err("gnuplot out: %s: o was NULL", __func__);
-               return SR_ERR_ARG;
-       }
+       struct context *ctx;
+       struct sr_channel *ch;
+       GVariant *gvar;
+       GString *header;
+       time_t t;
+       unsigned int num_channels, i;
+       char *samplerate_s;
 
-       if (!data_out) {
-               sr_err("gnuplot out: %s: data_out was NULL", __func__);
-               return SR_ERR_ARG;
+       ctx = o->internal;
+       if (ctx->samplerate == 0) {
+               if (sr_config_get(o->sdi->driver, o->sdi, NULL, SR_CONF_SAMPLERATE,
+                               &gvar) == SR_OK) {
+                       ctx->samplerate = g_variant_get_uint64(gvar);
+                       g_variant_unref(gvar);
+               }
        }
 
-       if (!length_out) {
-               sr_err("gnuplot out: %s: length_out was NULL", __func__);
-               return SR_ERR_ARG;
-       }
+       t = time(NULL);
+       header = g_string_sized_new(512);
+       g_string_printf(header, "%s", gnuplot_header);
+       g_string_append_printf(header, "# Generated by %s on %s",
+                       PACKAGE_STRING, ctime(&t));
 
-       switch (event_type) {
-       case SR_DF_TRIGGER:
-               /* TODO: Can a trigger mark be in a gnuplot data file? */
-               break;
-       case SR_DF_END:
-               g_free(o->internal);
-               o->internal = NULL;
-               break;
-       default:
-               sr_err("gnuplot out: %s: unsupported event type: %d",
-                      __func__, event_type);
-               break;
+       num_channels = g_slist_length(o->sdi->channels);
+       g_string_append_printf(header, "# Acquisition with %d/%d channels",
+                       ctx->num_enabled_channels, num_channels);
+       if (ctx->samplerate != 0) {
+               samplerate_s = sr_samplerate_string(ctx->samplerate);
+               g_string_append_printf(header, " at %s", samplerate_s);
+               g_free(samplerate_s);
        }
+       g_string_append_printf(header, "\n");
 
-       *data_out = NULL;
-       *length_out = 0;
+       g_string_append_printf(header, "%s", gnuplot_header2);
 
-       return SR_OK;
+       /* Columns / channels */
+       for (i = 0; i < ctx->num_enabled_channels; i++) {
+               ch = g_slist_nth_data(o->sdi->channels, ctx->channel_index[i]);
+               g_string_append_printf(header, "# %d\t\t%s\n", i + 1, ch->name);
+       }
+
+       return header;
 }
 
-static int data(struct sr_output *o, const uint8_t *data_in,
-               uint64_t length_in, uint8_t **data_out, uint64_t *length_out)
+static int receive(struct sr_output *o, const struct sr_datafeed_packet *packet,
+               GString **out)
 {
+       const struct sr_datafeed_meta *meta;
+       const struct sr_datafeed_logic *logic;
+       const struct sr_config *src;
+       GSList *l;
        struct context *ctx;
-       unsigned int max_linelen, outsize, p, curbit, i;
-       uint64_t sample;
-       static uint64_t samplecount = 0, old_sample = 0;
-       uint8_t *outbuf, *c;
+       const uint8_t *sample;
+       unsigned int curbit, p, idx, i;
 
-       if (!o) {
-               sr_err("gnuplot out: %s: o was NULL", __func__);
-               return SR_ERR_ARG;
-       }
+       *out = NULL;
+       if (!o || !o->internal)
+               return SR_ERR_BUG;
+       ctx = o->internal;
 
-       if (!o->internal) {
-               sr_err("gnuplot out: %s: o->internal was NULL", __func__);
-               return SR_ERR_ARG;
+       if (packet->type == SR_DF_META) {
+               meta = packet->payload;
+               for (l = meta->config; l; l = l->next) {
+                       src = l->data;
+                       if (src->key != SR_CONF_SAMPLERATE)
+                               continue;
+                       ctx->samplerate = g_variant_get_uint64(src->data);
+               }
        }
 
-       if (!data_in) {
-               sr_err("gnuplot out: %s: data_in was NULL", __func__);
-               return SR_ERR_ARG;
-       }
+       if (packet->type != SR_DF_LOGIC)
+               return SR_OK;
+       logic = packet->payload;
 
-       if (!data_out) {
-               sr_err("gnuplot out: %s: data_out was NULL", __func__);
-               return SR_ERR_ARG;
+       if (!ctx->prevsample) {
+               /* Can't allocate this until we know the stream's unitsize. */
+               ctx->prevsample = g_malloc0(logic->unitsize);
        }
 
-       if (!length_out) {
-               sr_err("gnuplot out: %s: length_out was NULL", __func__);
-               return SR_ERR_ARG;
+       if (!ctx->header_done) {
+               *out = gen_header(o);
+               ctx->header_done = TRUE;
+       } else {
+               *out = g_string_sized_new(512);
        }
 
-       ctx = o->internal;
-       max_linelen = 16 + ctx->num_enabled_probes * 2;
-       outsize = length_in / ctx->unitsize * max_linelen;
-       if (ctx->header)
-               outsize += strlen(ctx->header);
-
-       if (!(outbuf = g_try_malloc0(outsize))) {
-               sr_err("gnuplot out: %s: outbuf malloc failed", __func__);
-               return SR_ERR_MALLOC;
-       }
-
-       outbuf[0] = '\0';
-       if (ctx->header) {
-               /* The header is still here, this must be the first packet. */
-               strncpy((char *)outbuf, ctx->header, outsize);
-               g_free(ctx->header);
-               ctx->header = NULL;
-       }
-
-       for (i = 0; i <= length_in - ctx->unitsize; i += ctx->unitsize) {
-
-               memcpy(&sample, data_in + i, ctx->unitsize);
+       for (i = 0; i <= logic->length - logic->unitsize; i += logic->unitsize) {
+               sample = logic->data + i;
+               ctx->samplecount++;
 
                /*
-                * Don't output the same samples multiple times. However, make
+                * Don't output the same sample multiple times, but make
                 * sure to output at least the first and last sample.
                 */
-               if (samplecount++ != 0 && sample == old_sample) {
-                       if (i != (length_in - ctx->unitsize))
+               if (i > 0 && i < logic->length - logic->unitsize) {
+                       if (!memcmp(sample, ctx->prevsample, logic->unitsize))
                                continue;
                }
-               old_sample = sample;
+               memcpy(ctx->prevsample, sample, logic->unitsize);
 
                /* The first column is a counter (needed for gnuplot). */
-               c = outbuf + strlen((const char *)outbuf);
-               sprintf((char *)c, "%" PRIu64 "\t", samplecount++);
+               g_string_append_printf(*out, "%" PRIu64 "\t", ctx->samplecount);
 
                /* The next columns are the values of all channels. */
-               for (p = 0; p < ctx->num_enabled_probes; p++) {
-                       curbit = (sample & ((uint64_t) (1 << p))) >> p;
-                       c = outbuf + strlen((const char *)outbuf);
-                       sprintf((char *)c, "%d ", curbit);
+               for (p = 0; p < ctx->num_enabled_channels; p++) {
+                       idx = ctx->channel_index[p];
+                       curbit = (sample[idx / 8] & ((uint8_t) (1 << (idx % 8)))) >> (idx % 8);
+                       g_string_append_printf(*out, "%d ", curbit);
                }
-
-               c = outbuf + strlen((const char *)outbuf);
-               sprintf((char *)c, "\n");
+               g_string_append_printf(*out, "\n");
        }
 
-       *data_out = outbuf;
-       *length_out = strlen((const char *)outbuf);
-
        return SR_OK;
 }
 
-SR_PRIV struct sr_output_format output_gnuplot = {
-       .id = "gnuplot",
-       .description = "Gnuplot",
-       .df_type = SR_DF_LOGIC,
-       .init = init,
-       .data = data,
-       .event = event,
-};
-
-/* Temporarily disabled. */
-#if 0
-static int analog_init(struct sr_output *o)
+static int cleanup(struct sr_output *o)
 {
        struct context *ctx;
-       struct sr_probe *probe;
-       GSList *l;
-       uint64_t samplerate;
-       unsigned int i;
-       int b, num_probes;
-       char *c, *frequency_s;
-       char wbuf[1000], comment[128];
-       time_t t;
-
-       if (!(ctx = g_try_malloc0(sizeof(struct context)))) {
-               sr_err("gnuplot out: %s: ctx malloc failed", __func__);
-               return SR_ERR_MALLOC;
-       }
-
-       if (!(ctx->header = g_try_malloc0(MAX_HEADER_LEN + 1))) {
-               g_free(ctx);
-               sr_err("gnuplot out: %s: ctx->header malloc failed", __func__);
-               return SR_ERR_MALLOC;
-       }
-
-       o->internal = ctx;
-       ctx->num_enabled_probes = 0;
-       for (l = o->dev->probes; l; l = l->next) {
-               probe = l->data;
-               if (!probe->enabled)
-                       continue;
-               ctx->probelist[ctx->num_enabled_probes++] = probe->name;
-       }
-       ctx->probelist[ctx->num_enabled_probes] = 0;
-//     ctx->unitsize = (ctx->num_enabled_probes + 7) / 8;
-       ctx->unitsize = sizeof(struct sr_analog_sample) +
-                       (ctx->num_enabled_probes * sizeof(struct sr_analog_probe));
-
-       num_probes = g_slist_length(o->dev->probes);
-       comment[0] = '\0';
-       if (o->dev->driver && sr_dev_has_hwcap(o->dev, SR_HWCAP_SAMPLERATE)) {
-               samplerate = *((uint64_t *) o->dev->driver->dev_info_get(
-                               o->dev->driver_index, SR_DI_CUR_SAMPLERATE));
-               if (!(frequency_s = sr_samplerate_string(samplerate))) {
-                       g_free(ctx->header);
-                       g_free(ctx);
-                       return SR_ERR;
-               }
-               snprintf(comment, 127, gnuplot_header_comment,
-                       ctx->num_enabled_probes, num_probes, frequency_s);
-               g_free(frequency_s);
-       }
-
-       /* Columns / channels */
-       wbuf[0] = '\0';
-       for (i = 0; i < ctx->num_enabled_probes; i++) {
-               c = (char *)&wbuf + strlen((char *)&wbuf);
-               sprintf(c, "# %d\t\t%s\n", i + 1, ctx->probelist[i]);
-       }
-
-       if (!(frequency_s = sr_period_string(samplerate))) {
-               g_free(ctx->header);
-               g_free(ctx);
-               return SR_ERR;
-       }
-       t = time(NULL);
-       b = snprintf(ctx->header, MAX_HEADER_LEN, gnuplot_header,
-                    PACKAGE_STRING, ctime(&t), comment, frequency_s,
-                    (char *)&wbuf);
-       g_free(frequency_s);
-
-       if (b < 0) {
-               g_free(ctx->header);
-               g_free(ctx);
-               return SR_ERR;
-       }
-
-       return 0;
-}
-
-static int analog_data(struct sr_output *o, uint8_t *data_in,
-                      uint64_t length_in, uint8_t **data_out,
-                      uint64_t *length_out)
-{
-       struct context *ctx;
-       unsigned int max_linelen, outsize, p, /* curbit, */ i;
-//     uint64_t sample;
-       static uint64_t samplecount = 0;
-       uint8_t *outbuf, *c;
-       struct sr_analog_sample *sample;
 
+       if (!o || !o->internal)
+               return SR_ERR_BUG;
        ctx = o->internal;
-//     max_linelen = 16 + ctx->num_enabled_probes * 2;
-       max_linelen = 16 + ctx->num_enabled_probes * 30;
-       outsize = length_in / ctx->unitsize * max_linelen;
-       if (ctx->header)
-               outsize += strlen(ctx->header);
-
-       if (!(outbuf = g_try_malloc0(outsize))) {
-               sr_err("gnuplot out: %s: outbuf malloc failed", __func__);
-               return SR_ERR_MALLOC;
-       }
-
-       outbuf[0] = '\0';
-       if (ctx->header) {
-               /* The header is still here, this must be the first packet. */
-               strncpy(outbuf, ctx->header, outsize);
-               g_free(ctx->header);
-               ctx->header = NULL;
-       }
-
-       for (i = 0; i <= length_in - ctx->unitsize; i += ctx->unitsize) {
-//             memcpy(&sample, data_in + i, ctx->unitsize);
-               sample = (struct sr_analog_sample *) (data_in + i);
-
-               /* The first column is a counter (needed for gnuplot). */
-               c = outbuf + strlen(outbuf);
-               sprintf(c, "%" PRIu64 "\t", samplecount++);
-
-               /* The next columns are the values of all channels. */
-               for (p = 0; p < ctx->num_enabled_probes; p++) {
-//                     curbit = (sample & ((uint64_t) (1 << p))) >> p;
-                       c = outbuf + strlen(outbuf);
-//                     sprintf(c, "%d ", curbit);
-                       /*
-                        * FIXME: Should be doing proper raw->voltage conversion
-                        * here, casting to int16_t isn't it. Remember that if
-                        * res = 1 conversion isn't necessary.
-                        */
-                       sprintf(c, "%f ", (double) ((int16_t) (sample->probes[p].val &
-                                       ((1 << sample->probes[p].res) - 1))));
-               }
-
-               c = outbuf + strlen(outbuf);
-               sprintf(c, "\n");
-       }
-
-       *data_out = outbuf;
-       *length_out = strlen(outbuf);
+       g_free(ctx->channel_index);
+       g_free(ctx->prevsample);
+       g_free(ctx);
 
        return SR_OK;
 }
 
-struct sr_output_format output_analog_gnuplot = {
-       .id = "analog_gnuplot",
-       .description = "Gnuplot analog",
-       .df_type = SR_DF_ANALOG,
-       .init = analog_init,
-       .data = analog_data,
-       .event = event,
+SR_PRIV struct sr_output_format output_gnuplot = {
+       .id = "gnuplot",
+       .description = "Gnuplot",
+       .init = init,
+       .receive = receive,
+       .cleanup = cleanup,
 };
-#endif