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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines