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