coreutils/install.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Copyright (C) 2003 by Glenn McGrath <bug1@iinet.net.au>
   4  * SELinux support: by Yuichi Nakamura <ynakam@hitachisoft.jp>
   5  *
   6  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
   7  *
   8  * TODO: -d option, need a way of recursively making directories and changing
   9  *           owner/group, will probably modify bb_make_directory(...)
  10  */
  11
  12 #include <libgen.h>
  13 #include <getopt.h> /* struct option */
  14
  15 #include "libbb.h"
  16 #include "libcoreutils/coreutils.h"
  17
  18 #if ENABLE_FEATURE_INSTALL_LONG_OPTIONS
  19 static const struct option install_long_options[] = {
  20         { "directory",           0, NULL, 'd' },
  21         { "preserve-timestamps", 0, NULL, 'p' },
  22         { "strip",               0, NULL, 's' },
  23         { "group",               0, NULL, 'g' },
  24         { "mode",                0, NULL, 'm' },
  25         { "owner",               0, NULL, 'o' },
  26 #if ENABLE_SELINUX
  27         { "context",             1, NULL, 'Z' },
  28         { "preserve_context",    0, NULL, 0xff },
  29         { "preserve-context",    0, NULL, 0xff },
  30 #endif
  31         { 0, 0, 0, 0 }
  32 };
  33 #endif
  34
  35
  36 #if ENABLE_SELINUX
  37 static bool use_default_selinux_context = 1;
  38
  39 static void setdefaultfilecon(const char *path)
  40 {
  41         struct stat s;
  42         security_context_t scontext = NULL;
  43
  44         if (!is_selinux_enabled()) {
  45                 return;
  46         }
  47         if (lstat(path, &s) != 0) {
  48                 return;
  49         }
  50
  51         if (matchpathcon(path, s.st_mode, &scontext) < 0) {
  52                 goto out;
  53         }
  54         if (strcmp(scontext, "<<none>>") == 0) {
  55                 goto out;
  56         }
  57
  58         if (lsetfilecon(path, scontext) < 0) {
  59                 if (errno != ENOTSUP) {
  60                         bb_perror_msg("warning: failed to change context of %s to %s", path, scontext);
  61                 }
  62         }
  63
  64  out:
  65         freecon(scontext);
  66 }
  67
  68 #endif
  69
  70 int install_main(int argc, char **argv);
  71 int install_main(int argc, char **argv)
  72 {
  73         struct stat statbuf;
  74         mode_t mode;
  75         uid_t uid;
  76         gid_t gid;
  77         const char *gid_str;
  78         const char *uid_str;
  79         const char *mode_str;
  80         int copy_flags = FILEUTILS_DEREFERENCE | FILEUTILS_FORCE;
  81         int ret = EXIT_SUCCESS, flags, i, isdir;
  82 #if ENABLE_SELINUX
  83         security_context_t scontext;
  84 #endif
  85         enum {
  86                 OPT_CMD           =  0x1,
  87                 OPT_DIRECTORY     =  0x2,
  88                 OPT_PRESERVE_TIME =  0x4,
  89                 OPT_STRIP         =  0x8,
  90                 OPT_GROUP         = 0x10,
  91                 OPT_MODE          = 0x20,
  92                 OPT_OWNER         = 0x40,
  93 #if ENABLE_SELINUX
  94                 OPT_SET_SECURITY_CONTEXT = 0x80,
  95                 OPT_PRESERVE_SECURITY_CONTEXT = 0x100,
  96 #endif
  97         };
  98
  99 #if ENABLE_FEATURE_INSTALL_LONG_OPTIONS
 100         applet_long_options = install_long_options;
 101 #endif
 102         opt_complementary = "s--d:d--s" USE_SELINUX(":Z--\xff:\xff--Z");
 103         /* -c exists for backwards compatibility, it's needed */
 104
 105         flags = getopt32(argc, argv, "cdpsg:m:o:" USE_SELINUX("Z:"),
 106                         &gid_str, &mode_str, &uid_str USE_SELINUX(, &scontext));
 107
 108 #if ENABLE_SELINUX
 109         if (flags & OPT_PRESERVE_SECURITY_CONTEXT) {
 110                 use_default_selinux_context = 0;
 111                 copy_flags |= FILEUTILS_PRESERVE_SECURITY_CONTEXT;
 112                 selinux_or_die();
 113         }
 114         if (flags & OPT_SET_SECURITY_CONTEXT) {
 115                 selinux_or_die();
 116                 setfscreatecon_or_die(scontext);
 117                 use_default_selinux_context = 0;
 118                 copy_flags |= FILEUTILS_SET_SECURITY_CONTEXT;
 119         }
 120 #endif
 121
 122         /* preserve access and modification time, this is GNU behaviour, BSD only preserves modification time */
 123         if (flags & OPT_PRESERVE_TIME) {
 124                 copy_flags |= FILEUTILS_PRESERVE_STATUS;
 125         }
 126         mode = 0666;
 127         if (flags & OPT_MODE) bb_parse_mode(mode_str, &mode);
 128         uid = (flags & OPT_OWNER) ? get_ug_id(uid_str, xuname2uid) : getuid();
 129         gid = (flags & OPT_GROUP) ? get_ug_id(gid_str, xgroup2gid) : getgid();
 130         if (flags & (OPT_OWNER|OPT_GROUP)) umask(0);
 131
 132         /* Create directories
 133          * don't use bb_make_directory() as it can't change uid or gid
 134          * perhaps bb_make_directory() should be improved.
 135          */
 136         if (flags & OPT_DIRECTORY) {
 137                 for (argv += optind; *argv; argv++) {
 138                         char *old_argv_ptr = *argv + 1;
 139                         char *argv_ptr;
 140                         do {
 141                                 argv_ptr = strchr(old_argv_ptr, '/');
 142                                 old_argv_ptr = argv_ptr;
 143                                 if (argv_ptr) {
 144                                         *argv_ptr = '\0';
 145                                         old_argv_ptr++;
 146                                 }
 147                                 if (mkdir(*argv, mode | 0111) == -1) {
 148                                         if (errno != EEXIST) {
 149                                                 bb_perror_msg("cannot create %s", *argv);
 150                                                 ret = EXIT_FAILURE;
 151                                                 break;
 152                                         }
 153                                 }
 154                                 if ((flags & (OPT_OWNER|OPT_GROUP))
 155                                  && lchown(*argv, uid, gid) == -1
 156                                 ) {
 157                                         bb_perror_msg("cannot change ownership of %s", *argv);
 158                                         ret = EXIT_FAILURE;
 159                                         break;
 160                                 }
 161                                 if (argv_ptr) {
 162                                         *argv_ptr = '/';
 163                                 }
 164                         } while (old_argv_ptr);
 165                 }
 166                 return ret;
 167         }
 168
 169         /* coreutils install resolves link in this case, don't use lstat */
 170         isdir = stat(argv[argc - 1], &statbuf) < 0 ? 0 : S_ISDIR(statbuf.st_mode);
 171
 172         for (i = optind; i < argc - 1; i++) {
 173                 char *dest;
 174
 175                 dest = argv[argc - 1];
 176                 if (isdir)
 177                         dest = concat_path_file(argv[argc - 1], basename(argv[i]));
 178                 ret |= copy_file(argv[i], dest, copy_flags);
 179
 180                 /* Set the file mode */
 181                 if ((flags & OPT_MODE) && chmod(dest, mode) == -1) {
 182                         bb_perror_msg("cannot change permissions of %s", dest);
 183                         ret = EXIT_FAILURE;
 184                 }
 185 #if ENABLE_SELINUX
 186                 if (use_default_selinux_context)
 187                         setdefaultfilecon(dest);
 188 #endif
 189                 /* Set the user and group id */
 190                 if ((flags & (OPT_OWNER|OPT_GROUP))
 191                  && lchown(dest, uid, gid) == -1
 192                 ) {
 193                         bb_perror_msg("cannot change ownership of %s", dest);
 194                         ret = EXIT_FAILURE;
 195                 }
 196                 if (flags & OPT_STRIP) {
 197                         char *args[3];
 198                         args[0] = (char*)"strip";
 199                         args[1] = dest;
 200                         args[2] = NULL;
 201                         if (spawn_and_wait(args)) {
 202                                 bb_perror_msg("strip");
 203                                 ret = EXIT_FAILURE;
 204                         }
 205                 }
 206                 if (ENABLE_FEATURE_CLEAN_UP && isdir) free(dest);
 207         }
 208
 209         return ret;
 210 }