7be0c63a531be4155736aeb3e31f8d86e30060b5
[oweals/busybox.git] / coreutils / env.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * env implementation for busybox
4  *
5  * Copyright (c) 1988, 1993, 1994
6  *      The Regents of the University of California.  All rights reserved.
7  *
8  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
9  *
10  * Original copyright notice is retained at the end of this file.
11  *
12  * Modified for BusyBox by Erik Andersen <andersen@codepoet.org>
13  */
14
15 /* BB_AUDIT SUSv3 compliant */
16 /* http://www.opengroup.org/onlinepubs/007904975/utilities/env.html */
17
18 /* Mar 16, 2003      Manuel Novoa III   (mjn3@codepoet.org)
19  *
20  * Fixed bug involving exit return codes if execvp fails.  Also added
21  * output error checking.
22  */
23
24 /*
25  * Modified by Vladimir Oleynik <dzo@simtreas.ru> (C) 2003
26  * - correct "-" option usage
27  * - multiple "-u unsetenv" support
28  * - GNU long option support
29  * - use xfunc_error_retval
30  */
31
32 #include "busybox.h"
33 #include <errno.h>
34 #include <getopt.h> /* struct option */
35
36 #if ENABLE_FEATURE_ENV_LONG_OPTIONS
37 static const struct option env_long_options[] = {
38         { "ignore-environment", 0, NULL, 'i' },
39         { "unset", 1, NULL, 'u' },
40         { 0, 0, 0, 0 }
41 };
42 #endif
43
44 int env_main(int argc, char** argv);
45 int env_main(int argc, char** argv)
46 {
47         static char *cleanenv[1] = { NULL };
48
49         char **ep;
50         unsigned opt;
51         llist_t *unset_env = NULL;
52         extern char **environ;
53
54         opt_complementary = "u::";
55 #if ENABLE_FEATURE_ENV_LONG_OPTIONS
56         applet_long_options = env_long_options;
57 #endif
58
59         opt = getopt32(argc, argv, "+iu:", &unset_env);
60
61         argv += optind;
62         if (*argv && LONE_DASH(argv[0])) {
63                 opt |= 1;
64                 ++argv;
65         }
66
67         if (opt & 1)
68                 environ = cleanenv;
69         else if (opt & 2) {
70                 while (unset_env) {
71                         unsetenv(unset_env->data);
72                         unset_env = unset_env->link;
73                 }
74         }
75
76         while (*argv && (strchr(*argv, '=') != NULL)) {
77                 if (putenv(*argv) < 0) {
78                         bb_perror_msg_and_die("putenv");
79                 }
80                 ++argv;
81         }
82
83         if (*argv) {
84                 BB_EXECVP(*argv, argv);
85                 /* SUSv3-mandated exit codes. */
86                 xfunc_error_retval = (errno == ENOENT) ? 127 : 126;
87                 bb_perror_msg_and_die("%s", *argv);
88         }
89
90         for (ep = environ; *ep; ep++) {
91                 puts(*ep);
92         }
93
94         fflush_stdout_and_exit(0);
95 }
96
97 /*
98  * Copyright (c) 1988, 1993, 1994
99  *      The Regents of the University of California.  All rights reserved.
100  *
101  * Redistribution and use in source and binary forms, with or without
102  * modification, are permitted provided that the following conditions
103  * are met:
104  * 1. Redistributions of source code must retain the above copyright
105  *    notice, this list of conditions and the following disclaimer.
106  * 2. Redistributions in binary form must reproduce the above copyright
107  *    notice, this list of conditions and the following disclaimer in the
108  *    documentation and/or other materials provided with the distribution.
109  *
110  * 3. <BSD Advertising Clause omitted per the July 22, 1999 licensing change
111  *              ftp://ftp.cs.berkeley.edu/pub/4bsd/README.Impt.License.Change>
112  *
113  * 4. Neither the name of the University nor the names of its contributors
114  *    may be used to endorse or promote products derived from this software
115  *    without specific prior written permission.
116  *
117  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
118  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
119  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
120  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
121  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
122  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
123  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
124  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
125  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
126  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
127  * SUCH DAMAGE.
128  */
129
130