src/processes.c

   1 /**
   2  * collectd - src/processes.c
   3  * Copyright (C) 2005       Lyonel Vincent
   4  * Copyright (C) 2006-2017  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  * Copyright (C) 2012       Cosmin Ioiart
  11  *
  12  * This program is free software; you can redistribute it and/or modify it
  13  * under the terms of the GNU General Public License as published by the
  14  * Free Software Foundation; either version 2 of the License, or (at your
  15  * option) any later version.
  16  *
  17  * This program is distributed in the hope that it will be useful, but
  18  * WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20  * General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU General Public License along
  23  * with this program; if not, write to the Free Software Foundation, Inc.,
  24  * 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  25  *
  26  * Authors:
  27  *   Lyonel Vincent <lyonel at ezix.org>
  28  *   Florian octo Forster <octo at collectd.org>
  29  *   Oleg King <king2 at kaluga.ru>
  30  *   Sebastian Harl <sh at tokkee.org>
  31  *   Andrés J. Díaz <ajdiaz at connectical.com>
  32  *   Manuel Sanmartin
  33  *   Clément Stenac <clement.stenac at diwi.org>
  34  *   Cosmin Ioiart <cioiart at gmail.com>
  35  *   Pavel Rochnyack <pavel2000 at ngs.ru>
  36  *   Wilfried Goesgens <dothebart at citadel.org>
  37  **/
  38
  39 #include "collectd.h"
  40
  41 #include "common.h"
  42 #include "plugin.h"
  43
  44 #if HAVE_LIBTASKSTATS
  45 #include "utils_complain.h"
  46 #include "utils_taskstats.h"
  47 #endif
  48
  49 /* Include header files for the mach system, if they exist.. */
  50 #if HAVE_THREAD_INFO
  51 #if HAVE_MACH_MACH_INIT_H
  52 #include <mach/mach_init.h>
  53 #endif
  54 #if HAVE_MACH_HOST_PRIV_H
  55 #include <mach/host_priv.h>
  56 #endif
  57 #if HAVE_MACH_MACH_ERROR_H
  58 #include <mach/mach_error.h>
  59 #endif
  60 #if HAVE_MACH_MACH_HOST_H
  61 #include <mach/mach_host.h>
  62 #endif
  63 #if HAVE_MACH_MACH_PORT_H
  64 #include <mach/mach_port.h>
  65 #endif
  66 #if HAVE_MACH_MACH_TYPES_H
  67 #include <mach/mach_types.h>
  68 #endif
  69 #if HAVE_MACH_MESSAGE_H
  70 #include <mach/message.h>
  71 #endif
  72 #if HAVE_MACH_PROCESSOR_SET_H
  73 #include <mach/processor_set.h>
  74 #endif
  75 #if HAVE_MACH_TASK_H
  76 #include <mach/task.h>
  77 #endif
  78 #if HAVE_MACH_THREAD_ACT_H
  79 #include <mach/thread_act.h>
  80 #endif
  81 #if HAVE_MACH_VM_REGION_H
  82 #include <mach/vm_region.h>
  83 #endif
  84 #if HAVE_MACH_VM_MAP_H
  85 #include <mach/vm_map.h>
  86 #endif
  87 #if HAVE_MACH_VM_PROT_H
  88 #include <mach/vm_prot.h>
  89 #endif
  90 #if HAVE_SYS_SYSCTL_H
  91 #include <sys/sysctl.h>
  92 #endif
  93 /* #endif HAVE_THREAD_INFO */
  94
  95 #elif KERNEL_LINUX
  96 #if HAVE_LINUX_CONFIG_H
  97 #include <linux/config.h>
  98 #endif
  99 #ifndef CONFIG_HZ
 100 #define CONFIG_HZ 100
 101 #endif
 102 /* #endif KERNEL_LINUX */
 103
 104 #elif HAVE_LIBKVM_GETPROCS &&                                                  \
 105     (HAVE_STRUCT_KINFO_PROC_FREEBSD || HAVE_STRUCT_KINFO_PROC_OPENBSD)
 106 #include <kvm.h>
 107 #include <sys/param.h>
 108 #include <sys/proc.h>
 109 #include <sys/sysctl.h>
 110 #include <sys/user.h>
 111 /* #endif HAVE_LIBKVM_GETPROCS && (HAVE_STRUCT_KINFO_PROC_FREEBSD ||
 112  * HAVE_STRUCT_KINFO_PROC_OPENBSD) */
 113
 114 #elif HAVE_PROCINFO_H
 115 #include <procinfo.h>
 116 #include <sys/types.h>
 117
 118 #define MAXPROCENTRY 32
 119 #define MAXTHRDENTRY 16
 120 #define MAXARGLN 1024
 121 /* #endif HAVE_PROCINFO_H */
 122
 123 #elif KERNEL_SOLARIS
 124 /* Hack: Avoid #error when building a 32-bit binary with
 125  * _FILE_OFFSET_BITS=64. There is a reason for this #error, as one
 126  * of the structures in <sys/procfs.h> uses an off_t, but that
 127  * isn't relevant to our usage of procfs. */
 128 #if !defined(_LP64) && _FILE_OFFSET_BITS == 64
 129 #define SAVE_FOB_64
 130 #undef _FILE_OFFSET_BITS
 131 #endif
 132
 133 #include <procfs.h>
 134
 135 #ifdef SAVE_FOB_64
 136 #define _FILE_OFFSET_BITS 64
 137 #undef SAVE_FOB_64
 138 #endif
 139
 140 #include <dirent.h>
 141 #include <sys/user.h>
 142
 143 #ifndef MAXCOMLEN
 144 #define MAXCOMLEN 16
 145 #endif
 146
 147 /* #endif KERNEL_SOLARIS */
 148
 149 #else
 150 #error "No applicable input method."
 151 #endif
 152
 153 #if HAVE_REGEX_H
 154 #include <regex.h>
 155 #endif
 156
 157 #if HAVE_KSTAT_H
 158 #include <kstat.h>
 159 #endif
 160
 161 #ifdef HAVE_SYS_CAPABILITY_H
 162 #include <sys/capability.h>
 163 #endif
 164
 165 #ifndef CMDLINE_BUFFER_SIZE
 166 #if defined(ARG_MAX) && (ARG_MAX < 4096)
 167 #define CMDLINE_BUFFER_SIZE ARG_MAX
 168 #else
 169 #define CMDLINE_BUFFER_SIZE 4096
 170 #endif
 171 #endif
 172
 173 #define PROCSTAT_NAME_LEN 256
 174 typedef struct process_entry_s {
 175   unsigned long id;
 176   char name[PROCSTAT_NAME_LEN];
 177
 178   unsigned long num_proc;
 179   unsigned long num_lwp;
 180   unsigned long num_fd;
 181   unsigned long num_maps;
 182   unsigned long vmem_size;
 183   unsigned long vmem_rss;
 184   unsigned long vmem_data;
 185   unsigned long vmem_code;
 186   unsigned long stack_size;
 187
 188   derive_t vmem_minflt_counter;
 189   derive_t vmem_majflt_counter;
 190
 191   derive_t cpu_user_counter;
 192   derive_t cpu_system_counter;
 193
 194   /* io data */
 195   derive_t io_rchar;
 196   derive_t io_wchar;
 197   derive_t io_syscr;
 198   derive_t io_syscw;
 199   derive_t io_diskr;
 200   derive_t io_diskw;
 201   bool has_io;
 202
 203   derive_t cswitch_vol;
 204   derive_t cswitch_invol;
 205   bool has_cswitch;
 206
 207 #if HAVE_LIBTASKSTATS
 208   ts_delay_t delay;
 209 #endif
 210   bool has_delay;
 211
 212   bool has_fd;
 213
 214   bool has_maps;
 215 } process_entry_t;
 216
 217 typedef struct procstat_entry_s {
 218   unsigned long id;
 219   unsigned long age;
 220
 221   derive_t vmem_minflt_counter;
 222   derive_t vmem_majflt_counter;
 223
 224   derive_t cpu_user_counter;
 225   derive_t cpu_system_counter;
 226
 227   /* io data */
 228   derive_t io_rchar;
 229   derive_t io_wchar;
 230   derive_t io_syscr;
 231   derive_t io_syscw;
 232   derive_t io_diskr;
 233   derive_t io_diskw;
 234
 235   derive_t cswitch_vol;
 236   derive_t cswitch_invol;
 237
 238 #if HAVE_LIBTASKSTATS
 239   value_to_rate_state_t delay_cpu;
 240   value_to_rate_state_t delay_blkio;
 241   value_to_rate_state_t delay_swapin;
 242   value_to_rate_state_t delay_freepages;
 243 #endif
 244
 245   struct procstat_entry_s *next;
 246 } procstat_entry_t;
 247
 248 typedef struct procstat {
 249   char name[PROCSTAT_NAME_LEN];
 250 #if HAVE_REGEX_H
 251   regex_t *re;
 252 #endif
 253
 254   unsigned long num_proc;
 255   unsigned long num_lwp;
 256   unsigned long num_fd;
 257   unsigned long num_maps;
 258   unsigned long vmem_size;
 259   unsigned long vmem_rss;
 260   unsigned long vmem_data;
 261   unsigned long vmem_code;
 262   unsigned long stack_size;
 263
 264   derive_t vmem_minflt_counter;
 265   derive_t vmem_majflt_counter;
 266
 267   derive_t cpu_user_counter;
 268   derive_t cpu_system_counter;
 269
 270   /* io data */
 271   derive_t io_rchar;
 272   derive_t io_wchar;
 273   derive_t io_syscr;
 274   derive_t io_syscw;
 275   derive_t io_diskr;
 276   derive_t io_diskw;
 277
 278   derive_t cswitch_vol;
 279   derive_t cswitch_invol;
 280
 281   /* Linux Delay Accounting. Unit is ns/s. */
 282   gauge_t delay_cpu;
 283   gauge_t delay_blkio;
 284   gauge_t delay_swapin;
 285   gauge_t delay_freepages;
 286
 287   bool report_fd_num;
 288   bool report_maps_num;
 289   bool report_ctx_switch;
 290   bool report_delay;
 291
 292   struct procstat *next;
 293   struct procstat_entry_s *instances;
 294 } procstat_t;
 295
 296 static procstat_t *list_head_g;
 297
 298 static bool want_init = true;
 299 static bool report_ctx_switch;
 300 static bool report_fd_num;
 301 static bool report_maps_num;
 302 static bool report_delay;
 303
 304 #if HAVE_THREAD_INFO
 305 static mach_port_t port_host_self;
 306 static mach_port_t port_task_self;
 307
 308 static processor_set_name_array_t pset_list;
 309 static mach_msg_type_number_t pset_list_len;
 310 /* #endif HAVE_THREAD_INFO */
 311
 312 #elif KERNEL_LINUX
 313 static long pagesize_g;
 314 static void ps_fill_details(const procstat_t *ps, process_entry_t *entry);
 315 /* #endif KERNEL_LINUX */
 316
 317 #elif HAVE_LIBKVM_GETPROCS &&                                                  \
 318     (HAVE_STRUCT_KINFO_PROC_FREEBSD || HAVE_STRUCT_KINFO_PROC_OPENBSD)
 319 static int pagesize;
 320 /* #endif HAVE_LIBKVM_GETPROCS && (HAVE_STRUCT_KINFO_PROC_FREEBSD ||
 321  * HAVE_STRUCT_KINFO_PROC_OPENBSD) */
 322
 323 #elif HAVE_PROCINFO_H
 324 static struct procentry64 procentry[MAXPROCENTRY];
 325 static struct thrdentry64 thrdentry[MAXTHRDENTRY];
 326 static int pagesize;
 327
 328 #ifndef _AIXVERSION_610
 329 int getprocs64(void *procsinfo, int sizproc, void *fdsinfo, int sizfd,
 330                pid_t *index, int count);
 331 int getthrds64(pid_t, void *, int, tid64_t *, int);
 332 #endif
 333 int getargs(void *processBuffer, int bufferLen, char *argsBuffer, int argsLen);
 334 #endif /* HAVE_PROCINFO_H */
 335
 336 #if HAVE_LIBTASKSTATS
 337 static ts_t *taskstats_handle;
 338 #endif
 339
 340 /* put name of process from config to list_head_g tree
 341  * list_head_g is a list of 'procstat_t' structs with
 342  * processes names we want to watch */
 343 static procstat_t *ps_list_register(const char *name, const char *regexp) {
 344   procstat_t *new;
 345   procstat_t *ptr;
 346   int status;
 347
 348   new = calloc(1, sizeof(*new));
 349   if (new == NULL) {
 350     ERROR("processes plugin: ps_list_register: calloc failed.");
 351     return NULL;
 352   }
 353   sstrncpy(new->name, name, sizeof(new->name));
 354
 355   new->io_rchar = -1;
 356   new->io_wchar = -1;
 357   new->io_syscr = -1;
 358   new->io_syscw = -1;
 359   new->io_diskr = -1;
 360   new->io_diskw = -1;
 361   new->cswitch_vol = -1;
 362   new->cswitch_invol = -1;
 363
 364   new->report_fd_num = report_fd_num;
 365   new->report_maps_num = report_maps_num;
 366   new->report_ctx_switch = report_ctx_switch;
 367   new->report_delay = report_delay;
 368
 369 #if HAVE_REGEX_H
 370   if (regexp != NULL) {
 371     DEBUG("ProcessMatch: adding \"%s\" as criteria to process %s.", regexp,
 372           name);
 373     new->re = malloc(sizeof(*new->re));
 374     if (new->re == NULL) {
 375       ERROR("processes plugin: ps_list_register: malloc failed.");
 376       sfree(new);
 377       return NULL;
 378     }
 379
 380     status = regcomp(new->re, regexp, REG_EXTENDED | REG_NOSUB);
 381     if (status != 0) {
 382       DEBUG("ProcessMatch: compiling the regular expression \"%s\" failed.",
 383             regexp);
 384       sfree(new->re);
 385       sfree(new);
 386       return NULL;
 387     }
 388   }
 389 #else
 390   if (regexp != NULL) {
 391     ERROR("processes plugin: ps_list_register: "
 392           "Regular expression \"%s\" found in config "
 393           "file, but support for regular expressions "
 394           "has been disabled at compile time.",
 395           regexp);
 396     sfree(new);
 397     return NULL;
 398   }
 399 #endif
 400
 401   for (ptr = list_head_g; ptr != NULL; ptr = ptr->next) {
 402     if (strcmp(ptr->name, name) == 0) {
 403       WARNING("processes plugin: You have configured more "
 404               "than one `Process' or "
 405               "`ProcessMatch' with the same name. "
 406               "All but the first setting will be "
 407               "ignored.");
 408 #if HAVE_REGEX_H
 409       sfree(new->re);
 410 #endif
 411       sfree(new);
 412       return NULL;
 413     }
 414
 415     if (ptr->next == NULL)
 416       break;
 417   }
 418
 419   if (ptr == NULL)
 420     list_head_g = new;
 421   else
 422     ptr->next = new;
 423
 424   return new;
 425 } /* void ps_list_register */
 426
 427 /* try to match name against entry, returns 1 if success */
 428 static int ps_list_match(const char *name, const char *cmdline,
 429                          procstat_t *ps) {
 430 #if HAVE_REGEX_H
 431   if (ps->re != NULL) {
 432     int status;
 433     const char *str;
 434
 435     str = cmdline;
 436     if ((str == NULL) || (str[0] == 0))
 437       str = name;
 438
 439     assert(str != NULL);
 440
 441     status = regexec(ps->re, str,
 442                      /* nmatch = */ 0,
 443                      /* pmatch = */ NULL,
 444                      /* eflags = */ 0);
 445     if (status == 0)
 446       return 1;
 447   } else
 448 #endif
 449       if (strcmp(ps->name, name) == 0)
 450     return 1;
 451
 452   return 0;
 453 } /* int ps_list_match */
 454
 455 static void ps_update_counter(derive_t *group_counter, derive_t *curr_counter,
 456                               derive_t new_counter) {
 457   unsigned long curr_value;
 458
 459   if (want_init) {
 460     *curr_counter = new_counter;
 461     return;
 462   }
 463
 464   if (new_counter < *curr_counter)
 465     curr_value = new_counter + (ULONG_MAX - *curr_counter);
 466   else
 467     curr_value = new_counter - *curr_counter;
 468
 469   if (*group_counter == -1)
 470     *group_counter = 0;
 471
 472   *curr_counter = new_counter;
 473   *group_counter += curr_value;
 474 }
 475
 476 #if HAVE_LIBTASKSTATS
 477 static void ps_update_delay_one(gauge_t *out_rate_sum,
 478                                 value_to_rate_state_t *state, uint64_t cnt,
 479                                 cdtime_t t) {
 480   gauge_t rate = NAN;
 481   int status = value_to_rate(&rate, (value_t){.counter = (counter_t)cnt},
 482                              DS_TYPE_COUNTER, t, state);
 483   if ((status != 0) || isnan(rate)) {
 484     return;
 485   }
 486
 487   if (isnan(*out_rate_sum)) {
 488     *out_rate_sum = rate;
 489   } else {
 490     *out_rate_sum += rate;
 491   }
 492 }
 493
 494 static void ps_update_delay(procstat_t *out, procstat_entry_t *prev,
 495                             process_entry_t *curr) {
 496   cdtime_t now = cdtime();
 497
 498   ps_update_delay_one(&out->delay_cpu, &prev->delay_cpu, curr->delay.cpu_ns,
 499                       now);
 500   ps_update_delay_one(&out->delay_blkio, &prev->delay_blkio,
 501                       curr->delay.blkio_ns, now);
 502   ps_update_delay_one(&out->delay_swapin, &prev->delay_swapin,
 503                       curr->delay.swapin_ns, now);
 504   ps_update_delay_one(&out->delay_freepages, &prev->delay_freepages,
 505                       curr->delay.freepages_ns, now);
 506 }
 507 #endif
 508
 509 /* add process entry to 'instances' of process 'name' (or refresh it) */
 510 static void ps_list_add(const char *name, const char *cmdline,
 511                         process_entry_t *entry) {
 512   procstat_entry_t *pse;
 513
 514   if (entry->id == 0)
 515     return;
 516
 517   for (procstat_t *ps = list_head_g; ps != NULL; ps = ps->next) {
 518     if ((ps_list_match(name, cmdline, ps)) == 0)
 519       continue;
 520
 521 #if KERNEL_LINUX
 522     ps_fill_details(ps, entry);
 523 #endif
 524
 525     for (pse = ps->instances; pse != NULL; pse = pse->next)
 526       if ((pse->id == entry->id) || (pse->next == NULL))
 527         break;
 528
 529     if ((pse == NULL) || (pse->id != entry->id)) {
 530       procstat_entry_t *new;
 531
 532       new = calloc(1, sizeof(*new));
 533       if (new == NULL)
 534         return;
 535       new->id = entry->id;
 536
 537       if (pse == NULL)
 538         ps->instances = new;
 539       else
 540         pse->next = new;
 541
 542       pse = new;
 543     }
 544
 545     pse->age = 0;
 546
 547     ps->num_proc += entry->num_proc;
 548     ps->num_lwp += entry->num_lwp;
 549     ps->num_fd += entry->num_fd;
 550     ps->num_maps += entry->num_maps;
 551     ps->vmem_size += entry->vmem_size;
 552     ps->vmem_rss += entry->vmem_rss;
 553     ps->vmem_data += entry->vmem_data;
 554     ps->vmem_code += entry->vmem_code;
 555     ps->stack_size += entry->stack_size;
 556
 557     if ((entry->io_rchar != -1) && (entry->io_wchar != -1)) {
 558       ps_update_counter(&ps->io_rchar, &pse->io_rchar, entry->io_rchar);
 559       ps_update_counter(&ps->io_wchar, &pse->io_wchar, entry->io_wchar);
 560     }
 561
 562     if ((entry->io_syscr != -1) && (entry->io_syscw != -1)) {
 563       ps_update_counter(&ps->io_syscr, &pse->io_syscr, entry->io_syscr);
 564       ps_update_counter(&ps->io_syscw, &pse->io_syscw, entry->io_syscw);
 565     }
 566
 567     if ((entry->io_diskr != -1) && (entry->io_diskw != -1)) {
 568       ps_update_counter(&ps->io_diskr, &pse->io_diskr, entry->io_diskr);
 569       ps_update_counter(&ps->io_diskw, &pse->io_diskw, entry->io_diskw);
 570     }
 571
 572     if ((entry->cswitch_vol != -1) && (entry->cswitch_invol != -1)) {
 573       ps_update_counter(&ps->cswitch_vol, &pse->cswitch_vol,
 574                         entry->cswitch_vol);
 575       ps_update_counter(&ps->cswitch_invol, &pse->cswitch_invol,
 576                         entry->cswitch_invol);
 577     }
 578
 579     ps_update_counter(&ps->vmem_minflt_counter, &pse->vmem_minflt_counter,
 580                       entry->vmem_minflt_counter);
 581     ps_update_counter(&ps->vmem_majflt_counter, &pse->vmem_majflt_counter,
 582                       entry->vmem_majflt_counter);
 583
 584     ps_update_counter(&ps->cpu_user_counter, &pse->cpu_user_counter,
 585                       entry->cpu_user_counter);
 586     ps_update_counter(&ps->cpu_system_counter, &pse->cpu_system_counter,
 587                       entry->cpu_system_counter);
 588
 589 #if HAVE_LIBTASKSTATS
 590     ps_update_delay(ps, pse, entry);
 591 #endif
 592   }
 593 }
 594
 595 /* remove old entries from instances of processes in list_head_g */
 596 static void ps_list_reset(void) {
 597   procstat_entry_t *pse;
 598   procstat_entry_t *pse_prev;
 599
 600   for (procstat_t *ps = list_head_g; ps != NULL; ps = ps->next) {
 601     ps->num_proc = 0;
 602     ps->num_lwp = 0;
 603     ps->num_fd = 0;
 604     ps->num_maps = 0;
 605     ps->vmem_size = 0;
 606     ps->vmem_rss = 0;
 607     ps->vmem_data = 0;
 608     ps->vmem_code = 0;
 609     ps->stack_size = 0;
 610
 611     ps->delay_cpu = NAN;
 612     ps->delay_blkio = NAN;
 613     ps->delay_swapin = NAN;
 614     ps->delay_freepages = NAN;
 615
 616     pse_prev = NULL;
 617     pse = ps->instances;
 618     while (pse != NULL) {
 619       if (pse->age > 10) {
 620         DEBUG("Removing this procstat entry cause it's too old: "
 621               "id = %lu; name = %s;",
 622               pse->id, ps->name);
 623
 624         if (pse_prev == NULL) {
 625           ps->instances = pse->next;
 626           free(pse);
 627           pse = ps->instances;
 628         } else {
 629           pse_prev->next = pse->next;
 630           free(pse);
 631           pse = pse_prev->next;
 632         }
 633       } else {
 634         pse->age++;
 635         pse_prev = pse;
 636         pse = pse->next;
 637       }
 638     } /* while (pse != NULL) */
 639   }   /* for (ps = list_head_g; ps != NULL; ps = ps->next) */
 640 }
 641
 642 static void ps_tune_instance(oconfig_item_t *ci, procstat_t *ps) {
 643   for (int i = 0; i < ci->children_num; i++) {
 644     oconfig_item_t *c = ci->children + i;
 645
 646     if (strcasecmp(c->key, "CollectContextSwitch") == 0)
 647       cf_util_get_boolean(c, &ps->report_ctx_switch);
 648     else if (strcasecmp(c->key, "CollectFileDescriptor") == 0)
 649       cf_util_get_boolean(c, &ps->report_fd_num);
 650     else if (strcasecmp(c->key, "CollectMemoryMaps") == 0)
 651       cf_util_get_boolean(c, &ps->report_maps_num);
 652     else if (strcasecmp(c->key, "CollectDelayAccounting") == 0) {
 653 #if HAVE_LIBTASKSTATS
 654       cf_util_get_boolean(c, &ps->report_delay);
 655 #else
 656       WARNING("processes plugin: The plugin has been compiled without support "
 657               "for the \"CollectDelayAccounting\" option.");
 658 #endif
 659     } else {
 660       ERROR("processes plugin: Option \"%s\" not allowed here.", c->key);
 661     }
 662   } /* for (ci->children) */
 663 } /* void ps_tune_instance */
 664
 665 /* put all pre-defined 'Process' names from config to list_head_g tree */
 666 static int ps_config(oconfig_item_t *ci) {
 667 #if KERNEL_LINUX
 668   const size_t max_procname_len = 15;
 669 #elif KERNEL_SOLARIS || KERNEL_FREEBSD
 670   const size_t max_procname_len = MAXCOMLEN - 1;
 671 #endif
 672
 673   procstat_t *ps;
 674
 675   for (int i = 0; i < ci->children_num; ++i) {
 676     oconfig_item_t *c = ci->children + i;
 677
 678     if (strcasecmp(c->key, "Process") == 0) {
 679       if ((c->values_num != 1) || (OCONFIG_TYPE_STRING != c->values[0].type)) {
 680         ERROR("processes plugin: `Process' expects exactly "
 681               "one string argument (got %i).",
 682               c->values_num);
 683         continue;
 684       }
 685
 686 #if KERNEL_LINUX || KERNEL_SOLARIS || KERNEL_FREEBSD
 687       if (strlen(c->values[0].value.string) > max_procname_len) {
 688         WARNING("processes plugin: this platform has a %" PRIsz
 689                 " character limit "
 690                 "to process names. The `Process \"%s\"' option will "
 691                 "not work as expected.",
 692                 max_procname_len, c->values[0].value.string);
 693       }
 694 #endif
 695
 696       ps = ps_list_register(c->values[0].value.string, NULL);
 697
 698       if (c->children_num != 0 && ps != NULL)
 699         ps_tune_instance(c, ps);
 700     } else if (strcasecmp(c->key, "ProcessMatch") == 0) {
 701       if ((c->values_num != 2) || (OCONFIG_TYPE_STRING != c->values[0].type) ||
 702           (OCONFIG_TYPE_STRING != c->values[1].type)) {
 703         ERROR("processes plugin: `ProcessMatch' needs exactly "
 704               "two string arguments (got %i).",
 705               c->values_num);
 706         continue;
 707       }
 708
 709       ps = ps_list_register(c->values[0].value.string,
 710                             c->values[1].value.string);
 711
 712       if (c->children_num != 0 && ps != NULL)
 713         ps_tune_instance(c, ps);
 714     } else if (strcasecmp(c->key, "CollectContextSwitch") == 0) {
 715       cf_util_get_boolean(c, &report_ctx_switch);
 716     } else if (strcasecmp(c->key, "CollectFileDescriptor") == 0) {
 717       cf_util_get_boolean(c, &report_fd_num);
 718     } else if (strcasecmp(c->key, "CollectMemoryMaps") == 0) {
 719       cf_util_get_boolean(c, &report_maps_num);
 720     } else if (strcasecmp(c->key, "CollectDelayAccounting") == 0) {
 721 #if HAVE_LIBTASKSTATS
 722       cf_util_get_boolean(c, &report_delay);
 723 #else
 724       WARNING("processes plugin: The plugin has been compiled without support "
 725               "for the \"CollectDelayAccounting\" option.");
 726 #endif
 727     } else {
 728       ERROR("processes plugin: The `%s' configuration option is not "
 729             "understood and will be ignored.",
 730             c->key);
 731       continue;
 732     }
 733   }
 734
 735   return 0;
 736 }
 737
 738 static int ps_init(void) {
 739 #if HAVE_THREAD_INFO
 740   kern_return_t status;
 741
 742   port_host_self = mach_host_self();
 743   port_task_self = mach_task_self();
 744
 745   if (pset_list != NULL) {
 746     vm_deallocate(port_task_self, (vm_address_t)pset_list,
 747                   pset_list_len * sizeof(processor_set_t));
 748     pset_list = NULL;
 749     pset_list_len = 0;
 750   }
 751
 752   if ((status = host_processor_sets(port_host_self, &pset_list,
 753                                     &pset_list_len)) != KERN_SUCCESS) {
 754     ERROR("host_processor_sets failed: %s\n", mach_error_string(status));
 755     pset_list = NULL;
 756     pset_list_len = 0;
 757     return -1;
 758   }
 759 /* #endif HAVE_THREAD_INFO */
 760
 761 #elif KERNEL_LINUX
 762   pagesize_g = sysconf(_SC_PAGESIZE);
 763   DEBUG("pagesize_g = %li; CONFIG_HZ = %i;", pagesize_g, CONFIG_HZ);
 764
 765 #if HAVE_LIBTASKSTATS
 766   if (taskstats_handle == NULL) {
 767     taskstats_handle = ts_create();
 768     if (taskstats_handle == NULL) {
 769       WARNING("processes plugin: Creating taskstats handle failed.");
 770     }
 771   }
 772 #endif
 773 /* #endif KERNEL_LINUX */
 774
 775 #elif HAVE_LIBKVM_GETPROCS &&                                                  \
 776     (HAVE_STRUCT_KINFO_PROC_FREEBSD || HAVE_STRUCT_KINFO_PROC_OPENBSD)
 777   pagesize = getpagesize();
 778 /* #endif HAVE_LIBKVM_GETPROCS && (HAVE_STRUCT_KINFO_PROC_FREEBSD ||
 779  * HAVE_STRUCT_KINFO_PROC_OPENBSD) */
 780
 781 #elif HAVE_PROCINFO_H
 782   pagesize = getpagesize();
 783 #endif /* HAVE_PROCINFO_H */
 784
 785   return 0;
 786 } /* int ps_init */
 787
 788 /* submit global state (e.g.: qty of zombies, running, etc..) */
 789 static void ps_submit_state(const char *state, double value) {
 790   value_list_t vl = VALUE_LIST_INIT;
 791
 792   vl.values = &(value_t){.gauge = value};
 793   vl.values_len = 1;
 794   sstrncpy(vl.plugin, "processes", sizeof(vl.plugin));
 795   sstrncpy(vl.plugin_instance, "", sizeof(vl.plugin_instance));
 796   sstrncpy(vl.type, "ps_state", sizeof(vl.type));
 797   sstrncpy(vl.type_instance, state, sizeof(vl.type_instance));
 798
 799   plugin_dispatch_values(&vl);
 800 }
 801
 802 /* submit info about specific process (e.g.: memory taken, cpu usage, etc..) */
 803 static void ps_submit_proc_list(procstat_t *ps) {
 804   value_list_t vl = VALUE_LIST_INIT;
 805   value_t values[2];
 806
 807   vl.values = values;
 808   sstrncpy(vl.plugin, "processes", sizeof(vl.plugin));
 809   sstrncpy(vl.plugin_instance, ps->name, sizeof(vl.plugin_instance));
 810
 811   sstrncpy(vl.type, "ps_vm", sizeof(vl.type));
 812   vl.values[0].gauge = ps->vmem_size;
 813   vl.values_len = 1;
 814   plugin_dispatch_values(&vl);
 815
 816   sstrncpy(vl.type, "ps_rss", sizeof(vl.type));
 817   vl.values[0].gauge = ps->vmem_rss;
 818   vl.values_len = 1;
 819   plugin_dispatch_values(&vl);
 820
 821   sstrncpy(vl.type, "ps_data", sizeof(vl.type));
 822   vl.values[0].gauge = ps->vmem_data;
 823   vl.values_len = 1;
 824   plugin_dispatch_values(&vl);
 825
 826   sstrncpy(vl.type, "ps_code", sizeof(vl.type));
 827   vl.values[0].gauge = ps->vmem_code;
 828   vl.values_len = 1;
 829   plugin_dispatch_values(&vl);
 830
 831   sstrncpy(vl.type, "ps_stacksize", sizeof(vl.type));
 832   vl.values[0].gauge = ps->stack_size;
 833   vl.values_len = 1;
 834   plugin_dispatch_values(&vl);
 835
 836   sstrncpy(vl.type, "ps_cputime", sizeof(vl.type));
 837   vl.values[0].derive = ps->cpu_user_counter;
 838   vl.values[1].derive = ps->cpu_system_counter;
 839   vl.values_len = 2;
 840   plugin_dispatch_values(&vl);
 841
 842   sstrncpy(vl.type, "ps_count", sizeof(vl.type));
 843   vl.values[0].gauge = ps->num_proc;
 844   vl.values[1].gauge = ps->num_lwp;
 845   vl.values_len = 2;
 846   plugin_dispatch_values(&vl);
 847
 848   sstrncpy(vl.type, "ps_pagefaults", sizeof(vl.type));
 849   vl.values[0].derive = ps->vmem_minflt_counter;
 850   vl.values[1].derive = ps->vmem_majflt_counter;
 851   vl.values_len = 2;
 852   plugin_dispatch_values(&vl);
 853
 854   if ((ps->io_rchar != -1) && (ps->io_wchar != -1)) {
 855     sstrncpy(vl.type, "io_octets", sizeof(vl.type));
 856     vl.values[0].derive = ps->io_rchar;
 857     vl.values[1].derive = ps->io_wchar;
 858     vl.values_len = 2;
 859     plugin_dispatch_values(&vl);
 860   }
 861
 862   if ((ps->io_syscr != -1) && (ps->io_syscw != -1)) {
 863     sstrncpy(vl.type, "io_ops", sizeof(vl.type));
 864     vl.values[0].derive = ps->io_syscr;
 865     vl.values[1].derive = ps->io_syscw;
 866     vl.values_len = 2;
 867     plugin_dispatch_values(&vl);
 868   }
 869
 870   if ((ps->io_diskr != -1) && (ps->io_diskw != -1)) {
 871     sstrncpy(vl.type, "disk_octets", sizeof(vl.type));
 872     vl.values[0].derive = ps->io_diskr;
 873     vl.values[1].derive = ps->io_diskw;
 874     vl.values_len = 2;
 875     plugin_dispatch_values(&vl);
 876   }
 877
 878   if (ps->num_fd > 0) {
 879     sstrncpy(vl.type, "file_handles", sizeof(vl.type));
 880     vl.values[0].gauge = ps->num_fd;
 881     vl.values_len = 1;
 882     plugin_dispatch_values(&vl);
 883   }
 884
 885   if (ps->num_maps > 0) {
 886     sstrncpy(vl.type, "file_handles", sizeof(vl.type));
 887     sstrncpy(vl.type_instance, "mapped", sizeof(vl.type_instance));
 888     vl.values[0].gauge = ps->num_maps;
 889     vl.values_len = 1;
 890     plugin_dispatch_values(&vl);
 891   }
 892
 893   if ((ps->cswitch_vol != -1) && (ps->cswitch_invol != -1)) {
 894     sstrncpy(vl.type, "contextswitch", sizeof(vl.type));
 895     sstrncpy(vl.type_instance, "voluntary", sizeof(vl.type_instance));
 896     vl.values[0].derive = ps->cswitch_vol;
 897     vl.values_len = 1;
 898     plugin_dispatch_values(&vl);
 899
 900     sstrncpy(vl.type, "contextswitch", sizeof(vl.type));
 901     sstrncpy(vl.type_instance, "involuntary", sizeof(vl.type_instance));
 902     vl.values[0].derive = ps->cswitch_invol;
 903     vl.values_len = 1;
 904     plugin_dispatch_values(&vl);
 905   }
 906
 907   /* The ps->delay_* metrics are in nanoseconds per second. Convert to seconds
 908    * per second. */
 909   gauge_t const delay_factor = 1000000000.0;
 910
 911   struct {
 912     char *type_instance;
 913     gauge_t rate_ns;
 914   } delay_metrics[] = {
 915       {"delay-cpu", ps->delay_cpu},
 916       {"delay-blkio", ps->delay_blkio},
 917       {"delay-swapin", ps->delay_swapin},
 918       {"delay-freepages", ps->delay_freepages},
 919   };
 920   for (size_t i = 0; i < STATIC_ARRAY_SIZE(delay_metrics); i++) {
 921     if (isnan(delay_metrics[i].rate_ns)) {
 922       continue;
 923     }
 924     sstrncpy(vl.type, "delay_rate", sizeof(vl.type));
 925     sstrncpy(vl.type_instance, delay_metrics[i].type_instance,
 926              sizeof(vl.type_instance));
 927     vl.values[0].gauge = delay_metrics[i].rate_ns * delay_factor;
 928     vl.values_len = 1;
 929     plugin_dispatch_values(&vl);
 930   }
 931
 932   DEBUG(
 933       "name = %s; num_proc = %lu; num_lwp = %lu; num_fd = %lu; num_maps = %lu; "
 934       "vmem_size = %lu; vmem_rss = %lu; vmem_data = %lu; "
 935       "vmem_code = %lu; "
 936       "vmem_minflt_counter = %" PRIi64 "; vmem_majflt_counter = %" PRIi64 "; "
 937       "cpu_user_counter = %" PRIi64 "; cpu_system_counter = %" PRIi64 "; "
 938       "io_rchar = %" PRIi64 "; io_wchar = %" PRIi64 "; "
 939       "io_syscr = %" PRIi64 "; io_syscw = %" PRIi64 "; "
 940       "io_diskr = %" PRIi64 "; io_diskw = %" PRIi64 "; "
 941       "cswitch_vol = %" PRIi64 "; cswitch_invol = %" PRIi64 "; "
 942       "delay_cpu = %g; delay_blkio = %g; "
 943       "delay_swapin = %g; delay_freepages = %g;",
 944       ps->name, ps->num_proc, ps->num_lwp, ps->num_fd, ps->num_maps,
 945       ps->vmem_size, ps->vmem_rss, ps->vmem_data, ps->vmem_code,
 946       ps->vmem_minflt_counter, ps->vmem_majflt_counter, ps->cpu_user_counter,
 947       ps->cpu_system_counter, ps->io_rchar, ps->io_wchar, ps->io_syscr,
 948       ps->io_syscw, ps->io_diskr, ps->io_diskw, ps->cswitch_vol,
 949       ps->cswitch_invol, ps->delay_cpu, ps->delay_blkio, ps->delay_swapin,
 950       ps->delay_freepages);
 951
 952 } /* void ps_submit_proc_list */
 953
 954 #if KERNEL_LINUX || KERNEL_SOLARIS
 955 static void ps_submit_fork_rate(derive_t value) {
 956   value_list_t vl = VALUE_LIST_INIT;
 957
 958   vl.values = &(value_t){.derive = value};
 959   vl.values_len = 1;
 960   sstrncpy(vl.plugin, "processes", sizeof(vl.plugin));
 961   sstrncpy(vl.plugin_instance, "", sizeof(vl.plugin_instance));
 962   sstrncpy(vl.type, "fork_rate", sizeof(vl.type));
 963   sstrncpy(vl.type_instance, "", sizeof(vl.type_instance));
 964
 965   plugin_dispatch_values(&vl);
 966 }
 967 #endif /* KERNEL_LINUX || KERNEL_SOLARIS*/
 968
 969 /* ------- additional functions for KERNEL_LINUX/HAVE_THREAD_INFO ------- */
 970 #if KERNEL_LINUX
 971 static int ps_read_tasks_status(process_entry_t *ps) {
 972   char dirname[64];
 973   DIR *dh;
 974   char filename[64];
 975   FILE *fh;
 976   struct dirent *ent;
 977   derive_t cswitch_vol = 0;
 978   derive_t cswitch_invol = 0;
 979   char buffer[1024];
 980   char *fields[8];
 981   int numfields;
 982
 983   snprintf(dirname, sizeof(dirname), "/proc/%li/task", ps->id);
 984
 985   if ((dh = opendir(dirname)) == NULL) {
 986     DEBUG("Failed to open directory `%s'", dirname);
 987     return -1;
 988   }
 989
 990   while ((ent = readdir(dh)) != NULL) {
 991     char *tpid;
 992
 993     if (!isdigit((int)ent->d_name[0]))
 994       continue;
 995
 996     tpid = ent->d_name;
 997
 998     int r = snprintf(filename, sizeof(filename), "/proc/%li/task/%s/status",
 999                      ps->id, tpid);
1000     if ((size_t)r >= sizeof(filename)) {
1001       DEBUG("Filename too long: `%s'", filename);
1002       continue;
1003     }
1004
1005     if ((fh = fopen(filename, "r")) == NULL) {
1006       DEBUG("Failed to open file `%s'", filename);
1007       continue;
1008     }
1009
1010     while (fgets(buffer, sizeof(buffer), fh) != NULL) {
1011       derive_t tmp;
1012       char *endptr;
1013
1014       if (strncmp(buffer, "voluntary_ctxt_switches", 23) != 0 &&
1015           strncmp(buffer, "nonvoluntary_ctxt_switches", 26) != 0)
1016         continue;
1017
1018       numfields = strsplit(buffer, fields, STATIC_ARRAY_SIZE(fields));
1019
1020       if (numfields < 2)
1021         continue;
1022
1023       errno = 0;
1024       endptr = NULL;
1025       tmp = (derive_t)strtoll(fields[1], &endptr, /* base = */ 10);
1026       if ((errno == 0) && (endptr != fields[1])) {
1027         if (strncmp(buffer, "voluntary_ctxt_switches", 23) == 0) {
1028           cswitch_vol += tmp;
1029         } else if (strncmp(buffer, "nonvoluntary_ctxt_switches", 26) == 0) {
1030           cswitch_invol += tmp;
1031         }
1032       }
1033     } /* while (fgets) */
1034
1035     if (fclose(fh)) {
1036       WARNING("processes: fclose: %s", STRERRNO);
1037     }
1038   }
1039   closedir(dh);
1040
1041   ps->cswitch_vol = cswitch_vol;
1042   ps->cswitch_invol = cswitch_invol;
1043
1044   return 0;
1045 } /* int *ps_read_tasks_status */
1046
1047 /* Read data from /proc/pid/status */
1048 static int ps_read_status(long pid, process_entry_t *ps) {
1049   FILE *fh;
1050   char buffer[1024];
1051   char filename[64];
1052   unsigned long lib = 0;
1053   unsigned long exe = 0;
1054   unsigned long data = 0;
1055   unsigned long threads = 0;
1056   char *fields[8];
1057   int numfields;
1058
1059   snprintf(filename, sizeof(filename), "/proc/%li/status", pid);
1060   if ((fh = fopen(filename, "r")) == NULL)
1061     return -1;
1062
1063   while (fgets(buffer, sizeof(buffer), fh) != NULL) {
1064     unsigned long tmp;
1065     char *endptr;
1066
1067     if (strncmp(buffer, "Vm", 2) != 0 && strncmp(buffer, "Threads", 7) != 0)
1068       continue;
1069
1070     numfields = strsplit(buffer, fields, STATIC_ARRAY_SIZE(fields));
1071
1072     if (numfields < 2)
1073       continue;
1074
1075     errno = 0;
1076     endptr = NULL;
1077     tmp = strtoul(fields[1], &endptr, /* base = */ 10);
1078     if ((errno == 0) && (endptr != fields[1])) {
1079       if (strncmp(buffer, "VmData", 6) == 0) {
1080         data = tmp;
1081       } else if (strncmp(buffer, "VmLib", 5) == 0) {
1082         lib = tmp;
1083       } else if (strncmp(buffer, "VmExe", 5) == 0) {
1084         exe = tmp;
1085       } else if (strncmp(buffer, "Threads", 7) == 0) {
1086         threads = tmp;
1087       }
1088     }
1089   } /* while (fgets) */
1090
1091   if (fclose(fh)) {
1092     WARNING("processes: fclose: %s", STRERRNO);
1093   }
1094
1095   ps->vmem_data = data * 1024;
1096   ps->vmem_code = (exe + lib) * 1024;
1097   if (threads != 0)
1098     ps->num_lwp = threads;
1099
1100   return 0;
1101 } /* int *ps_read_status */
1102
1103 static int ps_read_io(process_entry_t *ps) {
1104   FILE *fh;
1105   char buffer[1024];
1106   char filename[64];
1107
1108   char *fields[8];
1109   int numfields;
1110
1111   snprintf(filename, sizeof(filename), "/proc/%li/io", ps->id);
1112   if ((fh = fopen(filename, "r")) == NULL) {
1113     DEBUG("ps_read_io: Failed to open file `%s'", filename);
1114     return -1;
1115   }
1116
1117   while (fgets(buffer, sizeof(buffer), fh) != NULL) {
1118     derive_t *val = NULL;
1119     long long tmp;
1120     char *endptr;
1121
1122     if (strncasecmp(buffer, "rchar:", 6) == 0)
1123       val = &(ps->io_rchar);
1124     else if (strncasecmp(buffer, "wchar:", 6) == 0)
1125       val = &(ps->io_wchar);
1126     else if (strncasecmp(buffer, "syscr:", 6) == 0)
1127       val = &(ps->io_syscr);
1128     else if (strncasecmp(buffer, "syscw:", 6) == 0)
1129       val = &(ps->io_syscw);
1130     else if (strncasecmp(buffer, "read_bytes:", 11) == 0)
1131       val = &(ps->io_diskr);
1132     else if (strncasecmp(buffer, "write_bytes:", 12) == 0)
1133       val = &(ps->io_diskw);
1134     else
1135       continue;
1136
1137     numfields = strsplit(buffer, fields, STATIC_ARRAY_SIZE(fields));
1138
1139     if (numfields < 2)
1140       continue;
1141
1142     errno = 0;
1143     endptr = NULL;
1144     tmp = strtoll(fields[1], &endptr, /* base = */ 10);
1145     if ((errno != 0) || (endptr == fields[1]))
1146       *val = -1;
1147     else
1148       *val = (derive_t)tmp;
1149   } /* while (fgets) */
1150
1151   if (fclose(fh)) {
1152     WARNING("processes: fclose: %s", STRERRNO);
1153   }
1154   return 0;
1155 } /* int ps_read_io (...) */
1156
1157 static int ps_count_maps(pid_t pid) {
1158   FILE *fh;
1159   char buffer[1024];
1160   char filename[64];
1161   int count = 0;
1162
1163   snprintf(filename, sizeof(filename), "/proc/%d/maps", pid);
1164   if ((fh = fopen(filename, "r")) == NULL) {
1165     DEBUG("ps_count_maps: Failed to open file `%s'", filename);
1166     return -1;
1167   }
1168
1169   while (fgets(buffer, sizeof(buffer), fh) != NULL) {
1170     if (strchr(buffer, '\n')) {
1171       count++;
1172     }
1173   } /* while (fgets) */
1174
1175   if (fclose(fh)) {
1176     WARNING("processes: fclose: %s", STRERRNO);
1177   }
1178   return count;
1179 } /* int ps_count_maps (...) */
1180
1181 static int ps_count_fd(int pid) {
1182   char dirname[64];
1183   DIR *dh;
1184   struct dirent *ent;
1185   int count = 0;
1186
1187   snprintf(dirname, sizeof(dirname), "/proc/%i/fd", pid);
1188
1189   if ((dh = opendir(dirname)) == NULL) {
1190     DEBUG("Failed to open directory `%s'", dirname);
1191     return -1;
1192   }
1193   while ((ent = readdir(dh)) != NULL) {
1194     if (!isdigit((int)ent->d_name[0]))
1195       continue;
1196     else
1197       count++;
1198   }
1199   closedir(dh);
1200
1201   return (count >= 1) ? count : 1;
1202 } /* int ps_count_fd (pid) */
1203
1204 #if HAVE_LIBTASKSTATS
1205 static int ps_delay(process_entry_t *ps) {
1206   if (taskstats_handle == NULL) {
1207     return ENOTCONN;
1208   }
1209
1210   int status = ts_delay_by_tgid(taskstats_handle, (uint32_t)ps->id, &ps->delay);
1211   if (status == EPERM) {
1212     static c_complain_t c;
1213 #if defined(HAVE_SYS_CAPABILITY_H) && defined(CAP_NET_ADMIN)
1214     if (check_capability(CAP_NET_ADMIN) != 0) {
1215       if (getuid() == 0) {
1216         c_complain(
1217             LOG_ERR, &c,
1218             "processes plugin: Reading Delay Accounting metric failed: %s. "
1219             "collectd is running as root, but missing the CAP_NET_ADMIN "
1220             "capability. The most common cause for this is that the init "
1221             "system is dropping capabilities.",
1222             STRERROR(status));
1223       } else {
1224         c_complain(
1225             LOG_ERR, &c,
1226             "processes plugin: Reading Delay Accounting metric failed: %s. "
1227             "collectd is not running as root and missing the CAP_NET_ADMIN "
1228             "capability. Either run collectd as root or grant it the "
1229             "CAP_NET_ADMIN capability using \"setcap cap_net_admin=ep " PREFIX
1230             "/sbin/collectd\".",
1231             STRERROR(status));
1232       }
1233     } else {
1234       ERROR("processes plugin: ts_delay_by_tgid failed: %s. The CAP_NET_ADMIN "
1235             "capability is available (I checked), so this error is utterly "
1236             "unexpected.",
1237             STRERROR(status));
1238     }
1239 #else
1240     c_complain(LOG_ERR, &c,
1241                "processes plugin: Reading Delay Accounting metric failed: %s. "
1242                "Reading Delay Accounting metrics requires root privileges.",
1243                STRERROR(status));
1244 #endif
1245     return status;
1246   } else if (status != 0) {
1247     ERROR("processes plugin: ts_delay_by_tgid failed: %s", STRERROR(status));
1248     return status;
1249   }
1250
1251   return 0;
1252 }
1253 #endif
1254
1255 static void ps_fill_details(const procstat_t *ps, process_entry_t *entry) {
1256   if (entry->has_io == false) {
1257     ps_read_io(entry);
1258     entry->has_io = true;
1259   }
1260
1261   if (ps->report_ctx_switch) {
1262     if (entry->has_cswitch == false) {
1263       ps_read_tasks_status(entry);
1264       entry->has_cswitch = true;
1265     }
1266   }
1267
1268   if (ps->report_maps_num) {
1269     int num_maps;
1270     if (entry->has_maps == false && (num_maps = ps_count_maps(entry->id)) > 0) {
1271       entry->num_maps = num_maps;
1272     }
1273     entry->has_maps = true;
1274   }
1275
1276   if (ps->report_fd_num) {
1277     int num_fd;
1278     if (entry->has_fd == false && (num_fd = ps_count_fd(entry->id)) > 0) {
1279       entry->num_fd = num_fd;
1280     }
1281     entry->has_fd = true;
1282   }
1283
1284 #if HAVE_LIBTASKSTATS
1285   if (ps->report_delay && !entry->has_delay) {
1286     if (ps_delay(entry) == 0) {
1287       entry->has_delay = true;
1288     }
1289   }
1290 #endif
1291 } /* void ps_fill_details (...) */
1292
1293 /* ps_read_process reads process counters on Linux. */
1294 static int ps_read_process(long pid, process_entry_t *ps, char *state) {
1295   char filename[64];
1296   char buffer[1024];
1297
1298   char *fields[64];
1299   char fields_len;
1300
1301   size_t buffer_len;
1302
1303   char *buffer_ptr;
1304   size_t name_start_pos;
1305   size_t name_end_pos;
1306   size_t name_len;
1307
1308   derive_t cpu_user_counter;
1309   derive_t cpu_system_counter;
1310   long long unsigned vmem_size;
1311   long long unsigned vmem_rss;
1312   long long unsigned stack_size;
1313
1314   ssize_t status;
1315
1316   snprintf(filename, sizeof(filename), "/proc/%li/stat", pid);
1317
1318   status = read_file_contents(filename, buffer, sizeof(buffer) - 1);
1319   if (status <= 0)
1320     return -1;
1321   buffer_len = (size_t)status;
1322   buffer[buffer_len] = 0;
1323
1324   /* The name of the process is enclosed in parens. Since the name can
1325    * contain parens itself, spaces, numbers and pretty much everything
1326    * else, use these to determine the process name. We don't use
1327    * strchr(3) and strrchr(3) to avoid pointer arithmetic which would
1328    * otherwise be required to determine name_len. */
1329   name_start_pos = 0;
1330   while (name_start_pos < buffer_len && buffer[name_start_pos] != '(')
1331     name_start_pos++;
1332
1333   name_end_pos = buffer_len;
1334   while (name_end_pos > 0 && buffer[name_end_pos] != ')')
1335     name_end_pos--;
1336
1337   /* Either '(' or ')' is not found or they are in the wrong order.
1338    * Anyway, something weird that shouldn't happen ever. */
1339   if (name_start_pos >= name_end_pos) {
1340     ERROR("processes plugin: name_start_pos = %" PRIsz
1341           " >= name_end_pos = %" PRIsz,
1342           name_start_pos, name_end_pos);
1343     return -1;
1344   }
1345
1346   name_len = (name_end_pos - name_start_pos) - 1;
1347   if (name_len >= sizeof(ps->name))
1348     name_len = sizeof(ps->name) - 1;
1349
1350   sstrncpy(ps->name, &buffer[name_start_pos + 1], name_len + 1);
1351
1352   if ((buffer_len - name_end_pos) < 2)
1353     return -1;
1354   buffer_ptr = &buffer[name_end_pos + 2];
1355
1356   fields_len = strsplit(buffer_ptr, fields, STATIC_ARRAY_SIZE(fields));
1357   if (fields_len < 22) {
1358     DEBUG("processes plugin: ps_read_process (pid = %li):"
1359           " `%s' has only %i fields..",
1360           pid, filename, fields_len);
1361     return -1;
1362   }
1363
1364   *state = fields[0][0];
1365
1366   if (*state == 'Z') {
1367     ps->num_lwp = 0;
1368     ps->num_proc = 0;
1369   } else {
1370     ps->num_lwp = strtoul(fields[17], /* endptr = */ NULL, /* base = */ 10);
1371     if ((ps_read_status(pid, ps)) != 0) {
1372       /* No VMem data */
1373       ps->vmem_data = -1;
1374       ps->vmem_code = -1;
1375       DEBUG("ps_read_process: did not get vmem data for pid %li", pid);
1376     }
1377     if (ps->num_lwp == 0)
1378       ps->num_lwp = 1;
1379     ps->num_proc = 1;
1380   }
1381
1382   /* Leave the rest at zero if this is only a zombi */
1383   if (ps->num_proc == 0) {
1384     DEBUG("processes plugin: This is only a zombie: pid = %li; "
1385           "name = %s;",
1386           pid, ps->name);
1387     return 0;
1388   }
1389
1390   cpu_user_counter = atoll(fields[11]);
1391   cpu_system_counter = atoll(fields[12]);
1392   vmem_size = atoll(fields[20]);
1393   vmem_rss = atoll(fields[21]);
1394   ps->vmem_minflt_counter = atol(fields[7]);
1395   ps->vmem_majflt_counter = atol(fields[9]);
1396
1397   {
1398     unsigned long long stack_start = atoll(fields[25]);
1399     unsigned long long stack_ptr = atoll(fields[26]);
1400
1401     stack_size = (stack_start > stack_ptr) ? stack_start - stack_ptr
1402                                            : stack_ptr - stack_start;
1403   }
1404
1405   /* Convert jiffies to useconds */
1406   cpu_user_counter = cpu_user_counter * 1000000 / CONFIG_HZ;
1407   cpu_system_counter = cpu_system_counter * 1000000 / CONFIG_HZ;
1408   vmem_rss = vmem_rss * pagesize_g;
1409
1410   ps->cpu_user_counter = cpu_user_counter;
1411   ps->cpu_system_counter = cpu_system_counter;
1412   ps->vmem_size = (unsigned long)vmem_size;
1413   ps->vmem_rss = (unsigned long)vmem_rss;
1414   ps->stack_size = (unsigned long)stack_size;
1415
1416   /* no data by default. May be filled by ps_fill_details () */
1417   ps->io_rchar = -1;
1418   ps->io_wchar = -1;
1419   ps->io_syscr = -1;
1420   ps->io_syscw = -1;
1421   ps->io_diskr = -1;
1422   ps->io_diskw = -1;
1423
1424   ps->cswitch_vol = -1;
1425   ps->cswitch_invol = -1;
1426
1427   /* success */
1428   return 0;
1429 } /* int ps_read_process (...) */
1430
1431 static char *ps_get_cmdline(long pid, char *name, char *buf, size_t buf_len) {
1432   char *buf_ptr;
1433   size_t len;
1434
1435   char file[PATH_MAX];
1436   int fd;
1437
1438   size_t n;
1439
1440   if ((pid < 1) || (NULL == buf) || (buf_len < 2))
1441     return NULL;
1442
1443   snprintf(file, sizeof(file), "/proc/%li/cmdline", pid);
1444
1445   errno = 0;
1446   fd = open(file, O_RDONLY);
1447   if (fd < 0) {
1448     /* ENOENT means the process exited while we were handling it.
1449      * Don't complain about this, it only fills the logs. */
1450     if (errno != ENOENT)
1451       WARNING("processes plugin: Failed to open `%s': %s.", file, STRERRNO);
1452     return NULL;
1453   }
1454
1455   buf_ptr = buf;
1456   len = buf_len;
1457
1458   n = 0;
1459
1460   while (42) {
1461     ssize_t status;
1462
1463     status = read(fd, (void *)buf_ptr, len);
1464
1465     if (status < 0) {
1466
1467       if ((EAGAIN == errno) || (EINTR == errno))
1468         continue;
1469
1470       WARNING("processes plugin: Failed to read from `%s': %s.", file,
1471               STRERRNO);
1472       close(fd);
1473       return NULL;
1474     }
1475
1476     n += status;
1477
1478     if (status == 0)
1479       break;
1480
1481     buf_ptr += status;
1482     len -= status;
1483
1484     if (len == 0)
1485       break;
1486   }
1487
1488   close(fd);
1489
1490   if (0 == n) {
1491     /* cmdline not available; e.g. kernel thread, zombie */
1492     if (NULL == name)
1493       return NULL;
1494
1495     snprintf(buf, buf_len, "[%s]", name);
1496     return buf;
1497   }
1498
1499   assert(n <= buf_len);
1500
1501   if (n == buf_len)
1502     --n;
1503   buf[n] = '\0';
1504
1505   --n;
1506   /* remove trailing whitespace */
1507   while ((n > 0) && (isspace(buf[n]) || ('\0' == buf[n]))) {
1508     buf[n] = '\0';
1509     --n;
1510   }
1511
1512   /* arguments are separated by '\0' in /proc/<pid>/cmdline */
1513   while (n > 0) {
1514     if ('\0' == buf[n])
1515       buf[n] = ' ';
1516     --n;
1517   }
1518   return buf;
1519 } /* char *ps_get_cmdline (...) */
1520
1521 static int read_fork_rate(void) {
1522   FILE *proc_stat;
1523   char buffer[1024];
1524   value_t value;
1525   bool value_valid = 0;
1526
1527   proc_stat = fopen("/proc/stat", "r");
1528   if (proc_stat == NULL) {
1529     ERROR("processes plugin: fopen (/proc/stat) failed: %s", STRERRNO);
1530     return -1;
1531   }
1532
1533   while (fgets(buffer, sizeof(buffer), proc_stat) != NULL) {
1534     int status;
1535     char *fields[3];
1536     int fields_num;
1537
1538     fields_num = strsplit(buffer, fields, STATIC_ARRAY_SIZE(fields));
1539     if (fields_num != 2)
1540       continue;
1541
1542     if (strcmp("processes", fields[0]) != 0)
1543       continue;
1544
1545     status = parse_value(fields[1], &value, DS_TYPE_DERIVE);
1546     if (status == 0)
1547       value_valid = 1;
1548
1549     break;
1550   }
1551   fclose(proc_stat);
1552
1553   if (!value_valid)
1554     return -1;
1555
1556   ps_submit_fork_rate(value.derive);
1557   return 0;
1558 }
1559 #endif /*KERNEL_LINUX */
1560
1561 #if KERNEL_SOLARIS
1562 static char *ps_get_cmdline(long pid,
1563                             char *name __attribute__((unused)), /* {{{ */
1564                             char *buffer, size_t buffer_size) {
1565   char path[PATH_MAX];
1566   psinfo_t info;
1567   ssize_t status;
1568
1569   snprintf(path, sizeof(path), "/proc/%li/psinfo", pid);
1570
1571   status = read_file_contents(path, (void *)&info, sizeof(info));
1572   if ((status < 0) || (((size_t)status) != sizeof(info))) {
1573     ERROR("processes plugin: Unexpected return value "
1574           "while reading \"%s\": "
1575           "Returned %zd but expected %" PRIsz ".",
1576           path, status, buffer_size);
1577     return NULL;
1578   }
1579
1580   info.pr_psargs[sizeof(info.pr_psargs) - 1] = 0;
1581   sstrncpy(buffer, info.pr_psargs, buffer_size);
1582
1583   return buffer;
1584 } /* }}} int ps_get_cmdline */
1585
1586 /*
1587  * Reads process information on the Solaris OS. The information comes mainly
1588  * from
1589  * /proc/PID/status, /proc/PID/psinfo and /proc/PID/usage
1590  * The values for input and ouput chars are calculated "by hand"
1591  * Added a few "solaris" specific process states as well
1592  */
1593 static int ps_read_process(long pid, process_entry_t *ps, char *state) {
1594   char filename[64];
1595   char f_psinfo[64], f_usage[64];
1596   char *buffer;
1597
1598   pstatus_t *myStatus;
1599   psinfo_t *myInfo;
1600   prusage_t *myUsage;
1601
1602   snprintf(filename, sizeof(filename), "/proc/%li/status", pid);
1603   snprintf(f_psinfo, sizeof(f_psinfo), "/proc/%li/psinfo", pid);
1604   snprintf(f_usage, sizeof(f_usage), "/proc/%li/usage", pid);
1605
1606   buffer = calloc(1, sizeof(pstatus_t));
1607   read_file_contents(filename, buffer, sizeof(pstatus_t));
1608   myStatus = (pstatus_t *)buffer;
1609
1610   buffer = calloc(1, sizeof(psinfo_t));
1611   read_file_contents(f_psinfo, buffer, sizeof(psinfo_t));
1612   myInfo = (psinfo_t *)buffer;
1613
1614   buffer = calloc(1, sizeof(prusage_t));
1615   read_file_contents(f_usage, buffer, sizeof(prusage_t));
1616   myUsage = (prusage_t *)buffer;
1617
1618   sstrncpy(ps->name, myInfo->pr_fname, sizeof(myInfo->pr_fname));
1619   ps->num_lwp = myStatus->pr_nlwp;
1620   if (myInfo->pr_wstat != 0) {
1621     ps->num_proc = 0;
1622     ps->num_lwp = 0;
1623     *state = (char)'Z';
1624
1625     sfree(myStatus);
1626     sfree(myInfo);
1627     sfree(myUsage);
1628     return 0;
1629   } else {
1630     ps->num_proc = 1;
1631     ps->num_lwp = myInfo->pr_nlwp;
1632   }
1633
1634   /*
1635    * Convert system time and user time from nanoseconds to microseconds
1636    * for compatibility with the linux module
1637    */
1638   ps->cpu_system_counter = myStatus->pr_stime.tv_nsec / 1000;
1639   ps->cpu_user_counter = myStatus->pr_utime.tv_nsec / 1000;
1640
1641   /*
1642    * Convert rssize from KB to bytes to be consistent w/ the linux module
1643    */
1644   ps->vmem_rss = myInfo->pr_rssize * 1024;
1645   ps->vmem_size = myInfo->pr_size * 1024;
1646   ps->vmem_minflt_counter = myUsage->pr_minf;
1647   ps->vmem_majflt_counter = myUsage->pr_majf;
1648
1649   /*
1650    * TODO: Data and code segment calculations for Solaris
1651    */
1652
1653   ps->vmem_data = -1;
1654   ps->vmem_code = -1;
1655   ps->stack_size = myStatus->pr_stksize;
1656
1657   /*
1658    * TODO: File descriptor count for Solaris
1659    */
1660   ps->num_fd = 0;
1661
1662   /* Number of memory mappings */
1663   ps->num_maps = 0;
1664
1665   /*
1666    * Calculating input/ouput chars
1667    * Formula used is total chars / total blocks => chars/block
1668    * then convert input/output blocks to chars
1669    */
1670   ulong_t tot_chars = myUsage->pr_ioch;
1671   ulong_t tot_blocks = myUsage->pr_inblk + myUsage->pr_oublk;
1672   ulong_t chars_per_block = 1;
1673   if (tot_blocks != 0)
1674     chars_per_block = tot_chars / tot_blocks;
1675   ps->io_rchar = myUsage->pr_inblk * chars_per_block;
1676   ps->io_wchar = myUsage->pr_oublk * chars_per_block;
1677   ps->io_syscr = myUsage->pr_sysc;
1678   ps->io_syscw = myUsage->pr_sysc;
1679   ps->io_diskr = -1;
1680   ps->io_diskw = -1;
1681
1682   /*
1683    * TODO: context switch counters for Solaris
1684 */
1685   ps->cswitch_vol = -1;
1686   ps->cswitch_invol = -1;
1687
1688   /*
1689    * TODO: Find way of setting BLOCKED and PAGING status
1690    */
1691
1692   *state = (char)'R';
1693   if (myStatus->pr_flags & PR_ASLEEP)
1694     *state = (char)'S';
1695   else if (myStatus->pr_flags & PR_STOPPED)
1696     *state = (char)'T';
1697   else if (myStatus->pr_flags & PR_DETACH)
1698     *state = (char)'E';
1699   else if (myStatus->pr_flags & PR_DAEMON)
1700     *state = (char)'A';
1701   else if (myStatus->pr_flags & PR_ISSYS)
1702     *state = (char)'Y';
1703   else if (myStatus->pr_flags & PR_ORPHAN)
1704     *state = (char)'O';
1705
1706   sfree(myStatus);
1707   sfree(myInfo);
1708   sfree(myUsage);
1709
1710   return 0;
1711 }
1712
1713 /*
1714  * Reads the number of threads created since the last reboot. On Solaris these
1715  * are retrieved from kstat (module cpu, name sys, class misc, stat nthreads).
1716  * The result is the sum for all the threads created on each cpu
1717  */
1718 static int read_fork_rate(void) {
1719   extern kstat_ctl_t *kc;
1720   derive_t result = 0;
1721
1722   if (kc == NULL)
1723     return -1;
1724
1725   for (kstat_t *ksp_chain = kc->kc_chain; ksp_chain != NULL;
1726        ksp_chain = ksp_chain->ks_next) {
1727     if ((strcmp(ksp_chain->ks_module, "cpu") == 0) &&
1728         (strcmp(ksp_chain->ks_name, "sys") == 0) &&
1729         (strcmp(ksp_chain->ks_class, "misc") == 0)) {
1730       long long tmp;
1731
1732       kstat_read(kc, ksp_chain, NULL);
1733
1734       tmp = get_kstat_value(ksp_chain, "nthreads");
1735       if (tmp != -1LL)
1736         result += tmp;
1737     }
1738   }
1739
1740   ps_submit_fork_rate(result);
1741   return 0;
1742 }
1743 #endif /* KERNEL_SOLARIS */
1744
1745 #if HAVE_THREAD_INFO
1746 static int mach_get_task_name(task_t t, int *pid, char *name,
1747                               size_t name_max_len) {
1748   int mib[4];
1749
1750   struct kinfo_proc kp;
1751   size_t kp_size;
1752
1753   mib[0] = CTL_KERN;
1754   mib[1] = KERN_PROC;
1755   mib[2] = KERN_PROC_PID;
1756
1757   if (pid_for_task(t, pid) != KERN_SUCCESS)
1758     return -1;
1759   mib[3] = *pid;
1760
1761   kp_size = sizeof(kp);
1762   if (sysctl(mib, 4, &kp, &kp_size, NULL, 0) != 0)
1763     return -1;
1764
1765   if (name_max_len > (MAXCOMLEN + 1))
1766     name_max_len = MAXCOMLEN + 1;
1767
1768   strncpy(name, kp.kp_proc.p_comm, name_max_len - 1);
1769   name[name_max_len - 1] = '\0';
1770
1771   DEBUG("pid = %i; name = %s;", *pid, name);
1772
1773   /* We don't do the special handling for `p_comm == "LaunchCFMApp"' as
1774    * `top' does it, because it is a lot of work and only used when
1775    * debugging. -octo */
1776
1777   return 0;
1778 }
1779 #endif /* HAVE_THREAD_INFO */
1780 /* end of additional functions for KERNEL_LINUX/HAVE_THREAD_INFO */
1781
1782 /* do actual readings from kernel */
1783 static int ps_read(void) {
1784 #if HAVE_THREAD_INFO
1785   kern_return_t status;
1786
1787   processor_set_t port_pset_priv;
1788
1789   task_array_t task_list;
1790   mach_msg_type_number_t task_list_len;
1791
1792   int task_pid;
1793   char task_name[MAXCOMLEN + 1];
1794
1795   thread_act_array_t thread_list;
1796   mach_msg_type_number_t thread_list_len;
1797   thread_basic_info_data_t thread_data;
1798   mach_msg_type_number_t thread_data_len;
1799
1800   int running = 0;
1801   int sleeping = 0;
1802   int zombies = 0;
1803   int stopped = 0;
1804   int blocked = 0;
1805
1806   procstat_t *ps;
1807   process_entry_t pse;
1808
1809   ps_list_reset();
1810
1811   /*
1812    * The Mach-concept is a little different from the traditional UNIX
1813    * concept: All the work is done in threads. Threads are contained in
1814    * `tasks'. Therefore, `task status' doesn't make much sense, since
1815    * it's actually a `thread status'.
1816    * Tasks are assigned to sets of processors, so that's where you go to
1817    * get a list.
1818    */
1819   for (mach_msg_type_number_t pset = 0; pset < pset_list_len; pset++) {
1820     if ((status = host_processor_set_priv(port_host_self, pset_list[pset],
1821                                           &port_pset_priv)) != KERN_SUCCESS) {
1822       ERROR("host_processor_set_priv failed: %s\n", mach_error_string(status));
1823       continue;
1824     }
1825
1826     if ((status = processor_set_tasks(port_pset_priv, &task_list,
1827                                       &task_list_len)) != KERN_SUCCESS) {
1828       ERROR("processor_set_tasks failed: %s\n", mach_error_string(status));
1829       mach_port_deallocate(port_task_self, port_pset_priv);
1830       continue;
1831     }
1832
1833     for (mach_msg_type_number_t task = 0; task < task_list_len; task++) {
1834       ps = NULL;
1835       if (mach_get_task_name(task_list[task], &task_pid, task_name,
1836                              PROCSTAT_NAME_LEN) == 0) {
1837         /* search for at least one match */
1838         for (ps = list_head_g; ps != NULL; ps = ps->next)
1839           /* FIXME: cmdline should be here instead of NULL */
1840           if (ps_list_match(task_name, NULL, ps) == 1)
1841             break;
1842       }
1843
1844       /* Collect more detailed statistics for this process */
1845       if (ps != NULL) {
1846         task_basic_info_data_t task_basic_info;
1847         mach_msg_type_number_t task_basic_info_len;
1848         task_events_info_data_t task_events_info;
1849         mach_msg_type_number_t task_events_info_len;
1850         task_absolutetime_info_data_t task_absolutetime_info;
1851         mach_msg_type_number_t task_absolutetime_info_len;
1852
1853         memset(&pse, '\0', sizeof(pse));
1854         pse.id = task_pid;
1855
1856         task_basic_info_len = TASK_BASIC_INFO_COUNT;
1857         status = task_info(task_list[task], TASK_BASIC_INFO,
1858                            (task_info_t)&task_basic_info, &task_basic_info_len);
1859         if (status != KERN_SUCCESS) {
1860           ERROR("task_info failed: %s", mach_error_string(status));
1861           continue; /* with next thread_list */
1862         }
1863
1864         task_events_info_len = TASK_EVENTS_INFO_COUNT;
1865         status =
1866             task_info(task_list[task], TASK_EVENTS_INFO,
1867                       (task_info_t)&task_events_info, &task_events_info_len);
1868         if (status != KERN_SUCCESS) {
1869           ERROR("task_info failed: %s", mach_error_string(status));
1870           continue; /* with next thread_list */
1871         }
1872
1873         task_absolutetime_info_len = TASK_ABSOLUTETIME_INFO_COUNT;
1874         status = task_info(task_list[task], TASK_ABSOLUTETIME_INFO,
1875                            (task_info_t)&task_absolutetime_info,
1876                            &task_absolutetime_info_len);
1877         if (status != KERN_SUCCESS) {
1878           ERROR("task_info failed: %s", mach_error_string(status));
1879           continue; /* with next thread_list */
1880         }
1881
1882         pse.num_proc++;
1883         pse.vmem_size = task_basic_info.virtual_size;
1884         pse.vmem_rss = task_basic_info.resident_size;
1885         /* Does not seem to be easily exposed */
1886         pse.vmem_data = 0;
1887         pse.vmem_code = 0;
1888
1889         pse.io_rchar = -1;
1890         pse.io_wchar = -1;
1891         pse.io_syscr = -1;
1892         pse.io_syscw = -1;
1893         pse.io_diskr = -1;
1894         pse.io_diskw = -1;
1895
1896         /* File descriptor count not implemented */
1897         pse.num_fd = 0;
1898
1899         /* Number of memory mappings */
1900         pse.num_maps = 0;
1901
1902         pse.vmem_minflt_counter = task_events_info.cow_faults;
1903         pse.vmem_majflt_counter = task_events_info.faults;
1904
1905         pse.cpu_user_counter = task_absolutetime_info.total_user;
1906         pse.cpu_system_counter = task_absolutetime_info.total_system;
1907
1908         /* context switch counters not implemented */
1909         pse.cswitch_vol = -1;
1910         pse.cswitch_invol = -1;
1911       }
1912
1913       status = task_threads(task_list[task], &thread_list, &thread_list_len);
1914       if (status != KERN_SUCCESS) {
1915         /* Apple's `top' treats this case a zombie. It
1916          * makes sense to some extend: A `zombie'
1917          * thread is nonsense, since the task/process
1918          * is dead. */
1919         zombies++;
1920         DEBUG("task_threads failed: %s", mach_error_string(status));
1921         if (task_list[task] != port_task_self)
1922           mach_port_deallocate(port_task_self, task_list[task]);
1923         continue; /* with next task_list */
1924       }
1925
1926       for (mach_msg_type_number_t thread = 0; thread < thread_list_len;
1927            thread++) {
1928         thread_data_len = THREAD_BASIC_INFO_COUNT;
1929         status = thread_info(thread_list[thread], THREAD_BASIC_INFO,
1930                              (thread_info_t)&thread_data, &thread_data_len);
1931         if (status != KERN_SUCCESS) {
1932           ERROR("thread_info failed: %s", mach_error_string(status));
1933           if (task_list[task] != port_task_self)
1934             mach_port_deallocate(port_task_self, thread_list[thread]);
1935           continue; /* with next thread_list */
1936         }
1937
1938         if (ps != NULL)
1939           pse.num_lwp++;
1940
1941         switch (thread_data.run_state) {
1942         case TH_STATE_RUNNING:
1943           running++;
1944           break;
1945         case TH_STATE_STOPPED:
1946         /* What exactly is `halted'? */
1947         case TH_STATE_HALTED:
1948           stopped++;
1949           break;
1950         case TH_STATE_WAITING:
1951           sleeping++;
1952           break;
1953         case TH_STATE_UNINTERRUPTIBLE:
1954           blocked++;
1955           break;
1956         /* There is no `zombie' case here,
1957          * since there are no zombie-threads.
1958          * There's only zombie tasks, which are
1959          * handled above. */
1960         default:
1961           WARNING("Unknown thread status: %i", thread_data.run_state);
1962           break;
1963         } /* switch (thread_data.run_state) */
1964
1965         if (task_list[task] != port_task_self) {
1966           status = mach_port_deallocate(port_task_self, thread_list[thread]);
1967           if (status != KERN_SUCCESS)
1968             ERROR("mach_port_deallocate failed: %s", mach_error_string(status));
1969         }
1970       } /* for (thread_list) */
1971
1972       if ((status = vm_deallocate(port_task_self, (vm_address_t)thread_list,
1973                                   thread_list_len * sizeof(thread_act_t))) !=
1974           KERN_SUCCESS) {
1975         ERROR("vm_deallocate failed: %s", mach_error_string(status));
1976       }
1977       thread_list = NULL;
1978       thread_list_len = 0;
1979
1980       /* Only deallocate the task port, if it isn't our own.
1981        * Don't know what would happen in that case, but this
1982        * is what Apple's top does.. ;) */
1983       if (task_list[task] != port_task_self) {
1984         status = mach_port_deallocate(port_task_self, task_list[task]);
1985         if (status != KERN_SUCCESS)
1986           ERROR("mach_port_deallocate failed: %s", mach_error_string(status));
1987       }
1988
1989       if (ps != NULL)
1990         /* FIXME: cmdline should be here instead of NULL */
1991         ps_list_add(task_name, NULL, &pse);
1992     } /* for (task_list) */
1993
1994     if ((status = vm_deallocate(port_task_self, (vm_address_t)task_list,
1995                                 task_list_len * sizeof(task_t))) !=
1996         KERN_SUCCESS) {
1997       ERROR("vm_deallocate failed: %s", mach_error_string(status));
1998     }
1999     task_list = NULL;
2000     task_list_len = 0;
2001
2002     if ((status = mach_port_deallocate(port_task_self, port_pset_priv)) !=
2003         KERN_SUCCESS) {
2004       ERROR("mach_port_deallocate failed: %s", mach_error_string(status));
2005     }
2006   } /* for (pset_list) */
2007
2008   ps_submit_state("running", running);
2009   ps_submit_state("sleeping", sleeping);
2010   ps_submit_state("zombies", zombies);
2011   ps_submit_state("stopped", stopped);
2012   ps_submit_state("blocked", blocked);
2013
2014   for (ps = list_head_g; ps != NULL; ps = ps->next)
2015     ps_submit_proc_list(ps);
2016 /* #endif HAVE_THREAD_INFO */
2017
2018 #elif KERNEL_LINUX
2019   int running = 0;
2020   int sleeping = 0;
2021   int zombies = 0;
2022   int stopped = 0;
2023   int paging = 0;
2024   int blocked = 0;
2025
2026   struct dirent *ent;
2027   DIR *proc;
2028   long pid;
2029
2030   char cmdline[CMDLINE_BUFFER_SIZE];
2031
2032   int status;
2033   process_entry_t pse;
2034   char state;
2035
2036   running = sleeping = zombies = stopped = paging = blocked = 0;
2037   ps_list_reset();
2038
2039   if ((proc = opendir("/proc")) == NULL) {
2040     ERROR("Cannot open `/proc': %s", STRERRNO);
2041     return -1;
2042   }
2043
2044   while ((ent = readdir(proc)) != NULL) {
2045     if (!isdigit(ent->d_name[0]))
2046       continue;
2047
2048     if ((pid = atol(ent->d_name)) < 1)
2049       continue;
2050
2051     memset(&pse, 0, sizeof(pse));
2052     pse.id = pid;
2053
2054     status = ps_read_process(pid, &pse, &state);
2055     if (status != 0) {
2056       DEBUG("ps_read_process failed: %i", status);
2057       continue;
2058     }
2059
2060     switch (state) {
2061     case 'R':
2062       running++;
2063       break;
2064     case 'S':
2065       sleeping++;
2066       break;
2067     case 'D':
2068       blocked++;
2069       break;
2070     case 'Z':
2071       zombies++;
2072       break;
2073     case 'T':
2074       stopped++;
2075       break;
2076     case 'W':
2077       paging++;
2078       break;
2079     }
2080
2081     ps_list_add(pse.name,
2082                 ps_get_cmdline(pid, pse.name, cmdline, sizeof(cmdline)), &pse);
2083   }
2084
2085   closedir(proc);
2086
2087   ps_submit_state("running", running);
2088   ps_submit_state("sleeping", sleeping);
2089   ps_submit_state("zombies", zombies);
2090   ps_submit_state("stopped", stopped);
2091   ps_submit_state("paging", paging);
2092   ps_submit_state("blocked", blocked);
2093
2094   for (procstat_t *ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
2095     ps_submit_proc_list(ps_ptr);
2096
2097   read_fork_rate();
2098 /* #endif KERNEL_LINUX */
2099
2100 #elif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD
2101   int running = 0;
2102   int sleeping = 0;
2103   int zombies = 0;
2104   int stopped = 0;
2105   int blocked = 0;
2106   int idle = 0;
2107   int wait = 0;
2108
2109   kvm_t *kd;
2110   char errbuf[_POSIX2_LINE_MAX];
2111   struct kinfo_proc *procs; /* array of processes */
2112   struct kinfo_proc *proc_ptr = NULL;
2113   int count; /* returns number of processes */
2114
2115   process_entry_t pse;
2116
2117   ps_list_reset();
2118
2119   /* Open the kvm interface, get a descriptor */
2120   kd = kvm_openfiles(NULL, "/dev/null", NULL, 0, errbuf);
2121   if (kd == NULL) {
2122     ERROR("processes plugin: Cannot open kvm interface: %s", errbuf);
2123     return 0;
2124   }
2125
2126   /* Get the list of processes. */
2127   procs = kvm_getprocs(kd, KERN_PROC_ALL, 0, &count);
2128   if (procs == NULL) {
2129     ERROR("processes plugin: Cannot get kvm processes list: %s",
2130           kvm_geterr(kd));
2131     kvm_close(kd);
2132     return 0;
2133   }
2134
2135   /* Iterate through the processes in kinfo_proc */
2136   for (int i = 0; i < count; i++) {
2137     /* Create only one process list entry per _process_, i.e.
2138      * filter out threads (duplicate PID entries). */
2139     if ((proc_ptr == NULL) || (proc_ptr->ki_pid != procs[i].ki_pid)) {
2140       char cmdline[CMDLINE_BUFFER_SIZE] = "";
2141       bool have_cmdline = 0;
2142
2143       proc_ptr = &(procs[i]);
2144       /* Don't probe system processes and processes without arguments */
2145       if (((procs[i].ki_flag & P_SYSTEM) == 0) && (procs[i].ki_args != NULL)) {
2146         char **argv;
2147         int argc;
2148         int status;
2149
2150         /* retrieve the arguments */
2151         argv = kvm_getargv(kd, proc_ptr, /* nchr = */ 0);
2152         argc = 0;
2153         if ((argv != NULL) && (argv[0] != NULL)) {
2154           while (argv[argc] != NULL)
2155             argc++;
2156
2157           status = strjoin(cmdline, sizeof(cmdline), argv, argc, " ");
2158           if (status < 0)
2159             WARNING("processes plugin: Command line did not fit into buffer.");
2160           else
2161             have_cmdline = 1;
2162         }
2163       } /* if (process has argument list) */
2164
2165       memset(&pse, 0, sizeof(pse));
2166       pse.id = procs[i].ki_pid;
2167
2168       pse.num_proc = 1;
2169       pse.num_lwp = procs[i].ki_numthreads;
2170
2171       pse.vmem_size = procs[i].ki_size;
2172       pse.vmem_rss = procs[i].ki_rssize * pagesize;
2173       pse.vmem_data = procs[i].ki_dsize * pagesize;
2174       pse.vmem_code = procs[i].ki_tsize * pagesize;
2175       pse.stack_size = procs[i].ki_ssize * pagesize;
2176       pse.vmem_minflt_counter = procs[i].ki_rusage.ru_minflt;
2177       pse.vmem_majflt_counter = procs[i].ki_rusage.ru_majflt;
2178
2179       pse.cpu_user_counter = 0;
2180       pse.cpu_system_counter = 0;
2181       /*
2182        * The u-area might be swapped out, and we can't get
2183        * at it because we have a crashdump and no swap.
2184        * If it's here fill in these fields, otherwise, just
2185        * leave them 0.
2186        */
2187       if (procs[i].ki_flag & P_INMEM) {
2188         pse.cpu_user_counter = procs[i].ki_rusage.ru_utime.tv_usec +
2189                                (1000000lu * procs[i].ki_rusage.ru_utime.tv_sec);
2190         pse.cpu_system_counter =
2191             procs[i].ki_rusage.ru_stime.tv_usec +
2192             (1000000lu * procs[i].ki_rusage.ru_stime.tv_sec);
2193       }
2194
2195       /* no I/O data */
2196       pse.io_rchar = -1;
2197       pse.io_wchar = -1;
2198       pse.io_syscr = -1;
2199       pse.io_syscw = -1;
2200       pse.io_diskr = -1;
2201       pse.io_diskw = -1;
2202
2203       /* file descriptor count not implemented */
2204       pse.num_fd = 0;
2205
2206       /* Number of memory mappings */
2207       pse.num_maps = 0;
2208
2209       /* context switch counters not implemented */
2210       pse.cswitch_vol = -1;
2211       pse.cswitch_invol = -1;
2212
2213       ps_list_add(procs[i].ki_comm, have_cmdline ? cmdline : NULL, &pse);
2214
2215       switch (procs[i].ki_stat) {
2216       case SSTOP:
2217         stopped++;
2218         break;
2219       case SSLEEP:
2220         sleeping++;
2221         break;
2222       case SRUN:
2223         running++;
2224         break;
2225       case SIDL:
2226         idle++;
2227         break;
2228       case SWAIT:
2229         wait++;
2230         break;
2231       case SLOCK:
2232         blocked++;
2233         break;
2234       case SZOMB:
2235         zombies++;
2236         break;
2237       }
2238     } /* if ((proc_ptr == NULL) || (proc_ptr->ki_pid != procs[i].ki_pid)) */
2239   }
2240
2241   kvm_close(kd);
2242
2243   ps_submit_state("running", running);
2244   ps_submit_state("sleeping", sleeping);
2245   ps_submit_state("zombies", zombies);
2246   ps_submit_state("stopped", stopped);
2247   ps_submit_state("blocked", blocked);
2248   ps_submit_state("idle", idle);
2249   ps_submit_state("wait", wait);
2250
2251   for (procstat_t *ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
2252     ps_submit_proc_list(ps_ptr);
2253 /* #endif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_FREEBSD */
2254
2255 #elif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_OPENBSD
2256   int running = 0;
2257   int sleeping = 0;
2258   int zombies = 0;
2259   int stopped = 0;
2260   int onproc = 0;
2261   int idle = 0;
2262   int dead = 0;
2263
2264   kvm_t *kd;
2265   char errbuf[1024];
2266   struct kinfo_proc *procs; /* array of processes */
2267   struct kinfo_proc *proc_ptr = NULL;
2268   int count; /* returns number of processes */
2269
2270   process_entry_t pse;
2271
2272   ps_list_reset();
2273
2274   /* Open the kvm interface, get a descriptor */
2275   kd = kvm_openfiles(NULL, NULL, NULL, KVM_NO_FILES, errbuf);
2276   if (kd == NULL) {
2277     ERROR("processes plugin: Cannot open kvm interface: %s", errbuf);
2278     return 0;
2279   }
2280
2281   /* Get the list of processes. */
2282   procs = kvm_getprocs(kd, KERN_PROC_ALL, 0, sizeof(struct kinfo_proc), &count);
2283   if (procs == NULL) {
2284     ERROR("processes plugin: Cannot get kvm processes list: %s",
2285           kvm_geterr(kd));
2286     kvm_close(kd);
2287     return 0;
2288   }
2289
2290   /* Iterate through the processes in kinfo_proc */
2291   for (int i = 0; i < count; i++) {
2292     /* Create only one process list entry per _process_, i.e.
2293      * filter out threads (duplicate PID entries). */
2294     if ((proc_ptr == NULL) || (proc_ptr->p_pid != procs[i].p_pid)) {
2295       char cmdline[CMDLINE_BUFFER_SIZE] = "";
2296       bool have_cmdline = 0;
2297
2298       proc_ptr = &(procs[i]);
2299       /* Don't probe zombie processes  */
2300       if (!P_ZOMBIE(proc_ptr)) {
2301         char **argv;
2302         int argc;
2303         int status;
2304
2305         /* retrieve the arguments */
2306         argv = kvm_getargv(kd, proc_ptr, /* nchr = */ 0);
2307         argc = 0;
2308         if ((argv != NULL) && (argv[0] != NULL)) {
2309           while (argv[argc] != NULL)
2310             argc++;
2311
2312           status = strjoin(cmdline, sizeof(cmdline), argv, argc, " ");
2313           if (status < 0)
2314             WARNING("processes plugin: Command line did not fit into buffer.");
2315           else
2316             have_cmdline = 1;
2317         }
2318       } /* if (process has argument list) */
2319
2320       memset(&pse, 0, sizeof(pse));
2321       pse.id = procs[i].p_pid;
2322
2323       pse.num_proc = 1;
2324       pse.num_lwp = 1; /* XXX: accumulate p_tid values for a single p_pid ? */
2325
2326       pse.vmem_rss = procs[i].p_vm_rssize * pagesize;
2327       pse.vmem_data = procs[i].p_vm_dsize * pagesize;
2328       pse.vmem_code = procs[i].p_vm_tsize * pagesize;
2329       pse.stack_size = procs[i].p_vm_ssize * pagesize;
2330       pse.vmem_size = pse.stack_size + pse.vmem_code + pse.vmem_data;
2331       pse.vmem_minflt_counter = procs[i].p_uru_minflt;
2332       pse.vmem_majflt_counter = procs[i].p_uru_majflt;
2333
2334       pse.cpu_user_counter =
2335           procs[i].p_uutime_usec + (1000000lu * procs[i].p_uutime_sec);
2336       pse.cpu_system_counter =
2337           procs[i].p_ustime_usec + (1000000lu * procs[i].p_ustime_sec);
2338
2339       /* no I/O data */
2340       pse.io_rchar = -1;
2341       pse.io_wchar = -1;
2342       pse.io_syscr = -1;
2343       pse.io_syscw = -1;
2344       pse.io_diskr = -1;
2345       pse.io_diskw = -1;
2346
2347       /* file descriptor count not implemented */
2348       pse.num_fd = 0;
2349
2350       /* Number of memory mappings */
2351       pse.num_maps = 0;
2352
2353       /* context switch counters not implemented */
2354       pse.cswitch_vol = -1;
2355       pse.cswitch_invol = -1;
2356
2357       ps_list_add(procs[i].p_comm, have_cmdline ? cmdline : NULL, &pse);
2358
2359       switch (procs[i].p_stat) {
2360       case SSTOP:
2361         stopped++;
2362         break;
2363       case SSLEEP:
2364         sleeping++;
2365         break;
2366       case SRUN:
2367         running++;
2368         break;
2369       case SIDL:
2370         idle++;
2371         break;
2372       case SONPROC:
2373         onproc++;
2374         break;
2375       case SDEAD:
2376         dead++;
2377         break;
2378       case SZOMB:
2379         zombies++;
2380         break;
2381       }
2382     } /* if ((proc_ptr == NULL) || (proc_ptr->p_pid != procs[i].p_pid)) */
2383   }
2384
2385   kvm_close(kd);
2386
2387   ps_submit_state("running", running);
2388   ps_submit_state("sleeping", sleeping);
2389   ps_submit_state("zombies", zombies);
2390   ps_submit_state("stopped", stopped);
2391   ps_submit_state("onproc", onproc);
2392   ps_submit_state("idle", idle);
2393   ps_submit_state("dead", dead);
2394
2395   for (procstat_t *ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
2396     ps_submit_proc_list(ps_ptr);
2397 /* #endif HAVE_LIBKVM_GETPROCS && HAVE_STRUCT_KINFO_PROC_OPENBSD */
2398
2399 #elif HAVE_PROCINFO_H
2400   /* AIX */
2401   int running = 0;
2402   int sleeping = 0;
2403   int zombies = 0;
2404   int stopped = 0;
2405   int paging = 0;
2406   int blocked = 0;
2407
2408   pid_t pindex = 0;
2409   int nprocs;
2410
2411   process_entry_t pse;
2412
2413   ps_list_reset();
2414   while ((nprocs = getprocs64(procentry, sizeof(struct procentry64),
2415                               /* fdsinfo = */ NULL, sizeof(struct fdsinfo64),
2416                               &pindex, MAXPROCENTRY)) > 0) {
2417     for (int i = 0; i < nprocs; i++) {
2418       tid64_t thindex;
2419       int nthreads;
2420       char arglist[MAXARGLN + 1];
2421       char *cargs;
2422       char *cmdline;
2423
2424       if (procentry[i].pi_state == SNONE)
2425         continue;
2426       /* if (procentry[i].pi_state == SZOMB)  FIXME */
2427
2428       cmdline = procentry[i].pi_comm;
2429       cargs = procentry[i].pi_comm;
2430       if (procentry[i].pi_flags & SKPROC) {
2431         if (procentry[i].pi_pid == 0)
2432           cmdline = "swapper";
2433         cargs = cmdline;
2434       } else {
2435         if (getargs(&procentry[i], sizeof(struct procentry64), arglist,
2436                     MAXARGLN) >= 0) {
2437           int n;
2438
2439           n = -1;
2440           while (++n < MAXARGLN) {
2441             if (arglist[n] == '\0') {
2442               if (arglist[n + 1] == '\0')
2443                 break;
2444               arglist[n] = ' ';
2445             }
2446           }
2447           cargs = arglist;
2448         }
2449       }
2450
2451       memset(&pse, 0, sizeof(pse));
2452
2453       pse.id = procentry[i].pi_pid;
2454       pse.num_lwp = procentry[i].pi_thcount;
2455       pse.num_proc = 1;
2456
2457       thindex = 0;
2458       while ((nthreads = getthrds64(procentry[i].pi_pid, thrdentry,
2459                                     sizeof(struct thrdentry64), &thindex,
2460                                     MAXTHRDENTRY)) > 0) {
2461         int j;
2462
2463         for (j = 0; j < nthreads; j++) {
2464           switch (thrdentry[j].ti_state) {
2465           /* case TSNONE: break; */
2466           case TSIDL:
2467             blocked++;
2468             break; /* FIXME is really blocked */
2469           case TSRUN:
2470             running++;
2471             break;
2472           case TSSLEEP:
2473             sleeping++;
2474             break;
2475           case TSSWAP:
2476             paging++;
2477             break;
2478           case TSSTOP:
2479             stopped++;
2480             break;
2481           case TSZOMB:
2482             zombies++;
2483             break;
2484           }
2485         }
2486         if (nthreads < MAXTHRDENTRY)
2487           break;
2488       }
2489
2490       /* tv_usec is nanosec ??? */
2491       pse.cpu_user_counter = procentry[i].pi_ru.ru_utime.tv_sec * 1000000 +
2492                              procentry[i].pi_ru.ru_utime.tv_usec / 1000;
2493
2494       /* tv_usec is nanosec ??? */
2495       pse.cpu_system_counter = procentry[i].pi_ru.ru_stime.tv_sec * 1000000 +
2496                                procentry[i].pi_ru.ru_stime.tv_usec / 1000;
2497
2498       pse.vmem_minflt_counter = procentry[i].pi_minflt;
2499       pse.vmem_majflt_counter = procentry[i].pi_majflt;
2500
2501       pse.vmem_size = procentry[i].pi_tsize + procentry[i].pi_dvm * pagesize;
2502       pse.vmem_rss = (procentry[i].pi_drss + procentry[i].pi_trss) * pagesize;
2503       /* Not supported/implemented */
2504       pse.vmem_data = 0;
2505       pse.vmem_code = 0;
2506       pse.stack_size = 0;
2507
2508       pse.io_rchar = -1;
2509       pse.io_wchar = -1;
2510       pse.io_syscr = -1;
2511       pse.io_syscw = -1;
2512       pse.io_diskr = -1;
2513       pse.io_diskw = -1;
2514
2515       pse.num_fd = 0;
2516       pse.num_maps = 0;
2517
2518       pse.cswitch_vol = -1;
2519       pse.cswitch_invol = -1;
2520
2521       ps_list_add(cmdline, cargs, &pse);
2522     } /* for (i = 0 .. nprocs) */
2523
2524     if (nprocs < MAXPROCENTRY)
2525       break;
2526   } /* while (getprocs64() > 0) */
2527   ps_submit_state("running", running);
2528   ps_submit_state("sleeping", sleeping);
2529   ps_submit_state("zombies", zombies);
2530   ps_submit_state("stopped", stopped);
2531   ps_submit_state("paging", paging);
2532   ps_submit_state("blocked", blocked);
2533
2534   for (procstat_t *ps = list_head_g; ps != NULL; ps = ps->next)
2535     ps_submit_proc_list(ps);
2536 /* #endif HAVE_PROCINFO_H */
2537
2538 #elif KERNEL_SOLARIS
2539   /*
2540    * The Solaris section adds a few more process states and removes some
2541    * process states compared to linux. Most notably there is no "PAGING"
2542    * and "BLOCKED" state for a process.  The rest is similar to the linux
2543    * code.
2544    */
2545   int running = 0;
2546   int sleeping = 0;
2547   int zombies = 0;
2548   int stopped = 0;
2549   int detached = 0;
2550   int daemon = 0;
2551   int system = 0;
2552   int orphan = 0;
2553
2554   struct dirent *ent;
2555   DIR *proc;
2556
2557   int status;
2558   char state;
2559
2560   char cmdline[PRARGSZ];
2561
2562   ps_list_reset();
2563
2564   proc = opendir("/proc");
2565   if (proc == NULL)
2566     return -1;
2567
2568   while ((ent = readdir(proc)) != NULL) {
2569     long pid;
2570     process_entry_t pse;
2571     char *endptr;
2572
2573     if (!isdigit((int)ent->d_name[0]))
2574       continue;
2575
2576     pid = strtol(ent->d_name, &endptr, 10);
2577     if (*endptr != 0) /* value didn't completely parse as a number */
2578       continue;
2579
2580     memset(&pse, 0, sizeof(pse));
2581     pse.id = pid;
2582
2583     status = ps_read_process(pid, &pse, &state);
2584     if (status != 0) {
2585       DEBUG("ps_read_process failed: %i", status);
2586       continue;
2587     }
2588
2589     switch (state) {
2590     case 'R':
2591       running++;
2592       break;
2593     case 'S':
2594       sleeping++;
2595       break;
2596     case 'E':
2597       detached++;
2598       break;
2599     case 'Z':
2600       zombies++;
2601       break;
2602     case 'T':
2603       stopped++;
2604       break;
2605     case 'A':
2606       daemon++;
2607       break;
2608     case 'Y':
2609       system++;
2610       break;
2611     case 'O':
2612       orphan++;
2613       break;
2614     }
2615
2616     ps_list_add(pse.name,
2617                 ps_get_cmdline(pid, pse.name, cmdline, sizeof(cmdline)), &pse);
2618   } /* while(readdir) */
2619   closedir(proc);
2620
2621   ps_submit_state("running", running);
2622   ps_submit_state("sleeping", sleeping);
2623   ps_submit_state("zombies", zombies);
2624   ps_submit_state("stopped", stopped);
2625   ps_submit_state("detached", detached);
2626   ps_submit_state("daemon", daemon);
2627   ps_submit_state("system", system);
2628   ps_submit_state("orphan", orphan);
2629
2630   for (procstat_t *ps_ptr = list_head_g; ps_ptr != NULL; ps_ptr = ps_ptr->next)
2631     ps_submit_proc_list(ps_ptr);
2632
2633   read_fork_rate();
2634 #endif /* KERNEL_SOLARIS */
2635
2636   want_init = false;
2637
2638   return 0;
2639 } /* int ps_read */
2640
2641 void module_register(void) {
2642   plugin_register_complex_config("processes", ps_config);
2643   plugin_register_init("processes", ps_init);
2644   plugin_register_read("processes", ps_read);
2645 } /* void module_register */