src/disk.c

   1 /**
   2  * collectd - src/disk.c
   3  * Copyright (C) 2005-2012  Florian octo Forster
   4  * Copyright (C) 2009       Manuel Sanmartin
   5  *
   6  * This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU General Public License as published by the
   8  * Free Software Foundation; only version 2 of the License is applicable.
   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 collectd.org>
  21  *   Manuel Sanmartin
  22  **/
  23
  24 #include "collectd.h"
  25
  26 #include "common.h"
  27 #include "plugin.h"
  28 #include "utils_ignorelist.h"
  29
  30 #if HAVE_MACH_MACH_TYPES_H
  31 #  include <mach/mach_types.h>
  32 #endif
  33 #if HAVE_MACH_MACH_INIT_H
  34 #  include <mach/mach_init.h>
  35 #endif
  36 #if HAVE_MACH_MACH_ERROR_H
  37 #  include <mach/mach_error.h>
  38 #endif
  39 #if HAVE_MACH_MACH_PORT_H
  40 #  include <mach/mach_port.h>
  41 #endif
  42 #if HAVE_COREFOUNDATION_COREFOUNDATION_H
  43 #  include <CoreFoundation/CoreFoundation.h>
  44 #endif
  45 #if HAVE_IOKIT_IOKITLIB_H
  46 #  include <IOKit/IOKitLib.h>
  47 #endif
  48 #if HAVE_IOKIT_IOTYPES_H
  49 #  include <IOKit/IOTypes.h>
  50 #endif
  51 #if HAVE_IOKIT_STORAGE_IOBLOCKSTORAGEDRIVER_H
  52 #  include <IOKit/storage/IOBlockStorageDriver.h>
  53 #endif
  54 #if HAVE_IOKIT_IOBSD_H
  55 #  include <IOKit/IOBSD.h>
  56 #endif
  57 #if KERNEL_FREEBSD
  58 #include <devstat.h>
  59 #include <libgeom.h>
  60 #endif
  61
  62 #if HAVE_LIMITS_H
  63 # include <limits.h>
  64 #endif
  65 #ifndef UINT_MAX
  66 #  define UINT_MAX 4294967295U
  67 #endif
  68
  69 #if HAVE_STATGRAB_H
  70 # include <statgrab.h>
  71 #endif
  72
  73 #if HAVE_PERFSTAT
  74 # ifndef _AIXVERSION_610
  75 # include <sys/systemcfg.h>
  76 # endif
  77 # include <sys/protosw.h>
  78 # include <libperfstat.h>
  79 #endif
  80
  81 #if HAVE_IOKIT_IOKITLIB_H
  82 static mach_port_t io_master_port = MACH_PORT_NULL;
  83 /* This defaults to false for backwards compatibility. Please fix in the next
  84  * major version. */
  85 static _Bool use_bsd_name = 0;
  86 /* #endif HAVE_IOKIT_IOKITLIB_H */
  87
  88 #elif KERNEL_LINUX
  89 typedef struct diskstats
  90 {
  91         char *name;
  92
  93         /* This overflows in roughly 1361 years */
  94         unsigned int poll_count;
  95
  96         derive_t read_sectors;
  97         derive_t write_sectors;
  98
  99         derive_t read_bytes;
 100         derive_t write_bytes;
 101
 102         derive_t read_ops;
 103         derive_t write_ops;
 104         derive_t read_time;
 105         derive_t write_time;
 106
 107         derive_t avg_read_time;
 108         derive_t avg_write_time;
 109
 110         _Bool has_merged;
 111         _Bool has_in_progress;
 112         _Bool has_io_time;
 113
 114         struct diskstats *next;
 115 } diskstats_t;
 116
 117 static diskstats_t *disklist;
 118 /* #endif KERNEL_LINUX */
 119 #elif KERNEL_FREEBSD
 120 static struct gmesh geom_tree;
 121 /* #endif KERNEL_FREEBSD */
 122
 123 #elif HAVE_LIBKSTAT
 124 #define MAX_NUMDISK 1024
 125 extern kstat_ctl_t *kc;
 126 static kstat_t *ksp[MAX_NUMDISK];
 127 static int numdisk = 0;
 128 /* #endif HAVE_LIBKSTAT */
 129
 130 #elif defined(HAVE_LIBSTATGRAB)
 131 /* #endif HAVE_LIBSTATGRAB */
 132
 133 #elif HAVE_PERFSTAT
 134 static perfstat_disk_t * stat_disk;
 135 static int numdisk;
 136 static int pnumdisk;
 137 /* #endif HAVE_PERFSTAT */
 138
 139 #else
 140 # error "No applicable input method."
 141 #endif
 142
 143 #if HAVE_LIBUDEV
 144 #include <libudev.h>
 145
 146 static char *conf_udev_name_attr = NULL;
 147 static struct udev *handle_udev;
 148 #endif
 149
 150 static const char *config_keys[] =
 151 {
 152         "Disk",
 153         "UseBSDName",
 154         "IgnoreSelected",
 155         "UdevNameAttr"
 156 };
 157 static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
 158
 159 static ignorelist_t *ignorelist = NULL;
 160
 161 static int disk_config (const char *key, const char *value)
 162 {
 163   if (ignorelist == NULL)
 164     ignorelist = ignorelist_create (/* invert = */ 1);
 165   if (ignorelist == NULL)
 166     return (1);
 167
 168   if (strcasecmp ("Disk", key) == 0)
 169   {
 170     ignorelist_add (ignorelist, value);
 171   }
 172   else if (strcasecmp ("IgnoreSelected", key) == 0)
 173   {
 174     int invert = 1;
 175     if (IS_TRUE (value))
 176       invert = 0;
 177     ignorelist_set_invert (ignorelist, invert);
 178   }
 179   else if (strcasecmp ("UseBSDName", key) == 0)
 180   {
 181 #if HAVE_IOKIT_IOKITLIB_H
 182     use_bsd_name = IS_TRUE (value) ? 1 : 0;
 183 #else
 184     WARNING ("disk plugin: The \"UseBSDName\" option is only supported "
 185         "on Mach / Mac OS X and will be ignored.");
 186 #endif
 187   }
 188   else if (strcasecmp ("UdevNameAttr", key) == 0)
 189   {
 190 #if HAVE_LIBUDEV
 191     if (conf_udev_name_attr != NULL)
 192     {
 193       free (conf_udev_name_attr);
 194       conf_udev_name_attr = NULL;
 195     }
 196     if ((conf_udev_name_attr = strdup (value)) == NULL)
 197       return (1);
 198 #else
 199     WARNING ("disk plugin: The \"UdevNameAttr\" option is only supported "
 200         "if collectd is built with libudev support");
 201 #endif
 202   }
 203   else
 204   {
 205     return (-1);
 206   }
 207
 208   return (0);
 209 } /* int disk_config */
 210
 211 static int disk_init (void)
 212 {
 213 #if HAVE_IOKIT_IOKITLIB_H
 214         kern_return_t status;
 215
 216         if (io_master_port != MACH_PORT_NULL)
 217         {
 218                 mach_port_deallocate (mach_task_self (),
 219                                 io_master_port);
 220                 io_master_port = MACH_PORT_NULL;
 221         }
 222
 223         status = IOMasterPort (MACH_PORT_NULL, &io_master_port);
 224         if (status != kIOReturnSuccess)
 225         {
 226                 ERROR ("IOMasterPort failed: %s",
 227                                 mach_error_string (status));
 228                 io_master_port = MACH_PORT_NULL;
 229                 return (-1);
 230         }
 231 /* #endif HAVE_IOKIT_IOKITLIB_H */
 232
 233 #elif KERNEL_LINUX
 234 #if HAVE_LIBUDEV
 235         if (conf_udev_name_attr != NULL)
 236         {
 237                 handle_udev = udev_new();
 238                 if (handle_udev == NULL) {
 239                         ERROR ("disk plugin: udev_new() failed!");
 240                         return (-1);
 241                 }
 242         }
 243 #endif /* HAVE_LIBUDEV */
 244 /* #endif KERNEL_LINUX */
 245
 246 #elif KERNEL_FREEBSD
 247         int rv;
 248
 249         rv = geom_gettree(&geom_tree);
 250         if (rv != 0) {
 251                 ERROR ("geom_gettree() failed, returned %d", rv);
 252                 return (-1);
 253         }
 254         rv = geom_stats_open();
 255         if (rv != 0) {
 256                 ERROR ("geom_stats_open() failed, returned %d", rv);
 257                 return (-1);
 258         }
 259 /* #endif KERNEL_FREEBSD */
 260
 261 #elif HAVE_LIBKSTAT
 262         kstat_t *ksp_chain;
 263
 264         numdisk = 0;
 265
 266         if (kc == NULL)
 267                 return (-1);
 268
 269         for (numdisk = 0, ksp_chain = kc->kc_chain;
 270                         (numdisk < MAX_NUMDISK) && (ksp_chain != NULL);
 271                         ksp_chain = ksp_chain->ks_next)
 272         {
 273                 if (strncmp (ksp_chain->ks_class, "disk", 4)
 274                                 && strncmp (ksp_chain->ks_class, "partition", 9))
 275                         continue;
 276                 if (ksp_chain->ks_type != KSTAT_TYPE_IO)
 277                         continue;
 278                 ksp[numdisk++] = ksp_chain;
 279         }
 280 #endif /* HAVE_LIBKSTAT */
 281
 282         return (0);
 283 } /* int disk_init */
 284
 285 static int disk_shutdown (void)
 286 {
 287 #if KERNEL_LINUX
 288 #if HAVE_LIBUDEV
 289         if (handle_udev != NULL)
 290                 udev_unref(handle_udev);
 291 #endif /* HAVE_LIBUDEV */
 292 #endif /* KERNEL_LINUX */
 293         return (0);
 294 } /* int disk_shutdown */
 295
 296 static void disk_submit (const char *plugin_instance,
 297                 const char *type,
 298                 derive_t read, derive_t write)
 299 {
 300         value_t values[2];
 301         value_list_t vl = VALUE_LIST_INIT;
 302
 303         values[0].derive = read;
 304         values[1].derive = write;
 305
 306         vl.values = values;
 307         vl.values_len = 2;
 308         sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 309         sstrncpy (vl.plugin, "disk", sizeof (vl.plugin));
 310         sstrncpy (vl.plugin_instance, plugin_instance,
 311                         sizeof (vl.plugin_instance));
 312         sstrncpy (vl.type, type, sizeof (vl.type));
 313
 314         plugin_dispatch_values (&vl);
 315 } /* void disk_submit */
 316
 317 #if KERNEL_FREEBSD || KERNEL_LINUX
 318 static void submit_io_time (char const *plugin_instance, derive_t io_time, derive_t weighted_time)
 319 {
 320         value_t values[2];
 321         value_list_t vl = VALUE_LIST_INIT;
 322
 323         values[0].derive = io_time;
 324         values[1].derive = weighted_time;
 325
 326         vl.values = values;
 327         vl.values_len = 2;
 328         sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 329         sstrncpy (vl.plugin, "disk", sizeof (vl.plugin));
 330         sstrncpy (vl.plugin_instance, plugin_instance, sizeof (vl.plugin_instance));
 331         sstrncpy (vl.type, "disk_io_time", sizeof (vl.type));
 332
 333         plugin_dispatch_values (&vl);
 334 } /* void submit_io_time */
 335 #endif /* KERNEL_FREEBSD || KERNEL_LINUX */
 336
 337 #if KERNEL_LINUX
 338 static void submit_in_progress (char const *disk_name, gauge_t in_progress)
 339 {
 340         value_list_t vl = VALUE_LIST_INIT;
 341
 342         vl.values = &(value_t) { .gauge = in_progress };
 343         vl.values_len = 1;
 344         sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 345         sstrncpy (vl.plugin, "disk", sizeof (vl.plugin));
 346         sstrncpy (vl.plugin_instance, disk_name, sizeof (vl.plugin_instance));
 347         sstrncpy (vl.type, "pending_operations", sizeof (vl.type));
 348
 349         plugin_dispatch_values (&vl);
 350 }
 351
 352 static counter_t disk_calc_time_incr (counter_t delta_time, counter_t delta_ops)
 353 {
 354         double interval = CDTIME_T_TO_DOUBLE (plugin_get_interval ());
 355         double avg_time = ((double) delta_time) / ((double) delta_ops);
 356         double avg_time_incr = interval * avg_time;
 357
 358         return ((counter_t) (avg_time_incr + .5));
 359 }
 360 #endif
 361
 362 #if HAVE_LIBUDEV
 363 /**
 364  * Attempt to provide an rename disk instance from an assigned udev attribute.
 365  *
 366  * On success, it returns a strduped char* to the desired attribute value.
 367  * Otherwise it returns NULL.
 368  */
 369
 370 static char *disk_udev_attr_name (struct udev *udev, char *disk_name, const char *attr)
 371 {
 372         struct udev_device *dev;
 373         const char *prop;
 374         char *output = NULL;
 375
 376         dev = udev_device_new_from_subsystem_sysname (udev, "block", disk_name);
 377         if (dev != NULL)
 378         {
 379                 prop = udev_device_get_property_value (dev, attr);
 380                 if (prop) {
 381                         output = strdup (prop);
 382                         DEBUG ("disk plugin: renaming %s => %s", disk_name, output);
 383                 }
 384                 udev_device_unref (dev);
 385         }
 386         return output;
 387 }
 388 #endif
 389
 390 #if HAVE_IOKIT_IOKITLIB_H
 391 static signed long long dict_get_value (CFDictionaryRef dict, const char *key)
 392 {
 393         signed long long val_int;
 394         CFNumberRef      val_obj;
 395         CFStringRef      key_obj;
 396
 397         /* `key_obj' needs to be released. */
 398         key_obj = CFStringCreateWithCString (kCFAllocatorDefault, key,
 399                         kCFStringEncodingASCII);
 400         if (key_obj == NULL)
 401         {
 402                 DEBUG ("CFStringCreateWithCString (%s) failed.", key);
 403                 return (-1LL);
 404         }
 405
 406         /* get => we don't need to release (== free) the object */
 407         val_obj = (CFNumberRef) CFDictionaryGetValue (dict, key_obj);
 408
 409         CFRelease (key_obj);
 410
 411         if (val_obj == NULL)
 412         {
 413                 DEBUG ("CFDictionaryGetValue (%s) failed.", key);
 414                 return (-1LL);
 415         }
 416
 417         if (!CFNumberGetValue (val_obj, kCFNumberSInt64Type, &val_int))
 418         {
 419                 DEBUG ("CFNumberGetValue (%s) failed.", key);
 420                 return (-1LL);
 421         }
 422
 423         return (val_int);
 424 }
 425 #endif /* HAVE_IOKIT_IOKITLIB_H */
 426
 427 static int disk_read (void)
 428 {
 429 #if HAVE_IOKIT_IOKITLIB_H
 430         io_registry_entry_t     disk;
 431         io_registry_entry_t     disk_child;
 432         io_iterator_t           disk_list;
 433         CFMutableDictionaryRef  props_dict, child_dict;
 434         CFDictionaryRef         stats_dict;
 435         CFStringRef             tmp_cf_string_ref;
 436         kern_return_t           status;
 437
 438         signed long long read_ops, read_byt, read_tme;
 439         signed long long write_ops, write_byt, write_tme;
 440
 441         int  disk_major, disk_minor;
 442         char disk_name[DATA_MAX_NAME_LEN];
 443         char child_disk_name_bsd[DATA_MAX_NAME_LEN], props_disk_name_bsd[DATA_MAX_NAME_LEN];
 444
 445         /* Get the list of all disk objects. */
 446         if (IOServiceGetMatchingServices (io_master_port, IOServiceMatching (kIOBlockStorageDriverClass), &disk_list) != kIOReturnSuccess) {
 447                 ERROR ("disk plugin: IOServiceGetMatchingServices failed.");
 448                 return (-1);
 449         }
 450
 451         while ((disk = IOIteratorNext (disk_list)) != 0) {
 452                 props_dict = NULL;
 453                 stats_dict = NULL;
 454                 child_dict = NULL;
 455
 456                 /* get child of disk entry and corresponding property dictionary */
 457                 if ((status = IORegistryEntryGetChildEntry (disk, kIOServicePlane, &disk_child)) != kIOReturnSuccess) {
 458                         /* This fails for example for DVD/CD drives, which we want to ignore anyway */
 459                         DEBUG ("IORegistryEntryGetChildEntry (disk) failed: 0x%08x", status);
 460                         IOObjectRelease (disk);
 461                         continue;
 462                 }
 463                 if (IORegistryEntryCreateCFProperties (disk_child, (CFMutableDictionaryRef *) &child_dict, kCFAllocatorDefault, kNilOptions) != kIOReturnSuccess || child_dict == NULL) {
 464                         ERROR ("disk plugin: IORegistryEntryCreateCFProperties (disk_child) failed.");
 465                         IOObjectRelease (disk_child);
 466                         IOObjectRelease (disk);
 467                         continue;
 468                 }
 469
 470                 /* extract name and major/minor numbers */
 471                 memset (child_disk_name_bsd, 0, sizeof (child_disk_name_bsd));
 472                 tmp_cf_string_ref = (CFStringRef) CFDictionaryGetValue (child_dict, CFSTR(kIOBSDNameKey));
 473                 if (tmp_cf_string_ref) {
 474                         assert (CFGetTypeID (tmp_cf_string_ref) == CFStringGetTypeID ());
 475                         CFStringGetCString (tmp_cf_string_ref, child_disk_name_bsd, sizeof (child_disk_name_bsd), kCFStringEncodingUTF8);
 476                 }
 477                 disk_major = (int) dict_get_value (child_dict, kIOBSDMajorKey);
 478                 disk_minor = (int) dict_get_value (child_dict, kIOBSDMinorKey);
 479                 DEBUG ("disk plugin: child_disk_name_bsd=\"%s\" major=%d minor=%d", child_disk_name_bsd, disk_major, disk_minor);
 480                 CFRelease (child_dict);
 481                 IOObjectRelease (disk_child);
 482
 483                 /* get property dictionary of the disk entry itself */
 484                 if (IORegistryEntryCreateCFProperties (disk, (CFMutableDictionaryRef *) &props_dict, kCFAllocatorDefault, kNilOptions) != kIOReturnSuccess || props_dict == NULL) {
 485                         ERROR ("disk-plugin: IORegistryEntryCreateCFProperties failed.");
 486                         IOObjectRelease (disk);
 487                         continue;
 488                 }
 489
 490                 /* extract name and stats dictionary */
 491                 memset (props_disk_name_bsd, 0, sizeof (props_disk_name_bsd));
 492                 tmp_cf_string_ref = (CFStringRef) CFDictionaryGetValue (props_dict, CFSTR(kIOBSDNameKey));
 493                 if (tmp_cf_string_ref) {
 494                         assert (CFGetTypeID (tmp_cf_string_ref) == CFStringGetTypeID ());
 495                         CFStringGetCString (tmp_cf_string_ref, props_disk_name_bsd, sizeof (props_disk_name_bsd), kCFStringEncodingUTF8);
 496                 }
 497                 stats_dict = (CFDictionaryRef) CFDictionaryGetValue (props_dict, CFSTR (kIOBlockStorageDriverStatisticsKey));
 498                 if (stats_dict == NULL) {
 499                         ERROR ("disk plugin: CFDictionaryGetValue (%s) failed.", kIOBlockStorageDriverStatisticsKey);
 500                         CFRelease (props_dict);
 501                         IOObjectRelease (disk);
 502                         continue;
 503                 }
 504                 DEBUG ("disk plugin: props_disk_name_bsd=\"%s\"", props_disk_name_bsd);
 505
 506                 /* choose name */
 507                 if (use_bsd_name) {
 508                         if (child_disk_name_bsd[0] != 0)
 509                                 sstrncpy (disk_name, child_disk_name_bsd, sizeof (disk_name));
 510                         else if (props_disk_name_bsd[0] != 0)
 511                                 sstrncpy (disk_name, props_disk_name_bsd, sizeof (disk_name));
 512                         else {
 513                                 ERROR ("disk plugin: can't find bsd disk name.");
 514                                 ssnprintf (disk_name, sizeof (disk_name), "%i-%i", disk_major, disk_minor);
 515                         }
 516                 }
 517                 else
 518                         ssnprintf (disk_name, sizeof (disk_name), "%i-%i", disk_major, disk_minor);
 519
 520                 DEBUG ("disk plugin: disk_name = \"%s\"", disk_name);
 521
 522                 /* check the name against ignore list */
 523                 if (ignorelist_match (ignorelist, disk_name) != 0) {
 524                         CFRelease (props_dict);
 525                         IOObjectRelease (disk);
 526                         continue;
 527                 }
 528
 529                 /* extract the stats */
 530                 read_ops  = dict_get_value (stats_dict, kIOBlockStorageDriverStatisticsReadsKey);
 531                 read_byt  = dict_get_value (stats_dict, kIOBlockStorageDriverStatisticsBytesReadKey);
 532                 read_tme  = dict_get_value (stats_dict, kIOBlockStorageDriverStatisticsTotalReadTimeKey);
 533                 write_ops = dict_get_value (stats_dict, kIOBlockStorageDriverStatisticsWritesKey);
 534                 write_byt = dict_get_value (stats_dict, kIOBlockStorageDriverStatisticsBytesWrittenKey);
 535                 write_tme = dict_get_value (stats_dict, kIOBlockStorageDriverStatisticsTotalWriteTimeKey);
 536                 CFRelease (props_dict);
 537                 IOObjectRelease (disk);
 538
 539                 /* and submit */
 540                 if ((read_byt != -1LL) || (write_byt != -1LL))
 541                         disk_submit (disk_name, "disk_octets", read_byt, write_byt);
 542                 if ((read_ops != -1LL) || (write_ops != -1LL))
 543                         disk_submit (disk_name, "disk_ops", read_ops, write_ops);
 544                 if ((read_tme != -1LL) || (write_tme != -1LL))
 545                         disk_submit (disk_name, "disk_time", read_tme / 1000, write_tme / 1000);
 546
 547         }
 548         IOObjectRelease (disk_list);
 549 /* #endif HAVE_IOKIT_IOKITLIB_H */
 550
 551 #elif KERNEL_FREEBSD
 552         int retry, dirty;
 553
 554         void *snap = NULL;
 555         struct devstat *snap_iter;
 556
 557         struct gident *geom_id;
 558
 559         const char *disk_name;
 560         long double read_time, write_time, busy_time, total_duration;
 561
 562         for (retry = 0, dirty = 1; retry < 5 && dirty == 1; retry++) {
 563                 if (snap != NULL)
 564                         geom_stats_snapshot_free(snap);
 565
 566                 /* Get a fresh copy of stats snapshot */
 567                 snap = geom_stats_snapshot_get();
 568                 if (snap == NULL) {
 569                         ERROR("disk plugin: geom_stats_snapshot_get() failed.");
 570                         return (-1);
 571                 }
 572
 573                 /* Check if we have dirty read from this snapshot */
 574                 dirty = 0;
 575                 geom_stats_snapshot_reset(snap);
 576                 while ((snap_iter = geom_stats_snapshot_next(snap)) != NULL) {
 577                         if (snap_iter->id == NULL)
 578                                 continue;
 579                         geom_id = geom_lookupid(&geom_tree, snap_iter->id);
 580
 581                         /* New device? refresh GEOM tree */
 582                         if (geom_id == NULL) {
 583                                 geom_deletetree(&geom_tree);
 584                                 if (geom_gettree(&geom_tree) != 0) {
 585                                         ERROR("disk plugin: geom_gettree() failed");
 586                                         geom_stats_snapshot_free(snap);
 587                                         return (-1);
 588                                 }
 589                                 geom_id = geom_lookupid(&geom_tree, snap_iter->id);
 590                         }
 591                         /*
 592                          * This should be rare: the device come right before we take the
 593                          * snapshot and went away right after it.  We will handle this
 594                          * case later, so don't mark dirty but silently ignore it.
 595                          */
 596                         if (geom_id == NULL)
 597                                 continue;
 598
 599                         /* Only collect PROVIDER data */
 600                         if (geom_id->lg_what != ISPROVIDER)
 601                                 continue;
 602
 603                         /* Only collect data when rank is 1 (physical devices) */
 604                         if (((struct gprovider *)(geom_id->lg_ptr))->lg_geom->lg_rank != 1)
 605                                 continue;
 606
 607                         /* Check if this is a dirty read quit for another try */
 608                         if (snap_iter->sequence0 != snap_iter->sequence1) {
 609                                 dirty = 1;
 610                                 break;
 611                         }
 612                 }
 613         }
 614
 615         /* Reset iterator */
 616         geom_stats_snapshot_reset(snap);
 617         for (;;) {
 618                 snap_iter = geom_stats_snapshot_next(snap);
 619                 if (snap_iter == NULL)
 620                         break;
 621
 622                 if (snap_iter->id == NULL)
 623                         continue;
 624                 geom_id = geom_lookupid(&geom_tree, snap_iter->id);
 625                 if (geom_id == NULL)
 626                         continue;
 627                 if (geom_id->lg_what != ISPROVIDER)
 628                         continue;
 629                 if (((struct gprovider *)(geom_id->lg_ptr))->lg_geom->lg_rank != 1)
 630                         continue;
 631                 /* Skip dirty reads, if present */
 632                 if (dirty && (snap_iter->sequence0 != snap_iter->sequence1))
 633                         continue;
 634
 635                 disk_name = ((struct gprovider *)geom_id->lg_ptr)->lg_name;
 636
 637                 if (ignorelist_match (ignorelist, disk_name) != 0)
 638                         continue;
 639
 640                 if ((snap_iter->bytes[DEVSTAT_READ] != 0) || (snap_iter->bytes[DEVSTAT_WRITE] != 0)) {
 641                         disk_submit(disk_name, "disk_octets",
 642                                         (derive_t)snap_iter->bytes[DEVSTAT_READ],
 643                                         (derive_t)snap_iter->bytes[DEVSTAT_WRITE]);
 644                 }
 645
 646                 if ((snap_iter->operations[DEVSTAT_READ] != 0) || (snap_iter->operations[DEVSTAT_WRITE] != 0)) {
 647                         disk_submit(disk_name, "disk_ops",
 648                                         (derive_t)snap_iter->operations[DEVSTAT_READ],
 649                                         (derive_t)snap_iter->operations[DEVSTAT_WRITE]);
 650                 }
 651
 652                 read_time = devstat_compute_etime(&snap_iter->duration[DEVSTAT_READ], NULL);
 653                 write_time = devstat_compute_etime(&snap_iter->duration[DEVSTAT_WRITE], NULL);
 654                 if ((read_time != 0) || (write_time != 0)) {
 655                         disk_submit (disk_name, "disk_time",
 656                                         (derive_t)(read_time*1000), (derive_t)(write_time*1000));
 657                 }
 658                 if (devstat_compute_statistics(snap_iter, NULL, 1.0,
 659                     DSM_TOTAL_BUSY_TIME, &busy_time,
 660                     DSM_TOTAL_DURATION, &total_duration,
 661                     DSM_NONE) != 0) {
 662                         WARNING("%s", devstat_errbuf);
 663                 }
 664                 else
 665                 {
 666                         submit_io_time(disk_name, busy_time, total_duration);
 667                 }
 668         }
 669         geom_stats_snapshot_free(snap);
 670
 671 #elif KERNEL_LINUX
 672         FILE *fh;
 673         char buffer[1024];
 674
 675         char *fields[32];
 676         int numfields;
 677         int fieldshift = 0;
 678
 679         int minor = 0;
 680
 681         derive_t read_sectors  = 0;
 682         derive_t write_sectors = 0;
 683
 684         derive_t read_ops      = 0;
 685         derive_t read_merged   = 0;
 686         derive_t read_time     = 0;
 687         derive_t write_ops     = 0;
 688         derive_t write_merged  = 0;
 689         derive_t write_time    = 0;
 690         gauge_t in_progress    = NAN;
 691         derive_t io_time       = 0;
 692         derive_t weighted_time = 0;
 693         int is_disk = 0;
 694
 695         diskstats_t *ds, *pre_ds;
 696
 697         if ((fh = fopen ("/proc/diskstats", "r")) == NULL)
 698         {
 699                 fh = fopen ("/proc/partitions", "r");
 700                 if (fh == NULL)
 701                 {
 702                         ERROR ("disk plugin: fopen (/proc/{diskstats,partitions}) failed.");
 703                         return (-1);
 704                 }
 705
 706                 /* Kernel is 2.4.* */
 707                 fieldshift = 1;
 708         }
 709
 710         while (fgets (buffer, sizeof (buffer), fh) != NULL)
 711         {
 712                 char *disk_name;
 713                 char *output_name;
 714
 715                 numfields = strsplit (buffer, fields, 32);
 716
 717                 if ((numfields != (14 + fieldshift)) && (numfields != 7))
 718                         continue;
 719
 720                 minor = atoll (fields[1]);
 721
 722                 disk_name = fields[2 + fieldshift];
 723
 724                 for (ds = disklist, pre_ds = disklist; ds != NULL; pre_ds = ds, ds = ds->next)
 725                         if (strcmp (disk_name, ds->name) == 0)
 726                                 break;
 727
 728                 if (ds == NULL)
 729                 {
 730                         if ((ds = (diskstats_t *) calloc (1, sizeof (diskstats_t))) == NULL)
 731                                 continue;
 732
 733                         if ((ds->name = strdup (disk_name)) == NULL)
 734                         {
 735                                 free (ds);
 736                                 continue;
 737                         }
 738
 739                         if (pre_ds == NULL)
 740                                 disklist = ds;
 741                         else
 742                                 pre_ds->next = ds;
 743                 }
 744
 745                 is_disk = 0;
 746                 if (numfields == 7)
 747                 {
 748                         /* Kernel 2.6, Partition */
 749                         read_ops      = atoll (fields[3]);
 750                         read_sectors  = atoll (fields[4]);
 751                         write_ops     = atoll (fields[5]);
 752                         write_sectors = atoll (fields[6]);
 753                 }
 754                 else if (numfields == (14 + fieldshift))
 755                 {
 756                         read_ops  =  atoll (fields[3 + fieldshift]);
 757                         write_ops =  atoll (fields[7 + fieldshift]);
 758
 759                         read_sectors  = atoll (fields[5 + fieldshift]);
 760                         write_sectors = atoll (fields[9 + fieldshift]);
 761
 762                         if ((fieldshift == 0) || (minor == 0))
 763                         {
 764                                 is_disk = 1;
 765                                 read_merged  = atoll (fields[4 + fieldshift]);
 766                                 read_time    = atoll (fields[6 + fieldshift]);
 767                                 write_merged = atoll (fields[8 + fieldshift]);
 768                                 write_time   = atoll (fields[10+ fieldshift]);
 769
 770                                 in_progress = atof (fields[11 + fieldshift]);
 771
 772                                 io_time       = atof (fields[12 + fieldshift]);
 773                                 weighted_time = atof (fields[13 + fieldshift]);
 774                         }
 775                 }
 776                 else
 777                 {
 778                         DEBUG ("numfields = %i; => unknown file format.", numfields);
 779                         continue;
 780                 }
 781
 782                 {
 783                         derive_t diff_read_sectors;
 784                         derive_t diff_write_sectors;
 785
 786                 /* If the counter wraps around, it's only 32 bits.. */
 787                         if (read_sectors < ds->read_sectors)
 788                                 diff_read_sectors = 1 + read_sectors
 789                                         + (UINT_MAX - ds->read_sectors);
 790                         else
 791                                 diff_read_sectors = read_sectors - ds->read_sectors;
 792                         if (write_sectors < ds->write_sectors)
 793                                 diff_write_sectors = 1 + write_sectors
 794                                         + (UINT_MAX - ds->write_sectors);
 795                         else
 796                                 diff_write_sectors = write_sectors - ds->write_sectors;
 797
 798                         ds->read_bytes += 512 * diff_read_sectors;
 799                         ds->write_bytes += 512 * diff_write_sectors;
 800                         ds->read_sectors = read_sectors;
 801                         ds->write_sectors = write_sectors;
 802                 }
 803
 804                 /* Calculate the average time an io-op needs to complete */
 805                 if (is_disk)
 806                 {
 807                         derive_t diff_read_ops;
 808                         derive_t diff_write_ops;
 809                         derive_t diff_read_time;
 810                         derive_t diff_write_time;
 811
 812                         if (read_ops < ds->read_ops)
 813                                 diff_read_ops = 1 + read_ops
 814                                         + (UINT_MAX - ds->read_ops);
 815                         else
 816                                 diff_read_ops = read_ops - ds->read_ops;
 817                         DEBUG ("disk plugin: disk_name = %s; read_ops = %"PRIi64"; "
 818                                         "ds->read_ops = %"PRIi64"; diff_read_ops = %"PRIi64";",
 819                                         disk_name,
 820                                         read_ops, ds->read_ops, diff_read_ops);
 821
 822                         if (write_ops < ds->write_ops)
 823                                 diff_write_ops = 1 + write_ops
 824                                         + (UINT_MAX - ds->write_ops);
 825                         else
 826                                 diff_write_ops = write_ops - ds->write_ops;
 827
 828                         if (read_time < ds->read_time)
 829                                 diff_read_time = 1 + read_time
 830                                         + (UINT_MAX - ds->read_time);
 831                         else
 832                                 diff_read_time = read_time - ds->read_time;
 833
 834                         if (write_time < ds->write_time)
 835                                 diff_write_time = 1 + write_time
 836                                         + (UINT_MAX - ds->write_time);
 837                         else
 838                                 diff_write_time = write_time - ds->write_time;
 839
 840                         if (diff_read_ops != 0)
 841                                 ds->avg_read_time += disk_calc_time_incr (
 842                                                 diff_read_time, diff_read_ops);
 843                         if (diff_write_ops != 0)
 844                                 ds->avg_write_time += disk_calc_time_incr (
 845                                                 diff_write_time, diff_write_ops);
 846
 847                         ds->read_ops = read_ops;
 848                         ds->read_time = read_time;
 849                         ds->write_ops = write_ops;
 850                         ds->write_time = write_time;
 851
 852                         if (read_merged || write_merged)
 853                                 ds->has_merged = 1;
 854
 855                         if (in_progress)
 856                                 ds->has_in_progress = 1;
 857
 858                         if (io_time)
 859                                 ds->has_io_time = 1;
 860
 861                 } /* if (is_disk) */
 862
 863                 /* Don't write to the RRDs if we've just started.. */
 864                 ds->poll_count++;
 865                 if (ds->poll_count <= 2)
 866                 {
 867                         DEBUG ("disk plugin: (ds->poll_count = %i) <= "
 868                                         "(min_poll_count = 2); => Not writing.",
 869                                         ds->poll_count);
 870                         continue;
 871                 }
 872
 873                 if ((read_ops == 0) && (write_ops == 0))
 874                 {
 875                         DEBUG ("disk plugin: ((read_ops == 0) && "
 876                                         "(write_ops == 0)); => Not writing.");
 877                         continue;
 878                 }
 879
 880                 output_name = disk_name;
 881
 882 #if HAVE_LIBUDEV
 883                 char *alt_name = NULL;
 884                 if (conf_udev_name_attr != NULL)
 885                 {
 886                         alt_name = disk_udev_attr_name (handle_udev, disk_name, conf_udev_name_attr);
 887                         if (alt_name != NULL)
 888                                 output_name = alt_name;
 889                 }
 890 #endif
 891
 892                 if (ignorelist_match (ignorelist, output_name) != 0)
 893                 {
 894 #if HAVE_LIBUDEV
 895                         /* release udev-based alternate name, if allocated */
 896                         sfree (alt_name);
 897 #endif
 898                         continue;
 899                 }
 900
 901                 if ((ds->read_bytes != 0) || (ds->write_bytes != 0))
 902                         disk_submit (output_name, "disk_octets",
 903                                         ds->read_bytes, ds->write_bytes);
 904
 905                 if ((ds->read_ops != 0) || (ds->write_ops != 0))
 906                         disk_submit (output_name, "disk_ops",
 907                                         read_ops, write_ops);
 908
 909                 if ((ds->avg_read_time != 0) || (ds->avg_write_time != 0))
 910                         disk_submit (output_name, "disk_time",
 911                                         ds->avg_read_time, ds->avg_write_time);
 912
 913                 if (is_disk)
 914                 {
 915                         if (ds->has_merged)
 916                                 disk_submit (output_name, "disk_merged",
 917                                         read_merged, write_merged);
 918                         if (ds->has_in_progress)
 919                                 submit_in_progress (output_name, in_progress);
 920                         if (ds->has_io_time)
 921                                 submit_io_time (output_name, io_time, weighted_time);
 922                 } /* if (is_disk) */
 923
 924 #if HAVE_LIBUDEV
 925                 /* release udev-based alternate name, if allocated */
 926                 sfree (alt_name);
 927 #endif
 928         } /* while (fgets (buffer, sizeof (buffer), fh) != NULL) */
 929
 930
 931         fclose (fh);
 932 /* #endif defined(KERNEL_LINUX) */
 933
 934 #elif HAVE_LIBKSTAT
 935 # if HAVE_KSTAT_IO_T_WRITES && HAVE_KSTAT_IO_T_NWRITES && HAVE_KSTAT_IO_T_WTIME
 936 #  define KIO_ROCTETS reads
 937 #  define KIO_WOCTETS writes
 938 #  define KIO_ROPS    nreads
 939 #  define KIO_WOPS    nwrites
 940 #  define KIO_RTIME   rtime
 941 #  define KIO_WTIME   wtime
 942 # elif HAVE_KSTAT_IO_T_NWRITTEN && HAVE_KSTAT_IO_T_WRITES && HAVE_KSTAT_IO_T_WTIME
 943 #  define KIO_ROCTETS nread
 944 #  define KIO_WOCTETS nwritten
 945 #  define KIO_ROPS    reads
 946 #  define KIO_WOPS    writes
 947 #  define KIO_RTIME   rtime
 948 #  define KIO_WTIME   wtime
 949 # else
 950 #  error "kstat_io_t does not have the required members"
 951 # endif
 952         static kstat_io_t kio;
 953
 954         if (kc == NULL)
 955                 return (-1);
 956
 957         for (int i = 0; i < numdisk; i++)
 958         {
 959                 if (kstat_read (kc, ksp[i], &kio) == -1)
 960                         continue;
 961
 962                 if (strncmp (ksp[i]->ks_class, "disk", 4) == 0)
 963                 {
 964                         if (ignorelist_match (ignorelist, ksp[i]->ks_name) != 0)
 965                                 continue;
 966
 967                         disk_submit (ksp[i]->ks_name, "disk_octets",
 968                                         kio.KIO_ROCTETS, kio.KIO_WOCTETS);
 969                         disk_submit (ksp[i]->ks_name, "disk_ops",
 970                                         kio.KIO_ROPS, kio.KIO_WOPS);
 971                         /* FIXME: Convert this to microseconds if necessary */
 972                         disk_submit (ksp[i]->ks_name, "disk_time",
 973                                         kio.KIO_RTIME, kio.KIO_WTIME);
 974                 }
 975                 else if (strncmp (ksp[i]->ks_class, "partition", 9) == 0)
 976                 {
 977                         if (ignorelist_match (ignorelist, ksp[i]->ks_name) != 0)
 978                                 continue;
 979
 980                         disk_submit (ksp[i]->ks_name, "disk_octets",
 981                                         kio.KIO_ROCTETS, kio.KIO_WOCTETS);
 982                         disk_submit (ksp[i]->ks_name, "disk_ops",
 983                                         kio.KIO_ROPS, kio.KIO_WOPS);
 984                 }
 985         }
 986 /* #endif defined(HAVE_LIBKSTAT) */
 987
 988 #elif defined(HAVE_LIBSTATGRAB)
 989         sg_disk_io_stats *ds;
 990 # if HAVE_LIBSTATGRAB_0_90
 991         size_t disks;
 992 # else
 993         int disks;
 994 #endif
 995         char name[DATA_MAX_NAME_LEN];
 996
 997         if ((ds = sg_get_disk_io_stats(&disks)) == NULL)
 998                 return (0);
 999
1000         for (int counter = 0; counter < disks; counter++) {
1001                 strncpy(name, ds->disk_name, sizeof(name));
1002                 name[sizeof(name)-1] = '\0'; /* strncpy doesn't terminate longer strings */
1003
1004                 if (ignorelist_match (ignorelist, name) != 0) {
1005                         ds++;
1006                         continue;
1007                 }
1008
1009                 disk_submit (name, "disk_octets", ds->read_bytes, ds->write_bytes);
1010                 ds++;
1011         }
1012 /* #endif defined(HAVE_LIBSTATGRAB) */
1013
1014 #elif defined(HAVE_PERFSTAT)
1015         derive_t read_sectors;
1016         derive_t write_sectors;
1017         derive_t read_time;
1018         derive_t write_time;
1019         derive_t read_ops;
1020         derive_t write_ops;
1021         perfstat_id_t firstpath;
1022         int rnumdisk;
1023
1024         if ((numdisk = perfstat_disk(NULL, NULL, sizeof(perfstat_disk_t), 0)) < 0)
1025         {
1026                 char errbuf[1024];
1027                 WARNING ("disk plugin: perfstat_disk: %s",
1028                                 sstrerror (errno, errbuf, sizeof (errbuf)));
1029                 return (-1);
1030         }
1031
1032         if (numdisk != pnumdisk || stat_disk==NULL) {
1033                 if (stat_disk!=NULL)
1034                         free(stat_disk);
1035                 stat_disk = (perfstat_disk_t *)calloc(numdisk, sizeof(perfstat_disk_t));
1036         }
1037         pnumdisk = numdisk;
1038
1039         firstpath.name[0]='\0';
1040         if ((rnumdisk = perfstat_disk(&firstpath, stat_disk, sizeof(perfstat_disk_t), numdisk)) < 0)
1041         {
1042                 char errbuf[1024];
1043                 WARNING ("disk plugin: perfstat_disk : %s",
1044                                 sstrerror (errno, errbuf, sizeof (errbuf)));
1045                 return (-1);
1046         }
1047
1048         for (int i = 0; i < rnumdisk; i++)
1049         {
1050                 if (ignorelist_match (ignorelist, stat_disk[i].name) != 0)
1051                         continue;
1052
1053                 read_sectors = stat_disk[i].rblks*stat_disk[i].bsize;
1054                 write_sectors = stat_disk[i].wblks*stat_disk[i].bsize;
1055                 disk_submit (stat_disk[i].name, "disk_octets", read_sectors, write_sectors);
1056
1057                 read_ops = stat_disk[i].xrate;
1058                 write_ops = stat_disk[i].xfers - stat_disk[i].xrate;
1059                 disk_submit (stat_disk[i].name, "disk_ops", read_ops, write_ops);
1060
1061                 read_time = stat_disk[i].rserv;
1062                 read_time *= ((double)(_system_configuration.Xint)/(double)(_system_configuration.Xfrac)) / 1000000.0;
1063                 write_time = stat_disk[i].wserv;
1064                 write_time *= ((double)(_system_configuration.Xint)/(double)(_system_configuration.Xfrac)) / 1000000.0;
1065                 disk_submit (stat_disk[i].name, "disk_time", read_time, write_time);
1066         }
1067 #endif /* defined(HAVE_PERFSTAT) */
1068
1069         return (0);
1070 } /* int disk_read */
1071
1072 void module_register (void)
1073 {
1074   plugin_register_config ("disk", disk_config,
1075       config_keys, config_keys_num);
1076   plugin_register_init ("disk", disk_init);
1077   plugin_register_shutdown ("disk", disk_shutdown);
1078   plugin_register_read ("disk", disk_read);
1079 } /* void module_register */