From: "Andreas Färber" <afaerber@suse.de>
To: Marcel Apfelbaum <marcel.a@redhat.com>, qemu-devel@nongnu.org
Cc: peter.maydell@linaro.org, peter.crosthwaite@petalogix.com,
ehabkost@redhat.com, mst@redhat.com, mtosatti@redhat.com,
edgar.iglesias@gmail.com, mdroth@linux.vnet.ibm.com,
armbru@redhat.com, blauwirbel@gmail.com, quintela@redhat.com,
agraf@suse.de, aliguori@amazon.com, pbonzini@redhat.com,
scottwood@freescale.com, imammedo@redhat.com,
lcapitulino@redhat.com, rth@twiddle.net
Subject: Re: [Qemu-devel] [PATCH RFC V2 2/9] vl: use qemu machine QOM class instead of global machines list
Date: Mon, 03 Mar 2014 19:12:32 +0100 [thread overview]
Message-ID: <5314C610.2090305@suse.de> (raw)
In-Reply-To: <1393765632-2753-3-git-send-email-marcel.a@redhat.com>
Am 02.03.2014 14:07, schrieb Marcel Apfelbaum:
> The machine registration flow is refactored to use the QOM functionality.
> Instead of linking the machines into a list, each machine has a type
> and the types can be traversed in the QOM way.
>
> Signed-off-by: Marcel Apfelbaum <marcel.a@redhat.com>
> ---
> include/hw/boards.h | 1 +
> vl.c | 75 ++++++++++++++++++++++++++++++++++++++---------------
> 2 files changed, 55 insertions(+), 21 deletions(-)
>
> diff --git a/include/hw/boards.h b/include/hw/boards.h
> index 7b4708d..65e1e03 100644
> --- a/include/hw/boards.h
> +++ b/include/hw/boards.h
> @@ -49,6 +49,7 @@ struct QEMUMachine {
> const char *hw_version;
> };
>
> +#define TYPE_QEMU_MACHINE_PREFIX "machine-"
Would you mind turning that into a "-machine" suffix?
> int qemu_register_machine(QEMUMachine *m);
> QEMUMachine *find_default_machine(void);
>
> diff --git a/vl.c b/vl.c
> index 9379d33..50c880f 100644
> --- a/vl.c
> +++ b/vl.c
> @@ -1529,54 +1529,81 @@ void pcmcia_info(Monitor *mon, const QDict *qdict)
> /***********************************************************/
> /* machine registration */
>
> -static QEMUMachine *first_machine = NULL;
> QEMUMachine *current_machine = NULL;
>
> +static void qemu_machine_class_init(ObjectClass *klass, void *data)
"oc" like in 1/9 please.
> +{
> + QemuMachineClass *k = QEMU_MACHINE_CLASS(klass);
"mc" for [QEMU]MachineClass maybe? Applies elsewhere as well.
On that matter, might we simply choose MachineState and MachineClass, or
is there some name conflict?
> +
> + k->qemu_machine = data;
> +}
> +
> int qemu_register_machine(QEMUMachine *m)
> {
> - QEMUMachine **pm;
> - pm = &first_machine;
> - while (*pm != NULL)
> - pm = &(*pm)->next;
> - m->next = NULL;
> - *pm = m;
> + TypeInfo ti = {
> + .name = g_strconcat(TYPE_QEMU_MACHINE_PREFIX, m->name, NULL),
> + .parent = TYPE_QEMU_MACHINE,
> + .class_init = qemu_machine_class_init,
> + .class_data = (void *)m,
> + };
> +
> + type_register(&ti);
Cute idea as minimally invasive solution!
I do wonder whether doing type_register() as part of machine_init()
callbacks could pose any timing problems - have you checked on that in
vl.c? I.e. in the worst case we might need to sweep
s/machine_init/type_init/ for all machines in this early patch already
while still calling qemu_register_machine().
Otherwise the use of QOM infrastructure looks really nice.
Cheers,
Andreas
> +
> return 0;
> }
>
> static QEMUMachine *find_machine(const char *name)
> {
> - QEMUMachine *m;
> + GSList *el, *machines = object_class_get_list(TYPE_QEMU_MACHINE, false);
> + QEMUMachine *m = NULL;
> +
> + for (el = machines; el; el = el->next) {
> + QemuMachineClass *k = el->data;
>
> - for(m = first_machine; m != NULL; m = m->next) {
> - if (!strcmp(m->name, name))
> - return m;
> - if (m->alias && !strcmp(m->alias, name))
> - return m;
> + if (!strcmp(k->qemu_machine->name, name)) {
> + m = k->qemu_machine;
> + break;
> + }
> + if (k->qemu_machine->alias && !strcmp(k->qemu_machine->alias, name)) {
> + m = k->qemu_machine;
> + break;
> + }
> }
> - return NULL;
> +
> + g_slist_free(machines);
> + return m;
> }
>
> QEMUMachine *find_default_machine(void)
> {
> - QEMUMachine *m;
> + GSList *el, *machines = object_class_get_list(TYPE_QEMU_MACHINE, false);
> + QEMUMachine *m = NULL;
>
> - for(m = first_machine; m != NULL; m = m->next) {
> - if (m->is_default) {
> - return m;
> + for (el = machines; el; el = el->next) {
> + QemuMachineClass *k = el->data;
> +
> + if (k->qemu_machine->is_default) {
> + m = k->qemu_machine;
> + break;
> }
> }
> - return NULL;
> +
> + g_slist_free(machines);
> + return m;
> }
>
> MachineInfoList *qmp_query_machines(Error **errp)
> {
> + GSList *el, *machines = object_class_get_list(TYPE_QEMU_MACHINE, false);
> MachineInfoList *mach_list = NULL;
> QEMUMachine *m;
>
> - for (m = first_machine; m; m = m->next) {
> + for (el = machines; el; el = el->next) {
> + QemuMachineClass *k = el->data;
> MachineInfoList *entry;
> MachineInfo *info;
>
> + m = k->qemu_machine;
> info = g_malloc0(sizeof(*info));
> if (m->is_default) {
> info->has_is_default = true;
> @@ -1597,6 +1624,7 @@ MachineInfoList *qmp_query_machines(Error **errp)
> mach_list = entry;
> }
>
> + g_slist_free(machines);
> return mach_list;
> }
>
> @@ -2540,6 +2568,7 @@ static int debugcon_parse(const char *devname)
> static QEMUMachine *machine_parse(const char *name)
> {
> QEMUMachine *m, *machine = NULL;
> + GSList *el, *machines = object_class_get_list(TYPE_QEMU_MACHINE, false);
>
> if (name) {
> machine = find_machine(name);
> @@ -2548,13 +2577,17 @@ static QEMUMachine *machine_parse(const char *name)
> return machine;
> }
> printf("Supported machines are:\n");
> - for (m = first_machine; m != NULL; m = m->next) {
> + for (el = machines; el; el = el->next) {
> + QemuMachineClass *k = el->data;
> + m = k->qemu_machine;
> if (m->alias) {
> printf("%-20s %s (alias of %s)\n", m->alias, m->desc, m->name);
> }
> printf("%-20s %s%s\n", m->name, m->desc,
> m->is_default ? " (default)" : "");
> }
> +
> + g_slist_free(machines);
> exit(!name || !is_help_option(name));
> }
>
--
SUSE LINUX Products GmbH, Maxfeldstr. 5, 90409 Nürnberg, Germany
GF: Jeff Hawn, Jennifer Guild, Felix Imendörffer; HRB 16746 AG Nürnberg
next prev parent reply other threads:[~2014-03-03 18:12 UTC|newest]
Thread overview: 38+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-03-02 13:07 [Qemu-devel] [PATCH RFC V2 0/9] qemu-machine as a QOM object Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 1/9] hw/core: introduced qemu machine as " Marcel Apfelbaum
2014-03-03 12:56 ` Michael S. Tsirkin
2014-03-03 17:49 ` Andreas Färber
2014-03-03 19:06 ` Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 2/9] vl: use qemu machine QOM class instead of global machines list Marcel Apfelbaum
2014-03-03 12:58 ` Michael S. Tsirkin
2014-03-03 12:57 ` Paolo Bonzini
2014-03-03 13:03 ` Marcel Apfelbaum
2014-03-03 14:52 ` Andreas Färber
2014-03-03 15:05 ` Marcel Apfelbaum
2014-03-03 18:12 ` Andreas Färber [this message]
2014-03-03 19:54 ` Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 3/9] hw/boards: converted current_machine to be an instance of QemuMachineCLass Marcel Apfelbaum
2014-03-03 10:49 ` Paolo Bonzini
2014-03-03 12:07 ` Marcel Apfelbaum
2014-03-03 12:46 ` Paolo Bonzini
2014-03-03 12:11 ` Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 4/9] hw/machine: add qemu machine opts as properties to QemuMachineState Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 5/9] qapi: output visitor crashes qemu if it encounters a NULL value Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 6/9] vl.c: do not set 'type' property in obj_set_property Marcel Apfelbaum
2014-03-03 10:11 ` Paolo Bonzini
2014-03-03 12:09 ` Marcel Apfelbaum
2014-03-03 12:47 ` Paolo Bonzini
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 7/9] qom: add object_property_is_set Marcel Apfelbaum
2014-03-03 10:13 ` Paolo Bonzini
2014-03-03 12:09 ` Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 8/9] machine-opts: replace qemu_opt_get by QOM QemuMachine queries Marcel Apfelbaum
2014-03-03 10:11 ` Paolo Bonzini
2014-03-03 12:10 ` Marcel Apfelbaum
2014-03-02 13:07 ` [Qemu-devel] [PATCH RFC V2 9/9] hw/core: mapped QemuOpts into QEMUMachineInitArgs fields to remove duplication Marcel Apfelbaum
2014-03-03 10:13 ` Paolo Bonzini
2014-03-03 12:10 ` Marcel Apfelbaum
2014-03-03 10:50 ` [Qemu-devel] [PATCH RFC V2 0/9] qemu-machine as a QOM object Paolo Bonzini
2014-03-03 12:07 ` Marcel Apfelbaum
2014-03-03 12:56 ` Paolo Bonzini
2014-03-03 13:17 ` Marcel Apfelbaum
2014-03-03 14:10 ` Andreas Färber
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=5314C610.2090305@suse.de \
--to=afaerber@suse.de \
--cc=agraf@suse.de \
--cc=aliguori@amazon.com \
--cc=armbru@redhat.com \
--cc=blauwirbel@gmail.com \
--cc=edgar.iglesias@gmail.com \
--cc=ehabkost@redhat.com \
--cc=imammedo@redhat.com \
--cc=lcapitulino@redhat.com \
--cc=marcel.a@redhat.com \
--cc=mdroth@linux.vnet.ibm.com \
--cc=mst@redhat.com \
--cc=mtosatti@redhat.com \
--cc=pbonzini@redhat.com \
--cc=peter.crosthwaite@petalogix.com \
--cc=peter.maydell@linaro.org \
--cc=qemu-devel@nongnu.org \
--cc=quintela@redhat.com \
--cc=rth@twiddle.net \
--cc=scottwood@freescale.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).