ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/projects/libstatgrab/src/libstatgrab/disk_stats.c

Comparing projects/libstatgrab/src/libstatgrab/disk_stats.c (file contents):
Revision 1.10 by pajs, Tue Mar 4 18:06:16 2003 UTC vs.
Revision 1.22 by pajs, Fri Sep 26 16:33:51 2003 UTC

#	Line 1 | Line 1
1		/*
2		* i-scream central monitoring system
3	<	* http://www.i-scream.org.uk
4	<	* Copyright (C) 2000-2002 i-scream
3	>	* http://www.i-scream.org
4	>	* Copyright (C) 2000-2003 i-scream
5		*
6		* This program is free software; you can redistribute it and/or
7		* modify it under the terms of the GNU General Public License
#	Line 22 | Line 22
22		#include "config.h"
23		#endif
24
25	+	#include <stdio.h>
26		#include <stdlib.h>
27		#include <string.h>
28		#include "statgrab.h"
29
30		#ifdef SOLARIS
30	–	#include <stdio.h>
31		#include <sys/mnttab.h>
32		#include <sys/statvfs.h>
33		#include <kstat.h>
34	+	#include <sys/types.h>
35	+	#include <dirent.h>
36	+	#include <limits.h>
37	+	#include <unistd.h>
38		#define VALID_FS_TYPES {"ufs", "tmpfs"}
39		#endif
40
41		#ifdef LINUX
38	–	#include <stdio.h>
42		#include <sys/vfs.h>
43		#include <mntent.h>
44		#include "tools.h"
45		#define VALID_FS_TYPES {"ext2", "ext3", "xfs", "reiserfs", "vfat", "tmpfs"}
46		#endif
47
48	+	#ifdef FREEBSD
49	+	#include <sys/param.h>
50	+	#include <sys/ucred.h>
51	+	#include <sys/mount.h>
52	+	#include <sys/dkstat.h>
53	+	#include <devstat.h>
54	+	#define VALID_FS_TYPES {"ufs", "mfs"}
55	+	#endif
56		#define START_VAL 1
57
58	+	/* Solaris kernel stores the disk names in the old BSD format
59	+	* and we would prefer it in th modern format.
60	+	*/
61	+	#ifdef SOLARIS
62	+	/* Lines from the path_to_inst file */
63	+	typedef struct {
64	+	/* unlikely to get a line that long */
65	+	char line[256];
66	+	}file_line_t;
67	+
68	+	/* Linked list of the mappings from the older bsd-based sunos names
69	+	* to the modern solaris names
70	+	*/
71	+	struct disk_mapping_ent_t{
72	+	char *sunos_name;
73	+	char *solaris_name;
74	+	struct disk_mapping_ent_t *next;
75	+	};
76	+	typedef struct disk_mapping_ent_t disk_mapping_t;
77	+	#endif
78	+
79		char *copy_string(char *orig_ptr, const char *newtext){
80
81		/* Maybe free if not NULL, and strdup rather than realloc and strcpy? */
#	Line 76 | Line 108 | disk_stat_t *get_disk_stats(int *entries){
108		char *fs_types[] = VALID_FS_TYPES;
109		int x, valid_type;
110		int num_disks=0;
111	+	#if defined(LINUX) || defined (SOLARIS)
112		FILE *f;
113	+	#endif
114
115		disk_stat_t *disk_ptr;
116
117		#ifdef SOLARIS
118	<	struct mnttab *mp;
118	>	struct mnttab mp;
119		struct statvfs fs;
120		#endif
121		#ifdef LINUX
122		struct mntent *mp;
123		struct statfs fs;
124		#endif
125	+	#ifdef FREEBSD
126	+	int nummnt;
127	+	struct statfs *mp;
128	+	#endif
129
130		if(watermark==-1){
131		disk_stats=malloc(START_VAL * sizeof(disk_stat_t));
#	Line 97 | Line 135 | disk_stat_t *get_disk_stats(int *entries){
135		watermark=START_VAL;
136		init_disk_stat(0, watermark-1, disk_stats);
137		}
138	+	#ifdef FREEBSD
139	+	nummnt=getmntinfo(&mp , MNT_LOCAL);
140	+	if (nummnt<=0){
141	+	return NULL;
142	+	}
143	+	for(;nummnt--; mp++){
144	+	valid_type=0;
145	+	for(x=0;x<((sizeof(fs_types))/(sizeof(char*)));x++){
146	+	if(strcmp(mp->f_fstypename, fs_types[x]) ==0){
147	+	valid_type=1;
148	+	break;
149	+	}
150	+	}
151	+	#endif
152	+
153		#ifdef LINUX
154		if ((f=setmntent("/etc/mtab", "r" ))==NULL){
155		return NULL;
#	Line 146 | Line 199 | disk_stat_t *get_disk_stats(int *entries){
199		}
200
201		disk_ptr=disk_stats+num_disks;
202	+	#ifdef FREEBSD
203	+	if((disk_ptr->device_name=copy_string(disk_ptr->device_name, mp->f_mntfromname))==NULL){
204	+	return NULL;
205	+	}
206	+
207	+	if((disk_ptr->fs_type=copy_string(disk_ptr->fs_type, mp->f_fstypename))==NULL){
208	+	return NULL;
209	+	}
210	+
211	+	if((disk_ptr->mnt_point=copy_string(disk_ptr->mnt_point, mp->f_mntonname))==NULL){
212	+	return NULL;
213	+	}
214	+
215	+	disk_ptr->size = (long long)mp->f_bsize * (long long) mp->f_blocks;
216	+	disk_ptr->avail = (long long)mp->f_bsize * (long long) mp->f_bavail;
217	+	disk_ptr->used = (disk_ptr->size) - ((long long)mp->f_bsize * (long long)mp->f_bfree);
218	+
219	+	disk_ptr->total_inodes=(long long)mp->f_files;
220	+	disk_ptr->free_inodes=(long long)mp->f_ffree;
221	+	/* Freebsd doesn't have a "available" inodes */
222	+	disk_ptr->used_inodes=disk_ptr->total_inodes-disk_ptr->free_inodes;
223	+	#endif
224		#ifdef LINUX
225		if((disk_ptr->device_name=copy_string(disk_ptr->device_name, mp->mnt_fsname))==NULL){
226		return NULL;
#	Line 201 | Line 276 | disk_stat_t *get_disk_stats(int *entries){
276		*entries=num_disks;
277
278		/* If this fails, there is very little i can do about it, so i'll ignore it :) */
279	+	#if defined(LINUX) || defined(SOLARIS)
280		fclose(f);
281	+	#endif
282
283		return disk_stats;
284
#	Line 215 | Line 292 | void diskio_stat_init(int start, int end, diskio_stat_
292		}
293		}
294
295	+	#ifdef SOLARIS
296	+	char *drive_map(char *sunos_name){
297	+	file_line_t *file_lines = NULL;
298	+	file_line_t *f_ptr;
299	+	static disk_mapping_t *disk_mapping = NULL;
300	+	disk_mapping_t *d_ptr;
301	+	int x = 0;
302	+	int y = 256;
303	+	FILE *f;
304	+	DIR *dsk;
305	+	struct dirent *dsk_ent;
306	+	char linkpointer[PATH_MAX];
307	+	char link_path[PATH_MAX];
308	+	char *p, *r, *q;
309	+
310	+	int dev_num;
311	+	char dev_name[51];
312	+
313	+	if(disk_mapping == NULL){
314	+	/* Read in the path_to_inst file into memory */
315	+	file_lines = malloc(sizeof(file_line_t) * y);
316	+	f_ptr = file_lines;
317	+	if(file_lines == NULL) return NULL;
318	+	f = fopen("/etc/path_to_inst", "r");
319	+	if (f == NULL){
320	+	free(file_lines);
321	+	return NULL;
322	+	}
323	+	for(x=0;fgets(f_ptr->line, sizeof(f_ptr->line), f);x++){
324	+	if ((x+1) >= y){
325	+	y = y*2;
326	+	file_lines = realloc(file_lines, sizeof(file_line_t) * y);
327	+	if (file_lines == NULL) return NULL;
328	+	}
329	+	f_ptr++;
330	+	}
331	+	f_ptr = NULL;
332	+	fclose(f);
333	+
334	+	dsk = opendir("/dev/dsk");
335	+	if (dsk == NULL){
336	+	free(file_lines);
337	+	return NULL;
338	+	}
339	+
340	+	while((dsk_ent = readdir(dsk)) != NULL){
341	+	snprintf(link_path, sizeof(link_path), "/dev/dsk/%s", dsk_ent->d_name);
342	+	/* Ignore the non symlinks, e.g. ".." and "." */
343	+	if((readlink(link_path, linkpointer, PATH_MAX)) == -1) continue;
344	+	/* We are only intrested in the string past the ../../devices/ part */
345	+	p = strstr(linkpointer, "devices");
346	+	p+=8;
347	+
348	+	/* We are not intrested in the :a etc slices */
349	+	q = strrchr(p, ':');
350	+	*q = '\0';
351	+
352	+	/* char *p should not contain the info we need to look up in the
353	+	* path_to_inst file.
354	+	*/
355	+
356	+	for(f_ptr = file_lines; f_ptr != NULL; f_ptr++){
357	+	r = strstr(f_ptr->line, p);
358	+	if (r != NULL) break;
359	+	}
360	+
361	+	if(r == NULL){
362	+	free(file_lines);
363	+	closedir(dsk);
364	+	return NULL;
365	+	}
366	+
367	+	/* f_ptr should be pointing to the line of path_to_inst we are intrested in now */
368	+
369	+	sscanf(r, "%*s %d \"%50s", &dev_num, dev_name);
370	+	q = strrchr(dev_name, '"');
371	+	if (q == NULL){
372	+	free(file_lines);
373	+	closedir(dsk);
374	+	return NULL;
375	+	}
376	+	*q = '\0';
377	+
378	+	/* Nasty... Add the number to the end of the string.. This means
379	+	* dev_name now contains the sunos name.. E.g. ssd1
380	+	*/
381	+	snprintf(dev_name, 50, "%s%d", dev_name, dev_num);
382	+	if (disk_mapping == NULL){
383	+	disk_mapping = malloc(sizeof(disk_mapping_t));
384	+	d_ptr = disk_mapping;
385	+	}else{
386	+	d_ptr->next = malloc(sizeof(disk_mapping_t));
387	+	d_ptr = d_ptr->next;
388	+	}
389	+
390	+	if (d_ptr == NULL){
391	+	free(file_lines);
392	+	closedir(dsk);
393	+	return NULL;
394	+	}
395	+
396	+	if( ((d_ptr->sunos_name = strdup(dev_name)) == NULL) ||
397	+	((d_ptr->solaris_name = strdup(dsk_ent->d_name))==NULL) ){
398	+	free(file_lines);
399	+	closedir(dsk);
400	+	return NULL;
401	+	}
402	+	}
403	+	free(file_lines);
404	+	closedir(dsk);
405	+	}
406	+
407	+	for(d_ptr = disk_mapping; d_ptr !=NULL; d_ptr=d_ptr->next){
408	+	if(!strcmp(sunos_name, d_ptr->sunos_name)){
409	+	return (strdup(d_ptr->solaris_name));
410	+	}
411	+	}
412	+
413	+	/* If we really fail to find it.. Return the original name back */
414	+	return strdup(sunos_name);
415	+	}
416	+
417	+	#endif
418	+
419		diskio_stat_t *diskio_stat_malloc(int needed_entries, int *cur_entries, diskio_stat_t *diskio_stats){
420
421		if(diskio_stats==NULL){
#	Line 244 | Line 445 | diskio_stat_t *diskio_stat_malloc(int needed_entries,
445		static diskio_stat_t *diskio_stats=NULL;
446		static int num_diskio=0;
447
448	+	#ifdef LINUX
449	+	typedef struct {
450	+	int major;
451	+	int minor;
452	+	} partition;
453	+	#endif
454	+
455		diskio_stat_t *get_diskio_stats(int *entries){
456
457		static int sizeof_diskio_stats=0;
#	Line 259 | Line 467 | diskio_stat_t *get_diskio_stats(int *entries){
467		char *line_ptr;
468		int major, minor;
469		char dev_letter;
470	+	int has_pp_stats = 1;
471	+	static partition *parts = NULL;
472	+	static int alloc_parts = 0;
473	+	int i, n;
474	+	time_t now;
475		#endif
476	<
476	>	#ifdef FREEBSD
477	>	static struct statinfo stats;
478	>	static int stats_init = 0;
479	>	int counter;
480	>	struct device_selection *dev_sel = NULL;
481	>	int n_selected, n_selections;
482	>	long sel_gen;
483	>	struct devstat *dev_ptr;
484	>	#endif
485		num_diskio=0;
486
487	+	#ifdef FREEBSD
488	+	if (!stats_init) {
489	+	stats.dinfo=malloc(sizeof(struct devinfo));
490	+	if(stats.dinfo==NULL) return NULL;
491	+	stats_init = 1;
492	+	}
493	+	if ((getdevs(&stats)) < 0) return NULL;
494	+	/* Not aware of a get all devices, so i said 999. If we ever
495	+	* find a machine with more than 999 disks, then i'll change
496	+	* this number :)
497	+	*/
498	+	if (selectdevs(&dev_sel, &n_selected, &n_selections, &sel_gen, stats.dinfo->generation, stats.dinfo->devices, stats.dinfo->numdevs, NULL, 0, NULL, 0, DS_SELECT_ONLY, 999, 1) < 0) return NULL;
499	+
500	+	for(counter=0;counter<stats.dinfo->numdevs;counter++){
501	+	dev_ptr=&stats.dinfo->devices[dev_sel[counter].position];
502	+
503	+	/* Throw away devices that have done nothing, ever.. Eg "odd"
504	+	* devices.. like mem, proc.. and also doesn't report floppy
505	+	* drives etc unless they are doing stuff :)
506	+	*/
507	+	if((dev_ptr->bytes_read==0) && (dev_ptr->bytes_written==0)) continue;
508	+	if((diskio_stats=diskio_stat_malloc(num_diskio+1, &sizeof_diskio_stats, diskio_stats))==NULL){
509	+	return NULL;
510	+	}
511	+	diskio_stats_ptr=diskio_stats+num_diskio;
512	+
513	+	diskio_stats_ptr->read_bytes=dev_ptr->bytes_read;
514	+	diskio_stats_ptr->write_bytes=dev_ptr->bytes_written;
515	+	if(diskio_stats_ptr->disk_name!=NULL) free(diskio_stats_ptr->disk_name);
516	+	asprintf((&diskio_stats_ptr->disk_name), "%s%d", dev_ptr->device_name, dev_ptr->unit_number);
517	+	diskio_stats_ptr->systime=time(NULL);
518	+
519	+	num_diskio++;
520	+	}
521	+	free(dev_sel);
522	+	free(stats.dinfo);
523	+
524	+	#endif
525		#ifdef SOLARIS
526		if ((kc = kstat_open()) == NULL) {
527		return NULL;
#	Line 289 | Line 548 | diskio_stat_t *get_diskio_stats(int *entries){
548
549		if(diskio_stats_ptr->disk_name!=NULL) free(diskio_stats_ptr->disk_name);
550
551	<	diskio_stats_ptr->disk_name=strdup(ksp->ks_name);
551	>	diskio_stats_ptr->disk_name=drive_map(ksp->ks_name);
552	>	diskio_stats_ptr->systime=time(NULL);
553		num_diskio++;
554		}
555		}
#	Line 298 | Line 558 | diskio_stat_t *get_diskio_stats(int *entries){
558		#endif
559
560		#ifdef LINUX
561	<	f=fopen("/proc/stat", "r");
562	<	if(f==NULL){
563	<	return NULL;
564	<	}
565	<	if((line_ptr=f_read_line(f, "disk_io:"))==NULL){
566	<	return NULL;
567	<	}
568	<	while((line_ptr=strchr(line_ptr, ' '))!=NULL){
569	<	if((diskio_stats=diskio_stat_malloc(num_diskio+1, &sizeof_diskio_stats, diskio_stats))==NULL){
570	<	fclose(f);
571	<	return NULL;
561	>	num_diskio = 0;
562	>	n = 0;
563	>
564	>	/* Read /proc/partitions to find what devices exist. Recent 2.4 kernels
565	>	have statistics in here too, so we can use those directly. */
566	>
567	>	f = fopen("/proc/partitions", "r");
568	>	if (f == NULL) goto out;
569	>	now = time(NULL);
570	>
571	>	while ((line_ptr = f_read_line(f, "")) != NULL) {
572	>	char name[20];
573	>	char *s;
574	>	long long rsect, wsect;
575	>
576	>	int nr = sscanf(line_ptr,
577	>	" %d %d %*d %19s %*d %*d %lld %*d %*d %*d %lld",
578	>	&major, &minor, name, &rsect, &wsect);
579	>	if (nr < 3) continue;
580	>	if (nr < 5) {
581	>	has_pp_stats = 0;
582	>	rsect = 0;
583	>	wsect = 0;
584		}
313	–	diskio_stats_ptr=diskio_stats+num_diskio;
585
586	+	/* Skip device names ending in numbers, since they're
587	+	partitions. */
588	+	s = name;
589	+	while (*s != '\0') s++;
590	+	--s;
591	+	if (*s >= '0' && *s <= '9') continue;
592
593	<	sscanf(line_ptr, "(%d,%d):(%*d, %lld, %*d, %lld, %*d)", \
594	<	&major, \
595	<	&minor, \
596	<	&diskio_stats_ptr->read_bytes, \
597	<	&diskio_stats_ptr->write_bytes);
593	>	diskio_stats = diskio_stat_malloc(n + 1, &sizeof_diskio_stats,
594	>	diskio_stats);
595	>	if (diskio_stats == NULL) goto out;
596	>	if (n >= alloc_parts) {
597	>	alloc_parts += 16;
598	>	parts = realloc(parts, alloc_parts * sizeof *parts);
599	>	if (parts == NULL) {
600	>	alloc_parts = 0;
601	>	goto out;
602	>	}
603	>	}
604
605	<	if(diskio_stats_ptr->disk_name!=NULL) free(diskio_stats_ptr->disk_name);
605	>	if (diskio_stats[n].disk_name != NULL)
606	>	free(diskio_stats[n].disk_name);
607	>	diskio_stats[n].disk_name = strdup(name);
608	>	diskio_stats[n].read_bytes = rsect * 512;
609	>	diskio_stats[n].write_bytes = wsect * 512;
610	>	diskio_stats[n].systime = now;
611	>	parts[n].major = major;
612	>	parts[n].minor = minor;
613
614	<	switch(major){
615	<	case 3:
326	<	if(minor==0){
327	<	diskio_stats_ptr->disk_name=strdup("hda");
328	<	}else{
329	<	diskio_stats_ptr->disk_name=strdup("hdb");
330	<	}
331	<	break;
614	>	n++;
615	>	}
616
617	+	if (!has_pp_stats) {
618	+	/* This is an older kernel without stats in /proc/partitions.
619	+	Read what we can from /proc/stat instead. */
620	+
621	+	f = fopen("/proc/stat", "r");
622	+	if (f == NULL) goto out;
623	+	now = time(NULL);
624	+
625	+	line_ptr = f_read_line(f, "disk_io:");
626	+	if (line_ptr == NULL) goto out;
627	+
628	+	while((line_ptr=strchr(line_ptr, ' '))!=NULL){
629	+	long long rsect, wsect;
630	+
631	+	if (*++line_ptr == '\0') break;
632	+
633	+	if((sscanf(line_ptr,
634	+	"(%d,%d):(%*d, %*d, %lld, %*d, %lld)",
635	+	&major, &minor, &rsect, &wsect)) != 4) {
636	+	continue;
637	+	}
638	+
639	+	/* Find the corresponding device from earlier.
640	+	Just to add to the fun, "minor" is actually the disk
641	+	number, not the device minor, so we need to figure
642	+	out the real minor number based on the major!
643	+	This list is not exhaustive; if you're running
644	+	an older kernel you probably don't have fancy
645	+	I2O hardware anyway... */
646	+	switch (major) {
647	+	case 3:
648	+	case 21:
649		case 22:
650	<	if(minor==0){
651	<	diskio_stats_ptr->disk_name=strdup("hdc");
652	<	}else{
653	<	diskio_stats_ptr->disk_name=strdup("hdd");
654	<	}
655	<	case 8:
656	<	dev_letter='a'+(minor/16);
657	<	diskio_stats_ptr->disk_name=malloc(4);
658	<	snprintf(diskio_stats_ptr->disk_name, 4, "sd%c", dev_letter);
650	>	case 33:
651	>	case 34:
652	>	case 36:
653	>	case 56:
654	>	case 57:
655	>	case 88:
656	>	case 89:
657	>	case 90:
658	>	case 91:
659	>	minor *= 64;
660	>	break;
661	>	case 9:
662	>	case 43:
663	>	break;
664		default:
665	<	/* I have no idea what it is then :) */
666	<	diskio_stats_ptr->disk_name=malloc(16);
667	<	snprintf(diskio_stats_ptr->disk_name, 16, "%d %d", major, minor);
668	<	}
665	>	minor *= 16;
666	>	break;
667	>	}
668	>	for (i = 0; i < n; i++) {
669	>	if (major == parts[i].major
670	>	&& minor == parts[i].minor)
671	>	break;
672	>	}
673	>	if (i == n) continue;
674
675	<	num_diskio++;
675	>	/* We read the number of blocks. Blocks are stored in
676	>	512 bytes */
677	>	diskio_stats[i].read_bytes = rsect * 512;
678	>	diskio_stats[i].write_bytes = wsect * 512;
679	>	diskio_stats[i].systime = now;
680	>	}
681		}
682	+
683	+	num_diskio = n;
684	+	out:
685	+	if (f != NULL) fclose(f);
686
687		#endif
688		*entries=num_diskio;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines