rpm2cpio: handle bz2 too; code shrink
[oweals/busybox.git] / coreutils / env.c
index eb1f0b2683858b2945e5454688c703323674b1f4..f50a03e8b683b868f2fdf05d22f428208a3f52e8 100644 (file)
  * - correct "-" option usage
  * - multiple "-u unsetenv" support
  * - GNU long option support
- * - use bb_default_error_retval
+ * - use xfunc_error_retval
  */
 
+/* This is a NOEXEC applet. Be very careful! */
 
-#include <stdio.h>
-#include <string.h>
-#include <stdlib.h>
-#include <errno.h>
-#include <unistd.h>
-#include <getopt.h> /* struct option */
-#include "busybox.h"
+#include "libbb.h"
 
 #if ENABLE_FEATURE_ENV_LONG_OPTIONS
-static const struct option env_long_options[] = {
-       { "ignore-environment", 0, NULL, 'i' },
-       { "unset", 1, NULL, 'u' },
-       { 0, 0, 0, 0 }
-};
+static const char env_longopts[] ALIGN1 =
+       "ignore-environment\0" No_argument       "i"
+       "unset\0"              Required_argument "u"
+       ;
 #endif
 
-int env_main(int argc, char** argv)
+int env_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
+int env_main(int argc UNUSED_PARAM, char **argv)
 {
-       static char *cleanenv[1] = { NULL };
-
-       char **ep, *p;
-       unsigned long opt;
+       char **ep;
+       unsigned opt;
        llist_t *unset_env = NULL;
-       extern char **environ;
 
-       bb_opt_complementally = "u::";
+       opt_complementary = "u::";
 #if ENABLE_FEATURE_ENV_LONG_OPTIONS
-       bb_applet_long_options = env_long_options;
+       applet_long_options = env_longopts;
 #endif
-
-       opt = bb_getopt_ulflags(argc, argv, "+iu:", &unset_env);
-
+       opt = getopt32(argv, "+iu:", &unset_env);
        argv += optind;
-       if (*argv && (argv[0][0] == '-') && !argv[0][1]) {
+       if (*argv && LONE_DASH(argv[0])) {
                opt |= 1;
                ++argv;
        }
-
-       if(opt & 1)
-               environ = cleanenv;
-       else if(opt & 2) {
-               while(unset_env) {
-                       unsetenv(unset_env->data);
-                       unset_env = unset_env->link;
-               }
+       if (opt & 1) {
+               clearenv();
+       }
+       while (unset_env) {
+               char *var = llist_pop(&unset_env);
+               /* This does not handle -uVAR=VAL
+                * (coreutils _sets_ the variable in that case): */
+               /*unsetenv(var);*/
+               /* This does, but uses somewhan undocumented feature that
+                * putenv("name_without_equal_sign") unsets the variable: */
+               putenv(var);
        }
 
-       while (*argv && ((p = strchr(*argv, '=')) != NULL)) {
+       while (*argv && (strchr(*argv, '=') != NULL)) {
                if (putenv(*argv) < 0) {
                        bb_perror_msg_and_die("putenv");
                }
@@ -85,17 +78,17 @@ int env_main(int argc, char** argv)
        }
 
        if (*argv) {
-               execvp(*argv, argv);
+               BB_EXECVP(*argv, argv);
                /* SUSv3-mandated exit codes. */
-               bb_default_error_retval = (errno == ENOENT) ? 127 : 126;
-               bb_perror_msg_and_die("%s", *argv);
+               xfunc_error_retval = (errno == ENOENT) ? 127 : 126;
+               bb_simple_perror_msg_and_die(*argv);
        }
 
        for (ep = environ; *ep; ep++) {
                puts(*ep);
        }
 
-       bb_fflush_stdout_and_exit(0);
+       fflush_stdout_and_exit(EXIT_SUCCESS);
 }
 
 /*
@@ -130,5 +123,3 @@ int env_main(int argc, char** argv)
  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  * SUCH DAMAGE.
  */
-
-