util/qemu-config.c

   1 #include "qemu/osdep.h"
   2 #include "block/qdict.h" /* for qdict_extract_subqdict() */
   3 #include "qapi/error.h"
   4 #include "qapi/qapi-commands-misc.h"
   5 #include "qapi/qmp/qdict.h"
   6 #include "qapi/qmp/qlist.h"
   7 #include "qemu/error-report.h"
   8 #include "qemu/option.h"
   9 #include "qemu/config-file.h"
  10
  11 static QemuOptsList *vm_config_groups[48];
  12 static QemuOptsList *drive_config_groups[5];
  13
  14 static QemuOptsList *find_list(QemuOptsList **lists, const char *group,
  15                                Error **errp)
  16 {
  17     int i;
  18
  19     for (i = 0; lists[i] != NULL; i++) {
  20         if (strcmp(lists[i]->name, group) == 0)
  21             break;
  22     }
  23     if (lists[i] == NULL) {
  24         error_setg(errp, "There is no option group '%s'", group);
  25     }
  26     return lists[i];
  27 }
  28
  29 QemuOptsList *qemu_find_opts(const char *group)
  30 {
  31     QemuOptsList *ret;
  32     Error *local_err = NULL;
  33
  34     ret = find_list(vm_config_groups, group, &local_err);
  35     if (local_err) {
  36         error_report_err(local_err);
  37     }
  38
  39     return ret;
  40 }
  41
  42 QemuOpts *qemu_find_opts_singleton(const char *group)
  43 {
  44     QemuOptsList *list;
  45     QemuOpts *opts;
  46
  47     list = qemu_find_opts(group);
  48     assert(list);
  49     opts = qemu_opts_find(list, NULL);
  50     if (!opts) {
  51         opts = qemu_opts_create(list, NULL, 0, &error_abort);
  52     }
  53     return opts;
  54 }
  55
  56 static CommandLineParameterInfoList *query_option_descs(const QemuOptDesc *desc)
  57 {
  58     CommandLineParameterInfoList *param_list = NULL;
  59     CommandLineParameterInfo *info;
  60     int i;
  61
  62     for (i = 0; desc[i].name != NULL; i++) {
  63         info = g_malloc0(sizeof(*info));
  64         info->name = g_strdup(desc[i].name);
  65
  66         switch (desc[i].type) {
  67         case QEMU_OPT_STRING:
  68             info->type = COMMAND_LINE_PARAMETER_TYPE_STRING;
  69             break;
  70         case QEMU_OPT_BOOL:
  71             info->type = COMMAND_LINE_PARAMETER_TYPE_BOOLEAN;
  72             break;
  73         case QEMU_OPT_NUMBER:
  74             info->type = COMMAND_LINE_PARAMETER_TYPE_NUMBER;
  75             break;
  76         case QEMU_OPT_SIZE:
  77             info->type = COMMAND_LINE_PARAMETER_TYPE_SIZE;
  78             break;
  79         }
  80
  81         if (desc[i].help) {
  82             info->has_help = true;
  83             info->help = g_strdup(desc[i].help);
  84         }
  85         if (desc[i].def_value_str) {
  86             info->has_q_default = true;
  87             info->q_default = g_strdup(desc[i].def_value_str);
  88         }
  89
  90         QAPI_LIST_PREPEND(param_list, info);
  91     }
  92
  93     return param_list;
  94 }
  95
  96 /* remove repeated entry from the info list */
  97 static void cleanup_infolist(CommandLineParameterInfoList *head)
  98 {
  99     CommandLineParameterInfoList *pre_entry, *cur, *del_entry;
 100
 101     cur = head;
 102     while (cur->next) {
 103         pre_entry = head;
 104         while (pre_entry != cur->next) {
 105             if (!strcmp(pre_entry->value->name, cur->next->value->name)) {
 106                 del_entry = cur->next;
 107                 cur->next = cur->next->next;
 108                 del_entry->next = NULL;
 109                 qapi_free_CommandLineParameterInfoList(del_entry);
 110                 break;
 111             }
 112             pre_entry = pre_entry->next;
 113         }
 114         cur = cur->next;
 115     }
 116 }
 117
 118 /* merge the description items of two parameter infolists */
 119 static void connect_infolist(CommandLineParameterInfoList *head,
 120                              CommandLineParameterInfoList *new)
 121 {
 122     CommandLineParameterInfoList *cur;
 123
 124     cur = head;
 125     while (cur->next) {
 126         cur = cur->next;
 127     }
 128     cur->next = new;
 129 }
 130
 131 /* access all the local QemuOptsLists for drive option */
 132 static CommandLineParameterInfoList *get_drive_infolist(void)
 133 {
 134     CommandLineParameterInfoList *head = NULL, *cur;
 135     int i;
 136
 137     for (i = 0; drive_config_groups[i] != NULL; i++) {
 138         if (!head) {
 139             head = query_option_descs(drive_config_groups[i]->desc);
 140         } else {
 141             cur = query_option_descs(drive_config_groups[i]->desc);
 142             connect_infolist(head, cur);
 143         }
 144     }
 145     cleanup_infolist(head);
 146
 147     return head;
 148 }
 149
 150 /* restore machine options that are now machine's properties */
 151 static QemuOptsList machine_opts = {
 152     .merge_lists = true,
 153     .head = QTAILQ_HEAD_INITIALIZER(machine_opts.head),
 154     .desc = {
 155         {
 156             .name = "type",
 157             .type = QEMU_OPT_STRING,
 158             .help = "emulated machine"
 159         },{
 160             .name = "accel",
 161             .type = QEMU_OPT_STRING,
 162             .help = "accelerator list",
 163         },{
 164             .name = "kernel_irqchip",
 165             .type = QEMU_OPT_BOOL,
 166             .help = "use KVM in-kernel irqchip",
 167         },{
 168             .name = "kvm_shadow_mem",
 169             .type = QEMU_OPT_SIZE,
 170             .help = "KVM shadow MMU size",
 171         },{
 172             .name = "kernel",
 173             .type = QEMU_OPT_STRING,
 174             .help = "Linux kernel image file",
 175         },{
 176             .name = "initrd",
 177             .type = QEMU_OPT_STRING,
 178             .help = "Linux initial ramdisk file",
 179         },{
 180             .name = "append",
 181             .type = QEMU_OPT_STRING,
 182             .help = "Linux kernel command line",
 183         },{
 184             .name = "dtb",
 185             .type = QEMU_OPT_STRING,
 186             .help = "Linux kernel device tree file",
 187         },{
 188             .name = "dumpdtb",
 189             .type = QEMU_OPT_STRING,
 190             .help = "Dump current dtb to a file and quit",
 191         },{
 192             .name = "phandle_start",
 193             .type = QEMU_OPT_NUMBER,
 194             .help = "The first phandle ID we may generate dynamically",
 195         },{
 196             .name = "dt_compatible",
 197             .type = QEMU_OPT_STRING,
 198             .help = "Overrides the \"compatible\" property of the dt root node",
 199         },{
 200             .name = "dump-guest-core",
 201             .type = QEMU_OPT_BOOL,
 202             .help = "Include guest memory in  a core dump",
 203         },{
 204             .name = "mem-merge",
 205             .type = QEMU_OPT_BOOL,
 206             .help = "enable/disable memory merge support",
 207         },{
 208             .name = "usb",
 209             .type = QEMU_OPT_BOOL,
 210             .help = "Set on/off to enable/disable usb",
 211         },{
 212             .name = "firmware",
 213             .type = QEMU_OPT_STRING,
 214             .help = "firmware image",
 215         },{
 216             .name = "iommu",
 217             .type = QEMU_OPT_BOOL,
 218             .help = "Set on/off to enable/disable Intel IOMMU (VT-d)",
 219         },{
 220             .name = "suppress-vmdesc",
 221             .type = QEMU_OPT_BOOL,
 222             .help = "Set on to disable self-describing migration",
 223         },{
 224             .name = "aes-key-wrap",
 225             .type = QEMU_OPT_BOOL,
 226             .help = "enable/disable AES key wrapping using the CPACF wrapping key",
 227         },{
 228             .name = "dea-key-wrap",
 229             .type = QEMU_OPT_BOOL,
 230             .help = "enable/disable DEA key wrapping using the CPACF wrapping key",
 231         },{
 232             .name = "loadparm",
 233             .type = QEMU_OPT_STRING,
 234             .help = "Up to 8 chars in set of [A-Za-z0-9. ](lower case chars"
 235                     " converted to upper case) to pass to machine"
 236                     " loader, boot manager, and guest kernel",
 237         },
 238         { /* End of list */ }
 239     }
 240 };
 241
 242 CommandLineOptionInfoList *qmp_query_command_line_options(bool has_option,
 243                                                           const char *option,
 244                                                           Error **errp)
 245 {
 246     CommandLineOptionInfoList *conf_list = NULL;
 247     CommandLineOptionInfo *info;
 248     int i;
 249
 250     for (i = 0; vm_config_groups[i] != NULL; i++) {
 251         if (!has_option || !strcmp(option, vm_config_groups[i]->name)) {
 252             info = g_malloc0(sizeof(*info));
 253             info->option = g_strdup(vm_config_groups[i]->name);
 254             if (!strcmp("drive", vm_config_groups[i]->name)) {
 255                 info->parameters = get_drive_infolist();
 256             } else if (!strcmp("machine", vm_config_groups[i]->name)) {
 257                 info->parameters = query_option_descs(machine_opts.desc);
 258             } else {
 259                 info->parameters =
 260                     query_option_descs(vm_config_groups[i]->desc);
 261             }
 262             QAPI_LIST_PREPEND(conf_list, info);
 263         }
 264     }
 265
 266     if (conf_list == NULL) {
 267         error_setg(errp, "invalid option name: %s", option);
 268     }
 269
 270     return conf_list;
 271 }
 272
 273 QemuOptsList *qemu_find_opts_err(const char *group, Error **errp)
 274 {
 275     return find_list(vm_config_groups, group, errp);
 276 }
 277
 278 void qemu_add_drive_opts(QemuOptsList *list)
 279 {
 280     int entries, i;
 281
 282     entries = ARRAY_SIZE(drive_config_groups);
 283     entries--; /* keep list NULL terminated */
 284     for (i = 0; i < entries; i++) {
 285         if (drive_config_groups[i] == NULL) {
 286             drive_config_groups[i] = list;
 287             return;
 288         }
 289     }
 290     fprintf(stderr, "ran out of space in drive_config_groups");
 291     abort();
 292 }
 293
 294 void qemu_add_opts(QemuOptsList *list)
 295 {
 296     int entries, i;
 297
 298     entries = ARRAY_SIZE(vm_config_groups);
 299     entries--; /* keep list NULL terminated */
 300     for (i = 0; i < entries; i++) {
 301         if (vm_config_groups[i] == NULL) {
 302             vm_config_groups[i] = list;
 303             return;
 304         }
 305     }
 306     fprintf(stderr, "ran out of space in vm_config_groups");
 307     abort();
 308 }
 309
 310 struct ConfigWriteData {
 311     QemuOptsList *list;
 312     FILE *fp;
 313 };
 314
 315 static int config_write_opt(void *opaque, const char *name, const char *value,
 316                             Error **errp)
 317 {
 318     struct ConfigWriteData *data = opaque;
 319
 320     fprintf(data->fp, "  %s = \"%s\"\n", name, value);
 321     return 0;
 322 }
 323
 324 static int config_write_opts(void *opaque, QemuOpts *opts, Error **errp)
 325 {
 326     struct ConfigWriteData *data = opaque;
 327     const char *id = qemu_opts_id(opts);
 328
 329     if (id) {
 330         fprintf(data->fp, "[%s \"%s\"]\n", data->list->name, id);
 331     } else {
 332         fprintf(data->fp, "[%s]\n", data->list->name);
 333     }
 334     qemu_opt_foreach(opts, config_write_opt, data, NULL);
 335     fprintf(data->fp, "\n");
 336     return 0;
 337 }
 338
 339 void qemu_config_write(FILE *fp)
 340 {
 341     struct ConfigWriteData data = { .fp = fp };
 342     QemuOptsList **lists = vm_config_groups;
 343     int i;
 344
 345     fprintf(fp, "# qemu config file\n\n");
 346     for (i = 0; lists[i] != NULL; i++) {
 347         data.list = lists[i];
 348         qemu_opts_foreach(data.list, config_write_opts, &data, NULL);
 349     }
 350 }
 351
 352 /* Returns number of config groups on success, -errno on error */
 353 int qemu_config_parse(FILE *fp, QemuOptsList **lists, const char *fname, Error **errp)
 354 {
 355     char line[1024], group[64], id[64], arg[64], value[1024];
 356     Location loc;
 357     QemuOptsList *list = NULL;
 358     Error *local_err = NULL;
 359     QemuOpts *opts = NULL;
 360     int res = -EINVAL, lno = 0;
 361     int count = 0;
 362
 363     loc_push_none(&loc);
 364     while (fgets(line, sizeof(line), fp) != NULL) {
 365         loc_set_file(fname, ++lno);
 366         if (line[0] == '\n') {
 367             /* skip empty lines */
 368             continue;
 369         }
 370         if (line[0] == '#') {
 371             /* comment */
 372             continue;
 373         }
 374         if (sscanf(line, "[%63s \"%63[^\"]\"]", group, id) == 2) {
 375             /* group with id */
 376             list = find_list(lists, group, &local_err);
 377             if (local_err) {
 378                 error_propagate(errp, local_err);
 379                 goto out;
 380             }
 381             opts = qemu_opts_create(list, id, 1, NULL);
 382             count++;
 383             continue;
 384         }
 385         if (sscanf(line, "[%63[^]]]", group) == 1) {
 386             /* group without id */
 387             list = find_list(lists, group, &local_err);
 388             if (local_err) {
 389                 error_propagate(errp, local_err);
 390                 goto out;
 391             }
 392             opts = qemu_opts_create(list, NULL, 0, &error_abort);
 393             count++;
 394             continue;
 395         }
 396         value[0] = '\0';
 397         if (sscanf(line, " %63s = \"%1023[^\"]\"", arg, value) == 2 ||
 398             sscanf(line, " %63s = \"\"", arg) == 1) {
 399             /* arg = value */
 400             if (opts == NULL) {
 401                 error_setg(errp, "no group defined");
 402                 goto out;
 403             }
 404             if (!qemu_opt_set(opts, arg, value, errp)) {
 405                 goto out;
 406             }
 407             continue;
 408         }
 409         error_setg(errp, "parse error");
 410         goto out;
 411     }
 412     if (ferror(fp)) {
 413         loc_pop(&loc);
 414         error_setg_errno(errp, errno, "Cannot read config file");
 415         return res;
 416     }
 417     res = count;
 418 out:
 419     loc_pop(&loc);
 420     return res;
 421 }
 422
 423 int qemu_read_config_file(const char *filename, Error **errp)
 424 {
 425     FILE *f = fopen(filename, "r");
 426     int ret;
 427
 428     if (f == NULL) {
 429         error_setg_file_open(errp, errno, filename);
 430         return -errno;
 431     }
 432
 433     ret = qemu_config_parse(f, vm_config_groups, filename, errp);
 434     fclose(f);
 435     return ret;
 436 }
 437
 438 static void config_parse_qdict_section(QDict *options, QemuOptsList *opts,
 439                                        Error **errp)
 440 {
 441     QemuOpts *subopts;
 442     QDict *subqdict;
 443     QList *list = NULL;
 444     size_t orig_size, enum_size;
 445     char *prefix;
 446
 447     prefix = g_strdup_printf("%s.", opts->name);
 448     qdict_extract_subqdict(options, &subqdict, prefix);
 449     g_free(prefix);
 450     orig_size = qdict_size(subqdict);
 451     if (!orig_size) {
 452         goto out;
 453     }
 454
 455     subopts = qemu_opts_create(opts, NULL, 0, errp);
 456     if (!subopts) {
 457         goto out;
 458     }
 459
 460     if (!qemu_opts_absorb_qdict(subopts, subqdict, errp)) {
 461         goto out;
 462     }
 463
 464     enum_size = qdict_size(subqdict);
 465     if (enum_size < orig_size && enum_size) {
 466         error_setg(errp, "Unknown option '%s' for [%s]",
 467                    qdict_first(subqdict)->key, opts->name);
 468         goto out;
 469     }
 470
 471     if (enum_size) {
 472         /* Multiple, enumerated sections */
 473         QListEntry *list_entry;
 474         unsigned i = 0;
 475
 476         /* Not required anymore */
 477         qemu_opts_del(subopts);
 478
 479         qdict_array_split(subqdict, &list);
 480         if (qdict_size(subqdict)) {
 481             error_setg(errp, "Unused option '%s' for [%s]",
 482                        qdict_first(subqdict)->key, opts->name);
 483             goto out;
 484         }
 485
 486         QLIST_FOREACH_ENTRY(list, list_entry) {
 487             QDict *section = qobject_to(QDict, qlist_entry_obj(list_entry));
 488             char *opt_name;
 489
 490             if (!section) {
 491                 error_setg(errp, "[%s] section (index %u) does not consist of "
 492                            "keys", opts->name, i);
 493                 goto out;
 494             }
 495
 496             opt_name = g_strdup_printf("%s.%u", opts->name, i++);
 497             subopts = qemu_opts_create(opts, opt_name, 1, errp);
 498             g_free(opt_name);
 499             if (!subopts) {
 500                 goto out;
 501             }
 502
 503             if (!qemu_opts_absorb_qdict(subopts, section, errp)) {
 504                 qemu_opts_del(subopts);
 505                 goto out;
 506             }
 507
 508             if (qdict_size(section)) {
 509                 error_setg(errp, "[%s] section doesn't support the option '%s'",
 510                            opts->name, qdict_first(section)->key);
 511                 qemu_opts_del(subopts);
 512                 goto out;
 513             }
 514         }
 515     }
 516
 517 out:
 518     qobject_unref(subqdict);
 519     qobject_unref(list);
 520 }
 521
 522 void qemu_config_parse_qdict(QDict *options, QemuOptsList **lists,
 523                              Error **errp)
 524 {
 525     int i;
 526     Error *local_err = NULL;
 527
 528     for (i = 0; lists[i]; i++) {
 529         config_parse_qdict_section(options, lists[i], &local_err);
 530         if (local_err) {
 531             error_propagate(errp, local_err);
 532             return;
 533         }
 534     }
 535 }