src/load.c

   1 /**
   2  * collectd - src/load.c
   3  * Copyright (C) 2005,2006  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 #if defined(HAVE_GETLOADAVG) || defined(KERNEL_LINUX) || defined(HAVE_LIBSTATGRAB)
  27 # define LOAD_HAVE_READ 1
  28 #else
  29 # define LOAD_HAVE_READ 0
  30 #endif
  31
  32 #ifdef HAVE_SYS_LOADAVG_H
  33 #include <sys/loadavg.h>
  34 #endif
  35
  36 #ifdef HAVE_GETLOADAVG
  37 #if !defined(LOADAVG_1MIN) || !defined(LOADAVG_5MIN) || !defined(LOADAVG_15MIN)
  38 #define LOADAVG_1MIN  0
  39 #define LOADAVG_5MIN  1
  40 #define LOADAVG_15MIN 2
  41 #endif
  42 #endif /* defined(HAVE_GETLOADAVG) */
  43
  44 static data_source_t dsrc[3] =
  45 {
  46         {"shortterm", DS_TYPE_GAUGE, 0.0, 100.0},
  47         {"midterm",   DS_TYPE_GAUGE, 0.0, 100.0},
  48         {"longterm",  DS_TYPE_GAUGE, 0.0, 100.0}
  49 };
  50
  51 static data_set_t ds =
  52 {
  53         "load", 3, dsrc
  54 };
  55
  56 #if LOAD_HAVE_READ
  57 static void load_submit (gauge_t snum, gauge_t mnum, gauge_t lnum)
  58 {
  59         value_t values[3];
  60         value_list_t vl = VALUE_LIST_INIT;
  61
  62         values[0].gauge = snum;
  63         values[1].gauge = mnum;
  64         values[2].gauge = lnum;
  65
  66         vl.values = values;
  67         vl.values_len = STATIC_ARRAY_SIZE (values);
  68         vl.time = time (NULL);
  69         strcpy (vl.host, hostname_g);
  70         strcpy (vl.plugin, "load");
  71
  72         plugin_dispatch_values ("load", &vl);
  73 }
  74
  75 static int load_read (void)
  76 {
  77 #if defined(HAVE_GETLOADAVG)
  78         double load[3];
  79
  80         if (getloadavg (load, 3) == 3)
  81                 load_submit (load[LOADAVG_1MIN], load[LOADAVG_5MIN], load[LOADAVG_15MIN]);
  82         else
  83         {
  84                 char errbuf[1024];
  85                 WARNING ("load: getloadavg failed: %s",
  86                                 sstrerror (errno, errbuf, sizeof (errbuf)));
  87         }
  88 /* #endif HAVE_GETLOADAVG */
  89
  90 #elif defined(KERNEL_LINUX)
  91         gauge_t snum, mnum, lnum;
  92         FILE *loadavg;
  93         char buffer[16];
  94
  95         char *fields[8];
  96         int numfields;
  97
  98         if ((loadavg = fopen ("/proc/loadavg", "r")) == NULL)
  99         {
 100                 char errbuf[1024];
 101                 WARNING ("load: fopen: %s",
 102                                 sstrerror (errno, errbuf, sizeof (errbuf)));
 103                 return;
 104         }
 105
 106         if (fgets (buffer, 16, loadavg) == NULL)
 107         {
 108                 char errbuf[1024];
 109                 WARNING ("load: fgets: %s",
 110                                 sstrerror (errno, errbuf, sizeof (errbuf)));
 111                 fclose (loadavg);
 112                 return;
 113         }
 114
 115         if (fclose (loadavg))
 116         {
 117                 char errbuf[1024];
 118                 WARNING ("load: fclose: %s",
 119                                 sstrerror (errno, errbuf, sizeof (errbuf)));
 120         }
 121
 122         numfields = strsplit (buffer, fields, 8);
 123
 124         if (numfields < 3)
 125                 return;
 126
 127         snum = atof (fields[0]);
 128         mnum = atof (fields[1]);
 129         lnum = atof (fields[2]);
 130
 131         load_submit (snum, mnum, lnum);
 132 /* #endif KERNEL_LINUX */
 133
 134 #elif defined(HAVE_LIBSTATGRAB)
 135         gauge_t snum, mnum, lnum;
 136         sg_load_stats *ls;
 137
 138         if ((ls = sg_get_load_stats ()) == NULL)
 139                 return;
 140
 141         snum = ls->min1;
 142         mnum = ls->min5;
 143         lnum = ls->min15;
 144
 145         load_submit (snum, mnum, lnum);
 146 #endif /* HAVE_LIBSTATGRAB */
 147
 148         return (0);
 149 }
 150 #endif /* LOAD_HAVE_READ */
 151
 152 void module_register (modreg_e load)
 153 {
 154         if (load & MR_DATASETS)
 155                 plugin_register_data_set (&ds);
 156
 157 #if LOAD_HAVE_READ
 158         if (load & MR_READ)
 159                 plugin_register_read ("load", load_read);
 160 #endif
 161 } /* void module_register */