Home | History | Annotate | Download | only in init
      1 /*
      2  * Copyright (C) 2008 The Android Open Source Project
      3  *
      4  * Licensed under the Apache License, Version 2.0 (the "License");
      5  * you may not use this file except in compliance with the License.
      6  * You may obtain a copy of the License at
      7  *
      8  *      http://www.apache.org/licenses/LICENSE-2.0
      9  *
     10  * Unless required by applicable law or agreed to in writing, software
     11  * distributed under the License is distributed on an "AS IS" BASIS,
     12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
     13  * See the License for the specific language governing permissions and
     14  * limitations under the License.
     15  */
     16 
     17 #include <stdio.h>
     18 #include <stdlib.h>
     19 #include <string.h>
     20 #include <unistd.h>
     21 #include <fcntl.h>
     22 #include <ctype.h>
     23 #include <signal.h>
     24 #include <sys/wait.h>
     25 #include <sys/mount.h>
     26 #include <sys/stat.h>
     27 #include <sys/poll.h>
     28 #include <errno.h>
     29 #include <stdarg.h>
     30 #include <mtd/mtd-user.h>
     31 #include <sys/types.h>
     32 #include <sys/socket.h>
     33 #include <sys/un.h>
     34 
     35 #ifdef HAVE_SELINUX
     36 #include <sys/mman.h>
     37 #include <selinux/selinux.h>
     38 #include <selinux/label.h>
     39 #endif
     40 
     41 #include <libgen.h>
     42 
     43 #include <cutils/list.h>
     44 #include <cutils/sockets.h>
     45 #include <cutils/iosched_policy.h>
     46 #include <private/android_filesystem_config.h>
     47 #include <termios.h>
     48 
     49 #include <sys/system_properties.h>
     50 
     51 #include "devices.h"
     52 #include "init.h"
     53 #include "log.h"
     54 #include "property_service.h"
     55 #include "bootchart.h"
     56 #include "signal_handler.h"
     57 #include "keychords.h"
     58 #include "init_parser.h"
     59 #include "util.h"
     60 #include "ueventd.h"
     61 
     62 #ifdef HAVE_SELINUX
     63 struct selabel_handle *sehandle;
     64 #endif
     65 
     66 static int property_triggers_enabled = 0;
     67 
     68 #if BOOTCHART
     69 static int   bootchart_count;
     70 #endif
     71 
     72 static char console[32];
     73 static char bootmode[32];
     74 static char hardware[32];
     75 static unsigned revision = 0;
     76 static char qemu[32];
     77 
     78 #ifdef HAVE_SELINUX
     79 static int selinux_enabled = 1;
     80 static int selinux_enforcing = 0;
     81 #endif
     82 
     83 static struct action *cur_action = NULL;
     84 static struct command *cur_command = NULL;
     85 static struct listnode *command_queue = NULL;
     86 
     87 void notify_service_state(const char *name, const char *state)
     88 {
     89     char pname[PROP_NAME_MAX];
     90     int len = strlen(name);
     91     if ((len + 10) > PROP_NAME_MAX)
     92         return;
     93     snprintf(pname, sizeof(pname), "init.svc.%s", name);
     94     property_set(pname, state);
     95 }
     96 
     97 static int have_console;
     98 static char *console_name = "/dev/console";
     99 static time_t process_needs_restart;
    100 
    101 static const char *ENV[32];
    102 
    103 /* add_environment - add "key=value" to the current environment */
    104 int add_environment(const char *key, const char *val)
    105 {
    106     int n;
    107 
    108     for (n = 0; n < 31; n++) {
    109         if (!ENV[n]) {
    110             size_t len = strlen(key) + strlen(val) + 2;
    111             char *entry = malloc(len);
    112             snprintf(entry, len, "%s=%s", key, val);
    113             ENV[n] = entry;
    114             return 0;
    115         }
    116     }
    117 
    118     return 1;
    119 }
    120 
    121 static void zap_stdio(void)
    122 {
    123     int fd;
    124     fd = open("/dev/null", O_RDWR);
    125     dup2(fd, 0);
    126     dup2(fd, 1);
    127     dup2(fd, 2);
    128     close(fd);
    129 }
    130 
    131 static void open_console()
    132 {
    133     int fd;
    134     if ((fd = open(console_name, O_RDWR)) < 0) {
    135         fd = open("/dev/null", O_RDWR);
    136     }
    137     ioctl(fd, TIOCSCTTY, 0);
    138     dup2(fd, 0);
    139     dup2(fd, 1);
    140     dup2(fd, 2);
    141     close(fd);
    142 }
    143 
    144 static void publish_socket(const char *name, int fd)
    145 {
    146     char key[64] = ANDROID_SOCKET_ENV_PREFIX;
    147     char val[64];
    148 
    149     strlcpy(key + sizeof(ANDROID_SOCKET_ENV_PREFIX) - 1,
    150             name,
    151             sizeof(key) - sizeof(ANDROID_SOCKET_ENV_PREFIX));
    152     snprintf(val, sizeof(val), "%d", fd);
    153     add_environment(key, val);
    154 
    155     /* make sure we don't close-on-exec */
    156     fcntl(fd, F_SETFD, 0);
    157 }
    158 
    159 void service_start(struct service *svc, const char *dynamic_args)
    160 {
    161     struct stat s;
    162     pid_t pid;
    163     int needs_console;
    164     int n;
    165 #ifdef HAVE_SELINUX
    166     char *scon = NULL;
    167     int rc;
    168 #endif
    169         /* starting a service removes it from the disabled or reset
    170          * state and immediately takes it out of the restarting
    171          * state if it was in there
    172          */
    173     svc->flags &= (~(SVC_DISABLED|SVC_RESTARTING|SVC_RESET));
    174     svc->time_started = 0;
    175 
    176         /* running processes require no additional work -- if
    177          * they're in the process of exiting, we've ensured
    178          * that they will immediately restart on exit, unless
    179          * they are ONESHOT
    180          */
    181     if (svc->flags & SVC_RUNNING) {
    182         return;
    183     }
    184 
    185     needs_console = (svc->flags & SVC_CONSOLE) ? 1 : 0;
    186     if (needs_console && (!have_console)) {
    187         ERROR("service '%s' requires console\n", svc->name);
    188         svc->flags |= SVC_DISABLED;
    189         return;
    190     }
    191 
    192     if (stat(svc->args[0], &s) != 0) {
    193         ERROR("cannot find '%s', disabling '%s'\n", svc->args[0], svc->name);
    194         svc->flags |= SVC_DISABLED;
    195         return;
    196     }
    197 
    198     if ((!(svc->flags & SVC_ONESHOT)) && dynamic_args) {
    199         ERROR("service '%s' must be one-shot to use dynamic args, disabling\n",
    200                svc->args[0]);
    201         svc->flags |= SVC_DISABLED;
    202         return;
    203     }
    204 
    205 #ifdef HAVE_SELINUX
    206     if (is_selinux_enabled() > 0) {
    207         char *mycon = NULL, *fcon = NULL;
    208 
    209         INFO("computing context for service '%s'\n", svc->args[0]);
    210         rc = getcon(&mycon);
    211         if (rc < 0) {
    212             ERROR("could not get context while starting '%s'\n", svc->name);
    213             return;
    214         }
    215 
    216         rc = getfilecon(svc->args[0], &fcon);
    217         if (rc < 0) {
    218             ERROR("could not get context while starting '%s'\n", svc->name);
    219             freecon(mycon);
    220             return;
    221         }
    222 
    223         rc = security_compute_create(mycon, fcon, string_to_security_class("process"), &scon);
    224         freecon(mycon);
    225         freecon(fcon);
    226         if (rc < 0) {
    227             ERROR("could not get context while starting '%s'\n", svc->name);
    228             return;
    229         }
    230     }
    231 #endif
    232 
    233     NOTICE("starting '%s'\n", svc->name);
    234 
    235     pid = fork();
    236 
    237     if (pid == 0) {
    238         struct socketinfo *si;
    239         struct svcenvinfo *ei;
    240         char tmp[32];
    241         int fd, sz;
    242 
    243         umask(077);
    244         if (properties_inited()) {
    245             get_property_workspace(&fd, &sz);
    246             sprintf(tmp, "%d,%d", dup(fd), sz);
    247             add_environment("ANDROID_PROPERTY_WORKSPACE", tmp);
    248         }
    249 
    250         for (ei = svc->envvars; ei; ei = ei->next)
    251             add_environment(ei->name, ei->value);
    252 
    253 #ifdef HAVE_SELINUX
    254         setsockcreatecon(scon);
    255 #endif
    256 
    257         for (si = svc->sockets; si; si = si->next) {
    258             int socket_type = (
    259                     !strcmp(si->type, "stream") ? SOCK_STREAM :
    260                         (!strcmp(si->type, "dgram") ? SOCK_DGRAM : SOCK_SEQPACKET));
    261             int s = create_socket(si->name, socket_type,
    262                                   si->perm, si->uid, si->gid);
    263             if (s >= 0) {
    264                 publish_socket(si->name, s);
    265             }
    266         }
    267 
    268 #ifdef HAVE_SELINUX
    269         freecon(scon);
    270         scon = NULL;
    271         setsockcreatecon(NULL);
    272 #endif
    273 
    274         if (svc->ioprio_class != IoSchedClass_NONE) {
    275             if (android_set_ioprio(getpid(), svc->ioprio_class, svc->ioprio_pri)) {
    276                 ERROR("Failed to set pid %d ioprio = %d,%d: %s\n",
    277                       getpid(), svc->ioprio_class, svc->ioprio_pri, strerror(errno));
    278             }
    279         }
    280 
    281         if (needs_console) {
    282             setsid();
    283             open_console();
    284         } else {
    285             zap_stdio();
    286         }
    287 
    288 #if 0
    289         for (n = 0; svc->args[n]; n++) {
    290             INFO("args[%d] = '%s'\n", n, svc->args[n]);
    291         }
    292         for (n = 0; ENV[n]; n++) {
    293             INFO("env[%d] = '%s'\n", n, ENV[n]);
    294         }
    295 #endif
    296 
    297         setpgid(0, getpid());
    298 
    299     /* as requested, set our gid, supplemental gids, and uid */
    300         if (svc->gid) {
    301             if (setgid(svc->gid) != 0) {
    302                 ERROR("setgid failed: %s\n", strerror(errno));
    303                 _exit(127);
    304             }
    305         }
    306         if (svc->nr_supp_gids) {
    307             if (setgroups(svc->nr_supp_gids, svc->supp_gids) != 0) {
    308                 ERROR("setgroups failed: %s\n", strerror(errno));
    309                 _exit(127);
    310             }
    311         }
    312         if (svc->uid) {
    313             if (setuid(svc->uid) != 0) {
    314                 ERROR("setuid failed: %s\n", strerror(errno));
    315                 _exit(127);
    316             }
    317         }
    318 
    319 #ifdef HAVE_SELINUX
    320         if (svc->seclabel) {
    321             if (is_selinux_enabled() > 0 && setexeccon(svc->seclabel) < 0) {
    322                 ERROR("cannot setexeccon('%s'): %s\n", svc->seclabel, strerror(errno));
    323                 _exit(127);
    324             }
    325         }
    326 #endif
    327 
    328         if (!dynamic_args) {
    329             if (execve(svc->args[0], (char**) svc->args, (char**) ENV) < 0) {
    330                 ERROR("cannot execve('%s'): %s\n", svc->args[0], strerror(errno));
    331             }
    332         } else {
    333             char *arg_ptrs[INIT_PARSER_MAXARGS+1];
    334             int arg_idx = svc->nargs;
    335             char *tmp = strdup(dynamic_args);
    336             char *next = tmp;
    337             char *bword;
    338 
    339             /* Copy the static arguments */
    340             memcpy(arg_ptrs, svc->args, (svc->nargs * sizeof(char *)));
    341 
    342             while((bword = strsep(&next, " "))) {
    343                 arg_ptrs[arg_idx++] = bword;
    344                 if (arg_idx == INIT_PARSER_MAXARGS)
    345                     break;
    346             }
    347             arg_ptrs[arg_idx] = '\0';
    348             execve(svc->args[0], (char**) arg_ptrs, (char**) ENV);
    349         }
    350         _exit(127);
    351     }
    352 
    353 #ifdef HAVE_SELINUX
    354     freecon(scon);
    355 #endif
    356 
    357     if (pid < 0) {
    358         ERROR("failed to start '%s'\n", svc->name);
    359         svc->pid = 0;
    360         return;
    361     }
    362 
    363     svc->time_started = gettime();
    364     svc->pid = pid;
    365     svc->flags |= SVC_RUNNING;
    366 
    367     if (properties_inited())
    368         notify_service_state(svc->name, "running");
    369 }
    370 
    371 /* The how field should be either SVC_DISABLED or SVC_RESET */
    372 static void service_stop_or_reset(struct service *svc, int how)
    373 {
    374         /* we are no longer running, nor should we
    375          * attempt to restart
    376          */
    377     svc->flags &= (~(SVC_RUNNING|SVC_RESTARTING));
    378 
    379     if ((how != SVC_DISABLED) && (how != SVC_RESET)) {
    380         /* Hrm, an illegal flag.  Default to SVC_DISABLED */
    381         how = SVC_DISABLED;
    382     }
    383         /* if the service has not yet started, prevent
    384          * it from auto-starting with its class
    385          */
    386     if (how == SVC_RESET) {
    387         svc->flags |= (svc->flags & SVC_RC_DISABLED) ? SVC_DISABLED : SVC_RESET;
    388     } else {
    389         svc->flags |= how;
    390     }
    391 
    392     if (svc->pid) {
    393         NOTICE("service '%s' is being killed\n", svc->name);
    394         kill(-svc->pid, SIGKILL);
    395         notify_service_state(svc->name, "stopping");
    396     } else {
    397         notify_service_state(svc->name, "stopped");
    398     }
    399 }
    400 
    401 void service_reset(struct service *svc)
    402 {
    403     service_stop_or_reset(svc, SVC_RESET);
    404 }
    405 
    406 void service_stop(struct service *svc)
    407 {
    408     service_stop_or_reset(svc, SVC_DISABLED);
    409 }
    410 
    411 void property_changed(const char *name, const char *value)
    412 {
    413     if (property_triggers_enabled)
    414         queue_property_triggers(name, value);
    415 }
    416 
    417 static void restart_service_if_needed(struct service *svc)
    418 {
    419     time_t next_start_time = svc->time_started + 5;
    420 
    421     if (next_start_time <= gettime()) {
    422         svc->flags &= (~SVC_RESTARTING);
    423         service_start(svc, NULL);
    424         return;
    425     }
    426 
    427     if ((next_start_time < process_needs_restart) ||
    428         (process_needs_restart == 0)) {
    429         process_needs_restart = next_start_time;
    430     }
    431 }
    432 
    433 static void restart_processes()
    434 {
    435     process_needs_restart = 0;
    436     service_for_each_flags(SVC_RESTARTING,
    437                            restart_service_if_needed);
    438 }
    439 
    440 static void msg_start(const char *name)
    441 {
    442     struct service *svc;
    443     char *tmp = NULL;
    444     char *args = NULL;
    445 
    446     if (!strchr(name, ':'))
    447         svc = service_find_by_name(name);
    448     else {
    449         tmp = strdup(name);
    450         args = strchr(tmp, ':');
    451         *args = '\0';
    452         args++;
    453 
    454         svc = service_find_by_name(tmp);
    455     }
    456 
    457     if (svc) {
    458         service_start(svc, args);
    459     } else {
    460         ERROR("no such service '%s'\n", name);
    461     }
    462     if (tmp)
    463         free(tmp);
    464 }
    465 
    466 static void msg_stop(const char *name)
    467 {
    468     struct service *svc = service_find_by_name(name);
    469 
    470     if (svc) {
    471         service_stop(svc);
    472     } else {
    473         ERROR("no such service '%s'\n", name);
    474     }
    475 }
    476 
    477 void handle_control_message(const char *msg, const char *arg)
    478 {
    479     if (!strcmp(msg,"start")) {
    480         msg_start(arg);
    481     } else if (!strcmp(msg,"stop")) {
    482         msg_stop(arg);
    483     } else if (!strcmp(msg,"restart")) {
    484         msg_stop(arg);
    485         msg_start(arg);
    486     } else {
    487         ERROR("unknown control msg '%s'\n", msg);
    488     }
    489 }
    490 
    491 static struct command *get_first_command(struct action *act)
    492 {
    493     struct listnode *node;
    494     node = list_head(&act->commands);
    495     if (!node || list_empty(&act->commands))
    496         return NULL;
    497 
    498     return node_to_item(node, struct command, clist);
    499 }
    500 
    501 static struct command *get_next_command(struct action *act, struct command *cmd)
    502 {
    503     struct listnode *node;
    504     node = cmd->clist.next;
    505     if (!node)
    506         return NULL;
    507     if (node == &act->commands)
    508         return NULL;
    509 
    510     return node_to_item(node, struct command, clist);
    511 }
    512 
    513 static int is_last_command(struct action *act, struct command *cmd)
    514 {
    515     return (list_tail(&act->commands) == &cmd->clist);
    516 }
    517 
    518 void execute_one_command(void)
    519 {
    520     int ret;
    521 
    522     if (!cur_action || !cur_command || is_last_command(cur_action, cur_command)) {
    523         cur_action = action_remove_queue_head();
    524         cur_command = NULL;
    525         if (!cur_action)
    526             return;
    527         INFO("processing action %p (%s)\n", cur_action, cur_action->name);
    528         cur_command = get_first_command(cur_action);
    529     } else {
    530         cur_command = get_next_command(cur_action, cur_command);
    531     }
    532 
    533     if (!cur_command)
    534         return;
    535 
    536     ret = cur_command->func(cur_command->nargs, cur_command->args);
    537     INFO("command '%s' r=%d\n", cur_command->args[0], ret);
    538 }
    539 
    540 static int wait_for_coldboot_done_action(int nargs, char **args)
    541 {
    542     int ret;
    543     INFO("wait for %s\n", coldboot_done);
    544     ret = wait_for_file(coldboot_done, COMMAND_RETRY_TIMEOUT);
    545     if (ret)
    546         ERROR("Timed out waiting for %s\n", coldboot_done);
    547     return ret;
    548 }
    549 
    550 static int keychord_init_action(int nargs, char **args)
    551 {
    552     keychord_init();
    553     return 0;
    554 }
    555 
    556 static int console_init_action(int nargs, char **args)
    557 {
    558     int fd;
    559     char tmp[PROP_VALUE_MAX];
    560 
    561     if (console[0]) {
    562         snprintf(tmp, sizeof(tmp), "/dev/%s", console);
    563         console_name = strdup(tmp);
    564     }
    565 
    566     fd = open(console_name, O_RDWR);
    567     if (fd >= 0)
    568         have_console = 1;
    569     close(fd);
    570 
    571     if( load_565rle_image(INIT_IMAGE_FILE) ) {
    572         fd = open("/dev/tty0", O_WRONLY);
    573         if (fd >= 0) {
    574             const char *msg;
    575                 msg = "\n"
    576             "\n"
    577             "\n"
    578             "\n"
    579             "\n"
    580             "\n"
    581             "\n"  // console is 40 cols x 30 lines
    582             "\n"
    583             "\n"
    584             "\n"
    585             "\n"
    586             "\n"
    587             "\n"
    588             "\n"
    589             "             A N D R O I D ";
    590             write(fd, msg, strlen(msg));
    591             close(fd);
    592         }
    593     }
    594     return 0;
    595 }
    596 
    597 static void import_kernel_nv(char *name, int for_emulator)
    598 {
    599     char *value = strchr(name, '=');
    600     int name_len = strlen(name);
    601 
    602     if (value == 0) return;
    603     *value++ = 0;
    604     if (name_len == 0) return;
    605 
    606 #ifdef HAVE_SELINUX
    607     if (!strcmp(name,"enforcing")) {
    608         selinux_enforcing = atoi(value);
    609     } else if (!strcmp(name,"selinux")) {
    610         selinux_enabled = atoi(value);
    611     }
    612 #endif
    613 
    614     if (for_emulator) {
    615         /* in the emulator, export any kernel option with the
    616          * ro.kernel. prefix */
    617         char buff[PROP_NAME_MAX];
    618         int len = snprintf( buff, sizeof(buff), "ro.kernel.%s", name );
    619 
    620         if (len < (int)sizeof(buff))
    621             property_set( buff, value );
    622         return;
    623     }
    624 
    625     if (!strcmp(name,"qemu")) {
    626         strlcpy(qemu, value, sizeof(qemu));
    627     } else if (!strncmp(name, "androidboot.", 12) && name_len > 12) {
    628         const char *boot_prop_name = name + 12;
    629         char prop[PROP_NAME_MAX];
    630         int cnt;
    631 
    632         cnt = snprintf(prop, sizeof(prop), "ro.boot.%s", boot_prop_name);
    633         if (cnt < PROP_NAME_MAX)
    634             property_set(prop, value);
    635     }
    636 }
    637 
    638 static void export_kernel_boot_props(void)
    639 {
    640     char tmp[PROP_VALUE_MAX];
    641     const char *pval;
    642     unsigned i;
    643     struct {
    644         const char *src_prop;
    645         const char *dest_prop;
    646         const char *def_val;
    647     } prop_map[] = {
    648         { "ro.boot.serialno", "ro.serialno", "", },
    649         { "ro.boot.mode", "ro.bootmode", "unknown", },
    650         { "ro.boot.baseband", "ro.baseband", "unknown", },
    651         { "ro.boot.bootloader", "ro.bootloader", "unknown", },
    652     };
    653 
    654     for (i = 0; i < ARRAY_SIZE(prop_map); i++) {
    655         pval = property_get(prop_map[i].src_prop);
    656         property_set(prop_map[i].dest_prop, pval ?: prop_map[i].def_val);
    657     }
    658 
    659     pval = property_get("ro.boot.console");
    660     if (pval)
    661         strlcpy(console, pval, sizeof(console));
    662 
    663     /* save a copy for init's usage during boot */
    664     strlcpy(bootmode, property_get("ro.bootmode"), sizeof(bootmode));
    665 
    666     /* if this was given on kernel command line, override what we read
    667      * before (e.g. from /proc/cpuinfo), if anything */
    668     pval = property_get("ro.boot.hardware");
    669     if (pval)
    670         strlcpy(hardware, pval, sizeof(hardware));
    671     property_set("ro.hardware", hardware);
    672 
    673     snprintf(tmp, PROP_VALUE_MAX, "%d", revision);
    674     property_set("ro.revision", tmp);
    675 
    676     /* TODO: these are obsolete. We should delete them */
    677     if (!strcmp(bootmode,"factory"))
    678         property_set("ro.factorytest", "1");
    679     else if (!strcmp(bootmode,"factory2"))
    680         property_set("ro.factorytest", "2");
    681     else
    682         property_set("ro.factorytest", "0");
    683 }
    684 
    685 static void process_kernel_cmdline(void)
    686 {
    687     /* don't expose the raw commandline to nonpriv processes */
    688     chmod("/proc/cmdline", 0440);
    689 
    690     /* first pass does the common stuff, and finds if we are in qemu.
    691      * second pass is only necessary for qemu to export all kernel params
    692      * as props.
    693      */
    694     import_kernel_cmdline(0, import_kernel_nv);
    695     if (qemu[0])
    696         import_kernel_cmdline(1, import_kernel_nv);
    697 
    698     /* now propogate the info given on command line to internal variables
    699      * used by init as well as the current required properties
    700      */
    701     export_kernel_boot_props();
    702 }
    703 
    704 static int property_service_init_action(int nargs, char **args)
    705 {
    706     /* read any property files on system or data and
    707      * fire up the property service.  This must happen
    708      * after the ro.foo properties are set above so
    709      * that /data/local.prop cannot interfere with them.
    710      */
    711     start_property_service();
    712     return 0;
    713 }
    714 
    715 static int signal_init_action(int nargs, char **args)
    716 {
    717     signal_init();
    718     return 0;
    719 }
    720 
    721 static int check_startup_action(int nargs, char **args)
    722 {
    723     /* make sure we actually have all the pieces we need */
    724     if ((get_property_set_fd() < 0) ||
    725         (get_signal_fd() < 0)) {
    726         ERROR("init startup failure\n");
    727         exit(1);
    728     }
    729 
    730         /* signal that we hit this point */
    731     unlink("/dev/.booting");
    732 
    733     return 0;
    734 }
    735 
    736 static int queue_property_triggers_action(int nargs, char **args)
    737 {
    738     queue_all_property_triggers();
    739     /* enable property triggers */
    740     property_triggers_enabled = 1;
    741     return 0;
    742 }
    743 
    744 #if BOOTCHART
    745 static int bootchart_init_action(int nargs, char **args)
    746 {
    747     bootchart_count = bootchart_init();
    748     if (bootchart_count < 0) {
    749         ERROR("bootcharting init failure\n");
    750     } else if (bootchart_count > 0) {
    751         NOTICE("bootcharting started (period=%d ms)\n", bootchart_count*BOOTCHART_POLLING_MS);
    752     } else {
    753         NOTICE("bootcharting ignored\n");
    754     }
    755 
    756     return 0;
    757 }
    758 #endif
    759 
    760 #ifdef HAVE_SELINUX
    761 void selinux_load_policy(void)
    762 {
    763     const char path_prefix[] = "/sepolicy";
    764     struct selinux_opt seopts[] = {
    765         { SELABEL_OPT_PATH, "/file_contexts" }
    766     };
    767     char path[PATH_MAX];
    768     int fd, rc, vers;
    769     struct stat sb;
    770     void *map;
    771 
    772     sehandle = NULL;
    773     if (!selinux_enabled) {
    774         INFO("SELinux:  Disabled by command line option\n");
    775         return;
    776     }
    777 
    778     mkdir(SELINUXMNT, 0755);
    779     if (mount("selinuxfs", SELINUXMNT, "selinuxfs", 0, NULL)) {
    780         if (errno == ENODEV) {
    781             /* SELinux not enabled in kernel */
    782             return;
    783         }
    784         ERROR("SELinux:  Could not mount selinuxfs:  %s\n",
    785               strerror(errno));
    786         return;
    787     }
    788     set_selinuxmnt(SELINUXMNT);
    789 
    790     vers = security_policyvers();
    791     if (vers <= 0) {
    792         ERROR("SELinux:  Unable to read policy version\n");
    793         return;
    794     }
    795     INFO("SELinux:  Maximum supported policy version:  %d\n", vers);
    796 
    797     snprintf(path, sizeof(path), "%s.%d",
    798              path_prefix, vers);
    799     fd = open(path, O_RDONLY);
    800     while (fd < 0 && errno == ENOENT && --vers) {
    801         snprintf(path, sizeof(path), "%s.%d",
    802                  path_prefix, vers);
    803         fd = open(path, O_RDONLY);
    804     }
    805     if (fd < 0) {
    806         ERROR("SELinux:  Could not open %s:  %s\n",
    807               path, strerror(errno));
    808         return;
    809     }
    810     if (fstat(fd, &sb) < 0) {
    811         ERROR("SELinux:  Could not stat %s:  %s\n",
    812               path, strerror(errno));
    813         return;
    814     }
    815     map = mmap(NULL, sb.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
    816     if (map == MAP_FAILED) {
    817         ERROR("SELinux:  Could not map %s:  %s\n",
    818               path, strerror(errno));
    819         return;
    820     }
    821 
    822     rc = security_load_policy(map, sb.st_size);
    823     if (rc < 0) {
    824         ERROR("SELinux:  Could not load policy:  %s\n",
    825               strerror(errno));
    826         return;
    827     }
    828 
    829     rc = security_setenforce(selinux_enforcing);
    830     if (rc < 0) {
    831         ERROR("SELinux:  Could not set enforcing mode to %s:  %s\n",
    832               selinux_enforcing ? "enforcing" : "permissive", strerror(errno));
    833         return;
    834     }
    835 
    836     munmap(map, sb.st_size);
    837     close(fd);
    838     INFO("SELinux: Loaded policy from %s\n", path);
    839 
    840     sehandle = selabel_open(SELABEL_CTX_FILE, seopts, 1);
    841     if (!sehandle) {
    842         ERROR("SELinux:  Could not load file_contexts:  %s\n",
    843               strerror(errno));
    844         return;
    845     }
    846     INFO("SELinux: Loaded file contexts from %s\n", seopts[0].value);
    847     return;
    848 }
    849 #endif
    850 
    851 int main(int argc, char **argv)
    852 {
    853     int fd_count = 0;
    854     struct pollfd ufds[4];
    855     char *tmpdev;
    856     char* debuggable;
    857     char tmp[32];
    858     int property_set_fd_init = 0;
    859     int signal_fd_init = 0;
    860     int keychord_fd_init = 0;
    861     bool is_charger = false;
    862 
    863     if (!strcmp(basename(argv[0]), "ueventd"))
    864         return ueventd_main(argc, argv);
    865 
    866     /* clear the umask */
    867     umask(0);
    868 
    869         /* Get the basic filesystem setup we need put
    870          * together in the initramdisk on / and then we'll
    871          * let the rc file figure out the rest.
    872          */
    873     mkdir("/dev", 0755);
    874     mkdir("/proc", 0755);
    875     mkdir("/sys", 0755);
    876 
    877     mount("tmpfs", "/dev", "tmpfs", MS_NOSUID, "mode=0755");
    878     mkdir("/dev/pts", 0755);
    879     mkdir("/dev/socket", 0755);
    880     mount("devpts", "/dev/pts", "devpts", 0, NULL);
    881     mount("proc", "/proc", "proc", 0, NULL);
    882     mount("sysfs", "/sys", "sysfs", 0, NULL);
    883 
    884         /* indicate that booting is in progress to background fw loaders, etc */
    885     close(open("/dev/.booting", O_WRONLY | O_CREAT, 0000));
    886 
    887         /* We must have some place other than / to create the
    888          * device nodes for kmsg and null, otherwise we won't
    889          * be able to remount / read-only later on.
    890          * Now that tmpfs is mounted on /dev, we can actually
    891          * talk to the outside world.
    892          */
    893     open_devnull_stdio();
    894     klog_init();
    895     property_init();
    896 
    897     get_hardware_name(hardware, &revision);
    898 
    899     process_kernel_cmdline();
    900 
    901 #ifdef HAVE_SELINUX
    902     INFO("loading selinux policy\n");
    903     selinux_load_policy();
    904 #endif
    905 
    906     is_charger = !strcmp(bootmode, "charger");
    907 
    908     INFO("property init\n");
    909     if (!is_charger)
    910         property_load_boot_defaults();
    911 
    912     INFO("reading config file\n");
    913     init_parse_config_file("/init.rc");
    914 
    915     action_for_each_trigger("early-init", action_add_queue_tail);
    916 
    917     queue_builtin_action(wait_for_coldboot_done_action, "wait_for_coldboot_done");
    918     queue_builtin_action(keychord_init_action, "keychord_init");
    919     queue_builtin_action(console_init_action, "console_init");
    920 
    921     /* execute all the boot actions to get us started */
    922     action_for_each_trigger("init", action_add_queue_tail);
    923 
    924     /* skip mounting filesystems in charger mode */
    925     if (!is_charger) {
    926         action_for_each_trigger("early-fs", action_add_queue_tail);
    927         action_for_each_trigger("fs", action_add_queue_tail);
    928         action_for_each_trigger("post-fs", action_add_queue_tail);
    929         action_for_each_trigger("post-fs-data", action_add_queue_tail);
    930     }
    931 
    932     queue_builtin_action(property_service_init_action, "property_service_init");
    933     queue_builtin_action(signal_init_action, "signal_init");
    934     queue_builtin_action(check_startup_action, "check_startup");
    935 
    936     if (is_charger) {
    937         action_for_each_trigger("charger", action_add_queue_tail);
    938     } else {
    939         action_for_each_trigger("early-boot", action_add_queue_tail);
    940         action_for_each_trigger("boot", action_add_queue_tail);
    941     }
    942 
    943         /* run all property triggers based on current state of the properties */
    944     queue_builtin_action(queue_property_triggers_action, "queue_property_triggers");
    945 
    946 
    947 #if BOOTCHART
    948     queue_builtin_action(bootchart_init_action, "bootchart_init");
    949 #endif
    950 
    951     for(;;) {
    952         int nr, i, timeout = -1;
    953 
    954         execute_one_command();
    955         restart_processes();
    956 
    957         if (!property_set_fd_init && get_property_set_fd() > 0) {
    958             ufds[fd_count].fd = get_property_set_fd();
    959             ufds[fd_count].events = POLLIN;
    960             ufds[fd_count].revents = 0;
    961             fd_count++;
    962             property_set_fd_init = 1;
    963         }
    964         if (!signal_fd_init && get_signal_fd() > 0) {
    965             ufds[fd_count].fd = get_signal_fd();
    966             ufds[fd_count].events = POLLIN;
    967             ufds[fd_count].revents = 0;
    968             fd_count++;
    969             signal_fd_init = 1;
    970         }
    971         if (!keychord_fd_init && get_keychord_fd() > 0) {
    972             ufds[fd_count].fd = get_keychord_fd();
    973             ufds[fd_count].events = POLLIN;
    974             ufds[fd_count].revents = 0;
    975             fd_count++;
    976             keychord_fd_init = 1;
    977         }
    978 
    979         if (process_needs_restart) {
    980             timeout = (process_needs_restart - gettime()) * 1000;
    981             if (timeout < 0)
    982                 timeout = 0;
    983         }
    984 
    985         if (!action_queue_empty() || cur_action)
    986             timeout = 0;
    987 
    988 #if BOOTCHART
    989         if (bootchart_count > 0) {
    990             if (timeout < 0 || timeout > BOOTCHART_POLLING_MS)
    991                 timeout = BOOTCHART_POLLING_MS;
    992             if (bootchart_step() < 0 || --bootchart_count == 0) {
    993                 bootchart_finish();
    994                 bootchart_count = 0;
    995             }
    996         }
    997 #endif
    998 
    999         nr = poll(ufds, fd_count, timeout);
   1000         if (nr <= 0)
   1001             continue;
   1002 
   1003         for (i = 0; i < fd_count; i++) {
   1004             if (ufds[i].revents == POLLIN) {
   1005                 if (ufds[i].fd == get_property_set_fd())
   1006                     handle_property_set_fd();
   1007                 else if (ufds[i].fd == get_keychord_fd())
   1008                     handle_keychord();
   1009                 else if (ufds[i].fd == get_signal_fd())
   1010                     handle_signal();
   1011             }
   1012         }
   1013     }
   1014 
   1015     return 0;
   1016 }
   1017