2008-08-06 18:36:30 +00:00
|
|
|
// This file is part of BOINC.
|
2005-01-20 23:22:22 +00:00
|
|
|
// http://boinc.berkeley.edu
|
2008-08-06 18:36:30 +00:00
|
|
|
// Copyright (C) 2008 University of California
|
2005-01-20 23:22:22 +00:00
|
|
|
//
|
2008-08-06 18:36:30 +00:00
|
|
|
// BOINC 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 3 of the License, or (at your option) any later version.
|
2005-01-20 23:22:22 +00:00
|
|
|
//
|
2008-08-06 18:36:30 +00:00
|
|
|
// BOINC is distributed in the hope that it will be useful,
|
2005-01-20 23:22:22 +00:00
|
|
|
// 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.
|
|
|
|
//
|
2008-08-06 18:36:30 +00:00
|
|
|
// You should have received a copy of the GNU Lesser General Public License
|
|
|
|
// along with BOINC. If not, see <http://www.gnu.org/licenses/>.
|
2005-01-20 23:22:22 +00:00
|
|
|
|
2010-05-11 19:10:29 +00:00
|
|
|
#if defined(_WIN32) && !defined(__STDWX_H__)
|
2004-12-14 20:37:51 +00:00
|
|
|
#include "boinc_win.h"
|
2010-05-11 19:10:29 +00:00
|
|
|
#elif defined(_WIN32) && defined(__STDWX_H__)
|
|
|
|
#include "stdwx.h"
|
|
|
|
#else
|
2005-11-21 18:34:44 +00:00
|
|
|
#include "config.h"
|
2011-09-27 19:45:27 +00:00
|
|
|
#if HAVE_PROCFS_H
|
2007-01-18 22:25:55 +00:00
|
|
|
// Can't use large file calls with solaris procfs.
|
|
|
|
#if defined(_FILE_OFFSET_BITS) && ( _FILE_OFFSET_BITS == 64 )
|
|
|
|
#undef _FILE_OFFSET_BITS
|
2008-07-01 21:27:25 +00:00
|
|
|
#undef _LARGE_FILES
|
|
|
|
#undef _LARGEFILE_SOURCE
|
|
|
|
#undef _LARGEFILE64_SOURCE
|
2007-01-18 22:25:55 +00:00
|
|
|
#endif
|
|
|
|
#endif
|
2009-02-26 00:23:23 +00:00
|
|
|
#include <cstdio>
|
|
|
|
#include <cstring>
|
|
|
|
#include <cstdlib>
|
2004-12-14 20:28:13 +00:00
|
|
|
#include <unistd.h>
|
2011-09-27 19:45:27 +00:00
|
|
|
#if HAVE_PROCFS_H
|
2004-12-14 20:28:13 +00:00
|
|
|
#include <procfs.h> // definitions for solaris /proc structs
|
|
|
|
#endif
|
2010-05-11 19:10:29 +00:00
|
|
|
#endif
|
2004-12-14 20:28:13 +00:00
|
|
|
|
2012-08-01 20:04:05 +00:00
|
|
|
#include "error_numbers.h"
|
|
|
|
|
2012-08-11 05:47:18 +00:00
|
|
|
#include "mem_usage.h"
|
|
|
|
|
2009-02-26 00:23:23 +00:00
|
|
|
using std::FILE;
|
|
|
|
using std::fread;
|
|
|
|
using std::fopen;
|
|
|
|
using std::fclose;
|
|
|
|
|
2004-12-14 20:28:13 +00:00
|
|
|
int mem_usage(double& vm_usage, double& resident_set) {
|
|
|
|
|
|
|
|
#ifdef _WIN32
|
|
|
|
|
|
|
|
// Figure out if we're on WinNT
|
|
|
|
OSVERSIONINFO osvi;
|
|
|
|
osvi.dwOSVersionInfoSize = sizeof(osvi);
|
|
|
|
GetVersionEx( &osvi );
|
|
|
|
if (osvi.dwPlatformId == VER_PLATFORM_WIN32_NT) {
|
|
|
|
SIZE_T lpMinimumWorkingSetSize;
|
|
|
|
SIZE_T lpMaximumWorkingSetSize;
|
|
|
|
|
|
|
|
GetProcessWorkingSetSize(
|
|
|
|
GetCurrentProcess(),
|
|
|
|
&lpMinimumWorkingSetSize,
|
|
|
|
&lpMaximumWorkingSetSize
|
|
|
|
);
|
|
|
|
|
|
|
|
vm_usage = (double)lpMinimumWorkingSetSize;
|
|
|
|
resident_set = (double)lpMaximumWorkingSetSize;
|
|
|
|
} else {
|
|
|
|
return ERR_NOT_IMPLEMENTED;
|
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
#else
|
|
|
|
|
|
|
|
|
2011-09-27 19:45:27 +00:00
|
|
|
#if HAVE_PROCFS_H && HAVE__PROC_SELF_PSINFO
|
2004-12-14 20:28:13 +00:00
|
|
|
FILE* f;
|
|
|
|
|
|
|
|
// guess that this is solaris
|
|
|
|
// need psinfo_t from procfs.h
|
|
|
|
//
|
|
|
|
if ((f = fopen("/proc/self/psinfo", "r")) != 0) {
|
|
|
|
psinfo_t psinfo;
|
|
|
|
|
|
|
|
if (fread(&psinfo, sizeof(psinfo_t), 1, f) == 1) {
|
|
|
|
vm_usage = psinfo.pr_size*1024.;
|
|
|
|
resident_set = psinfo.pr_rssize*1024.;
|
|
|
|
fclose(f);
|
|
|
|
return 0;
|
|
|
|
} else {
|
|
|
|
fclose(f);
|
|
|
|
return ERR_FREAD;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
2011-09-27 19:45:27 +00:00
|
|
|
#if HAVE__PROC_SELF_STAT
|
2004-12-14 20:28:13 +00:00
|
|
|
FILE* f;
|
|
|
|
// guess that this is linux
|
|
|
|
//
|
|
|
|
if ((f = fopen("/proc/self/stat", "r")) != 0) {
|
|
|
|
char buf[256];
|
|
|
|
char* p;
|
|
|
|
int i;
|
|
|
|
unsigned long tmp;
|
|
|
|
|
|
|
|
i = fread(buf, sizeof(char), 255, f);
|
|
|
|
buf[i] = '\0'; // terminate string
|
|
|
|
p = &buf[0];
|
|
|
|
|
|
|
|
// skip over first 22 fields
|
|
|
|
//
|
|
|
|
for (i = 0; i < 22; ++i) {
|
|
|
|
p = strchr(p, ' ');
|
|
|
|
if (!p) break;
|
|
|
|
++p; // move past space
|
|
|
|
}
|
|
|
|
if (!p) {
|
2012-11-01 17:54:48 +00:00
|
|
|
fclose(f);
|
2004-12-14 20:28:13 +00:00
|
|
|
return ERR_NOT_IMPLEMENTED;
|
|
|
|
}
|
|
|
|
|
|
|
|
// read virtual memory size in bytes.
|
|
|
|
//
|
|
|
|
vm_usage = atof(p);
|
2004-12-17 07:27:36 +00:00
|
|
|
p = strchr(p, ' ');
|
2004-12-14 20:28:13 +00:00
|
|
|
|
2004-12-17 07:27:36 +00:00
|
|
|
// read resident set size: number of pages the process has in
|
|
|
|
// real memory, minus 3 for administrative purposes.
|
2004-12-14 20:28:13 +00:00
|
|
|
//
|
2004-12-17 07:27:36 +00:00
|
|
|
tmp = strtol(p, 0, 0);
|
|
|
|
resident_set = (double)(tmp + 3)*getpagesize();
|
2004-12-14 20:28:13 +00:00
|
|
|
|
|
|
|
fclose(f);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
return ERR_NOT_IMPLEMENTED;
|
|
|
|
#endif
|
|
|
|
}
|
2004-12-16 03:28:40 +00:00
|
|
|
|