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