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