2 * collectd - src/lpar.c
3 * Copyright (C) 2010 Aurélien Reynaud
5 * This program is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License as published by the
7 * Free Software Foundation; only version 2 of the License is applicable.
9 * This program is distributed in the hope that it will be useful, but
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * General Public License for more details.
14 * You should have received a copy of the GNU General Public License along
15 * with this program; if not, write to the Free Software Foundation, Inc.,
16 * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
19 * Aurélien Reynaud <collectd at wattapower.net>
26 #include <sys/protosw.h>
27 #include <libperfstat.h>
28 #include <sys/utsname.h>
30 /* XINTFRAC was defined in libperfstat.h somewhere between AIX 5.3 and 6.1 */
32 # include <sys/systemcfg.h>
33 # define XINTFRAC ((double)(_system_configuration.Xint) / \
34 (double)(_system_configuration.Xfrac))
37 static const char *config_keys[] =
42 static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
44 static _Bool pool_stats = 0;
45 static _Bool report_by_serial = 0;
46 static _Bool donate_flag = 0;
47 static char serial[SYS_NMLN];
49 static u_longlong_t time_old;
50 static u_longlong_t user_old,
54 static u_longlong_t pool_busy_time_old,
56 static u_longlong_t idle_donated_old,
62 static void save_last_values (perfstat_partition_total_t *lparstats)
64 time_old = lparstats->timebase_last;
66 user_old = lparstats->puser;
67 syst_old = lparstats->psys;
68 idle_old = lparstats->pidle;
69 wait_old = lparstats->pwait;
73 idle_donated_old = lparstats->idle_donated_purr;
74 busy_donated_old = lparstats->busy_donated_purr;
75 busy_stolen_old = lparstats->busy_stolen_purr;
76 idle_stolen_old = lparstats->idle_stolen_purr;
81 pool_busy_time_old = lparstats->pool_busy_time;
82 pool_max_time_old = lparstats->pool_max_time;
84 } /* void save_last_values */
86 static int lpar_config (const char *key, const char *value)
88 if (strcasecmp ("CpuPoolStats", key) == 0)
95 else if (strcasecmp ("ReportBySerial", key) == 0)
100 report_by_serial = 0;
108 } /* int lpar_config */
110 static int lpar_init (void)
112 perfstat_partition_total_t lparstats;
115 /* Retrieve the initial metrics. Returns the number of structures filled. */
116 status = perfstat_partition_total (/* name = */ NULL, /* (must be NULL) */
117 &lparstats, sizeof (perfstat_partition_total_t),
118 /* number = */ 1 /* (must be 1) */);
122 ERROR ("lpar plugin: perfstat_partition_total failed: %s (%i)",
123 sstrerror (errno, errbuf, sizeof (errbuf)),
128 if (!lparstats.type.b.shared_enabled && lparstats.type.b.donate_enabled)
133 if (pool_stats && !lparstats.type.b.pool_util_authority)
135 WARNING ("lpar plugin: This partition does not have pool authority. "
136 "Disabling CPU pool statistics collection.");
140 /* Save the initial data */
141 save_last_values (&lparstats);
144 } /* int lpar_init */
146 static void lpar_submit (const char *type_instance, double value)
149 value_list_t vl = VALUE_LIST_INIT;
151 values[0].gauge = (gauge_t)value;
155 if (report_by_serial)
157 sstrncpy (vl.host, serial, sizeof (vl.host));
158 sstrncpy (vl.plugin_instance, hostname_g, sizeof (vl.plugin));
162 sstrncpy (vl.host, hostname_g, sizeof (vl.host));
164 sstrncpy (vl.plugin, "lpar", sizeof (vl.plugin));
165 sstrncpy (vl.type, "vcpu", sizeof (vl.type));
166 sstrncpy (vl.type_instance, type_instance, sizeof (vl.type_instance));
168 plugin_dispatch_values (&vl);
169 } /* void lpar_submit */
171 static int lpar_read (void)
173 perfstat_partition_total_t lparstats;
177 u_longlong_t user_ticks, syst_ticks, wait_ticks, idle_ticks;
178 u_longlong_t consumed_ticks;
179 double entitled_proc_capacity;
181 /* An LPAR has the same serial number as the physical system it is currently
182 running on. It is a convenient way of tracking LPARs as they are moved
183 from chassis to chassis through Live Partition Mobility (LPM). */
184 if (uname (&name) != 0)
186 ERROR ("lpar plugin: uname failed.");
189 sstrncpy (serial, name.machine, sizeof (serial));
191 /* Retrieve the current metrics. Returns the number of structures filled. */
192 status = perfstat_partition_total (/* name = */ NULL, /* (must be NULL) */
193 &lparstats, sizeof (perfstat_partition_total_t),
194 /* number = */ 1 /* (must be 1) */);
198 ERROR ("lpar plugin: perfstat_partition_total failed: %s (%i)",
199 sstrerror (errno, errbuf, sizeof (errbuf)),
204 /* Number of ticks since we last run. */
205 ticks = lparstats.timebase_last - time_old;
208 /* The stats have not been updated. Return now to avoid dividing by zero */
213 * On a shared partition, we're "entitled" to a certain amount of
214 * processing power, for example 250/100 of a physical CPU. Processing
215 * capacity not used by the partition may be assigned to a different
216 * partition by the hypervisor, so "idle" is hopefully a very small
220 /* entitled_proc_capacity is in 1/100th of a CPU */
221 entitled_proc_capacity = 0.01 * ((double) lparstats.entitled_proc_capacity);
222 lpar_submit ("entitled", entitled_proc_capacity);
224 /* The number of ticks actually spent in the various states */
225 user_ticks = lparstats.puser - user_old;
226 syst_ticks = lparstats.psys - syst_old;
227 wait_ticks = lparstats.pwait - wait_old;
228 idle_ticks = lparstats.pidle - idle_old;
229 consumed_ticks = user_ticks + syst_ticks + wait_ticks + idle_ticks;
231 lpar_submit ("user", (double) user_ticks / (double) ticks);
232 lpar_submit ("sys", (double) syst_ticks / (double) ticks);
233 lpar_submit ("wait", (double) wait_ticks / (double) ticks);
234 lpar_submit ("idle", (double) idle_ticks / (double) ticks);
238 u_longlong_t idle_donated_ticks, busy_donated_ticks;
239 u_longlong_t idle_stolen_ticks, busy_stolen_ticks;
241 idle_donated_ticks = lparstats.idle_donated_purr - idle_donated_old;
242 busy_donated_ticks = lparstats.busy_donated_purr - busy_donated_old;
243 idle_stolen_ticks = lparstats.idle_stolen_purr - idle_stolen_old;
244 busy_stolen_ticks = lparstats.busy_stolen_purr - busy_stolen_old;
246 /* FYI: PURR == Processor Utilization of Resources Register
247 * SPURR == Scaled PURR */
248 /* donated => ticks given to another partition
249 * stolen => ticks received from another partition */
250 lpar_submit ("idle_donated", (double) idle_donated_ticks / (double) ticks);
251 lpar_submit ("busy_donated", (double) busy_donated_ticks / (double) ticks);
252 lpar_submit ("idle_stolen", (double) idle_stolen_ticks / (double) ticks);
253 lpar_submit ("busy_stolen", (double) busy_stolen_ticks / (double) ticks);
255 /* Donated ticks will be accounted for as stolen ticks in other LPARs */
256 consumed_ticks += idle_stolen_ticks + busy_stolen_ticks;
259 lpar_submit ("consumed", (double) consumed_ticks / (double) ticks);
263 char typinst[DATA_MAX_NAME_LEN];
264 u_longlong_t pool_busy_ns, pool_max_ns;
266 pool_busy_ns = lparstats.pool_busy_time - pool_busy_time_old;
267 pool_max_ns = lparstats.pool_max_time - pool_max_time_old;
269 /* Pool stats are in CPU x ns */
270 ssnprintf (typinst, sizeof (typinst), "pool-%X-busy", lparstats.pool_id);
271 lpar_submit (typinst, (double) pool_busy_ns / XINTFRAC / (double) ticks);
273 ssnprintf (typinst, sizeof (typinst), "pool-%X-total", lparstats.pool_id);
274 lpar_submit (typinst, (double) pool_max_ns / XINTFRAC / (double) ticks);
277 save_last_values (&lparstats);
280 } /* int lpar_read */
282 void module_register (void)
284 plugin_register_config ("lpar", lpar_config,
285 config_keys, config_keys_num);
286 plugin_register_init ("lpar", lpar_init);
287 plugin_register_read ("lpar", lpar_read);
288 } /* void module_register */
290 /* vim: set sw=8 noet : */