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