•All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends Macros Groups Pages
Memory.cpp
Go to the documentation of this file.
1 // $Header: /tmp/svngaudi/tmp.jEpFh25751/Gaudi/GaudiKernel/src/Lib/Memory.cpp,v 1.1 2001/03/14 15:30:16 mato Exp $
2 //====================================================================
3 // Memory.cpp
4 //--------------------------------------------------------------------
5 //
6 // Package : System (The LHCb System service)
7 //
8 // Description: Information of memory usage from a given process
9 //
10 // Author : M.Frank
11 // Created : 13/11/00
12 // Changes :
13 //
14 //====================================================================
15 #define GAUDIKERNEL_MEMORY_CPP
16 
17 #ifdef _WIN32
18 #include "process.h"
19  #define getpid _getpid
20 #else
21  #include <errno.h>
22  #include <string.h>
23  #include "sys/times.h"
24  #include "unistd.h"
25  #include "libgen.h"
26  #include <cstdio>
27 #endif
28 
29 // Framework include files
30 #include <limits.h>
31 #include "GaudiKernel/Memory.h"
32 #include "ProcessDescriptor.h"
33 
35 long System::adjustMemory( MemoryUnit unit, long value ) {
36  if ( value != -1 ) {
37  switch ( unit ) {
38  case Byte: break;
39  case kByte: value = value/1024; break;
40  case MByte: value = (value/1024)/1024; break;
41  case GByte: value = ((value/1024)/1024)/1024; break;
42  case TByte: value = (((value/1024)/1024)/1024)/1024; break;
43  case PByte: value = ((((value/1024)/1024)/1024)/1024)/1024; break;
44  case EByte: value = (((((value/1024)/1024)/1024)/1024)/1024)/1024; break;
45  default: value = -1; break;
46  }
47  }
48  return value;
49 }
50 
52 long System::basePriority(InfoType fetch, long pid) {
53  PROCESS_BASIC_INFORMATION info;
54  if ( fetch != NoFetch && getProcess()->query(pid, ProcessBasics, &info) )
55  return info.BasePriority;
56  return 0;
57 }
58 
60 long System::procID() {
61  static long s_pid = ::getpid();
62  return s_pid;
63 }
64 
66 long System::parentID(InfoType fetch, long pid) {
67  PROCESS_BASIC_INFORMATION info;
68  if ( fetch != NoFetch && getProcess()->query(pid, ProcessBasics, &info) )
69  return info.InheritedFromUniqueProcessId;
70  return 0;
71 }
72 
74 long System::affinityMask(InfoType fetch, long pid) {
75  PROCESS_BASIC_INFORMATION info;
76  if ( fetch != NoFetch && getProcess()->query(pid, ProcessBasics, &info) )
77  return info.AffinityMask;
78  return 0;
79 }
80 
82 long System::exitStatus(InfoType fetch, long pid) {
83  PROCESS_BASIC_INFORMATION info;
84  if ( fetch != NoFetch && getProcess()->query(pid, ProcessBasics, &info) )
85  return info.ExitStatus;
86  return -2;
87 }
88 
90 long System::priorityBoost(InfoType fetch, long pid) {
91  long info;
92  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
93  return info;
94  return -2;
95 }
96 
98 long System::nonPagedMemoryPeak(MemoryUnit unit, InfoType fetch, long pid) {
99  VM_COUNTERS info;
100  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
101  return adjustMemory(unit, info.QuotaPeakNonPagedPoolUsage);
102  return -2;
103 }
104 
106 long System::nonPagedMemory(MemoryUnit unit, InfoType fetch, long pid) {
107  VM_COUNTERS info;
108  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
109  return adjustMemory(unit, info.QuotaNonPagedPoolUsage);
110  return -2;
111 }
112 
114 long System::nonPagedMemoryLimit(MemoryUnit unit, InfoType fetch, long pid) {
115  POOLED_USAGE_AND_LIMITS quota;
116  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &quota) )
117  return adjustMemory(unit, quota.NonPagedPoolLimit);
118  return 0;
119 }
120 
122 long System::pagedMemory(MemoryUnit unit, InfoType fetch, long pid) {
123  VM_COUNTERS info;
124  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
125  return adjustMemory(unit, info.QuotaPagedPoolUsage);
126  return -2;
127 }
128 
130 long System::pagedMemoryPeak(MemoryUnit unit, InfoType fetch, long pid) {
131  VM_COUNTERS info;
132  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
133  return adjustMemory(unit, info.QuotaPeakPagedPoolUsage);
134  return -2;
135 }
136 
138 long System::pagedMemoryLimit(MemoryUnit unit, InfoType fetch, long pid) {
139  POOLED_USAGE_AND_LIMITS quota;
140  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &quota) )
141  return adjustMemory(unit, quota.PagedPoolLimit);
142  return 0;
143 }
144 
146 long System::numPageFault(InfoType fetch, long pid) {
147  VM_COUNTERS info;
148  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
149  return info.PageFaultCount;
150  return -2;
151 }
152 
154 long System::pagefileUsage(MemoryUnit unit, InfoType fetch, long pid) {
155  VM_COUNTERS info;
156  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
157  return adjustMemory(unit, info.PagefileUsage);
158  return -2;
159 }
160 
162 long System::pagefileUsagePeak(MemoryUnit unit, InfoType fetch, long pid) {
163  VM_COUNTERS info;
164  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
165  return adjustMemory(unit, info.PeakPagefileUsage);
166  return -2;
167 }
168 
170 long System::pagefileUsageLimit(MemoryUnit unit, InfoType fetch, long pid) {
171  POOLED_USAGE_AND_LIMITS quota;
172  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &quota) ) {
173  if ( long(quota.PagefileLimit) < 0 )
174  return -1;//LONG_MAX;
175  return adjustMemory(unit, quota.PagefileLimit);
176  }
177  return -2;
178 }
179 
181 long System::mappedMemory(MemoryUnit unit, InfoType fetch, long pid) {
182  VM_COUNTERS info;
183  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
184  return adjustMemory(unit, info.WorkingSetSize);
185  return -2;
186 }
187 
189 long System::mappedMemoryPeak(MemoryUnit unit, InfoType fetch, long pid) {
190  VM_COUNTERS info;
191  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
192  return adjustMemory(unit, info.PeakWorkingSetSize);
193  return -2;
194 }
195 
197 long System::minMemoryLimit(MemoryUnit unit, InfoType fetch, long pid) {
198  QUOTA_LIMITS quota;
199  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &quota) )
200  return adjustMemory(unit, quota.MinimumWorkingSetSize);
201  return 0;
202 }
203 
205 long System::maxMemoryLimit(MemoryUnit unit, InfoType fetch, long pid) {
206  QUOTA_LIMITS quota;
207  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &quota) )
208  return adjustMemory(unit, quota.MaximumWorkingSetSize);
209  return 0;
210 }
211 
213 long System::virtualMemory(MemoryUnit unit, InfoType fetch, long pid) {
214  VM_COUNTERS info;
215  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
216  return adjustMemory(unit, info.VirtualSize);
217  return -2;
218 }
219 
221 long System::virtualMemoryPeak(MemoryUnit unit, InfoType fetch, long pid) {
222  VM_COUNTERS info;
223  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &info) )
224  return adjustMemory(unit, info.PeakVirtualSize);
225  return -2;
226 }
227 
229 long System::virtualMemoryLimit(MemoryUnit unit, InfoType fetch, long pid) {
230  QUOTA_LIMITS quota;
231  if ( fetch != NoFetch && getProcess()->query(pid, fetch, &quota) ) {
232  if ( long(quota.PagefileLimit) == -1 )
233  return -1;//LONG_MAX;
234  return adjustMemory(unit, quota.PagefileLimit);
235  }
236  return 0;
237 }
238 
System::maxMemoryLimit
GAUDI_API long maxMemoryLimit(MemoryUnit unit=kByte, InfoType fetch=Quota, long pid=-1)
System Process Limits: Maximum amount of virtual memory this process is allowed to use...
Definition: Memory.cpp:205
System::mappedMemoryPeak
GAUDI_API long mappedMemoryPeak(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: priority boost.
Definition: Memory.cpp:189
System::VM_COUNTERS::QuotaPeakPagedPoolUsage
unsigned long QuotaPeakPagedPoolUsage
Definition: ProcessDescriptor.h:66
System::parentID
GAUDI_API long parentID(InfoType fetch=ProcessBasics, long pid=-1)
Basic Process Information: Parent's process ID.
Definition: Memory.cpp:66
System::getProcess
ProcessDescriptor * getProcess()
Retrieve Process structure.
Definition: ProcessDescriptor.cpp:384
System::VM_COUNTERS::PagefileUsage
unsigned long PagefileUsage
Definition: ProcessDescriptor.h:70
System::exitStatus
GAUDI_API long exitStatus(InfoType fetch=ProcessBasics, long pid=-1)
Basic Process Information: Exit status (does not really make sense for the running process...
Definition: Memory.cpp:82
System::nonPagedMemory
GAUDI_API long nonPagedMemory(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: Current usage of non paged memory.
Definition: Memory.cpp:106
System::adjustMemory
GAUDI_API long adjustMemory(MemoryUnit typ, long value)
Convert time from kByte to requested representation (Experts only)
Definition: Memory.cpp:35
ProcessDescriptor.h
System::QUOTA_LIMITS::MaximumWorkingSetSize
unsigned long MaximumWorkingSetSize
Definition: ProcessDescriptor.h:37
System::VM_COUNTERS::PeakPagefileUsage
unsigned long PeakPagefileUsage
Definition: ProcessDescriptor.h:71
System::QUOTA_LIMITS::PagefileLimit
unsigned long PagefileLimit
Definition: ProcessDescriptor.h:38
System::priorityBoost
GAUDI_API long priorityBoost(InfoType fetch=PriorityBoost, long pid=-1)
Basic Process Information: priority boost.
Definition: Memory.cpp:90
System::VM_COUNTERS::WorkingSetSize
unsigned long WorkingSetSize
Definition: ProcessDescriptor.h:65
System::pagedMemoryPeak
GAUDI_API long pagedMemoryPeak(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: Maximum of paged memory occupied by the process 'pid'. ...
Definition: Memory.cpp:130
System::VM_COUNTERS::PeakWorkingSetSize
unsigned long PeakWorkingSetSize
Definition: ProcessDescriptor.h:64
System::VM_COUNTERS::VirtualSize
unsigned long VirtualSize
Definition: ProcessDescriptor.h:62
System::POOLED_USAGE_AND_LIMITS::PagedPoolLimit
unsigned long PagedPoolLimit
Definition: ProcessDescriptor.h:81
System::nonPagedMemoryPeak
GAUDI_API long nonPagedMemoryPeak(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: Peak usage of non paged memory.
Definition: Memory.cpp:98
System::PROCESS_BASIC_INFORMATION
Definition: ProcessDescriptor.h:19
System::VM_COUNTERS::PageFaultCount
unsigned long PageFaultCount
Definition: ProcessDescriptor.h:63
System::nonPagedMemoryLimit
GAUDI_API long nonPagedMemoryLimit(MemoryUnit unit=kByte, InfoType fetch=Quota, long pid=-1)
System Process Limits: Maximum amount of non-paged memory this process is allowed to use...
Definition: Memory.cpp:114
System::PROCESS_BASIC_INFORMATION::AffinityMask
unsigned long AffinityMask
Definition: ProcessDescriptor.h:22
System::affinityMask
GAUDI_API long affinityMask(InfoType fetch=ProcessBasics, long pid=-1)
Basic Process Information: Affinity mask.
Definition: Memory.cpp:74
System::VM_COUNTERS::QuotaNonPagedPoolUsage
unsigned long QuotaNonPagedPoolUsage
Definition: ProcessDescriptor.h:69
System::POOLED_USAGE_AND_LIMITS::PagefileLimit
unsigned long PagefileLimit
Definition: ProcessDescriptor.h:87
System::virtualMemoryLimit
GAUDI_API long virtualMemoryLimit(MemoryUnit unit=kByte, InfoType fetch=Quota, long pid=-1)
System Process Limits: Maximum amount of the page file this process is allowed to use...
Definition: Memory.cpp:229
System::POOLED_USAGE_AND_LIMITS::NonPagedPoolLimit
unsigned long NonPagedPoolLimit
Definition: ProcessDescriptor.h:84
dump_component_properties.value
list value
Definition: dump_component_properties.py:12
System::pagedMemoryLimit
GAUDI_API long pagedMemoryLimit(MemoryUnit unit=kByte, InfoType fetch=Quota, long pid=-1)
Basic Process Information: Amount of paged memory that can be occupied by the process 'pid'...
Definition: Memory.cpp:138
System::VM_COUNTERS::PeakVirtualSize
unsigned long PeakVirtualSize
Definition: ProcessDescriptor.h:61
System::pagefileUsageLimit
GAUDI_API long pagefileUsageLimit(MemoryUnit unit=kByte, InfoType fetch=Quota, long pid=-1)
Basic Process Information: Peak usage of page file.
Definition: Memory.cpp:170
System::PROCESS_BASIC_INFORMATION::BasePriority
long BasePriority
Definition: ProcessDescriptor.h:23
System::MemoryUnit
MemoryUnit
Unit of memory.
Definition: Memory.h:57
System::mappedMemory
GAUDI_API long mappedMemory(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: priority boost.
Definition: Memory.cpp:181
System::PROCESS_BASIC_INFORMATION::InheritedFromUniqueProcessId
unsigned long InheritedFromUniqueProcessId
Definition: ProcessDescriptor.h:25
Memory.h
System::pagefileUsagePeak
GAUDI_API long pagefileUsagePeak(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: Peak usage of page file.
Definition: Memory.cpp:162
System::QUOTA_LIMITS
Process Quotas NtQueryInformationProcess using ProcessQuotaLimits NtQueryInformationProcess using Pro...
Definition: ProcessDescriptor.h:33
System::numPageFault
GAUDI_API long numPageFault(InfoType fetch=Memory, long pid=-1)
Basic Process Information: Number of page faults.
Definition: Memory.cpp:146
System::VM_COUNTERS
Process Virtual Memory Counters NtQueryInformationProcess using ProcessVmCounters.
Definition: ProcessDescriptor.h:60
System::virtualMemory
GAUDI_API long virtualMemory(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: priority boost.
Definition: Memory.cpp:213
System::minMemoryLimit
GAUDI_API long minMemoryLimit(MemoryUnit unit=kByte, InfoType fetch=Quota, long pid=-1)
System Process Limits: Minimum amount of virtual memory this process may use.
Definition: Memory.cpp:197
System::POOLED_USAGE_AND_LIMITS
Process Pooled Quota Usage and Limits NtQueryInformationProcess using ProcessPooledUsageAndLimits.
Definition: ProcessDescriptor.h:78
System::procID
GAUDI_API long procID()
Basic Process Information: Process ID.
Definition: Memory.cpp:60
System::basePriority
GAUDI_API long basePriority(InfoType fetch=ProcessBasics, long pid=-1)
Basic Process Information: Base priority.
Definition: Memory.cpp:52
System::virtualMemoryPeak
GAUDI_API long virtualMemoryPeak(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: priority boost.
Definition: Memory.cpp:221
System::QUOTA_LIMITS::MinimumWorkingSetSize
unsigned long MinimumWorkingSetSize
Definition: ProcessDescriptor.h:36
System::VM_COUNTERS::QuotaPeakNonPagedPoolUsage
unsigned long QuotaPeakNonPagedPoolUsage
Definition: ProcessDescriptor.h:68
System::pagefileUsage
GAUDI_API long pagefileUsage(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: Current page file usage.
Definition: Memory.cpp:154
System::pagedMemory
GAUDI_API long pagedMemory(MemoryUnit unit=kByte, InfoType fetch=Memory, long pid=-1)
Basic Process Information: Amount of paged memory currently occupied by the process 'pid'...
Definition: Memory.cpp:122
System::InfoType
InfoType
Enumeration for fetching information.
Definition: SystemBase.h:18
System::PROCESS_BASIC_INFORMATION::ExitStatus
long ExitStatus
Definition: ProcessDescriptor.h:20
System::VM_COUNTERS::QuotaPagedPoolUsage
unsigned long QuotaPagedPoolUsage
Definition: ProcessDescriptor.h:67