src/libstatgrab/load_stats.c

/*
 * i-scream libstatgrab
 * http://www.i-scream.org
 * Copyright (C) 2000-2004 i-scream
 * 
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 * 
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 * 
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
 * 02111-1307 USA
 *
 * $Id: load_stats.c,v 1.18 2005/09/24 13:29:22 tdb Exp $ 
 */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <stdio.h>
#include <stdlib.h>
#include "statgrab.h"
#ifdef SOLARIS
#ifdef HAVE_SYS_LOADAVG_H
#include <sys/loadavg.h>
#else
#include <kstat.h>
#endif
#endif
#ifdef HPUX
#include <sys/param.h>
#include <sys/pstat.h>
#endif

sg_load_stats *sg_get_load_stats(){

#if !defined(CYGWIN) && !defined(WIN32)
        static sg_load_stats load_stat;

#ifdef HPUX
        struct pst_dynamic pstat_dynamic;
#else
        double loadav[3];
#endif
#endif /* not CYGWIN or WIN32 */

#ifdef CYGWIN
        sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
        return NULL;
#elif defined(WIN32)
        sg_set_error(SG_ERROR_UNSUPPORTED, "Win32");
        return NULL;
#else

#if defined(SOLARIS) && !defined(HAVE_SYS_LOADAVG_H)

        kstat_ctl_t *kc;        
        kstat_t *ksp;
        kstat_named_t *kn;

        if ((kc = kstat_open()) == NULL) {
                sg_set_error(SG_ERROR_KSTAT_OPEN, NULL);
                return NULL;
        }

        if((ksp=kstat_lookup(kc, "unix", 0, "system_misc")) == NULL){
                sg_set_error(SG_ERROR_KSTAT_LOOKUP, "unix,0,system_misc");
                kstat_close(kc);
                return NULL;
        }

        if (kstat_read(kc, ksp, 0) == -1) {
                sg_set_error(SG_ERROR_KSTAT_READ, NULL);
                kstat_close(kc);
                return NULL;
        }

        kstat_close(kc);

        if((kn=kstat_data_lookup(ksp, "avenrun_1min")) == NULL){
                sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_1min");
                return NULL;
        }
        load_stat.min1 = (double)kn->value.ui32 / (double)256;

        if((kn=kstat_data_lookup(ksp, "avenrun_5min")) == NULL){
                sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_5min");
                return NULL;
        }
        load_stat.min5 = (double)kn->value.ui32 / (double)256;

        if((kn=kstat_data_lookup(ksp, "avenrun_15min")) == NULL){
                sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_15min");
                return NULL;
        }
        load_stat.min15 = (double)kn->value.ui32 / (double)256;
#elif defined(HPUX)
        if (pstat_getdynamic(&pstat_dynamic, sizeof(pstat_dynamic), 1, 0) == -1) {
                sg_set_error_with_errno(SG_ERROR_PSTAT, "pstat_dynamic");
                return NULL;
        }

        load_stat.min1=pstat_dynamic.psd_avg_1_min;
        load_stat.min5=pstat_dynamic.psd_avg_5_min;
        load_stat.min15=pstat_dynamic.psd_avg_15_min;
#else
        getloadavg(loadav,3);

        load_stat.min1=loadav[0];
        load_stat.min5=loadav[1];
        load_stat.min15=loadav[2];
#endif

        return &load_stat;
#endif
}
Revision:	1.19
Committed:	Mon Oct 9 14:09:38 2006 UTC (17 years, 7 months ago) by tdb
Content type:	text/plain
Branch:	MAIN
CVS Tags:	LIBSTATGRAB_0_17, LIBSTATGRAB_0_16, LIBSTATGRAB_0_15, LIBSTATGRAB_0_14
Changes since 1.18:	+5 -1 lines
Log Message:	Make sure we always close kstat. Spotted by: "Javier Donaire" <jyuyu@fraguel.org> (in load_stats.c)
#	User	Rev	Content
1	tdb	1.8	/*
2	tdb	1.13	* i-scream libstatgrab
3	tdb	1.4	* http://www.i-scream.org
4	tdb	1.8	* Copyright (C) 2000-2004 i-scream
5	pajs	1.1	*
6	tdb	1.8	* This library is free software; you can redistribute it and/or
7			* modify it under the terms of the GNU Lesser General Public
8			* License as published by the Free Software Foundation; either
9			* version 2.1 of the License, or (at your option) any later version.
10	pajs	1.1	*
11	tdb	1.8	* This library is distributed in the hope that it will be useful,
12	pajs	1.1	* but WITHOUT ANY WARRANTY; without even the implied warranty of
13	tdb	1.8	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14			* Lesser General Public License for more details.
15	pajs	1.1	*
16	tdb	1.8	* You should have received a copy of the GNU Lesser General Public
17			* License along with this library; if not, write to the Free Software
18			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19			* 02111-1307 USA
20	tdb	1.9	*
21	tdb	1.19	* $Id: load_stats.c,v 1.18 2005/09/24 13:29:22 tdb Exp $
22	pajs	1.1	*/
23
24			#ifdef HAVE_CONFIG_H
25			#include "config.h"
26			#endif
27
28			#include <stdio.h>
29			#include <stdlib.h>
30	tdb	1.3	#include "statgrab.h"
31	pajs	1.1	#ifdef SOLARIS
32	pajs	1.10	#ifdef HAVE_SYS_LOADAVG_H
33	pajs	1.1	#include <sys/loadavg.h>
34	pajs	1.10	#else
35			#include <kstat.h>
36			#endif
37	pajs	1.1	#endif
38	tdb	1.16	#ifdef HPUX
39			#include <sys/param.h>
40			#include <sys/pstat.h>
41			#endif
42	pajs	1.1
43	ats	1.12	sg_load_stats *sg_get_load_stats(){
44	pajs	1.1
45	tdb	1.18	#if !defined(CYGWIN) && !defined(WIN32)
46	ats	1.12	static sg_load_stats load_stat;
47	pajs	1.1
48	tdb	1.16	#ifdef HPUX
49			struct pst_dynamic pstat_dynamic;
50	ats	1.17	#else
51			double loadav[3];
52	tdb	1.16	#endif
53	tdb	1.18	#endif /* not CYGWIN or WIN32 */
54	ats	1.6
55			#ifdef CYGWIN
56	tdb	1.15	sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
57	tdb	1.18	return NULL;
58			#elif defined(WIN32)
59			sg_set_error(SG_ERROR_UNSUPPORTED, "Win32");
60	ats	1.6	return NULL;
61			#else
62	tdb	1.5
63	pajs	1.10	#if defined(SOLARIS) && !defined(HAVE_SYS_LOADAVG_H)
64	pajs	1.11
65			kstat_ctl_t *kc;
66	tdb	1.14	kstat_t *ksp;
67			kstat_named_t *kn;
68	pajs	1.10
69			if ((kc = kstat_open()) == NULL) {
70	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_OPEN, NULL);
71	tdb	1.14	return NULL;
72			}
73	pajs	1.10
74	pajs	1.11	if((ksp=kstat_lookup(kc, "unix", 0, "system_misc")) == NULL){
75	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_LOOKUP, "unix,0,system_misc");
76	tdb	1.19	kstat_close(kc);
77	tdb	1.14	return NULL;
78			}
79	pajs	1.10
80	tdb	1.14	if (kstat_read(kc, ksp, 0) == -1) {
81	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_READ, NULL);
82	tdb	1.19	kstat_close(kc);
83	tdb	1.14	return NULL;
84			}
85	pajs	1.10
86	tdb	1.19	kstat_close(kc);
87
88	pajs	1.10	if((kn=kstat_data_lookup(ksp, "avenrun_1min")) == NULL){
89	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_1min");
90	tdb	1.14	return NULL;
91			}
92	pajs	1.11	load_stat.min1 = (double)kn->value.ui32 / (double)256;
93	pajs	1.10
94	tdb	1.14	if((kn=kstat_data_lookup(ksp, "avenrun_5min")) == NULL){
95	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_5min");
96	tdb	1.14	return NULL;
97			}
98			load_stat.min5 = (double)kn->value.ui32 / (double)256;
99
100			if((kn=kstat_data_lookup(ksp, "avenrun_15min")) == NULL){
101	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_15min");
102	tdb	1.14	return NULL;
103			}
104			load_stat.min15 = (double)kn->value.ui32 / (double)256;
105	tdb	1.16	#elif defined(HPUX)
106			if (pstat_getdynamic(&pstat_dynamic, sizeof(pstat_dynamic), 1, 0) == -1) {
107			sg_set_error_with_errno(SG_ERROR_PSTAT, "pstat_dynamic");
108			return NULL;
109			}
110
111			load_stat.min1=pstat_dynamic.psd_avg_1_min;
112			load_stat.min5=pstat_dynamic.psd_avg_5_min;
113			load_stat.min15=pstat_dynamic.psd_avg_15_min;
114	pajs	1.10	#else
115	ats	1.6	getloadavg(loadav,3);
116	pajs	1.1
117			load_stat.min1=loadav[0];
118			load_stat.min5=loadav[1];
119			load_stat.min15=loadav[2];
120	pajs	1.10	#endif
121	pajs	1.1
122			return &load_stat;
123	ats	1.6	#endif
124	pajs	1.1	}