tools/jailhouse.c

   1 /*
   2  * Jailhouse, a Linux-based partitioning hypervisor
   3  *
   4  * Copyright (c) Siemens AG, 2013
   5  *
   6  * Authors:
   7  *  Jan Kiszka <jan.kiszka@siemens.com>
   8  *
   9  * This work is licensed under the terms of the GNU GPL, version 2.  See
  10  * the COPYING file in the top-level directory.
  11  */
  12
  13 #include <stdbool.h>
  14 #include <stdio.h>
  15 #include <stdlib.h>
  16 #include <string.h>
  17 #include <unistd.h>
  18 #include <fcntl.h>
  19 #include <errno.h>
  20 #include <limits.h>
  21 #include <libgen.h>
  22 #include <sys/types.h>
  23 #include <sys/ioctl.h>
  24 #include <sys/stat.h>
  25
  26 #include <jailhouse.h>
  27
  28 #define JAILHOUSE_EXEC_DIR      LIBEXECDIR "/jailhouse"
  29
  30 enum shutdown_load_mode {LOAD, SHUTDOWN};
  31
  32 struct extension {
  33         char *cmd, *subcmd, *help;
  34 };
  35
  36 static const struct extension extensions[] = {
  37         { "cell", "list", "" },
  38         { "cell", "stats", "{ ID | [--name] NAME }" },
  39         { "config", "create", "[-h] [-g] [-r ROOT] "
  40           "[--mem-inmates MEM_INMATES] [--mem-hv MEM_HV] FILE" },
  41         { "config", "collect", "FILE.TAR" },
  42         { NULL }
  43 };
  44
  45 static void __attribute__((noreturn)) help(char *prog, int exit_status)
  46 {
  47         const struct extension *ext;
  48
  49         printf("Usage: %s { COMMAND | --help || --version }\n"
  50                "\nAvailable commands:\n"
  51                "   enable SYSCONFIG\n"
  52                "   disable\n"
  53                "   cell create CELLCONFIG\n"
  54                "   cell load { ID | [--name] NAME } IMAGE "
  55                         "[ -a | --address ADDRESS] ...\n"
  56                "   cell start { ID | [--name] NAME }\n"
  57                "   cell shutdown { ID | [--name] NAME }\n"
  58                "   cell destroy { ID | [--name] NAME }\n",
  59                basename(prog));
  60         for (ext = extensions; ext->cmd; ext++)
  61                 printf("   %s %s %s\n", ext->cmd, ext->subcmd, ext->help);
  62
  63         exit(exit_status);
  64 }
  65
  66 static void call_extension_script(const char *cmd, int argc, char *argv[])
  67 {
  68         const struct extension *ext;
  69         char new_path[PATH_MAX];
  70         char script[64];
  71
  72         if (argc < 3)
  73                 return;
  74
  75         for (ext = extensions; ext->cmd; ext++) {
  76                 if (strcmp(ext->cmd, cmd) != 0 ||
  77                     strcmp(ext->subcmd, argv[2]) != 0)
  78                         continue;
  79
  80                 snprintf(new_path, sizeof(new_path), "PATH=%s:%s:%s",
  81                         dirname(argv[0]), JAILHOUSE_EXEC_DIR,
  82                         getenv("PATH") ? : "");
  83                 putenv(new_path);
  84
  85                 snprintf(script, sizeof(script), "jailhouse-%s-%s",
  86                          cmd, ext->subcmd);
  87                 execvp(script, &argv[2]);
  88
  89                 perror("execvp");
  90                 exit(1);
  91         }
  92 }
  93
  94 static int open_dev()
  95 {
  96         int fd;
  97
  98         fd = open("/dev/jailhouse", O_RDWR);
  99         if (fd < 0) {
 100                 perror("opening /dev/jailhouse");
 101                 exit(1);
 102         }
 103         return fd;
 104 }
 105
 106 static void *read_file(const char *name, size_t *size)
 107 {
 108         struct stat stat;
 109         void *buffer;
 110         int fd;
 111
 112         fd = open(name, O_RDONLY);
 113         if (fd < 0) {
 114                 fprintf(stderr, "opening %s: %s\n", name, strerror(errno));
 115                 exit(1);
 116         }
 117
 118         if (fstat(fd, &stat) < 0) {
 119                 perror("fstat");
 120                 exit(1);
 121         }
 122
 123         buffer = malloc(stat.st_size);
 124         if (!buffer) {
 125                 fprintf(stderr, "insufficient memory\n");
 126                 exit(1);
 127         }
 128
 129         if (read(fd, buffer, stat.st_size) < stat.st_size) {
 130                 fprintf(stderr, "reading %s: %s\n", name, strerror(errno));
 131                 exit(1);
 132         }
 133
 134         close(fd);
 135
 136         if (size)
 137                 *size = stat.st_size;
 138
 139         return buffer;
 140 }
 141
 142 static int enable(int argc, char *argv[])
 143 {
 144         void *config;
 145         int err, fd;
 146
 147         if (argc != 3)
 148                 help(argv[0], 1);
 149
 150         config = read_file(argv[2], NULL);
 151
 152         fd = open_dev();
 153
 154         err = ioctl(fd, JAILHOUSE_ENABLE, config);
 155         if (err)
 156                 perror("JAILHOUSE_ENABLE");
 157
 158         close(fd);
 159         free(config);
 160
 161         return err;
 162 }
 163
 164 static int cell_create(int argc, char *argv[])
 165 {
 166         struct jailhouse_cell_create cell_create;
 167         size_t size;
 168         int err, fd;
 169
 170         if (argc != 4)
 171                 help(argv[0], 1);
 172
 173         cell_create.config_address = (unsigned long)read_file(argv[3], &size);
 174         cell_create.config_size = size;
 175
 176         fd = open_dev();
 177
 178         err = ioctl(fd, JAILHOUSE_CELL_CREATE, &cell_create);
 179         if (err)
 180                 perror("JAILHOUSE_CELL_CREATE");
 181
 182         close(fd);
 183
 184         return err;
 185 }
 186
 187 static int parse_cell_id(struct jailhouse_cell_id *cell_id, int argc,
 188                          char *argv[])
 189 {
 190         bool use_name = false;
 191         int arg_pos = 0;
 192         char *endp;
 193
 194         if (argc < 1)
 195                 return 0;
 196
 197         if (strcmp(argv[0], "--name") == 0) {
 198                 if (argc < 2)
 199                         return 0;
 200                 arg_pos++;
 201                 use_name = true;
 202         } else {
 203                 errno = 0;
 204                 cell_id->id = strtoll(argv[0], &endp, 0);
 205                 if (errno != 0 || *endp != 0 || cell_id->id < 0)
 206                         use_name = true;
 207         }
 208
 209         if (use_name) {
 210                 cell_id->id = JAILHOUSE_CELL_ID_UNUSED;
 211                 strncpy(cell_id->name, argv[arg_pos], sizeof(cell_id->name));
 212                 cell_id->name[sizeof(cell_id->name) - 1] = 0;
 213         }
 214
 215         return arg_pos + 1;
 216 }
 217
 218 static bool match_opt(const char *argv, const char *short_opt,
 219                       const char *long_opt)
 220 {
 221         return strcmp(argv, short_opt) == 0 ||
 222                 strcmp(argv, long_opt) == 0;
 223 }
 224
 225 static int cell_shutdown_load(int argc, char *argv[],
 226                               enum shutdown_load_mode mode)
 227 {
 228         unsigned int images, id_args, arg_num, n;
 229         struct jailhouse_preload_image *image;
 230         struct jailhouse_cell_load *cell_load;
 231         struct jailhouse_cell_id cell_id;
 232         size_t size;
 233         int err, fd;
 234         char *endp;
 235
 236         id_args = parse_cell_id(&cell_id, argc - 3, &argv[3]);
 237         arg_num = 3 + id_args;
 238         if (id_args == 0 || (mode == SHUTDOWN && arg_num != argc) ||
 239             (mode == LOAD && arg_num == argc))
 240                 help(argv[0], 1);
 241
 242         images = 0;
 243         while (arg_num < argc) {
 244                 images++;
 245                 arg_num++;
 246
 247                 if (arg_num < argc &&
 248                     match_opt(argv[arg_num], "-a", "--address")) {
 249                         if (arg_num + 1 >= argc)
 250                                 help(argv[0], 1);
 251                         arg_num += 2;
 252                 }
 253         }
 254
 255         cell_load = malloc(sizeof(*cell_load) + sizeof(*image) * images);
 256         if (!cell_load) {
 257                 fprintf(stderr, "insufficient memory\n");
 258                 exit(1);
 259         }
 260         cell_load->cell_id = cell_id;
 261         cell_load->num_preload_images = images;
 262
 263         arg_num = 3 + id_args;
 264
 265         for (n = 0, image = cell_load->image; n < images; n++, image++) {
 266                 image->source_address =
 267                         (unsigned long)read_file(argv[arg_num++], &size);
 268                 image->size = size;
 269                 image->target_address = 0;
 270
 271                 if (arg_num < argc &&
 272                     match_opt(argv[arg_num], "-a", "--address")) {
 273                         errno = 0;
 274                         image->target_address =
 275                                 strtoll(argv[arg_num + 1], &endp, 0);
 276                         if (errno != 0 || *endp != 0)
 277                                 help(argv[0], 1);
 278                         arg_num += 2;
 279                 }
 280         }
 281
 282         fd = open_dev();
 283
 284         err = ioctl(fd, JAILHOUSE_CELL_LOAD, cell_load);
 285         if (err)
 286                 perror("JAILHOUSE_CELL_LOAD");
 287
 288         close(fd);
 289         for (n = 0, image = cell_load->image; n < images; n++, image++)
 290                 free((void *)(unsigned long)image->source_address);
 291         free(cell_load);
 292
 293         return err;
 294 }
 295
 296 static int cell_simple_cmd(int argc, char *argv[], unsigned int command)
 297 {
 298         struct jailhouse_cell_id cell_id;
 299         int id_args, err, fd;
 300
 301         id_args = parse_cell_id(&cell_id, argc - 3, &argv[3]);
 302         if (id_args == 0 || 3 + id_args != argc)
 303                 help(argv[0], 1);
 304
 305         fd = open_dev();
 306
 307         err = ioctl(fd, command, &cell_id);
 308         if (err)
 309                 perror(command == JAILHOUSE_CELL_START ?
 310                        "JAILHOUSE_CELL_START" :
 311                        command == JAILHOUSE_CELL_DESTROY ?
 312                        "JAILHOUSE_CELL_DESTROY" :
 313                        "<unknown command>");
 314
 315         close(fd);
 316
 317         return err;
 318 }
 319
 320 static int cell_management(int argc, char *argv[])
 321 {
 322         int err;
 323
 324         if (argc < 3)
 325                 help(argv[0], 1);
 326
 327         if (strcmp(argv[2], "create") == 0) {
 328                 err = cell_create(argc, argv);
 329         } else if (strcmp(argv[2], "load") == 0) {
 330                 err = cell_shutdown_load(argc, argv, LOAD);
 331         } else if (strcmp(argv[2], "start") == 0) {
 332                 err = cell_simple_cmd(argc, argv, JAILHOUSE_CELL_START);
 333         } else if (strcmp(argv[2], "shutdown") == 0) {
 334                 err = cell_shutdown_load(argc, argv, SHUTDOWN);
 335         } else if (strcmp(argv[2], "destroy") == 0) {
 336                 err = cell_simple_cmd(argc, argv, JAILHOUSE_CELL_DESTROY);
 337         } else {
 338                 call_extension_script("cell", argc, argv);
 339                 help(argv[0], 1);
 340         }
 341
 342         return err;
 343 }
 344
 345 int main(int argc, char *argv[])
 346 {
 347         int fd;
 348         int err;
 349
 350         if (argc < 2)
 351                 help(argv[0], 1);
 352
 353         if (strcmp(argv[1], "enable") == 0) {
 354                 err = enable(argc, argv);
 355         } else if (strcmp(argv[1], "disable") == 0) {
 356                 fd = open_dev();
 357                 err = ioctl(fd, JAILHOUSE_DISABLE);
 358                 if (err)
 359                         perror("JAILHOUSE_DISABLE");
 360                 close(fd);
 361         } else if (strcmp(argv[1], "cell") == 0) {
 362                 err = cell_management(argc, argv);
 363         } else if (strcmp(argv[1], "config") == 0) {
 364                 call_extension_script(argv[1], argc, argv);
 365                 help(argv[0], 1);
 366         } else if (strcmp(argv[1], "--version") == 0) {
 367                 printf("Jailhouse management tool %s\n", JAILHOUSE_VERSION);
 368                 return 0;
 369         } else if (strcmp(argv[1], "--help") == 0) {
 370                 help(argv[0], 0);
 371         } else {
 372                 help(argv[0], 1);
 373         }
 374
 375         return err ? 1 : 0;
 376 }