Initial public busybox upstream commit
[busybox4maemo] / 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 <getopt.h> /* struct option */
33 #include "libbb.h"
34
35 #if ENABLE_FEATURE_ENV_LONG_OPTIONS
36 static const char env_longopts[] ALIGN1 =
37         "ignore-environment\0" No_argument       "i"
38         "unset\0"              Required_argument "u"
39         ;
40 #endif
41
42 int env_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
43 int env_main(int argc ATTRIBUTE_UNUSED, char **argv)
44 {
45         /* cleanenv was static - why? */
46         char *cleanenv[1];
47         char **ep;
48         unsigned opt;
49         llist_t *unset_env = NULL;
50
51         opt_complementary = "u::";
52 #if ENABLE_FEATURE_ENV_LONG_OPTIONS
53         applet_long_options = env_longopts;
54 #endif
55         opt = getopt32(argv, "+iu:", &unset_env);
56         argv += optind;
57         if (*argv && LONE_DASH(argv[0])) {
58                 opt |= 1;
59                 ++argv;
60         }
61         if (opt & 1) {
62                 cleanenv[0] = NULL;
63                 environ = cleanenv;
64         } else {
65                 while (unset_env) {
66                         unsetenv(unset_env->data);
67                         unset_env = unset_env->link;
68                 }
69         }
70
71         while (*argv && (strchr(*argv, '=') != NULL)) {
72                 if (putenv(*argv) < 0) {
73                         bb_perror_msg_and_die("putenv");
74                 }
75                 ++argv;
76         }
77
78         if (*argv) {
79                 BB_EXECVP(*argv, argv);
80                 /* SUSv3-mandated exit codes. */
81                 xfunc_error_retval = (errno == ENOENT) ? 127 : 126;
82                 bb_simple_perror_msg_and_die(*argv);
83         }
84
85         for (ep = environ; *ep; ep++) {
86                 puts(*ep);
87         }
88
89         fflush_stdout_and_exit(0);
90 }
91
92 /*
93  * Copyright (c) 1988, 1993, 1994
94  *      The Regents of the University of California.  All rights reserved.
95  *
96  * Redistribution and use in source and binary forms, with or without
97  * modification, are permitted provided that the following conditions
98  * are met:
99  * 1. Redistributions of source code must retain the above copyright
100  *    notice, this list of conditions and the following disclaimer.
101  * 2. Redistributions in binary form must reproduce the above copyright
102  *    notice, this list of conditions and the following disclaimer in the
103  *    documentation and/or other materials provided with the distribution.
104  *
105  * 3. <BSD Advertising Clause omitted per the July 22, 1999 licensing change
106  *              ftp://ftp.cs.berkeley.edu/pub/4bsd/README.Impt.License.Change>
107  *
108  * 4. Neither the name of the University nor the names of its contributors
109  *    may be used to endorse or promote products derived from this software
110  *    without specific prior written permission.
111  *
112  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
113  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
114  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
115  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
116  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
117  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
118  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
119  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
120  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
121  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
122  * SUCH DAMAGE.
123  */
124
125