Debian 3.9.10debian/3.9.10debian

1 files changed, 123 insertions, 0 deletions

diff --git a/src/pmdas/linux_proc/proc_runq.c b/src/pmdas/linux_proc/proc_runq.c
new file mode 100644
index 0000000..07b68dc
--- /dev/null
+++ b/src/pmdas/linux_proc/proc_runq.c
@@ -0,0 +1,123 @@
+/*
+ * Linux /proc/runq metrics cluster
+ *
+ * Copyright (c) 2000,2004 Silicon Graphics, Inc.  All Rights Reserved.
+ * 
+ * This program is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the
+ * Free Software Foundation; either version 2 of the License, or (at your
+ * option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * for more details.
+ */
+
+#include "pmapi.h"
+#include "impl.h"
+#include "pmda.h"
+#include <ctype.h>
+#include <dirent.h>
+#include <sys/stat.h>
+#include "proc_pid.h"
+#include "proc_runq.h"
+
+int
+refresh_proc_runq(proc_runq_t *proc_runq)
+{
+    int sz;
+    int fd;
+    char *p;
+    int sname;
+    DIR *dir;
+    struct dirent *d;
+    char fullpath[MAXPATHLEN];
+    char buf[4096];
+
+    memset(proc_runq, 0, sizeof(proc_runq_t));
+    if ((dir = opendir("/proc")) == NULL)
+    	return -oserror();
+
+    while((d = readdir(dir)) != NULL) {
+	if (!isdigit((int)d->d_name[0]))
+	    continue;
+	sprintf(fullpath, "/proc/%s/stat", d->d_name);
+	if ((fd = open(fullpath, O_RDONLY)) < 0)
+	    continue;
+	sz = read(fd, buf, sizeof(buf));
+	close(fd);
+	buf[sizeof(buf)-1] = '\0';
+
+	/*
+	 * defunct (state name is 'Z')
+	 */
+	if (sz <= 0 || (p = _pm_getfield(buf, PROC_PID_STAT_STATE)) == NULL) {
+	    proc_runq->unknown++;
+	    continue;
+	}
+	if ((sname = *p) == 'Z') {
+	    proc_runq->defunct++;
+	    continue;
+	}
+
+	/*
+	 * kernel process (not defunct and virtual size is zero)
+	 */
+	if ((p = _pm_getfield(buf, PROC_PID_STAT_VSIZE)) == NULL) {
+	    proc_runq->unknown++;
+	    continue;
+	}
+	if (strcmp(p, "0") == 0) {
+	    proc_runq->kernel++;
+	    continue;
+	}
+
+	/*
+	 * swapped (resident set size is zero)
+	 */
+	if ((p = _pm_getfield(buf, PROC_PID_STAT_RSS)) == NULL) {
+	    proc_runq->unknown++;
+	    continue;
+	}
+	if (strcmp(p, "0") == 0) {
+	    proc_runq->swapped++;
+	    continue;
+	}
+
+	/*
+	 * All other states
+	 */
+	switch (sname) {
+	case 'R':
+	    proc_runq->runnable++;
+	    break;
+	case 'S':
+	    proc_runq->sleeping++;
+	    break;
+	case 'T':
+	    proc_runq->stopped++;
+	    break;
+	case 'D':
+	    proc_runq->blocked++;
+	    break;
+	/* case 'Z':
+	    break; -- already counted above */
+	default:
+	    fprintf(stderr, "UNKNOWN %c : %s\n", sname, buf);
+	    proc_runq->unknown++;
+	    break;
+	}
+    }
+    closedir(dir);
+
+#if PCP_DEBUG
+    if (pmDebug & DBG_TRACE_LIBPMDA) {
+	fprintf(stderr, "refresh_runq: runnable=%d sleeping=%d stopped=%d blocked=%d unknown=%d\n",
+	    proc_runq->runnable, proc_runq->sleeping, proc_runq->stopped,
+	    proc_runq->blocked, proc_runq->unknown);
+    }
+#endif
+
+    return 0;
+}