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.57 by tdb, Tue Apr 6 14:52:58 2004 UTC vs.
Revision 1.73 by tdb, Mon Jun 21 14:48:48 2004 UTC

# Line 51 | Line 51
51   #define MAX_FILE_LENGTH PATH_MAX
52   #endif
53   #ifdef ALLBSD
54 + #include <errno.h>
55   #include <stdlib.h>
56   #include <sys/param.h>
57   #include <sys/sysctl.h>
# Line 65 | Line 66
66   #include <limits.h>
67   #if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
68   #include <kvm.h>
68 #include <tools.h>
69   #endif
70   #include <unistd.h>
71   #ifdef NETBSD2
# Line 85 | Line 85 | static void proc_state_destroy(sg_process_stats *s) {
85  
86   sg_process_stats *sg_get_process_stats(int *entries){
87          VECTOR_DECLARE_STATIC(proc_state, sg_process_stats, 64,
88 <                              proc_state_init, proc_state_destroy);
88 >                              proc_state_init, proc_state_destroy);
89          int proc_state_size = 0;
90          sg_process_stats *proc_state_ptr;
91   #ifdef ALLBSD
# Line 100 | Line 100 | sg_process_stats *sg_get_process_stats(int *entries){
100          int argslen = 0;
101   #else
102          long buflen;
103 <        char *p;
103 >        char *p, *proctitletmp;
104   #endif
105   #ifdef NETBSD2
106          int lwps;
# Line 108 | Line 108 | sg_process_stats *sg_get_process_stats(int *entries){
108   #endif
109   #endif
110   #if defined(SOLARIS) || defined(LINUX)
111 <        DIR *proc_dir;
112 <        struct dirent *dir_entry;
113 <        char filename[MAX_FILE_LENGTH];
114 <        FILE *f;
111 >        DIR *proc_dir;
112 >        struct dirent *dir_entry;
113 >        char filename[MAX_FILE_LENGTH];
114 >        FILE *f;
115   #ifdef SOLARIS
116          psinfo_t process_info;
117   #endif
# Line 121 | Line 121 | sg_process_stats *sg_get_process_stats(int *entries){
121          char ps_name[4096];
122          char *ptr;
123          VECTOR_DECLARE_STATIC(psargs, char, 128, NULL, NULL);
124 <        unsigned long stime, utime;
124 >        unsigned long stime, utime, starttime;
125          int x;
126          int fn;
127          int len;
128          int rc;
129 +        time_t uptime;
130   #endif
131  
132 <        if((proc_dir=opendir(PROC_LOCATION))==NULL){
133 <                return NULL;
134 <        }
132 > #ifdef LINUX
133 >        if ((f=fopen("/proc/uptime", "r")) == NULL) {
134 >                sg_set_error(SG_ERROR_OPEN, "/proc/uptime");
135 >                return NULL;
136 >        }
137 >        if((fscanf(f,"%lu %*d",&uptime)) != 1){
138 >                sg_set_error(SG_ERROR_PARSE, NULL);
139 >                return NULL;
140 >        }
141 >        fclose(f);
142 > #endif
143  
144 <        while((dir_entry=readdir(proc_dir))!=NULL){
145 <                if(atoi(dir_entry->d_name) == 0) continue;
144 >        if((proc_dir=opendir(PROC_LOCATION))==NULL){
145 >                sg_set_error(SG_ERROR_OPENDIR, PROC_LOCATION);
146 >                return NULL;
147 >        }
148  
149 +        while((dir_entry=readdir(proc_dir))!=NULL){
150 +                if(atoi(dir_entry->d_name) == 0) continue;
151 +
152   #ifdef SOLARIS
153 <                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
153 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
154   #endif
155   #ifdef LINUX
156                  snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/stat", dir_entry->d_name);
157   #endif
158 <                if((f=fopen(filename, "r"))==NULL){
159 <                        /* Open failed.. Process since vanished, or the path was too long.
160 <                         * Ah well, move onwards to the next one */
161 <                        continue;
162 <                }
158 >                if((f=fopen(filename, "r"))==NULL){
159 >                        /* Open failed.. Process since vanished, or the path was too long.
160 >                         * Ah well, move onwards to the next one */
161 >                        continue;
162 >                }
163   #ifdef SOLARIS
164 <                fread(&process_info, sizeof(psinfo_t), 1, f);
164 >                fread(&process_info, sizeof(psinfo_t), 1, f);
165 >                fclose(f);
166   #endif
167  
168                  if (VECTOR_RESIZE(proc_state, proc_state_size + 1) < 0) {
# Line 167 | Line 182 | sg_process_stats *sg_get_process_stats(int *entries){
182                  proc_state_ptr->proc_resident = (process_info.pr_rssize) * 1024;
183                  proc_state_ptr->time_spent = process_info.pr_time.tv_sec;
184                  proc_state_ptr->cpu_percent = (process_info.pr_pctcpu * 100.0) / 0x8000;
185 <                proc_state_ptr->process_name = strdup(process_info.pr_fname);
186 <                proc_state_ptr->proctitle = strdup(process_info.pr_psargs);
185 >                proc_state_ptr->nice = (int)process_info.pr_lwp.pr_nice - 20;
186 >                if (sg_update_string(&proc_state_ptr->process_name,
187 >                                     process_info.pr_fname) < 0) {
188 >                        return NULL;
189 >                }
190 >                if (sg_update_string(&proc_state_ptr->proctitle,
191 >                                     process_info.pr_psargs) < 0) {
192 >                        return NULL;
193 >                }
194  
195 <                if(process_info.pr_lwp.pr_state==1) proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
196 <                if(process_info.pr_lwp.pr_state==2) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
197 <                if(process_info.pr_lwp.pr_state==3) proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
198 <                if(process_info.pr_lwp.pr_state==4) proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
199 <                if(process_info.pr_lwp.pr_state==6) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
195 >                if(process_info.pr_lwp.pr_state==1) proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
196 >                if(process_info.pr_lwp.pr_state==2) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
197 >                if(process_info.pr_lwp.pr_state==3) proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
198 >                if(process_info.pr_lwp.pr_state==4) proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
199 >                if(process_info.pr_lwp.pr_state==6) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
200   #endif
201   #ifdef LINUX
202 <                x = fscanf(f, "%d %4096s %c %d %d %*d %*d %*d %*u %*u %*u %*u %*u %lu %lu %*d %*d %*d %d %*d %*d %*u %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), &(proc_state_ptr->proc_size), &(proc_state_ptr->proc_resident));
203 <                proc_state_ptr->proc_resident = proc_state_ptr->proc_resident * getpagesize();
202 >                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));
203 >                /* +3 becuase man page says "Resident  Set Size: number of pages the process has in real memory, minus 3 for administrative purposes." */
204 >                proc_state_ptr->proc_resident = (proc_state_ptr->proc_resident + 3) * getpagesize();
205                  if(s == 'S') proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
206                  if(s == 'R') proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
207                  if(s == 'Z') proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
# Line 190 | Line 213 | sg_process_stats *sg_get_process_stats(int *entries){
213                  if(ptr !=NULL) *ptr='\0';
214  
215                  if (sg_update_string(&proc_state_ptr->process_name,
216 <                                     &ps_name[1]) < 0) {
216 >                                     &ps_name[1]) < 0) {
217                          return NULL;
218                  }
219  
220 <                /* Need to do cpu */
221 <                
220 >                /* cpu */
221 >                proc_state_ptr->cpu_percent = (100.0 * (utime + stime)) / ((uptime * 100.0) - starttime);
222  
223 <                fclose(f);
223 >                fclose(f);
224  
225 +                /* uid / gid */
226 +                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/status", dir_entry->d_name);
227 +                if ((f=fopen(filename, "r")) == NULL) {
228 +                        /* Open failed.. Process since vanished, or the path was too long.
229 +                         * Ah well, move onwards to the next one */
230 +                        continue;
231 +                }
232 +
233 +                if((ptr=sg_f_read_line(f, "Uid:"))==NULL){
234 +                        fclose(f);
235 +                        continue;
236 +                }
237 +                sscanf(ptr, "Uid:\t%d\t%d\t%*d\t%*d\n", &(proc_state_ptr->uid), &(proc_state_ptr->euid));
238 +
239 +                if((ptr=sg_f_read_line(f, "Gid:"))==NULL){
240 +                        fclose(f);
241 +                        continue;
242 +                }
243 +                sscanf(ptr, "Gid:\t%d\t%d\t%*d\t%*d\n", &(proc_state_ptr->gid), &(proc_state_ptr->egid));
244 +
245 +                fclose(f);
246 +
247                  /* proctitle */
248                  snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/cmdline", dir_entry->d_name);
249  
250 <                if((fn=open(filename, O_RDONLY)) == -1){
251 <                        /* Open failed.. Process since vanished, or the path was too long.
252 <                         * Ah well, move onwards to the next one */
253 <                        continue;
254 <                }
250 >                if((fn=open(filename, O_RDONLY)) == -1){
251 >                        /* Open failed.. Process since vanished, or the path was too long.
252 >                         * Ah well, move onwards to the next one */
253 >                        continue;
254 >                }
255  
256   #define READ_BLOCK_SIZE 128
257                  len = 0;
# Line 252 | Line 297 | sg_process_stats *sg_get_process_stats(int *entries){
297   #endif
298  
299                  proc_state_size++;
300 <        }
301 <        closedir(proc_dir);
300 >        }
301 >        closedir(proc_dir);
302   #endif
303  
304   #ifdef ALLBSD
# Line 262 | Line 307 | sg_process_stats *sg_get_process_stats(int *entries){
307          mib[2] = KERN_PROC_ALL;
308  
309          if(sysctl(mib, 3, NULL, &size, NULL, 0) < 0) {
310 +                sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_PROC.KERN_PROC_ALL");
311                  return NULL;
312          }
313  
314          procs = size / sizeof(struct kinfo_proc);
315  
316 <        kp_stats = malloc(size);
316 >        kp_stats = sg_malloc(size);
317          if(kp_stats == NULL) {
318                  return NULL;
319          }
320          memset(kp_stats, 0, size);
321  
322          if(sysctl(mib, 3, kp_stats, &size, NULL, 0) < 0) {
323 +                sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_PROC.KERN_PROC_ALL");
324                  free(kp_stats);
325                  return NULL;
326          }
# Line 315 | Line 362 | sg_process_stats *sg_get_process_stats(int *entries){
362                  }
363  
364   #if defined(FREEBSD5) || defined(NETBSD) || defined(OPENBSD)
318                size = sizeof(buflen);
365  
366   #ifdef FREEBSD5
321                if(sysctlbyname("kern.ps_arg_cache_limit", &buflen, &size, NULL, 0) < 0) {
322                        return NULL;
323                }
324 #else
325                /* FIXME - this value can be too large on some of
326                   the BSD's, which causes sysctl not to return
327                   anything. Maybe we need something smaller? */
328                mib[1] = KERN_ARGMAX;
329
330                if(sysctl(mib, 2, &buflen, &size, NULL, 0) < 0) {
331                        return NULL;
332                }
333 #endif
334
335                proctitle = malloc(buflen);
336                if(proctitle == NULL) {
337                        return NULL;
338                }
339
340                size = buflen;
341
342 #ifdef FREEBSD5
367                  mib[2] = KERN_PROC_ARGS;
368                  mib[3] = kp_stats[i].ki_pid;
369   #else
# Line 349 | Line 373 | sg_process_stats *sg_get_process_stats(int *entries){
373   #endif
374  
375                  free(proc_state_ptr->proctitle);
376 <                if(sysctl(mib, 4, proctitle, &size, NULL, 0) < 0) {
377 <                        free(proctitle);
378 <                        proc_state_ptr->proctitle = NULL;
379 <                }
380 <                else if(size > 0) {
381 <                        proc_state_ptr->proctitle = malloc(size+1);
376 >                proc_state_ptr->proctitle = NULL;
377 >
378 > /* Starting size - we'll double this straight away */
379 > #define PROCTITLE_START_SIZE 64
380 >                buflen = PROCTITLE_START_SIZE;
381 >                size = buflen;
382 >                proctitle = NULL;
383 >
384 >                do {
385 >                        if(size >= buflen) {
386 >                                buflen *= 2;
387 >                                size = buflen;
388 >                                proctitletmp = sg_realloc(proctitle, buflen);
389 >                                if(proctitletmp == NULL) {
390 >                                        free(proctitle);
391 >                                        proctitle = NULL;
392 >                                        proc_state_ptr->proctitle = NULL;
393 >                                        size = 0;
394 >                                        break;
395 >                                }
396 >                                proctitle = proctitletmp;
397 >                                bzero(proctitle, buflen);
398 >                        }
399 >
400 >                        if(sysctl(mib, 4, proctitle, &size, NULL, 0) < 0) {
401 >                                free(proctitle);
402 >                                proctitle = NULL;
403 >                                proc_state_ptr->proctitle = NULL;
404 >                                size = 0;
405 >                                break;
406 >                        }
407 >                } while(size >= buflen);
408 >
409 >                if(size > 0) {
410 >                        proc_state_ptr->proctitle = sg_malloc(size+1);
411                          if(proc_state_ptr->proctitle == NULL) {
412                                  return NULL;
413                          }
414                          p = proctitle;
415 + #ifdef OPENBSD
416 +                        /* On OpenBSD, this value has the argv pointers (which
417 +                         * are terminated by a NULL) at the front, so we have
418 +                         * to skip over them to get to the strings. */
419 +                        while (*(char ***)p != NULL) {
420 +                                p += sizeof(char **);
421 +                        }
422 +                        p += sizeof(char **);
423 + #endif
424                          proc_state_ptr->proctitle[0] = '\0';
425                          do {
426                                  sg_strlcat(proc_state_ptr->proctitle, p, size+1);
# Line 366 | Line 428 | sg_process_stats *sg_get_process_stats(int *entries){
428                                  p += strlen(p) + 1;
429                          } while (p < proctitle + size);
430                          free(proctitle);
431 +                        proctitle = NULL;
432                          /* remove trailing space */
433                          proc_state_ptr->proctitle[strlen(proc_state_ptr->proctitle)-1] = '\0';
434                  }
435                  else {
436 <                        free(proctitle);
436 >                        if(proctitle != NULL) {
437 >                                free(proctitle);
438 >                                proctitle = NULL;
439 >                        }
440                          proc_state_ptr->proctitle = NULL;
441                  }
442   #else
443                  free(proc_state_ptr->proctitle);
444 +                proc_state_ptr->proctitle = NULL;
445                  if(kvmd != NULL) {
446                          args = kvm_getargv(kvmd, &(kp_stats[i]), 0);
447                          if(args != NULL) {
# Line 383 | Line 450 | sg_process_stats *sg_get_process_stats(int *entries){
450                                          argslen += strlen(*argsp) + 1;
451                                          argsp++;
452                                  }
453 <                                proctitle = malloc(argslen + 1);
453 >                                proctitle = sg_malloc(argslen + 1);
454                                  proctitle[0] = '\0';
455                                  if(proctitle == NULL) {
456                                          return NULL;
# Line 479 | Line 546 | sg_process_stats *sg_get_process_stats(int *entries){
546                          mib[4] = 0;
547  
548                          if(sysctl(mib, 5, NULL, &size, NULL, 0) < 0) {
549 +                                sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_LWP.pid.structsize.0");
550                                  return NULL;
551                          }
552  
553                          lwps = size / sizeof(struct kinfo_lwp);
554                          mib[4] = lwps;
555  
556 <                        kl_stats = malloc(size);
556 >                        kl_stats = sg_malloc(size);
557                          if(kl_stats == NULL) {
558                                  return NULL;
559                          }
560  
561                          if(sysctl(mib, 5, kl_stats, &size, NULL, 0) < 0) {
562 +                                sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_LWP.pid.structsize.buffersize");
563                                  return NULL;
564                          }
565                  }
# Line 532 | Line 601 | sg_process_stats *sg_get_process_stats(int *entries){
601                          proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
602                          break;
603                  }
604 +
605 +                free(kl_stats);
606   #else
607   #ifdef FREEBSD5
608                  switch (kp_stats[i].ki_stat) {
# Line 575 | Line 646 | sg_process_stats *sg_get_process_stats(int *entries){
646   #endif
647  
648   #ifdef CYGWIN
649 +        sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
650          return NULL;
651   #endif
652  
# Line 624 | Line 696 | sg_process_count *sg_get_process_count() {
696  
697          return &process_stat;
698   }
699 +
700 + int sg_process_compare_name(const void *va, const void *vb) {
701 +        const sg_process_stats *a = (sg_process_stats *)va;
702 +        const sg_process_stats *b = (sg_process_stats *)vb;
703 +
704 +        return strcmp(a->process_name, b->process_name);
705 + }
706 +
707 + int sg_process_compare_pid(const void *va, const void *vb) {
708 +        const sg_process_stats *a = (sg_process_stats *)va;
709 +        const sg_process_stats *b = (sg_process_stats *)vb;
710 +
711 +        if (a->pid < b->pid) {
712 +                return -1;
713 +        } else if (a->pid == b->pid) {
714 +                return 0;
715 +        } else {
716 +                return 1;
717 +        }
718 + }
719 +
720 + int sg_process_compare_uid(const void *va, const void *vb) {
721 +        const sg_process_stats *a = (sg_process_stats *)va;
722 +        const sg_process_stats *b = (sg_process_stats *)vb;
723 +
724 +        if (a->uid < b->uid) {
725 +                return -1;
726 +        } else if (a->uid == b->uid) {
727 +                return 0;
728 +        } else {
729 +                return 1;
730 +        }
731 + }
732 +
733 + int sg_process_compare_gid(const void *va, const void *vb) {
734 +        const sg_process_stats *a = (sg_process_stats *)va;
735 +        const sg_process_stats *b = (sg_process_stats *)vb;
736 +
737 +        if (a->gid < b->gid) {
738 +                return -1;
739 +        } else if (a->gid == b->gid) {
740 +                return 0;
741 +        } else {
742 +                return 1;
743 +        }
744 + }
745 +
746 + int sg_process_compare_size(const void *va, const void *vb) {
747 +        const sg_process_stats *a = (sg_process_stats *)va;
748 +        const sg_process_stats *b = (sg_process_stats *)vb;
749 +
750 +        if (a->proc_size < b->proc_size) {
751 +                return -1;
752 +        } else if (a->proc_size == b->proc_size) {
753 +                return 0;
754 +        } else {
755 +                return 1;
756 +        }
757 + }
758 +
759 + int sg_process_compare_res(const void *va, const void *vb) {
760 +        const sg_process_stats *a = (sg_process_stats *)va;
761 +        const sg_process_stats *b = (sg_process_stats *)vb;
762 +
763 +        if (a->proc_resident < b->proc_resident) {
764 +                return -1;
765 +        } else if (a->proc_resident == b->proc_resident) {
766 +                return 0;
767 +        } else {
768 +                return 1;
769 +        }
770 + }
771 +
772 + int sg_process_compare_cpu(const void *va, const void *vb) {
773 +        const sg_process_stats *a = (sg_process_stats *)va;
774 +        const sg_process_stats *b = (sg_process_stats *)vb;
775 +
776 +        if (a->cpu_percent < b->cpu_percent) {
777 +                return -1;
778 +        } else if (a->cpu_percent == b->cpu_percent) {
779 +                return 0;
780 +        } else {
781 +                return 1;
782 +        }
783 + }
784 +
785 + int sg_process_compare_time(const void *va, const void *vb) {
786 +        const sg_process_stats *a = (sg_process_stats *)va;
787 +        const sg_process_stats *b = (sg_process_stats *)vb;
788 +
789 +        if (a->time_spent < b->time_spent) {
790 +                return -1;
791 +        } else if (a->time_spent == b->time_spent) {
792 +                return 0;
793 +        } else {
794 +                return 1;
795 +        }
796 + }
797 +

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines