1 /* 2 * QEMU System Emulator 3 * 4 * Copyright (c) 2003-2008 Fabrice Bellard 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 #include <stdint.h> 25 #include <stdarg.h> 26 #include <stdlib.h> 27 #ifndef _WIN32 28 #include <sys/types.h> 29 #include <sys/mman.h> 30 #endif 31 #include "config.h" 32 #include "monitor.h" 33 #include "sysemu.h" 34 #include "arch_init.h" 35 #include "audio/audio.h" 36 #include "hw/pc.h" 37 #include "hw/pci.h" 38 #include "hw/audiodev.h" 39 #include "kvm.h" 40 #include "migration.h" 41 #include "net.h" 42 #include "gdbstub.h" 43 #include "hw/smbios.h" 44 #include "exec-memory.h" 45 46 #ifdef TARGET_SPARC 47 int graphic_width = 1024; 48 int graphic_height = 768; 49 int graphic_depth = 8; 50 #else 51 int graphic_width = 800; 52 int graphic_height = 600; 53 int graphic_depth = 15; 54 #endif 55 56 const char arch_config_name[] = CONFIG_QEMU_CONFDIR "/target-" TARGET_ARCH ".conf"; 57 58 #if defined(TARGET_ALPHA) 59 #define QEMU_ARCH QEMU_ARCH_ALPHA 60 #elif defined(TARGET_ARM) 61 #define QEMU_ARCH QEMU_ARCH_ARM 62 #elif defined(TARGET_CRIS) 63 #define QEMU_ARCH QEMU_ARCH_CRIS 64 #elif defined(TARGET_I386) 65 #define QEMU_ARCH QEMU_ARCH_I386 66 #elif defined(TARGET_M68K) 67 #define QEMU_ARCH QEMU_ARCH_M68K 68 #elif defined(TARGET_LM32) 69 #define QEMU_ARCH QEMU_ARCH_LM32 70 #elif defined(TARGET_MICROBLAZE) 71 #define QEMU_ARCH QEMU_ARCH_MICROBLAZE 72 #elif defined(TARGET_MIPS) 73 #define QEMU_ARCH QEMU_ARCH_MIPS 74 #elif defined(TARGET_PPC) 75 #define QEMU_ARCH QEMU_ARCH_PPC 76 #elif defined(TARGET_S390X) 77 #define QEMU_ARCH QEMU_ARCH_S390X 78 #elif defined(TARGET_SH4) 79 #define QEMU_ARCH QEMU_ARCH_SH4 80 #elif defined(TARGET_SPARC) 81 #define QEMU_ARCH QEMU_ARCH_SPARC 82 #elif defined(TARGET_XTENSA) 83 #define QEMU_ARCH QEMU_ARCH_XTENSA 84 #endif 85 86 const uint32_t arch_type = QEMU_ARCH; 87 88 /***********************************************************/ 89 /* ram save/restore */ 90 91 #define RAM_SAVE_FLAG_FULL 0x01 /* Obsolete, not used anymore */ 92 #define RAM_SAVE_FLAG_COMPRESS 0x02 93 #define RAM_SAVE_FLAG_MEM_SIZE 0x04 94 #define RAM_SAVE_FLAG_PAGE 0x08 95 #define RAM_SAVE_FLAG_EOS 0x10 96 #define RAM_SAVE_FLAG_CONTINUE 0x20 97 98 #ifdef __ALTIVEC__ 99 #include <altivec.h> 100 #define VECTYPE vector unsigned char 101 #define SPLAT(p) vec_splat(vec_ld(0, p), 0) 102 #define ALL_EQ(v1, v2) vec_all_eq(v1, v2) 103 #elif defined __SSE2__ 104 #include <emmintrin.h> 105 #define VECTYPE __m128i 106 #define SPLAT(p) _mm_set1_epi8(*(p)) 107 #define ALL_EQ(v1, v2) (_mm_movemask_epi8(_mm_cmpeq_epi8(v1, v2)) == 0xFFFF) 108 #else 109 #define VECTYPE unsigned long 110 #define SPLAT(p) (*(p) * (~0UL / 255)) 111 #define ALL_EQ(v1, v2) ((v1) == (v2)) 112 #endif 113 114 static int is_dup_page(uint8_t *page) 115 { 116 VECTYPE *p = (VECTYPE *)page; 117 VECTYPE val = SPLAT(page); 118 int i; 119 120 for (i = 0; i < TARGET_PAGE_SIZE / sizeof(VECTYPE); i++) { 121 if (!ALL_EQ(val, p[i])) { 122 return 0; 123 } 124 } 125 126 return 1; 127 } 128 129 static RAMBlock *last_block; 130 static ram_addr_t last_offset; 131 132 static int ram_save_block(QEMUFile *f) 133 { 134 RAMBlock *block = last_block; 135 ram_addr_t offset = last_offset; 136 int bytes_sent = 0; 137 MemoryRegion *mr; 138 139 if (!block) 140 block = QLIST_FIRST(&ram_list.blocks); 141 142 do { 143 mr = block->mr; 144 if (memory_region_get_dirty(mr, offset, DIRTY_MEMORY_MIGRATION)) { 145 uint8_t *p; 146 int cont = (block == last_block) ? RAM_SAVE_FLAG_CONTINUE : 0; 147 148 memory_region_reset_dirty(mr, offset, TARGET_PAGE_SIZE, 149 DIRTY_MEMORY_MIGRATION); 150 151 p = memory_region_get_ram_ptr(mr) + offset; 152 153 if (is_dup_page(p)) { 154 qemu_put_be64(f, offset | cont | RAM_SAVE_FLAG_COMPRESS); 155 if (!cont) { 156 qemu_put_byte(f, strlen(block->idstr)); 157 qemu_put_buffer(f, (uint8_t *)block->idstr, 158 strlen(block->idstr)); 159 } 160 qemu_put_byte(f, *p); 161 bytes_sent = 1; 162 } else { 163 qemu_put_be64(f, offset | cont | RAM_SAVE_FLAG_PAGE); 164 if (!cont) { 165 qemu_put_byte(f, strlen(block->idstr)); 166 qemu_put_buffer(f, (uint8_t *)block->idstr, 167 strlen(block->idstr)); 168 } 169 qemu_put_buffer(f, p, TARGET_PAGE_SIZE); 170 bytes_sent = TARGET_PAGE_SIZE; 171 } 172 173 break; 174 } 175 176 offset += TARGET_PAGE_SIZE; 177 if (offset >= block->length) { 178 offset = 0; 179 block = QLIST_NEXT(block, next); 180 if (!block) 181 block = QLIST_FIRST(&ram_list.blocks); 182 } 183 } while (block != last_block || offset != last_offset); 184 185 last_block = block; 186 last_offset = offset; 187 188 return bytes_sent; 189 } 190 191 static uint64_t bytes_transferred; 192 193 static ram_addr_t ram_save_remaining(void) 194 { 195 RAMBlock *block; 196 ram_addr_t count = 0; 197 198 QLIST_FOREACH(block, &ram_list.blocks, next) { 199 ram_addr_t addr; 200 for (addr = 0; addr < block->length; addr += TARGET_PAGE_SIZE) { 201 if (memory_region_get_dirty(block->mr, addr, 202 DIRTY_MEMORY_MIGRATION)) { 203 count++; 204 } 205 } 206 } 207 208 return count; 209 } 210 211 uint64_t ram_bytes_remaining(void) 212 { 213 return ram_save_remaining() * TARGET_PAGE_SIZE; 214 } 215 216 uint64_t ram_bytes_transferred(void) 217 { 218 return bytes_transferred; 219 } 220 221 uint64_t ram_bytes_total(void) 222 { 223 RAMBlock *block; 224 uint64_t total = 0; 225 226 QLIST_FOREACH(block, &ram_list.blocks, next) 227 total += block->length; 228 229 return total; 230 } 231 232 static int block_compar(const void *a, const void *b) 233 { 234 RAMBlock * const *ablock = a; 235 RAMBlock * const *bblock = b; 236 237 return strcmp((*ablock)->idstr, (*bblock)->idstr); 238 } 239 240 static void sort_ram_list(void) 241 { 242 RAMBlock *block, *nblock, **blocks; 243 int n; 244 n = 0; 245 QLIST_FOREACH(block, &ram_list.blocks, next) { 246 ++n; 247 } 248 blocks = g_malloc(n * sizeof *blocks); 249 n = 0; 250 QLIST_FOREACH_SAFE(block, &ram_list.blocks, next, nblock) { 251 blocks[n++] = block; 252 QLIST_REMOVE(block, next); 253 } 254 qsort(blocks, n, sizeof *blocks, block_compar); 255 while (--n >= 0) { 256 QLIST_INSERT_HEAD(&ram_list.blocks, blocks[n], next); 257 } 258 g_free(blocks); 259 } 260 261 int ram_save_live(Monitor *mon, QEMUFile *f, int stage, void *opaque) 262 { 263 ram_addr_t addr; 264 uint64_t bytes_transferred_last; 265 double bwidth = 0; 266 uint64_t expected_time = 0; 267 int ret; 268 269 if (stage < 0) { 270 memory_global_dirty_log_stop(); 271 return 0; 272 } 273 274 memory_global_sync_dirty_bitmap(get_system_memory()); 275 276 if (stage == 1) { 277 RAMBlock *block; 278 bytes_transferred = 0; 279 last_block = NULL; 280 last_offset = 0; 281 sort_ram_list(); 282 283 /* Make sure all dirty bits are set */ 284 QLIST_FOREACH(block, &ram_list.blocks, next) { 285 for (addr = 0; addr < block->length; addr += TARGET_PAGE_SIZE) { 286 if (!memory_region_get_dirty(block->mr, addr, 287 DIRTY_MEMORY_MIGRATION)) { 288 memory_region_set_dirty(block->mr, addr); 289 } 290 } 291 } 292 293 memory_global_dirty_log_start(); 294 295 qemu_put_be64(f, ram_bytes_total() | RAM_SAVE_FLAG_MEM_SIZE); 296 297 QLIST_FOREACH(block, &ram_list.blocks, next) { 298 qemu_put_byte(f, strlen(block->idstr)); 299 qemu_put_buffer(f, (uint8_t *)block->idstr, strlen(block->idstr)); 300 qemu_put_be64(f, block->length); 301 } 302 } 303 304 bytes_transferred_last = bytes_transferred; 305 bwidth = qemu_get_clock_ns(rt_clock); 306 307 while ((ret = qemu_file_rate_limit(f)) == 0) { 308 int bytes_sent; 309 310 bytes_sent = ram_save_block(f); 311 bytes_transferred += bytes_sent; 312 if (bytes_sent == 0) { /* no more blocks */ 313 break; 314 } 315 } 316 317 if (ret < 0) { 318 return ret; 319 } 320 321 bwidth = qemu_get_clock_ns(rt_clock) - bwidth; 322 bwidth = (bytes_transferred - bytes_transferred_last) / bwidth; 323 324 /* if we haven't transferred anything this round, force expected_time to a 325 * a very high value, but without crashing */ 326 if (bwidth == 0) { 327 bwidth = 0.000001; 328 } 329 330 /* try transferring iterative blocks of memory */ 331 if (stage == 3) { 332 int bytes_sent; 333 334 /* flush all remaining blocks regardless of rate limiting */ 335 while ((bytes_sent = ram_save_block(f)) != 0) { 336 bytes_transferred += bytes_sent; 337 } 338 memory_global_dirty_log_stop(); 339 } 340 341 qemu_put_be64(f, RAM_SAVE_FLAG_EOS); 342 343 expected_time = ram_save_remaining() * TARGET_PAGE_SIZE / bwidth; 344 345 return (stage == 2) && (expected_time <= migrate_max_downtime()); 346 } 347 348 static inline void *host_from_stream_offset(QEMUFile *f, 349 ram_addr_t offset, 350 int flags) 351 { 352 static RAMBlock *block = NULL; 353 char id[256]; 354 uint8_t len; 355 356 if (flags & RAM_SAVE_FLAG_CONTINUE) { 357 if (!block) { 358 fprintf(stderr, "Ack, bad migration stream!\n"); 359 return NULL; 360 } 361 362 return memory_region_get_ram_ptr(block->mr) + offset; 363 } 364 365 len = qemu_get_byte(f); 366 qemu_get_buffer(f, (uint8_t *)id, len); 367 id[len] = 0; 368 369 QLIST_FOREACH(block, &ram_list.blocks, next) { 370 if (!strncmp(id, block->idstr, sizeof(id))) 371 return memory_region_get_ram_ptr(block->mr) + offset; 372 } 373 374 fprintf(stderr, "Can't find block %s!\n", id); 375 return NULL; 376 } 377 378 int ram_load(QEMUFile *f, void *opaque, int version_id) 379 { 380 ram_addr_t addr; 381 int flags; 382 int error; 383 384 if (version_id < 4 || version_id > 4) { 385 return -EINVAL; 386 } 387 388 do { 389 addr = qemu_get_be64(f); 390 391 flags = addr & ~TARGET_PAGE_MASK; 392 addr &= TARGET_PAGE_MASK; 393 394 if (flags & RAM_SAVE_FLAG_MEM_SIZE) { 395 if (version_id == 4) { 396 /* Synchronize RAM block list */ 397 char id[256]; 398 ram_addr_t length; 399 ram_addr_t total_ram_bytes = addr; 400 401 while (total_ram_bytes) { 402 RAMBlock *block; 403 uint8_t len; 404 405 len = qemu_get_byte(f); 406 qemu_get_buffer(f, (uint8_t *)id, len); 407 id[len] = 0; 408 length = qemu_get_be64(f); 409 410 QLIST_FOREACH(block, &ram_list.blocks, next) { 411 if (!strncmp(id, block->idstr, sizeof(id))) { 412 if (block->length != length) 413 return -EINVAL; 414 break; 415 } 416 } 417 418 if (!block) { 419 fprintf(stderr, "Unknown ramblock \"%s\", cannot " 420 "accept migration\n", id); 421 return -EINVAL; 422 } 423 424 total_ram_bytes -= length; 425 } 426 } 427 } 428 429 if (flags & RAM_SAVE_FLAG_COMPRESS) { 430 void *host; 431 uint8_t ch; 432 433 host = host_from_stream_offset(f, addr, flags); 434 if (!host) { 435 return -EINVAL; 436 } 437 438 ch = qemu_get_byte(f); 439 memset(host, ch, TARGET_PAGE_SIZE); 440 #ifndef _WIN32 441 if (ch == 0 && 442 (!kvm_enabled() || kvm_has_sync_mmu())) { 443 qemu_madvise(host, TARGET_PAGE_SIZE, QEMU_MADV_DONTNEED); 444 } 445 #endif 446 } else if (flags & RAM_SAVE_FLAG_PAGE) { 447 void *host; 448 449 host = host_from_stream_offset(f, addr, flags); 450 451 qemu_get_buffer(f, host, TARGET_PAGE_SIZE); 452 } 453 error = qemu_file_get_error(f); 454 if (error) { 455 return error; 456 } 457 } while (!(flags & RAM_SAVE_FLAG_EOS)); 458 459 return 0; 460 } 461 462 #ifdef HAS_AUDIO 463 struct soundhw { 464 const char *name; 465 const char *descr; 466 int enabled; 467 int isa; 468 union { 469 int (*init_isa) (ISABus *bus); 470 int (*init_pci) (PCIBus *bus); 471 } init; 472 }; 473 474 static struct soundhw soundhw[] = { 475 #ifdef HAS_AUDIO_CHOICE 476 #if defined(TARGET_I386) || defined(TARGET_MIPS) 477 { 478 "pcspk", 479 "PC speaker", 480 0, 481 1, 482 { .init_isa = pcspk_audio_init } 483 }, 484 #endif 485 486 #ifdef CONFIG_SB16 487 { 488 "sb16", 489 "Creative Sound Blaster 16", 490 0, 491 1, 492 { .init_isa = SB16_init } 493 }, 494 #endif 495 496 #ifdef CONFIG_CS4231A 497 { 498 "cs4231a", 499 "CS4231A", 500 0, 501 1, 502 { .init_isa = cs4231a_init } 503 }, 504 #endif 505 506 #ifdef CONFIG_ADLIB 507 { 508 "adlib", 509 #ifdef HAS_YMF262 510 "Yamaha YMF262 (OPL3)", 511 #else 512 "Yamaha YM3812 (OPL2)", 513 #endif 514 0, 515 1, 516 { .init_isa = Adlib_init } 517 }, 518 #endif 519 520 #ifdef CONFIG_GUS 521 { 522 "gus", 523 "Gravis Ultrasound GF1", 524 0, 525 1, 526 { .init_isa = GUS_init } 527 }, 528 #endif 529 530 #ifdef CONFIG_AC97 531 { 532 "ac97", 533 "Intel 82801AA AC97 Audio", 534 0, 535 0, 536 { .init_pci = ac97_init } 537 }, 538 #endif 539 540 #ifdef CONFIG_ES1370 541 { 542 "es1370", 543 "ENSONIQ AudioPCI ES1370", 544 0, 545 0, 546 { .init_pci = es1370_init } 547 }, 548 #endif 549 550 #ifdef CONFIG_HDA 551 { 552 "hda", 553 "Intel HD Audio", 554 0, 555 0, 556 { .init_pci = intel_hda_and_codec_init } 557 }, 558 #endif 559 560 #endif /* HAS_AUDIO_CHOICE */ 561 562 { NULL, NULL, 0, 0, { NULL } } 563 }; 564 565 void select_soundhw(const char *optarg) 566 { 567 struct soundhw *c; 568 569 if (*optarg == '?') { 570 show_valid_cards: 571 572 printf("Valid sound card names (comma separated):\n"); 573 for (c = soundhw; c->name; ++c) { 574 printf ("%-11s %s\n", c->name, c->descr); 575 } 576 printf("\n-soundhw all will enable all of the above\n"); 577 exit(*optarg != '?'); 578 } 579 else { 580 size_t l; 581 const char *p; 582 char *e; 583 int bad_card = 0; 584 585 if (!strcmp(optarg, "all")) { 586 for (c = soundhw; c->name; ++c) { 587 c->enabled = 1; 588 } 589 return; 590 } 591 592 p = optarg; 593 while (*p) { 594 e = strchr(p, ','); 595 l = !e ? strlen(p) : (size_t) (e - p); 596 597 for (c = soundhw; c->name; ++c) { 598 if (!strncmp(c->name, p, l) && !c->name[l]) { 599 c->enabled = 1; 600 break; 601 } 602 } 603 604 if (!c->name) { 605 if (l > 80) { 606 fprintf(stderr, 607 "Unknown sound card name (too big to show)\n"); 608 } 609 else { 610 fprintf(stderr, "Unknown sound card name `%.*s'\n", 611 (int) l, p); 612 } 613 bad_card = 1; 614 } 615 p += l + (e != NULL); 616 } 617 618 if (bad_card) { 619 goto show_valid_cards; 620 } 621 } 622 } 623 624 void audio_init(ISABus *isa_bus, PCIBus *pci_bus) 625 { 626 struct soundhw *c; 627 628 for (c = soundhw; c->name; ++c) { 629 if (c->enabled) { 630 if (c->isa) { 631 if (isa_bus) { 632 c->init.init_isa(isa_bus); 633 } 634 } else { 635 if (pci_bus) { 636 c->init.init_pci(pci_bus); 637 } 638 } 639 } 640 } 641 } 642 #else 643 void select_soundhw(const char *optarg) 644 { 645 } 646 void audio_init(ISABus *isa_bus, PCIBus *pci_bus) 647 { 648 } 649 #endif 650 651 int qemu_uuid_parse(const char *str, uint8_t *uuid) 652 { 653 int ret; 654 655 if (strlen(str) != 36) { 656 return -1; 657 } 658 659 ret = sscanf(str, UUID_FMT, &uuid[0], &uuid[1], &uuid[2], &uuid[3], 660 &uuid[4], &uuid[5], &uuid[6], &uuid[7], &uuid[8], &uuid[9], 661 &uuid[10], &uuid[11], &uuid[12], &uuid[13], &uuid[14], 662 &uuid[15]); 663 664 if (ret != 16) { 665 return -1; 666 } 667 #ifdef TARGET_I386 668 smbios_add_field(1, offsetof(struct smbios_type_1, uuid), 16, uuid); 669 #endif 670 return 0; 671 } 672 673 void do_acpitable_option(const char *optarg) 674 { 675 #ifdef TARGET_I386 676 if (acpi_table_add(optarg) < 0) { 677 fprintf(stderr, "Wrong acpi table provided\n"); 678 exit(1); 679 } 680 #endif 681 } 682 683 void do_smbios_option(const char *optarg) 684 { 685 #ifdef TARGET_I386 686 if (smbios_entry_add(optarg) < 0) { 687 fprintf(stderr, "Wrong smbios provided\n"); 688 exit(1); 689 } 690 #endif 691 } 692 693 void cpudef_init(void) 694 { 695 #if defined(cpudef_setup) 696 cpudef_setup(); /* parse cpu definitions in target config file */ 697 #endif 698 } 699 700 int audio_available(void) 701 { 702 #ifdef HAS_AUDIO 703 return 1; 704 #else 705 return 0; 706 #endif 707 } 708 709 int tcg_available(void) 710 { 711 return 1; 712 } 713 714 int kvm_available(void) 715 { 716 #ifdef CONFIG_KVM 717 return 1; 718 #else 719 return 0; 720 #endif 721 } 722 723 int xen_available(void) 724 { 725 #ifdef CONFIG_XEN 726 return 1; 727 #else 728 return 0; 729 #endif 730 } 731