Archipelago » qemu

/*

 * QEMU System Emulator

 *

 * Copyright (c) 2003-2008 Fabrice Bellard

 *

 * Permission is hereby granted, free of charge, to any person obtaining a copy

 * of this software and associated documentation files (the "Software"), to deal

 * in the Software without restriction, including without limitation the rights

 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell

 * copies of the Software, and to permit persons to whom the Software is

 * furnished to do so, subject to the following conditions:

 *

 * The above copyright notice and this permission notice shall be included in

 * all copies or substantial portions of the Software.

 *

 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL

 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER

 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,

 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN

 * THE SOFTWARE.

 */

#include <unistd.h>

#include <fcntl.h>

#include <signal.h>

#include <time.h>

#include <errno.h>

#include <sys/time.h>

#include <zlib.h>

#include "qemu/bitmap.h"

/* Needed early for CONFIG_BSD etc. */

#include "config-host.h"

#ifndef _WIN32

#include <libgen.h>

#include <sys/times.h>

#include <sys/wait.h>

#include <termios.h>

#include <sys/mman.h>

#include <sys/ioctl.h>

#include <sys/resource.h>

#include <sys/socket.h>

#include <netinet/in.h>

#include <net/if.h>

#include <arpa/inet.h>

#include <dirent.h>

#include <netdb.h>

#include <sys/select.h>

#ifdef CONFIG_BSD

#include <sys/stat.h>

#if defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__DragonFly__)

#include <sys/sysctl.h>

#else

#include <util.h>

#endif

#else

#ifdef __linux__

#include <malloc.h>

#include <linux/ppdev.h>

#include <linux/parport.h>

#endif

#ifdef CONFIG_SECCOMP

#include "sysemu/seccomp.h"

#endif

#ifdef __sun__

#include <sys/stat.h>

#include <sys/ethernet.h>

#include <sys/sockio.h>

#include <netinet/arp.h>

#include <netinet/in_systm.h>

#include <netinet/ip.h>

#include <netinet/ip_icmp.h> // must come after ip.h

#include <netinet/udp.h>

#include <netinet/tcp.h>

#include <net/if.h>

#include <syslog.h>

#include <stropts.h>

#endif

#endif

#endif

#if defined(CONFIG_VDE)

#include <libvdeplug.h>

#endif

#ifdef _WIN32

#include <windows.h>

#endif

#ifdef CONFIG_SDL

#if defined(__APPLE__) || defined(main)

#include <SDL.h>

int qemu_main(int argc, char **argv, char **envp);

int main(int argc, char **argv)

{

    return qemu_main(argc, argv, NULL);

}

#undef main

#define main qemu_main

#endif

#endif /* CONFIG_SDL */

#ifdef CONFIG_COCOA

#undef main

#define main qemu_main

#endif /* CONFIG_COCOA */

#include <glib.h>

#include "hw/hw.h"

#include "hw/boards.h"

#include "hw/usb.h"

#include "hw/pcmcia.h"

#include "hw/pc.h"

#include "hw/isa.h"

#include "hw/baum.h"

#include "hw/bt.h"

#include "hw/watchdog.h"

#include "hw/smbios.h"

#include "hw/xen.h"

#include "hw/qdev.h"

#include "hw/loader.h"

#include "bt/bt.h"

#include "net/net.h"

#include "net/slirp.h"

#include "monitor/monitor.h"

#include "ui/console.h"

#include "sysemu/sysemu.h"

#include "exec/gdbstub.h"

#include "qemu/timer.h"

#include "char/char.h"

#include "qemu/cache-utils.h"

#include "sysemu/blockdev.h"

#include "hw/block-common.h"

#include "migration/block.h"

#include "sysemu/dma.h"

#include "audio/audio.h"

#include "migration/migration.h"

#include "sysemu/kvm.h"

#include "qapi/qmp/qjson.h"

#include "qemu/option.h"

#include "qemu/config-file.h"

#include "qemu-options.h"

#include "qmp-commands.h"

#include "qemu/main-loop.h"

#ifdef CONFIG_VIRTFS

#include "fsdev/qemu-fsdev.h"

#endif

#include "sysemu/qtest.h"

#include "disas/disas.h"

#include "qemu/sockets.h"

#include "slirp/libslirp.h"

#include "trace.h"

#include "trace/control.h"

#include "qemu/queue.h"

#include "sysemu/cpus.h"

#include "sysemu/arch_init.h"

#include "qemu/osdep.h"

#include "ui/qemu-spice.h"

#include "qapi/string-input-visitor.h"

//#define DEBUG_NET

//#define DEBUG_SLIRP

#define DEFAULT_RAM_SIZE 128

#define MAX_VIRTIO_CONSOLES 1

static const char *data_dir;

const char *bios_name = NULL;

enum vga_retrace_method vga_retrace_method = VGA_RETRACE_DUMB;

DisplayType display_type = DT_DEFAULT;

static int display_remote;

const char* keyboard_layout = NULL;

ram_addr_t ram_size;

const char *mem_path = NULL;

#ifdef MAP_POPULATE

int mem_prealloc = 0; /* force preallocation of physical target memory */

#endif

int nb_nics;

NICInfo nd_table[MAX_NICS];

int autostart;

static int rtc_utc = 1;

static int rtc_date_offset = -1; /* -1 means no change */

QEMUClock *rtc_clock;

int vga_interface_type = VGA_NONE;

static int full_screen = 0;

#ifdef CONFIG_SDL

static int no_frame = 0;

#endif

int no_quit = 0;

CharDriverState *serial_hds[MAX_SERIAL_PORTS];

CharDriverState *parallel_hds[MAX_PARALLEL_PORTS];

CharDriverState *virtcon_hds[MAX_VIRTIO_CONSOLES];

int win2k_install_hack = 0;

int singlestep = 0;

int smp_cpus = 1;

int max_cpus = 0;

int smp_cores = 1;

int smp_threads = 1;

#ifdef CONFIG_VNC

const char *vnc_display;

#endif

int acpi_enabled = 1;

int no_hpet = 0;

int fd_bootchk = 1;

static int no_reboot;

int no_shutdown = 0;

int cursor_hide = 1;

int graphic_rotate = 0;

const char *watchdog;

QEMUOptionRom option_rom[MAX_OPTION_ROMS];

int nb_option_roms;

int semihosting_enabled = 0;

int old_param = 0;

const char *qemu_name;

int alt_grab = 0;

int ctrl_grab = 0;

unsigned int nb_prom_envs = 0;

const char *prom_envs[MAX_PROM_ENVS];

int boot_menu;

uint8_t *boot_splash_filedata;

int boot_splash_filedata_size;

uint8_t qemu_extra_params_fw[2];

typedef struct FWBootEntry FWBootEntry;

struct FWBootEntry {

    QTAILQ_ENTRY(FWBootEntry) link;

    int32_t bootindex;

    DeviceState *dev;

    char *suffix;

};

static QTAILQ_HEAD(, FWBootEntry) fw_boot_order =

    QTAILQ_HEAD_INITIALIZER(fw_boot_order);

int nb_numa_nodes;

uint64_t node_mem[MAX_NODES];

unsigned long *node_cpumask[MAX_NODES];

uint8_t qemu_uuid[16];

static QEMUBootSetHandler *boot_set_handler;

static void *boot_set_opaque;

static NotifierList exit_notifiers =

    NOTIFIER_LIST_INITIALIZER(exit_notifiers);

static NotifierList machine_init_done_notifiers =

    NOTIFIER_LIST_INITIALIZER(machine_init_done_notifiers);

static int tcg_allowed = 1;

int kvm_allowed = 0;

int xen_allowed = 0;

uint32_t xen_domid;

enum xen_mode xen_mode = XEN_EMULATE;

static int tcg_tb_size;

static int default_serial = 1;

static int default_parallel = 1;

static int default_virtcon = 1;

static int default_monitor = 1;

static int default_floppy = 1;

static int default_cdrom = 1;

static int default_sdcard = 1;

static int default_vga = 1;

static struct {

    const char *driver;

    int *flag;

} default_list[] = {

    { .driver = "isa-serial",           .flag = &default_serial    },

    { .driver = "isa-parallel",         .flag = &default_parallel  },

    { .driver = "isa-fdc",              .flag = &default_floppy    },

    { .driver = "ide-cd",               .flag = &default_cdrom     },

    { .driver = "ide-hd",               .flag = &default_cdrom     },

    { .driver = "ide-drive",            .flag = &default_cdrom     },

    { .driver = "scsi-cd",              .flag = &default_cdrom     },

    { .driver = "virtio-serial-pci",    .flag = &default_virtcon   },

    { .driver = "virtio-serial-s390",   .flag = &default_virtcon   },

    { .driver = "virtio-serial",        .flag = &default_virtcon   },

    { .driver = "VGA",                  .flag = &default_vga       },

    { .driver = "isa-vga",              .flag = &default_vga       },

    { .driver = "cirrus-vga",           .flag = &default_vga       },

    { .driver = "isa-cirrus-vga",       .flag = &default_vga       },

    { .driver = "vmware-svga",          .flag = &default_vga       },

    { .driver = "qxl-vga",              .flag = &default_vga       },

};

static QemuOptsList qemu_rtc_opts = {

    .name = "rtc",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_rtc_opts.head),

    .desc = {

        {

            .name = "base",

            .type = QEMU_OPT_STRING,

        },{

            .name = "clock",

            .type = QEMU_OPT_STRING,

        },{

            .name = "driftfix",

            .type = QEMU_OPT_STRING,

        },

        { /* end of list */ }

    },

};

static QemuOptsList qemu_sandbox_opts = {

    .name = "sandbox",

    .implied_opt_name = "enable",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_sandbox_opts.head),

    .desc = {

        {

            .name = "enable",

            .type = QEMU_OPT_BOOL,

        },

        { /* end of list */ }

    },

};

static QemuOptsList qemu_trace_opts = {

    .name = "trace",

    .implied_opt_name = "trace",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_trace_opts.head),

    .desc = {

        {

            .name = "events",

            .type = QEMU_OPT_STRING,

        },{

            .name = "file",

            .type = QEMU_OPT_STRING,

        },

        { /* end of list */ }

    },

};

static QemuOptsList qemu_option_rom_opts = {

    .name = "option-rom",

    .implied_opt_name = "romfile",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_option_rom_opts.head),

    .desc = {

        {

            .name = "bootindex",

            .type = QEMU_OPT_NUMBER,

        }, {

            .name = "romfile",

            .type = QEMU_OPT_STRING,

        },

        { /* end of list */ }

    },

};

static QemuOptsList qemu_machine_opts = {

    .name = "machine",

    .implied_opt_name = "type",

    .merge_lists = true,

    .head = QTAILQ_HEAD_INITIALIZER(qemu_machine_opts.head),

    .desc = {

        {

            .name = "type",

            .type = QEMU_OPT_STRING,

            .help = "emulated machine"

        }, {

            .name = "accel",

            .type = QEMU_OPT_STRING,

            .help = "accelerator list",

        }, {

            .name = "kernel_irqchip",

            .type = QEMU_OPT_BOOL,

            .help = "use KVM in-kernel irqchip",

        }, {

            .name = "kvm_shadow_mem",

            .type = QEMU_OPT_SIZE,

            .help = "KVM shadow MMU size",

        }, {

            .name = "kernel",

            .type = QEMU_OPT_STRING,

            .help = "Linux kernel image file",

        }, {

            .name = "initrd",

            .type = QEMU_OPT_STRING,

            .help = "Linux initial ramdisk file",

        }, {

            .name = "append",

            .type = QEMU_OPT_STRING,

            .help = "Linux kernel command line",

        }, {

            .name = "dtb",

            .type = QEMU_OPT_STRING,

            .help = "Linux kernel device tree file",

        }, {

            .name = "dumpdtb",

            .type = QEMU_OPT_STRING,

            .help = "Dump current dtb to a file and quit",

        }, {

            .name = "phandle_start",

            .type = QEMU_OPT_STRING,

            .help = "The first phandle ID we may generate dynamically",

        }, {

            .name = "dt_compatible",

            .type = QEMU_OPT_STRING,

            .help = "Overrides the \"compatible\" property of the dt root node",

        }, {

            .name = "dump-guest-core",

            .type = QEMU_OPT_BOOL,

            .help = "Include guest memory in  a core dump",

        }, {

            .name = "mem-merge",

            .type = QEMU_OPT_BOOL,

            .help = "enable/disable memory merge support",

        },{

            .name = "usb",

            .type = QEMU_OPT_BOOL,

            .help = "Set on/off to enable/disable usb",

        },

        { /* End of list */ }

    },

};

static QemuOptsList qemu_boot_opts = {

    .name = "boot-opts",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_boot_opts.head),

    .desc = {

        /* the three names below are not used now */

        {

            .name = "order",

            .type = QEMU_OPT_STRING,

        }, {

            .name = "once",

            .type = QEMU_OPT_STRING,

        }, {

            .name = "menu",

            .type = QEMU_OPT_STRING,

        /* following are really used */

        }, {

            .name = "splash",

            .type = QEMU_OPT_STRING,

        }, {

            .name = "splash-time",

            .type = QEMU_OPT_STRING,

        }, {

            .name = "reboot-timeout",

            .type = QEMU_OPT_STRING,

        },

        { /*End of list */ }

    },

};

static QemuOptsList qemu_add_fd_opts = {

    .name = "add-fd",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_add_fd_opts.head),

    .desc = {

        {

            .name = "fd",

            .type = QEMU_OPT_NUMBER,

            .help = "file descriptor of which a duplicate is added to fd set",

        },{

            .name = "set",

            .type = QEMU_OPT_NUMBER,

            .help = "ID of the fd set to add fd to",

        },{

            .name = "opaque",

            .type = QEMU_OPT_STRING,

            .help = "free-form string used to describe fd",

        },

        { /* end of list */ }

    },

};

static QemuOptsList qemu_object_opts = {

    .name = "object",

    .implied_opt_name = "qom-type",

    .head = QTAILQ_HEAD_INITIALIZER(qemu_object_opts.head),

    .desc = {

        { }

    },

};

const char *qemu_get_vm_name(void)

{

    return qemu_name;

}

static void res_free(void)

{

    if (boot_splash_filedata != NULL) {

        g_free(boot_splash_filedata);

        boot_splash_filedata = NULL;

    }

}

static int default_driver_check(QemuOpts *opts, void *opaque)

{

    const char *driver = qemu_opt_get(opts, "driver");

    int i;

    if (!driver)

        return 0;

    for (i = 0; i < ARRAY_SIZE(default_list); i++) {

        if (strcmp(default_list[i].driver, driver) != 0)

            continue;

        *(default_list[i].flag) = 0;

    }

    return 0;

}

/***********************************************************/

/* QEMU state */

static RunState current_run_state = RUN_STATE_PRELAUNCH;

typedef struct {

    RunState from;

    RunState to;

} RunStateTransition;

static const RunStateTransition runstate_transitions_def[] = {

    /*     from      ->     to      */

    { RUN_STATE_DEBUG, RUN_STATE_RUNNING },

    { RUN_STATE_INMIGRATE, RUN_STATE_RUNNING },

    { RUN_STATE_INMIGRATE, RUN_STATE_PAUSED },

    { RUN_STATE_INTERNAL_ERROR, RUN_STATE_PAUSED },

    { RUN_STATE_INTERNAL_ERROR, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_IO_ERROR, RUN_STATE_RUNNING },

    { RUN_STATE_IO_ERROR, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_PAUSED, RUN_STATE_RUNNING },

    { RUN_STATE_PAUSED, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_POSTMIGRATE, RUN_STATE_RUNNING },

    { RUN_STATE_POSTMIGRATE, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_PRELAUNCH, RUN_STATE_RUNNING },

    { RUN_STATE_PRELAUNCH, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_PRELAUNCH, RUN_STATE_INMIGRATE },

    { RUN_STATE_FINISH_MIGRATE, RUN_STATE_RUNNING },

    { RUN_STATE_FINISH_MIGRATE, RUN_STATE_POSTMIGRATE },

    { RUN_STATE_RESTORE_VM, RUN_STATE_RUNNING },

    { RUN_STATE_RUNNING, RUN_STATE_DEBUG },

    { RUN_STATE_RUNNING, RUN_STATE_INTERNAL_ERROR },

    { RUN_STATE_RUNNING, RUN_STATE_IO_ERROR },

    { RUN_STATE_RUNNING, RUN_STATE_PAUSED },

    { RUN_STATE_RUNNING, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_RUNNING, RUN_STATE_RESTORE_VM },

    { RUN_STATE_RUNNING, RUN_STATE_SAVE_VM },

    { RUN_STATE_RUNNING, RUN_STATE_SHUTDOWN },

    { RUN_STATE_RUNNING, RUN_STATE_WATCHDOG },

    { RUN_STATE_SAVE_VM, RUN_STATE_RUNNING },

    { RUN_STATE_SHUTDOWN, RUN_STATE_PAUSED },

    { RUN_STATE_SHUTDOWN, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_DEBUG, RUN_STATE_SUSPENDED },

    { RUN_STATE_RUNNING, RUN_STATE_SUSPENDED },

    { RUN_STATE_SUSPENDED, RUN_STATE_RUNNING },

    { RUN_STATE_SUSPENDED, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_WATCHDOG, RUN_STATE_RUNNING },

    { RUN_STATE_WATCHDOG, RUN_STATE_FINISH_MIGRATE },

    { RUN_STATE_MAX, RUN_STATE_MAX },

};

static bool runstate_valid_transitions[RUN_STATE_MAX][RUN_STATE_MAX];

bool runstate_check(RunState state)

{

    return current_run_state == state;

}

static void runstate_init(void)

{

    const RunStateTransition *p;

    memset(&runstate_valid_transitions, 0, sizeof(runstate_valid_transitions));

    for (p = &runstate_transitions_def[0]; p->from != RUN_STATE_MAX; p++) {

        runstate_valid_transitions[p->from][p->to] = true;

    }

}

/* This function will abort() on invalid state transitions */

void runstate_set(RunState new_state)

{

    assert(new_state < RUN_STATE_MAX);

    if (!runstate_valid_transitions[current_run_state][new_state]) {

        fprintf(stderr, "ERROR: invalid runstate transition: '%s' -> '%s'\n",

                RunState_lookup[current_run_state],

                RunState_lookup[new_state]);

        abort();

    }

    current_run_state = new_state;

}

int runstate_is_running(void)

{

    return runstate_check(RUN_STATE_RUNNING);

}

StatusInfo *qmp_query_status(Error **errp)

{

    StatusInfo *info = g_malloc0(sizeof(*info));

    info->running = runstate_is_running();

    info->singlestep = singlestep;

    info->status = current_run_state;

    return info;

}

/***********************************************************/

/* real time host monotonic timer */

/***********************************************************/

/* host time/date access */

void qemu_get_timedate(struct tm *tm, int offset)

{

    time_t ti;

    time(&ti);

    ti += offset;

    if (rtc_date_offset == -1) {

        if (rtc_utc)

            gmtime_r(&ti, tm);

        else

            localtime_r(&ti, tm);

    } else {

        ti -= rtc_date_offset;

        gmtime_r(&ti, tm);

    }

}

int qemu_timedate_diff(struct tm *tm)

{

    time_t seconds;

    if (rtc_date_offset == -1)

        if (rtc_utc)

            seconds = mktimegm(tm);

        else {

            struct tm tmp = *tm;

            tmp.tm_isdst = -1; /* use timezone to figure it out */

            seconds = mktime(&tmp);

        }

    else

        seconds = mktimegm(tm) + rtc_date_offset;

    return seconds - time(NULL);

}

void rtc_change_mon_event(struct tm *tm)

{

    QObject *data;

    data = qobject_from_jsonf("{ 'offset': %d }", qemu_timedate_diff(tm));

    monitor_protocol_event(QEVENT_RTC_CHANGE, data);

    qobject_decref(data);

}

static void configure_rtc_date_offset(const char *startdate, int legacy)

{

    time_t rtc_start_date;

    struct tm tm;

    if (!strcmp(startdate, "now") && legacy) {

        rtc_date_offset = -1;

    } else {

        if (sscanf(startdate, "%d-%d-%dT%d:%d:%d",

                   &tm.tm_year,

                   &tm.tm_mon,

                   &tm.tm_mday,

                   &tm.tm_hour,

                   &tm.tm_min,

                   &tm.tm_sec) == 6) {

            /* OK */

        } else if (sscanf(startdate, "%d-%d-%d",

                          &tm.tm_year,

                          &tm.tm_mon,

                          &tm.tm_mday) == 3) {

            tm.tm_hour = 0;

            tm.tm_min = 0;

            tm.tm_sec = 0;

        } else {

            goto date_fail;

        }

        tm.tm_year -= 1900;

        tm.tm_mon--;

        rtc_start_date = mktimegm(&tm);

        if (rtc_start_date == -1) {

        date_fail:

            fprintf(stderr, "Invalid date format. Valid formats are:\n"

                            "'2006-06-17T16:01:21' or '2006-06-17'\n");

            exit(1);

        }

        rtc_date_offset = time(NULL) - rtc_start_date;

    }

}

static void configure_rtc(QemuOpts *opts)

{

    const char *value;

    value = qemu_opt_get(opts, "base");

    if (value) {

        if (!strcmp(value, "utc")) {

            rtc_utc = 1;

        } else if (!strcmp(value, "localtime")) {

            rtc_utc = 0;

        } else {

            configure_rtc_date_offset(value, 0);

        }

    }

    value = qemu_opt_get(opts, "clock");

    if (value) {

        if (!strcmp(value, "host")) {

            rtc_clock = host_clock;

        } else if (!strcmp(value, "rt")) {

            rtc_clock = rt_clock;

        } else if (!strcmp(value, "vm")) {

            rtc_clock = vm_clock;

        } else {

            fprintf(stderr, "qemu: invalid option value '%s'\n", value);

            exit(1);

        }

    }

    value = qemu_opt_get(opts, "driftfix");

    if (value) {

        if (!strcmp(value, "slew")) {

            static GlobalProperty slew_lost_ticks[] = {

                {

                    .driver   = "mc146818rtc",

                    .property = "lost_tick_policy",

                    .value    = "slew",

                },

                { /* end of list */ }

            };

            qdev_prop_register_global_list(slew_lost_ticks);

        } else if (!strcmp(value, "none")) {

            /* discard is default */

        } else {

            fprintf(stderr, "qemu: invalid option value '%s'\n", value);

            exit(1);

        }

    }

}

/***********************************************************/

/* Bluetooth support */

static int nb_hcis;

static int cur_hci;

static struct HCIInfo *hci_table[MAX_NICS];

static struct bt_vlan_s {

    struct bt_scatternet_s net;

    int id;

    struct bt_vlan_s *next;

} *first_bt_vlan;

/* find or alloc a new bluetooth "VLAN" */

static struct bt_scatternet_s *qemu_find_bt_vlan(int id)

{

    struct bt_vlan_s **pvlan, *vlan;

    for (vlan = first_bt_vlan; vlan != NULL; vlan = vlan->next) {

        if (vlan->id == id)

            return &vlan->net;

    }

    vlan = g_malloc0(sizeof(struct bt_vlan_s));

    vlan->id = id;

    pvlan = &first_bt_vlan;

    while (*pvlan != NULL)

        pvlan = &(*pvlan)->next;

    *pvlan = vlan;

    return &vlan->net;

}

static void null_hci_send(struct HCIInfo *hci, const uint8_t *data, int len)

{

}

static int null_hci_addr_set(struct HCIInfo *hci, const uint8_t *bd_addr)

{

    return -ENOTSUP;

}

static struct HCIInfo null_hci = {

    .cmd_send = null_hci_send,

    .sco_send = null_hci_send,

    .acl_send = null_hci_send,

    .bdaddr_set = null_hci_addr_set,

};

struct HCIInfo *qemu_next_hci(void)

{

    if (cur_hci == nb_hcis)

        return &null_hci;

    return hci_table[cur_hci++];

}

static struct HCIInfo *hci_init(const char *str)

{

    char *endp;

    struct bt_scatternet_s *vlan = 0;

    if (!strcmp(str, "null"))

        /* null */

        return &null_hci;

    else if (!strncmp(str, "host", 4) && (str[4] == '\0' || str[4] == ':'))

        /* host[:hciN] */

        return bt_host_hci(str[4] ? str + 5 : "hci0");

    else if (!strncmp(str, "hci", 3)) {

        /* hci[,vlan=n] */

        if (str[3]) {

            if (!strncmp(str + 3, ",vlan=", 6)) {

                vlan = qemu_find_bt_vlan(strtol(str + 9, &endp, 0));

                if (*endp)

                    vlan = 0;

            }

        } else

            vlan = qemu_find_bt_vlan(0);

        if (vlan)

           return bt_new_hci(vlan);

    }

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

    return 0;

}

static int bt_hci_parse(const char *str)

{

    struct HCIInfo *hci;

    bdaddr_t bdaddr;