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.23 by pajs, Sun Mar 28 18:04:14 2004 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
2 > * i-scream libstatgrab
3   * http://www.i-scream.org
4   * Copyright (C) 2000-2004 i-scream
5   *
# Line 26 | 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>
34 #include <string.h>
36   #endif
37 + #include <string.h>
38  
39   #ifdef SOLARIS
40   #include <procfs.h>
# Line 42 | Line 44
44   #endif
45   #ifdef LINUX
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 ALLBSD
54 + #include <errno.h>
55   #include <stdlib.h>
56   #include <sys/param.h>
57   #include <sys/sysctl.h>
# Line 54 | Line 60
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 < int get_proc_snapshot(proc_state_t **ps){
87 <        proc_state_t *proc_state = NULL;
88 <        proc_state_t *proc_state_ptr;
86 > static void proc_state_init(sg_process_stats *s) {
87 >        s->process_name = NULL;
88 >        s->proctitle = NULL;
89 > }
90 >
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 < #if defined(SOLARIS)    
101 <        DIR *proc_dir;
102 <        struct dirent *dir_entry;
103 <        char filename[MAX_FILE_LENGTH];
104 <        FILE *f;
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;
128 >        struct dirent *dir_entry;
129 >        char filename[MAX_FILE_LENGTH];
130 >        FILE *f;
131 > #ifdef SOLARIS
132          psinfo_t process_info;
133 + #endif
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 <        if((proc_dir=opendir(PROC_LOCATION))==NULL){
150 <                return NULL;
151 <        }
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  
161 <        while((dir_entry=readdir(proc_dir))!=NULL){
162 <                if(atoi(dir_entry->d_name) == 0) continue;
161 >        if((proc_dir=opendir(PROC_LOCATION))==NULL){
162 >                sg_set_error_with_errno(SG_ERROR_OPENDIR, PROC_LOCATION);
163 >                return NULL;
164 >        }
165  
166 <                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
166 >        while((dir_entry=readdir(proc_dir))!=NULL){
167 >                if(atoi(dir_entry->d_name) == 0) continue;
168  
169 <                if((f=fopen(filename, "r"))==NULL){
170 <                        /* Open failed.. Process since vanished, or the path was too long.
171 <                         * Ah well, move onwards to the next one */
172 <                        continue;
173 <                }
174 <                fread(&process_info, sizeof(psinfo_t), 1, f);
169 > #ifdef SOLARIS
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/stat", dir_entry->d_name);
174 > #endif
175 >                if((f=fopen(filename, "r"))==NULL){
176 >                        /* Open failed.. Process since vanished, or the path was too long.
177 >                         * Ah well, move onwards to the next one */
178 >                        continue;
179 >                }
180 > #ifdef SOLARIS
181 >                fread(&process_info, sizeof(psinfo_t), 1, f);
182 >                fclose(f);
183 > #endif
184  
185 <                proc_state = realloc(proc_state, (1+proc_state_size)*sizeof(proc_state_t));
186 <
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 <                
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;
# Line 98 | Line 199 | int get_proc_snapshot(proc_state_t **ps){
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->process_name = strdup(process_info.pr_fname);
203 <                proc_state_ptr->proctitle = strdup(process_info.pr_psargs);
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 +                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 +
277 +                if((ptr=sg_f_read_line(f, "Uid:"))==NULL){
278 +                        fclose(f);
279 +                        continue;
280 +                }
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 +
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  
348 + #ifdef ALLBSD
349 +        mib[0] = CTL_KERN;
350 +        mib[1] = KERN_PROC;
351 +        mib[2] = KERN_PROC_ALL;
352  
353 <                fclose(f);
354 <        }
355 <        closedir(proc_dir);
356 <        *ps = proc_state;
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 <        return proc_state_size;
359 >        procs = size / sizeof(struct kinfo_proc);
360 >
361 >        kp_stats = sg_malloc(size);
362 >        if(kp_stats == NULL) {
363 >                return NULL;
364 >        }
365 >        memset(kp_stats, 0, size);
366 >
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 >        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