1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
|
#include "orbsvcs/Log_Macros.h"
#include "orbsvcs/LoadBalancing/LB_CPU_Utilization_Monitor.h"
#include "tao/ORB_Constants.h"
#include "ace/OS_NS_time.h"
#include "ace/OS_NS_stdio.h"
#include "ace/OS_NS_string.h"
#include "ace/OS_NS_unistd.h"
#include "ace/os_include/os_netdb.h"
#include "ace/os_include/sys/os_loadavg.h"
TAO_BEGIN_VERSIONED_NAMESPACE_DECL
double calc_cpu_loading ()
{
static char buf[1024];
static unsigned long prev_idle = 0;
static double prev_total = 0.0;
FILE *file_ptr = 0;
char *item = 0;
char *arg = 0;
unsigned long delta_idle = 0;
unsigned long user = 0;
unsigned long nice = 0;
unsigned long idle = 0;
unsigned long sys = 0;
double percent_cpu_load = 0.0;
if ((file_ptr = ACE_OS::fopen("/proc/stat", "r")) == 0)
return percent_cpu_load;
while ((ACE_OS::fgets (buf, sizeof (buf), file_ptr)) != 0)
{
item = ACE_OS::strtok (buf, " \t\n");
arg = ACE_OS::strtok (0, "\n");
if (item == 0 || arg == 0)
continue;
if (item[0] == 'c' && ACE_OS::strlen (item) == 3)
{
sscanf (arg, "%lu %lu %lu %lu", &user, &nice, &sys, &idle);
break;
}
}
ACE_OS::fclose (file_ptr);
delta_idle = idle - prev_idle;
double total;
double time_passed;
total = (double) (user + nice + sys + idle);
time_passed = total - prev_total;
percent_cpu_load = 100.0 - (delta_idle / time_passed * 100.0);
prev_idle = idle;
prev_total = total;
return percent_cpu_load;
}
TAO_LB_CPU_Utilization_Monitor::TAO_LB_CPU_Utilization_Monitor (const char * location_id,
const char * location_kind)
: location_ (1)
{
this->location_.length (1);
if (location_id == 0)
{
char host[MAXHOSTNAMELEN + 1];
if (ACE_OS::hostname (host, sizeof (host)) != 0)
{
// Couldn't determine hostname. Use the current time
// instead.
CORBA::ULong t = static_cast<CORBA::ULong> (ACE_OS::time ());
// A 64 byte buffer is more than enough to contain the
// string representation of a 32 bit unsigned integer.
char buf[64] = { '\0' };
ACE_OS::sprintf (buf, "%u", t);
this->location_[0].id = CORBA::string_dup (buf);
this->location_[0].kind = CORBA::string_dup ("Creation Time");
}
else
{
this->location_[0].id = CORBA::string_dup (host);
this->location_[0].kind = CORBA::string_dup ("Hostname");
}
}
else
{
this->location_[0].id = CORBA::string_dup (location_id);
if (location_kind != 0)
this->location_[0].kind = CORBA::string_dup (location_kind);
}
}
TAO_LB_CPU_Utilization_Monitor::~TAO_LB_CPU_Utilization_Monitor ()
{
}
CosLoadBalancing::Location *
TAO_LB_CPU_Utilization_Monitor::the_location ()
{
CosLoadBalancing::Location * location;
ACE_NEW_THROW_EX (location,
CosLoadBalancing::Location (this->location_),
CORBA::NO_MEMORY (
CORBA::SystemException::_tao_minor_code (
TAO::VMCID,
ENOMEM),
CORBA::COMPLETED_NO));
return location;
}
CosLoadBalancing::LoadList *
TAO_LB_CPU_Utilization_Monitor::loads ()
{
CORBA::Float load = 0;
#if defined (ACE_LINUX)
double load_double = calc_cpu_loading ();
load = load_double;
CosLoadBalancing::LoadList * tmp = 0;
ACE_NEW_THROW_EX (tmp,
CosLoadBalancing::LoadList (1),
CORBA::NO_MEMORY (
CORBA::SystemException::_tao_minor_code (
TAO::VMCID,
ENOMEM),
CORBA::COMPLETED_NO));
CosLoadBalancing::LoadList_var load_list = tmp;
load_list->length (1);
load_list[0].id = CosLoadBalancing::LoadAverage;
load_list[0].value = load;
ORBSVCS_DEBUG ((LM_DEBUG, "%2f\n", load_list[0].value));
return load_list._retn ();
#else
ACE_UNUSED_ARG (load);
throw CORBA::NO_IMPLEMENT ();
#endif /* linux */
}
TAO_END_VERSIONED_NAMESPACE_DECL
|
