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