xref: /openbmc/qemu/block/nbd.c (revision de6cd7599b518f0c832cc85980196ec02c129a86)
1  /*
2   * QEMU Block driver for  NBD
3   *
4   * Copyright (c) 2019 Virtuozzo International GmbH.
5   * Copyright (C) 2016 Red Hat, Inc.
6   * Copyright (C) 2008 Bull S.A.S.
7   *     Author: Laurent Vivier <Laurent.Vivier@bull.net>
8   *
9   * Some parts:
10   *    Copyright (C) 2007 Anthony Liguori <anthony@codemonkey.ws>
11   *
12   * Permission is hereby granted, free of charge, to any person obtaining a copy
13   * of this software and associated documentation files (the "Software"), to deal
14   * in the Software without restriction, including without limitation the rights
15   * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
16   * copies of the Software, and to permit persons to whom the Software is
17   * furnished to do so, subject to the following conditions:
18   *
19   * The above copyright notice and this permission notice shall be included in
20   * all copies or substantial portions of the Software.
21   *
22   * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
23   * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
24   * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
25   * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
26   * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
27   * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
28   * THE SOFTWARE.
29   */
30  
31  #include "qemu/osdep.h"
32  
33  #include "trace.h"
34  #include "qemu/uri.h"
35  #include "qemu/option.h"
36  #include "qemu/cutils.h"
37  #include "qemu/main-loop.h"
38  
39  #include "qapi/qapi-visit-sockets.h"
40  #include "qapi/qmp/qstring.h"
41  #include "qapi/clone-visitor.h"
42  
43  #include "block/qdict.h"
44  #include "block/nbd.h"
45  #include "block/block_int.h"
46  #include "block/coroutines.h"
47  
48  #include "qemu/yank.h"
49  
50  #define EN_OPTSTR ":exportname="
51  #define MAX_NBD_REQUESTS    16
52  
53  #define HANDLE_TO_INDEX(bs, handle) ((handle) ^ (uint64_t)(intptr_t)(bs))
54  #define INDEX_TO_HANDLE(bs, index)  ((index)  ^ (uint64_t)(intptr_t)(bs))
55  
56  typedef struct {
57      Coroutine *coroutine;
58      uint64_t offset;        /* original offset of the request */
59      bool receiving;         /* sleeping in the yield in nbd_receive_replies */
60  } NBDClientRequest;
61  
62  typedef enum NBDClientState {
63      NBD_CLIENT_CONNECTING_WAIT,
64      NBD_CLIENT_CONNECTING_NOWAIT,
65      NBD_CLIENT_CONNECTED,
66      NBD_CLIENT_QUIT
67  } NBDClientState;
68  
69  typedef struct BDRVNBDState {
70      QIOChannel *ioc; /* The current I/O channel */
71      NBDExportInfo info;
72  
73      /*
74       * Protects state, free_sema, in_flight, requests[].coroutine,
75       * reconnect_delay_timer.
76       */
77      QemuMutex requests_lock;
78      NBDClientState state;
79      CoQueue free_sema;
80      unsigned in_flight;
81      NBDClientRequest requests[MAX_NBD_REQUESTS];
82      QEMUTimer *reconnect_delay_timer;
83  
84      /* Protects sending data on the socket.  */
85      CoMutex send_mutex;
86  
87      /*
88       * Protects receiving reply headers from the socket, as well as the
89       * fields reply and requests[].receiving
90       */
91      CoMutex receive_mutex;
92      NBDReply reply;
93  
94      QEMUTimer *open_timer;
95  
96      BlockDriverState *bs;
97  
98      /* Connection parameters */
99      uint32_t reconnect_delay;
100      uint32_t open_timeout;
101      SocketAddress *saddr;
102      char *export;
103      char *tlscredsid;
104      QCryptoTLSCreds *tlscreds;
105      char *tlshostname;
106      char *x_dirty_bitmap;
107      bool alloc_depth;
108  
109      NBDClientConnection *conn;
110  } BDRVNBDState;
111  
112  static void nbd_yank(void *opaque);
113  
114  static void nbd_clear_bdrvstate(BlockDriverState *bs)
115  {
116      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
117  
118      nbd_client_connection_release(s->conn);
119      s->conn = NULL;
120  
121      yank_unregister_instance(BLOCKDEV_YANK_INSTANCE(bs->node_name));
122  
123      /* Must not leave timers behind that would access freed data */
124      assert(!s->reconnect_delay_timer);
125      assert(!s->open_timer);
126  
127      object_unref(OBJECT(s->tlscreds));
128      qapi_free_SocketAddress(s->saddr);
129      s->saddr = NULL;
130      g_free(s->export);
131      s->export = NULL;
132      g_free(s->tlscredsid);
133      s->tlscredsid = NULL;
134      g_free(s->tlshostname);
135      s->tlshostname = NULL;
136      g_free(s->x_dirty_bitmap);
137      s->x_dirty_bitmap = NULL;
138  }
139  
140  /* Called with s->receive_mutex taken.  */
141  static bool coroutine_fn nbd_recv_coroutine_wake_one(NBDClientRequest *req)
142  {
143      if (req->receiving) {
144          req->receiving = false;
145          aio_co_wake(req->coroutine);
146          return true;
147      }
148  
149      return false;
150  }
151  
152  static void coroutine_fn nbd_recv_coroutines_wake(BDRVNBDState *s)
153  {
154      int i;
155  
156      QEMU_LOCK_GUARD(&s->receive_mutex);
157      for (i = 0; i < MAX_NBD_REQUESTS; i++) {
158          if (nbd_recv_coroutine_wake_one(&s->requests[i])) {
159              return;
160          }
161      }
162  }
163  
164  /* Called with s->requests_lock held.  */
165  static void coroutine_fn nbd_channel_error_locked(BDRVNBDState *s, int ret)
166  {
167      if (s->state == NBD_CLIENT_CONNECTED) {
168          qio_channel_shutdown(s->ioc, QIO_CHANNEL_SHUTDOWN_BOTH, NULL);
169      }
170  
171      if (ret == -EIO) {
172          if (s->state == NBD_CLIENT_CONNECTED) {
173              s->state = s->reconnect_delay ? NBD_CLIENT_CONNECTING_WAIT :
174                                              NBD_CLIENT_CONNECTING_NOWAIT;
175          }
176      } else {
177          s->state = NBD_CLIENT_QUIT;
178      }
179  }
180  
181  static void coroutine_fn nbd_channel_error(BDRVNBDState *s, int ret)
182  {
183      QEMU_LOCK_GUARD(&s->requests_lock);
184      nbd_channel_error_locked(s, ret);
185  }
186  
187  static void reconnect_delay_timer_del(BDRVNBDState *s)
188  {
189      if (s->reconnect_delay_timer) {
190          timer_free(s->reconnect_delay_timer);
191          s->reconnect_delay_timer = NULL;
192      }
193  }
194  
195  static void reconnect_delay_timer_cb(void *opaque)
196  {
197      BDRVNBDState *s = opaque;
198  
199      reconnect_delay_timer_del(s);
200      WITH_QEMU_LOCK_GUARD(&s->requests_lock) {
201          if (s->state != NBD_CLIENT_CONNECTING_WAIT) {
202              return;
203          }
204          s->state = NBD_CLIENT_CONNECTING_NOWAIT;
205      }
206      nbd_co_establish_connection_cancel(s->conn);
207  }
208  
209  static void reconnect_delay_timer_init(BDRVNBDState *s, uint64_t expire_time_ns)
210  {
211      assert(!s->reconnect_delay_timer);
212      s->reconnect_delay_timer = aio_timer_new(bdrv_get_aio_context(s->bs),
213                                               QEMU_CLOCK_REALTIME,
214                                               SCALE_NS,
215                                               reconnect_delay_timer_cb, s);
216      timer_mod(s->reconnect_delay_timer, expire_time_ns);
217  }
218  
219  static void nbd_teardown_connection(BlockDriverState *bs)
220  {
221      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
222  
223      assert(!s->in_flight);
224  
225      if (s->ioc) {
226          qio_channel_shutdown(s->ioc, QIO_CHANNEL_SHUTDOWN_BOTH, NULL);
227          yank_unregister_function(BLOCKDEV_YANK_INSTANCE(s->bs->node_name),
228                                   nbd_yank, s->bs);
229          object_unref(OBJECT(s->ioc));
230          s->ioc = NULL;
231      }
232  
233      WITH_QEMU_LOCK_GUARD(&s->requests_lock) {
234          s->state = NBD_CLIENT_QUIT;
235      }
236  }
237  
238  static void open_timer_del(BDRVNBDState *s)
239  {
240      if (s->open_timer) {
241          timer_free(s->open_timer);
242          s->open_timer = NULL;
243      }
244  }
245  
246  static void open_timer_cb(void *opaque)
247  {
248      BDRVNBDState *s = opaque;
249  
250      nbd_co_establish_connection_cancel(s->conn);
251      open_timer_del(s);
252  }
253  
254  static void open_timer_init(BDRVNBDState *s, uint64_t expire_time_ns)
255  {
256      assert(!s->open_timer);
257      s->open_timer = aio_timer_new(bdrv_get_aio_context(s->bs),
258                                    QEMU_CLOCK_REALTIME,
259                                    SCALE_NS,
260                                    open_timer_cb, s);
261      timer_mod(s->open_timer, expire_time_ns);
262  }
263  
264  static bool nbd_client_will_reconnect(BDRVNBDState *s)
265  {
266      /*
267       * Called only after a socket error, so this is not performance sensitive.
268       */
269      QEMU_LOCK_GUARD(&s->requests_lock);
270      return s->state == NBD_CLIENT_CONNECTING_WAIT;
271  }
272  
273  /*
274   * Update @bs with information learned during a completed negotiation process.
275   * Return failure if the server's advertised options are incompatible with the
276   * client's needs.
277   */
278  static int nbd_handle_updated_info(BlockDriverState *bs, Error **errp)
279  {
280      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
281      int ret;
282  
283      if (s->x_dirty_bitmap) {
284          if (!s->info.base_allocation) {
285              error_setg(errp, "requested x-dirty-bitmap %s not found",
286                         s->x_dirty_bitmap);
287              return -EINVAL;
288          }
289          if (strcmp(s->x_dirty_bitmap, "qemu:allocation-depth") == 0) {
290              s->alloc_depth = true;
291          }
292      }
293  
294      if (s->info.flags & NBD_FLAG_READ_ONLY) {
295          ret = bdrv_apply_auto_read_only(bs, "NBD export is read-only", errp);
296          if (ret < 0) {
297              return ret;
298          }
299      }
300  
301      if (s->info.flags & NBD_FLAG_SEND_FUA) {
302          bs->supported_write_flags = BDRV_REQ_FUA;
303          bs->supported_zero_flags |= BDRV_REQ_FUA;
304      }
305  
306      if (s->info.flags & NBD_FLAG_SEND_WRITE_ZEROES) {
307          bs->supported_zero_flags |= BDRV_REQ_MAY_UNMAP;
308          if (s->info.flags & NBD_FLAG_SEND_FAST_ZERO) {
309              bs->supported_zero_flags |= BDRV_REQ_NO_FALLBACK;
310          }
311      }
312  
313      trace_nbd_client_handshake_success(s->export);
314  
315      return 0;
316  }
317  
318  int coroutine_fn nbd_co_do_establish_connection(BlockDriverState *bs,
319                                                  bool blocking, Error **errp)
320  {
321      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
322      int ret;
323      IO_CODE();
324  
325      assert_bdrv_graph_readable();
326      assert(!s->ioc);
327  
328      s->ioc = nbd_co_establish_connection(s->conn, &s->info, blocking, errp);
329      if (!s->ioc) {
330          return -ECONNREFUSED;
331      }
332  
333      yank_register_function(BLOCKDEV_YANK_INSTANCE(s->bs->node_name), nbd_yank,
334                             bs);
335  
336      ret = nbd_handle_updated_info(s->bs, NULL);
337      if (ret < 0) {
338          /*
339           * We have connected, but must fail for other reasons.
340           * Send NBD_CMD_DISC as a courtesy to the server.
341           */
342          NBDRequest request = { .type = NBD_CMD_DISC };
343  
344          nbd_send_request(s->ioc, &request);
345  
346          yank_unregister_function(BLOCKDEV_YANK_INSTANCE(s->bs->node_name),
347                                   nbd_yank, bs);
348          object_unref(OBJECT(s->ioc));
349          s->ioc = NULL;
350  
351          return ret;
352      }
353  
354      qio_channel_set_blocking(s->ioc, false, NULL);
355      qio_channel_attach_aio_context(s->ioc, bdrv_get_aio_context(bs));
356  
357      /* successfully connected */
358      WITH_QEMU_LOCK_GUARD(&s->requests_lock) {
359          s->state = NBD_CLIENT_CONNECTED;
360      }
361  
362      return 0;
363  }
364  
365  /* Called with s->requests_lock held.  */
366  static bool nbd_client_connecting(BDRVNBDState *s)
367  {
368      return s->state == NBD_CLIENT_CONNECTING_WAIT ||
369          s->state == NBD_CLIENT_CONNECTING_NOWAIT;
370  }
371  
372  /* Called with s->requests_lock taken.  */
373  static void coroutine_fn GRAPH_RDLOCK nbd_reconnect_attempt(BDRVNBDState *s)
374  {
375      int ret;
376      bool blocking = s->state == NBD_CLIENT_CONNECTING_WAIT;
377  
378      /*
379       * Now we are sure that nobody is accessing the channel, and no one will
380       * try until we set the state to CONNECTED.
381       */
382      assert(nbd_client_connecting(s));
383      assert(s->in_flight == 1);
384  
385      trace_nbd_reconnect_attempt(s->bs->in_flight);
386  
387      if (blocking && !s->reconnect_delay_timer) {
388          /*
389           * It's the first reconnect attempt after switching to
390           * NBD_CLIENT_CONNECTING_WAIT
391           */
392          g_assert(s->reconnect_delay);
393          reconnect_delay_timer_init(s,
394              qemu_clock_get_ns(QEMU_CLOCK_REALTIME) +
395              s->reconnect_delay * NANOSECONDS_PER_SECOND);
396      }
397  
398      /* Finalize previous connection if any */
399      if (s->ioc) {
400          qio_channel_detach_aio_context(s->ioc);
401          yank_unregister_function(BLOCKDEV_YANK_INSTANCE(s->bs->node_name),
402                                   nbd_yank, s->bs);
403          object_unref(OBJECT(s->ioc));
404          s->ioc = NULL;
405      }
406  
407      qemu_mutex_unlock(&s->requests_lock);
408      ret = nbd_co_do_establish_connection(s->bs, blocking, NULL);
409      trace_nbd_reconnect_attempt_result(ret, s->bs->in_flight);
410      qemu_mutex_lock(&s->requests_lock);
411  
412      /*
413       * The reconnect attempt is done (maybe successfully, maybe not), so
414       * we no longer need this timer.  Delete it so it will not outlive
415       * this I/O request (so draining removes all timers).
416       */
417      reconnect_delay_timer_del(s);
418  }
419  
420  static coroutine_fn int nbd_receive_replies(BDRVNBDState *s, uint64_t handle)
421  {
422      int ret;
423      uint64_t ind = HANDLE_TO_INDEX(s, handle), ind2;
424      QEMU_LOCK_GUARD(&s->receive_mutex);
425  
426      while (true) {
427          if (s->reply.handle == handle) {
428              /* We are done */
429              return 0;
430          }
431  
432          if (s->reply.handle != 0) {
433              /*
434               * Some other request is being handled now. It should already be
435               * woken by whoever set s->reply.handle (or never wait in this
436               * yield). So, we should not wake it here.
437               */
438              ind2 = HANDLE_TO_INDEX(s, s->reply.handle);
439              assert(!s->requests[ind2].receiving);
440  
441              s->requests[ind].receiving = true;
442              qemu_co_mutex_unlock(&s->receive_mutex);
443  
444              qemu_coroutine_yield();
445              /*
446               * We may be woken for 2 reasons:
447               * 1. From this function, executing in parallel coroutine, when our
448               *    handle is received.
449               * 2. From nbd_co_receive_one_chunk(), when previous request is
450               *    finished and s->reply.handle set to 0.
451               * Anyway, it's OK to lock the mutex and go to the next iteration.
452               */
453  
454              qemu_co_mutex_lock(&s->receive_mutex);
455              assert(!s->requests[ind].receiving);
456              continue;
457          }
458  
459          /* We are under mutex and handle is 0. We have to do the dirty work. */
460          assert(s->reply.handle == 0);
461          ret = nbd_receive_reply(s->bs, s->ioc, &s->reply, NULL);
462          if (ret <= 0) {
463              ret = ret ? ret : -EIO;
464              nbd_channel_error(s, ret);
465              return ret;
466          }
467          if (nbd_reply_is_structured(&s->reply) && !s->info.structured_reply) {
468              nbd_channel_error(s, -EINVAL);
469              return -EINVAL;
470          }
471          ind2 = HANDLE_TO_INDEX(s, s->reply.handle);
472          if (ind2 >= MAX_NBD_REQUESTS || !s->requests[ind2].coroutine) {
473              nbd_channel_error(s, -EINVAL);
474              return -EINVAL;
475          }
476          if (s->reply.handle == handle) {
477              /* We are done */
478              return 0;
479          }
480          nbd_recv_coroutine_wake_one(&s->requests[ind2]);
481      }
482  }
483  
484  static int coroutine_fn GRAPH_RDLOCK
485  nbd_co_send_request(BlockDriverState *bs, NBDRequest *request,
486                      QEMUIOVector *qiov)
487  {
488      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
489      int rc, i = -1;
490  
491      qemu_mutex_lock(&s->requests_lock);
492      while (s->in_flight == MAX_NBD_REQUESTS ||
493             (s->state != NBD_CLIENT_CONNECTED && s->in_flight > 0)) {
494          qemu_co_queue_wait(&s->free_sema, &s->requests_lock);
495      }
496  
497      s->in_flight++;
498      if (s->state != NBD_CLIENT_CONNECTED) {
499          if (nbd_client_connecting(s)) {
500              nbd_reconnect_attempt(s);
501              qemu_co_queue_restart_all(&s->free_sema);
502          }
503          if (s->state != NBD_CLIENT_CONNECTED) {
504              rc = -EIO;
505              goto err;
506          }
507      }
508  
509      for (i = 0; i < MAX_NBD_REQUESTS; i++) {
510          if (s->requests[i].coroutine == NULL) {
511              break;
512          }
513      }
514  
515      assert(i < MAX_NBD_REQUESTS);
516      s->requests[i].coroutine = qemu_coroutine_self();
517      s->requests[i].offset = request->from;
518      s->requests[i].receiving = false;
519      qemu_mutex_unlock(&s->requests_lock);
520  
521      qemu_co_mutex_lock(&s->send_mutex);
522      request->handle = INDEX_TO_HANDLE(s, i);
523  
524      assert(s->ioc);
525  
526      if (qiov) {
527          qio_channel_set_cork(s->ioc, true);
528          rc = nbd_send_request(s->ioc, request);
529          if (rc >= 0 && qio_channel_writev_all(s->ioc, qiov->iov, qiov->niov,
530                                                NULL) < 0) {
531              rc = -EIO;
532          }
533          qio_channel_set_cork(s->ioc, false);
534      } else {
535          rc = nbd_send_request(s->ioc, request);
536      }
537      qemu_co_mutex_unlock(&s->send_mutex);
538  
539      if (rc < 0) {
540          qemu_mutex_lock(&s->requests_lock);
541  err:
542          nbd_channel_error_locked(s, rc);
543          if (i != -1) {
544              s->requests[i].coroutine = NULL;
545          }
546          s->in_flight--;
547          qemu_co_queue_next(&s->free_sema);
548          qemu_mutex_unlock(&s->requests_lock);
549      }
550      return rc;
551  }
552  
553  static inline uint16_t payload_advance16(uint8_t **payload)
554  {
555      *payload += 2;
556      return lduw_be_p(*payload - 2);
557  }
558  
559  static inline uint32_t payload_advance32(uint8_t **payload)
560  {
561      *payload += 4;
562      return ldl_be_p(*payload - 4);
563  }
564  
565  static inline uint64_t payload_advance64(uint8_t **payload)
566  {
567      *payload += 8;
568      return ldq_be_p(*payload - 8);
569  }
570  
571  static int nbd_parse_offset_hole_payload(BDRVNBDState *s,
572                                           NBDStructuredReplyChunk *chunk,
573                                           uint8_t *payload, uint64_t orig_offset,
574                                           QEMUIOVector *qiov, Error **errp)
575  {
576      uint64_t offset;
577      uint32_t hole_size;
578  
579      if (chunk->length != sizeof(offset) + sizeof(hole_size)) {
580          error_setg(errp, "Protocol error: invalid payload for "
581                           "NBD_REPLY_TYPE_OFFSET_HOLE");
582          return -EINVAL;
583      }
584  
585      offset = payload_advance64(&payload);
586      hole_size = payload_advance32(&payload);
587  
588      if (!hole_size || offset < orig_offset || hole_size > qiov->size ||
589          offset > orig_offset + qiov->size - hole_size) {
590          error_setg(errp, "Protocol error: server sent chunk exceeding requested"
591                           " region");
592          return -EINVAL;
593      }
594      if (s->info.min_block &&
595          !QEMU_IS_ALIGNED(hole_size, s->info.min_block)) {
596          trace_nbd_structured_read_compliance("hole");
597      }
598  
599      qemu_iovec_memset(qiov, offset - orig_offset, 0, hole_size);
600  
601      return 0;
602  }
603  
604  /*
605   * nbd_parse_blockstatus_payload
606   * Based on our request, we expect only one extent in reply, for the
607   * base:allocation context.
608   */
609  static int nbd_parse_blockstatus_payload(BDRVNBDState *s,
610                                           NBDStructuredReplyChunk *chunk,
611                                           uint8_t *payload, uint64_t orig_length,
612                                           NBDExtent *extent, Error **errp)
613  {
614      uint32_t context_id;
615  
616      /* The server succeeded, so it must have sent [at least] one extent */
617      if (chunk->length < sizeof(context_id) + sizeof(*extent)) {
618          error_setg(errp, "Protocol error: invalid payload for "
619                           "NBD_REPLY_TYPE_BLOCK_STATUS");
620          return -EINVAL;
621      }
622  
623      context_id = payload_advance32(&payload);
624      if (s->info.context_id != context_id) {
625          error_setg(errp, "Protocol error: unexpected context id %d for "
626                           "NBD_REPLY_TYPE_BLOCK_STATUS, when negotiated context "
627                           "id is %d", context_id,
628                           s->info.context_id);
629          return -EINVAL;
630      }
631  
632      extent->length = payload_advance32(&payload);
633      extent->flags = payload_advance32(&payload);
634  
635      if (extent->length == 0) {
636          error_setg(errp, "Protocol error: server sent status chunk with "
637                     "zero length");
638          return -EINVAL;
639      }
640  
641      /*
642       * A server sending unaligned block status is in violation of the
643       * protocol, but as qemu-nbd 3.1 is such a server (at least for
644       * POSIX files that are not a multiple of 512 bytes, since qemu
645       * rounds files up to 512-byte multiples but lseek(SEEK_HOLE)
646       * still sees an implicit hole beyond the real EOF), it's nicer to
647       * work around the misbehaving server. If the request included
648       * more than the final unaligned block, truncate it back to an
649       * aligned result; if the request was only the final block, round
650       * up to the full block and change the status to fully-allocated
651       * (always a safe status, even if it loses information).
652       */
653      if (s->info.min_block && !QEMU_IS_ALIGNED(extent->length,
654                                                     s->info.min_block)) {
655          trace_nbd_parse_blockstatus_compliance("extent length is unaligned");
656          if (extent->length > s->info.min_block) {
657              extent->length = QEMU_ALIGN_DOWN(extent->length,
658                                               s->info.min_block);
659          } else {
660              extent->length = s->info.min_block;
661              extent->flags = 0;
662          }
663      }
664  
665      /*
666       * We used NBD_CMD_FLAG_REQ_ONE, so the server should not have
667       * sent us any more than one extent, nor should it have included
668       * status beyond our request in that extent. However, it's easy
669       * enough to ignore the server's noncompliance without killing the
670       * connection; just ignore trailing extents, and clamp things to
671       * the length of our request.
672       */
673      if (chunk->length > sizeof(context_id) + sizeof(*extent)) {
674          trace_nbd_parse_blockstatus_compliance("more than one extent");
675      }
676      if (extent->length > orig_length) {
677          extent->length = orig_length;
678          trace_nbd_parse_blockstatus_compliance("extent length too large");
679      }
680  
681      /*
682       * HACK: if we are using x-dirty-bitmaps to access
683       * qemu:allocation-depth, treat all depths > 2 the same as 2,
684       * since nbd_client_co_block_status is only expecting the low two
685       * bits to be set.
686       */
687      if (s->alloc_depth && extent->flags > 2) {
688          extent->flags = 2;
689      }
690  
691      return 0;
692  }
693  
694  /*
695   * nbd_parse_error_payload
696   * on success @errp contains message describing nbd error reply
697   */
698  static int nbd_parse_error_payload(NBDStructuredReplyChunk *chunk,
699                                     uint8_t *payload, int *request_ret,
700                                     Error **errp)
701  {
702      uint32_t error;
703      uint16_t message_size;
704  
705      assert(chunk->type & (1 << 15));
706  
707      if (chunk->length < sizeof(error) + sizeof(message_size)) {
708          error_setg(errp,
709                     "Protocol error: invalid payload for structured error");
710          return -EINVAL;
711      }
712  
713      error = nbd_errno_to_system_errno(payload_advance32(&payload));
714      if (error == 0) {
715          error_setg(errp, "Protocol error: server sent structured error chunk "
716                           "with error = 0");
717          return -EINVAL;
718      }
719  
720      *request_ret = -error;
721      message_size = payload_advance16(&payload);
722  
723      if (message_size > chunk->length - sizeof(error) - sizeof(message_size)) {
724          error_setg(errp, "Protocol error: server sent structured error chunk "
725                           "with incorrect message size");
726          return -EINVAL;
727      }
728  
729      /* TODO: Add a trace point to mention the server complaint */
730  
731      /* TODO handle ERROR_OFFSET */
732  
733      return 0;
734  }
735  
736  static int coroutine_fn
737  nbd_co_receive_offset_data_payload(BDRVNBDState *s, uint64_t orig_offset,
738                                     QEMUIOVector *qiov, Error **errp)
739  {
740      QEMUIOVector sub_qiov;
741      uint64_t offset;
742      size_t data_size;
743      int ret;
744      NBDStructuredReplyChunk *chunk = &s->reply.structured;
745  
746      assert(nbd_reply_is_structured(&s->reply));
747  
748      /* The NBD spec requires at least one byte of payload */
749      if (chunk->length <= sizeof(offset)) {
750          error_setg(errp, "Protocol error: invalid payload for "
751                           "NBD_REPLY_TYPE_OFFSET_DATA");
752          return -EINVAL;
753      }
754  
755      if (nbd_read64(s->ioc, &offset, "OFFSET_DATA offset", errp) < 0) {
756          return -EIO;
757      }
758  
759      data_size = chunk->length - sizeof(offset);
760      assert(data_size);
761      if (offset < orig_offset || data_size > qiov->size ||
762          offset > orig_offset + qiov->size - data_size) {
763          error_setg(errp, "Protocol error: server sent chunk exceeding requested"
764                           " region");
765          return -EINVAL;
766      }
767      if (s->info.min_block && !QEMU_IS_ALIGNED(data_size, s->info.min_block)) {
768          trace_nbd_structured_read_compliance("data");
769      }
770  
771      qemu_iovec_init(&sub_qiov, qiov->niov);
772      qemu_iovec_concat(&sub_qiov, qiov, offset - orig_offset, data_size);
773      ret = qio_channel_readv_all(s->ioc, sub_qiov.iov, sub_qiov.niov, errp);
774      qemu_iovec_destroy(&sub_qiov);
775  
776      return ret < 0 ? -EIO : 0;
777  }
778  
779  #define NBD_MAX_MALLOC_PAYLOAD 1000
780  static coroutine_fn int nbd_co_receive_structured_payload(
781          BDRVNBDState *s, void **payload, Error **errp)
782  {
783      int ret;
784      uint32_t len;
785  
786      assert(nbd_reply_is_structured(&s->reply));
787  
788      len = s->reply.structured.length;
789  
790      if (len == 0) {
791          return 0;
792      }
793  
794      if (payload == NULL) {
795          error_setg(errp, "Unexpected structured payload");
796          return -EINVAL;
797      }
798  
799      if (len > NBD_MAX_MALLOC_PAYLOAD) {
800          error_setg(errp, "Payload too large");
801          return -EINVAL;
802      }
803  
804      *payload = g_new(char, len);
805      ret = nbd_read(s->ioc, *payload, len, "structured payload", errp);
806      if (ret < 0) {
807          g_free(*payload);
808          *payload = NULL;
809          return ret;
810      }
811  
812      return 0;
813  }
814  
815  /*
816   * nbd_co_do_receive_one_chunk
817   * for simple reply:
818   *   set request_ret to received reply error
819   *   if qiov is not NULL: read payload to @qiov
820   * for structured reply chunk:
821   *   if error chunk: read payload, set @request_ret, do not set @payload
822   *   else if offset_data chunk: read payload data to @qiov, do not set @payload
823   *   else: read payload to @payload
824   *
825   * If function fails, @errp contains corresponding error message, and the
826   * connection with the server is suspect.  If it returns 0, then the
827   * transaction succeeded (although @request_ret may be a negative errno
828   * corresponding to the server's error reply), and errp is unchanged.
829   */
830  static coroutine_fn int nbd_co_do_receive_one_chunk(
831          BDRVNBDState *s, uint64_t handle, bool only_structured,
832          int *request_ret, QEMUIOVector *qiov, void **payload, Error **errp)
833  {
834      int ret;
835      int i = HANDLE_TO_INDEX(s, handle);
836      void *local_payload = NULL;
837      NBDStructuredReplyChunk *chunk;
838  
839      if (payload) {
840          *payload = NULL;
841      }
842      *request_ret = 0;
843  
844      ret = nbd_receive_replies(s, handle);
845      if (ret < 0) {
846          error_setg(errp, "Connection closed");
847          return -EIO;
848      }
849      assert(s->ioc);
850  
851      assert(s->reply.handle == handle);
852  
853      if (nbd_reply_is_simple(&s->reply)) {
854          if (only_structured) {
855              error_setg(errp, "Protocol error: simple reply when structured "
856                               "reply chunk was expected");
857              return -EINVAL;
858          }
859  
860          *request_ret = -nbd_errno_to_system_errno(s->reply.simple.error);
861          if (*request_ret < 0 || !qiov) {
862              return 0;
863          }
864  
865          return qio_channel_readv_all(s->ioc, qiov->iov, qiov->niov,
866                                       errp) < 0 ? -EIO : 0;
867      }
868  
869      /* handle structured reply chunk */
870      assert(s->info.structured_reply);
871      chunk = &s->reply.structured;
872  
873      if (chunk->type == NBD_REPLY_TYPE_NONE) {
874          if (!(chunk->flags & NBD_REPLY_FLAG_DONE)) {
875              error_setg(errp, "Protocol error: NBD_REPLY_TYPE_NONE chunk without"
876                         " NBD_REPLY_FLAG_DONE flag set");
877              return -EINVAL;
878          }
879          if (chunk->length) {
880              error_setg(errp, "Protocol error: NBD_REPLY_TYPE_NONE chunk with"
881                         " nonzero length");
882              return -EINVAL;
883          }
884          return 0;
885      }
886  
887      if (chunk->type == NBD_REPLY_TYPE_OFFSET_DATA) {
888          if (!qiov) {
889              error_setg(errp, "Unexpected NBD_REPLY_TYPE_OFFSET_DATA chunk");
890              return -EINVAL;
891          }
892  
893          return nbd_co_receive_offset_data_payload(s, s->requests[i].offset,
894                                                    qiov, errp);
895      }
896  
897      if (nbd_reply_type_is_error(chunk->type)) {
898          payload = &local_payload;
899      }
900  
901      ret = nbd_co_receive_structured_payload(s, payload, errp);
902      if (ret < 0) {
903          return ret;
904      }
905  
906      if (nbd_reply_type_is_error(chunk->type)) {
907          ret = nbd_parse_error_payload(chunk, local_payload, request_ret, errp);
908          g_free(local_payload);
909          return ret;
910      }
911  
912      return 0;
913  }
914  
915  /*
916   * nbd_co_receive_one_chunk
917   * Read reply, wake up connection_co and set s->quit if needed.
918   * Return value is a fatal error code or normal nbd reply error code
919   */
920  static coroutine_fn int nbd_co_receive_one_chunk(
921          BDRVNBDState *s, uint64_t handle, bool only_structured,
922          int *request_ret, QEMUIOVector *qiov, NBDReply *reply, void **payload,
923          Error **errp)
924  {
925      int ret = nbd_co_do_receive_one_chunk(s, handle, only_structured,
926                                            request_ret, qiov, payload, errp);
927  
928      if (ret < 0) {
929          memset(reply, 0, sizeof(*reply));
930          nbd_channel_error(s, ret);
931      } else {
932          /* For assert at loop start in nbd_connection_entry */
933          *reply = s->reply;
934      }
935      s->reply.handle = 0;
936  
937      nbd_recv_coroutines_wake(s);
938  
939      return ret;
940  }
941  
942  typedef struct NBDReplyChunkIter {
943      int ret;
944      int request_ret;
945      Error *err;
946      bool done, only_structured;
947  } NBDReplyChunkIter;
948  
949  static void nbd_iter_channel_error(NBDReplyChunkIter *iter,
950                                     int ret, Error **local_err)
951  {
952      assert(local_err && *local_err);
953      assert(ret < 0);
954  
955      if (!iter->ret) {
956          iter->ret = ret;
957          error_propagate(&iter->err, *local_err);
958      } else {
959          error_free(*local_err);
960      }
961  
962      *local_err = NULL;
963  }
964  
965  static void nbd_iter_request_error(NBDReplyChunkIter *iter, int ret)
966  {
967      assert(ret < 0);
968  
969      if (!iter->request_ret) {
970          iter->request_ret = ret;
971      }
972  }
973  
974  /*
975   * NBD_FOREACH_REPLY_CHUNK
976   * The pointer stored in @payload requires g_free() to free it.
977   */
978  #define NBD_FOREACH_REPLY_CHUNK(s, iter, handle, structured, \
979                                  qiov, reply, payload) \
980      for (iter = (NBDReplyChunkIter) { .only_structured = structured }; \
981           nbd_reply_chunk_iter_receive(s, &iter, handle, qiov, reply, payload);)
982  
983  /*
984   * nbd_reply_chunk_iter_receive
985   * The pointer stored in @payload requires g_free() to free it.
986   */
987  static bool coroutine_fn nbd_reply_chunk_iter_receive(BDRVNBDState *s,
988                                                        NBDReplyChunkIter *iter,
989                                                        uint64_t handle,
990                                                        QEMUIOVector *qiov,
991                                                        NBDReply *reply,
992                                                        void **payload)
993  {
994      int ret, request_ret;
995      NBDReply local_reply;
996      NBDStructuredReplyChunk *chunk;
997      Error *local_err = NULL;
998  
999      if (iter->done) {
1000          /* Previous iteration was last. */
1001          goto break_loop;
1002      }
1003  
1004      if (reply == NULL) {
1005          reply = &local_reply;
1006      }
1007  
1008      ret = nbd_co_receive_one_chunk(s, handle, iter->only_structured,
1009                                     &request_ret, qiov, reply, payload,
1010                                     &local_err);
1011      if (ret < 0) {
1012          nbd_iter_channel_error(iter, ret, &local_err);
1013      } else if (request_ret < 0) {
1014          nbd_iter_request_error(iter, request_ret);
1015      }
1016  
1017      /* Do not execute the body of NBD_FOREACH_REPLY_CHUNK for simple reply. */
1018      if (nbd_reply_is_simple(reply) || iter->ret < 0) {
1019          goto break_loop;
1020      }
1021  
1022      chunk = &reply->structured;
1023      iter->only_structured = true;
1024  
1025      if (chunk->type == NBD_REPLY_TYPE_NONE) {
1026          /* NBD_REPLY_FLAG_DONE is already checked in nbd_co_receive_one_chunk */
1027          assert(chunk->flags & NBD_REPLY_FLAG_DONE);
1028          goto break_loop;
1029      }
1030  
1031      if (chunk->flags & NBD_REPLY_FLAG_DONE) {
1032          /* This iteration is last. */
1033          iter->done = true;
1034      }
1035  
1036      /* Execute the loop body */
1037      return true;
1038  
1039  break_loop:
1040      qemu_mutex_lock(&s->requests_lock);
1041      s->requests[HANDLE_TO_INDEX(s, handle)].coroutine = NULL;
1042      s->in_flight--;
1043      qemu_co_queue_next(&s->free_sema);
1044      qemu_mutex_unlock(&s->requests_lock);
1045  
1046      return false;
1047  }
1048  
1049  static int coroutine_fn nbd_co_receive_return_code(BDRVNBDState *s, uint64_t handle,
1050                                                     int *request_ret, Error **errp)
1051  {
1052      NBDReplyChunkIter iter;
1053  
1054      NBD_FOREACH_REPLY_CHUNK(s, iter, handle, false, NULL, NULL, NULL) {
1055          /* nbd_reply_chunk_iter_receive does all the work */
1056      }
1057  
1058      error_propagate(errp, iter.err);
1059      *request_ret = iter.request_ret;
1060      return iter.ret;
1061  }
1062  
1063  static int coroutine_fn nbd_co_receive_cmdread_reply(BDRVNBDState *s, uint64_t handle,
1064                                                       uint64_t offset, QEMUIOVector *qiov,
1065                                                       int *request_ret, Error **errp)
1066  {
1067      NBDReplyChunkIter iter;
1068      NBDReply reply;
1069      void *payload = NULL;
1070      Error *local_err = NULL;
1071  
1072      NBD_FOREACH_REPLY_CHUNK(s, iter, handle, s->info.structured_reply,
1073                              qiov, &reply, &payload)
1074      {
1075          int ret;
1076          NBDStructuredReplyChunk *chunk = &reply.structured;
1077  
1078          assert(nbd_reply_is_structured(&reply));
1079  
1080          switch (chunk->type) {
1081          case NBD_REPLY_TYPE_OFFSET_DATA:
1082              /*
1083               * special cased in nbd_co_receive_one_chunk, data is already
1084               * in qiov
1085               */
1086              break;
1087          case NBD_REPLY_TYPE_OFFSET_HOLE:
1088              ret = nbd_parse_offset_hole_payload(s, &reply.structured, payload,
1089                                                  offset, qiov, &local_err);
1090              if (ret < 0) {
1091                  nbd_channel_error(s, ret);
1092                  nbd_iter_channel_error(&iter, ret, &local_err);
1093              }
1094              break;
1095          default:
1096              if (!nbd_reply_type_is_error(chunk->type)) {
1097                  /* not allowed reply type */
1098                  nbd_channel_error(s, -EINVAL);
1099                  error_setg(&local_err,
1100                             "Unexpected reply type: %d (%s) for CMD_READ",
1101                             chunk->type, nbd_reply_type_lookup(chunk->type));
1102                  nbd_iter_channel_error(&iter, -EINVAL, &local_err);
1103              }
1104          }
1105  
1106          g_free(payload);
1107          payload = NULL;
1108      }
1109  
1110      error_propagate(errp, iter.err);
1111      *request_ret = iter.request_ret;
1112      return iter.ret;
1113  }
1114  
1115  static int coroutine_fn nbd_co_receive_blockstatus_reply(BDRVNBDState *s,
1116                                                           uint64_t handle, uint64_t length,
1117                                                           NBDExtent *extent,
1118                                                           int *request_ret, Error **errp)
1119  {
1120      NBDReplyChunkIter iter;
1121      NBDReply reply;
1122      void *payload = NULL;
1123      Error *local_err = NULL;
1124      bool received = false;
1125  
1126      assert(!extent->length);
1127      NBD_FOREACH_REPLY_CHUNK(s, iter, handle, false, NULL, &reply, &payload) {
1128          int ret;
1129          NBDStructuredReplyChunk *chunk = &reply.structured;
1130  
1131          assert(nbd_reply_is_structured(&reply));
1132  
1133          switch (chunk->type) {
1134          case NBD_REPLY_TYPE_BLOCK_STATUS:
1135              if (received) {
1136                  nbd_channel_error(s, -EINVAL);
1137                  error_setg(&local_err, "Several BLOCK_STATUS chunks in reply");
1138                  nbd_iter_channel_error(&iter, -EINVAL, &local_err);
1139              }
1140              received = true;
1141  
1142              ret = nbd_parse_blockstatus_payload(s, &reply.structured,
1143                                                  payload, length, extent,
1144                                                  &local_err);
1145              if (ret < 0) {
1146                  nbd_channel_error(s, ret);
1147                  nbd_iter_channel_error(&iter, ret, &local_err);
1148              }
1149              break;
1150          default:
1151              if (!nbd_reply_type_is_error(chunk->type)) {
1152                  nbd_channel_error(s, -EINVAL);
1153                  error_setg(&local_err,
1154                             "Unexpected reply type: %d (%s) "
1155                             "for CMD_BLOCK_STATUS",
1156                             chunk->type, nbd_reply_type_lookup(chunk->type));
1157                  nbd_iter_channel_error(&iter, -EINVAL, &local_err);
1158              }
1159          }
1160  
1161          g_free(payload);
1162          payload = NULL;
1163      }
1164  
1165      if (!extent->length && !iter.request_ret) {
1166          error_setg(&local_err, "Server did not reply with any status extents");
1167          nbd_iter_channel_error(&iter, -EIO, &local_err);
1168      }
1169  
1170      error_propagate(errp, iter.err);
1171      *request_ret = iter.request_ret;
1172      return iter.ret;
1173  }
1174  
1175  static int coroutine_fn GRAPH_RDLOCK
1176  nbd_co_request(BlockDriverState *bs, NBDRequest *request,
1177                 QEMUIOVector *write_qiov)
1178  {
1179      int ret, request_ret;
1180      Error *local_err = NULL;
1181      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1182  
1183      assert(request->type != NBD_CMD_READ);
1184      if (write_qiov) {
1185          assert(request->type == NBD_CMD_WRITE);
1186          assert(request->len == iov_size(write_qiov->iov, write_qiov->niov));
1187      } else {
1188          assert(request->type != NBD_CMD_WRITE);
1189      }
1190  
1191      do {
1192          ret = nbd_co_send_request(bs, request, write_qiov);
1193          if (ret < 0) {
1194              continue;
1195          }
1196  
1197          ret = nbd_co_receive_return_code(s, request->handle,
1198                                           &request_ret, &local_err);
1199          if (local_err) {
1200              trace_nbd_co_request_fail(request->from, request->len,
1201                                        request->handle, request->flags,
1202                                        request->type,
1203                                        nbd_cmd_lookup(request->type),
1204                                        ret, error_get_pretty(local_err));
1205              error_free(local_err);
1206              local_err = NULL;
1207          }
1208      } while (ret < 0 && nbd_client_will_reconnect(s));
1209  
1210      return ret ? ret : request_ret;
1211  }
1212  
1213  static int coroutine_fn GRAPH_RDLOCK
1214  nbd_client_co_preadv(BlockDriverState *bs, int64_t offset, int64_t bytes,
1215                       QEMUIOVector *qiov, BdrvRequestFlags flags)
1216  {
1217      int ret, request_ret;
1218      Error *local_err = NULL;
1219      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1220      NBDRequest request = {
1221          .type = NBD_CMD_READ,
1222          .from = offset,
1223          .len = bytes,
1224      };
1225  
1226      assert(bytes <= NBD_MAX_BUFFER_SIZE);
1227  
1228      if (!bytes) {
1229          return 0;
1230      }
1231      /*
1232       * Work around the fact that the block layer doesn't do
1233       * byte-accurate sizing yet - if the read exceeds the server's
1234       * advertised size because the block layer rounded size up, then
1235       * truncate the request to the server and tail-pad with zero.
1236       */
1237      if (offset >= s->info.size) {
1238          assert(bytes < BDRV_SECTOR_SIZE);
1239          qemu_iovec_memset(qiov, 0, 0, bytes);
1240          return 0;
1241      }
1242      if (offset + bytes > s->info.size) {
1243          uint64_t slop = offset + bytes - s->info.size;
1244  
1245          assert(slop < BDRV_SECTOR_SIZE);
1246          qemu_iovec_memset(qiov, bytes - slop, 0, slop);
1247          request.len -= slop;
1248      }
1249  
1250      do {
1251          ret = nbd_co_send_request(bs, &request, NULL);
1252          if (ret < 0) {
1253              continue;
1254          }
1255  
1256          ret = nbd_co_receive_cmdread_reply(s, request.handle, offset, qiov,
1257                                             &request_ret, &local_err);
1258          if (local_err) {
1259              trace_nbd_co_request_fail(request.from, request.len, request.handle,
1260                                        request.flags, request.type,
1261                                        nbd_cmd_lookup(request.type),
1262                                        ret, error_get_pretty(local_err));
1263              error_free(local_err);
1264              local_err = NULL;
1265          }
1266      } while (ret < 0 && nbd_client_will_reconnect(s));
1267  
1268      return ret ? ret : request_ret;
1269  }
1270  
1271  static int coroutine_fn GRAPH_RDLOCK
1272  nbd_client_co_pwritev(BlockDriverState *bs, int64_t offset, int64_t bytes,
1273                        QEMUIOVector *qiov, BdrvRequestFlags flags)
1274  {
1275      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1276      NBDRequest request = {
1277          .type = NBD_CMD_WRITE,
1278          .from = offset,
1279          .len = bytes,
1280      };
1281  
1282      assert(!(s->info.flags & NBD_FLAG_READ_ONLY));
1283      if (flags & BDRV_REQ_FUA) {
1284          assert(s->info.flags & NBD_FLAG_SEND_FUA);
1285          request.flags |= NBD_CMD_FLAG_FUA;
1286      }
1287  
1288      assert(bytes <= NBD_MAX_BUFFER_SIZE);
1289  
1290      if (!bytes) {
1291          return 0;
1292      }
1293      return nbd_co_request(bs, &request, qiov);
1294  }
1295  
1296  static int coroutine_fn GRAPH_RDLOCK
1297  nbd_client_co_pwrite_zeroes(BlockDriverState *bs, int64_t offset, int64_t bytes,
1298                              BdrvRequestFlags flags)
1299  {
1300      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1301      NBDRequest request = {
1302          .type = NBD_CMD_WRITE_ZEROES,
1303          .from = offset,
1304          .len = bytes,  /* .len is uint32_t actually */
1305      };
1306  
1307      assert(bytes <= UINT32_MAX); /* rely on max_pwrite_zeroes */
1308  
1309      assert(!(s->info.flags & NBD_FLAG_READ_ONLY));
1310      if (!(s->info.flags & NBD_FLAG_SEND_WRITE_ZEROES)) {
1311          return -ENOTSUP;
1312      }
1313  
1314      if (flags & BDRV_REQ_FUA) {
1315          assert(s->info.flags & NBD_FLAG_SEND_FUA);
1316          request.flags |= NBD_CMD_FLAG_FUA;
1317      }
1318      if (!(flags & BDRV_REQ_MAY_UNMAP)) {
1319          request.flags |= NBD_CMD_FLAG_NO_HOLE;
1320      }
1321      if (flags & BDRV_REQ_NO_FALLBACK) {
1322          assert(s->info.flags & NBD_FLAG_SEND_FAST_ZERO);
1323          request.flags |= NBD_CMD_FLAG_FAST_ZERO;
1324      }
1325  
1326      if (!bytes) {
1327          return 0;
1328      }
1329      return nbd_co_request(bs, &request, NULL);
1330  }
1331  
1332  static int coroutine_fn GRAPH_RDLOCK nbd_client_co_flush(BlockDriverState *bs)
1333  {
1334      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1335      NBDRequest request = { .type = NBD_CMD_FLUSH };
1336  
1337      if (!(s->info.flags & NBD_FLAG_SEND_FLUSH)) {
1338          return 0;
1339      }
1340  
1341      request.from = 0;
1342      request.len = 0;
1343  
1344      return nbd_co_request(bs, &request, NULL);
1345  }
1346  
1347  static int coroutine_fn GRAPH_RDLOCK
1348  nbd_client_co_pdiscard(BlockDriverState *bs, int64_t offset, int64_t bytes)
1349  {
1350      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1351      NBDRequest request = {
1352          .type = NBD_CMD_TRIM,
1353          .from = offset,
1354          .len = bytes, /* len is uint32_t */
1355      };
1356  
1357      assert(bytes <= UINT32_MAX); /* rely on max_pdiscard */
1358  
1359      assert(!(s->info.flags & NBD_FLAG_READ_ONLY));
1360      if (!(s->info.flags & NBD_FLAG_SEND_TRIM) || !bytes) {
1361          return 0;
1362      }
1363  
1364      return nbd_co_request(bs, &request, NULL);
1365  }
1366  
1367  static int coroutine_fn GRAPH_RDLOCK nbd_client_co_block_status(
1368          BlockDriverState *bs, bool want_zero, int64_t offset, int64_t bytes,
1369          int64_t *pnum, int64_t *map, BlockDriverState **file)
1370  {
1371      int ret, request_ret;
1372      NBDExtent extent = { 0 };
1373      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1374      Error *local_err = NULL;
1375  
1376      NBDRequest request = {
1377          .type = NBD_CMD_BLOCK_STATUS,
1378          .from = offset,
1379          .len = MIN(QEMU_ALIGN_DOWN(INT_MAX, bs->bl.request_alignment),
1380                     MIN(bytes, s->info.size - offset)),
1381          .flags = NBD_CMD_FLAG_REQ_ONE,
1382      };
1383  
1384      if (!s->info.base_allocation) {
1385          *pnum = bytes;
1386          *map = offset;
1387          *file = bs;
1388          return BDRV_BLOCK_DATA | BDRV_BLOCK_OFFSET_VALID;
1389      }
1390  
1391      /*
1392       * Work around the fact that the block layer doesn't do
1393       * byte-accurate sizing yet - if the status request exceeds the
1394       * server's advertised size because the block layer rounded size
1395       * up, we truncated the request to the server (above), or are
1396       * called on just the hole.
1397       */
1398      if (offset >= s->info.size) {
1399          *pnum = bytes;
1400          assert(bytes < BDRV_SECTOR_SIZE);
1401          /* Intentionally don't report offset_valid for the hole */
1402          return BDRV_BLOCK_ZERO;
1403      }
1404  
1405      if (s->info.min_block) {
1406          assert(QEMU_IS_ALIGNED(request.len, s->info.min_block));
1407      }
1408      do {
1409          ret = nbd_co_send_request(bs, &request, NULL);
1410          if (ret < 0) {
1411              continue;
1412          }
1413  
1414          ret = nbd_co_receive_blockstatus_reply(s, request.handle, bytes,
1415                                                 &extent, &request_ret,
1416                                                 &local_err);
1417          if (local_err) {
1418              trace_nbd_co_request_fail(request.from, request.len, request.handle,
1419                                        request.flags, request.type,
1420                                        nbd_cmd_lookup(request.type),
1421                                        ret, error_get_pretty(local_err));
1422              error_free(local_err);
1423              local_err = NULL;
1424          }
1425      } while (ret < 0 && nbd_client_will_reconnect(s));
1426  
1427      if (ret < 0 || request_ret < 0) {
1428          return ret ? ret : request_ret;
1429      }
1430  
1431      assert(extent.length);
1432      *pnum = extent.length;
1433      *map = offset;
1434      *file = bs;
1435      return (extent.flags & NBD_STATE_HOLE ? 0 : BDRV_BLOCK_DATA) |
1436          (extent.flags & NBD_STATE_ZERO ? BDRV_BLOCK_ZERO : 0) |
1437          BDRV_BLOCK_OFFSET_VALID;
1438  }
1439  
1440  static int nbd_client_reopen_prepare(BDRVReopenState *state,
1441                                       BlockReopenQueue *queue, Error **errp)
1442  {
1443      BDRVNBDState *s = (BDRVNBDState *)state->bs->opaque;
1444  
1445      if ((state->flags & BDRV_O_RDWR) && (s->info.flags & NBD_FLAG_READ_ONLY)) {
1446          error_setg(errp, "Can't reopen read-only NBD mount as read/write");
1447          return -EACCES;
1448      }
1449      return 0;
1450  }
1451  
1452  static void nbd_yank(void *opaque)
1453  {
1454      BlockDriverState *bs = opaque;
1455      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1456  
1457      QEMU_LOCK_GUARD(&s->requests_lock);
1458      qio_channel_shutdown(s->ioc, QIO_CHANNEL_SHUTDOWN_BOTH, NULL);
1459      s->state = NBD_CLIENT_QUIT;
1460  }
1461  
1462  static void nbd_client_close(BlockDriverState *bs)
1463  {
1464      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1465      NBDRequest request = { .type = NBD_CMD_DISC };
1466  
1467      if (s->ioc) {
1468          nbd_send_request(s->ioc, &request);
1469      }
1470  
1471      nbd_teardown_connection(bs);
1472  }
1473  
1474  
1475  /*
1476   * Parse nbd_open options
1477   */
1478  
1479  static int nbd_parse_uri(const char *filename, QDict *options)
1480  {
1481      URI *uri;
1482      const char *p;
1483      QueryParams *qp = NULL;
1484      int ret = 0;
1485      bool is_unix;
1486  
1487      uri = uri_parse(filename);
1488      if (!uri) {
1489          return -EINVAL;
1490      }
1491  
1492      /* transport */
1493      if (!g_strcmp0(uri->scheme, "nbd")) {
1494          is_unix = false;
1495      } else if (!g_strcmp0(uri->scheme, "nbd+tcp")) {
1496          is_unix = false;
1497      } else if (!g_strcmp0(uri->scheme, "nbd+unix")) {
1498          is_unix = true;
1499      } else {
1500          ret = -EINVAL;
1501          goto out;
1502      }
1503  
1504      p = uri->path ? uri->path : "";
1505      if (p[0] == '/') {
1506          p++;
1507      }
1508      if (p[0]) {
1509          qdict_put_str(options, "export", p);
1510      }
1511  
1512      qp = query_params_parse(uri->query);
1513      if (qp->n > 1 || (is_unix && !qp->n) || (!is_unix && qp->n)) {
1514          ret = -EINVAL;
1515          goto out;
1516      }
1517  
1518      if (is_unix) {
1519          /* nbd+unix:///export?socket=path */
1520          if (uri->server || uri->port || strcmp(qp->p[0].name, "socket")) {
1521              ret = -EINVAL;
1522              goto out;
1523          }
1524          qdict_put_str(options, "server.type", "unix");
1525          qdict_put_str(options, "server.path", qp->p[0].value);
1526      } else {
1527          QString *host;
1528          char *port_str;
1529  
1530          /* nbd[+tcp]://host[:port]/export */
1531          if (!uri->server) {
1532              ret = -EINVAL;
1533              goto out;
1534          }
1535  
1536          /* strip braces from literal IPv6 address */
1537          if (uri->server[0] == '[') {
1538              host = qstring_from_substr(uri->server, 1,
1539                                         strlen(uri->server) - 1);
1540          } else {
1541              host = qstring_from_str(uri->server);
1542          }
1543  
1544          qdict_put_str(options, "server.type", "inet");
1545          qdict_put(options, "server.host", host);
1546  
1547          port_str = g_strdup_printf("%d", uri->port ?: NBD_DEFAULT_PORT);
1548          qdict_put_str(options, "server.port", port_str);
1549          g_free(port_str);
1550      }
1551  
1552  out:
1553      if (qp) {
1554          query_params_free(qp);
1555      }
1556      uri_free(uri);
1557      return ret;
1558  }
1559  
1560  static bool nbd_has_filename_options_conflict(QDict *options, Error **errp)
1561  {
1562      const QDictEntry *e;
1563  
1564      for (e = qdict_first(options); e; e = qdict_next(options, e)) {
1565          if (!strcmp(e->key, "host") ||
1566              !strcmp(e->key, "port") ||
1567              !strcmp(e->key, "path") ||
1568              !strcmp(e->key, "export") ||
1569              strstart(e->key, "server.", NULL))
1570          {
1571              error_setg(errp, "Option '%s' cannot be used with a file name",
1572                         e->key);
1573              return true;
1574          }
1575      }
1576  
1577      return false;
1578  }
1579  
1580  static void nbd_parse_filename(const char *filename, QDict *options,
1581                                 Error **errp)
1582  {
1583      g_autofree char *file = NULL;
1584      char *export_name;
1585      const char *host_spec;
1586      const char *unixpath;
1587  
1588      if (nbd_has_filename_options_conflict(options, errp)) {
1589          return;
1590      }
1591  
1592      if (strstr(filename, "://")) {
1593          int ret = nbd_parse_uri(filename, options);
1594          if (ret < 0) {
1595              error_setg(errp, "No valid URL specified");
1596          }
1597          return;
1598      }
1599  
1600      file = g_strdup(filename);
1601  
1602      export_name = strstr(file, EN_OPTSTR);
1603      if (export_name) {
1604          if (export_name[strlen(EN_OPTSTR)] == 0) {
1605              return;
1606          }
1607          export_name[0] = 0; /* truncate 'file' */
1608          export_name += strlen(EN_OPTSTR);
1609  
1610          qdict_put_str(options, "export", export_name);
1611      }
1612  
1613      /* extract the host_spec - fail if it's not nbd:... */
1614      if (!strstart(file, "nbd:", &host_spec)) {
1615          error_setg(errp, "File name string for NBD must start with 'nbd:'");
1616          return;
1617      }
1618  
1619      if (!*host_spec) {
1620          return;
1621      }
1622  
1623      /* are we a UNIX or TCP socket? */
1624      if (strstart(host_spec, "unix:", &unixpath)) {
1625          qdict_put_str(options, "server.type", "unix");
1626          qdict_put_str(options, "server.path", unixpath);
1627      } else {
1628          InetSocketAddress *addr = g_new(InetSocketAddress, 1);
1629  
1630          if (inet_parse(addr, host_spec, errp)) {
1631              goto out_inet;
1632          }
1633  
1634          qdict_put_str(options, "server.type", "inet");
1635          qdict_put_str(options, "server.host", addr->host);
1636          qdict_put_str(options, "server.port", addr->port);
1637      out_inet:
1638          qapi_free_InetSocketAddress(addr);
1639      }
1640  }
1641  
1642  static bool nbd_process_legacy_socket_options(QDict *output_options,
1643                                                QemuOpts *legacy_opts,
1644                                                Error **errp)
1645  {
1646      const char *path = qemu_opt_get(legacy_opts, "path");
1647      const char *host = qemu_opt_get(legacy_opts, "host");
1648      const char *port = qemu_opt_get(legacy_opts, "port");
1649      const QDictEntry *e;
1650  
1651      if (!path && !host && !port) {
1652          return true;
1653      }
1654  
1655      for (e = qdict_first(output_options); e; e = qdict_next(output_options, e))
1656      {
1657          if (strstart(e->key, "server.", NULL)) {
1658              error_setg(errp, "Cannot use 'server' and path/host/port at the "
1659                         "same time");
1660              return false;
1661          }
1662      }
1663  
1664      if (path && host) {
1665          error_setg(errp, "path and host may not be used at the same time");
1666          return false;
1667      } else if (path) {
1668          if (port) {
1669              error_setg(errp, "port may not be used without host");
1670              return false;
1671          }
1672  
1673          qdict_put_str(output_options, "server.type", "unix");
1674          qdict_put_str(output_options, "server.path", path);
1675      } else if (host) {
1676          qdict_put_str(output_options, "server.type", "inet");
1677          qdict_put_str(output_options, "server.host", host);
1678          qdict_put_str(output_options, "server.port",
1679                        port ?: stringify(NBD_DEFAULT_PORT));
1680      }
1681  
1682      return true;
1683  }
1684  
1685  static SocketAddress *nbd_config(BDRVNBDState *s, QDict *options,
1686                                   Error **errp)
1687  {
1688      SocketAddress *saddr = NULL;
1689      QDict *addr = NULL;
1690      Visitor *iv = NULL;
1691  
1692      qdict_extract_subqdict(options, &addr, "server.");
1693      if (!qdict_size(addr)) {
1694          error_setg(errp, "NBD server address missing");
1695          goto done;
1696      }
1697  
1698      iv = qobject_input_visitor_new_flat_confused(addr, errp);
1699      if (!iv) {
1700          goto done;
1701      }
1702  
1703      if (!visit_type_SocketAddress(iv, NULL, &saddr, errp)) {
1704          goto done;
1705      }
1706  
1707      if (socket_address_parse_named_fd(saddr, errp) < 0) {
1708          qapi_free_SocketAddress(saddr);
1709          saddr = NULL;
1710          goto done;
1711      }
1712  
1713  done:
1714      qobject_unref(addr);
1715      visit_free(iv);
1716      return saddr;
1717  }
1718  
1719  static QCryptoTLSCreds *nbd_get_tls_creds(const char *id, Error **errp)
1720  {
1721      Object *obj;
1722      QCryptoTLSCreds *creds;
1723  
1724      obj = object_resolve_path_component(
1725          object_get_objects_root(), id);
1726      if (!obj) {
1727          error_setg(errp, "No TLS credentials with id '%s'",
1728                     id);
1729          return NULL;
1730      }
1731      creds = (QCryptoTLSCreds *)
1732          object_dynamic_cast(obj, TYPE_QCRYPTO_TLS_CREDS);
1733      if (!creds) {
1734          error_setg(errp, "Object with id '%s' is not TLS credentials",
1735                     id);
1736          return NULL;
1737      }
1738  
1739      if (!qcrypto_tls_creds_check_endpoint(creds,
1740                                            QCRYPTO_TLS_CREDS_ENDPOINT_CLIENT,
1741                                            errp)) {
1742          return NULL;
1743      }
1744      object_ref(obj);
1745      return creds;
1746  }
1747  
1748  
1749  static QemuOptsList nbd_runtime_opts = {
1750      .name = "nbd",
1751      .head = QTAILQ_HEAD_INITIALIZER(nbd_runtime_opts.head),
1752      .desc = {
1753          {
1754              .name = "host",
1755              .type = QEMU_OPT_STRING,
1756              .help = "TCP host to connect to",
1757          },
1758          {
1759              .name = "port",
1760              .type = QEMU_OPT_STRING,
1761              .help = "TCP port to connect to",
1762          },
1763          {
1764              .name = "path",
1765              .type = QEMU_OPT_STRING,
1766              .help = "Unix socket path to connect to",
1767          },
1768          {
1769              .name = "export",
1770              .type = QEMU_OPT_STRING,
1771              .help = "Name of the NBD export to open",
1772          },
1773          {
1774              .name = "tls-creds",
1775              .type = QEMU_OPT_STRING,
1776              .help = "ID of the TLS credentials to use",
1777          },
1778          {
1779              .name = "tls-hostname",
1780              .type = QEMU_OPT_STRING,
1781              .help = "Override hostname for validating TLS x509 certificate",
1782          },
1783          {
1784              .name = "x-dirty-bitmap",
1785              .type = QEMU_OPT_STRING,
1786              .help = "experimental: expose named dirty bitmap in place of "
1787                      "block status",
1788          },
1789          {
1790              .name = "reconnect-delay",
1791              .type = QEMU_OPT_NUMBER,
1792              .help = "On an unexpected disconnect, the nbd client tries to "
1793                      "connect again until succeeding or encountering a serious "
1794                      "error.  During the first @reconnect-delay seconds, all "
1795                      "requests are paused and will be rerun on a successful "
1796                      "reconnect. After that time, any delayed requests and all "
1797                      "future requests before a successful reconnect will "
1798                      "immediately fail. Default 0",
1799          },
1800          {
1801              .name = "open-timeout",
1802              .type = QEMU_OPT_NUMBER,
1803              .help = "In seconds. If zero, the nbd driver tries the connection "
1804                      "only once, and fails to open if the connection fails. "
1805                      "If non-zero, the nbd driver will repeat connection "
1806                      "attempts until successful or until @open-timeout seconds "
1807                      "have elapsed. Default 0",
1808          },
1809          { /* end of list */ }
1810      },
1811  };
1812  
1813  static int nbd_process_options(BlockDriverState *bs, QDict *options,
1814                                 Error **errp)
1815  {
1816      BDRVNBDState *s = bs->opaque;
1817      QemuOpts *opts;
1818      int ret = -EINVAL;
1819  
1820      opts = qemu_opts_create(&nbd_runtime_opts, NULL, 0, &error_abort);
1821      if (!qemu_opts_absorb_qdict(opts, options, errp)) {
1822          goto error;
1823      }
1824  
1825      /* Translate @host, @port, and @path to a SocketAddress */
1826      if (!nbd_process_legacy_socket_options(options, opts, errp)) {
1827          goto error;
1828      }
1829  
1830      /* Pop the config into our state object. Exit if invalid. */
1831      s->saddr = nbd_config(s, options, errp);
1832      if (!s->saddr) {
1833          goto error;
1834      }
1835  
1836      s->export = g_strdup(qemu_opt_get(opts, "export"));
1837      if (s->export && strlen(s->export) > NBD_MAX_STRING_SIZE) {
1838          error_setg(errp, "export name too long to send to server");
1839          goto error;
1840      }
1841  
1842      s->tlscredsid = g_strdup(qemu_opt_get(opts, "tls-creds"));
1843      if (s->tlscredsid) {
1844          s->tlscreds = nbd_get_tls_creds(s->tlscredsid, errp);
1845          if (!s->tlscreds) {
1846              goto error;
1847          }
1848  
1849          s->tlshostname = g_strdup(qemu_opt_get(opts, "tls-hostname"));
1850          if (!s->tlshostname &&
1851              s->saddr->type == SOCKET_ADDRESS_TYPE_INET) {
1852              s->tlshostname = g_strdup(s->saddr->u.inet.host);
1853          }
1854      }
1855  
1856      s->x_dirty_bitmap = g_strdup(qemu_opt_get(opts, "x-dirty-bitmap"));
1857      if (s->x_dirty_bitmap && strlen(s->x_dirty_bitmap) > NBD_MAX_STRING_SIZE) {
1858          error_setg(errp, "x-dirty-bitmap query too long to send to server");
1859          goto error;
1860      }
1861  
1862      s->reconnect_delay = qemu_opt_get_number(opts, "reconnect-delay", 0);
1863      s->open_timeout = qemu_opt_get_number(opts, "open-timeout", 0);
1864  
1865      ret = 0;
1866  
1867   error:
1868      qemu_opts_del(opts);
1869      return ret;
1870  }
1871  
1872  static int nbd_open(BlockDriverState *bs, QDict *options, int flags,
1873                      Error **errp)
1874  {
1875      int ret;
1876      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1877  
1878      s->bs = bs;
1879      qemu_mutex_init(&s->requests_lock);
1880      qemu_co_queue_init(&s->free_sema);
1881      qemu_co_mutex_init(&s->send_mutex);
1882      qemu_co_mutex_init(&s->receive_mutex);
1883  
1884      if (!yank_register_instance(BLOCKDEV_YANK_INSTANCE(bs->node_name), errp)) {
1885          return -EEXIST;
1886      }
1887  
1888      ret = nbd_process_options(bs, options, errp);
1889      if (ret < 0) {
1890          goto fail;
1891      }
1892  
1893      s->conn = nbd_client_connection_new(s->saddr, true, s->export,
1894                                          s->x_dirty_bitmap, s->tlscreds,
1895                                          s->tlshostname);
1896  
1897      if (s->open_timeout) {
1898          nbd_client_connection_enable_retry(s->conn);
1899          open_timer_init(s, qemu_clock_get_ns(QEMU_CLOCK_REALTIME) +
1900                          s->open_timeout * NANOSECONDS_PER_SECOND);
1901      }
1902  
1903      s->state = NBD_CLIENT_CONNECTING_WAIT;
1904      ret = nbd_do_establish_connection(bs, true, errp);
1905      if (ret < 0) {
1906          goto fail;
1907      }
1908  
1909      /*
1910       * The connect attempt is done, so we no longer need this timer.
1911       * Delete it, because we do not want it to be around when this node
1912       * is drained or closed.
1913       */
1914      open_timer_del(s);
1915  
1916      nbd_client_connection_enable_retry(s->conn);
1917  
1918      return 0;
1919  
1920  fail:
1921      open_timer_del(s);
1922      nbd_clear_bdrvstate(bs);
1923      return ret;
1924  }
1925  
1926  static void nbd_refresh_limits(BlockDriverState *bs, Error **errp)
1927  {
1928      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
1929      uint32_t min = s->info.min_block;
1930      uint32_t max = MIN_NON_ZERO(NBD_MAX_BUFFER_SIZE, s->info.max_block);
1931  
1932      /*
1933       * If the server did not advertise an alignment:
1934       * - a size that is not sector-aligned implies that an alignment
1935       *   of 1 can be used to access those tail bytes
1936       * - advertisement of block status requires an alignment of 1, so
1937       *   that we don't violate block layer constraints that block
1938       *   status is always aligned (as we can't control whether the
1939       *   server will report sub-sector extents, such as a hole at EOF
1940       *   on an unaligned POSIX file)
1941       * - otherwise, assume the server is so old that we are safer avoiding
1942       *   sub-sector requests
1943       */
1944      if (!min) {
1945          min = (!QEMU_IS_ALIGNED(s->info.size, BDRV_SECTOR_SIZE) ||
1946                 s->info.base_allocation) ? 1 : BDRV_SECTOR_SIZE;
1947      }
1948  
1949      bs->bl.request_alignment = min;
1950      bs->bl.max_pdiscard = QEMU_ALIGN_DOWN(INT_MAX, min);
1951      bs->bl.max_pwrite_zeroes = max;
1952      bs->bl.max_transfer = max;
1953  
1954      if (s->info.opt_block &&
1955          s->info.opt_block > bs->bl.opt_transfer) {
1956          bs->bl.opt_transfer = s->info.opt_block;
1957      }
1958  }
1959  
1960  static void nbd_close(BlockDriverState *bs)
1961  {
1962      nbd_client_close(bs);
1963      nbd_clear_bdrvstate(bs);
1964  }
1965  
1966  /*
1967   * NBD cannot truncate, but if the caller asks to truncate to the same size, or
1968   * to a smaller size with exact=false, there is no reason to fail the
1969   * operation.
1970   *
1971   * Preallocation mode is ignored since it does not seems useful to fail when
1972   * we never change anything.
1973   */
1974  static int coroutine_fn nbd_co_truncate(BlockDriverState *bs, int64_t offset,
1975                                          bool exact, PreallocMode prealloc,
1976                                          BdrvRequestFlags flags, Error **errp)
1977  {
1978      BDRVNBDState *s = bs->opaque;
1979  
1980      if (offset != s->info.size && exact) {
1981          error_setg(errp, "Cannot resize NBD nodes");
1982          return -ENOTSUP;
1983      }
1984  
1985      if (offset > s->info.size) {
1986          error_setg(errp, "Cannot grow NBD nodes");
1987          return -EINVAL;
1988      }
1989  
1990      return 0;
1991  }
1992  
1993  static int64_t coroutine_fn nbd_co_getlength(BlockDriverState *bs)
1994  {
1995      BDRVNBDState *s = bs->opaque;
1996  
1997      return s->info.size;
1998  }
1999  
2000  static void nbd_refresh_filename(BlockDriverState *bs)
2001  {
2002      BDRVNBDState *s = bs->opaque;
2003      const char *host = NULL, *port = NULL, *path = NULL;
2004      size_t len = 0;
2005  
2006      if (s->saddr->type == SOCKET_ADDRESS_TYPE_INET) {
2007          const InetSocketAddress *inet = &s->saddr->u.inet;
2008          if (!inet->has_ipv4 && !inet->has_ipv6 && !inet->has_to) {
2009              host = inet->host;
2010              port = inet->port;
2011          }
2012      } else if (s->saddr->type == SOCKET_ADDRESS_TYPE_UNIX) {
2013          path = s->saddr->u.q_unix.path;
2014      } /* else can't represent as pseudo-filename */
2015  
2016      if (path && s->export) {
2017          len = snprintf(bs->exact_filename, sizeof(bs->exact_filename),
2018                         "nbd+unix:///%s?socket=%s", s->export, path);
2019      } else if (path && !s->export) {
2020          len = snprintf(bs->exact_filename, sizeof(bs->exact_filename),
2021                         "nbd+unix://?socket=%s", path);
2022      } else if (host && s->export) {
2023          len = snprintf(bs->exact_filename, sizeof(bs->exact_filename),
2024                         "nbd://%s:%s/%s", host, port, s->export);
2025      } else if (host && !s->export) {
2026          len = snprintf(bs->exact_filename, sizeof(bs->exact_filename),
2027                         "nbd://%s:%s", host, port);
2028      }
2029      if (len >= sizeof(bs->exact_filename)) {
2030          /* Name is too long to represent exactly, so leave it empty. */
2031          bs->exact_filename[0] = '\0';
2032      }
2033  }
2034  
2035  static char *nbd_dirname(BlockDriverState *bs, Error **errp)
2036  {
2037      /* The generic bdrv_dirname() implementation is able to work out some
2038       * directory name for NBD nodes, but that would be wrong. So far there is no
2039       * specification for how "export paths" would work, so NBD does not have
2040       * directory names. */
2041      error_setg(errp, "Cannot generate a base directory for NBD nodes");
2042      return NULL;
2043  }
2044  
2045  static const char *const nbd_strong_runtime_opts[] = {
2046      "path",
2047      "host",
2048      "port",
2049      "export",
2050      "tls-creds",
2051      "tls-hostname",
2052      "server.",
2053  
2054      NULL
2055  };
2056  
2057  static void nbd_cancel_in_flight(BlockDriverState *bs)
2058  {
2059      BDRVNBDState *s = (BDRVNBDState *)bs->opaque;
2060  
2061      reconnect_delay_timer_del(s);
2062  
2063      qemu_mutex_lock(&s->requests_lock);
2064      if (s->state == NBD_CLIENT_CONNECTING_WAIT) {
2065          s->state = NBD_CLIENT_CONNECTING_NOWAIT;
2066      }
2067      qemu_mutex_unlock(&s->requests_lock);
2068  
2069      nbd_co_establish_connection_cancel(s->conn);
2070  }
2071  
2072  static void nbd_attach_aio_context(BlockDriverState *bs,
2073                                     AioContext *new_context)
2074  {
2075      BDRVNBDState *s = bs->opaque;
2076  
2077      /* The open_timer is used only during nbd_open() */
2078      assert(!s->open_timer);
2079  
2080      /*
2081       * The reconnect_delay_timer is scheduled in I/O paths when the
2082       * connection is lost, to cancel the reconnection attempt after a
2083       * given time.  Once this attempt is done (successfully or not),
2084       * nbd_reconnect_attempt() ensures the timer is deleted before the
2085       * respective I/O request is resumed.
2086       * Since the AioContext can only be changed when a node is drained,
2087       * the reconnect_delay_timer cannot be active here.
2088       */
2089      assert(!s->reconnect_delay_timer);
2090  
2091      if (s->ioc) {
2092          qio_channel_attach_aio_context(s->ioc, new_context);
2093      }
2094  }
2095  
2096  static void nbd_detach_aio_context(BlockDriverState *bs)
2097  {
2098      BDRVNBDState *s = bs->opaque;
2099  
2100      assert(!s->open_timer);
2101      assert(!s->reconnect_delay_timer);
2102  
2103      if (s->ioc) {
2104          qio_channel_detach_aio_context(s->ioc);
2105      }
2106  }
2107  
2108  static BlockDriver bdrv_nbd = {
2109      .format_name                = "nbd",
2110      .protocol_name              = "nbd",
2111      .instance_size              = sizeof(BDRVNBDState),
2112      .bdrv_parse_filename        = nbd_parse_filename,
2113      .bdrv_co_create_opts        = bdrv_co_create_opts_simple,
2114      .create_opts                = &bdrv_create_opts_simple,
2115      .bdrv_file_open             = nbd_open,
2116      .bdrv_reopen_prepare        = nbd_client_reopen_prepare,
2117      .bdrv_co_preadv             = nbd_client_co_preadv,
2118      .bdrv_co_pwritev            = nbd_client_co_pwritev,
2119      .bdrv_co_pwrite_zeroes      = nbd_client_co_pwrite_zeroes,
2120      .bdrv_close                 = nbd_close,
2121      .bdrv_co_flush_to_os        = nbd_client_co_flush,
2122      .bdrv_co_pdiscard           = nbd_client_co_pdiscard,
2123      .bdrv_refresh_limits        = nbd_refresh_limits,
2124      .bdrv_co_truncate           = nbd_co_truncate,
2125      .bdrv_co_getlength          = nbd_co_getlength,
2126      .bdrv_refresh_filename      = nbd_refresh_filename,
2127      .bdrv_co_block_status       = nbd_client_co_block_status,
2128      .bdrv_dirname               = nbd_dirname,
2129      .strong_runtime_opts        = nbd_strong_runtime_opts,
2130      .bdrv_cancel_in_flight      = nbd_cancel_in_flight,
2131  
2132      .bdrv_attach_aio_context    = nbd_attach_aio_context,
2133      .bdrv_detach_aio_context    = nbd_detach_aio_context,
2134  };
2135  
2136  static BlockDriver bdrv_nbd_tcp = {
2137      .format_name                = "nbd",
2138      .protocol_name              = "nbd+tcp",
2139      .instance_size              = sizeof(BDRVNBDState),
2140      .bdrv_parse_filename        = nbd_parse_filename,
2141      .bdrv_co_create_opts        = bdrv_co_create_opts_simple,
2142      .create_opts                = &bdrv_create_opts_simple,
2143      .bdrv_file_open             = nbd_open,
2144      .bdrv_reopen_prepare        = nbd_client_reopen_prepare,
2145      .bdrv_co_preadv             = nbd_client_co_preadv,
2146      .bdrv_co_pwritev            = nbd_client_co_pwritev,
2147      .bdrv_co_pwrite_zeroes      = nbd_client_co_pwrite_zeroes,
2148      .bdrv_close                 = nbd_close,
2149      .bdrv_co_flush_to_os        = nbd_client_co_flush,
2150      .bdrv_co_pdiscard           = nbd_client_co_pdiscard,
2151      .bdrv_refresh_limits        = nbd_refresh_limits,
2152      .bdrv_co_truncate           = nbd_co_truncate,
2153      .bdrv_co_getlength          = nbd_co_getlength,
2154      .bdrv_refresh_filename      = nbd_refresh_filename,
2155      .bdrv_co_block_status       = nbd_client_co_block_status,
2156      .bdrv_dirname               = nbd_dirname,
2157      .strong_runtime_opts        = nbd_strong_runtime_opts,
2158      .bdrv_cancel_in_flight      = nbd_cancel_in_flight,
2159  
2160      .bdrv_attach_aio_context    = nbd_attach_aio_context,
2161      .bdrv_detach_aio_context    = nbd_detach_aio_context,
2162  };
2163  
2164  static BlockDriver bdrv_nbd_unix = {
2165      .format_name                = "nbd",
2166      .protocol_name              = "nbd+unix",
2167      .instance_size              = sizeof(BDRVNBDState),
2168      .bdrv_parse_filename        = nbd_parse_filename,
2169      .bdrv_co_create_opts        = bdrv_co_create_opts_simple,
2170      .create_opts                = &bdrv_create_opts_simple,
2171      .bdrv_file_open             = nbd_open,
2172      .bdrv_reopen_prepare        = nbd_client_reopen_prepare,
2173      .bdrv_co_preadv             = nbd_client_co_preadv,
2174      .bdrv_co_pwritev            = nbd_client_co_pwritev,
2175      .bdrv_co_pwrite_zeroes      = nbd_client_co_pwrite_zeroes,
2176      .bdrv_close                 = nbd_close,
2177      .bdrv_co_flush_to_os        = nbd_client_co_flush,
2178      .bdrv_co_pdiscard           = nbd_client_co_pdiscard,
2179      .bdrv_refresh_limits        = nbd_refresh_limits,
2180      .bdrv_co_truncate           = nbd_co_truncate,
2181      .bdrv_co_getlength          = nbd_co_getlength,
2182      .bdrv_refresh_filename      = nbd_refresh_filename,
2183      .bdrv_co_block_status       = nbd_client_co_block_status,
2184      .bdrv_dirname               = nbd_dirname,
2185      .strong_runtime_opts        = nbd_strong_runtime_opts,
2186      .bdrv_cancel_in_flight      = nbd_cancel_in_flight,
2187  
2188      .bdrv_attach_aio_context    = nbd_attach_aio_context,
2189      .bdrv_detach_aio_context    = nbd_detach_aio_context,
2190  };
2191  
2192  static void bdrv_nbd_init(void)
2193  {
2194      bdrv_register(&bdrv_nbd);
2195      bdrv_register(&bdrv_nbd_tcp);
2196      bdrv_register(&bdrv_nbd_unix);
2197  }
2198  
2199  block_init(bdrv_nbd_init);
2200