xref: /openbmc/qemu/hw/block/xen-block.c (revision 650d103d)
1 /*
2  * Copyright (c) 2018  Citrix Systems Inc.
3  *
4  * This work is licensed under the terms of the GNU GPL, version 2 or later.
5  * See the COPYING file in the top-level directory.
6  */
7 
8 #include "qemu/osdep.h"
9 #include "qemu/cutils.h"
10 #include "qemu/module.h"
11 #include "qemu/option.h"
12 #include "qapi/error.h"
13 #include "qapi/qapi-commands-block-core.h"
14 #include "qapi/qapi-commands-qom.h"
15 #include "qapi/qapi-visit-block-core.h"
16 #include "qapi/qobject-input-visitor.h"
17 #include "qapi/visitor.h"
18 #include "qapi/qmp/qdict.h"
19 #include "qapi/qmp/qstring.h"
20 #include "hw/xen/xen_common.h"
21 #include "hw/block/xen_blkif.h"
22 #include "hw/xen/xen-block.h"
23 #include "hw/xen/xen-backend.h"
24 #include "sysemu/blockdev.h"
25 #include "sysemu/block-backend.h"
26 #include "sysemu/iothread.h"
27 #include "dataplane/xen-block.h"
28 #include "trace.h"
29 
30 static char *xen_block_get_name(XenDevice *xendev, Error **errp)
31 {
32     XenBlockDevice *blockdev = XEN_BLOCK_DEVICE(xendev);
33     XenBlockVdev *vdev = &blockdev->props.vdev;
34 
35     return g_strdup_printf("%lu", vdev->number);
36 }
37 
38 static void xen_block_disconnect(XenDevice *xendev, Error **errp)
39 {
40     XenBlockDevice *blockdev = XEN_BLOCK_DEVICE(xendev);
41     const char *type = object_get_typename(OBJECT(blockdev));
42     XenBlockVdev *vdev = &blockdev->props.vdev;
43 
44     trace_xen_block_disconnect(type, vdev->disk, vdev->partition);
45 
46     xen_block_dataplane_stop(blockdev->dataplane);
47 }
48 
49 static void xen_block_connect(XenDevice *xendev, Error **errp)
50 {
51     XenBlockDevice *blockdev = XEN_BLOCK_DEVICE(xendev);
52     const char *type = object_get_typename(OBJECT(blockdev));
53     XenBlockVdev *vdev = &blockdev->props.vdev;
54     BlockConf *conf = &blockdev->props.conf;
55     unsigned int feature_large_sector_size;
56     unsigned int order, nr_ring_ref, *ring_ref, event_channel, protocol;
57     char *str;
58 
59     trace_xen_block_connect(type, vdev->disk, vdev->partition);
60 
61     if (xen_device_frontend_scanf(xendev, "feature-large-sector-size", "%u",
62                                   &feature_large_sector_size) != 1) {
63         feature_large_sector_size = 0;
64     }
65 
66     if (feature_large_sector_size != 1 &&
67         conf->logical_block_size != XEN_BLKIF_SECTOR_SIZE) {
68         error_setg(errp, "logical_block_size != %u not supported by frontend",
69                    XEN_BLKIF_SECTOR_SIZE);
70         return;
71     }
72 
73     if (xen_device_frontend_scanf(xendev, "ring-page-order", "%u",
74                                   &order) != 1) {
75         nr_ring_ref = 1;
76         ring_ref = g_new(unsigned int, nr_ring_ref);
77 
78         if (xen_device_frontend_scanf(xendev, "ring-ref", "%u",
79                                       &ring_ref[0]) != 1) {
80             error_setg(errp, "failed to read ring-ref");
81             g_free(ring_ref);
82             return;
83         }
84     } else if (order <= blockdev->props.max_ring_page_order) {
85         unsigned int i;
86 
87         nr_ring_ref = 1 << order;
88         ring_ref = g_new(unsigned int, nr_ring_ref);
89 
90         for (i = 0; i < nr_ring_ref; i++) {
91             const char *key = g_strdup_printf("ring-ref%u", i);
92 
93             if (xen_device_frontend_scanf(xendev, key, "%u",
94                                           &ring_ref[i]) != 1) {
95                 error_setg(errp, "failed to read %s", key);
96                 g_free((gpointer)key);
97                 g_free(ring_ref);
98                 return;
99             }
100 
101             g_free((gpointer)key);
102         }
103     } else {
104         error_setg(errp, "invalid ring-page-order (%d)", order);
105         return;
106     }
107 
108     if (xen_device_frontend_scanf(xendev, "event-channel", "%u",
109                                   &event_channel) != 1) {
110         error_setg(errp, "failed to read event-channel");
111         g_free(ring_ref);
112         return;
113     }
114 
115     if (xen_device_frontend_scanf(xendev, "protocol", "%ms",
116                                   &str) != 1) {
117         protocol = BLKIF_PROTOCOL_NATIVE;
118     } else {
119         if (strcmp(str, XEN_IO_PROTO_ABI_X86_32) == 0) {
120             protocol = BLKIF_PROTOCOL_X86_32;
121         } else if (strcmp(str, XEN_IO_PROTO_ABI_X86_64) == 0) {
122             protocol = BLKIF_PROTOCOL_X86_64;
123         } else {
124             protocol = BLKIF_PROTOCOL_NATIVE;
125         }
126 
127         free(str);
128     }
129 
130     xen_block_dataplane_start(blockdev->dataplane, ring_ref, nr_ring_ref,
131                               event_channel, protocol, errp);
132 
133     g_free(ring_ref);
134 }
135 
136 static void xen_block_unrealize(XenDevice *xendev, Error **errp)
137 {
138     XenBlockDevice *blockdev = XEN_BLOCK_DEVICE(xendev);
139     XenBlockDeviceClass *blockdev_class =
140         XEN_BLOCK_DEVICE_GET_CLASS(xendev);
141     const char *type = object_get_typename(OBJECT(blockdev));
142     XenBlockVdev *vdev = &blockdev->props.vdev;
143 
144     if (vdev->type == XEN_BLOCK_VDEV_TYPE_INVALID) {
145         return;
146     }
147 
148     trace_xen_block_unrealize(type, vdev->disk, vdev->partition);
149 
150     /* Disconnect from the frontend in case this has not already happened */
151     xen_block_disconnect(xendev, NULL);
152 
153     xen_block_dataplane_destroy(blockdev->dataplane);
154     blockdev->dataplane = NULL;
155 
156     if (blockdev_class->unrealize) {
157         blockdev_class->unrealize(blockdev, errp);
158     }
159 }
160 
161 static void xen_block_set_size(XenBlockDevice *blockdev)
162 {
163     const char *type = object_get_typename(OBJECT(blockdev));
164     XenBlockVdev *vdev = &blockdev->props.vdev;
165     BlockConf *conf = &blockdev->props.conf;
166     int64_t sectors = blk_getlength(conf->blk) / conf->logical_block_size;
167     XenDevice *xendev = XEN_DEVICE(blockdev);
168 
169     trace_xen_block_size(type, vdev->disk, vdev->partition, sectors);
170 
171     xen_device_backend_printf(xendev, "sectors", "%"PRIi64, sectors);
172 }
173 
174 static void xen_block_resize_cb(void *opaque)
175 {
176     XenBlockDevice *blockdev = opaque;
177     XenDevice *xendev = XEN_DEVICE(blockdev);
178     enum xenbus_state state = xen_device_backend_get_state(xendev);
179 
180     xen_block_set_size(blockdev);
181 
182     /*
183      * Mimic the behaviour of Linux xen-blkback and re-write the state
184      * to trigger the frontend watch.
185      */
186     xen_device_backend_printf(xendev, "state", "%u", state);
187 }
188 
189 static const BlockDevOps xen_block_dev_ops = {
190     .resize_cb = xen_block_resize_cb,
191 };
192 
193 static void xen_block_realize(XenDevice *xendev, Error **errp)
194 {
195     XenBlockDevice *blockdev = XEN_BLOCK_DEVICE(xendev);
196     XenBlockDeviceClass *blockdev_class =
197         XEN_BLOCK_DEVICE_GET_CLASS(xendev);
198     const char *type = object_get_typename(OBJECT(blockdev));
199     XenBlockVdev *vdev = &blockdev->props.vdev;
200     BlockConf *conf = &blockdev->props.conf;
201     BlockBackend *blk = conf->blk;
202     Error *local_err = NULL;
203 
204     if (vdev->type == XEN_BLOCK_VDEV_TYPE_INVALID) {
205         error_setg(errp, "vdev property not set");
206         return;
207     }
208 
209     trace_xen_block_realize(type, vdev->disk, vdev->partition);
210 
211     if (blockdev_class->realize) {
212         blockdev_class->realize(blockdev, &local_err);
213         if (local_err) {
214             error_propagate(errp, local_err);
215             return;
216         }
217     }
218 
219     /*
220      * The blkif protocol does not deal with removable media, so it must
221      * always be present, even for CDRom devices.
222      */
223     assert(blk);
224     if (!blk_is_inserted(blk)) {
225         error_setg(errp, "device needs media, but drive is empty");
226         return;
227     }
228 
229     if (!blkconf_apply_backend_options(conf, blockdev->info & VDISK_READONLY,
230                                        true, errp)) {
231         return;
232     }
233 
234     if (!(blockdev->info & VDISK_CDROM) &&
235         !blkconf_geometry(conf, NULL, 65535, 255, 255, errp)) {
236         return;
237     }
238 
239     blkconf_blocksizes(conf);
240 
241     if (conf->logical_block_size > conf->physical_block_size) {
242         error_setg(
243             errp, "logical_block_size > physical_block_size not supported");
244         return;
245     }
246 
247     blk_set_dev_ops(blk, &xen_block_dev_ops, blockdev);
248     blk_set_guest_block_size(blk, conf->logical_block_size);
249 
250     if (conf->discard_granularity == -1) {
251         conf->discard_granularity = conf->physical_block_size;
252     }
253 
254     if (blk_get_flags(blk) & BDRV_O_UNMAP) {
255         xen_device_backend_printf(xendev, "feature-discard", "%u", 1);
256         xen_device_backend_printf(xendev, "discard-granularity", "%u",
257                                   conf->discard_granularity);
258     }
259 
260     xen_device_backend_printf(xendev, "feature-flush-cache", "%u", 1);
261     xen_device_backend_printf(xendev, "max-ring-page-order", "%u",
262                               blockdev->props.max_ring_page_order);
263     xen_device_backend_printf(xendev, "info", "%u", blockdev->info);
264 
265     xen_device_frontend_printf(xendev, "virtual-device", "%lu",
266                                vdev->number);
267     xen_device_frontend_printf(xendev, "device-type", "%s",
268                                blockdev->device_type);
269 
270     xen_device_backend_printf(xendev, "sector-size", "%u",
271                               conf->logical_block_size);
272 
273     xen_block_set_size(blockdev);
274 
275     blockdev->dataplane =
276         xen_block_dataplane_create(xendev, blk, conf->logical_block_size,
277                                    blockdev->props.iothread);
278 }
279 
280 static void xen_block_frontend_changed(XenDevice *xendev,
281                                        enum xenbus_state frontend_state,
282                                        Error **errp)
283 {
284     enum xenbus_state backend_state = xen_device_backend_get_state(xendev);
285     Error *local_err = NULL;
286 
287     switch (frontend_state) {
288     case XenbusStateInitialised:
289     case XenbusStateConnected:
290         if (backend_state == XenbusStateConnected) {
291             break;
292         }
293 
294         xen_block_disconnect(xendev, &local_err);
295         if (local_err) {
296             error_propagate(errp, local_err);
297             break;
298         }
299 
300         xen_block_connect(xendev, &local_err);
301         if (local_err) {
302             error_propagate(errp, local_err);
303             break;
304         }
305 
306         xen_device_backend_set_state(xendev, XenbusStateConnected);
307         break;
308 
309     case XenbusStateClosing:
310         xen_device_backend_set_state(xendev, XenbusStateClosing);
311         break;
312 
313     case XenbusStateClosed:
314         xen_block_disconnect(xendev, &local_err);
315         if (local_err) {
316             error_propagate(errp, local_err);
317             break;
318         }
319 
320         xen_device_backend_set_state(xendev, XenbusStateClosed);
321         break;
322 
323     default:
324         break;
325     }
326 }
327 
328 static char *disk_to_vbd_name(unsigned int disk)
329 {
330     char *name, *prefix = (disk >= 26) ?
331         disk_to_vbd_name((disk / 26) - 1) : g_strdup("");
332 
333     name = g_strdup_printf("%s%c", prefix, 'a' + disk % 26);
334     g_free(prefix);
335 
336     return name;
337 }
338 
339 static void xen_block_get_vdev(Object *obj, Visitor *v, const char *name,
340                                void *opaque, Error **errp)
341 {
342     DeviceState *dev = DEVICE(obj);
343     Property *prop = opaque;
344     XenBlockVdev *vdev = qdev_get_prop_ptr(dev, prop);
345     char *str;
346 
347     switch (vdev->type) {
348     case XEN_BLOCK_VDEV_TYPE_DP:
349         str = g_strdup_printf("d%lup%lu", vdev->disk, vdev->partition);
350         break;
351 
352     case XEN_BLOCK_VDEV_TYPE_XVD:
353     case XEN_BLOCK_VDEV_TYPE_HD:
354     case XEN_BLOCK_VDEV_TYPE_SD: {
355         char *name = disk_to_vbd_name(vdev->disk);
356 
357         str = g_strdup_printf("%s%s%lu",
358                               (vdev->type == XEN_BLOCK_VDEV_TYPE_XVD) ?
359                               "xvd" :
360                               (vdev->type == XEN_BLOCK_VDEV_TYPE_HD) ?
361                               "hd" :
362                               "sd",
363                               name, vdev->partition);
364         g_free(name);
365         break;
366     }
367     default:
368         error_setg(errp, "invalid vdev type");
369         return;
370     }
371 
372     visit_type_str(v, name, &str, errp);
373     g_free(str);
374 }
375 
376 static int vbd_name_to_disk(const char *name, const char **endp,
377                             unsigned long *disk)
378 {
379     unsigned int n = 0;
380 
381     while (*name != '\0') {
382         if (!g_ascii_isalpha(*name) || !g_ascii_islower(*name)) {
383             break;
384         }
385 
386         n *= 26;
387         n += *name++ - 'a' + 1;
388     }
389     *endp = name;
390 
391     if (!n) {
392         return -1;
393     }
394 
395     *disk = n - 1;
396 
397     return 0;
398 }
399 
400 static void xen_block_set_vdev(Object *obj, Visitor *v, const char *name,
401                                void *opaque, Error **errp)
402 {
403     DeviceState *dev = DEVICE(obj);
404     Property *prop = opaque;
405     XenBlockVdev *vdev = qdev_get_prop_ptr(dev, prop);
406     Error *local_err = NULL;
407     char *str, *p;
408     const char *end;
409 
410     if (dev->realized) {
411         qdev_prop_set_after_realize(dev, name, errp);
412         return;
413     }
414 
415     visit_type_str(v, name, &str, &local_err);
416     if (local_err) {
417         error_propagate(errp, local_err);
418         return;
419     }
420 
421     p = strchr(str, 'd');
422     if (!p) {
423         goto invalid;
424     }
425 
426     *p++ = '\0';
427     if (*str == '\0') {
428         vdev->type = XEN_BLOCK_VDEV_TYPE_DP;
429     } else if (strcmp(str, "xv") == 0) {
430         vdev->type = XEN_BLOCK_VDEV_TYPE_XVD;
431     } else if (strcmp(str, "h") == 0) {
432         vdev->type = XEN_BLOCK_VDEV_TYPE_HD;
433     } else if (strcmp(str, "s") == 0) {
434         vdev->type = XEN_BLOCK_VDEV_TYPE_SD;
435     } else {
436         goto invalid;
437     }
438 
439     if (vdev->type == XEN_BLOCK_VDEV_TYPE_DP) {
440         if (qemu_strtoul(p, &end, 10, &vdev->disk)) {
441             goto invalid;
442         }
443 
444         if (*end == 'p') {
445             if (*(++end) == '\0') {
446                 goto invalid;
447             }
448         }
449     } else {
450         if (vbd_name_to_disk(p, &end, &vdev->disk)) {
451             goto invalid;
452         }
453     }
454 
455     if (*end != '\0') {
456         p = (char *)end;
457 
458         if (qemu_strtoul(p, &end, 10, &vdev->partition)) {
459             goto invalid;
460         }
461 
462         if (*end != '\0') {
463             goto invalid;
464         }
465     } else {
466         vdev->partition = 0;
467     }
468 
469     switch (vdev->type) {
470     case XEN_BLOCK_VDEV_TYPE_DP:
471     case XEN_BLOCK_VDEV_TYPE_XVD:
472         if (vdev->disk < (1 << 4) && vdev->partition < (1 << 4)) {
473             vdev->number = (202 << 8) | (vdev->disk << 4) |
474                 vdev->partition;
475         } else if (vdev->disk < (1 << 20) && vdev->partition < (1 << 8)) {
476             vdev->number = (1 << 28) | (vdev->disk << 8) |
477                 vdev->partition;
478         } else {
479             goto invalid;
480         }
481         break;
482 
483     case XEN_BLOCK_VDEV_TYPE_HD:
484         if ((vdev->disk == 0 || vdev->disk == 1) &&
485             vdev->partition < (1 << 6)) {
486             vdev->number = (3 << 8) | (vdev->disk << 6) | vdev->partition;
487         } else if ((vdev->disk == 2 || vdev->disk == 3) &&
488                    vdev->partition < (1 << 6)) {
489             vdev->number = (22 << 8) | ((vdev->disk - 2) << 6) |
490                 vdev->partition;
491         } else {
492             goto invalid;
493         }
494         break;
495 
496     case XEN_BLOCK_VDEV_TYPE_SD:
497         if (vdev->disk < (1 << 4) && vdev->partition < (1 << 4)) {
498             vdev->number = (8 << 8) | (vdev->disk << 4) | vdev->partition;
499         } else {
500             goto invalid;
501         }
502         break;
503 
504     default:
505         goto invalid;
506     }
507 
508     g_free(str);
509     return;
510 
511 invalid:
512     error_setg(errp, "invalid virtual disk specifier");
513 
514     vdev->type = XEN_BLOCK_VDEV_TYPE_INVALID;
515     g_free(str);
516 }
517 
518 /*
519  * This property deals with 'vdev' names adhering to the Xen VBD naming
520  * scheme described in:
521  *
522  * https://xenbits.xen.org/docs/unstable/man/xen-vbd-interface.7.html
523  */
524 const PropertyInfo xen_block_prop_vdev = {
525     .name  = "str",
526     .description = "Virtual Disk specifier: d*p*/xvd*/hd*/sd*",
527     .get = xen_block_get_vdev,
528     .set = xen_block_set_vdev,
529 };
530 
531 static Property xen_block_props[] = {
532     DEFINE_PROP("vdev", XenBlockDevice, props.vdev,
533                 xen_block_prop_vdev, XenBlockVdev),
534     DEFINE_BLOCK_PROPERTIES(XenBlockDevice, props.conf),
535     DEFINE_PROP_UINT32("max-ring-page-order", XenBlockDevice,
536                        props.max_ring_page_order, 4),
537     DEFINE_PROP_LINK("iothread", XenBlockDevice, props.iothread,
538                      TYPE_IOTHREAD, IOThread *),
539     DEFINE_PROP_END_OF_LIST()
540 };
541 
542 static void xen_block_class_init(ObjectClass *class, void *data)
543 {
544     DeviceClass *dev_class = DEVICE_CLASS(class);
545     XenDeviceClass *xendev_class = XEN_DEVICE_CLASS(class);
546 
547     xendev_class->backend = "qdisk";
548     xendev_class->device = "vbd";
549     xendev_class->get_name = xen_block_get_name;
550     xendev_class->realize = xen_block_realize;
551     xendev_class->frontend_changed = xen_block_frontend_changed;
552     xendev_class->unrealize = xen_block_unrealize;
553 
554     dev_class->props = xen_block_props;
555 }
556 
557 static const TypeInfo xen_block_type_info = {
558     .name = TYPE_XEN_BLOCK_DEVICE,
559     .parent = TYPE_XEN_DEVICE,
560     .instance_size = sizeof(XenBlockDevice),
561     .abstract = true,
562     .class_size = sizeof(XenBlockDeviceClass),
563     .class_init = xen_block_class_init,
564 };
565 
566 static void xen_disk_unrealize(XenBlockDevice *blockdev, Error **errp)
567 {
568     trace_xen_disk_unrealize();
569 }
570 
571 static void xen_disk_realize(XenBlockDevice *blockdev, Error **errp)
572 {
573     BlockConf *conf = &blockdev->props.conf;
574 
575     trace_xen_disk_realize();
576 
577     blockdev->device_type = "disk";
578 
579     if (!conf->blk) {
580         error_setg(errp, "drive property not set");
581         return;
582     }
583 
584     blockdev->info = blk_is_read_only(conf->blk) ? VDISK_READONLY : 0;
585 }
586 
587 static void xen_disk_class_init(ObjectClass *class, void *data)
588 {
589     DeviceClass *dev_class = DEVICE_CLASS(class);
590     XenBlockDeviceClass *blockdev_class = XEN_BLOCK_DEVICE_CLASS(class);
591 
592     blockdev_class->realize = xen_disk_realize;
593     blockdev_class->unrealize = xen_disk_unrealize;
594 
595     dev_class->desc = "Xen Disk Device";
596 }
597 
598 static const TypeInfo xen_disk_type_info = {
599     .name = TYPE_XEN_DISK_DEVICE,
600     .parent = TYPE_XEN_BLOCK_DEVICE,
601     .instance_size = sizeof(XenDiskDevice),
602     .class_init = xen_disk_class_init,
603 };
604 
605 static void xen_cdrom_unrealize(XenBlockDevice *blockdev, Error **errp)
606 {
607     trace_xen_cdrom_unrealize();
608 }
609 
610 static void xen_cdrom_realize(XenBlockDevice *blockdev, Error **errp)
611 {
612     BlockConf *conf = &blockdev->props.conf;
613 
614     trace_xen_cdrom_realize();
615 
616     blockdev->device_type = "cdrom";
617 
618     if (!conf->blk) {
619         int rc;
620 
621         /* Set up an empty drive */
622         conf->blk = blk_new(qemu_get_aio_context(), 0, BLK_PERM_ALL);
623 
624         rc = blk_attach_dev(conf->blk, DEVICE(blockdev));
625         if (!rc) {
626             error_setg_errno(errp, -rc, "failed to create drive");
627             return;
628         }
629     }
630 
631     blockdev->info = VDISK_READONLY | VDISK_CDROM;
632 }
633 
634 static void xen_cdrom_class_init(ObjectClass *class, void *data)
635 {
636     DeviceClass *dev_class = DEVICE_CLASS(class);
637     XenBlockDeviceClass *blockdev_class = XEN_BLOCK_DEVICE_CLASS(class);
638 
639     blockdev_class->realize = xen_cdrom_realize;
640     blockdev_class->unrealize = xen_cdrom_unrealize;
641 
642     dev_class->desc = "Xen CD-ROM Device";
643 }
644 
645 static const TypeInfo xen_cdrom_type_info = {
646     .name = TYPE_XEN_CDROM_DEVICE,
647     .parent = TYPE_XEN_BLOCK_DEVICE,
648     .instance_size = sizeof(XenCDRomDevice),
649     .class_init = xen_cdrom_class_init,
650 };
651 
652 static void xen_block_register_types(void)
653 {
654     type_register_static(&xen_block_type_info);
655     type_register_static(&xen_disk_type_info);
656     type_register_static(&xen_cdrom_type_info);
657 }
658 
659 type_init(xen_block_register_types)
660 
661 static void xen_block_blockdev_del(const char *node_name, Error **errp)
662 {
663     trace_xen_block_blockdev_del(node_name);
664 
665     qmp_blockdev_del(node_name, errp);
666 }
667 
668 static char *xen_block_blockdev_add(const char *id, QDict *qdict,
669                                     Error **errp)
670 {
671     const char *driver = qdict_get_try_str(qdict, "driver");
672     BlockdevOptions *options = NULL;
673     Error *local_err = NULL;
674     char *node_name;
675     Visitor *v;
676 
677     if (!driver) {
678         error_setg(errp, "no 'driver' parameter");
679         return NULL;
680     }
681 
682     node_name = g_strdup_printf("%s-%s", id, driver);
683     qdict_put_str(qdict, "node-name", node_name);
684 
685     trace_xen_block_blockdev_add(node_name);
686 
687     v = qobject_input_visitor_new(QOBJECT(qdict));
688     visit_type_BlockdevOptions(v, NULL, &options, &local_err);
689     visit_free(v);
690 
691     if (local_err) {
692         error_propagate(errp, local_err);
693         goto fail;
694     }
695 
696     qmp_blockdev_add(options, &local_err);
697 
698     if (local_err) {
699         error_propagate(errp, local_err);
700         goto fail;
701     }
702 
703     qapi_free_BlockdevOptions(options);
704 
705     return node_name;
706 
707 fail:
708     if (options) {
709         qapi_free_BlockdevOptions(options);
710     }
711     g_free(node_name);
712 
713     return NULL;
714 }
715 
716 static void xen_block_drive_destroy(XenBlockDrive *drive, Error **errp)
717 {
718     char *node_name = drive->node_name;
719 
720     if (node_name) {
721         Error *local_err = NULL;
722 
723         xen_block_blockdev_del(node_name, &local_err);
724         if (local_err) {
725             error_propagate(errp, local_err);
726             return;
727         }
728         g_free(node_name);
729         drive->node_name = NULL;
730     }
731     g_free(drive->id);
732     g_free(drive);
733 }
734 
735 static XenBlockDrive *xen_block_drive_create(const char *id,
736                                              const char *device_type,
737                                              QDict *opts, Error **errp)
738 {
739     const char *params = qdict_get_try_str(opts, "params");
740     const char *mode = qdict_get_try_str(opts, "mode");
741     const char *direct_io_safe = qdict_get_try_str(opts, "direct-io-safe");
742     const char *discard_enable = qdict_get_try_str(opts, "discard-enable");
743     char *driver = NULL;
744     char *filename = NULL;
745     XenBlockDrive *drive = NULL;
746     Error *local_err = NULL;
747     QDict *file_layer;
748     QDict *driver_layer;
749 
750     if (params) {
751         char **v = g_strsplit(params, ":", 2);
752 
753         if (v[1] == NULL) {
754             filename = g_strdup(v[0]);
755             driver = g_strdup("raw");
756         } else {
757             if (strcmp(v[0], "aio") == 0) {
758                 driver = g_strdup("raw");
759             } else if (strcmp(v[0], "vhd") == 0) {
760                 driver = g_strdup("vpc");
761             } else {
762                 driver = g_strdup(v[0]);
763             }
764             filename = g_strdup(v[1]);
765         }
766 
767         g_strfreev(v);
768     } else {
769         error_setg(errp, "no params");
770         goto done;
771     }
772 
773     assert(filename);
774     assert(driver);
775 
776     drive = g_new0(XenBlockDrive, 1);
777     drive->id = g_strdup(id);
778 
779     file_layer = qdict_new();
780     driver_layer = qdict_new();
781 
782     qdict_put_str(file_layer, "driver", "file");
783     qdict_put_str(file_layer, "filename", filename);
784     g_free(filename);
785 
786     if (mode && *mode != 'w') {
787         qdict_put_bool(file_layer, "read-only", true);
788     }
789 
790     if (direct_io_safe) {
791         unsigned long value;
792 
793         if (!qemu_strtoul(direct_io_safe, NULL, 2, &value) && !!value) {
794             QDict *cache_qdict = qdict_new();
795 
796             qdict_put_bool(cache_qdict, "direct", true);
797             qdict_put(file_layer, "cache", cache_qdict);
798 
799             qdict_put_str(file_layer, "aio", "native");
800         }
801     }
802 
803     if (discard_enable) {
804         unsigned long value;
805 
806         if (!qemu_strtoul(discard_enable, NULL, 2, &value) && !!value) {
807             qdict_put_str(file_layer, "discard", "unmap");
808             qdict_put_str(driver_layer, "discard", "unmap");
809         }
810     }
811 
812     /*
813      * It is necessary to turn file locking off as an emulated device
814      * may have already opened the same image file.
815      */
816     qdict_put_str(file_layer, "locking", "off");
817 
818     qdict_put_str(driver_layer, "driver", driver);
819     g_free(driver);
820 
821     qdict_put(driver_layer, "file", file_layer);
822 
823     g_assert(!drive->node_name);
824     drive->node_name = xen_block_blockdev_add(drive->id, driver_layer,
825                                               &local_err);
826 
827     qobject_unref(driver_layer);
828 
829 done:
830     if (local_err) {
831         error_propagate(errp, local_err);
832         xen_block_drive_destroy(drive, NULL);
833         return NULL;
834     }
835 
836     return drive;
837 }
838 
839 static const char *xen_block_drive_get_node_name(XenBlockDrive *drive)
840 {
841     return drive->node_name ? drive->node_name : "";
842 }
843 
844 static void xen_block_iothread_destroy(XenBlockIOThread *iothread,
845                                        Error **errp)
846 {
847     qmp_object_del(iothread->id, errp);
848 
849     g_free(iothread->id);
850     g_free(iothread);
851 }
852 
853 static XenBlockIOThread *xen_block_iothread_create(const char *id,
854                                                    Error **errp)
855 {
856     XenBlockIOThread *iothread = g_new(XenBlockIOThread, 1);
857     Error *local_err = NULL;
858 
859     iothread->id = g_strdup(id);
860 
861     qmp_object_add(TYPE_IOTHREAD, id, false, NULL, &local_err);
862     if (local_err) {
863         error_propagate(errp, local_err);
864 
865         g_free(iothread->id);
866         g_free(iothread);
867         return NULL;
868     }
869 
870     return iothread;
871 }
872 
873 static void xen_block_device_create(XenBackendInstance *backend,
874                                     QDict *opts, Error **errp)
875 {
876     XenBus *xenbus = xen_backend_get_bus(backend);
877     const char *name = xen_backend_get_name(backend);
878     unsigned long number;
879     const char *vdev, *device_type;
880     XenBlockDrive *drive = NULL;
881     XenBlockIOThread *iothread = NULL;
882     XenDevice *xendev = NULL;
883     Error *local_err = NULL;
884     const char *type;
885     XenBlockDevice *blockdev;
886 
887     if (qemu_strtoul(name, NULL, 10, &number)) {
888         error_setg(errp, "failed to parse name '%s'", name);
889         goto fail;
890     }
891 
892     trace_xen_block_device_create(number);
893 
894     vdev = qdict_get_try_str(opts, "dev");
895     if (!vdev) {
896         error_setg(errp, "no dev parameter");
897         goto fail;
898     }
899 
900     device_type = qdict_get_try_str(opts, "device-type");
901     if (!device_type) {
902         error_setg(errp, "no device-type parameter");
903         goto fail;
904     }
905 
906     if (!strcmp(device_type, "disk")) {
907         type = TYPE_XEN_DISK_DEVICE;
908     } else if (!strcmp(device_type, "cdrom")) {
909         type = TYPE_XEN_CDROM_DEVICE;
910     } else {
911         error_setg(errp, "invalid device-type parameter '%s'", device_type);
912         goto fail;
913     }
914 
915     drive = xen_block_drive_create(vdev, device_type, opts, &local_err);
916     if (!drive) {
917         error_propagate_prepend(errp, local_err, "failed to create drive: ");
918         goto fail;
919     }
920 
921     iothread = xen_block_iothread_create(vdev, &local_err);
922     if (local_err) {
923         error_propagate_prepend(errp, local_err,
924                                 "failed to create iothread: ");
925         goto fail;
926     }
927 
928     xendev = XEN_DEVICE(qdev_create(BUS(xenbus), type));
929     blockdev = XEN_BLOCK_DEVICE(xendev);
930 
931     object_property_set_str(OBJECT(xendev), vdev, "vdev", &local_err);
932     if (local_err) {
933         error_propagate_prepend(errp, local_err, "failed to set 'vdev': ");
934         goto fail;
935     }
936 
937     object_property_set_str(OBJECT(xendev),
938                             xen_block_drive_get_node_name(drive), "drive",
939                             &local_err);
940     if (local_err) {
941         error_propagate_prepend(errp, local_err, "failed to set 'drive': ");
942         goto fail;
943     }
944 
945     object_property_set_str(OBJECT(xendev), iothread->id, "iothread",
946                             &local_err);
947     if (local_err) {
948         error_propagate_prepend(errp, local_err,
949                                 "failed to set 'iothread': ");
950         goto fail;
951     }
952 
953     blockdev->iothread = iothread;
954     blockdev->drive = drive;
955 
956     object_property_set_bool(OBJECT(xendev), true, "realized", &local_err);
957     if (local_err) {
958         error_propagate_prepend(errp, local_err,
959                                 "realization of device %s failed: ",
960                                 type);
961         goto fail;
962     }
963 
964     xen_backend_set_device(backend, xendev);
965     return;
966 
967 fail:
968     if (xendev) {
969         object_unparent(OBJECT(xendev));
970     }
971 
972     if (iothread) {
973         xen_block_iothread_destroy(iothread, NULL);
974     }
975 
976     if (drive) {
977         xen_block_drive_destroy(drive, NULL);
978     }
979 }
980 
981 static void xen_block_device_destroy(XenBackendInstance *backend,
982                                      Error **errp)
983 {
984     XenDevice *xendev = xen_backend_get_device(backend);
985     XenBlockDevice *blockdev = XEN_BLOCK_DEVICE(xendev);
986     XenBlockVdev *vdev = &blockdev->props.vdev;
987     XenBlockDrive *drive = blockdev->drive;
988     XenBlockIOThread *iothread = blockdev->iothread;
989 
990     trace_xen_block_device_destroy(vdev->number);
991 
992     object_unparent(OBJECT(xendev));
993 
994     if (iothread) {
995         Error *local_err = NULL;
996 
997         xen_block_iothread_destroy(iothread, &local_err);
998         if (local_err) {
999             error_propagate_prepend(errp, local_err,
1000                                 "failed to destroy iothread: ");
1001             return;
1002         }
1003     }
1004 
1005     if (drive) {
1006         Error *local_err = NULL;
1007 
1008         xen_block_drive_destroy(drive, &local_err);
1009         if (local_err) {
1010             error_propagate_prepend(errp, local_err,
1011                                 "failed to destroy drive: ");
1012         }
1013     }
1014 }
1015 
1016 static const XenBackendInfo xen_block_backend_info = {
1017     .type = "qdisk",
1018     .create = xen_block_device_create,
1019     .destroy = xen_block_device_destroy,
1020 };
1021 
1022 static void xen_block_register_backend(void)
1023 {
1024     xen_backend_register(&xen_block_backend_info);
1025 }
1026 
1027 xen_backend_init(xen_block_register_backend);
1028