qemu/qdev-monitor.c
<<
>>
Prefs
   1/*
   2 *  Dynamic device configuration and creation.
   3 *
   4 *  Copyright (c) 2009 CodeSourcery
   5 *
   6 * This library is free software; you can redistribute it and/or
   7 * modify it under the terms of the GNU Lesser General Public
   8 * License as published by the Free Software Foundation; either
   9 * version 2 of the License, or (at your option) any later version.
  10 *
  11 * This library is distributed in the hope that it will be useful,
  12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 * Lesser General Public License for more details.
  15 *
  16 * You should have received a copy of the GNU Lesser General Public
  17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20#include "hw/qdev.h"
  21#include "hw/sysbus.h"
  22#include "monitor/monitor.h"
  23#include "monitor/qdev.h"
  24#include "qmp-commands.h"
  25#include "sysemu/arch_init.h"
  26#include "qapi/qmp/qerror.h"
  27#include "qemu/config-file.h"
  28#include "qemu/error-report.h"
  29
  30/*
  31 * Aliases were a bad idea from the start.  Let's keep them
  32 * from spreading further.
  33 */
  34typedef struct QDevAlias
  35{
  36    const char *typename;
  37    const char *alias;
  38    uint32_t arch_mask;
  39} QDevAlias;
  40
  41static const QDevAlias qdev_alias_table[] = {
  42    { "virtio-blk-pci", "virtio-blk", QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
  43    { "virtio-net-pci", "virtio-net", QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
  44    { "virtio-serial-pci", "virtio-serial", QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
  45    { "virtio-balloon-pci", "virtio-balloon",
  46            QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
  47    { "virtio-blk-ccw", "virtio-blk", QEMU_ARCH_S390X },
  48    { "virtio-net-ccw", "virtio-net", QEMU_ARCH_S390X },
  49    { "virtio-serial-ccw", "virtio-serial", QEMU_ARCH_S390X },
  50    { "lsi53c895a", "lsi" },
  51    { "ich9-ahci", "ahci" },
  52    { "kvm-pci-assign", "pci-assign" },
  53    { }
  54};
  55
  56static const char *qdev_class_get_alias(DeviceClass *dc)
  57{
  58    const char *typename = object_class_get_name(OBJECT_CLASS(dc));
  59    int i;
  60
  61    for (i = 0; qdev_alias_table[i].typename; i++) {
  62        if (qdev_alias_table[i].arch_mask &&
  63            !(qdev_alias_table[i].arch_mask & arch_type)) {
  64            continue;
  65        }
  66
  67        if (strcmp(qdev_alias_table[i].typename, typename) == 0) {
  68            return qdev_alias_table[i].alias;
  69        }
  70    }
  71
  72    return NULL;
  73}
  74
  75static bool qdev_class_has_alias(DeviceClass *dc)
  76{
  77    return (qdev_class_get_alias(dc) != NULL);
  78}
  79
  80static void qdev_print_devinfo(DeviceClass *dc)
  81{
  82    error_printf("name \"%s\"", object_class_get_name(OBJECT_CLASS(dc)));
  83    if (dc->bus_type) {
  84        error_printf(", bus %s", dc->bus_type);
  85    }
  86    if (qdev_class_has_alias(dc)) {
  87        error_printf(", alias \"%s\"", qdev_class_get_alias(dc));
  88    }
  89    if (dc->desc) {
  90        error_printf(", desc \"%s\"", dc->desc);
  91    }
  92    if (dc->cannot_instantiate_with_device_add_yet) {
  93        error_printf(", no-user");
  94    }
  95    error_printf("\n");
  96}
  97
  98static gint devinfo_cmp(gconstpointer a, gconstpointer b)
  99{
 100    return strcasecmp(object_class_get_name((ObjectClass *)a),
 101                      object_class_get_name((ObjectClass *)b));
 102}
 103
 104static void qdev_print_devinfos(bool show_no_user)
 105{
 106    static const char *cat_name[DEVICE_CATEGORY_MAX + 1] = {
 107        [DEVICE_CATEGORY_BRIDGE]  = "Controller/Bridge/Hub",
 108        [DEVICE_CATEGORY_USB]     = "USB",
 109        [DEVICE_CATEGORY_STORAGE] = "Storage",
 110        [DEVICE_CATEGORY_NETWORK] = "Network",
 111        [DEVICE_CATEGORY_INPUT]   = "Input",
 112        [DEVICE_CATEGORY_DISPLAY] = "Display",
 113        [DEVICE_CATEGORY_SOUND]   = "Sound",
 114        [DEVICE_CATEGORY_MISC]    = "Misc",
 115        [DEVICE_CATEGORY_MAX]     = "Uncategorized",
 116    };
 117    GSList *list, *elt;
 118    int i;
 119    bool cat_printed;
 120
 121    list = g_slist_sort(object_class_get_list(TYPE_DEVICE, false),
 122                        devinfo_cmp);
 123
 124    for (i = 0; i <= DEVICE_CATEGORY_MAX; i++) {
 125        cat_printed = false;
 126        for (elt = list; elt; elt = elt->next) {
 127            DeviceClass *dc = OBJECT_CLASS_CHECK(DeviceClass, elt->data,
 128                                                 TYPE_DEVICE);
 129            if ((i < DEVICE_CATEGORY_MAX
 130                 ? !test_bit(i, dc->categories)
 131                 : !bitmap_empty(dc->categories, DEVICE_CATEGORY_MAX))
 132                || (!show_no_user
 133                    && dc->cannot_instantiate_with_device_add_yet)) {
 134                continue;
 135            }
 136            if (!cat_printed) {
 137                error_printf("%s%s devices:\n", i ? "\n" : "",
 138                             cat_name[i]);
 139                cat_printed = true;
 140            }
 141            qdev_print_devinfo(dc);
 142        }
 143    }
 144
 145    g_slist_free(list);
 146}
 147
 148static int set_property(void *opaque, const char *name, const char *value,
 149                        Error **errp)
 150{
 151    Object *obj = opaque;
 152    Error *err = NULL;
 153
 154    if (strcmp(name, "driver") == 0)
 155        return 0;
 156    if (strcmp(name, "bus") == 0)
 157        return 0;
 158
 159    object_property_parse(obj, value, name, &err);
 160    if (err != NULL) {
 161        error_propagate(errp, err);
 162        return -1;
 163    }
 164    return 0;
 165}
 166
 167static const char *find_typename_by_alias(const char *alias)
 168{
 169    int i;
 170
 171    for (i = 0; qdev_alias_table[i].alias; i++) {
 172        if (qdev_alias_table[i].arch_mask &&
 173            !(qdev_alias_table[i].arch_mask & arch_type)) {
 174            continue;
 175        }
 176
 177        if (strcmp(qdev_alias_table[i].alias, alias) == 0) {
 178            return qdev_alias_table[i].typename;
 179        }
 180    }
 181
 182    return NULL;
 183}
 184
 185static DeviceClass *qdev_get_device_class(const char **driver, Error **errp)
 186{
 187    ObjectClass *oc;
 188    DeviceClass *dc;
 189
 190    oc = object_class_by_name(*driver);
 191    if (!oc) {
 192        const char *typename = find_typename_by_alias(*driver);
 193
 194        if (typename) {
 195            *driver = typename;
 196            oc = object_class_by_name(*driver);
 197        }
 198    }
 199
 200    if (!object_class_dynamic_cast(oc, TYPE_DEVICE)) {
 201        error_setg(errp, "'%s' is not a valid device model name", *driver);
 202        return NULL;
 203    }
 204
 205    if (object_class_is_abstract(oc)) {
 206        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "driver",
 207                   "non-abstract device type");
 208        return NULL;
 209    }
 210
 211    dc = DEVICE_CLASS(oc);
 212    if (dc->cannot_instantiate_with_device_add_yet ||
 213        (qdev_hotplug && !dc->hotpluggable)) {
 214        error_setg(errp, QERR_INVALID_PARAMETER_VALUE, "driver",
 215                   "pluggable device type");
 216        return NULL;
 217    }
 218
 219    return dc;
 220}
 221
 222
 223int qdev_device_help(QemuOpts *opts)
 224{
 225    Error *local_err = NULL;
 226    const char *driver;
 227    DevicePropertyInfoList *prop_list;
 228    DevicePropertyInfoList *prop;
 229
 230    driver = qemu_opt_get(opts, "driver");
 231    if (driver && is_help_option(driver)) {
 232        qdev_print_devinfos(false);
 233        return 1;
 234    }
 235
 236    if (!driver || !qemu_opt_has_help_opt(opts)) {
 237        return 0;
 238    }
 239
 240    qdev_get_device_class(&driver, &local_err);
 241    if (local_err) {
 242        goto error;
 243    }
 244
 245    prop_list = qmp_device_list_properties(driver, &local_err);
 246    if (local_err) {
 247        goto error;
 248    }
 249
 250    for (prop = prop_list; prop; prop = prop->next) {
 251        error_printf("%s.%s=%s", driver,
 252                     prop->value->name,
 253                     prop->value->type);
 254        if (prop->value->has_description) {
 255            error_printf(" (%s)\n", prop->value->description);
 256        } else {
 257            error_printf("\n");
 258        }
 259    }
 260
 261    qapi_free_DevicePropertyInfoList(prop_list);
 262    return 1;
 263
 264error:
 265    error_printf("%s\n", error_get_pretty(local_err));
 266    error_free(local_err);
 267    return 1;
 268}
 269
 270static Object *qdev_get_peripheral(void)
 271{
 272    static Object *dev;
 273
 274    if (dev == NULL) {
 275        dev = container_get(qdev_get_machine(), "/peripheral");
 276    }
 277
 278    return dev;
 279}
 280
 281static Object *qdev_get_peripheral_anon(void)
 282{
 283    static Object *dev;
 284
 285    if (dev == NULL) {
 286        dev = container_get(qdev_get_machine(), "/peripheral-anon");
 287    }
 288
 289    return dev;
 290}
 291
 292#if 0 /* conversion from qerror_report() to error_set() broke their use */
 293static void qbus_list_bus(DeviceState *dev)
 294{
 295    BusState *child;
 296    const char *sep = " ";
 297
 298    error_printf("child buses at \"%s\":",
 299                 dev->id ? dev->id : object_get_typename(OBJECT(dev)));
 300    QLIST_FOREACH(child, &dev->child_bus, sibling) {
 301        error_printf("%s\"%s\"", sep, child->name);
 302        sep = ", ";
 303    }
 304    error_printf("\n");
 305}
 306
 307static void qbus_list_dev(BusState *bus)
 308{
 309    BusChild *kid;
 310    const char *sep = " ";
 311
 312    error_printf("devices at \"%s\":", bus->name);
 313    QTAILQ_FOREACH(kid, &bus->children, sibling) {
 314        DeviceState *dev = kid->child;
 315        error_printf("%s\"%s\"", sep, object_get_typename(OBJECT(dev)));
 316        if (dev->id)
 317            error_printf("/\"%s\"", dev->id);
 318        sep = ", ";
 319    }
 320    error_printf("\n");
 321}
 322#endif
 323
 324static BusState *qbus_find_bus(DeviceState *dev, char *elem)
 325{
 326    BusState *child;
 327
 328    QLIST_FOREACH(child, &dev->child_bus, sibling) {
 329        if (strcmp(child->name, elem) == 0) {
 330            return child;
 331        }
 332    }
 333    return NULL;
 334}
 335
 336static DeviceState *qbus_find_dev(BusState *bus, char *elem)
 337{
 338    BusChild *kid;
 339
 340    /*
 341     * try to match in order:
 342     *   (1) instance id, if present
 343     *   (2) driver name
 344     *   (3) driver alias, if present
 345     */
 346    QTAILQ_FOREACH(kid, &bus->children, sibling) {
 347        DeviceState *dev = kid->child;
 348        if (dev->id  &&  strcmp(dev->id, elem) == 0) {
 349            return dev;
 350        }
 351    }
 352    QTAILQ_FOREACH(kid, &bus->children, sibling) {
 353        DeviceState *dev = kid->child;
 354        if (strcmp(object_get_typename(OBJECT(dev)), elem) == 0) {
 355            return dev;
 356        }
 357    }
 358    QTAILQ_FOREACH(kid, &bus->children, sibling) {
 359        DeviceState *dev = kid->child;
 360        DeviceClass *dc = DEVICE_GET_CLASS(dev);
 361
 362        if (qdev_class_has_alias(dc) &&
 363            strcmp(qdev_class_get_alias(dc), elem) == 0) {
 364            return dev;
 365        }
 366    }
 367    return NULL;
 368}
 369
 370static inline bool qbus_is_full(BusState *bus)
 371{
 372    BusClass *bus_class = BUS_GET_CLASS(bus);
 373    return bus_class->max_dev && bus->max_index >= bus_class->max_dev;
 374}
 375
 376/*
 377 * Search the tree rooted at @bus for a bus.
 378 * If @name, search for a bus with that name.  Note that bus names
 379 * need not be unique.  Yes, that's screwed up.
 380 * Else search for a bus that is a subtype of @bus_typename.
 381 * If more than one exists, prefer one that can take another device.
 382 * Return the bus if found, else %NULL.
 383 */
 384static BusState *qbus_find_recursive(BusState *bus, const char *name,
 385                                     const char *bus_typename)
 386{
 387    BusChild *kid;
 388    BusState *pick, *child, *ret;
 389    bool match;
 390
 391    assert(name || bus_typename);
 392    if (name) {
 393        match = !strcmp(bus->name, name);
 394    } else {
 395        match = !!object_dynamic_cast(OBJECT(bus), bus_typename);
 396    }
 397
 398    if (match && !qbus_is_full(bus)) {
 399        return bus;             /* root matches and isn't full */
 400    }
 401
 402    pick = match ? bus : NULL;
 403
 404    QTAILQ_FOREACH(kid, &bus->children, sibling) {
 405        DeviceState *dev = kid->child;
 406        QLIST_FOREACH(child, &dev->child_bus, sibling) {
 407            ret = qbus_find_recursive(child, name, bus_typename);
 408            if (ret && !qbus_is_full(ret)) {
 409                return ret;     /* a descendant matches and isn't full */
 410            }
 411            if (ret && !pick) {
 412                pick = ret;
 413            }
 414        }
 415    }
 416
 417    /* root or a descendant matches, but is full */
 418    return pick;
 419}
 420
 421static BusState *qbus_find(const char *path, Error **errp)
 422{
 423    DeviceState *dev;
 424    BusState *bus;
 425    char elem[128];
 426    int pos, len;
 427
 428    /* find start element */
 429    if (path[0] == '/') {
 430        bus = sysbus_get_default();
 431        pos = 0;
 432    } else {
 433        if (sscanf(path, "%127[^/]%n", elem, &len) != 1) {
 434            assert(!path[0]);
 435            elem[0] = len = 0;
 436        }
 437        bus = qbus_find_recursive(sysbus_get_default(), elem, NULL);
 438        if (!bus) {
 439            error_setg(errp, "Bus '%s' not found", elem);
 440            return NULL;
 441        }
 442        pos = len;
 443    }
 444
 445    for (;;) {
 446        assert(path[pos] == '/' || !path[pos]);
 447        while (path[pos] == '/') {
 448            pos++;
 449        }
 450        if (path[pos] == '\0') {
 451            break;
 452        }
 453
 454        /* find device */
 455        if (sscanf(path+pos, "%127[^/]%n", elem, &len) != 1) {
 456            g_assert_not_reached();
 457            elem[0] = len = 0;
 458        }
 459        pos += len;
 460        dev = qbus_find_dev(bus, elem);
 461        if (!dev) {
 462            error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND,
 463                      "Device '%s' not found", elem);
 464#if 0 /* conversion from qerror_report() to error_set() broke this: */
 465            if (!monitor_cur_is_qmp()) {
 466                qbus_list_dev(bus);
 467            }
 468#endif
 469            return NULL;
 470        }
 471
 472        assert(path[pos] == '/' || !path[pos]);
 473        while (path[pos] == '/') {
 474            pos++;
 475        }
 476        if (path[pos] == '\0') {
 477            /* last specified element is a device.  If it has exactly
 478             * one child bus accept it nevertheless */
 479            if (dev->num_child_bus == 1) {
 480                bus = QLIST_FIRST(&dev->child_bus);
 481                break;
 482            }
 483            if (dev->num_child_bus) {
 484                error_setg(errp, "Device '%s' has multiple child buses",
 485                           elem);
 486#if 0 /* conversion from qerror_report() to error_set() broke this: */
 487                if (!monitor_cur_is_qmp()) {
 488                    qbus_list_bus(dev);
 489                }
 490#endif
 491            } else {
 492                error_setg(errp, "Device '%s' has no child bus", elem);
 493            }
 494            return NULL;
 495        }
 496
 497        /* find bus */
 498        if (sscanf(path+pos, "%127[^/]%n", elem, &len) != 1) {
 499            g_assert_not_reached();
 500            elem[0] = len = 0;
 501        }
 502        pos += len;
 503        bus = qbus_find_bus(dev, elem);
 504        if (!bus) {
 505            error_setg(errp, "Bus '%s' not found", elem);
 506#if 0 /* conversion from qerror_report() to error_set() broke this: */
 507            if (!monitor_cur_is_qmp()) {
 508                qbus_list_bus(dev);
 509            }
 510#endif
 511            return NULL;
 512        }
 513    }
 514
 515    if (qbus_is_full(bus)) {
 516        error_setg(errp, "Bus '%s' is full", path);
 517        return NULL;
 518    }
 519    return bus;
 520}
 521
 522DeviceState *qdev_device_add(QemuOpts *opts, Error **errp)
 523{
 524    DeviceClass *dc;
 525    const char *driver, *path, *id;
 526    DeviceState *dev;
 527    BusState *bus = NULL;
 528    Error *err = NULL;
 529
 530    driver = qemu_opt_get(opts, "driver");
 531    if (!driver) {
 532        error_setg(errp, QERR_MISSING_PARAMETER, "driver");
 533        return NULL;
 534    }
 535
 536    /* find driver */
 537    dc = qdev_get_device_class(&driver, errp);
 538    if (!dc) {
 539        return NULL;
 540    }
 541
 542    /* find bus */
 543    path = qemu_opt_get(opts, "bus");
 544    if (path != NULL) {
 545        bus = qbus_find(path, errp);
 546        if (!bus) {
 547            return NULL;
 548        }
 549        if (!object_dynamic_cast(OBJECT(bus), dc->bus_type)) {
 550            error_setg(errp, "Device '%s' can't go on %s bus",
 551                       driver, object_get_typename(OBJECT(bus)));
 552            return NULL;
 553        }
 554    } else if (dc->bus_type != NULL) {
 555        bus = qbus_find_recursive(sysbus_get_default(), NULL, dc->bus_type);
 556        if (!bus || qbus_is_full(bus)) {
 557            error_setg(errp, "No '%s' bus found for device '%s'",
 558                       dc->bus_type, driver);
 559            return NULL;
 560        }
 561    }
 562    if (qdev_hotplug && bus && !qbus_is_hotpluggable(bus)) {
 563        error_setg(errp, QERR_BUS_NO_HOTPLUG, bus->name);
 564        return NULL;
 565    }
 566
 567    /* create device */
 568    dev = DEVICE(object_new(driver));
 569
 570    if (bus) {
 571        qdev_set_parent_bus(dev, bus);
 572    }
 573
 574    id = qemu_opts_id(opts);
 575    if (id) {
 576        dev->id = id;
 577    }
 578
 579    if (dev->id) {
 580        object_property_add_child(qdev_get_peripheral(), dev->id,
 581                                  OBJECT(dev), NULL);
 582    } else {
 583        static int anon_count;
 584        gchar *name = g_strdup_printf("device[%d]", anon_count++);
 585        object_property_add_child(qdev_get_peripheral_anon(), name,
 586                                  OBJECT(dev), NULL);
 587        g_free(name);
 588    }
 589
 590    /* set properties */
 591    if (qemu_opt_foreach(opts, set_property, dev, &err)) {
 592        error_propagate(errp, err);
 593        object_unparent(OBJECT(dev));
 594        object_unref(OBJECT(dev));
 595        return NULL;
 596    }
 597
 598    dev->opts = opts;
 599    object_property_set_bool(OBJECT(dev), true, "realized", &err);
 600    if (err != NULL) {
 601        error_propagate(errp, err);
 602        dev->opts = NULL;
 603        object_unparent(OBJECT(dev));
 604        object_unref(OBJECT(dev));
 605        return NULL;
 606    }
 607    return dev;
 608}
 609
 610
 611#define qdev_printf(fmt, ...) monitor_printf(mon, "%*s" fmt, indent, "", ## __VA_ARGS__)
 612static void qbus_print(Monitor *mon, BusState *bus, int indent);
 613
 614static void qdev_print_props(Monitor *mon, DeviceState *dev, Property *props,
 615                             int indent)
 616{
 617    if (!props)
 618        return;
 619    for (; props->name; props++) {
 620        Error *err = NULL;
 621        char *value;
 622        char *legacy_name = g_strdup_printf("legacy-%s", props->name);
 623        if (object_property_get_type(OBJECT(dev), legacy_name, NULL)) {
 624            value = object_property_get_str(OBJECT(dev), legacy_name, &err);
 625        } else {
 626            value = object_property_print(OBJECT(dev), props->name, true, &err);
 627        }
 628        g_free(legacy_name);
 629
 630        if (err) {
 631            error_free(err);
 632            continue;
 633        }
 634        qdev_printf("%s = %s\n", props->name,
 635                    value && *value ? value : "<null>");
 636        g_free(value);
 637    }
 638}
 639
 640static void bus_print_dev(BusState *bus, Monitor *mon, DeviceState *dev, int indent)
 641{
 642    BusClass *bc = BUS_GET_CLASS(bus);
 643
 644    if (bc->print_dev) {
 645        bc->print_dev(mon, dev, indent);
 646    }
 647}
 648
 649static void qdev_print(Monitor *mon, DeviceState *dev, int indent)
 650{
 651    ObjectClass *class;
 652    BusState *child;
 653    NamedGPIOList *ngl;
 654
 655    qdev_printf("dev: %s, id \"%s\"\n", object_get_typename(OBJECT(dev)),
 656                dev->id ? dev->id : "");
 657    indent += 2;
 658    QLIST_FOREACH(ngl, &dev->gpios, node) {
 659        if (ngl->num_in) {
 660            qdev_printf("gpio-in \"%s\" %d\n", ngl->name ? ngl->name : "",
 661                        ngl->num_in);
 662        }
 663        if (ngl->num_out) {
 664            qdev_printf("gpio-out \"%s\" %d\n", ngl->name ? ngl->name : "",
 665                        ngl->num_out);
 666        }
 667    }
 668    class = object_get_class(OBJECT(dev));
 669    do {
 670        qdev_print_props(mon, dev, DEVICE_CLASS(class)->props, indent);
 671        class = object_class_get_parent(class);
 672    } while (class != object_class_by_name(TYPE_DEVICE));
 673    bus_print_dev(dev->parent_bus, mon, dev, indent);
 674    QLIST_FOREACH(child, &dev->child_bus, sibling) {
 675        qbus_print(mon, child, indent);
 676    }
 677}
 678
 679static void qbus_print(Monitor *mon, BusState *bus, int indent)
 680{
 681    BusChild *kid;
 682
 683    qdev_printf("bus: %s\n", bus->name);
 684    indent += 2;
 685    qdev_printf("type %s\n", object_get_typename(OBJECT(bus)));
 686    QTAILQ_FOREACH(kid, &bus->children, sibling) {
 687        DeviceState *dev = kid->child;
 688        qdev_print(mon, dev, indent);
 689    }
 690}
 691#undef qdev_printf
 692
 693void hmp_info_qtree(Monitor *mon, const QDict *qdict)
 694{
 695    if (sysbus_get_default())
 696        qbus_print(mon, sysbus_get_default(), 0);
 697}
 698
 699void hmp_info_qdm(Monitor *mon, const QDict *qdict)
 700{
 701    qdev_print_devinfos(true);
 702}
 703
 704typedef struct QOMCompositionState {
 705    Monitor *mon;
 706    int indent;
 707} QOMCompositionState;
 708
 709static void print_qom_composition(Monitor *mon, Object *obj, int indent);
 710
 711static int print_qom_composition_child(Object *obj, void *opaque)
 712{
 713    QOMCompositionState *s = opaque;
 714
 715    print_qom_composition(s->mon, obj, s->indent);
 716
 717    return 0;
 718}
 719
 720static void print_qom_composition(Monitor *mon, Object *obj, int indent)
 721{
 722    QOMCompositionState s = {
 723        .mon = mon,
 724        .indent = indent + 2,
 725    };
 726    char *name;
 727
 728    if (obj == object_get_root()) {
 729        name = g_strdup("");
 730    } else {
 731        name = object_get_canonical_path_component(obj);
 732    }
 733    monitor_printf(mon, "%*s/%s (%s)\n", indent, "", name,
 734                   object_get_typename(obj));
 735    g_free(name);
 736    object_child_foreach(obj, print_qom_composition_child, &s);
 737}
 738
 739void hmp_info_qom_tree(Monitor *mon, const QDict *dict)
 740{
 741    const char *path = qdict_get_try_str(dict, "path");
 742    Object *obj;
 743    bool ambiguous = false;
 744
 745    if (path) {
 746        obj = object_resolve_path(path, &ambiguous);
 747        if (!obj) {
 748            monitor_printf(mon, "Path '%s' could not be resolved.\n", path);
 749            return;
 750        }
 751        if (ambiguous) {
 752            monitor_printf(mon, "Warning: Path '%s' is ambiguous.\n", path);
 753            return;
 754        }
 755    } else {
 756        obj = qdev_get_machine();
 757    }
 758    print_qom_composition(mon, obj, 0);
 759}
 760
 761void qmp_device_add(QDict *qdict, QObject **ret_data, Error **errp)
 762{
 763    Error *local_err = NULL;
 764    QemuOpts *opts;
 765    DeviceState *dev;
 766
 767    opts = qemu_opts_from_qdict(qemu_find_opts("device"), qdict, &local_err);
 768    if (local_err) {
 769        error_propagate(errp, local_err);
 770        return;
 771    }
 772    if (!monitor_cur_is_qmp() && qdev_device_help(opts)) {
 773        qemu_opts_del(opts);
 774        return;
 775    }
 776    dev = qdev_device_add(opts, &local_err);
 777    if (!dev) {
 778        error_propagate(errp, local_err);
 779        qemu_opts_del(opts);
 780        return;
 781    }
 782    object_unref(OBJECT(dev));
 783}
 784
 785void qmp_device_del(const char *id, Error **errp)
 786{
 787    Object *obj;
 788    char *root_path = object_get_canonical_path(qdev_get_peripheral());
 789    char *path = g_strdup_printf("%s/%s", root_path, id);
 790
 791    g_free(root_path);
 792    obj = object_resolve_path_type(path, TYPE_DEVICE, NULL);
 793    g_free(path);
 794
 795    if (!obj) {
 796        error_set(errp, ERROR_CLASS_DEVICE_NOT_FOUND,
 797                  "Device '%s' not found", id);
 798        return;
 799    }
 800
 801    qdev_unplug(DEVICE(obj), errp);
 802}
 803
 804void qdev_machine_init(void)
 805{
 806    qdev_get_peripheral_anon();
 807    qdev_get_peripheral();
 808}
 809
 810QemuOptsList qemu_device_opts = {
 811    .name = "device",
 812    .implied_opt_name = "driver",
 813    .head = QTAILQ_HEAD_INITIALIZER(qemu_device_opts.head),
 814    .desc = {
 815        /*
 816         * no elements => accept any
 817         * sanity checking will happen later
 818         * when setting device properties
 819         */
 820        { /* end of list */ }
 821    },
 822};
 823
 824QemuOptsList qemu_global_opts = {
 825    .name = "global",
 826    .head = QTAILQ_HEAD_INITIALIZER(qemu_global_opts.head),
 827    .desc = {
 828        {
 829            .name = "driver",
 830            .type = QEMU_OPT_STRING,
 831        },{
 832            .name = "property",
 833            .type = QEMU_OPT_STRING,
 834        },{
 835            .name = "value",
 836            .type = QEMU_OPT_STRING,
 837        },
 838        { /* end of list */ }
 839    },
 840};
 841
 842int qemu_global_option(const char *str)
 843{
 844    char driver[64], property[64];
 845    QemuOpts *opts;
 846    int rc, offset;
 847
 848    rc = sscanf(str, "%63[^.=].%63[^=]%n", driver, property, &offset);
 849    if (rc == 2 && str[offset] == '=') {
 850        opts = qemu_opts_create(&qemu_global_opts, NULL, 0, &error_abort);
 851        qemu_opt_set(opts, "driver", driver, &error_abort);
 852        qemu_opt_set(opts, "property", property, &error_abort);
 853        qemu_opt_set(opts, "value", str + offset + 1, &error_abort);
 854        return 0;
 855    }
 856
 857    opts = qemu_opts_parse_noisily(&qemu_global_opts, str, false);
 858    if (!opts) {
 859        return -1;
 860    }
 861
 862    return 0;
 863}
 864