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.21 by ats, Sat Feb 14 16:43:55 2004 UTC vs.
Revision 1.26 by tdb, Tue Mar 30 22:10:04 2004 UTC

# Line 34 | Line 34
34   #include <string.h>
35   #endif
36  
37 #include "tools.h"
37   #ifdef SOLARIS
38   #include <procfs.h>
39   #include <limits.h>
# Line 43 | 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 50 | Line 52
52   #include <stdlib.h>
53   #include <sys/param.h>
54   #include <sys/sysctl.h>
55 + #if defined(FREEBSD) || defined(DFBSD)
56 + #include <sys/user.h>
57 + #else
58   #include <sys/proc.h>
59   #endif
55 #ifdef FREEBSD
56 #include <sys/user.h>
60   #endif
61  
62 < process_stat_t *get_process_stats(){
63 <
64 <        static process_stat_t process_stat;
65 <
63 < #if defined(SOLARIS) || defined(LINUX)
64 <        DIR *proc_dir;
65 <        struct dirent *dir_entry;
66 <        char filename[MAX_FILE_LENGTH];
67 <        FILE *f;
68 < #endif
69 < #ifdef LINUX
70 <        char *line_ptr;
71 < #endif
72 < #ifdef SOLARIS
73 <        psinfo_t process_info;
74 < #endif
62 > int get_proc_snapshot(proc_state_t **ps){
63 >        proc_state_t *proc_state = NULL;
64 >        proc_state_t *proc_state_ptr;
65 >        int proc_state_size = 0;
66   #ifdef ALLBSD
67          int mib[3];
68          size_t size;
69 <        struct kinfo_proc *kp_stats;    
69 >        struct kinfo_proc *kp_stats;
70          int procs, i;
71   #endif
81
82        process_stat.sleeping=0;
83        process_stat.running=0;
84        process_stat.zombie=0;
85        process_stat.stopped=0;
86        process_stat.total=0;
87
72   #if defined(SOLARIS) || defined(LINUX)
73 <        if((proc_dir=opendir(PROC_LOCATION))==NULL){
74 <                return NULL;
75 <        }
73 >        DIR *proc_dir;
74 >        struct dirent *dir_entry;
75 >        char filename[MAX_FILE_LENGTH];
76 >        FILE *f;
77 > #ifdef SOLARIS
78 >        psinfo_t process_info;
79 > #endif
80 > #ifdef LINUX
81 >        char s;
82 >        /* If someone has a executable of 4k filename length, they deserve to get it truncated :) */
83 >        char ps_name[4096];
84 >        char *ptr;
85 >        static char *psargs = NULL;
86 >        static int psarg_size = 0;
87 >        unsigned long stime, utime;
88 >        int x;
89 >        int fn;
90 >        int toread;
91 >        ssize_t size;
92 >        int t_read;
93 > #endif
94  
95 <        while((dir_entry=readdir(proc_dir))!=NULL){
96 <                if(atoi(dir_entry->d_name) == 0) continue;
95 >        if((proc_dir=opendir(PROC_LOCATION))==NULL){
96 >                return -1;
97 >        }
98  
99 +        while((dir_entry=readdir(proc_dir))!=NULL){
100 +                if(atoi(dir_entry->d_name) == 0) continue;
101 +
102   #ifdef SOLARIS
103 <                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
103 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
104   #endif
105   #ifdef LINUX
106 <                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/status", dir_entry->d_name);
106 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/stat", dir_entry->d_name);
107   #endif
108 +                if((f=fopen(filename, "r"))==NULL){
109 +                        /* Open failed.. Process since vanished, or the path was too long.
110 +                         * Ah well, move onwards to the next one */
111 +                        continue;
112 +                }
113 + #ifdef SOLARIS
114 +                fread(&process_info, sizeof(psinfo_t), 1, f);
115 + #endif
116  
117 <                if((f=fopen(filename, "r"))==NULL){
118 <                        /* Open failed.. Process since vanished, or the path was too long.
119 <                         * Ah well, move onwards to the next one */
120 <                        continue;
121 <                }
117 >                proc_state = realloc(proc_state, (1+proc_state_size)*sizeof(proc_state_t));
118 >                proc_state_ptr = proc_state+proc_state_size;
119 > #ifdef SOLARIS          
120 >                proc_state_ptr->pid = process_info.pr_pid;
121 >                proc_state_ptr->parent = process_info.pr_ppid;
122 >                proc_state_ptr->pgid = process_info.pr_pgid;
123 >                proc_state_ptr->uid = process_info.pr_uid;
124 >                proc_state_ptr->euid = process_info.pr_euid;
125 >                proc_state_ptr->gid = process_info.pr_gid;
126 >                proc_state_ptr->egid = process_info.pr_egid;
127 >                proc_state_ptr->proc_size = (process_info.pr_size) * 1024;
128 >                proc_state_ptr->proc_resident = (process_info.pr_rssize) * 1024;
129 >                proc_state_ptr->time_spent = process_info.pr_time.tv_sec;
130 >                proc_state_ptr->cpu_percent = (process_info.pr_pctcpu * 100.0) / 0x8000;
131 >                proc_state_ptr->process_name = strdup(process_info.pr_fname);
132 >                proc_state_ptr->proctitle = strdup(process_info.pr_psargs);
133  
134 < #ifdef SOLARIS
135 <                fread(&process_info, sizeof(psinfo_t), 1, f);
136 <                if(process_info.pr_lwp.pr_state==1) process_stat.sleeping++;
137 <                if(process_info.pr_lwp.pr_state==2) process_stat.running++;
138 <                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++;
134 >                if(process_info.pr_lwp.pr_state==1) proc_state_ptr->state = SLEEPING;
135 >                if(process_info.pr_lwp.pr_state==2) proc_state_ptr->state = RUNNING;
136 >                if(process_info.pr_lwp.pr_state==3) proc_state_ptr->state = ZOMBIE;
137 >                if(process_info.pr_lwp.pr_state==4) proc_state_ptr->state = STOPPED;
138 >                if(process_info.pr_lwp.pr_state==6) proc_state_ptr->state = RUNNING;
139   #endif
140   #ifdef LINUX
141 <                if((line_ptr=f_read_line(f, "State:"))==NULL){
142 <                        fclose(f);
143 <                        continue;
141 >                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));
142 >                proc_state_ptr->proc_resident = proc_state_ptr->proc_resident * getpagesize();
143 >                if(s == 'S') proc_state_ptr->state = SLEEPING;
144 >                if(s == 'R') proc_state_ptr->state = RUNNING;
145 >                if(s == 'Z') proc_state_ptr->state = ZOMBIE;
146 >                if(s == 'T') proc_state_ptr->state = STOPPED;
147 >                if(s == 'D') proc_state_ptr->state = STOPPED;
148 >        
149 >                /* pa_name[0] should = '(' */
150 >                ptr = strchr(&ps_name[1], ')');
151 >                if(ptr !=NULL) *ptr='\0';
152 >                proc_state_ptr->process_name = strdup(&ps_name[1]);
153 >
154 >                /* Need to do cpu */
155 >                
156 >
157 >                /* proctitle */
158 >                snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/cmdline", dir_entry->d_name);
159 >
160 >                if((fn=open(filename, O_RDONLY)) == -1){
161 >                        /* Open failed.. Process since vanished, or the path was too long.
162 >                         * Ah well, move onwards to the next one */
163 >                        continue;
164 >                }
165 > #define         PSARG_START_SIZE 128
166 >                if(psargs == NULL){
167 >                        psargs = malloc(PSARG_START_SIZE);
168 >                        psarg_size = PSARG_START_SIZE;
169                  }
170 <                if((line_ptr=strchr(line_ptr, '\t'))==NULL){
171 <                        fclose(f);
172 <                        continue;
170 >                ptr = psargs;  
171 >                t_read = 0;
172 >                toread = psarg_size;
173 >                while((size = read(fn, ptr, toread)) == toread){
174 >                        psargs = realloc(psargs, (psarg_size + PSARG_START_SIZE));
175 >                        ptr = psargs+psarg_size;
176 >                        t_read = psarg_size;
177 >                        psarg_size+=PSARG_START_SIZE;
178 >                        toread = PSARG_START_SIZE;
179                  }
180 <                line_ptr++;
181 <                if(line_ptr=='\0'){
182 <                        fclose(f);
183 <                        continue;
180 >                if(size != -1) t_read+=size;
181 >
182 >                ptr = psargs;
183 >                for(x=0; x<t_read; x++){
184 >                        if (*ptr == '\0') *ptr = ' ';
185 >                        ptr++;
186                  }
187 +                /*  for safety sake */
188 +                psargs[t_read] = '\0';
189  
190 <                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  
190 >                proc_state_ptr->proctitle = strdup(psargs);
191  
139                fclose(f);
140        }
141        closedir(proc_dir);
192   #endif
193 +
194 +                proc_state_size++;
195 +
196 +                fclose(f);
197 +        }
198 +        closedir(proc_dir);
199 + #endif
200 +
201   #ifdef ALLBSD
202          mib[0] = CTL_KERN;
203          mib[1] = KERN_PROC;
# Line 148 | Line 206 | process_stat_t *get_process_stats(){
206          if (sysctl(mib, 3, NULL, &size, NULL, 0) < 0) {
207                  return NULL;
208          }
209 <        
209 >
210          procs = size / sizeof(struct kinfo_proc);
211  
212          kp_stats = malloc(size);
213          if (kp_stats == NULL) {
214                  return NULL;
215          }
216 <        
216 >
217          if (sysctl(mib, 3, kp_stats, &size, NULL, 0) < 0) {
218                  free(kp_stats);
219                  return NULL;
220          }
221  
222          for (i = 0; i < procs; i++) {
223 < #ifdef FREEBSD5
223 >                proc_state = realloc(proc_state, (1+proc_state_size)*sizeof(proc_state_t));
224 >                proc_state_ptr = proc_state+proc_state_size;
225 >                
226 >                proc_state_ptr->process_name = strdup(kp_stats[i].ki_comm);
227 >                /* Seems we don't have access to that bit of memory */
228 >                /*proc_state_ptr->proctitle = strdup(kp_stats[i].ki_args->ar_args);*/
229 >
230 >                proc_state_ptr->pid = kp_stats[i].ki_pid;
231 >                proc_state_ptr->parent = kp_stats[i].ki_ppid;
232 >                proc_state_ptr->pgid = kp_stats[i].ki_pgid;
233 >
234 >                proc_state_ptr->uid = kp_stats[i].ki_ruid;
235 >                proc_state_ptr->euid = kp_stats[i].ki_uid;
236 >                proc_state_ptr->gid = kp_stats[i].ki_rgid;
237 >                proc_state_ptr->egid = kp_stats[i].ki_svgid;
238 >
239 >                proc_state_ptr->proc_size = kp_stats[i].ki_size;
240 >                /* This is in pages */
241 >                proc_state_ptr->proc_resident = kp_stats[i].ki_rssize * getpagesize();
242 >                /* This seems to be in microseconds */
243 >                proc_state_ptr->time_spent = kp_stats[i].ki_runtime / 1000000;
244 >                proc_state_ptr->cpu_percent = kp_stats[i].ki_pctcpu;
245 >                proc_state_ptr->nice = kp_stats[i].ki_nice;
246 >
247                  switch (kp_stats[i].ki_stat) {
167 #else
168                switch (kp_stats[i].kp_proc.p_stat) {
169 #endif
248                  case SIDL:
249                  case SRUN:
250   #ifdef SONPROC
251                  case SONPROC: /* NetBSD */
252   #endif
253 <                        process_stat.running++;
253 >                        proc_state_ptr->state = RUNNING;
254                          break;
255                  case SSLEEP:
256   #ifdef SWAIT
# Line 181 | Line 259 | process_stat_t *get_process_stats(){
259   #ifdef SLOCK
260                  case SLOCK: /* FreeBSD 5 */
261   #endif
262 <                        process_stat.sleeping++;
262 >                        proc_state_ptr->state = SLEEPING;
263                          break;
264                  case SSTOP:
265 <                        process_stat.stopped++;
265 >                        proc_state_ptr->state = STOPPED;
266                          break;
267                  case SZOMB:
268   #ifdef SDEAD
269                  case SDEAD: /* OpenBSD & NetBSD */
270   #endif
271 <                        process_stat.zombie++;
271 >                        proc_state_ptr->state = ZOMBIE;
272                          break;
273 <                }
273 >                }
274 >                proc_state_size++;
275          }
276  
277          free(kp_stats);
278   #endif
279  
280 < #ifdef CYGWIN
281 <        return NULL;
203 < #endif
204 <
205 <        process_stat.total=process_stat.sleeping+process_stat.running+process_stat.zombie+process_stat.stopped;
206 <
207 <        return &process_stat;
280 >        *ps = proc_state;
281 >        return proc_state_size;
282   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines