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