system.c@ 75229

Last change on this file since 75229 was 75229, checked in by vboxsync, 6 years ago
BIOS: Rearranged INT 15h to better separate 286 and 386+ functionality.
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 31.6 KB

Line
1	/* $Id: system.c 75229 2018-11-02 15:21:49Z vboxsync $ */
2	/** @file
3	* PC BIOS - ???
4	*/
5
6	/*
7	* Copyright (C) 2006-2017 Oracle Corporation
8	*
9	* This file is part of VirtualBox Open Source Edition (OSE), as
10	* available from http://www.virtualbox.org. This file is free software;
11	* you can redistribute it and/or modify it under the terms of the GNU
12	* General Public License (GPL) as published by the Free Software
13	* Foundation, in version 2 as it comes in the "COPYING" file of the
14	* VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15	* hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16	* --------------------------------------------------------------------
17	*
18	* This code is based on:
19	*
20	* ROM BIOS for use with Bochs/Plex86/QEMU emulation environment
21	*
22	* Copyright (C) 2002 MandrakeSoft S.A.
23	*
24	* MandrakeSoft S.A.
25	* 43, rue d'Aboukir
26	* 75002 Paris - France
27	* http://www.linux-mandrake.com/
28	* http://www.mandrakesoft.com/
29	*
30	* This library is free software; you can redistribute it and/or
31	* modify it under the terms of the GNU Lesser General Public
32	* License as published by the Free Software Foundation; either
33	* version 2 of the License, or (at your option) any later version.
34	*
35	* This library is distributed in the hope that it will be useful,
36	* but WITHOUT ANY WARRANTY; without even the implied warranty of
37	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
38	* Lesser General Public License for more details.
39	*
40	* You should have received a copy of the GNU Lesser General Public
41	* License along with this library; if not, write to the Free Software
42	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
43	*
44	*/
45
46	/*
47	* Oracle LGPL Disclaimer: For the avoidance of doubt, except that if any license choice
48	* other than GPL or LGPL is available it will apply instead, Oracle elects to use only
49	* the Lesser General Public License version 2.1 (LGPLv2) at this time for any software where
50	* a choice of LGPL license versions is made available with the language indicating
51	* that LGPLv2 or any later version may be used, or where a choice of which version
52	* of the LGPL is applied is otherwise unspecified.
53	*/
54
55
56	#include <stdint.h>
57	#include "biosint.h"
58	#include "inlines.h"
59
60	#if DEBUG_INT15
61	# define BX_DEBUG_INT15(...) BX_DEBUG(__VA_ARGS__)
62	#else
63	# define BX_DEBUG_INT15(...)
64	#endif
65
66
67	#define UNSUPPORTED_FUNCTION 0x86 /* Specific to INT 15h. */
68
69	#define BIOS_CONFIG_TABLE 0xe6f5 /** @todo configurable? put elsewhere? */
70
71	#define ACPI_DATA_SIZE 0x00010000L /** @todo configurable? put elsewhere? */
72
73	extern int pmode_IDT;
74	extern int rmode_IDT;
75
76	uint16_t read_ss(void);
77	#pragma aux read_ss = "mov ax, ss" modify exact [ax] nomemory;
78
79	#if VBOX_BIOS_CPU >= 80386
80
81	/* The 386+ code uses CR0 to switch to/from protected mode.
82	* Quite straightforward.
83	*/
84
85	void pm_stack_save(uint16_t cx, uint16_t es, uint16_t si);
86	#pragma aux pm_stack_save = \
87	".386" \
88	"push ds" \
89	"push eax" \
90	"xor ax, ax" \
91	"mov ds, ax" \
92	"mov ds:[467h], sp" \
93	"mov ds:[469h], ss" \
94	parm [cx] [es] [si] modify nomemory;
95
96	/* Uses position independent code to build a far return... because it was
97	* too hard to figure out how to code the far call in inline assembler.
98	*
99	* NB: It would be lovely to do 'add [sp],N' instead of 'pop ax; add ax,M;
100	* push ax'. Unfortunately the former cannot be encoded, though 'add [esp],N'
101	* can be on 386 and later -- but it may be unwise to assume that the high
102	* bits of ESP are all zero.
103	*/
104	void pm_enter(void);
105	#pragma aux pm_enter = \
106	".386p" \
107	"lgdt fword ptr es:[si+8]" \
108	"lidt fword ptr cs:pmode_IDT" \
109	"push 20h" \
110	"call pentry" \
111	"pentry:" \
112	"pop ax" \
113	"add ax, 0Eh" \
114	"push ax" \
115	"mov eax, cr0" \
116	"or al, 1" \
117	"mov cr0, eax" \
118	"retf" \
119	"pm_pm:" \
120	"mov ax, 10h" \
121	"mov ds, ax" \
122	"add al, 08h" \
123	"mov es, ax" \
124	"add al, 10h" \
125	"mov ss, ax" \
126	modify nomemory;
127
128	/* Restore segment limits to real mode compatible values and
129	* return to real mode.
130	*/
131	void pm_exit(void);
132	#pragma aux pm_exit = \
133	".386p" \
134	"mov ax, 28h" \
135	"mov ds, ax" \
136	"mov es, ax" \
137	"push 0F000h" \
138	"call pexit" \
139	"pexit:" \
140	"pop ax" \
141	"add ax, 0Eh" \
142	"push ax" \
143	"mov eax, cr0" \
144	"and al, 0FEh" \
145	"mov cr0, eax" \
146	"retf" \
147	"real_mode:" \
148	"lidt fword ptr cs:rmode_IDT" \
149	modify nomemory;
150
151	/* Restore stack and reload segment registers in real mode to ensure
152	* real mode compatible selector+base.
153	*/
154	void pm_stack_restore(void);
155	#pragma aux pm_stack_restore = \
156	".386" \
157	"xor ax, ax" \
158	"mov ds, ax" \
159	"mov es, ax" \
160	"lss sp, ds:[467h]" \
161	"pop eax" \
162	"pop ds" \
163	modify nomemory;
164
165	#elif VBOX_BIOS_CPU >= 80286
166
167	/* The 286 code uses LMSW to switch to protected mode but it has to reset
168	* the CPU to get back to real mode. Ugly! See return_blkmove in orgs.asm
169	* for the other matching half.
170	*/
171	void pm_stack_save(uint16_t cx, uint16_t es, uint16_t si, uint16_t frame);
172	#pragma aux pm_stack_save = \
173	"xor ax, ax" \
174	"mov ds, ax" \
175	"mov ds:[467h], bx" \
176	"mov ds:[469h], ss" \
177	parm [cx] [es] [si] [bx] modify nomemory;
178
179	/* Uses position independent code... because it was too hard to figure
180	* out how to code the far call in inline assembler.
181	*/
182	void pm_enter(void);
183	#pragma aux pm_enter = \
184	".286p" \
185	"lgdt fword ptr es:[si+8]" \
186	"lidt fword ptr cs:pmode_IDT" \
187	"push 20h" \
188	"call pentry" \
189	"pentry:" \
190	"pop ax" \
191	"add ax, 0Eh" \
192	"push ax" \
193	"smsw ax" \
194	"or al, 1" \
195	"lmsw ax" \
196	"retf" \
197	"pm_pm:" \
198	"mov ax, 10h" \
199	"mov ds, ax" \
200	"add al, 08h" \
201	"mov es, ax" \
202	"add al, 10h" \
203	"mov ss, ax" \
204	modify nomemory;
205
206	/* Set up shutdown status and reset the CPU. The POST code
207	* will regain control. Port 80h is written with status.
208	* Code 9 is written to CMOS shutdown status byte (0Fh).
209	* CPU is triple faulted. .
210	*/
211	void pm_exit(void);
212	#pragma aux pm_exit = \
213	"xor ax, ax" \
214	"out 80h, al" \
215	"mov al, 0Fh" \
216	"out 70h, al" \
217	"mov al, 09h" \
218	"out 71h, al" \
219	".286p" \
220	"lidt fword ptr cs:pmode_IDT" \
221	"int 3" \
222	modify nomemory;
223
224	/* Dummy. Actually done in return_blkmove. */
225	void pm_stack_restore(void);
226	#pragma aux pm_stack_restore = \
227	"rm_return:" \
228	modify nomemory;
229
230	#endif
231
232	/* NB: CX is set earlier in pm_stack_save */
233	void pm_copy(void);
234	#pragma aux pm_copy = \
235	"xor si, si" \
236	"xor di, di" \
237	"cld" \
238	"rep movsw" \
239	modify [si di cx] nomemory;
240
241	/* The pm_switch has a few crucial differences from pm_enter, hence
242	* it is replicated here. Uses LMSW to avoid trashing high word of eax.
243	*/
244	void pm_switch(uint16_t reg_si);
245	#pragma aux pm_switch = \
246	".286p" \
247	"lgdt fword ptr es:[si+08h]" \
248	"lidt fword ptr es:[si+10h]" \
249	"push 38h" \
250	"call pentry" \
251	"pentry:" \
252	"pop ax" \
253	"add ax, 0Eh" \
254	"push ax" \
255	"smsw ax" \
256	"or al, 1" \
257	"lmsw ax" \
258	"retf" \
259	"pm_pm:" \
260	"mov ax, 18h" \
261	"mov ds, ax" \
262	"add al, 08h" \
263	"mov es, ax" \
264	"add al, 08h" \
265	"mov ss, ax" \
266	parm [si] modify nomemory;
267
268	/* Return to caller - we do not use IRET because we should not enable
269	* interrupts. Note that AH must be zero on exit.
270	* WARNING: Needs to be adapted if calling sequence is modified!
271	*/
272	void pm_unwind(uint16_t args);
273	#pragma aux pm_unwind = \
274	".286" \
275	"mov sp, ax" \
276	"popa" \
277	"add sp, 6" \
278	"pop cx" \
279	"pop ax" \
280	"pop ax" \
281	"mov ax, 30h" \
282	"push ax" \
283	"push cx" \
284	"retf" \
285	parm [ax] modify nomemory aborts;
286
287	/// @todo This method is silly. The RTC should be programmed to fire an interrupt
288	// instead of hogging the CPU with inaccurate code.
289	void timer_wait(uint32_t usec_wait)
290	{
291	uint32_t cycles;
292	uint8_t old_val;
293	uint8_t cur_val;
294
295	/* We wait in 15 usec increments. */
296	cycles = usec_wait / 15;
297
298	old_val = inp(0x61) & 0x10;
299	while (cycles--) {
300	/* Wait 15us. */
301	do {
302	cur_val = inp(0x61) & 0x10;
303	} while (cur_val != old_val);
304	old_val = cur_val;
305	}
306	}
307
308	bx_bool set_enable_a20(bx_bool val)
309	{
310	uint8_t oldval;
311
312	// Use PS/2 System Control port A to set A20 enable
313
314	// get current setting first
315	oldval = inb(0x92);
316
317	// change A20 status
318	if (val)
319	outb(0x92, oldval \| 0x02);
320	else
321	outb(0x92, oldval & 0xfd);
322
323	return((oldval & 0x02) != 0);
324	}
325
326	/// @todo move elsewhere?
327	#define AX r.gr.u.r16.ax
328	#define BX r.gr.u.r16.bx
329	#define CX r.gr.u.r16.cx
330	#define DX r.gr.u.r16.dx
331	#define SI r.gr.u.r16.si
332	#define DI r.gr.u.r16.di
333	#define BP r.gr.u.r16.bp
334	#define SP r.gr.u.r16.sp
335	#define FLAGS r.fl.u.r16.flags
336	#define EAX r.gr.u.r32.eax
337	#define EBX r.gr.u.r32.ebx
338	#define ECX r.gr.u.r32.ecx
339	#define EDX r.gr.u.r32.edx
340	#define ESI r.gr.u.r32.esi
341	#define EDI r.gr.u.r32.edi
342	#define ES r.es
343
344
345	void BIOSCALL int15_function(sys_regs_t r)
346	{
347	uint16_t bRegister;
348	uint8_t irqDisable;
349
350	BX_DEBUG_INT15("int15 AX=%04x\n",AX);
351
352	switch (GET_AH()) {
353	case 0x00: /* assorted functions */
354	if (GET_AL() != 0xc0)
355	goto undecoded;
356	/* GRUB calls int15 with ax=0x00c0 to get the ROM configuration table,
357	* which we don't support, but logging that event is annoying. In fact
358	* it is likely that they just misread some specs, because there is a
359	* int15 BIOS function AH=0xc0 which sounds quite similar to what GRUB
360	* wants to achieve. */
361	SET_CF();
362	SET_AH(UNSUPPORTED_FUNCTION);
363	break;
364	case 0x24: /* A20 Control */
365	switch (GET_AL()) {
366	case 0x00:
367	set_enable_a20(0);
368	CLEAR_CF();
369	SET_AH(0);
370	break;
371	case 0x01:
372	set_enable_a20(1);
373	CLEAR_CF();
374	SET_AH(0);
375	break;
376	case 0x02:
377	SET_AL( (inb(0x92) >> 1) & 0x01 );
378	CLEAR_CF();
379	SET_AH(0);
380	break;
381	case 0x03:
382	CLEAR_CF();
383	SET_AH(0);
384	BX = 3;
385	break;
386	default:
387	BX_INFO("int15: Func 24h, subfunc %02xh, A20 gate control not supported\n", (unsigned) GET_AL());
388	SET_CF();
389	SET_AH(UNSUPPORTED_FUNCTION);
390	}
391	break;
392
393	/* These are here just to avoid warnings being logged. */
394	case 0x22: /* Locate ROM BASIC (tough when we don't have any.) */
395	case 0x41: /* PC Convertible, wait for external events. */
396	case 0xC7: /* PS/2, get memory map. */
397	SET_CF();
398	SET_AH(UNSUPPORTED_FUNCTION);
399	break;
400
401	/// @todo Why does this need special handling? All we need is to set CF
402	// but not handle this as an unknown function (regardless of CPU type).
403	case 0x4f:
404	/* keyboard intercept */
405	#if VBOX_BIOS_CPU >= 80286
406	// nop
407	#else
408	SET_AH(UNSUPPORTED_FUNCTION);
409	#endif
410	SET_CF();
411	break;
412
413	case 0x52: // removable media eject
414	CLEAR_CF();
415	SET_AH(0); // "ok ejection may proceed"
416	break;
417
418	case 0x83: {
419	if( GET_AL() == 0 ) {
420	// Set Interval requested.
421	if( ( read_byte( 0x40, 0xA0 ) & 1 ) == 0 ) {
422	// Interval not already set.
423	write_byte( 0x40, 0xA0, 1 ); // Set status byte.
424	write_word( 0x40, 0x98, ES ); // Byte location, segment
425	write_word( 0x40, 0x9A, BX ); // Byte location, offset
426	write_word( 0x40, 0x9C, DX ); // Low word, delay
427	write_word( 0x40, 0x9E, CX ); // High word, delay.
428	CLEAR_CF( );
429	irqDisable = inb( 0xA1 );
430	outb( 0xA1, irqDisable & 0xFE );
431	bRegister = inb_cmos( 0xB ); // Unmask IRQ8 so INT70 will get through.
432	outb_cmos( 0xB, bRegister \| 0x40 ); // Turn on the Periodic Interrupt timer
433	} else {
434	// Interval already set.
435	BX_DEBUG_INT15("int15: Func 83h, failed, already waiting.\n" );
436	SET_CF();
437	SET_AH(UNSUPPORTED_FUNCTION);
438	}
439	} else if( GET_AL() == 1 ) {
440	// Clear Interval requested
441	write_byte( 0x40, 0xA0, 0 ); // Clear status byte
442	CLEAR_CF( );
443	bRegister = inb_cmos( 0xB );
444	outb_cmos( 0xB, bRegister & ~0x40 ); // Turn off the Periodic Interrupt timer
445	} else {
446	BX_DEBUG_INT15("int15: Func 83h, failed.\n" );
447	SET_CF();
448	SET_AH(UNSUPPORTED_FUNCTION);
449	SET_AL(GET_AL() - 1);
450	}
451
452	break;
453	}
454
455	case 0x86:
456	// Wait for CX:DX microseconds. currently using the
457	// refresh request port 0x61 bit4, toggling every 15usec
458	int_enable();
459	timer_wait(((uint32_t)CX << 16) \| DX);
460	break;
461
462	case 0x88:
463	// Get the amount of extended memory (above 1M)
464	#if VBOX_BIOS_CPU >= 80286
465	AX = (inb_cmos(0x31) << 8) \| inb_cmos(0x30);
466
467	// According to Ralf Brown's interrupt the limit should be 15M,
468	// but real machines mostly return max. 63M.
469	if(AX > 0xffc0)
470	AX = 0xffc0;
471
472	CLEAR_CF();
473	#else
474	SET_AH(UNSUPPORTED_FUNCTION);
475	SET_CF();
476	#endif
477	break;
478
479	case 0x89:
480	// Switch to Protected Mode.
481	// ES:DI points to user-supplied GDT
482	// BH/BL contains starting interrupt numbers for PIC0/PIC1
483	// This subfunction does not return!
484
485	// turn off interrupts
486	int_disable(); /// @todo aren't they off already?
487
488	set_enable_a20(1); // enable A20 line; we're supposed to fail if that fails
489
490	// Initialize CS descriptor for BIOS
491	write_word(ES, SI+0x38+0, 0xffff);// limit 15:00 = normal 64K limit
492	write_word(ES, SI+0x38+2, 0x0000);// base 15:00
493	write_byte(ES, SI+0x38+4, 0x000f);// base 23:16 (hardcoded to f000:0000)
494	write_byte(ES, SI+0x38+5, 0x9b); // access
495	write_word(ES, SI+0x38+6, 0x0000);// base 31:24/reserved/limit 19:16
496
497	/* Reprogram the PICs. */
498	outb(PIC_MASTER, PIC_CMD_INIT);
499	outb(PIC_SLAVE, PIC_CMD_INIT);
500	outb(PIC_MASTER + 1, GET_BH());
501	outb(PIC_SLAVE + 1, GET_BL());
502	outb(PIC_MASTER + 1, 4);
503	outb(PIC_SLAVE + 1, 2);
504	outb(PIC_MASTER + 1, 1);
505	outb(PIC_SLAVE + 1, 1);
506	/* Mask all IRQs, user must re-enable. */
507	outb(PIC_MASTER_MASK, 0xff);
508	outb(PIC_SLAVE_MASK, 0xff);
509
510	pm_switch(SI);
511	pm_unwind((uint16_t)&r);
512
513	break;
514
515	case 0x90:
516	/* Device busy interrupt. Called by Int 16h when no key available */
517	break;
518
519	case 0x91:
520	/* Interrupt complete. Called by Int 16h when key becomes available */
521	break;
522
523	case 0xbf:
524	BX_INFO("*** int 15h function AH=bf not yet supported!\n");
525	SET_CF();
526	SET_AH(UNSUPPORTED_FUNCTION);
527	break;
528
529	case 0xC0:
530	CLEAR_CF();
531	SET_AH(0);
532	BX = BIOS_CONFIG_TABLE;
533	ES = 0xF000;
534	break;
535
536	case 0xc1:
537	ES = read_word(0x0040, 0x000E);
538	CLEAR_CF();
539	break;
540
541	case 0xd8:
542	bios_printf(BIOS_PRINTF_DEBUG, "EISA BIOS not present\n");
543	SET_CF();
544	SET_AH(UNSUPPORTED_FUNCTION);
545	break;
546
547	/* Make the BIOS warning for pretty much every Linux kernel start
548	* disappear - it calls with ax=0xe980 to figure out SMI info. */
549	case 0xe9: /* SMI functions (SpeedStep and similar things) */
550	SET_CF();
551	SET_AH(UNSUPPORTED_FUNCTION);
552	break;
553	case 0xec: /* AMD64 target operating mode callback */
554	if (GET_AL() != 0)
555	goto undecoded;
556	SET_AH(0);
557	if (GET_BL() >= 1 && GET_BL() <= 3)
558	CLEAR_CF(); /* Accepted value. */
559	else
560	SET_CF(); /* Reserved, error. */
561	break;
562	undecoded:
563	default:
564	BX_INFO("*** int 15h function AX=%04x, BX=%04x not yet supported!\n",
565	(unsigned) AX, (unsigned) BX);
566	SET_CF();
567	SET_AH(UNSUPPORTED_FUNCTION);
568	break;
569	}
570	}
571
572	#if VBOX_BIOS_CPU >= 80386
573
574	typedef struct {
575	uint32_t start;
576	uint32_t xstart;
577	uint32_t len;
578	uint32_t xlen;
579	uint32_t type;
580	} mem_range_t;
581
582	void set_e820_range(uint16_t reg_ES, uint16_t reg_DI, uint32_t start, uint32_t end,
583	uint8_t extra_start, uint8_t extra_end, uint16_t type)
584	{
585	mem_range_t __far *range;
586
587	range = reg_ES :> (mem_range_t *)reg_DI;
588	range->start = start;
589	range->xstart = extra_start;
590	end -= start;
591	extra_end -= extra_start;
592	range->len = end;
593	range->xlen = extra_end;
594	range->type = type;
595	}
596
597	void BIOSCALL int15_function32(sys32_regs_t r)
598	{
599	uint32_t extended_memory_size=0; // 64bits long
600	uint32_t extra_lowbits_memory_size=0;
601	uint8_t extra_highbits_memory_size=0;
602	uint32_t mcfgStart, mcfgSize;
603
604	BX_DEBUG_INT15("int15 AX=%04x\n",AX);
605
606	switch (GET_AH()) {
607	case 0xd0:
608	if (GET_AL() != 0x4f)
609	goto int15_unimplemented;
610	if (EBX == 0x50524f43 && ECX == 0x4d4f4445 && ESI == 0 && EDI == 0)
611	{
612	CLEAR_CF();
613	ESI = EBX;
614	EDI = ECX;
615	EAX = 0x49413332;
616	}
617	else
618	goto int15_unimplemented;
619	break;
620
621	case 0xe8:
622	switch(GET_AL()) {
623	case 0x20: // coded by osmaker aka K.J.
624	if(EDX == 0x534D4150) {
625	extended_memory_size = inb_cmos(0x35);
626	extended_memory_size <<= 8;
627	extended_memory_size \|= inb_cmos(0x34);
628	extended_memory_size *= 64;
629	#ifndef VBOX /* The following excludes 0xf0000000 thru 0xffffffff. Trust DevPcBios.cpp to get this right. */
630	// greater than EFF00000???
631	if(extended_memory_size > 0x3bc000) {
632	extended_memory_size = 0x3bc000; // everything after this is reserved memory until we get to 0x100000000
633	}
634	#endif /* !VBOX */
635	extended_memory_size *= 1024;
636	extended_memory_size += (16L * 1024 * 1024);
637
638	if(extended_memory_size <= (16L * 1024 * 1024)) {
639	extended_memory_size = inb_cmos(0x31);
640	extended_memory_size <<= 8;
641	extended_memory_size \|= inb_cmos(0x30);
642	extended_memory_size *= 1024;
643	extended_memory_size += (1L * 1024 * 1024);
644	}
645
646	#ifdef VBOX /* We've already used the CMOS entries for SATA.
647	BTW. This is the amount of memory above 4GB measured in 64KB units. */
648	extra_lowbits_memory_size = inb_cmos(0x62);
649	extra_lowbits_memory_size <<= 8;
650	extra_lowbits_memory_size \|= inb_cmos(0x61);
651	extra_lowbits_memory_size <<= 16;
652	extra_highbits_memory_size = inb_cmos(0x63);
653	/* 0x64 and 0x65 can be used if we need to dig 1 TB or more at a later point. */
654	#else
655	extra_lowbits_memory_size = inb_cmos(0x5c);
656	extra_lowbits_memory_size <<= 8;
657	extra_lowbits_memory_size \|= inb_cmos(0x5b);
658	extra_lowbits_memory_size *= 64;
659	extra_lowbits_memory_size *= 1024;
660	extra_highbits_memory_size = inb_cmos(0x5d);
661	#endif /* !VBOX */
662
663	mcfgStart = 0;
664	mcfgSize = 0;
665
666	switch(BX)
667	{
668	case 0:
669	set_e820_range(ES, DI,
670	#ifndef VBOX /** @todo Upstream suggests the following, needs checking. (see next as well) */
671	0x0000000L, 0x0009f000L, 0, 0, 1);
672	#else
673	0x0000000L, 0x0009fc00L, 0, 0, 1);
674	#endif
675	EBX = 1;
676	break;
677	case 1:
678	set_e820_range(ES, DI,
679	#ifndef VBOX /** @todo Upstream suggests the following, needs checking. (see next as well) */
680	0x0009f000L, 0x000a0000L, 0, 0, 2);
681	#else
682	0x0009fc00L, 0x000a0000L, 0, 0, 2);
683	#endif
684	EBX = 2;
685	break;
686	case 2:
687	#ifdef VBOX
688	/* Mark the BIOS as reserved. VBox doesn't currently
689	* use the 0xe0000-0xeffff area. It does use the
690	* 0xd0000-0xdffff area for the BIOS logo, but it's
691	* not worth marking it as reserved. (this is not
692	* true anymore because the VGA adapter handles the logo stuff)
693	* The whole 0xe0000-0xfffff can be used for the BIOS.
694	* Note that various
695	* Windows versions don't accept (read: in debug builds
696	* they trigger the "Too many similar traps" assertion)
697	* a single reserved range from 0xd0000 to 0xffffff.
698	* A 128K area starting from 0xd0000 works. */
699	set_e820_range(ES, DI,
700	0x000f0000L, 0x00100000L, 0, 0, 2);
701	#else /* !VBOX */
702	set_e820_range(ES, DI,
703	0x000e8000L, 0x00100000L, 0, 0, 2);
704	#endif /* !VBOX */
705	EBX = 3;
706	break;
707	case 3:
708	#if BX_ROMBIOS32 \|\| defined(VBOX)
709	set_e820_range(ES, DI,
710	0x00100000L,
711	extended_memory_size - ACPI_DATA_SIZE, 0, 0, 1);
712	EBX = 4;
713	#else
714	set_e820_range(ES, DI,
715	0x00100000L,
716	extended_memory_size, 1);
717	EBX = 5;
718	#endif
719	break;
720	case 4:
721	set_e820_range(ES, DI,
722	extended_memory_size - ACPI_DATA_SIZE,
723	extended_memory_size, 0, 0, 3); // ACPI RAM
724	EBX = 5;
725	break;
726	case 5:
727	set_e820_range(ES, DI,
728	0xfec00000,
729	0xfec00000 + 0x1000, 0, 0, 2); // I/O APIC
730	EBX = 6;
731	break;
732	case 6:
733	set_e820_range(ES, DI,
734	0xfee00000,
735	0xfee00000 + 0x1000, 0, 0, 2); // Local APIC
736	EBX = 7;
737	break;
738	case 7:
739	/* 256KB BIOS area at the end of 4 GB */
740	#ifdef VBOX
741	/* We don't set the end to 1GB here and rely on the 32-bit
742	unsigned wrap around effect (0-0xfffc0000L). */
743	#endif
744	set_e820_range(ES, DI,
745	0xfffc0000L, 0x00000000L, 0, 0, 2);
746	if (mcfgStart != 0)
747	EBX = 8;
748	else
749	{
750	if (extra_highbits_memory_size \|\| extra_lowbits_memory_size)
751	EBX = 9;
752	else
753	EBX = 0;
754	}
755	break;
756	case 8:
757	/* PCI MMIO config space (MCFG) */
758	set_e820_range(ES, DI,
759	mcfgStart, mcfgStart + mcfgSize, 0, 0, 2);
760
761	if (extra_highbits_memory_size \|\| extra_lowbits_memory_size)
762	EBX = 9;
763	else
764	EBX = 0;
765	break;
766	case 9:
767	#ifdef VBOX /* Don't succeeded if no memory above 4 GB. */
768	/* Mapping of memory above 4 GB if present.
769	Note1: set_e820_range needs do no borrowing in the
770	subtraction because of the nice numbers.
771	Note2* works only up to 1TB because of uint8_t for
772	the upper bits!*/
773	if (extra_highbits_memory_size \|\| extra_lowbits_memory_size)
774	{
775	set_e820_range(ES, DI,
776	0x00000000L, extra_lowbits_memory_size,
777	1 /x4GB/, extra_highbits_memory_size + 1 /x4GB/, 1);
778	EBX = 0;
779	}
780	break;
781	/* fall thru */
782	#else /* !VBOX */
783	/* Mapping of memory above 4 GB */
784	set_e820_range(ES, DI, 0x00000000L,
785	extra_lowbits_memory_size, 1, extra_highbits_memory_size
786	+ 1, 1);
787	EBX = 0;
788	break;
789	#endif /* !VBOX */
790	default: /* AX=E820, DX=534D4150, BX unrecognized */
791	goto int15_unimplemented;
792	break;
793	}
794	EAX = 0x534D4150;
795	ECX = 0x14;
796	CLEAR_CF();
797	} else {
798	// if DX != 0x534D4150)
799	goto int15_unimplemented;
800	}
801	break;
802
803	case 0x01:
804	// do we have any reason to fail here ?
805	CLEAR_CF();
806
807	// my real system sets ax and bx to 0
808	// this is confirmed by Ralph Brown list
809	// but syslinux v1.48 is known to behave
810	// strangely if ax is set to 0
811	// regs.u.r16.ax = 0;
812	// regs.u.r16.bx = 0;
813
814	// Get the amount of extended memory (above 1M)
815	CX = (inb_cmos(0x31) << 8) \| inb_cmos(0x30);
816
817	// limit to 15M
818	if(CX > 0x3c00)
819	CX = 0x3c00;
820
821	// Get the amount of extended memory above 16M in 64k blocks
822	DX = (inb_cmos(0x35) << 8) \| inb_cmos(0x34);
823
824	// Set configured memory equal to extended memory
825	AX = CX;
826	BX = DX;
827	break;
828	default: /* AH=0xE8?? but not implemented */
829	goto int15_unimplemented;
830	}
831	break;
832	int15_unimplemented:
833	// fall into the default case
834	default:
835	BX_INFO("*** int 15h function AX=%04x, BX=%04x not yet supported!\n",
836	(unsigned) AX, (unsigned) BX);
837	SET_CF();
838	SET_AL(UNSUPPORTED_FUNCTION);
839	break;
840	}
841	}
842	#endif /* VBOX_BIOS_CPU >= 80386 */
843
844	#if VBOX_BIOS_CPU >= 80286
845
846	#undef FLAGS
847	#define FLAGS r.ra.flags.u.r16.flags
848
849	/* Function 0x87 handled separately due to specific stack layout requirements. */
850	void BIOSCALL int15_blkmove(disk_regs_t r)
851	{
852	uint16_t base15_00;
853	uint8_t base23_16;
854	uint16_t ss;
855
856	// +++ should probably have descriptor checks
857	// +++ should have exception handlers
858
859	// turn off interrupts
860	int_disable(); /// @todo aren't they disabled already?
861
862	set_enable_a20(1); // enable A20 line
863
864	// 128K max of transfer on 386+ ???
865	// source == destination ???
866
867	// ES:SI points to descriptor table
868	// offset use initially comments
869	// ==============================================
870	// 00..07 Unused zeros Null descriptor
871	// 08..0f scratch zeros work area used by BIOS
872	// 10..17 source ssssssss source of data
873	// 18..1f dest dddddddd destination of data
874	// 20..27 CS zeros filled in by BIOS
875	// 28..2f SS zeros filled in by BIOS
876
877	//es:si
878	//eeee0
879	//0ssss
880	//-----
881
882	// check for access rights of source & dest here
883
884	// Initialize GDT descriptor
885	base15_00 = (ES << 4) + SI;
886	base23_16 = ES >> 12;
887	if (base15_00 < (ES<<4))
888	base23_16++;
889	write_word(ES, SI+0x08+0, 47); // limit 15:00 = 6 * 8bytes/descriptor
890	write_word(ES, SI+0x08+2, base15_00);// base 15:00
891	write_byte(ES, SI+0x08+4, base23_16);// base 23:16
892	write_byte(ES, SI+0x08+5, 0x93); // access
893	write_word(ES, SI+0x08+6, 0x0000); // base 31:24/reserved/limit 19:16
894
895	// Initialize CS descriptor
896	write_word(ES, SI+0x20+0, 0xffff);// limit 15:00 = normal 64K limit
897	write_word(ES, SI+0x20+2, 0x0000);// base 15:00
898	write_byte(ES, SI+0x20+4, 0x000f);// base 23:16
899	write_byte(ES, SI+0x20+5, 0x9b); // access
900	write_word(ES, SI+0x20+6, 0x0000);// base 31:24/reserved/limit 19:16
901
902	// Initialize SS descriptor
903	ss = read_ss();
904	base15_00 = ss << 4;
905	base23_16 = ss >> 12;
906	write_word(ES, SI+0x28+0, 0xffff); // limit 15:00 = normal 64K limit
907	write_word(ES, SI+0x28+2, base15_00);// base 15:00
908	write_byte(ES, SI+0x28+4, base23_16);// base 23:16
909	write_byte(ES, SI+0x28+5, 0x93); // access
910	write_word(ES, SI+0x28+6, 0x0000); // base 31:24/reserved/limit 19:16
911
912	#if VBOX_BIOS_CPU >= 80386
913	/* Not taking the address of the parameter allows the code generator
914	* produce slightly better code for some unknown reason.
915	*/
916	pm_stack_save(CX, ES, SI);
917	#else
918	pm_stack_save(CX, ES, SI, FP_OFF(&r));
919	#endif
920	pm_enter();
921	pm_copy();
922	pm_exit();
923	pm_stack_restore();
924
925	set_enable_a20(0); // unconditionally disable A20 line
926
927	// turn interrupts back on
928	int_enable();
929
930	SET_AH(0);
931	CLEAR_CF();
932	}
933	#endif /* VBOX_BIOS_CPU >= 80286 */

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/Devices/PC/BIOS/system.c@ 75229

Download in other formats: