src/libstatgrab/swap_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: swap_stats.c,v 1.24 2005/09/24 13:29:23 tdb Exp $
 */

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

#include "statgrab.h"
#include "tools.h"
#ifdef SOLARIS
#include <sys/stat.h>
#include <sys/swap.h>
#include <unistd.h>
#endif
#if defined(LINUX) || defined(CYGWIN)
#include <stdio.h>
#include <string.h>
#endif
#if defined(FREEBSD) || defined(DFBSD)
#ifdef FREEBSD5
#include <sys/param.h>
#include <sys/sysctl.h>
#include <sys/user.h>
#else
#include <sys/types.h>
#include <kvm.h>
#endif
#include <unistd.h>
#endif
#if defined(NETBSD) || defined(OPENBSD)
#include <sys/param.h>
#include <sys/time.h>
#include <uvm/uvm.h>
#include <unistd.h>
#endif
#ifdef HPUX
#include <sys/param.h>
#include <sys/pstat.h>
#include <unistd.h>
#define SWAP_BATCH 5
#endif
#ifdef WIN32
#include <windows.h>
#endif

sg_swap_stats *sg_get_swap_stats(){

        static sg_swap_stats swap_stat;

#ifdef HPUX
        struct pst_swapinfo pstat_swapinfo[SWAP_BATCH];
        int swapidx = 0;
        int num, i;
#endif
#ifdef SOLARIS
        struct anoninfo ai;
        int pagesize;
#endif
#if defined(LINUX) || defined(CYGWIN)
        FILE *f;
        char *line_ptr;
        unsigned long long value;
#endif
#if defined(FREEBSD) || defined(DFBSD)
        int pagesize;
#ifdef FREEBSD5
        struct xswdev xsw;
        int mib[16], n;
        size_t mibsize, size;
#else
        struct kvm_swap swapinfo;
        kvm_t *kvmd;
#endif
#endif
#if defined(NETBSD) || defined(OPENBSD)
        struct uvmexp *uvm;
#endif
#ifdef WIN32
        MEMORYSTATUSEX memstats;
#endif

#ifdef HPUX
        swap_stat.total = 0;
        swap_stat.used = 0;
        swap_stat.free = 0;

        while (1) {
                num = pstat_getswap(pstat_swapinfo, sizeof pstat_swapinfo[0],
                                    SWAP_BATCH, swapidx);
                if (num == -1) {
                        sg_set_error_with_errno(SG_ERROR_PSTAT,
                                                "pstat_getswap");
                        return NULL;
                } else if (num == 0) {
                        break;
                }

                for (i = 0; i < num; i++) {
                        struct pst_swapinfo *si = &pstat_swapinfo[i];

                        if ((si->pss_flags & SW_ENABLED) != SW_ENABLED) {
                                continue;
                        }
        
                        if ((si->pss_flags & SW_BLOCK) == SW_BLOCK) {
                                swap_stat.total += ((long long) si->pss_nblksavail) * 1024LL;
                                swap_stat.used += ((long long) si->pss_nfpgs) * 1024LL;
                                swap_stat.free = swap_stat.total - swap_stat.used;
                        }
                        if ((si->pss_flags & SW_FS) == SW_FS) {
                                swap_stat.total += ((long long) si->pss_limit) * 1024LL;
                                swap_stat.used += ((long long) si->pss_allocated) * 1024LL;
                                swap_stat.free = swap_stat.total - swap_stat.used;
                        }
                }
                swapidx = pstat_swapinfo[num - 1].pss_idx + 1;
        }
#endif
#ifdef SOLARIS
        if((pagesize=sysconf(_SC_PAGESIZE)) == -1){
                sg_set_error_with_errno(SG_ERROR_SYSCONF, "_SC_PAGESIZE");
                return NULL;
        }
        if (swapctl(SC_AINFO, &ai) == -1) {
                sg_set_error_with_errno(SG_ERROR_SWAPCTL, NULL);
                return NULL;
        }
        swap_stat.total = (long long)ai.ani_max * (long long)pagesize;
        swap_stat.used = (long long)ai.ani_resv * (long long)pagesize;
        swap_stat.free = swap_stat.total - swap_stat.used;
#endif
#if defined(LINUX) || defined(CYGWIN)
        if ((f = fopen("/proc/meminfo", "r")) == NULL) {
                sg_set_error_with_errno(SG_ERROR_OPEN, "/proc/meminfo");
                return NULL;
        }

        while ((line_ptr = sg_f_read_line(f, "")) != NULL) {
                if (sscanf(line_ptr, "%*s %llu kB", &value) != 1) {
                        continue;
                }
                value *= 1024;

                if (strncmp(line_ptr, "SwapTotal:", 10) == 0) {
                        swap_stat.total = value;
                } else if (strncmp(line_ptr, "SwapFree:", 9) == 0) {
                        swap_stat.free = value;
                }
        }

        fclose(f);
        swap_stat.used = swap_stat.total - swap_stat.free;
#endif
#if defined(FREEBSD) || defined(DFBSD)
        pagesize=getpagesize();

#ifdef FREEBSD5
        swap_stat.total = 0;
        swap_stat.used = 0;

        mibsize = sizeof mib / sizeof mib[0];
        if (sysctlnametomib("vm.swap_info", mib, &mibsize) < 0) {
                sg_set_error_with_errno(SG_ERROR_SYSCTLNAMETOMIB,
                                        "vm.swap_info");
                return NULL;
        }
        for (n = 0; ; ++n) {
                mib[mibsize] = n;
                size = sizeof xsw;
                if (sysctl(mib, mibsize + 1, &xsw, &size, NULL, 0) < 0) {
                        break;
                }
                if (xsw.xsw_version != XSWDEV_VERSION) {
                        sg_set_error(SG_ERROR_XSW_VER_MISMATCH, NULL);
                        return NULL;
                }
                swap_stat.total += (long long) xsw.xsw_nblks;
                swap_stat.used += (long long) xsw.xsw_used;
        }
        if (errno != ENOENT) {
                sg_set_error_with_errno(SG_ERROR_SYSCTL, "vm.swap_info");
                return NULL;
        }
#else
        if((kvmd = sg_get_kvm()) == NULL){
                return NULL;
        }
        if ((kvm_getswapinfo(kvmd, &swapinfo, 1,0)) == -1){
                sg_set_error(SG_ERROR_KVM_GETSWAPINFO, NULL);
                return NULL;
        }

        swap_stat.total = (long long)swapinfo.ksw_total;
        swap_stat.used = (long long)swapinfo.ksw_used;
#endif
        swap_stat.total *= pagesize;
        swap_stat.used *= pagesize;
        swap_stat.free = swap_stat.total - swap_stat.used;
#endif
#if defined(NETBSD) || defined(OPENBSD)
        if ((uvm = sg_get_uvmexp()) == NULL) {
                return NULL;
        }

        swap_stat.total = (long long)uvm->pagesize * (long long)uvm->swpages;
        swap_stat.used = (long long)uvm->pagesize * (long long)uvm->swpginuse;
        swap_stat.free = swap_stat.total - swap_stat.used;
#endif
#ifdef WIN32
        memstats.dwLength = sizeof(memstats);
        if (!GlobalMemoryStatusEx(&memstats)) {
                sg_set_error_with_errno(SG_ERROR_MEMSTATUS,
                        "GloblaMemoryStatusEx");
                return NULL;
        }
        /* the PageFile stats include Phys memory "minus an overhead".
         * Due to this unknown "overhead" there's no way to extract just page
         * file use from these numbers */
        swap_stat.total = memstats.ullTotalPageFile;
        swap_stat.free = memstats.ullAvailPageFile;
        swap_stat.used = swap_stat.total - swap_stat.free;
#endif

        return &swap_stat;

}
Revision:	1.25
Committed:	Thu Jul 5 16:46:06 2007 UTC (16 years, 10 months ago) by tdb
Content type:	text/plain
Branch:	MAIN
CVS Tags:	LIBSTATGRAB_0_17, LIBSTATGRAB_0_16, LIBSTATGRAB_0_15
Changes since 1.24:	+2 -2 lines
Log Message:	Last argument to sysctl is an integer not a pointer. It should be set to 0 if the preceding argument is NULL.
#	User	Rev	Content
1	tdb	1.10	/*
2	tdb	1.19	* i-scream libstatgrab
3	tdb	1.5	* http://www.i-scream.org
4	tdb	1.10	* Copyright (C) 2000-2004 i-scream
5	pajs	1.1	*
6	tdb	1.10	* 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.10	* 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.10	* 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.10	* 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.11	*
21	tdb	1.25	* $Id: swap_stats.c,v 1.24 2005/09/24 13:29:23 tdb Exp $
22	pajs	1.1	*/
23
24			#ifdef HAVE_CONFIG_H
25			#include "config.h"
26			#endif
27
28			#include "statgrab.h"
29	ats	1.6	#include "tools.h"
30	pajs	1.1	#ifdef SOLARIS
31			#include <sys/stat.h>
32			#include <sys/swap.h>
33			#include <unistd.h>
34			#endif
35	ats	1.9	#if defined(LINUX) \|\| defined(CYGWIN)
36	pajs	1.3	#include <stdio.h>
37	ats	1.8	#include <string.h>
38	pajs	1.3	#endif
39	tdb	1.16	#if defined(FREEBSD) \|\| defined(DFBSD)
40	tdb	1.15	#ifdef FREEBSD5
41			#include <sys/param.h>
42			#include <sys/sysctl.h>
43			#include <sys/user.h>
44			#else
45	pajs	1.4	#include <sys/types.h>
46			#include <kvm.h>
47			#endif
48	tdb	1.17	#include <unistd.h>
49	tdb	1.15	#endif
50	tdb	1.13	#if defined(NETBSD) \|\| defined(OPENBSD)
51	tdb	1.12	#include <sys/param.h>
52	ats	1.14	#include <sys/time.h>
53	tdb	1.12	#include <uvm/uvm.h>
54	tdb	1.17	#include <unistd.h>
55	tdb	1.12	#endif
56	tdb	1.22	#ifdef HPUX
57			#include <sys/param.h>
58			#include <sys/pstat.h>
59			#include <unistd.h>
60	ats	1.23	#define SWAP_BATCH 5
61	tdb	1.22	#endif
62	tdb	1.24	#ifdef WIN32
63			#include <windows.h>
64			#endif
65	pajs	1.1
66	ats	1.18	sg_swap_stats *sg_get_swap_stats(){
67	pajs	1.1
68	ats	1.18	static sg_swap_stats swap_stat;
69	pajs	1.1
70	tdb	1.22	#ifdef HPUX
71	ats	1.23	struct pst_swapinfo pstat_swapinfo[SWAP_BATCH];
72	tdb	1.22	int swapidx = 0;
73	ats	1.23	int num, i;
74	tdb	1.22	#endif
75	pajs	1.3	#ifdef SOLARIS
76	pajs	1.1	struct anoninfo ai;
77			int pagesize;
78	pajs	1.3	#endif
79	ats	1.9	#if defined(LINUX) \|\| defined(CYGWIN)
80	pajs	1.3	FILE *f;
81			char *line_ptr;
82	ats	1.8	unsigned long long value;
83	pajs	1.3	#endif
84	tdb	1.16	#if defined(FREEBSD) \|\| defined(DFBSD)
85	tdb	1.15	int pagesize;
86			#ifdef FREEBSD5
87			struct xswdev xsw;
88			int mib[16], n;
89			size_t mibsize, size;
90			#else
91	pajs	1.4	struct kvm_swap swapinfo;
92	ats	1.6	kvm_t *kvmd;
93	pajs	1.4	#endif
94	tdb	1.15	#endif
95	tdb	1.12	#if defined(NETBSD) \|\| defined(OPENBSD)
96	ats	1.7	struct uvmexp *uvm;
97			#endif
98	tdb	1.24	#ifdef WIN32
99			MEMORYSTATUSEX memstats;
100			#endif
101	pajs	1.1
102	tdb	1.22	#ifdef HPUX
103			swap_stat.total = 0;
104			swap_stat.used = 0;
105			swap_stat.free = 0;
106
107	ats	1.23	while (1) {
108			num = pstat_getswap(pstat_swapinfo, sizeof pstat_swapinfo[0],
109			SWAP_BATCH, swapidx);
110			if (num == -1) {
111			sg_set_error_with_errno(SG_ERROR_PSTAT,
112			"pstat_getswap");
113			return NULL;
114			} else if (num == 0) {
115	tdb	1.22	break;
116			}
117
118	ats	1.23	for (i = 0; i < num; i++) {
119			struct pst_swapinfo *si = &pstat_swapinfo[i];
120	tdb	1.22
121	ats	1.23	if ((si->pss_flags & SW_ENABLED) != SW_ENABLED) {
122			continue;
123			}
124
125			if ((si->pss_flags & SW_BLOCK) == SW_BLOCK) {
126			swap_stat.total += ((long long) si->pss_nblksavail) * 1024LL;
127			swap_stat.used += ((long long) si->pss_nfpgs) * 1024LL;
128			swap_stat.free = swap_stat.total - swap_stat.used;
129			}
130			if ((si->pss_flags & SW_FS) == SW_FS) {
131			swap_stat.total += ((long long) si->pss_limit) * 1024LL;
132			swap_stat.used += ((long long) si->pss_allocated) * 1024LL;
133			swap_stat.free = swap_stat.total - swap_stat.used;
134			}
135	tdb	1.22	}
136	ats	1.23	swapidx = pstat_swapinfo[num - 1].pss_idx + 1;
137	tdb	1.22	}
138			#endif
139	pajs	1.3	#ifdef SOLARIS
140	pajs	1.1	if((pagesize=sysconf(_SC_PAGESIZE)) == -1){
141	ats	1.21	sg_set_error_with_errno(SG_ERROR_SYSCONF, "_SC_PAGESIZE");
142	pajs	1.1	return NULL;
143			}
144			if (swapctl(SC_AINFO, &ai) == -1) {
145	ats	1.21	sg_set_error_with_errno(SG_ERROR_SWAPCTL, NULL);
146	pajs	1.1	return NULL;
147			}
148			swap_stat.total = (long long)ai.ani_max * (long long)pagesize;
149			swap_stat.used = (long long)ai.ani_resv * (long long)pagesize;
150			swap_stat.free = swap_stat.total - swap_stat.used;
151	pajs	1.3	#endif
152	ats	1.9	#if defined(LINUX) \|\| defined(CYGWIN)
153	ats	1.8	if ((f = fopen("/proc/meminfo", "r")) == NULL) {
154	ats	1.21	sg_set_error_with_errno(SG_ERROR_OPEN, "/proc/meminfo");
155	pajs	1.3	return NULL;
156			}
157	ats	1.8
158	ats	1.18	while ((line_ptr = sg_f_read_line(f, "")) != NULL) {
159	ats	1.8	if (sscanf(line_ptr, "%*s %llu kB", &value) != 1) {
160			continue;
161			}
162			value *= 1024;
163
164			if (strncmp(line_ptr, "SwapTotal:", 10) == 0) {
165			swap_stat.total = value;
166			} else if (strncmp(line_ptr, "SwapFree:", 9) == 0) {
167			swap_stat.free = value;
168			}
169	pajs	1.3	}
170	ats	1.8
171	pajs	1.3	fclose(f);
172	ats	1.8	swap_stat.used = swap_stat.total - swap_stat.free;
173	pajs	1.3	#endif
174	tdb	1.16	#if defined(FREEBSD) \|\| defined(DFBSD)
175	tdb	1.15	pagesize=getpagesize();
176
177			#ifdef FREEBSD5
178			swap_stat.total = 0;
179			swap_stat.used = 0;
180
181			mibsize = sizeof mib / sizeof mib[0];
182			if (sysctlnametomib("vm.swap_info", mib, &mibsize) < 0) {
183	ats	1.21	sg_set_error_with_errno(SG_ERROR_SYSCTLNAMETOMIB,
184			"vm.swap_info");
185	tdb	1.15	return NULL;
186			}
187			for (n = 0; ; ++n) {
188			mib[mibsize] = n;
189			size = sizeof xsw;
190	tdb	1.25	if (sysctl(mib, mibsize + 1, &xsw, &size, NULL, 0) < 0) {
191	tdb	1.15	break;
192			}
193			if (xsw.xsw_version != XSWDEV_VERSION) {
194	tdb	1.20	sg_set_error(SG_ERROR_XSW_VER_MISMATCH, NULL);
195	tdb	1.15	return NULL;
196			}
197			swap_stat.total += (long long) xsw.xsw_nblks;
198			swap_stat.used += (long long) xsw.xsw_used;
199			}
200			if (errno != ENOENT) {
201	ats	1.21	sg_set_error_with_errno(SG_ERROR_SYSCTL, "vm.swap_info");
202	tdb	1.15	return NULL;
203			}
204			#else
205	ats	1.18	if((kvmd = sg_get_kvm()) == NULL){
206	pajs	1.4	return NULL;
207			}
208			if ((kvm_getswapinfo(kvmd, &swapinfo, 1,0)) == -1){
209	tdb	1.20	sg_set_error(SG_ERROR_KVM_GETSWAPINFO, NULL);
210	pajs	1.4	return NULL;
211			}
212	pajs	1.1
213	tdb	1.15	swap_stat.total = (long long)swapinfo.ksw_total;
214			swap_stat.used = (long long)swapinfo.ksw_used;
215			#endif
216			swap_stat.total *= pagesize;
217			swap_stat.used *= pagesize;
218			swap_stat.free = swap_stat.total - swap_stat.used;
219	ats	1.7	#endif
220	tdb	1.13	#if defined(NETBSD) \|\| defined(OPENBSD)
221	ats	1.18	if ((uvm = sg_get_uvmexp()) == NULL) {
222	ats	1.7	return NULL;
223			}
224
225			swap_stat.total = (long long)uvm->pagesize * (long long)uvm->swpages;
226			swap_stat.used = (long long)uvm->pagesize * (long long)uvm->swpginuse;
227			swap_stat.free = swap_stat.total - swap_stat.used;
228	tdb	1.24	#endif
229			#ifdef WIN32
230			memstats.dwLength = sizeof(memstats);
231			if (!GlobalMemoryStatusEx(&memstats)) {
232			sg_set_error_with_errno(SG_ERROR_MEMSTATUS,
233			"GloblaMemoryStatusEx");
234			return NULL;
235			}
236			/* the PageFile stats include Phys memory "minus an overhead".
237			* Due to this unknown "overhead" there's no way to extract just page
238			* file use from these numbers */
239			swap_stat.total = memstats.ullTotalPageFile;
240			swap_stat.free = memstats.ullAvailPageFile;
241			swap_stat.used = swap_stat.total - swap_stat.free;
242	tdb	1.12	#endif
243
244	pajs	1.1	return &swap_stat;
245
246			}