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