Statistics
| Branch: | Revision:

root / vl.c @ 28695489

History | View | Annotate | Download (130.6 kB)

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 <unistd.h>
25
#include <fcntl.h>
26
#include <signal.h>
27
#include <time.h>
28
#include <errno.h>
29
#include <sys/time.h>
30
#include <zlib.h>
31

    
32
/* Needed early for CONFIG_BSD etc. */
33
#include "config-host.h"
34

    
35
#ifndef _WIN32
36
#include <libgen.h>
37
#include <pwd.h>
38
#include <sys/times.h>
39
#include <sys/wait.h>
40
#include <termios.h>
41
#include <sys/mman.h>
42
#include <sys/ioctl.h>
43
#include <sys/resource.h>
44
#include <sys/socket.h>
45
#include <netinet/in.h>
46
#include <net/if.h>
47
#include <arpa/inet.h>
48
#include <dirent.h>
49
#include <netdb.h>
50
#include <sys/select.h>
51
#ifdef CONFIG_BSD
52
#include <sys/stat.h>
53
#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)
54
#include <libutil.h>
55
#else
56
#include <util.h>
57
#endif
58
#else
59
#ifdef __linux__
60
#include <pty.h>
61
#include <malloc.h>
62
#include <sys/prctl.h>
63

    
64
#include <linux/ppdev.h>
65
#include <linux/parport.h>
66
#endif
67
#ifdef __sun__
68
#include <sys/stat.h>
69
#include <sys/ethernet.h>
70
#include <sys/sockio.h>
71
#include <netinet/arp.h>
72
#include <netinet/in.h>
73
#include <netinet/in_systm.h>
74
#include <netinet/ip.h>
75
#include <netinet/ip_icmp.h> // must come after ip.h
76
#include <netinet/udp.h>
77
#include <netinet/tcp.h>
78
#include <net/if.h>
79
#include <syslog.h>
80
#include <stropts.h>
81
/* See MySQL bug #7156 (http://bugs.mysql.com/bug.php?id=7156) for
82
   discussion about Solaris header problems */
83
extern int madvise(caddr_t, size_t, int);
84
#endif
85
#endif
86
#endif
87

    
88
#if defined(__OpenBSD__)
89
#include <util.h>
90
#endif
91

    
92
#if defined(CONFIG_VDE)
93
#include <libvdeplug.h>
94
#endif
95

    
96
#if defined(CONFIG_UUID)
97
#include <uuid/uuid.h>
98
#endif
99

    
100
#ifdef _WIN32
101
#include <windows.h>
102
#endif
103

    
104
#ifdef CONFIG_SDL
105
#if defined(__APPLE__) || defined(main)
106
#include <SDL.h>
107
int qemu_main(int argc, char **argv, char **envp);
108
int main(int argc, char **argv)
109
{
110
    return qemu_main(argc, argv, NULL);
111
}
112
#undef main
113
#define main qemu_main
114
#endif
115
#endif /* CONFIG_SDL */
116

    
117
#ifdef CONFIG_COCOA
118
#undef main
119
#define main qemu_main
120
#endif /* CONFIG_COCOA */
121

    
122
#include "hw/hw.h"
123
#include "hw/boards.h"
124
#include "hw/usb.h"
125
#include "hw/pcmcia.h"
126
#include "hw/pc.h"
127
#include "hw/audiodev.h"
128
#include "hw/isa.h"
129
#include "hw/baum.h"
130
#include "hw/bt.h"
131
#include "hw/watchdog.h"
132
#include "hw/smbios.h"
133
#include "hw/xen.h"
134
#include "hw/qdev.h"
135
#include "hw/loader.h"
136
#include "bt-host.h"
137
#include "net.h"
138
#include "net/slirp.h"
139
#include "monitor.h"
140
#include "console.h"
141
#include "sysemu.h"
142
#include "gdbstub.h"
143
#include "qemu-timer.h"
144
#include "qemu-char.h"
145
#include "cache-utils.h"
146
#include "block.h"
147
#include "block_int.h"
148
#include "block-migration.h"
149
#include "dma.h"
150
#include "audio/audio.h"
151
#include "migration.h"
152
#include "kvm.h"
153
#include "balloon.h"
154
#include "qemu-option.h"
155
#include "qemu-config.h"
156
#include "qemu-objects.h"
157

    
158
#include "disas.h"
159

    
160
#include "exec-all.h"
161

    
162
#include "qemu_socket.h"
163

    
164
#include "slirp/libslirp.h"
165

    
166
#include "qemu-queue.h"
167

    
168
//#define DEBUG_NET
169
//#define DEBUG_SLIRP
170

    
171
#define DEFAULT_RAM_SIZE 128
172

    
173
#define MAX_VIRTIO_CONSOLES 1
174

    
175
static const char *data_dir;
176
const char *bios_name = NULL;
177
/* Note: drives_table[MAX_DRIVES] is a dummy block driver if none available
178
   to store the VM snapshots */
179
struct drivelist drives = QTAILQ_HEAD_INITIALIZER(drives);
180
struct driveoptlist driveopts = QTAILQ_HEAD_INITIALIZER(driveopts);
181
enum vga_retrace_method vga_retrace_method = VGA_RETRACE_DUMB;
182
DisplayType display_type = DT_DEFAULT;
183
const char* keyboard_layout = NULL;
184
ram_addr_t ram_size;
185
const char *mem_path = NULL;
186
#ifdef MAP_POPULATE
187
int mem_prealloc = 0; /* force preallocation of physical target memory */
188
#endif
189
int nb_nics;
190
NICInfo nd_table[MAX_NICS];
191
int vm_running;
192
int autostart;
193
static int rtc_utc = 1;
194
static int rtc_date_offset = -1; /* -1 means no change */
195
QEMUClock *rtc_clock;
196
int vga_interface_type = VGA_NONE;
197
#ifdef TARGET_SPARC
198
int graphic_width = 1024;
199
int graphic_height = 768;
200
int graphic_depth = 8;
201
#else
202
int graphic_width = 800;
203
int graphic_height = 600;
204
int graphic_depth = 15;
205
#endif
206
static int full_screen = 0;
207
#ifdef CONFIG_SDL
208
static int no_frame = 0;
209
#endif
210
int no_quit = 0;
211
CharDriverState *serial_hds[MAX_SERIAL_PORTS];
212
CharDriverState *parallel_hds[MAX_PARALLEL_PORTS];
213
CharDriverState *virtcon_hds[MAX_VIRTIO_CONSOLES];
214
#ifdef TARGET_I386
215
int win2k_install_hack = 0;
216
int rtc_td_hack = 0;
217
#endif
218
int usb_enabled = 0;
219
int singlestep = 0;
220
int smp_cpus = 1;
221
int max_cpus = 0;
222
int smp_cores = 1;
223
int smp_threads = 1;
224
const char *vnc_display;
225
int acpi_enabled = 1;
226
int no_hpet = 0;
227
int fd_bootchk = 1;
228
int no_reboot = 0;
229
int no_shutdown = 0;
230
int cursor_hide = 1;
231
int graphic_rotate = 0;
232
uint8_t irq0override = 1;
233
#ifndef _WIN32
234
int daemonize = 0;
235
#endif
236
const char *watchdog;
237
const char *option_rom[MAX_OPTION_ROMS];
238
int nb_option_roms;
239
int semihosting_enabled = 0;
240
#ifdef TARGET_ARM
241
int old_param = 0;
242
#endif
243
const char *qemu_name;
244
int alt_grab = 0;
245
int ctrl_grab = 0;
246
#if defined(TARGET_SPARC) || defined(TARGET_PPC)
247
unsigned int nb_prom_envs = 0;
248
const char *prom_envs[MAX_PROM_ENVS];
249
#endif
250
int boot_menu;
251

    
252
int nb_numa_nodes;
253
uint64_t node_mem[MAX_NODES];
254
uint64_t node_cpumask[MAX_NODES];
255

    
256
static CPUState *cur_cpu;
257
static CPUState *next_cpu;
258
static QEMUTimer *nographic_timer;
259

    
260
uint8_t qemu_uuid[16];
261

    
262
static QEMUBootSetHandler *boot_set_handler;
263
static void *boot_set_opaque;
264

    
265
#ifdef SIGRTMIN
266
#define SIG_IPI (SIGRTMIN+4)
267
#else
268
#define SIG_IPI SIGUSR1
269
#endif
270

    
271
static int default_serial = 1;
272
static int default_parallel = 1;
273
static int default_virtcon = 1;
274
static int default_monitor = 1;
275
static int default_vga = 1;
276
static int default_floppy = 1;
277
static int default_cdrom = 1;
278
static int default_sdcard = 1;
279
static int default_qmp = 1;
280

    
281
static struct {
282
    const char *driver;
283
    int *flag;
284
} default_list[] = {
285
    { .driver = "isa-serial",           .flag = &default_serial    },
286
    { .driver = "isa-parallel",         .flag = &default_parallel  },
287
    { .driver = "isa-fdc",              .flag = &default_floppy    },
288
    { .driver = "ide-drive",            .flag = &default_cdrom     },
289
    { .driver = "virtio-serial-pci",    .flag = &default_virtcon   },
290
    { .driver = "virtio-serial-s390",   .flag = &default_virtcon   },
291
    { .driver = "virtio-serial",        .flag = &default_virtcon   },
292
    { .driver = "VGA",                  .flag = &default_vga       },
293
    { .driver = "cirrus-vga",           .flag = &default_vga       },
294
    { .driver = "vmware-svga",          .flag = &default_vga       },
295
};
296

    
297
static int default_driver_check(QemuOpts *opts, void *opaque)
298
{
299
    const char *driver = qemu_opt_get(opts, "driver");
300
    int i;
301

    
302
    if (!driver)
303
        return 0;
304
    for (i = 0; i < ARRAY_SIZE(default_list); i++) {
305
        if (strcmp(default_list[i].driver, driver) != 0)
306
            continue;
307
        *(default_list[i].flag) = 0;
308
    }
309
    return 0;
310
}
311

    
312
/***********************************************************/
313
/* x86 ISA bus support */
314

    
315
target_phys_addr_t isa_mem_base = 0;
316
PicState2 *isa_pic;
317

    
318
/***********************************************************/
319
void hw_error(const char *fmt, ...)
320
{
321
    va_list ap;
322
    CPUState *env;
323

    
324
    va_start(ap, fmt);
325
    fprintf(stderr, "qemu: hardware error: ");
326
    vfprintf(stderr, fmt, ap);
327
    fprintf(stderr, "\n");
328
    for(env = first_cpu; env != NULL; env = env->next_cpu) {
329
        fprintf(stderr, "CPU #%d:\n", env->cpu_index);
330
#ifdef TARGET_I386
331
        cpu_dump_state(env, stderr, fprintf, X86_DUMP_FPU);
332
#else
333
        cpu_dump_state(env, stderr, fprintf, 0);
334
#endif
335
    }
336
    va_end(ap);
337
    abort();
338
}
339

    
340
static void set_proc_name(const char *s)
341
{
342
#if defined(__linux__) && defined(PR_SET_NAME)
343
    char name[16];
344
    if (!s)
345
        return;
346
    name[sizeof(name) - 1] = 0;
347
    strncpy(name, s, sizeof(name));
348
    /* Could rewrite argv[0] too, but that's a bit more complicated.
349
       This simple way is enough for `top'. */
350
    prctl(PR_SET_NAME, name);
351
#endif            
352
}
353
 
354
/***************/
355
/* ballooning */
356

    
357
static QEMUBalloonEvent *qemu_balloon_event;
358
void *qemu_balloon_event_opaque;
359

    
360
void qemu_add_balloon_handler(QEMUBalloonEvent *func, void *opaque)
361
{
362
    qemu_balloon_event = func;
363
    qemu_balloon_event_opaque = opaque;
364
}
365

    
366
int qemu_balloon(ram_addr_t target, MonitorCompletion cb, void *opaque)
367
{
368
    if (qemu_balloon_event) {
369
        qemu_balloon_event(qemu_balloon_event_opaque, target, cb, opaque);
370
        return 1;
371
    } else {
372
        return 0;
373
    }
374
}
375

    
376
int qemu_balloon_status(MonitorCompletion cb, void *opaque)
377
{
378
    if (qemu_balloon_event) {
379
        qemu_balloon_event(qemu_balloon_event_opaque, 0, cb, opaque);
380
        return 1;
381
    } else {
382
        return 0;
383
    }
384
}
385

    
386

    
387
/***********************************************************/
388
/* real time host monotonic timer */
389

    
390
/* compute with 96 bit intermediate result: (a*b)/c */
391
uint64_t muldiv64(uint64_t a, uint32_t b, uint32_t c)
392
{
393
    union {
394
        uint64_t ll;
395
        struct {
396
#ifdef HOST_WORDS_BIGENDIAN
397
            uint32_t high, low;
398
#else
399
            uint32_t low, high;
400
#endif
401
        } l;
402
    } u, res;
403
    uint64_t rl, rh;
404

    
405
    u.ll = a;
406
    rl = (uint64_t)u.l.low * (uint64_t)b;
407
    rh = (uint64_t)u.l.high * (uint64_t)b;
408
    rh += (rl >> 32);
409
    res.l.high = rh / c;
410
    res.l.low = (((rh % c) << 32) + (rl & 0xffffffff)) / c;
411
    return res.ll;
412
}
413

    
414
/***********************************************************/
415
/* host time/date access */
416
void qemu_get_timedate(struct tm *tm, int offset)
417
{
418
    time_t ti;
419
    struct tm *ret;
420

    
421
    time(&ti);
422
    ti += offset;
423
    if (rtc_date_offset == -1) {
424
        if (rtc_utc)
425
            ret = gmtime(&ti);
426
        else
427
            ret = localtime(&ti);
428
    } else {
429
        ti -= rtc_date_offset;
430
        ret = gmtime(&ti);
431
    }
432

    
433
    memcpy(tm, ret, sizeof(struct tm));
434
}
435

    
436
int qemu_timedate_diff(struct tm *tm)
437
{
438
    time_t seconds;
439

    
440
    if (rtc_date_offset == -1)
441
        if (rtc_utc)
442
            seconds = mktimegm(tm);
443
        else
444
            seconds = mktime(tm);
445
    else
446
        seconds = mktimegm(tm) + rtc_date_offset;
447

    
448
    return seconds - time(NULL);
449
}
450

    
451
void rtc_change_mon_event(struct tm *tm)
452
{
453
    QObject *data;
454

    
455
    data = qobject_from_jsonf("{ 'offset': %d }", qemu_timedate_diff(tm));
456
    monitor_protocol_event(QEVENT_RTC_CHANGE, data);
457
    qobject_decref(data);
458
}
459

    
460
static void configure_rtc_date_offset(const char *startdate, int legacy)
461
{
462
    time_t rtc_start_date;
463
    struct tm tm;
464

    
465
    if (!strcmp(startdate, "now") && legacy) {
466
        rtc_date_offset = -1;
467
    } else {
468
        if (sscanf(startdate, "%d-%d-%dT%d:%d:%d",
469
                   &tm.tm_year,
470
                   &tm.tm_mon,
471
                   &tm.tm_mday,
472
                   &tm.tm_hour,
473
                   &tm.tm_min,
474
                   &tm.tm_sec) == 6) {
475
            /* OK */
476
        } else if (sscanf(startdate, "%d-%d-%d",
477
                          &tm.tm_year,
478
                          &tm.tm_mon,
479
                          &tm.tm_mday) == 3) {
480
            tm.tm_hour = 0;
481
            tm.tm_min = 0;
482
            tm.tm_sec = 0;
483
        } else {
484
            goto date_fail;
485
        }
486
        tm.tm_year -= 1900;
487
        tm.tm_mon--;
488
        rtc_start_date = mktimegm(&tm);
489
        if (rtc_start_date == -1) {
490
        date_fail:
491
            fprintf(stderr, "Invalid date format. Valid formats are:\n"
492
                            "'2006-06-17T16:01:21' or '2006-06-17'\n");
493
            exit(1);
494
        }
495
        rtc_date_offset = time(NULL) - rtc_start_date;
496
    }
497
}
498

    
499
static void configure_rtc(QemuOpts *opts)
500
{
501
    const char *value;
502

    
503
    value = qemu_opt_get(opts, "base");
504
    if (value) {
505
        if (!strcmp(value, "utc")) {
506
            rtc_utc = 1;
507
        } else if (!strcmp(value, "localtime")) {
508
            rtc_utc = 0;
509
        } else {
510
            configure_rtc_date_offset(value, 0);
511
        }
512
    }
513
    value = qemu_opt_get(opts, "clock");
514
    if (value) {
515
        if (!strcmp(value, "host")) {
516
            rtc_clock = host_clock;
517
        } else if (!strcmp(value, "vm")) {
518
            rtc_clock = vm_clock;
519
        } else {
520
            fprintf(stderr, "qemu: invalid option value '%s'\n", value);
521
            exit(1);
522
        }
523
    }
524
#ifdef CONFIG_TARGET_I386
525
    value = qemu_opt_get(opts, "driftfix");
526
    if (value) {
527
        if (!strcmp(buf, "slew")) {
528
            rtc_td_hack = 1;
529
        } else if (!strcmp(buf, "none")) {
530
            rtc_td_hack = 0;
531
        } else {
532
            fprintf(stderr, "qemu: invalid option value '%s'\n", value);
533
            exit(1);
534
        }
535
    }
536
#endif
537
}
538

    
539
#ifdef _WIN32
540
static void socket_cleanup(void)
541
{
542
    WSACleanup();
543
}
544

    
545
static int socket_init(void)
546
{
547
    WSADATA Data;
548
    int ret, err;
549

    
550
    ret = WSAStartup(MAKEWORD(2,2), &Data);
551
    if (ret != 0) {
552
        err = WSAGetLastError();
553
        fprintf(stderr, "WSAStartup: %d\n", err);
554
        return -1;
555
    }
556
    atexit(socket_cleanup);
557
    return 0;
558
}
559
#endif
560

    
561
/***********************************************************/
562
/* Bluetooth support */
563
static int nb_hcis;
564
static int cur_hci;
565
static struct HCIInfo *hci_table[MAX_NICS];
566

    
567
static struct bt_vlan_s {
568
    struct bt_scatternet_s net;
569
    int id;
570
    struct bt_vlan_s *next;
571
} *first_bt_vlan;
572

    
573
/* find or alloc a new bluetooth "VLAN" */
574
static struct bt_scatternet_s *qemu_find_bt_vlan(int id)
575
{
576
    struct bt_vlan_s **pvlan, *vlan;
577
    for (vlan = first_bt_vlan; vlan != NULL; vlan = vlan->next) {
578
        if (vlan->id == id)
579
            return &vlan->net;
580
    }
581
    vlan = qemu_mallocz(sizeof(struct bt_vlan_s));
582
    vlan->id = id;
583
    pvlan = &first_bt_vlan;
584
    while (*pvlan != NULL)
585
        pvlan = &(*pvlan)->next;
586
    *pvlan = vlan;
587
    return &vlan->net;
588
}
589

    
590
static void null_hci_send(struct HCIInfo *hci, const uint8_t *data, int len)
591
{
592
}
593

    
594
static int null_hci_addr_set(struct HCIInfo *hci, const uint8_t *bd_addr)
595
{
596
    return -ENOTSUP;
597
}
598

    
599
static struct HCIInfo null_hci = {
600
    .cmd_send = null_hci_send,
601
    .sco_send = null_hci_send,
602
    .acl_send = null_hci_send,
603
    .bdaddr_set = null_hci_addr_set,
604
};
605

    
606
struct HCIInfo *qemu_next_hci(void)
607
{
608
    if (cur_hci == nb_hcis)
609
        return &null_hci;
610

    
611
    return hci_table[cur_hci++];
612
}
613

    
614
static struct HCIInfo *hci_init(const char *str)
615
{
616
    char *endp;
617
    struct bt_scatternet_s *vlan = 0;
618

    
619
    if (!strcmp(str, "null"))
620
        /* null */
621
        return &null_hci;
622
    else if (!strncmp(str, "host", 4) && (str[4] == '\0' || str[4] == ':'))
623
        /* host[:hciN] */
624
        return bt_host_hci(str[4] ? str + 5 : "hci0");
625
    else if (!strncmp(str, "hci", 3)) {
626
        /* hci[,vlan=n] */
627
        if (str[3]) {
628
            if (!strncmp(str + 3, ",vlan=", 6)) {
629
                vlan = qemu_find_bt_vlan(strtol(str + 9, &endp, 0));
630
                if (*endp)
631
                    vlan = 0;
632
            }
633
        } else
634
            vlan = qemu_find_bt_vlan(0);
635
        if (vlan)
636
           return bt_new_hci(vlan);
637
    }
638

    
639
    fprintf(stderr, "qemu: Unknown bluetooth HCI `%s'.\n", str);
640

    
641
    return 0;
642
}
643

    
644
static int bt_hci_parse(const char *str)
645
{
646
    struct HCIInfo *hci;
647
    bdaddr_t bdaddr;
648

    
649
    if (nb_hcis >= MAX_NICS) {
650
        fprintf(stderr, "qemu: Too many bluetooth HCIs (max %i).\n", MAX_NICS);
651
        return -1;
652
    }
653

    
654
    hci = hci_init(str);
655
    if (!hci)
656
        return -1;
657

    
658
    bdaddr.b[0] = 0x52;
659
    bdaddr.b[1] = 0x54;
660
    bdaddr.b[2] = 0x00;
661
    bdaddr.b[3] = 0x12;
662
    bdaddr.b[4] = 0x34;
663
    bdaddr.b[5] = 0x56 + nb_hcis;
664
    hci->bdaddr_set(hci, bdaddr.b);
665

    
666
    hci_table[nb_hcis++] = hci;
667

    
668
    return 0;
669
}
670

    
671
static void bt_vhci_add(int vlan_id)
672
{
673
    struct bt_scatternet_s *vlan = qemu_find_bt_vlan(vlan_id);
674

    
675
    if (!vlan->slave)
676
        fprintf(stderr, "qemu: warning: adding a VHCI to "
677
                        "an empty scatternet %i\n", vlan_id);
678

    
679
    bt_vhci_init(bt_new_hci(vlan));
680
}
681

    
682
static struct bt_device_s *bt_device_add(const char *opt)
683
{
684
    struct bt_scatternet_s *vlan;
685
    int vlan_id = 0;
686
    char *endp = strstr(opt, ",vlan=");
687
    int len = (endp ? endp - opt : strlen(opt)) + 1;
688
    char devname[10];
689

    
690
    pstrcpy(devname, MIN(sizeof(devname), len), opt);
691

    
692
    if (endp) {
693
        vlan_id = strtol(endp + 6, &endp, 0);
694
        if (*endp) {
695
            fprintf(stderr, "qemu: unrecognised bluetooth vlan Id\n");
696
            return 0;
697
        }
698
    }
699

    
700
    vlan = qemu_find_bt_vlan(vlan_id);
701

    
702
    if (!vlan->slave)
703
        fprintf(stderr, "qemu: warning: adding a slave device to "
704
                        "an empty scatternet %i\n", vlan_id);
705

    
706
    if (!strcmp(devname, "keyboard"))
707
        return bt_keyboard_init(vlan);
708

    
709
    fprintf(stderr, "qemu: unsupported bluetooth device `%s'\n", devname);
710
    return 0;
711
}
712

    
713
static int bt_parse(const char *opt)
714
{
715
    const char *endp, *p;
716
    int vlan;
717

    
718
    if (strstart(opt, "hci", &endp)) {
719
        if (!*endp || *endp == ',') {
720
            if (*endp)
721
                if (!strstart(endp, ",vlan=", 0))
722
                    opt = endp + 1;
723

    
724
            return bt_hci_parse(opt);
725
       }
726
    } else if (strstart(opt, "vhci", &endp)) {
727
        if (!*endp || *endp == ',') {
728
            if (*endp) {
729
                if (strstart(endp, ",vlan=", &p)) {
730
                    vlan = strtol(p, (char **) &endp, 0);
731
                    if (*endp) {
732
                        fprintf(stderr, "qemu: bad scatternet '%s'\n", p);
733
                        return 1;
734
                    }
735
                } else {
736
                    fprintf(stderr, "qemu: bad parameter '%s'\n", endp + 1);
737
                    return 1;
738
                }
739
            } else
740
                vlan = 0;
741

    
742
            bt_vhci_add(vlan);
743
            return 0;
744
        }
745
    } else if (strstart(opt, "device:", &endp))
746
        return !bt_device_add(endp);
747

    
748
    fprintf(stderr, "qemu: bad bluetooth parameter '%s'\n", opt);
749
    return 1;
750
}
751

    
752
/***********************************************************/
753
/* QEMU Block devices */
754

    
755
#define HD_ALIAS "index=%d,media=disk"
756
#define CDROM_ALIAS "index=2,media=cdrom"
757
#define FD_ALIAS "index=%d,if=floppy"
758
#define PFLASH_ALIAS "if=pflash"
759
#define MTD_ALIAS "if=mtd"
760
#define SD_ALIAS "index=0,if=sd"
761

    
762
QemuOpts *drive_add(const char *file, const char *fmt, ...)
763
{
764
    va_list ap;
765
    char optstr[1024];
766
    QemuOpts *opts;
767

    
768
    va_start(ap, fmt);
769
    vsnprintf(optstr, sizeof(optstr), fmt, ap);
770
    va_end(ap);
771

    
772
    opts = qemu_opts_parse(&qemu_drive_opts, optstr, 0);
773
    if (!opts) {
774
        fprintf(stderr, "%s: huh? duplicate? (%s)\n",
775
                __FUNCTION__, optstr);
776
        return NULL;
777
    }
778
    if (file)
779
        qemu_opt_set(opts, "file", file);
780
    return opts;
781
}
782

    
783
DriveInfo *drive_get(BlockInterfaceType type, int bus, int unit)
784
{
785
    DriveInfo *dinfo;
786

    
787
    /* seek interface, bus and unit */
788

    
789
    QTAILQ_FOREACH(dinfo, &drives, next) {
790
        if (dinfo->type == type &&
791
            dinfo->bus == bus &&
792
            dinfo->unit == unit)
793
            return dinfo;
794
    }
795

    
796
    return NULL;
797
}
798

    
799
DriveInfo *drive_get_by_id(const char *id)
800
{
801
    DriveInfo *dinfo;
802

    
803
    QTAILQ_FOREACH(dinfo, &drives, next) {
804
        if (strcmp(id, dinfo->id))
805
            continue;
806
        return dinfo;
807
    }
808
    return NULL;
809
}
810

    
811
int drive_get_max_bus(BlockInterfaceType type)
812
{
813
    int max_bus;
814
    DriveInfo *dinfo;
815

    
816
    max_bus = -1;
817
    QTAILQ_FOREACH(dinfo, &drives, next) {
818
        if(dinfo->type == type &&
819
           dinfo->bus > max_bus)
820
            max_bus = dinfo->bus;
821
    }
822
    return max_bus;
823
}
824

    
825
const char *drive_get_serial(BlockDriverState *bdrv)
826
{
827
    DriveInfo *dinfo;
828

    
829
    QTAILQ_FOREACH(dinfo, &drives, next) {
830
        if (dinfo->bdrv == bdrv)
831
            return dinfo->serial;
832
    }
833

    
834
    return "\0";
835
}
836

    
837
BlockInterfaceErrorAction drive_get_on_error(
838
    BlockDriverState *bdrv, int is_read)
839
{
840
    DriveInfo *dinfo;
841

    
842
    QTAILQ_FOREACH(dinfo, &drives, next) {
843
        if (dinfo->bdrv == bdrv)
844
            return is_read ? dinfo->on_read_error : dinfo->on_write_error;
845
    }
846

    
847
    return is_read ? BLOCK_ERR_REPORT : BLOCK_ERR_STOP_ENOSPC;
848
}
849

    
850
static void bdrv_format_print(void *opaque, const char *name)
851
{
852
    fprintf(stderr, " %s", name);
853
}
854

    
855
void drive_uninit(DriveInfo *dinfo)
856
{
857
    qemu_opts_del(dinfo->opts);
858
    bdrv_delete(dinfo->bdrv);
859
    QTAILQ_REMOVE(&drives, dinfo, next);
860
    qemu_free(dinfo);
861
}
862

    
863
static int parse_block_error_action(const char *buf, int is_read)
864
{
865
    if (!strcmp(buf, "ignore")) {
866
        return BLOCK_ERR_IGNORE;
867
    } else if (!is_read && !strcmp(buf, "enospc")) {
868
        return BLOCK_ERR_STOP_ENOSPC;
869
    } else if (!strcmp(buf, "stop")) {
870
        return BLOCK_ERR_STOP_ANY;
871
    } else if (!strcmp(buf, "report")) {
872
        return BLOCK_ERR_REPORT;
873
    } else {
874
        fprintf(stderr, "qemu: '%s' invalid %s error action\n",
875
            buf, is_read ? "read" : "write");
876
        return -1;
877
    }
878
}
879

    
880
DriveInfo *drive_init(QemuOpts *opts, void *opaque,
881
                      int *fatal_error)
882
{
883
    const char *buf;
884
    const char *file = NULL;
885
    char devname[128];
886
    const char *serial;
887
    const char *mediastr = "";
888
    BlockInterfaceType type;
889
    enum { MEDIA_DISK, MEDIA_CDROM } media;
890
    int bus_id, unit_id;
891
    int cyls, heads, secs, translation;
892
    BlockDriver *drv = NULL;
893
    QEMUMachine *machine = opaque;
894
    int max_devs;
895
    int index;
896
    int cache;
897
    int aio = 0;
898
    int ro = 0;
899
    int bdrv_flags;
900
    int on_read_error, on_write_error;
901
    const char *devaddr;
902
    DriveInfo *dinfo;
903
    int snapshot = 0;
904

    
905
    *fatal_error = 1;
906

    
907
    translation = BIOS_ATA_TRANSLATION_AUTO;
908
    cache = 1;
909

    
910
    if (machine && machine->use_scsi) {
911
        type = IF_SCSI;
912
        max_devs = MAX_SCSI_DEVS;
913
        pstrcpy(devname, sizeof(devname), "scsi");
914
    } else {
915
        type = IF_IDE;
916
        max_devs = MAX_IDE_DEVS;
917
        pstrcpy(devname, sizeof(devname), "ide");
918
    }
919
    media = MEDIA_DISK;
920

    
921
    /* extract parameters */
922
    bus_id  = qemu_opt_get_number(opts, "bus", 0);
923
    unit_id = qemu_opt_get_number(opts, "unit", -1);
924
    index   = qemu_opt_get_number(opts, "index", -1);
925

    
926
    cyls  = qemu_opt_get_number(opts, "cyls", 0);
927
    heads = qemu_opt_get_number(opts, "heads", 0);
928
    secs  = qemu_opt_get_number(opts, "secs", 0);
929

    
930
    snapshot = qemu_opt_get_bool(opts, "snapshot", 0);
931
    ro = qemu_opt_get_bool(opts, "readonly", 0);
932

    
933
    file = qemu_opt_get(opts, "file");
934
    serial = qemu_opt_get(opts, "serial");
935

    
936
    if ((buf = qemu_opt_get(opts, "if")) != NULL) {
937
        pstrcpy(devname, sizeof(devname), buf);
938
        if (!strcmp(buf, "ide")) {
939
            type = IF_IDE;
940
            max_devs = MAX_IDE_DEVS;
941
        } else if (!strcmp(buf, "scsi")) {
942
            type = IF_SCSI;
943
            max_devs = MAX_SCSI_DEVS;
944
        } else if (!strcmp(buf, "floppy")) {
945
            type = IF_FLOPPY;
946
            max_devs = 0;
947
        } else if (!strcmp(buf, "pflash")) {
948
            type = IF_PFLASH;
949
            max_devs = 0;
950
        } else if (!strcmp(buf, "mtd")) {
951
            type = IF_MTD;
952
            max_devs = 0;
953
        } else if (!strcmp(buf, "sd")) {
954
            type = IF_SD;
955
            max_devs = 0;
956
        } else if (!strcmp(buf, "virtio")) {
957
            type = IF_VIRTIO;
958
            max_devs = 0;
959
        } else if (!strcmp(buf, "xen")) {
960
            type = IF_XEN;
961
            max_devs = 0;
962
        } else if (!strcmp(buf, "none")) {
963
            type = IF_NONE;
964
            max_devs = 0;
965
        } else {
966
            fprintf(stderr, "qemu: unsupported bus type '%s'\n", buf);
967
            return NULL;
968
        }
969
    }
970

    
971
    if (cyls || heads || secs) {
972
        if (cyls < 1 || (type == IF_IDE && cyls > 16383)) {
973
            fprintf(stderr, "qemu: '%s' invalid physical cyls number\n", buf);
974
            return NULL;
975
        }
976
        if (heads < 1 || (type == IF_IDE && heads > 16)) {
977
            fprintf(stderr, "qemu: '%s' invalid physical heads number\n", buf);
978
            return NULL;
979
        }
980
        if (secs < 1 || (type == IF_IDE && secs > 63)) {
981
            fprintf(stderr, "qemu: '%s' invalid physical secs number\n", buf);
982
            return NULL;
983
        }
984
    }
985

    
986
    if ((buf = qemu_opt_get(opts, "trans")) != NULL) {
987
        if (!cyls) {
988
            fprintf(stderr,
989
                    "qemu: '%s' trans must be used with cyls,heads and secs\n",
990
                    buf);
991
            return NULL;
992
        }
993
        if (!strcmp(buf, "none"))
994
            translation = BIOS_ATA_TRANSLATION_NONE;
995
        else if (!strcmp(buf, "lba"))
996
            translation = BIOS_ATA_TRANSLATION_LBA;
997
        else if (!strcmp(buf, "auto"))
998
            translation = BIOS_ATA_TRANSLATION_AUTO;
999
        else {
1000
            fprintf(stderr, "qemu: '%s' invalid translation type\n", buf);
1001
            return NULL;
1002
        }
1003
    }
1004

    
1005
    if ((buf = qemu_opt_get(opts, "media")) != NULL) {
1006
        if (!strcmp(buf, "disk")) {
1007
            media = MEDIA_DISK;
1008
        } else if (!strcmp(buf, "cdrom")) {
1009
            if (cyls || secs || heads) {
1010
                fprintf(stderr,
1011
                        "qemu: '%s' invalid physical CHS format\n", buf);
1012
                return NULL;
1013
            }
1014
            media = MEDIA_CDROM;
1015
        } else {
1016
            fprintf(stderr, "qemu: '%s' invalid media\n", buf);
1017
            return NULL;
1018
        }
1019
    }
1020

    
1021
    if ((buf = qemu_opt_get(opts, "cache")) != NULL) {
1022
        if (!strcmp(buf, "off") || !strcmp(buf, "none"))
1023
            cache = 0;
1024
        else if (!strcmp(buf, "writethrough"))
1025
            cache = 1;
1026
        else if (!strcmp(buf, "writeback"))
1027
            cache = 2;
1028
        else {
1029
           fprintf(stderr, "qemu: invalid cache option\n");
1030
           return NULL;
1031
        }
1032
    }
1033

    
1034
#ifdef CONFIG_LINUX_AIO
1035
    if ((buf = qemu_opt_get(opts, "aio")) != NULL) {
1036
        if (!strcmp(buf, "threads"))
1037
            aio = 0;
1038
        else if (!strcmp(buf, "native"))
1039
            aio = 1;
1040
        else {
1041
           fprintf(stderr, "qemu: invalid aio option\n");
1042
           return NULL;
1043
        }
1044
    }
1045
#endif
1046

    
1047
    if ((buf = qemu_opt_get(opts, "format")) != NULL) {
1048
       if (strcmp(buf, "?") == 0) {
1049
            fprintf(stderr, "qemu: Supported formats:");
1050
            bdrv_iterate_format(bdrv_format_print, NULL);
1051
            fprintf(stderr, "\n");
1052
            return NULL;
1053
        }
1054
        drv = bdrv_find_whitelisted_format(buf);
1055
        if (!drv) {
1056
            fprintf(stderr, "qemu: '%s' invalid format\n", buf);
1057
            return NULL;
1058
        }
1059
    }
1060

    
1061
    on_write_error = BLOCK_ERR_STOP_ENOSPC;
1062
    if ((buf = qemu_opt_get(opts, "werror")) != NULL) {
1063
        if (type != IF_IDE && type != IF_SCSI && type != IF_VIRTIO) {
1064
            fprintf(stderr, "werror is no supported by this format\n");
1065
            return NULL;
1066
        }
1067

    
1068
        on_write_error = parse_block_error_action(buf, 0);
1069
        if (on_write_error < 0) {
1070
            return NULL;
1071
        }
1072
    }
1073

    
1074
    on_read_error = BLOCK_ERR_REPORT;
1075
    if ((buf = qemu_opt_get(opts, "rerror")) != NULL) {
1076
        if (type != IF_IDE && type != IF_VIRTIO) {
1077
            fprintf(stderr, "rerror is no supported by this format\n");
1078
            return NULL;
1079
        }
1080

    
1081
        on_read_error = parse_block_error_action(buf, 1);
1082
        if (on_read_error < 0) {
1083
            return NULL;
1084
        }
1085
    }
1086

    
1087
    if ((devaddr = qemu_opt_get(opts, "addr")) != NULL) {
1088
        if (type != IF_VIRTIO) {
1089
            fprintf(stderr, "addr is not supported\n");
1090
            return NULL;
1091
        }
1092
    }
1093

    
1094
    /* compute bus and unit according index */
1095

    
1096
    if (index != -1) {
1097
        if (bus_id != 0 || unit_id != -1) {
1098
            fprintf(stderr,
1099
                    "qemu: index cannot be used with bus and unit\n");
1100
            return NULL;
1101
        }
1102
        if (max_devs == 0)
1103
        {
1104
            unit_id = index;
1105
            bus_id = 0;
1106
        } else {
1107
            unit_id = index % max_devs;
1108
            bus_id = index / max_devs;
1109
        }
1110
    }
1111

    
1112
    /* if user doesn't specify a unit_id,
1113
     * try to find the first free
1114
     */
1115

    
1116
    if (unit_id == -1) {
1117
       unit_id = 0;
1118
       while (drive_get(type, bus_id, unit_id) != NULL) {
1119
           unit_id++;
1120
           if (max_devs && unit_id >= max_devs) {
1121
               unit_id -= max_devs;
1122
               bus_id++;
1123
           }
1124
       }
1125
    }
1126

    
1127
    /* check unit id */
1128

    
1129
    if (max_devs && unit_id >= max_devs) {
1130
        fprintf(stderr, "qemu: unit %d too big (max is %d)\n",
1131
                unit_id, max_devs - 1);
1132
        return NULL;
1133
    }
1134

    
1135
    /*
1136
     * ignore multiple definitions
1137
     */
1138

    
1139
    if (drive_get(type, bus_id, unit_id) != NULL) {
1140
        *fatal_error = 0;
1141
        return NULL;
1142
    }
1143

    
1144
    /* init */
1145

    
1146
    dinfo = qemu_mallocz(sizeof(*dinfo));
1147
    if ((buf = qemu_opts_id(opts)) != NULL) {
1148
        dinfo->id = qemu_strdup(buf);
1149
    } else {
1150
        /* no id supplied -> create one */
1151
        dinfo->id = qemu_mallocz(32);
1152
        if (type == IF_IDE || type == IF_SCSI)
1153
            mediastr = (media == MEDIA_CDROM) ? "-cd" : "-hd";
1154
        if (max_devs)
1155
            snprintf(dinfo->id, 32, "%s%i%s%i",
1156
                     devname, bus_id, mediastr, unit_id);
1157
        else
1158
            snprintf(dinfo->id, 32, "%s%s%i",
1159
                     devname, mediastr, unit_id);
1160
    }
1161
    dinfo->bdrv = bdrv_new(dinfo->id);
1162
    dinfo->devaddr = devaddr;
1163
    dinfo->type = type;
1164
    dinfo->bus = bus_id;
1165
    dinfo->unit = unit_id;
1166
    dinfo->on_read_error = on_read_error;
1167
    dinfo->on_write_error = on_write_error;
1168
    dinfo->opts = opts;
1169
    if (serial)
1170
        strncpy(dinfo->serial, serial, sizeof(serial));
1171
    QTAILQ_INSERT_TAIL(&drives, dinfo, next);
1172

    
1173
    switch(type) {
1174
    case IF_IDE:
1175
    case IF_SCSI:
1176
    case IF_XEN:
1177
    case IF_NONE:
1178
        switch(media) {
1179
        case MEDIA_DISK:
1180
            if (cyls != 0) {
1181
                bdrv_set_geometry_hint(dinfo->bdrv, cyls, heads, secs);
1182
                bdrv_set_translation_hint(dinfo->bdrv, translation);
1183
            }
1184
            break;
1185
        case MEDIA_CDROM:
1186
            bdrv_set_type_hint(dinfo->bdrv, BDRV_TYPE_CDROM);
1187
            break;
1188
        }
1189
        break;
1190
    case IF_SD:
1191
        /* FIXME: This isn't really a floppy, but it's a reasonable
1192
           approximation.  */
1193
    case IF_FLOPPY:
1194
        bdrv_set_type_hint(dinfo->bdrv, BDRV_TYPE_FLOPPY);
1195
        break;
1196
    case IF_PFLASH:
1197
    case IF_MTD:
1198
        break;
1199
    case IF_VIRTIO:
1200
        /* add virtio block device */
1201
        opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
1202
        qemu_opt_set(opts, "driver", "virtio-blk-pci");
1203
        qemu_opt_set(opts, "drive", dinfo->id);
1204
        if (devaddr)
1205
            qemu_opt_set(opts, "addr", devaddr);
1206
        break;
1207
    case IF_COUNT:
1208
        abort();
1209
    }
1210
    if (!file) {
1211
        *fatal_error = 0;
1212
        return NULL;
1213
    }
1214
    bdrv_flags = 0;
1215
    if (snapshot) {
1216
        bdrv_flags |= BDRV_O_SNAPSHOT;
1217
        cache = 2; /* always use write-back with snapshot */
1218
    }
1219
    if (cache == 0) /* no caching */
1220
        bdrv_flags |= BDRV_O_NOCACHE;
1221
    else if (cache == 2) /* write-back */
1222
        bdrv_flags |= BDRV_O_CACHE_WB;
1223

    
1224
    if (aio == 1) {
1225
        bdrv_flags |= BDRV_O_NATIVE_AIO;
1226
    } else {
1227
        bdrv_flags &= ~BDRV_O_NATIVE_AIO;
1228
    }
1229

    
1230
    if (ro == 1) {
1231
        if (type != IF_SCSI && type != IF_VIRTIO && type != IF_FLOPPY) {
1232
            fprintf(stderr, "qemu: readonly flag not supported for drive with this interface\n");
1233
            return NULL;
1234
        }
1235
    }
1236
    /* 
1237
     * cdrom is read-only. Set it now, after above interface checking
1238
     * since readonly attribute not explicitly required, so no error.
1239
     */
1240
    if (media == MEDIA_CDROM) {
1241
        ro = 1;
1242
    }
1243
    bdrv_flags |= ro ? 0 : BDRV_O_RDWR;
1244

    
1245
    if (bdrv_open2(dinfo->bdrv, file, bdrv_flags, drv) < 0) {
1246
        fprintf(stderr, "qemu: could not open disk image %s: %s\n",
1247
                        file, strerror(errno));
1248
        return NULL;
1249
    }
1250

    
1251
    if (bdrv_key_required(dinfo->bdrv))
1252
        autostart = 0;
1253
    *fatal_error = 0;
1254
    return dinfo;
1255
}
1256

    
1257
static int drive_init_func(QemuOpts *opts, void *opaque)
1258
{
1259
    QEMUMachine *machine = opaque;
1260
    int fatal_error = 0;
1261

    
1262
    if (drive_init(opts, machine, &fatal_error) == NULL) {
1263
        if (fatal_error)
1264
            return 1;
1265
    }
1266
    return 0;
1267
}
1268

    
1269
static int drive_enable_snapshot(QemuOpts *opts, void *opaque)
1270
{
1271
    if (NULL == qemu_opt_get(opts, "snapshot")) {
1272
        qemu_opt_set(opts, "snapshot", "on");
1273
    }
1274
    return 0;
1275
}
1276

    
1277
void qemu_register_boot_set(QEMUBootSetHandler *func, void *opaque)
1278
{
1279
    boot_set_handler = func;
1280
    boot_set_opaque = opaque;
1281
}
1282

    
1283
int qemu_boot_set(const char *boot_devices)
1284
{
1285
    if (!boot_set_handler) {
1286
        return -EINVAL;
1287
    }
1288
    return boot_set_handler(boot_set_opaque, boot_devices);
1289
}
1290

    
1291
static int parse_bootdevices(char *devices)
1292
{
1293
    /* We just do some generic consistency checks */
1294
    const char *p;
1295
    int bitmap = 0;
1296

    
1297
    for (p = devices; *p != '\0'; p++) {
1298
        /* Allowed boot devices are:
1299
         * a-b: floppy disk drives
1300
         * c-f: IDE disk drives
1301
         * g-m: machine implementation dependant drives
1302
         * n-p: network devices
1303
         * It's up to each machine implementation to check if the given boot
1304
         * devices match the actual hardware implementation and firmware
1305
         * features.
1306
         */
1307
        if (*p < 'a' || *p > 'p') {
1308
            fprintf(stderr, "Invalid boot device '%c'\n", *p);
1309
            exit(1);
1310
        }
1311
        if (bitmap & (1 << (*p - 'a'))) {
1312
            fprintf(stderr, "Boot device '%c' was given twice\n", *p);
1313
            exit(1);
1314
        }
1315
        bitmap |= 1 << (*p - 'a');
1316
    }
1317
    return bitmap;
1318
}
1319

    
1320
static void restore_boot_devices(void *opaque)
1321
{
1322
    char *standard_boot_devices = opaque;
1323

    
1324
    qemu_boot_set(standard_boot_devices);
1325

    
1326
    qemu_unregister_reset(restore_boot_devices, standard_boot_devices);
1327
    qemu_free(standard_boot_devices);
1328
}
1329

    
1330
static void numa_add(const char *optarg)
1331
{
1332
    char option[128];
1333
    char *endptr;
1334
    unsigned long long value, endvalue;
1335
    int nodenr;
1336

    
1337
    optarg = get_opt_name(option, 128, optarg, ',') + 1;
1338
    if (!strcmp(option, "node")) {
1339
        if (get_param_value(option, 128, "nodeid", optarg) == 0) {
1340
            nodenr = nb_numa_nodes;
1341
        } else {
1342
            nodenr = strtoull(option, NULL, 10);
1343
        }
1344

    
1345
        if (get_param_value(option, 128, "mem", optarg) == 0) {
1346
            node_mem[nodenr] = 0;
1347
        } else {
1348
            value = strtoull(option, &endptr, 0);
1349
            switch (*endptr) {
1350
            case 0: case 'M': case 'm':
1351
                value <<= 20;
1352
                break;
1353
            case 'G': case 'g':
1354
                value <<= 30;
1355
                break;
1356
            }
1357
            node_mem[nodenr] = value;
1358
        }
1359
        if (get_param_value(option, 128, "cpus", optarg) == 0) {
1360
            node_cpumask[nodenr] = 0;
1361
        } else {
1362
            value = strtoull(option, &endptr, 10);
1363
            if (value >= 64) {
1364
                value = 63;
1365
                fprintf(stderr, "only 64 CPUs in NUMA mode supported.\n");
1366
            } else {
1367
                if (*endptr == '-') {
1368
                    endvalue = strtoull(endptr+1, &endptr, 10);
1369
                    if (endvalue >= 63) {
1370
                        endvalue = 62;
1371
                        fprintf(stderr,
1372
                            "only 63 CPUs in NUMA mode supported.\n");
1373
                    }
1374
                    value = (2ULL << endvalue) - (1ULL << value);
1375
                } else {
1376
                    value = 1ULL << value;
1377
                }
1378
            }
1379
            node_cpumask[nodenr] = value;
1380
        }
1381
        nb_numa_nodes++;
1382
    }
1383
    return;
1384
}
1385

    
1386
static void smp_parse(const char *optarg)
1387
{
1388
    int smp, sockets = 0, threads = 0, cores = 0;
1389
    char *endptr;
1390
    char option[128];
1391

    
1392
    smp = strtoul(optarg, &endptr, 10);
1393
    if (endptr != optarg) {
1394
        if (*endptr == ',') {
1395
            endptr++;
1396
        }
1397
    }
1398
    if (get_param_value(option, 128, "sockets", endptr) != 0)
1399
        sockets = strtoull(option, NULL, 10);
1400
    if (get_param_value(option, 128, "cores", endptr) != 0)
1401
        cores = strtoull(option, NULL, 10);
1402
    if (get_param_value(option, 128, "threads", endptr) != 0)
1403
        threads = strtoull(option, NULL, 10);
1404
    if (get_param_value(option, 128, "maxcpus", endptr) != 0)
1405
        max_cpus = strtoull(option, NULL, 10);
1406

    
1407
    /* compute missing values, prefer sockets over cores over threads */
1408
    if (smp == 0 || sockets == 0) {
1409
        sockets = sockets > 0 ? sockets : 1;
1410
        cores = cores > 0 ? cores : 1;
1411
        threads = threads > 0 ? threads : 1;
1412
        if (smp == 0) {
1413
            smp = cores * threads * sockets;
1414
        }
1415
    } else {
1416
        if (cores == 0) {
1417
            threads = threads > 0 ? threads : 1;
1418
            cores = smp / (sockets * threads);
1419
        } else {
1420
            if (sockets) {
1421
                threads = smp / (cores * sockets);
1422
            }
1423
        }
1424
    }
1425
    smp_cpus = smp;
1426
    smp_cores = cores > 0 ? cores : 1;
1427
    smp_threads = threads > 0 ? threads : 1;
1428
    if (max_cpus == 0)
1429
        max_cpus = smp_cpus;
1430
}
1431

    
1432
/***********************************************************/
1433
/* USB devices */
1434

    
1435
static int usb_device_add(const char *devname, int is_hotplug)
1436
{
1437
    const char *p;
1438
    USBDevice *dev = NULL;
1439

    
1440
    if (!usb_enabled)
1441
        return -1;
1442

    
1443
    /* drivers with .usbdevice_name entry in USBDeviceInfo */
1444
    dev = usbdevice_create(devname);
1445
    if (dev)
1446
        goto done;
1447

    
1448
    /* the other ones */
1449
    if (strstart(devname, "host:", &p)) {
1450
        dev = usb_host_device_open(p);
1451
    } else if (!strcmp(devname, "bt") || strstart(devname, "bt:", &p)) {
1452
        dev = usb_bt_init(devname[2] ? hci_init(p) :
1453
                        bt_new_hci(qemu_find_bt_vlan(0)));
1454
    } else {
1455
        return -1;
1456
    }
1457
    if (!dev)
1458
        return -1;
1459

    
1460
done:
1461
    return 0;
1462
}
1463

    
1464
static int usb_device_del(const char *devname)
1465
{
1466
    int bus_num, addr;
1467
    const char *p;
1468

    
1469
    if (strstart(devname, "host:", &p))
1470
        return usb_host_device_close(p);
1471

    
1472
    if (!usb_enabled)
1473
        return -1;
1474

    
1475
    p = strchr(devname, '.');
1476
    if (!p)
1477
        return -1;
1478
    bus_num = strtoul(devname, NULL, 0);
1479
    addr = strtoul(p + 1, NULL, 0);
1480

    
1481
    return usb_device_delete_addr(bus_num, addr);
1482
}
1483

    
1484
static int usb_parse(const char *cmdline)
1485
{
1486
    int r;
1487
    r = usb_device_add(cmdline, 0);
1488
    if (r < 0) {
1489
        fprintf(stderr, "qemu: could not add USB device '%s'\n", cmdline);
1490
    }
1491
    return r;
1492
}
1493

    
1494
void do_usb_add(Monitor *mon, const QDict *qdict)
1495
{
1496
    const char *devname = qdict_get_str(qdict, "devname");
1497
    if (usb_device_add(devname, 1) < 0) {
1498
        error_report("could not add USB device '%s'", devname);
1499
    }
1500
}
1501

    
1502
void do_usb_del(Monitor *mon, const QDict *qdict)
1503
{
1504
    const char *devname = qdict_get_str(qdict, "devname");
1505
    if (usb_device_del(devname) < 0) {
1506
        error_report("could not delete USB device '%s'", devname);
1507
    }
1508
}
1509

    
1510
/***********************************************************/
1511
/* PCMCIA/Cardbus */
1512

    
1513
static struct pcmcia_socket_entry_s {
1514
    PCMCIASocket *socket;
1515
    struct pcmcia_socket_entry_s *next;
1516
} *pcmcia_sockets = 0;
1517

    
1518
void pcmcia_socket_register(PCMCIASocket *socket)
1519
{
1520
    struct pcmcia_socket_entry_s *entry;
1521

    
1522
    entry = qemu_malloc(sizeof(struct pcmcia_socket_entry_s));
1523
    entry->socket = socket;
1524
    entry->next = pcmcia_sockets;
1525
    pcmcia_sockets = entry;
1526
}
1527

    
1528
void pcmcia_socket_unregister(PCMCIASocket *socket)
1529
{
1530
    struct pcmcia_socket_entry_s *entry, **ptr;
1531

    
1532
    ptr = &pcmcia_sockets;
1533
    for (entry = *ptr; entry; ptr = &entry->next, entry = *ptr)
1534
        if (entry->socket == socket) {
1535
            *ptr = entry->next;
1536
            qemu_free(entry);
1537
        }
1538
}
1539

    
1540
void pcmcia_info(Monitor *mon)
1541
{
1542
    struct pcmcia_socket_entry_s *iter;
1543

    
1544
    if (!pcmcia_sockets)
1545
        monitor_printf(mon, "No PCMCIA sockets\n");
1546

    
1547
    for (iter = pcmcia_sockets; iter; iter = iter->next)
1548
        monitor_printf(mon, "%s: %s\n", iter->socket->slot_string,
1549
                       iter->socket->attached ? iter->socket->card_string :
1550
                       "Empty");
1551
}
1552

    
1553
/***********************************************************/
1554
/* I/O handling */
1555

    
1556
typedef struct IOHandlerRecord {
1557
    int fd;
1558
    IOCanReadHandler *fd_read_poll;
1559
    IOHandler *fd_read;
1560
    IOHandler *fd_write;
1561
    int deleted;
1562
    void *opaque;
1563
    /* temporary data */
1564
    struct pollfd *ufd;
1565
    QLIST_ENTRY(IOHandlerRecord) next;
1566
} IOHandlerRecord;
1567

    
1568
static QLIST_HEAD(, IOHandlerRecord) io_handlers =
1569
    QLIST_HEAD_INITIALIZER(io_handlers);
1570

    
1571

    
1572
/* XXX: fd_read_poll should be suppressed, but an API change is
1573
   necessary in the character devices to suppress fd_can_read(). */
1574
int qemu_set_fd_handler2(int fd,
1575
                         IOCanReadHandler *fd_read_poll,
1576
                         IOHandler *fd_read,
1577
                         IOHandler *fd_write,
1578
                         void *opaque)
1579
{
1580
    IOHandlerRecord *ioh;
1581

    
1582
    if (!fd_read && !fd_write) {
1583
        QLIST_FOREACH(ioh, &io_handlers, next) {
1584
            if (ioh->fd == fd) {
1585
                ioh->deleted = 1;
1586
                break;
1587
            }
1588
        }
1589
    } else {
1590
        QLIST_FOREACH(ioh, &io_handlers, next) {
1591
            if (ioh->fd == fd)
1592
                goto found;
1593
        }
1594
        ioh = qemu_mallocz(sizeof(IOHandlerRecord));
1595
        QLIST_INSERT_HEAD(&io_handlers, ioh, next);
1596
    found:
1597
        ioh->fd = fd;
1598
        ioh->fd_read_poll = fd_read_poll;
1599
        ioh->fd_read = fd_read;
1600
        ioh->fd_write = fd_write;
1601
        ioh->opaque = opaque;
1602
        ioh->deleted = 0;
1603
    }
1604
    return 0;
1605
}
1606

    
1607
int qemu_set_fd_handler(int fd,
1608
                        IOHandler *fd_read,
1609
                        IOHandler *fd_write,
1610
                        void *opaque)
1611
{
1612
    return qemu_set_fd_handler2(fd, NULL, fd_read, fd_write, opaque);
1613
}
1614

    
1615
#ifdef _WIN32
1616
/***********************************************************/
1617
/* Polling handling */
1618

    
1619
typedef struct PollingEntry {
1620
    PollingFunc *func;
1621
    void *opaque;
1622
    struct PollingEntry *next;
1623
} PollingEntry;
1624

    
1625
static PollingEntry *first_polling_entry;
1626

    
1627
int qemu_add_polling_cb(PollingFunc *func, void *opaque)
1628
{
1629
    PollingEntry **ppe, *pe;
1630
    pe = qemu_mallocz(sizeof(PollingEntry));
1631
    pe->func = func;
1632
    pe->opaque = opaque;
1633
    for(ppe = &first_polling_entry; *ppe != NULL; ppe = &(*ppe)->next);
1634
    *ppe = pe;
1635
    return 0;
1636
}
1637

    
1638
void qemu_del_polling_cb(PollingFunc *func, void *opaque)
1639
{
1640
    PollingEntry **ppe, *pe;
1641
    for(ppe = &first_polling_entry; *ppe != NULL; ppe = &(*ppe)->next) {
1642
        pe = *ppe;
1643
        if (pe->func == func && pe->opaque == opaque) {
1644
            *ppe = pe->next;
1645
            qemu_free(pe);
1646
            break;
1647
        }
1648
    }
1649
}
1650

    
1651
/***********************************************************/
1652
/* Wait objects support */
1653
typedef struct WaitObjects {
1654
    int num;
1655
    HANDLE events[MAXIMUM_WAIT_OBJECTS + 1];
1656
    WaitObjectFunc *func[MAXIMUM_WAIT_OBJECTS + 1];
1657
    void *opaque[MAXIMUM_WAIT_OBJECTS + 1];
1658
} WaitObjects;
1659

    
1660
static WaitObjects wait_objects = {0};
1661

    
1662
int qemu_add_wait_object(HANDLE handle, WaitObjectFunc *func, void *opaque)
1663
{
1664
    WaitObjects *w = &wait_objects;
1665

    
1666
    if (w->num >= MAXIMUM_WAIT_OBJECTS)
1667
        return -1;
1668
    w->events[w->num] = handle;
1669
    w->func[w->num] = func;
1670
    w->opaque[w->num] = opaque;
1671
    w->num++;
1672
    return 0;
1673
}
1674

    
1675
void qemu_del_wait_object(HANDLE handle, WaitObjectFunc *func, void *opaque)
1676
{
1677
    int i, found;
1678
    WaitObjects *w = &wait_objects;
1679

    
1680
    found = 0;
1681
    for (i = 0; i < w->num; i++) {
1682
        if (w->events[i] == handle)
1683
            found = 1;
1684
        if (found) {
1685
            w->events[i] = w->events[i + 1];
1686
            w->func[i] = w->func[i + 1];
1687
            w->opaque[i] = w->opaque[i + 1];
1688
        }
1689
    }
1690
    if (found)
1691
        w->num--;
1692
}
1693
#endif
1694

    
1695
/***********************************************************/
1696
/* ram save/restore */
1697

    
1698
#define RAM_SAVE_FLAG_FULL        0x01 /* Obsolete, not used anymore */
1699
#define RAM_SAVE_FLAG_COMPRESS        0x02
1700
#define RAM_SAVE_FLAG_MEM_SIZE        0x04
1701
#define RAM_SAVE_FLAG_PAGE        0x08
1702
#define RAM_SAVE_FLAG_EOS        0x10
1703

    
1704
static int is_dup_page(uint8_t *page, uint8_t ch)
1705
{
1706
    uint32_t val = ch << 24 | ch << 16 | ch << 8 | ch;
1707
    uint32_t *array = (uint32_t *)page;
1708
    int i;
1709

    
1710
    for (i = 0; i < (TARGET_PAGE_SIZE / 4); i++) {
1711
        if (array[i] != val)
1712
            return 0;
1713
    }
1714

    
1715
    return 1;
1716
}
1717

    
1718
static int ram_save_block(QEMUFile *f)
1719
{
1720
    static ram_addr_t current_addr = 0;
1721
    ram_addr_t saved_addr = current_addr;
1722
    ram_addr_t addr = 0;
1723
    int found = 0;
1724

    
1725
    while (addr < last_ram_offset) {
1726
        if (cpu_physical_memory_get_dirty(current_addr, MIGRATION_DIRTY_FLAG)) {
1727
            uint8_t *p;
1728

    
1729
            cpu_physical_memory_reset_dirty(current_addr,
1730
                                            current_addr + TARGET_PAGE_SIZE,
1731
                                            MIGRATION_DIRTY_FLAG);
1732

    
1733
            p = qemu_get_ram_ptr(current_addr);
1734

    
1735
            if (is_dup_page(p, *p)) {
1736
                qemu_put_be64(f, current_addr | RAM_SAVE_FLAG_COMPRESS);
1737
                qemu_put_byte(f, *p);
1738
            } else {
1739
                qemu_put_be64(f, current_addr | RAM_SAVE_FLAG_PAGE);
1740
                qemu_put_buffer(f, p, TARGET_PAGE_SIZE);
1741
            }
1742

    
1743
            found = 1;
1744
            break;
1745
        }
1746
        addr += TARGET_PAGE_SIZE;
1747
        current_addr = (saved_addr + addr) % last_ram_offset;
1748
    }
1749

    
1750
    return found;
1751
}
1752

    
1753
static uint64_t bytes_transferred;
1754

    
1755
static ram_addr_t ram_save_remaining(void)
1756
{
1757
    ram_addr_t addr;
1758
    ram_addr_t count = 0;
1759

    
1760
    for (addr = 0; addr < last_ram_offset; addr += TARGET_PAGE_SIZE) {
1761
        if (cpu_physical_memory_get_dirty(addr, MIGRATION_DIRTY_FLAG))
1762
            count++;
1763
    }
1764

    
1765
    return count;
1766
}
1767

    
1768
uint64_t ram_bytes_remaining(void)
1769
{
1770
    return ram_save_remaining() * TARGET_PAGE_SIZE;
1771
}
1772

    
1773
uint64_t ram_bytes_transferred(void)
1774
{
1775
    return bytes_transferred;
1776
}
1777

    
1778
uint64_t ram_bytes_total(void)
1779
{
1780
    return last_ram_offset;
1781
}
1782

    
1783
static int ram_save_live(Monitor *mon, QEMUFile *f, int stage, void *opaque)
1784
{
1785
    ram_addr_t addr;
1786
    uint64_t bytes_transferred_last;
1787
    double bwidth = 0;
1788
    uint64_t expected_time = 0;
1789

    
1790
    if (stage < 0) {
1791
        cpu_physical_memory_set_dirty_tracking(0);
1792
        return 0;
1793
    }
1794

    
1795
    if (cpu_physical_sync_dirty_bitmap(0, TARGET_PHYS_ADDR_MAX) != 0) {
1796
        qemu_file_set_error(f);
1797
        return 0;
1798
    }
1799

    
1800
    if (stage == 1) {
1801
        bytes_transferred = 0;
1802

    
1803
        /* Make sure all dirty bits are set */
1804
        for (addr = 0; addr < last_ram_offset; addr += TARGET_PAGE_SIZE) {
1805
            if (!cpu_physical_memory_get_dirty(addr, MIGRATION_DIRTY_FLAG))
1806
                cpu_physical_memory_set_dirty(addr);
1807
        }
1808

    
1809
        /* Enable dirty memory tracking */
1810
        cpu_physical_memory_set_dirty_tracking(1);
1811

    
1812
        qemu_put_be64(f, last_ram_offset | RAM_SAVE_FLAG_MEM_SIZE);
1813
    }
1814

    
1815
    bytes_transferred_last = bytes_transferred;
1816
    bwidth = qemu_get_clock_ns(rt_clock);
1817

    
1818
    while (!qemu_file_rate_limit(f)) {
1819
        int ret;
1820

    
1821
        ret = ram_save_block(f);
1822
        bytes_transferred += ret * TARGET_PAGE_SIZE;
1823
        if (ret == 0) /* no more blocks */
1824
            break;
1825
    }
1826

    
1827
    bwidth = qemu_get_clock_ns(rt_clock) - bwidth;
1828
    bwidth = (bytes_transferred - bytes_transferred_last) / bwidth;
1829

    
1830
    /* if we haven't transferred anything this round, force expected_time to a
1831
     * a very high value, but without crashing */
1832
    if (bwidth == 0)
1833
        bwidth = 0.000001;
1834

    
1835
    /* try transferring iterative blocks of memory */
1836
    if (stage == 3) {
1837
        /* flush all remaining blocks regardless of rate limiting */
1838
        while (ram_save_block(f) != 0) {
1839
            bytes_transferred += TARGET_PAGE_SIZE;
1840
        }
1841
        cpu_physical_memory_set_dirty_tracking(0);
1842
    }
1843

    
1844
    qemu_put_be64(f, RAM_SAVE_FLAG_EOS);
1845

    
1846
    expected_time = ram_save_remaining() * TARGET_PAGE_SIZE / bwidth;
1847

    
1848
    return (stage == 2) && (expected_time <= migrate_max_downtime());
1849
}
1850

    
1851
static int ram_load(QEMUFile *f, void *opaque, int version_id)
1852
{
1853
    ram_addr_t addr;
1854
    int flags;
1855

    
1856
    if (version_id != 3)
1857
        return -EINVAL;
1858

    
1859
    do {
1860
        addr = qemu_get_be64(f);
1861

    
1862
        flags = addr & ~TARGET_PAGE_MASK;
1863
        addr &= TARGET_PAGE_MASK;
1864

    
1865
        if (flags & RAM_SAVE_FLAG_MEM_SIZE) {
1866
            if (addr != last_ram_offset)
1867
                return -EINVAL;
1868
        }
1869

    
1870
        if (flags & RAM_SAVE_FLAG_COMPRESS) {
1871
            uint8_t ch = qemu_get_byte(f);
1872
            memset(qemu_get_ram_ptr(addr), ch, TARGET_PAGE_SIZE);
1873
#ifndef _WIN32
1874
            if (ch == 0 &&
1875
                (!kvm_enabled() || kvm_has_sync_mmu())) {
1876
                madvise(qemu_get_ram_ptr(addr), TARGET_PAGE_SIZE, MADV_DONTNEED);
1877
            }
1878
#endif
1879
        } else if (flags & RAM_SAVE_FLAG_PAGE) {
1880
            qemu_get_buffer(f, qemu_get_ram_ptr(addr), TARGET_PAGE_SIZE);
1881
        }
1882
        if (qemu_file_has_error(f)) {
1883
            return -EIO;
1884
        }
1885
    } while (!(flags & RAM_SAVE_FLAG_EOS));
1886

    
1887
    return 0;
1888
}
1889

    
1890
void qemu_service_io(void)
1891
{
1892
    qemu_notify_event();
1893
}
1894

    
1895
/***********************************************************/
1896
/* machine registration */
1897

    
1898
static QEMUMachine *first_machine = NULL;
1899
QEMUMachine *current_machine = NULL;
1900

    
1901
int qemu_register_machine(QEMUMachine *m)
1902
{
1903
    QEMUMachine **pm;
1904
    pm = &first_machine;
1905
    while (*pm != NULL)
1906
        pm = &(*pm)->next;
1907
    m->next = NULL;
1908
    *pm = m;
1909
    return 0;
1910
}
1911

    
1912
static QEMUMachine *find_machine(const char *name)
1913
{
1914
    QEMUMachine *m;
1915

    
1916
    for(m = first_machine; m != NULL; m = m->next) {
1917
        if (!strcmp(m->name, name))
1918
            return m;
1919
        if (m->alias && !strcmp(m->alias, name))
1920
            return m;
1921
    }
1922
    return NULL;
1923
}
1924

    
1925
static QEMUMachine *find_default_machine(void)
1926
{
1927
    QEMUMachine *m;
1928

    
1929
    for(m = first_machine; m != NULL; m = m->next) {
1930
        if (m->is_default) {
1931
            return m;
1932
        }
1933
    }
1934
    return NULL;
1935
}
1936

    
1937
/***********************************************************/
1938
/* main execution loop */
1939

    
1940
static void gui_update(void *opaque)
1941
{
1942
    uint64_t interval = GUI_REFRESH_INTERVAL;
1943
    DisplayState *ds = opaque;
1944
    DisplayChangeListener *dcl = ds->listeners;
1945

    
1946
    qemu_flush_coalesced_mmio_buffer();
1947
    dpy_refresh(ds);
1948

    
1949
    while (dcl != NULL) {
1950
        if (dcl->gui_timer_interval &&
1951
            dcl->gui_timer_interval < interval)
1952
            interval = dcl->gui_timer_interval;
1953
        dcl = dcl->next;
1954
    }
1955
    qemu_mod_timer(ds->gui_timer, interval + qemu_get_clock(rt_clock));
1956
}
1957

    
1958
static void nographic_update(void *opaque)
1959
{
1960
    uint64_t interval = GUI_REFRESH_INTERVAL;
1961

    
1962
    qemu_flush_coalesced_mmio_buffer();
1963
    qemu_mod_timer(nographic_timer, interval + qemu_get_clock(rt_clock));
1964
}
1965

    
1966
void cpu_synchronize_all_states(void)
1967
{
1968
    CPUState *cpu;
1969

    
1970
    for (cpu = first_cpu; cpu; cpu = cpu->next_cpu) {
1971
        cpu_synchronize_state(cpu);
1972
    }
1973
}
1974

    
1975
void cpu_synchronize_all_post_reset(void)
1976
{
1977
    CPUState *cpu;
1978

    
1979
    for (cpu = first_cpu; cpu; cpu = cpu->next_cpu) {
1980
        cpu_synchronize_post_reset(cpu);
1981
    }
1982
}
1983

    
1984
void cpu_synchronize_all_post_init(void)
1985
{
1986
    CPUState *cpu;
1987

    
1988
    for (cpu = first_cpu; cpu; cpu = cpu->next_cpu) {
1989
        cpu_synchronize_post_init(cpu);
1990
    }
1991
}
1992

    
1993
struct vm_change_state_entry {
1994
    VMChangeStateHandler *cb;
1995
    void *opaque;
1996
    QLIST_ENTRY (vm_change_state_entry) entries;
1997
};
1998

    
1999
static QLIST_HEAD(vm_change_state_head, vm_change_state_entry) vm_change_state_head;
2000

    
2001
VMChangeStateEntry *qemu_add_vm_change_state_handler(VMChangeStateHandler *cb,
2002
                                                     void *opaque)
2003
{
2004
    VMChangeStateEntry *e;
2005

    
2006
    e = qemu_mallocz(sizeof (*e));
2007

    
2008
    e->cb = cb;
2009
    e->opaque = opaque;
2010
    QLIST_INSERT_HEAD(&vm_change_state_head, e, entries);
2011
    return e;
2012
}
2013

    
2014
void qemu_del_vm_change_state_handler(VMChangeStateEntry *e)
2015
{
2016
    QLIST_REMOVE (e, entries);
2017
    qemu_free (e);
2018
}
2019

    
2020
static void vm_state_notify(int running, int reason)
2021
{
2022
    VMChangeStateEntry *e;
2023

    
2024
    for (e = vm_change_state_head.lh_first; e; e = e->entries.le_next) {
2025
        e->cb(e->opaque, running, reason);
2026
    }
2027
}
2028

    
2029
static void resume_all_vcpus(void);
2030
static void pause_all_vcpus(void);
2031

    
2032
void vm_start(void)
2033
{
2034
    if (!vm_running) {
2035
        cpu_enable_ticks();
2036
        vm_running = 1;
2037
        vm_state_notify(1, 0);
2038
        resume_all_vcpus();
2039
    }
2040
}
2041

    
2042
/* reset/shutdown handler */
2043

    
2044
typedef struct QEMUResetEntry {
2045
    QTAILQ_ENTRY(QEMUResetEntry) entry;
2046
    QEMUResetHandler *func;
2047
    void *opaque;
2048
} QEMUResetEntry;
2049

    
2050
static QTAILQ_HEAD(reset_handlers, QEMUResetEntry) reset_handlers =
2051
    QTAILQ_HEAD_INITIALIZER(reset_handlers);
2052
static int reset_requested;
2053
static int shutdown_requested;
2054
static int powerdown_requested;
2055
static int debug_requested;
2056
static int vmstop_requested;
2057

    
2058
int qemu_shutdown_requested(void)
2059
{
2060
    int r = shutdown_requested;
2061
    shutdown_requested = 0;
2062
    return r;
2063
}
2064

    
2065
int qemu_reset_requested(void)
2066
{
2067
    int r = reset_requested;
2068
    reset_requested = 0;
2069
    return r;
2070
}
2071

    
2072
int qemu_powerdown_requested(void)
2073
{
2074
    int r = powerdown_requested;
2075
    powerdown_requested = 0;
2076
    return r;
2077
}
2078

    
2079
static int qemu_debug_requested(void)
2080
{
2081
    int r = debug_requested;
2082
    debug_requested = 0;
2083
    return r;
2084
}
2085

    
2086
static int qemu_vmstop_requested(void)
2087
{
2088
    int r = vmstop_requested;
2089
    vmstop_requested = 0;
2090
    return r;
2091
}
2092

    
2093
static void do_vm_stop(int reason)
2094
{
2095
    if (vm_running) {
2096
        cpu_disable_ticks();
2097
        vm_running = 0;
2098
        pause_all_vcpus();
2099
        vm_state_notify(0, reason);
2100
        monitor_protocol_event(QEVENT_STOP, NULL);
2101
    }
2102
}
2103

    
2104
void qemu_register_reset(QEMUResetHandler *func, void *opaque)
2105
{
2106
    QEMUResetEntry *re = qemu_mallocz(sizeof(QEMUResetEntry));
2107

    
2108
    re->func = func;
2109
    re->opaque = opaque;
2110
    QTAILQ_INSERT_TAIL(&reset_handlers, re, entry);
2111
}
2112

    
2113
void qemu_unregister_reset(QEMUResetHandler *func, void *opaque)
2114
{
2115
    QEMUResetEntry *re;
2116

    
2117
    QTAILQ_FOREACH(re, &reset_handlers, entry) {
2118
        if (re->func == func && re->opaque == opaque) {
2119
            QTAILQ_REMOVE(&reset_handlers, re, entry);
2120
            qemu_free(re);
2121
            return;
2122
        }
2123
    }
2124
}
2125

    
2126
void qemu_system_reset(void)
2127
{
2128
    QEMUResetEntry *re, *nre;
2129

    
2130
    /* reset all devices */
2131
    QTAILQ_FOREACH_SAFE(re, &reset_handlers, entry, nre) {
2132
        re->func(re->opaque);
2133
    }
2134
    monitor_protocol_event(QEVENT_RESET, NULL);
2135
    cpu_synchronize_all_post_reset();
2136
}
2137

    
2138
void qemu_system_reset_request(void)
2139
{
2140
    if (no_reboot) {
2141
        shutdown_requested = 1;
2142
    } else {
2143
        reset_requested = 1;
2144
    }
2145
    qemu_notify_event();
2146
}
2147

    
2148
void qemu_system_shutdown_request(void)
2149
{
2150
    shutdown_requested = 1;
2151
    qemu_notify_event();
2152
}
2153

    
2154
void qemu_system_powerdown_request(void)
2155
{
2156
    powerdown_requested = 1;
2157
    qemu_notify_event();
2158
}
2159

    
2160
static int cpu_can_run(CPUState *env)
2161
{
2162
    if (env->stop)
2163
        return 0;
2164
    if (env->stopped)
2165
        return 0;
2166
    if (!vm_running)
2167
        return 0;
2168
    return 1;
2169
}
2170

    
2171
static int cpu_has_work(CPUState *env)
2172
{
2173
    if (env->stop)
2174
        return 1;
2175
    if (env->stopped)
2176
        return 0;
2177
    if (!env->halted)
2178
        return 1;
2179
    if (qemu_cpu_has_work(env))
2180
        return 1;
2181
    return 0;
2182
}
2183

    
2184
static int tcg_has_work(void)
2185
{
2186
    CPUState *env;
2187

    
2188
    for (env = first_cpu; env != NULL; env = env->next_cpu)
2189
        if (cpu_has_work(env))
2190
            return 1;
2191
    return 0;
2192
}
2193

    
2194
#ifndef _WIN32
2195
static int io_thread_fd = -1;
2196

    
2197
static void qemu_event_increment(void)
2198
{
2199
    /* Write 8 bytes to be compatible with eventfd.  */
2200
    static uint64_t val = 1;
2201
    ssize_t ret;
2202

    
2203
    if (io_thread_fd == -1)
2204
        return;
2205

    
2206
    do {
2207
        ret = write(io_thread_fd, &val, sizeof(val));
2208
    } while (ret < 0 && errno == EINTR);
2209

    
2210
    /* EAGAIN is fine, a read must be pending.  */
2211
    if (ret < 0 && errno != EAGAIN) {
2212
        fprintf(stderr, "qemu_event_increment: write() filed: %s\n",
2213
                strerror(errno));
2214
        exit (1);
2215
    }
2216
}
2217

    
2218
static void qemu_event_read(void *opaque)
2219
{
2220
    int fd = (unsigned long)opaque;
2221
    ssize_t len;
2222
    char buffer[512];
2223

    
2224
    /* Drain the notify pipe.  For eventfd, only 8 bytes will be read.  */
2225
    do {
2226
        len = read(fd, buffer, sizeof(buffer));
2227
    } while ((len == -1 && errno == EINTR) || len == sizeof(buffer));
2228
}
2229

    
2230
static int qemu_event_init(void)
2231
{
2232
    int err;
2233
    int fds[2];
2234

    
2235
    err = qemu_eventfd(fds);
2236
    if (err == -1)
2237
        return -errno;
2238

    
2239
    err = fcntl_setfl(fds[0], O_NONBLOCK);
2240
    if (err < 0)
2241
        goto fail;
2242

    
2243
    err = fcntl_setfl(fds[1], O_NONBLOCK);
2244
    if (err < 0)
2245
        goto fail;
2246

    
2247
    qemu_set_fd_handler2(fds[0], NULL, qemu_event_read, NULL,
2248
                         (void *)(unsigned long)fds[0]);
2249

    
2250
    io_thread_fd = fds[1];
2251
    return 0;
2252

    
2253
fail:
2254
    close(fds[0]);
2255
    close(fds[1]);
2256
    return err;
2257
}
2258
#else
2259
HANDLE qemu_event_handle;
2260

    
2261
static void dummy_event_handler(void *opaque)
2262
{
2263
}
2264

    
2265
static int qemu_event_init(void)
2266
{
2267
    qemu_event_handle = CreateEvent(NULL, FALSE, FALSE, NULL);
2268
    if (!qemu_event_handle) {
2269
        fprintf(stderr, "Failed CreateEvent: %ld\n", GetLastError());
2270
        return -1;
2271
    }
2272
    qemu_add_wait_object(qemu_event_handle, dummy_event_handler, NULL);
2273
    return 0;
2274
}
2275

    
2276
static void qemu_event_increment(void)
2277
{
2278
    if (!SetEvent(qemu_event_handle)) {
2279
        fprintf(stderr, "qemu_event_increment: SetEvent failed: %ld\n",
2280
                GetLastError());
2281
        exit (1);
2282
    }
2283
}
2284
#endif
2285

    
2286
#ifndef CONFIG_IOTHREAD
2287
static int qemu_init_main_loop(void)
2288
{
2289
    return qemu_event_init();
2290
}
2291

    
2292
void qemu_init_vcpu(void *_env)
2293
{
2294
    CPUState *env = _env;
2295

    
2296
    env->nr_cores = smp_cores;
2297
    env->nr_threads = smp_threads;
2298
    if (kvm_enabled())
2299
        kvm_init_vcpu(env);
2300
    return;
2301
}
2302

    
2303
int qemu_cpu_self(void *env)
2304
{
2305
    return 1;
2306
}
2307

    
2308
static void resume_all_vcpus(void)
2309
{
2310
}
2311

    
2312
static void pause_all_vcpus(void)
2313
{
2314
}
2315

    
2316
void qemu_cpu_kick(void *env)
2317
{
2318
    return;
2319
}
2320

    
2321
void qemu_notify_event(void)
2322
{
2323
    CPUState *env = cpu_single_env;
2324

    
2325
    qemu_event_increment ();
2326
    if (env) {
2327
        cpu_exit(env);
2328
    }
2329
    if (next_cpu && env != next_cpu) {
2330
        cpu_exit(next_cpu);
2331
    }
2332
}
2333

    
2334
void qemu_mutex_lock_iothread(void) {}
2335
void qemu_mutex_unlock_iothread(void) {}
2336

    
2337
void vm_stop(int reason)
2338
{
2339
    do_vm_stop(reason);
2340
}
2341

    
2342
#else /* CONFIG_IOTHREAD */
2343

    
2344
#include "qemu-thread.h"
2345

    
2346
QemuMutex qemu_global_mutex;
2347
static QemuMutex qemu_fair_mutex;
2348

    
2349
static QemuThread io_thread;
2350

    
2351
static QemuThread *tcg_cpu_thread;
2352
static QemuCond *tcg_halt_cond;
2353

    
2354
static int qemu_system_ready;
2355
/* cpu creation */
2356
static QemuCond qemu_cpu_cond;
2357
/* system init */
2358
static QemuCond qemu_system_cond;
2359
static QemuCond qemu_pause_cond;
2360

    
2361
static void tcg_block_io_signals(void);
2362
static void kvm_block_io_signals(CPUState *env);
2363
static void unblock_io_signals(void);
2364

    
2365
static int qemu_init_main_loop(void)
2366
{
2367
    int ret;
2368

    
2369
    ret = qemu_event_init();
2370
    if (ret)
2371
        return ret;
2372

    
2373
    qemu_cond_init(&qemu_pause_cond);
2374
    qemu_mutex_init(&qemu_fair_mutex);
2375
    qemu_mutex_init(&qemu_global_mutex);
2376
    qemu_mutex_lock(&qemu_global_mutex);
2377

    
2378
    unblock_io_signals();
2379
    qemu_thread_self(&io_thread);
2380

    
2381
    return 0;
2382
}
2383

    
2384
static void qemu_wait_io_event_common(CPUState *env)
2385
{
2386
    if (env->stop) {
2387
        env->stop = 0;
2388
        env->stopped = 1;
2389
        qemu_cond_signal(&qemu_pause_cond);
2390
    }
2391
}
2392

    
2393
static void qemu_wait_io_event(CPUState *env)
2394
{
2395
    while (!tcg_has_work())
2396
        qemu_cond_timedwait(env->halt_cond, &qemu_global_mutex, 1000);
2397

    
2398
    qemu_mutex_unlock(&qemu_global_mutex);
2399

    
2400
    /*
2401
     * Users of qemu_global_mutex can be starved, having no chance
2402
     * to acquire it since this path will get to it first.
2403
     * So use another lock to provide fairness.
2404
     */
2405
    qemu_mutex_lock(&qemu_fair_mutex);
2406
    qemu_mutex_unlock(&qemu_fair_mutex);
2407

    
2408
    qemu_mutex_lock(&qemu_global_mutex);
2409
    qemu_wait_io_event_common(env);
2410
}
2411

    
2412
static void qemu_kvm_eat_signal(CPUState *env, int timeout)
2413
{
2414
    struct timespec ts;
2415
    int r, e;
2416
    siginfo_t siginfo;
2417
    sigset_t waitset;
2418

    
2419
    ts.tv_sec = timeout / 1000;
2420
    ts.tv_nsec = (timeout % 1000) * 1000000;
2421

    
2422
    sigemptyset(&waitset);
2423
    sigaddset(&waitset, SIG_IPI);
2424

    
2425
    qemu_mutex_unlock(&qemu_global_mutex);
2426
    r = sigtimedwait(&waitset, &siginfo, &ts);
2427
    e = errno;
2428
    qemu_mutex_lock(&qemu_global_mutex);
2429

    
2430
    if (r == -1 && !(e == EAGAIN || e == EINTR)) {
2431
        fprintf(stderr, "sigtimedwait: %s\n", strerror(e));
2432
        exit(1);
2433
    }
2434
}
2435

    
2436
static void qemu_kvm_wait_io_event(CPUState *env)
2437
{
2438
    while (!cpu_has_work(env))
2439
        qemu_cond_timedwait(env->halt_cond, &qemu_global_mutex, 1000);
2440

    
2441
    qemu_kvm_eat_signal(env, 0);
2442
    qemu_wait_io_event_common(env);
2443
}
2444

    
2445
static int qemu_cpu_exec(CPUState *env);
2446

    
2447
static void *kvm_cpu_thread_fn(void *arg)
2448
{
2449
    CPUState *env = arg;
2450

    
2451
    qemu_thread_self(env->thread);
2452
    if (kvm_enabled())
2453
        kvm_init_vcpu(env);
2454

    
2455
    kvm_block_io_signals(env);
2456

    
2457
    /* signal CPU creation */
2458
    qemu_mutex_lock(&qemu_global_mutex);
2459
    env->created = 1;
2460
    qemu_cond_signal(&qemu_cpu_cond);
2461

    
2462
    /* and wait for machine initialization */
2463
    while (!qemu_system_ready)
2464
        qemu_cond_timedwait(&qemu_system_cond, &qemu_global_mutex, 100);
2465

    
2466
    while (1) {
2467
        if (cpu_can_run(env))
2468
            qemu_cpu_exec(env);
2469
        qemu_kvm_wait_io_event(env);
2470
    }
2471

    
2472
    return NULL;
2473
}
2474

    
2475
static bool tcg_cpu_exec(void);
2476

    
2477
static void *tcg_cpu_thread_fn(void *arg)
2478
{
2479
    CPUState *env = arg;
2480

    
2481
    tcg_block_io_signals();
2482
    qemu_thread_self(env->thread);
2483

    
2484
    /* signal CPU creation */
2485
    qemu_mutex_lock(&qemu_global_mutex);
2486
    for (env = first_cpu; env != NULL; env = env->next_cpu)
2487
        env->created = 1;
2488
    qemu_cond_signal(&qemu_cpu_cond);
2489

    
2490
    /* and wait for machine initialization */
2491
    while (!qemu_system_ready)
2492
        qemu_cond_timedwait(&qemu_system_cond, &qemu_global_mutex, 100);
2493

    
2494
    while (1) {
2495
        tcg_cpu_exec();
2496
        qemu_wait_io_event(cur_cpu);
2497
    }
2498

    
2499
    return NULL;
2500
}
2501

    
2502
void qemu_cpu_kick(void *_env)
2503
{
2504
    CPUState *env = _env;
2505
    qemu_cond_broadcast(env->halt_cond);
2506
    if (kvm_enabled())
2507
        qemu_thread_signal(env->thread, SIG_IPI);
2508
}
2509

    
2510
int qemu_cpu_self(void *_env)
2511
{
2512
    CPUState *env = _env;
2513
    QemuThread this;
2514
 
2515
    qemu_thread_self(&this);
2516
 
2517
    return qemu_thread_equal(&this, env->thread);
2518
}
2519

    
2520
static void cpu_signal(int sig)
2521
{
2522
    if (cpu_single_env)
2523
        cpu_exit(cpu_single_env);
2524
}
2525

    
2526
static void tcg_block_io_signals(void)
2527
{
2528
    sigset_t set;
2529
    struct sigaction sigact;
2530

    
2531
    sigemptyset(&set);
2532
    sigaddset(&set, SIGUSR2);
2533
    sigaddset(&set, SIGIO);
2534
    sigaddset(&set, SIGALRM);
2535
    sigaddset(&set, SIGCHLD);
2536
    pthread_sigmask(SIG_BLOCK, &set, NULL);
2537

    
2538
    sigemptyset(&set);
2539
    sigaddset(&set, SIG_IPI);
2540
    pthread_sigmask(SIG_UNBLOCK, &set, NULL);
2541

    
2542
    memset(&sigact, 0, sizeof(sigact));
2543
    sigact.sa_handler = cpu_signal;
2544
    sigaction(SIG_IPI, &sigact, NULL);
2545
}
2546

    
2547
static void dummy_signal(int sig)
2548
{
2549
}
2550

    
2551
static void kvm_block_io_signals(CPUState *env)
2552
{
2553
    int r;
2554
    sigset_t set;
2555
    struct sigaction sigact;
2556

    
2557
    sigemptyset(&set);
2558
    sigaddset(&set, SIGUSR2);
2559
    sigaddset(&set, SIGIO);
2560
    sigaddset(&set, SIGALRM);
2561
    sigaddset(&set, SIGCHLD);
2562
    sigaddset(&set, SIG_IPI);
2563
    pthread_sigmask(SIG_BLOCK, &set, NULL);
2564

    
2565
    pthread_sigmask(SIG_BLOCK, NULL, &set);
2566
    sigdelset(&set, SIG_IPI);
2567

    
2568
    memset(&sigact, 0, sizeof(sigact));
2569
    sigact.sa_handler = dummy_signal;
2570
    sigaction(SIG_IPI, &sigact, NULL);
2571

    
2572
    r = kvm_set_signal_mask(env, &set);
2573
    if (r) {
2574
        fprintf(stderr, "kvm_set_signal_mask: %s\n", strerror(r));
2575
        exit(1);
2576
    }
2577
}
2578

    
2579
static void unblock_io_signals(void)
2580
{
2581
    sigset_t set;
2582

    
2583
    sigemptyset(&set);
2584
    sigaddset(&set, SIGUSR2);
2585
    sigaddset(&set, SIGIO);
2586
    sigaddset(&set, SIGALRM);
2587
    pthread_sigmask(SIG_UNBLOCK, &set, NULL);
2588

    
2589
    sigemptyset(&set);
2590
    sigaddset(&set, SIG_IPI);
2591
    pthread_sigmask(SIG_BLOCK, &set, NULL);
2592
}
2593

    
2594
static void qemu_signal_lock(unsigned int msecs)
2595
{
2596
    qemu_mutex_lock(&qemu_fair_mutex);
2597

    
2598
    while (qemu_mutex_trylock(&qemu_global_mutex)) {
2599
        qemu_thread_signal(tcg_cpu_thread, SIG_IPI);
2600
        if (!qemu_mutex_timedlock(&qemu_global_mutex, msecs))
2601
            break;
2602
    }
2603
    qemu_mutex_unlock(&qemu_fair_mutex);
2604
}
2605

    
2606
void qemu_mutex_lock_iothread(void)
2607
{
2608
    if (kvm_enabled()) {
2609
        qemu_mutex_lock(&qemu_fair_mutex);
2610
        qemu_mutex_lock(&qemu_global_mutex);
2611
        qemu_mutex_unlock(&qemu_fair_mutex);
2612
    } else
2613
        qemu_signal_lock(100);
2614
}
2615

    
2616
void qemu_mutex_unlock_iothread(void)
2617
{
2618
    qemu_mutex_unlock(&qemu_global_mutex);
2619
}
2620

    
2621
static int all_vcpus_paused(void)
2622
{
2623
    CPUState *penv = first_cpu;
2624

    
2625
    while (penv) {
2626
        if (!penv->stopped)
2627
            return 0;
2628
        penv = (CPUState *)penv->next_cpu;
2629
    }
2630

    
2631
    return 1;
2632
}
2633

    
2634
static void pause_all_vcpus(void)
2635
{
2636
    CPUState *penv = first_cpu;
2637

    
2638
    while (penv) {
2639
        penv->stop = 1;
2640
        qemu_thread_signal(penv->thread, SIG_IPI);
2641
        qemu_cpu_kick(penv);
2642
        penv = (CPUState *)penv->next_cpu;
2643
    }
2644

    
2645
    while (!all_vcpus_paused()) {
2646
        qemu_cond_timedwait(&qemu_pause_cond, &qemu_global_mutex, 100);
2647
        penv = first_cpu;
2648
        while (penv) {
2649
            qemu_thread_signal(penv->thread, SIG_IPI);
2650
            penv = (CPUState *)penv->next_cpu;
2651
        }
2652
    }
2653
}
2654

    
2655
static void resume_all_vcpus(void)
2656
{
2657
    CPUState *penv = first_cpu;
2658

    
2659
    while (penv) {
2660
        penv->stop = 0;
2661
        penv->stopped = 0;
2662
        qemu_thread_signal(penv->thread, SIG_IPI);
2663
        qemu_cpu_kick(penv);
2664
        penv = (CPUState *)penv->next_cpu;
2665
    }
2666
}
2667

    
2668
static void tcg_init_vcpu(void *_env)
2669
{
2670
    CPUState *env = _env;
2671
    /* share a single thread for all cpus with TCG */
2672
    if (!tcg_cpu_thread) {
2673
        env->thread = qemu_mallocz(sizeof(QemuThread));
2674
        env->halt_cond = qemu_mallocz(sizeof(QemuCond));
2675
        qemu_cond_init(env->halt_cond);
2676
        qemu_thread_create(env->thread, tcg_cpu_thread_fn, env);
2677
        while (env->created == 0)
2678
            qemu_cond_timedwait(&qemu_cpu_cond, &qemu_global_mutex, 100);
2679
        tcg_cpu_thread = env->thread;
2680
        tcg_halt_cond = env->halt_cond;
2681
    } else {
2682
        env->thread = tcg_cpu_thread;
2683
        env->halt_cond = tcg_halt_cond;
2684
    }
2685
}
2686

    
2687
static void kvm_start_vcpu(CPUState *env)
2688
{
2689
    env->thread = qemu_mallocz(sizeof(QemuThread));
2690
    env->halt_cond = qemu_mallocz(sizeof(QemuCond));
2691
    qemu_cond_init(env->halt_cond);
2692
    qemu_thread_create(env->thread, kvm_cpu_thread_fn, env);
2693
    while (env->created == 0)
2694
        qemu_cond_timedwait(&qemu_cpu_cond, &qemu_global_mutex, 100);
2695
}
2696

    
2697
void qemu_init_vcpu(void *_env)
2698
{
2699
    CPUState *env = _env;
2700

    
2701
    env->nr_cores = smp_cores;
2702
    env->nr_threads = smp_threads;
2703
    if (kvm_enabled())
2704
        kvm_start_vcpu(env);
2705
    else
2706
        tcg_init_vcpu(env);
2707
}
2708

    
2709
void qemu_notify_event(void)
2710
{
2711
    qemu_event_increment();
2712
}
2713

    
2714
static void qemu_system_vmstop_request(int reason)
2715
{
2716
    vmstop_requested = reason;
2717
    qemu_notify_event();
2718
}
2719

    
2720
void vm_stop(int reason)
2721
{
2722
    QemuThread me;
2723
    qemu_thread_self(&me);
2724

    
2725
    if (!qemu_thread_equal(&me, &io_thread)) {
2726
        qemu_system_vmstop_request(reason);
2727
        /*
2728
         * FIXME: should not return to device code in case
2729
         * vm_stop() has been requested.
2730
         */
2731
        if (cpu_single_env) {
2732
            cpu_exit(cpu_single_env);
2733
            cpu_single_env->stop = 1;
2734
        }
2735
        return;
2736
    }
2737
    do_vm_stop(reason);
2738
}
2739

    
2740
#endif
2741

    
2742

    
2743
#ifdef _WIN32
2744
static void host_main_loop_wait(int *timeout)
2745
{
2746
    int ret, ret2, i;
2747
    PollingEntry *pe;
2748

    
2749

    
2750
    /* XXX: need to suppress polling by better using win32 events */
2751
    ret = 0;
2752
    for(pe = first_polling_entry; pe != NULL; pe = pe->next) {
2753
        ret |= pe->func(pe->opaque);
2754
    }
2755
    if (ret == 0) {
2756
        int err;
2757
        WaitObjects *w = &wait_objects;
2758

    
2759
        ret = WaitForMultipleObjects(w->num, w->events, FALSE, *timeout);
2760
        if (WAIT_OBJECT_0 + 0 <= ret && ret <= WAIT_OBJECT_0 + w->num - 1) {
2761
            if (w->func[ret - WAIT_OBJECT_0])
2762
                w->func[ret - WAIT_OBJECT_0](w->opaque[ret - WAIT_OBJECT_0]);
2763

    
2764
            /* Check for additional signaled events */
2765
            for(i = (ret - WAIT_OBJECT_0 + 1); i < w->num; i++) {
2766

    
2767
                /* Check if event is signaled */
2768
                ret2 = WaitForSingleObject(w->events[i], 0);
2769
                if(ret2 == WAIT_OBJECT_0) {
2770
                    if (w->func[i])
2771
                        w->func[i](w->opaque[i]);
2772
                } else if (ret2 == WAIT_TIMEOUT) {
2773
                } else {
2774
                    err = GetLastError();
2775
                    fprintf(stderr, "WaitForSingleObject error %d %d\n", i, err);
2776
                }
2777
            }
2778
        } else if (ret == WAIT_TIMEOUT) {
2779
        } else {
2780
            err = GetLastError();
2781
            fprintf(stderr, "WaitForMultipleObjects error %d %d\n", ret, err);
2782
        }
2783
    }
2784

    
2785
    *timeout = 0;
2786
}
2787
#else
2788
static void host_main_loop_wait(int *timeout)
2789
{
2790
}
2791
#endif
2792

    
2793
void main_loop_wait(int nonblocking)
2794
{
2795
    IOHandlerRecord *ioh;
2796
    fd_set rfds, wfds, xfds;
2797
    int ret, nfds;
2798
    struct timeval tv;
2799
    int timeout;
2800

    
2801
    if (nonblocking)
2802
        timeout = 0;
2803
    else {
2804
        timeout = qemu_calculate_timeout();
2805
        qemu_bh_update_timeout(&timeout);
2806
    }
2807

    
2808
    host_main_loop_wait(&timeout);
2809

    
2810
    /* poll any events */
2811
    /* XXX: separate device handlers from system ones */
2812
    nfds = -1;
2813
    FD_ZERO(&rfds);
2814
    FD_ZERO(&wfds);
2815
    FD_ZERO(&xfds);
2816
    QLIST_FOREACH(ioh, &io_handlers, next) {
2817
        if (ioh->deleted)
2818
            continue;
2819
        if (ioh->fd_read &&
2820
            (!ioh->fd_read_poll ||
2821
             ioh->fd_read_poll(ioh->opaque) != 0)) {
2822
            FD_SET(ioh->fd, &rfds);
2823
            if (ioh->fd > nfds)
2824
                nfds = ioh->fd;
2825
        }
2826
        if (ioh->fd_write) {
2827
            FD_SET(ioh->fd, &wfds);
2828
            if (ioh->fd > nfds)
2829
                nfds = ioh->fd;
2830
        }
2831
    }
2832

    
2833
    tv.tv_sec = timeout / 1000;
2834
    tv.tv_usec = (timeout % 1000) * 1000;
2835

    
2836
    slirp_select_fill(&nfds, &rfds, &wfds, &xfds);
2837

    
2838
    qemu_mutex_unlock_iothread();
2839
    ret = select(nfds + 1, &rfds, &wfds, &xfds, &tv);
2840
    qemu_mutex_lock_iothread();
2841
    if (ret > 0) {
2842
        IOHandlerRecord *pioh;
2843

    
2844
        QLIST_FOREACH_SAFE(ioh, &io_handlers, next, pioh) {
2845
            if (ioh->deleted) {
2846
                QLIST_REMOVE(ioh, next);
2847
                qemu_free(ioh);
2848
                continue;
2849
            }
2850
            if (ioh->fd_read && FD_ISSET(ioh->fd, &rfds)) {
2851
                ioh->fd_read(ioh->opaque);
2852
            }
2853
            if (ioh->fd_write && FD_ISSET(ioh->fd, &wfds)) {
2854
                ioh->fd_write(ioh->opaque);
2855
            }
2856
        }
2857
    }
2858

    
2859
    slirp_select_poll(&rfds, &wfds, &xfds, (ret < 0));
2860

    
2861
    qemu_run_all_timers();
2862

    
2863
    /* Check bottom-halves last in case any of the earlier events triggered
2864
       them.  */
2865
    qemu_bh_poll();
2866

    
2867
}
2868

    
2869
static int qemu_cpu_exec(CPUState *env)
2870
{
2871
    int ret;
2872
#ifdef CONFIG_PROFILER
2873
    int64_t ti;
2874
#endif
2875

    
2876
#ifdef CONFIG_PROFILER
2877
    ti = profile_getclock();
2878
#endif
2879
    if (use_icount) {
2880
        int64_t count;
2881
        int decr;
2882
        qemu_icount -= (env->icount_decr.u16.low + env->icount_extra);
2883
        env->icount_decr.u16.low = 0;
2884
        env->icount_extra = 0;
2885
        count = qemu_icount_round (qemu_next_deadline());
2886
        qemu_icount += count;
2887
        decr = (count > 0xffff) ? 0xffff : count;
2888
        count -= decr;
2889
        env->icount_decr.u16.low = decr;
2890
        env->icount_extra = count;
2891
    }
2892
    ret = cpu_exec(env);
2893
#ifdef CONFIG_PROFILER
2894
    qemu_time += profile_getclock() - ti;
2895
#endif
2896
    if (use_icount) {
2897
        /* Fold pending instructions back into the
2898
           instruction counter, and clear the interrupt flag.  */
2899
        qemu_icount -= (env->icount_decr.u16.low
2900
                        + env->icount_extra);
2901
        env->icount_decr.u32 = 0;
2902
        env->icount_extra = 0;
2903
    }
2904
    return ret;
2905
}
2906

    
2907
static bool tcg_cpu_exec(void)
2908
{
2909
    int ret = 0;
2910

    
2911
    if (next_cpu == NULL)
2912
        next_cpu = first_cpu;
2913
    for (; next_cpu != NULL; next_cpu = next_cpu->next_cpu) {
2914
        CPUState *env = cur_cpu = next_cpu;
2915

    
2916
        qemu_clock_enable(vm_clock,
2917
                          (cur_cpu->singlestep_enabled & SSTEP_NOTIMER) == 0);
2918

    
2919
        if (qemu_alarm_pending())
2920
            break;
2921
        if (cpu_can_run(env))
2922
            ret = qemu_cpu_exec(env);
2923
        else if (env->stop)
2924
            break;
2925

    
2926
        if (ret == EXCP_DEBUG) {
2927
            gdb_set_stop_cpu(env);
2928
            debug_requested = 1;
2929
            break;
2930
        }
2931
    }
2932
    return tcg_has_work();
2933
}
2934

    
2935
static int vm_can_run(void)
2936
{
2937
    if (powerdown_requested)
2938
        return 0;
2939
    if (reset_requested)
2940
        return 0;
2941
    if (shutdown_requested)
2942
        return 0;
2943
    if (debug_requested)
2944
        return 0;
2945
    return 1;
2946
}
2947

    
2948
qemu_irq qemu_system_powerdown;
2949

    
2950
static void main_loop(void)
2951
{
2952
    int r;
2953

    
2954
#ifdef CONFIG_IOTHREAD
2955
    qemu_system_ready = 1;
2956
    qemu_cond_broadcast(&qemu_system_cond);
2957
#endif
2958

    
2959
    for (;;) {
2960
        do {
2961
            bool nonblocking = false;
2962
#ifdef CONFIG_PROFILER
2963
            int64_t ti;
2964
#endif
2965
#ifndef CONFIG_IOTHREAD
2966
            nonblocking = tcg_cpu_exec();
2967
#endif
2968
#ifdef CONFIG_PROFILER
2969
            ti = profile_getclock();
2970
#endif
2971
            main_loop_wait(nonblocking);
2972
#ifdef CONFIG_PROFILER
2973
            dev_time += profile_getclock() - ti;
2974
#endif
2975
        } while (vm_can_run());
2976

    
2977
        if (qemu_debug_requested()) {
2978
            vm_stop(EXCP_DEBUG);
2979
        }
2980
        if (qemu_shutdown_requested()) {
2981
            monitor_protocol_event(QEVENT_SHUTDOWN, NULL);
2982
            if (no_shutdown) {
2983
                vm_stop(0);
2984
                no_shutdown = 0;
2985
            } else
2986
                break;
2987
        }
2988
        if (qemu_reset_requested()) {
2989
            pause_all_vcpus();
2990
            qemu_system_reset();
2991
            resume_all_vcpus();
2992
        }
2993
        if (qemu_powerdown_requested()) {
2994
            monitor_protocol_event(QEVENT_POWERDOWN, NULL);
2995
            qemu_irq_raise(qemu_system_powerdown);
2996
        }
2997
        if ((r = qemu_vmstop_requested())) {
2998
            vm_stop(r);
2999
        }
3000
    }
3001
    pause_all_vcpus();
3002
}
3003

    
3004
static void version(void)
3005
{
3006
    printf("QEMU PC emulator version " QEMU_VERSION QEMU_PKGVERSION ", Copyright (c) 2003-2008 Fabrice Bellard\n");
3007
}
3008

    
3009
static void help(int exitcode)
3010
{
3011
    const char *options_help =
3012
#define DEF(option, opt_arg, opt_enum, opt_help)        \
3013
           opt_help
3014
#define DEFHEADING(text) stringify(text) "\n"
3015
#include "qemu-options.h"
3016
#undef DEF
3017
#undef DEFHEADING
3018
#undef GEN_DOCS
3019
        ;
3020
    version();
3021
    printf("usage: %s [options] [disk_image]\n"
3022
           "\n"
3023
           "'disk_image' is a raw hard image image for IDE hard disk 0\n"
3024
           "\n"
3025
           "%s\n"
3026
           "During emulation, the following keys are useful:\n"
3027
           "ctrl-alt-f      toggle full screen\n"
3028
           "ctrl-alt-n      switch to virtual console 'n'\n"
3029
           "ctrl-alt        toggle mouse and keyboard grab\n"
3030
           "\n"
3031
           "When using -nographic, press 'ctrl-a h' to get some help.\n",
3032
           "qemu",
3033
           options_help);
3034
    exit(exitcode);
3035
}
3036

    
3037
#define HAS_ARG 0x0001
3038

    
3039
enum {
3040
#define DEF(option, opt_arg, opt_enum, opt_help)        \
3041
    opt_enum,
3042
#define DEFHEADING(text)
3043
#include "qemu-options.h"
3044
#undef DEF
3045
#undef DEFHEADING
3046
#undef GEN_DOCS
3047
};
3048

    
3049
typedef struct QEMUOption {
3050
    const char *name;
3051
    int flags;
3052
    int index;
3053
} QEMUOption;
3054

    
3055
static const QEMUOption qemu_options[] = {
3056
    { "h", 0, QEMU_OPTION_h },
3057
#define DEF(option, opt_arg, opt_enum, opt_help)        \
3058
    { option, opt_arg, opt_enum },
3059
#define DEFHEADING(text)
3060
#include "qemu-options.h"
3061
#undef DEF
3062
#undef DEFHEADING
3063
#undef GEN_DOCS
3064
    { NULL },
3065
};
3066

    
3067
#ifdef HAS_AUDIO
3068
struct soundhw soundhw[] = {
3069
#ifdef HAS_AUDIO_CHOICE
3070
#if defined(TARGET_I386) || defined(TARGET_MIPS)
3071
    {
3072
        "pcspk",
3073
        "PC speaker",
3074
        0,
3075
        1,
3076
        { .init_isa = pcspk_audio_init }
3077
    },
3078
#endif
3079

    
3080
#ifdef CONFIG_SB16
3081
    {
3082
        "sb16",
3083
        "Creative Sound Blaster 16",
3084
        0,
3085
        1,
3086
        { .init_isa = SB16_init }
3087
    },
3088
#endif
3089

    
3090
#ifdef CONFIG_CS4231A
3091
    {
3092
        "cs4231a",
3093
        "CS4231A",
3094
        0,
3095
        1,
3096
        { .init_isa = cs4231a_init }
3097
    },
3098
#endif
3099

    
3100
#ifdef CONFIG_ADLIB
3101
    {
3102
        "adlib",
3103
#ifdef HAS_YMF262
3104
        "Yamaha YMF262 (OPL3)",
3105
#else
3106
        "Yamaha YM3812 (OPL2)",
3107
#endif
3108
        0,
3109
        1,
3110
        { .init_isa = Adlib_init }
3111
    },
3112
#endif
3113

    
3114
#ifdef CONFIG_GUS
3115
    {
3116
        "gus",
3117
        "Gravis Ultrasound GF1",
3118
        0,
3119
        1,
3120
        { .init_isa = GUS_init }
3121
    },
3122
#endif
3123

    
3124
#ifdef CONFIG_AC97
3125
    {
3126
        "ac97",
3127
        "Intel 82801AA AC97 Audio",
3128
        0,
3129
        0,
3130
        { .init_pci = ac97_init }
3131
    },
3132
#endif
3133

    
3134
#ifdef CONFIG_ES1370
3135
    {
3136
        "es1370",
3137
        "ENSONIQ AudioPCI ES1370",
3138
        0,
3139
        0,
3140
        { .init_pci = es1370_init }
3141
    },
3142
#endif
3143

    
3144
#endif /* HAS_AUDIO_CHOICE */
3145

    
3146
    { NULL, NULL, 0, 0, { NULL } }
3147
};
3148

    
3149
static void select_soundhw (const char *optarg)
3150
{
3151
    struct soundhw *c;
3152

    
3153
    if (*optarg == '?') {
3154
    show_valid_cards:
3155

    
3156
        printf ("Valid sound card names (comma separated):\n");
3157
        for (c = soundhw; c->name; ++c) {
3158
            printf ("%-11s %s\n", c->name, c->descr);
3159
        }
3160
        printf ("\n-soundhw all will enable all of the above\n");
3161
        exit (*optarg != '?');
3162
    }
3163
    else {
3164
        size_t l;
3165
        const char *p;
3166
        char *e;
3167
        int bad_card = 0;
3168

    
3169
        if (!strcmp (optarg, "all")) {
3170
            for (c = soundhw; c->name; ++c) {
3171
                c->enabled = 1;
3172
            }
3173
            return;
3174
        }
3175

    
3176
        p = optarg;
3177
        while (*p) {
3178
            e = strchr (p, ',');
3179
            l = !e ? strlen (p) : (size_t) (e - p);
3180

    
3181
            for (c = soundhw; c->name; ++c) {
3182
                if (!strncmp (c->name, p, l) && !c->name[l]) {
3183
                    c->enabled = 1;
3184
                    break;
3185
                }
3186
            }
3187

    
3188
            if (!c->name) {
3189
                if (l > 80) {
3190
                    fprintf (stderr,
3191
                             "Unknown sound card name (too big to show)\n");
3192
                }
3193
                else {
3194
                    fprintf (stderr, "Unknown sound card name `%.*s'\n",
3195
                             (int) l, p);
3196
                }
3197
                bad_card = 1;
3198
            }
3199
            p += l + (e != NULL);
3200
        }
3201

    
3202
        if (bad_card)
3203
            goto show_valid_cards;
3204
    }
3205
}
3206
#endif
3207

    
3208
static void select_vgahw (const char *p)
3209
{
3210
    const char *opts;
3211

    
3212
    default_vga = 0;
3213
    vga_interface_type = VGA_NONE;
3214
    if (strstart(p, "std", &opts)) {
3215
        vga_interface_type = VGA_STD;
3216
    } else if (strstart(p, "cirrus", &opts)) {
3217
        vga_interface_type = VGA_CIRRUS;
3218
    } else if (strstart(p, "vmware", &opts)) {
3219
        vga_interface_type = VGA_VMWARE;
3220
    } else if (strstart(p, "xenfb", &opts)) {
3221
        vga_interface_type = VGA_XENFB;
3222
    } else if (!strstart(p, "none", &opts)) {
3223
    invalid_vga:
3224
        fprintf(stderr, "Unknown vga type: %s\n", p);
3225
        exit(1);
3226
    }
3227
    while (*opts) {
3228
        const char *nextopt;
3229

    
3230
        if (strstart(opts, ",retrace=", &nextopt)) {
3231
            opts = nextopt;
3232
            if (strstart(opts, "dumb", &nextopt))
3233
                vga_retrace_method = VGA_RETRACE_DUMB;
3234
            else if (strstart(opts, "precise", &nextopt))
3235
                vga_retrace_method = VGA_RETRACE_PRECISE;
3236
            else goto invalid_vga;
3237
        } else goto invalid_vga;
3238
        opts = nextopt;
3239
    }
3240
}
3241

    
3242
#ifdef TARGET_I386
3243
static int balloon_parse(const char *arg)
3244
{
3245
    QemuOpts *opts;
3246

    
3247
    if (strcmp(arg, "none") == 0) {
3248
        return 0;
3249
    }
3250

    
3251
    if (!strncmp(arg, "virtio", 6)) {
3252
        if (arg[6] == ',') {
3253
            /* have params -> parse them */
3254
            opts = qemu_opts_parse(&qemu_device_opts, arg+7, 0);
3255
            if (!opts)
3256
                return  -1;
3257
        } else {
3258
            /* create empty opts */
3259
            opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
3260
        }
3261
        qemu_opt_set(opts, "driver", "virtio-balloon-pci");
3262
        return 0;
3263
    }
3264

    
3265
    return -1;
3266
}
3267
#endif
3268

    
3269
#ifdef _WIN32
3270
static BOOL WINAPI qemu_ctrl_handler(DWORD type)
3271
{
3272
    exit(STATUS_CONTROL_C_EXIT);
3273
    return TRUE;
3274
}
3275
#endif
3276

    
3277
int qemu_uuid_parse(const char *str, uint8_t *uuid)
3278
{
3279
    int ret;
3280

    
3281
    if(strlen(str) != 36)
3282
        return -1;
3283

    
3284
    ret = sscanf(str, UUID_FMT, &uuid[0], &uuid[1], &uuid[2], &uuid[3],
3285
            &uuid[4], &uuid[5], &uuid[6], &uuid[7], &uuid[8], &uuid[9],
3286
            &uuid[10], &uuid[11], &uuid[12], &uuid[13], &uuid[14], &uuid[15]);
3287

    
3288
    if(ret != 16)
3289
        return -1;
3290

    
3291
#ifdef TARGET_I386
3292
    smbios_add_field(1, offsetof(struct smbios_type_1, uuid), 16, uuid);
3293
#endif
3294

    
3295
    return 0;
3296
}
3297

    
3298
#ifndef _WIN32
3299

    
3300
static void termsig_handler(int signal)
3301
{
3302
    qemu_system_shutdown_request();
3303
}
3304

    
3305
static void sigchld_handler(int signal)
3306
{
3307
    waitpid(-1, NULL, WNOHANG);
3308
}
3309

    
3310
static void sighandler_setup(void)
3311
{
3312
    struct sigaction act;
3313

    
3314
    memset(&act, 0, sizeof(act));
3315
    act.sa_handler = termsig_handler;
3316
    sigaction(SIGINT,  &act, NULL);
3317
    sigaction(SIGHUP,  &act, NULL);
3318
    sigaction(SIGTERM, &act, NULL);
3319

    
3320
    act.sa_handler = sigchld_handler;
3321
    act.sa_flags = SA_NOCLDSTOP;
3322
    sigaction(SIGCHLD, &act, NULL);
3323
}
3324

    
3325
#endif
3326

    
3327
#ifdef _WIN32
3328
/* Look for support files in the same directory as the executable.  */
3329
static char *find_datadir(const char *argv0)
3330
{
3331
    char *p;
3332
    char buf[MAX_PATH];
3333
    DWORD len;
3334

    
3335
    len = GetModuleFileName(NULL, buf, sizeof(buf) - 1);
3336
    if (len == 0) {
3337
        return NULL;
3338
    }
3339

    
3340
    buf[len] = 0;
3341
    p = buf + len - 1;
3342
    while (p != buf && *p != '\\')
3343
        p--;
3344
    *p = 0;
3345
    if (access(buf, R_OK) == 0) {
3346
        return qemu_strdup(buf);
3347
    }
3348
    return NULL;
3349
}
3350
#else /* !_WIN32 */
3351

    
3352
/* Find a likely location for support files using the location of the binary.
3353
   For installed binaries this will be "$bindir/../share/qemu".  When
3354
   running from the build tree this will be "$bindir/../pc-bios".  */
3355
#define SHARE_SUFFIX "/share/qemu"
3356
#define BUILD_SUFFIX "/pc-bios"
3357
static char *find_datadir(const char *argv0)
3358
{
3359
    char *dir;
3360
    char *p = NULL;
3361
    char *res;
3362
    char buf[PATH_MAX];
3363
    size_t max_len;
3364

    
3365
#if defined(__linux__)
3366
    {
3367
        int len;
3368
        len = readlink("/proc/self/exe", buf, sizeof(buf) - 1);
3369
        if (len > 0) {
3370
            buf[len] = 0;
3371
            p = buf;
3372
        }
3373
    }
3374
#elif defined(__FreeBSD__)
3375
    {
3376
        int len;
3377
        len = readlink("/proc/curproc/file", buf, sizeof(buf) - 1);
3378
        if (len > 0) {
3379
            buf[len] = 0;
3380
            p = buf;
3381
        }
3382
    }
3383
#endif
3384
    /* If we don't have any way of figuring out the actual executable
3385
       location then try argv[0].  */
3386
    if (!p) {
3387
        p = realpath(argv0, buf);
3388
        if (!p) {
3389
            return NULL;
3390
        }
3391
    }
3392
    dir = dirname(p);
3393
    dir = dirname(dir);
3394

    
3395
    max_len = strlen(dir) +
3396
        MAX(strlen(SHARE_SUFFIX), strlen(BUILD_SUFFIX)) + 1;
3397
    res = qemu_mallocz(max_len);
3398
    snprintf(res, max_len, "%s%s", dir, SHARE_SUFFIX);
3399
    if (access(res, R_OK)) {
3400
        snprintf(res, max_len, "%s%s", dir, BUILD_SUFFIX);
3401
        if (access(res, R_OK)) {
3402
            qemu_free(res);
3403
            res = NULL;
3404
        }
3405
    }
3406

    
3407
    return res;
3408
}
3409
#undef SHARE_SUFFIX
3410
#undef BUILD_SUFFIX
3411
#endif
3412

    
3413
char *qemu_find_file(int type, const char *name)
3414
{
3415
    int len;
3416
    const char *subdir;
3417
    char *buf;
3418

    
3419
    /* If name contains path separators then try it as a straight path.  */
3420
    if ((strchr(name, '/') || strchr(name, '\\'))
3421
        && access(name, R_OK) == 0) {
3422
        return qemu_strdup(name);
3423
    }
3424
    switch (type) {
3425
    case QEMU_FILE_TYPE_BIOS:
3426
        subdir = "";
3427
        break;
3428
    case QEMU_FILE_TYPE_KEYMAP:
3429
        subdir = "keymaps/";
3430
        break;
3431
    default:
3432
        abort();
3433
    }
3434
    len = strlen(data_dir) + strlen(name) + strlen(subdir) + 2;
3435
    buf = qemu_mallocz(len);
3436
    snprintf(buf, len, "%s/%s%s", data_dir, subdir, name);
3437
    if (access(buf, R_OK)) {
3438
        qemu_free(buf);
3439
        return NULL;
3440
    }
3441
    return buf;
3442
}
3443

    
3444
static int device_help_func(QemuOpts *opts, void *opaque)
3445
{
3446
    return qdev_device_help(opts);
3447
}
3448

    
3449
static int device_init_func(QemuOpts *opts, void *opaque)
3450
{
3451
    DeviceState *dev;
3452

    
3453
    dev = qdev_device_add(opts);
3454
    if (!dev)
3455
        return -1;
3456
    return 0;
3457
}
3458

    
3459
static int chardev_init_func(QemuOpts *opts, void *opaque)
3460
{
3461
    CharDriverState *chr;
3462

    
3463
    chr = qemu_chr_open_opts(opts, NULL);
3464
    if (!chr)
3465
        return -1;
3466
    return 0;
3467
}
3468

    
3469
static int mon_init_func(QemuOpts *opts, void *opaque)
3470
{
3471
    CharDriverState *chr;
3472
    const char *chardev;
3473
    const char *mode;
3474
    int flags;
3475

    
3476
    mode = qemu_opt_get(opts, "mode");
3477
    if (mode == NULL) {
3478
        mode = "readline";
3479
    }
3480
    if (strcmp(mode, "readline") == 0) {
3481
        flags = MONITOR_USE_READLINE;
3482
    } else if (strcmp(mode, "control") == 0) {
3483
        flags = MONITOR_USE_CONTROL;
3484
    } else {
3485
        fprintf(stderr, "unknown monitor mode \"%s\"\n", mode);
3486
        exit(1);
3487
    }
3488

    
3489
    if (qemu_opt_get_bool(opts, "default", 0))
3490
        flags |= MONITOR_IS_DEFAULT;
3491

    
3492
    chardev = qemu_opt_get(opts, "chardev");
3493
    chr = qemu_chr_find(chardev);
3494
    if (chr == NULL) {
3495
        fprintf(stderr, "chardev \"%s\" not found\n", chardev);
3496
        exit(1);
3497
    }
3498

    
3499
    monitor_init(chr, flags);
3500
    return 0;
3501
}
3502

    
3503
static void monitor_parse(const char *optarg, const char *mode)
3504
{
3505
    static int monitor_device_index = 0;
3506
    QemuOpts *opts;
3507
    const char *p;
3508
    char label[32];
3509
    int def = 0;
3510

    
3511
    if (strstart(optarg, "chardev:", &p)) {
3512
        snprintf(label, sizeof(label), "%s", p);
3513
    } else {
3514
        if (monitor_device_index) {
3515
            snprintf(label, sizeof(label), "monitor%d",
3516
                     monitor_device_index);
3517
        } else {
3518
            snprintf(label, sizeof(label), "monitor");
3519
            def = 1;
3520
        }
3521
        opts = qemu_chr_parse_compat(label, optarg);
3522
        if (!opts) {
3523
            fprintf(stderr, "parse error: %s\n", optarg);
3524
            exit(1);
3525
        }
3526
    }
3527

    
3528
    opts = qemu_opts_create(&qemu_mon_opts, label, 1);
3529
    if (!opts) {
3530
        fprintf(stderr, "duplicate chardev: %s\n", label);
3531
        exit(1);
3532
    }
3533
    qemu_opt_set(opts, "mode", mode);
3534
    qemu_opt_set(opts, "chardev", label);
3535
    if (def)
3536
        qemu_opt_set(opts, "default", "on");
3537
    monitor_device_index++;
3538
}
3539

    
3540
struct device_config {
3541
    enum {
3542
        DEV_USB,       /* -usbdevice     */
3543
        DEV_BT,        /* -bt            */
3544
        DEV_SERIAL,    /* -serial        */
3545
        DEV_PARALLEL,  /* -parallel      */
3546
        DEV_VIRTCON,   /* -virtioconsole */
3547
        DEV_DEBUGCON,  /* -debugcon */
3548
    } type;
3549
    const char *cmdline;
3550
    QTAILQ_ENTRY(device_config) next;
3551
};
3552
QTAILQ_HEAD(, device_config) device_configs = QTAILQ_HEAD_INITIALIZER(device_configs);
3553

    
3554
static void add_device_config(int type, const char *cmdline)
3555
{
3556
    struct device_config *conf;
3557

    
3558
    conf = qemu_mallocz(sizeof(*conf));
3559
    conf->type = type;
3560
    conf->cmdline = cmdline;
3561
    QTAILQ_INSERT_TAIL(&device_configs, conf, next);
3562
}
3563

    
3564
static int foreach_device_config(int type, int (*func)(const char *cmdline))
3565
{
3566
    struct device_config *conf;
3567
    int rc;
3568

    
3569
    QTAILQ_FOREACH(conf, &device_configs, next) {
3570
        if (conf->type != type)
3571
            continue;
3572
        rc = func(conf->cmdline);
3573
        if (0 != rc)
3574
            return rc;
3575
    }
3576
    return 0;
3577
}
3578

    
3579
static int serial_parse(const char *devname)
3580
{
3581
    static int index = 0;
3582
    char label[32];
3583

    
3584
    if (strcmp(devname, "none") == 0)
3585
        return 0;
3586
    if (index == MAX_SERIAL_PORTS) {
3587
        fprintf(stderr, "qemu: too many serial ports\n");
3588
        exit(1);
3589
    }
3590
    snprintf(label, sizeof(label), "serial%d", index);
3591
    serial_hds[index] = qemu_chr_open(label, devname, NULL);
3592
    if (!serial_hds[index]) {
3593
        fprintf(stderr, "qemu: could not open serial device '%s': %s\n",
3594
                devname, strerror(errno));
3595
        return -1;
3596
    }
3597
    index++;
3598
    return 0;
3599
}
3600

    
3601
static int parallel_parse(const char *devname)
3602
{
3603
    static int index = 0;
3604
    char label[32];
3605

    
3606
    if (strcmp(devname, "none") == 0)
3607
        return 0;
3608
    if (index == MAX_PARALLEL_PORTS) {
3609
        fprintf(stderr, "qemu: too many parallel ports\n");
3610
        exit(1);
3611
    }
3612
    snprintf(label, sizeof(label), "parallel%d", index);
3613
    parallel_hds[index] = qemu_chr_open(label, devname, NULL);
3614
    if (!parallel_hds[index]) {
3615
        fprintf(stderr, "qemu: could not open parallel device '%s': %s\n",
3616
                devname, strerror(errno));
3617
        return -1;
3618
    }
3619
    index++;
3620
    return 0;
3621
}
3622

    
3623
static int virtcon_parse(const char *devname)
3624
{
3625
    static int index = 0;
3626
    char label[32];
3627
    QemuOpts *bus_opts, *dev_opts;
3628

    
3629
    if (strcmp(devname, "none") == 0)
3630
        return 0;
3631
    if (index == MAX_VIRTIO_CONSOLES) {
3632
        fprintf(stderr, "qemu: too many virtio consoles\n");
3633
        exit(1);
3634
    }
3635

    
3636
    bus_opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
3637
    qemu_opt_set(bus_opts, "driver", "virtio-serial");
3638

    
3639
    dev_opts = qemu_opts_create(&qemu_device_opts, NULL, 0);
3640
    qemu_opt_set(dev_opts, "driver", "virtconsole");
3641

    
3642
    snprintf(label, sizeof(label), "virtcon%d", index);
3643
    virtcon_hds[index] = qemu_chr_open(label, devname, NULL);
3644
    if (!virtcon_hds[index]) {
3645
        fprintf(stderr, "qemu: could not open virtio console '%s': %s\n",
3646
                devname, strerror(errno));
3647
        return -1;
3648
    }
3649
    qemu_opt_set(dev_opts, "chardev", label);
3650

    
3651
    index++;
3652
    return 0;
3653
}
3654

    
3655
static int debugcon_parse(const char *devname)
3656
{   
3657
    QemuOpts *opts;
3658

    
3659
    if (!qemu_chr_open("debugcon", devname, NULL)) {
3660
        exit(1);
3661
    }
3662
    opts = qemu_opts_create(&qemu_device_opts, "debugcon", 1);
3663
    if (!opts) {
3664
        fprintf(stderr, "qemu: already have a debugcon device\n");
3665
        exit(1);
3666
    }
3667
    qemu_opt_set(opts, "driver", "isa-debugcon");
3668
    qemu_opt_set(opts, "chardev", "debugcon");
3669
    return 0;
3670
}
3671

    
3672
static const QEMUOption *lookup_opt(int argc, char **argv,
3673
                                    const char **poptarg, int *poptind)
3674
{
3675
    const QEMUOption *popt;
3676
    int optind = *poptind;
3677
    char *r = argv[optind];
3678
    const char *optarg;
3679

    
3680
    loc_set_cmdline(argv, optind, 1);
3681
    optind++;
3682
    /* Treat --foo the same as -foo.  */
3683
    if (r[1] == '-')
3684
        r++;
3685
    popt = qemu_options;
3686
    for(;;) {
3687
        if (!popt->name) {
3688
            error_report("invalid option");
3689
            exit(1);
3690
        }
3691
        if (!strcmp(popt->name, r + 1))
3692
            break;
3693
        popt++;
3694
    }
3695
    if (popt->flags & HAS_ARG) {
3696
        if (optind >= argc) {
3697
            error_report("requires an argument");
3698
            exit(1);
3699
        }
3700
        optarg = argv[optind++];
3701
        loc_set_cmdline(argv, optind - 2, 2);
3702
    } else {
3703
        optarg = NULL;
3704
    }
3705

    
3706
    *poptarg = optarg;
3707
    *poptind = optind;
3708

    
3709
    return popt;
3710
}
3711

    
3712
static void qmp_add_default(void)
3713
{
3714
    char buffer[4096];
3715
    const char *home;
3716
    static uint8_t null_uuid[16];
3717
    uint8_t uuid[16];
3718
    int ret;
3719

    
3720
    home = getenv("HOME");
3721
    if (!home) {
3722
        return;
3723
    }
3724

    
3725
    if (memcmp(qemu_uuid, null_uuid, sizeof(null_uuid)) == 0) {
3726
#if defined(CONFIG_UUID)
3727
        uuid_generate(uuid);
3728
#else
3729
        return;
3730
#endif
3731
    } else {
3732
        memcpy(uuid, qemu_uuid, sizeof(qemu_uuid));
3733
    }
3734

    
3735
    snprintf(buffer, sizeof(buffer), "%s/.qemu", home);
3736
#ifdef __MINGW32__
3737
    ret = mkdir(buffer);
3738
#else
3739
    ret = mkdir(buffer, 0755);
3740
#endif
3741
    if (ret == -1 && errno != EEXIST) {
3742
        fprintf(stderr, "could not open default QMP port\n");
3743
        return;
3744
    }
3745

    
3746
    snprintf(buffer, sizeof(buffer), "%s/.qemu/qmp", home);
3747
#ifdef __MINGW32__
3748
    ret = mkdir(buffer);
3749
#else
3750
    ret = mkdir(buffer, 0755);
3751
#endif
3752
    if (ret == -1 && errno != EEXIST) {
3753
        fprintf(stderr, "could not open default QMP port\n");
3754
        return;
3755
    }
3756

    
3757
    snprintf(buffer, sizeof(buffer),
3758
             "unix:%s/.qemu/qmp/" UUID_FMT ".sock,server,nowait",
3759
             home,
3760
             uuid[0], uuid[1], uuid[2], uuid[3],
3761
             uuid[4], uuid[5], uuid[6], uuid[7],
3762
             uuid[8], uuid[9], uuid[10], uuid[11],
3763
             uuid[12], uuid[13], uuid[14], uuid[15]);
3764

    
3765
    monitor_parse(buffer, "control");
3766
}
3767

    
3768
int main(int argc, char **argv, char **envp)
3769
{
3770
    const char *gdbstub_dev = NULL;
3771
    uint32_t boot_devices_bitmap = 0;
3772
    int i;
3773
    int snapshot, linux_boot, net_boot;
3774
    const char *icount_option = NULL;
3775
    const char *initrd_filename;
3776
    const char *kernel_filename, *kernel_cmdline;
3777
    char boot_devices[33] = "cad"; /* default to HD->floppy->CD-ROM */
3778
    DisplayState *ds;
3779
    DisplayChangeListener *dcl;
3780
    int cyls, heads, secs, translation;
3781
    QemuOpts *hda_opts = NULL, *opts;
3782
    int optind;
3783
    const char *optarg;
3784
    const char *loadvm = NULL;
3785
    QEMUMachine *machine;
3786
    const char *cpu_model;
3787
#ifndef _WIN32
3788
    int fds[2];
3789
#endif
3790
    int tb_size;
3791
    const char *pid_file = NULL;
3792
    const char *incoming = NULL;
3793
#ifndef _WIN32
3794
    int fd = 0;
3795
    struct passwd *pwd = NULL;
3796
    const char *chroot_dir = NULL;
3797
    const char *run_as = NULL;
3798
#endif
3799
    CPUState *env;
3800
    int show_vnc_port = 0;
3801
    int defconfig = 1;
3802

    
3803
    error_set_progname(argv[0]);
3804

    
3805
    init_clocks();
3806

    
3807
    qemu_cache_utils_init(envp);
3808

    
3809
    QLIST_INIT (&vm_change_state_head);
3810
#ifndef _WIN32
3811
    {
3812
        struct sigaction act;
3813
        sigfillset(&act.sa_mask);
3814
        act.sa_flags = 0;
3815
        act.sa_handler = SIG_IGN;
3816
        sigaction(SIGPIPE, &act, NULL);
3817
    }
3818
#else
3819
    SetConsoleCtrlHandler(qemu_ctrl_handler, TRUE);
3820
    /* Note: cpu_interrupt() is currently not SMP safe, so we force
3821
       QEMU to run on a single CPU */
3822
    {
3823
        HANDLE h;
3824
        DWORD mask, smask;
3825
        int i;
3826
        h = GetCurrentProcess();
3827
        if (GetProcessAffinityMask(h, &mask, &smask)) {
3828
            for(i = 0; i < 32; i++) {
3829
                if (mask & (1 << i))
3830
                    break;
3831
            }
3832
            if (i != 32) {
3833
                mask = 1 << i;
3834
                SetProcessAffinityMask(h, mask);
3835
            }
3836
        }
3837
    }
3838
#endif
3839

    
3840
    module_call_init(MODULE_INIT_MACHINE);
3841
    machine = find_default_machine();
3842
    cpu_model = NULL;
3843
    initrd_filename = NULL;
3844
    ram_size = 0;
3845
    snapshot = 0;
3846
    kernel_filename = NULL;
3847
    kernel_cmdline = "";
3848
    cyls = heads = secs = 0;
3849
    translation = BIOS_ATA_TRANSLATION_AUTO;
3850

    
3851
    for (i = 0; i < MAX_NODES; i++) {
3852
        node_mem[i] = 0;
3853
        node_cpumask[i] = 0;
3854
    }
3855

    
3856
    nb_numa_nodes = 0;
3857
    nb_nics = 0;
3858

    
3859
    tb_size = 0;
3860
    autostart= 1;
3861

    
3862
    /* first pass of option parsing */
3863
    optind = 1;
3864
    while (optind < argc) {
3865
        if (argv[optind][0] != '-') {
3866
            /* disk image */
3867
            optind++;
3868
            continue;
3869
        } else {
3870
            const QEMUOption *popt;
3871

    
3872
            popt = lookup_opt(argc, argv, &optarg, &optind);
3873
            switch (popt->index) {
3874
            case QEMU_OPTION_nodefconfig:
3875
                defconfig=0;
3876
                break;
3877
            }
3878
        }
3879
    }
3880

    
3881
    if (defconfig) {
3882
        const char *fname;
3883
        FILE *fp;
3884

    
3885
        fname = CONFIG_QEMU_CONFDIR "/qemu.conf";
3886
        fp = fopen(fname, "r");
3887
        if (fp) {
3888
            if (qemu_config_parse(fp, fname) != 0) {
3889
                exit(1);
3890
            }
3891
            fclose(fp);
3892
        }
3893

    
3894
        fname = CONFIG_QEMU_CONFDIR "/target-" TARGET_ARCH ".conf";
3895
        fp = fopen(fname, "r");
3896
        if (fp) {
3897
            if (qemu_config_parse(fp, fname) != 0) {
3898
                exit(1);
3899
            }
3900
            fclose(fp);
3901
        }
3902
    }
3903
#if defined(cpudef_setup)
3904
    cpudef_setup(); /* parse cpu definitions in target config file */
3905
#endif
3906

    
3907
    /* second pass of option parsing */
3908
    optind = 1;
3909
    for(;;) {
3910
        if (optind >= argc)
3911
            break;
3912
        if (argv[optind][0] != '-') {
3913
            hda_opts = drive_add(argv[optind++], HD_ALIAS, 0);
3914
        } else {
3915
            const QEMUOption *popt;
3916

    
3917
            popt = lookup_opt(argc, argv, &optarg, &optind);
3918
            switch(popt->index) {
3919
            case QEMU_OPTION_M:
3920
                machine = find_machine(optarg);
3921
                if (!machine) {
3922
                    QEMUMachine *m;
3923
                    printf("Supported machines are:\n");
3924
                    for(m = first_machine; m != NULL; m = m->next) {
3925
                        if (m->alias)
3926
                            printf("%-10s %s (alias of %s)\n",
3927
                                   m->alias, m->desc, m->name);
3928
                        printf("%-10s %s%s\n",
3929
                               m->name, m->desc,
3930
                               m->is_default ? " (default)" : "");
3931
                    }
3932
                    exit(*optarg != '?');
3933
                }
3934
                break;
3935
            case QEMU_OPTION_cpu:
3936
                /* hw initialization will check this */
3937
                if (*optarg == '?') {
3938
/* XXX: implement xxx_cpu_list for targets that still miss it */
3939
#if defined(cpu_list_id)
3940
                    cpu_list_id(stdout, &fprintf, optarg);
3941
#elif defined(cpu_list)
3942
                    cpu_list(stdout, &fprintf);                /* deprecated */
3943
#endif
3944
                    exit(0);
3945
                } else {
3946
                    cpu_model = optarg;
3947
                }
3948
                break;
3949
            case QEMU_OPTION_initrd:
3950
                initrd_filename = optarg;
3951
                break;
3952
            case QEMU_OPTION_hda:
3953
                if (cyls == 0)
3954
                    hda_opts = drive_add(optarg, HD_ALIAS, 0);
3955
                else
3956
                    hda_opts = drive_add(optarg, HD_ALIAS
3957
                             ",cyls=%d,heads=%d,secs=%d%s",
3958
                             0, cyls, heads, secs,
3959
                             translation == BIOS_ATA_TRANSLATION_LBA ?
3960
                                 ",trans=lba" :
3961
                             translation == BIOS_ATA_TRANSLATION_NONE ?
3962
                                 ",trans=none" : "");
3963
                 break;
3964
            case QEMU_OPTION_hdb:
3965
            case QEMU_OPTION_hdc:
3966
            case QEMU_OPTION_hdd:
3967
                drive_add(optarg, HD_ALIAS, popt->index - QEMU_OPTION_hda);
3968
                break;
3969
            case QEMU_OPTION_drive:
3970
                drive_add(NULL, "%s", optarg);
3971
                break;
3972
            case QEMU_OPTION_set:
3973
                if (qemu_set_option(optarg) != 0)
3974
                    exit(1);
3975
                break;
3976
            case QEMU_OPTION_global:
3977
                if (qemu_global_option(optarg) != 0)
3978
                    exit(1);
3979
                break;
3980
            case QEMU_OPTION_mtdblock:
3981
                drive_add(optarg, MTD_ALIAS);
3982
                break;
3983
            case QEMU_OPTION_sd:
3984
                drive_add(optarg, SD_ALIAS);
3985
                break;
3986
            case QEMU_OPTION_pflash:
3987
                drive_add(optarg, PFLASH_ALIAS);
3988
                break;
3989
            case QEMU_OPTION_snapshot:
3990
                snapshot = 1;
3991
                break;
3992
            case QEMU_OPTION_hdachs:
3993
                {
3994
                    const char *p;
3995
                    p = optarg;
3996
                    cyls = strtol(p, (char **)&p, 0);
3997
                    if (cyls < 1 || cyls > 16383)
3998
                        goto chs_fail;
3999
                    if (*p != ',')
4000
                        goto chs_fail;
4001
                    p++;
4002
                    heads = strtol(p, (char **)&p, 0);
4003
                    if (heads < 1 || heads > 16)
4004
                        goto chs_fail;
4005
                    if (*p != ',')
4006
                        goto chs_fail;
4007
                    p++;
4008
                    secs = strtol(p, (char **)&p, 0);
4009
                    if (secs < 1 || secs > 63)
4010
                        goto chs_fail;
4011
                    if (*p == ',') {
4012
                        p++;
4013
                        if (!strcmp(p, "none"))
4014
                            translation = BIOS_ATA_TRANSLATION_NONE;
4015
                        else if (!strcmp(p, "lba"))
4016
                            translation = BIOS_ATA_TRANSLATION_LBA;
4017
                        else if (!strcmp(p, "auto"))
4018
                            translation = BIOS_ATA_TRANSLATION_AUTO;
4019
                        else
4020
                            goto chs_fail;
4021
                    } else if (*p != '\0') {
4022
                    chs_fail:
4023
                        fprintf(stderr, "qemu: invalid physical CHS format\n");
4024
                        exit(1);
4025
                    }
4026
                    if (hda_opts != NULL) {
4027
                        char num[16];
4028
                        snprintf(num, sizeof(num), "%d", cyls);
4029
                        qemu_opt_set(hda_opts, "cyls", num);
4030
                        snprintf(num, sizeof(num), "%d", heads);
4031
                        qemu_opt_set(hda_opts, "heads", num);
4032
                        snprintf(num, sizeof(num), "%d", secs);
4033
                        qemu_opt_set(hda_opts, "secs", num);
4034
                        if (translation == BIOS_ATA_TRANSLATION_LBA)
4035
                            qemu_opt_set(hda_opts, "trans", "lba");
4036
                        if (translation == BIOS_ATA_TRANSLATION_NONE)
4037
                            qemu_opt_set(hda_opts, "trans", "none");
4038
                    }
4039
                }
4040
                break;
4041
            case QEMU_OPTION_numa:
4042
                if (nb_numa_nodes >= MAX_NODES) {
4043
                    fprintf(stderr, "qemu: too many NUMA nodes\n");
4044
                    exit(1);
4045
                }
4046
                numa_add(optarg);
4047
                break;
4048
            case QEMU_OPTION_nographic:
4049
                display_type = DT_NOGRAPHIC;
4050
                break;
4051
#ifdef CONFIG_CURSES
4052
            case QEMU_OPTION_curses:
4053
                display_type = DT_CURSES;
4054
                break;
4055
#endif
4056
            case QEMU_OPTION_portrait:
4057
                graphic_rotate = 1;
4058
                break;
4059
            case QEMU_OPTION_kernel:
4060
                kernel_filename = optarg;
4061
                break;
4062
            case QEMU_OPTION_append:
4063
                kernel_cmdline = optarg;
4064
                break;
4065
            case QEMU_OPTION_cdrom:
4066
                drive_add(optarg, CDROM_ALIAS);
4067
                break;
4068
            case QEMU_OPTION_boot:
4069
                {
4070
                    static const char * const params[] = {
4071
                        "order", "once", "menu", NULL
4072
                    };
4073
                    char buf[sizeof(boot_devices)];
4074
                    char *standard_boot_devices;
4075
                    int legacy = 0;
4076

    
4077
                    if (!strchr(optarg, '=')) {
4078
                        legacy = 1;
4079
                        pstrcpy(buf, sizeof(buf), optarg);
4080
                    } else if (check_params(buf, sizeof(buf), params, optarg) < 0) {
4081
                        fprintf(stderr,
4082
                                "qemu: unknown boot parameter '%s' in '%s'\n",
4083
                                buf, optarg);
4084
                        exit(1);
4085
                    }
4086

    
4087
                    if (legacy ||
4088
                        get_param_value(buf, sizeof(buf), "order", optarg)) {
4089
                        boot_devices_bitmap = parse_bootdevices(buf);
4090
                        pstrcpy(boot_devices, sizeof(boot_devices), buf);
4091
                    }
4092
                    if (!legacy) {
4093
                        if (get_param_value(buf, sizeof(buf),
4094
                                            "once", optarg)) {
4095
                            boot_devices_bitmap |= parse_bootdevices(buf);
4096
                            standard_boot_devices = qemu_strdup(boot_devices);
4097
                            pstrcpy(boot_devices, sizeof(boot_devices), buf);
4098
                            qemu_register_reset(restore_boot_devices,
4099
                                                standard_boot_devices);
4100
                        }
4101
                        if (get_param_value(buf, sizeof(buf),
4102
                                            "menu", optarg)) {
4103
                            if (!strcmp(buf, "on")) {
4104
                                boot_menu = 1;
4105
                            } else if (!strcmp(buf, "off")) {
4106
                                boot_menu = 0;
4107
                            } else {
4108
                                fprintf(stderr,
4109
                                        "qemu: invalid option value '%s'\n",
4110
                                        buf);
4111
                                exit(1);
4112
                            }
4113
                        }
4114
                    }
4115
                }
4116
                break;
4117
            case QEMU_OPTION_fda:
4118
            case QEMU_OPTION_fdb:
4119
                drive_add(optarg, FD_ALIAS, popt->index - QEMU_OPTION_fda);
4120
                break;
4121
#ifdef TARGET_I386
4122
            case QEMU_OPTION_no_fd_bootchk:
4123
                fd_bootchk = 0;
4124
                break;
4125
#endif
4126
            case QEMU_OPTION_netdev:
4127
                if (net_client_parse(&qemu_netdev_opts, optarg) == -1) {
4128
                    exit(1);
4129
                }
4130
                break;
4131
            case QEMU_OPTION_net:
4132
                if (net_client_parse(&qemu_net_opts, optarg) == -1) {
4133
                    exit(1);
4134
                }
4135
                break;
4136
#ifdef CONFIG_SLIRP
4137
            case QEMU_OPTION_tftp:
4138
                legacy_tftp_prefix = optarg;
4139
                break;
4140
            case QEMU_OPTION_bootp:
4141
                legacy_bootp_filename = optarg;
4142
                break;
4143
#ifndef _WIN32
4144
            case QEMU_OPTION_smb:
4145
                if (net_slirp_smb(optarg) < 0)
4146
                    exit(1);
4147
                break;
4148
#endif
4149
            case QEMU_OPTION_redir:
4150
                if (net_slirp_redir(optarg) < 0)
4151
                    exit(1);
4152
                break;
4153
#endif
4154
            case QEMU_OPTION_bt:
4155
                add_device_config(DEV_BT, optarg);
4156
                break;
4157
#ifdef HAS_AUDIO
4158
            case QEMU_OPTION_audio_help:
4159
                AUD_help ();
4160
                exit (0);
4161
                break;
4162
            case QEMU_OPTION_soundhw:
4163
                select_soundhw (optarg);
4164
                break;
4165
#endif
4166
            case QEMU_OPTION_h:
4167
                help(0);
4168
                break;
4169
            case QEMU_OPTION_version:
4170
                version();
4171
                exit(0);
4172
                break;
4173
            case QEMU_OPTION_m: {
4174
                uint64_t value;
4175
                char *ptr;
4176

    
4177
                value = strtoul(optarg, &ptr, 10);
4178
                switch (*ptr) {
4179
                case 0: case 'M': case 'm':
4180
                    value <<= 20;
4181
                    break;
4182
                case 'G': case 'g':
4183
                    value <<= 30;
4184
                    break;
4185
                default:
4186
                    fprintf(stderr, "qemu: invalid ram size: %s\n", optarg);
4187
                    exit(1);
4188
                }
4189

    
4190
                /* On 32-bit hosts, QEMU is limited by virtual address space */
4191
                if (value > (2047 << 20) && HOST_LONG_BITS == 32) {
4192
                    fprintf(stderr, "qemu: at most 2047 MB RAM can be simulated\n");
4193
                    exit(1);
4194
                }
4195
                if (value != (uint64_t)(ram_addr_t)value) {
4196
                    fprintf(stderr, "qemu: ram size too large\n");
4197
                    exit(1);
4198
                }
4199
                ram_size = value;
4200
                break;
4201
            }
4202
            case QEMU_OPTION_mempath:
4203
                mem_path = optarg;
4204
                break;
4205
#ifdef MAP_POPULATE
4206
            case QEMU_OPTION_mem_prealloc:
4207
                mem_prealloc = 1;
4208
                break;
4209
#endif
4210
            case QEMU_OPTION_d:
4211
                {
4212
                    int mask;
4213
                    const CPULogItem *item;
4214

    
4215
                    mask = cpu_str_to_log_mask(optarg);
4216
                    if (!mask) {
4217
                        printf("Log items (comma separated):\n");
4218
                    for(item = cpu_log_items; item->mask != 0; item++) {
4219
                        printf("%-10s %s\n", item->name, item->help);
4220
                    }
4221
                    exit(1);
4222
                    }
4223
                    cpu_set_log(mask);
4224
                }
4225
                break;
4226
            case QEMU_OPTION_s:
4227
                gdbstub_dev = "tcp::" DEFAULT_GDBSTUB_PORT;
4228
                break;
4229
            case QEMU_OPTION_gdb:
4230
                gdbstub_dev = optarg;
4231
                break;
4232
            case QEMU_OPTION_L:
4233
                data_dir = optarg;
4234
                break;
4235
            case QEMU_OPTION_bios:
4236
                bios_name = optarg;
4237
                break;
4238
            case QEMU_OPTION_singlestep:
4239
                singlestep = 1;
4240
                break;
4241
            case QEMU_OPTION_S:
4242
                autostart = 0;
4243
                break;
4244
            case QEMU_OPTION_k:
4245
                keyboard_layout = optarg;
4246
                break;
4247
            case QEMU_OPTION_localtime:
4248
                rtc_utc = 0;
4249
                break;
4250
            case QEMU_OPTION_vga:
4251
                select_vgahw (optarg);
4252
                break;
4253
#if defined(TARGET_PPC) || defined(TARGET_SPARC)
4254
            case QEMU_OPTION_g:
4255
                {
4256
                    const char *p;
4257
                    int w, h, depth;
4258
                    p = optarg;
4259
                    w = strtol(p, (char **)&p, 10);
4260
                    if (w <= 0) {
4261
                    graphic_error:
4262
                        fprintf(stderr, "qemu: invalid resolution or depth\n");
4263
                        exit(1);
4264
                    }
4265
                    if (*p != 'x')
4266
                        goto graphic_error;
4267
                    p++;
4268
                    h = strtol(p, (char **)&p, 10);
4269
                    if (h <= 0)
4270
                        goto graphic_error;
4271
                    if (*p == 'x') {
4272
                        p++;
4273
                        depth = strtol(p, (char **)&p, 10);
4274
                        if (depth != 8 && depth != 15 && depth != 16 &&
4275
                            depth != 24 && depth != 32)
4276
                            goto graphic_error;
4277
                    } else if (*p == '\0') {
4278
                        depth = graphic_depth;
4279
                    } else {
4280
                        goto graphic_error;
4281
                    }
4282

    
4283
                    graphic_width = w;
4284
                    graphic_height = h;
4285
                    graphic_depth = depth;
4286
                }
4287
                break;
4288
#endif
4289
            case QEMU_OPTION_echr:
4290
                {
4291
                    char *r;
4292
                    term_escape_char = strtol(optarg, &r, 0);
4293
                    if (r == optarg)
4294
                        printf("Bad argument to echr\n");
4295
                    break;
4296
                }
4297
            case QEMU_OPTION_monitor:
4298
                monitor_parse(optarg, "readline");
4299
                default_monitor = 0;
4300
                break;
4301
            case QEMU_OPTION_qmp:
4302
                monitor_parse(optarg, "control");
4303
                default_qmp = 0;
4304
                break;
4305
            case QEMU_OPTION_mon:
4306
                opts = qemu_opts_parse(&qemu_mon_opts, optarg, 1);
4307
                if (!opts) {
4308
                    fprintf(stderr, "parse error: %s\n", optarg);
4309
                    exit(1);
4310
                } else {
4311
                    const char *mode;
4312
                    mode = qemu_opt_get(opts, "mode");
4313
                    if (mode == NULL || strcmp(mode, "readline") == 0) {
4314
                        default_monitor = 0;
4315
                    } else if (strcmp(mode, "control") == 0) {
4316
                        default_qmp = 0;
4317
                    }
4318
                }
4319
                break;
4320
            case QEMU_OPTION_chardev:
4321
                opts = qemu_opts_parse(&qemu_chardev_opts, optarg, 1);
4322
                if (!opts) {
4323
                    fprintf(stderr, "parse error: %s\n", optarg);
4324
                    exit(1);
4325
                }
4326
                break;
4327
            case QEMU_OPTION_serial:
4328
                add_device_config(DEV_SERIAL, optarg);
4329
                default_serial = 0;
4330
                if (strncmp(optarg, "mon:", 4) == 0) {
4331
                    default_monitor = 0;
4332
                }
4333
                break;
4334
            case QEMU_OPTION_watchdog:
4335
                if (watchdog) {
4336
                    fprintf(stderr,
4337
                            "qemu: only one watchdog option may be given\n");
4338
                    return 1;
4339
                }
4340
                watchdog = optarg;
4341
                break;
4342
            case QEMU_OPTION_watchdog_action:
4343
                if (select_watchdog_action(optarg) == -1) {
4344
                    fprintf(stderr, "Unknown -watchdog-action parameter\n");
4345
                    exit(1);
4346
                }
4347
                break;
4348
            case QEMU_OPTION_virtiocon:
4349
                add_device_config(DEV_VIRTCON, optarg);
4350
                default_virtcon = 0;
4351
                if (strncmp(optarg, "mon:", 4) == 0) {
4352
                    default_monitor = 0;
4353
                }
4354
                break;
4355
            case QEMU_OPTION_parallel:
4356
                add_device_config(DEV_PARALLEL, optarg);
4357
                default_parallel = 0;
4358
                if (strncmp(optarg, "mon:", 4) == 0) {
4359
                    default_monitor = 0;
4360
                }
4361
                break;
4362
            case QEMU_OPTION_debugcon:
4363
                add_device_config(DEV_DEBUGCON, optarg);
4364
                break;
4365
            case QEMU_OPTION_loadvm:
4366
                loadvm = optarg;
4367
                break;
4368
            case QEMU_OPTION_full_screen:
4369
                full_screen = 1;
4370
                break;
4371
#ifdef CONFIG_SDL
4372
            case QEMU_OPTION_no_frame:
4373
                no_frame = 1;
4374
                break;
4375
            case QEMU_OPTION_alt_grab:
4376
                alt_grab = 1;
4377
                break;
4378
            case QEMU_OPTION_ctrl_grab:
4379
                ctrl_grab = 1;
4380
                break;
4381
            case QEMU_OPTION_no_quit:
4382
                no_quit = 1;
4383
                break;
4384
            case QEMU_OPTION_sdl:
4385
                display_type = DT_SDL;
4386
                break;
4387
#endif
4388
            case QEMU_OPTION_pidfile:
4389
                pid_file = optarg;
4390
                break;
4391
#ifdef TARGET_I386
4392
            case QEMU_OPTION_win2k_hack:
4393
                win2k_install_hack = 1;
4394
                break;
4395
            case QEMU_OPTION_rtc_td_hack:
4396
                rtc_td_hack = 1;
4397
                break;
4398
            case QEMU_OPTION_acpitable:
4399
                if(acpi_table_add(optarg) < 0) {
4400
                    fprintf(stderr, "Wrong acpi table provided\n");
4401
                    exit(1);
4402
                }
4403
                break;
4404
            case QEMU_OPTION_smbios:
4405
                if(smbios_entry_add(optarg) < 0) {
4406
                    fprintf(stderr, "Wrong smbios provided\n");
4407
                    exit(1);
4408
                }
4409
                break;
4410
#endif
4411
#ifdef CONFIG_KVM
4412
            case QEMU_OPTION_enable_kvm:
4413
                kvm_allowed = 1;
4414
                break;
4415
#endif
4416
            case QEMU_OPTION_usb:
4417
                usb_enabled = 1;
4418
                break;
4419
            case QEMU_OPTION_usbdevice:
4420
                usb_enabled = 1;
4421
                add_device_config(DEV_USB, optarg);
4422
                break;
4423
            case QEMU_OPTION_device:
4424
                if (!qemu_opts_parse(&qemu_device_opts, optarg, 1)) {
4425
                    exit(1);
4426
                }
4427
                break;
4428
            case QEMU_OPTION_smp:
4429
                smp_parse(optarg);
4430
                if (smp_cpus < 1) {
4431
                    fprintf(stderr, "Invalid number of CPUs\n");
4432
                    exit(1);
4433
                }
4434
                if (max_cpus < smp_cpus) {
4435
                    fprintf(stderr, "maxcpus must be equal to or greater than "
4436
                            "smp\n");
4437
                    exit(1);
4438
                }
4439
                if (max_cpus > 255) {
4440
                    fprintf(stderr, "Unsupported number of maxcpus\n");
4441
                    exit(1);
4442
                }
4443
                break;
4444
            case QEMU_OPTION_vnc:
4445
                display_type = DT_VNC;
4446
                vnc_display = optarg;
4447
                break;
4448
#ifdef TARGET_I386
4449
            case QEMU_OPTION_no_acpi:
4450
                acpi_enabled = 0;
4451
                break;
4452
            case QEMU_OPTION_no_hpet:
4453
                no_hpet = 1;
4454
                break;
4455
            case QEMU_OPTION_balloon:
4456
                if (balloon_parse(optarg) < 0) {
4457
                    fprintf(stderr, "Unknown -balloon argument %s\n", optarg);
4458
                    exit(1);
4459
                }
4460
                break;
4461
#endif
4462
            case QEMU_OPTION_no_reboot:
4463
                no_reboot = 1;
4464
                break;
4465
            case QEMU_OPTION_no_shutdown:
4466
                no_shutdown = 1;
4467
                break;
4468
            case QEMU_OPTION_show_cursor:
4469
                cursor_hide = 0;
4470
                break;
4471
            case QEMU_OPTION_uuid:
4472
                if(qemu_uuid_parse(optarg, qemu_uuid) < 0) {
4473
                    fprintf(stderr, "Fail to parse UUID string."
4474
                            " Wrong format.\n");
4475
                    exit(1);
4476
                }
4477
                break;
4478
#ifndef _WIN32
4479
            case QEMU_OPTION_daemonize:
4480
                daemonize = 1;
4481
                break;
4482
#endif
4483
            case QEMU_OPTION_option_rom:
4484
                if (nb_option_roms >= MAX_OPTION_ROMS) {
4485
                    fprintf(stderr, "Too many option ROMs\n");
4486
                    exit(1);
4487
                }
4488
                option_rom[nb_option_roms] = optarg;
4489
                nb_option_roms++;
4490
                break;
4491
#if defined(TARGET_ARM) || defined(TARGET_M68K)
4492
            case QEMU_OPTION_semihosting:
4493
                semihosting_enabled = 1;
4494
                break;
4495
#endif
4496
            case QEMU_OPTION_name:
4497
                qemu_name = qemu_strdup(optarg);
4498
                 {
4499
                     char *p = strchr(qemu_name, ',');
4500
                     if (p != NULL) {
4501
                        *p++ = 0;
4502
                        if (strncmp(p, "process=", 8)) {
4503
                            fprintf(stderr, "Unknown subargument %s to -name", p);
4504
                            exit(1);
4505
                        }
4506
                        p += 8;
4507
                        set_proc_name(p);
4508
                     }        
4509
                 }        
4510
                break;
4511
#if defined(TARGET_SPARC) || defined(TARGET_PPC)
4512
            case QEMU_OPTION_prom_env:
4513
                if (nb_prom_envs >= MAX_PROM_ENVS) {
4514
                    fprintf(stderr, "Too many prom variables\n");
4515
                    exit(1);
4516
                }
4517
                prom_envs[nb_prom_envs] = optarg;
4518
                nb_prom_envs++;
4519
                break;
4520
#endif
4521
#ifdef TARGET_ARM
4522
            case QEMU_OPTION_old_param:
4523
                old_param = 1;
4524
                break;
4525
#endif
4526
            case QEMU_OPTION_clock:
4527
                configure_alarms(optarg);
4528
                break;
4529
            case QEMU_OPTION_startdate:
4530
                configure_rtc_date_offset(optarg, 1);
4531
                break;
4532
            case QEMU_OPTION_rtc:
4533
                opts = qemu_opts_parse(&qemu_rtc_opts, optarg, 0);
4534
                if (!opts) {
4535
                    fprintf(stderr, "parse error: %s\n", optarg);
4536
                    exit(1);
4537
                }
4538
                configure_rtc(opts);
4539
                break;
4540
            case QEMU_OPTION_tb_size:
4541
                tb_size = strtol(optarg, NULL, 0);
4542
                if (tb_size < 0)
4543
                    tb_size = 0;
4544
                break;
4545
            case QEMU_OPTION_icount:
4546
                icount_option = optarg;
4547
                break;
4548
            case QEMU_OPTION_incoming:
4549
                incoming = optarg;
4550
                break;
4551
            case QEMU_OPTION_nodefaults:
4552
                default_serial = 0;
4553
                default_parallel = 0;
4554
                default_virtcon = 0;
4555
                default_monitor = 0;
4556
                default_qmp = 0;
4557
                default_vga = 0;
4558
                default_net = 0;
4559
                default_floppy = 0;
4560
                default_cdrom = 0;
4561
                default_sdcard = 0;
4562
                break;
4563
#ifndef _WIN32
4564
            case QEMU_OPTION_chroot:
4565
                chroot_dir = optarg;
4566
                break;
4567
            case QEMU_OPTION_runas:
4568
                run_as = optarg;
4569
                break;
4570
#endif
4571
#ifdef CONFIG_XEN
4572
            case QEMU_OPTION_xen_domid:
4573
                xen_domid = atoi(optarg);
4574
                break;
4575
            case QEMU_OPTION_xen_create:
4576
                xen_mode = XEN_CREATE;
4577
                break;
4578
            case QEMU_OPTION_xen_attach:
4579
                xen_mode = XEN_ATTACH;
4580
                break;
4581
#endif
4582
            case QEMU_OPTION_readconfig:
4583
                {
4584
                    FILE *fp;
4585
                    fp = fopen(optarg, "r");
4586
                    if (fp == NULL) {
4587
                        fprintf(stderr, "open %s: %s\n", optarg, strerror(errno));
4588
                        exit(1);
4589
                    }
4590
                    if (qemu_config_parse(fp, optarg) != 0) {
4591
                        exit(1);
4592
                    }
4593
                    fclose(fp);
4594
                    break;
4595
                }
4596
            case QEMU_OPTION_writeconfig:
4597
                {
4598
                    FILE *fp;
4599
                    if (strcmp(optarg, "-") == 0) {
4600
                        fp = stdout;
4601
                    } else {
4602
                        fp = fopen(optarg, "w");
4603
                        if (fp == NULL) {
4604
                            fprintf(stderr, "open %s: %s\n", optarg, strerror(errno));
4605
                            exit(1);
4606
                        }
4607
                    }
4608
                    qemu_config_write(fp);
4609
                    fclose(fp);
4610
                    break;
4611
                }
4612
            }
4613
        }
4614
    }
4615
    loc_set_none();
4616

    
4617
    /* If no data_dir is specified then try to find it relative to the
4618
       executable path.  */
4619
    if (!data_dir) {
4620
        data_dir = find_datadir(argv[0]);
4621
    }
4622
    /* If all else fails use the install patch specified when building.  */
4623
    if (!data_dir) {
4624
        data_dir = CONFIG_QEMU_SHAREDIR;
4625
    }
4626

    
4627
    /*
4628
     * Default to max_cpus = smp_cpus, in case the user doesn't
4629
     * specify a max_cpus value.
4630
     */
4631
    if (!max_cpus)
4632
        max_cpus = smp_cpus;
4633

    
4634
    machine->max_cpus = machine->max_cpus ?: 1; /* Default to UP */
4635
    if (smp_cpus > machine->max_cpus) {
4636
        fprintf(stderr, "Number of SMP cpus requested (%d), exceeds max cpus "
4637
                "supported by machine `%s' (%d)\n", smp_cpus,  machine->name,
4638
                machine->max_cpus);
4639
        exit(1);
4640
    }
4641

    
4642
    qemu_opts_foreach(&qemu_device_opts, default_driver_check, NULL, 0);
4643
    qemu_opts_foreach(&qemu_global_opts, default_driver_check, NULL, 0);
4644

    
4645
    if (machine->no_serial) {
4646
        default_serial = 0;
4647
    }
4648
    if (machine->no_parallel) {
4649
        default_parallel = 0;
4650
    }
4651
    if (!machine->use_virtcon) {
4652
        default_virtcon = 0;
4653
    }
4654
    if (machine->no_vga) {
4655
        default_vga = 0;
4656
    }
4657
    if (machine->no_floppy) {
4658
        default_floppy = 0;
4659
    }
4660
    if (machine->no_cdrom) {
4661
        default_cdrom = 0;
4662
    }
4663
    if (machine->no_sdcard) {
4664
        default_sdcard = 0;
4665
    }
4666

    
4667
    if (display_type == DT_NOGRAPHIC) {
4668
        if (default_parallel)
4669
            add_device_config(DEV_PARALLEL, "null");
4670
        if (default_serial && default_monitor) {
4671
            add_device_config(DEV_SERIAL, "mon:stdio");
4672
        } else if (default_virtcon && default_monitor) {
4673
            add_device_config(DEV_VIRTCON, "mon:stdio");
4674
        } else {
4675
            if (default_serial)
4676
                add_device_config(DEV_SERIAL, "stdio");
4677
            if (default_virtcon)
4678
                add_device_config(DEV_VIRTCON, "stdio");
4679
            if (default_monitor)
4680
                monitor_parse("stdio", "readline");
4681
        }
4682
    } else {
4683
        if (default_serial)
4684
            add_device_config(DEV_SERIAL, "vc:80Cx24C");
4685
        if (default_parallel)
4686
            add_device_config(DEV_PARALLEL, "vc:80Cx24C");
4687
        if (default_monitor)
4688
            monitor_parse("vc:80Cx24C", "readline");
4689
        if (default_virtcon)
4690
            add_device_config(DEV_VIRTCON, "vc:80Cx24C");
4691
    }
4692
    if (default_qmp) {
4693
        qmp_add_default();
4694
    }
4695
    if (default_vga)
4696
        vga_interface_type = VGA_CIRRUS;
4697

    
4698
    if (qemu_opts_foreach(&qemu_chardev_opts, chardev_init_func, NULL, 1) != 0)
4699
        exit(1);
4700

    
4701
#ifndef _WIN32
4702
    if (daemonize) {
4703
        pid_t pid;
4704

    
4705
        if (pipe(fds) == -1)
4706
            exit(1);
4707

    
4708
        pid = fork();
4709
        if (pid > 0) {
4710
            uint8_t status;
4711
            ssize_t len;
4712

    
4713
            close(fds[1]);
4714

    
4715
        again:
4716
            len = read(fds[0], &status, 1);
4717
            if (len == -1 && (errno == EINTR))
4718
                goto again;
4719

    
4720
            if (len != 1)
4721
                exit(1);
4722
            else if (status == 1) {
4723
                fprintf(stderr, "Could not acquire pidfile: %s\n", strerror(errno));
4724
                exit(1);
4725
            } else
4726
                exit(0);
4727
        } else if (pid < 0)
4728
            exit(1);
4729

    
4730
        close(fds[0]);
4731
        qemu_set_cloexec(fds[1]);
4732

    
4733
        setsid();
4734

    
4735
        pid = fork();
4736
        if (pid > 0)
4737
            exit(0);
4738
        else if (pid < 0)
4739
            exit(1);
4740

    
4741
        umask(027);
4742

    
4743
        signal(SIGTSTP, SIG_IGN);
4744
        signal(SIGTTOU, SIG_IGN);
4745
        signal(SIGTTIN, SIG_IGN);
4746
    }
4747
#endif
4748

    
4749
    if (pid_file && qemu_create_pidfile(pid_file) != 0) {
4750
#ifndef _WIN32
4751
        if (daemonize) {
4752
            uint8_t status = 1;
4753
            if (write(fds[1], &status, 1) != 1) {
4754
                perror("daemonize. Writing to pipe\n");
4755
            }
4756
        } else
4757
#endif
4758
            fprintf(stderr, "Could not acquire pid file: %s\n", strerror(errno));
4759
        exit(1);
4760
    }
4761

    
4762
    if (kvm_enabled()) {
4763
        int ret;
4764

    
4765
        ret = kvm_init(smp_cpus);
4766
        if (ret < 0) {
4767
            fprintf(stderr, "failed to initialize KVM\n");
4768
            exit(1);
4769
        }
4770
    }
4771

    
4772
    if (qemu_init_main_loop()) {
4773
        fprintf(stderr, "qemu_init_main_loop failed\n");
4774
        exit(1);
4775
    }
4776
    linux_boot = (kernel_filename != NULL);
4777

    
4778
    if (!linux_boot && *kernel_cmdline != '\0') {
4779
        fprintf(stderr, "-append only allowed with -kernel option\n");
4780
        exit(1);
4781
    }
4782

    
4783
    if (!linux_boot && initrd_filename != NULL) {
4784
        fprintf(stderr, "-initrd only allowed with -kernel option\n");
4785
        exit(1);
4786
    }
4787

    
4788
#ifndef _WIN32
4789
    /* Win32 doesn't support line-buffering and requires size >= 2 */
4790
    setvbuf(stdout, NULL, _IOLBF, 0);
4791
#endif
4792

    
4793
    if (init_timer_alarm() < 0) {
4794
        fprintf(stderr, "could not initialize alarm timer\n");
4795
        exit(1);
4796
    }
4797
    configure_icount(icount_option);
4798

    
4799
#ifdef _WIN32
4800
    socket_init();
4801
#endif
4802

    
4803
    if (net_init_clients() < 0) {
4804
        exit(1);
4805
    }
4806

    
4807
    net_boot = (boot_devices_bitmap >> ('n' - 'a')) & 0xF;
4808
    net_set_boot_mask(net_boot);
4809

    
4810
    /* init the bluetooth world */
4811
    if (foreach_device_config(DEV_BT, bt_parse))
4812
        exit(1);
4813

    
4814
    /* init the memory */
4815
    if (ram_size == 0)
4816
        ram_size = DEFAULT_RAM_SIZE * 1024 * 1024;
4817

    
4818
    /* init the dynamic translator */
4819
    cpu_exec_init_all(tb_size * 1024 * 1024);
4820

    
4821
    bdrv_init_with_whitelist();
4822

    
4823
    blk_mig_init();
4824

    
4825
    if (default_cdrom) {
4826
        /* we always create the cdrom drive, even if no disk is there */
4827
        drive_add(NULL, CDROM_ALIAS);
4828
    }
4829

    
4830
    if (default_floppy) {
4831
        /* we always create at least one floppy */
4832
        drive_add(NULL, FD_ALIAS, 0);
4833
    }
4834

    
4835
    if (default_sdcard) {
4836
        /* we always create one sd slot, even if no card is in it */
4837
        drive_add(NULL, SD_ALIAS);
4838
    }
4839

    
4840
    /* open the virtual block devices */
4841
    if (snapshot)
4842
        qemu_opts_foreach(&qemu_drive_opts, drive_enable_snapshot, NULL, 0);
4843
    if (qemu_opts_foreach(&qemu_drive_opts, drive_init_func, machine, 1) != 0)
4844
        exit(1);
4845

    
4846
    register_savevm_live("ram", 0, 3, NULL, ram_save_live, NULL, 
4847
                         ram_load, NULL);
4848

    
4849
    if (nb_numa_nodes > 0) {
4850
        int i;
4851

    
4852
        if (nb_numa_nodes > smp_cpus) {
4853
            nb_numa_nodes = smp_cpus;
4854
        }
4855

    
4856
        /* If no memory size if given for any node, assume the default case
4857
         * and distribute the available memory equally across all nodes
4858
         */
4859
        for (i = 0; i < nb_numa_nodes; i++) {
4860
            if (node_mem[i] != 0)
4861
                break;
4862
        }
4863
        if (i == nb_numa_nodes) {
4864
            uint64_t usedmem = 0;
4865

    
4866
            /* On Linux, the each node's border has to be 8MB aligned,
4867
             * the final node gets the rest.
4868
             */
4869
            for (i = 0; i < nb_numa_nodes - 1; i++) {
4870
                node_mem[i] = (ram_size / nb_numa_nodes) & ~((1 << 23UL) - 1);
4871
                usedmem += node_mem[i];
4872
            }
4873
            node_mem[i] = ram_size - usedmem;
4874
        }
4875

    
4876
        for (i = 0; i < nb_numa_nodes; i++) {
4877
            if (node_cpumask[i] != 0)
4878
                break;
4879
        }
4880
        /* assigning the VCPUs round-robin is easier to implement, guest OSes
4881
         * must cope with this anyway, because there are BIOSes out there in
4882
         * real machines which also use this scheme.
4883
         */
4884
        if (i == nb_numa_nodes) {
4885
            for (i = 0; i < smp_cpus; i++) {
4886
                node_cpumask[i % nb_numa_nodes] |= 1 << i;
4887
            }
4888
        }
4889
    }
4890

    
4891
    if (foreach_device_config(DEV_SERIAL, serial_parse) < 0)
4892
        exit(1);
4893
    if (foreach_device_config(DEV_PARALLEL, parallel_parse) < 0)
4894
        exit(1);
4895
    if (foreach_device_config(DEV_VIRTCON, virtcon_parse) < 0)
4896
        exit(1);
4897
    if (foreach_device_config(DEV_DEBUGCON, debugcon_parse) < 0)
4898
        exit(1);
4899

    
4900
    module_call_init(MODULE_INIT_DEVICE);
4901

    
4902
    if (qemu_opts_foreach(&qemu_device_opts, device_help_func, NULL, 0) != 0)
4903
        exit(0);
4904

    
4905
    if (watchdog) {
4906
        i = select_watchdog(watchdog);
4907
        if (i > 0)
4908
            exit (i == 1 ? 1 : 0);
4909
    }
4910

    
4911
    if (machine->compat_props) {
4912
        qdev_prop_register_global_list(machine->compat_props);
4913
    }
4914
    qemu_add_globals();
4915

    
4916
    machine->init(ram_size, boot_devices,
4917
                  kernel_filename, kernel_cmdline, initrd_filename, cpu_model);
4918

    
4919
    cpu_synchronize_all_post_init();
4920

    
4921
#ifndef _WIN32
4922
    /* must be after terminal init, SDL library changes signal handlers */
4923
    sighandler_setup();
4924
#endif
4925

    
4926
    for (env = first_cpu; env != NULL; env = env->next_cpu) {
4927
        for (i = 0; i < nb_numa_nodes; i++) {
4928
            if (node_cpumask[i] & (1 << env->cpu_index)) {
4929
                env->numa_node = i;
4930
            }
4931
        }
4932
    }
4933

    
4934
    current_machine = machine;
4935

    
4936
    /* init USB devices */
4937
    if (usb_enabled) {
4938
        if (foreach_device_config(DEV_USB, usb_parse) < 0)
4939
            exit(1);
4940
    }
4941

    
4942
    /* init generic devices */
4943
    if (qemu_opts_foreach(&qemu_device_opts, device_init_func, NULL, 1) != 0)
4944
        exit(1);
4945

    
4946
    net_check_clients();
4947

    
4948
    /* just use the first displaystate for the moment */
4949
    ds = get_displaystate();
4950

    
4951
    if (display_type == DT_DEFAULT) {
4952
#if defined(CONFIG_SDL) || defined(CONFIG_COCOA)
4953
        display_type = DT_SDL;
4954
#else
4955
        display_type = DT_VNC;
4956
        vnc_display = "localhost:0,to=99";
4957
        show_vnc_port = 1;
4958
#endif
4959
    }
4960
        
4961

    
4962
    switch (display_type) {
4963
    case DT_NOGRAPHIC:
4964
        break;
4965
#if defined(CONFIG_CURSES)
4966
    case DT_CURSES:
4967
        curses_display_init(ds, full_screen);
4968
        break;
4969
#endif
4970
#if defined(CONFIG_SDL)
4971
    case DT_SDL:
4972
        sdl_display_init(ds, full_screen, no_frame);
4973
        break;
4974
#elif defined(CONFIG_COCOA)
4975
    case DT_SDL:
4976
        cocoa_display_init(ds, full_screen);
4977
        break;
4978
#endif
4979
    case DT_VNC:
4980
        vnc_display_init(ds);
4981
        if (vnc_display_open(ds, vnc_display) < 0)
4982
            exit(1);
4983

    
4984
        if (show_vnc_port) {
4985
            printf("VNC server running on `%s'\n", vnc_display_local_addr(ds));
4986
        }
4987
        break;
4988
    default:
4989
        break;
4990
    }
4991
    dpy_resize(ds);
4992

    
4993
    dcl = ds->listeners;
4994
    while (dcl != NULL) {
4995
        if (dcl->dpy_refresh != NULL) {
4996
            ds->gui_timer = qemu_new_timer(rt_clock, gui_update, ds);
4997
            qemu_mod_timer(ds->gui_timer, qemu_get_clock(rt_clock));
4998
        }
4999
        dcl = dcl->next;
5000
    }
5001

    
5002
    if (display_type == DT_NOGRAPHIC || display_type == DT_VNC) {
5003
        nographic_timer = qemu_new_timer(rt_clock, nographic_update, NULL);
5004
        qemu_mod_timer(nographic_timer, qemu_get_clock(rt_clock));
5005
    }
5006

    
5007
    text_consoles_set_display(ds);
5008

    
5009
    if (qemu_opts_foreach(&qemu_mon_opts, mon_init_func, NULL, 1) != 0)
5010
        exit(1);
5011

    
5012
    if (gdbstub_dev && gdbserver_start(gdbstub_dev) < 0) {
5013
        fprintf(stderr, "qemu: could not open gdbserver on device '%s'\n",
5014
                gdbstub_dev);
5015
        exit(1);
5016
    }
5017

    
5018
    qdev_machine_creation_done();
5019

    
5020
    if (rom_load_all() != 0) {
5021
        fprintf(stderr, "rom loading failed\n");
5022
        exit(1);
5023
    }
5024

    
5025
    qemu_system_reset();
5026
    if (loadvm) {
5027
        if (load_vmstate(loadvm) < 0) {
5028
            autostart = 0;
5029
        }
5030
    }
5031

    
5032
    if (incoming) {
5033
        qemu_start_incoming_migration(incoming);
5034
    } else if (autostart) {
5035
        vm_start();
5036
    }
5037

    
5038
#ifndef _WIN32
5039
    if (daemonize) {
5040
        uint8_t status = 0;
5041
        ssize_t len;
5042

    
5043
    again1:
5044
        len = write(fds[1], &status, 1);
5045
        if (len == -1 && (errno == EINTR))
5046
            goto again1;
5047

    
5048
        if (len != 1)
5049
            exit(1);
5050

    
5051
        if (chdir("/")) {
5052
            perror("not able to chdir to /");
5053
            exit(1);
5054
        }
5055
        TFR(fd = qemu_open("/dev/null", O_RDWR));
5056
        if (fd == -1)
5057
            exit(1);
5058
    }
5059

    
5060
    if (run_as) {
5061
        pwd = getpwnam(run_as);
5062
        if (!pwd) {
5063
            fprintf(stderr, "User \"%s\" doesn't exist\n", run_as);
5064
            exit(1);
5065
        }
5066
    }
5067

    
5068
    if (chroot_dir) {
5069
        if (chroot(chroot_dir) < 0) {
5070
            fprintf(stderr, "chroot failed\n");
5071
            exit(1);
5072
        }
5073
        if (chdir("/")) {
5074
            perror("not able to chdir to /");
5075
            exit(1);
5076
        }
5077
    }
5078

    
5079
    if (run_as) {
5080
        if (setgid(pwd->pw_gid) < 0) {
5081
            fprintf(stderr, "Failed to setgid(%d)\n", pwd->pw_gid);
5082
            exit(1);
5083
        }
5084
        if (setuid(pwd->pw_uid) < 0) {
5085
            fprintf(stderr, "Failed to setuid(%d)\n", pwd->pw_uid);
5086
            exit(1);
5087
        }
5088
        if (setuid(0) != -1) {
5089
            fprintf(stderr, "Dropping privileges failed\n");
5090
            exit(1);
5091
        }
5092
    }
5093

    
5094
    if (daemonize) {
5095
        dup2(fd, 0);
5096
        dup2(fd, 1);
5097
        dup2(fd, 2);
5098

    
5099
        close(fd);
5100
    }
5101
#endif
5102

    
5103
    main_loop();
5104
    quit_timers();
5105
    net_cleanup();
5106

    
5107
    return 0;
5108
}