env.c revision 178289
1/*
2 * Copyright (c) 1988, 1993, 1994
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 *    must display the following acknowledgement:
15 *	This product includes software developed by the University of
16 *	California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 *    may be used to endorse or promote products derived from this software
19 *    without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 */
33
34#ifndef lint
35static const char copyright[] =
36"@(#) Copyright (c) 1988, 1993, 1994\n\
37	The Regents of the University of California.  All rights reserved.\n";
38#endif /* not lint */
39
40#if 0
41#ifndef lint
42static char sccsid[] = "@(#)env.c	8.3 (Berkeley) 4/2/94";
43#endif /* not lint */
44#endif
45
46#include <sys/cdefs.h>
47__FBSDID("$FreeBSD: head/usr.bin/env/env.c 178289 2008-04-17 23:17:09Z gad $");
48
49#include <err.h>
50#include <errno.h>
51#include <stdio.h>
52#include <string.h>
53#include <stdlib.h>
54#include <unistd.h>
55
56#include "envopts.h"
57
58extern char **environ;
59
60int	 env_verbosity;
61
62static void usage(void);
63
64int
65main(int argc, char **argv)
66{
67	char *altpath, **ep, *p, **parg;
68	char *cleanenv[1];
69	int ch, want_clear;
70	int rtrn;
71
72	altpath = NULL;
73	want_clear = 0;
74	while ((ch = getopt(argc, argv, "-iP:S:u:v")) != -1)
75		switch(ch) {
76		case '-':
77		case 'i':
78			want_clear = 1;
79			break;
80		case 'P':
81			altpath = strdup(optarg);
82			break;
83		case 'S':
84			/*
85			 * The -S option, for "split string on spaces, with
86			 * support for some simple substitutions"...
87			 */
88			split_spaces(optarg, &optind, &argc, &argv);
89			break;
90		case 'u':
91			if (env_verbosity)
92				fprintf(stderr, "#env unset:\t%s\n", optarg);
93			rtrn = unsetenv(optarg);
94			if (rtrn == -1)
95				err(EXIT_FAILURE, "unsetenv %s", optarg);
96			break;
97		case 'v':
98			env_verbosity++;
99			if (env_verbosity > 1)
100				fprintf(stderr, "#env verbosity now at %d\n",
101				    env_verbosity);
102			break;
103		case '?':
104		default:
105			usage();
106		}
107	if (want_clear) {
108		environ = cleanenv;
109		cleanenv[0] = NULL;
110		if (env_verbosity)
111			fprintf(stderr, "#env clearing environ\n");
112	}
113	for (argv += optind; *argv && (p = strchr(*argv, '=')); ++argv) {
114		if (env_verbosity)
115			fprintf(stderr, "#env setenv:\t%s\n", *argv);
116		*p = '\0';
117		rtrn = setenv(*argv, p + 1, 1);
118		*p = '=';
119		if (rtrn == -1)
120			err(EXIT_FAILURE, "setenv %s", *argv);
121	}
122	if (*argv) {
123		if (altpath)
124			search_paths(altpath, argv);
125		if (env_verbosity) {
126			fprintf(stderr, "#env executing:\t%s\n", *argv);
127			for (parg = argv, argc = 0; *parg; parg++, argc++)
128				fprintf(stderr, "#env    arg[%d]=\t'%s'\n",
129				    argc, *parg);
130			if (env_verbosity > 1)
131				sleep(1);
132		}
133		execvp(*argv, argv);
134		err(errno == ENOENT ? 127 : 126, "%s", *argv);
135	}
136	for (ep = environ; *ep; ep++)
137		(void)printf("%s\n", *ep);
138	exit(0);
139}
140
141static void
142usage(void)
143{
144	(void)fprintf(stderr,
145	    "usage: env [-iv] [-P utilpath] [-S string] [-u name]\n"
146	    "           [name=value ...] [utility [argument ...]]\n");
147	exit(1);
148}
149