main.c

   1 /* Toybox infrastructure.
   2  *
   3  * Copyright 2006 Rob Landley <rob@landley.net>
   4  */
   5
   6 #include "toys.h"
   7
   8 #ifndef TOYBOX_VERSION
   9 #define TOYBOX_VERSION "0.7.1"
  10 #endif
  11
  12 // Populate toy_list[].
  13
  14 #undef NEWTOY
  15 #undef OLDTOY
  16 #define NEWTOY(name, opts, flags) {#name, name##_main, OPTSTR_##name, flags},
  17 #define OLDTOY(name, oldname, flags) \
  18   {#name, oldname##_main, OPTSTR_##oldname, flags},
  19
  20 struct toy_list toy_list[] = {
  21 #include "generated/newtoys.h"
  22 };
  23
  24 // global context for this command.
  25
  26 struct toy_context toys;
  27 union global_union this;
  28 char toybuf[4096], libbuf[4096];
  29
  30 struct toy_list *toy_find(char *name)
  31 {
  32   int top, bottom, middle;
  33
  34   if (!CFG_TOYBOX) return 0;
  35
  36   // If the name starts with "toybox" accept that as a match.  Otherwise
  37   // skip the first entry, which is out of order.
  38
  39   if (!strncmp(name,"toybox",6)) return toy_list;
  40   bottom = 1;
  41
  42   // Binary search to find this command.
  43
  44   top = ARRAY_LEN(toy_list)-1;
  45   for (;;) {
  46     int result;
  47
  48     middle = (top+bottom)/2;
  49     if (middle<bottom || middle>top) return NULL;
  50     result = strcmp(name,toy_list[middle].name);
  51     if (!result) return toy_list+middle;
  52     if (result<0) top=--middle;
  53     else bottom = ++middle;
  54   }
  55 }
  56
  57 // Figure out whether or not anything is using the option parsing logic,
  58 // because the compiler can't figure out whether or not to optimize it away
  59 // on its' own.  NEED_OPTIONS becomes a constant allowing if() to optimize
  60 // stuff out via dead code elimination.
  61
  62 #undef NEWTOY
  63 #undef OLDTOY
  64 #define NEWTOY(name, opts, flags) opts ||
  65 #define OLDTOY(name, oldname, flags) OPTSTR_##oldname ||
  66 static const int NEED_OPTIONS =
  67 #include "generated/newtoys.h"
  68 0;  // Ends the opts || opts || opts...
  69
  70 static void unknown(char *name)
  71 {
  72   toys.exitval = 127;
  73   error_exit("Unknown command %s", name);
  74 }
  75
  76 // Setup toybox global state for this command.
  77 static void toy_singleinit(struct toy_list *which, char *argv[])
  78 {
  79   toys.which = which;
  80   toys.argv = argv;
  81
  82   if (CFG_TOYBOX_I18N) setlocale(LC_ALL, "C"+!!(which->flags & TOYFLAG_LOCALE));
  83
  84   // Parse --help and --version for (almost) all commands
  85   if (CFG_TOYBOX_HELP_DASHDASH && !(which->flags & TOYFLAG_NOHELP) && argv[1]) {
  86     if (!strcmp(argv[1], "--help")) {
  87       if (CFG_TOYBOX && toys.which == toy_list && toys.argv[2])
  88         if (!(toys.which = toy_find(toys.argv[2]))) unknown(toys.argv[2]);
  89       show_help(stdout);
  90       xexit();
  91     }
  92
  93     if (!strcmp(argv[1], "--version")) {
  94       xputs("toybox "TOYBOX_VERSION);
  95       xexit();
  96     }
  97   }
  98
  99   if (NEED_OPTIONS && which->options) get_optflags();
 100   else {
 101     toys.optargs = argv+1;
 102     for (toys.optc = 0; toys.optargs[toys.optc]; toys.optc++);
 103   }
 104   toys.old_umask = umask(0);
 105   if (!(which->flags & TOYFLAG_UMASK)) umask(toys.old_umask);
 106   toys.signalfd--;
 107   toys.toycount = ARRAY_LEN(toy_list);
 108 }
 109
 110 // Full init needed by multiplexer or reentrant calls, calls singleinit at end
 111 void toy_init(struct toy_list *which, char *argv[])
 112 {
 113   void *oldwhich = toys.which;
 114
 115   // Drop permissions for non-suid commands.
 116
 117   if (CFG_TOYBOX_SUID) {
 118     if (!toys.which) toys.which = toy_list;
 119
 120     uid_t uid = getuid(), euid = geteuid();
 121
 122     if (!(which->flags & TOYFLAG_STAYROOT)) {
 123       if (uid != euid) {
 124         if (setuid(uid)) perror_exit("setuid %d->%d", euid, uid); // drop root
 125         euid = uid;
 126         toys.wasroot++;
 127       }
 128     } else if (CFG_TOYBOX_DEBUG && uid && which != toy_list)
 129       error_msg("Not installed suid root");
 130
 131     if ((which->flags & TOYFLAG_NEEDROOT) && euid) help_exit("Not root");
 132   }
 133
 134   // Free old toys contents (to be reentrant), but leave rebound if any
 135   // don't blank old optargs if our new argc lives in the old optargs.
 136   if (argv<toys.optargs || argv>toys.optargs+toys.optc) free(toys.optargs);
 137   memset(&toys, 0, offsetof(struct toy_context, rebound));
 138   if (oldwhich) memset(&this, 0, sizeof(this));
 139
 140   // Continue to portion of init needed by standalone commands
 141   toy_singleinit(which, argv);
 142 }
 143
 144 // Like exec() but runs an internal toybox command instead of another file.
 145 // Only returns if it can't run command internally, otherwise exit() when done.
 146 void toy_exec(char *argv[])
 147 {
 148   struct toy_list *which;
 149
 150   // Return if we can't find it (which includes no multiplexer case),
 151   if (!(which = toy_find(*argv))) return;
 152
 153   // Return if stack depth getting noticeable (proxy for leaked heap, etc).
 154
 155   // Compiler writers have decided subtracting char * is undefined behavior,
 156   // so convert to integers. (LP64 says sizeof(long)==sizeof(pointer).)
 157   if (!CFG_TOYBOX_NORECURSE)
 158     if (toys.stacktop && labs((long)toys.stacktop-(long)&which)>6000) return;
 159
 160   // Return if we need to re-exec to acquire root via suid bit.
 161   if (toys.which && (which->flags&TOYFLAG_ROOTONLY) && toys.wasroot) return;
 162
 163   // Run command
 164   toy_init(which, argv);
 165   if (toys.which) toys.which->toy_main();
 166   xexit();
 167 }
 168
 169 // Multiplexer command, first argument is command to run, rest are args to that.
 170 // If first argument starts with - output list of command install paths.
 171 void toybox_main(void)
 172 {
 173   static char *toy_paths[]={"usr/","bin/","sbin/",0};
 174   int i, len = 0;
 175
 176   // fast path: try to exec immediately.
 177   // (Leave toys.which null to disable suid return logic.)
 178   if (toys.argv[1]) toy_exec(toys.argv+1);
 179
 180   // For early error reporting
 181   toys.which = toy_list;
 182
 183   if (toys.argv[1] && toys.argv[1][0] != '-') unknown(toys.argv[1]);
 184
 185   // Output list of command.
 186   for (i=1; i<ARRAY_LEN(toy_list); i++) {
 187     int fl = toy_list[i].flags;
 188     if (fl & TOYMASK_LOCATION) {
 189       if (toys.argv[1]) {
 190         int j;
 191         for (j=0; toy_paths[j]; j++)
 192           if (fl & (1<<j)) len += printf("%s", toy_paths[j]);
 193       }
 194       len += printf("%s",toy_list[i].name);
 195       if (++len > 65) len = 0;
 196       xputc(len ? ' ' : '\n');
 197     }
 198   }
 199   xputc('\n');
 200 }
 201
 202 int main(int argc, char *argv[])
 203 {
 204   if (!*argv) return 127;
 205
 206   // Snapshot stack location so we can detect recursion depth later.
 207   // This is its own block so probe doesn't permanently consume stack.
 208   else {
 209     int stack;
 210
 211     toys.stacktop = &stack;
 212   }
 213   *argv = getbasename(*argv);
 214
 215   // If nommu can't fork, special reentry path.
 216   // Use !stacktop to signal "vfork happened", both before and after xexec()
 217   if (!CFG_TOYBOX_FORK) {
 218     if (0x80 & **argv) {
 219       **argv &= 0x7f;
 220       toys.stacktop = 0;
 221     }
 222   }
 223
 224   if (CFG_TOYBOX) {
 225     // Call the multiplexer, adjusting this argv[] to be its' argv[1].
 226     // (It will adjust it back before calling toy_exec().)
 227     toys.argv = argv-1;
 228     toybox_main();
 229   } else {
 230     // a single toybox command built standalone with no multiplexer
 231     toy_singleinit(toy_list, argv);
 232     toy_list->toy_main();
 233   }
 234
 235   xexit();
 236 }