builtins.c revision 381341f5f72a46b34126e5c8e6f62f04b702ba47
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 <sys/types.h> 18#include <sys/stat.h> 19#include <fcntl.h> 20#include <unistd.h> 21#include <string.h> 22#include <stdio.h> 23#include <linux/kd.h> 24#include <errno.h> 25#include <sys/socket.h> 26#include <netinet/in.h> 27#include <linux/if.h> 28#include <arpa/inet.h> 29#include <stdlib.h> 30#include <sys/mount.h> 31#include <sys/resource.h> 32#include <sys/wait.h> 33#include <linux/loop.h> 34#include <cutils/partition_utils.h> 35#include <cutils/android_reboot.h> 36#include <fs_mgr.h> 37 38#include <selinux/selinux.h> 39#include <selinux/label.h> 40 41#include "init.h" 42#include "keywords.h" 43#include "property_service.h" 44#include "devices.h" 45#include "init_parser.h" 46#include "util.h" 47#include "log.h" 48 49#include <private/android_filesystem_config.h> 50 51int add_environment(const char *name, const char *value); 52 53extern int init_module(void *, unsigned long, const char *); 54 55static int write_file(const char *path, const char *value) 56{ 57 int fd, ret, len; 58 59 fd = open(path, O_WRONLY|O_CREAT|O_NOFOLLOW, 0600); 60 61 if (fd < 0) 62 return -errno; 63 64 len = strlen(value); 65 66 do { 67 ret = write(fd, value, len); 68 } while (ret < 0 && errno == EINTR); 69 70 close(fd); 71 if (ret < 0) { 72 return -errno; 73 } else { 74 return 0; 75 } 76} 77 78static int _open(const char *path) 79{ 80 int fd; 81 82 fd = open(path, O_RDONLY | O_NOFOLLOW); 83 if (fd < 0) 84 fd = open(path, O_WRONLY | O_NOFOLLOW); 85 86 return fd; 87} 88 89static int _chown(const char *path, unsigned int uid, unsigned int gid) 90{ 91 int fd; 92 int ret; 93 94 fd = _open(path); 95 if (fd < 0) { 96 return -1; 97 } 98 99 ret = fchown(fd, uid, gid); 100 if (ret < 0) { 101 int errno_copy = errno; 102 close(fd); 103 errno = errno_copy; 104 return -1; 105 } 106 107 close(fd); 108 109 return 0; 110} 111 112static int _chmod(const char *path, mode_t mode) 113{ 114 int fd; 115 int ret; 116 117 fd = _open(path); 118 if (fd < 0) { 119 return -1; 120 } 121 122 ret = fchmod(fd, mode); 123 if (ret < 0) { 124 int errno_copy = errno; 125 close(fd); 126 errno = errno_copy; 127 return -1; 128 } 129 130 close(fd); 131 132 return 0; 133} 134 135static int insmod(const char *filename, char *options) 136{ 137 void *module; 138 unsigned size; 139 int ret; 140 141 module = read_file(filename, &size); 142 if (!module) 143 return -1; 144 145 ret = init_module(module, size, options); 146 147 free(module); 148 149 return ret; 150} 151 152static int setkey(struct kbentry *kbe) 153{ 154 int fd, ret; 155 156 fd = open("/dev/tty0", O_RDWR | O_SYNC); 157 if (fd < 0) 158 return -1; 159 160 ret = ioctl(fd, KDSKBENT, kbe); 161 162 close(fd); 163 return ret; 164} 165 166static int __ifupdown(const char *interface, int up) 167{ 168 struct ifreq ifr; 169 int s, ret; 170 171 strlcpy(ifr.ifr_name, interface, IFNAMSIZ); 172 173 s = socket(AF_INET, SOCK_DGRAM, 0); 174 if (s < 0) 175 return -1; 176 177 ret = ioctl(s, SIOCGIFFLAGS, &ifr); 178 if (ret < 0) { 179 goto done; 180 } 181 182 if (up) 183 ifr.ifr_flags |= IFF_UP; 184 else 185 ifr.ifr_flags &= ~IFF_UP; 186 187 ret = ioctl(s, SIOCSIFFLAGS, &ifr); 188 189done: 190 close(s); 191 return ret; 192} 193 194static void service_start_if_not_disabled(struct service *svc) 195{ 196 if (!(svc->flags & SVC_DISABLED)) { 197 service_start(svc, NULL); 198 } else { 199 svc->flags |= SVC_DISABLED_START; 200 } 201} 202 203int do_chdir(int nargs, char **args) 204{ 205 chdir(args[1]); 206 return 0; 207} 208 209int do_chroot(int nargs, char **args) 210{ 211 chroot(args[1]); 212 return 0; 213} 214 215int do_class_start(int nargs, char **args) 216{ 217 /* Starting a class does not start services 218 * which are explicitly disabled. They must 219 * be started individually. 220 */ 221 service_for_each_class(args[1], service_start_if_not_disabled); 222 return 0; 223} 224 225int do_class_stop(int nargs, char **args) 226{ 227 service_for_each_class(args[1], service_stop); 228 return 0; 229} 230 231int do_class_reset(int nargs, char **args) 232{ 233 service_for_each_class(args[1], service_reset); 234 return 0; 235} 236 237int do_domainname(int nargs, char **args) 238{ 239 return write_file("/proc/sys/kernel/domainname", args[1]); 240} 241 242int do_enable(int nargs, char **args) 243{ 244 struct service *svc; 245 svc = service_find_by_name(args[1]); 246 if (svc) { 247 svc->flags &= ~(SVC_DISABLED | SVC_RC_DISABLED); 248 if (svc->flags & SVC_DISABLED_START) { 249 service_start(svc, NULL); 250 } 251 } else { 252 return -1; 253 } 254 return 0; 255} 256 257int do_exec(int nargs, char **args) 258{ 259 return -1; 260} 261 262int do_export(int nargs, char **args) 263{ 264 return add_environment(args[1], args[2]); 265} 266 267int do_hostname(int nargs, char **args) 268{ 269 return write_file("/proc/sys/kernel/hostname", args[1]); 270} 271 272int do_ifup(int nargs, char **args) 273{ 274 return __ifupdown(args[1], 1); 275} 276 277 278static int do_insmod_inner(int nargs, char **args, int opt_len) 279{ 280 char options[opt_len + 1]; 281 int i; 282 283 options[0] = '\0'; 284 if (nargs > 2) { 285 strcpy(options, args[2]); 286 for (i = 3; i < nargs; ++i) { 287 strcat(options, " "); 288 strcat(options, args[i]); 289 } 290 } 291 292 return insmod(args[1], options); 293} 294 295int do_insmod(int nargs, char **args) 296{ 297 int i; 298 int size = 0; 299 300 if (nargs > 2) { 301 for (i = 2; i < nargs; ++i) 302 size += strlen(args[i]) + 1; 303 } 304 305 return do_insmod_inner(nargs, args, size); 306} 307 308int do_mkdir(int nargs, char **args) 309{ 310 mode_t mode = 0755; 311 int ret; 312 313 /* mkdir <path> [mode] [owner] [group] */ 314 315 if (nargs >= 3) { 316 mode = strtoul(args[2], 0, 8); 317 } 318 319 ret = make_dir(args[1], mode); 320 /* chmod in case the directory already exists */ 321 if (ret == -1 && errno == EEXIST) { 322 ret = _chmod(args[1], mode); 323 } 324 if (ret == -1) { 325 return -errno; 326 } 327 328 if (nargs >= 4) { 329 uid_t uid = decode_uid(args[3]); 330 gid_t gid = -1; 331 332 if (nargs == 5) { 333 gid = decode_uid(args[4]); 334 } 335 336 if (_chown(args[1], uid, gid) < 0) { 337 return -errno; 338 } 339 340 /* chown may have cleared S_ISUID and S_ISGID, chmod again */ 341 if (mode & (S_ISUID | S_ISGID)) { 342 ret = _chmod(args[1], mode); 343 if (ret == -1) { 344 return -errno; 345 } 346 } 347 } 348 349 return 0; 350} 351 352static struct { 353 const char *name; 354 unsigned flag; 355} mount_flags[] = { 356 { "noatime", MS_NOATIME }, 357 { "noexec", MS_NOEXEC }, 358 { "nosuid", MS_NOSUID }, 359 { "nodev", MS_NODEV }, 360 { "nodiratime", MS_NODIRATIME }, 361 { "ro", MS_RDONLY }, 362 { "rw", 0 }, 363 { "remount", MS_REMOUNT }, 364 { "bind", MS_BIND }, 365 { "rec", MS_REC }, 366 { "unbindable", MS_UNBINDABLE }, 367 { "private", MS_PRIVATE }, 368 { "slave", MS_SLAVE }, 369 { "shared", MS_SHARED }, 370 { "defaults", 0 }, 371 { 0, 0 }, 372}; 373 374#define DATA_MNT_POINT "/data" 375 376/* mount <type> <device> <path> <flags ...> <options> */ 377int do_mount(int nargs, char **args) 378{ 379 char tmp[64]; 380 char *source, *target, *system; 381 char *options = NULL; 382 unsigned flags = 0; 383 int n, i; 384 int wait = 0; 385 386 for (n = 4; n < nargs; n++) { 387 for (i = 0; mount_flags[i].name; i++) { 388 if (!strcmp(args[n], mount_flags[i].name)) { 389 flags |= mount_flags[i].flag; 390 break; 391 } 392 } 393 394 if (!mount_flags[i].name) { 395 if (!strcmp(args[n], "wait")) 396 wait = 1; 397 /* if our last argument isn't a flag, wolf it up as an option string */ 398 else if (n + 1 == nargs) 399 options = args[n]; 400 } 401 } 402 403 system = args[1]; 404 source = args[2]; 405 target = args[3]; 406 407 if (!strncmp(source, "mtd@", 4)) { 408 n = mtd_name_to_number(source + 4); 409 if (n < 0) { 410 return -1; 411 } 412 413 sprintf(tmp, "/dev/block/mtdblock%d", n); 414 415 if (wait) 416 wait_for_file(tmp, COMMAND_RETRY_TIMEOUT); 417 if (mount(tmp, target, system, flags, options) < 0) { 418 return -1; 419 } 420 421 goto exit_success; 422 } else if (!strncmp(source, "loop@", 5)) { 423 int mode, loop, fd; 424 struct loop_info info; 425 426 mode = (flags & MS_RDONLY) ? O_RDONLY : O_RDWR; 427 fd = open(source + 5, mode); 428 if (fd < 0) { 429 return -1; 430 } 431 432 for (n = 0; ; n++) { 433 sprintf(tmp, "/dev/block/loop%d", n); 434 loop = open(tmp, mode); 435 if (loop < 0) { 436 return -1; 437 } 438 439 /* if it is a blank loop device */ 440 if (ioctl(loop, LOOP_GET_STATUS, &info) < 0 && errno == ENXIO) { 441 /* if it becomes our loop device */ 442 if (ioctl(loop, LOOP_SET_FD, fd) >= 0) { 443 close(fd); 444 445 if (mount(tmp, target, system, flags, options) < 0) { 446 ioctl(loop, LOOP_CLR_FD, 0); 447 close(loop); 448 return -1; 449 } 450 451 close(loop); 452 goto exit_success; 453 } 454 } 455 456 close(loop); 457 } 458 459 close(fd); 460 ERROR("out of loopback devices"); 461 return -1; 462 } else { 463 if (wait) 464 wait_for_file(source, COMMAND_RETRY_TIMEOUT); 465 if (mount(source, target, system, flags, options) < 0) { 466 return -1; 467 } 468 469 } 470 471exit_success: 472 return 0; 473 474} 475 476int do_mount_all(int nargs, char **args) 477{ 478 pid_t pid; 479 int ret = -1; 480 int child_ret = -1; 481 int status; 482 const char *prop; 483 struct fstab *fstab; 484 485 if (nargs != 2) { 486 return -1; 487 } 488 489 /* 490 * Call fs_mgr_mount_all() to mount all filesystems. We fork(2) and 491 * do the call in the child to provide protection to the main init 492 * process if anything goes wrong (crash or memory leak), and wait for 493 * the child to finish in the parent. 494 */ 495 pid = fork(); 496 if (pid > 0) { 497 /* Parent. Wait for the child to return */ 498 waitpid(pid, &status, 0); 499 if (WIFEXITED(status)) { 500 ret = WEXITSTATUS(status); 501 } else { 502 ret = -1; 503 } 504 } else if (pid == 0) { 505 /* child, call fs_mgr_mount_all() */ 506 klog_set_level(6); /* So we can see what fs_mgr_mount_all() does */ 507 fstab = fs_mgr_read_fstab(args[1]); 508 child_ret = fs_mgr_mount_all(fstab); 509 fs_mgr_free_fstab(fstab); 510 if (child_ret == -1) { 511 ERROR("fs_mgr_mount_all returned an error\n"); 512 } 513 exit(child_ret); 514 } else { 515 /* fork failed, return an error */ 516 return -1; 517 } 518 519 /* ret is 1 if the device is encrypted, 0 if not, and -1 on error */ 520 if (ret == 1) { 521 property_set("ro.crypto.state", "encrypted"); 522 property_set("vold.decrypt", "1"); 523 } else if (ret == 0) { 524 property_set("ro.crypto.state", "unencrypted"); 525 /* If fs_mgr determined this is an unencrypted device, then trigger 526 * that action. 527 */ 528 action_for_each_trigger("nonencrypted", action_add_queue_tail); 529 } 530 531 return ret; 532} 533 534int do_swapon_all(int nargs, char **args) 535{ 536 struct fstab *fstab; 537 int ret; 538 539 fstab = fs_mgr_read_fstab(args[1]); 540 ret = fs_mgr_swapon_all(fstab); 541 fs_mgr_free_fstab(fstab); 542 543 return ret; 544} 545 546int do_setcon(int nargs, char **args) { 547 if (is_selinux_enabled() <= 0) 548 return 0; 549 if (setcon(args[1]) < 0) { 550 return -errno; 551 } 552 return 0; 553} 554 555int do_setenforce(int nargs, char **args) { 556 if (is_selinux_enabled() <= 0) 557 return 0; 558 if (security_setenforce(atoi(args[1])) < 0) { 559 return -errno; 560 } 561 return 0; 562} 563 564int do_setkey(int nargs, char **args) 565{ 566 struct kbentry kbe; 567 kbe.kb_table = strtoul(args[1], 0, 0); 568 kbe.kb_index = strtoul(args[2], 0, 0); 569 kbe.kb_value = strtoul(args[3], 0, 0); 570 return setkey(&kbe); 571} 572 573int do_setprop(int nargs, char **args) 574{ 575 const char *name = args[1]; 576 const char *value = args[2]; 577 char prop_val[PROP_VALUE_MAX]; 578 int ret; 579 580 ret = expand_props(prop_val, value, sizeof(prop_val)); 581 if (ret) { 582 ERROR("cannot expand '%s' while assigning to '%s'\n", value, name); 583 return -EINVAL; 584 } 585 property_set(name, prop_val); 586 return 0; 587} 588 589int do_setrlimit(int nargs, char **args) 590{ 591 struct rlimit limit; 592 int resource; 593 resource = atoi(args[1]); 594 limit.rlim_cur = atoi(args[2]); 595 limit.rlim_max = atoi(args[3]); 596 return setrlimit(resource, &limit); 597} 598 599int do_start(int nargs, char **args) 600{ 601 struct service *svc; 602 svc = service_find_by_name(args[1]); 603 if (svc) { 604 service_start(svc, NULL); 605 } 606 return 0; 607} 608 609int do_stop(int nargs, char **args) 610{ 611 struct service *svc; 612 svc = service_find_by_name(args[1]); 613 if (svc) { 614 service_stop(svc); 615 } 616 return 0; 617} 618 619int do_restart(int nargs, char **args) 620{ 621 struct service *svc; 622 svc = service_find_by_name(args[1]); 623 if (svc) { 624 service_restart(svc); 625 } 626 return 0; 627} 628 629int do_powerctl(int nargs, char **args) 630{ 631 char command[PROP_VALUE_MAX]; 632 int res; 633 int len = 0; 634 int cmd = 0; 635 char *reboot_target; 636 637 res = expand_props(command, args[1], sizeof(command)); 638 if (res) { 639 ERROR("powerctl: cannot expand '%s'\n", args[1]); 640 return -EINVAL; 641 } 642 643 if (strncmp(command, "shutdown", 8) == 0) { 644 cmd = ANDROID_RB_POWEROFF; 645 len = 8; 646 } else if (strncmp(command, "reboot", 6) == 0) { 647 cmd = ANDROID_RB_RESTART2; 648 len = 6; 649 } else { 650 ERROR("powerctl: unrecognized command '%s'\n", command); 651 return -EINVAL; 652 } 653 654 if (command[len] == ',') { 655 reboot_target = &command[len + 1]; 656 } else if (command[len] == '\0') { 657 reboot_target = ""; 658 } else { 659 ERROR("powerctl: unrecognized reboot target '%s'\n", &command[len]); 660 return -EINVAL; 661 } 662 663 return android_reboot(cmd, 0, reboot_target); 664} 665 666int do_trigger(int nargs, char **args) 667{ 668 action_for_each_trigger(args[1], action_add_queue_tail); 669 return 0; 670} 671 672int do_symlink(int nargs, char **args) 673{ 674 return symlink(args[1], args[2]); 675} 676 677int do_rm(int nargs, char **args) 678{ 679 return unlink(args[1]); 680} 681 682int do_rmdir(int nargs, char **args) 683{ 684 return rmdir(args[1]); 685} 686 687int do_sysclktz(int nargs, char **args) 688{ 689 struct timezone tz; 690 691 if (nargs != 2) 692 return -1; 693 694 memset(&tz, 0, sizeof(tz)); 695 tz.tz_minuteswest = atoi(args[1]); 696 if (settimeofday(NULL, &tz)) 697 return -1; 698 return 0; 699} 700 701int do_write(int nargs, char **args) 702{ 703 const char *path = args[1]; 704 const char *value = args[2]; 705 char prop_val[PROP_VALUE_MAX]; 706 int ret; 707 708 ret = expand_props(prop_val, value, sizeof(prop_val)); 709 if (ret) { 710 ERROR("cannot expand '%s' while writing to '%s'\n", value, path); 711 return -EINVAL; 712 } 713 return write_file(path, prop_val); 714} 715 716int do_copy(int nargs, char **args) 717{ 718 char *buffer = NULL; 719 int rc = 0; 720 int fd1 = -1, fd2 = -1; 721 struct stat info; 722 int brtw, brtr; 723 char *p; 724 725 if (nargs != 3) 726 return -1; 727 728 if (stat(args[1], &info) < 0) 729 return -1; 730 731 if ((fd1 = open(args[1], O_RDONLY)) < 0) 732 goto out_err; 733 734 if ((fd2 = open(args[2], O_WRONLY|O_CREAT|O_TRUNC, 0660)) < 0) 735 goto out_err; 736 737 if (!(buffer = malloc(info.st_size))) 738 goto out_err; 739 740 p = buffer; 741 brtr = info.st_size; 742 while(brtr) { 743 rc = read(fd1, p, brtr); 744 if (rc < 0) 745 goto out_err; 746 if (rc == 0) 747 break; 748 p += rc; 749 brtr -= rc; 750 } 751 752 p = buffer; 753 brtw = info.st_size; 754 while(brtw) { 755 rc = write(fd2, p, brtw); 756 if (rc < 0) 757 goto out_err; 758 if (rc == 0) 759 break; 760 p += rc; 761 brtw -= rc; 762 } 763 764 rc = 0; 765 goto out; 766out_err: 767 rc = -1; 768out: 769 if (buffer) 770 free(buffer); 771 if (fd1 >= 0) 772 close(fd1); 773 if (fd2 >= 0) 774 close(fd2); 775 return rc; 776} 777 778int do_chown(int nargs, char **args) { 779 /* GID is optional. */ 780 if (nargs == 3) { 781 if (_chown(args[2], decode_uid(args[1]), -1) < 0) 782 return -errno; 783 } else if (nargs == 4) { 784 if (_chown(args[3], decode_uid(args[1]), decode_uid(args[2])) < 0) 785 return -errno; 786 } else { 787 return -1; 788 } 789 return 0; 790} 791 792static mode_t get_mode(const char *s) { 793 mode_t mode = 0; 794 while (*s) { 795 if (*s >= '0' && *s <= '7') { 796 mode = (mode<<3) | (*s-'0'); 797 } else { 798 return -1; 799 } 800 s++; 801 } 802 return mode; 803} 804 805int do_chmod(int nargs, char **args) { 806 mode_t mode = get_mode(args[1]); 807 if (_chmod(args[2], mode) < 0) { 808 return -errno; 809 } 810 return 0; 811} 812 813int do_restorecon(int nargs, char **args) { 814 int i; 815 int ret = 0; 816 817 for (i = 1; i < nargs; i++) { 818 if (restorecon(args[i]) < 0) 819 ret = -errno; 820 } 821 return ret; 822} 823 824int do_restorecon_recursive(int nargs, char **args) { 825 int i; 826 int ret = 0; 827 828 for (i = 1; i < nargs; i++) { 829 if (restorecon_recursive(args[i]) < 0) 830 ret = -errno; 831 } 832 return ret; 833} 834 835int do_setsebool(int nargs, char **args) { 836 const char *name = args[1]; 837 const char *value = args[2]; 838 SELboolean b; 839 int ret; 840 841 if (is_selinux_enabled() <= 0) 842 return 0; 843 844 b.name = name; 845 if (!strcmp(value, "1") || !strcasecmp(value, "true") || !strcasecmp(value, "on")) 846 b.value = 1; 847 else if (!strcmp(value, "0") || !strcasecmp(value, "false") || !strcasecmp(value, "off")) 848 b.value = 0; 849 else { 850 ERROR("setsebool: invalid value %s\n", value); 851 return -EINVAL; 852 } 853 854 if (security_set_boolean_list(1, &b, 0) < 0) { 855 ret = -errno; 856 ERROR("setsebool: could not set %s to %s\n", name, value); 857 return ret; 858 } 859 860 return 0; 861} 862 863int do_loglevel(int nargs, char **args) { 864 int log_level; 865 char log_level_str[PROP_VALUE_MAX] = ""; 866 if (nargs != 2) { 867 ERROR("loglevel: missing argument\n"); 868 return -EINVAL; 869 } 870 871 if (expand_props(log_level_str, args[1], sizeof(log_level_str))) { 872 ERROR("loglevel: cannot expand '%s'\n", args[1]); 873 return -EINVAL; 874 } 875 log_level = atoi(log_level_str); 876 if (log_level < KLOG_ERROR_LEVEL || log_level > KLOG_DEBUG_LEVEL) { 877 ERROR("loglevel: invalid log level'%d'\n", log_level); 878 return -EINVAL; 879 } 880 klog_set_level(log_level); 881 return 0; 882} 883 884int do_load_persist_props(int nargs, char **args) { 885 if (nargs == 1) { 886 load_persist_props(); 887 return 0; 888 } 889 return -1; 890} 891 892int do_load_all_props(int nargs, char **args) { 893 if (nargs == 1) { 894 load_all_props(); 895 return 0; 896 } 897 return -1; 898} 899 900int do_wait(int nargs, char **args) 901{ 902 if (nargs == 2) { 903 return wait_for_file(args[1], COMMAND_RETRY_TIMEOUT); 904 } else if (nargs == 3) { 905 return wait_for_file(args[1], atoi(args[2])); 906 } else 907 return -1; 908} 909