1#include "qemu/osdep.h"
2#include "block/qdict.h"
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
11static QemuOptsList *vm_config_groups[48];
12static QemuOptsList *drive_config_groups[5];
13
14static 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
29QemuOptsList *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
42QemuOpts *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
56static 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
97static 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
119static 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
132static 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
151static 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 { }
239 }
240};
241
242CommandLineOptionInfoList *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
273QemuOptsList *qemu_find_opts_err(const char *group, Error **errp)
274{
275 return find_list(vm_config_groups, group, errp);
276}
277
278void qemu_add_drive_opts(QemuOptsList *list)
279{
280 int entries, i;
281
282 entries = ARRAY_SIZE(drive_config_groups);
283 entries--;
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
294void qemu_add_opts(QemuOptsList *list)
295{
296 int entries, i;
297
298 entries = ARRAY_SIZE(vm_config_groups);
299 entries--;
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
310struct ConfigWriteData {
311 QemuOptsList *list;
312 FILE *fp;
313};
314
315static 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
324static 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
339void 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
353int 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
368 continue;
369 }
370 if (line[0] == '#') {
371
372 continue;
373 }
374 if (sscanf(line, "[%63s \"%63[^\"]\"]", group, id) == 2) {
375
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
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
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;
418out:
419 loc_pop(&loc);
420 return res;
421}
422
423int 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
438static 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
473 QListEntry *list_entry;
474 unsigned i = 0;
475
476
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
517out:
518 qobject_unref(subqdict);
519 qobject_unref(list);
520}
521
522void 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}
536
