src/processes.c

   1 /**
   2  * collectd - src/processes.c
   3  * Copyright (C) 2005  Lyonel Vincent
   4  * Copyright (C) 2006-2008  Florian Forster (Mach code)
   5  * Copyright (C) 2008  Oleg King
   6  *
   7  * This program is free software; you can redistribute it and/or modify it
   8  * under the terms of the GNU General Public License as published by the
   9  * Free Software Foundation; either version 2 of the License, or (at your
  10  * option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful, but
  13  * WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along
  18  * with this program; if not, write to the Free Software Foundation, Inc.,
  19  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  20  *
  21  * Authors:
  22  *   Lyonel Vincent <lyonel at ezix.org>
  23  *   Florian octo Forster <octo at verplant.org>
  24  *   Oleg King <king2 at kaluga.ru>
  25  *   Sebastian Harl <sh at tokkee.org>
  26  **/
  27
  28 #include "collectd.h"
  29 #include "common.h"
  30 #include "plugin.h"
  31 #include "configfile.h"
  32
  33 /* Include header files for the mach system, if they exist.. */
  34 #if HAVE_THREAD_INFO
  35 #  if HAVE_MACH_MACH_INIT_H
  36 #    include <mach/mach_init.h>
  37 #  endif
  38 #  if HAVE_MACH_HOST_PRIV_H
  39 #    include <mach/host_priv.h>
  40 #  endif
  41 #  if HAVE_MACH_MACH_ERROR_H
  42 #    include <mach/mach_error.h>
  43 #  endif
  44 #  if HAVE_MACH_MACH_HOST_H
  45 #    include <mach/mach_host.h>
  46 #  endif
  47 #  if HAVE_MACH_MACH_PORT_H
  48 #    include <mach/mach_port.h>
  49 #  endif
  50 #  if HAVE_MACH_MACH_TYPES_H
  51 #    include <mach/mach_types.h>
  52 #  endif
  53 #  if HAVE_MACH_MESSAGE_H
  54 #    include <mach/message.h>
  55 #  endif
  56 #  if HAVE_MACH_PROCESSOR_SET_H
  57 #    include <mach/processor_set.h>
  58 #  endif
  59 #  if HAVE_MACH_TASK_H
  60 #    include <mach/task.h>
  61 #  endif
  62 #  if HAVE_MACH_THREAD_ACT_H
  63 #    include <mach/thread_act.h>
  64 #  endif
  65 #  if HAVE_MACH_VM_REGION_H
  66 #    include <mach/vm_region.h>
  67 #  endif
  68 #  if HAVE_MACH_VM_MAP_H
  69 #    include <mach/vm_map.h>
  70 #  endif
  71 #  if HAVE_MACH_VM_PROT_H
  72 #    include <mach/vm_prot.h>
  73 #  endif
  74 #  if HAVE_SYS_SYSCTL_H
  75 #    include <sys/sysctl.h>
  76 #  endif
  77 /* #endif HAVE_THREAD_INFO */
  78
  79 #elif KERNEL_LINUX
  80 #  if HAVE_LINUX_CONFIG_H
  81 #    include <linux/config.h>
  82 #  endif
  83 #  ifndef CONFIG_HZ
  84 #    define CONFIG_HZ 100
  85 #  endif
  86 /* #endif KERNEL_LINUX */
  87
  88 #elif HAVE_LIBKVM_GETPROCS
  89 #  include <kvm.h>
  90 #  include <sys/user.h>
  91 #  include <sys/proc.h>
  92 #  if HAVE_SYS_SYSCTL_H
  93 #    include <sys/sysctl.h>
  94 #  endif
  95 /* #endif HAVE_LIBKVM_GETPROCS */
  96
  97 #else
  98 # error "No applicable input method."
  99 #endif
 100
 101 #if HAVE_REGEX_H
 102 # include <regex.h>
 103 #endif
 104
 105 #ifndef ARG_MAX
 106 #  define ARG_MAX 4096
 107 #endif
 108
 109 #define BUFSIZE 256
 110
 111 static const char *config_keys[] =
 112 {
 113         "Process",
 114         "ProcessMatch"
 115 };
 116 static int config_keys_num = STATIC_ARRAY_SIZE (config_keys);
 117
 118 typedef struct procstat_entry_s
 119 {
 120         unsigned long id;
 121         unsigned long age;
 122
 123         unsigned long num_proc;
 124         unsigned long num_lwp;
 125         unsigned long vmem_size;
 126         unsigned long vmem_rss;
 127         unsigned long stack_size;
 128
 129         unsigned long vmem_minflt;
 130         unsigned long vmem_majflt;
 131         unsigned long vmem_minflt_counter;
 132         unsigned long vmem_majflt_counter;
 133
 134         unsigned long cpu_user;
 135         unsigned long cpu_system;
 136         unsigned long cpu_user_counter;
 137         unsigned long cpu_system_counter;
 138
 139         struct procstat_entry_s *next;
 140 } procstat_entry_t;
 141
 142 #define PROCSTAT_NAME_LEN 256
 143 typedef struct procstat
 144 {
 145         char          name[PROCSTAT_NAME_LEN];
 146 #if HAVE_REGEX_H
 147         regex_t *re;
 148 #endif
 149
 150         unsigned long num_proc;
 151         unsigned long num_lwp;
 152         unsigned long vmem_size;
 153         unsigned long vmem_rss;
 154         unsigned long stack_size;
 155
 156         unsigned long vmem_minflt_counter;
 157         unsigned long vmem_majflt_counter;
 158
 159         unsigned long cpu_user_counter;
 160         unsigned long cpu_system_counter;
 161
 162         struct procstat   *next;
 163         struct procstat_entry_s *instances;
 164 } procstat_t;
 165
 166 static procstat_t *list_head_g = NULL;
 167
 168 #if HAVE_THREAD_INFO
 169 static mach_port_t port_host_self;
 170 static mach_port_t port_task_self;
 171
 172 static processor_set_name_array_t pset_list;
 173 static mach_msg_type_number_t     pset_list_len;
 174 /* #endif HAVE_THREAD_INFO */
 175
 176 #elif KERNEL_LINUX
 177 static long pagesize_g;
 178 /* #endif KERNEL_LINUX */
 179
 180 #elif HAVE_LIBKVM_GETPROCS
 181 /* no global variables */
 182 #endif /* HAVE_LIBKVM_GETPROCS */
 183
 184 /* put name of process from config to list_head_g tree
 185    list_head_g is a list of 'procstat_t' structs with
 186    processes names we want to watch */
 187 static void ps_list_register (const char *name, const char *regexp)
 188 {
 189         procstat_t *new;
 190         procstat_t *ptr;
 191         int status;
 192
 193         new = (procstat_t *) malloc (sizeof (procstat_t));
 194         if (new == NULL)
 195         {
 196                 ERROR ("processes plugin: ps_list_register: malloc failed.");
 197                 return;
 198         }
 199         memset (new, 0, sizeof (procstat_t));
 200         sstrncpy (new->name, name, sizeof (new->name));
 201
 202 #if HAVE_REGEX_H
 203         if (regexp != NULL)
 204         {
 205                 DEBUG ("ProcessMatch: adding \"%s\" as criteria to process %s.", regexp, name);
 206                 new->re = (regex_t *) malloc (sizeof (regex_t));
 207                 if (new->re == NULL)
 208                 {
 209                         ERROR ("processes plugin: ps_list_register: malloc failed.");
 210                         sfree (new);
 211                         return;
 212                 }
 213
 214                 status = regcomp (new->re, regexp, REG_EXTENDED | REG_NOSUB);
 215                 if (status != 0)
 216                 {
 217                         DEBUG ("ProcessMatch: compiling the regular expression \"%s\" failed.", regexp);
 218                         sfree(new->re);
 219                         return;
 220                 }
 221         }
 222 #else
 223         if (regexp != NULL)
 224         {
 225                 ERROR ("processes plugin: ps_list_register: "
 226                                 "Regular expression \"%s\" found in config "
 227                                 "file, but support for regular expressions "
 228                                 "has been dispabled at compile time.",
 229                                 regexp);
 230                 sfree (new);
 231                 return;
 232         }
 233 #endif
 234
 235         for (ptr = list_head_g; ptr != NULL; ptr = ptr->next)
 236         {
 237                 if (strcmp (ptr->name, name) == 0)
 238                 {
 239                         WARNING ("processes plugin: You have configured more "
 240                                         "than one `Process' or "
 241                                         "`ProcessMatch' with the same name. "
 242                                         "All but the first setting will be "
 243                                         "ignored.");
 244                         sfree (new->re);
 245                         sfree (new);
 246                         return;
 247                 }
 248
 249                 if (ptr->next == NULL)
 250                         break;
 251         }
 252
 253         if (ptr == NULL)
 254                 list_head_g = new;
 255         else
 256                 ptr->next = new;
 257 } /* void ps_list_register */
 258
 259 /* try to match name against entry, returns 1 if success */
 260 static int ps_list_match (const char *name, const char *cmdline, procstat_t *ps)
 261 {
 262 #if HAVE_REGEX_H
 263         if (ps->re != NULL)
 264         {
 265                 int status;
 266                 const char *str;
 267
 268                 str = cmdline;
 269                 if ((str == NULL) || (str[0] == 0))
 270                         str = name;
 271
 272                 assert (str != NULL);
 273
 274                 status = regexec (ps->re, str,
 275                                 /* nmatch = */ 0,
 276                                 /* pmatch = */ NULL,
 277                                 /* eflags = */ 0);
 278                 if (status == 0)
 279                         return (1);
 280         }
 281         else
 282 #endif
 283         if (strcmp (ps->name, name) == 0)
 284                 return (1);
 285
 286         return (0);
 287 } /* int ps_list_match */
 288
 289 /* add process entry to 'instances' of process 'name' (or refresh it) */
 290 static void ps_list_add (const char *name, const char *cmdline, procstat_entry_t *entry)
 291 {
 292         procstat_t *ps;
 293         procstat_entry_t *pse;
 294
 295         if (entry->id == 0)
 296                 return;
 297
 298         for (ps = list_head_g; ps != NULL; ps = ps->next)
 299         {
 300                 if ((ps_list_match (name, cmdline, ps)) == 0)
 301                         continue;
 302
 303                 for (pse = ps->instances; pse != NULL; pse = pse->next)
 304                         if ((pse->id == entry->id) || (pse->next == NULL))
 305                                 break;
 306
 307                 if ((pse == NULL) || (pse->id != entry->id))
 308                 {
 309                         procstat_entry_t *new;
 310
 311                         new = (procstat_entry_t *) malloc (sizeof (procstat_entry_t));
 312                         if (new == NULL)
 313                                 return;
 314                         memset (new, 0, sizeof (procstat_entry_t));
 315                         new->id = entry->id;
 316
 317                         if (pse == NULL)
 318                                 ps->instances = new;
 319                         else
 320                                 pse->next = new;
 321
 322                         pse = new;
 323                 }
 324
 325                 pse->age = 0;
 326                 pse->num_proc   = entry->num_proc;
 327                 pse->num_lwp    = entry->num_lwp;
 328                 pse->vmem_size  = entry->vmem_size;
 329                 pse->vmem_rss   = entry->vmem_rss;
 330                 pse->stack_size = entry->stack_size;
 331
 332                 ps->num_proc   += pse->num_proc;
 333                 ps->num_lwp    += pse->num_lwp;
 334                 ps->vmem_size  += pse->vmem_size;
 335                 ps->vmem_rss   += pse->vmem_rss;
 336                 ps->stack_size += pse->stack_size;
 337
 338                 if ((entry->vmem_minflt_counter == 0)
 339                                 && (entry->vmem_majflt_counter == 0))
 340                 {
 341                         pse->vmem_minflt_counter += entry->vmem_minflt;
 342                         pse->vmem_minflt = entry->vmem_minflt;
 343
 344                         pse->vmem_majflt_counter += entry->vmem_majflt;
 345                         pse->vmem_majflt = entry->vmem_majflt;
 346                 }
 347                 else
 348                 {
 349                         if (entry->vmem_minflt_counter < pse->vmem_minflt_counter)
 350                         {
 351                                 pse->vmem_minflt = entry->vmem_minflt_counter
 352                                         + (ULONG_MAX - pse->vmem_minflt_counter);
 353                         }
 354                         else
 355                         {
 356                                 pse->vmem_minflt = entry->vmem_minflt_counter - pse->vmem_minflt_counter;
 357                         }
 358                         pse->vmem_minflt_counter = entry->vmem_minflt_counter;
 359
 360                         if (entry->vmem_majflt_counter < pse->vmem_majflt_counter)
 361                         {
 362                                 pse->vmem_majflt = entry->vmem_majflt_counter
 363                                         + (ULONG_MAX - pse->vmem_majflt_counter);
 364                         }
 365                         else
 366                         {
 367                                 pse->vmem_majflt = entry->vmem_majflt_counter - pse->vmem_majflt_counter;
 368                         }
 369                         pse->vmem_majflt_counter = entry->vmem_majflt_counter;
 370                 }
 371
 372                 ps->vmem_minflt_counter += pse->vmem_minflt;
 373                 ps->vmem_majflt_counter += pse->vmem_majflt;
 374
 375                 if ((entry->cpu_user_counter == 0)
 376                                 && (entry->cpu_system_counter == 0))
 377                 {
 378                         pse->cpu_user_counter += entry->cpu_user;
 379                         pse->cpu_user = entry->cpu_user;
 380
 381                         pse->cpu_system_counter += entry->cpu_system;
 382                         pse->cpu_system = entry->cpu_system;
 383                 }
 384                 else
 385                 {
 386                         if (entry->cpu_user_counter < pse->cpu_user_counter)
 387                         {
 388                                 pse->cpu_user = entry->cpu_user_counter
 389                                         + (ULONG_MAX - pse->cpu_user_counter);
 390                         }
 391                         else
 392                         {
 393                                 pse->cpu_user = entry->cpu_user_counter - pse->cpu_user_counter;
 394                         }
 395                         pse->cpu_user_counter = entry->cpu_user_counter;
 396
 397                         if (entry->cpu_system_counter < pse->cpu_system_counter)
 398                         {
 399                                 pse->cpu_system = entry->cpu_system_counter
 400                                         + (ULONG_MAX - pse->cpu_system_counter);
 401                         }
 402                         else
 403                         {
 404                                 pse->cpu_system = entry->cpu_system_counter - pse->cpu_system_counter;
 405                         }
 406                         pse->cpu_system_counter = entry->cpu_system_counter;
 407                 }
 408
 409                 ps->cpu_user_counter   += pse->cpu_user;
 410                 ps->cpu_system_counter += pse->cpu_system;
 411         }
 412 }
 413
 414 /* remove old entries from instances of processes in list_head_g */
 415 static void ps_list_reset (void)
 416 {
 417         procstat_t *ps;
 418         procstat_entry_t *pse;
 419         procstat_entry_t *pse_prev;
 420
 421         for (ps = list_head_g; ps != NULL; ps = ps->next)
 422         {
 423                 ps->num_proc    = 0;
 424                 ps->num_lwp     = 0;
 425                 ps->vmem_size   = 0;
 426                 ps->vmem_rss    = 0;
 427                 ps->stack_size  = 0;
 428
 429                 pse_prev = NULL;
 430                 pse = ps->instances;
 431                 while (pse != NULL)
 432                 {
 433                         if (pse->age > 10)
 434                         {
 435                                 DEBUG ("Removing this procstat entry cause it's too old: "
 436                                                 "id = %lu; name = %s;",
 437                                                 pse->id, ps->name);
 438
 439                                 if (pse_prev == NULL)
 440                                 {
 441                                         ps->instances = pse->next;
 442                                         free (pse);
 443                                         pse = ps->instances;
 444                                 }
 445                                 else
 446                                 {
 447                                         pse_prev->next = pse->next;
 448                                         free (pse);
 449                                         pse = pse_prev->next;
 450                                 }
 451                         }
 452                         else
 453                         {
 454                                 pse->age++;
 455                                 pse_prev = pse;
 456                                 pse = pse->next;
 457                         }
 458                 } /* while (pse != NULL) */
 459         } /* for (ps = list_head_g; ps != NULL; ps = ps->next) */
 460 }
 461
 462 /* put all pre-defined 'Process' names from config to list_head_g tree */
 463 static int ps_config (const char *key, const char *value)
 464 {
 465         if (strcasecmp (key, "Process") == 0)
 466         {
 467                 ps_list_register (value, NULL);
 468         }
 469         else if (strcasecmp (key, "ProcessMatch") == 0)
 470         {
 471                 char *new_val;
 472                 char *fields[3];
 473                 int fields_num;
 474
 475                 new_val = strdup (value);
 476                 if (new_val == NULL) {
 477                         ERROR ("processes plugin: strdup failed when processing "
 478                                         "`ProcessMatch %s'.", value);
 479                         return (1);
 480                 }
 481
 482                 fields_num = strsplit (new_val, fields,
 483                                 STATIC_ARRAY_SIZE (fields));
 484                 if (fields_num != 2)
 485                 {
 486                         ERROR ("processes plugin: `ProcessMatch' needs exactly "
 487                                         "two string arguments.");
 488                         sfree (new_val);
 489                         return (1);
 490                 }
 491                 ps_list_register (fields[0], fields[1]);
 492                 sfree (new_val);
 493         }
 494         else
 495         {
 496                 ERROR ("processes plugin: The `%s' configuration option is not "
 497                                 "understood and will be ignored.", key);
 498                 return (-1);
 499         }
 500
 501         return (0);
 502 }
 503
 504 static int ps_init (void)
 505 {
 506 #if HAVE_THREAD_INFO
 507         kern_return_t status;
 508
 509         port_host_self = mach_host_self ();
 510         port_task_self = mach_task_self ();
 511
 512         if (pset_list != NULL)
 513         {
 514                 vm_deallocate (port_task_self,
 515                                 (vm_address_t) pset_list,
 516                                 pset_list_len * sizeof (processor_set_t));
 517                 pset_list = NULL;
 518                 pset_list_len = 0;
 519         }
 520
 521         if ((status = host_processor_sets (port_host_self,
 522                                         &pset_list,
 523                                         &pset_list_len)) != KERN_SUCCESS)
 524         {
 525                 ERROR ("host_processor_sets failed: %s\n",
 526                                 mach_error_string (status));
 527                 pset_list = NULL;
 528                 pset_list_len = 0;
 529                 return (-1);
 530         }
 531 /* #endif HAVE_THREAD_INFO */
 532
 533 #elif KERNEL_LINUX
 534         pagesize_g = sysconf(_SC_PAGESIZE);
 535         DEBUG ("pagesize_g = %li; CONFIG_HZ = %i;",
 536                         pagesize_g, CONFIG_HZ);
 537 /* #endif KERNEL_LINUX */
 538
 539 #elif HAVE_LIBKVM_GETPROCS
 540 /* no initialization */
 541 #endif /* HAVE_LIBKVM_GETPROCS */
 542
 543         return (0);
 544 } /* int ps_init */
 545
 546 /* submit global state (e.g.: qty of zombies, running, etc..) */
 547 static void ps_submit_state (const char *state, double value)
 548 {
 549         value_t values[1];
 550         value_list_t vl = VALUE_LIST_INIT;
 551
 552         values[0].gauge = value;
 553
 554         vl.values = values;
 555         vl.values_len = 1;
 556         vl.time = time (NULL);
 557         sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 558         sstrncpy (vl.plugin, "processes", sizeof (vl.plugin));
 559         sstrncpy (vl.plugin_instance, "", sizeof (vl.plugin_instance));
 560         sstrncpy (vl.type, "ps_state", sizeof (vl.type));
 561         sstrncpy (vl.type_instance, state, sizeof (vl.type_instance));
 562
 563         plugin_dispatch_values (&vl);
 564 }
 565
 566 /* submit info about specific process (e.g.: memory taken, cpu usage, etc..) */
 567 static void ps_submit_proc_list (procstat_t *ps)
 568 {
 569         value_t values[2];
 570         value_list_t vl = VALUE_LIST_INIT;
 571
 572         vl.values = values;
 573         vl.values_len = 2;
 574         vl.time = time (NULL);
 575         sstrncpy (vl.host, hostname_g, sizeof (vl.host));
 576         sstrncpy (vl.plugin, "processes", sizeof (vl.plugin));
 577         sstrncpy (vl.plugin_instance, ps->name, sizeof (vl.plugin_instance));
 578
 579         sstrncpy (vl.type, "ps_vm", sizeof (vl.type));
 580         vl.values[0].gauge = ps->vmem_size;
 581         vl.values_len = 1;
 582         plugin_dispatch_values (&vl);
 583
 584         sstrncpy (vl.type, "ps_rss", sizeof (vl.type));
 585         vl.values[0].gauge = ps->vmem_rss;
 586         vl.values_len = 1;
 587         plugin_dispatch_values (&vl);
 588
 589         sstrncpy (vl.type, "ps_stacksize", sizeof (vl.type));
 590         vl.values[0].gauge = ps->stack_size;
 591         vl.values_len = 1;
 592         plugin_dispatch_values (&vl);
 593
 594         sstrncpy (vl.type, "ps_cputime", sizeof (vl.type));
 595         vl.values[0].counter = ps->cpu_user_counter;
 596         vl.values[1].counter = ps->cpu_system_counter;
 597         vl.values_len = 2;
 598         plugin_dispatch_values (&vl);
 599
 600         sstrncpy (vl.type, "ps_count", sizeof (vl.type));
 601         vl.values[0].gauge = ps->num_proc;
 602         vl.values[1].gauge = ps->num_lwp;
 603         vl.values_len = 2;
 604         plugin_dispatch_values (&vl);
 605
 606         sstrncpy (vl.type, "ps_pagefaults", sizeof (vl.type));
 607         vl.values[0].counter = ps->vmem_minflt_counter;
 608         vl.values[1].counter = ps->vmem_majflt_counter;
 609         vl.values_len = 2;
 610         plugin_dispatch_values (&vl);
 611
 612         DEBUG ("name = %s; num_proc = %lu; num_lwp = %lu; vmem_rss = %lu; "
 613                         "vmem_minflt_counter = %lu; vmem_majflt_counter = %lu; "
 614                         "cpu_user_counter = %lu; cpu_system_counter = %lu;",
 615                         ps->name, ps->num_proc, ps->num_lwp, ps->vmem_rss,
 616                         ps->vmem_minflt_counter, ps->vmem_majflt_counter,
 617                         ps->cpu_user_counter, ps->cpu_system_counter);
 618 } /* void ps_submit_proc_list */
 619
 620 /* ------- additional functions for KERNEL_LINUX/HAVE_THREAD_INFO ------- */
 621 #if KERNEL_LINUX
 622 static int *ps_read_tasks (int pid)
 623 {
 624         int *list = NULL;
 625         int  list_size = 1; /* size of allocated space, in elements */
 626         int  list_len = 0;  /* number of currently used elements */
 627
 628         char           dirname[64];
 629         DIR           *dh;
 630         struct dirent *ent;
 631
 632         ssnprintf (dirname, sizeof (dirname), "/proc/%i/task", pid);
 633
 634         if ((dh = opendir (dirname)) == NULL)
 635         {
 636                 DEBUG ("Failed to open directory `%s'", dirname);
 637                 return (NULL);
 638         }
 639
 640         while ((ent = readdir (dh)) != NULL)
 641         {
 642                 if (!isdigit (ent->d_name[0]))
 643                         continue;
 644
 645                 if ((list_len + 1) >= list_size)
 646                 {
 647                         int *new_ptr;
 648                         int  new_size = 2 * list_size;
 649                         /* Comes in sizes: 2, 4, 8, 16, ... */
 650
 651                         new_ptr = (int *) realloc (list, (size_t) (sizeof (int) * new_size));
 652                         if (new_ptr == NULL)
 653                         {
 654                                 if (list != NULL)
 655                                         free (list);
 656                                 ERROR ("processes plugin: "
 657                                                 "Failed to allocate more memory.");
 658                                 return (NULL);
 659                         }
 660
 661                         list = new_ptr;
 662                         list_size = new_size;
 663
 664                         memset (list + list_len, 0, sizeof (int) * (list_size - list_len));
 665                 }
 666
 667                 list[list_len] = atoi (ent->d_name);
 668                 if (list[list_len] != 0)
 669                         list_len++;
 670         }
 671
 672         closedir (dh);
 673
 674         if (list_len == 0)
 675                 return (NULL);
 676
 677         assert (list_len < list_size);
 678         assert (list[list_len] == 0);
 679
 680         return (list);
 681 } /* int *ps_read_tasks */
 682
 683 int ps_read_process (int pid, procstat_t *ps, char *state)
 684 {
 685         char  filename[64];
 686         char  buffer[1024];
 687
 688         char *fields[64];
 689         char  fields_len;
 690
 691         int  *tasks;
 692         int   i;
 693
 694         int   ppid;
 695         int   name_len;
 696
 697         long long unsigned cpu_user_counter;
 698         long long unsigned cpu_system_counter;
 699         long long unsigned vmem_size;
 700         long long unsigned vmem_rss;
 701         long long unsigned stack_size;
 702
 703         memset (ps, 0, sizeof (procstat_t));
 704
 705         ssnprintf (filename, sizeof (filename), "/proc/%i/stat", pid);
 706
 707         i = read_file_contents (filename, buffer, sizeof(buffer) - 1);
 708         if (i <= 0)
 709                 return (-1);
 710         buffer[i] = 0;
 711
 712         fields_len = strsplit (buffer, fields, 64);
 713         if (fields_len < 24)
 714         {
 715                 DEBUG ("processes plugin: ps_read_process (pid = %i):"
 716                                 " `%s' has only %i fields..",
 717                                 (int) pid, filename, fields_len);
 718                 return (-1);
 719         }
 720
 721         /* copy the name, strip brackets in the process */
 722         name_len = strlen (fields[1]) - 2;
 723         if ((fields[1][0] != '(') || (fields[1][name_len + 1] != ')'))
 724         {
 725                 DEBUG ("No brackets found in process name: `%s'", fields[1]);
 726                 return (-1);
 727         }
 728         fields[1] = fields[1] + 1;
 729         fields[1][name_len] = '\0';
 730         strncpy (ps->name, fields[1], PROCSTAT_NAME_LEN);
 731
 732         ppid = atoi (fields[3]);
 733
 734         *state = fields[2][0];
 735
 736         if (*state == 'Z')
 737         {
 738                 ps->num_lwp  = 0;
 739                 ps->num_proc = 0;
 740         }
 741         else if ((tasks = ps_read_tasks (pid)) == NULL)
 742         {
 743                 /* Kernel 2.4 or so */
 744                 ps->num_lwp  = 1;
 745                 ps->num_proc = 1;
 746         }
 747         else
 748         {
 749                 ps->num_lwp  = 0;
 750                 ps->num_proc = 1;
 751                 for (i = 0; tasks[i] != 0; i++)
 752                         ps->num_lwp++;
 753
 754                 free (tasks);
 755                 tasks = NULL;
 756         }
 757
 758         /* Leave the rest at zero if this is only a zombi */
 759         if (ps->num_proc == 0)
 760         {
 761                 DEBUG ("processes plugin: This is only a zombi: pid = %i; "
 762                                 "name = %s;", pid, ps->name);
 763                 return (0);
 764         }
 765
 766         cpu_user_counter   = atoll (fields[13]);
 767         cpu_system_counter = atoll (fields[14]);
 768         vmem_size          = atoll (fields[22]);
 769         vmem_rss           = atoll (fields[23]);
 770         ps->vmem_minflt_counter = atol (fields[9]);
 771         ps->vmem_majflt_counter = atol (fields[11]);
 772
 773         {
 774                 unsigned long long stack_start = atoll (fields[27]);
 775                 unsigned long long stack_ptr   = atoll (fields[28]);
 776
 777                 stack_size = (stack_start > stack_ptr)
 778                         ? stack_start - stack_ptr
 779                         : stack_ptr - stack_start;
 780         }
 781
 782         /* Convert jiffies to useconds */
 783         cpu_user_counter   = cpu_user_counter   * 1000000 / CONFIG_HZ;
 784         cpu_system_counter = cpu_system_counter * 1000000 / CONFIG_HZ;
 785         vmem_rss = vmem_rss * pagesize_g;
 786
 787         ps->cpu_user_counter = (unsigned long) cpu_user_counter;
 788         ps->cpu_system_counter = (unsigned long) cpu_system_counter;
 789         ps->vmem_size = (unsigned long) vmem_size;
 790         ps->vmem_rss = (unsigned long) vmem_rss;
 791         ps->stack_size = (unsigned long) stack_size;
 792
 793         /* success */
 794         return (0);
 795 } /* int ps_read_process (...) */
 796
 797 static char *ps_get_cmdline (pid_t pid, char *name, char *buf, size_t buf_len)
 798 {
 799         char  *buf_ptr;
 800         size_t len;
 801
 802         char file[PATH_MAX];
 803         int  fd;
 804
 805         size_t n;
 806
 807         if ((pid < 1) || (NULL == buf) || (buf_len < 2))
 808                 return NULL;
 809
 810         ssnprintf (file, sizeof (file), "/proc/%u/cmdline", pid);
 811
 812         fd = open (file, O_RDONLY);
 813         if (fd < 0) {
 814                 char errbuf[4096];
 815                 WARNING ("processes plugin: Failed to open `%s': %s.", file,
 816                                 sstrerror (errno, errbuf, sizeof (errbuf)));
 817                 return NULL;
 818         }
 819
 820         buf_ptr = buf;
 821         len     = buf_len;
 822
 823         n = 0;
 824
 825         while (42) {
 826                 size_t status;
 827
 828                 status = read (fd, (void *)buf_ptr, len);
 829
 830                 if (status < 0) {
 831                         char errbuf[4096];
 832
 833                         if ((EAGAIN == errno) || (EINTR == errno))
 834                                 continue;
 835
 836                         WARNING ("processes plugin: Failed to read from `%s': %s.", file,
 837                                         sstrerror (errno, errbuf, sizeof (errbuf)));
 838                         close (fd);
 839                         return NULL;
 840                 }
 841
 842                 n += status;
 843
 844                 if (status == 0)
 845                         break;
 846
 847                 buf_ptr += status;
 848                 len     -= status;
 849
 850                 if (len <= 0)
 851                         break;
 852         }
 853
 854         close (fd);
 855
 856         if (0 == n) {
 857                 /* cmdline not available; e.g. kernel thread, zombie */
 858                 if (NULL == name)
 859                         return NULL;
 860
 861                 ssnprintf (buf, buf_len, "[%s]", name);
 862                 return buf;
 863         }
 864
 865         assert (n <= buf_len);
 866
 867         if (n == buf_len)
 868                 --n;
 869         buf[n] = '\0';
 870
 871         --n;
 872         /* remove trailing whitespace */
 873         while ((n > 0) && (isspace (buf[n]) || ('\0' == buf[n]))) {
 874                 buf[n] = '\0';
 875                 --n;
 876         }
 877
 878         /* arguments are separated by '\0' in /proc/<pid>/cmdline */
 879         while (n > 0) {
 880                 if ('\0' == buf[n])
 881                         buf[n] = ' ';
 882                 --n;
 883         }
 884         return buf;
 885 } /* char *ps_get_cmdline (...) */
 886 #endif /* KERNEL_LINUX */
 887
 888 #if HAVE_THREAD_INFO
 889 static int mach_get_task_name (task_t t, int *pid, char *name, size_t name_max_len)
 890 {
 891         int mib[4];
 892
 893         struct kinfo_proc kp;
 894         size_t            kp_size;
 895
 896         mib[0] = CTL_KERN;
 897         mib[1] = KERN_PROC;
 898         mib[2] = KERN_PROC_PID;
 899
 900         if (pid_for_task (t, pid) != KERN_SUCCESS)
 901                 return (-1);
 902         mib[3] = *pid;
 903
 904         kp_size = sizeof (kp);
 905         if (sysctl (mib, 4, &kp, &kp_size, NULL, 0) != 0)
 906                 return (-1);
 907
 908         if (name_max_len > (MAXCOMLEN + 1))
 909                 name_max_len = MAXCOMLEN + 1;
 910
 911         strncpy (name, kp.kp_proc.p_comm, name_max_len - 1);
 912         name[name_max_len - 1] = '\0';
 913
 914         DEBUG ("pid = %i; name = %s;", *pid, name);
 915
 916         /* We don't do the special handling for `p_comm == "LaunchCFMApp"' as
 917          * `top' does it, because it is a lot of work and only used when
 918          * debugging. -octo */
 919
 920         return (0);
 921 }
 922 #endif /* HAVE_THREAD_INFO */
 923 /* ------- end of additional functions for KERNEL_LINUX/HAVE_THREAD_INFO ------- */
 924
 925 /* do actual readings from kernel */
 926 static int ps_read (void)
 927 {
 928 #if HAVE_THREAD_INFO
 929         kern_return_t            status;
 930
 931         int                      pset;
 932         processor_set_t          port_pset_priv;
 933
 934         int                      task;
 935         task_array_t             task_list;
 936         mach_msg_type_number_t   task_list_len;
 937
 938         int                      task_pid;
 939         char                     task_name[MAXCOMLEN + 1];
 940
 941         int                      thread;
 942         thread_act_array_t       thread_list;
 943         mach_msg_type_number_t   thread_list_len;
 944         thread_basic_info_data_t thread_data;
 945         mach_msg_type_number_t   thread_data_len;
 946
 947         int running  = 0;
 948         int sleeping = 0;
 949         int zombies  = 0;
 950         int stopped  = 0;
 951         int blocked  = 0;
 952
 953         procstat_t *ps;
 954         procstat_entry_t pse;
 955
 956         ps_list_reset ();
 957
 958         /*
 959          * The Mach-concept is a little different from the traditional UNIX
 960          * concept: All the work is done in threads. Threads are contained in
 961          * `tasks'. Therefore, `task status' doesn't make much sense, since
 962          * it's actually a `thread status'.
 963          * Tasks are assigned to sets of processors, so that's where you go to
 964          * get a list.
 965          */
 966         for (pset = 0; pset < pset_list_len; pset++)
 967         {
 968                 if ((status = host_processor_set_priv (port_host_self,
 969                                                 pset_list[pset],
 970                                                 &port_pset_priv)) != KERN_SUCCESS)
 971                 {
 972                         ERROR ("host_processor_set_priv failed: %s\n",
 973                                         mach_error_string (status));
 974                         continue;
 975                 }
 976
 977                 if ((status = processor_set_tasks (port_pset_priv,
 978                                                 &task_list,
 979                                                 &task_list_len)) != KERN_SUCCESS)
 980                 {
 981                         ERROR ("processor_set_tasks failed: %s\n",
 982                                         mach_error_string (status));
 983                         mach_port_deallocate (port_task_self, port_pset_priv);
 984                         continue;
 985                 }
 986
 987                 for (task = 0; task < task_list_len; task++)
 988                 {
 989                         ps = NULL;
 990                         if (mach_get_task_name (task_list[task],
 991                                                 &task_pid,
 992                                                 task_name, PROCSTAT_NAME_LEN) == 0)
 993                         {
 994                                 /* search for at least one match */
 995                                 for (ps = list_head_g; ps != NULL; ps = ps->next)
 996                                         /* FIXME: cmdline should be here instead of NULL */
 997                                         if (ps_list_match (task_name, NULL, ps) == 1)
 998                                                 break;
 999                         }
1000
1001                         /* Collect more detailed statistics for this process */
1002                         if (ps != NULL)
1003                         {
1004                                 task_basic_info_data_t        task_basic_info;
1005                                 mach_msg_type_number_t        task_basic_info_len;
1006                                 task_events_info_data_t       task_events_info;
1007                                 mach_msg_type_number_t        task_events_info_len;
1008                                 task_absolutetime_info_data_t task_absolutetime_info;
1009                                 mach_msg_type_number_t        task_absolutetime_info_len;
1010
1011                                 memset (&pse, '\0', sizeof (pse));
1012                                 pse.id = task_pid;
1013
1014                                 task_basic_info_len = TASK_BASIC_INFO_COUNT;
1015                                 status = task_info (task_list[task],
1016                                                 TASK_BASIC_INFO,
1017                                                 (task_info_t) &task_basic_info,
1018                                                 &task_basic_info_len);
1019                                 if (status != KERN_SUCCESS)
1020                                 {
1021                                         ERROR ("task_info failed: %s",
1022                                                         mach_error_string (status));
1023                                         continue; /* with next thread_list */
1024                                 }
1025
1026                                 task_events_info_len = TASK_EVENTS_INFO_COUNT;
1027                                 status = task_info (task_list[task],
1028                                                 TASK_EVENTS_INFO,
1029                                                 (task_info_t) &task_events_info,
1030                                                 &task_events_info_len);
1031                                 if (status != KERN_SUCCESS)
1032                                 {
1033                                         ERROR ("task_info failed: %s",
1034                                                         mach_error_string (status));
1035                                         continue; /* with next thread_list */
1036                                 }
1037
1038                                 task_absolutetime_info_len = TASK_ABSOLUTETIME_INFO_COUNT;
1039                                 status = task_info (task_list[task],
1040                                                 TASK_ABSOLUTETIME_INFO,
1041                                                 (task_info_t) &task_absolutetime_info,
1042                                                 &task_absolutetime_info_len);
1043                                 if (status != KERN_SUCCESS)
1044                                 {
1045                                         ERROR ("task_info failed: %s",
1046                                                         mach_error_string (status));
1047                                         continue; /* with next thread_list */
1048                                 }
1049
1050                                 pse.num_proc++;
1051                                 pse.vmem_rss = task_basic_info.resident_size;
1052
1053                                 pse.vmem_minflt_counter = task_events_info.cow_faults;
1054                                 pse.vmem_majflt_counter = task_events_info.faults;
1055
1056                                 pse.cpu_user_counter = task_absolutetime_info.total_user;
1057                                 pse.cpu_system_counter = task_absolutetime_info.total_system;
1058                         }
1059
1060                         status = task_threads (task_list[task], &thread_list,
1061                                         &thread_list_len);
1062                         if (status != KERN_SUCCESS)
1063                         {
1064                                 /* Apple's `top' treats this case a zombie. It
1065                                  * makes sense to some extend: A `zombie'
1066                                  * thread is nonsense, since the task/process
1067                                  * is dead. */
1068                                 zombies++;
1069                                 DEBUG ("task_threads failed: %s",
1070                                                 mach_error_string (status));
1071                                 if (task_list[task] != port_task_self)
1072                                         mach_port_deallocate (port_task_self,
1073                                                         task_list[task]);
1074                                 continue; /* with next task_list */
1075                         }
1076
1077                         for (thread = 0; thread < thread_list_len; thread++)
1078                         {
1079                                 thread_data_len = THREAD_BASIC_INFO_COUNT;
1080                                 status = thread_info (thread_list[thread],
1081                                                 THREAD_BASIC_INFO,
1082                                                 (thread_info_t) &thread_data,
1083                                                 &thread_data_len);
1084                                 if (status != KERN_SUCCESS)
1085                                 {
1086                                         ERROR ("thread_info failed: %s",
1087                                                         mach_error_string (status));
1088                                         if (task_list[task] != port_task_self)
1089                                                 mach_port_deallocate (port_task_self,
1090                                                                 thread_list[thread]);
1091                                         continue; /* with next thread_list */
1092                                 }
1093
1094                                 if (ps != NULL)
1095                                         pse.num_lwp++;
1096
1097                                 switch (thread_data.run_state)
1098                                 {
1099                                         case TH_STATE_RUNNING:
1100                                                 running++;
1101                                                 break;
1102                                         case TH_STATE_STOPPED:
1103                                         /* What exactly is `halted'? */
1104                                         case TH_STATE_HALTED:
1105                                                 stopped++;
1106                                                 break;
1107                                         case TH_STATE_WAITING:
1108                                                 sleeping++;
1109                                                 break;
1110                                         case TH_STATE_UNINTERRUPTIBLE:
1111                                                 blocked++;
1112                                                 break;
1113                                         /* There is no `zombie' case here,
1114                                          * since there are no zombie-threads.
1115                                          * There's only zombie tasks, which are
1116                                          * handled above. */
1117                                         default:
1118                                                 WARNING ("Unknown thread status: %i",
1119                                                                 thread_data.run_state);
1120                                                 break;
1121                                 } /* switch (thread_data.run_state) */
1122
1123                                 if (task_list[task] != port_task_self)
1124                                 {
1125                                         status = mach_port_deallocate (port_task_self,
1126                                                         thread_list[thread]);
1127                                         if (status != KERN_SUCCESS)
1128                                                 ERROR ("mach_port_deallocate failed: %s",
1129                                                                 mach_error_string (status));
1130                                 }
1131                         } /* for (thread_list) */
1132
1133                         if ((status = vm_deallocate (port_task_self,
1134                                                         (vm_address_t) thread_list,
1135                                                         thread_list_len * sizeof (thread_act_t)))
1136                                         != KERN_SUCCESS)
1137                         {
1138                                 ERROR ("vm_deallocate failed: %s",
1139                                                 mach_error_string (status));
1140                         }
1141                         thread_list = NULL;
1142                         thread_list_len = 0;
1143
1144                         /* Only deallocate the task port, if it isn't our own.
1145                          * Don't know what would happen in that case, but this
1146                          * is what Apple's top does.. ;) */
1147                         if (task_list[task] != port_task_self)
1148                         {
1149                                 status = mach_port_deallocate (port_task_self,
1150                                                 task_list[task]);
1151                                 if (status != KERN_SUCCESS)
1152                                         ERROR ("mach_port_deallocate failed: %s",
1153                                                         mach_error_string (status));
1154                         }
1155
1156                         if (ps != NULL)
1157                                 /* FIXME: cmdline should be here instead of NULL */
1158                                 ps_list_add (task_name, NULL, &pse);
1159                 } /* for (task_list) */
1160
1161                 if ((status = vm_deallocate (port_task_self,
1162                                 (vm_address_t) task_list,
1163                                 task_list_len * sizeof (task_t))) != KERN_SUCCESS)
1164                 {
1165                         ERROR ("vm_deallocate failed: %s",
1166                                         mach_error_string (status));
1167                 }
1168                 task_list = NULL;
1169                 task_list_len = 0;
1170
1171                 if ((status = mach_port_deallocate (port_task_self, port_pset_priv))
1172                                 != KERN_SUCCESS)
1173                 {
1174                         ERROR ("mach_port_deallocate failed: %s",
1175                                         mach_error_string (status));
1176                 }
1177         } /* for (pset_list) */
1178
1179         ps_submit_state ("running", running);
1180         ps_submit_state ("sleeping", sleeping);
1181         ps_submit_state ("zombies", zombies);
1182         ps_submit_state ("stopped", stopped);
1183         ps_submit_state ("blocked", blocked);
1184
1185         for (ps = list_head_g; ps != NULL; ps = ps->next)
1186                 ps_submit_proc_list (ps);
1187 /* #endif HAVE_THREAD_INFO */
1188
1189 #elif KERNEL_LINUX
1190         int running  = 0;
1191         int sleeping = 0;
1192         int zombies  = 0;
1193         int stopped  = 0;
1194         int paging   = 0;
1195         int blocked  = 0;
1196
1197         struct dirent *ent;
1198         DIR           *proc;
1199         int            pid;
1200
1201         char cmdline[ARG_MAX];
1202
1203         int        status;
1204         procstat_t ps;
1205         procstat_entry_t pse;
1206         char       state;
1207
1208         procstat_t *ps_ptr;
1209
1210         running = sleeping = zombies = stopped = paging = blocked = 0;
1211         ps_list_reset ();
1212
1213         if ((proc = opendir ("/proc")) == NULL)
1214         {
1215                 char errbuf[1024];
1216                 ERROR ("Cannot open `/proc': %s",
1217                                 sstrerror (errno, errbuf, sizeof (errbuf)));
1218                 return (-1);
1219         }
1220
1221         while ((ent = readdir (proc)) != NULL)
1222         {
1223                 if (!isdigit (ent->d_name[0]))
1224                         continue;
1225
1226                 if ((pid = atoi (ent->d_name)) < 1)
1227                         continue;
1228
1229                 status = ps_read_process (pid, &ps, &state);
1230                 if (status != 0)
1231                 {
1232                         DEBUG ("ps_read_process failed: %i", status);
1233                         continue;
1234                 }
1235
1236                 pse.id       = pid;
1237                 pse.age      = 0;
1238
1239                 pse.num_proc   = ps.num_proc;
1240                 pse.num_lwp    = ps.num_lwp;
1241                 pse.vmem_size  = ps.vmem_size;
1242                 pse.vmem_rss   = ps.vmem_rss;
1243                 pse.stack_size = ps.stack_size;
1244
1245                 pse.vmem_minflt = 0;
1246                 pse.vmem_minflt_counter = ps.vmem_minflt_counter;
1247                 pse.vmem_majflt = 0;
1248                 pse.vmem_majflt_counter = ps.vmem_majflt_counter;
1249
1250                 pse.cpu_user = 0;
1251                 pse.cpu_user_counter = ps.cpu_user_counter;
1252                 pse.cpu_system = 0;
1253                 pse.cpu_system_counter = ps.cpu_system_counter;
1254
1255                 switch (state)
1256                 {
1257                         case 'R': running++;  break;
1258                         case 'S': sleeping++; break;
1259                         case 'D': blocked++;  break;
1260                         case 'Z': zombies++;  break;
1261                         case 'T': stopped++;  break;
1262                         case 'W': paging++;   break;
1263                 }
1264
1265                 ps_list_add (ps.name,
1266                                 ps_get_cmdline (pid, ps.name, cmdline, sizeof (cmdline)),
1267                                 &pse);
1268         }
1269
1270         closedir (proc);
1271
1272         ps_submit_state ("running",  running);
1273         ps_submit_state ("sleeping", sleeping);
1274         ps_submit_state ("zombies",  zombies);
1275         ps_submit_state ("stopped",  stopped);
1276         ps_submit_state ("paging",   paging);
1277         ps_submit_state ("blocked",  blocked);
1278
1279         for (ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
1280                 ps_submit_proc_list (ps_ptr);
1281 /* #endif KERNEL_LINUX */
1282
1283 #elif HAVE_LIBKVM_GETPROCS
1284         int running  = 0;
1285         int sleeping = 0;
1286         int zombies  = 0;
1287         int stopped  = 0;
1288         int blocked  = 0;
1289         int idle     = 0;
1290         int wait     = 0;
1291
1292         kvm_t *kd;
1293         char errbuf[1024];
1294         char cmdline[ARG_MAX];
1295         char *cmdline_ptr;
1296         struct kinfo_proc *procs;          /* array of processes */
1297         char **argv;
1298         int count;                         /* returns number of processes */
1299         int i;
1300
1301         procstat_t *ps_ptr;
1302         procstat_entry_t pse;
1303
1304         ps_list_reset ();
1305
1306         /* Open the kvm interface, get a descriptor */
1307         kd = kvm_open (NULL, NULL, NULL, 0, errbuf);
1308         if (kd == NULL)
1309         {
1310                 ERROR ("processes plugin: Cannot open kvm interface: %s",
1311                                 errbuf);
1312                 return (0);
1313         }
1314
1315         /* Get the list of processes. */
1316         procs = kvm_getprocs(kd, KERN_PROC_ALL, 0, &count);
1317         if (procs == NULL)
1318         {
1319                 kvm_close (kd);
1320                 ERROR ("processes plugin: Cannot get kvm processes list: %s",
1321                                 kvm_geterr(kd));
1322                 return (0);
1323         }
1324
1325         /* Iterate through the processes in kinfo_proc */
1326         for (i = 0; i < count; i++)
1327         {
1328                 /* retrieve the arguments */
1329                 cmdline[0] = 0;
1330                 cmdline_ptr = NULL;
1331
1332                 argv = kvm_getargv (kd, (const struct kinfo_proc *) &(procs[i]), 0);
1333                 if (argv != NULL)
1334                 {
1335                         int status;
1336                         int argc;
1337
1338                         argc = 0;
1339                         while (argv[argc] != NULL)
1340                                 argc++;
1341
1342                         status = strjoin (cmdline, sizeof (cmdline),
1343                                         argv, argc, " ");
1344
1345                         if (status < 0)
1346                         {
1347                                 WARNING ("processes plugin: Command line did "
1348                                                 "not fit into buffer.");
1349                         }
1350                         else
1351                         {
1352                                 cmdline_ptr = &cmdline[0];
1353                         }
1354                 }
1355
1356                 pse.id       = procs[i].ki_pid;
1357                 pse.age      = 0;
1358
1359                 pse.num_proc = 1;
1360                 pse.num_lwp  = procs[i].ki_numthreads;
1361
1362                 pse.vmem_rss = procs[i].ki_rssize * getpagesize();
1363                 pse.vmem_minflt = 0;
1364                 pse.vmem_minflt_counter = procs[i].ki_rusage.ru_minflt;
1365                 pse.vmem_majflt = 0;
1366                 pse.vmem_majflt_counter = procs[i].ki_rusage.ru_majflt;
1367
1368                 pse.cpu_user = 0;
1369                 pse.cpu_user_counter = procs[i].ki_rusage.ru_utime.tv_sec
1370                         * 1000
1371                         + procs[i].ki_rusage.ru_utime.tv_usec;
1372                 pse.cpu_system = 0;
1373                 pse.cpu_system_counter = procs[i].ki_rusage.ru_stime.tv_sec
1374                         * 1000
1375                         + procs[i].ki_rusage.ru_stime.tv_usec;
1376
1377                 switch (procs[i].ki_stat)
1378                 {
1379                         case SSTOP:     stopped++;      break;
1380                         case SSLEEP:    sleeping++;     break;
1381                         case SRUN:      running++;      break;
1382                         case SIDL:      idle++;         break;
1383                         case SWAIT:     wait++;         break;
1384                         case SLOCK:     blocked++;      break;
1385                         case SZOMB:     zombies++;      break;
1386                 }
1387
1388                 ps_list_add (procs[i].ki_comm, cmdline_ptr, &pse);
1389         }
1390
1391         kvm_close(kd);
1392
1393         ps_submit_state ("running",  running);
1394         ps_submit_state ("sleeping", sleeping);
1395         ps_submit_state ("zombies",  zombies);
1396         ps_submit_state ("stopped",  stopped);
1397         ps_submit_state ("blocked",  blocked);
1398         ps_submit_state ("idle",     idle);
1399         ps_submit_state ("wait",     wait);
1400
1401         for (ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
1402                 ps_submit_proc_list (ps_ptr);
1403 #endif /* HAVE_LIBKVM_GETPROCS */
1404
1405         return (0);
1406 } /* int ps_read */
1407
1408 void module_register (void)
1409 {
1410         plugin_register_config ("processes", ps_config,
1411                         config_keys, config_keys_num);
1412         plugin_register_init ("processes", ps_init);
1413         plugin_register_read ("processes", ps_read);
1414 } /* void module_register */