src/nut.c

   1 /**
   2  * collectd - src/nut.c
   3  * Copyright (C) 2007  Florian octo Forster
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License as published by the
   7  * Free Software Foundation; only version 2 of the License is applicable.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License along
  15  * with this program; if not, write to the Free Software Foundation, Inc.,
  16  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  17  *
  18  * Authors:
  19  *   Florian octo Forster <octo at verplant.org>
  20  **/
  21
  22 #include "collectd.h"
  23 #include "common.h"
  24 #include "plugin.h"
  25
  26 #include <pthread.h>
  27 #include <upsclient.h>
  28
  29 #if HAVE_UPSCONN_T
  30 typedef UPSCONN_t collectd_upsconn_t;
  31 #elif HAVE_UPSCONN
  32 typedef UPSCONN collectd_upsconn_t;
  33 #else
  34 # error "Unable to determine the UPS connection type."
  35 #endif
  36
  37 struct nut_ups_s;
  38 typedef struct nut_ups_s nut_ups_t;
  39 struct nut_ups_s
  40 {
  41   collectd_upsconn_t *conn;
  42   char      *upsname;
  43   char      *hostname;
  44   int        port;
  45   nut_ups_t *next;
  46 };
  47
  48 static nut_ups_t *upslist_head = NULL;
  49
  50 static pthread_mutex_t read_lock = PTHREAD_MUTEX_INITIALIZER;
  51 static int read_busy = 0;
  52
  53 static const char *config_keys[] =
  54 {
  55   "UPS"
  56 };
  57 static int config_keys_num = STATIC_ARRAY_SIZE(config_keys);
  58
  59 static void free_nut_ups_t (nut_ups_t *ups)
  60 {
  61   if (ups->conn != NULL)
  62   {
  63     upscli_disconnect (ups->conn);
  64     sfree (ups->conn);
  65   }
  66   sfree (ups->hostname);
  67   sfree (ups->upsname);
  68   sfree (ups);
  69 } /* void free_nut_ups_t */
  70
  71 static int nut_add_ups (const char *name)
  72 {
  73   nut_ups_t *ups;
  74   int status;
  75
  76   DEBUG ("nut plugin: nut_add_ups (name = %s);", name);
  77
  78   ups = (nut_ups_t *) malloc (sizeof (nut_ups_t));
  79   if (ups == NULL)
  80   {
  81     ERROR ("nut plugin: nut_add_ups: malloc failed.");
  82     return (1);
  83   }
  84   memset (ups, '\0', sizeof (nut_ups_t));
  85
  86   status = upscli_splitname (name, &ups->upsname, &ups->hostname,
  87       &ups->port);
  88   if (status != 0)
  89   {
  90     ERROR ("nut plugin: nut_add_ups: upscli_splitname (%s) failed.", name);
  91     free_nut_ups_t (ups);
  92     return (1);
  93   }
  94
  95   if (upslist_head == NULL)
  96     upslist_head = ups;
  97   else
  98   {
  99     nut_ups_t *last = upslist_head;
 100     while (last->next != NULL)
 101       last = last->next;
 102     last->next = ups;
 103   }
 104
 105   return (0);
 106 } /* int nut_add_ups */
 107
 108 static int nut_config (const char *key, const char *value)
 109 {
 110   if (strcasecmp (key, "UPS") == 0)
 111     return (nut_add_ups (value));
 112   else
 113     return (-1);
 114 } /* int nut_config */
 115
 116 static void nut_submit (nut_ups_t *ups, const char *type,
 117     const char *type_instance, gauge_t value)
 118 {
 119   value_t values[1];
 120   value_list_t vl = VALUE_LIST_INIT;
 121
 122   values[0].gauge = value;
 123
 124   vl.values = values;
 125   vl.values_len = STATIC_ARRAY_SIZE (values);
 126   sstrncpy (vl.host,
 127       (strcasecmp (ups->hostname, "localhost") == 0)
 128       ? hostname_g
 129       : ups->hostname,
 130       sizeof (vl.host));
 131   sstrncpy (vl.plugin, "nut", sizeof (vl.plugin));
 132   sstrncpy (vl.plugin_instance, ups->upsname, sizeof (vl.plugin_instance));
 133   sstrncpy (vl.type, type, sizeof (vl.type));
 134   sstrncpy (vl.type_instance, type_instance, sizeof (vl.type_instance));
 135
 136   plugin_dispatch_values (&vl);
 137 } /* void nut_submit */
 138
 139 static int nut_read_one (nut_ups_t *ups)
 140 {
 141   const char *query[3] = {"VAR", ups->upsname, NULL};
 142   unsigned int query_num = 2;
 143   char **answer;
 144   unsigned int answer_num;
 145   int status;
 146
 147   /* (Re-)Connect if we have no connection */
 148   if (ups->conn == NULL)
 149   {
 150     ups->conn = (collectd_upsconn_t *) malloc (sizeof (collectd_upsconn_t));
 151     if (ups->conn == NULL)
 152     {
 153       ERROR ("nut plugin: malloc failed.");
 154       return (-1);
 155     }
 156
 157     status = upscli_connect (ups->conn, ups->hostname, ups->port,
 158         UPSCLI_CONN_TRYSSL);
 159     if (status != 0)
 160     {
 161       ERROR ("nut plugin: nut_read_one: upscli_connect (%s, %i) failed: %s",
 162           ups->hostname, ups->port, upscli_strerror (ups->conn));
 163       sfree (ups->conn);
 164       return (-1);
 165     }
 166
 167     INFO ("nut plugin: Connection to (%s, %i) established.",
 168         ups->hostname, ups->port);
 169   } /* if (ups->conn == NULL) */
 170
 171   /* nut plugin: nut_read_one: upscli_list_start (adpos) failed: Protocol
 172    * error */
 173   status = upscli_list_start (ups->conn, query_num, query);
 174   if (status != 0)
 175   {
 176     ERROR ("nut plugin: nut_read_one: upscli_list_start (%s) failed: %s",
 177         ups->upsname, upscli_strerror (ups->conn));
 178     upscli_disconnect (ups->conn);
 179     sfree (ups->conn);
 180     return (-1);
 181   }
 182
 183   while ((status = upscli_list_next (ups->conn, query_num, query,
 184           &answer_num, &answer)) == 1)
 185   {
 186     char  *key;
 187     double value;
 188
 189     if (answer_num < 4)
 190       continue;
 191
 192     key = answer[2];
 193     value = atof (answer[3]);
 194
 195     if (strncmp ("ambient.", key, 8) == 0)
 196     {
 197       if (strcmp ("ambient.humidity", key) == 0)
 198         nut_submit (ups, "humidity", "ambient", value);
 199       else if (strcmp ("ambient.temperature", key) == 0)
 200         nut_submit (ups, "temperature", "ambient", value);
 201     }
 202     else if (strncmp ("battery.", key, 8) == 0)
 203     {
 204       if (strcmp ("battery.charge", key) == 0)
 205         nut_submit (ups, "percent", "charge", value);
 206       else if (strcmp ("battery.current", key) == 0)
 207         nut_submit (ups, "current", "battery", value);
 208       else if (strcmp ("battery.runtime", key) == 0)
 209         nut_submit (ups, "timeleft", "battery", value);
 210       else if (strcmp ("battery.temperature", key) == 0)
 211         nut_submit (ups, "temperature", "battery", value);
 212       else if (strcmp ("battery.voltage", key) == 0)
 213         nut_submit (ups, "voltage", "battery", value);
 214     }
 215     else if (strncmp ("input.", key, 6) == 0)
 216     {
 217       if (strcmp ("input.frequency", key) == 0)
 218         nut_submit (ups, "frequency", "input", value);
 219       else if (strcmp ("input.voltage", key) == 0)
 220         nut_submit (ups, "voltage", "input", value);
 221     }
 222     else if (strncmp ("output.", key, 7) == 0)
 223     {
 224       if (strcmp ("output.current", key) == 0)
 225         nut_submit (ups, "current", "output", value);
 226       else if (strcmp ("output.frequency", key) == 0)
 227         nut_submit (ups, "frequency", "output", value);
 228       else if (strcmp ("output.voltage", key) == 0)
 229         nut_submit (ups, "voltage", "output", value);
 230     }
 231     else if (strncmp ("ups.", key, 4) == 0)
 232     {
 233       if (strcmp ("ups.load", key) == 0)
 234         nut_submit (ups, "percent", "load", value);
 235       else if (strcmp ("ups.power", key) == 0)
 236         nut_submit (ups, "power", "ups", value);
 237       else if (strcmp ("ups.temperature", key) == 0)
 238         nut_submit (ups, "temperature", "ups", value);
 239     }
 240   } /* while (upscli_list_next) */
 241
 242   return (0);
 243 } /* int nut_read_one */
 244
 245 static int nut_read (void)
 246 {
 247   nut_ups_t *ups;
 248   int success = 0;
 249
 250   pthread_mutex_lock (&read_lock);
 251   success = read_busy;
 252   read_busy = 1;
 253   pthread_mutex_unlock (&read_lock);
 254
 255   if (success != 0)
 256     return (0);
 257
 258   for (ups = upslist_head; ups != NULL; ups = ups->next)
 259     if (nut_read_one (ups) == 0)
 260       success++;
 261
 262   pthread_mutex_lock (&read_lock);
 263   read_busy = 0;
 264   pthread_mutex_unlock (&read_lock);
 265
 266   return ((success != 0) ? 0 : -1);
 267 } /* int nut_read */
 268
 269 static int nut_shutdown (void)
 270 {
 271   nut_ups_t *this;
 272   nut_ups_t *next;
 273
 274   this = upslist_head;
 275   while (this != NULL)
 276   {
 277     next = this->next;
 278     free_nut_ups_t (this);
 279     this = next;
 280   }
 281
 282   return (0);
 283 } /* int nut_shutdown */
 284
 285 void module_register (void)
 286 {
 287   plugin_register_config ("nut", nut_config, config_keys, config_keys_num);
 288   plugin_register_read ("nut", nut_read);
 289   plugin_register_shutdown ("nut", nut_shutdown);
 290 } /* void module_register */
 291
 292 /* vim: set sw=2 ts=8 sts=2 tw=78 : */