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