qemu/tests/vhost-user-test.c
<<
>>
Prefs
   1/*
   2 * QTest testcase for the vhost-user
   3 *
   4 * Copyright (c) 2014 Virtual Open Systems Sarl.
   5 *
   6 * This work is licensed under the terms of the GNU GPL, version 2 or later.
   7 * See the COPYING file in the top-level directory.
   8 *
   9 */
  10
  11#include "qemu/osdep.h"
  12
  13#include "libqtest.h"
  14#include "qapi/error.h"
  15#include "qemu/option.h"
  16#include "qemu/range.h"
  17#include "qemu/sockets.h"
  18#include "sysemu/char.h"
  19#include "sysemu/sysemu.h"
  20#include "libqos/libqos.h"
  21#include "libqos/pci-pc.h"
  22#include "libqos/virtio-pci.h"
  23#include "qapi/error.h"
  24
  25#include "libqos/malloc-pc.h"
  26#include "hw/virtio/virtio-net.h"
  27
  28#include <linux/vhost.h>
  29#include <linux/virtio_ids.h>
  30#include <linux/virtio_net.h>
  31#include <sys/vfs.h>
  32
  33/* GLIB version compatibility flags */
  34#if !GLIB_CHECK_VERSION(2, 26, 0)
  35#define G_TIME_SPAN_SECOND              (G_GINT64_CONSTANT(1000000))
  36#endif
  37
  38#if GLIB_CHECK_VERSION(2, 28, 0)
  39#define HAVE_MONOTONIC_TIME
  40#endif
  41
  42#define QEMU_CMD_MEM    " -m %d -object memory-backend-file,id=mem,size=%dM,"\
  43                        "mem-path=%s,share=on -numa node,memdev=mem"
  44#define QEMU_CMD_CHR    " -chardev socket,id=%s,path=%s%s"
  45#define QEMU_CMD_NETDEV " -netdev vhost-user,id=net0,chardev=%s,vhostforce"
  46#define QEMU_CMD_NET    " -device virtio-net-pci,netdev=net0"
  47
  48#define QEMU_CMD        QEMU_CMD_MEM QEMU_CMD_CHR \
  49                        QEMU_CMD_NETDEV QEMU_CMD_NET
  50
  51#define HUGETLBFS_MAGIC       0x958458f6
  52
  53/*********** FROM hw/virtio/vhost-user.c *************************************/
  54
  55#define VHOST_MEMORY_MAX_NREGIONS    8
  56
  57#define VHOST_USER_F_PROTOCOL_FEATURES 30
  58#define VHOST_USER_PROTOCOL_F_MQ 0
  59#define VHOST_USER_PROTOCOL_F_LOG_SHMFD 1
  60
  61#define VHOST_LOG_PAGE 0x1000
  62
  63typedef enum VhostUserRequest {
  64    VHOST_USER_NONE = 0,
  65    VHOST_USER_GET_FEATURES = 1,
  66    VHOST_USER_SET_FEATURES = 2,
  67    VHOST_USER_SET_OWNER = 3,
  68    VHOST_USER_RESET_OWNER = 4,
  69    VHOST_USER_SET_MEM_TABLE = 5,
  70    VHOST_USER_SET_LOG_BASE = 6,
  71    VHOST_USER_SET_LOG_FD = 7,
  72    VHOST_USER_SET_VRING_NUM = 8,
  73    VHOST_USER_SET_VRING_ADDR = 9,
  74    VHOST_USER_SET_VRING_BASE = 10,
  75    VHOST_USER_GET_VRING_BASE = 11,
  76    VHOST_USER_SET_VRING_KICK = 12,
  77    VHOST_USER_SET_VRING_CALL = 13,
  78    VHOST_USER_SET_VRING_ERR = 14,
  79    VHOST_USER_GET_PROTOCOL_FEATURES = 15,
  80    VHOST_USER_SET_PROTOCOL_FEATURES = 16,
  81    VHOST_USER_GET_QUEUE_NUM = 17,
  82    VHOST_USER_SET_VRING_ENABLE = 18,
  83    VHOST_USER_MAX
  84} VhostUserRequest;
  85
  86typedef struct VhostUserMemoryRegion {
  87    uint64_t guest_phys_addr;
  88    uint64_t memory_size;
  89    uint64_t userspace_addr;
  90    uint64_t mmap_offset;
  91} VhostUserMemoryRegion;
  92
  93typedef struct VhostUserMemory {
  94    uint32_t nregions;
  95    uint32_t padding;
  96    VhostUserMemoryRegion regions[VHOST_MEMORY_MAX_NREGIONS];
  97} VhostUserMemory;
  98
  99typedef struct VhostUserLog {
 100    uint64_t mmap_size;
 101    uint64_t mmap_offset;
 102} VhostUserLog;
 103
 104typedef struct VhostUserMsg {
 105    VhostUserRequest request;
 106
 107#define VHOST_USER_VERSION_MASK     (0x3)
 108#define VHOST_USER_REPLY_MASK       (0x1<<2)
 109    uint32_t flags;
 110    uint32_t size; /* the following payload size */
 111    union {
 112#define VHOST_USER_VRING_IDX_MASK   (0xff)
 113#define VHOST_USER_VRING_NOFD_MASK  (0x1<<8)
 114        uint64_t u64;
 115        struct vhost_vring_state state;
 116        struct vhost_vring_addr addr;
 117        VhostUserMemory memory;
 118        VhostUserLog log;
 119    } payload;
 120} QEMU_PACKED VhostUserMsg;
 121
 122static VhostUserMsg m __attribute__ ((unused));
 123#define VHOST_USER_HDR_SIZE (sizeof(m.request) \
 124                            + sizeof(m.flags) \
 125                            + sizeof(m.size))
 126
 127#define VHOST_USER_PAYLOAD_SIZE (sizeof(m) - VHOST_USER_HDR_SIZE)
 128
 129/* The version of the protocol we support */
 130#define VHOST_USER_VERSION    (0x1)
 131/*****************************************************************************/
 132
 133enum {
 134    TEST_FLAGS_OK,
 135    TEST_FLAGS_DISCONNECT,
 136    TEST_FLAGS_BAD,
 137    TEST_FLAGS_END,
 138};
 139
 140typedef struct TestServer {
 141    gchar *socket_path;
 142    gchar *mig_path;
 143    gchar *chr_name;
 144    CharBackend chr;
 145    int fds_num;
 146    int fds[VHOST_MEMORY_MAX_NREGIONS];
 147    VhostUserMemory memory;
 148    CompatGMutex data_mutex;
 149    CompatGCond data_cond;
 150    int log_fd;
 151    uint64_t rings;
 152    bool test_fail;
 153    int test_flags;
 154    int queues;
 155} TestServer;
 156
 157static const char *tmpfs;
 158static const char *root;
 159
 160static void init_virtio_dev(TestServer *s)
 161{
 162    QPCIBus *bus;
 163    QVirtioPCIDevice *dev;
 164    uint32_t features;
 165
 166    bus = qpci_init_pc(NULL);
 167    g_assert_nonnull(bus);
 168
 169    dev = qvirtio_pci_device_find(bus, VIRTIO_ID_NET);
 170    g_assert_nonnull(dev);
 171
 172    qvirtio_pci_device_enable(dev);
 173    qvirtio_reset(&dev->vdev);
 174    qvirtio_set_acknowledge(&dev->vdev);
 175    qvirtio_set_driver(&dev->vdev);
 176
 177    features = qvirtio_get_features(&dev->vdev);
 178    features = features & VIRTIO_NET_F_MAC;
 179    qvirtio_set_features(&dev->vdev, features);
 180
 181    qvirtio_set_driver_ok(&dev->vdev);
 182}
 183
 184static void wait_for_fds(TestServer *s)
 185{
 186    gint64 end_time;
 187
 188    g_mutex_lock(&s->data_mutex);
 189
 190    end_time = g_get_monotonic_time() + 5 * G_TIME_SPAN_SECOND;
 191    while (!s->fds_num) {
 192        if (!g_cond_wait_until(&s->data_cond, &s->data_mutex, end_time)) {
 193            /* timeout has passed */
 194            g_assert(s->fds_num);
 195            break;
 196        }
 197    }
 198
 199    /* check for sanity */
 200    g_assert_cmpint(s->fds_num, >, 0);
 201    g_assert_cmpint(s->fds_num, ==, s->memory.nregions);
 202
 203    g_mutex_unlock(&s->data_mutex);
 204}
 205
 206static void read_guest_mem(const void *data)
 207{
 208    TestServer *s = (void *)data;
 209    uint32_t *guest_mem;
 210    int i, j;
 211    size_t size;
 212
 213    wait_for_fds(s);
 214
 215    g_mutex_lock(&s->data_mutex);
 216
 217    /* iterate all regions */
 218    for (i = 0; i < s->fds_num; i++) {
 219
 220        /* We'll check only the region statring at 0x0*/
 221        if (s->memory.regions[i].guest_phys_addr != 0x0) {
 222            continue;
 223        }
 224
 225        g_assert_cmpint(s->memory.regions[i].memory_size, >, 1024);
 226
 227        size = s->memory.regions[i].memory_size +
 228            s->memory.regions[i].mmap_offset;
 229
 230        guest_mem = mmap(0, size, PROT_READ | PROT_WRITE,
 231                         MAP_SHARED, s->fds[i], 0);
 232
 233        g_assert(guest_mem != MAP_FAILED);
 234        guest_mem += (s->memory.regions[i].mmap_offset / sizeof(*guest_mem));
 235
 236        for (j = 0; j < 256; j++) {
 237            uint32_t a = readl(s->memory.regions[i].guest_phys_addr + j*4);
 238            uint32_t b = guest_mem[j];
 239
 240            g_assert_cmpint(a, ==, b);
 241        }
 242
 243        munmap(guest_mem, s->memory.regions[i].memory_size);
 244    }
 245
 246    g_mutex_unlock(&s->data_mutex);
 247}
 248
 249static void *thread_function(void *data)
 250{
 251    GMainLoop *loop = data;
 252    g_main_loop_run(loop);
 253    return NULL;
 254}
 255
 256static int chr_can_read(void *opaque)
 257{
 258    return VHOST_USER_HDR_SIZE;
 259}
 260
 261static void chr_read(void *opaque, const uint8_t *buf, int size)
 262{
 263    TestServer *s = opaque;
 264    CharBackend *chr = &s->chr;
 265    VhostUserMsg msg;
 266    uint8_t *p = (uint8_t *) &msg;
 267    int fd;
 268
 269    if (s->test_fail) {
 270        qemu_chr_fe_disconnect(chr);
 271        /* now switch to non-failure */
 272        s->test_fail = false;
 273    }
 274
 275    if (size != VHOST_USER_HDR_SIZE) {
 276        g_test_message("Wrong message size received %d\n", size);
 277        return;
 278    }
 279
 280    g_mutex_lock(&s->data_mutex);
 281    memcpy(p, buf, VHOST_USER_HDR_SIZE);
 282
 283    if (msg.size) {
 284        p += VHOST_USER_HDR_SIZE;
 285        size = qemu_chr_fe_read_all(chr, p, msg.size);
 286        if (size != msg.size) {
 287            g_test_message("Wrong message size received %d != %d\n",
 288                           size, msg.size);
 289            return;
 290        }
 291    }
 292
 293    switch (msg.request) {
 294    case VHOST_USER_GET_FEATURES:
 295        /* send back features to qemu */
 296        msg.flags |= VHOST_USER_REPLY_MASK;
 297        msg.size = sizeof(m.payload.u64);
 298        msg.payload.u64 = 0x1ULL << VHOST_F_LOG_ALL |
 299            0x1ULL << VHOST_USER_F_PROTOCOL_FEATURES;
 300        if (s->queues > 1) {
 301            msg.payload.u64 |= 0x1ULL << VIRTIO_NET_F_MQ;
 302        }
 303        if (s->test_flags >= TEST_FLAGS_BAD) {
 304            msg.payload.u64 = 0;
 305            s->test_flags = TEST_FLAGS_END;
 306        }
 307        p = (uint8_t *) &msg;
 308        qemu_chr_fe_write_all(chr, p, VHOST_USER_HDR_SIZE + msg.size);
 309        break;
 310
 311    case VHOST_USER_SET_FEATURES:
 312        g_assert_cmpint(msg.payload.u64 & (0x1ULL << VHOST_USER_F_PROTOCOL_FEATURES),
 313                        !=, 0ULL);
 314        if (s->test_flags == TEST_FLAGS_DISCONNECT) {
 315            qemu_chr_fe_disconnect(chr);
 316            s->test_flags = TEST_FLAGS_BAD;
 317        }
 318        break;
 319
 320    case VHOST_USER_GET_PROTOCOL_FEATURES:
 321        /* send back features to qemu */
 322        msg.flags |= VHOST_USER_REPLY_MASK;
 323        msg.size = sizeof(m.payload.u64);
 324        msg.payload.u64 = 1 << VHOST_USER_PROTOCOL_F_LOG_SHMFD;
 325        if (s->queues > 1) {
 326            msg.payload.u64 |= 1 << VHOST_USER_PROTOCOL_F_MQ;
 327        }
 328        p = (uint8_t *) &msg;
 329        qemu_chr_fe_write_all(chr, p, VHOST_USER_HDR_SIZE + msg.size);
 330        break;
 331
 332    case VHOST_USER_GET_VRING_BASE:
 333        /* send back vring base to qemu */
 334        msg.flags |= VHOST_USER_REPLY_MASK;
 335        msg.size = sizeof(m.payload.state);
 336        msg.payload.state.num = 0;
 337        p = (uint8_t *) &msg;
 338        qemu_chr_fe_write_all(chr, p, VHOST_USER_HDR_SIZE + msg.size);
 339
 340        assert(msg.payload.state.index < s->queues * 2);
 341        s->rings &= ~(0x1ULL << msg.payload.state.index);
 342        break;
 343
 344    case VHOST_USER_SET_MEM_TABLE:
 345        /* received the mem table */
 346        memcpy(&s->memory, &msg.payload.memory, sizeof(msg.payload.memory));
 347        s->fds_num = qemu_chr_fe_get_msgfds(chr, s->fds,
 348                                            G_N_ELEMENTS(s->fds));
 349
 350        /* signal the test that it can continue */
 351        g_cond_signal(&s->data_cond);
 352        break;
 353
 354    case VHOST_USER_SET_VRING_KICK:
 355    case VHOST_USER_SET_VRING_CALL:
 356        /* consume the fd */
 357        qemu_chr_fe_get_msgfds(chr, &fd, 1);
 358        /*
 359         * This is a non-blocking eventfd.
 360         * The receive function forces it to be blocking,
 361         * so revert it back to non-blocking.
 362         */
 363        qemu_set_nonblock(fd);
 364        break;
 365
 366    case VHOST_USER_SET_LOG_BASE:
 367        if (s->log_fd != -1) {
 368            close(s->log_fd);
 369            s->log_fd = -1;
 370        }
 371        qemu_chr_fe_get_msgfds(chr, &s->log_fd, 1);
 372        msg.flags |= VHOST_USER_REPLY_MASK;
 373        msg.size = 0;
 374        p = (uint8_t *) &msg;
 375        qemu_chr_fe_write_all(chr, p, VHOST_USER_HDR_SIZE);
 376
 377        g_cond_signal(&s->data_cond);
 378        break;
 379
 380    case VHOST_USER_SET_VRING_BASE:
 381        assert(msg.payload.state.index < s->queues * 2);
 382        s->rings |= 0x1ULL << msg.payload.state.index;
 383        break;
 384
 385    case VHOST_USER_GET_QUEUE_NUM:
 386        msg.flags |= VHOST_USER_REPLY_MASK;
 387        msg.size = sizeof(m.payload.u64);
 388        msg.payload.u64 = s->queues;
 389        p = (uint8_t *) &msg;
 390        qemu_chr_fe_write_all(chr, p, VHOST_USER_HDR_SIZE + msg.size);
 391        break;
 392
 393    default:
 394        break;
 395    }
 396
 397    g_mutex_unlock(&s->data_mutex);
 398}
 399
 400static const char *init_hugepagefs(const char *path)
 401{
 402    struct statfs fs;
 403    int ret;
 404
 405    if (access(path, R_OK | W_OK | X_OK)) {
 406        g_test_message("access on path (%s): %s\n", path, strerror(errno));
 407        return NULL;
 408    }
 409
 410    do {
 411        ret = statfs(path, &fs);
 412    } while (ret != 0 && errno == EINTR);
 413
 414    if (ret != 0) {
 415        g_test_message("statfs on path (%s): %s\n", path, strerror(errno));
 416        return NULL;
 417    }
 418
 419    if (fs.f_type != HUGETLBFS_MAGIC) {
 420        g_test_message("Warning: path not on HugeTLBFS: %s\n", path);
 421        return NULL;
 422    }
 423
 424    return path;
 425}
 426
 427static TestServer *test_server_new(const gchar *name)
 428{
 429    TestServer *server = g_new0(TestServer, 1);
 430
 431    server->socket_path = g_strdup_printf("%s/%s.sock", tmpfs, name);
 432    server->mig_path = g_strdup_printf("%s/%s.mig", tmpfs, name);
 433    server->chr_name = g_strdup_printf("chr-%s", name);
 434
 435    g_mutex_init(&server->data_mutex);
 436    g_cond_init(&server->data_cond);
 437
 438    server->log_fd = -1;
 439    server->queues = 1;
 440
 441    return server;
 442}
 443
 444static void chr_event(void *opaque, int event)
 445{
 446    TestServer *s = opaque;
 447
 448    if (s->test_flags == TEST_FLAGS_END &&
 449        event == CHR_EVENT_CLOSED) {
 450        s->test_flags = TEST_FLAGS_OK;
 451    }
 452}
 453
 454static void test_server_create_chr(TestServer *server, const gchar *opt)
 455{
 456    gchar *chr_path;
 457    CharDriverState *chr;
 458
 459    chr_path = g_strdup_printf("unix:%s%s", server->socket_path, opt);
 460    chr = qemu_chr_new(server->chr_name, chr_path);
 461    g_free(chr_path);
 462
 463    qemu_chr_fe_init(&server->chr, chr, &error_abort);
 464    qemu_chr_fe_set_handlers(&server->chr, chr_can_read, chr_read,
 465                             chr_event, server, NULL, true);
 466}
 467
 468static void test_server_listen(TestServer *server)
 469{
 470    test_server_create_chr(server, ",server,nowait");
 471}
 472
 473static inline void test_server_connect(TestServer *server)
 474{
 475    test_server_create_chr(server, ",reconnect=1");
 476}
 477
 478#define GET_QEMU_CMD(s)                                         \
 479    g_strdup_printf(QEMU_CMD, 512, 512, (root), (s)->chr_name,  \
 480                    (s)->socket_path, "", (s)->chr_name)
 481
 482#define GET_QEMU_CMDE(s, mem, chr_opts, extra, ...)                     \
 483    g_strdup_printf(QEMU_CMD extra, (mem), (mem), (root), (s)->chr_name, \
 484                    (s)->socket_path, (chr_opts), (s)->chr_name, ##__VA_ARGS__)
 485
 486static gboolean _test_server_free(TestServer *server)
 487{
 488    int i;
 489    CharDriverState *chr = qemu_chr_fe_get_driver(&server->chr);
 490
 491    qemu_chr_fe_deinit(&server->chr);
 492    qemu_chr_delete(chr);
 493
 494    for (i = 0; i < server->fds_num; i++) {
 495        close(server->fds[i]);
 496    }
 497
 498    if (server->log_fd != -1) {
 499        close(server->log_fd);
 500    }
 501
 502    unlink(server->socket_path);
 503    g_free(server->socket_path);
 504
 505    unlink(server->mig_path);
 506    g_free(server->mig_path);
 507
 508    g_free(server->chr_name);
 509    g_free(server);
 510
 511    return FALSE;
 512}
 513
 514static void test_server_free(TestServer *server)
 515{
 516    g_idle_add((GSourceFunc)_test_server_free, server);
 517}
 518
 519static void wait_for_log_fd(TestServer *s)
 520{
 521    gint64 end_time;
 522
 523    g_mutex_lock(&s->data_mutex);
 524    end_time = g_get_monotonic_time() + 5 * G_TIME_SPAN_SECOND;
 525    while (s->log_fd == -1) {
 526        if (!g_cond_wait_until(&s->data_cond, &s->data_mutex, end_time)) {
 527            /* timeout has passed */
 528            g_assert(s->log_fd != -1);
 529            break;
 530        }
 531    }
 532
 533    g_mutex_unlock(&s->data_mutex);
 534}
 535
 536static void write_guest_mem(TestServer *s, uint32_t seed)
 537{
 538    uint32_t *guest_mem;
 539    int i, j;
 540    size_t size;
 541
 542    wait_for_fds(s);
 543
 544    /* iterate all regions */
 545    for (i = 0; i < s->fds_num; i++) {
 546
 547        /* We'll write only the region statring at 0x0 */
 548        if (s->memory.regions[i].guest_phys_addr != 0x0) {
 549            continue;
 550        }
 551
 552        g_assert_cmpint(s->memory.regions[i].memory_size, >, 1024);
 553
 554        size = s->memory.regions[i].memory_size +
 555            s->memory.regions[i].mmap_offset;
 556
 557        guest_mem = mmap(0, size, PROT_READ | PROT_WRITE,
 558                         MAP_SHARED, s->fds[i], 0);
 559
 560        g_assert(guest_mem != MAP_FAILED);
 561        guest_mem += (s->memory.regions[i].mmap_offset / sizeof(*guest_mem));
 562
 563        for (j = 0; j < 256; j++) {
 564            guest_mem[j] = seed + j;
 565        }
 566
 567        munmap(guest_mem, s->memory.regions[i].memory_size);
 568        break;
 569    }
 570}
 571
 572static guint64 get_log_size(TestServer *s)
 573{
 574    guint64 log_size = 0;
 575    int i;
 576
 577    for (i = 0; i < s->memory.nregions; ++i) {
 578        VhostUserMemoryRegion *reg = &s->memory.regions[i];
 579        guint64 last = range_get_last(reg->guest_phys_addr,
 580                                       reg->memory_size);
 581        log_size = MAX(log_size, last / (8 * VHOST_LOG_PAGE) + 1);
 582    }
 583
 584    return log_size;
 585}
 586
 587typedef struct TestMigrateSource {
 588    GSource source;
 589    TestServer *src;
 590    TestServer *dest;
 591} TestMigrateSource;
 592
 593static gboolean
 594test_migrate_source_check(GSource *source)
 595{
 596    TestMigrateSource *t = (TestMigrateSource *)source;
 597    gboolean overlap = t->src->rings && t->dest->rings;
 598
 599    g_assert(!overlap);
 600
 601    return FALSE;
 602}
 603
 604#if !GLIB_CHECK_VERSION(2,36,0)
 605/* this callback is unnecessary with glib >2.36, the default
 606 * prepare for the source does the same */
 607static gboolean
 608test_migrate_source_prepare(GSource *source, gint *timeout)
 609{
 610    *timeout = -1;
 611    return FALSE;
 612}
 613#endif
 614
 615GSourceFuncs test_migrate_source_funcs = {
 616#if !GLIB_CHECK_VERSION(2,36,0)
 617    .prepare = test_migrate_source_prepare,
 618#endif
 619    .check = test_migrate_source_check,
 620};
 621
 622static void test_migrate(void)
 623{
 624    TestServer *s = test_server_new("src");
 625    TestServer *dest = test_server_new("dest");
 626    char *uri = g_strdup_printf("%s%s", "unix:", dest->mig_path);
 627    QTestState *global = global_qtest, *from, *to;
 628    GSource *source;
 629    gchar *cmd;
 630    QDict *rsp;
 631    guint8 *log;
 632    guint64 size;
 633
 634    test_server_listen(s);
 635    test_server_listen(dest);
 636
 637    cmd = GET_QEMU_CMDE(s, 2, "", "");
 638    from = qtest_start(cmd);
 639    g_free(cmd);
 640
 641    init_virtio_dev(s);
 642    wait_for_fds(s);
 643    size = get_log_size(s);
 644    g_assert_cmpint(size, ==, (2 * 1024 * 1024) / (VHOST_LOG_PAGE * 8));
 645
 646    cmd = GET_QEMU_CMDE(dest, 2, "", " -incoming %s", uri);
 647    to = qtest_init(cmd);
 648    g_free(cmd);
 649
 650    source = g_source_new(&test_migrate_source_funcs,
 651                          sizeof(TestMigrateSource));
 652    ((TestMigrateSource *)source)->src = s;
 653    ((TestMigrateSource *)source)->dest = dest;
 654    g_source_attach(source, NULL);
 655
 656    /* slow down migration to have time to fiddle with log */
 657    /* TODO: qtest could learn to break on some places */
 658    rsp = qmp("{ 'execute': 'migrate_set_speed',"
 659              "'arguments': { 'value': 10 } }");
 660    g_assert(qdict_haskey(rsp, "return"));
 661    QDECREF(rsp);
 662
 663    cmd = g_strdup_printf("{ 'execute': 'migrate',"
 664                          "'arguments': { 'uri': '%s' } }",
 665                          uri);
 666    rsp = qmp(cmd);
 667    g_free(cmd);
 668    g_assert(qdict_haskey(rsp, "return"));
 669    QDECREF(rsp);
 670
 671    wait_for_log_fd(s);
 672
 673    log = mmap(0, size, PROT_READ | PROT_WRITE, MAP_SHARED, s->log_fd, 0);
 674    g_assert(log != MAP_FAILED);
 675
 676    /* modify first page */
 677    write_guest_mem(s, 0x42);
 678    log[0] = 1;
 679    munmap(log, size);
 680
 681    /* speed things up */
 682    rsp = qmp("{ 'execute': 'migrate_set_speed',"
 683              "'arguments': { 'value': 0 } }");
 684    g_assert(qdict_haskey(rsp, "return"));
 685    QDECREF(rsp);
 686
 687    qmp_eventwait("STOP");
 688
 689    global_qtest = to;
 690    qmp_eventwait("RESUME");
 691
 692    read_guest_mem(dest);
 693
 694    g_source_destroy(source);
 695    g_source_unref(source);
 696
 697    qtest_quit(to);
 698    test_server_free(dest);
 699    qtest_quit(from);
 700    test_server_free(s);
 701    g_free(uri);
 702
 703    global_qtest = global;
 704}
 705
 706static void wait_for_rings_started(TestServer *s, size_t count)
 707{
 708    gint64 end_time;
 709
 710    g_mutex_lock(&s->data_mutex);
 711    end_time = g_get_monotonic_time() + 5 * G_TIME_SPAN_SECOND;
 712    while (ctpop64(s->rings) != count) {
 713        if (!g_cond_wait_until(&s->data_cond, &s->data_mutex, end_time)) {
 714            /* timeout has passed */
 715            g_assert_cmpint(ctpop64(s->rings), ==, count);
 716            break;
 717        }
 718    }
 719
 720    g_mutex_unlock(&s->data_mutex);
 721}
 722
 723#ifdef CONFIG_HAS_GLIB_SUBPROCESS_TESTS
 724static gboolean
 725reconnect_cb(gpointer user_data)
 726{
 727    TestServer *s = user_data;
 728
 729    qemu_chr_fe_disconnect(&s->chr);
 730
 731    return FALSE;
 732}
 733
 734static gpointer
 735connect_thread(gpointer data)
 736{
 737    TestServer *s = data;
 738
 739    /* wait for qemu to start before first try, to avoid extra warnings */
 740    g_usleep(G_USEC_PER_SEC);
 741    test_server_connect(s);
 742
 743    return NULL;
 744}
 745
 746static void test_reconnect_subprocess(void)
 747{
 748    TestServer *s = test_server_new("reconnect");
 749    char *cmd;
 750
 751    g_thread_new("connect", connect_thread, s);
 752    cmd = GET_QEMU_CMDE(s, 2, ",server", "");
 753    qtest_start(cmd);
 754    g_free(cmd);
 755
 756    init_virtio_dev(s);
 757    wait_for_fds(s);
 758    wait_for_rings_started(s, 2);
 759
 760    /* reconnect */
 761    s->fds_num = 0;
 762    s->rings = 0;
 763    g_idle_add(reconnect_cb, s);
 764    wait_for_fds(s);
 765    wait_for_rings_started(s, 2);
 766
 767    qtest_end();
 768    test_server_free(s);
 769    return;
 770}
 771
 772static void test_reconnect(void)
 773{
 774    gchar *path = g_strdup_printf("/%s/vhost-user/reconnect/subprocess",
 775                                  qtest_get_arch());
 776    g_test_trap_subprocess(path, 0, 0);
 777    g_test_trap_assert_passed();
 778    g_free(path);
 779}
 780
 781static void test_connect_fail_subprocess(void)
 782{
 783    TestServer *s = test_server_new("connect-fail");
 784    char *cmd;
 785
 786    s->test_fail = true;
 787    g_thread_new("connect", connect_thread, s);
 788    cmd = GET_QEMU_CMDE(s, 2, ",server", "");
 789    qtest_start(cmd);
 790    g_free(cmd);
 791
 792    init_virtio_dev(s);
 793    wait_for_fds(s);
 794    wait_for_rings_started(s, 2);
 795
 796    qtest_end();
 797    test_server_free(s);
 798}
 799
 800static void test_connect_fail(void)
 801{
 802    gchar *path = g_strdup_printf("/%s/vhost-user/connect-fail/subprocess",
 803                                  qtest_get_arch());
 804    g_test_trap_subprocess(path, 0, 0);
 805    g_test_trap_assert_passed();
 806    g_free(path);
 807}
 808
 809static void test_flags_mismatch_subprocess(void)
 810{
 811    TestServer *s = test_server_new("flags-mismatch");
 812    char *cmd;
 813
 814    s->test_flags = TEST_FLAGS_DISCONNECT;
 815    g_thread_new("connect", connect_thread, s);
 816    cmd = GET_QEMU_CMDE(s, 2, ",server", "");
 817    qtest_start(cmd);
 818    g_free(cmd);
 819
 820    init_virtio_dev(s);
 821    wait_for_fds(s);
 822    wait_for_rings_started(s, 2);
 823
 824    qtest_end();
 825    test_server_free(s);
 826}
 827
 828static void test_flags_mismatch(void)
 829{
 830    gchar *path = g_strdup_printf("/%s/vhost-user/flags-mismatch/subprocess",
 831                                  qtest_get_arch());
 832    g_test_trap_subprocess(path, 0, 0);
 833    g_test_trap_assert_passed();
 834    g_free(path);
 835}
 836
 837#endif
 838
 839static QVirtioPCIDevice *virtio_net_pci_init(QPCIBus *bus, int slot)
 840{
 841    QVirtioPCIDevice *dev;
 842
 843    dev = qvirtio_pci_device_find(bus, VIRTIO_ID_NET);
 844    g_assert(dev != NULL);
 845    g_assert_cmphex(dev->vdev.device_type, ==, VIRTIO_ID_NET);
 846
 847    qvirtio_pci_device_enable(dev);
 848    qvirtio_reset(&dev->vdev);
 849    qvirtio_set_acknowledge(&dev->vdev);
 850    qvirtio_set_driver(&dev->vdev);
 851
 852    return dev;
 853}
 854
 855static void driver_init(QVirtioDevice *dev)
 856{
 857    uint32_t features;
 858
 859    features = qvirtio_get_features(dev);
 860    features = features & ~(QVIRTIO_F_BAD_FEATURE |
 861                            (1u << VIRTIO_RING_F_INDIRECT_DESC) |
 862                            (1u << VIRTIO_RING_F_EVENT_IDX));
 863    qvirtio_set_features(dev, features);
 864
 865    qvirtio_set_driver_ok(dev);
 866}
 867
 868#define PCI_SLOT                0x04
 869
 870static void test_multiqueue(void)
 871{
 872    const int queues = 2;
 873    TestServer *s = test_server_new("mq");
 874    QVirtioPCIDevice *dev;
 875    QPCIBus *bus;
 876    QVirtQueuePCI *vq[queues * 2];
 877    QGuestAllocator *alloc;
 878    char *cmd;
 879    int i;
 880
 881    s->queues = queues;
 882    test_server_listen(s);
 883
 884    cmd = g_strdup_printf(QEMU_CMD_MEM QEMU_CMD_CHR QEMU_CMD_NETDEV ",queues=%d "
 885                          "-device virtio-net-pci,netdev=net0,mq=on,vectors=%d",
 886                          512, 512, root, s->chr_name,
 887                          s->socket_path, "", s->chr_name,
 888                          queues, queues * 2 + 2);
 889    qtest_start(cmd);
 890    g_free(cmd);
 891
 892    bus = qpci_init_pc(NULL);
 893    dev = virtio_net_pci_init(bus, PCI_SLOT);
 894
 895    alloc = pc_alloc_init();
 896    for (i = 0; i < queues * 2; i++) {
 897        vq[i] = (QVirtQueuePCI *)qvirtqueue_setup(&dev->vdev, alloc, i);
 898    }
 899
 900    driver_init(&dev->vdev);
 901    wait_for_rings_started(s, queues * 2);
 902
 903    /* End test */
 904    for (i = 0; i < queues * 2; i++) {
 905        qvirtqueue_cleanup(dev->vdev.bus, &vq[i]->vq, alloc);
 906    }
 907    pc_alloc_uninit(alloc);
 908    qvirtio_pci_device_disable(dev);
 909    g_free(dev->pdev);
 910    g_free(dev);
 911    qpci_free_pc(bus);
 912    qtest_end();
 913
 914    test_server_free(s);
 915}
 916
 917int main(int argc, char **argv)
 918{
 919    QTestState *s = NULL;
 920    TestServer *server = NULL;
 921    const char *hugefs;
 922    char *qemu_cmd = NULL;
 923    int ret;
 924    char template[] = "/tmp/vhost-test-XXXXXX";
 925    GMainLoop *loop;
 926    GThread *thread;
 927
 928    g_test_init(&argc, &argv, NULL);
 929
 930    module_call_init(MODULE_INIT_QOM);
 931    qemu_add_opts(&qemu_chardev_opts);
 932
 933    tmpfs = mkdtemp(template);
 934    if (!tmpfs) {
 935        g_test_message("mkdtemp on path (%s): %s\n", template, strerror(errno));
 936    }
 937    g_assert(tmpfs);
 938
 939    hugefs = getenv("QTEST_HUGETLBFS_PATH");
 940    if (hugefs) {
 941        root = init_hugepagefs(hugefs);
 942        g_assert(root);
 943    } else {
 944        root = tmpfs;
 945    }
 946
 947    server = test_server_new("test");
 948    test_server_listen(server);
 949
 950    loop = g_main_loop_new(NULL, FALSE);
 951    /* run the main loop thread so the chardev may operate */
 952    thread = g_thread_new(NULL, thread_function, loop);
 953
 954    qemu_cmd = GET_QEMU_CMD(server);
 955
 956    s = qtest_start(qemu_cmd);
 957    g_free(qemu_cmd);
 958    init_virtio_dev(server);
 959
 960    qtest_add_data_func("/vhost-user/read-guest-mem", server, read_guest_mem);
 961    qtest_add_func("/vhost-user/migrate", test_migrate);
 962    qtest_add_func("/vhost-user/multiqueue", test_multiqueue);
 963#ifdef CONFIG_HAS_GLIB_SUBPROCESS_TESTS
 964    qtest_add_func("/vhost-user/reconnect/subprocess",
 965                   test_reconnect_subprocess);
 966    qtest_add_func("/vhost-user/reconnect", test_reconnect);
 967    qtest_add_func("/vhost-user/connect-fail/subprocess",
 968                   test_connect_fail_subprocess);
 969    qtest_add_func("/vhost-user/connect-fail", test_connect_fail);
 970    qtest_add_func("/vhost-user/flags-mismatch/subprocess",
 971                   test_flags_mismatch_subprocess);
 972    qtest_add_func("/vhost-user/flags-mismatch", test_flags_mismatch);
 973#endif
 974
 975    ret = g_test_run();
 976
 977    if (s) {
 978        qtest_quit(s);
 979    }
 980
 981    /* cleanup */
 982    test_server_free(server);
 983
 984    /* finish the helper thread and dispatch pending sources */
 985    g_main_loop_quit(loop);
 986    g_thread_join(thread);
 987    while (g_main_context_pending(NULL)) {
 988        g_main_context_iteration (NULL, TRUE);
 989    }
 990    g_main_loop_unref(loop);
 991
 992    ret = rmdir(tmpfs);
 993    if (ret != 0) {
 994        g_test_message("unable to rmdir: path (%s): %s\n",
 995                       tmpfs, strerror(errno));
 996    }
 997    g_assert_cmpint(ret, ==, 0);
 998
 999    return ret;
1000}
1001