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.17 2004/11/07 12:29:20 ats 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");
                return NULL;
        }

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

        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.18
Committed:	Sat Sep 24 13:29:22 2005 UTC (18 years, 7 months ago) by tdb
Content type:	text/plain
Branch:	MAIN
CVS Tags:	LIBSTATGRAB_0_13
Changes since 1.17:	+6 -1 lines
Log Message:	Add WIN32 support via MINGW. We'll need to add stuff to the README file about what this requires to build. All the hard work done by: skel
#	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.18	* $Id: load_stats.c,v 1.17 2004/11/07 12:29:20 ats 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.14	return NULL;
77			}
78	pajs	1.10
79	tdb	1.14	if (kstat_read(kc, ksp, 0) == -1) {
80	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_READ, NULL);
81	tdb	1.14	return NULL;
82			}
83	pajs	1.10
84			if((kn=kstat_data_lookup(ksp, "avenrun_1min")) == NULL){
85	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_1min");
86	tdb	1.14	return NULL;
87			}
88	pajs	1.11	load_stat.min1 = (double)kn->value.ui32 / (double)256;
89	pajs	1.10
90	tdb	1.14	if((kn=kstat_data_lookup(ksp, "avenrun_5min")) == NULL){
91	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_5min");
92	tdb	1.14	return NULL;
93			}
94			load_stat.min5 = (double)kn->value.ui32 / (double)256;
95
96			if((kn=kstat_data_lookup(ksp, "avenrun_15min")) == NULL){
97	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_15min");
98	tdb	1.14	return NULL;
99			}
100			load_stat.min15 = (double)kn->value.ui32 / (double)256;
101	tdb	1.16	#elif defined(HPUX)
102			if (pstat_getdynamic(&pstat_dynamic, sizeof(pstat_dynamic), 1, 0) == -1) {
103			sg_set_error_with_errno(SG_ERROR_PSTAT, "pstat_dynamic");
104			return NULL;
105			}
106
107			load_stat.min1=pstat_dynamic.psd_avg_1_min;
108			load_stat.min5=pstat_dynamic.psd_avg_5_min;
109			load_stat.min15=pstat_dynamic.psd_avg_15_min;
110	pajs	1.10	#else
111	ats	1.6	getloadavg(loadav,3);
112	pajs	1.1
113			load_stat.min1=loadav[0];
114			load_stat.min5=loadav[1];
115			load_stat.min15=loadav[2];
116	pajs	1.10	#endif
117	pajs	1.1
118			return &load_stat;
119	ats	1.6	#endif
120	pajs	1.1	}