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(char *);
41 static int ksetenv(char *, char *);
42 static int kunsetenv(char *);
50 (void)fprintf(stderr, "%s\n%s\n%s\n",
52 " kenv variable[=value]",
58 main(int argc, char **argv)
66 while ((ch = getopt(argc, argv, "hu")) != -1) {
82 eq = strchr(env, '=');
90 if (hflag && (env != NULL))
92 if ((argc > 0) || (uflag && (env == NULL)))
98 } else if (val == NULL) {
100 error = kunsetenv(env);
102 warnx("unable to unset %s", env);
104 error = kgetenv(env);
106 warnx("unable to get %s", env);
109 error = ksetenv(env, val);
111 warnx("unable to set %s to %s", env, val);
122 envlen = kenv(KENV_DUMP, NULL, NULL, 0);
126 buflen = envlen * 120 / 100;
127 buf = malloc(buflen + 1);
130 memset(buf, 0, buflen + 1); /* Be defensive */
131 envlen = kenv(KENV_DUMP, NULL, buf, buflen);
142 for (; *buf != '\0'; buf += strlen(buf) + 1) {
144 if (strncmp(buf, "hint.", 5) != 0)
147 cp = strchr(buf, '=');
151 printf("%s=\"%s\"\n", buf, cp);
163 ret = kenv(KENV_GET, env, buf, sizeof(buf));
171 ksetenv(char *env, char *val)
175 ret = kenv(KENV_SET, env, val, strlen(val)+1);
177 printf("%s=\"%s\"\n", env, val);
186 ret = kenv(KENV_UNSET, env, NULL, 0);