2 * Serving QEMU block devices via NBD
4 * Copyright (c) 2012 Red Hat, Inc.
8 * This work is licensed under the terms of the GNU GPL, version 2 or
9 * later. See the COPYING file in the top-level directory.
12 #include "qemu/osdep.h"
13 #include "sysemu/blockdev.h"
14 #include "sysemu/block-backend.h"
15 #include "hw/block/block.h"
16 #include "qapi/error.h"
17 #include "qapi/qapi-commands-block.h"
18 #include "sysemu/sysemu.h"
19 #include "block/nbd.h"
20 #include "io/channel-socket.h"
21 #include "io/net-listener.h"
23 typedef struct NBDServerData {
24 QIONetListener *listener;
25 QCryptoTLSCreds *tlscreds;
28 static NBDServerData *nbd_server;
30 static void nbd_blockdev_client_closed(NBDClient *client, bool ignored)
32 nbd_client_put(client);
35 static void nbd_accept(QIONetListener *listener, QIOChannelSocket *cioc,
38 qio_channel_set_name(QIO_CHANNEL(cioc), "nbd-server");
39 nbd_client_new(cioc, nbd_server->tlscreds, NULL,
40 nbd_blockdev_client_closed);
44 static void nbd_server_free(NBDServerData *server)
50 qio_net_listener_disconnect(server->listener);
51 object_unref(OBJECT(server->listener));
52 if (server->tlscreds) {
53 object_unref(OBJECT(server->tlscreds));
59 static QCryptoTLSCreds *nbd_get_tls_creds(const char *id, Error **errp)
62 QCryptoTLSCreds *creds;
64 obj = object_resolve_path_component(
65 object_get_objects_root(), id);
67 error_setg(errp, "No TLS credentials with id '%s'",
71 creds = (QCryptoTLSCreds *)
72 object_dynamic_cast(obj, TYPE_QCRYPTO_TLS_CREDS);
74 error_setg(errp, "Object with id '%s' is not TLS credentials",
79 if (creds->endpoint != QCRYPTO_TLS_CREDS_ENDPOINT_SERVER) {
81 "Expecting TLS credentials with a server endpoint");
89 void nbd_server_start(SocketAddress *addr, const char *tls_creds,
93 error_setg(errp, "NBD server already running");
97 nbd_server = g_new0(NBDServerData, 1);
98 nbd_server->listener = qio_net_listener_new();
100 qio_net_listener_set_name(nbd_server->listener,
103 if (qio_net_listener_open_sync(nbd_server->listener, addr, errp) < 0) {
108 nbd_server->tlscreds = nbd_get_tls_creds(tls_creds, errp);
109 if (!nbd_server->tlscreds) {
113 /* TODO SOCKET_ADDRESS_TYPE_FD where fd has AF_INET or AF_INET6 */
114 if (addr->type != SOCKET_ADDRESS_TYPE_INET) {
115 error_setg(errp, "TLS is only supported with IPv4/IPv6");
120 qio_net_listener_set_client_func(nbd_server->listener,
128 nbd_server_free(nbd_server);
132 void qmp_nbd_server_start(SocketAddressLegacy *addr,
133 bool has_tls_creds, const char *tls_creds,
136 SocketAddress *addr_flat = socket_address_flatten(addr);
138 nbd_server_start(addr_flat, tls_creds, errp);
139 qapi_free_SocketAddress(addr_flat);
142 void qmp_nbd_server_add(const char *device, bool has_name, const char *name,
143 bool has_writable, bool writable, Error **errp)
145 BlockDriverState *bs = NULL;
146 BlockBackend *on_eject_blk;
150 error_setg(errp, "NBD server not running");
158 if (nbd_export_find(name)) {
159 error_setg(errp, "NBD server already has export named '%s'", name);
163 on_eject_blk = blk_by_name(device);
165 bs = bdrv_lookup_bs(device, device, errp);
173 if (bdrv_is_read_only(bs)) {
177 exp = nbd_export_new(bs, 0, -1, writable ? 0 : NBD_FLAG_READ_ONLY,
178 NULL, false, on_eject_blk, errp);
183 nbd_export_set_name(exp, name);
185 /* The list of named exports has a strong reference to this export now and
186 * our only way of accessing it is through nbd_export_find(), so we can drop
187 * the strong reference that is @exp. */
191 void qmp_nbd_server_remove(const char *name,
192 bool has_mode, NbdServerRemoveMode mode,
198 error_setg(errp, "NBD server not running");
202 exp = nbd_export_find(name);
204 error_setg(errp, "Export '%s' is not found", name);
209 mode = NBD_SERVER_REMOVE_MODE_SAFE;
212 nbd_export_remove(exp, mode, errp);
215 void qmp_nbd_server_stop(Error **errp)
217 nbd_export_close_all();
219 nbd_server_free(nbd_server);
223 void qmp_x_nbd_server_add_bitmap(const char *name, const char *bitmap,
224 bool has_bitmap_export_name,
225 const char *bitmap_export_name,
231 error_setg(errp, "NBD server not running");
235 exp = nbd_export_find(name);
237 error_setg(errp, "Export '%s' is not found", name);
241 nbd_export_bitmap(exp, bitmap,
242 has_bitmap_export_name ? bitmap_export_name : bitmap,