[qemu.git] / hw / pc.c

/*
 * QEMU PC System Emulator
 * 
 * Copyright (c) 2003-2004 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 "vl.h"

/* output Bochs bios info messages */
//#define DEBUG_BIOS

#define BIOS_FILENAME "bios.bin"
#define VGABIOS_FILENAME "vgabios.bin"
#define LINUX_BOOT_FILENAME "linux_boot.bin"

#define KERNEL_LOAD_ADDR     0x00100000
#define INITRD_LOAD_ADDR     0x00400000
#define KERNEL_PARAMS_ADDR   0x00090000
#define KERNEL_CMDLINE_ADDR  0x00099000

int speaker_data_on;
int dummy_refresh_clock;
static fdctrl_t *floppy_controller;
static RTCState *rtc_state;

static void ioport80_write(void *opaque, uint32_t addr, uint32_t data)
{
}

/* PC cmos mappings */

#define REG_EQUIPMENT_BYTE          0x14
#define REG_IBM_CENTURY_BYTE        0x32
#define REG_IBM_PS2_CENTURY_BYTE    0x37


static inline int to_bcd(RTCState *s, int a)
{
    return ((a / 10) << 4) | (a % 10);
}

static void cmos_init(int ram_size, int boot_device)
{
    RTCState *s = rtc_state;
    int val;
    int fd0, fd1, nb;
    time_t ti;
    struct tm *tm;

    /* set the CMOS date */
    time(&ti);
    tm = gmtime(&ti);
    rtc_set_date(s, tm);

    val = to_bcd(s, (tm->tm_year / 100) + 19);
    rtc_set_memory(s, REG_IBM_CENTURY_BYTE, val);
    rtc_set_memory(s, REG_IBM_PS2_CENTURY_BYTE, val);

    /* various important CMOS locations needed by PC/Bochs bios */

    /* memory size */
    val = 640; /* base memory in K */
    rtc_set_memory(s, 0x15, val);
    rtc_set_memory(s, 0x16, val >> 8);

    val = (ram_size / 1024) - 1024;
    if (val > 65535)
        val = 65535;
    rtc_set_memory(s, 0x17, val);
    rtc_set_memory(s, 0x18, val >> 8);
    rtc_set_memory(s, 0x30, val);
    rtc_set_memory(s, 0x31, val >> 8);

    val = (ram_size / 65536) - ((16 * 1024 * 1024) / 65536);
    if (val > 65535)
        val = 65535;
    rtc_set_memory(s, 0x34, val);
    rtc_set_memory(s, 0x35, val >> 8);
    
    switch(boot_device) {
    case 'a':
    case 'b':
        rtc_set_memory(s, 0x3d, 0x01); /* floppy boot */
        break;
    default:
    case 'c':
        rtc_set_memory(s, 0x3d, 0x02); /* hard drive boot */
        break;
    case 'd':
        rtc_set_memory(s, 0x3d, 0x03); /* CD-ROM boot */
        break;
    }

    /* floppy type */

    fd0 = fdctrl_get_drive_type(floppy_controller, 0);
    fd1 = fdctrl_get_drive_type(floppy_controller, 1);

    val = 0;
    switch (fd0) {
    case 0:
        /* 1.44 Mb 3"5 drive */
        val |= 0x40;
        break;
    case 1:
        /* 2.88 Mb 3"5 drive */
        val |= 0x60;
        break;
    case 2:
        /* 1.2 Mb 5"5 drive */
        val |= 0x20;
        break;
    }
    switch (fd1) {
    case 0:
        /* 1.44 Mb 3"5 drive */
        val |= 0x04;
        break;
    case 1:
        /* 2.88 Mb 3"5 drive */
        val |= 0x06;
        break;
    case 2:
        /* 1.2 Mb 5"5 drive */
        val |= 0x02;
        break;
    }
    rtc_set_memory(s, 0x10, val);
    
    val = 0;
    nb = 0;
    if (fd0 < 3)
        nb++;
    if (fd1 < 3)
        nb++;
    switch (nb) {
    case 0:
        break;
    case 1:
        val |= 0x01; /* 1 drive, ready for boot */
        break;
    case 2:
        val |= 0x41; /* 2 drives, ready for boot */
        break;
    }
    val |= 0x02; /* FPU is there */
    val |= 0x04; /* PS/2 mouse installed */
    rtc_set_memory(s, REG_EQUIPMENT_BYTE, val);

}

static void speaker_ioport_write(void *opaque, uint32_t addr, uint32_t val)
{
    speaker_data_on = (val >> 1) & 1;
    pit_set_gate(&pit_channels[2], val & 1);
}

static uint32_t speaker_ioport_read(void *opaque, uint32_t addr)
{
    int out;
    out = pit_get_out(&pit_channels[2], qemu_get_clock(vm_clock));
    dummy_refresh_clock ^= 1;
    return (speaker_data_on << 1) | pit_channels[2].gate | (out << 5) |
      (dummy_refresh_clock << 4);
}

static void ioport92_write(void *opaque, uint32_t addr, uint32_t val)
{
    cpu_x86_set_a20(cpu_single_env, (val >> 1) & 1);
    /* XXX: bit 0 is fast reset */
}

static uint32_t ioport92_read(void *opaque, uint32_t addr)
{
    return ((cpu_single_env->a20_mask >> 20) & 1) << 1;
}

/***********************************************************/
/* Bochs BIOS debug ports */

void bochs_bios_write(void *opaque, uint32_t addr, uint32_t val)
{
    switch(addr) {
        /* Bochs BIOS messages */
    case 0x400:
    case 0x401:
        fprintf(stderr, "BIOS panic at rombios.c, line %d\n", val);
        exit(1);
    case 0x402:
    case 0x403:
#ifdef DEBUG_BIOS
        fprintf(stderr, "%c", val);
#endif
        break;

        /* LGPL'ed VGA BIOS messages */
    case 0x501:
    case 0x502:
        fprintf(stderr, "VGA BIOS panic, line %d\n", val);
        exit(1);
    case 0x500:
    case 0x503:
#ifdef DEBUG_BIOS
        fprintf(stderr, "%c", val);
#endif
        break;
    }
}

void bochs_bios_init(void)
{
    register_ioport_write(0x400, 1, 2, bochs_bios_write, NULL);
    register_ioport_write(0x401, 1, 2, bochs_bios_write, NULL);
    register_ioport_write(0x402, 1, 1, bochs_bios_write, NULL);
    register_ioport_write(0x403, 1, 1, bochs_bios_write, NULL);

    register_ioport_write(0x501, 1, 2, bochs_bios_write, NULL);
    register_ioport_write(0x502, 1, 2, bochs_bios_write, NULL);
    register_ioport_write(0x500, 1, 1, bochs_bios_write, NULL);
    register_ioport_write(0x503, 1, 1, bochs_bios_write, NULL);
}


int load_kernel(const char *filename, uint8_t *addr, 
                uint8_t *real_addr)
{
    int fd, size;
    int setup_sects;

    fd = open(filename, O_RDONLY);
    if (fd < 0)
        return -1;

    /* load 16 bit code */
    if (read(fd, real_addr, 512) != 512)
        goto fail;
    setup_sects = real_addr[0x1F1];
    if (!setup_sects)
        setup_sects = 4;
    if (read(fd, real_addr + 512, setup_sects * 512) != 
        setup_sects * 512)
        goto fail;
    
    /* load 32 bit code */
    size = read(fd, addr, 16 * 1024 * 1024);
    if (size < 0)
        goto fail;
    close(fd);
    return size;
 fail:
    close(fd);
    return -1;
}

static const int ide_iobase[2] = { 0x1f0, 0x170 };
static const int ide_iobase2[2] = { 0x3f6, 0x376 };
static const int ide_irq[2] = { 14, 15 };

#define NE2000_NB_MAX 6

static uint32_t ne2000_io[NE2000_NB_MAX] = { 0x300, 0x320, 0x340, 0x360, 0x280, 0x380 };
static int ne2000_irq[NE2000_NB_MAX] = { 9, 10, 11, 3, 4, 5 };

/* PC hardware initialisation */
void pc_init(int ram_size, int vga_ram_size, int boot_device,
             DisplayState *ds, const char **fd_filename, int snapshot,
             const char *kernel_filename, const char *kernel_cmdline,
             const char *initrd_filename)
{
    char buf[1024];
    int ret, linux_boot, initrd_size, i, nb_nics1, fd;

    linux_boot = (kernel_filename != NULL);

    /* allocate RAM */
    cpu_register_physical_memory(0, ram_size, 0);

    /* BIOS load */
    snprintf(buf, sizeof(buf), "%s/%s", bios_dir, BIOS_FILENAME);
    ret = load_image(buf, phys_ram_base + 0x000f0000);
    if (ret != 0x10000) {
        fprintf(stderr, "qemu: could not load PC bios '%s'\n", buf);
        exit(1);
    }
    
    /* VGA BIOS load */
    snprintf(buf, sizeof(buf), "%s/%s", bios_dir, VGABIOS_FILENAME);
    ret = load_image(buf, phys_ram_base + 0x000c0000);
    
    /* setup basic memory access */
    cpu_register_physical_memory(0xc0000, 0x10000, 0xc0000 | IO_MEM_ROM);
    cpu_register_physical_memory(0xd0000, 0x20000, IO_MEM_UNASSIGNED);
    cpu_register_physical_memory(0xf0000, 0x10000, 0xf0000 | IO_MEM_ROM);
    
    bochs_bios_init();

    if (linux_boot) {
        uint8_t bootsect[512];

        if (bs_table[0] == NULL) {
            fprintf(stderr, "A disk image must be given for 'hda' when booting a Linux kernel\n");
            exit(1);
        }
        snprintf(buf, sizeof(buf), "%s/%s", bios_dir, LINUX_BOOT_FILENAME);
        ret = load_image(buf, bootsect);
        if (ret != sizeof(bootsect)) {
            fprintf(stderr, "qemu: could not load linux boot sector '%s'\n",
                    buf);
            exit(1);
        }

        bdrv_set_boot_sector(bs_table[0], bootsect, sizeof(bootsect));

        /* now we can load the kernel */
        ret = load_kernel(kernel_filename, 
                          phys_ram_base + KERNEL_LOAD_ADDR,
                          phys_ram_base + KERNEL_PARAMS_ADDR);
        if (ret < 0) {
            fprintf(stderr, "qemu: could not load kernel '%s'\n", 
                    kernel_filename);
            exit(1);
        }
        
        /* load initrd */
        initrd_size = 0;
        if (initrd_filename) {
            initrd_size = load_image(initrd_filename, phys_ram_base + INITRD_LOAD_ADDR);
            if (initrd_size < 0) {
                fprintf(stderr, "qemu: could not load initial ram disk '%s'\n", 
                        initrd_filename);
                exit(1);
            }
        }
        if (initrd_size > 0) {
            stl_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x218, INITRD_LOAD_ADDR);
            stl_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x21c, initrd_size);
        }
        pstrcpy(phys_ram_base + KERNEL_CMDLINE_ADDR, 4096,
                kernel_cmdline);
        stw_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x20, 0xA33F);
        stw_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x22,
                KERNEL_CMDLINE_ADDR - KERNEL_PARAMS_ADDR);
        /* loader type */
        stw_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x210, 0x01);
    }

    /* init basic PC hardware */
    register_ioport_write(0x80, 1, 1, ioport80_write, NULL);

    vga_initialize(ds, phys_ram_base + ram_size, ram_size, 
                   vga_ram_size);

    rtc_state = rtc_init(0x70, 8);
    register_ioport_read(0x61, 1, 1, speaker_ioport_read, NULL);
    register_ioport_write(0x61, 1, 1, speaker_ioport_write, NULL);

    register_ioport_read(0x92, 1, 1, ioport92_read, NULL);
    register_ioport_write(0x92, 1, 1, ioport92_write, NULL);

    pic_init();
    pit_init(0x40, 0);

    fd = serial_open_device();
    serial_init(0x3f8, 4, fd);

    nb_nics1 = nb_nics;
    if (nb_nics1 > NE2000_NB_MAX)
        nb_nics1 = NE2000_NB_MAX;
    for(i = 0; i < nb_nics1; i++) {
        ne2000_init(ne2000_io[i], ne2000_irq[i], &nd_table[i]);
    }

    for(i = 0; i < 2; i++) {
        ide_init(ide_iobase[i], ide_iobase2[i], ide_irq[i],
                 bs_table[2 * i], bs_table[2 * i + 1]);
    }
    kbd_init();
    DMA_init();

#ifndef _WIN32
    /* no audio supported yet for win32 */
    AUD_init();
    SB16_init();
#endif

    floppy_controller = fdctrl_init(6, 2, 0, 0x3f0, fd_table);

    cmos_init(ram_size, boot_device);
}
Commit	Line	Data
80cabfad FB	1	/*
	2	* QEMU PC System Emulator
	3	*
	4	* Copyright (c) 2003-2004 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	*/
80cabfad FB	24	#include "vl.h"
80cabfad FB	25
b41a2cd1 FB	26	/* output Bochs bios info messages */
	27	//#define DEBUG_BIOS
	28
80cabfad FB	29	#define BIOS_FILENAME "bios.bin"
	30	#define VGABIOS_FILENAME "vgabios.bin"
	31	#define LINUX_BOOT_FILENAME "linux_boot.bin"
	32
	33	#define KERNEL_LOAD_ADDR 0x00100000
	34	#define INITRD_LOAD_ADDR 0x00400000
	35	#define KERNEL_PARAMS_ADDR 0x00090000
	36	#define KERNEL_CMDLINE_ADDR 0x00099000
	37
	38	int speaker_data_on;
	39	int dummy_refresh_clock;
baca51fa	40	static fdctrl_t *floppy_controller;
b0a21b53	41	static RTCState *rtc_state;
80cabfad	42
b41a2cd1	43	static void ioport80_write(void *opaque, uint32_t addr, uint32_t data)
80cabfad FB	44	{
	45	}
	46
b0a21b53 FB	47	/* PC cmos mappings */
b0a21b53 FB	48
80cabfad	49	#define REG_EQUIPMENT_BYTE 0x14
b0a21b53 FB	50	#define REG_IBM_CENTURY_BYTE 0x32
	51	#define REG_IBM_PS2_CENTURY_BYTE 0x37
	52
	53
	54	static inline int to_bcd(RTCState *s, int a)
	55	{
	56	return ((a / 10) << 4) \| (a % 10);
	57	}
80cabfad FB	58
	59	static void cmos_init(int ram_size, int boot_device)
	60	{
b0a21b53	61	RTCState *s = rtc_state;
80cabfad	62	int val;
b41a2cd1	63	int fd0, fd1, nb;
b0a21b53 FB	64	time_t ti;
	65	struct tm *tm;
	66
	67	/* set the CMOS date */
	68	time(&ti);
	69	tm = gmtime(&ti);
	70	rtc_set_date(s, tm);
	71
	72	val = to_bcd(s, (tm->tm_year / 100) + 19);
	73	rtc_set_memory(s, REG_IBM_CENTURY_BYTE, val);
	74	rtc_set_memory(s, REG_IBM_PS2_CENTURY_BYTE, val);
80cabfad	75
b0a21b53	76	/* various important CMOS locations needed by PC/Bochs bios */
80cabfad FB	77
80cabfad FB	78	/* memory size */
333190eb FB	79	val = 640; /* base memory in K */
	80	rtc_set_memory(s, 0x15, val);
	81	rtc_set_memory(s, 0x16, val >> 8);
	82
80cabfad FB	83	val = (ram_size / 1024) - 1024;
	84	if (val > 65535)
	85	val = 65535;
b0a21b53 FB	86	rtc_set_memory(s, 0x17, val);
	87	rtc_set_memory(s, 0x18, val >> 8);
	88	rtc_set_memory(s, 0x30, val);
	89	rtc_set_memory(s, 0x31, val >> 8);
80cabfad FB	90
	91	val = (ram_size / 65536) - ((16 * 1024 * 1024) / 65536);
	92	if (val > 65535)
	93	val = 65535;
b0a21b53 FB	94	rtc_set_memory(s, 0x34, val);
b0a21b53 FB	95	rtc_set_memory(s, 0x35, val >> 8);
80cabfad FB	96
	97	switch(boot_device) {
	98	case 'a':
	99	case 'b':
b0a21b53	100	rtc_set_memory(s, 0x3d, 0x01); /* floppy boot */
80cabfad FB	101	break;
	102	default:
	103	case 'c':
b0a21b53	104	rtc_set_memory(s, 0x3d, 0x02); /* hard drive boot */
80cabfad FB	105	break;
80cabfad FB	106	case 'd':
b0a21b53	107	rtc_set_memory(s, 0x3d, 0x03); /* CD-ROM boot */
80cabfad FB	108	break;
80cabfad FB	109	}
80cabfad	110
b41a2cd1 FB	111	/* floppy type */
b41a2cd1 FB	112
baca51fa FB	113	fd0 = fdctrl_get_drive_type(floppy_controller, 0);
baca51fa FB	114	fd1 = fdctrl_get_drive_type(floppy_controller, 1);
80cabfad	115
b0a21b53	116	val = 0;
80cabfad FB	117	switch (fd0) {
	118	case 0:
	119	/* 1.44 Mb 3"5 drive */
b0a21b53	120	val \|= 0x40;
80cabfad FB	121	break;
	122	case 1:
	123	/* 2.88 Mb 3"5 drive */
b0a21b53	124	val \|= 0x60;
80cabfad FB	125	break;
	126	case 2:
	127	/* 1.2 Mb 5"5 drive */
b0a21b53	128	val \|= 0x20;
80cabfad FB	129	break;
	130	}
	131	switch (fd1) {
	132	case 0:
	133	/* 1.44 Mb 3"5 drive */
b0a21b53	134	val \|= 0x04;
80cabfad FB	135	break;
	136	case 1:
	137	/* 2.88 Mb 3"5 drive */
b0a21b53	138	val \|= 0x06;
80cabfad FB	139	break;
	140	case 2:
	141	/* 1.2 Mb 5"5 drive */
b0a21b53	142	val \|= 0x02;
80cabfad FB	143	break;
80cabfad FB	144	}
b0a21b53 FB	145	rtc_set_memory(s, 0x10, val);
	146
	147	val = 0;
b41a2cd1	148	nb = 0;
80cabfad FB	149	if (fd0 < 3)
	150	nb++;
	151	if (fd1 < 3)
	152	nb++;
	153	switch (nb) {
	154	case 0:
	155	break;
	156	case 1:
b0a21b53	157	val \|= 0x01; /* 1 drive, ready for boot */
80cabfad FB	158	break;
80cabfad FB	159	case 2:
b0a21b53	160	val \|= 0x41; /* 2 drives, ready for boot */
80cabfad FB	161	break;
80cabfad FB	162	}
b0a21b53 FB	163	val \|= 0x02; /* FPU is there */
	164	val \|= 0x04; /* PS/2 mouse installed */
	165	rtc_set_memory(s, REG_EQUIPMENT_BYTE, val);
	166
80cabfad FB	167	}
80cabfad FB	168
b41a2cd1	169	static void speaker_ioport_write(void *opaque, uint32_t addr, uint32_t val)
80cabfad FB	170	{
	171	speaker_data_on = (val >> 1) & 1;
	172	pit_set_gate(&pit_channels[2], val & 1);
	173	}
	174
b41a2cd1	175	static uint32_t speaker_ioport_read(void *opaque, uint32_t addr)
80cabfad FB	176	{
80cabfad FB	177	int out;
b0a21b53	178	out = pit_get_out(&pit_channels[2], qemu_get_clock(vm_clock));
80cabfad FB	179	dummy_refresh_clock ^= 1;
	180	return (speaker_data_on << 1) \| pit_channels[2].gate \| (out << 5) \|
	181	(dummy_refresh_clock << 4);
	182	}
	183
e1a23744 FB	184	static void ioport92_write(void *opaque, uint32_t addr, uint32_t val)
	185	{
	186	cpu_x86_set_a20(cpu_single_env, (val >> 1) & 1);
	187	/* XXX: bit 0 is fast reset */
	188	}
	189
	190	static uint32_t ioport92_read(void *opaque, uint32_t addr)
	191	{
	192	return ((cpu_single_env->a20_mask >> 20) & 1) << 1;
	193	}
	194
80cabfad FB	195	/***********************************************************/
	196	/* Bochs BIOS debug ports */
	197
b41a2cd1	198	void bochs_bios_write(void *opaque, uint32_t addr, uint32_t val)
80cabfad FB	199	{
	200	switch(addr) {
	201	/* Bochs BIOS messages */
	202	case 0x400:
	203	case 0x401:
	204	fprintf(stderr, "BIOS panic at rombios.c, line %d\n", val);
	205	exit(1);
	206	case 0x402:
	207	case 0x403:
	208	#ifdef DEBUG_BIOS
	209	fprintf(stderr, "%c", val);
	210	#endif
	211	break;
	212
	213	/* LGPL'ed VGA BIOS messages */
	214	case 0x501:
	215	case 0x502:
	216	fprintf(stderr, "VGA BIOS panic, line %d\n", val);
	217	exit(1);
	218	case 0x500:
	219	case 0x503:
	220	#ifdef DEBUG_BIOS
	221	fprintf(stderr, "%c", val);
	222	#endif
	223	break;
	224	}
	225	}
	226
	227	void bochs_bios_init(void)
	228	{
b41a2cd1 FB	229	register_ioport_write(0x400, 1, 2, bochs_bios_write, NULL);
	230	register_ioport_write(0x401, 1, 2, bochs_bios_write, NULL);
	231	register_ioport_write(0x402, 1, 1, bochs_bios_write, NULL);
	232	register_ioport_write(0x403, 1, 1, bochs_bios_write, NULL);
	233
	234	register_ioport_write(0x501, 1, 2, bochs_bios_write, NULL);
	235	register_ioport_write(0x502, 1, 2, bochs_bios_write, NULL);
	236	register_ioport_write(0x500, 1, 1, bochs_bios_write, NULL);
	237	register_ioport_write(0x503, 1, 1, bochs_bios_write, NULL);
80cabfad FB	238	}
	239
	240
	241	int load_kernel(const char filename, uint8_t addr,
	242	uint8_t *real_addr)
	243	{
	244	int fd, size;
	245	int setup_sects;
	246
	247	fd = open(filename, O_RDONLY);
	248	if (fd < 0)
	249	return -1;
	250
	251	/* load 16 bit code */
	252	if (read(fd, real_addr, 512) != 512)
	253	goto fail;
	254	setup_sects = real_addr[0x1F1];
	255	if (!setup_sects)
	256	setup_sects = 4;
	257	if (read(fd, real_addr + 512, setup_sects * 512) !=
	258	setup_sects * 512)
	259	goto fail;
	260
	261	/* load 32 bit code */
	262	size = read(fd, addr, 16 * 1024 * 1024);
	263	if (size < 0)
	264	goto fail;
	265	close(fd);
	266	return size;
	267	fail:
	268	close(fd);
	269	return -1;
	270	}
	271
b41a2cd1 FB	272	static const int ide_iobase[2] = { 0x1f0, 0x170 };
	273	static const int ide_iobase2[2] = { 0x3f6, 0x376 };
	274	static const int ide_irq[2] = { 14, 15 };
	275
	276	#define NE2000_NB_MAX 6
	277
	278	static uint32_t ne2000_io[NE2000_NB_MAX] = { 0x300, 0x320, 0x340, 0x360, 0x280, 0x380 };
	279	static int ne2000_irq[NE2000_NB_MAX] = { 9, 10, 11, 3, 4, 5 };
	280
80cabfad FB	281	/* PC hardware initialisation */
	282	void pc_init(int ram_size, int vga_ram_size, int boot_device,
	283	DisplayState ds, const char *fd_filename, int snapshot,
	284	const char kernel_filename, const char kernel_cmdline,
	285	const char *initrd_filename)
	286	{
	287	char buf[1024];
b41a2cd1	288	int ret, linux_boot, initrd_size, i, nb_nics1, fd;
80cabfad FB	289
	290	linux_boot = (kernel_filename != NULL);
	291
	292	/* allocate RAM */
	293	cpu_register_physical_memory(0, ram_size, 0);
	294
	295	/* BIOS load */
	296	snprintf(buf, sizeof(buf), "%s/%s", bios_dir, BIOS_FILENAME);
	297	ret = load_image(buf, phys_ram_base + 0x000f0000);
	298	if (ret != 0x10000) {
	299	fprintf(stderr, "qemu: could not load PC bios '%s'\n", buf);
	300	exit(1);
	301	}
	302
	303	/* VGA BIOS load */
	304	snprintf(buf, sizeof(buf), "%s/%s", bios_dir, VGABIOS_FILENAME);
	305	ret = load_image(buf, phys_ram_base + 0x000c0000);
	306
	307	/* setup basic memory access */
	308	cpu_register_physical_memory(0xc0000, 0x10000, 0xc0000 \| IO_MEM_ROM);
bb058620	309	cpu_register_physical_memory(0xd0000, 0x20000, IO_MEM_UNASSIGNED);
80cabfad FB	310	cpu_register_physical_memory(0xf0000, 0x10000, 0xf0000 \| IO_MEM_ROM);
	311
	312	bochs_bios_init();
	313
	314	if (linux_boot) {
	315	uint8_t bootsect[512];
	316
	317	if (bs_table[0] == NULL) {
	318	fprintf(stderr, "A disk image must be given for 'hda' when booting a Linux kernel\n");
	319	exit(1);
	320	}
	321	snprintf(buf, sizeof(buf), "%s/%s", bios_dir, LINUX_BOOT_FILENAME);
	322	ret = load_image(buf, bootsect);
	323	if (ret != sizeof(bootsect)) {
	324	fprintf(stderr, "qemu: could not load linux boot sector '%s'\n",
	325	buf);
	326	exit(1);
	327	}
	328
	329	bdrv_set_boot_sector(bs_table[0], bootsect, sizeof(bootsect));
	330
	331	/* now we can load the kernel */
	332	ret = load_kernel(kernel_filename,
	333	phys_ram_base + KERNEL_LOAD_ADDR,
	334	phys_ram_base + KERNEL_PARAMS_ADDR);
	335	if (ret < 0) {
	336	fprintf(stderr, "qemu: could not load kernel '%s'\n",
	337	kernel_filename);
	338	exit(1);
	339	}
	340
	341	/* load initrd */
	342	initrd_size = 0;
	343	if (initrd_filename) {
	344	initrd_size = load_image(initrd_filename, phys_ram_base + INITRD_LOAD_ADDR);
	345	if (initrd_size < 0) {
	346	fprintf(stderr, "qemu: could not load initial ram disk '%s'\n",
	347	initrd_filename);
	348	exit(1);
	349	}
	350	}
	351	if (initrd_size > 0) {
	352	stl_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x218, INITRD_LOAD_ADDR);
	353	stl_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x21c, initrd_size);
	354	}
	355	pstrcpy(phys_ram_base + KERNEL_CMDLINE_ADDR, 4096,
	356	kernel_cmdline);
	357	stw_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x20, 0xA33F);
	358	stw_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x22,
	359	KERNEL_CMDLINE_ADDR - KERNEL_PARAMS_ADDR);
	360	/* loader type */
	361	stw_raw(phys_ram_base + KERNEL_PARAMS_ADDR + 0x210, 0x01);
	362	}
	363
	364	/* init basic PC hardware */
b41a2cd1	365	register_ioport_write(0x80, 1, 1, ioport80_write, NULL);
80cabfad FB	366
	367	vga_initialize(ds, phys_ram_base + ram_size, ram_size,
	368	vga_ram_size);
	369
b0a21b53	370	rtc_state = rtc_init(0x70, 8);
b41a2cd1 FB	371	register_ioport_read(0x61, 1, 1, speaker_ioport_read, NULL);
b41a2cd1 FB	372	register_ioport_write(0x61, 1, 1, speaker_ioport_write, NULL);
80cabfad	373
e1a23744 FB	374	register_ioport_read(0x92, 1, 1, ioport92_read, NULL);
	375	register_ioport_write(0x92, 1, 1, ioport92_write, NULL);
	376
80cabfad	377	pic_init();
b0a21b53	378	pit_init(0x40, 0);
b41a2cd1 FB	379
	380	fd = serial_open_device();
	381	serial_init(0x3f8, 4, fd);
	382
	383	nb_nics1 = nb_nics;
	384	if (nb_nics1 > NE2000_NB_MAX)
	385	nb_nics1 = NE2000_NB_MAX;
	386	for(i = 0; i < nb_nics1; i++) {
	387	ne2000_init(ne2000_io[i], ne2000_irq[i], &nd_table[i]);
	388	}
	389
	390	for(i = 0; i < 2; i++) {
	391	ide_init(ide_iobase[i], ide_iobase2[i], ide_irq[i],
	392	bs_table[2 * i], bs_table[2 * i + 1]);
	393	}
80cabfad	394	kbd_init();
80cabfad	395	DMA_init();
67b915a5 FB	396
	397	#ifndef _WIN32
	398	/* no audio supported yet for win32 */
	399	AUD_init();
80cabfad	400	SB16_init();
67b915a5	401	#endif
80cabfad	402
baca51fa	403	floppy_controller = fdctrl_init(6, 2, 0, 0x3f0, fd_table);
b41a2cd1 FB	404
b41a2cd1 FB	405	cmos_init(ram_size, boot_device);
80cabfad	406	}