]> rtime.felk.cvut.cz Git - lisovros/qemu_apohw.git/blob - qdev-monitor.c
dmg: drop broken bdrv_pread() loop
[lisovros/qemu_apohw.git] / 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 "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 "qemu/config-file.h"
27
28 /*
29  * Aliases were a bad idea from the start.  Let's keep them
30  * from spreading further.
31  */
32 typedef struct QDevAlias
33 {
34     const char *typename;
35     const char *alias;
36     uint32_t arch_mask;
37 } QDevAlias;
38
39 static const QDevAlias qdev_alias_table[] = {
40     { "virtio-blk-pci", "virtio-blk", QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
41     { "virtio-net-pci", "virtio-net", QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
42     { "virtio-serial-pci", "virtio-serial", QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
43     { "virtio-balloon-pci", "virtio-balloon",
44             QEMU_ARCH_ALL & ~QEMU_ARCH_S390X },
45     { "virtio-blk-s390", "virtio-blk", QEMU_ARCH_S390X },
46     { "virtio-net-s390", "virtio-net", QEMU_ARCH_S390X },
47     { "virtio-serial-s390", "virtio-serial", QEMU_ARCH_S390X },
48     { "lsi53c895a", "lsi" },
49     { "ich9-ahci", "ahci" },
50     { "kvm-pci-assign", "pci-assign" },
51     { }
52 };
53
54 static const char *qdev_class_get_alias(DeviceClass *dc)
55 {
56     const char *typename = object_class_get_name(OBJECT_CLASS(dc));
57     int i;
58
59     for (i = 0; qdev_alias_table[i].typename; i++) {
60         if (qdev_alias_table[i].arch_mask &&
61             !(qdev_alias_table[i].arch_mask & arch_type)) {
62             continue;
63         }
64
65         if (strcmp(qdev_alias_table[i].typename, typename) == 0) {
66             return qdev_alias_table[i].alias;
67         }
68     }
69
70     return NULL;
71 }
72
73 static bool qdev_class_has_alias(DeviceClass *dc)
74 {
75     return (qdev_class_get_alias(dc) != NULL);
76 }
77
78 static void qdev_print_devinfo(DeviceClass *dc)
79 {
80     error_printf("name \"%s\"", object_class_get_name(OBJECT_CLASS(dc)));
81     if (dc->bus_type) {
82         error_printf(", bus %s", dc->bus_type);
83     }
84     if (qdev_class_has_alias(dc)) {
85         error_printf(", alias \"%s\"", qdev_class_get_alias(dc));
86     }
87     if (dc->desc) {
88         error_printf(", desc \"%s\"", dc->desc);
89     }
90     if (dc->no_user) {
91         error_printf(", no-user");
92     }
93     error_printf("\n");
94 }
95
96 static gint devinfo_cmp(gconstpointer a, gconstpointer b)
97 {
98     return strcasecmp(object_class_get_name((ObjectClass *)a),
99                       object_class_get_name((ObjectClass *)b));
100 }
101
102 static void qdev_print_devinfos(bool show_no_user)
103 {
104     static const char *cat_name[DEVICE_CATEGORY_MAX + 1] = {
105         [DEVICE_CATEGORY_BRIDGE]  = "Controller/Bridge/Hub",
106         [DEVICE_CATEGORY_USB]     = "USB",
107         [DEVICE_CATEGORY_STORAGE] = "Storage",
108         [DEVICE_CATEGORY_NETWORK] = "Network",
109         [DEVICE_CATEGORY_INPUT]   = "Input",
110         [DEVICE_CATEGORY_DISPLAY] = "Display",
111         [DEVICE_CATEGORY_SOUND]   = "Sound",
112         [DEVICE_CATEGORY_MISC]    = "Misc",
113         [DEVICE_CATEGORY_MAX]     = "Uncategorized",
114     };
115     GSList *list, *elt;
116     int i;
117     bool cat_printed;
118
119     list = g_slist_sort(object_class_get_list(TYPE_DEVICE, false),
120                         devinfo_cmp);
121
122     for (i = 0; i <= DEVICE_CATEGORY_MAX; i++) {
123         cat_printed = false;
124         for (elt = list; elt; elt = elt->next) {
125             DeviceClass *dc = OBJECT_CLASS_CHECK(DeviceClass, elt->data,
126                                                  TYPE_DEVICE);
127             if ((i < DEVICE_CATEGORY_MAX
128                  ? !test_bit(i, dc->categories)
129                  : !bitmap_empty(dc->categories, DEVICE_CATEGORY_MAX))
130                 || (!show_no_user && dc->no_user)) {
131                 continue;
132             }
133             if (!cat_printed) {
134                 error_printf("%s%s devices:\n", i ? "\n" : "",
135                              cat_name[i]);
136                 cat_printed = true;
137             }
138             qdev_print_devinfo(dc);
139         }
140     }
141
142     g_slist_free(list);
143 }
144
145 static int set_property(const char *name, const char *value, void *opaque)
146 {
147     DeviceState *dev = opaque;
148     Error *err = NULL;
149
150     if (strcmp(name, "driver") == 0)
151         return 0;
152     if (strcmp(name, "bus") == 0)
153         return 0;
154
155     qdev_prop_parse(dev, name, value, &err);
156     if (err != NULL) {
157         qerror_report_err(err);
158         error_free(err);
159         return -1;
160     }
161     return 0;
162 }
163
164 static const char *find_typename_by_alias(const char *alias)
165 {
166     int i;
167
168     for (i = 0; qdev_alias_table[i].alias; i++) {
169         if (qdev_alias_table[i].arch_mask &&
170             !(qdev_alias_table[i].arch_mask & arch_type)) {
171             continue;
172         }
173
174         if (strcmp(qdev_alias_table[i].alias, alias) == 0) {
175             return qdev_alias_table[i].typename;
176         }
177     }
178
179     return NULL;
180 }
181
182 int qdev_device_help(QemuOpts *opts)
183 {
184     const char *driver;
185     Property *prop;
186     ObjectClass *klass;
187
188     driver = qemu_opt_get(opts, "driver");
189     if (driver && is_help_option(driver)) {
190         qdev_print_devinfos(false);
191         return 1;
192     }
193
194     if (!driver || !qemu_opt_has_help_opt(opts)) {
195         return 0;
196     }
197
198     klass = object_class_by_name(driver);
199     if (!klass) {
200         const char *typename = find_typename_by_alias(driver);
201
202         if (typename) {
203             driver = typename;
204             klass = object_class_by_name(driver);
205         }
206     }
207
208     if (!klass) {
209         return 0;
210     }
211     do {
212         for (prop = DEVICE_CLASS(klass)->props; prop && prop->name; prop++) {
213             /*
214              * TODO Properties without a parser are just for dirty hacks.
215              * qdev_prop_ptr is the only such PropertyInfo.  It's marked
216              * for removal.  This conditional should be removed along with
217              * it.
218              */
219             if (!prop->info->set) {
220                 continue;           /* no way to set it, don't show */
221             }
222             error_printf("%s.%s=%s\n", driver, prop->name,
223                          prop->info->legacy_name ?: prop->info->name);
224         }
225         klass = object_class_get_parent(klass);
226     } while (klass != object_class_by_name(TYPE_DEVICE));
227     return 1;
228 }
229
230 static Object *qdev_get_peripheral(void)
231 {
232     static Object *dev;
233
234     if (dev == NULL) {
235         dev = container_get(qdev_get_machine(), "/peripheral");
236     }
237
238     return dev;
239 }
240
241 static Object *qdev_get_peripheral_anon(void)
242 {
243     static Object *dev;
244
245     if (dev == NULL) {
246         dev = container_get(qdev_get_machine(), "/peripheral-anon");
247     }
248
249     return dev;
250 }
251
252 static void qbus_list_bus(DeviceState *dev)
253 {
254     BusState *child;
255     const char *sep = " ";
256
257     error_printf("child busses at \"%s\":",
258                  dev->id ? dev->id : object_get_typename(OBJECT(dev)));
259     QLIST_FOREACH(child, &dev->child_bus, sibling) {
260         error_printf("%s\"%s\"", sep, child->name);
261         sep = ", ";
262     }
263     error_printf("\n");
264 }
265
266 static void qbus_list_dev(BusState *bus)
267 {
268     BusChild *kid;
269     const char *sep = " ";
270
271     error_printf("devices at \"%s\":", bus->name);
272     QTAILQ_FOREACH(kid, &bus->children, sibling) {
273         DeviceState *dev = kid->child;
274         error_printf("%s\"%s\"", sep, object_get_typename(OBJECT(dev)));
275         if (dev->id)
276             error_printf("/\"%s\"", dev->id);
277         sep = ", ";
278     }
279     error_printf("\n");
280 }
281
282 static BusState *qbus_find_bus(DeviceState *dev, char *elem)
283 {
284     BusState *child;
285
286     QLIST_FOREACH(child, &dev->child_bus, sibling) {
287         if (strcmp(child->name, elem) == 0) {
288             return child;
289         }
290     }
291     return NULL;
292 }
293
294 static DeviceState *qbus_find_dev(BusState *bus, char *elem)
295 {
296     BusChild *kid;
297
298     /*
299      * try to match in order:
300      *   (1) instance id, if present
301      *   (2) driver name
302      *   (3) driver alias, if present
303      */
304     QTAILQ_FOREACH(kid, &bus->children, sibling) {
305         DeviceState *dev = kid->child;
306         if (dev->id  &&  strcmp(dev->id, elem) == 0) {
307             return dev;
308         }
309     }
310     QTAILQ_FOREACH(kid, &bus->children, sibling) {
311         DeviceState *dev = kid->child;
312         if (strcmp(object_get_typename(OBJECT(dev)), elem) == 0) {
313             return dev;
314         }
315     }
316     QTAILQ_FOREACH(kid, &bus->children, sibling) {
317         DeviceState *dev = kid->child;
318         DeviceClass *dc = DEVICE_GET_CLASS(dev);
319
320         if (qdev_class_has_alias(dc) &&
321             strcmp(qdev_class_get_alias(dc), elem) == 0) {
322             return dev;
323         }
324     }
325     return NULL;
326 }
327
328 static BusState *qbus_find_recursive(BusState *bus, const char *name,
329                                      const char *bus_typename)
330 {
331     BusClass *bus_class = BUS_GET_CLASS(bus);
332     BusChild *kid;
333     BusState *child, *ret;
334     int match = 1;
335
336     if (name && (strcmp(bus->name, name) != 0)) {
337         match = 0;
338     } else if (bus_typename && !object_dynamic_cast(OBJECT(bus), bus_typename)) {
339         match = 0;
340     } else if ((bus_class->max_dev != 0) && (bus_class->max_dev <= bus->max_index)) {
341         if (name != NULL) {
342             /* bus was explicitly specified: return an error. */
343             qerror_report(ERROR_CLASS_GENERIC_ERROR, "Bus '%s' is full",
344                           bus->name);
345             return NULL;
346         } else {
347             /* bus was not specified: try to find another one. */
348             match = 0;
349         }
350     }
351     if (match) {
352         return bus;
353     }
354
355     QTAILQ_FOREACH(kid, &bus->children, sibling) {
356         DeviceState *dev = kid->child;
357         QLIST_FOREACH(child, &dev->child_bus, sibling) {
358             ret = qbus_find_recursive(child, name, bus_typename);
359             if (ret) {
360                 return ret;
361             }
362         }
363     }
364     return NULL;
365 }
366
367 static BusState *qbus_find(const char *path)
368 {
369     DeviceState *dev;
370     BusState *bus;
371     char elem[128];
372     int pos, len;
373
374     /* find start element */
375     if (path[0] == '/') {
376         bus = sysbus_get_default();
377         pos = 0;
378     } else {
379         if (sscanf(path, "%127[^/]%n", elem, &len) != 1) {
380             assert(!path[0]);
381             elem[0] = len = 0;
382         }
383         bus = qbus_find_recursive(sysbus_get_default(), elem, NULL);
384         if (!bus) {
385             qerror_report(QERR_BUS_NOT_FOUND, elem);
386             return NULL;
387         }
388         pos = len;
389     }
390
391     for (;;) {
392         assert(path[pos] == '/' || !path[pos]);
393         while (path[pos] == '/') {
394             pos++;
395         }
396         if (path[pos] == '\0') {
397             return bus;
398         }
399
400         /* find device */
401         if (sscanf(path+pos, "%127[^/]%n", elem, &len) != 1) {
402             g_assert_not_reached();
403             elem[0] = len = 0;
404         }
405         pos += len;
406         dev = qbus_find_dev(bus, elem);
407         if (!dev) {
408             qerror_report(QERR_DEVICE_NOT_FOUND, elem);
409             if (!monitor_cur_is_qmp()) {
410                 qbus_list_dev(bus);
411             }
412             return NULL;
413         }
414
415         assert(path[pos] == '/' || !path[pos]);
416         while (path[pos] == '/') {
417             pos++;
418         }
419         if (path[pos] == '\0') {
420             /* last specified element is a device.  If it has exactly
421              * one child bus accept it nevertheless */
422             switch (dev->num_child_bus) {
423             case 0:
424                 qerror_report(QERR_DEVICE_NO_BUS, elem);
425                 return NULL;
426             case 1:
427                 return QLIST_FIRST(&dev->child_bus);
428             default:
429                 qerror_report(QERR_DEVICE_MULTIPLE_BUSSES, elem);
430                 if (!monitor_cur_is_qmp()) {
431                     qbus_list_bus(dev);
432                 }
433                 return NULL;
434             }
435         }
436
437         /* find bus */
438         if (sscanf(path+pos, "%127[^/]%n", elem, &len) != 1) {
439             g_assert_not_reached();
440             elem[0] = len = 0;
441         }
442         pos += len;
443         bus = qbus_find_bus(dev, elem);
444         if (!bus) {
445             qerror_report(QERR_BUS_NOT_FOUND, elem);
446             if (!monitor_cur_is_qmp()) {
447                 qbus_list_bus(dev);
448             }
449             return NULL;
450         }
451     }
452 }
453
454 DeviceState *qdev_device_add(QemuOpts *opts)
455 {
456     ObjectClass *oc;
457     DeviceClass *dc;
458     const char *driver, *path, *id;
459     DeviceState *dev;
460     BusState *bus = NULL;
461     Error *err = NULL;
462
463     driver = qemu_opt_get(opts, "driver");
464     if (!driver) {
465         qerror_report(QERR_MISSING_PARAMETER, "driver");
466         return NULL;
467     }
468
469     /* find driver */
470     oc = object_class_by_name(driver);
471     if (!oc) {
472         const char *typename = find_typename_by_alias(driver);
473
474         if (typename) {
475             driver = typename;
476             oc = object_class_by_name(driver);
477         }
478     }
479
480     if (!object_class_dynamic_cast(oc, TYPE_DEVICE)) {
481         qerror_report(QERR_INVALID_PARAMETER_VALUE, "driver", "device type");
482         return NULL;
483     }
484
485     if (object_class_is_abstract(oc)) {
486         qerror_report(QERR_INVALID_PARAMETER_VALUE, "driver",
487                       "non-abstract device type");
488         return NULL;
489     }
490
491     dc = DEVICE_CLASS(oc);
492
493     /* find bus */
494     path = qemu_opt_get(opts, "bus");
495     if (path != NULL) {
496         bus = qbus_find(path);
497         if (!bus) {
498             return NULL;
499         }
500         if (!object_dynamic_cast(OBJECT(bus), dc->bus_type)) {
501             qerror_report(QERR_BAD_BUS_FOR_DEVICE,
502                           driver, object_get_typename(OBJECT(bus)));
503             return NULL;
504         }
505     } else if (dc->bus_type != NULL) {
506         bus = qbus_find_recursive(sysbus_get_default(), NULL, dc->bus_type);
507         if (!bus) {
508             qerror_report(QERR_NO_BUS_FOR_DEVICE,
509                           dc->bus_type, driver);
510             return NULL;
511         }
512     }
513     if (qdev_hotplug && bus && !bus->allow_hotplug) {
514         qerror_report(QERR_BUS_NO_HOTPLUG, bus->name);
515         return NULL;
516     }
517
518     /* create device, set properties */
519     dev = DEVICE(object_new(driver));
520
521     if (bus) {
522         qdev_set_parent_bus(dev, bus);
523     }
524
525     id = qemu_opts_id(opts);
526     if (id) {
527         dev->id = id;
528     }
529     if (qemu_opt_foreach(opts, set_property, dev, 1) != 0) {
530         object_unparent(OBJECT(dev));
531         object_unref(OBJECT(dev));
532         return NULL;
533     }
534     if (dev->id) {
535         object_property_add_child(qdev_get_peripheral(), dev->id,
536                                   OBJECT(dev), NULL);
537     } else {
538         static int anon_count;
539         gchar *name = g_strdup_printf("device[%d]", anon_count++);
540         object_property_add_child(qdev_get_peripheral_anon(), name,
541                                   OBJECT(dev), NULL);
542         g_free(name);
543     }
544     object_property_set_bool(OBJECT(dev), true, "realized", &err);
545     if (err != NULL) {
546         qerror_report_err(err);
547         error_free(err);
548         object_unparent(OBJECT(dev));
549         object_unref(OBJECT(dev));
550         qerror_report(QERR_DEVICE_INIT_FAILED, driver);
551         return NULL;
552     }
553     dev->opts = opts;
554     return dev;
555 }
556
557
558 #define qdev_printf(fmt, ...) monitor_printf(mon, "%*s" fmt, indent, "", ## __VA_ARGS__)
559 static void qbus_print(Monitor *mon, BusState *bus, int indent);
560
561 static void qdev_print_props(Monitor *mon, DeviceState *dev, Property *props,
562                              int indent)
563 {
564     if (!props)
565         return;
566     for (; props->name; props++) {
567         Error *err = NULL;
568         char *value;
569         char *legacy_name = g_strdup_printf("legacy-%s", props->name);
570         if (object_property_get_type(OBJECT(dev), legacy_name, NULL)) {
571             value = object_property_get_str(OBJECT(dev), legacy_name, &err);
572         } else {
573             value = object_property_print(OBJECT(dev), props->name, &err);
574         }
575         g_free(legacy_name);
576
577         if (err) {
578             error_free(err);
579             continue;
580         }
581         qdev_printf("%s = %s\n", props->name,
582                     value && *value ? value : "<null>");
583         g_free(value);
584     }
585 }
586
587 static void bus_print_dev(BusState *bus, Monitor *mon, DeviceState *dev, int indent)
588 {
589     BusClass *bc = BUS_GET_CLASS(bus);
590
591     if (bc->print_dev) {
592         bc->print_dev(mon, dev, indent);
593     }
594 }
595
596 static void qdev_print(Monitor *mon, DeviceState *dev, int indent)
597 {
598     ObjectClass *class;
599     BusState *child;
600     qdev_printf("dev: %s, id \"%s\"\n", object_get_typename(OBJECT(dev)),
601                 dev->id ? dev->id : "");
602     indent += 2;
603     if (dev->num_gpio_in) {
604         qdev_printf("gpio-in %d\n", dev->num_gpio_in);
605     }
606     if (dev->num_gpio_out) {
607         qdev_printf("gpio-out %d\n", dev->num_gpio_out);
608     }
609     class = object_get_class(OBJECT(dev));
610     do {
611         qdev_print_props(mon, dev, DEVICE_CLASS(class)->props, indent);
612         class = object_class_get_parent(class);
613     } while (class != object_class_by_name(TYPE_DEVICE));
614     bus_print_dev(dev->parent_bus, mon, dev, indent);
615     QLIST_FOREACH(child, &dev->child_bus, sibling) {
616         qbus_print(mon, child, indent);
617     }
618 }
619
620 static void qbus_print(Monitor *mon, BusState *bus, int indent)
621 {
622     BusChild *kid;
623
624     qdev_printf("bus: %s\n", bus->name);
625     indent += 2;
626     qdev_printf("type %s\n", object_get_typename(OBJECT(bus)));
627     QTAILQ_FOREACH(kid, &bus->children, sibling) {
628         DeviceState *dev = kid->child;
629         qdev_print(mon, dev, indent);
630     }
631 }
632 #undef qdev_printf
633
634 void do_info_qtree(Monitor *mon, const QDict *qdict)
635 {
636     if (sysbus_get_default())
637         qbus_print(mon, sysbus_get_default(), 0);
638 }
639
640 void do_info_qdm(Monitor *mon, const QDict *qdict)
641 {
642     qdev_print_devinfos(true);
643 }
644
645 int do_device_add(Monitor *mon, const QDict *qdict, QObject **ret_data)
646 {
647     Error *local_err = NULL;
648     QemuOpts *opts;
649     DeviceState *dev;
650
651     opts = qemu_opts_from_qdict(qemu_find_opts("device"), qdict, &local_err);
652     if (error_is_set(&local_err)) {
653         qerror_report_err(local_err);
654         error_free(local_err);
655         return -1;
656     }
657     if (!monitor_cur_is_qmp() && qdev_device_help(opts)) {
658         qemu_opts_del(opts);
659         return 0;
660     }
661     dev = qdev_device_add(opts);
662     if (!dev) {
663         qemu_opts_del(opts);
664         return -1;
665     }
666     object_unref(OBJECT(dev));
667     return 0;
668 }
669
670 void qmp_device_del(const char *id, Error **errp)
671 {
672     DeviceState *dev;
673
674     dev = qdev_find_recursive(sysbus_get_default(), id);
675     if (NULL == dev) {
676         error_set(errp, QERR_DEVICE_NOT_FOUND, id);
677         return;
678     }
679
680     qdev_unplug(dev, errp);
681 }
682
683 void qdev_machine_init(void)
684 {
685     qdev_get_peripheral_anon();
686     qdev_get_peripheral();
687 }
688
689 QemuOptsList qemu_device_opts = {
690     .name = "device",
691     .implied_opt_name = "driver",
692     .head = QTAILQ_HEAD_INITIALIZER(qemu_device_opts.head),
693     .desc = {
694         /*
695          * no elements => accept any
696          * sanity checking will happen later
697          * when setting device properties
698          */
699         { /* end of list */ }
700     },
701 };
702
703 QemuOptsList qemu_global_opts = {
704     .name = "global",
705     .head = QTAILQ_HEAD_INITIALIZER(qemu_global_opts.head),
706     .desc = {
707         {
708             .name = "driver",
709             .type = QEMU_OPT_STRING,
710         },{
711             .name = "property",
712             .type = QEMU_OPT_STRING,
713         },{
714             .name = "value",
715             .type = QEMU_OPT_STRING,
716         },
717         { /* end of list */ }
718     },
719 };
720
721 int qemu_global_option(const char *str)
722 {
723     char driver[64], property[64];
724     QemuOpts *opts;
725     int rc, offset;
726
727     rc = sscanf(str, "%63[^.].%63[^=]%n", driver, property, &offset);
728     if (rc < 2 || str[offset] != '=') {
729         error_report("can't parse: \"%s\"", str);
730         return -1;
731     }
732
733     opts = qemu_opts_create_nofail(&qemu_global_opts);
734     qemu_opt_set(opts, "driver", driver);
735     qemu_opt_set(opts, "property", property);
736     qemu_opt_set(opts, "value", str+offset+1);
737     return 0;
738 }