qdev-monitor.c

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