ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/i-scream/projects/libstatgrab/src/libstatgrab/process_stats.c
(Generate patch)

Comparing projects/libstatgrab/src/libstatgrab/process_stats.c (file contents):
Revision 1.8 by tdb, Sun Aug 24 20:24:09 2003 UTC vs.
Revision 1.82 by tdb, Mon Oct 9 14:47:58 2006 UTC

# Line 1 | Line 1
1 < /*
2 < * i-scream central monitoring system
1 > /*
2 > * i-scream libstatgrab
3   * http://www.i-scream.org
4 < * Copyright (C) 2000-2003 i-scream
4 > * Copyright (C) 2000-2004 i-scream
5   *
6 < * This program is free software; you can redistribute it and/or
7 < * modify it under the terms of the GNU General Public License
8 < * as published by the Free Software Foundation; either version 2
9 < * of the License, or (at your option) any later version.
6 > * This library is free software; you can redistribute it and/or
7 > * modify it under the terms of the GNU Lesser General Public
8 > * License as published by the Free Software Foundation; either
9 > * version 2.1 of the License, or (at your option) any later version.
10   *
11 < * This program is distributed in the hope that it will be useful,
11 > * This library is distributed in the hope that it will be useful,
12   * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 < * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 < * GNU General Public License for more details.
13 > * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 > * Lesser General Public License for more details.
15   *
16 < * You should have received a copy of the GNU General Public License
17 < * along with this program; if not, write to the Free Software
18 < * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
16 > * You should have received a copy of the GNU Lesser General Public
17 > * License along with this library; if not, write to the Free Software
18 > * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19 > * 02111-1307 USA
20 > *
21 > * $Id$
22   */
23  
24   #ifdef HAVE_CONFIG_H
# Line 23 | Line 26
26   #endif
27  
28   #include "statgrab.h"
29 + #include "tools.h"
30 + #include "vector.h"
31   #if defined(SOLARIS) || defined(LINUX)
32   #include <stdio.h>
33   #include <stdlib.h>
34   #include <sys/types.h>
35   #include <dirent.h>
31 #include <string.h>
36   #endif
37 + #include <string.h>
38  
39   #ifdef SOLARIS
40   #include <procfs.h>
# Line 38 | Line 43
43   #define MAX_FILE_LENGTH PATH_MAX
44   #endif
45   #ifdef LINUX
46 < #include "tools.h"
47 < #include <linux/limits.h>
46 > #include <limits.h>
47 > #include <unistd.h>
48 > #include <sys/stat.h>
49 > #include <fcntl.h>
50   #define PROC_LOCATION "/proc"
51   #define MAX_FILE_LENGTH PATH_MAX
52   #endif
53 < #ifdef FREEBSD
54 < #include <kvm.h>
55 < #include <fcntl.h>
53 > #ifdef ALLBSD
54 > #include <errno.h>
55 > #include <stdlib.h>
56   #include <sys/param.h>
57   #include <sys/sysctl.h>
58 + #if defined(FREEBSD) || defined(DFBSD)
59   #include <sys/user.h>
60 + #else
61 + #include <sys/proc.h>
62   #endif
63 + #include <string.h>
64 + #include <paths.h>
65 + #include <fcntl.h>
66 + #include <limits.h>
67 + #if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
68 + #include <kvm.h>
69 + #endif
70 + #include <unistd.h>
71 + #ifdef NETBSD2
72 + #include <sys/lwp.h>
73 + #endif
74 + #endif
75 + #ifdef HPUX
76 + #include <sys/param.h>
77 + #include <sys/pstat.h>
78 + #include <unistd.h>
79 + #define PROCESS_BATCH 30
80 + #endif
81 + #ifdef WIN32
82 + #include <windows.h>
83 + #include <psapi.h>
84 + #endif
85  
86 < process_stat_t *get_process_stats(){
86 > static void proc_state_init(sg_process_stats *s) {
87 >        s->process_name = NULL;
88 >        s->proctitle = NULL;
89 > }
90  
91 <        static process_stat_t process_stat;
91 > static void proc_state_destroy(sg_process_stats *s) {
92 >        free(s->process_name);
93 >        free(s->proctitle);
94 > }
95  
96 + sg_process_stats *sg_get_process_stats(int *entries){
97 +        VECTOR_DECLARE_STATIC(proc_state, sg_process_stats, 64,
98 +                              proc_state_init, proc_state_destroy);
99 +        int proc_state_size = 0;
100 +        sg_process_stats *proc_state_ptr;
101 + #ifdef HPUX
102 +        struct pst_status pstat_procinfo[PROCESS_BATCH];
103 +        long procidx = 0;
104 +        long long pagesize;
105 +        int num, i;
106 + #endif
107 + #ifdef ALLBSD
108 +        int mib[4];
109 +        size_t size;
110 +        struct kinfo_proc *kp_stats;
111 +        int procs, i;
112 +        char *proctitle;
113 + #if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
114 +        kvm_t *kvmd;
115 +        char **args, **argsp;
116 +        int argslen = 0;
117 + #else
118 +        long buflen;
119 +        char *p, *proctitletmp;
120 + #endif
121 + #ifdef NETBSD2
122 +        int lwps;
123 +        struct kinfo_lwp *kl_stats;
124 + #endif
125 + #endif
126   #if defined(SOLARIS) || defined(LINUX)
127 <        DIR *proc_dir;
127 >        DIR *proc_dir;
128          struct dirent *dir_entry;
129          char filename[MAX_FILE_LENGTH];
130          FILE *f;
63 #endif
64 #ifdef LINUX
65        char *line_ptr;
66 #endif
131   #ifdef SOLARIS
132          psinfo_t process_info;
133   #endif
134 < #ifdef FREEBSD
135 <        struct kinfo_proc *kp_stats;    
136 <        kvm_t *kvmd = NULL;
137 <        int procs;
134 > #ifdef LINUX
135 >        char s;
136 >        /* If someone has a executable of 4k filename length, they deserve to get it truncated :) */
137 >        char ps_name[4096];
138 >        char *ptr;
139 >        VECTOR_DECLARE_STATIC(psargs, char, 128, NULL, NULL);
140 >        unsigned long stime, utime, starttime;
141 >        int x;
142 >        int fn;
143 >        int len;
144 >        int rc;
145 >        time_t uptime;
146 >        long tickspersec;
147   #endif
148  
149 <        process_stat.sleeping=0;
150 <        process_stat.running=0;
151 <        process_stat.zombie=0;
152 <        process_stat.stopped=0;
153 <        process_stat.total=0;
149 > #ifdef LINUX
150 >        if ((f=fopen("/proc/uptime", "r")) == NULL) {
151 >                sg_set_error_with_errno(SG_ERROR_OPEN, "/proc/uptime");
152 >                return NULL;
153 >        }
154 >        if((fscanf(f,"%lu %*d",&uptime)) != 1){
155 >                sg_set_error(SG_ERROR_PARSE, NULL);
156 >                return NULL;
157 >        }
158 >        fclose(f);
159 > #endif
160  
82 #if defined(SOLARIS) || defined(LINUX)
161          if((proc_dir=opendir(PROC_LOCATION))==NULL){
162 +                sg_set_error_with_errno(SG_ERROR_OPENDIR, PROC_LOCATION);
163                  return NULL;
164          }
165  
# Line 91 | Line 170 | process_stat_t *get_process_stats(){
170                  snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
171   #endif
172   #ifdef LINUX
173 <                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/status", dir_entry->d_name);
173 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/stat", dir_entry->d_name);
174   #endif
96
175                  if((f=fopen(filename, "r"))==NULL){
176 <                        /* Open failed.. Process since vanished, or the path was too long.
176 >                        /* Open failed.. Process since vanished, or the path was too long.
177                           * Ah well, move onwards to the next one */
178                          continue;
179                  }
102
180   #ifdef SOLARIS
181                  fread(&process_info, sizeof(psinfo_t), 1, f);
182 <                if(process_info.pr_lwp.pr_state==1) process_stat.sleeping++;
106 <                if(process_info.pr_lwp.pr_state==2) process_stat.running++;
107 <                if(process_info.pr_lwp.pr_state==3) process_stat.zombie++;
108 <                if(process_info.pr_lwp.pr_state==4) process_stat.stopped++;
109 <                if(process_info.pr_lwp.pr_state==6) process_stat.running++;
182 >                fclose(f);
183   #endif
184 +
185 +                if (VECTOR_RESIZE(proc_state, proc_state_size + 1) < 0) {
186 +                        return NULL;
187 +                }
188 +                proc_state_ptr = proc_state+proc_state_size;
189 +
190 + #ifdef SOLARIS          
191 +                proc_state_ptr->pid = process_info.pr_pid;
192 +                proc_state_ptr->parent = process_info.pr_ppid;
193 +                proc_state_ptr->pgid = process_info.pr_pgid;
194 +                proc_state_ptr->uid = process_info.pr_uid;
195 +                proc_state_ptr->euid = process_info.pr_euid;
196 +                proc_state_ptr->gid = process_info.pr_gid;
197 +                proc_state_ptr->egid = process_info.pr_egid;
198 +                proc_state_ptr->proc_size = (process_info.pr_size) * 1024;
199 +                proc_state_ptr->proc_resident = (process_info.pr_rssize) * 1024;
200 +                proc_state_ptr->time_spent = process_info.pr_time.tv_sec;
201 +                proc_state_ptr->cpu_percent = (process_info.pr_pctcpu * 100.0) / 0x8000;
202 +                proc_state_ptr->nice = (int)process_info.pr_lwp.pr_nice - 20;
203 +                if (sg_update_string(&proc_state_ptr->process_name,
204 +                                     process_info.pr_fname) < 0) {
205 +                        return NULL;
206 +                }
207 +                if (sg_update_string(&proc_state_ptr->proctitle,
208 +                                     process_info.pr_psargs) < 0) {
209 +                        return NULL;
210 +                }
211 +
212 +                switch (process_info.pr_lwp.pr_state) {
213 +                case 1:
214 +                        proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
215 +                        break;
216 +                case 2:
217 +                case 5:
218 +                        proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
219 +                        break;
220 +                case 3:
221 +                        proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
222 +                        break;
223 +                case 4:
224 +                        proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
225 +                        break;
226 +                }
227 + #endif
228   #ifdef LINUX
229 <                if((line_ptr=f_read_line(f, "State:"))==NULL){
230 <                        fclose(f);
229 >                x = fscanf(f, "%d %4096s %c %d %d %*d %*d %*d %*u %*u %*u %*u %*u %lu %lu %*d %*d %*d %d %*d %*d %lu %llu %llu %*u %*u %*u %*u %*u %*u %*u %*u %*u %*u %*u %*u %*u %*d %*d\n", &(proc_state_ptr->pid), ps_name, &s, &(proc_state_ptr->parent), &(proc_state_ptr->pgid), &utime, &stime, &(proc_state_ptr->nice), &starttime, &(proc_state_ptr->proc_size), &(proc_state_ptr->proc_resident));
230 >                /* +3 becuase man page says "Resident  Set Size: number of pages the process has in real memory, minus 3 for administrative purposes." */
231 >                proc_state_ptr->proc_resident = (proc_state_ptr->proc_resident + 3) * getpagesize();
232 >                switch (s) {
233 >                case 'S':
234 >                        proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
235 >                        break;
236 >                case 'R':
237 >                        proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
238 >                        break;
239 >                case 'Z':
240 >                        proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
241 >                        break;
242 >                case 'T':
243 >                case 'D':
244 >                        proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
245 >                        break;
246 >                }
247 >        
248 >                /* pa_name[0] should = '(' */
249 >                ptr = strchr(&ps_name[1], ')');
250 >                if(ptr !=NULL) *ptr='\0';
251 >
252 >                if (sg_update_string(&proc_state_ptr->process_name,
253 >                                     &ps_name[1]) < 0) {
254 >                        return NULL;
255 >                }
256 >
257 >                /* cpu */
258 >                proc_state_ptr->cpu_percent = (100.0 * (utime + stime)) / ((uptime * 100.0) - starttime);
259 >                tickspersec = sysconf (_SC_CLK_TCK);
260 >                if (tickspersec < 0) {
261 >                        proc_state_ptr->time_spent = 0;
262 >                }
263 >                else {
264 >                        proc_state_ptr->time_spent = (utime + stime) / tickspersec;
265 >                }
266 >
267 >                fclose(f);
268 >
269 >                /* uid / gid */
270 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/status", dir_entry->d_name);
271 >                if ((f=fopen(filename, "r")) == NULL) {
272 >                        /* Open failed.. Process since vanished, or the path was too long.
273 >                         * Ah well, move onwards to the next one */
274                          continue;
275                  }
276 <                if((line_ptr=strchr(line_ptr, '\t'))==NULL){
276 >
277 >                if((ptr=sg_f_read_line(f, "Uid:"))==NULL){
278                          fclose(f);
279                          continue;
280                  }
281 <                line_ptr++;
282 <                if(line_ptr=='\0'){
281 >                sscanf(ptr, "Uid:\t%d\t%d\t%*d\t%*d\n", &(proc_state_ptr->uid), &(proc_state_ptr->euid));
282 >
283 >                if((ptr=sg_f_read_line(f, "Gid:"))==NULL){
284                          fclose(f);
285                          continue;
286                  }
287 +                sscanf(ptr, "Gid:\t%d\t%d\t%*d\t%*d\n", &(proc_state_ptr->gid), &(proc_state_ptr->egid));
288  
126                if(*line_ptr=='S') process_stat.sleeping++;
127                if(*line_ptr=='R') process_stat.running++;
128                if(*line_ptr=='Z') process_stat.zombie++;
129                if(*line_ptr=='T') process_stat.stopped++;
130                if(*line_ptr=='D') process_stat.stopped++;
131 #endif  
132
289                  fclose(f);
290 +
291 +                /* proctitle */
292 +                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/cmdline", dir_entry->d_name);
293 +
294 +                if((fn=open(filename, O_RDONLY)) == -1){
295 +                        /* Open failed.. Process since vanished, or the path was too long.
296 +                         * Ah well, move onwards to the next one */
297 +                        continue;
298 +                }
299 +
300 + #define READ_BLOCK_SIZE 128
301 +                len = 0;
302 +                do {
303 +                        if (VECTOR_RESIZE(psargs, len + READ_BLOCK_SIZE) < 0) {
304 +                                return NULL;
305 +                        }
306 +                        rc = read(fn, psargs + len, READ_BLOCK_SIZE);
307 +                        if (rc > 0) {
308 +                                len += rc;
309 +                        }
310 +                } while (rc == READ_BLOCK_SIZE);
311 +                close(fn);
312 +
313 +                if (rc == -1) {
314 +                        /* Read failed; move on. */
315 +                        continue;
316 +                }
317 +
318 +                /* Turn \0s into spaces within the command line. */
319 +                ptr = psargs;
320 +                for(x = 0; x < len; x++) {
321 +                        if (*ptr == '\0') *ptr = ' ';
322 +                        ptr++;
323 +                }
324 +
325 +                if (len == 0) {
326 +                        /* We want psargs to be NULL. */
327 +                        if (VECTOR_RESIZE(psargs, 0) < 0) {
328 +                                return NULL;
329 +                        }
330 +                } else {
331 +                        /* Not empty, so append a \0. */
332 +                        if (VECTOR_RESIZE(psargs, len + 1) < 0) {
333 +                                return NULL;
334 +                        }
335 +                        psargs[len] = '\0';
336 +                }
337 +
338 +                if (sg_update_string(&proc_state_ptr->proctitle, psargs) < 0) {
339 +                        return NULL;
340 +                }
341 + #endif
342 +
343 +                proc_state_size++;
344          }
345          closedir(proc_dir);
346   #endif
347 < #ifdef FREEBSD
348 <        if((kvmd = kvm_openfiles(NULL, NULL, NULL, O_RDONLY, NULL)) == NULL){
347 >
348 > #ifdef ALLBSD
349 >        mib[0] = CTL_KERN;
350 >        mib[1] = KERN_PROC;
351 >        mib[2] = KERN_PROC_ALL;
352 >
353 >        if(sysctl(mib, 3, NULL, &size, NULL, 0) < 0) {
354 >                sg_set_error_with_errno(SG_ERROR_SYSCTL,
355 >                                        "CTL_KERN.KERN_PROC.KERN_PROC_ALL");
356                  return NULL;
357          }
358  
359 <        kp_stats=kvm_getprocs(kvmd, KERN_PROC_ALL, 0, &procs);
359 >        procs = size / sizeof(struct kinfo_proc);
360  
361 <        while(procs--){
362 <                if (kp_stats[procs].kp_proc.p_stat == SSLEEP) process_stat.sleeping++;  
363 <                if (kp_stats[procs].kp_proc.p_stat == SRUN) process_stat.running++;
147 <                if (kp_stats[procs].kp_proc.p_stat == SIDL) process_stat.running++;
148 <                if (kp_stats[procs].kp_proc.p_stat == SZOMB) process_stat.zombie++;
149 <                if (kp_stats[procs].kp_proc.p_stat == SSTOP) process_stat.stopped++;
361 >        kp_stats = sg_malloc(size);
362 >        if(kp_stats == NULL) {
363 >                return NULL;
364          }
365 +        memset(kp_stats, 0, size);
366  
367 <        kvm_close(kvmd);
367 >        if(sysctl(mib, 3, kp_stats, &size, NULL, 0) < 0) {
368 >                sg_set_error_with_errno(SG_ERROR_SYSCTL,
369 >                                        "CTL_KERN.KERN_PROC.KERN_PROC_ALL");
370 >                free(kp_stats);
371 >                return NULL;
372 >        }
373 >
374 > #if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
375 >        kvmd = sg_get_kvm2();
376   #endif
377  
378 <        process_stat.total=process_stat.sleeping+process_stat.running+process_stat.zombie+process_stat.stopped;
378 >        for (i = 0; i < procs; i++) {
379 >                const char *name;
380 >
381 > #ifdef FREEBSD5
382 >                if (kp_stats[i].ki_stat == 0) {
383 > #else
384 >                if (kp_stats[i].kp_proc.p_stat == 0) {
385 > #endif
386 >                        /* FreeBSD 5 deliberately overallocates the array that
387 >                         * the sysctl returns, so we'll get a few junk
388 >                         * processes on the end that we have to ignore. (Search
389 >                         * for "overestimate by 5 procs" in
390 >                         * src/sys/kern/kern_proc.c for more details.) */
391 >                        continue;
392 >                }
393 >
394 >                if (VECTOR_RESIZE(proc_state, proc_state_size + 1) < 0) {
395 >                        return NULL;
396 >                }
397 >                proc_state_ptr = proc_state+proc_state_size;
398 >
399 > #ifdef FREEBSD5
400 >                name = kp_stats[i].ki_comm;
401 > #elif defined(DFBSD)
402 >                name = kp_stats[i].kp_thread.td_comm;
403 > #else
404 >                name = kp_stats[i].kp_proc.p_comm;
405 > #endif
406 >                if (sg_update_string(&proc_state_ptr->process_name, name) < 0) {
407 >                        return NULL;
408 >                }
409 >
410 > #if defined(FREEBSD5) || defined(NETBSD) || defined(OPENBSD)
411 >
412 > #ifdef FREEBSD5
413 >                mib[2] = KERN_PROC_ARGS;
414 >                mib[3] = kp_stats[i].ki_pid;
415 > #else
416 >                mib[1] = KERN_PROC_ARGS;
417 >                mib[2] = kp_stats[i].kp_proc.p_pid;
418 >                mib[3] = KERN_PROC_ARGV;
419 > #endif
420 >
421 >                free(proc_state_ptr->proctitle);
422 >                proc_state_ptr->proctitle = NULL;
423 >
424 > /* Starting size - we'll double this straight away */
425 > #define PROCTITLE_START_SIZE 64
426 >                buflen = PROCTITLE_START_SIZE;
427 >                size = buflen;
428 >                proctitle = NULL;
429 >
430 >                do {
431 >                        if((long) size >= buflen) {
432 >                                buflen *= 2;
433 >                                size = buflen;
434 >                                proctitletmp = sg_realloc(proctitle, buflen);
435 >                                if(proctitletmp == NULL) {
436 >                                        free(proctitle);
437 >                                        proctitle = NULL;
438 >                                        proc_state_ptr->proctitle = NULL;
439 >                                        size = 0;
440 >                                        break;
441 >                                }
442 >                                proctitle = proctitletmp;
443 >                                bzero(proctitle, buflen);
444 >                        }
445 >
446 >                        if(sysctl(mib, 4, proctitle, &size, NULL, 0) < 0) {
447 >                                free(proctitle);
448 >                                proctitle = NULL;
449 >                                proc_state_ptr->proctitle = NULL;
450 >                                size = 0;
451 >                                break;
452 >                        }
453 >                } while((long) size >= buflen);
454 >
455 >                if(size > 0) {
456 >                        proc_state_ptr->proctitle = sg_malloc(size+1);
457 >                        if(proc_state_ptr->proctitle == NULL) {
458 >                                return NULL;
459 >                        }
460 >                        p = proctitle;
461 > #ifdef OPENBSD
462 >                        /* On OpenBSD, this value has the argv pointers (which
463 >                         * are terminated by a NULL) at the front, so we have
464 >                         * to skip over them to get to the strings. */
465 >                        while (*(char ***)p != NULL) {
466 >                                p += sizeof(char **);
467 >                        }
468 >                        p += sizeof(char **);
469 > #endif
470 >                        proc_state_ptr->proctitle[0] = '\0';
471 >                        do {
472 >                                sg_strlcat(proc_state_ptr->proctitle, p, size+1);
473 >                                sg_strlcat(proc_state_ptr->proctitle, " ", size+1);
474 >                                p += strlen(p) + 1;
475 >                        } while (p < proctitle + size);
476 >                        free(proctitle);
477 >                        proctitle = NULL;
478 >                        /* remove trailing space */
479 >                        proc_state_ptr->proctitle[strlen(proc_state_ptr->proctitle)-1] = '\0';
480 >                }
481 >                else {
482 >                        if(proctitle != NULL) {
483 >                                free(proctitle);
484 >                                proctitle = NULL;
485 >                        }
486 >                        proc_state_ptr->proctitle = NULL;
487 >                }
488 > #else
489 >                free(proc_state_ptr->proctitle);
490 >                proc_state_ptr->proctitle = NULL;
491 >                if(kvmd != NULL) {
492 >                        args = kvm_getargv(kvmd, &(kp_stats[i]), 0);
493 >                        if(args != NULL) {
494 >                                argsp = args;
495 >                                while(*argsp != NULL) {
496 >                                        argslen += strlen(*argsp) + 1;
497 >                                        argsp++;
498 >                                }
499 >                                proctitle = sg_malloc(argslen + 1);
500 >                                proctitle[0] = '\0';
501 >                                if(proctitle == NULL) {
502 >                                        return NULL;
503 >                                }
504 >                                while(*args != NULL) {
505 >                                        sg_strlcat(proctitle, *args, argslen + 1);
506 >                                        sg_strlcat(proctitle, " ", argslen + 1);
507 >                                        args++;
508 >                                }
509 >                                /* remove trailing space */
510 >                                proctitle[strlen(proctitle)-1] = '\0';
511 >                                proc_state_ptr->proctitle = proctitle;
512 >                        }
513 >                        else {
514 >                                proc_state_ptr->proctitle = NULL;
515 >                        }
516 >                }
517 >                else {
518 >                        proc_state_ptr->proctitle = NULL;
519 >                }
520 > #endif
521 >
522 > #ifdef FREEBSD5
523 >                proc_state_ptr->pid = kp_stats[i].ki_pid;
524 >                proc_state_ptr->parent = kp_stats[i].ki_ppid;
525 >                proc_state_ptr->pgid = kp_stats[i].ki_pgid;
526 > #else
527 >                proc_state_ptr->pid = kp_stats[i].kp_proc.p_pid;
528 >                proc_state_ptr->parent = kp_stats[i].kp_eproc.e_ppid;
529 >                proc_state_ptr->pgid = kp_stats[i].kp_eproc.e_pgid;
530 > #endif
531 >
532 > #ifdef FREEBSD5
533 >                proc_state_ptr->uid = kp_stats[i].ki_ruid;
534 >                proc_state_ptr->euid = kp_stats[i].ki_uid;
535 >                proc_state_ptr->gid = kp_stats[i].ki_rgid;
536 >                proc_state_ptr->egid = kp_stats[i].ki_svgid;
537 > #elif defined(DFBSD)
538 >                proc_state_ptr->uid = kp_stats[i].kp_eproc.e_ucred.cr_ruid;
539 >                proc_state_ptr->euid = kp_stats[i].kp_eproc.e_ucred.cr_svuid;
540 >                proc_state_ptr->gid = kp_stats[i].kp_eproc.e_ucred.cr_rgid;
541 >                proc_state_ptr->egid = kp_stats[i].kp_eproc.e_ucred.cr_svgid;
542 > #else
543 >                proc_state_ptr->uid = kp_stats[i].kp_eproc.e_pcred.p_ruid;
544 >                proc_state_ptr->euid = kp_stats[i].kp_eproc.e_pcred.p_svuid;
545 >                proc_state_ptr->gid = kp_stats[i].kp_eproc.e_pcred.p_rgid;
546 >                proc_state_ptr->egid = kp_stats[i].kp_eproc.e_pcred.p_svgid;
547 > #endif
548 >
549 > #ifdef FREEBSD5
550 >                proc_state_ptr->proc_size = kp_stats[i].ki_size;
551 >                /* This is in pages */
552 >                proc_state_ptr->proc_resident =
553 >                        kp_stats[i].ki_rssize * getpagesize();
554 >                /* This is in microseconds */
555 >                proc_state_ptr->time_spent = kp_stats[i].ki_runtime / 1000000;
556 >                proc_state_ptr->cpu_percent =
557 >                        ((double)kp_stats[i].ki_pctcpu / FSCALE) * 100.0;
558 >                proc_state_ptr->nice = kp_stats[i].ki_nice;
559 > #else
560 >                proc_state_ptr->proc_size =
561 >                        kp_stats[i].kp_eproc.e_vm.vm_map.size;
562 >                /* This is in pages */
563 >                proc_state_ptr->proc_resident =
564 >                        kp_stats[i].kp_eproc.e_vm.vm_rssize * getpagesize();
565 > #if defined(NETBSD) || defined(OPENBSD)
566 >                proc_state_ptr->time_spent =
567 >                        kp_stats[i].kp_proc.p_rtime.tv_sec;
568 > #elif defined(DFBSD)
569 >                proc_state_ptr->time_spent =
570 >                        ( kp_stats[i].kp_thread.td_uticks +
571 >                        kp_stats[i].kp_thread.td_sticks +
572 >                        kp_stats[i].kp_thread.td_iticks ) / 1000000;
573 > #else
574 >                /* This is in microseconds */
575 >                proc_state_ptr->time_spent =
576 >                        kp_stats[i].kp_proc.p_runtime / 1000000;
577 > #endif
578 >                proc_state_ptr->cpu_percent =
579 >                        ((double)kp_stats[i].kp_proc.p_pctcpu / FSCALE) * 100.0;
580 >                proc_state_ptr->nice = kp_stats[i].kp_proc.p_nice;
581 > #endif
582 >
583 > #ifdef NETBSD2
584 >                {
585 >                        size_t size;
586 >                        int mib[5];
587 >
588 >                        mib[0] = CTL_KERN;
589 >                        mib[1] = KERN_LWP;
590 >                        mib[2] = kp_stats[i].kp_proc.p_pid;
591 >                        mib[3] = sizeof(struct kinfo_lwp);
592 >                        mib[4] = 0;
593 >
594 >                        if(sysctl(mib, 5, NULL, &size, NULL, 0) < 0) {
595 >                                sg_set_error_with_errno(SG_ERROR_SYSCTL, "CTL_KERN.KERN_LWP.pid.structsize.0");
596 >                                return NULL;
597 >                        }
598 >
599 >                        lwps = size / sizeof(struct kinfo_lwp);
600 >                        mib[4] = lwps;
601 >
602 >                        kl_stats = sg_malloc(size);
603 >                        if(kl_stats == NULL) {
604 >                                return NULL;
605 >                        }
606 >
607 >                        if(sysctl(mib, 5, kl_stats, &size, NULL, 0) < 0) {
608 >                                sg_set_error_with_errno(SG_ERROR_SYSCTL, "CTL_KERN.KERN_LWP.pid.structsize.buffersize");
609 >                                return NULL;
610 >                        }
611 >                }
612 >
613 >                switch(kp_stats[i].kp_proc.p_stat) {
614 >                case SIDL:
615 >                        proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
616 >                        break;
617 >                case SACTIVE:
618 >                        {
619 >                                int i;
620 >
621 >                                for(i = 0; i < lwps; i++) {
622 >                                        switch(kl_stats[i].l_stat) {
623 >                                        case LSONPROC:
624 >                                        case LSRUN:
625 >                                                proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
626 >                                                goto end;
627 >                                        case LSSLEEP:
628 >                                                proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
629 >                                                goto end;
630 >                                        case LSSTOP:
631 >                                        case LSSUSPENDED:
632 >                                                proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
633 >                                                goto end;
634 >                                        }
635 >                                        proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
636 >                                }
637 >                                end: ;
638 >                        }
639 >                        break;
640 >                case SSTOP:
641 >                        proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
642 >                        break;
643 >                case SZOMB:
644 >                        proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
645 >                        break;
646 >                default:
647 >                        proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
648 >                        break;
649 >                }
650 >
651 >                free(kl_stats);
652 > #else
653 > #ifdef FREEBSD5
654 >                switch (kp_stats[i].ki_stat) {
655 > #else
656 >                switch (kp_stats[i].kp_proc.p_stat) {
657 > #endif
658 >                case SIDL:
659 >                case SRUN:
660 > #ifdef SONPROC
661 >                case SONPROC: /* NetBSD */
662 > #endif
663 >                        proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
664 >                        break;
665 >                case SSLEEP:
666 > #ifdef SWAIT
667 >                case SWAIT: /* FreeBSD 5 */
668 > #endif
669 > #ifdef SLOCK
670 >                case SLOCK: /* FreeBSD 5 */
671 > #endif
672 >                        proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
673 >                        break;
674 >                case SSTOP:
675 >                        proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
676 >                        break;
677 >                case SZOMB:
678 > #ifdef SDEAD
679 >                case SDEAD: /* OpenBSD & NetBSD */
680 > #endif
681 >                        proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
682 >                        break;
683 >                default:
684 >                        proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
685 >                        break;
686 >                }
687 > #endif
688 >                proc_state_size++;
689 >        }
690 >
691 >        free(kp_stats);
692 > #endif
693 >
694 > #ifdef HPUX
695 >        if ((pagesize = sysconf(_SC_PAGESIZE)) == -1) {
696 >                sg_set_error_with_errno(SG_ERROR_SYSCONF, "_SC_PAGESIZE");
697 >                return NULL;
698 >        }
699 >
700 >        while (1) {
701 >                num = pstat_getproc(pstat_procinfo, sizeof pstat_procinfo[0],
702 >                                    PROCESS_BATCH, procidx);
703 >                if (num == -1) {
704 >                        sg_set_error_with_errno(SG_ERROR_PSTAT,
705 >                                                "pstat_getproc");
706 >                        return NULL;
707 >                } else if (num == 0) {
708 >                        break;
709 >                }
710 >
711 >                for (i = 0; i < num; i++) {
712 >                        struct pst_status *pi = &pstat_procinfo[i];
713 >
714 >                        if (VECTOR_RESIZE(proc_state, proc_state_size + 1) < 0) {
715 >                                return NULL;
716 >                        }
717 >                        proc_state_ptr = proc_state+proc_state_size;
718 >        
719 >                        proc_state_ptr->pid = pi->pst_pid;
720 >                        proc_state_ptr->parent = pi->pst_ppid;
721 >                        proc_state_ptr->pgid = pi->pst_pgrp;
722 >                        proc_state_ptr->uid = pi->pst_uid;
723 >                        proc_state_ptr->euid = pi->pst_euid;
724 >                        proc_state_ptr->gid = pi->pst_gid;
725 >                        proc_state_ptr->egid = pi->pst_egid;
726 >                        proc_state_ptr->proc_size = (pi->pst_dsize + pi->pst_tsize + pi->pst_ssize) * pagesize;
727 >                        proc_state_ptr->proc_resident = pi->pst_rssize * pagesize;
728 >                        proc_state_ptr->time_spent = pi->pst_time;
729 >                        proc_state_ptr->cpu_percent = (pi->pst_pctcpu * 100.0) / 0x8000;
730 >                        proc_state_ptr->nice = pi->pst_nice;
731 >        
732 >                        if (sg_update_string(&proc_state_ptr->process_name,
733 >                                             pi->pst_ucomm) < 0) {
734 >                                return NULL;
735 >                        }
736 >                        if (sg_update_string(&proc_state_ptr->proctitle,
737 >                                             pi->pst_cmd) < 0) {
738 >                                return NULL;
739 >                        }
740 >        
741 >                        switch (pi->pst_stat) {
742 >                        case PS_SLEEP:
743 >                                proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
744 >                                break;
745 >                        case PS_RUN:
746 >                                proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
747 >                                break;
748 >                        case PS_STOP:
749 >                                proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
750 >                                break;
751 >                        case PS_ZOMBIE:
752 >                                proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
753 >                                break;
754 >                        case PS_IDLE:
755 >                        case PS_OTHER:
756 >                                proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
757 >                                break;
758 >                        }
759 >        
760 >                        proc_state_size++;
761 >                }
762 >                procidx = pstat_procinfo[num - 1].pst_idx + 1;
763 >        }
764 > #endif
765 >
766 > #ifdef CYGWIN
767 >        sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
768 >        return NULL;
769 > #endif
770 > #ifdef WIN32
771 >        /* FIXME The data needed for this is probably do able with the
772 >         * "performance registry". Although using this appears to be a black
773 >         * art and closely guarded secret.
774 >         * This is not directly used in ihost, so not considered a priority */
775 >        sg_set_error(SG_ERROR_UNSUPPORTED, "Win32");
776 >        return NULL;
777 > #endif
778 >
779 >        *entries = proc_state_size;
780 >        return proc_state;
781 > }
782 >
783 > sg_process_count *sg_get_process_count() {
784 >        static sg_process_count process_stat;
785 > #ifndef WIN32
786 >        sg_process_stats *ps;
787 >        int ps_size, x;
788 > #else
789 >        DWORD aProcesses[1024];
790 >        DWORD cbNeeded;
791 > #endif
792 >
793 >        process_stat.sleeping = 0;
794 >        process_stat.running = 0;
795 >        process_stat.zombie = 0;
796 >        process_stat.stopped = 0;
797 >        process_stat.total = 0;
798 >
799 > #ifndef WIN32
800 >        ps = sg_get_process_stats(&ps_size);
801 >        if (ps == NULL) {
802 >                return NULL;
803 >        }
804 >
805 >        for(x = 0; x < ps_size; x++) {
806 >                switch (ps->state) {
807 >                case SG_PROCESS_STATE_RUNNING:
808 >                        process_stat.running++;
809 >                        break;
810 >                case SG_PROCESS_STATE_SLEEPING:
811 >                        process_stat.sleeping++;
812 >                        break;
813 >                case SG_PROCESS_STATE_STOPPED:
814 >                        process_stat.stopped++;
815 >                        break;
816 >                case SG_PROCESS_STATE_ZOMBIE:
817 >                        process_stat.zombie++;
818 >                        break;
819 >                default:
820 >                        /* currently no mapping for SG_PROCESS_STATE_UNKNOWN in
821 >                         * sg_process_count */
822 >                        break;
823 >                }
824 >                ps++;
825 >        }
826 >
827 >        process_stat.total = ps_size;
828 > #else
829 >        if (!EnumProcesses(aProcesses, sizeof(aProcesses), &cbNeeded))
830 >                return NULL;
831 >        process_stat.total = cbNeeded / sizeof(DWORD);
832 > #endif
833 >
834          return &process_stat;
835   }
836 +
837 + int sg_process_compare_name(const void *va, const void *vb) {
838 +        const sg_process_stats *a = (sg_process_stats *)va;
839 +        const sg_process_stats *b = (sg_process_stats *)vb;
840 +
841 +        return strcmp(a->process_name, b->process_name);
842 + }
843 +
844 + int sg_process_compare_pid(const void *va, const void *vb) {
845 +        const sg_process_stats *a = (sg_process_stats *)va;
846 +        const sg_process_stats *b = (sg_process_stats *)vb;
847 +
848 +        if (a->pid < b->pid) {
849 +                return -1;
850 +        } else if (a->pid == b->pid) {
851 +                return 0;
852 +        } else {
853 +                return 1;
854 +        }
855 + }
856 +
857 + int sg_process_compare_uid(const void *va, const void *vb) {
858 +        const sg_process_stats *a = (sg_process_stats *)va;
859 +        const sg_process_stats *b = (sg_process_stats *)vb;
860 +
861 +        if (a->uid < b->uid) {
862 +                return -1;
863 +        } else if (a->uid == b->uid) {
864 +                return 0;
865 +        } else {
866 +                return 1;
867 +        }
868 + }
869 +
870 + int sg_process_compare_gid(const void *va, const void *vb) {
871 +        const sg_process_stats *a = (sg_process_stats *)va;
872 +        const sg_process_stats *b = (sg_process_stats *)vb;
873 +
874 +        if (a->gid < b->gid) {
875 +                return -1;
876 +        } else if (a->gid == b->gid) {
877 +                return 0;
878 +        } else {
879 +                return 1;
880 +        }
881 + }
882 +
883 + int sg_process_compare_size(const void *va, const void *vb) {
884 +        const sg_process_stats *a = (sg_process_stats *)va;
885 +        const sg_process_stats *b = (sg_process_stats *)vb;
886 +
887 +        if (a->proc_size < b->proc_size) {
888 +                return -1;
889 +        } else if (a->proc_size == b->proc_size) {
890 +                return 0;
891 +        } else {
892 +                return 1;
893 +        }
894 + }
895 +
896 + int sg_process_compare_res(const void *va, const void *vb) {
897 +        const sg_process_stats *a = (sg_process_stats *)va;
898 +        const sg_process_stats *b = (sg_process_stats *)vb;
899 +
900 +        if (a->proc_resident < b->proc_resident) {
901 +                return -1;
902 +        } else if (a->proc_resident == b->proc_resident) {
903 +                return 0;
904 +        } else {
905 +                return 1;
906 +        }
907 + }
908 +
909 + int sg_process_compare_cpu(const void *va, const void *vb) {
910 +        const sg_process_stats *a = (sg_process_stats *)va;
911 +        const sg_process_stats *b = (sg_process_stats *)vb;
912 +
913 +        if (a->cpu_percent < b->cpu_percent) {
914 +                return -1;
915 +        } else if (a->cpu_percent == b->cpu_percent) {
916 +                return 0;
917 +        } else {
918 +                return 1;
919 +        }
920 + }
921 +
922 + int sg_process_compare_time(const void *va, const void *vb) {
923 +        const sg_process_stats *a = (sg_process_stats *)va;
924 +        const sg_process_stats *b = (sg_process_stats *)vb;
925 +
926 +        if (a->time_spent < b->time_spent) {
927 +                return -1;
928 +        } else if (a->time_spent == b->time_spent) {
929 +                return 0;
930 +        } else {
931 +                return 1;
932 +        }
933 + }
934 +

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines