arch_init.c 26.8 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
32
33
34
35
36
37
38
39
40
41
42
43
#include <sys/mman.h>
#endif
#include "config.h"
#include "monitor.h"
#include "sysemu.h"
#include "arch_init.h"
#include "audio/audio.h"
#include "hw/pc.h"
#include "hw/pci.h"
#include "hw/audiodev.h"
#include "kvm.h"
#include "migration.h"
#include "net.h"
#include "gdbstub.h"
#include "hw/smbios.h"
44
#include "exec-memory.h"
Jan Kiszka's avatar
Jan Kiszka committed
45
#include "hw/pcspk.h"
46
#include "qemu/page_cache.h"
47

Orit Wasserman's avatar
Orit Wasserman committed
48
49
50
51
52
53
54
55
#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

56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
#ifdef TARGET_SPARC
int graphic_width = 1024;
int graphic_height = 768;
int graphic_depth = 8;
#else
int graphic_width = 800;
int graphic_height = 600;
int graphic_depth = 15;
#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
77
78
#elif defined(TARGET_LM32)
#define QEMU_ARCH QEMU_ARCH_LM32
79
80
81
82
#elif defined(TARGET_MICROBLAZE)
#define QEMU_ARCH QEMU_ARCH_MICROBLAZE
#elif defined(TARGET_MIPS)
#define QEMU_ARCH QEMU_ARCH_MIPS
83
84
#elif defined(TARGET_OPENRISC)
#define QEMU_ARCH QEMU_ARCH_OPENRISC
85
86
87
88
89
90
91
92
#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
93
94
#elif defined(TARGET_XTENSA)
#define QEMU_ARCH QEMU_ARCH_XTENSA
95
96
#elif defined(TARGET_UNICORE32)
#define QEMU_ARCH QEMU_ARCH_UNICORE32
97
98
99
100
101
102
103
#endif

const uint32_t arch_type = QEMU_ARCH;

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

104
105
106
107
108
109
#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
110
#define RAM_SAVE_FLAG_XBZRLE   0x40
111

Paolo Bonzini's avatar
Paolo Bonzini committed
112
113
114
115
116
#ifdef __ALTIVEC__
#include <altivec.h>
#define VECTYPE        vector unsigned char
#define SPLAT(p)       vec_splat(vec_ld(0, p), 0)
#define ALL_EQ(v1, v2) vec_all_eq(v1, v2)
117
118
119
120
/* altivec.h may redefine the bool macro as vector type.
 * Reset it to POSIX semantics. */
#undef bool
#define bool _Bool
Paolo Bonzini's avatar
Paolo Bonzini committed
121
122
123
124
125
126
127
128
129
130
131
#elif defined __SSE2__
#include <emmintrin.h>
#define VECTYPE        __m128i
#define SPLAT(p)       _mm_set1_epi8(*(p))
#define ALL_EQ(v1, v2) (_mm_movemask_epi8(_mm_cmpeq_epi8(v1, v2)) == 0xFFFF)
#else
#define VECTYPE        unsigned long
#define SPLAT(p)       (*(p) * (~0UL / 255))
#define ALL_EQ(v1, v2) ((v1) == (v2))
#endif

132

133
134
static struct defconfig_file {
    const char *filename;
135
136
    /* Indicates it is an user config file (disabled by -no-user-config) */
    bool userconfig;
137
} default_config_files[] = {
138
    { CONFIG_QEMU_DATADIR "/cpus-" TARGET_ARCH ".conf",  false },
139
140
    { CONFIG_QEMU_CONFDIR "/qemu.conf",                   true },
    { CONFIG_QEMU_CONFDIR "/target-" TARGET_ARCH ".conf", true },
141
142
143
144
    { NULL }, /* end of list */
};


145
int qemu_read_default_config_files(bool userconfig)
146
147
{
    int ret;
148
    struct defconfig_file *f;
149

150
    for (f = default_config_files; f->filename; f++) {
151
152
153
        if (!userconfig && f->userconfig) {
            continue;
        }
154
155
156
157
        ret = qemu_read_config_file(f->filename);
        if (ret < 0 && ret != -ENOENT) {
            return ret;
        }
158
    }
159
    
160
161
162
    return 0;
}

Paolo Bonzini's avatar
Paolo Bonzini committed
163
static int is_dup_page(uint8_t *page)
164
{
Paolo Bonzini's avatar
Paolo Bonzini committed
165
166
    VECTYPE *p = (VECTYPE *)page;
    VECTYPE val = SPLAT(page);
167
168
    int i;

Paolo Bonzini's avatar
Paolo Bonzini committed
169
170
    for (i = 0; i < TARGET_PAGE_SIZE / sizeof(VECTYPE); i++) {
        if (!ALL_EQ(val, p[i])) {
171
172
173
174
175
176
177
            return 0;
        }
    }

    return 1;
}

178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
/* 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,
};

196
197
198
199
200
201
202
203
204
205

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);
}

206
207
208
209
210
/* accounting for migration statistics */
typedef struct AccountingInfo {
    uint64_t dup_pages;
    uint64_t norm_pages;
    uint64_t iterations;
Orit Wasserman's avatar
Orit Wasserman committed
211
212
213
214
    uint64_t xbzrle_bytes;
    uint64_t xbzrle_pages;
    uint64_t xbzrle_cache_miss;
    uint64_t xbzrle_overflows;
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
} 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;
}

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
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
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;
}

Orit Wasserman's avatar
Orit Wasserman committed
264
265
266
267
268
269
270
271
272
273
274
275
static void save_block_hdr(QEMUFile *f, RAMBlock *block, ram_addr_t offset,
        int cont, int flag)
{
        qemu_put_be64(f, offset | cont | flag);
        if (!cont) {
                qemu_put_byte(f, strlen(block->idstr));
                qemu_put_buffer(f, (uint8_t *)block->idstr,
                                strlen(block->idstr));
        }

}

276
277
278
279
#define ENCODING_FLAG_XBZRLE 0x1

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

    if (!cache_is_cached(XBZRLE.cache, current_addr)) {
286
287
288
289
        if (!last_stage) {
            cache_insert(XBZRLE.cache, current_addr,
                         g_memdup(current_data, TARGET_PAGE_SIZE));
        }
Orit Wasserman's avatar
Orit Wasserman committed
290
        acct_info.xbzrle_cache_miss++;
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
        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
308
        acct_info.xbzrle_overflows++;
309
310
311
312
313
314
        /* 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 */
315
316
317
    if (!last_stage) {
        memcpy(prev_cached_page, XBZRLE.current_buf, TARGET_PAGE_SIZE);
    }
318
319
320
321
322
323
324

    /* Send XBZRLE based compressed page */
    save_block_hdr(f, block, offset, cont, RAM_SAVE_FLAG_XBZRLE);
    qemu_put_byte(f, ENCODING_FLAG_XBZRLE);
    qemu_put_be16(f, encoded_len);
    qemu_put_buffer(f, XBZRLE.encoded_buf, encoded_len);
    bytes_sent = encoded_len + 1 + 2;
Orit Wasserman's avatar
Orit Wasserman committed
325
326
    acct_info.xbzrle_pages++;
    acct_info.xbzrle_bytes += bytes_sent;
327
328
329
330

    return bytes_sent;
}

331
332
333
static RAMBlock *last_block;
static ram_addr_t last_offset;

334
335
336
337
338
339
340
341
/*
 * ram_save_block: Writes a page of memory to the stream f
 *
 * Returns:  0: if the page hasn't changed
 *          -1: if there are no more dirty pages
 *           n: the amount of bytes written in other case
 */

342
static int ram_save_block(QEMUFile *f, bool last_stage)
343
{
344
345
    RAMBlock *block = last_block;
    ram_addr_t offset = last_offset;
346
    int bytes_sent = -1;
Avi Kivity's avatar
Avi Kivity committed
347
    MemoryRegion *mr;
348
    ram_addr_t current_addr;
349

350
351
352
353
    if (!block)
        block = QLIST_FIRST(&ram_list.blocks);

    do {
Avi Kivity's avatar
Avi Kivity committed
354
        mr = block->mr;
355
356
        if (memory_region_get_dirty(mr, offset, TARGET_PAGE_SIZE,
                                    DIRTY_MEMORY_MIGRATION)) {
357
            uint8_t *p;
358
            int cont = (block == last_block) ? RAM_SAVE_FLAG_CONTINUE : 0;
359

Avi Kivity's avatar
Avi Kivity committed
360
361
            memory_region_reset_dirty(mr, offset, TARGET_PAGE_SIZE,
                                      DIRTY_MEMORY_MIGRATION);
362

Avi Kivity's avatar
Avi Kivity committed
363
            p = memory_region_get_ram_ptr(mr) + offset;
364

Paolo Bonzini's avatar
Paolo Bonzini committed
365
            if (is_dup_page(p)) {
366
                acct_info.dup_pages++;
Orit Wasserman's avatar
Orit Wasserman committed
367
                save_block_hdr(f, block, offset, cont, RAM_SAVE_FLAG_COMPRESS);
368
                qemu_put_byte(f, *p);
369
                bytes_sent = 1;
370
371
372
            } else if (migrate_use_xbzrle()) {
                current_addr = block->offset + offset;
                bytes_sent = save_xbzrle_page(f, p, current_addr, block,
373
374
375
376
                                              offset, cont, last_stage);
                if (!last_stage) {
                    p = get_cached_data(XBZRLE.cache, current_addr);
                }
377
378
379
380
            }

            /* either we didn't send yet (we may have had XBZRLE overflow) */
            if (bytes_sent == -1) {
Orit Wasserman's avatar
Orit Wasserman committed
381
                save_block_hdr(f, block, offset, cont, RAM_SAVE_FLAG_PAGE);
382
                qemu_put_buffer(f, p, TARGET_PAGE_SIZE);
383
                bytes_sent = TARGET_PAGE_SIZE;
384
                acct_info.norm_pages++;
385
386
            }

387
388
389
390
            /* if page is unmodified, continue to the next */
            if (bytes_sent != 0) {
                break;
            }
391
        }
392
393
394
395
396
397
398
399

        offset += TARGET_PAGE_SIZE;
        if (offset >= block->length) {
            offset = 0;
            block = QLIST_NEXT(block, next);
            if (!block)
                block = QLIST_FIRST(&ram_list.blocks);
        }
Avi Kivity's avatar
Avi Kivity committed
400
    } while (block != last_block || offset != last_offset);
401
402
403

    last_block = block;
    last_offset = offset;
404

405
    return bytes_sent;
406
407
408
409
410
411
}

static uint64_t bytes_transferred;

static ram_addr_t ram_save_remaining(void)
{
412
    return ram_list.dirty_pages;
413
414
415
416
417
418
419
420
421
422
423
424
425
426
}

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)
{
427
428
429
430
431
432
433
    RAMBlock *block;
    uint64_t total = 0;

    QLIST_FOREACH(block, &ram_list.blocks, next)
        total += block->length;

    return total;
434
435
}

436
437
438
439
static int block_compar(const void *a, const void *b)
{
    RAMBlock * const *ablock = a;
    RAMBlock * const *bblock = b;
440
441

    return strcmp((*ablock)->idstr, (*bblock)->idstr);
442
443
444
445
446
447
448
449
450
451
}

static void sort_ram_list(void)
{
    RAMBlock *block, *nblock, **blocks;
    int n;
    n = 0;
    QLIST_FOREACH(block, &ram_list.blocks, next) {
        ++n;
    }
452
    blocks = g_malloc(n * sizeof *blocks);
453
454
455
456
457
458
459
460
461
    n = 0;
    QLIST_FOREACH_SAFE(block, &ram_list.blocks, next, nblock) {
        blocks[n++] = block;
        QLIST_REMOVE(block, next);
    }
    qsort(blocks, n, sizeof *blocks, block_compar);
    while (--n >= 0) {
        QLIST_INSERT_HEAD(&ram_list.blocks, blocks[n], next);
    }
462
    g_free(blocks);
463
464
}

Orit Wasserman's avatar
Orit Wasserman committed
465
466
467
static void migration_end(void)
{
    memory_global_dirty_log_stop();
468
469
470
471
472
473
474
475
476

    if (migrate_use_xbzrle()) {
        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
477
478
}

479
480
481
482
483
static void ram_migration_cancel(void *opaque)
{
    migration_end();
}

484
485
#define MAX_WAIT 50 /* ms, half buffered_file limit */

486
static int ram_save_setup(QEMUFile *f, void *opaque)
487
488
{
    ram_addr_t addr;
489
    RAMBlock *block;
490

491
492
493
494
    bytes_transferred = 0;
    last_block = NULL;
    last_offset = 0;
    sort_ram_list();
495

496
497
498
499
500
501
502
503
504
505
    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);
506
        acct_clear();
507
508
    }

509
510
511
512
513
514
    /* Make sure all dirty bits are set */
    QLIST_FOREACH(block, &ram_list.blocks, next) {
        for (addr = 0; addr < block->length; addr += TARGET_PAGE_SIZE) {
            if (!memory_region_get_dirty(block->mr, addr, TARGET_PAGE_SIZE,
                                         DIRTY_MEMORY_MIGRATION)) {
                memory_region_set_dirty(block->mr, addr, TARGET_PAGE_SIZE);
515
516
            }
        }
517
    }
518

519
    memory_global_dirty_log_start();
520

521
    qemu_put_be64(f, ram_bytes_total() | RAM_SAVE_FLAG_MEM_SIZE);
522

523
524
525
526
    QLIST_FOREACH(block, &ram_list.blocks, next) {
        qemu_put_byte(f, strlen(block->idstr));
        qemu_put_buffer(f, (uint8_t *)block->idstr, strlen(block->idstr));
        qemu_put_be64(f, block->length);
527
528
    }

529
530
531
532
533
    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);

    return 0;
}

534
static int ram_save_iterate(QEMUFile *f, void *opaque)
535
536
537
538
539
{
    uint64_t bytes_transferred_last;
    double bwidth = 0;
    int ret;
    int i;
540
    uint64_t expected_time;
541

542
543
544
    bytes_transferred_last = bytes_transferred;
    bwidth = qemu_get_clock_ns(rt_clock);

545
    i = 0;
546
    while ((ret = qemu_file_rate_limit(f)) == 0) {
547
        int bytes_sent;
548

549
        bytes_sent = ram_save_block(f, false);
550
551
        /* no more blocks to sent */
        if (bytes_sent < 0) {
552
553
            break;
        }
554
        bytes_transferred += bytes_sent;
555
        acct_info.iterations++;
556
557
558
559
560
561
562
563
564
565
566
567
568
569
        /* 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) {
            uint64_t t1 = (qemu_get_clock_ns(rt_clock) - bwidth) / 1000000;
            if (t1 > MAX_WAIT) {
                DPRINTF("big wait: " PRIu64 " milliseconds, %d iterations\n",
                        t1, i);
                break;
            }
        }
        i++;
570
571
    }

572
573
574
575
    if (ret < 0) {
        return ret;
    }

576
577
578
579
580
581
582
583
584
    bwidth = qemu_get_clock_ns(rt_clock) - bwidth;
    bwidth = (bytes_transferred - bytes_transferred_last) / bwidth;

    /* if we haven't transferred anything this round, force expected_time to a
     * a very high value, but without crashing */
    if (bwidth == 0) {
        bwidth = 0.000001;
    }

585
586
587
588
589
590
591
    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);

    expected_time = ram_save_remaining() * TARGET_PAGE_SIZE / bwidth;

    DPRINTF("ram_save_live: expected(" PRIu64 ") <= max(" PRIu64 ")?\n",
            expected_time, migrate_max_downtime());

Juan Quintela's avatar
Juan Quintela committed
592
593
594
595
596
597
598
    if (expected_time <= migrate_max_downtime()) {
        memory_global_sync_dirty_bitmap(get_system_memory());
        expected_time = ram_save_remaining() * TARGET_PAGE_SIZE / bwidth;

        return expected_time <= migrate_max_downtime();
    }
    return 0;
599
600
601
602
603
604
}

static int ram_save_complete(QEMUFile *f, void *opaque)
{
    memory_global_sync_dirty_bitmap(get_system_memory());

605
    /* try transferring iterative blocks of memory */
Orit Wasserman's avatar
Orit Wasserman committed
606

607
    /* flush all remaining blocks regardless of rate limiting */
608
    while (true) {
609
610
        int bytes_sent;

611
        bytes_sent = ram_save_block(f, true);
612
613
614
        /* no more blocks to sent */
        if (bytes_sent < 0) {
            break;
615
        }
616
        bytes_transferred += bytes_sent;
617
    }
618
    memory_global_dirty_log_stop();
619
620
621

    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);

622
    return 0;
623
624
}

625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
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;
}

666
667
668
669
670
671
672
673
674
675
676
677
678
679
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;
        }

680
        return memory_region_get_ram_ptr(block->mr) + offset;
681
682
683
684
685
686
687
688
    }

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

    QLIST_FOREACH(block, &ram_list.blocks, next) {
        if (!strncmp(id, block->idstr, sizeof(id)))
689
            return memory_region_get_ram_ptr(block->mr) + offset;
690
691
692
693
694
695
    }

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

696
static int ram_load(QEMUFile *f, void *opaque, int version_id)
697
698
{
    ram_addr_t addr;
Orit Wasserman's avatar
Orit Wasserman committed
699
    int flags, ret = 0;
700
    int error;
Orit Wasserman's avatar
Orit Wasserman committed
701
702
703
    static uint64_t seq_iter;

    seq_iter++;
704

705
    if (version_id < 4 || version_id > 4) {
706
707
708
709
710
711
712
713
714
715
        return -EINVAL;
    }

    do {
        addr = qemu_get_be64(f);

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

        if (flags & RAM_SAVE_FLAG_MEM_SIZE) {
716
            if (version_id == 4) {
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
                /* 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);

                    QLIST_FOREACH(block, &ram_list.blocks, next) {
                        if (!strncmp(id, block->idstr, sizeof(id))) {
Orit Wasserman's avatar
Orit Wasserman committed
733
734
735
736
                            if (block->length != length) {
                                ret =  -EINVAL;
                                goto done;
                            }
737
738
739
740
741
                            break;
                        }
                    }

                    if (!block) {
742
743
                        fprintf(stderr, "Unknown ramblock \"%s\", cannot "
                                "accept migration\n", id);
Orit Wasserman's avatar
Orit Wasserman committed
744
745
                        ret = -EINVAL;
                        goto done;
746
747
748
749
                    }

                    total_ram_bytes -= length;
                }
750
751
752
753
            }
        }

        if (flags & RAM_SAVE_FLAG_COMPRESS) {
754
755
756
            void *host;
            uint8_t ch;

757
            host = host_from_stream_offset(f, addr, flags);
758
759
760
            if (!host) {
                return -EINVAL;
            }
761
762
763

            ch = qemu_get_byte(f);
            memset(host, ch, TARGET_PAGE_SIZE);
764
765
766
#ifndef _WIN32
            if (ch == 0 &&
                (!kvm_enabled() || kvm_has_sync_mmu())) {
Andreas Färber's avatar
Andreas Färber committed
767
                qemu_madvise(host, TARGET_PAGE_SIZE, QEMU_MADV_DONTNEED);
768
769
770
            }
#endif
        } else if (flags & RAM_SAVE_FLAG_PAGE) {
771
772
            void *host;

773
            host = host_from_stream_offset(f, addr, flags);
774
775
776
            if (!host) {
                return -EINVAL;
            }
777
778

            qemu_get_buffer(f, host, TARGET_PAGE_SIZE);
779
780
781
782
783
784
785
786
787
788
789
790
791
        } else if (flags & RAM_SAVE_FLAG_XBZRLE) {
            if (!migrate_use_xbzrle()) {
                return -EINVAL;
            }
            void *host = host_from_stream_offset(f, addr, flags);
            if (!host) {
                return -EINVAL;
            }

            if (load_xbzrle(f, addr, host) < 0) {
                ret = -EINVAL;
                goto done;
            }
792
        }
793
794
        error = qemu_file_get_error(f);
        if (error) {
Orit Wasserman's avatar
Orit Wasserman committed
795
796
            ret = error;
            goto done;
797
798
799
        }
    } while (!(flags & RAM_SAVE_FLAG_EOS));

Orit Wasserman's avatar
Orit Wasserman committed
800
801
802
803
done:
    DPRINTF("Completed load of VM with exit code %d seq iteration " PRIu64 "\n",
            ret, seq_iter);
    return ret;
804
805
}

806
SaveVMHandlers savevm_ram_handlers = {
807
    .save_live_setup = ram_save_setup,
808
809
    .save_live_iterate = ram_save_iterate,
    .save_live_complete = ram_save_complete,
810
    .load_state = ram_load,
811
    .cancel = ram_migration_cancel,
812
813
};

814
#ifdef HAS_AUDIO
815
816
817
818
819
820
struct soundhw {
    const char *name;
    const char *descr;
    int enabled;
    int isa;
    union {
821
        int (*init_isa) (ISABus *bus);
822
823
824
825
826
        int (*init_pci) (PCIBus *bus);
    } init;
};

static struct soundhw soundhw[] = {
827
#ifdef HAS_AUDIO_CHOICE
828
#ifdef CONFIG_PCSPK
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
    {
        "pcspk",
        "PC speaker",
        0,
        1,
        { .init_isa = pcspk_audio_init }
    },
#endif

#ifdef CONFIG_SB16
    {
        "sb16",
        "Creative Sound Blaster 16",
        0,
        1,
        { .init_isa = SB16_init }
    },
#endif

#ifdef CONFIG_CS4231A
    {
        "cs4231a",
        "CS4231A",
        0,
        1,
        { .init_isa = cs4231a_init }
    },
#endif

#ifdef CONFIG_ADLIB
    {
        "adlib",
#ifdef HAS_YMF262
        "Yamaha YMF262 (OPL3)",
#else
        "Yamaha YM3812 (OPL2)",
#endif
        0,
        1,
        { .init_isa = Adlib_init }
    },
#endif

#ifdef CONFIG_GUS
    {
        "gus",
        "Gravis Ultrasound GF1",
        0,
        1,
        { .init_isa = GUS_init }
    },
#endif

#ifdef CONFIG_AC97
    {
        "ac97",
        "Intel 82801AA AC97 Audio",
        0,
        0,
        { .init_pci = ac97_init }
    },
#endif

#ifdef CONFIG_ES1370
    {
        "es1370",
        "ENSONIQ AudioPCI ES1370",
        0,
        0,
        { .init_pci = es1370_init }
    },
#endif

902
903
904
905
906
907
908
909
910
911
#ifdef CONFIG_HDA
    {
        "hda",
        "Intel HD Audio",
        0,
        0,
        { .init_pci = intel_hda_and_codec_init }
    },
#endif

912
913
914
915
916
917
918
919
920
#endif /* HAS_AUDIO_CHOICE */

    { NULL, NULL, 0, 0, { NULL } }
};

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

921
    if (is_help_option(optarg)) {
922
923
924
925
926
927
928
    show_valid_cards:

        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");
929
        exit(!is_help_option(optarg));
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
    }
    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;
        }
    }
}
975

976
void audio_init(ISABus *isa_bus, PCIBus *pci_bus)
977
978
979
980
981
982
{
    struct soundhw *c;

    for (c = soundhw; c->name; ++c) {
        if (c->enabled) {
            if (c->isa) {
983
984
                if (isa_bus) {
                    c->init.init_isa(isa_bus);
985
986
987
988
989
990
991
992
993
                }
            } else {
                if (pci_bus) {
                    c->init.init_pci(pci_bus);
                }
            }
        }
    }
}
994
995
996
997
#else
void select_soundhw(const char *optarg)
{
}
998
void audio_init(ISABus *isa_bus, PCIBus *pci_bus)
999
1000
{
}
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
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
#endif

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
    smbios_add_field(1, offsetof(struct smbios_type_1, uuid), 16, uuid);
#endif
    return 0;
}

void do_acpitable_option(const char *optarg)
{
#ifdef TARGET_I386
    if (acpi_table_add(optarg) < 0) {
        fprintf(stderr, "Wrong acpi table provided\n");
        exit(1);
    }
#endif
}

void do_smbios_option(const char *optarg)
{
#ifdef TARGET_I386
    if (smbios_entry_add(optarg) < 0) {
        fprintf(stderr, "Wrong smbios provided\n");
        exit(1);
    }
#endif
}

void cpudef_init(void)
{
#if defined(cpudef_setup)
    cpudef_setup(); /* parse cpu definitions in target config file */
#endif
}

int audio_available(void)
{
#ifdef HAS_AUDIO
    return 1;
#else
    return 0;
#endif
}

1061
1062
1063
1064
1065
int tcg_available(void)
{
    return 1;
}

1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
int kvm_available(void)
{
#ifdef CONFIG_KVM
    return 1;
#else
    return 0;
#endif
}

int xen_available(void)
{
#ifdef CONFIG_XEN
    return 1;
#else
    return 0;
#endif
}