ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/i-scream/projects/libstatgrab/src/libstatgrab/process_stats.c

Comparing projects/libstatgrab/src/libstatgrab/process_stats.c (file contents):
Revision 1.53 by ats, Mon Apr 5 18:10:11 2004 UTC vs.
Revision 1.65 by tdb, Wed Apr 7 21:08:40 2004 UTC

#	Line 1 | Line 1
1		/*
2	<	* i-scream central monitoring system
2	>	* i-scream libstatgrab
3		* http://www.i-scream.org
4		* Copyright (C) 2000-2004 i-scream
5		*
#	Line 65 | Line 65
65		#include <limits.h>
66		#if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
67		#include <kvm.h>
68	–	#include <tools.h>
68		#endif
69		#include <unistd.h>
70	+	#ifdef NETBSD2
71	+	#include <sys/lwp.h>
72		#endif
73	+	#endif
74
75		static void proc_state_init(sg_process_stats *s) {
76		s->process_name = NULL;
#	Line 82 | Line 84 | static void proc_state_destroy(sg_process_stats *s) {
84
85		sg_process_stats *sg_get_process_stats(int *entries){
86		VECTOR_DECLARE_STATIC(proc_state, sg_process_stats, 64,
87	<	proc_state_init, proc_state_destroy);
87	>	proc_state_init, proc_state_destroy);
88		int proc_state_size = 0;
89		sg_process_stats *proc_state_ptr;
90		#ifdef ALLBSD
#	Line 99 | Line 101 | sg_process_stats *sg_get_process_stats(int *entries){
101		long buflen;
102		char *p;
103		#endif
104	+	#ifdef NETBSD2
105	+	int lwps;
106	+	struct kinfo_lwp *kl_stats;
107		#endif
108	+	#endif
109		#if defined(SOLARIS) || defined(LINUX)
110	<	DIR *proc_dir;
111	<	struct dirent *dir_entry;
112	<	char filename[MAX_FILE_LENGTH];
113	<	FILE *f;
110	>	DIR *proc_dir;
111	>	struct dirent *dir_entry;
112	>	char filename[MAX_FILE_LENGTH];
113	>	FILE *f;
114		#ifdef SOLARIS
115		psinfo_t process_info;
116		#endif
#	Line 114 | Line 120 | sg_process_stats *sg_get_process_stats(int *entries){
120		char ps_name[4096];
121		char *ptr;
122		VECTOR_DECLARE_STATIC(psargs, char, 128, NULL, NULL);
123	<	unsigned long stime, utime;
123	>	unsigned long stime, utime, starttime;
124		int x;
125		int fn;
126		int len;
127		int rc;
128	+	time_t uptime;
129		#endif
130
131	<	if((proc_dir=opendir(PROC_LOCATION))==NULL){
132	<	return NULL;
133	<	}
131	>	#ifdef LINUX
132	>	if ((f=fopen("/proc/uptime", "r")) == NULL) {
133	>	sg_set_error(SG_ERROR_OPEN, "/proc/uptime");
134	>	return NULL;
135	>	}
136	>	if((fscanf(f,"%lu %*d",&uptime)) != 1){
137	>	sg_set_error(SG_ERROR_PARSE, NULL);
138	>	return NULL;
139	>	}
140	>	fclose(f);
141	>	#endif
142
143	<	while((dir_entry=readdir(proc_dir))!=NULL){
144	<	if(atoi(dir_entry->d_name) == 0) continue;
143	>	if((proc_dir=opendir(PROC_LOCATION))==NULL){
144	>	sg_set_error(SG_ERROR_OPENDIR, PROC_LOCATION);
145	>	return NULL;
146	>	}
147
148	+	while((dir_entry=readdir(proc_dir))!=NULL){
149	+	if(atoi(dir_entry->d_name) == 0) continue;
150	+
151		#ifdef SOLARIS
152	<	snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
152	>	snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/psinfo", dir_entry->d_name);
153		#endif
154		#ifdef LINUX
155		snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/stat", dir_entry->d_name);
156		#endif
157	<	if((f=fopen(filename, "r"))==NULL){
158	<	/* Open failed.. Process since vanished, or the path was too long.
159	<	* Ah well, move onwards to the next one */
160	<	continue;
161	<	}
157	>	if((f=fopen(filename, "r"))==NULL){
158	>	/* Open failed.. Process since vanished, or the path was too long.
159	>	* Ah well, move onwards to the next one */
160	>	continue;
161	>	}
162		#ifdef SOLARIS
163	<	fread(&process_info, sizeof(psinfo_t), 1, f);
163	>	fread(&process_info, sizeof(psinfo_t), 1, f);
164	>	fclose(f);
165		#endif
166
167		if (VECTOR_RESIZE(proc_state, proc_state_size + 1) < 0) {
#	Line 160 | Line 181 | sg_process_stats *sg_get_process_stats(int *entries){
181		proc_state_ptr->proc_resident = (process_info.pr_rssize) * 1024;
182		proc_state_ptr->time_spent = process_info.pr_time.tv_sec;
183		proc_state_ptr->cpu_percent = (process_info.pr_pctcpu * 100.0) / 0x8000;
184	<	proc_state_ptr->process_name = strdup(process_info.pr_fname);
185	<	proc_state_ptr->proctitle = strdup(process_info.pr_psargs);
184	>	proc_state_ptr->nice = (int)process_info.pr_lwp.pr_nice - 20;
185	>	if (sg_update_string(&proc_state_ptr->process_name,
186	>	process_info.pr_fname) < 0) {
187	>	return NULL;
188	>	}
189	>	if (sg_update_string(&proc_state_ptr->proctitle,
190	>	process_info.pr_psargs) < 0) {
191	>	return NULL;
192	>	}
193
194	<	if(process_info.pr_lwp.pr_state==1) proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
195	<	if(process_info.pr_lwp.pr_state==2) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
196	<	if(process_info.pr_lwp.pr_state==3) proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
197	<	if(process_info.pr_lwp.pr_state==4) proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
198	<	if(process_info.pr_lwp.pr_state==6) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
194	>	if(process_info.pr_lwp.pr_state==1) proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
195	>	if(process_info.pr_lwp.pr_state==2) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
196	>	if(process_info.pr_lwp.pr_state==3) proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
197	>	if(process_info.pr_lwp.pr_state==4) proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
198	>	if(process_info.pr_lwp.pr_state==6) proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
199		#endif
200		#ifdef LINUX
201	<	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));
202	<	proc_state_ptr->proc_resident = proc_state_ptr->proc_resident * getpagesize();
201	>	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));
202	>	/* +3 becuase man page says "Resident  Set Size: number of pages the process has in real memory, minus 3 for administrative purposes." */
203	>	proc_state_ptr->proc_resident = (proc_state_ptr->proc_resident + 3) * getpagesize();
204		if(s == 'S') proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
205		if(s == 'R') proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
206		if(s == 'Z') proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
#	Line 183 | Line 212 | sg_process_stats *sg_get_process_stats(int *entries){
212		if(ptr !=NULL) *ptr='\0';
213
214		if (sg_update_string(&proc_state_ptr->process_name,
215	<	&ps_name[1]) < 0) {
215	>	&ps_name[1]) < 0) {
216		return NULL;
217		}
218
219	<	/* Need to do cpu */
220	<
219	>	/* cpu */
220	>	proc_state_ptr->cpu_percent = (100.0 * (utime + stime)) / ((uptime * 100.0) - starttime);
221
222	<	fclose(f);
222	>	fclose(f);
223
224	+	/* uid / gid */
225	+	snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/status", dir_entry->d_name);
226	+	if ((f=fopen(filename, "r")) == NULL) {
227	+	/* Open failed.. Process since vanished, or the path was too long.
228	+	* Ah well, move onwards to the next one */
229	+	continue;
230	+	}
231	+
232	+	if((ptr=sg_f_read_line(f, "Uid:"))==NULL){
233	+	fclose(f);
234	+	continue;
235	+	}
236	+	sscanf(ptr, "Uid:\t%d\t%d\t%*d\t%*d\n", &(proc_state_ptr->uid), &(proc_state_ptr->euid));
237	+
238	+	if((ptr=sg_f_read_line(f, "Gid:"))==NULL){
239	+	fclose(f);
240	+	continue;
241	+	}
242	+	sscanf(ptr, "Gid:\t%d\t%d\t%*d\t%*d\n", &(proc_state_ptr->gid), &(proc_state_ptr->egid));
243	+
244	+	fclose(f);
245	+
246		/* proctitle */
247		snprintf(filename, MAX_FILE_LENGTH, "/proc/%s/cmdline", dir_entry->d_name);
248
249	<	if((fn=open(filename, O_RDONLY)) == -1){
250	<	/* Open failed.. Process since vanished, or the path was too long.
251	<	* Ah well, move onwards to the next one */
252	<	continue;
253	<	}
249	>	if((fn=open(filename, O_RDONLY)) == -1){
250	>	/* Open failed.. Process since vanished, or the path was too long.
251	>	* Ah well, move onwards to the next one */
252	>	continue;
253	>	}
254
255		#define READ_BLOCK_SIZE 128
256		len = 0;
#	Line 245 | Line 296 | sg_process_stats *sg_get_process_stats(int *entries){
296		#endif
297
298		proc_state_size++;
299	<	}
300	<	closedir(proc_dir);
299	>	}
300	>	closedir(proc_dir);
301		#endif
302
303		#ifdef ALLBSD
#	Line 255 | Line 306 | sg_process_stats *sg_get_process_stats(int *entries){
306		mib[2] = KERN_PROC_ALL;
307
308		if(sysctl(mib, 3, NULL, &size, NULL, 0) < 0) {
309	+	sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_PROC.KERN_PROC_ALL");
310		return NULL;
311		}
312
313		procs = size / sizeof(struct kinfo_proc);
314
315	<	kp_stats = malloc(size);
315	>	kp_stats = sg_malloc(size);
316		if(kp_stats == NULL) {
317		return NULL;
318		}
319	+	memset(kp_stats, 0, size);
320
321		if(sysctl(mib, 3, kp_stats, &size, NULL, 0) < 0) {
322	+	sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_PROC.KERN_PROC_ALL");
323		free(kp_stats);
324		return NULL;
325		}
#	Line 277 | Line 331 | sg_process_stats *sg_get_process_stats(int *entries){
331		for (i = 0; i < procs; i++) {
332		const char *name;
333
334	+	#ifdef FREEBSD5
335	+	if (kp_stats[i].ki_stat == 0) {
336	+	#else
337	+	if (kp_stats[i].kp_proc.p_stat == 0) {
338	+	#endif
339	+	/* FreeBSD 5 deliberately overallocates the array that
340	+	* the sysctl returns, so we'll get a few junk
341	+	* processes on the end that we have to ignore. (Search
342	+	* for "overestimate by 5 procs" in
343	+	* src/sys/kern/kern_proc.c for more details.) */
344	+	continue;
345	+	}
346	+
347		if (VECTOR_RESIZE(proc_state, proc_state_size + 1) < 0) {
348		return NULL;
349		}
#	Line 298 | Line 365 | sg_process_stats *sg_get_process_stats(int *entries){
365
366		#ifdef FREEBSD5
367		if(sysctlbyname("kern.ps_arg_cache_limit", &buflen, &size, NULL, 0) < 0) {
368	+	sg_set_error(SG_ERROR_SYSCTLBYNAME, "kern.ps_arg_cache_limit");
369		return NULL;
370		}
371		#else
372	+	/* FIXME - this value can be too large on some of
373	+	the BSD's, which causes sysctl not to return
374	+	anything. Maybe we need something smaller? */
375		mib[1] = KERN_ARGMAX;
376
377		if(sysctl(mib, 2, &buflen, &size, NULL, 0) < 0) {
378	+	sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_ARGMAX");
379		return NULL;
380		}
381		#endif
382
383	<	proctitle = malloc(buflen);
383	>	proctitle = sg_malloc(buflen);
384		if(proctitle == NULL) {
385		return NULL;
386		}
#	Line 330 | Line 402 | sg_process_stats *sg_get_process_stats(int *entries){
402		proc_state_ptr->proctitle = NULL;
403		}
404		else if(size > 0) {
405	<	proc_state_ptr->proctitle = malloc(size+1);
405	>	proc_state_ptr->proctitle = sg_malloc(size+1);
406		if(proc_state_ptr->proctitle == NULL) {
407		return NULL;
408		}
#	Line 359 | Line 431 | sg_process_stats *sg_get_process_stats(int *entries){
431		argslen += strlen(*argsp) + 1;
432		argsp++;
433		}
434	<	proctitle = malloc(argslen + 1);
434	>	proctitle = sg_malloc(argslen + 1);
435		proctitle[0] = '\0';
436		if(proctitle == NULL) {
437		return NULL;
#	Line 443 | Line 515 | sg_process_stats *sg_get_process_stats(int *entries){
515		proc_state_ptr->nice = kp_stats[i].kp_proc.p_nice;
516		#endif
517
518	+	#ifdef NETBSD2
519	+	{
520	+	size_t size;
521	+	int mib[5];
522	+
523	+	mib[0] = CTL_KERN;
524	+	mib[1] = KERN_LWP;
525	+	mib[2] = kp_stats[i].kp_proc.p_pid;
526	+	mib[3] = sizeof(struct kinfo_lwp);
527	+	mib[4] = 0;
528	+
529	+	if(sysctl(mib, 5, NULL, &size, NULL, 0) < 0) {
530	+	sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_LWP.pid.structsize.0");
531	+	return NULL;
532	+	}
533	+
534	+	lwps = size / sizeof(struct kinfo_lwp);
535	+	mib[4] = lwps;
536	+
537	+	kl_stats = sg_malloc(size);
538	+	if(kl_stats == NULL) {
539	+	return NULL;
540	+	}
541	+
542	+	if(sysctl(mib, 5, kl_stats, &size, NULL, 0) < 0) {
543	+	sg_set_error(SG_ERROR_SYSCTL, "CTL_KERN.KERN_LWP.pid.structsize.buffersize");
544	+	return NULL;
545	+	}
546	+	}
547	+
548	+	switch(kp_stats[i].kp_proc.p_stat) {
549	+	case SIDL:
550	+	proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
551	+	break;
552	+	case SACTIVE:
553	+	{
554	+	int i;
555	+
556	+	for(i = 0; i < lwps; i++) {
557	+	switch(kl_stats[i].l_stat) {
558	+	case LSONPROC:
559	+	case LSRUN:
560	+	proc_state_ptr->state = SG_PROCESS_STATE_RUNNING;
561	+	goto end;
562	+	case LSSLEEP:
563	+	proc_state_ptr->state = SG_PROCESS_STATE_SLEEPING;
564	+	goto end;
565	+	case LSSTOP:
566	+	case LSSUSPENDED:
567	+	proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
568	+	goto end;
569	+	}
570	+	proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
571	+	}
572	+	end: ;
573	+	}
574	+	break;
575	+	case SSTOP:
576	+	proc_state_ptr->state = SG_PROCESS_STATE_STOPPED;
577	+	break;
578	+	case SZOMB:
579	+	proc_state_ptr->state = SG_PROCESS_STATE_ZOMBIE;
580	+	break;
581	+	default:
582	+	proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
583	+	break;
584	+	}
585	+	#else
586		#ifdef FREEBSD5
587		switch (kp_stats[i].ki_stat) {
588		#else
#	Line 477 | Line 617 | sg_process_stats *sg_get_process_stats(int *entries){
617		proc_state_ptr->state = SG_PROCESS_STATE_UNKNOWN;
618		break;
619		}
620	+	#endif
621		proc_state_size++;
622		}
623
#	Line 484 | Line 625 | sg_process_stats *sg_get_process_stats(int *entries){
625		#endif
626
627		#ifdef CYGWIN
628	+	sg_set_error(SG_ERROR_UNSUPPORTED, "Cygwin");
629		return NULL;
630		#endif
631

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines