src/memory.c

   1 /**
   2  * collectd - src/memory.c
   3  * Copyright (C) 2005  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; either version 2 of the License, or (at your
   8  * option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along
  16  * with this program; if not, write to the Free Software Foundation, Inc.,
  17  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  18  *
  19  * Authors:
  20  *   Florian octo Forster <octo at verplant.org>
  21  **/
  22
  23 #include "memory.h"
  24
  25 #if COLLECT_MEMORY
  26 #define MODULE_NAME "memory"
  27
  28 #include "plugin.h"
  29 #include "common.h"
  30
  31 static char *memory_file = "memory.rrd";
  32
  33 /* 9223372036854775807 == LLONG_MAX */
  34 static char *ds_def[] =
  35 {
  36         "DS:used:GAUGE:25:0:9223372036854775807",
  37         "DS:free:GAUGE:25:0:9223372036854775807",
  38         "DS:buffers:GAUGE:25:0:9223372036854775807",
  39         "DS:cached:GAUGE:25:0:9223372036854775807",
  40         NULL
  41 };
  42 static int ds_num = 4;
  43
  44 #ifdef HAVE_LIBKSTAT
  45 static int pagesize;
  46 static kstat_t *ksp;
  47 #endif /* HAVE_LIBKSTAT */
  48
  49 void memory_init (void)
  50 {
  51 #ifdef HAVE_LIBKSTAT
  52         /* getpagesize(3C) tells me this does not fail.. */
  53         pagesize = getpagesize ();
  54         if (get_kstat (&ksp, "unix", 0, "system_pages"))
  55                 ksp = NULL;
  56 #endif /* HAVE_LIBKSTAT */
  57
  58         return;
  59 }
  60
  61 void memory_write (char *host, char *inst, char *val)
  62 {
  63         rrd_update_file (host, memory_file, val, ds_def, ds_num);
  64 }
  65
  66 #define BUFSIZE 512
  67 void memory_submit (long long mem_used, long long mem_buffered,
  68                 long long mem_cached, long long mem_free)
  69 {
  70         char buf[BUFSIZE];
  71
  72         if (snprintf (buf, BUFSIZE, "%u:%lli:%lli:%lli:%lli",
  73                                 (unsigned int) curtime, mem_used, mem_free,
  74                                 mem_buffered, mem_cached) >= BUFSIZE)
  75                 return;
  76
  77         plugin_submit (MODULE_NAME, "-", buf);
  78 }
  79 #undef BUFSIZE
  80
  81 void memory_read (void)
  82 {
  83 #ifdef KERNEL_LINUX
  84         FILE *fh;
  85         char buffer[1024];
  86
  87         char *fields[8];
  88         int numfields;
  89
  90         long long mem_used = 0;
  91         long long mem_buffered = 0;
  92         long long mem_cached = 0;
  93         long long mem_free = 0;
  94
  95         if ((fh = fopen ("/proc/meminfo", "r")) == NULL)
  96         {
  97                 syslog (LOG_WARNING, "memory: fopen: %s", strerror (errno));
  98                 return;
  99         }
 100
 101         while (fgets (buffer, 1024, fh) != NULL)
 102         {
 103                 long long *val = NULL;
 104
 105                 if (strncasecmp (buffer, "MemTotal:", 9) == 0)
 106                         val = &mem_used;
 107                 else if (strncasecmp (buffer, "MemFree:", 8) == 0)
 108                         val = &mem_free;
 109                 else if (strncasecmp (buffer, "Buffers:", 8) == 0)
 110                         val = &mem_buffered;
 111                 else if (strncasecmp (buffer, "Cached:", 7) == 0)
 112                         val = &mem_cached;
 113                 else
 114                         continue;
 115
 116                 numfields = strsplit (buffer, fields, 8);
 117
 118                 if (numfields < 2)
 119                         continue;
 120
 121                 *val = atoll (fields[1]) * 1024LL;
 122         }
 123
 124         if (fclose (fh))
 125                 syslog (LOG_WARNING, "memory: fclose: %s", strerror (errno));
 126
 127         if (mem_used >= (mem_free + mem_buffered + mem_cached))
 128         {
 129                 mem_used -= mem_free + mem_buffered + mem_cached;
 130                 memory_submit (mem_used, mem_buffered, mem_cached, mem_free);
 131         }
 132 /* #endif defined(KERNEL_LINUX) */
 133
 134 #elif defined(HAVE_LIBKSTAT)
 135         long long mem_used;
 136         long long mem_free;
 137         long long mem_lock;
 138
 139         if (ksp == NULL)
 140                 return;
 141
 142         mem_used = get_kstat_value (ksp, "pagestotal");
 143         mem_free = get_kstat_value (ksp, "pagesfree");
 144         mem_lock = get_kstat_value (ksp, "pageslocked");
 145
 146         if ((mem_used < 0LL) || (mem_free < 0LL) || (mem_lock < 0LL))
 147                 return;
 148         if (mem_used < (mem_free + mem_lock))
 149                 return;
 150
 151         mem_used -= mem_free + mem_lock;
 152         mem_used *= pagesize; /* If this overflows you have some serious */
 153         mem_free *= pagesize; /* memory.. Why not call me up and give me */
 154         mem_lock *= pagesize; /* some? ;) */
 155
 156         memory_submit (mem_used, mem_lock, 0LL, mem_free);
 157 /* #endif defined(HAVE_LIBKSTAT) */
 158
 159 #elif defined(HAVE_LIBSTATGRAB)
 160         sg_mem_stats *ios;
 161
 162         if ((ios = sg_get_mem_stats ()) != NULL)
 163                 memory_submit (ios->used, 0LL, ios->cache, ios->free);
 164 #endif /* HAVE_LIBSTATGRAB */
 165 }
 166
 167 void module_register (void)
 168 {
 169         plugin_register (MODULE_NAME, memory_init, memory_read, memory_write);
 170 }
 171
 172 #undef MODULE_NAME
 173 #endif /* COLLECT_MEMORY */