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)
68 while ((ch = getopt(argc, argv, "hNquv")) != -1) {
93 eq = strchr(env, '=');
101 if ((hflag || Nflag) && env != NULL)
103 if (argc > 0 || ((uflag || vflag) && env == NULL))
109 } else if (val == NULL) {
111 error = kunsetenv(env);
113 warnx("unable to unset %s", env);
115 error = kgetenv(env);
117 warnx("unable to get %s", env);
120 error = ksetenv(env, val);
122 warnx("unable to set %s to %s", env, val);
133 envlen = kenv(KENV_DUMP, NULL, NULL, 0);
137 buflen = envlen * 120 / 100;
138 buf = calloc(1, buflen + 1);
141 envlen = kenv(KENV_DUMP, NULL, buf, buflen);
152 for (bp = buf; *bp != '\0'; bp += strlen(bp) + 1) {
154 if (strncmp(bp, "hint.", 5) != 0)
157 cp = strchr(bp, '=');
164 printf("%s=\"%s\"\n", bp, 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);