linux-user: add open() hijack infrastructure
[qemu.git] / arch_init.c
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, TARGET_PAGE_SIZE);
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 }