lib/librte_vhost/vhost_user.c

   1 /*-
   2  *   BSD LICENSE
   3  *
   4  *   Copyright(c) 2010-2016 Intel Corporation. All rights reserved.
   5  *   All rights reserved.
   6  *
   7  *   Redistribution and use in source and binary forms, with or without
   8  *   modification, are permitted provided that the following conditions
   9  *   are met:
  10  *
  11  *     * Redistributions of source code must retain the above copyright
  12  *       notice, this list of conditions and the following disclaimer.
  13  *     * Redistributions in binary form must reproduce the above copyright
  14  *       notice, this list of conditions and the following disclaimer in
  15  *       the documentation and/or other materials provided with the
  16  *       distribution.
  17  *     * Neither the name of Intel Corporation nor the names of its
  18  *       contributors may be used to endorse or promote products derived
  19  *       from this software without specific prior written permission.
  20  *
  21  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  22  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  23  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  24  *   A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  25  *   OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  26  *   SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  27  *   LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  28  *   DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  29  *   THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  30  *   (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  31  *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #include <stdint.h>
  35 #include <stdio.h>
  36 #include <stdlib.h>
  37 #include <string.h>
  38 #include <unistd.h>
  39 #include <sys/mman.h>
  40 #include <sys/types.h>
  41 #include <sys/stat.h>
  42 #include <assert.h>
  43 #ifdef RTE_LIBRTE_VHOST_NUMA
  44 #include <numaif.h>
  45 #endif
  46
  47 #include <rte_common.h>
  48 #include <rte_malloc.h>
  49 #include <rte_log.h>
  50
  51 #include "vhost.h"
  52 #include "vhost_user.h"
  53
  54 static const char *vhost_message_str[VHOST_USER_MAX] = {
  55         [VHOST_USER_NONE] = "VHOST_USER_NONE",
  56         [VHOST_USER_GET_FEATURES] = "VHOST_USER_GET_FEATURES",
  57         [VHOST_USER_SET_FEATURES] = "VHOST_USER_SET_FEATURES",
  58         [VHOST_USER_SET_OWNER] = "VHOST_USER_SET_OWNER",
  59         [VHOST_USER_RESET_OWNER] = "VHOST_USER_RESET_OWNER",
  60         [VHOST_USER_SET_MEM_TABLE] = "VHOST_USER_SET_MEM_TABLE",
  61         [VHOST_USER_SET_LOG_BASE] = "VHOST_USER_SET_LOG_BASE",
  62         [VHOST_USER_SET_LOG_FD] = "VHOST_USER_SET_LOG_FD",
  63         [VHOST_USER_SET_VRING_NUM] = "VHOST_USER_SET_VRING_NUM",
  64         [VHOST_USER_SET_VRING_ADDR] = "VHOST_USER_SET_VRING_ADDR",
  65         [VHOST_USER_SET_VRING_BASE] = "VHOST_USER_SET_VRING_BASE",
  66         [VHOST_USER_GET_VRING_BASE] = "VHOST_USER_GET_VRING_BASE",
  67         [VHOST_USER_SET_VRING_KICK] = "VHOST_USER_SET_VRING_KICK",
  68         [VHOST_USER_SET_VRING_CALL] = "VHOST_USER_SET_VRING_CALL",
  69         [VHOST_USER_SET_VRING_ERR]  = "VHOST_USER_SET_VRING_ERR",
  70         [VHOST_USER_GET_PROTOCOL_FEATURES]  = "VHOST_USER_GET_PROTOCOL_FEATURES",
  71         [VHOST_USER_SET_PROTOCOL_FEATURES]  = "VHOST_USER_SET_PROTOCOL_FEATURES",
  72         [VHOST_USER_GET_QUEUE_NUM]  = "VHOST_USER_GET_QUEUE_NUM",
  73         [VHOST_USER_SET_VRING_ENABLE]  = "VHOST_USER_SET_VRING_ENABLE",
  74         [VHOST_USER_SEND_RARP]  = "VHOST_USER_SEND_RARP",
  75 };
  76
  77 static uint64_t
  78 get_blk_size(int fd)
  79 {
  80         struct stat stat;
  81         int ret;
  82
  83         ret = fstat(fd, &stat);
  84         return ret == -1 ? (uint64_t)-1 : (uint64_t)stat.st_blksize;
  85 }
  86
  87 static void
  88 free_mem_region(struct virtio_net *dev)
  89 {
  90         uint32_t i;
  91         struct virtio_memory_region *reg;
  92
  93         if (!dev || !dev->mem)
  94                 return;
  95
  96         for (i = 0; i < dev->mem->nregions; i++) {
  97                 reg = &dev->mem->regions[i];
  98                 if (reg->host_user_addr) {
  99                         munmap(reg->mmap_addr, reg->mmap_size);
 100                         close(reg->fd);
 101                 }
 102         }
 103 }
 104
 105 void
 106 vhost_backend_cleanup(struct virtio_net *dev)
 107 {
 108         if (dev->mem) {
 109                 free_mem_region(dev);
 110                 rte_free(dev->mem);
 111                 dev->mem = NULL;
 112         }
 113
 114         free(dev->guest_pages);
 115         dev->guest_pages = NULL;
 116
 117         if (dev->log_addr) {
 118                 munmap((void *)(uintptr_t)dev->log_addr, dev->log_size);
 119                 dev->log_addr = 0;
 120         }
 121 }
 122
 123 /*
 124  * This function just returns success at the moment unless
 125  * the device hasn't been initialised.
 126  */
 127 static int
 128 vhost_user_set_owner(void)
 129 {
 130         return 0;
 131 }
 132
 133 static int
 134 vhost_user_reset_owner(struct virtio_net *dev)
 135 {
 136         if (dev->flags & VIRTIO_DEV_RUNNING) {
 137                 dev->flags &= ~VIRTIO_DEV_RUNNING;
 138                 notify_ops->destroy_device(dev->vid);
 139         }
 140
 141         cleanup_device(dev, 0);
 142         reset_device(dev);
 143         return 0;
 144 }
 145
 146 /*
 147  * The features that we support are requested.
 148  */
 149 static uint64_t
 150 vhost_user_get_features(void)
 151 {
 152         return VHOST_FEATURES;
 153 }
 154
 155 /*
 156  * We receive the negotiated features supported by us and the virtio device.
 157  */
 158 static int
 159 vhost_user_set_features(struct virtio_net *dev, uint64_t features)
 160 {
 161         if (features & ~VHOST_FEATURES)
 162                 return -1;
 163
 164         dev->features = features;
 165         if (dev->features &
 166                 ((1 << VIRTIO_NET_F_MRG_RXBUF) | (1ULL << VIRTIO_F_VERSION_1))) {
 167                 dev->vhost_hlen = sizeof(struct virtio_net_hdr_mrg_rxbuf);
 168         } else {
 169                 dev->vhost_hlen = sizeof(struct virtio_net_hdr);
 170         }
 171         LOG_DEBUG(VHOST_CONFIG,
 172                 "(%d) mergeable RX buffers %s, virtio 1 %s\n",
 173                 dev->vid,
 174                 (dev->features & (1 << VIRTIO_NET_F_MRG_RXBUF)) ? "on" : "off",
 175                 (dev->features & (1ULL << VIRTIO_F_VERSION_1)) ? "on" : "off");
 176
 177         return 0;
 178 }
 179
 180 /*
 181  * The virtio device sends us the size of the descriptor ring.
 182  */
 183 static int
 184 vhost_user_set_vring_num(struct virtio_net *dev,
 185                          struct vhost_vring_state *state)
 186 {
 187         struct vhost_virtqueue *vq = dev->virtqueue[state->index];
 188
 189         vq->size = state->num;
 190
 191         if (dev->dequeue_zero_copy) {
 192                 vq->nr_zmbuf = 0;
 193                 vq->last_zmbuf_idx = 0;
 194                 vq->zmbuf_size = vq->size;
 195                 vq->zmbufs = rte_zmalloc(NULL, vq->zmbuf_size *
 196                                          sizeof(struct zcopy_mbuf), 0);
 197                 if (vq->zmbufs == NULL) {
 198                         RTE_LOG(WARNING, VHOST_CONFIG,
 199                                 "failed to allocate mem for zero copy; "
 200                                 "zero copy is force disabled\n");
 201                         dev->dequeue_zero_copy = 0;
 202                 }
 203         }
 204
 205         vq->shadow_used_ring = rte_malloc(NULL,
 206                                 vq->size * sizeof(struct vring_used_elem),
 207                                 RTE_CACHE_LINE_SIZE);
 208         if (!vq->shadow_used_ring) {
 209                 RTE_LOG(ERR, VHOST_CONFIG,
 210                         "failed to allocate memory for shadow used ring.\n");
 211                 return -1;
 212         }
 213
 214         return 0;
 215 }
 216
 217 /*
 218  * Reallocate virtio_dev and vhost_virtqueue data structure to make them on the
 219  * same numa node as the memory of vring descriptor.
 220  */
 221 #ifdef RTE_LIBRTE_VHOST_NUMA
 222 static struct virtio_net*
 223 numa_realloc(struct virtio_net *dev, int index)
 224 {
 225         int oldnode, newnode;
 226         struct virtio_net *old_dev;
 227         struct vhost_virtqueue *old_vq, *vq;
 228         int ret;
 229
 230         /*
 231          * vq is allocated on pairs, we should try to do realloc
 232          * on first queue of one queue pair only.
 233          */
 234         if (index % VIRTIO_QNUM != 0)
 235                 return dev;
 236
 237         old_dev = dev;
 238         vq = old_vq = dev->virtqueue[index];
 239
 240         ret = get_mempolicy(&newnode, NULL, 0, old_vq->desc,
 241                             MPOL_F_NODE | MPOL_F_ADDR);
 242
 243         /* check if we need to reallocate vq */
 244         ret |= get_mempolicy(&oldnode, NULL, 0, old_vq,
 245                              MPOL_F_NODE | MPOL_F_ADDR);
 246         if (ret) {
 247                 RTE_LOG(ERR, VHOST_CONFIG,
 248                         "Unable to get vq numa information.\n");
 249                 return dev;
 250         }
 251         if (oldnode != newnode) {
 252                 RTE_LOG(INFO, VHOST_CONFIG,
 253                         "reallocate vq from %d to %d node\n", oldnode, newnode);
 254                 vq = rte_malloc_socket(NULL, sizeof(*vq) * VIRTIO_QNUM, 0,
 255                                        newnode);
 256                 if (!vq)
 257                         return dev;
 258
 259                 memcpy(vq, old_vq, sizeof(*vq) * VIRTIO_QNUM);
 260                 rte_free(old_vq);
 261         }
 262
 263         /* check if we need to reallocate dev */
 264         ret = get_mempolicy(&oldnode, NULL, 0, old_dev,
 265                             MPOL_F_NODE | MPOL_F_ADDR);
 266         if (ret) {
 267                 RTE_LOG(ERR, VHOST_CONFIG,
 268                         "Unable to get dev numa information.\n");
 269                 goto out;
 270         }
 271         if (oldnode != newnode) {
 272                 RTE_LOG(INFO, VHOST_CONFIG,
 273                         "reallocate dev from %d to %d node\n",
 274                         oldnode, newnode);
 275                 dev = rte_malloc_socket(NULL, sizeof(*dev), 0, newnode);
 276                 if (!dev) {
 277                         dev = old_dev;
 278                         goto out;
 279                 }
 280
 281                 memcpy(dev, old_dev, sizeof(*dev));
 282                 rte_free(old_dev);
 283         }
 284
 285 out:
 286         dev->virtqueue[index] = vq;
 287         dev->virtqueue[index + 1] = vq + 1;
 288         vhost_devices[dev->vid] = dev;
 289
 290         return dev;
 291 }
 292 #else
 293 static struct virtio_net*
 294 numa_realloc(struct virtio_net *dev, int index __rte_unused)
 295 {
 296         return dev;
 297 }
 298 #endif
 299
 300 /*
 301  * Converts QEMU virtual address to Vhost virtual address. This function is
 302  * used to convert the ring addresses to our address space.
 303  */
 304 static uint64_t
 305 qva_to_vva(struct virtio_net *dev, uint64_t qva)
 306 {
 307         struct virtio_memory_region *reg;
 308         uint32_t i;
 309
 310         /* Find the region where the address lives. */
 311         for (i = 0; i < dev->mem->nregions; i++) {
 312                 reg = &dev->mem->regions[i];
 313
 314                 if (qva >= reg->guest_user_addr &&
 315                     qva <  reg->guest_user_addr + reg->size) {
 316                         return qva - reg->guest_user_addr +
 317                                reg->host_user_addr;
 318                 }
 319         }
 320
 321         return 0;
 322 }
 323
 324 /*
 325  * The virtio device sends us the desc, used and avail ring addresses.
 326  * This function then converts these to our address space.
 327  */
 328 static int
 329 vhost_user_set_vring_addr(struct virtio_net *dev, struct vhost_vring_addr *addr)
 330 {
 331         struct vhost_virtqueue *vq;
 332
 333         if (dev->mem == NULL)
 334                 return -1;
 335
 336         /* addr->index refers to the queue index. The txq 1, rxq is 0. */
 337         vq = dev->virtqueue[addr->index];
 338
 339         /* The addresses are converted from QEMU virtual to Vhost virtual. */
 340         vq->desc = (struct vring_desc *)(uintptr_t)qva_to_vva(dev,
 341                         addr->desc_user_addr);
 342         if (vq->desc == 0) {
 343                 RTE_LOG(ERR, VHOST_CONFIG,
 344                         "(%d) failed to find desc ring address.\n",
 345                         dev->vid);
 346                 return -1;
 347         }
 348
 349         dev = numa_realloc(dev, addr->index);
 350         vq = dev->virtqueue[addr->index];
 351
 352         vq->avail = (struct vring_avail *)(uintptr_t)qva_to_vva(dev,
 353                         addr->avail_user_addr);
 354         if (vq->avail == 0) {
 355                 RTE_LOG(ERR, VHOST_CONFIG,
 356                         "(%d) failed to find avail ring address.\n",
 357                         dev->vid);
 358                 return -1;
 359         }
 360
 361         vq->used = (struct vring_used *)(uintptr_t)qva_to_vva(dev,
 362                         addr->used_user_addr);
 363         if (vq->used == 0) {
 364                 RTE_LOG(ERR, VHOST_CONFIG,
 365                         "(%d) failed to find used ring address.\n",
 366                         dev->vid);
 367                 return -1;
 368         }
 369
 370         if (vq->last_used_idx != vq->used->idx) {
 371                 RTE_LOG(WARNING, VHOST_CONFIG,
 372                         "last_used_idx (%u) and vq->used->idx (%u) mismatches; "
 373                         "some packets maybe resent for Tx and dropped for Rx\n",
 374                         vq->last_used_idx, vq->used->idx);
 375                 vq->last_used_idx  = vq->used->idx;
 376                 vq->last_avail_idx = vq->used->idx;
 377         }
 378
 379         vq->log_guest_addr = addr->log_guest_addr;
 380
 381         LOG_DEBUG(VHOST_CONFIG, "(%d) mapped address desc: %p\n",
 382                         dev->vid, vq->desc);
 383         LOG_DEBUG(VHOST_CONFIG, "(%d) mapped address avail: %p\n",
 384                         dev->vid, vq->avail);
 385         LOG_DEBUG(VHOST_CONFIG, "(%d) mapped address used: %p\n",
 386                         dev->vid, vq->used);
 387         LOG_DEBUG(VHOST_CONFIG, "(%d) log_guest_addr: %" PRIx64 "\n",
 388                         dev->vid, vq->log_guest_addr);
 389
 390         return 0;
 391 }
 392
 393 /*
 394  * The virtio device sends us the available ring last used index.
 395  */
 396 static int
 397 vhost_user_set_vring_base(struct virtio_net *dev,
 398                           struct vhost_vring_state *state)
 399 {
 400         dev->virtqueue[state->index]->last_used_idx  = state->num;
 401         dev->virtqueue[state->index]->last_avail_idx = state->num;
 402
 403         return 0;
 404 }
 405
 406 static void
 407 add_one_guest_page(struct virtio_net *dev, uint64_t guest_phys_addr,
 408                    uint64_t host_phys_addr, uint64_t size)
 409 {
 410         struct guest_page *page, *last_page;
 411
 412         if (dev->nr_guest_pages == dev->max_guest_pages) {
 413                 dev->max_guest_pages *= 2;
 414                 dev->guest_pages = realloc(dev->guest_pages,
 415                                         dev->max_guest_pages * sizeof(*page));
 416         }
 417
 418         if (dev->nr_guest_pages > 0) {
 419                 last_page = &dev->guest_pages[dev->nr_guest_pages - 1];
 420                 /* merge if the two pages are continuous */
 421                 if (host_phys_addr == last_page->host_phys_addr +
 422                                       last_page->size) {
 423                         last_page->size += size;
 424                         return;
 425                 }
 426         }
 427
 428         page = &dev->guest_pages[dev->nr_guest_pages++];
 429         page->guest_phys_addr = guest_phys_addr;
 430         page->host_phys_addr  = host_phys_addr;
 431         page->size = size;
 432 }
 433
 434 static void
 435 add_guest_pages(struct virtio_net *dev, struct virtio_memory_region *reg,
 436                 uint64_t page_size)
 437 {
 438         uint64_t reg_size = reg->size;
 439         uint64_t host_user_addr  = reg->host_user_addr;
 440         uint64_t guest_phys_addr = reg->guest_phys_addr;
 441         uint64_t host_phys_addr;
 442         uint64_t size;
 443
 444         host_phys_addr = rte_mem_virt2phy((void *)(uintptr_t)host_user_addr);
 445         size = page_size - (guest_phys_addr & (page_size - 1));
 446         size = RTE_MIN(size, reg_size);
 447
 448         add_one_guest_page(dev, guest_phys_addr, host_phys_addr, size);
 449         host_user_addr  += size;
 450         guest_phys_addr += size;
 451         reg_size -= size;
 452
 453         while (reg_size > 0) {
 454                 size = RTE_MIN(reg_size, page_size);
 455                 host_phys_addr = rte_mem_virt2phy((void *)(uintptr_t)
 456                                                   host_user_addr);
 457                 add_one_guest_page(dev, guest_phys_addr, host_phys_addr, size);
 458
 459                 host_user_addr  += size;
 460                 guest_phys_addr += size;
 461                 reg_size -= size;
 462         }
 463 }
 464
 465 #ifdef RTE_LIBRTE_VHOST_DEBUG
 466 /* TODO: enable it only in debug mode? */
 467 static void
 468 dump_guest_pages(struct virtio_net *dev)
 469 {
 470         uint32_t i;
 471         struct guest_page *page;
 472
 473         for (i = 0; i < dev->nr_guest_pages; i++) {
 474                 page = &dev->guest_pages[i];
 475
 476                 RTE_LOG(INFO, VHOST_CONFIG,
 477                         "guest physical page region %u\n"
 478                         "\t guest_phys_addr: %" PRIx64 "\n"
 479                         "\t host_phys_addr : %" PRIx64 "\n"
 480                         "\t size           : %" PRIx64 "\n",
 481                         i,
 482                         page->guest_phys_addr,
 483                         page->host_phys_addr,
 484                         page->size);
 485         }
 486 }
 487 #else
 488 #define dump_guest_pages(dev)
 489 #endif
 490
 491 static int
 492 vhost_user_set_mem_table(struct virtio_net *dev, struct VhostUserMsg *pmsg)
 493 {
 494         struct VhostUserMemory memory = pmsg->payload.memory;
 495         struct virtio_memory_region *reg;
 496         void *mmap_addr;
 497         uint64_t mmap_size;
 498         uint64_t mmap_offset;
 499         uint64_t alignment;
 500         uint32_t i;
 501         int fd;
 502
 503         /* Remove from the data plane. */
 504         if (dev->flags & VIRTIO_DEV_RUNNING) {
 505                 dev->flags &= ~VIRTIO_DEV_RUNNING;
 506                 notify_ops->destroy_device(dev->vid);
 507         }
 508
 509         if (dev->mem) {
 510                 free_mem_region(dev);
 511                 rte_free(dev->mem);
 512                 dev->mem = NULL;
 513         }
 514
 515         dev->nr_guest_pages = 0;
 516         if (!dev->guest_pages) {
 517                 dev->max_guest_pages = 8;
 518                 dev->guest_pages = malloc(dev->max_guest_pages *
 519                                                 sizeof(struct guest_page));
 520         }
 521
 522         dev->mem = rte_zmalloc("vhost-mem-table", sizeof(struct virtio_memory) +
 523                 sizeof(struct virtio_memory_region) * memory.nregions, 0);
 524         if (dev->mem == NULL) {
 525                 RTE_LOG(ERR, VHOST_CONFIG,
 526                         "(%d) failed to allocate memory for dev->mem\n",
 527                         dev->vid);
 528                 return -1;
 529         }
 530         dev->mem->nregions = memory.nregions;
 531
 532         for (i = 0; i < memory.nregions; i++) {
 533                 fd  = pmsg->fds[i];
 534                 reg = &dev->mem->regions[i];
 535
 536                 reg->guest_phys_addr = memory.regions[i].guest_phys_addr;
 537                 reg->guest_user_addr = memory.regions[i].userspace_addr;
 538                 reg->size            = memory.regions[i].memory_size;
 539                 reg->fd              = fd;
 540
 541                 mmap_offset = memory.regions[i].mmap_offset;
 542                 mmap_size   = reg->size + mmap_offset;
 543
 544                 /* mmap() without flag of MAP_ANONYMOUS, should be called
 545                  * with length argument aligned with hugepagesz at older
 546                  * longterm version Linux, like 2.6.32 and 3.2.72, or
 547                  * mmap() will fail with EINVAL.
 548                  *
 549                  * to avoid failure, make sure in caller to keep length
 550                  * aligned.
 551                  */
 552                 alignment = get_blk_size(fd);
 553                 if (alignment == (uint64_t)-1) {
 554                         RTE_LOG(ERR, VHOST_CONFIG,
 555                                 "couldn't get hugepage size through fstat\n");
 556                         goto err_mmap;
 557                 }
 558                 mmap_size = RTE_ALIGN_CEIL(mmap_size, alignment);
 559
 560                 mmap_addr = mmap(NULL, mmap_size, PROT_READ | PROT_WRITE,
 561                                  MAP_SHARED | MAP_POPULATE, fd, 0);
 562
 563                 if (mmap_addr == MAP_FAILED) {
 564                         RTE_LOG(ERR, VHOST_CONFIG,
 565                                 "mmap region %u failed.\n", i);
 566                         goto err_mmap;
 567                 }
 568
 569                 reg->mmap_addr = mmap_addr;
 570                 reg->mmap_size = mmap_size;
 571                 reg->host_user_addr = (uint64_t)(uintptr_t)mmap_addr +
 572                                       mmap_offset;
 573
 574                 if (dev->dequeue_zero_copy)
 575                         add_guest_pages(dev, reg, alignment);
 576
 577                 RTE_LOG(INFO, VHOST_CONFIG,
 578                         "guest memory region %u, size: 0x%" PRIx64 "\n"
 579                         "\t guest physical addr: 0x%" PRIx64 "\n"
 580                         "\t guest virtual  addr: 0x%" PRIx64 "\n"
 581                         "\t host  virtual  addr: 0x%" PRIx64 "\n"
 582                         "\t mmap addr : 0x%" PRIx64 "\n"
 583                         "\t mmap size : 0x%" PRIx64 "\n"
 584                         "\t mmap align: 0x%" PRIx64 "\n"
 585                         "\t mmap off  : 0x%" PRIx64 "\n",
 586                         i, reg->size,
 587                         reg->guest_phys_addr,
 588                         reg->guest_user_addr,
 589                         reg->host_user_addr,
 590                         (uint64_t)(uintptr_t)mmap_addr,
 591                         mmap_size,
 592                         alignment,
 593                         mmap_offset);
 594         }
 595
 596         dump_guest_pages(dev);
 597
 598         return 0;
 599
 600 err_mmap:
 601         free_mem_region(dev);
 602         rte_free(dev->mem);
 603         dev->mem = NULL;
 604         return -1;
 605 }
 606
 607 static int
 608 vq_is_ready(struct vhost_virtqueue *vq)
 609 {
 610         return vq && vq->desc   &&
 611                vq->kickfd != VIRTIO_UNINITIALIZED_EVENTFD &&
 612                vq->callfd != VIRTIO_UNINITIALIZED_EVENTFD;
 613 }
 614
 615 static int
 616 virtio_is_ready(struct virtio_net *dev)
 617 {
 618         struct vhost_virtqueue *rvq, *tvq;
 619         uint32_t i;
 620
 621         for (i = 0; i < dev->virt_qp_nb; i++) {
 622                 rvq = dev->virtqueue[i * VIRTIO_QNUM + VIRTIO_RXQ];
 623                 tvq = dev->virtqueue[i * VIRTIO_QNUM + VIRTIO_TXQ];
 624
 625                 if (!vq_is_ready(rvq) || !vq_is_ready(tvq)) {
 626                         RTE_LOG(INFO, VHOST_CONFIG,
 627                                 "virtio is not ready for processing.\n");
 628                         return 0;
 629                 }
 630         }
 631
 632         RTE_LOG(INFO, VHOST_CONFIG,
 633                 "virtio is now ready for processing.\n");
 634         return 1;
 635 }
 636
 637 static void
 638 vhost_user_set_vring_call(struct virtio_net *dev, struct VhostUserMsg *pmsg)
 639 {
 640         struct vhost_vring_file file;
 641         struct vhost_virtqueue *vq;
 642         uint32_t cur_qp_idx;
 643
 644         file.index = pmsg->payload.u64 & VHOST_USER_VRING_IDX_MASK;
 645         if (pmsg->payload.u64 & VHOST_USER_VRING_NOFD_MASK)
 646                 file.fd = VIRTIO_INVALID_EVENTFD;
 647         else
 648                 file.fd = pmsg->fds[0];
 649         RTE_LOG(INFO, VHOST_CONFIG,
 650                 "vring call idx:%d file:%d\n", file.index, file.fd);
 651
 652         /*
 653          * FIXME: VHOST_SET_VRING_CALL is the first per-vring message
 654          * we get, so we do vring queue pair allocation here.
 655          */
 656         cur_qp_idx = file.index / VIRTIO_QNUM;
 657         if (cur_qp_idx + 1 > dev->virt_qp_nb) {
 658                 if (alloc_vring_queue_pair(dev, cur_qp_idx) < 0)
 659                         return;
 660         }
 661
 662         vq = dev->virtqueue[file.index];
 663         assert(vq != NULL);
 664
 665         if (vq->callfd >= 0)
 666                 close(vq->callfd);
 667
 668         vq->callfd = file.fd;
 669 }
 670
 671 /*
 672  *  In vhost-user, when we receive kick message, will test whether virtio
 673  *  device is ready for packet processing.
 674  */
 675 static void
 676 vhost_user_set_vring_kick(struct virtio_net *dev, struct VhostUserMsg *pmsg)
 677 {
 678         struct vhost_vring_file file;
 679         struct vhost_virtqueue *vq;
 680
 681         file.index = pmsg->payload.u64 & VHOST_USER_VRING_IDX_MASK;
 682         if (pmsg->payload.u64 & VHOST_USER_VRING_NOFD_MASK)
 683                 file.fd = VIRTIO_INVALID_EVENTFD;
 684         else
 685                 file.fd = pmsg->fds[0];
 686         RTE_LOG(INFO, VHOST_CONFIG,
 687                 "vring kick idx:%d file:%d\n", file.index, file.fd);
 688
 689         vq = dev->virtqueue[file.index];
 690         if (vq->kickfd >= 0)
 691                 close(vq->kickfd);
 692         vq->kickfd = file.fd;
 693
 694         if (virtio_is_ready(dev) && !(dev->flags & VIRTIO_DEV_RUNNING)) {
 695                 if (dev->dequeue_zero_copy) {
 696                         RTE_LOG(INFO, VHOST_CONFIG,
 697                                 "dequeue zero copy is enabled\n");
 698                 }
 699
 700                 if (notify_ops->new_device(dev->vid) == 0)
 701                         dev->flags |= VIRTIO_DEV_RUNNING;
 702         }
 703 }
 704
 705 static void
 706 free_zmbufs(struct vhost_virtqueue *vq)
 707 {
 708         struct zcopy_mbuf *zmbuf, *next;
 709
 710         for (zmbuf = TAILQ_FIRST(&vq->zmbuf_list);
 711              zmbuf != NULL; zmbuf = next) {
 712                 next = TAILQ_NEXT(zmbuf, next);
 713
 714                 rte_pktmbuf_free(zmbuf->mbuf);
 715                 TAILQ_REMOVE(&vq->zmbuf_list, zmbuf, next);
 716         }
 717
 718         rte_free(vq->zmbufs);
 719 }
 720
 721 /*
 722  * when virtio is stopped, qemu will send us the GET_VRING_BASE message.
 723  */
 724 static int
 725 vhost_user_get_vring_base(struct virtio_net *dev,
 726                           struct vhost_vring_state *state)
 727 {
 728         struct vhost_virtqueue *vq = dev->virtqueue[state->index];
 729
 730         /* We have to stop the queue (virtio) if it is running. */
 731         if (dev->flags & VIRTIO_DEV_RUNNING) {
 732                 dev->flags &= ~VIRTIO_DEV_RUNNING;
 733                 notify_ops->destroy_device(dev->vid);
 734         }
 735
 736         /* Here we are safe to get the last used index */
 737         state->num = vq->last_used_idx;
 738
 739         RTE_LOG(INFO, VHOST_CONFIG,
 740                 "vring base idx:%d file:%d\n", state->index, state->num);
 741         /*
 742          * Based on current qemu vhost-user implementation, this message is
 743          * sent and only sent in vhost_vring_stop.
 744          * TODO: cleanup the vring, it isn't usable since here.
 745          */
 746         if (vq->kickfd >= 0)
 747                 close(vq->kickfd);
 748
 749         vq->kickfd = VIRTIO_UNINITIALIZED_EVENTFD;
 750
 751         if (dev->dequeue_zero_copy)
 752                 free_zmbufs(vq);
 753         rte_free(vq->shadow_used_ring);
 754         vq->shadow_used_ring = NULL;
 755
 756         return 0;
 757 }
 758
 759 /*
 760  * when virtio queues are ready to work, qemu will send us to
 761  * enable the virtio queue pair.
 762  */
 763 static int
 764 vhost_user_set_vring_enable(struct virtio_net *dev,
 765                             struct vhost_vring_state *state)
 766 {
 767         int enable = (int)state->num;
 768
 769         RTE_LOG(INFO, VHOST_CONFIG,
 770                 "set queue enable: %d to qp idx: %d\n",
 771                 enable, state->index);
 772
 773         if (notify_ops->vring_state_changed)
 774                 notify_ops->vring_state_changed(dev->vid, state->index, enable);
 775
 776         dev->virtqueue[state->index]->enabled = enable;
 777
 778         return 0;
 779 }
 780
 781 static void
 782 vhost_user_set_protocol_features(struct virtio_net *dev,
 783                                  uint64_t protocol_features)
 784 {
 785         if (protocol_features & ~VHOST_USER_PROTOCOL_FEATURES)
 786                 return;
 787
 788         dev->protocol_features = protocol_features;
 789 }
 790
 791 static int
 792 vhost_user_set_log_base(struct virtio_net *dev, struct VhostUserMsg *msg)
 793 {
 794         int fd = msg->fds[0];
 795         uint64_t size, off;
 796         void *addr;
 797
 798         if (fd < 0) {
 799                 RTE_LOG(ERR, VHOST_CONFIG, "invalid log fd: %d\n", fd);
 800                 return -1;
 801         }
 802
 803         if (msg->size != sizeof(VhostUserLog)) {
 804                 RTE_LOG(ERR, VHOST_CONFIG,
 805                         "invalid log base msg size: %"PRId32" != %d\n",
 806                         msg->size, (int)sizeof(VhostUserLog));
 807                 return -1;
 808         }
 809
 810         size = msg->payload.log.mmap_size;
 811         off  = msg->payload.log.mmap_offset;
 812         RTE_LOG(INFO, VHOST_CONFIG,
 813                 "log mmap size: %"PRId64", offset: %"PRId64"\n",
 814                 size, off);
 815
 816         /*
 817          * mmap from 0 to workaround a hugepage mmap bug: mmap will
 818          * fail when offset is not page size aligned.
 819          */
 820         addr = mmap(0, size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0);
 821         close(fd);
 822         if (addr == MAP_FAILED) {
 823                 RTE_LOG(ERR, VHOST_CONFIG, "mmap log base failed!\n");
 824                 return -1;
 825         }
 826
 827         /*
 828          * Free previously mapped log memory on occasionally
 829          * multiple VHOST_USER_SET_LOG_BASE.
 830          */
 831         if (dev->log_addr) {
 832                 munmap((void *)(uintptr_t)dev->log_addr, dev->log_size);
 833         }
 834         dev->log_addr = (uint64_t)(uintptr_t)addr;
 835         dev->log_base = dev->log_addr + off;
 836         dev->log_size = size;
 837
 838         return 0;
 839 }
 840
 841 /*
 842  * An rarp packet is constructed and broadcasted to notify switches about
 843  * the new location of the migrated VM, so that packets from outside will
 844  * not be lost after migration.
 845  *
 846  * However, we don't actually "send" a rarp packet here, instead, we set
 847  * a flag 'broadcast_rarp' to let rte_vhost_dequeue_burst() inject it.
 848  */
 849 static int
 850 vhost_user_send_rarp(struct virtio_net *dev, struct VhostUserMsg *msg)
 851 {
 852         uint8_t *mac = (uint8_t *)&msg->payload.u64;
 853
 854         RTE_LOG(DEBUG, VHOST_CONFIG,
 855                 ":: mac: %02x:%02x:%02x:%02x:%02x:%02x\n",
 856                 mac[0], mac[1], mac[2], mac[3], mac[4], mac[5]);
 857         memcpy(dev->mac.addr_bytes, mac, 6);
 858
 859         /*
 860          * Set the flag to inject a RARP broadcast packet at
 861          * rte_vhost_dequeue_burst().
 862          *
 863          * rte_smp_wmb() is for making sure the mac is copied
 864          * before the flag is set.
 865          */
 866         rte_smp_wmb();
 867         rte_atomic16_set(&dev->broadcast_rarp, 1);
 868
 869         return 0;
 870 }
 871
 872 /* return bytes# of read on success or negative val on failure. */
 873 static int
 874 read_vhost_message(int sockfd, struct VhostUserMsg *msg)
 875 {
 876         int ret;
 877
 878         ret = read_fd_message(sockfd, (char *)msg, VHOST_USER_HDR_SIZE,
 879                 msg->fds, VHOST_MEMORY_MAX_NREGIONS);
 880         if (ret <= 0)
 881                 return ret;
 882
 883         if (msg && msg->size) {
 884                 if (msg->size > sizeof(msg->payload)) {
 885                         RTE_LOG(ERR, VHOST_CONFIG,
 886                                 "invalid msg size: %d\n", msg->size);
 887                         return -1;
 888                 }
 889                 ret = read(sockfd, &msg->payload, msg->size);
 890                 if (ret <= 0)
 891                         return ret;
 892                 if (ret != (int)msg->size) {
 893                         RTE_LOG(ERR, VHOST_CONFIG,
 894                                 "read control message failed\n");
 895                         return -1;
 896                 }
 897         }
 898
 899         return ret;
 900 }
 901
 902 static int
 903 send_vhost_message(int sockfd, struct VhostUserMsg *msg)
 904 {
 905         int ret;
 906
 907         if (!msg)
 908                 return 0;
 909
 910         msg->flags &= ~VHOST_USER_VERSION_MASK;
 911         msg->flags |= VHOST_USER_VERSION;
 912         msg->flags |= VHOST_USER_REPLY_MASK;
 913
 914         ret = send_fd_message(sockfd, (char *)msg,
 915                 VHOST_USER_HDR_SIZE + msg->size, NULL, 0);
 916
 917         return ret;
 918 }
 919
 920 int
 921 vhost_user_msg_handler(int vid, int fd)
 922 {
 923         struct virtio_net *dev;
 924         struct VhostUserMsg msg;
 925         int ret;
 926
 927         dev = get_device(vid);
 928         if (dev == NULL)
 929                 return -1;
 930
 931         ret = read_vhost_message(fd, &msg);
 932         if (ret <= 0 || msg.request >= VHOST_USER_MAX) {
 933                 if (ret < 0)
 934                         RTE_LOG(ERR, VHOST_CONFIG,
 935                                 "vhost read message failed\n");
 936                 else if (ret == 0)
 937                         RTE_LOG(INFO, VHOST_CONFIG,
 938                                 "vhost peer closed\n");
 939                 else
 940                         RTE_LOG(ERR, VHOST_CONFIG,
 941                                 "vhost read incorrect message\n");
 942
 943                 return -1;
 944         }
 945
 946         RTE_LOG(INFO, VHOST_CONFIG, "read message %s\n",
 947                 vhost_message_str[msg.request]);
 948         switch (msg.request) {
 949         case VHOST_USER_GET_FEATURES:
 950                 msg.payload.u64 = vhost_user_get_features();
 951                 msg.size = sizeof(msg.payload.u64);
 952                 send_vhost_message(fd, &msg);
 953                 break;
 954         case VHOST_USER_SET_FEATURES:
 955                 vhost_user_set_features(dev, msg.payload.u64);
 956                 break;
 957
 958         case VHOST_USER_GET_PROTOCOL_FEATURES:
 959                 msg.payload.u64 = VHOST_USER_PROTOCOL_FEATURES;
 960                 msg.size = sizeof(msg.payload.u64);
 961                 send_vhost_message(fd, &msg);
 962                 break;
 963         case VHOST_USER_SET_PROTOCOL_FEATURES:
 964                 vhost_user_set_protocol_features(dev, msg.payload.u64);
 965                 break;
 966
 967         case VHOST_USER_SET_OWNER:
 968                 vhost_user_set_owner();
 969                 break;
 970         case VHOST_USER_RESET_OWNER:
 971                 vhost_user_reset_owner(dev);
 972                 break;
 973
 974         case VHOST_USER_SET_MEM_TABLE:
 975                 vhost_user_set_mem_table(dev, &msg);
 976                 break;
 977
 978         case VHOST_USER_SET_LOG_BASE:
 979                 vhost_user_set_log_base(dev, &msg);
 980
 981                 /* it needs a reply */
 982                 msg.size = sizeof(msg.payload.u64);
 983                 send_vhost_message(fd, &msg);
 984                 break;
 985         case VHOST_USER_SET_LOG_FD:
 986                 close(msg.fds[0]);
 987                 RTE_LOG(INFO, VHOST_CONFIG, "not implemented.\n");
 988                 break;
 989
 990         case VHOST_USER_SET_VRING_NUM:
 991                 vhost_user_set_vring_num(dev, &msg.payload.state);
 992                 break;
 993         case VHOST_USER_SET_VRING_ADDR:
 994                 vhost_user_set_vring_addr(dev, &msg.payload.addr);
 995                 break;
 996         case VHOST_USER_SET_VRING_BASE:
 997                 vhost_user_set_vring_base(dev, &msg.payload.state);
 998                 break;
 999
1000         case VHOST_USER_GET_VRING_BASE:
1001                 ret = vhost_user_get_vring_base(dev, &msg.payload.state);
1002                 msg.size = sizeof(msg.payload.state);
1003                 send_vhost_message(fd, &msg);
1004                 break;
1005
1006         case VHOST_USER_SET_VRING_KICK:
1007                 vhost_user_set_vring_kick(dev, &msg);
1008                 break;
1009         case VHOST_USER_SET_VRING_CALL:
1010                 vhost_user_set_vring_call(dev, &msg);
1011                 break;
1012
1013         case VHOST_USER_SET_VRING_ERR:
1014                 if (!(msg.payload.u64 & VHOST_USER_VRING_NOFD_MASK))
1015                         close(msg.fds[0]);
1016                 RTE_LOG(INFO, VHOST_CONFIG, "not implemented\n");
1017                 break;
1018
1019         case VHOST_USER_GET_QUEUE_NUM:
1020                 msg.payload.u64 = VHOST_MAX_QUEUE_PAIRS;
1021                 msg.size = sizeof(msg.payload.u64);
1022                 send_vhost_message(fd, &msg);
1023                 break;
1024
1025         case VHOST_USER_SET_VRING_ENABLE:
1026                 vhost_user_set_vring_enable(dev, &msg.payload.state);
1027                 break;
1028         case VHOST_USER_SEND_RARP:
1029                 vhost_user_send_rarp(dev, &msg);
1030                 break;
1031
1032         default:
1033                 break;
1034
1035         }
1036
1037         return 0;
1038 }