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
25 * $FreeBSD: head/bin/kenv/kenv.c 250666 2013-05-15 18:38:28Z delphij $
28 #include <sys/types.h>
29 #include <sys/sysctl.h>
37 static void usage(void);
38 static int kdumpenv(void);
39 static int kgetenv(const char *);
40 static int ksetenv(const char *, char *);
41 static int kunsetenv(const char *);
52 (void)fprintf(stderr, "%s\n%s\n%s\n",
54 " kenv [-qv] variable[=value]",
55 " kenv [-q] -u variable");
60 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 = malloc(buflen + 1);
141 memset(buf, 0, buflen + 1); /* Be defensive */
142 envlen = kenv(KENV_DUMP, NULL, buf, buflen);
153 for (; *buf != '\0'; buf += strlen(buf) + 1) {
155 if (strncmp(buf, "hint.", 5) != 0)
158 cp = strchr(buf, '=');
165 printf("%s=\"%s\"\n", buf, cp);
172 kgetenv(const char *env)
177 ret = kenv(KENV_GET, env, buf, sizeof(buf));
181 printf("%s=\"%s\"\n", env, buf);
188 ksetenv(const char *env, char *val)
192 ret = kenv(KENV_SET, env, val, strlen(val)+1);
194 printf("%s=\"%s\"\n", env, val);
199 kunsetenv(const char *env)
203 ret = kenv(KENV_UNSET, env, NULL, 0);