tests/test-vmstate.c

   1 /*
   2  *  Test code for VMState
   3  *
   4  *  Copyright (c) 2013 Red Hat Inc.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a copy
   7  * of this software and associated documentation files (the "Software"), to deal
   8  * in the Software without restriction, including without limitation the rights
   9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  10  * copies of the Software, and to permit persons to whom the Software is
  11  * furnished to do so, subject to the following conditions:
  12  *
  13  * The above copyright notice and this permission notice shall be included in
  14  * all copies or substantial portions of the Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  22  * THE SOFTWARE.
  23  */
  24
  25 #include "qemu/osdep.h"
  26
  27 #include "../migration/migration.h"
  28 #include "migration/vmstate.h"
  29 #include "migration/qemu-file-types.h"
  30 #include "../migration/qemu-file.h"
  31 #include "../migration/qemu-file-channel.h"
  32 #include "../migration/savevm.h"
  33 #include "qemu/coroutine.h"
  34 #include "qemu/module.h"
  35 #include "io/channel-file.h"
  36
  37 static char temp_file[] = "/tmp/vmst.test.XXXXXX";
  38 static int temp_fd;
  39
  40
  41 /* Duplicate temp_fd and seek to the beginning of the file */
  42 static QEMUFile *open_test_file(bool write)
  43 {
  44     int fd = dup(temp_fd);
  45     QIOChannel *ioc;
  46     QEMUFile *f;
  47
  48     lseek(fd, 0, SEEK_SET);
  49     if (write) {
  50         g_assert_cmpint(ftruncate(fd, 0), ==, 0);
  51     }
  52     ioc = QIO_CHANNEL(qio_channel_file_new_fd(fd));
  53     if (write) {
  54         f = qemu_fopen_channel_output(ioc);
  55     } else {
  56         f = qemu_fopen_channel_input(ioc);
  57     }
  58     object_unref(OBJECT(ioc));
  59     return f;
  60 }
  61
  62 #define SUCCESS(val) \
  63     g_assert_cmpint((val), ==, 0)
  64
  65 #define FAILURE(val) \
  66     g_assert_cmpint((val), !=, 0)
  67
  68 static void save_vmstate(const VMStateDescription *desc, void *obj)
  69 {
  70     QEMUFile *f = open_test_file(true);
  71
  72     /* Save file with vmstate */
  73     int ret = vmstate_save_state(f, desc, obj, NULL);
  74     g_assert(!ret);
  75     qemu_put_byte(f, QEMU_VM_EOF);
  76     g_assert(!qemu_file_get_error(f));
  77     qemu_fclose(f);
  78 }
  79
  80 static void save_buffer(const uint8_t *buf, size_t buf_size)
  81 {
  82     QEMUFile *fsave = open_test_file(true);
  83     qemu_put_buffer(fsave, buf, buf_size);
  84     qemu_fclose(fsave);
  85 }
  86
  87 static void compare_vmstate(const uint8_t *wire, size_t size)
  88 {
  89     QEMUFile *f = open_test_file(false);
  90     uint8_t result[size];
  91
  92     /* read back as binary */
  93
  94     g_assert_cmpint(qemu_get_buffer(f, result, sizeof(result)), ==,
  95                     sizeof(result));
  96     g_assert(!qemu_file_get_error(f));
  97
  98     /* Compare that what is on the file is the same that what we
  99        expected to be there */
 100     SUCCESS(memcmp(result, wire, sizeof(result)));
 101
 102     /* Must reach EOF */
 103     qemu_get_byte(f);
 104     g_assert_cmpint(qemu_file_get_error(f), ==, -EIO);
 105
 106     qemu_fclose(f);
 107 }
 108
 109 static int load_vmstate_one(const VMStateDescription *desc, void *obj,
 110                             int version, const uint8_t *wire, size_t size)
 111 {
 112     QEMUFile *f;
 113     int ret;
 114
 115     f = open_test_file(true);
 116     qemu_put_buffer(f, wire, size);
 117     qemu_fclose(f);
 118
 119     f = open_test_file(false);
 120     ret = vmstate_load_state(f, desc, obj, version);
 121     if (ret) {
 122         g_assert(qemu_file_get_error(f));
 123     } else{
 124         g_assert(!qemu_file_get_error(f));
 125     }
 126     qemu_fclose(f);
 127     return ret;
 128 }
 129
 130
 131 static int load_vmstate(const VMStateDescription *desc,
 132                         void *obj, void *obj_clone,
 133                         void (*obj_copy)(void *, void*),
 134                         int version, const uint8_t *wire, size_t size)
 135 {
 136     /* We test with zero size */
 137     obj_copy(obj_clone, obj);
 138     FAILURE(load_vmstate_one(desc, obj, version, wire, 0));
 139
 140     /* Stream ends with QEMU_EOF, so we need at least 3 bytes to be
 141      * able to test in the middle */
 142
 143     if (size > 3) {
 144
 145         /* We test with size - 2. We can't test size - 1 due to EOF tricks */
 146         obj_copy(obj, obj_clone);
 147         FAILURE(load_vmstate_one(desc, obj, version, wire, size - 2));
 148
 149         /* Test with size/2, first half of real state */
 150         obj_copy(obj, obj_clone);
 151         FAILURE(load_vmstate_one(desc, obj, version, wire, size/2));
 152
 153         /* Test with size/2, second half of real state */
 154         obj_copy(obj, obj_clone);
 155         FAILURE(load_vmstate_one(desc, obj, version, wire + (size/2), size/2));
 156
 157     }
 158     obj_copy(obj, obj_clone);
 159     return load_vmstate_one(desc, obj, version, wire, size);
 160 }
 161
 162 /* Test struct that we are going to use for our tests */
 163
 164 typedef struct TestSimple {
 165     bool     b_1,   b_2;
 166     uint8_t  u8_1;
 167     uint16_t u16_1;
 168     uint32_t u32_1;
 169     uint64_t u64_1;
 170     int8_t   i8_1,  i8_2;
 171     int16_t  i16_1, i16_2;
 172     int32_t  i32_1, i32_2;
 173     int64_t  i64_1, i64_2;
 174 } TestSimple;
 175
 176 /* Object instantiation, we are going to use it in more than one test */
 177
 178 TestSimple obj_simple = {
 179     .b_1 = true,
 180     .b_2 = false,
 181     .u8_1 = 130,
 182     .u16_1 = 512,
 183     .u32_1 = 70000,
 184     .u64_1 = 12121212,
 185     .i8_1 = 65,
 186     .i8_2 = -65,
 187     .i16_1 = 512,
 188     .i16_2 = -512,
 189     .i32_1 = 70000,
 190     .i32_2 = -70000,
 191     .i64_1 = 12121212,
 192     .i64_2 = -12121212,
 193 };
 194
 195 /* Description of the values.  If you add a primitive type
 196    you are expected to add a test here */
 197
 198 static const VMStateDescription vmstate_simple_primitive = {
 199     .name = "simple/primitive",
 200     .version_id = 1,
 201     .minimum_version_id = 1,
 202     .fields = (VMStateField[]) {
 203         VMSTATE_BOOL(b_1, TestSimple),
 204         VMSTATE_BOOL(b_2, TestSimple),
 205         VMSTATE_UINT8(u8_1, TestSimple),
 206         VMSTATE_UINT16(u16_1, TestSimple),
 207         VMSTATE_UINT32(u32_1, TestSimple),
 208         VMSTATE_UINT64(u64_1, TestSimple),
 209         VMSTATE_INT8(i8_1, TestSimple),
 210         VMSTATE_INT8(i8_2, TestSimple),
 211         VMSTATE_INT16(i16_1, TestSimple),
 212         VMSTATE_INT16(i16_2, TestSimple),
 213         VMSTATE_INT32(i32_1, TestSimple),
 214         VMSTATE_INT32(i32_2, TestSimple),
 215         VMSTATE_INT64(i64_1, TestSimple),
 216         VMSTATE_INT64(i64_2, TestSimple),
 217         VMSTATE_END_OF_LIST()
 218     }
 219 };
 220
 221 /* It describes what goes through the wire.  Our tests are basically:
 222
 223    * save test
 224      - save a struct a vmstate to a file
 225      - read that file back (binary read, no vmstate)
 226      - compare it with what we expect to be on the wire
 227    * load test
 228      - save to the file what we expect to be on the wire
 229      - read struct back with vmstate in a different
 230      - compare back with the original struct
 231 */
 232
 233 uint8_t wire_simple_primitive[] = {
 234     /* b_1 */   0x01,
 235     /* b_2 */   0x00,
 236     /* u8_1 */  0x82,
 237     /* u16_1 */ 0x02, 0x00,
 238     /* u32_1 */ 0x00, 0x01, 0x11, 0x70,
 239     /* u64_1 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0xb8, 0xf4, 0x7c,
 240     /* i8_1 */  0x41,
 241     /* i8_2 */  0xbf,
 242     /* i16_1 */ 0x02, 0x00,
 243     /* i16_2 */ 0xfe, 0x0,
 244     /* i32_1 */ 0x00, 0x01, 0x11, 0x70,
 245     /* i32_2 */ 0xff, 0xfe, 0xee, 0x90,
 246     /* i64_1 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0xb8, 0xf4, 0x7c,
 247     /* i64_2 */ 0xff, 0xff, 0xff, 0xff, 0xff, 0x47, 0x0b, 0x84,
 248     QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 249 };
 250
 251 static void obj_simple_copy(void *target, void *source)
 252 {
 253     memcpy(target, source, sizeof(TestSimple));
 254 }
 255
 256 static void test_simple_primitive(void)
 257 {
 258     TestSimple obj, obj_clone;
 259
 260     memset(&obj, 0, sizeof(obj));
 261     save_vmstate(&vmstate_simple_primitive, &obj_simple);
 262
 263     compare_vmstate(wire_simple_primitive, sizeof(wire_simple_primitive));
 264
 265     SUCCESS(load_vmstate(&vmstate_simple_primitive, &obj, &obj_clone,
 266                          obj_simple_copy, 1, wire_simple_primitive,
 267                          sizeof(wire_simple_primitive)));
 268
 269 #define FIELD_EQUAL(name)   g_assert_cmpint(obj.name, ==, obj_simple.name)
 270
 271     FIELD_EQUAL(b_1);
 272     FIELD_EQUAL(b_2);
 273     FIELD_EQUAL(u8_1);
 274     FIELD_EQUAL(u16_1);
 275     FIELD_EQUAL(u32_1);
 276     FIELD_EQUAL(u64_1);
 277     FIELD_EQUAL(i8_1);
 278     FIELD_EQUAL(i8_2);
 279     FIELD_EQUAL(i16_1);
 280     FIELD_EQUAL(i16_2);
 281     FIELD_EQUAL(i32_1);
 282     FIELD_EQUAL(i32_2);
 283     FIELD_EQUAL(i64_1);
 284     FIELD_EQUAL(i64_2);
 285 }
 286
 287 typedef struct TestSimpleArray {
 288     uint16_t u16_1[3];
 289 } TestSimpleArray;
 290
 291 /* Object instantiation, we are going to use it in more than one test */
 292
 293 TestSimpleArray obj_simple_arr = {
 294     .u16_1 = { 0x42, 0x43, 0x44 },
 295 };
 296
 297 /* Description of the values.  If you add a primitive type
 298    you are expected to add a test here */
 299
 300 static const VMStateDescription vmstate_simple_arr = {
 301     .name = "simple/array",
 302     .version_id = 1,
 303     .minimum_version_id = 1,
 304     .fields = (VMStateField[]) {
 305         VMSTATE_UINT16_ARRAY(u16_1, TestSimpleArray, 3),
 306         VMSTATE_END_OF_LIST()
 307     }
 308 };
 309
 310 uint8_t wire_simple_arr[] = {
 311     /* u16_1 */ 0x00, 0x42,
 312     /* u16_1 */ 0x00, 0x43,
 313     /* u16_1 */ 0x00, 0x44,
 314     QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 315 };
 316
 317 static void obj_simple_arr_copy(void *target, void *source)
 318 {
 319     memcpy(target, source, sizeof(TestSimpleArray));
 320 }
 321
 322 static void test_simple_array(void)
 323 {
 324     TestSimpleArray obj, obj_clone;
 325
 326     memset(&obj, 0, sizeof(obj));
 327     save_vmstate(&vmstate_simple_arr, &obj_simple_arr);
 328
 329     compare_vmstate(wire_simple_arr, sizeof(wire_simple_arr));
 330
 331     SUCCESS(load_vmstate(&vmstate_simple_arr, &obj, &obj_clone,
 332                          obj_simple_arr_copy, 1, wire_simple_arr,
 333                          sizeof(wire_simple_arr)));
 334 }
 335
 336 typedef struct TestStruct {
 337     uint32_t a, b, c, e;
 338     uint64_t d, f;
 339     bool skip_c_e;
 340 } TestStruct;
 341
 342 static const VMStateDescription vmstate_versioned = {
 343     .name = "test/versioned",
 344     .version_id = 2,
 345     .minimum_version_id = 1,
 346     .fields = (VMStateField[]) {
 347         VMSTATE_UINT32(a, TestStruct),
 348         VMSTATE_UINT32_V(b, TestStruct, 2), /* Versioned field in the middle, so
 349                                              * we catch bugs more easily.
 350                                              */
 351         VMSTATE_UINT32(c, TestStruct),
 352         VMSTATE_UINT64(d, TestStruct),
 353         VMSTATE_UINT32_V(e, TestStruct, 2),
 354         VMSTATE_UINT64_V(f, TestStruct, 2),
 355         VMSTATE_END_OF_LIST()
 356     }
 357 };
 358
 359 static void test_load_v1(void)
 360 {
 361     uint8_t buf[] = {
 362         0, 0, 0, 10,             /* a */
 363         0, 0, 0, 30,             /* c */
 364         0, 0, 0, 0, 0, 0, 0, 40, /* d */
 365         QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 366     };
 367     save_buffer(buf, sizeof(buf));
 368
 369     QEMUFile *loading = open_test_file(false);
 370     TestStruct obj = { .b = 200, .e = 500, .f = 600 };
 371     vmstate_load_state(loading, &vmstate_versioned, &obj, 1);
 372     g_assert(!qemu_file_get_error(loading));
 373     g_assert_cmpint(obj.a, ==, 10);
 374     g_assert_cmpint(obj.b, ==, 200);
 375     g_assert_cmpint(obj.c, ==, 30);
 376     g_assert_cmpint(obj.d, ==, 40);
 377     g_assert_cmpint(obj.e, ==, 500);
 378     g_assert_cmpint(obj.f, ==, 600);
 379     qemu_fclose(loading);
 380 }
 381
 382 static void test_load_v2(void)
 383 {
 384     uint8_t buf[] = {
 385         0, 0, 0, 10,             /* a */
 386         0, 0, 0, 20,             /* b */
 387         0, 0, 0, 30,             /* c */
 388         0, 0, 0, 0, 0, 0, 0, 40, /* d */
 389         0, 0, 0, 50,             /* e */
 390         0, 0, 0, 0, 0, 0, 0, 60, /* f */
 391         QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 392     };
 393     save_buffer(buf, sizeof(buf));
 394
 395     QEMUFile *loading = open_test_file(false);
 396     TestStruct obj;
 397     vmstate_load_state(loading, &vmstate_versioned, &obj, 2);
 398     g_assert_cmpint(obj.a, ==, 10);
 399     g_assert_cmpint(obj.b, ==, 20);
 400     g_assert_cmpint(obj.c, ==, 30);
 401     g_assert_cmpint(obj.d, ==, 40);
 402     g_assert_cmpint(obj.e, ==, 50);
 403     g_assert_cmpint(obj.f, ==, 60);
 404     qemu_fclose(loading);
 405 }
 406
 407 static bool test_skip(void *opaque, int version_id)
 408 {
 409     TestStruct *t = (TestStruct *)opaque;
 410     return !t->skip_c_e;
 411 }
 412
 413 static const VMStateDescription vmstate_skipping = {
 414     .name = "test/skip",
 415     .version_id = 2,
 416     .minimum_version_id = 1,
 417     .fields = (VMStateField[]) {
 418         VMSTATE_UINT32(a, TestStruct),
 419         VMSTATE_UINT32(b, TestStruct),
 420         VMSTATE_UINT32_TEST(c, TestStruct, test_skip),
 421         VMSTATE_UINT64(d, TestStruct),
 422         VMSTATE_UINT32_TEST(e, TestStruct, test_skip),
 423         VMSTATE_UINT64_V(f, TestStruct, 2),
 424         VMSTATE_END_OF_LIST()
 425     }
 426 };
 427
 428
 429 static void test_save_noskip(void)
 430 {
 431     QEMUFile *fsave = open_test_file(true);
 432     TestStruct obj = { .a = 1, .b = 2, .c = 3, .d = 4, .e = 5, .f = 6,
 433                        .skip_c_e = false };
 434     int ret = vmstate_save_state(fsave, &vmstate_skipping, &obj, NULL);
 435     g_assert(!ret);
 436     g_assert(!qemu_file_get_error(fsave));
 437
 438     uint8_t expected[] = {
 439         0, 0, 0, 1,             /* a */
 440         0, 0, 0, 2,             /* b */
 441         0, 0, 0, 3,             /* c */
 442         0, 0, 0, 0, 0, 0, 0, 4, /* d */
 443         0, 0, 0, 5,             /* e */
 444         0, 0, 0, 0, 0, 0, 0, 6, /* f */
 445     };
 446
 447     qemu_fclose(fsave);
 448     compare_vmstate(expected, sizeof(expected));
 449 }
 450
 451 static void test_save_skip(void)
 452 {
 453     QEMUFile *fsave = open_test_file(true);
 454     TestStruct obj = { .a = 1, .b = 2, .c = 3, .d = 4, .e = 5, .f = 6,
 455                        .skip_c_e = true };
 456     int ret = vmstate_save_state(fsave, &vmstate_skipping, &obj, NULL);
 457     g_assert(!ret);
 458     g_assert(!qemu_file_get_error(fsave));
 459
 460     uint8_t expected[] = {
 461         0, 0, 0, 1,             /* a */
 462         0, 0, 0, 2,             /* b */
 463         0, 0, 0, 0, 0, 0, 0, 4, /* d */
 464         0, 0, 0, 0, 0, 0, 0, 6, /* f */
 465     };
 466
 467     qemu_fclose(fsave);
 468     compare_vmstate(expected, sizeof(expected));
 469 }
 470
 471 static void test_load_noskip(void)
 472 {
 473     uint8_t buf[] = {
 474         0, 0, 0, 10,             /* a */
 475         0, 0, 0, 20,             /* b */
 476         0, 0, 0, 30,             /* c */
 477         0, 0, 0, 0, 0, 0, 0, 40, /* d */
 478         0, 0, 0, 50,             /* e */
 479         0, 0, 0, 0, 0, 0, 0, 60, /* f */
 480         QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 481     };
 482     save_buffer(buf, sizeof(buf));
 483
 484     QEMUFile *loading = open_test_file(false);
 485     TestStruct obj = { .skip_c_e = false };
 486     vmstate_load_state(loading, &vmstate_skipping, &obj, 2);
 487     g_assert(!qemu_file_get_error(loading));
 488     g_assert_cmpint(obj.a, ==, 10);
 489     g_assert_cmpint(obj.b, ==, 20);
 490     g_assert_cmpint(obj.c, ==, 30);
 491     g_assert_cmpint(obj.d, ==, 40);
 492     g_assert_cmpint(obj.e, ==, 50);
 493     g_assert_cmpint(obj.f, ==, 60);
 494     qemu_fclose(loading);
 495 }
 496
 497 static void test_load_skip(void)
 498 {
 499     uint8_t buf[] = {
 500         0, 0, 0, 10,             /* a */
 501         0, 0, 0, 20,             /* b */
 502         0, 0, 0, 0, 0, 0, 0, 40, /* d */
 503         0, 0, 0, 0, 0, 0, 0, 60, /* f */
 504         QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 505     };
 506     save_buffer(buf, sizeof(buf));
 507
 508     QEMUFile *loading = open_test_file(false);
 509     TestStruct obj = { .skip_c_e = true, .c = 300, .e = 500 };
 510     vmstate_load_state(loading, &vmstate_skipping, &obj, 2);
 511     g_assert(!qemu_file_get_error(loading));
 512     g_assert_cmpint(obj.a, ==, 10);
 513     g_assert_cmpint(obj.b, ==, 20);
 514     g_assert_cmpint(obj.c, ==, 300);
 515     g_assert_cmpint(obj.d, ==, 40);
 516     g_assert_cmpint(obj.e, ==, 500);
 517     g_assert_cmpint(obj.f, ==, 60);
 518     qemu_fclose(loading);
 519 }
 520
 521 typedef struct {
 522     int32_t i;
 523 } TestStructTriv;
 524
 525 const VMStateDescription vmsd_tst = {
 526     .name = "test/tst",
 527     .version_id = 1,
 528     .minimum_version_id = 1,
 529     .fields = (VMStateField[]) {
 530         VMSTATE_INT32(i, TestStructTriv),
 531         VMSTATE_END_OF_LIST()
 532     }
 533 };
 534
 535 /* test array migration */
 536
 537 #define AR_SIZE 4
 538
 539 typedef struct {
 540     TestStructTriv *ar[AR_SIZE];
 541 } TestArrayOfPtrToStuct;
 542
 543 const VMStateDescription vmsd_arps = {
 544     .name = "test/arps",
 545     .version_id = 1,
 546     .minimum_version_id = 1,
 547     .fields = (VMStateField[]) {
 548         VMSTATE_ARRAY_OF_POINTER_TO_STRUCT(ar, TestArrayOfPtrToStuct,
 549                 AR_SIZE, 0, vmsd_tst, TestStructTriv),
 550         VMSTATE_END_OF_LIST()
 551     }
 552 };
 553
 554 static uint8_t wire_arr_ptr_no0[] = {
 555     0x00, 0x00, 0x00, 0x00,
 556     0x00, 0x00, 0x00, 0x01,
 557     0x00, 0x00, 0x00, 0x02,
 558     0x00, 0x00, 0x00, 0x03,
 559     QEMU_VM_EOF
 560 };
 561
 562 static void test_arr_ptr_str_no0_save(void)
 563 {
 564     TestStructTriv ar[AR_SIZE] = {{.i = 0}, {.i = 1}, {.i = 2}, {.i = 3} };
 565     TestArrayOfPtrToStuct sample = {.ar = {&ar[0], &ar[1], &ar[2], &ar[3]} };
 566
 567     save_vmstate(&vmsd_arps, &sample);
 568     compare_vmstate(wire_arr_ptr_no0, sizeof(wire_arr_ptr_no0));
 569 }
 570
 571 static void test_arr_ptr_str_no0_load(void)
 572 {
 573     TestStructTriv ar_gt[AR_SIZE] = {{.i = 0}, {.i = 1}, {.i = 2}, {.i = 3} };
 574     TestStructTriv ar[AR_SIZE] = {};
 575     TestArrayOfPtrToStuct obj = {.ar = {&ar[0], &ar[1], &ar[2], &ar[3]} };
 576     int idx;
 577
 578     save_buffer(wire_arr_ptr_no0, sizeof(wire_arr_ptr_no0));
 579     SUCCESS(load_vmstate_one(&vmsd_arps, &obj, 1,
 580                           wire_arr_ptr_no0, sizeof(wire_arr_ptr_no0)));
 581     for (idx = 0; idx < AR_SIZE; ++idx) {
 582         /* compare the target array ar with the ground truth array ar_gt */
 583         g_assert_cmpint(ar_gt[idx].i, ==, ar[idx].i);
 584     }
 585 }
 586
 587 static uint8_t wire_arr_ptr_0[] = {
 588     0x00, 0x00, 0x00, 0x00,
 589     VMS_NULLPTR_MARKER,
 590     0x00, 0x00, 0x00, 0x02,
 591     0x00, 0x00, 0x00, 0x03,
 592     QEMU_VM_EOF
 593 };
 594
 595 static void test_arr_ptr_str_0_save(void)
 596 {
 597     TestStructTriv ar[AR_SIZE] = {{.i = 0}, {.i = 1}, {.i = 2}, {.i = 3} };
 598     TestArrayOfPtrToStuct sample = {.ar = {&ar[0], NULL, &ar[2], &ar[3]} };
 599
 600     save_vmstate(&vmsd_arps, &sample);
 601     compare_vmstate(wire_arr_ptr_0, sizeof(wire_arr_ptr_0));
 602 }
 603
 604 static void test_arr_ptr_str_0_load(void)
 605 {
 606     TestStructTriv ar_gt[AR_SIZE] = {{.i = 0}, {.i = 0}, {.i = 2}, {.i = 3} };
 607     TestStructTriv ar[AR_SIZE] = {};
 608     TestArrayOfPtrToStuct obj = {.ar = {&ar[0], NULL, &ar[2], &ar[3]} };
 609     int idx;
 610
 611     save_buffer(wire_arr_ptr_0, sizeof(wire_arr_ptr_0));
 612     SUCCESS(load_vmstate_one(&vmsd_arps, &obj, 1,
 613                           wire_arr_ptr_0, sizeof(wire_arr_ptr_0)));
 614     for (idx = 0; idx < AR_SIZE; ++idx) {
 615         /* compare the target array ar with the ground truth array ar_gt */
 616         g_assert_cmpint(ar_gt[idx].i, ==, ar[idx].i);
 617     }
 618     for (idx = 0; idx < AR_SIZE; ++idx) {
 619         if (idx == 1) {
 620             g_assert_cmpint((uintptr_t)(obj.ar[idx]), ==, 0);
 621         } else {
 622             g_assert_cmpint((uintptr_t)(obj.ar[idx]), !=, 0);
 623         }
 624     }
 625 }
 626
 627 typedef struct TestArrayOfPtrToInt {
 628     int32_t *ar[AR_SIZE];
 629 } TestArrayOfPtrToInt;
 630
 631 const VMStateDescription vmsd_arpp = {
 632     .name = "test/arps",
 633     .version_id = 1,
 634     .minimum_version_id = 1,
 635     .fields = (VMStateField[]) {
 636         VMSTATE_ARRAY_OF_POINTER(ar, TestArrayOfPtrToInt,
 637                 AR_SIZE, 0, vmstate_info_int32, int32_t*),
 638         VMSTATE_END_OF_LIST()
 639     }
 640 };
 641
 642 static void test_arr_ptr_prim_0_save(void)
 643 {
 644     int32_t ar[AR_SIZE] = {0 , 1, 2, 3};
 645     TestArrayOfPtrToInt  sample = {.ar = {&ar[0], NULL, &ar[2], &ar[3]} };
 646
 647     save_vmstate(&vmsd_arpp, &sample);
 648     compare_vmstate(wire_arr_ptr_0, sizeof(wire_arr_ptr_0));
 649 }
 650
 651 static void test_arr_ptr_prim_0_load(void)
 652 {
 653     int32_t ar_gt[AR_SIZE] = {0, 1, 2, 3};
 654     int32_t ar[AR_SIZE] = {3 , 42, 1, 0};
 655     TestArrayOfPtrToInt obj = {.ar = {&ar[0], NULL, &ar[2], &ar[3]} };
 656     int idx;
 657
 658     save_buffer(wire_arr_ptr_0, sizeof(wire_arr_ptr_0));
 659     SUCCESS(load_vmstate_one(&vmsd_arpp, &obj, 1,
 660                           wire_arr_ptr_0, sizeof(wire_arr_ptr_0)));
 661     for (idx = 0; idx < AR_SIZE; ++idx) {
 662         /* compare the target array ar with the ground truth array ar_gt */
 663         if (idx == 1) {
 664             g_assert_cmpint(42, ==, ar[idx]);
 665         } else {
 666             g_assert_cmpint(ar_gt[idx], ==, ar[idx]);
 667         }
 668     }
 669 }
 670
 671 /* test QTAILQ migration */
 672 typedef struct TestQtailqElement TestQtailqElement;
 673
 674 struct TestQtailqElement {
 675     bool     b;
 676     uint8_t  u8;
 677     QTAILQ_ENTRY(TestQtailqElement) next;
 678 };
 679
 680 typedef struct TestQtailq {
 681     int16_t  i16;
 682     QTAILQ_HEAD(, TestQtailqElement) q;
 683     int32_t  i32;
 684 } TestQtailq;
 685
 686 static const VMStateDescription vmstate_q_element = {
 687     .name = "test/queue-element",
 688     .version_id = 1,
 689     .minimum_version_id = 1,
 690     .fields = (VMStateField[]) {
 691         VMSTATE_BOOL(b, TestQtailqElement),
 692         VMSTATE_UINT8(u8, TestQtailqElement),
 693         VMSTATE_END_OF_LIST()
 694     },
 695 };
 696
 697 static const VMStateDescription vmstate_q = {
 698     .name = "test/queue",
 699     .version_id = 1,
 700     .minimum_version_id = 1,
 701     .fields = (VMStateField[]) {
 702         VMSTATE_INT16(i16, TestQtailq),
 703         VMSTATE_QTAILQ_V(q, TestQtailq, 1, vmstate_q_element, TestQtailqElement,
 704                          next),
 705         VMSTATE_INT32(i32, TestQtailq),
 706         VMSTATE_END_OF_LIST()
 707     }
 708 };
 709
 710 uint8_t wire_q[] = {
 711     /* i16 */                     0xfe, 0x0,
 712     /* start of element 0 of q */ 0x01,
 713     /* .b  */                     0x01,
 714     /* .u8 */                     0x82,
 715     /* start of element 1 of q */ 0x01,
 716     /* b */                       0x00,
 717     /* u8 */                      0x41,
 718     /* end of q */                0x00,
 719     /* i32 */                     0x00, 0x01, 0x11, 0x70,
 720     QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 721 };
 722
 723 static void test_save_q(void)
 724 {
 725     TestQtailq obj_q = {
 726         .i16 = -512,
 727         .i32 = 70000,
 728     };
 729
 730     TestQtailqElement obj_qe1 = {
 731         .b = true,
 732         .u8 = 130,
 733     };
 734
 735     TestQtailqElement obj_qe2 = {
 736         .b = false,
 737         .u8 = 65,
 738     };
 739
 740     QTAILQ_INIT(&obj_q.q);
 741     QTAILQ_INSERT_TAIL(&obj_q.q, &obj_qe1, next);
 742     QTAILQ_INSERT_TAIL(&obj_q.q, &obj_qe2, next);
 743
 744     save_vmstate(&vmstate_q, &obj_q);
 745     compare_vmstate(wire_q, sizeof(wire_q));
 746 }
 747
 748 static void test_load_q(void)
 749 {
 750     TestQtailq obj_q = {
 751         .i16 = -512,
 752         .i32 = 70000,
 753     };
 754
 755     TestQtailqElement obj_qe1 = {
 756         .b = true,
 757         .u8 = 130,
 758     };
 759
 760     TestQtailqElement obj_qe2 = {
 761         .b = false,
 762         .u8 = 65,
 763     };
 764
 765     QTAILQ_INIT(&obj_q.q);
 766     QTAILQ_INSERT_TAIL(&obj_q.q, &obj_qe1, next);
 767     QTAILQ_INSERT_TAIL(&obj_q.q, &obj_qe2, next);
 768
 769     QEMUFile *fsave = open_test_file(true);
 770
 771     qemu_put_buffer(fsave, wire_q, sizeof(wire_q));
 772     g_assert(!qemu_file_get_error(fsave));
 773     qemu_fclose(fsave);
 774
 775     QEMUFile *fload = open_test_file(false);
 776     TestQtailq tgt;
 777
 778     QTAILQ_INIT(&tgt.q);
 779     vmstate_load_state(fload, &vmstate_q, &tgt, 1);
 780     char eof = qemu_get_byte(fload);
 781     g_assert(!qemu_file_get_error(fload));
 782     g_assert_cmpint(tgt.i16, ==, obj_q.i16);
 783     g_assert_cmpint(tgt.i32, ==, obj_q.i32);
 784     g_assert_cmpint(eof, ==, QEMU_VM_EOF);
 785
 786     TestQtailqElement *qele_from = QTAILQ_FIRST(&obj_q.q);
 787     TestQtailqElement *qlast_from = QTAILQ_LAST(&obj_q.q);
 788     TestQtailqElement *qele_to = QTAILQ_FIRST(&tgt.q);
 789     TestQtailqElement *qlast_to = QTAILQ_LAST(&tgt.q);
 790
 791     while (1) {
 792         g_assert_cmpint(qele_to->b, ==, qele_from->b);
 793         g_assert_cmpint(qele_to->u8, ==, qele_from->u8);
 794         if ((qele_from == qlast_from) || (qele_to == qlast_to)) {
 795             break;
 796         }
 797         qele_from = QTAILQ_NEXT(qele_from, next);
 798         qele_to = QTAILQ_NEXT(qele_to, next);
 799     }
 800
 801     g_assert_cmpint((uintptr_t) qele_from, ==, (uintptr_t) qlast_from);
 802     g_assert_cmpint((uintptr_t) qele_to, ==, (uintptr_t) qlast_to);
 803
 804     /* clean up */
 805     TestQtailqElement *qele;
 806     while (!QTAILQ_EMPTY(&tgt.q)) {
 807         qele = QTAILQ_LAST(&tgt.q);
 808         QTAILQ_REMOVE(&tgt.q, qele, next);
 809         free(qele);
 810         qele = NULL;
 811     }
 812     qemu_fclose(fload);
 813 }
 814
 815 /* interval (key) */
 816 typedef struct TestGTreeInterval {
 817     uint64_t low;
 818     uint64_t high;
 819 } TestGTreeInterval;
 820
 821 #define VMSTATE_INTERVAL                               \
 822 {                                                      \
 823     .name = "interval",                                \
 824     .version_id = 1,                                   \
 825     .minimum_version_id = 1,                           \
 826     .fields = (VMStateField[]) {                       \
 827         VMSTATE_UINT64(low, TestGTreeInterval),        \
 828         VMSTATE_UINT64(high, TestGTreeInterval),       \
 829         VMSTATE_END_OF_LIST()                          \
 830     }                                                  \
 831 }
 832
 833 /* mapping (value) */
 834 typedef struct TestGTreeMapping {
 835     uint64_t phys_addr;
 836     uint32_t flags;
 837 } TestGTreeMapping;
 838
 839 #define VMSTATE_MAPPING                               \
 840 {                                                     \
 841     .name = "mapping",                                \
 842     .version_id = 1,                                  \
 843     .minimum_version_id = 1,                          \
 844     .fields = (VMStateField[]) {                      \
 845         VMSTATE_UINT64(phys_addr, TestGTreeMapping),  \
 846         VMSTATE_UINT32(flags, TestGTreeMapping),      \
 847         VMSTATE_END_OF_LIST()                         \
 848     },                                                \
 849 }
 850
 851 static const VMStateDescription vmstate_interval_mapping[2] = {
 852     VMSTATE_MAPPING,   /* value */
 853     VMSTATE_INTERVAL   /* key   */
 854 };
 855
 856 typedef struct TestGTreeDomain {
 857     int32_t  id;
 858     GTree    *mappings;
 859 } TestGTreeDomain;
 860
 861 typedef struct TestGTreeIOMMU {
 862     int32_t  id;
 863     GTree    *domains;
 864 } TestGTreeIOMMU;
 865
 866 /* Interval comparison function */
 867 static gint interval_cmp(gconstpointer a, gconstpointer b, gpointer user_data)
 868 {
 869     TestGTreeInterval *inta = (TestGTreeInterval *)a;
 870     TestGTreeInterval *intb = (TestGTreeInterval *)b;
 871
 872     if (inta->high < intb->low) {
 873         return -1;
 874     } else if (intb->high < inta->low) {
 875         return 1;
 876     } else {
 877         return 0;
 878     }
 879 }
 880
 881 /* ID comparison function */
 882 static gint int_cmp(gconstpointer a, gconstpointer b, gpointer user_data)
 883 {
 884     guint ua = GPOINTER_TO_UINT(a);
 885     guint ub = GPOINTER_TO_UINT(b);
 886     return (ua > ub) - (ua < ub);
 887 }
 888
 889 static void destroy_domain(gpointer data)
 890 {
 891     TestGTreeDomain *domain = (TestGTreeDomain *)data;
 892
 893     g_tree_destroy(domain->mappings);
 894     g_free(domain);
 895 }
 896
 897 static int domain_preload(void *opaque)
 898 {
 899     TestGTreeDomain *domain = opaque;
 900
 901     domain->mappings = g_tree_new_full((GCompareDataFunc)interval_cmp,
 902                                        NULL, g_free, g_free);
 903     return 0;
 904 }
 905
 906 static int iommu_preload(void *opaque)
 907 {
 908     TestGTreeIOMMU *iommu = opaque;
 909
 910     iommu->domains = g_tree_new_full((GCompareDataFunc)int_cmp,
 911                                      NULL, NULL, destroy_domain);
 912     return 0;
 913 }
 914
 915 static const VMStateDescription vmstate_domain = {
 916     .name = "domain",
 917     .version_id = 1,
 918     .minimum_version_id = 1,
 919     .pre_load = domain_preload,
 920     .fields = (VMStateField[]) {
 921         VMSTATE_INT32(id, TestGTreeDomain),
 922         VMSTATE_GTREE_V(mappings, TestGTreeDomain, 1,
 923                         vmstate_interval_mapping,
 924                         TestGTreeInterval, TestGTreeMapping),
 925         VMSTATE_END_OF_LIST()
 926     }
 927 };
 928
 929 /* test QLIST Migration */
 930
 931 typedef struct TestQListElement {
 932     uint32_t  id;
 933     QLIST_ENTRY(TestQListElement) next;
 934 } TestQListElement;
 935
 936 typedef struct TestQListContainer {
 937     uint32_t  id;
 938     QLIST_HEAD(, TestQListElement) list;
 939 } TestQListContainer;
 940
 941 static const VMStateDescription vmstate_qlist_element = {
 942     .name = "test/queue list",
 943     .version_id = 1,
 944     .minimum_version_id = 1,
 945     .fields = (VMStateField[]) {
 946         VMSTATE_UINT32(id, TestQListElement),
 947         VMSTATE_END_OF_LIST()
 948     }
 949 };
 950
 951 static const VMStateDescription vmstate_iommu = {
 952     .name = "iommu",
 953     .version_id = 1,
 954     .minimum_version_id = 1,
 955     .pre_load = iommu_preload,
 956     .fields = (VMStateField[]) {
 957         VMSTATE_INT32(id, TestGTreeIOMMU),
 958         VMSTATE_GTREE_DIRECT_KEY_V(domains, TestGTreeIOMMU, 1,
 959                                    &vmstate_domain, TestGTreeDomain),
 960         VMSTATE_END_OF_LIST()
 961     }
 962 };
 963
 964 static const VMStateDescription vmstate_container = {
 965     .name = "test/container/qlist",
 966     .version_id = 1,
 967     .minimum_version_id = 1,
 968     .fields = (VMStateField[]) {
 969         VMSTATE_UINT32(id, TestQListContainer),
 970         VMSTATE_QLIST_V(list, TestQListContainer, 1, vmstate_qlist_element,
 971                         TestQListElement, next),
 972         VMSTATE_END_OF_LIST()
 973     }
 974 };
 975
 976 uint8_t first_domain_dump[] = {
 977     /* id */
 978     0x00, 0x0, 0x0, 0x6,
 979     0x00, 0x0, 0x0, 0x2, /* 2 mappings */
 980     0x1, /* start of a */
 981     /* a */
 982     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10, 0x00,
 983     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x1F, 0xFF,
 984     /* map_a */
 985     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xa0, 0x00,
 986     0x00, 0x00, 0x00, 0x01,
 987     0x1, /* start of b */
 988     /* b */
 989     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x40, 0x00,
 990     0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x4F, 0xFF,
 991     /* map_b */
 992     0x00, 0x00, 0x00, 0x00, 0x00, 0x0e, 0x00, 0x00,
 993     0x00, 0x00, 0x00, 0x02,
 994     0x0, /* end of gtree */
 995     QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
 996 };
 997
 998 static TestGTreeDomain *create_first_domain(void)
 999 {
1000     TestGTreeDomain *domain;
1001     TestGTreeMapping *map_a, *map_b;
1002     TestGTreeInterval *a, *b;
1003
1004     domain = g_malloc0(sizeof(TestGTreeDomain));
1005     domain->id = 6;
1006
1007     a = g_malloc0(sizeof(TestGTreeInterval));
1008     a->low = 0x1000;
1009     a->high = 0x1FFF;
1010
1011     b = g_malloc0(sizeof(TestGTreeInterval));
1012     b->low = 0x4000;
1013     b->high = 0x4FFF;
1014
1015     map_a = g_malloc0(sizeof(TestGTreeMapping));
1016     map_a->phys_addr = 0xa000;
1017     map_a->flags = 1;
1018
1019     map_b = g_malloc0(sizeof(TestGTreeMapping));
1020     map_b->phys_addr = 0xe0000;
1021     map_b->flags = 2;
1022
1023     domain->mappings = g_tree_new_full((GCompareDataFunc)interval_cmp, NULL,
1024                                         (GDestroyNotify)g_free,
1025                                         (GDestroyNotify)g_free);
1026     g_tree_insert(domain->mappings, a, map_a);
1027     g_tree_insert(domain->mappings, b, map_b);
1028     return domain;
1029 }
1030
1031 static void test_gtree_save_domain(void)
1032 {
1033     TestGTreeDomain *first_domain = create_first_domain();
1034
1035     save_vmstate(&vmstate_domain, first_domain);
1036     compare_vmstate(first_domain_dump, sizeof(first_domain_dump));
1037     destroy_domain(first_domain);
1038 }
1039
1040 struct match_node_data {
1041     GTree *tree;
1042     gpointer key;
1043     gpointer value;
1044 };
1045
1046 struct tree_cmp_data {
1047     GTree *tree1;
1048     GTree *tree2;
1049     GTraverseFunc match_node;
1050 };
1051
1052 static gboolean match_interval_mapping_node(gpointer key,
1053                                             gpointer value, gpointer data)
1054 {
1055     TestGTreeMapping *map_a, *map_b;
1056     TestGTreeInterval *a, *b;
1057     struct match_node_data *d = (struct match_node_data *)data;
1058     char *str = g_strdup_printf("dest");
1059
1060     g_free(str);
1061     a = (TestGTreeInterval *)key;
1062     b = (TestGTreeInterval *)d->key;
1063
1064     map_a = (TestGTreeMapping *)value;
1065     map_b = (TestGTreeMapping *)d->value;
1066
1067     assert(a->low == b->low);
1068     assert(a->high == b->high);
1069     assert(map_a->phys_addr == map_b->phys_addr);
1070     assert(map_a->flags == map_b->flags);
1071     g_tree_remove(d->tree, key);
1072     return true;
1073 }
1074
1075 static gboolean diff_tree(gpointer key, gpointer value, gpointer data)
1076 {
1077     struct tree_cmp_data *tp = (struct tree_cmp_data *)data;
1078     struct match_node_data d = {tp->tree2, key, value};
1079
1080     g_tree_foreach(tp->tree2, tp->match_node, &d);
1081     g_tree_remove(tp->tree1, key);
1082     return false;
1083 }
1084
1085 static void compare_trees(GTree *tree1, GTree *tree2,
1086                           GTraverseFunc function)
1087 {
1088     struct tree_cmp_data tp = {tree1, tree2, function};
1089
1090     g_tree_foreach(tree1, diff_tree, &tp);
1091     assert(g_tree_nnodes(tree1) == 0);
1092     assert(g_tree_nnodes(tree2) == 0);
1093 }
1094
1095 static void diff_domain(TestGTreeDomain *d1, TestGTreeDomain *d2)
1096 {
1097     assert(d1->id == d2->id);
1098     compare_trees(d1->mappings, d2->mappings, match_interval_mapping_node);
1099 }
1100
1101 static gboolean match_domain_node(gpointer key, gpointer value, gpointer data)
1102 {
1103     uint64_t id1, id2;
1104     TestGTreeDomain *d1, *d2;
1105     struct match_node_data *d = (struct match_node_data *)data;
1106
1107     id1 = (uint64_t)(uintptr_t)key;
1108     id2 = (uint64_t)(uintptr_t)d->key;
1109     d1 = (TestGTreeDomain *)value;
1110     d2 = (TestGTreeDomain *)d->value;
1111     assert(id1 == id2);
1112     diff_domain(d1, d2);
1113     g_tree_remove(d->tree, key);
1114     return true;
1115 }
1116
1117 static void diff_iommu(TestGTreeIOMMU *iommu1, TestGTreeIOMMU *iommu2)
1118 {
1119     assert(iommu1->id == iommu2->id);
1120     compare_trees(iommu1->domains, iommu2->domains, match_domain_node);
1121 }
1122
1123 static void test_gtree_load_domain(void)
1124 {
1125     TestGTreeDomain *dest_domain = g_malloc0(sizeof(TestGTreeDomain));
1126     TestGTreeDomain *orig_domain = create_first_domain();
1127     QEMUFile *fload, *fsave;
1128     char eof;
1129
1130     fsave = open_test_file(true);
1131     qemu_put_buffer(fsave, first_domain_dump, sizeof(first_domain_dump));
1132     g_assert(!qemu_file_get_error(fsave));
1133     qemu_fclose(fsave);
1134
1135     fload = open_test_file(false);
1136
1137     vmstate_load_state(fload, &vmstate_domain, dest_domain, 1);
1138     eof = qemu_get_byte(fload);
1139     g_assert(!qemu_file_get_error(fload));
1140     g_assert_cmpint(orig_domain->id, ==, dest_domain->id);
1141     g_assert_cmpint(eof, ==, QEMU_VM_EOF);
1142
1143     diff_domain(orig_domain, dest_domain);
1144     destroy_domain(orig_domain);
1145     destroy_domain(dest_domain);
1146     qemu_fclose(fload);
1147 }
1148
1149 uint8_t iommu_dump[] = {
1150     /* iommu id */
1151     0x00, 0x0, 0x0, 0x7,
1152     0x00, 0x0, 0x0, 0x2, /* 2 domains */
1153     0x1,/* start of domain 5 */
1154         0x00, 0x00, 0x00, 0x00, 0x00, 0x0, 0x0, 0x5, /* key = 5 */
1155         0x00, 0x0, 0x0, 0x5, /* domain1 id */
1156         0x00, 0x0, 0x0, 0x1, /* 1 mapping */
1157         0x1, /* start of mappings */
1158             /* c */
1159             0x00, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00,
1160             0x00, 0x00, 0x00, 0x00, 0x01, 0xFF, 0xFF, 0xFF,
1161             /* map_c */
1162             0x00, 0x00, 0x00, 0x00, 0x0F, 0x00, 0x00, 0x00,
1163             0x00, 0x0, 0x0, 0x3,
1164             0x0, /* end of domain1 mappings*/
1165     0x1,/* start of domain 6 */
1166         0x00, 0x00, 0x00, 0x00, 0x00, 0x0, 0x0, 0x6, /* key = 6 */
1167         0x00, 0x0, 0x0, 0x6, /* domain6 id */
1168             0x00, 0x0, 0x0, 0x2, /* 2 mappings */
1169             0x1, /* start of a */
1170             /* a */
1171             0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10, 0x00,
1172             0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x1F, 0xFF,
1173             /* map_a */
1174             0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xa0, 0x00,
1175             0x00, 0x00, 0x00, 0x01,
1176             0x1, /* start of b */
1177             /* b */
1178             0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x40, 0x00,
1179             0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x4F, 0xFF,
1180             /* map_b */
1181             0x00, 0x00, 0x00, 0x00, 0x00, 0x0e, 0x00, 0x00,
1182             0x00, 0x00, 0x00, 0x02,
1183             0x0, /* end of domain6 mappings*/
1184     0x0, /* end of domains */
1185     QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
1186 };
1187
1188 static TestGTreeIOMMU *create_iommu(void)
1189 {
1190     TestGTreeIOMMU *iommu = g_malloc0(sizeof(TestGTreeIOMMU));
1191     TestGTreeDomain *first_domain = create_first_domain();
1192     TestGTreeDomain *second_domain;
1193     TestGTreeMapping *map_c;
1194     TestGTreeInterval *c;
1195
1196     iommu->id = 7;
1197     iommu->domains = g_tree_new_full((GCompareDataFunc)int_cmp, NULL,
1198                                      NULL,
1199                                      destroy_domain);
1200
1201     second_domain = g_malloc0(sizeof(TestGTreeDomain));
1202     second_domain->id = 5;
1203     second_domain->mappings = g_tree_new_full((GCompareDataFunc)interval_cmp,
1204                                               NULL,
1205                                               (GDestroyNotify)g_free,
1206                                               (GDestroyNotify)g_free);
1207
1208     g_tree_insert(iommu->domains, GUINT_TO_POINTER(6), first_domain);
1209     g_tree_insert(iommu->domains, (gpointer)0x0000000000000005, second_domain);
1210
1211     c = g_malloc0(sizeof(TestGTreeInterval));
1212     c->low = 0x1000000;
1213     c->high = 0x1FFFFFF;
1214
1215     map_c = g_malloc0(sizeof(TestGTreeMapping));
1216     map_c->phys_addr = 0xF000000;
1217     map_c->flags = 0x3;
1218
1219     g_tree_insert(second_domain->mappings, c, map_c);
1220     return iommu;
1221 }
1222
1223 static void destroy_iommu(TestGTreeIOMMU *iommu)
1224 {
1225     g_tree_destroy(iommu->domains);
1226     g_free(iommu);
1227 }
1228
1229 static void test_gtree_save_iommu(void)
1230 {
1231     TestGTreeIOMMU *iommu = create_iommu();
1232
1233     save_vmstate(&vmstate_iommu, iommu);
1234     compare_vmstate(iommu_dump, sizeof(iommu_dump));
1235     destroy_iommu(iommu);
1236 }
1237
1238 static void test_gtree_load_iommu(void)
1239 {
1240     TestGTreeIOMMU *dest_iommu = g_malloc0(sizeof(TestGTreeIOMMU));
1241     TestGTreeIOMMU *orig_iommu = create_iommu();
1242     QEMUFile *fsave, *fload;
1243     char eof;
1244
1245     fsave = open_test_file(true);
1246     qemu_put_buffer(fsave, iommu_dump, sizeof(iommu_dump));
1247     g_assert(!qemu_file_get_error(fsave));
1248     qemu_fclose(fsave);
1249
1250     fload = open_test_file(false);
1251     vmstate_load_state(fload, &vmstate_iommu, dest_iommu, 1);
1252     eof = qemu_get_byte(fload);
1253     g_assert(!qemu_file_get_error(fload));
1254     g_assert_cmpint(orig_iommu->id, ==, dest_iommu->id);
1255     g_assert_cmpint(eof, ==, QEMU_VM_EOF);
1256
1257     diff_iommu(orig_iommu, dest_iommu);
1258     destroy_iommu(orig_iommu);
1259     destroy_iommu(dest_iommu);
1260     qemu_fclose(fload);
1261 }
1262
1263 static uint8_t qlist_dump[] = {
1264     0x00, 0x00, 0x00, 0x01, /* container id */
1265     0x1, /* start of a */
1266     0x00, 0x00, 0x00, 0x0a,
1267     0x1, /* start of b */
1268     0x00, 0x00, 0x0b, 0x00,
1269     0x1, /* start of c */
1270     0x00, 0x0c, 0x00, 0x00,
1271     0x1, /* start of d */
1272     0x0d, 0x00, 0x00, 0x00,
1273     0x0, /* end of list */
1274     QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
1275 };
1276
1277 static TestQListContainer *alloc_container(void)
1278 {
1279     TestQListElement *a = g_malloc(sizeof(TestQListElement));
1280     TestQListElement *b = g_malloc(sizeof(TestQListElement));
1281     TestQListElement *c = g_malloc(sizeof(TestQListElement));
1282     TestQListElement *d = g_malloc(sizeof(TestQListElement));
1283     TestQListContainer *container = g_malloc(sizeof(TestQListContainer));
1284
1285     a->id = 0x0a;
1286     b->id = 0x0b00;
1287     c->id = 0xc0000;
1288     d->id = 0xd000000;
1289     container->id = 1;
1290
1291     QLIST_INIT(&container->list);
1292     QLIST_INSERT_HEAD(&container->list, d, next);
1293     QLIST_INSERT_HEAD(&container->list, c, next);
1294     QLIST_INSERT_HEAD(&container->list, b, next);
1295     QLIST_INSERT_HEAD(&container->list, a, next);
1296     return container;
1297 }
1298
1299 static void free_container(TestQListContainer *container)
1300 {
1301     TestQListElement *iter, *tmp;
1302
1303     QLIST_FOREACH_SAFE(iter, &container->list, next, tmp) {
1304         QLIST_REMOVE(iter, next);
1305         g_free(iter);
1306     }
1307     g_free(container);
1308 }
1309
1310 static void compare_containers(TestQListContainer *c1, TestQListContainer *c2)
1311 {
1312     TestQListElement *first_item_c1, *first_item_c2;
1313
1314     while (!QLIST_EMPTY(&c1->list)) {
1315         first_item_c1 = QLIST_FIRST(&c1->list);
1316         first_item_c2 = QLIST_FIRST(&c2->list);
1317         assert(first_item_c2);
1318         assert(first_item_c1->id == first_item_c2->id);
1319         QLIST_REMOVE(first_item_c1, next);
1320         QLIST_REMOVE(first_item_c2, next);
1321         g_free(first_item_c1);
1322         g_free(first_item_c2);
1323     }
1324     assert(QLIST_EMPTY(&c2->list));
1325 }
1326
1327 /*
1328  * Check the prev & next fields are correct by doing list
1329  * manipulations on the container. We will do that for both
1330  * the source and the destination containers
1331  */
1332 static void manipulate_container(TestQListContainer *c)
1333 {
1334      TestQListElement *prev = NULL, *iter = QLIST_FIRST(&c->list);
1335      TestQListElement *elem;
1336
1337      elem = g_malloc(sizeof(TestQListElement));
1338      elem->id = 0x12;
1339      QLIST_INSERT_AFTER(iter, elem, next);
1340
1341      elem = g_malloc(sizeof(TestQListElement));
1342      elem->id = 0x13;
1343      QLIST_INSERT_HEAD(&c->list, elem, next);
1344
1345      while (iter) {
1346         prev = iter;
1347         iter = QLIST_NEXT(iter, next);
1348      }
1349
1350      elem = g_malloc(sizeof(TestQListElement));
1351      elem->id = 0x14;
1352      QLIST_INSERT_BEFORE(prev, elem, next);
1353
1354      elem = g_malloc(sizeof(TestQListElement));
1355      elem->id = 0x15;
1356      QLIST_INSERT_AFTER(prev, elem, next);
1357
1358      QLIST_REMOVE(prev, next);
1359      g_free(prev);
1360 }
1361
1362 static void test_save_qlist(void)
1363 {
1364     TestQListContainer *container = alloc_container();
1365
1366     save_vmstate(&vmstate_container, container);
1367     compare_vmstate(qlist_dump, sizeof(qlist_dump));
1368     free_container(container);
1369 }
1370
1371 static void test_load_qlist(void)
1372 {
1373     QEMUFile *fsave, *fload;
1374     TestQListContainer *orig_container = alloc_container();
1375     TestQListContainer *dest_container = g_malloc0(sizeof(TestQListContainer));
1376     char eof;
1377
1378     QLIST_INIT(&dest_container->list);
1379
1380     fsave = open_test_file(true);
1381     qemu_put_buffer(fsave, qlist_dump, sizeof(qlist_dump));
1382     g_assert(!qemu_file_get_error(fsave));
1383     qemu_fclose(fsave);
1384
1385     fload = open_test_file(false);
1386     vmstate_load_state(fload, &vmstate_container, dest_container, 1);
1387     eof = qemu_get_byte(fload);
1388     g_assert(!qemu_file_get_error(fload));
1389     g_assert_cmpint(eof, ==, QEMU_VM_EOF);
1390     manipulate_container(orig_container);
1391     manipulate_container(dest_container);
1392     compare_containers(orig_container, dest_container);
1393     free_container(orig_container);
1394     free_container(dest_container);
1395     qemu_fclose(fload);
1396 }
1397
1398 typedef struct TmpTestStruct {
1399     TestStruct *parent;
1400     int64_t diff;
1401 } TmpTestStruct;
1402
1403 static int tmp_child_pre_save(void *opaque)
1404 {
1405     struct TmpTestStruct *tts = opaque;
1406
1407     tts->diff = tts->parent->b - tts->parent->a;
1408
1409     return 0;
1410 }
1411
1412 static int tmp_child_post_load(void *opaque, int version_id)
1413 {
1414     struct TmpTestStruct *tts = opaque;
1415
1416     tts->parent->b = tts->parent->a + tts->diff;
1417
1418     return 0;
1419 }
1420
1421 static const VMStateDescription vmstate_tmp_back_to_parent = {
1422     .name = "test/tmp_child_parent",
1423     .fields = (VMStateField[]) {
1424         VMSTATE_UINT64(f, TestStruct),
1425         VMSTATE_END_OF_LIST()
1426     }
1427 };
1428
1429 static const VMStateDescription vmstate_tmp_child = {
1430     .name = "test/tmp_child",
1431     .pre_save = tmp_child_pre_save,
1432     .post_load = tmp_child_post_load,
1433     .fields = (VMStateField[]) {
1434         VMSTATE_INT64(diff, TmpTestStruct),
1435         VMSTATE_STRUCT_POINTER(parent, TmpTestStruct,
1436                                vmstate_tmp_back_to_parent, TestStruct),
1437         VMSTATE_END_OF_LIST()
1438     }
1439 };
1440
1441 static const VMStateDescription vmstate_with_tmp = {
1442     .name = "test/with_tmp",
1443     .version_id = 1,
1444     .fields = (VMStateField[]) {
1445         VMSTATE_UINT32(a, TestStruct),
1446         VMSTATE_UINT64(d, TestStruct),
1447         VMSTATE_WITH_TMP(TestStruct, TmpTestStruct, vmstate_tmp_child),
1448         VMSTATE_END_OF_LIST()
1449     }
1450 };
1451
1452 static void obj_tmp_copy(void *target, void *source)
1453 {
1454     memcpy(target, source, sizeof(TestStruct));
1455 }
1456
1457 static void test_tmp_struct(void)
1458 {
1459     TestStruct obj, obj_clone;
1460
1461     uint8_t const wire_with_tmp[] = {
1462         /* u32 a */ 0x00, 0x00, 0x00, 0x02,
1463         /* u64 d */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01,
1464         /* diff  */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x02,
1465         /* u64 f */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08,
1466         QEMU_VM_EOF, /* just to ensure we won't get EOF reported prematurely */
1467     };
1468
1469     memset(&obj, 0, sizeof(obj));
1470     obj.a = 2;
1471     obj.b = 4;
1472     obj.d = 1;
1473     obj.f = 8;
1474     save_vmstate(&vmstate_with_tmp, &obj);
1475
1476     compare_vmstate(wire_with_tmp, sizeof(wire_with_tmp));
1477
1478     memset(&obj, 0, sizeof(obj));
1479     SUCCESS(load_vmstate(&vmstate_with_tmp, &obj, &obj_clone,
1480                          obj_tmp_copy, 1, wire_with_tmp,
1481                          sizeof(wire_with_tmp)));
1482     g_assert_cmpint(obj.a, ==, 2); /* From top level vmsd */
1483     g_assert_cmpint(obj.b, ==, 4); /* from the post_load */
1484     g_assert_cmpint(obj.d, ==, 1); /* From top level vmsd */
1485     g_assert_cmpint(obj.f, ==, 8); /* From the child->parent */
1486 }
1487
1488 int main(int argc, char **argv)
1489 {
1490     temp_fd = mkstemp(temp_file);
1491
1492     module_call_init(MODULE_INIT_QOM);
1493
1494     g_setenv("QTEST_SILENT_ERRORS", "1", 1);
1495
1496     g_test_init(&argc, &argv, NULL);
1497     g_test_add_func("/vmstate/simple/primitive", test_simple_primitive);
1498     g_test_add_func("/vmstate/simple/array", test_simple_array);
1499     g_test_add_func("/vmstate/versioned/load/v1", test_load_v1);
1500     g_test_add_func("/vmstate/versioned/load/v2", test_load_v2);
1501     g_test_add_func("/vmstate/field_exists/load/noskip", test_load_noskip);
1502     g_test_add_func("/vmstate/field_exists/load/skip", test_load_skip);
1503     g_test_add_func("/vmstate/field_exists/save/noskip", test_save_noskip);
1504     g_test_add_func("/vmstate/field_exists/save/skip", test_save_skip);
1505     g_test_add_func("/vmstate/array/ptr/str/no0/save",
1506                     test_arr_ptr_str_no0_save);
1507     g_test_add_func("/vmstate/array/ptr/str/no0/load",
1508                     test_arr_ptr_str_no0_load);
1509     g_test_add_func("/vmstate/array/ptr/str/0/save", test_arr_ptr_str_0_save);
1510     g_test_add_func("/vmstate/array/ptr/str/0/load",
1511                     test_arr_ptr_str_0_load);
1512     g_test_add_func("/vmstate/array/ptr/prim/0/save",
1513                     test_arr_ptr_prim_0_save);
1514     g_test_add_func("/vmstate/array/ptr/prim/0/load",
1515                     test_arr_ptr_prim_0_load);
1516     g_test_add_func("/vmstate/qtailq/save/saveq", test_save_q);
1517     g_test_add_func("/vmstate/qtailq/load/loadq", test_load_q);
1518     g_test_add_func("/vmstate/gtree/save/savedomain", test_gtree_save_domain);
1519     g_test_add_func("/vmstate/gtree/load/loaddomain", test_gtree_load_domain);
1520     g_test_add_func("/vmstate/gtree/save/saveiommu", test_gtree_save_iommu);
1521     g_test_add_func("/vmstate/gtree/load/loadiommu", test_gtree_load_iommu);
1522     g_test_add_func("/vmstate/qlist/save/saveqlist", test_save_qlist);
1523     g_test_add_func("/vmstate/qlist/load/loadqlist", test_load_qlist);
1524     g_test_add_func("/vmstate/tmp_struct", test_tmp_struct);
1525     g_test_run();
1526
1527     close(temp_fd);
1528     unlink(temp_file);
1529
1530     return 0;
1531 }