2 * Copyright (c) 2000 Peter Wemm <peter@freebsd.org>
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
7 * 1. Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution.
13 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
14 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
17 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD$");
29 #include <sys/types.h>
30 #include <sys/sysctl.h>
38 static void usage(void);
39 static int kdumpenv(void);
40 static int kgetenv(const char *);
41 static int ksetenv(const char *, char *);
42 static int kunsetenv(const char *);
53 (void)fprintf(stderr, "%s\n%s\n%s\n",
55 " kenv [-qv] variable[=value]",
56 " kenv [-q] -u variable");
61 main(int argc, char **argv)
69 while ((ch = getopt(argc, argv, "hNquv")) != -1) {
94 eq = strchr(env, '=');
102 if ((hflag || Nflag) && env != NULL)
104 if (argc > 0 || ((uflag || vflag) && env == NULL))
110 } else if (val == NULL) {
112 error = kunsetenv(env);
114 warnx("unable to unset %s", env);
116 error = kgetenv(env);
118 warnx("unable to get %s", env);
121 error = ksetenv(env, val);
123 warnx("unable to set %s to %s", env, val);
134 envlen = kenv(KENV_DUMP, NULL, NULL, 0);
138 buflen = envlen * 120 / 100;
139 buf = malloc(buflen + 1);
142 memset(buf, 0, buflen + 1); /* Be defensive */
143 envlen = kenv(KENV_DUMP, NULL, buf, buflen);
154 for (; *buf != '\0'; buf += strlen(buf) + 1) {
156 if (strncmp(buf, "hint.", 5) != 0)
159 cp = strchr(buf, '=');
166 printf("%s=\"%s\"\n", buf, cp);
173 kgetenv(const char *env)
178 ret = kenv(KENV_GET, env, buf, sizeof(buf));
182 printf("%s=\"%s\"\n", env, buf);
189 ksetenv(const char *env, char *val)
193 ret = kenv(KENV_SET, env, val, strlen(val)+1);
195 printf("%s=\"%s\"\n", env, val);
200 kunsetenv(const char *env)
204 ret = kenv(KENV_UNSET, env, NULL, 0);