Contents of /trunk/mkinitrd-magellan/busybox/coreutils/env.c
Parent Directory | Revision Log
Revision 532 -
(show annotations)
(download)
Sat Sep 1 22:45:15 2007 UTC (17 years ago) by niro
File MIME type: text/plain
File size: 3798 byte(s)
Sat Sep 1 22:45:15 2007 UTC (17 years ago) by niro
File MIME type: text/plain
File size: 3798 byte(s)
-import if magellan mkinitrd; it is a fork of redhats mkinitrd-5.0.8 with all magellan patches and features; deprecates magellan-src/mkinitrd
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 | { |
46 | static char *cleanenv[1] = { NULL }; |
47 | |
48 | char **ep; |
49 | unsigned opt; |
50 | llist_t *unset_env = NULL; |
51 | extern char **environ; |
52 | |
53 | opt_complementary = "u::"; |
54 | #if ENABLE_FEATURE_ENV_LONG_OPTIONS |
55 | applet_long_options = env_long_options; |
56 | #endif |
57 | |
58 | opt = getopt32(argc, argv, "+iu:", &unset_env); |
59 | |
60 | argv += optind; |
61 | if (*argv && LONE_DASH(argv[0])) { |
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 | xfunc_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 | 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 |