src/sigrok.c

   1 /*
   2  * collectd - src/sigrok.c
   3  * Copyright (C) 2013 Bert Vermeulen
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17  *
  18  * Authors:
  19  *   Bert Vermeulen <bert at biot.com>
  20  */
  21
  22 #include "collectd.h"
  23
  24 #include "common.h"
  25 #include "plugin.h"
  26
  27 #include <stdio.h>
  28 #include <stdlib.h>
  29 #include <string.h>
  30 #include <time.h>
  31
  32 #include <glib.h>
  33 #include <libsigrok/libsigrok.h>
  34
  35 /* Minimum interval between dispatches coming from this plugin. The RRD
  36  * plugin, at least, complains when written to with sub-second intervals.*/
  37 #define DEFAULT_MIN_DISPATCH_INTERVAL TIME_T_TO_CDTIME_T(0)
  38
  39 static pthread_t sr_thread;
  40 static int sr_thread_running = FALSE;
  41 GSList *config_devices;
  42 static int num_devices;
  43 static int loglevel = SR_LOG_WARN;
  44 static struct sr_context *sr_ctx;
  45
  46 struct config_device {
  47   char *name;
  48   char *driver;
  49   char *conn;
  50   char *serialcomm;
  51   struct sr_dev_inst *sdi;
  52   cdtime_t min_dispatch_interval;
  53   cdtime_t last_dispatch;
  54 };
  55
  56 static int sigrok_log_callback(void *cb_data __attribute__((unused)),
  57                                int msg_loglevel, const char *format,
  58                                va_list args) {
  59   char s[512];
  60
  61   if (msg_loglevel <= loglevel) {
  62     vsnprintf(s, 512, format, args);
  63     plugin_log(LOG_INFO, "sigrok plugin: %s", s);
  64   }
  65
  66   return 0;
  67 }
  68
  69 static int sigrok_config_device(oconfig_item_t *ci) {
  70   struct config_device *cfdev;
  71
  72   if (!(cfdev = calloc(1, sizeof(*cfdev)))) {
  73     ERROR("sigrok plugin: calloc failed.");
  74     return -1;
  75   }
  76   if (cf_util_get_string(ci, &cfdev->name)) {
  77     free(cfdev);
  78     WARNING("sigrok plugin: Invalid device name.");
  79     return -1;
  80   }
  81   cfdev->min_dispatch_interval = DEFAULT_MIN_DISPATCH_INTERVAL;
  82
  83   for (int i = 0; i < ci->children_num; i++) {
  84     oconfig_item_t *item = ci->children + i;
  85     if (!strcasecmp(item->key, "driver"))
  86       cf_util_get_string(item, &cfdev->driver);
  87     else if (!strcasecmp(item->key, "conn"))
  88       cf_util_get_string(item, &cfdev->conn);
  89     else if (!strcasecmp(item->key, "serialcomm"))
  90       cf_util_get_string(item, &cfdev->serialcomm);
  91     else if (!strcasecmp(item->key, "minimuminterval"))
  92       cf_util_get_cdtime(item, &cfdev->min_dispatch_interval);
  93     else
  94       WARNING("sigrok plugin: Invalid keyword \"%s\".", item->key);
  95   }
  96
  97   config_devices = g_slist_append(config_devices, cfdev);
  98
  99   return 0;
 100 }
 101
 102 static int sigrok_config(oconfig_item_t *ci) {
 103   for (int i = 0; i < ci->children_num; i++) {
 104     oconfig_item_t *item = ci->children + i;
 105     if (strcasecmp("LogLevel", item->key) == 0) {
 106       int status;
 107       int tmp = -1;
 108
 109       status = cf_util_get_int(item, &tmp);
 110       if (status != 0)
 111         continue;
 112       else if ((tmp < 0) || (tmp > 5)) {
 113         ERROR("sigrok plugin: The \"LogLevel\" "
 114               "configuration option expects "
 115               "an integer between 0 and 5 "
 116               "(inclusive); you provided %i.",
 117               tmp);
 118         continue;
 119       }
 120       loglevel = tmp;
 121     } else if (!strcasecmp(item->key, "Device"))
 122       sigrok_config_device(item);
 123     else
 124       WARNING("sigrok plugin: Invalid keyword \"%s\".", item->key);
 125   }
 126
 127   return 0;
 128 }
 129
 130 static const char *sigrok_value_type(const struct sr_datafeed_analog *analog) {
 131   const char *s;
 132
 133   if (analog->mq == SR_MQ_VOLTAGE)
 134     s = "voltage";
 135   else if (analog->mq == SR_MQ_CURRENT)
 136     s = "current";
 137   else if (analog->mq == SR_MQ_FREQUENCY)
 138     s = "frequency";
 139   else if (analog->mq == SR_MQ_POWER)
 140     s = "power";
 141   else if (analog->mq == SR_MQ_TEMPERATURE)
 142     s = "temperature";
 143   else if (analog->mq == SR_MQ_RELATIVE_HUMIDITY)
 144     s = "humidity";
 145   else if (analog->mq == SR_MQ_SOUND_PRESSURE_LEVEL)
 146     s = "spl";
 147   else
 148     s = "gauge";
 149
 150   return s;
 151 }
 152
 153 static void sigrok_feed_callback(const struct sr_dev_inst *sdi,
 154                                  const struct sr_datafeed_packet *packet,
 155                                  void *cb_data) {
 156   const struct sr_datafeed_analog *analog;
 157   struct config_device *cfdev;
 158   value_t value;
 159   value_list_t vl = VALUE_LIST_INIT;
 160
 161   /* Find this device's configuration. */
 162   cfdev = NULL;
 163   for (GSList *l = config_devices; l; l = l->next) {
 164     cfdev = l->data;
 165     if (cfdev->sdi == sdi) {
 166       /* Found it. */
 167       break;
 168     }
 169     cfdev = NULL;
 170   }
 171
 172   if (!cfdev) {
 173     ERROR("sigrok plugin: Received data from driver \"%s\" but "
 174           "can't find a configuration / device matching "
 175           "it.",
 176           sdi->driver->name);
 177     return;
 178   }
 179
 180   if (packet->type == SR_DF_END) {
 181     /* TODO: try to restart acquisition after a delay? */
 182     WARNING("sigrok plugin: acquisition for \"%s\" ended.", cfdev->name);
 183     return;
 184   }
 185
 186   if (packet->type != SR_DF_ANALOG)
 187     return;
 188
 189   if ((cfdev->min_dispatch_interval != 0) &&
 190       ((cdtime() - cfdev->last_dispatch) < cfdev->min_dispatch_interval))
 191     return;
 192
 193   /* Ignore all but the first sample on the first probe. */
 194   analog = packet->payload;
 195   value.gauge = analog->data[0];
 196   vl.values = &value;
 197   vl.values_len = 1;
 198   sstrncpy(vl.host, hostname_g, sizeof(vl.host));
 199   sstrncpy(vl.plugin, "sigrok", sizeof(vl.plugin));
 200   ssnprintf(vl.plugin_instance, sizeof(vl.plugin_instance), "%s", cfdev->name);
 201   sstrncpy(vl.type, sigrok_value_type(analog), sizeof(vl.type));
 202
 203   plugin_dispatch_values(&vl);
 204   cfdev->last_dispatch = cdtime();
 205 }
 206
 207 static void sigrok_free_drvopts(struct sr_config *src) {
 208   g_variant_unref(src->data);
 209   g_free(src);
 210 }
 211
 212 static int sigrok_init_driver(struct config_device *cfdev,
 213                               struct sr_dev_driver *drv) {
 214   struct sr_config *src;
 215   GSList *devlist, *drvopts;
 216   char hwident[512];
 217
 218   if (sr_driver_init(sr_ctx, drv) != SR_OK)
 219     /* Error was logged by libsigrok. */
 220     return -1;
 221
 222   drvopts = NULL;
 223   if (cfdev->conn) {
 224     if (!(src = malloc(sizeof(*src))))
 225       return -1;
 226     src->key = SR_CONF_CONN;
 227     src->data = g_variant_new_string(cfdev->conn);
 228     drvopts = g_slist_append(drvopts, src);
 229   }
 230   if (cfdev->serialcomm) {
 231     if (!(src = malloc(sizeof(*src))))
 232       return -1;
 233     src->key = SR_CONF_SERIALCOMM;
 234     src->data = g_variant_new_string(cfdev->serialcomm);
 235     drvopts = g_slist_append(drvopts, src);
 236   }
 237   devlist = sr_driver_scan(drv, drvopts);
 238   g_slist_free_full(drvopts, (GDestroyNotify)sigrok_free_drvopts);
 239   if (!devlist) {
 240     /* Not an error, but the user should know about it. */
 241     WARNING("sigrok plugin: No device found for \"%s\".", cfdev->name);
 242     return 0;
 243   }
 244
 245   if (g_slist_length(devlist) > 1) {
 246     INFO("sigrok plugin: %d sigrok devices for device entry "
 247          "\"%s\": must be 1.",
 248          g_slist_length(devlist), cfdev->name);
 249     return -1;
 250   }
 251   cfdev->sdi = devlist->data;
 252   g_slist_free(devlist);
 253   ssnprintf(hwident, sizeof(hwident), "%s %s %s",
 254             cfdev->sdi->vendor ? cfdev->sdi->vendor : "",
 255             cfdev->sdi->model ? cfdev->sdi->model : "",
 256             cfdev->sdi->version ? cfdev->sdi->version : "");
 257   INFO("sigrok plugin: Device \"%s\" is a %s", cfdev->name, hwident);
 258
 259   if (sr_dev_open(cfdev->sdi) != SR_OK)
 260     return -1;
 261
 262   if (sr_session_dev_add(cfdev->sdi) != SR_OK)
 263     return -1;
 264
 265   return 1;
 266 }
 267
 268 static void *sigrok_read_thread(void *arg __attribute__((unused))) {
 269   struct sr_dev_driver *drv, **drvlist;
 270   GSList *l;
 271   struct config_device *cfdev;
 272   int ret, i;
 273
 274   sr_log_callback_set(sigrok_log_callback, NULL);
 275   sr_log_loglevel_set(loglevel);
 276
 277   if ((ret = sr_init(&sr_ctx)) != SR_OK) {
 278     ERROR("sigrok plugin: Failed to initialize libsigrok: %s.",
 279           sr_strerror(ret));
 280     return NULL;
 281   }
 282
 283   if (!sr_session_new())
 284     return NULL;
 285
 286   num_devices = 0;
 287   drvlist = sr_driver_list();
 288   for (l = config_devices; l; l = l->next) {
 289     cfdev = l->data;
 290     drv = NULL;
 291     for (i = 0; drvlist[i]; i++) {
 292       if (!strcmp(drvlist[i]->name, cfdev->driver)) {
 293         drv = drvlist[i];
 294         break;
 295       }
 296     }
 297     if (!drv) {
 298       ERROR("sigrok plugin: Unknown driver \"%s\".", cfdev->driver);
 299       return NULL;
 300     }
 301
 302     if ((ret = sigrok_init_driver(cfdev, drv)) < 0)
 303       /* Error was already logged. */
 304       return NULL;
 305
 306     num_devices += ret;
 307   }
 308
 309   if (num_devices > 0) {
 310     /* Do this only when we're sure there's hardware to talk to. */
 311     if (sr_session_datafeed_callback_add(sigrok_feed_callback, NULL) != SR_OK)
 312       return NULL;
 313
 314     /* Start acquisition on all devices. */
 315     if (sr_session_start() != SR_OK)
 316       return NULL;
 317
 318     /* Main loop, runs forever. */
 319     sr_session_run();
 320
 321     sr_session_stop();
 322     sr_session_dev_remove_all();
 323   }
 324
 325   sr_session_destroy();
 326
 327   sr_exit(sr_ctx);
 328
 329   pthread_exit(NULL);
 330   sr_thread_running = FALSE;
 331
 332   return NULL;
 333 }
 334
 335 static int sigrok_init(void) {
 336   int status;
 337
 338   if (sr_thread_running) {
 339     ERROR("sigrok plugin: Thread already running.");
 340     return -1;
 341   }
 342
 343   status = plugin_thread_create(&sr_thread, NULL, sigrok_read_thread, NULL);
 344   if (status != 0) {
 345     char errbuf[1024];
 346     ERROR("sigrok plugin: Failed to create thread: %s.",
 347           sstrerror(errno, errbuf, sizeof(errbuf)));
 348     return -1;
 349   }
 350   sr_thread_running = TRUE;
 351
 352   return 0;
 353 }
 354
 355 static int sigrok_shutdown(void) {
 356   struct config_device *cfdev;
 357   GSList *l;
 358
 359   if (sr_thread_running) {
 360     pthread_cancel(sr_thread);
 361     pthread_join(sr_thread, NULL);
 362   }
 363
 364   for (l = config_devices; l; l = l->next) {
 365     cfdev = l->data;
 366     free(cfdev->name);
 367     free(cfdev->driver);
 368     free(cfdev->conn);
 369     free(cfdev->serialcomm);
 370     free(cfdev);
 371   }
 372   g_slist_free(config_devices);
 373
 374   return 0;
 375 }
 376
 377 void module_register(void) {
 378   plugin_register_complex_config("sigrok", sigrok_config);
 379   plugin_register_init("sigrok", sigrok_init);
 380   plugin_register_shutdown("sigrok", sigrok_shutdown);
 381 }