1 /**
2 * collectd - src/processes.c
3 * Copyright (C) 2005 Lyonel Vincent
4 * Copyright (C) 2006-2010 Florian octo Forster
5 * Copyright (C) 2008 Oleg King
6 * Copyright (C) 2009 Sebastian Harl
7 * Copyright (C) 2009 Andrés J. Díaz
8 * Copyright (C) 2009 Manuel Sanmartin
9 * Copyright (C) 2010 Clément Stenac
10 *
11 * This program is free software; you can redistribute it and/or modify it
12 * under the terms of the GNU General Public License as published by the
13 * Free Software Foundation; either version 2 of the License, or (at your
14 * option) any later version.
15 *
16 * This program is distributed in the hope that it will be useful, but
17 * WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * General Public License for more details.
20 *
21 * You should have received a copy of the GNU General Public License along
22 * with this program; if not, write to the Free Software Foundation, Inc.,
23 * 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
24 *
25 * Authors:
26 * Lyonel Vincent <lyonel at ezix.org>
27 * Florian octo Forster <octo at verplant.org>
28 * Oleg King <king2 at kaluga.ru>
29 * Sebastian Harl <sh at tokkee.org>
30 * Andrés J. Díaz <ajdiaz at connectical.com>
31 * Manuel Sanmartin
32 * Clément Stenac <clement.stenac at diwi.org>
33 **/
35 #include "collectd.h"
36 #include "common.h"
37 #include "plugin.h"
38 #include "configfile.h"
40 /* Include header files for the mach system, if they exist.. */
41 #if HAVE_THREAD_INFO
42 # if HAVE_MACH_MACH_INIT_H
43 # include <mach/mach_init.h>
44 # endif
45 # if HAVE_MACH_HOST_PRIV_H
46 # include <mach/host_priv.h>
47 # endif
48 # if HAVE_MACH_MACH_ERROR_H
49 # include <mach/mach_error.h>
50 # endif
51 # if HAVE_MACH_MACH_HOST_H
52 # include <mach/mach_host.h>
53 # endif
54 # if HAVE_MACH_MACH_PORT_H
55 # include <mach/mach_port.h>
56 # endif
57 # if HAVE_MACH_MACH_TYPES_H
58 # include <mach/mach_types.h>
59 # endif
60 # if HAVE_MACH_MESSAGE_H
61 # include <mach/message.h>
62 # endif
63 # if HAVE_MACH_PROCESSOR_SET_H
64 # include <mach/processor_set.h>
65 # endif
66 # if HAVE_MACH_TASK_H
67 # include <mach/task.h>
68 # endif
69 # if HAVE_MACH_THREAD_ACT_H
70 # include <mach/thread_act.h>
71 # endif
72 # if HAVE_MACH_VM_REGION_H
73 # include <mach/vm_region.h>
74 # endif
75 # if HAVE_MACH_VM_MAP_H
76 # include <mach/vm_map.h>
77 # endif
78 # if HAVE_MACH_VM_PROT_H
79 # include <mach/vm_prot.h>
80 # endif
81 # if HAVE_SYS_SYSCTL_H
82 # include <sys/sysctl.h>
83 # endif
84 /* #endif HAVE_THREAD_INFO */
86 #elif KERNEL_LINUX
87 # if HAVE_LINUX_CONFIG_H
88 # include <linux/config.h>
89 # endif
90 # ifndef CONFIG_HZ
91 # define CONFIG_HZ 100
92 # endif
93 /* #endif KERNEL_LINUX */
95 #elif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD
96 # include <kvm.h>
97 # include <sys/param.h>
98 # include <sys/sysctl.h>
99 # include <sys/user.h>
100 # include <sys/proc.h>
101 /* #endif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD */
103 #elif HAVE_PROCINFO_H
104 # include <procinfo.h>
105 # include <sys/types.h>
107 #define MAXPROCENTRY 32
108 #define MAXTHRDENTRY 16
109 #define MAXARGLN 1024
110 /* #endif HAVE_PROCINFO_H */
112 #else
113 # error "No applicable input method."
114 #endif
116 #if HAVE_REGEX_H
117 # include <regex.h>
118 #endif
120 #ifndef ARG_MAX
121 # define ARG_MAX 4096
122 #endif
124 static const char *config_keys[] =
125 {
126 "Process",
127 "ProcessMatch"
128 };
129 static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
131 typedef struct procstat_entry_s
132 {
133 unsigned long id;
134 unsigned long age;
136 unsigned long num_proc;
137 unsigned long num_lwp;
138 unsigned long vmem_size;
139 unsigned long vmem_rss;
140 unsigned long vmem_data;
141 unsigned long vmem_code;
142 unsigned long stack_size;
144 unsigned long vmem_minflt;
145 unsigned long vmem_majflt;
146 derive_t vmem_minflt_counter;
147 derive_t vmem_majflt_counter;
149 unsigned long cpu_user;
150 unsigned long cpu_system;
151 derive_t cpu_user_counter;
152 derive_t cpu_system_counter;
154 /* io data */
155 derive_t io_rchar;
156 derive_t io_wchar;
157 derive_t io_syscr;
158 derive_t io_syscw;
160 struct procstat_entry_s *next;
161 } procstat_entry_t;
163 #define PROCSTAT_NAME_LEN 256
164 typedef struct procstat
165 {
166 char name[PROCSTAT_NAME_LEN];
167 #if HAVE_REGEX_H
168 regex_t *re;
169 #endif
171 unsigned long num_proc;
172 unsigned long num_lwp;
173 unsigned long vmem_size;
174 unsigned long vmem_rss;
175 unsigned long vmem_data;
176 unsigned long vmem_code;
177 unsigned long stack_size;
179 derive_t vmem_minflt_counter;
180 derive_t vmem_majflt_counter;
182 derive_t cpu_user_counter;
183 derive_t cpu_system_counter;
185 /* io data */
186 derive_t io_rchar;
187 derive_t io_wchar;
188 derive_t io_syscr;
189 derive_t io_syscw;
191 struct procstat *next;
192 struct procstat_entry_s *instances;
193 } procstat_t;
195 static procstat_t *list_head_g = NULL;
197 #if HAVE_THREAD_INFO
198 static mach_port_t port_host_self;
199 static mach_port_t port_task_self;
201 static processor_set_name_array_t pset_list;
202 static mach_msg_type_number_t pset_list_len;
203 /* #endif HAVE_THREAD_INFO */
205 #elif KERNEL_LINUX
206 static long pagesize_g;
207 /* #endif KERNEL_LINUX */
209 #elif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD
210 /* no global variables */
211 /* #endif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD */
213 #elif HAVE_PROCINFO_H
214 static struct procentry64 procentry[MAXPROCENTRY];
215 static struct thrdentry64 thrdentry[MAXTHRDENTRY];
216 static int pagesize;
218 #ifndef _AIXVERSION_610
219 int getprocs64 (void *procsinfo, int sizproc, void *fdsinfo, int sizfd, pid_t *index, int count);
220 int getthrds64( pid_t, void *, int, tid64_t *, int );
221 #endif
222 int getargs (struct procentry64 *processBuffer, int bufferLen, char *argsBuffer, int argsLen);
223 #endif /* HAVE_PROCINFO_H */
225 /* put name of process from config to list_head_g tree
226 list_head_g is a list of 'procstat_t' structs with
227 processes names we want to watch */
228 static void ps_list_register (const char *name, const char *regexp)
229 {
230 procstat_t *new;
231 procstat_t *ptr;
232 int status;
234 new = (procstat_t *) malloc (sizeof (procstat_t));
235 if (new == NULL)
236 {
237 ERROR ("processes plugin: ps_list_register: malloc failed.");
238 return;
239 }
240 memset (new, 0, sizeof (procstat_t));
241 sstrncpy (new->name, name, sizeof (new->name));
243 #if HAVE_REGEX_H
244 if (regexp != NULL)
245 {
246 DEBUG ("ProcessMatch: adding \"%s\" as criteria to process %s.", regexp, name);
247 new->re = (regex_t *) malloc (sizeof (regex_t));
248 if (new->re == NULL)
249 {
250 ERROR ("processes plugin: ps_list_register: malloc failed.");
251 sfree (new);
252 return;
253 }
255 status = regcomp (new->re, regexp, REG_EXTENDED | REG_NOSUB);
256 if (status != 0)
257 {
258 DEBUG ("ProcessMatch: compiling the regular expression \"%s\" failed.", regexp);
259 sfree(new->re);
260 return;
261 }
262 }
263 #else
264 if (regexp != NULL)
265 {
266 ERROR ("processes plugin: ps_list_register: "
267 "Regular expression \"%s\" found in config "
268 "file, but support for regular expressions "
269 "has been disabled at compile time.",
270 regexp);
271 sfree (new);
272 return;
273 }
274 #endif
276 for (ptr = list_head_g; ptr != NULL; ptr = ptr->next)
277 {
278 if (strcmp (ptr->name, name) == 0)
279 {
280 WARNING ("processes plugin: You have configured more "
281 "than one `Process' or "
282 "`ProcessMatch' with the same name. "
283 "All but the first setting will be "
284 "ignored.");
285 sfree (new->re);
286 sfree (new);
287 return;
288 }
290 if (ptr->next == NULL)
291 break;
292 }
294 if (ptr == NULL)
295 list_head_g = new;
296 else
297 ptr->next = new;
298 } /* void ps_list_register */
300 /* try to match name against entry, returns 1 if success */
301 static int ps_list_match (const char *name, const char *cmdline, procstat_t *ps)
302 {
303 #if HAVE_REGEX_H
304 if (ps->re != NULL)
305 {
306 int status;
307 const char *str;
309 str = cmdline;
310 if ((str == NULL) || (str[0] == 0))
311 str = name;
313 assert (str != NULL);
315 status = regexec (ps->re, str,
316 /* nmatch = */ 0,
317 /* pmatch = */ NULL,
318 /* eflags = */ 0);
319 if (status == 0)
320 return (1);
321 }
322 else
323 #endif
324 if (strcmp (ps->name, name) == 0)
325 return (1);
327 return (0);
328 } /* int ps_list_match */
330 /* add process entry to 'instances' of process 'name' (or refresh it) */
331 static void ps_list_add (const char *name, const char *cmdline, procstat_entry_t *entry)
332 {
333 procstat_t *ps;
334 procstat_entry_t *pse;
336 if (entry->id == 0)
337 return;
339 for (ps = list_head_g; ps != NULL; ps = ps->next)
340 {
341 if ((ps_list_match (name, cmdline, ps)) == 0)
342 continue;
344 for (pse = ps->instances; pse != NULL; pse = pse->next)
345 if ((pse->id == entry->id) || (pse->next == NULL))
346 break;
348 if ((pse == NULL) || (pse->id != entry->id))
349 {
350 procstat_entry_t *new;
352 new = (procstat_entry_t *) malloc (sizeof (procstat_entry_t));
353 if (new == NULL)
354 return;
355 memset (new, 0, sizeof (procstat_entry_t));
356 new->id = entry->id;
358 if (pse == NULL)
359 ps->instances = new;
360 else
361 pse->next = new;
363 pse = new;
364 }
366 pse->age = 0;
367 pse->num_proc = entry->num_proc;
368 pse->num_lwp = entry->num_lwp;
369 pse->vmem_size = entry->vmem_size;
370 pse->vmem_rss = entry->vmem_rss;
371 pse->vmem_data = entry->vmem_data;
372 pse->vmem_code = entry->vmem_code;
373 pse->stack_size = entry->stack_size;
374 pse->io_rchar = entry->io_rchar;
375 pse->io_wchar = entry->io_wchar;
376 pse->io_syscr = entry->io_syscr;
377 pse->io_syscw = entry->io_syscw;
379 ps->num_proc += pse->num_proc;
380 ps->num_lwp += pse->num_lwp;
381 ps->vmem_size += pse->vmem_size;
382 ps->vmem_rss += pse->vmem_rss;
383 ps->vmem_data += pse->vmem_data;
384 ps->vmem_code += pse->vmem_code;
385 ps->stack_size += pse->stack_size;
387 ps->io_rchar += ((pse->io_rchar == -1)?0:pse->io_rchar);
388 ps->io_wchar += ((pse->io_wchar == -1)?0:pse->io_wchar);
389 ps->io_syscr += ((pse->io_syscr == -1)?0:pse->io_syscr);
390 ps->io_syscw += ((pse->io_syscw == -1)?0:pse->io_syscw);
392 if ((entry->vmem_minflt_counter == 0)
393 && (entry->vmem_majflt_counter == 0))
394 {
395 pse->vmem_minflt_counter += entry->vmem_minflt;
396 pse->vmem_minflt = entry->vmem_minflt;
398 pse->vmem_majflt_counter += entry->vmem_majflt;
399 pse->vmem_majflt = entry->vmem_majflt;
400 }
401 else
402 {
403 if (entry->vmem_minflt_counter < pse->vmem_minflt_counter)
404 {
405 pse->vmem_minflt = entry->vmem_minflt_counter
406 + (ULONG_MAX - pse->vmem_minflt_counter);
407 }
408 else
409 {
410 pse->vmem_minflt = entry->vmem_minflt_counter - pse->vmem_minflt_counter;
411 }
412 pse->vmem_minflt_counter = entry->vmem_minflt_counter;
414 if (entry->vmem_majflt_counter < pse->vmem_majflt_counter)
415 {
416 pse->vmem_majflt = entry->vmem_majflt_counter
417 + (ULONG_MAX - pse->vmem_majflt_counter);
418 }
419 else
420 {
421 pse->vmem_majflt = entry->vmem_majflt_counter - pse->vmem_majflt_counter;
422 }
423 pse->vmem_majflt_counter = entry->vmem_majflt_counter;
424 }
426 ps->vmem_minflt_counter += pse->vmem_minflt;
427 ps->vmem_majflt_counter += pse->vmem_majflt;
429 if ((entry->cpu_user_counter == 0)
430 && (entry->cpu_system_counter == 0))
431 {
432 pse->cpu_user_counter += entry->cpu_user;
433 pse->cpu_user = entry->cpu_user;
435 pse->cpu_system_counter += entry->cpu_system;
436 pse->cpu_system = entry->cpu_system;
437 }
438 else
439 {
440 if (entry->cpu_user_counter < pse->cpu_user_counter)
441 {
442 pse->cpu_user = entry->cpu_user_counter
443 + (ULONG_MAX - pse->cpu_user_counter);
444 }
445 else
446 {
447 pse->cpu_user = entry->cpu_user_counter - pse->cpu_user_counter;
448 }
449 pse->cpu_user_counter = entry->cpu_user_counter;
451 if (entry->cpu_system_counter < pse->cpu_system_counter)
452 {
453 pse->cpu_system = entry->cpu_system_counter
454 + (ULONG_MAX - pse->cpu_system_counter);
455 }
456 else
457 {
458 pse->cpu_system = entry->cpu_system_counter - pse->cpu_system_counter;
459 }
460 pse->cpu_system_counter = entry->cpu_system_counter;
461 }
463 ps->cpu_user_counter += pse->cpu_user;
464 ps->cpu_system_counter += pse->cpu_system;
465 }
466 }
468 /* remove old entries from instances of processes in list_head_g */
469 static void ps_list_reset (void)
470 {
471 procstat_t *ps;
472 procstat_entry_t *pse;
473 procstat_entry_t *pse_prev;
475 for (ps = list_head_g; ps != NULL; ps = ps->next)
476 {
477 ps->num_proc = 0;
478 ps->num_lwp = 0;
479 ps->vmem_size = 0;
480 ps->vmem_rss = 0;
481 ps->vmem_data = 0;
482 ps->vmem_code = 0;
483 ps->stack_size = 0;
484 ps->io_rchar = -1;
485 ps->io_wchar = -1;
486 ps->io_syscr = -1;
487 ps->io_syscw = -1;
489 pse_prev = NULL;
490 pse = ps->instances;
491 while (pse != NULL)
492 {
493 if (pse->age > 10)
494 {
495 DEBUG ("Removing this procstat entry cause it's too old: "
496 "id = %lu; name = %s;",
497 pse->id, ps->name);
499 if (pse_prev == NULL)
500 {
501 ps->instances = pse->next;
502 free (pse);
503 pse = ps->instances;
504 }
505 else
506 {
507 pse_prev->next = pse->next;
508 free (pse);
509 pse = pse_prev->next;
510 }
511 }
512 else
513 {
514 pse->age++;
515 pse_prev = pse;
516 pse = pse->next;
517 }
518 } /* while (pse != NULL) */
519 } /* for (ps = list_head_g; ps != NULL; ps = ps->next) */
520 }
522 /* put all pre-defined 'Process' names from config to list_head_g tree */
523 static int ps_config (const char *key, const char *value)
524 {
525 if (strcasecmp (key, "Process") == 0)
526 {
527 ps_list_register (value, NULL);
528 }
529 else if (strcasecmp (key, "ProcessMatch") == 0)
530 {
531 char *new_val;
532 char *fields[3];
533 int fields_num;
535 new_val = strdup (value);
536 if (new_val == NULL) {
537 ERROR ("processes plugin: strdup failed when processing "
538 "`ProcessMatch %s'.", value);
539 return (1);
540 }
542 fields_num = strsplit (new_val, fields,
543 STATIC_ARRAY_SIZE (fields));
544 if (fields_num != 2)
545 {
546 ERROR ("processes plugin: `ProcessMatch' needs exactly "
547 "two string arguments.");
548 sfree (new_val);
549 return (1);
550 }
551 ps_list_register (fields[0], fields[1]);
552 sfree (new_val);
553 }
554 else
555 {
556 ERROR ("processes plugin: The `%s' configuration option is not "
557 "understood and will be ignored.", key);
558 return (-1);
559 }
561 return (0);
562 }
564 static int ps_init (void)
565 {
566 #if HAVE_THREAD_INFO
567 kern_return_t status;
569 port_host_self = mach_host_self ();
570 port_task_self = mach_task_self ();
572 if (pset_list != NULL)
573 {
574 vm_deallocate (port_task_self,
575 (vm_address_t) pset_list,
576 pset_list_len * sizeof (processor_set_t));
577 pset_list = NULL;
578 pset_list_len = 0;
579 }
581 if ((status = host_processor_sets (port_host_self,
582 &pset_list,
583 &pset_list_len)) != KERN_SUCCESS)
584 {
585 ERROR ("host_processor_sets failed: %s\n",
586 mach_error_string (status));
587 pset_list = NULL;
588 pset_list_len = 0;
589 return (-1);
590 }
591 /* #endif HAVE_THREAD_INFO */
593 #elif KERNEL_LINUX
594 pagesize_g = sysconf(_SC_PAGESIZE);
595 DEBUG ("pagesize_g = %li; CONFIG_HZ = %i;",
596 pagesize_g, CONFIG_HZ);
597 /* #endif KERNEL_LINUX */
599 #elif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD
600 /* no initialization */
601 /* #endif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD */
603 #elif HAVE_PROCINFO_H
604 pagesize = getpagesize();
605 #endif /* HAVE_PROCINFO_H */
607 return (0);
608 } /* int ps_init */
610 /* submit global state (e.g.: qty of zombies, running, etc..) */
611 static void ps_submit_state (const char *state, double value)
612 {
613 value_t values[1];
614 value_list_t vl = VALUE_LIST_INIT;
616 values[0].gauge = value;
618 vl.values = values;
619 vl.values_len = 1;
620 sstrncpy (vl.host, hostname_g, sizeof (vl.host));
621 sstrncpy (vl.plugin, "processes", sizeof (vl.plugin));
622 sstrncpy (vl.plugin_instance, "", sizeof (vl.plugin_instance));
623 sstrncpy (vl.type, "ps_state", sizeof (vl.type));
624 sstrncpy (vl.type_instance, state, sizeof (vl.type_instance));
626 plugin_dispatch_values (&vl);
627 }
629 /* submit info about specific process (e.g.: memory taken, cpu usage, etc..) */
630 static void ps_submit_proc_list (procstat_t *ps)
631 {
632 value_t values[2];
633 value_list_t vl = VALUE_LIST_INIT;
635 vl.values = values;
636 vl.values_len = 2;
637 sstrncpy (vl.host, hostname_g, sizeof (vl.host));
638 sstrncpy (vl.plugin, "processes", sizeof (vl.plugin));
639 sstrncpy (vl.plugin_instance, ps->name, sizeof (vl.plugin_instance));
641 sstrncpy (vl.type, "ps_vm", sizeof (vl.type));
642 vl.values[0].gauge = ps->vmem_size;
643 vl.values_len = 1;
644 plugin_dispatch_values (&vl);
646 sstrncpy (vl.type, "ps_rss", sizeof (vl.type));
647 vl.values[0].gauge = ps->vmem_rss;
648 vl.values_len = 1;
649 plugin_dispatch_values (&vl);
651 sstrncpy (vl.type, "ps_data", sizeof (vl.type));
652 vl.values[0].gauge = ps->vmem_data;
653 vl.values_len = 1;
654 plugin_dispatch_values (&vl);
656 sstrncpy (vl.type, "ps_code", sizeof (vl.type));
657 vl.values[0].gauge = ps->vmem_code;
658 vl.values_len = 1;
659 plugin_dispatch_values (&vl);
661 sstrncpy (vl.type, "ps_stacksize", sizeof (vl.type));
662 vl.values[0].gauge = ps->stack_size;
663 vl.values_len = 1;
664 plugin_dispatch_values (&vl);
666 sstrncpy (vl.type, "ps_cputime", sizeof (vl.type));
667 vl.values[0].derive = ps->cpu_user_counter;
668 vl.values[1].derive = ps->cpu_system_counter;
669 vl.values_len = 2;
670 plugin_dispatch_values (&vl);
672 sstrncpy (vl.type, "ps_count", sizeof (vl.type));
673 vl.values[0].gauge = ps->num_proc;
674 vl.values[1].gauge = ps->num_lwp;
675 vl.values_len = 2;
676 plugin_dispatch_values (&vl);
678 sstrncpy (vl.type, "ps_pagefaults", sizeof (vl.type));
679 vl.values[0].derive = ps->vmem_minflt_counter;
680 vl.values[1].derive = ps->vmem_majflt_counter;
681 vl.values_len = 2;
682 plugin_dispatch_values (&vl);
684 if ( (ps->io_rchar != -1) && (ps->io_wchar != -1) )
685 {
686 sstrncpy (vl.type, "ps_disk_octets", sizeof (vl.type));
687 vl.values[0].derive = ps->io_rchar;
688 vl.values[1].derive = ps->io_wchar;
689 vl.values_len = 2;
690 plugin_dispatch_values (&vl);
691 }
693 if ( (ps->io_syscr != -1) && (ps->io_syscw != -1) )
694 {
695 sstrncpy (vl.type, "ps_disk_ops", sizeof (vl.type));
696 vl.values[0].derive = ps->io_syscr;
697 vl.values[1].derive = ps->io_syscw;
698 vl.values_len = 2;
699 plugin_dispatch_values (&vl);
700 }
702 DEBUG ("name = %s; num_proc = %lu; num_lwp = %lu; "
703 "vmem_size = %lu; vmem_rss = %lu; vmem_data = %lu; "
704 "vmem_code = %lu; "
705 "vmem_minflt_counter = %"PRIi64"; vmem_majflt_counter = %"PRIi64"; "
706 "cpu_user_counter = %"PRIi64"; cpu_system_counter = %"PRIi64"; "
707 "io_rchar = %"PRIi64"; io_wchar = %"PRIi64"; "
708 "io_syscr = %"PRIi64"; io_syscw = %"PRIi64";",
709 ps->name, ps->num_proc, ps->num_lwp,
710 ps->vmem_size, ps->vmem_rss,
711 ps->vmem_data, ps->vmem_code,
712 ps->vmem_minflt_counter, ps->vmem_majflt_counter,
713 ps->cpu_user_counter, ps->cpu_system_counter,
714 ps->io_rchar, ps->io_wchar, ps->io_syscr, ps->io_syscw);
715 } /* void ps_submit_proc_list */
717 /* ------- additional functions for KERNEL_LINUX/HAVE_THREAD_INFO ------- */
718 #if KERNEL_LINUX
719 static int ps_read_tasks (int pid)
720 {
721 char dirname[64];
722 DIR *dh;
723 struct dirent *ent;
724 int count = 0;
726 ssnprintf (dirname, sizeof (dirname), "/proc/%i/task", pid);
728 if ((dh = opendir (dirname)) == NULL)
729 {
730 DEBUG ("Failed to open directory `%s'", dirname);
731 return (-1);
732 }
734 while ((ent = readdir (dh)) != NULL)
735 {
736 if (!isdigit ((int) ent->d_name[0]))
737 continue;
738 else
739 count++;
740 }
741 closedir (dh);
743 return ((count >= 1) ? count : 1);
744 } /* int *ps_read_tasks */
746 /* Read advanced virtual memory data from /proc/pid/status */
747 static procstat_t *ps_read_vmem (int pid, procstat_t *ps)
748 {
749 FILE *fh;
750 char buffer[1024];
751 char filename[64];
752 unsigned long long lib = 0;
753 unsigned long long exe = 0;
754 unsigned long long data = 0;
755 char *fields[8];
756 int numfields;
758 ssnprintf (filename, sizeof (filename), "/proc/%i/status", pid);
759 if ((fh = fopen (filename, "r")) == NULL)
760 return (NULL);
762 while (fgets (buffer, sizeof(buffer), fh) != NULL)
763 {
764 long long tmp;
765 char *endptr;
767 if (strncmp (buffer, "Vm", 2) != 0)
768 continue;
770 numfields = strsplit (buffer, fields,
771 STATIC_ARRAY_SIZE (fields));
773 if (numfields < 2)
774 continue;
776 errno = 0;
777 endptr = NULL;
778 tmp = strtoll (fields[1], &endptr, /* base = */ 10);
779 if ((errno == 0) && (endptr != fields[1]))
780 {
781 if (strncmp (buffer, "VmData", 6) == 0)
782 {
783 data = tmp;
784 }
785 else if (strncmp (buffer, "VmLib", 5) == 0)
786 {
787 lib = tmp;
788 }
789 else if (strncmp(buffer, "VmExe", 5) == 0)
790 {
791 exe = tmp;
792 }
793 }
794 } /* while (fgets) */
796 if (fclose (fh))
797 {
798 char errbuf[1024];
799 WARNING ("processes: fclose: %s",
800 sstrerror (errno, errbuf, sizeof (errbuf)));
801 }
803 ps->vmem_data = data * 1024;
804 ps->vmem_code = (exe + lib) * 1024;
806 return (ps);
807 } /* procstat_t *ps_read_vmem */
809 static procstat_t *ps_read_io (int pid, procstat_t *ps)
810 {
811 FILE *fh;
812 char buffer[1024];
813 char filename[64];
815 char *fields[8];
816 int numfields;
818 ssnprintf (filename, sizeof (filename), "/proc/%i/io", pid);
819 if ((fh = fopen (filename, "r")) == NULL)
820 return (NULL);
822 while (fgets (buffer, sizeof (buffer), fh) != NULL)
823 {
824 derive_t *val = NULL;
825 long long tmp;
826 char *endptr;
828 if (strncasecmp (buffer, "rchar:", 6) == 0)
829 val = &(ps->io_rchar);
830 else if (strncasecmp (buffer, "wchar:", 6) == 0)
831 val = &(ps->io_wchar);
832 else if (strncasecmp (buffer, "syscr:", 6) == 0)
833 val = &(ps->io_syscr);
834 else if (strncasecmp (buffer, "syscw:", 6) == 0)
835 val = &(ps->io_syscw);
836 else
837 continue;
839 numfields = strsplit (buffer, fields,
840 STATIC_ARRAY_SIZE (fields));
842 if (numfields < 2)
843 continue;
845 errno = 0;
846 endptr = NULL;
847 tmp = strtoll (fields[1], &endptr, /* base = */ 10);
848 if ((errno != 0) || (endptr == fields[1]))
849 *val = -1;
850 else
851 *val = (derive_t) tmp;
852 } /* while (fgets) */
854 if (fclose (fh))
855 {
856 char errbuf[1024];
857 WARNING ("processes: fclose: %s",
858 sstrerror (errno, errbuf, sizeof (errbuf)));
859 }
861 return (ps);
862 } /* procstat_t *ps_read_io */
864 int ps_read_process (int pid, procstat_t *ps, char *state)
865 {
866 char filename[64];
867 char buffer[1024];
869 char *fields[64];
870 char fields_len;
872 int i;
874 int name_len;
876 derive_t cpu_user_counter;
877 derive_t cpu_system_counter;
878 long long unsigned vmem_size;
879 long long unsigned vmem_rss;
880 long long unsigned stack_size;
882 memset (ps, 0, sizeof (procstat_t));
884 ssnprintf (filename, sizeof (filename), "/proc/%i/stat", pid);
886 i = read_file_contents (filename, buffer, sizeof(buffer) - 1);
887 if (i <= 0)
888 return (-1);
889 buffer[i] = 0;
891 fields_len = strsplit (buffer, fields, STATIC_ARRAY_SIZE (fields));
892 if (fields_len < 24)
893 {
894 DEBUG ("processes plugin: ps_read_process (pid = %i):"
895 " `%s' has only %i fields..",
896 (int) pid, filename, fields_len);
897 return (-1);
898 }
900 /* copy the name, strip brackets in the process */
901 name_len = strlen (fields[1]) - 2;
902 if ((fields[1][0] != '(') || (fields[1][name_len + 1] != ')'))
903 {
904 DEBUG ("No brackets found in process name: `%s'", fields[1]);
905 return (-1);
906 }
907 fields[1] = fields[1] + 1;
908 fields[1][name_len] = '\0';
909 strncpy (ps->name, fields[1], PROCSTAT_NAME_LEN);
912 *state = fields[2][0];
914 if (*state == 'Z')
915 {
916 ps->num_lwp = 0;
917 ps->num_proc = 0;
918 }
919 else
920 {
921 if ( (ps->num_lwp = ps_read_tasks (pid)) == -1 )
922 {
923 /* returns -1 => kernel 2.4 */
924 ps->num_lwp = 1;
925 }
926 ps->num_proc = 1;
927 }
929 /* Leave the rest at zero if this is only a zombi */
930 if (ps->num_proc == 0)
931 {
932 DEBUG ("processes plugin: This is only a zombi: pid = %i; "
933 "name = %s;", pid, ps->name);
934 return (0);
935 }
937 cpu_user_counter = atoll (fields[13]);
938 cpu_system_counter = atoll (fields[14]);
939 vmem_size = atoll (fields[22]);
940 vmem_rss = atoll (fields[23]);
941 ps->vmem_minflt_counter = atoll (fields[9]);
942 ps->vmem_majflt_counter = atoll (fields[11]);
944 {
945 unsigned long long stack_start = atoll (fields[27]);
946 unsigned long long stack_ptr = atoll (fields[28]);
948 stack_size = (stack_start > stack_ptr)
949 ? stack_start - stack_ptr
950 : stack_ptr - stack_start;
951 }
953 /* Convert jiffies to useconds */
954 cpu_user_counter = cpu_user_counter * 1000000 / CONFIG_HZ;
955 cpu_system_counter = cpu_system_counter * 1000000 / CONFIG_HZ;
956 vmem_rss = vmem_rss * pagesize_g;
958 if ( (ps_read_vmem(pid, ps)) == NULL)
959 {
960 /* No VMem data */
961 ps->vmem_data = -1;
962 ps->vmem_code = -1;
963 DEBUG("ps_read_process: did not get vmem data for pid %i",pid);
964 }
966 ps->cpu_user_counter = cpu_user_counter;
967 ps->cpu_system_counter = cpu_system_counter;
968 ps->vmem_size = (unsigned long) vmem_size;
969 ps->vmem_rss = (unsigned long) vmem_rss;
970 ps->stack_size = (unsigned long) stack_size;
972 if ( (ps_read_io (pid, ps)) == NULL)
973 {
974 /* no io data */
975 ps->io_rchar = -1;
976 ps->io_wchar = -1;
977 ps->io_syscr = -1;
978 ps->io_syscw = -1;
980 DEBUG("ps_read_process: not get io data for pid %i",pid);
981 }
983 /* success */
984 return (0);
985 } /* int ps_read_process (...) */
987 static char *ps_get_cmdline (pid_t pid, char *name, char *buf, size_t buf_len)
988 {
989 char *buf_ptr;
990 size_t len;
992 char file[PATH_MAX];
993 int fd;
995 size_t n;
997 if ((pid < 1) || (NULL == buf) || (buf_len < 2))
998 return NULL;
1000 ssnprintf (file, sizeof (file), "/proc/%u/cmdline",
1001 (unsigned int) pid);
1003 errno = 0;
1004 fd = open (file, O_RDONLY);
1005 if (fd < 0) {
1006 char errbuf[4096];
1007 /* ENOENT means the process exited while we were handling it.
1008 * Don't complain about this, it only fills the logs. */
1009 if (errno != ENOENT)
1010 WARNING ("processes plugin: Failed to open `%s': %s.", file,
1011 sstrerror (errno, errbuf, sizeof (errbuf)));
1012 return NULL;
1013 }
1015 buf_ptr = buf;
1016 len = buf_len;
1018 n = 0;
1020 while (42) {
1021 ssize_t status;
1023 status = read (fd, (void *)buf_ptr, len);
1025 if (status < 0) {
1026 char errbuf[1024];
1028 if ((EAGAIN == errno) || (EINTR == errno))
1029 continue;
1031 WARNING ("processes plugin: Failed to read from `%s': %s.", file,
1032 sstrerror (errno, errbuf, sizeof (errbuf)));
1033 close (fd);
1034 return NULL;
1035 }
1037 n += status;
1039 if (status == 0)
1040 break;
1042 buf_ptr += status;
1043 len -= status;
1045 if (len <= 0)
1046 break;
1047 }
1049 close (fd);
1051 if (0 == n) {
1052 /* cmdline not available; e.g. kernel thread, zombie */
1053 if (NULL == name)
1054 return NULL;
1056 ssnprintf (buf, buf_len, "[%s]", name);
1057 return buf;
1058 }
1060 assert (n <= buf_len);
1062 if (n == buf_len)
1063 --n;
1064 buf[n] = '\0';
1066 --n;
1067 /* remove trailing whitespace */
1068 while ((n > 0) && (isspace (buf[n]) || ('\0' == buf[n]))) {
1069 buf[n] = '\0';
1070 --n;
1071 }
1073 /* arguments are separated by '\0' in /proc/<pid>/cmdline */
1074 while (n > 0) {
1075 if ('\0' == buf[n])
1076 buf[n] = ' ';
1077 --n;
1078 }
1079 return buf;
1080 } /* char *ps_get_cmdline (...) */
1082 static unsigned long read_fork_rate ()
1083 {
1084 FILE *proc_stat;
1085 char buf[1024];
1086 unsigned long result = 0;
1087 int numfields;
1088 char *fields[3];
1090 proc_stat = fopen("/proc/stat", "r");
1091 if (proc_stat == NULL) {
1092 char errbuf[1024];
1093 ERROR ("processes plugin: fopen (/proc/stat) failed: %s",
1094 sstrerror (errno, errbuf, sizeof (errbuf)));
1095 return ULONG_MAX;
1096 }
1098 while (fgets (buf, sizeof(buf), proc_stat) != NULL)
1099 {
1100 char *endptr;
1102 numfields = strsplit(buf, fields, STATIC_ARRAY_SIZE (fields));
1103 if (numfields != 2)
1104 continue;
1106 if (strcmp ("processes", fields[0]) != 0)
1107 continue;
1109 errno = 0;
1110 endptr = NULL;
1111 result = strtoul(fields[1], &endptr, /* base = */ 10);
1112 if ((endptr == fields[1]) || (errno != 0)) {
1113 ERROR ("processes plugin: Cannot parse fork rate: %s",
1114 fields[1]);
1115 result = ULONG_MAX;
1116 break;
1117 }
1119 break;
1120 }
1122 fclose(proc_stat);
1124 return result;
1125 }
1127 static void ps_submit_fork_rate (unsigned long value)
1128 {
1129 value_t values[1];
1130 value_list_t vl = VALUE_LIST_INIT;
1132 values[0].derive = (derive_t) value;
1134 vl.values = values;
1135 vl.values_len = 1;
1136 sstrncpy (vl.host, hostname_g, sizeof (vl.host));
1137 sstrncpy (vl.plugin, "processes", sizeof (vl.plugin));
1138 sstrncpy (vl.plugin_instance, "", sizeof (vl.plugin_instance));
1139 sstrncpy (vl.type, "fork_rate", sizeof (vl.type));
1140 sstrncpy (vl.type_instance, "", sizeof (vl.type_instance));
1142 plugin_dispatch_values (&vl);
1143 }
1145 #endif /* KERNEL_LINUX */
1147 #if HAVE_THREAD_INFO
1148 static int mach_get_task_name (task_t t, int *pid, char *name, size_t name_max_len)
1149 {
1150 int mib[4];
1152 struct kinfo_proc kp;
1153 size_t kp_size;
1155 mib[0] = CTL_KERN;
1156 mib[1] = KERN_PROC;
1157 mib[2] = KERN_PROC_PID;
1159 if (pid_for_task (t, pid) != KERN_SUCCESS)
1160 return (-1);
1161 mib[3] = *pid;
1163 kp_size = sizeof (kp);
1164 if (sysctl (mib, 4, &kp, &kp_size, NULL, 0) != 0)
1165 return (-1);
1167 if (name_max_len > (MAXCOMLEN + 1))
1168 name_max_len = MAXCOMLEN + 1;
1170 strncpy (name, kp.kp_proc.p_comm, name_max_len - 1);
1171 name[name_max_len - 1] = '\0';
1173 DEBUG ("pid = %i; name = %s;", *pid, name);
1175 /* We don't do the special handling for `p_comm == "LaunchCFMApp"' as
1176 * `top' does it, because it is a lot of work and only used when
1177 * debugging. -octo */
1179 return (0);
1180 }
1181 #endif /* HAVE_THREAD_INFO */
1182 /* ------- end of additional functions for KERNEL_LINUX/HAVE_THREAD_INFO ------- */
1184 /* do actual readings from kernel */
1185 static int ps_read (void)
1186 {
1187 #if HAVE_THREAD_INFO
1188 kern_return_t status;
1190 int pset;
1191 processor_set_t port_pset_priv;
1193 int task;
1194 task_array_t task_list;
1195 mach_msg_type_number_t task_list_len;
1197 int task_pid;
1198 char task_name[MAXCOMLEN + 1];
1200 int thread;
1201 thread_act_array_t thread_list;
1202 mach_msg_type_number_t thread_list_len;
1203 thread_basic_info_data_t thread_data;
1204 mach_msg_type_number_t thread_data_len;
1206 int running = 0;
1207 int sleeping = 0;
1208 int zombies = 0;
1209 int stopped = 0;
1210 int blocked = 0;
1212 procstat_t *ps;
1213 procstat_entry_t pse;
1215 ps_list_reset ();
1217 /*
1218 * The Mach-concept is a little different from the traditional UNIX
1219 * concept: All the work is done in threads. Threads are contained in
1220 * `tasks'. Therefore, `task status' doesn't make much sense, since
1221 * it's actually a `thread status'.
1222 * Tasks are assigned to sets of processors, so that's where you go to
1223 * get a list.
1224 */
1225 for (pset = 0; pset < pset_list_len; pset++)
1226 {
1227 if ((status = host_processor_set_priv (port_host_self,
1228 pset_list[pset],
1229 &port_pset_priv)) != KERN_SUCCESS)
1230 {
1231 ERROR ("host_processor_set_priv failed: %s\n",
1232 mach_error_string (status));
1233 continue;
1234 }
1236 if ((status = processor_set_tasks (port_pset_priv,
1237 &task_list,
1238 &task_list_len)) != KERN_SUCCESS)
1239 {
1240 ERROR ("processor_set_tasks failed: %s\n",
1241 mach_error_string (status));
1242 mach_port_deallocate (port_task_self, port_pset_priv);
1243 continue;
1244 }
1246 for (task = 0; task < task_list_len; task++)
1247 {
1248 ps = NULL;
1249 if (mach_get_task_name (task_list[task],
1250 &task_pid,
1251 task_name, PROCSTAT_NAME_LEN) == 0)
1252 {
1253 /* search for at least one match */
1254 for (ps = list_head_g; ps != NULL; ps = ps->next)
1255 /* FIXME: cmdline should be here instead of NULL */
1256 if (ps_list_match (task_name, NULL, ps) == 1)
1257 break;
1258 }
1260 /* Collect more detailed statistics for this process */
1261 if (ps != NULL)
1262 {
1263 task_basic_info_data_t task_basic_info;
1264 mach_msg_type_number_t task_basic_info_len;
1265 task_events_info_data_t task_events_info;
1266 mach_msg_type_number_t task_events_info_len;
1267 task_absolutetime_info_data_t task_absolutetime_info;
1268 mach_msg_type_number_t task_absolutetime_info_len;
1270 memset (&pse, '\0', sizeof (pse));
1271 pse.id = task_pid;
1273 task_basic_info_len = TASK_BASIC_INFO_COUNT;
1274 status = task_info (task_list[task],
1275 TASK_BASIC_INFO,
1276 (task_info_t) &task_basic_info,
1277 &task_basic_info_len);
1278 if (status != KERN_SUCCESS)
1279 {
1280 ERROR ("task_info failed: %s",
1281 mach_error_string (status));
1282 continue; /* with next thread_list */
1283 }
1285 task_events_info_len = TASK_EVENTS_INFO_COUNT;
1286 status = task_info (task_list[task],
1287 TASK_EVENTS_INFO,
1288 (task_info_t) &task_events_info,
1289 &task_events_info_len);
1290 if (status != KERN_SUCCESS)
1291 {
1292 ERROR ("task_info failed: %s",
1293 mach_error_string (status));
1294 continue; /* with next thread_list */
1295 }
1297 task_absolutetime_info_len = TASK_ABSOLUTETIME_INFO_COUNT;
1298 status = task_info (task_list[task],
1299 TASK_ABSOLUTETIME_INFO,
1300 (task_info_t) &task_absolutetime_info,
1301 &task_absolutetime_info_len);
1302 if (status != KERN_SUCCESS)
1303 {
1304 ERROR ("task_info failed: %s",
1305 mach_error_string (status));
1306 continue; /* with next thread_list */
1307 }
1309 pse.num_proc++;
1310 pse.vmem_size = task_basic_info.virtual_size;
1311 pse.vmem_rss = task_basic_info.resident_size;
1312 /* Does not seem to be easily exposed */
1313 pse.vmem_data = 0;
1314 pse.vmem_code = 0;
1316 pse.vmem_minflt_counter = task_events_info.cow_faults;
1317 pse.vmem_majflt_counter = task_events_info.faults;
1319 pse.cpu_user_counter = task_absolutetime_info.total_user;
1320 pse.cpu_system_counter = task_absolutetime_info.total_system;
1321 }
1323 status = task_threads (task_list[task], &thread_list,
1324 &thread_list_len);
1325 if (status != KERN_SUCCESS)
1326 {
1327 /* Apple's `top' treats this case a zombie. It
1328 * makes sense to some extend: A `zombie'
1329 * thread is nonsense, since the task/process
1330 * is dead. */
1331 zombies++;
1332 DEBUG ("task_threads failed: %s",
1333 mach_error_string (status));
1334 if (task_list[task] != port_task_self)
1335 mach_port_deallocate (port_task_self,
1336 task_list[task]);
1337 continue; /* with next task_list */
1338 }
1340 for (thread = 0; thread < thread_list_len; thread++)
1341 {
1342 thread_data_len = THREAD_BASIC_INFO_COUNT;
1343 status = thread_info (thread_list[thread],
1344 THREAD_BASIC_INFO,
1345 (thread_info_t) &thread_data,
1346 &thread_data_len);
1347 if (status != KERN_SUCCESS)
1348 {
1349 ERROR ("thread_info failed: %s",
1350 mach_error_string (status));
1351 if (task_list[task] != port_task_self)
1352 mach_port_deallocate (port_task_self,
1353 thread_list[thread]);
1354 continue; /* with next thread_list */
1355 }
1357 if (ps != NULL)
1358 pse.num_lwp++;
1360 switch (thread_data.run_state)
1361 {
1362 case TH_STATE_RUNNING:
1363 running++;
1364 break;
1365 case TH_STATE_STOPPED:
1366 /* What exactly is `halted'? */
1367 case TH_STATE_HALTED:
1368 stopped++;
1369 break;
1370 case TH_STATE_WAITING:
1371 sleeping++;
1372 break;
1373 case TH_STATE_UNINTERRUPTIBLE:
1374 blocked++;
1375 break;
1376 /* There is no `zombie' case here,
1377 * since there are no zombie-threads.
1378 * There's only zombie tasks, which are
1379 * handled above. */
1380 default:
1381 WARNING ("Unknown thread status: %i",
1382 thread_data.run_state);
1383 break;
1384 } /* switch (thread_data.run_state) */
1386 if (task_list[task] != port_task_self)
1387 {
1388 status = mach_port_deallocate (port_task_self,
1389 thread_list[thread]);
1390 if (status != KERN_SUCCESS)
1391 ERROR ("mach_port_deallocate failed: %s",
1392 mach_error_string (status));
1393 }
1394 } /* for (thread_list) */
1396 if ((status = vm_deallocate (port_task_self,
1397 (vm_address_t) thread_list,
1398 thread_list_len * sizeof (thread_act_t)))
1399 != KERN_SUCCESS)
1400 {
1401 ERROR ("vm_deallocate failed: %s",
1402 mach_error_string (status));
1403 }
1404 thread_list = NULL;
1405 thread_list_len = 0;
1407 /* Only deallocate the task port, if it isn't our own.
1408 * Don't know what would happen in that case, but this
1409 * is what Apple's top does.. ;) */
1410 if (task_list[task] != port_task_self)
1411 {
1412 status = mach_port_deallocate (port_task_self,
1413 task_list[task]);
1414 if (status != KERN_SUCCESS)
1415 ERROR ("mach_port_deallocate failed: %s",
1416 mach_error_string (status));
1417 }
1419 if (ps != NULL)
1420 /* FIXME: cmdline should be here instead of NULL */
1421 ps_list_add (task_name, NULL, &pse);
1422 } /* for (task_list) */
1424 if ((status = vm_deallocate (port_task_self,
1425 (vm_address_t) task_list,
1426 task_list_len * sizeof (task_t))) != KERN_SUCCESS)
1427 {
1428 ERROR ("vm_deallocate failed: %s",
1429 mach_error_string (status));
1430 }
1431 task_list = NULL;
1432 task_list_len = 0;
1434 if ((status = mach_port_deallocate (port_task_self, port_pset_priv))
1435 != KERN_SUCCESS)
1436 {
1437 ERROR ("mach_port_deallocate failed: %s",
1438 mach_error_string (status));
1439 }
1440 } /* for (pset_list) */
1442 ps_submit_state ("running", running);
1443 ps_submit_state ("sleeping", sleeping);
1444 ps_submit_state ("zombies", zombies);
1445 ps_submit_state ("stopped", stopped);
1446 ps_submit_state ("blocked", blocked);
1448 for (ps = list_head_g; ps != NULL; ps = ps->next)
1449 ps_submit_proc_list (ps);
1450 /* #endif HAVE_THREAD_INFO */
1452 #elif KERNEL_LINUX
1453 int running = 0;
1454 int sleeping = 0;
1455 int zombies = 0;
1456 int stopped = 0;
1457 int paging = 0;
1458 int blocked = 0;
1460 struct dirent *ent;
1461 DIR *proc;
1462 int pid;
1464 char cmdline[ARG_MAX];
1466 int status;
1467 procstat_t ps;
1468 procstat_entry_t pse;
1469 char state;
1471 unsigned long fork_rate;
1473 procstat_t *ps_ptr;
1475 running = sleeping = zombies = stopped = paging = blocked = 0;
1476 ps_list_reset ();
1478 if ((proc = opendir ("/proc")) == NULL)
1479 {
1480 char errbuf[1024];
1481 ERROR ("Cannot open `/proc': %s",
1482 sstrerror (errno, errbuf, sizeof (errbuf)));
1483 return (-1);
1484 }
1486 while ((ent = readdir (proc)) != NULL)
1487 {
1488 if (!isdigit (ent->d_name[0]))
1489 continue;
1491 if ((pid = atoi (ent->d_name)) < 1)
1492 continue;
1494 status = ps_read_process (pid, &ps, &state);
1495 if (status != 0)
1496 {
1497 DEBUG ("ps_read_process failed: %i", status);
1498 continue;
1499 }
1501 pse.id = pid;
1502 pse.age = 0;
1504 pse.num_proc = ps.num_proc;
1505 pse.num_lwp = ps.num_lwp;
1506 pse.vmem_size = ps.vmem_size;
1507 pse.vmem_rss = ps.vmem_rss;
1508 pse.vmem_data = ps.vmem_data;
1509 pse.vmem_code = ps.vmem_code;
1510 pse.stack_size = ps.stack_size;
1512 pse.vmem_minflt = 0;
1513 pse.vmem_minflt_counter = ps.vmem_minflt_counter;
1514 pse.vmem_majflt = 0;
1515 pse.vmem_majflt_counter = ps.vmem_majflt_counter;
1517 pse.cpu_user = 0;
1518 pse.cpu_user_counter = ps.cpu_user_counter;
1519 pse.cpu_system = 0;
1520 pse.cpu_system_counter = ps.cpu_system_counter;
1522 pse.io_rchar = ps.io_rchar;
1523 pse.io_wchar = ps.io_wchar;
1524 pse.io_syscr = ps.io_syscr;
1525 pse.io_syscw = ps.io_syscw;
1527 switch (state)
1528 {
1529 case 'R': running++; break;
1530 case 'S': sleeping++; break;
1531 case 'D': blocked++; break;
1532 case 'Z': zombies++; break;
1533 case 'T': stopped++; break;
1534 case 'W': paging++; break;
1535 }
1537 ps_list_add (ps.name,
1538 ps_get_cmdline (pid, ps.name, cmdline, sizeof (cmdline)),
1539 &pse);
1540 }
1542 closedir (proc);
1544 ps_submit_state ("running", running);
1545 ps_submit_state ("sleeping", sleeping);
1546 ps_submit_state ("zombies", zombies);
1547 ps_submit_state ("stopped", stopped);
1548 ps_submit_state ("paging", paging);
1549 ps_submit_state ("blocked", blocked);
1551 for (ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
1552 ps_submit_proc_list (ps_ptr);
1554 fork_rate = read_fork_rate();
1555 if (fork_rate != ULONG_MAX)
1556 ps_submit_fork_rate(fork_rate);
1557 /* #endif KERNEL_LINUX */
1559 #elif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD
1560 int running = 0;
1561 int sleeping = 0;
1562 int zombies = 0;
1563 int stopped = 0;
1564 int blocked = 0;
1565 int idle = 0;
1566 int wait = 0;
1568 kvm_t *kd;
1569 char errbuf[1024];
1570 char cmdline[ARG_MAX];
1571 char *cmdline_ptr;
1572 struct kinfo_proc *procs; /* array of processes */
1573 char **argv;
1574 int count; /* returns number of processes */
1575 int i;
1577 procstat_t *ps_ptr;
1578 procstat_entry_t pse;
1580 ps_list_reset ();
1582 /* Open the kvm interface, get a descriptor */
1583 kd = kvm_open (NULL, NULL, NULL, 0, errbuf);
1584 if (kd == NULL)
1585 {
1586 ERROR ("processes plugin: Cannot open kvm interface: %s",
1587 errbuf);
1588 return (0);
1589 }
1591 /* Get the list of processes. */
1592 procs = kvm_getprocs(kd, KERN_PROC_ALL, 0, &count);
1593 if (procs == NULL)
1594 {
1595 ERROR ("processes plugin: Cannot get kvm processes list: %s",
1596 kvm_geterr(kd));
1597 kvm_close (kd);
1598 return (0);
1599 }
1601 /* Iterate through the processes in kinfo_proc */
1602 for (i = 0; i < count; i++)
1603 {
1604 /* retrieve the arguments */
1605 cmdline[0] = 0;
1606 cmdline_ptr = NULL;
1608 argv = kvm_getargv (kd, (const struct kinfo_proc *) &(procs[i]), 0);
1609 if (argv != NULL)
1610 {
1611 int status;
1612 int argc;
1614 argc = 0;
1615 while (argv[argc] != NULL)
1616 argc++;
1618 status = strjoin (cmdline, sizeof (cmdline),
1619 argv, argc, " ");
1621 if (status < 0)
1622 {
1623 WARNING ("processes plugin: Command line did "
1624 "not fit into buffer.");
1625 }
1626 else
1627 {
1628 cmdline_ptr = &cmdline[0];
1629 }
1630 }
1632 pse.id = procs[i].ki_pid;
1633 pse.age = 0;
1635 pse.num_proc = 1;
1636 pse.num_lwp = procs[i].ki_numthreads;
1638 pse.vmem_size = procs[i].ki_size;
1639 pse.vmem_rss = procs[i].ki_rssize * getpagesize();
1640 pse.vmem_data = procs[i].ki_dsize * getpagesize();
1641 pse.vmem_code = procs[i].ki_tsize * getpagesize();
1642 pse.stack_size = procs[i].ki_ssize * getpagesize();
1643 pse.vmem_minflt = 0;
1644 pse.vmem_minflt_counter = procs[i].ki_rusage.ru_minflt;
1645 pse.vmem_majflt = 0;
1646 pse.vmem_majflt_counter = procs[i].ki_rusage.ru_majflt;
1648 pse.cpu_user = 0;
1649 pse.cpu_user_counter = procs[i].ki_rusage.ru_utime.tv_sec
1650 * 1000
1651 + procs[i].ki_rusage.ru_utime.tv_usec;
1652 pse.cpu_system = 0;
1653 pse.cpu_system_counter = procs[i].ki_rusage.ru_stime.tv_sec
1654 * 1000
1655 + procs[i].ki_rusage.ru_stime.tv_usec;
1657 /* no io data */
1658 pse.io_rchar = -1;
1659 pse.io_wchar = -1;
1660 pse.io_syscr = -1;
1661 pse.io_syscw = -1;
1663 switch (procs[i].ki_stat)
1664 {
1665 case SSTOP: stopped++; break;
1666 case SSLEEP: sleeping++; break;
1667 case SRUN: running++; break;
1668 case SIDL: idle++; break;
1669 case SWAIT: wait++; break;
1670 case SLOCK: blocked++; break;
1671 case SZOMB: zombies++; break;
1672 }
1674 ps_list_add (procs[i].ki_comm, cmdline_ptr, &pse);
1675 }
1677 kvm_close(kd);
1679 ps_submit_state ("running", running);
1680 ps_submit_state ("sleeping", sleeping);
1681 ps_submit_state ("zombies", zombies);
1682 ps_submit_state ("stopped", stopped);
1683 ps_submit_state ("blocked", blocked);
1684 ps_submit_state ("idle", idle);
1685 ps_submit_state ("wait", wait);
1687 for (ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
1688 ps_submit_proc_list (ps_ptr);
1689 /* #endif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD */
1691 #elif HAVE_PROCINFO_H
1692 /* AIX */
1693 int running = 0;
1694 int sleeping = 0;
1695 int zombies = 0;
1696 int stopped = 0;
1697 int paging = 0;
1698 int blocked = 0;
1700 pid_t pindex = 0;
1701 int nprocs;
1703 procstat_t *ps;
1704 procstat_entry_t pse;
1706 ps_list_reset ();
1707 while ((nprocs = getprocs64 (procentry, sizeof(struct procentry64),
1708 /* fdsinfo = */ NULL, sizeof(struct fdsinfo64),
1709 &pindex, MAXPROCENTRY)) > 0)
1710 {
1711 int i;
1713 for (i = 0; i < nprocs; i++)
1714 {
1715 tid64_t thindex;
1716 int nthreads;
1717 char arglist[MAXARGLN+1];
1718 char *cargs;
1719 char *cmdline;
1721 if (procentry[i].pi_state == SNONE) continue;
1722 /* if (procentry[i].pi_state == SZOMB) FIXME */
1724 cmdline = procentry[i].pi_comm;
1725 cargs = procentry[i].pi_comm;
1726 if ( procentry[i].pi_flags & SKPROC )
1727 {
1728 if (procentry[i].pi_pid == 0)
1729 cmdline = "swapper";
1730 cargs = cmdline;
1731 }
1732 else
1733 {
1734 if (getargs(&procentry[i], sizeof(struct procentry64), arglist, MAXARGLN) >= 0)
1735 {
1736 int n;
1738 n = -1;
1739 while (++n < MAXARGLN)
1740 {
1741 if (arglist[n] == '\0')
1742 {
1743 if (arglist[n+1] == '\0')
1744 break;
1745 arglist[n] = ' ';
1746 }
1747 }
1748 cargs = arglist;
1749 }
1750 }
1752 pse.id = procentry[i].pi_pid;
1753 pse.age = 0;
1754 pse.num_lwp = procentry[i].pi_thcount;
1755 pse.num_proc = 1;
1757 thindex=0;
1758 while ((nthreads = getthrds64(procentry[i].pi_pid,
1759 thrdentry, sizeof(struct thrdentry64),
1760 &thindex, MAXTHRDENTRY)) > 0)
1761 {
1762 int j;
1764 for (j=0; j< nthreads; j++)
1765 {
1766 switch (thrdentry[j].ti_state)
1767 {
1768 /* case TSNONE: break; */
1769 case TSIDL: blocked++; break; /* FIXME is really blocked */
1770 case TSRUN: running++; break;
1771 case TSSLEEP: sleeping++; break;
1772 case TSSWAP: paging++; break;
1773 case TSSTOP: stopped++; break;
1774 case TSZOMB: zombies++; break;
1775 }
1776 }
1777 if (nthreads < MAXTHRDENTRY)
1778 break;
1779 }
1781 pse.cpu_user = 0;
1782 /* tv_usec is nanosec ??? */
1783 pse.cpu_user_counter = procentry[i].pi_ru.ru_utime.tv_sec * 1000000 +
1784 procentry[i].pi_ru.ru_utime.tv_usec / 1000;
1786 pse.cpu_system = 0;
1787 /* tv_usec is nanosec ??? */
1788 pse.cpu_system_counter = procentry[i].pi_ru.ru_stime.tv_sec * 1000000 +
1789 procentry[i].pi_ru.ru_stime.tv_usec / 1000;
1791 pse.vmem_minflt = 0;
1792 pse.vmem_minflt_counter = procentry[i].pi_minflt;
1793 pse.vmem_majflt = 0;
1794 pse.vmem_majflt_counter = procentry[i].pi_majflt;
1796 pse.vmem_size = procentry[i].pi_tsize + procentry[i].pi_dvm * pagesize;
1797 pse.vmem_rss = (procentry[i].pi_drss + procentry[i].pi_trss) * pagesize;
1798 /* Not supported */
1799 pse.vmem_data = 0;
1800 pse.vmem_code = 0;
1801 pse.stack_size = 0;
1803 pse.io_rchar = -1;
1804 pse.io_wchar = -1;
1805 pse.io_syscr = -1;
1806 pse.io_syscw = -1;
1808 ps_list_add (cmdline, cargs, &pse);
1809 } /* for (i = 0 .. nprocs) */
1811 if (nprocs < MAXPROCENTRY)
1812 break;
1813 } /* while (getprocs64() > 0) */
1814 ps_submit_state ("running", running);
1815 ps_submit_state ("sleeping", sleeping);
1816 ps_submit_state ("zombies", zombies);
1817 ps_submit_state ("stopped", stopped);
1818 ps_submit_state ("paging", paging);
1819 ps_submit_state ("blocked", blocked);
1821 for (ps = list_head_g; ps != NULL; ps = ps->next)
1822 ps_submit_proc_list (ps);
1823 #endif /* HAVE_PROCINFO_H */
1825 return (0);
1826 } /* int ps_read */
1828 void module_register (void)
1829 {
1830 plugin_register_config ("processes", ps_config,
1831 config_keys, config_keys_num);
1832 plugin_register_init ("processes", ps_init);
1833 plugin_register_read ("processes", ps_read);
1834 } /* void module_register */