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.11 by pajs, Thu Oct 9 19:40:03 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--){
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[procs].ki_stat == SSLEEP) process_stat.sleeping++;
147 <                if (kp_stats[procs].ki_stat == SWAIT) process_stat.sleeping++;
148 <                if (kp_stats[procs].ki_stat == SLOCK) process_stat.sleeping++;
149 <                if (kp_stats[procs].ki_stat == SRUN) process_stat.running++;
150 <                if (kp_stats[procs].ki_stat == SIDL) process_stat.running++;
151 <                if (kp_stats[procs].ki_stat == SZOMB) process_stat.zombie++;
152 <                if (kp_stats[procs].ki_stat == SSTOP) process_stat.stopped++;
153 <                
382 >                if (kp_stats[i].ki_stat == 0) {
383   #else
384 <                if (kp_stats[procs].kp_proc.p_stat == SSLEEP) process_stat.sleeping++;  
156 <                if (kp_stats[procs].kp_proc.p_stat == SRUN) process_stat.running++;
157 <                if (kp_stats[procs].kp_proc.p_stat == SIDL) process_stat.running++;
158 <                if (kp_stats[procs].kp_proc.p_stat == SZOMB) process_stat.zombie++;
159 <                if (kp_stats[procs].kp_proc.p_stat == SSTOP) process_stat.stopped++;
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 <        kvm_close(kvmd);
691 >        free(kp_stats);
692   #endif
693  
694 <        process_stat.total=process_stat.sleeping+process_stat.running+process_stat.zombie+process_stat.stopped;
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