Merge remote-tracking branch 'remotes/maxreitz/tags/pull-block-2017-11-14' into staging
[qemu/ar7.git] / hw / core / machine.c
blob36c2fb069c0108f07e380dd8078b3960929355c3
1 /*
2 * QEMU Machine
4 * Copyright (C) 2014 Red Hat Inc
6 * Authors:
7 * Marcel Apfelbaum <marcel.a@redhat.com>
9 * This work is licensed under the terms of the GNU GPL, version 2 or later.
10 * See the COPYING file in the top-level directory.
13 #include "qemu/osdep.h"
14 #include "hw/boards.h"
15 #include "qapi/error.h"
16 #include "qapi-visit.h"
17 #include "qapi/visitor.h"
18 #include "hw/sysbus.h"
19 #include "sysemu/sysemu.h"
20 #include "sysemu/numa.h"
21 #include "qemu/error-report.h"
22 #include "qemu/cutils.h"
23 #include "sysemu/numa.h"
24 #include "sysemu/qtest.h"
26 static char *machine_get_accel(Object *obj, Error **errp)
28 MachineState *ms = MACHINE(obj);
30 return g_strdup(ms->accel);
33 static void machine_set_accel(Object *obj, const char *value, Error **errp)
35 MachineState *ms = MACHINE(obj);
37 g_free(ms->accel);
38 ms->accel = g_strdup(value);
41 static void machine_set_kernel_irqchip(Object *obj, Visitor *v,
42 const char *name, void *opaque,
43 Error **errp)
45 Error *err = NULL;
46 MachineState *ms = MACHINE(obj);
47 OnOffSplit mode;
49 visit_type_OnOffSplit(v, name, &mode, &err);
50 if (err) {
51 error_propagate(errp, err);
52 return;
53 } else {
54 switch (mode) {
55 case ON_OFF_SPLIT_ON:
56 ms->kernel_irqchip_allowed = true;
57 ms->kernel_irqchip_required = true;
58 ms->kernel_irqchip_split = false;
59 break;
60 case ON_OFF_SPLIT_OFF:
61 ms->kernel_irqchip_allowed = false;
62 ms->kernel_irqchip_required = false;
63 ms->kernel_irqchip_split = false;
64 break;
65 case ON_OFF_SPLIT_SPLIT:
66 ms->kernel_irqchip_allowed = true;
67 ms->kernel_irqchip_required = true;
68 ms->kernel_irqchip_split = true;
69 break;
70 default:
71 /* The value was checked in visit_type_OnOffSplit() above. If
72 * we get here, then something is wrong in QEMU.
74 abort();
79 static void machine_get_kvm_shadow_mem(Object *obj, Visitor *v,
80 const char *name, void *opaque,
81 Error **errp)
83 MachineState *ms = MACHINE(obj);
84 int64_t value = ms->kvm_shadow_mem;
86 visit_type_int(v, name, &value, errp);
89 static void machine_set_kvm_shadow_mem(Object *obj, Visitor *v,
90 const char *name, void *opaque,
91 Error **errp)
93 MachineState *ms = MACHINE(obj);
94 Error *error = NULL;
95 int64_t value;
97 visit_type_int(v, name, &value, &error);
98 if (error) {
99 error_propagate(errp, error);
100 return;
103 ms->kvm_shadow_mem = value;
106 static char *machine_get_kernel(Object *obj, Error **errp)
108 MachineState *ms = MACHINE(obj);
110 return g_strdup(ms->kernel_filename);
113 static void machine_set_kernel(Object *obj, const char *value, Error **errp)
115 MachineState *ms = MACHINE(obj);
117 g_free(ms->kernel_filename);
118 ms->kernel_filename = g_strdup(value);
121 static char *machine_get_initrd(Object *obj, Error **errp)
123 MachineState *ms = MACHINE(obj);
125 return g_strdup(ms->initrd_filename);
128 static void machine_set_initrd(Object *obj, const char *value, Error **errp)
130 MachineState *ms = MACHINE(obj);
132 g_free(ms->initrd_filename);
133 ms->initrd_filename = g_strdup(value);
136 static char *machine_get_append(Object *obj, Error **errp)
138 MachineState *ms = MACHINE(obj);
140 return g_strdup(ms->kernel_cmdline);
143 static void machine_set_append(Object *obj, const char *value, Error **errp)
145 MachineState *ms = MACHINE(obj);
147 g_free(ms->kernel_cmdline);
148 ms->kernel_cmdline = g_strdup(value);
151 static char *machine_get_dtb(Object *obj, Error **errp)
153 MachineState *ms = MACHINE(obj);
155 return g_strdup(ms->dtb);
158 static void machine_set_dtb(Object *obj, const char *value, Error **errp)
160 MachineState *ms = MACHINE(obj);
162 g_free(ms->dtb);
163 ms->dtb = g_strdup(value);
166 static char *machine_get_dumpdtb(Object *obj, Error **errp)
168 MachineState *ms = MACHINE(obj);
170 return g_strdup(ms->dumpdtb);
173 static void machine_set_dumpdtb(Object *obj, const char *value, Error **errp)
175 MachineState *ms = MACHINE(obj);
177 g_free(ms->dumpdtb);
178 ms->dumpdtb = g_strdup(value);
181 static void machine_get_phandle_start(Object *obj, Visitor *v,
182 const char *name, void *opaque,
183 Error **errp)
185 MachineState *ms = MACHINE(obj);
186 int64_t value = ms->phandle_start;
188 visit_type_int(v, name, &value, errp);
191 static void machine_set_phandle_start(Object *obj, Visitor *v,
192 const char *name, void *opaque,
193 Error **errp)
195 MachineState *ms = MACHINE(obj);
196 Error *error = NULL;
197 int64_t value;
199 visit_type_int(v, name, &value, &error);
200 if (error) {
201 error_propagate(errp, error);
202 return;
205 ms->phandle_start = value;
208 static char *machine_get_dt_compatible(Object *obj, Error **errp)
210 MachineState *ms = MACHINE(obj);
212 return g_strdup(ms->dt_compatible);
215 static void machine_set_dt_compatible(Object *obj, const char *value, Error **errp)
217 MachineState *ms = MACHINE(obj);
219 g_free(ms->dt_compatible);
220 ms->dt_compatible = g_strdup(value);
223 static bool machine_get_dump_guest_core(Object *obj, Error **errp)
225 MachineState *ms = MACHINE(obj);
227 return ms->dump_guest_core;
230 static void machine_set_dump_guest_core(Object *obj, bool value, Error **errp)
232 MachineState *ms = MACHINE(obj);
234 ms->dump_guest_core = value;
237 static bool machine_get_mem_merge(Object *obj, Error **errp)
239 MachineState *ms = MACHINE(obj);
241 return ms->mem_merge;
244 static void machine_set_mem_merge(Object *obj, bool value, Error **errp)
246 MachineState *ms = MACHINE(obj);
248 ms->mem_merge = value;
251 static bool machine_get_usb(Object *obj, Error **errp)
253 MachineState *ms = MACHINE(obj);
255 return ms->usb;
258 static void machine_set_usb(Object *obj, bool value, Error **errp)
260 MachineState *ms = MACHINE(obj);
262 ms->usb = value;
263 ms->usb_disabled = !value;
266 static bool machine_get_graphics(Object *obj, Error **errp)
268 MachineState *ms = MACHINE(obj);
270 return ms->enable_graphics;
273 static void machine_set_graphics(Object *obj, bool value, Error **errp)
275 MachineState *ms = MACHINE(obj);
277 ms->enable_graphics = value;
280 static bool machine_get_igd_gfx_passthru(Object *obj, Error **errp)
282 MachineState *ms = MACHINE(obj);
284 return ms->igd_gfx_passthru;
287 static void machine_set_igd_gfx_passthru(Object *obj, bool value, Error **errp)
289 MachineState *ms = MACHINE(obj);
291 ms->igd_gfx_passthru = value;
294 static char *machine_get_firmware(Object *obj, Error **errp)
296 MachineState *ms = MACHINE(obj);
298 return g_strdup(ms->firmware);
301 static void machine_set_firmware(Object *obj, const char *value, Error **errp)
303 MachineState *ms = MACHINE(obj);
305 g_free(ms->firmware);
306 ms->firmware = g_strdup(value);
309 static void machine_set_suppress_vmdesc(Object *obj, bool value, Error **errp)
311 MachineState *ms = MACHINE(obj);
313 ms->suppress_vmdesc = value;
316 static bool machine_get_suppress_vmdesc(Object *obj, Error **errp)
318 MachineState *ms = MACHINE(obj);
320 return ms->suppress_vmdesc;
323 static void machine_set_enforce_config_section(Object *obj, bool value,
324 Error **errp)
326 MachineState *ms = MACHINE(obj);
328 ms->enforce_config_section = value;
331 static bool machine_get_enforce_config_section(Object *obj, Error **errp)
333 MachineState *ms = MACHINE(obj);
335 return ms->enforce_config_section;
338 static void error_on_sysbus_device(SysBusDevice *sbdev, void *opaque)
340 error_report("Option '-device %s' cannot be handled by this machine",
341 object_class_get_name(object_get_class(OBJECT(sbdev))));
342 exit(1);
345 static void machine_init_notify(Notifier *notifier, void *data)
347 Object *machine = qdev_get_machine();
348 ObjectClass *oc = object_get_class(machine);
349 MachineClass *mc = MACHINE_CLASS(oc);
351 if (mc->has_dynamic_sysbus) {
352 /* Our machine can handle dynamic sysbus devices, we're all good */
353 return;
357 * Loop through all dynamically created devices and check whether there
358 * are sysbus devices among them. If there are, error out.
360 foreach_dynamic_sysbus_device(error_on_sysbus_device, NULL);
363 HotpluggableCPUList *machine_query_hotpluggable_cpus(MachineState *machine)
365 int i;
366 Object *cpu;
367 HotpluggableCPUList *head = NULL;
368 const char *cpu_type;
370 cpu = machine->possible_cpus->cpus[0].cpu;
371 assert(cpu); /* Boot cpu is always present */
372 cpu_type = object_get_typename(cpu);
373 for (i = 0; i < machine->possible_cpus->len; i++) {
374 HotpluggableCPUList *list_item = g_new0(typeof(*list_item), 1);
375 HotpluggableCPU *cpu_item = g_new0(typeof(*cpu_item), 1);
377 cpu_item->type = g_strdup(cpu_type);
378 cpu_item->vcpus_count = machine->possible_cpus->cpus[i].vcpus_count;
379 cpu_item->props = g_memdup(&machine->possible_cpus->cpus[i].props,
380 sizeof(*cpu_item->props));
382 cpu = machine->possible_cpus->cpus[i].cpu;
383 if (cpu) {
384 cpu_item->has_qom_path = true;
385 cpu_item->qom_path = object_get_canonical_path(cpu);
387 list_item->value = cpu_item;
388 list_item->next = head;
389 head = list_item;
391 return head;
395 * machine_set_cpu_numa_node:
396 * @machine: machine object to modify
397 * @props: specifies which cpu objects to assign to
398 * numa node specified by @props.node_id
399 * @errp: if an error occurs, a pointer to an area to store the error
401 * Associate NUMA node specified by @props.node_id with cpu slots that
402 * match socket/core/thread-ids specified by @props. It's recommended to use
403 * query-hotpluggable-cpus.props values to specify affected cpu slots,
404 * which would lead to exact 1:1 mapping of cpu slots to NUMA node.
406 * However for CLI convenience it's possible to pass in subset of properties,
407 * which would affect all cpu slots that match it.
408 * Ex for pc machine:
409 * -smp 4,cores=2,sockets=2 -numa node,nodeid=0 -numa node,nodeid=1 \
410 * -numa cpu,node-id=0,socket_id=0 \
411 * -numa cpu,node-id=1,socket_id=1
412 * will assign all child cores of socket 0 to node 0 and
413 * of socket 1 to node 1.
415 * On attempt of reassigning (already assigned) cpu slot to another NUMA node,
416 * return error.
417 * Empty subset is disallowed and function will return with error in this case.
419 void machine_set_cpu_numa_node(MachineState *machine,
420 const CpuInstanceProperties *props, Error **errp)
422 MachineClass *mc = MACHINE_GET_CLASS(machine);
423 bool match = false;
424 int i;
426 if (!mc->possible_cpu_arch_ids) {
427 error_setg(errp, "mapping of CPUs to NUMA node is not supported");
428 return;
431 /* disabling node mapping is not supported, forbid it */
432 assert(props->has_node_id);
434 /* force board to initialize possible_cpus if it hasn't been done yet */
435 mc->possible_cpu_arch_ids(machine);
437 for (i = 0; i < machine->possible_cpus->len; i++) {
438 CPUArchId *slot = &machine->possible_cpus->cpus[i];
440 /* reject unsupported by board properties */
441 if (props->has_thread_id && !slot->props.has_thread_id) {
442 error_setg(errp, "thread-id is not supported");
443 return;
446 if (props->has_core_id && !slot->props.has_core_id) {
447 error_setg(errp, "core-id is not supported");
448 return;
451 if (props->has_socket_id && !slot->props.has_socket_id) {
452 error_setg(errp, "socket-id is not supported");
453 return;
456 /* skip slots with explicit mismatch */
457 if (props->has_thread_id && props->thread_id != slot->props.thread_id) {
458 continue;
461 if (props->has_core_id && props->core_id != slot->props.core_id) {
462 continue;
465 if (props->has_socket_id && props->socket_id != slot->props.socket_id) {
466 continue;
469 /* reject assignment if slot is already assigned, for compatibility
470 * of legacy cpu_index mapping with SPAPR core based mapping do not
471 * error out if cpu thread and matched core have the same node-id */
472 if (slot->props.has_node_id &&
473 slot->props.node_id != props->node_id) {
474 error_setg(errp, "CPU is already assigned to node-id: %" PRId64,
475 slot->props.node_id);
476 return;
479 /* assign slot to node as it's matched '-numa cpu' key */
480 match = true;
481 slot->props.node_id = props->node_id;
482 slot->props.has_node_id = props->has_node_id;
485 if (!match) {
486 error_setg(errp, "no match found");
490 static void machine_class_init(ObjectClass *oc, void *data)
492 MachineClass *mc = MACHINE_CLASS(oc);
494 /* Default 128 MB as guest ram size */
495 mc->default_ram_size = 128 * M_BYTE;
496 mc->rom_file_has_mr = true;
498 /* numa node memory size aligned on 8MB by default.
499 * On Linux, each node's border has to be 8MB aligned
501 mc->numa_mem_align_shift = 23;
502 mc->numa_auto_assign_ram = numa_default_auto_assign_ram;
504 object_class_property_add_str(oc, "accel",
505 machine_get_accel, machine_set_accel, &error_abort);
506 object_class_property_set_description(oc, "accel",
507 "Accelerator list", &error_abort);
509 object_class_property_add(oc, "kernel-irqchip", "OnOffSplit",
510 NULL, machine_set_kernel_irqchip,
511 NULL, NULL, &error_abort);
512 object_class_property_set_description(oc, "kernel-irqchip",
513 "Configure KVM in-kernel irqchip", &error_abort);
515 object_class_property_add(oc, "kvm-shadow-mem", "int",
516 machine_get_kvm_shadow_mem, machine_set_kvm_shadow_mem,
517 NULL, NULL, &error_abort);
518 object_class_property_set_description(oc, "kvm-shadow-mem",
519 "KVM shadow MMU size", &error_abort);
521 object_class_property_add_str(oc, "kernel",
522 machine_get_kernel, machine_set_kernel, &error_abort);
523 object_class_property_set_description(oc, "kernel",
524 "Linux kernel image file", &error_abort);
526 object_class_property_add_str(oc, "initrd",
527 machine_get_initrd, machine_set_initrd, &error_abort);
528 object_class_property_set_description(oc, "initrd",
529 "Linux initial ramdisk file", &error_abort);
531 object_class_property_add_str(oc, "append",
532 machine_get_append, machine_set_append, &error_abort);
533 object_class_property_set_description(oc, "append",
534 "Linux kernel command line", &error_abort);
536 object_class_property_add_str(oc, "dtb",
537 machine_get_dtb, machine_set_dtb, &error_abort);
538 object_class_property_set_description(oc, "dtb",
539 "Linux kernel device tree file", &error_abort);
541 object_class_property_add_str(oc, "dumpdtb",
542 machine_get_dumpdtb, machine_set_dumpdtb, &error_abort);
543 object_class_property_set_description(oc, "dumpdtb",
544 "Dump current dtb to a file and quit", &error_abort);
546 object_class_property_add(oc, "phandle-start", "int",
547 machine_get_phandle_start, machine_set_phandle_start,
548 NULL, NULL, &error_abort);
549 object_class_property_set_description(oc, "phandle-start",
550 "The first phandle ID we may generate dynamically", &error_abort);
552 object_class_property_add_str(oc, "dt-compatible",
553 machine_get_dt_compatible, machine_set_dt_compatible, &error_abort);
554 object_class_property_set_description(oc, "dt-compatible",
555 "Overrides the \"compatible\" property of the dt root node",
556 &error_abort);
558 object_class_property_add_bool(oc, "dump-guest-core",
559 machine_get_dump_guest_core, machine_set_dump_guest_core, &error_abort);
560 object_class_property_set_description(oc, "dump-guest-core",
561 "Include guest memory in a core dump", &error_abort);
563 object_class_property_add_bool(oc, "mem-merge",
564 machine_get_mem_merge, machine_set_mem_merge, &error_abort);
565 object_class_property_set_description(oc, "mem-merge",
566 "Enable/disable memory merge support", &error_abort);
568 object_class_property_add_bool(oc, "usb",
569 machine_get_usb, machine_set_usb, &error_abort);
570 object_class_property_set_description(oc, "usb",
571 "Set on/off to enable/disable usb", &error_abort);
573 object_class_property_add_bool(oc, "graphics",
574 machine_get_graphics, machine_set_graphics, &error_abort);
575 object_class_property_set_description(oc, "graphics",
576 "Set on/off to enable/disable graphics emulation", &error_abort);
578 object_class_property_add_bool(oc, "igd-passthru",
579 machine_get_igd_gfx_passthru, machine_set_igd_gfx_passthru,
580 &error_abort);
581 object_class_property_set_description(oc, "igd-passthru",
582 "Set on/off to enable/disable igd passthrou", &error_abort);
584 object_class_property_add_str(oc, "firmware",
585 machine_get_firmware, machine_set_firmware,
586 &error_abort);
587 object_class_property_set_description(oc, "firmware",
588 "Firmware image", &error_abort);
590 object_class_property_add_bool(oc, "suppress-vmdesc",
591 machine_get_suppress_vmdesc, machine_set_suppress_vmdesc,
592 &error_abort);
593 object_class_property_set_description(oc, "suppress-vmdesc",
594 "Set on to disable self-describing migration", &error_abort);
596 object_class_property_add_bool(oc, "enforce-config-section",
597 machine_get_enforce_config_section, machine_set_enforce_config_section,
598 &error_abort);
599 object_class_property_set_description(oc, "enforce-config-section",
600 "Set on to enforce configuration section migration", &error_abort);
603 static void machine_class_base_init(ObjectClass *oc, void *data)
605 if (!object_class_is_abstract(oc)) {
606 MachineClass *mc = MACHINE_CLASS(oc);
607 const char *cname = object_class_get_name(oc);
608 assert(g_str_has_suffix(cname, TYPE_MACHINE_SUFFIX));
609 mc->name = g_strndup(cname,
610 strlen(cname) - strlen(TYPE_MACHINE_SUFFIX));
614 static void machine_initfn(Object *obj)
616 MachineState *ms = MACHINE(obj);
618 ms->kernel_irqchip_allowed = true;
619 ms->kvm_shadow_mem = -1;
620 ms->dump_guest_core = true;
621 ms->mem_merge = true;
622 ms->enable_graphics = true;
624 /* Register notifier when init is done for sysbus sanity checks */
625 ms->sysbus_notifier.notify = machine_init_notify;
626 qemu_add_machine_init_done_notifier(&ms->sysbus_notifier);
629 static void machine_finalize(Object *obj)
631 MachineState *ms = MACHINE(obj);
633 g_free(ms->accel);
634 g_free(ms->kernel_filename);
635 g_free(ms->initrd_filename);
636 g_free(ms->kernel_cmdline);
637 g_free(ms->dtb);
638 g_free(ms->dumpdtb);
639 g_free(ms->dt_compatible);
640 g_free(ms->firmware);
643 bool machine_usb(MachineState *machine)
645 return machine->usb;
648 bool machine_kernel_irqchip_allowed(MachineState *machine)
650 return machine->kernel_irqchip_allowed;
653 bool machine_kernel_irqchip_required(MachineState *machine)
655 return machine->kernel_irqchip_required;
658 bool machine_kernel_irqchip_split(MachineState *machine)
660 return machine->kernel_irqchip_split;
663 int machine_kvm_shadow_mem(MachineState *machine)
665 return machine->kvm_shadow_mem;
668 int machine_phandle_start(MachineState *machine)
670 return machine->phandle_start;
673 bool machine_dump_guest_core(MachineState *machine)
675 return machine->dump_guest_core;
678 bool machine_mem_merge(MachineState *machine)
680 return machine->mem_merge;
683 static char *cpu_slot_to_string(const CPUArchId *cpu)
685 GString *s = g_string_new(NULL);
686 if (cpu->props.has_socket_id) {
687 g_string_append_printf(s, "socket-id: %"PRId64, cpu->props.socket_id);
689 if (cpu->props.has_core_id) {
690 if (s->len) {
691 g_string_append_printf(s, ", ");
693 g_string_append_printf(s, "core-id: %"PRId64, cpu->props.core_id);
695 if (cpu->props.has_thread_id) {
696 if (s->len) {
697 g_string_append_printf(s, ", ");
699 g_string_append_printf(s, "thread-id: %"PRId64, cpu->props.thread_id);
701 return g_string_free(s, false);
704 static void machine_numa_finish_init(MachineState *machine)
706 int i;
707 bool default_mapping;
708 GString *s = g_string_new(NULL);
709 MachineClass *mc = MACHINE_GET_CLASS(machine);
710 const CPUArchIdList *possible_cpus = mc->possible_cpu_arch_ids(machine);
712 assert(nb_numa_nodes);
713 for (i = 0; i < possible_cpus->len; i++) {
714 if (possible_cpus->cpus[i].props.has_node_id) {
715 break;
718 default_mapping = (i == possible_cpus->len);
720 for (i = 0; i < possible_cpus->len; i++) {
721 const CPUArchId *cpu_slot = &possible_cpus->cpus[i];
723 if (!cpu_slot->props.has_node_id) {
724 /* fetch default mapping from board and enable it */
725 CpuInstanceProperties props = cpu_slot->props;
727 props.node_id = mc->get_default_cpu_node_id(machine, i);
728 if (!default_mapping) {
729 /* record slots with not set mapping,
730 * TODO: make it hard error in future */
731 char *cpu_str = cpu_slot_to_string(cpu_slot);
732 g_string_append_printf(s, "%sCPU %d [%s]",
733 s->len ? ", " : "", i, cpu_str);
734 g_free(cpu_str);
736 /* non mapped cpus used to fallback to node 0 */
737 props.node_id = 0;
740 props.has_node_id = true;
741 machine_set_cpu_numa_node(machine, &props, &error_fatal);
744 if (s->len && !qtest_enabled()) {
745 warn_report("CPU(s) not present in any NUMA nodes: %s",
746 s->str);
747 warn_report("All CPU(s) up to maxcpus should be described "
748 "in NUMA config, ability to start up with partial NUMA "
749 "mappings is obsoleted and will be removed in future");
751 g_string_free(s, true);
754 void machine_run_board_init(MachineState *machine)
756 MachineClass *machine_class = MACHINE_GET_CLASS(machine);
758 if (nb_numa_nodes) {
759 machine_numa_finish_init(machine);
762 /* If the machine supports the valid_cpu_types check and the user
763 * specified a CPU with -cpu check here that the user CPU is supported.
765 if (machine_class->valid_cpu_types && machine->cpu_type) {
766 ObjectClass *class = object_class_by_name(machine->cpu_type);
767 int i;
769 for (i = 0; machine_class->valid_cpu_types[i]; i++) {
770 if (object_class_dynamic_cast(class,
771 machine_class->valid_cpu_types[i])) {
772 /* The user specificed CPU is in the valid field, we are
773 * good to go.
775 break;
779 if (!machine_class->valid_cpu_types[i]) {
780 /* The user specified CPU is not valid */
781 error_report("Invalid CPU type: %s", machine->cpu_type);
782 error_printf("The valid types are: %s",
783 machine_class->valid_cpu_types[0]);
784 for (i = 1; machine_class->valid_cpu_types[i]; i++) {
785 error_printf(", %s", machine_class->valid_cpu_types[i]);
787 error_printf("\n");
789 exit(1);
793 machine_class->init(machine);
796 static void machine_class_finalize(ObjectClass *klass, void *data)
798 MachineClass *mc = MACHINE_CLASS(klass);
800 if (mc->compat_props) {
801 g_array_free(mc->compat_props, true);
803 g_free(mc->name);
806 void machine_register_compat_props(MachineState *machine)
808 MachineClass *mc = MACHINE_GET_CLASS(machine);
809 int i;
810 GlobalProperty *p;
812 if (!mc->compat_props) {
813 return;
816 for (i = 0; i < mc->compat_props->len; i++) {
817 p = g_array_index(mc->compat_props, GlobalProperty *, i);
818 /* Machine compat_props must never cause errors: */
819 p->errp = &error_abort;
820 qdev_prop_register_global(p);
824 static const TypeInfo machine_info = {
825 .name = TYPE_MACHINE,
826 .parent = TYPE_OBJECT,
827 .abstract = true,
828 .class_size = sizeof(MachineClass),
829 .class_init = machine_class_init,
830 .class_base_init = machine_class_base_init,
831 .class_finalize = machine_class_finalize,
832 .instance_size = sizeof(MachineState),
833 .instance_init = machine_initfn,
834 .instance_finalize = machine_finalize,
837 static void machine_register_types(void)
839 type_register_static(&machine_info);
842 type_init(machine_register_types)