Merge branch 'vendor/GCC50'
[dragonfly.git] / bin / varsym / varsym.c
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                         error = varsym_get(mask, name, buf, sizeof(buf));
137                         if (error >= 0 && error <= (int)sizeof(buf)) {
138                                 if (verboseOpt)
139                                         printf("%s=", name);
140                                 printf("%s\n", buf);
141                         } else {
142                                 ret = 1;
143                         }
144                 }
145                 if (error < 0 && verboseOpt)
146                         fprintf(stderr, "%s: %s\n", name, strerror(errno));
147         }
148
149         return ret;
150 }
151
152 static void
153 dumpvars(char *buf, int bytes)
154 {
155         int b;
156         int i;
157         char *vname = NULL;
158         char *vdata = NULL;
159
160         for (b = i = 0; i < bytes; ++i) {
161                 if (buf[i] == 0) {
162                         if (vname == NULL) {
163                                 vname = buf + b;
164                         } else {
165                                 vdata = buf + b;
166                                 printf("%s=%s\n", vname, vdata);
167                                 vname = vdata = NULL;
168                         }
169                         b = i + 1;
170                 }
171         }
172 }
173
174 static int
175 doexec(char **av)
176 {
177         int error;
178
179         error = execvp(av[0], av);
180         return (error);
181 }
182
183 static void
184 usage(void)
185 {
186         fprintf(stderr, "usage: varsym [-adpqsu] [var[=data] ...]\n");
187 }
188