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.15 2004/04/07 21:08:40 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(){

        static sg_load_stats load_stat;

        double loadav[3];
#ifdef HPUX
        struct pst_dynamic pstat_dynamic;
#endif

#ifdef CYGWIN
        sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
        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.16
Committed:	Mon Nov 1 18:30:17 2004 UTC (19 years, 6 months ago) by tdb
Content type:	text/plain
Branch:	MAIN
Changes since 1.15:	+17 -1 lines
Log Message:	Merge in patch to provide support for HP-UX 11.11. Contributed by Roy Keene - thanks Roy!
#	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.16	* $Id: load_stats.c,v 1.15 2004/04/07 21:08:40 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	ats	1.12	static sg_load_stats load_stat;
46	pajs	1.1
47			double loadav[3];
48	tdb	1.16	#ifdef HPUX
49			struct pst_dynamic pstat_dynamic;
50			#endif
51	ats	1.6
52			#ifdef CYGWIN
53	tdb	1.15	sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
54	ats	1.6	return NULL;
55			#else
56	tdb	1.5
57	pajs	1.10	#if defined(SOLARIS) && !defined(HAVE_SYS_LOADAVG_H)
58	pajs	1.11
59			kstat_ctl_t *kc;
60	tdb	1.14	kstat_t *ksp;
61			kstat_named_t *kn;
62	pajs	1.10
63			if ((kc = kstat_open()) == NULL) {
64	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_OPEN, NULL);
65	tdb	1.14	return NULL;
66			}
67	pajs	1.10
68	pajs	1.11	if((ksp=kstat_lookup(kc, "unix", 0, "system_misc")) == NULL){
69	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_LOOKUP, "unix,0,system_misc");
70	tdb	1.14	return NULL;
71			}
72	pajs	1.10
73	tdb	1.14	if (kstat_read(kc, ksp, 0) == -1) {
74	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_READ, NULL);
75	tdb	1.14	return NULL;
76			}
77	pajs	1.10
78			if((kn=kstat_data_lookup(ksp, "avenrun_1min")) == NULL){
79	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_1min");
80	tdb	1.14	return NULL;
81			}
82	pajs	1.11	load_stat.min1 = (double)kn->value.ui32 / (double)256;
83	pajs	1.10
84	tdb	1.14	if((kn=kstat_data_lookup(ksp, "avenrun_5min")) == NULL){
85	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_5min");
86	tdb	1.14	return NULL;
87			}
88			load_stat.min5 = (double)kn->value.ui32 / (double)256;
89
90			if((kn=kstat_data_lookup(ksp, "avenrun_15min")) == NULL){
91	tdb	1.15	sg_set_error(SG_ERROR_KSTAT_DATA_LOOKUP, "avenrun_15min");
92	tdb	1.14	return NULL;
93			}
94			load_stat.min15 = (double)kn->value.ui32 / (double)256;
95	tdb	1.16	#elif defined(HPUX)
96			if (pstat_getdynamic(&pstat_dynamic, sizeof(pstat_dynamic), 1, 0) == -1) {
97			sg_set_error_with_errno(SG_ERROR_PSTAT, "pstat_dynamic");
98			return NULL;
99			}
100
101			load_stat.min1=pstat_dynamic.psd_avg_1_min;
102			load_stat.min5=pstat_dynamic.psd_avg_5_min;
103			load_stat.min15=pstat_dynamic.psd_avg_15_min;
104	pajs	1.10	#else
105	ats	1.6	getloadavg(loadav,3);
106	pajs	1.1
107			load_stat.min1=loadav[0];
108			load_stat.min5=loadav[1];
109			load_stat.min15=loadav[2];
110	pajs	1.10	#endif
111	pajs	1.1
112			return &load_stat;
113	ats	1.6	#endif
114	pajs	1.1	}