xref: /dragonfly/bin/varsym/varsym.c (revision 7d3e9a5b)
1 /*
2  * Copyright (c) 2003 Matthew Dillon <dillon@backplane.com>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $DragonFly: src/bin/varsym/varsym.c,v 1.4 2003/12/11 20:33:49 dillon Exp $
27  */
28 
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <errno.h>
33 #include <unistd.h>
34 #include <sys/varsym.h>
35 
36 static void dumpvars(char *buf, int bytes);
37 static int doexec(char **av);
38 static void usage(void);
39 
40 int
41 main(int ac, char **av)
42 {
43 	int i;
44 	int mask =  VARSYM_ALL_MASK;
45 	int level = VARSYM_USER;
46 	int deleteOpt = 0;
47 	int verboseOpt = 1;
48 	int allOpt = 0;
49 	int execok = 0;
50 	int ret = 0;
51 
52 	while ((i = getopt(ac, av, "adhpqsux")) != -1) {
53 		switch (i) {
54 		case 'a':
55 			allOpt = 1;
56 			break;
57 		case 'd':
58 			deleteOpt = 1;
59 			break;
60 		case 'p':
61 			mask = VARSYM_PROC_MASK;
62 			level = VARSYM_PROC;
63 			break;
64 		case 'q':
65 			verboseOpt = 0;
66 			break;
67 		case 's':
68 			mask = VARSYM_SYS_MASK;
69 			level = VARSYM_SYS;
70 			break;
71 		case 'u':
72 			mask = VARSYM_USER_MASK;
73 			level = VARSYM_USER;
74 			break;
75 		case 'x':
76 			mask = VARSYM_PROC_MASK;
77 			level = VARSYM_PROC;
78 			execok = 1;
79 			break;
80 		case 'h':
81 		default:
82 			usage();
83 			return(-1);
84 		}
85 	}
86 
87 	if (allOpt) {
88 		char buf[1024];
89 		int marker = 0;
90 		int bytes;
91 
92 		for (;;) {
93 			bytes = varsym_list(level, buf, sizeof(buf), &marker);
94 			if (bytes < 0)		/* error occured */
95 			    break;
96 			dumpvars(buf, bytes);
97 			if (marker < 0)		/* no more vars */
98 			    break;
99 		}
100 		if (bytes < 0) {
101 			fprintf(stderr, "varsym_list(): %s\n", strerror(errno));
102 			return 1;
103 		}
104 	}
105 
106 	for ( ; optind < ac; optind++) {
107 		char *name = av[optind];
108 		char *data = strchr(name, '=');
109 		int error;
110 		char buf[MAXVARSYM_DATA];
111 
112 		if (data)
113 			*data++ = 0;
114 
115 		if (execok) {
116 			if (deleteOpt) {
117 				usage();
118 				exit(1);
119 			}
120 			if (data) {
121 				error = varsym_set(level, name, data);
122 				if (error)
123 					ret = 2;
124 			} else {
125 				error = doexec(av + optind);
126 			}
127 		} else if (deleteOpt) {
128 			error = varsym_set(level, name, NULL);
129 			if (error)
130 				ret = 2;
131 		} else if (data) {
132 			error = varsym_set(level, name, data);
133 			if (error)
134 				ret = 2;
135 		} else {
136 			/*
137 			 * NOTE: System call returns 0 on success now,
138 			 *	 but older versions returns the content
139 			 *	 strlen() + 1, and that had to be tested
140 			 *	 for overflow conditions.
141 			 */
142 			error = varsym_get(mask, name, buf, sizeof(buf));
143 			if (error >= 0 && error <= (int)sizeof(buf)) {
144 				if (verboseOpt)
145 					printf("%s=", name);
146 				printf("%s\n", buf);
147 			} else {
148 				ret = 1;
149 			}
150 		}
151 		if (error < 0 && verboseOpt)
152 			fprintf(stderr, "%s: %s\n", name, strerror(errno));
153 	}
154 
155 	return ret;
156 }
157 
158 static void
159 dumpvars(char *buf, int bytes)
160 {
161 	int b;
162 	int i;
163 	char *vname = NULL;
164 	char *vdata = NULL;
165 
166 	for (b = i = 0; i < bytes; ++i) {
167 		if (buf[i] == 0) {
168 			if (vname == NULL) {
169 				vname = buf + b;
170 			} else {
171 				vdata = buf + b;
172 				printf("%s=%s\n", vname, vdata);
173 				vname = vdata = NULL;
174 			}
175 			b = i + 1;
176 		}
177 	}
178 }
179 
180 static int
181 doexec(char **av)
182 {
183 	int error;
184 
185 	error = execvp(av[0], av);
186 	return (error);
187 }
188 
189 static void
190 usage(void)
191 {
192 	fprintf(stderr, "usage: varsym [-adpqsu] [var[=data] ...]\n");
193 }
194 
195