main.c

   1 /* Toybox infrastructure.
   2  *
   3  * Copyright 2006 Rob Landley <rob@landley.net>
   4  */
   5
   6 #include "toys.h"
   7
   8 // Populate toy_list[].
   9
  10 #undef NEWTOY
  11 #undef OLDTOY
  12 #define NEWTOY(name, opts, flags) {#name, name##_main, opts, flags},
  13 #define OLDTOY(name, oldname, opts, flags) {#name, oldname##_main, opts, flags},
  14
  15 struct toy_list toy_list[] = {
  16 #include "generated/newtoys.h"
  17 };
  18
  19 // global context for this command.
  20
  21 struct toy_context toys;
  22 union global_union this;
  23 char toybuf[4096], libbuf[4096];
  24
  25 struct toy_list *toy_find(char *name)
  26 {
  27   int top, bottom, middle;
  28
  29   // If the name starts with "toybox" accept that as a match.  Otherwise
  30   // skip the first entry, which is out of order.
  31
  32   if (!strncmp(name,"toybox",6)) return toy_list;
  33   bottom = 1;
  34
  35   // Binary search to find this command.
  36
  37   top = ARRAY_LEN(toy_list)-1;
  38   for (;;) {
  39     int result;
  40
  41     middle = (top+bottom)/2;
  42     if (middle<bottom || middle>top) return NULL;
  43     result = strcmp(name,toy_list[middle].name);
  44     if (!result) return toy_list+middle;
  45     if (result<0) top=--middle;
  46     else bottom = ++middle;
  47   }
  48 }
  49
  50 // Figure out whether or not anything is using the option parsing logic,
  51 // because the compiler can't figure out whether or not to optimize it away
  52 // on its' own.  NEED_OPTIONS becomes a constant allowing if() to optimize
  53 // stuff out via dead code elimination.
  54
  55 #undef NEWTOY
  56 #undef OLDTOY
  57 #define NEWTOY(name, opts, flags) opts ||
  58 #define OLDTOY(name, oldname, opts, flags) opts ||
  59 static const int NEED_OPTIONS =
  60 #include "generated/newtoys.h"
  61 0;  // Ends the opts || opts || opts...
  62
  63 // Subset of init needed by singlemain
  64 static void toy_singleinit(struct toy_list *which, char *argv[])
  65 {
  66   toys.which = which;
  67   toys.argv = argv;
  68
  69   if (CFG_TOYBOX_I18N && (which->flags & TOYFLAG_LOCALE)) setlocale(LC_ALL, "");
  70
  71   if (CFG_TOYBOX_HELP_DASHDASH && argv[1] && !strcmp(argv[1], "--help")) {
  72     if (toys.which == toy_list && toys.argv[2])
  73       if (!(toys.which = toy_find(toys.argv[2]))) return;
  74     show_help();
  75     xexit();
  76   }
  77
  78   if (NEED_OPTIONS && which->options) get_optflags();
  79   else {
  80     toys.optargs = argv+1;
  81     for (toys.optc=0; toys.optargs[toys.optc]; toys.optc++);
  82   }
  83   toys.old_umask = umask(0);
  84   if (!(which->flags & TOYFLAG_UMASK)) umask(toys.old_umask);
  85   toys.signalfd--;
  86   toys.toycount = ARRAY_LEN(toy_list);
  87 }
  88
  89 // Setup toybox global state for this command.
  90
  91 void toy_init(struct toy_list *which, char *argv[])
  92 {
  93   // Drop permissions for non-suid commands.
  94
  95   if (CFG_TOYBOX_SUID) {
  96     uid_t uid = getuid(), euid = geteuid();
  97
  98     if (!(which->flags & TOYFLAG_STAYROOT)) {
  99       if (uid != euid)
 100         if (!setuid(euid=uid)) perror_exit("setuid"); // drop root
 101     } else if (CFG_TOYBOX_DEBUG && uid && which != toy_list)
 102       error_msg("Not installed suid root");
 103
 104     if ((which->flags & TOYFLAG_NEEDROOT) && euid) {
 105       toys.exithelp++;
 106       error_exit("Not root");
 107     }
 108   }
 109
 110   // Free old toys contents (to be reentrant), but leave rebound if any
 111
 112   if (toys.optargs != toys.argv+1) free(toys.optargs);
 113   memset(&toys, 0, offsetof(struct toy_context, rebound));
 114
 115   // Subset of init needed by singlemain.
 116   toy_singleinit(which, argv);
 117 }
 118
 119 // Like exec() but runs an internal toybox command instead of another file.
 120 // Only returns if it can't find the command, otherwise exit() when done.
 121 void toy_exec(char *argv[])
 122 {
 123   struct toy_list *which;
 124
 125   if (!(which = toy_find(argv[0]))) return;
 126   toy_init(which, argv);
 127   if (toys.which) toys.which->toy_main();
 128   if (fflush(NULL) || ferror(stdout)) perror_exit("write");
 129   xexit();
 130 }
 131
 132 // Multiplexer command, first argument is command to run, rest are args to that.
 133 // If first argument starts with - output list of command install paths.
 134
 135 void toybox_main(void)
 136 {
 137   static char *toy_paths[]={"usr/","bin/","sbin/",0};
 138   int i, len = 0;
 139
 140   toys.which = toy_list;
 141   if (toys.argv[1]) {
 142     toys.optc = 0;
 143     toy_exec(toys.argv+1);
 144     if (toys.argv[1][0] == '-') goto list;
 145
 146     error_exit("Unknown command %s",toys.argv[1]);
 147   }
 148
 149 list:
 150   // Output list of command.
 151   for (i=1; i<ARRAY_LEN(toy_list); i++) {
 152     int fl = toy_list[i].flags;
 153     if (fl & TOYMASK_LOCATION) {
 154       if (toys.argv[1]) {
 155         int j;
 156         for (j=0; toy_paths[j]; j++)
 157           if (fl & (1<<j)) len += printf("%s", toy_paths[j]);
 158       }
 159       len += printf("%s ",toy_list[i].name);
 160       if (len>65) {
 161         xputc('\n');
 162         len=0;
 163       }
 164     }
 165   }
 166   xputc('\n');
 167 }
 168
 169 int main(int argc, char *argv[])
 170 {
 171   if (CFG_TOYBOX) {
 172     // Trim path off of command name
 173     *argv = basename(*argv);
 174
 175     // Call the multiplexer, adjusting this argv[] to be its' argv[1].
 176     // (It will adjust it back before calling toy_exec().)
 177     toys.argv = argv-1;
 178     toybox_main();
 179   } else {
 180     // a single toybox command built standalone with no multiplexer
 181     toy_singleinit(toy_list, argv);
 182     toy_list->toy_main();
 183     if (fflush(NULL) || ferror(stdout)) perror_exit("write");
 184   }
 185
 186   return toys.exitval;
 187 }