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