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