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.24 by pajs, Sun Mar 28 18:22:58 2004 UTC vs.
Revision 1.33 by tdb, Sun Apr 4 11:28:46 2004 UTC

# Line 42 | Line 42
42   #endif
43   #ifdef LINUX
44   #include <limits.h>
45 + #include <unistd.h>
46 + #include <sys/stat.h>
47 + #include <fcntl.h>
48   #define PROC_LOCATION "/proc"
49   #define MAX_FILE_LENGTH PATH_MAX
50   #endif
# Line 54 | Line 57
57   #else
58   #include <sys/proc.h>
59   #endif
60 + #include <string.h>
61 + #include <paths.h>
62 + #include <fcntl.h>
63 + #include <limits.h>
64 + #include <kvm.h>
65   #endif
66  
67   int get_proc_snapshot(proc_state_t **ps){
68          proc_state_t *proc_state = NULL;
69          proc_state_t *proc_state_ptr;
70          int proc_state_size = 0;
71 + #ifdef ALLBSD
72 +        int mib[3];
73 +        size_t size;
74 +        struct kinfo_proc *kp_stats;
75 +        int procs, i, alloc;
76 +        static kvm_t *kvmd;
77 +        char **args;
78 +        char *proctitle;
79 + #endif
80   #if defined(SOLARIS) || defined(LINUX)
81          DIR *proc_dir;
82          struct dirent *dir_entry;
# Line 68 | Line 85 | int get_proc_snapshot(proc_state_t **ps){
85   #ifdef SOLARIS
86          psinfo_t process_info;
87   #endif
88 + #ifdef LINUX
89 +        char s;
90 +        /* If someone has a executable of 4k filename length, they deserve to get it truncated :) */
91 +        char ps_name[4096];
92 +        char *ptr;
93 +        static char *psargs = NULL;
94 +        static int psarg_size = 0;
95 +        unsigned long stime, utime;
96 +        int x;
97 +        int fn;
98 +        int toread;
99 +        ssize_t size;
100 +        int t_read;
101 + #endif
102  
103          if((proc_dir=opendir(PROC_LOCATION))==NULL){
104 <                return NULL;
104 >                return -1;
105          }
106  
107          while((dir_entry=readdir(proc_dir))!=NULL){
# Line 79 | Line 110 | int get_proc_snapshot(proc_state_t **ps){
110   #ifdef SOLARIS
111                  snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
112   #endif
113 + #ifdef LINUX
114 +                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/stat", dir_entry->d_name);
115 + #endif
116                  if((f=fopen(filename, "r"))==NULL){
117                          /* Open failed.. Process since vanished, or the path was too long.
118                           * Ah well, move onwards to the next one */
# Line 86 | Line 120 | int get_proc_snapshot(proc_state_t **ps){
120                  }
121   #ifdef SOLARIS
122                  fread(&process_info, sizeof(psinfo_t), 1, f);
123 + #endif
124  
125                  proc_state = realloc(proc_state, (1+proc_state_size)*sizeof(proc_state_t));
126                  proc_state_ptr = proc_state+proc_state_size;
127 <                
127 > #ifdef SOLARIS          
128                  proc_state_ptr->pid = process_info.pr_pid;
129                  proc_state_ptr->parent = process_info.pr_ppid;
130                  proc_state_ptr->pgid = process_info.pr_pgid;
# Line 110 | Line 145 | int get_proc_snapshot(proc_state_t **ps){
145                  if(process_info.pr_lwp.pr_state==4) proc_state_ptr->state = STOPPED;
146                  if(process_info.pr_lwp.pr_state==6) proc_state_ptr->state = RUNNING;
147   #endif
148 + #ifdef LINUX
149 +                x = fscanf(f, "%d %4096s %c %d %d %*d %*d %*d %*lu %*lu %*lu %*lu %*lu %lu %lu %*ld %*ld %*ld %d %*ld %*ld %*lu %llu %llu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*lu %*d %*d\n", &(proc_state_ptr->pid), ps_name, &s, &(proc_state_ptr->parent), &(proc_state_ptr->pgid), &utime, &stime, &(proc_state_ptr->nice), &(proc_state_ptr->proc_size), &(proc_state_ptr->proc_resident));
150 +                proc_state_ptr->proc_resident = proc_state_ptr->proc_resident * getpagesize();
151 +                if(s == 'S') proc_state_ptr->state = SLEEPING;
152 +                if(s == 'R') proc_state_ptr->state = RUNNING;
153 +                if(s == 'Z') proc_state_ptr->state = ZOMBIE;
154 +                if(s == 'T') proc_state_ptr->state = STOPPED;
155 +                if(s == 'D') proc_state_ptr->state = STOPPED;
156 +        
157 +                /* pa_name[0] should = '(' */
158 +                ptr = strchr(&ps_name[1], ')');
159 +                if(ptr !=NULL) *ptr='\0';
160 +                proc_state_ptr->process_name = strdup(&ps_name[1]);
161  
162 <                proc_state_size++;
162 >                /* Need to do cpu */
163 >                
164 >
165 >                /* proctitle */
166 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/cmdline", dir_entry->d_name);
167 >
168 >                if((fn=open(filename, O_RDONLY)) == -1){
169 >                        /* Open failed.. Process since vanished, or the path was too long.
170 >                         * Ah well, move onwards to the next one */
171 >                        continue;
172 >                }
173 > #define         PSARG_START_SIZE 128
174 >                if(psargs == NULL){
175 >                        psargs = malloc(PSARG_START_SIZE);
176 >                        psarg_size = PSARG_START_SIZE;
177 >                }
178 >                ptr = psargs;  
179 >                t_read = 0;
180 >                toread = psarg_size;
181 >                while((size = read(fn, ptr, toread)) == toread){
182 >                        psargs = realloc(psargs, (psarg_size + PSARG_START_SIZE));
183 >                        ptr = psargs+psarg_size;
184 >                        t_read = psarg_size;
185 >                        psarg_size+=PSARG_START_SIZE;
186 >                        toread = PSARG_START_SIZE;
187 >                }
188 >                if(size != -1) t_read+=size;
189 >
190 >                ptr = psargs;
191 >                for(x=0; x<t_read; x++){
192 >                        if (*ptr == '\0') *ptr = ' ';
193 >                        ptr++;
194 >                }
195 >                /*  for safety sake */
196 >                psargs[t_read] = '\0';
197 >
198 >                proc_state_ptr->proctitle = strdup(psargs);
199 >
200   #endif
201  
202 +                proc_state_size++;
203  
204                  fclose(f);
205          }
206          closedir(proc_dir);
207 <        *ps = proc_state;
207 > #endif
208  
209 + #ifdef ALLBSD
210 +
211 + #ifdef NETBSD
212 +        kvmd = kvm_openfiles(NULL, NULL, NULL, O_RDONLY, NULL);
213 + #else
214 +        kvmd = kvm_openfiles(_PATH_DEVNULL, _PATH_DEVNULL, NULL, O_RDONLY, NULL);
215 + #endif
216 +
217 +        if(kvmd == NULL) return NULL;
218 +
219 +        kp_stats = kvm_getprocs(kvmd, KERN_PROC_ALL, 0, &procs);
220 +
221 +        if (kp_stats == NULL || procs < 0) {
222 +                return NULL;
223 +        }
224 +
225 +        for (i = 0; i < procs; i++) {
226 +                /* replace with something more sensible */
227 +                proc_state = realloc(proc_state,
228 +                                (1+proc_state_size)*sizeof(proc_state_t));
229 +                if(proc_state == NULL ) {
230 +                        return NULL;
231 +                }
232 +                proc_state_ptr = proc_state+proc_state_size;
233 +
234 + #ifdef FREEBSD5
235 +                proc_state_ptr->process_name =
236 +                        strdup(kp_stats[i].ki_comm);
237 + #else
238 +                proc_state_ptr->process_name =
239 +                        strdup(kp_stats[i].kp_proc.p_comm);
240 + #endif
241 +
242 +                args = kvm_getargv(kvmd, &(kp_stats[i]), 0);
243 +                if(args != NULL) {
244 +                        alloc = 1;
245 +                        proctitle = malloc(alloc);
246 +                        if(proctitle == NULL) {
247 +                                return NULL;
248 +                        }
249 +                        while(*args != NULL) {
250 +                                if(strlen(proctitle) + strlen(*args) >= alloc) {
251 +                                        alloc = (alloc + strlen(*args)) << 1;
252 +                                        proctitle = realloc(proctitle, alloc);
253 +                                        if(proctitle == NULL) {
254 +                                                return NULL;
255 +                                        }
256 +                                }
257 +                                strncat(proctitle, *args, strlen(*args));
258 +                                strncat(proctitle, " ", 1);
259 +                                args++;
260 +                        }
261 +                        /* remove trailing space */
262 +                        proctitle[strlen(proctitle)-1] = NULL;
263 +                        proc_state_ptr->proctitle = proctitle;
264 +                }
265 +                else {
266 +                        proc_state_ptr->proctitle =
267 +                                malloc(strlen(proc_state_ptr->process_name)+4);
268 +                        if(proc_state_ptr->proctitle == NULL) {
269 +                                return NULL;
270 +                        }
271 +                        sprintf(proc_state_ptr->proctitle, " (%s)",
272 +                                proc_state_ptr->process_name);
273 +                }
274 +
275 + #ifdef FREEBSD5
276 +                proc_state_ptr->pid = kp_stats[i].ki_pid;
277 +                proc_state_ptr->parent = kp_stats[i].ki_ppid;
278 +                proc_state_ptr->pgid = kp_stats[i].ki_pgid;
279 + #else
280 +                proc_state_ptr->pid = kp_stats[i].kp_proc.p_pid;
281 +                proc_state_ptr->parent = kp_stats[i].kp_eproc.e_ppid;
282 +                proc_state_ptr->pgid = kp_stats[i].kp_eproc.e_pgid;
283 + #endif
284 +
285 + #ifdef FREEBSD5
286 +                proc_state_ptr->uid = kp_stats[i].ki_ruid;
287 +                proc_state_ptr->euid = kp_stats[i].ki_uid;
288 +                proc_state_ptr->gid = kp_stats[i].ki_rgid;
289 +                proc_state_ptr->egid = kp_stats[i].ki_svgid;
290 + #else
291 +                proc_state_ptr->uid = kp_stats[i].kp_eproc.e_pcred.p_ruid;
292 +                proc_state_ptr->euid = kp_stats[i].kp_eproc.e_pcred.p_svuid;
293 +                proc_state_ptr->gid = kp_stats[i].kp_eproc.e_pcred.p_rgid;
294 +                proc_state_ptr->egid = kp_stats[i].kp_eproc.e_pcred.p_svgid;
295 + #endif
296 +
297 + #ifdef FREEBSD5
298 +                proc_state_ptr->proc_size = kp_stats[i].ki_size;
299 +                /* This is in pages */
300 +                proc_state_ptr->proc_resident =
301 +                        kp_stats[i].ki_rssize * getpagesize();
302 +                /* This is in microseconds */
303 +                proc_state_ptr->time_spent = kp_stats[i].ki_runtime / 1000000;
304 +                proc_state_ptr->cpu_percent =
305 +                        ((double)kp_stats[i].ki_pctcpu / FSCALE) * 100.0;
306 +                proc_state_ptr->nice = kp_stats[i].ki_nice;
307 + #else
308 +                proc_state_ptr->proc_size =
309 +                        kp_stats[i].kp_eproc.e_vm.vm_map.size;
310 +                /* This is in pages */
311 +                proc_state_ptr->proc_resident =
312 +                        kp_stats[i].kp_eproc.e_vm.vm_rssize * getpagesize();
313 +                /* This is in microseconds */
314 + #ifdef NETBSD
315 +                proc_state_ptr->time_spent =
316 +                        kp_stats[i].kp_proc.p_rtime.tv_sec;
317 + #else
318 +                proc_state_ptr->time_spent =
319 +                        kp_stats[i].kp_proc.p_runtime / 1000000;
320 + #endif
321 +                proc_state_ptr->cpu_percent =
322 +                        ((double)kp_stats[i].kp_proc.p_pctcpu / FSCALE) * 100.0;
323 +                proc_state_ptr->nice = kp_stats[i].kp_proc.p_nice;
324 + #endif
325 +
326 + #ifdef FREEBSD5
327 +                switch (kp_stats[i].ki_stat) {
328 + #else
329 +                switch (kp_stats[i].kp_proc.p_stat) {
330 + #endif
331 +                case SIDL:
332 +                case SRUN:
333 + #ifdef SONPROC
334 +                case SONPROC: /* NetBSD */
335 + #endif
336 +                        proc_state_ptr->state = RUNNING;
337 +                        break;
338 +                case SSLEEP:
339 + #ifdef SWAIT
340 +                case SWAIT: /* FreeBSD 5 */
341 + #endif
342 + #ifdef SLOCK
343 +                case SLOCK: /* FreeBSD 5 */
344 + #endif
345 +                        proc_state_ptr->state = SLEEPING;
346 +                        break;
347 +                case SSTOP:
348 +                        proc_state_ptr->state = STOPPED;
349 +                        break;
350 +                case SZOMB:
351 + #ifdef SDEAD
352 +                case SDEAD: /* OpenBSD & NetBSD */
353 + #endif
354 +                        proc_state_ptr->state = ZOMBIE;
355 +                        break;
356 +                default:
357 +                        proc_state_ptr->state = UNKNOWN;
358 +                        break;
359 +                }
360 +                proc_state_size++;
361 +        }
362 +
363 +        free(kp_stats);
364 + #endif
365 +
366 +        *ps = proc_state;
367          return proc_state_size;
368   }
369  
370 + process_stat_t *get_process_stats() {
371 +        static process_stat_t process_stat;
372 +        proc_state_t *ps;
373 +        int ps_size, x;
374 +
375 +        process_stat.sleeping = 0;
376 +        process_stat.running = 0;
377 +        process_stat.zombie = 0;
378 +        process_stat.stopped = 0;
379 +        process_stat.total = 0;
380 +
381 +        ps_size = get_proc_snapshot(&ps);
382 +
383 +        if(ps_size == NULL) {
384 +                return NULL;
385 +        }
386 +
387 +        for(x = 0; x < ps_size; x++) {
388 +                switch (ps->state) {
389 +                /* currently no mapping for UNKNOWN in process_stat_t */
390 +                case RUNNING:
391 +                        process_stat.running++;
392 +                        break;
393 +                case SLEEPING:
394 +                        process_stat.sleeping++;
395 +                        break;
396 +                case STOPPED:
397 +                        process_stat.stopped++;
398 +                        break;
399 +                case ZOMBIE:
400 +                        process_stat.zombie++;
401 +                        break;
402 +                }
403 +                ps++;
404 +        }
405 +
406 +        process_stat.total = ps_size;
407 +
408 +        return &process_stat;
409 + }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines