ViewVC Help

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

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

Comparing projects/libstatgrab/src/libstatgrab/tools.c (file contents):
Revision 1.24 by tdb, Mon Jan 19 16:49:21 2004 UTC vs.
Revision 1.59 by ats, Sat Nov 6 14:55:53 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 30 | Line 30
30		#include <stdlib.h>
31		#include <unistd.h>
32		#include <sys/types.h>
33	–	#include <regex.h>
33		#ifdef ALLBSD
34		#include <fcntl.h>
35	+	#endif
36	+	#if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
37		#include <kvm.h>
38	+	#include <paths.h>
39		#endif
40	<	#ifdef NETBSD
40	>	#if defined(NETBSD) || defined(OPENBSD)
41		#include <uvm/uvm_extern.h>
42	+	#include <sys/param.h>
43	+	#include <sys/sysctl.h>
44		#endif
45	+	#ifdef HPUX
46	+	#include <sys/param.h>
47	+	#include <sys/pstat.h>
48	+	#endif
49
50		#include "tools.h"
51	+	#include "statgrab.h"
52
53		#ifdef SOLARIS
54	+	#ifdef HAVE_LIBDEVINFO_H
55		#include <libdevinfo.h>
56	+	#endif
57		#include <kstat.h>
58		#include <unistd.h>
59		#include <ctype.h>
#	Line 54 | Line 65
65		#include <dirent.h>
66		#endif
67
68	<	#ifdef SOLARIS
68	>	#if defined(SOLARIS) && defined(HAVE_LIBDEVINFO_H)
69		struct map{
70		char *bsd;
71		char *svr;
#	Line 64 | Line 75 | struct map{
75		typedef struct map mapping_t;
76
77		static mapping_t *mapping = NULL;
78	+	#endif
79
80	<	char *get_svr_from_bsd(char *bsd){
80	>	#ifdef SOLARIS
81	>	const char *sg_get_svr_from_bsd(const char *bsd){
82	>	#ifdef HAVE_LIBDEVINFO_H
83		mapping_t *map_ptr;
84		for(map_ptr = mapping; map_ptr != NULL; map_ptr = map_ptr->next)
85		if(!strcmp(map_ptr->bsd, bsd)) return map_ptr->svr;
86	<
86	>	#endif
87		return bsd;
88		}
89	+	#endif
90
91	<	void add_mapping(char *bsd, char *svr){
91	>	#if defined(SOLARIS) && defined(HAVE_LIBDEVINFO_H)
92	>	static void add_mapping(char *bsd, char *svr){
93		mapping_t *map_ptr;
94		mapping_t *map_end_ptr;
95
80	–	bsd = strdup(bsd);
81	–	svr = strdup(svr);
82	–
96		if (mapping == NULL){
97	<	mapping = malloc(sizeof(mapping_t));
97	>	mapping = sg_malloc(sizeof(mapping_t));
98		if (mapping == NULL) return;
99		map_ptr = mapping;
100		}else{
#	Line 96 | Line 109 | void add_mapping(char *bsd, char *svr){
109		/* We've reached end of list and not found the entry.. So we need to malloc
110		* new mapping_t
111		*/
112	<	map_end_ptr->next = malloc(sizeof(mapping_t));
112	>	map_end_ptr->next = sg_malloc(sizeof(mapping_t));
113		if (map_end_ptr->next == NULL) return;
114		map_ptr = map_end_ptr->next;
115		}
116
117		map_ptr->next = NULL;
118	<	map_ptr->bsd = bsd;
119	<	map_ptr->svr = svr;
118	>	map_ptr->bsd = NULL;
119	>	map_ptr->svr = NULL;
120	>	if (sg_update_string(&map_ptr->bsd, bsd) < 0
121	>	|| sg_update_string(&map_ptr->svr, svr) < 0) {
122	>	return;
123	>	}
124
125		return;
126		}
127
128	<	char *read_dir(char *disk_path){
128	>
129	>	static char *read_dir(char *disk_path){
130		DIR *dirp;
131		struct dirent *dp;
132		struct stat stbuf;
133	<	char *svr_name;
133	>	char *svr_name = NULL;
134		char current_dir[MAXPATHLEN];
135		char file_name[MAXPATHLEN];
136		char temp_name[MAXPATHLEN];
#	Line 139 | Line 157 | char *read_dir(char *disk_path){
157		x = readlink(dir_dname, file_name, sizeof(file_name));
158		file_name[x] = '\0';
159		if (strcmp(file_name, temp_name) == 0) {
160	<	svr_name = strdup(dp->d_name);
160	>	if (sg_update_string(&svr_name,
161	>	dp->d_name) < 0) {
162	>	return NULL;
163	>	}
164		closedir(dirp);
165		return svr_name;
166		}
#	Line 150 | Line 171 | char *read_dir(char *disk_path){
171		}
172
173
174	<
154	<	int get_alias(char *alias){
174	>	static int get_alias(char *alias){
175		char file[MAXPATHLEN];
176		di_node_t root_node;
177		di_node_t node;
#	Line 162 | Line 182 | int get_alias(char *alias){
182		char *value;
183		int instance;
184		if ((root_node = di_init("/", DINFOCPYALL)) == DI_NODE_NIL) {
185	<	return 1;
185	>	return -1;
186		}
187		node = di_drv_first_node(alias, root_node);
188		while (node != DI_NODE_NIL) {
#	Line 172 | Line 192 | int get_alias(char *alias){
192		minor_name = di_minor_name(minor);
193		strcpy(tmpnode, alias);
194		sprintf(tmpnode, "%s%d", tmpnode, instance);
195	<	strlcpy(file, "/devices", sizeof file);
196	<	strlcat(file, phys_path, sizeof file);
197	<	strlcat(file, ":", sizeof file);
198	<	strlcat(file, minor_name, sizeof file);
195	>	sg_strlcpy(file, "/devices", sizeof file);
196	>	sg_strlcat(file, phys_path, sizeof file);
197	>	sg_strlcat(file, ":", sizeof file);
198	>	sg_strlcat(file, minor_name, sizeof file);
199		value = read_dir(file);
200		if (value != NULL){
201		add_mapping(tmpnode, value);
#	Line 192 | Line 212 | int get_alias(char *alias){
212
213
214		#define BIG_ENOUGH 512
215	<	int build_mapping(){
215	>	static int build_mapping(){
216		char device_name[BIG_ENOUGH];
217		int x;
218		kstat_ctl_t *kc;
#	Line 204 | Line 224 | int build_mapping(){
224		int found;
225
226		if ((kc = kstat_open()) == NULL) {
227	<	return;
227	>	return -1;
228		}
229
230		for (ksp = kc->kc_chain; ksp; ksp = ksp->ks_next) {
#	Line 226 | Line 246 | int build_mapping(){
246		if (x>=BIG_ENOUGH){
247		/* We've got bigger than we thought was massive */
248		/* If we hit this.. Make big enough bigger */
249	<	return 1;
249	>	return -1;
250		}
251		if( !strncmp(driver_list[x], device_name, BIG_ENOUGH)){
252		found = 1;
#	Line 236 | Line 256 | int build_mapping(){
256
257		if(!found){
258		if((get_alias(device_name)) != 0){
259	<	return 1;
259	>	return -1;
260		}
261		strncpy(driver_list[x], device_name, BIG_ENOUGH);
262		list_entries++;
#	Line 249 | Line 269 | int build_mapping(){
269
270		#endif
271
272	<
273	<
254	<	char *f_read_line(FILE *f, const char *string){
272	>	#if defined(LINUX) || defined(CYGWIN)
273	>	char *sg_f_read_line(FILE *f, const char *string){
274		/* Max line length. 8k should be more than enough */
275		static char line[8192];
276
#	Line 261 | Line 280 | char *f_read_line(FILE *f, const char *string){
280		}
281		}
282
283	+	sg_set_error(SG_ERROR_PARSE, NULL);
284		return NULL;
285		}
286
287	<	char *get_string_match(char *line, regmatch_t *match){
287	>	char *sg_get_string_match(char *line, regmatch_t *match){
288		int len=match->rm_eo - match->rm_so;
289	<	char *match_string=malloc(len+1);
289	>	char *match_string=sg_malloc(len+1);
290
291		match_string=strncpy(match_string, line+match->rm_so, len);
292		match_string[len]='\0';
#	Line 274 | Line 294 | char *get_string_match(char *line, regmatch_t *match){
294		return match_string;
295		}
296
297	+	long long sg_get_ll_match(char *line, regmatch_t *match){
298	+	char *ptr;
299	+	long long num;
300
301	+	ptr=line+match->rm_so;
302	+	num=atoll(ptr);
303
304	+	return num;
305	+	}
306	+	#endif
307	+
308		#ifndef HAVE_ATOLL
309		static long long atoll(const char *s) {
310		long long value = 0;
#	Line 296 | Line 325 | static long long atoll(const char *s) {
325		}
326		#endif
327
299	–	#ifndef HAVE_STRLCPY
328		/*      $OpenBSD: strlcpy.c,v 1.8 2003/06/17 21:56:24 millert Exp $     */
329
330		/*
#	Line 320 | Line 348 | static long long atoll(const char *s) {
348		* will be copied.  Always NUL terminates (unless siz == 0).
349		* Returns strlen(src); if retval >= siz, truncation occurred.
350		*/
351	<	size_t strlcpy(char *dst, const char *src, size_t siz){
352	<	register char *d = dst;
353	<	register const char *s = src;
354	<	register size_t n = siz;
351	>	size_t sg_strlcpy(char *dst, const char *src, size_t siz){
352	>	register char *d = dst;
353	>	register const char *s = src;
354	>	register size_t n = siz;
355
356	<	/* Copy as many bytes as will fit */
357	<	if (n != 0 && --n != 0) {
358	<	do {
359	<	if ((*d++ = *s++) == 0)
360	<	break;
361	<	} while (--n != 0);
362	<	}
356	>	/* Copy as many bytes as will fit */
357	>	if (n != 0 && --n != 0) {
358	>	do {
359	>	if ((*d++ = *s++) == 0)
360	>	break;
361	>	} while (--n != 0);
362	>	}
363
364	<	/* Not enough room in dst, add NUL and traverse rest of src */
365	<	if (n == 0) {
366	<	if (siz != 0)
367	<	*d = '\0';              /* NUL-terminate dst */
368	<	while (*s++)
369	<	;
370	<	}
364	>	/* Not enough room in dst, add NUL and traverse rest of src */
365	>	if (n == 0) {
366	>	if (siz != 0)
367	>	*d = '\0';            /* NUL-terminate dst */
368	>	while (*s++)
369	>	;
370	>	}
371
372	<	return(s - src - 1);    /* count does not include NUL */
372	>	return(s - src - 1);    /* count does not include NUL */
373		}
346	–	#endif
374
348	–	#ifndef HAVE_STRLCAT
375		/*      $OpenBSD: strlcat.c,v 1.11 2003/06/17 21:56:24 millert Exp $    */
376
377		/*
#	Line 371 | Line 397 | size_t strlcpy(char *dst, const char *src, size_t siz)
397		* Returns strlen(src) + MIN(siz, strlen(initial dst)).
398		* If retval >= siz, truncation occurred.
399		*/
400	<	size_t strlcat(char *dst, const char *src, size_t siz){
401	<	register char *d = dst;
402	<	register const char *s = src;
403	<	register size_t n = siz;
404	<	size_t dlen;
400	>	size_t sg_strlcat(char *dst, const char *src, size_t siz){
401	>	register char *d = dst;
402	>	register const char *s = src;
403	>	register size_t n = siz;
404	>	size_t dlen;
405
406	<	/* Find the end of dst and adjust bytes left but don't go past end */
407	<	while (n-- != 0 && *d != '\0')
408	<	d++;
409	<	dlen = d - dst;
410	<	n = siz - dlen;
406	>	/* Find the end of dst and adjust bytes left but don't go past end */
407	>	while (n-- != 0 && *d != '\0')
408	>	d++;
409	>	dlen = d - dst;
410	>	n = siz - dlen;
411
412	<	if (n == 0)
413	<	return(dlen + strlen(s));
414	<	while (*s != '\0') {
415	<	if (n != 1) {
416	<	*d++ = *s;
417	<	n--;
418	<	}
419	<	s++;
420	<	}
421	<	*d = '\0';
412	>	if (n == 0)
413	>	return(dlen + strlen(s));
414	>	while (*s != '\0') {
415	>	if (n != 1) {
416	>	*d++ = *s;
417	>	n--;
418	>	}
419	>	s++;
420	>	}
421	>	*d = '\0';
422
423	<	return(dlen + (s - src));       /* count does not include NUL */
423	>	return(dlen + (s - src));       /* count does not include NUL */
424		}
425
426	<	#endif
426	>	int sg_update_string(char **dest, const char *src) {
427	>	char *new;
428
429	<	long long get_ll_match(char *line, regmatch_t *match){
430	<	char *ptr;
431	<	long long num;
429	>	if (src == NULL) {
430	>	/* We're being told to set it to NULL. */
431	>	free(*dest);
432	>	*dest = NULL;
433	>	return 0;
434	>	}
435
436	<	ptr=line+match->rm_so;
437	<	num=atoll(ptr);
436	>	new = sg_realloc(*dest, strlen(src) + 1);
437	>	if (new == NULL) {
438	>	return -1;
439	>	}
440
441	<	return num;
441	>	strcpy(new, src);
442	>	*dest = new;
443	>	return 0;
444		}
445
446	<	#ifdef ALLBSD
447	<	kvm_t *get_kvm() {
446	>	#if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
447	>	kvm_t *sg_get_kvm() {
448		static kvm_t *kvmd = NULL;
449
450		if (kvmd != NULL) {
#	Line 418 | Line 452 | kvm_t *get_kvm() {
452		}
453
454		kvmd = kvm_openfiles(NULL, NULL, NULL, O_RDONLY, NULL);
455	+	if(kvmd == NULL) {
456	+	sg_set_error(SG_ERROR_KVM_OPENFILES, NULL);
457	+	}
458		return kvmd;
459		}
460	+
461	+	/* Can't think of a better name for this function */
462	+	kvm_t *sg_get_kvm2() {
463	+	static kvm_t *kvmd2 = NULL;
464	+
465	+	if (kvmd2 != NULL) {
466	+	return kvmd2;
467	+	}
468	+
469	+	kvmd2 = kvm_openfiles(_PATH_DEVNULL, _PATH_DEVNULL, NULL, O_RDONLY, NULL);
470	+	if(kvmd2 == NULL) {
471	+	sg_set_error(SG_ERROR_KVM_OPENFILES, NULL);
472	+	}
473	+	return kvmd2;
474	+	}
475		#endif
476
477	<	#ifdef NETBSD
478	<	struct uvmexp *get_uvmexp() {
479	<	static u_long addr = 0;
477	>	#if defined(NETBSD) || defined(OPENBSD)
478	>	struct uvmexp *sg_get_uvmexp() {
479	>	int mib[2];
480	>	size_t size = sizeof(struct uvmexp);
481		static struct uvmexp uvm;
482	<	kvm_t *kvmd = get_kvm();
482	>	struct uvmexp *new;
483
484	<	if (kvmd == NULL) {
484	>	mib[0] = CTL_VM;
485	>	mib[1] = VM_UVMEXP;
486	>
487	>	if (sysctl(mib, 2, &uvm, &size, NULL, 0) < 0) {
488	>	sg_set_error_with_errno(SG_ERROR_SYSCTL, "CTL_VM.VM_UVMEXP");
489		return NULL;
490		}
491
492	<	if (addr == 0) {
493	<	struct nlist symbols[] = {
494	<	{ "_uvmexp" },
438	<	{ NULL }
439	<	};
492	>	return &uvm;
493	>	}
494	>	#endif
495
496	<	if (kvm_nlist(kvmd, symbols) != 0) {
496	>	#ifdef HPUX
497	>	struct pst_static *sg_get_pstat_static() {
498	>	static int got = 0;
499	>	static struct pst_static pst;
500	>
501	>	if (!got) {
502	>	if (pstat_getstatic(&pst, sizeof pst, 1, 0) == -1) {
503	>	sg_set_error_with_errno(SG_ERROR_PSTAT,
504	>	"pstat_static");
505		return NULL;
506		}
507	<	addr = symbols[0].n_value;
507	>	got = 1;
508		}
509	<
447	<	if (kvm_read(kvmd, addr, &uvm, sizeof uvm) != sizeof uvm) {
448	<	return NULL;
449	<	}
450	<	return &uvm;
509	>	return &pst;
510		}
511		#endif
512
513	<	int statgrab_init(){
514	<	#ifdef ALLBSD
515	<	{
516	<	kvm_t *kvmd = get_kvm();
517	<	if (kvmd == NULL) return 1;
513	>	int sg_init(){
514	>	sg_set_error(SG_ERROR_NONE, NULL);
515	>
516	>	#if (defined(FREEBSD) && !defined(FREEBSD5)) || defined(DFBSD)
517	>	if (sg_get_kvm() == NULL) {
518	>	return -1;
519		}
520	<	#endif
521	<	#ifdef NETBSD
462	<	{
463	<	struct uvmexp *uvm = get_uvmexp();
464	<	if (uvm == NULL) return 1;
520	>	if (sg_get_kvm2() == NULL) {
521	>	return -1;
522		}
523		#endif
524		#ifdef SOLARIS
#	Line 469 | Line 526 | int statgrab_init(){
526		* will still work, just no disk mappings. So we will ignore the exit
527		* status of this, and carry on merrily.
528		*/
529	+	#ifdef HAVE_LIBDEVINFO_H
530		build_mapping();
531		#endif
532	+	#endif
533		return 0;
534		}
535
536	<	int statgrab_drop_privileges() {
537	<	if (setegid(getgid()) != 0) return -1;
538	<	if (seteuid(getuid()) != 0) return -1;
536	>	int sg_drop_privileges() {
537	>	#ifdef HAVE_SETEGID
538	>	if (setegid(getgid()) != 0) {
539	>	#elif defined(HAVE_SETRESGID)
540	>	if (setresgid(getgid(), getgid(), getgid()) != 0) {
541	>	#else
542	>	{
543	>	#endif
544	>	sg_set_error_with_errno(SG_ERROR_SETEGID, NULL);
545	>	return -1;
546	>	}
547	>	#ifdef HAVE_SETEUID
548	>	if (seteuid(getuid()) != 0) {
549	>	#elif defined(HAVE_SETRESUID)
550	>	if (setresuid(getuid(), getuid(), getuid()) != 0) {
551	>	#else
552	>	{
553	>	#endif
554	>	sg_set_error_with_errno(SG_ERROR_SETEUID, NULL);
555	>	return -1;
556	>	}
557		return 0;
558		}
559
560	+	void *sg_realloc(void *ptr, size_t size) {
561	+	void *tmp = NULL;
562	+	tmp = realloc(ptr, size);
563	+	if(tmp == NULL) {
564	+	sg_set_error_with_errno(SG_ERROR_MALLOC, NULL);
565	+	}
566	+	return tmp;
567	+	}

Diff Legend

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