arch_init.c 33 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
/*
 * QEMU System Emulator
 *
 * Copyright (c) 2003-2008 Fabrice Bellard
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
#include <stdint.h>
#include <stdarg.h>
26
#include <stdlib.h>
27
#ifndef _WIN32
28
#include <sys/types.h>
29
30
31
#include <sys/mman.h>
#endif
#include "config.h"
32
#include "monitor/monitor.h"
33
#include "sysemu/sysemu.h"
34
35
#include "qemu/bitops.h"
#include "qemu/bitmap.h"
36
#include "sysemu/arch_init.h"
37
#include "audio/audio.h"
Paolo Bonzini's avatar
Paolo Bonzini committed
38
#include "hw/i386/pc.h"
39
#include "hw/pci/pci.h"
Paolo Bonzini's avatar
Paolo Bonzini committed
40
#include "hw/audio/audio.h"
41
#include "sysemu/kvm.h"
42
#include "migration/migration.h"
Paolo Bonzini's avatar
Paolo Bonzini committed
43
#include "hw/i386/smbios.h"
44
#include "exec/address-spaces.h"
Paolo Bonzini's avatar
Paolo Bonzini committed
45
#include "hw/audio/pcspk.h"
46
#include "migration/page_cache.h"
47
#include "qemu/config-file.h"
48
#include "qmp-commands.h"
49
#include "trace.h"
50
#include "exec/cpu-all.h"
51
#include "hw/acpi/acpi.h"
52

Orit Wasserman's avatar
Orit Wasserman committed
53
54
55
56
57
58
59
60
#ifdef DEBUG_ARCH_INIT
#define DPRINTF(fmt, ...) \
    do { fprintf(stdout, "arch_init: " fmt, ## __VA_ARGS__); } while (0)
#else
#define DPRINTF(fmt, ...) \
    do { } while (0)
#endif

61
62
63
64
65
66
67
#ifdef TARGET_SPARC
int graphic_width = 1024;
int graphic_height = 768;
int graphic_depth = 8;
#else
int graphic_width = 800;
int graphic_height = 600;
68
int graphic_depth = 32;
69
70
71
72
73
74
75
76
77
78
79
80
81
#endif


#if defined(TARGET_ALPHA)
#define QEMU_ARCH QEMU_ARCH_ALPHA
#elif defined(TARGET_ARM)
#define QEMU_ARCH QEMU_ARCH_ARM
#elif defined(TARGET_CRIS)
#define QEMU_ARCH QEMU_ARCH_CRIS
#elif defined(TARGET_I386)
#define QEMU_ARCH QEMU_ARCH_I386
#elif defined(TARGET_M68K)
#define QEMU_ARCH QEMU_ARCH_M68K
Michael Walle's avatar
Michael Walle committed
82
83
#elif defined(TARGET_LM32)
#define QEMU_ARCH QEMU_ARCH_LM32
84
85
86
87
#elif defined(TARGET_MICROBLAZE)
#define QEMU_ARCH QEMU_ARCH_MICROBLAZE
#elif defined(TARGET_MIPS)
#define QEMU_ARCH QEMU_ARCH_MIPS
88
89
#elif defined(TARGET_MOXIE)
#define QEMU_ARCH QEMU_ARCH_MOXIE
90
91
#elif defined(TARGET_OPENRISC)
#define QEMU_ARCH QEMU_ARCH_OPENRISC
92
93
94
95
96
97
98
99
#elif defined(TARGET_PPC)
#define QEMU_ARCH QEMU_ARCH_PPC
#elif defined(TARGET_S390X)
#define QEMU_ARCH QEMU_ARCH_S390X
#elif defined(TARGET_SH4)
#define QEMU_ARCH QEMU_ARCH_SH4
#elif defined(TARGET_SPARC)
#define QEMU_ARCH QEMU_ARCH_SPARC
Max Filippov's avatar
Max Filippov committed
100
101
#elif defined(TARGET_XTENSA)
#define QEMU_ARCH QEMU_ARCH_XTENSA
102
103
#elif defined(TARGET_UNICORE32)
#define QEMU_ARCH QEMU_ARCH_UNICORE32
104
105
106
#endif

const uint32_t arch_type = QEMU_ARCH;
107
108
109
static bool mig_throttle_on;
static int dirty_rate_high_cnt;
static void check_guest_throttling(void);
110
111
112
113

/***********************************************************/
/* ram save/restore */

114
115
116
117
118
119
#define RAM_SAVE_FLAG_FULL     0x01 /* Obsolete, not used anymore */
#define RAM_SAVE_FLAG_COMPRESS 0x02
#define RAM_SAVE_FLAG_MEM_SIZE 0x04
#define RAM_SAVE_FLAG_PAGE     0x08
#define RAM_SAVE_FLAG_EOS      0x10
#define RAM_SAVE_FLAG_CONTINUE 0x20
120
#define RAM_SAVE_FLAG_XBZRLE   0x40
Michael R. Hines's avatar
Michael R. Hines committed
121
/* 0x80 is reserved in migration.h start with 0x100 next */
122

123

124
125
static struct defconfig_file {
    const char *filename;
126
127
    /* Indicates it is an user config file (disabled by -no-user-config) */
    bool userconfig;
128
} default_config_files[] = {
129
    { CONFIG_QEMU_CONFDIR "/qemu.conf",                   true },
130
    { CONFIG_QEMU_CONFDIR "/target-" TARGET_NAME ".conf", true },
131
132
133
134
    { NULL }, /* end of list */
};


135
int qemu_read_default_config_files(bool userconfig)
136
137
{
    int ret;
138
    struct defconfig_file *f;
139

140
    for (f = default_config_files; f->filename; f++) {
141
142
143
        if (!userconfig && f->userconfig) {
            continue;
        }
144
145
146
147
        ret = qemu_read_config_file(f->filename);
        if (ret < 0 && ret != -ENOENT) {
            return ret;
        }
148
    }
Laszlo Ersek's avatar
Laszlo Ersek committed
149

150
151
152
    return 0;
}

153
static inline bool is_zero_page(uint8_t *p)
154
{
155
156
    return buffer_find_nonzero_offset(p, TARGET_PAGE_SIZE) ==
        TARGET_PAGE_SIZE;
157
158
}

159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
/* struct contains XBZRLE cache and a static page
   used by the compression */
static struct {
    /* buffer used for XBZRLE encoding */
    uint8_t *encoded_buf;
    /* buffer for storing page content */
    uint8_t *current_buf;
    /* buffer used for XBZRLE decoding */
    uint8_t *decoded_buf;
    /* Cache for XBZRLE */
    PageCache *cache;
} XBZRLE = {
    .encoded_buf = NULL,
    .current_buf = NULL,
    .decoded_buf = NULL,
    .cache = NULL,
};

177
178
179
180
181
182
183
184
185
186

int64_t xbzrle_cache_resize(int64_t new_size)
{
    if (XBZRLE.cache != NULL) {
        return cache_resize(XBZRLE.cache, new_size / TARGET_PAGE_SIZE) *
            TARGET_PAGE_SIZE;
    }
    return pow2floor(new_size);
}

187
188
189
/* accounting for migration statistics */
typedef struct AccountingInfo {
    uint64_t dup_pages;
190
    uint64_t skipped_pages;
191
192
    uint64_t norm_pages;
    uint64_t iterations;
Orit Wasserman's avatar
Orit Wasserman committed
193
194
195
196
    uint64_t xbzrle_bytes;
    uint64_t xbzrle_pages;
    uint64_t xbzrle_cache_miss;
    uint64_t xbzrle_overflows;
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
} AccountingInfo;

static AccountingInfo acct_info;

static void acct_clear(void)
{
    memset(&acct_info, 0, sizeof(acct_info));
}

uint64_t dup_mig_bytes_transferred(void)
{
    return acct_info.dup_pages * TARGET_PAGE_SIZE;
}

uint64_t dup_mig_pages_transferred(void)
{
    return acct_info.dup_pages;
}

216
217
218
219
220
221
222
223
224
225
uint64_t skipped_mig_bytes_transferred(void)
{
    return acct_info.skipped_pages * TARGET_PAGE_SIZE;
}

uint64_t skipped_mig_pages_transferred(void)
{
    return acct_info.skipped_pages;
}

226
227
228
229
230
231
232
233
234
235
uint64_t norm_mig_bytes_transferred(void)
{
    return acct_info.norm_pages * TARGET_PAGE_SIZE;
}

uint64_t norm_mig_pages_transferred(void)
{
    return acct_info.norm_pages;
}

Orit Wasserman's avatar
Orit Wasserman committed
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
uint64_t xbzrle_mig_bytes_transferred(void)
{
    return acct_info.xbzrle_bytes;
}

uint64_t xbzrle_mig_pages_transferred(void)
{
    return acct_info.xbzrle_pages;
}

uint64_t xbzrle_mig_pages_cache_miss(void)
{
    return acct_info.xbzrle_cache_miss;
}

uint64_t xbzrle_mig_pages_overflow(void)
{
    return acct_info.xbzrle_overflows;
}

256
257
static size_t save_block_hdr(QEMUFile *f, RAMBlock *block, ram_addr_t offset,
                             int cont, int flag)
Orit Wasserman's avatar
Orit Wasserman committed
258
{
259
260
261
262
    size_t size;

    qemu_put_be64(f, offset | cont | flag);
    size = 8;
Orit Wasserman's avatar
Orit Wasserman committed
263

264
265
266
267
268
269
270
    if (!cont) {
        qemu_put_byte(f, strlen(block->idstr));
        qemu_put_buffer(f, (uint8_t *)block->idstr,
                        strlen(block->idstr));
        size += 1 + strlen(block->idstr);
    }
    return size;
Orit Wasserman's avatar
Orit Wasserman committed
271
272
}

273
274
275
276
#define ENCODING_FLAG_XBZRLE 0x1

static int save_xbzrle_page(QEMUFile *f, uint8_t *current_data,
                            ram_addr_t current_addr, RAMBlock *block,
277
                            ram_addr_t offset, int cont, bool last_stage)
278
279
280
281
282
{
    int encoded_len = 0, bytes_sent = -1;
    uint8_t *prev_cached_page;

    if (!cache_is_cached(XBZRLE.cache, current_addr)) {
283
        if (!last_stage) {
284
            cache_insert(XBZRLE.cache, current_addr, current_data);
285
        }
Orit Wasserman's avatar
Orit Wasserman committed
286
        acct_info.xbzrle_cache_miss++;
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
        return -1;
    }

    prev_cached_page = get_cached_data(XBZRLE.cache, current_addr);

    /* save current buffer into memory */
    memcpy(XBZRLE.current_buf, current_data, TARGET_PAGE_SIZE);

    /* XBZRLE encoding (if there is no overflow) */
    encoded_len = xbzrle_encode_buffer(prev_cached_page, XBZRLE.current_buf,
                                       TARGET_PAGE_SIZE, XBZRLE.encoded_buf,
                                       TARGET_PAGE_SIZE);
    if (encoded_len == 0) {
        DPRINTF("Skipping unmodified page\n");
        return 0;
    } else if (encoded_len == -1) {
        DPRINTF("Overflow\n");
Orit Wasserman's avatar
Orit Wasserman committed
304
        acct_info.xbzrle_overflows++;
305
306
307
308
309
310
        /* update data in the cache */
        memcpy(prev_cached_page, current_data, TARGET_PAGE_SIZE);
        return -1;
    }

    /* we need to update the data in the cache, in order to get the same data */
311
312
313
    if (!last_stage) {
        memcpy(prev_cached_page, XBZRLE.current_buf, TARGET_PAGE_SIZE);
    }
314
315

    /* Send XBZRLE based compressed page */
316
    bytes_sent = save_block_hdr(f, block, offset, cont, RAM_SAVE_FLAG_XBZRLE);
317
318
319
    qemu_put_byte(f, ENCODING_FLAG_XBZRLE);
    qemu_put_be16(f, encoded_len);
    qemu_put_buffer(f, XBZRLE.encoded_buf, encoded_len);
320
    bytes_sent += encoded_len + 1 + 2;
Orit Wasserman's avatar
Orit Wasserman committed
321
322
    acct_info.xbzrle_pages++;
    acct_info.xbzrle_bytes += bytes_sent;
323
324
325
326

    return bytes_sent;
}

327
328
329
330

/* This is the last block that we have visited serching for dirty pages
 */
static RAMBlock *last_seen_block;
Juan Quintela's avatar
Juan Quintela committed
331
332
/* This is the last block from where we have sent data */
static RAMBlock *last_sent_block;
333
static ram_addr_t last_offset;
Juan Quintela's avatar
Juan Quintela committed
334
335
static unsigned long *migration_bitmap;
static uint64_t migration_dirty_pages;
336
static uint32_t last_version;
337
static bool ram_bulk_stage;
338

339
340
341
static inline
ram_addr_t migration_bitmap_find_and_reset_dirty(MemoryRegion *mr,
                                                 ram_addr_t start)
342
{
343
344
345
    unsigned long base = mr->ram_addr >> TARGET_PAGE_BITS;
    unsigned long nr = base + (start >> TARGET_PAGE_BITS);
    unsigned long size = base + (int128_get64(mr->size) >> TARGET_PAGE_BITS);
Juan Quintela's avatar
Juan Quintela committed
346

347
348
349
350
351
352
353
    unsigned long next;

    if (ram_bulk_stage && nr > base) {
        next = nr + 1;
    } else {
        next = find_next_bit(migration_bitmap, size, nr);
    }
354

355
356
    if (next < size) {
        clear_bit(next, migration_bitmap);
Juan Quintela's avatar
Juan Quintela committed
357
        migration_dirty_pages--;
358
    }
359
    return (next - base) << TARGET_PAGE_BITS;
360
361
}

Juan Quintela's avatar
Juan Quintela committed
362
363
static inline bool migration_bitmap_set_dirty(MemoryRegion *mr,
                                              ram_addr_t offset)
364
{
Juan Quintela's avatar
Juan Quintela committed
365
366
    bool ret;
    int nr = (mr->ram_addr + offset) >> TARGET_PAGE_BITS;
367

Juan Quintela's avatar
Juan Quintela committed
368
369
370
371
    ret = test_and_set_bit(nr, migration_bitmap);

    if (!ret) {
        migration_dirty_pages++;
372
    }
Juan Quintela's avatar
Juan Quintela committed
373
    return ret;
374
375
}

376
377
/* Needs iothread lock! */

378
379
static void migration_bitmap_sync(void)
{
Juan Quintela's avatar
Juan Quintela committed
380
381
382
    RAMBlock *block;
    ram_addr_t addr;
    uint64_t num_dirty_pages_init = migration_dirty_pages;
383
384
    MigrationState *s = migrate_get_current();
    static int64_t start_time;
385
    static int64_t bytes_xfer_prev;
386
387
    static int64_t num_dirty_pages_period;
    int64_t end_time;
388
389
390
391
392
    int64_t bytes_xfer_now;

    if (!bytes_xfer_prev) {
        bytes_xfer_prev = ram_bytes_transferred();
    }
393
394
395
396

    if (!start_time) {
        start_time = qemu_get_clock_ms(rt_clock);
    }
397
398

    trace_migration_bitmap_sync_start();
399
    address_space_sync_dirty_bitmap(&address_space_memory);
Juan Quintela's avatar
Juan Quintela committed
400

401
    QTAILQ_FOREACH(block, &ram_list.blocks, next) {
Juan Quintela's avatar
Juan Quintela committed
402
        for (addr = 0; addr < block->length; addr += TARGET_PAGE_SIZE) {
403
404
405
            if (memory_region_test_and_clear_dirty(block->mr,
                                                   addr, TARGET_PAGE_SIZE,
                                                   DIRTY_MEMORY_MIGRATION)) {
Juan Quintela's avatar
Juan Quintela committed
406
407
408
409
410
                migration_bitmap_set_dirty(block->mr, addr);
            }
        }
    }
    trace_migration_bitmap_sync_end(migration_dirty_pages
411
                                    - num_dirty_pages_init);
412
413
414
415
416
    num_dirty_pages_period += migration_dirty_pages - num_dirty_pages_init;
    end_time = qemu_get_clock_ms(rt_clock);

    /* more than 1 second = 1000 millisecons */
    if (end_time > start_time + 1000) {
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
        if (migrate_auto_converge()) {
            /* The following detection logic can be refined later. For now:
               Check to see if the dirtied bytes is 50% more than the approx.
               amount of bytes that just got transferred since the last time we
               were in this routine. If that happens >N times (for now N==4)
               we turn on the throttle down logic */
            bytes_xfer_now = ram_bytes_transferred();
            if (s->dirty_pages_rate &&
               (num_dirty_pages_period * TARGET_PAGE_SIZE >
                   (bytes_xfer_now - bytes_xfer_prev)/2) &&
               (dirty_rate_high_cnt++ > 4)) {
                    trace_migration_throttle();
                    mig_throttle_on = true;
                    dirty_rate_high_cnt = 0;
             }
             bytes_xfer_prev = bytes_xfer_now;
        } else {
             mig_throttle_on = false;
        }
436
437
        s->dirty_pages_rate = num_dirty_pages_period * 1000
            / (end_time - start_time);
438
        s->dirty_bytes_rate = s->dirty_pages_rate * TARGET_PAGE_SIZE;
439
440
441
        start_time = end_time;
        num_dirty_pages_period = 0;
    }
442
443
}

444
445
446
/*
 * ram_save_block: Writes a page of memory to the stream f
 *
447
448
 * Returns:  The number of bytes written.
 *           0 means no dirty pages
449
450
 */

451
static int ram_save_block(QEMUFile *f, bool last_stage)
452
{
453
    RAMBlock *block = last_seen_block;
454
    ram_addr_t offset = last_offset;
455
    bool complete_round = false;
456
    int bytes_sent = 0;
Avi Kivity's avatar
Avi Kivity committed
457
    MemoryRegion *mr;
458
    ram_addr_t current_addr;
459

460
    if (!block)
461
        block = QTAILQ_FIRST(&ram_list.blocks);
462

463
    while (true) {
Avi Kivity's avatar
Avi Kivity committed
464
        mr = block->mr;
465
466
467
468
469
470
471
472
473
474
475
        offset = migration_bitmap_find_and_reset_dirty(mr, offset);
        if (complete_round && block == last_seen_block &&
            offset >= last_offset) {
            break;
        }
        if (offset >= block->length) {
            offset = 0;
            block = QTAILQ_NEXT(block, next);
            if (!block) {
                block = QTAILQ_FIRST(&ram_list.blocks);
                complete_round = true;
476
                ram_bulk_stage = false;
477
478
            }
        } else {
Michael R. Hines's avatar
Michael R. Hines committed
479
            int ret;
480
            uint8_t *p;
Juan Quintela's avatar
Juan Quintela committed
481
            int cont = (block == last_sent_block) ?
482
                RAM_SAVE_FLAG_CONTINUE : 0;
483

Avi Kivity's avatar
Avi Kivity committed
484
            p = memory_region_get_ram_ptr(mr) + offset;
485

486
487
            /* In doubt sent page as normal */
            bytes_sent = -1;
Michael R. Hines's avatar
Michael R. Hines committed
488
489
490
491
492
493
494
495
496
497
498
499
            ret = ram_control_save_page(f, block->offset,
                               offset, TARGET_PAGE_SIZE, &bytes_sent);

            if (ret != RAM_SAVE_CONTROL_NOT_SUPP) {
                if (ret != RAM_SAVE_CONTROL_DELAYED) {
                    if (bytes_sent > 0) {
                        acct_info.norm_pages++;
                    } else if (bytes_sent == 0) {
                        acct_info.dup_pages++;
                    }
                }
            } else if (is_zero_page(p)) {
500
                acct_info.dup_pages++;
501
502
503
504
                bytes_sent = save_block_hdr(f, block, offset, cont,
                                            RAM_SAVE_FLAG_COMPRESS);
                qemu_put_byte(f, 0);
                bytes_sent++;
505
            } else if (!ram_bulk_stage && migrate_use_xbzrle()) {
506
507
                current_addr = block->offset + offset;
                bytes_sent = save_xbzrle_page(f, p, current_addr, block,
508
509
510
511
                                              offset, cont, last_stage);
                if (!last_stage) {
                    p = get_cached_data(XBZRLE.cache, current_addr);
                }
512
513
            }

514
            /* XBZRLE overflow or normal page */
515
            if (bytes_sent == -1) {
516
                bytes_sent = save_block_hdr(f, block, offset, cont, RAM_SAVE_FLAG_PAGE);
517
                qemu_put_buffer_async(f, p, TARGET_PAGE_SIZE);
518
                bytes_sent += TARGET_PAGE_SIZE;
519
                acct_info.norm_pages++;
520
521
            }

522
            /* if page is unmodified, continue to the next */
523
            if (bytes_sent > 0) {
Juan Quintela's avatar
Juan Quintela committed
524
                last_sent_block = block;
525
526
                break;
            }
527
        }
528
    }
529
    last_seen_block = block;
530
    last_offset = offset;
531

532
    return bytes_sent;
533
534
535
536
}

static uint64_t bytes_transferred;

537
538
539
540
541
542
543
544
545
546
547
548
void acct_update_position(QEMUFile *f, size_t size, bool zero)
{
    uint64_t pages = size / TARGET_PAGE_SIZE;
    if (zero) {
        acct_info.dup_pages += pages;
    } else {
        acct_info.norm_pages += pages;
        bytes_transferred += size;
        qemu_update_position(f, size);
    }
}

549
550
static ram_addr_t ram_save_remaining(void)
{
Juan Quintela's avatar
Juan Quintela committed
551
    return migration_dirty_pages;
552
553
554
555
556
557
558
559
560
561
562
563
564
565
}

uint64_t ram_bytes_remaining(void)
{
    return ram_save_remaining() * TARGET_PAGE_SIZE;
}

uint64_t ram_bytes_transferred(void)
{
    return bytes_transferred;
}

uint64_t ram_bytes_total(void)
{
566
567
568
    RAMBlock *block;
    uint64_t total = 0;

569
    QTAILQ_FOREACH(block, &ram_list.blocks, next)
570
571
572
        total += block->length;

    return total;
573
574
}

Orit Wasserman's avatar
Orit Wasserman committed
575
576
static void migration_end(void)
{
577
578
579
580
581
    if (migration_bitmap) {
        memory_global_dirty_log_stop();
        g_free(migration_bitmap);
        migration_bitmap = NULL;
    }
582

583
    if (XBZRLE.cache) {
584
585
586
587
588
589
590
        cache_fini(XBZRLE.cache);
        g_free(XBZRLE.cache);
        g_free(XBZRLE.encoded_buf);
        g_free(XBZRLE.current_buf);
        g_free(XBZRLE.decoded_buf);
        XBZRLE.cache = NULL;
    }
Orit Wasserman's avatar
Orit Wasserman committed
591
592
}

593
594
595
596
597
static void ram_migration_cancel(void *opaque)
{
    migration_end();
}

598
599
static void reset_ram_globals(void)
{
600
    last_seen_block = NULL;
Juan Quintela's avatar
Juan Quintela committed
601
    last_sent_block = NULL;
602
    last_offset = 0;
603
    last_version = ram_list.version;
604
    ram_bulk_stage = true;
605
606
}

607
608
#define MAX_WAIT 50 /* ms, half buffered_file limit */

609
static int ram_save_setup(QEMUFile *f, void *opaque)
610
{
611
    RAMBlock *block;
Juan Quintela's avatar
Juan Quintela committed
612
613
614
    int64_t ram_pages = last_ram_offset() >> TARGET_PAGE_BITS;

    migration_bitmap = bitmap_new(ram_pages);
615
    bitmap_set(migration_bitmap, 0, ram_pages);
Juan Quintela's avatar
Juan Quintela committed
616
    migration_dirty_pages = ram_pages;
617
618
    mig_throttle_on = false;
    dirty_rate_high_cnt = 0;
619

620
621
622
623
624
625
626
627
628
629
    if (migrate_use_xbzrle()) {
        XBZRLE.cache = cache_init(migrate_xbzrle_cache_size() /
                                  TARGET_PAGE_SIZE,
                                  TARGET_PAGE_SIZE);
        if (!XBZRLE.cache) {
            DPRINTF("Error creating cache\n");
            return -1;
        }
        XBZRLE.encoded_buf = g_malloc0(TARGET_PAGE_SIZE);
        XBZRLE.current_buf = g_malloc(TARGET_PAGE_SIZE);
630
        acct_clear();
631
632
    }

633
634
635
636
637
    qemu_mutex_lock_iothread();
    qemu_mutex_lock_ramlist();
    bytes_transferred = 0;
    reset_ram_globals();

638
    memory_global_dirty_log_start();
Juan Quintela's avatar
Juan Quintela committed
639
    migration_bitmap_sync();
640
    qemu_mutex_unlock_iothread();
641

642
    qemu_put_be64(f, ram_bytes_total() | RAM_SAVE_FLAG_MEM_SIZE);
643

644
    QTAILQ_FOREACH(block, &ram_list.blocks, next) {
645
646
647
        qemu_put_byte(f, strlen(block->idstr));
        qemu_put_buffer(f, (uint8_t *)block->idstr, strlen(block->idstr));
        qemu_put_be64(f, block->length);
648
649
    }

650
    qemu_mutex_unlock_ramlist();
Michael R. Hines's avatar
Michael R. Hines committed
651
652
653
654

    ram_control_before_iterate(f, RAM_CONTROL_SETUP);
    ram_control_after_iterate(f, RAM_CONTROL_SETUP);

655
656
657
658
659
    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);

    return 0;
}

660
static int ram_save_iterate(QEMUFile *f, void *opaque)
661
662
663
{
    int ret;
    int i;
664
    int64_t t0;
665
    int total_sent = 0;
666

667
668
    qemu_mutex_lock_ramlist();

669
670
671
672
    if (ram_list.version != last_version) {
        reset_ram_globals();
    }

Michael R. Hines's avatar
Michael R. Hines committed
673
674
    ram_control_before_iterate(f, RAM_CONTROL_ROUND);

675
    t0 = qemu_get_clock_ns(rt_clock);
676
    i = 0;
677
    while ((ret = qemu_file_rate_limit(f)) == 0) {
678
        int bytes_sent;
679

680
        bytes_sent = ram_save_block(f, false);
681
        /* no more blocks to sent */
682
        if (bytes_sent == 0) {
683
684
            break;
        }
685
        total_sent += bytes_sent;
686
        acct_info.iterations++;
687
        check_guest_throttling();
688
689
690
691
692
693
        /* we want to check in the 1st loop, just in case it was the 1st time
           and we had to sync the dirty bitmap.
           qemu_get_clock_ns() is a bit expensive, so we only check each some
           iterations
        */
        if ((i & 63) == 0) {
694
            uint64_t t1 = (qemu_get_clock_ns(rt_clock) - t0) / 1000000;
695
            if (t1 > MAX_WAIT) {
696
                DPRINTF("big wait: %" PRIu64 " milliseconds, %d iterations\n",
697
698
699
700
701
                        t1, i);
                break;
            }
        }
        i++;
702
703
    }

704
705
    qemu_mutex_unlock_ramlist();

Michael R. Hines's avatar
Michael R. Hines committed
706
707
708
709
710
711
    /*
     * Must occur before EOS (or any QEMUFile operation)
     * because of RDMA protocol.
     */
    ram_control_after_iterate(f, RAM_CONTROL_ROUND);

712
    if (ret < 0) {
713
        bytes_transferred += total_sent;
714
715
716
        return ret;
    }

717
    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);
718
719
    total_sent += 8;
    bytes_transferred += total_sent;
720

721
    return total_sent;
722
723
724
725
}

static int ram_save_complete(QEMUFile *f, void *opaque)
{
726
    qemu_mutex_lock_ramlist();
727
    migration_bitmap_sync();
728

Michael R. Hines's avatar
Michael R. Hines committed
729
730
    ram_control_before_iterate(f, RAM_CONTROL_FINISH);

731
    /* try transferring iterative blocks of memory */
Orit Wasserman's avatar
Orit Wasserman committed
732

733
    /* flush all remaining blocks regardless of rate limiting */
734
    while (true) {
735
736
        int bytes_sent;

737
        bytes_sent = ram_save_block(f, true);
738
        /* no more blocks to sent */
739
        if (bytes_sent == 0) {
740
            break;
741
        }
742
        bytes_transferred += bytes_sent;
743
    }
Michael R. Hines's avatar
Michael R. Hines committed
744
745

    ram_control_after_iterate(f, RAM_CONTROL_FINISH);
746
    migration_end();
747

748
    qemu_mutex_unlock_ramlist();
749
750
    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);

751
    return 0;
752
753
}

754
755
756
757
758
759
760
static uint64_t ram_save_pending(QEMUFile *f, void *opaque, uint64_t max_size)
{
    uint64_t remaining_size;

    remaining_size = ram_save_remaining() * TARGET_PAGE_SIZE;

    if (remaining_size < max_size) {
761
        qemu_mutex_lock_iothread();
762
        migration_bitmap_sync();
763
        qemu_mutex_unlock_iothread();
764
765
766
767
768
        remaining_size = ram_save_remaining() * TARGET_PAGE_SIZE;
    }
    return remaining_size;
}

769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
static int load_xbzrle(QEMUFile *f, ram_addr_t addr, void *host)
{
    int ret, rc = 0;
    unsigned int xh_len;
    int xh_flags;

    if (!XBZRLE.decoded_buf) {
        XBZRLE.decoded_buf = g_malloc(TARGET_PAGE_SIZE);
    }

    /* extract RLE header */
    xh_flags = qemu_get_byte(f);
    xh_len = qemu_get_be16(f);

    if (xh_flags != ENCODING_FLAG_XBZRLE) {
        fprintf(stderr, "Failed to load XBZRLE page - wrong compression!\n");
        return -1;
    }

    if (xh_len > TARGET_PAGE_SIZE) {
        fprintf(stderr, "Failed to load XBZRLE page - len overflow!\n");
        return -1;
    }
    /* load data and decode */
    qemu_get_buffer(f, XBZRLE.decoded_buf, xh_len);

    /* decode RLE */
    ret = xbzrle_decode_buffer(XBZRLE.decoded_buf, xh_len, host,
                               TARGET_PAGE_SIZE);
    if (ret == -1) {
        fprintf(stderr, "Failed to load XBZRLE page - decode error!\n");
        rc = -1;
    } else  if (ret > TARGET_PAGE_SIZE) {
        fprintf(stderr, "Failed to load XBZRLE page - size %d exceeds %d!\n",
                ret, TARGET_PAGE_SIZE);
        abort();
    }

    return rc;
}

810
811
812
813
814
815
816
817
818
819
820
821
822
823
static inline void *host_from_stream_offset(QEMUFile *f,
                                            ram_addr_t offset,
                                            int flags)
{
    static RAMBlock *block = NULL;
    char id[256];
    uint8_t len;

    if (flags & RAM_SAVE_FLAG_CONTINUE) {
        if (!block) {
            fprintf(stderr, "Ack, bad migration stream!\n");
            return NULL;
        }

824
        return memory_region_get_ram_ptr(block->mr) + offset;
825
826
827
828
829
830
    }

    len = qemu_get_byte(f);
    qemu_get_buffer(f, (uint8_t *)id, len);
    id[len] = 0;

831
    QTAILQ_FOREACH(block, &ram_list.blocks, next) {
832
        if (!strncmp(id, block->idstr, sizeof(id)))
833
            return memory_region_get_ram_ptr(block->mr) + offset;
834
835
836
837
838
839
    }

    fprintf(stderr, "Can't find block %s!\n", id);
    return NULL;
}

840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
/*
 * If a page (or a whole RDMA chunk) has been
 * determined to be zero, then zap it.
 */
void ram_handle_compressed(void *host, uint8_t ch, uint64_t size)
{
    if (ch != 0 || !is_zero_page(host)) {
        memset(host, ch, size);
#ifndef _WIN32
        if (ch == 0 &&
            (!kvm_enabled() || kvm_has_sync_mmu()) &&
            getpagesize() <= TARGET_PAGE_SIZE) {
            qemu_madvise(host, TARGET_PAGE_SIZE, QEMU_MADV_DONTNEED);
        }
#endif
    }
}

858
static int ram_load(QEMUFile *f, void *opaque, int version_id)
859
860
{
    ram_addr_t addr;
Orit Wasserman's avatar
Orit Wasserman committed
861
    int flags, ret = 0;
862
    int error;
Orit Wasserman's avatar
Orit Wasserman committed
863
864
865
    static uint64_t seq_iter;

    seq_iter++;
866

867
    if (version_id < 4 || version_id > 4) {
868
869
870
871
872
873
874
875
876
877
        return -EINVAL;
    }

    do {
        addr = qemu_get_be64(f);

        flags = addr & ~TARGET_PAGE_MASK;
        addr &= TARGET_PAGE_MASK;

        if (flags & RAM_SAVE_FLAG_MEM_SIZE) {
878
            if (version_id == 4) {
879
880
881
882
883
884
885
886
887
888
889
890
891
892
                /* Synchronize RAM block list */
                char id[256];
                ram_addr_t length;
                ram_addr_t total_ram_bytes = addr;

                while (total_ram_bytes) {
                    RAMBlock *block;
                    uint8_t len;

                    len = qemu_get_byte(f);
                    qemu_get_buffer(f, (uint8_t *)id, len);
                    id[len] = 0;
                    length = qemu_get_be64(f);

893
                    QTAILQ_FOREACH(block, &ram_list.blocks, next) {
894
                        if (!strncmp(id, block->idstr, sizeof(id))) {
Orit Wasserman's avatar
Orit Wasserman committed
895
                            if (block->length != length) {
896
897
898
                                fprintf(stderr,
                                        "Length mismatch: %s: " RAM_ADDR_FMT
                                        " in != " RAM_ADDR_FMT "\n", id, length,
899
                                        block->length);
Orit Wasserman's avatar
Orit Wasserman committed
900
901
902
                                ret =  -EINVAL;
                                goto done;
                            }
903
904
905
906
907
                            break;
                        }
                    }

                    if (!block) {
908
909
                        fprintf(stderr, "Unknown ramblock \"%s\", cannot "
                                "accept migration\n", id);
Orit Wasserman's avatar
Orit Wasserman committed
910
911
                        ret = -EINVAL;
                        goto done;
912
913
914
915
                    }

                    total_ram_bytes -= length;
                }
916
917
918
919
            }
        }

        if (flags & RAM_SAVE_FLAG_COMPRESS) {
920
921
922
            void *host;
            uint8_t ch;

923
            host = host_from_stream_offset(f, addr, flags);
924
925
926
            if (!host) {
                return -EINVAL;
            }
927
928

            ch = qemu_get_byte(f);
929
            ram_handle_compressed(host, ch, TARGET_PAGE_SIZE);
930
        } else if (flags & RAM_SAVE_FLAG_PAGE) {
931
932
            void *host;

933
            host = host_from_stream_offset(f, addr, flags);
934
935
936
            if (!host) {
                return -EINVAL;
            }
937
938

            qemu_get_buffer(f, host, TARGET_PAGE_SIZE);
939
940
941
942
943
944
945
946
947
948
        } else if (flags & RAM_SAVE_FLAG_XBZRLE) {
            void *host = host_from_stream_offset(f, addr, flags);
            if (!host) {
                return -EINVAL;
            }

            if (load_xbzrle(f, addr, host) < 0) {
                ret = -EINVAL;
                goto done;
            }
Michael R. Hines's avatar
Michael R. Hines committed
949
950
        } else if (flags & RAM_SAVE_FLAG_HOOK) {
            ram_control_load_hook(f, flags);
951
        }
952
953
        error = qemu_file_get_error(f);
        if (error) {
Orit Wasserman's avatar
Orit Wasserman committed
954
955
            ret = error;
            goto done;
956
957
958
        }
    } while (!(flags & RAM_SAVE_FLAG_EOS));

Orit Wasserman's avatar
Orit Wasserman committed
959
done:
960
961
    DPRINTF("Completed load of VM with exit code %d seq iteration "
            "%" PRIu64 "\n", ret, seq_iter);
Orit Wasserman's avatar
Orit Wasserman committed
962
    return ret;
963
964
}

965
SaveVMHandlers savevm_ram_handlers = {
966
    .save_live_setup = ram_save_setup,
967
968
    .save_live_iterate = ram_save_iterate,
    .save_live_complete = ram_save_complete,
969
    .save_live_pending = ram_save_pending,
970
    .load_state = ram_load,
971
    .cancel = ram_migration_cancel,
972
973
};

974
975
976
977
978
979
struct soundhw {
    const char *name;
    const char *descr;
    int enabled;
    int isa;
    union {
980
        int (*init_isa) (ISABus *bus);
981
982
983
984
        int (*init_pci) (PCIBus *bus);
    } init;
};

985
986
static struct soundhw soundhw[9];
static int soundhw_count;
987

988
989
990
991
992
993
994
995
996
997
void isa_register_soundhw(const char *name, const char *descr,
                          int (*init_isa)(ISABus *bus))
{
    assert(soundhw_count < ARRAY_SIZE(soundhw) - 1);
    soundhw[soundhw_count].name = name;
    soundhw[soundhw_count].descr = descr;
    soundhw[soundhw_count].isa = 1;
    soundhw[soundhw_count].init.init_isa = init_isa;
    soundhw_count++;
}
998

999
1000
1001
1002
1003
1004
1005
1006
1007
1008
void pci_register_soundhw(const char *name, const char *descr,
                          int (*init_pci)(PCIBus *bus))
{
    assert(soundhw_count < ARRAY_SIZE(soundhw) - 1);
    soundhw[soundhw_count].name = name;
    soundhw[soundhw_count].descr = descr;
    soundhw[soundhw_count].isa = 0;
    soundhw[soundhw_count].init.init_pci = init_pci;
    soundhw_count++;
}
1009
1010
1011
1012
1013

void select_soundhw(const char *optarg)
{
    struct soundhw *c;

1014
    if (is_help_option(optarg)) {
1015
1016
    show_valid_cards:

1017
1018
1019
1020
1021
1022
1023
1024
1025
        if (soundhw_count) {
             printf("Valid sound card names (comma separated):\n");
             for (c = soundhw; c->name; ++c) {
                 printf ("%-11s %s\n", c->name, c->descr);
             }
             printf("\n-soundhw all will enable all of the above\n");
        } else {
             printf("Machine has no user-selectable audio hardware "
                    "(it may or may not have always-present audio hardware).\n");
1026
        }
1027
        exit(!is_help_option(optarg));
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
    }
    else {
        size_t l;
        const char *p;
        char *e;
        int bad_card = 0;

        if (!strcmp(optarg, "all")) {
            for (c = soundhw; c->name; ++c) {
                c->enabled = 1;
            }
            return;
        }

        p = optarg;
        while (*p) {
            e = strchr(p, ',');
            l = !e ? strlen(p) : (size_t) (e - p);

            for (c = soundhw; c->name; ++c) {
                if (!strncmp(c->name, p, l) && !c->name[l]) {
                    c->enabled = 1;
                    break;
                }
            }

            if (!c->name) {
                if (l > 80) {
                    fprintf(stderr,
                            "Unknown sound card name (too big to show)\n");
                }
                else {
                    fprintf(stderr, "Unknown sound card name `%.*s'\n",
                            (int) l, p);
                }
                bad_card = 1;
            }
            p += l + (e != NULL);
        }

        if (bad_card) {
            goto show_valid_cards;
        }
    }
}
1073

1074
void audio_init(void)
1075
1076
{
    struct soundhw *c;
1077
1078
    ISABus *isa_bus = (ISABus *) object_resolve_path_type("", TYPE_ISA_BUS, NULL);
    PCIBus *pci_bus = (PCIBus *) object_resolve_path_type("", TYPE_PCI_BUS, NULL);
1079
1080
1081
1082

    for (c = soundhw; c->name; ++c) {
        if (c->enabled) {
            if (c->isa) {
1083
1084
1085
                if (!isa_bus) {
                    fprintf(stderr, "ISA bus not available for %s\n", c->name);
                    exit(1);
1086
                }
1087
                c->init.init_isa(isa_bus);
1088
            } else {
1089
1090
1091
                if (!pci_bus) {
                    fprintf(stderr, "PCI bus not available for %s\n", c->name);
                    exit(1);
1092
                }
1093
                c->init.init_pci(pci_bus);
1094
1095
1096
1097
            }
        }
    }
}
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115

int qemu_uuid_parse(const char *str, uint8_t *uuid)
{
    int ret;

    if (strlen(str) != 36) {
        return -1;
    }

    ret = sscanf(str, UUID_FMT, &uuid[0], &uuid[1], &uuid[2], &uuid[3],
                 &uuid[4], &uuid[5], &uuid[6], &uuid[7], &uuid[8], &uuid[9],
                 &uuid[10], &uuid[11], &uuid[12], &uuid[13], &uuid[14],
                 &uuid[15]);

    if (ret != 16) {
        return -1;
    }
#ifdef TARGET_I386