63 	char *env, *eq, *val;  in main()  local
67 	env = NULL;  in main()
98 		env = argv[0];  in main()
99 		eq = strchr(env, '=');  in main()
107 	if ((hflag || Nflag) && env != NULL)  in main()
111 	if (argc > 0 || ((uflag || vflag) && env == NULL))  in main()
113 	if (env == NULL) {  in main()
128 			error = kunsetenv(env);  in main()
130 				warnx("unable to unset %s", env);  in main()
132 			error = kgetenv(env);  in main()
134 				warnx("unable to get %s", env);  in main()
137 		error = ksetenv(env, val);  in main()
139 			warnx("unable to set %s to %s", env, val);  in main()
190 kgetenv(const char *env)  in kgetenv()  argument
195 	ret = kenv(KENV_GET, env, buf, sizeof(buf));  in kgetenv()
199 		printf("%s=\"%s\"\n", env, buf);  in kgetenv()
206 ksetenv(const char *env, char *val)  in ksetenv()  argument
210 	ret = kenv(KENV_SET, env, val, strlen(val) + 1);  in ksetenv()
212 		printf("%s=\"%s\"\n", env, val);  in ksetenv()
217 kunsetenv(const char *env)  in kunsetenv()  argument
221 	ret = kenv(KENV_UNSET, env, NULL, 0);  in kunsetenv()