Context Navigation

← Previous Revision
Next Revision →
Normal
Revision Log

orgs.asm

Last change on this file was 100658, checked in by vboxsync, 10 months ago
BIOS: Reworked BIOS build to have a common core and add 286/386 specific modules (see bugref:6549).
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 66.3 KB

Rev	Line
[69300]	1	; $Id: orgs.asm 100658 2023-07-20 07:43:52Z vboxsync $
	2	;; @file
	3	; ???
	4	;
[38699]	5
[69300]	6	;
[98103]	7	; Copyright (C) 2006-2023 Oracle and/or its affiliates.
[69300]	8	;
[96407]	9	; This file is part of VirtualBox base platform packages, as
	10	; available from https://www.virtualbox.org.
	11	;
	12	; This program is free software; you can redistribute it and/or
	13	; modify it under the terms of the GNU General Public License
	14	; as published by the Free Software Foundation, in version 3 of the
	15	; License.
	16	;
	17	; This program is distributed in the hope that it will be useful, but
	18	; WITHOUT ANY WARRANTY; without even the implied warranty of
	19	; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	20	; General Public License for more details.
	21	;
	22	; You should have received a copy of the GNU General Public License
	23	; along with this program; if not, see <https://www.gnu.org/licenses>.
	24	;
	25	; SPDX-License-Identifier: GPL-3.0-only
[69300]	26	; --------------------------------------------------------------------
	27	;
	28	; This code is based on:
	29	;
	30	; ROM BIOS for use with Bochs/Plex86/QEMU emulation environment
	31	;
	32	; Copyright (C) 2002 MandrakeSoft S.A.
	33	;
	34	; MandrakeSoft S.A.
	35	; 43, rue d'Aboukir
	36	; 75002 Paris - France
	37	; http://www.linux-mandrake.com/
	38	; http://www.mandrakesoft.com/
	39	;
	40	; This library is free software; you can redistribute it and/or
	41	; modify it under the terms of the GNU Lesser General Public
	42	; License as published by the Free Software Foundation; either
	43	; version 2 of the License, or (at your option) any later version.
	44	;
	45	; This library is distributed in the hope that it will be useful,
	46	; but WITHOUT ANY WARRANTY; without even the implied warranty of
	47	; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	48	; Lesser General Public License for more details.
	49	;
	50	; You should have received a copy of the GNU Lesser General Public
	51	; License along with this library; if not, write to the Free Software
	52	; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
	53	;
	54
[43117]	55	; Oracle LGPL Disclaimer: For the avoidance of doubt, except that if any license choice
	56	; other than GPL or LGPL is available it will apply instead, Oracle elects to use only
	57	; the Lesser General Public License version 2.1 (LGPLv2) at this time for any software where
	58	; a choice of LGPL license versions is made available with the language indicating
	59	; that LGPLv2 or any later version may be used, or where a choice of which version
	60	; of the LGPL is applied is otherwise unspecified.
	61
[60422]	62
	63	include commondefs.inc
	64
[84901]	65	EBDA_SIZE equ 1 ; 1K minimum -- other modules may add to it
[38699]	66
[67065]	67	CMOS_ADDR equ 070h
	68	CMOS_DATA equ 071h
[38699]	69
	70
[67065]	71	PIC_CMD_EOI equ 020h
	72	PIC_MASTER equ 020h
	73	PIC_SLAVE equ 0A0h
[38699]	74
[67065]	75	BIOS_FIX_BASE equ 0E000h
[38699]	76
[60434]	77	if VBOX_BIOS_CPU ge 80286
[67065]	78	SYS_MODEL_ID equ 0FCh ; PC/AT
[95053]	79	SYS_SUBMODEL_ID equ 1
[60434]	80	else
[67065]	81	SYS_MODEL_ID equ 0FBh ; PC/XT
[95053]	82	SYS_SUBMODEL_ID equ 0
[60434]	83	endif
[67065]	84	BIOS_REVISION equ 1
[38699]	85
[67065]	86	BIOS_BUILD_DATE equ '06/23/99'
	87	BIOS_COPYRIGHT equ 'Oracle VM VirtualBox BIOS'
[38699]	88
[67065]	89	BX_ROMBIOS32 equ 0
	90	BX_CALL_INT15_4F equ 1
[38699]	91
	92	;; Set a fixed BIOS location, with a marker for verification
[67065]	93	BIOSORG macro addr, addr_minus_two
[60433]	94	.errnz (addr - 2 - addr_minus_two) ;; Couldn't convince wasm to accept $ here. Would've save us a lot of bother and ugly SED.
[67065]	95	BIOSORG_CHECK_BEFORE addr_minus_two
	96	org addr - BIOS_FIX_BASE - 2
	97	db 'XM'
	98	BIOSORG_CHECK addr
	99	endm
[38699]	100
	101	;; Set an interrupt vector (not very efficient if multiple vectors are
	102	;; programmed in one go)
[67065]	103	SET_INT_VECTOR macro vec, segm, offs
	104	mov ax, offs
	105	mov ds:[vec*4], ax
	106	mov ax, segm
	107	mov ds:[vec*4+2], ax
[38699]	108	endm
	109
	110	; Set up an environment C code expects. DS must point to the BIOS segment
	111	; and the direction flag must be cleared(!)
[67065]	112	C_SETUP macro
	113	push cs
	114	pop ds
	115	cld
[38699]	116	endm
	117
[60422]	118
[38699]	119	;; External function in separate modules
[67065]	120	extrn _dummy_isr_function:near
	121	extrn _log_bios_start:near
	122	extrn _nmi_handler_msg:near
	123	extrn _int18_panic_msg:near
	124	extrn _int09_function:near
	125	extrn _int13_diskette_function:near
	126	extrn _int13_eltorito:near
	127	extrn _int13_cdemu:near
	128	extrn _int13_cdrom:near
	129	extrn _cdemu_isactive:near
	130	extrn _cdemu_emulated_drive:near
	131	extrn _int13_harddisk:near
	132	extrn _int13_harddisk_ext:near
	133	extrn _int14_function:near
	134	extrn _int15_function:near
	135	extrn _int15_function_mouse:near
	136	extrn _int16_function:near
	137	extrn _int17_function:near
	138	extrn _int19_function:near
	139	extrn _int1a_function:near
	140	extrn _int70_function:near
	141	extrn _int74_function:near
	142	extrn _apm_function:near
	143	extrn _ata_init:near
[100658]	144	ifdef VBOX_WITH_SCSI
[67065]	145	extrn _scsi_init:near
[100658]	146	endif
[67065]	147	extrn _ata_detect:near
	148	extrn _cdemu_init:near
	149	extrn _keyboard_init:near
	150	extrn _print_bios_banner:near
	151	extrn rom_scan_:near
[60579]	152	ifdef VBOX_WITH_AHCI
[67065]	153	extrn _ahci_init:near
[60579]	154	endif
[60610]	155	if VBOX_BIOS_CPU ge 80286
[67065]	156	extrn _int15_blkmove:near
[100658]	157	extrn _inv_op_handler:near
[60610]	158	endif
[61054]	159	if VBOX_BIOS_CPU ge 80386
[75229]	160	extrn _int15_function32:near
[67065]	161	extrn _apic_setup:near
[100658]	162	extrn _pci16_function:near
[61054]	163	endif
[38699]	164
	165
	166	;; Symbols referenced from C code
[67065]	167	public _diskette_param_table
	168	public _pmode_IDT
	169	public _rmode_IDT
	170	public post
	171	public eoi_both_pics
	172	public rtc_post
[38699]	173
	174	;; Additional publics for easier disassembly and debugging
[41084]	175	ifndef DEBUG
[67065]	176	DEBUG equ 1
[41084]	177	endif
[67065]	178	ifdef DEBUG
[38699]	179
[67065]	180	public int08_handler
	181	public int0e_handler
	182	public int11_handler
	183	public int12_handler
	184	public int13_handler
	185	public int13_relocated
[60441]	186	if VBOX_BIOS_CPU eq 8086
[67065]	187	public jmp_call_ret_int13_out
[60441]	188	endif
[67065]	189	public int15_handler
	190	public int17_handler
	191	public int19_handler
	192	public int19_relocated
	193	public dummy_iret
	194	public nmi
	195	public rom_fdpt
	196	public cpu_reset
	197	public normal_post
	198	public eoi_jmp_post
	199	public no_eoi_jmp_post
	200	public eoi_master_pic
	201	public ebda_post
	202	public seg_40_value
	203	public hard_drive_post
	204	public int13_legacy
	205	public int70_handler
	206	public int75_handler
	207	public int15_handler32
	208	public int15_handler_mouse
	209	public iret_modify_cf
	210	public init_pic
	211	public floppy_post
	212	public int13_out
	213	public int13_disk
	214	public int13_notfloppy
	215	public int13_legacy
	216	public int13_noeltorito
	217	public int1c_handler
	218	public int10_handler
	219	public int74_handler
	220	public int76_handler
	221	public detect_parport
	222	public detect_serial
	223	public font8x8
[38699]	224
	225	endif
	226
[75233]	227	;; Keyboard related constants
	228	KBDC_DISABLE EQU 0ADh
	229	KBDC_ENABLE EQU 0AEh
	230	KBC_CMD EQU 64h
	231	KBC_DATA EQU 60h
	232
	233
[38699]	234	;; NOTE: The last 8K of the ROM BIOS are peppered with fixed locations which
	235	;; must be retained for compatibility. As a consequence, some of the space is
	236	;; going to be wasted, but the gaps should be filled with miscellaneous code
	237	;; and data when possible.
	238
[60422]	239	SET_DEFAULT_CPU_286
[38699]	240
[67065]	241	BIOSSEG segment 'CODE'
	242	assume cs:BIOSSEG
[38699]	243
	244	;;
[51059]	245	;; Start of fixed code - eoi_jmp_post is kept near here to allow short jumps.
[38699]	246	;;
[67065]	247	BIOSORG 0E030h, 0E02Eh
[51061]	248	eoi_both_pics:
[67065]	249	mov al, PIC_CMD_EOI
	250	out PIC_SLAVE, al
[38699]	251	eoi_master_pic:
[67065]	252	mov al, PIC_CMD_EOI
	253	out PIC_MASTER, al
	254	ret
[38699]	255
[67065]	256	;; routine to write the pointer in DX:AX to memory starting
	257	;; at DS:BX (repeat CX times)
	258	;; - modifies BX, CX
	259	set_int_vects proc near
[44107]	260
[67065]	261	mov [bx], ax
	262	mov [bx+2], dx
	263	add bx, 4
	264	loop set_int_vects
	265	ret
[44107]	266
[67065]	267	set_int_vects endp
[44107]	268
[51059]	269	eoi_jmp_post:
[75233]	270	;; Calling eoi_both_pics can't be done because it writes to stack, potentially
	271	;; corrupting memory. AT BIOS also only clears the master PIC, not both.
	272	;; clear keyboard buffer (and possible interrupt)
	273	in al, KBC_DATA
	274	mov al, PIC_CMD_EOI
	275	out PIC_MASTER, al
	276
[60402]	277	no_eoi_jmp_post:
[75233]	278	mov ax, 40h
[67065]	279	mov ds, ax
[75233]	280	jmp dword ptr ds:[67h]
[51059]	281
[67065]	282	seg_40_value: dw 40h ;; Replaces a push 40; pop ds.
[60441]	283
[38699]	284	;; --------------------------------------------------------
	285	;; POST entry point
	286	;; --------------------------------------------------------
[67065]	287	BIOSORG 0E05Bh, 0E059h
[38699]	288	post:
[67065]	289	cli
[44107]	290
[60422]	291	if VBOX_BIOS_CPU ge 80286
[67065]	292	;; Check if in protected (V86) mode. If so, the CPU needs
	293	;; to be reset.
[60422]	294	.286p
[67065]	295	smsw ax
	296	test ax, 1
	297	jz in_real_mode
	298	SET_DEFAULT_CPU_286
[60441]	299	else
[67065]	300	jmp in_real_mode
[60422]	301	endif
[44107]	302
[67065]	303	;; Reset processor to get out of protected mode. Use system
	304	;; port instead of KBC.
[51059]	305	reset_sys:
[67065]	306	mov al, 1
	307	out 92h, al
	308	jmp $ ; not strictly necessary in a VM
[69300]	309
	310
[44107]	311	in_real_mode:
[67065]	312	;; read the CMOS shutdown status
	313	mov al, 0Fh
	314	out CMOS_ADDR, al
	315	in al, CMOS_DATA
[38699]	316
[67065]	317	;; save status
	318	xchg ah, al
[38699]	319
[67065]	320	;; Check KBC self-test/shutdown flag. If it is set, we need
	321	;; to check for a reboot attempt.
	322	in al, 64h
	323	test al, 4 ; clear flag indicates cold boot
	324	jz cont_post
[51059]	325
[67065]	326	;; Warm boot, check the shutdown byte.
	327	mov al, ah
	328	or al, al
	329	jnz cont_post
[51059]	330
[67065]	331	;; Warm boot but shutdown byte is zero. This is either a warm
	332	;; boot request or an attempt to reset the system via triple
	333	;; faulting the CPU or similar. Check reboot flag.
	334	;; NB: At this point, registers need not be preserved.
[67490]	335	mov ds, cs:[seg_40_value]
[67065]	336	cmp word ptr ds:[72h], 1234h
	337	jnz reset_sys ; trigger system reset
[51059]	338
	339	cont_post:
[67065]	340	;; reset the shutdown status in CMOS
	341	mov al, 0Fh
	342	out CMOS_ADDR, al
	343	mov al, 0
	344	out CMOS_DATA, al
[38699]	345
[67065]	346	;; pre-check the shutdown status - shutdown codes 9/A leave
	347	;; the hardware alone
	348	mov al, ah
	349	cmp al, 09h
	350	jz check_shutdown
	351	cmp al, 0Ah
	352	jz check_shutdown
[69300]	353
[67065]	354	xor al, al
[48446]	355
[67065]	356	;; reset the DMA controllers
	357	out 00Dh, al
	358	out 0DAh, al
[48446]	359
[67065]	360	;; then initialize the DMA controllers
	361	mov al, 0C0h
	362	out 0D6h, al ; enable channel 4 cascade
	363	mov al, 0
	364	out 0D4h, al ; unmask channel 4
[48446]	365
	366	check_shutdown:
[67065]	367	;; examine the shutdown status code
	368	mov al, ah
	369	cmp al, 0
	370	jz normal_post
[48446]	371
[67065]	372	cmp al, 0Dh
	373	jae normal_post
	374	cmp al, 9
	375	jne check_next_std
	376	jmp return_blkmove
[69300]	377	check_next_std:
[38699]	378
[75233]	379	mov sp, 400h
[67065]	380	;; 05h = EOI + jump through 40:67
	381	cmp al, 5
	382	je eoi_jmp_post
	383	;; 0ah = jump through 40:67 (no EOI) ;ba x 1 %fe05b ; ba x 1 %18b81
	384	cmp al, 0ah
	385	je no_eoi_jmp_post
[38699]	386
[67065]	387	;; any other shutdown status values are ignored
	388	;; OpenSolaris sets the status to 0Ah in some cases?
	389	jmp normal_post
[38699]	390
	391	normal_post:
[67065]	392	;; shutdown code 0: normal startup
[44107]	393
[67065]	394	;; Set up the stack top at 0:7800h. The stack should not be
	395	;; located above 0:7C00h; that conflicts with PXE, which
	396	;; considers anything above that address to be fair game.
	397	;; The traditional locations are 30:100 (PC) or 0:400 (PC/AT).
	398	mov ax, 7800h
	399	mov sp, ax
	400	xor ax, ax
	401	mov ds, ax
	402	mov ss, ax
[38699]	403
[67065]	404	;; clear the bottom of memory except for the word at 40:72
	405	;; TODO: Why not clear all of it? What's the point?
	406	mov es, ax
	407	xor di, di
	408	cld
	409	mov cx, 0472h / 2
	410	rep stosw
	411	inc di
	412	inc di
	413	mov cx, (1000h - 0472h - 2) / 2
	414	rep stosw
[38699]	415
[67065]	416	;; clear the remaining base memory except for the top
	417	;; of the EBDA (the MP table is planted there)
	418	xor bx, bx
[38699]	419	memory_zero_loop:
[67065]	420	add bx, 1000h
	421	cmp bx, 9000h
	422	jae memory_cleared
	423	mov es, bx
	424	xor di, di
	425	mov cx, 8000h ; 32K words
	426	rep stosw
	427	jmp memory_zero_loop
[38699]	428	memory_cleared:
[67065]	429	mov es, bx
	430	xor di, di
	431	mov cx, 7FF8h ; all but the last 16 bytes
	432	rep stosw
	433	xor bx, bx
[38699]	434
	435
[67065]	436	C_SETUP
	437	call _log_bios_start
[38699]	438
[60422]	439	if VBOX_BIOS_CPU ge 80386
[67065]	440	call pmode_setup
[60422]	441	endif
[38699]	442
[67065]	443	;; set all interrupts in 00h-5Fh range to default handler
	444	xor bx, bx
	445	mov ds, bx
	446	mov cx, 60h ; leave the rest as zeros
	447	mov ax, dummy_iret
	448	mov dx, BIOSSEG
	449	call set_int_vects
[38699]	450
[67065]	451	;; also set 68h-77h to default handler; note that the
	452	;; 60h-67h range must contain zeros for certain programs
	453	;; to function correctly
	454	mov bx, 68h * 4
	455	mov cx, 10h
	456	call set_int_vects
[69300]	457
[67065]	458	;; base memory in K to 40:13
[84901]	459	mov al, 16h
	460	out CMOS_ADDR, al
	461	in al, CMOS_DATA
	462	mov ah, al
	463	mov al, 15h
	464	out CMOS_ADDR, al
	465	in al, CMOS_DATA
	466	sub ax, EBDA_SIZE
[67065]	467	mov ds:[413h], ax
[38699]	468
[67065]	469	;; manufacturing test at 40:12
	470	;; zeroed out above
[38699]	471
[67065]	472	;; set up various service vectors
	473	;; TODO: This should use the table at FEF3h instead
[100658]	474	if VBOX_BIOS_CPU ge 80286
[67065]	475	SET_INT_VECTOR 06h, BIOSSEG, int06_handler
[100658]	476	endif
[67065]	477	SET_INT_VECTOR 11h, BIOSSEG, int11_handler
	478	SET_INT_VECTOR 12h, BIOSSEG, int12_handler
	479	SET_INT_VECTOR 15h, BIOSSEG, int15_handler
	480	SET_INT_VECTOR 17h, BIOSSEG, int17_handler
	481	SET_INT_VECTOR 18h, BIOSSEG, int18_handler
	482	SET_INT_VECTOR 19h, BIOSSEG, int19_handler
	483	SET_INT_VECTOR 1Ch, BIOSSEG, int1c_handler
[38699]	484
[67065]	485	call ebda_post
[38699]	486
[67065]	487	;; Initialize PCI devices. This can and should be done early.
[60433]	488	if VBOX_BIOS_CPU ge 80386 ; (Impossible to do on 16-bit CPUs.)
[67065]	489	call pcibios_init_iomem_bases
	490	call pcibios_init_irqs
[60422]	491	endif
[67065]	492	SET_INT_VECTOR 1Ah, BIOSSEG, int1a_handler
[50160]	493
[67065]	494	;; PIT setup
	495	SET_INT_VECTOR 08h, BIOSSEG, int08_handler
	496	mov al, 34h ; timer 0, binary, 16-bit, mode 2
	497	out 43h, al
	498	mov al, 0 ; max count -> ~18.2 Hz
	499	out 40h, al
	500	out 40h, al
[38699]	501
[67065]	502	;; video setup - must be done before POSTing VGA ROM
	503	SET_INT_VECTOR 10h, BIOSSEG, int10_handler
[50160]	504
[67065]	505	;; keyboard setup
	506	SET_INT_VECTOR 09h, BIOSSEG, int09_handler
	507	SET_INT_VECTOR 16h, BIOSSEG, int16_handler
[38699]	508
[67065]	509	xor ax, ax
	510	mov ds, ax
	511	mov al, 10h
	512	mov ds:[496h], al ; keyboard status flags 3
[38699]	513
[67065]	514	mov bx, 1Eh
	515	mov ds:[41Ah], bx ; keyboard buffer head
	516	mov ds:[41Ch], bx ; keyboard buffer tail
	517	mov ds:[480h], bx ; keyboard buffer start
	518	mov bx, 3Eh
	519	mov ds:[482h], bx ; keyboard buffer end
[38699]	520
[67065]	521	;; store CMOS equipment byte in BDA
	522	mov al, 14h
	523	out CMOS_ADDR, al
	524	in al, CMOS_DATA
	525	mov ds:[410h], al
[51000]	526
[67065]	527	push ds
	528	C_SETUP
[50160]	529
[67065]	530	;; Scan for video ROMs in the C000-C800 range. This is done
	531	;; early so that errors are displayed on the screen.
	532	mov ax, 0C000h
	533	mov dx, 0C800h
	534	call rom_scan_
[50160]	535
[67065]	536	;; Initialize the keyboard
	537	call _keyboard_init
	538	pop ds
[38699]	539
[67065]	540	;; parallel setup
	541	SET_INT_VECTOR 0Fh, BIOSSEG, dummy_iret
	542	xor ax, ax
	543	mov ds, ax
	544	xor bx, bx
	545	mov cl, 14h ; timeout value
	546	mov dx, 378h ; parallel port 1
	547	call detect_parport
	548	mov dx, 278h ; parallel port 2
	549	call detect_parport
	550	DO_shl bx, 0Eh
	551	mov ax, ds:[410h] ; equipment word
	552	and ax, 3FFFh
	553	or ax, bx ; set number of parallel ports
	554	mov ds:[410h], ax ; store in BDA
[38699]	555
[67065]	556	;; Serial setup
[67888]	557	SET_INT_VECTOR 0Bh, BIOSSEG, dummy_isr ; IRQ 3
	558	SET_INT_VECTOR 0Ch, BIOSSEG, dummy_isr ; IRQ 4
[67065]	559	SET_INT_VECTOR 14h, BIOSSEG, int14_handler
	560	xor bx, bx
	561	mov cl, 0Ah ; timeout value
	562	mov dx, 3F8h ; first serial address
	563	call detect_serial
	564	mov dx, 2F8h ; second serial address
	565	call detect_serial
	566	mov dx, 3E8h ; third serial address
	567	call detect_serial
	568	mov dx, 2E8h ; fourth serial address
	569	call detect_serial
	570	DO_shl bx, 9
	571	mov ax, ds:[410h] ; equipment word
	572	and ax, 0F1FFh ; bits 9-11 determine serial ports
	573	or ax, bx
	574	mov ds:[410h], ax
[38699]	575
[67065]	576	;; CMOS RTC
	577	SET_INT_VECTOR 4Ah, BIOSSEG, dummy_iret ; TODO: redundant?
	578	SET_INT_VECTOR 70h, BIOSSEG, int70_handler
	579	;; BIOS DATA AREA 4CEh ???
	580	call rtc_post
[38699]	581
[67065]	582	jmp norm_post_cont
[38699]	583
[42809]	584
[38699]	585	;; --------------------------------------------------------
	586	;; NMI handler
	587	;; --------------------------------------------------------
[67065]	588	BIOSORG 0E2C3h, 0E2C1h
[38699]	589	nmi:
[67065]	590	C_SETUP
	591	call _nmi_handler_msg
	592	iret
[38699]	593
	594	int75_handler:
[67065]	595	out 0F0h, al ; clear IRQ13
	596	call eoi_both_pics
	597	int 2 ; emulate legacy NMI
	598	iret
[38699]	599
	600
[67065]	601	hard_drive_post proc near
[38699]	602
[67065]	603	xor ax, ax
	604	mov ds, ax
	605	;; TODO: Didn't we just clear the entire EBDA?
	606	mov ds:[474h], al ; last HD operation status
	607	mov ds:[477h], al ; HD port offset (XT only???)
	608	mov ds:[48Ch], al ; HD status register
	609	mov ds:[48Dh], al ; HD error register
	610	mov ds:[48Eh], al ; HD task complete flag
	611	mov al, 0C0h
	612	mov ds:[476h], al ; HD control byte
	613	;; set up hard disk interrupt vectors
	614	SET_INT_VECTOR 13h, BIOSSEG, int13_handler
	615	SET_INT_VECTOR 76h, BIOSSEG, int76_handler
[69025]	616	;; The ATA init code sets up INT 41h/46h FDPT pointers
[67065]	617	ret
[38699]	618
[67065]	619	hard_drive_post endp
[38699]	620
	621
[48446]	622	norm_post_cont:
[67065]	623	;; PS/2 mouse setup
	624	SET_INT_VECTOR 74h, BIOSSEG, int74_handler
[51059]	625
[67065]	626	;; IRQ 13h (FPU exception) setup
	627	SET_INT_VECTOR 75h, BIOSSEG, int75_handler
[51059]	628
[67065]	629	call init_pic
[51059]	630
[67065]	631	C_SETUP
[61054]	632
	633	if VBOX_BIOS_CPU ge 80386
[67065]	634	;; Set up local APIC
	635	.386
	636	pushad
	637	call _apic_setup
	638	popad
	639	SET_DEFAULT_CPU_286
[61054]	640	endif
	641
[67065]	642	;; ATA/ATAPI driver setup
	643	call _ata_init
	644	call _ata_detect
[48446]	645
	646	ifdef VBOX_WITH_AHCI
[67065]	647	; AHCI driver setup
[68611]	648	;; TODO: AHCI initialization needs timer, but enabling
	649	;; interrupts elsewhere may be risky. Just do it around
	650	;; the AHCI init.
	651	sti
[67065]	652	call _ahci_init
[68611]	653	cli
[48446]	654	endif
	655
	656	ifdef VBOX_WITH_SCSI
[67065]	657	; SCSI driver setup
	658	call _scsi_init
[48446]	659	endif
	660
[67065]	661	;; floppy setup
	662	call floppy_post
[48446]	663
[67065]	664	;; hard drive setup
	665	call hard_drive_post
[48446]	666
[67065]	667	C_SETUP ; in case assembly code changed things
	668	;; Scan for additional ROMs in the C800-EFFF range
	669	mov ax, 0C800h
	670	mov dx, 0F000h
	671	call rom_scan_
[69300]	672
[67115]	673	if VBOX_BIOS_CPU ge 80386
	674	;; The POST code does not bother preserving high bits of the
	675	;; 32-bit registers. Now is a good time to clear them so that
	676	;; there's no garbage left in high bits.
	677	.386
	678	xor eax, eax
	679	xor ebx, ebx
	680	xor ecx, ecx
	681	xor edx, edx
	682	.286
	683	endif
	684
[67065]	685	call _print_bios_banner
[69300]	686
[67065]	687	;; El Torito floppy/hard disk emulation
	688	call _cdemu_init
[48446]	689
[67065]	690	; TODO: what's the point of enabling interrupts here??
	691	sti ; enable interrupts
	692	int 19h
	693	;; does not return here
	694	sti
[48446]	695	wait_forever:
[67065]	696	hlt
	697	jmp wait_forever
	698	cli
	699	hlt
[48446]	700
[69300]	701
[48446]	702	;;
	703	;; Return from block move (shutdown code 09h). Care must be taken to disturb
	704	;; register and memory state as little as possible.
	705	;;
	706	return_blkmove:
[67065]	707	.286p
	708	mov ax, 40h
	709	mov ds, ax
	710	;; restore user stack
	711	mov ss, ds:[69h]
	712	mov sp, ds:[67h]
	713	;; reset A20 gate
	714	in al, 92h
	715	and al, 0FDh
	716	out 92h, al
	717	;; ensure proper real mode IDT
	718	lidt fword ptr cs:_rmode_IDT
	719	;; restore user segments
	720	pop ds
	721	pop es
	722	;; set up BP
	723	mov bp, sp
	724	;; restore status code
	725	in al, 80h
	726	mov [bp+15], al
	727	;; set ZF/CF
	728	cmp ah,al ; AH is zero here!
	729	;; restore registers and return
	730	popa
	731	sti
	732	retf 2
	733	SET_DEFAULT_CPU_286
[48446]	734
[60422]	735
[38699]	736	;; --------------------------------------------------------
	737	;; INT 13h handler - Disk services
	738	;; --------------------------------------------------------
[67065]	739	BIOSORG 0E3FEh, 0E3FCh
[38699]	740
	741	int13_handler:
[67065]	742	jmp int13_relocated
[38699]	743
	744
[95050]	745	;; Fixed disk table entry
	746	fd_entry struc
	747	cyls dw ? ; Cylinders
	748	heads db ? ; Heads
	749	res_1 dw ?
	750	wpcomp dw ? ; Write pre-compensation start cylinder
	751	res_2 db ?
	752	ctrl db ? ; Control byte
[95052]	753	res_3 db ?
	754	res_4 db ?
	755	res_5 db ?
[95050]	756	lzone dw ? ; Landing zone cylinder
	757	spt db ? ; Sectors per track
[95052]	758	res_6 db ?
[95050]	759	fd_entry ends
	760
[38699]	761	;; --------------------------------------------------------
	762	;; Fixed Disk Parameter Table
	763	;; --------------------------------------------------------
[67065]	764	BIOSORG_CHECK 0E401h ; fixed wrt preceding
[38699]	765
	766	rom_fdpt:
[95050]	767	fd_entry < 306, 4, 0, 128, 0, 0, 0, 0, 0, 305, 17, 0> ; Type 1, 10 MB
	768	fd_entry < 615, 4, 0, 300, 0, 0, 0, 0, 0, 615, 17, 0> ; Type 2, 20 MB
	769	fd_entry < 615, 6, 0, 300, 0, 0, 0, 0, 0, 615, 17, 0> ; Type 3, 30 MB
	770	fd_entry < 940, 8, 0, 512, 0, 0, 0, 0, 0, 940, 17, 0> ; Type 4, 62 MB
	771	fd_entry < 940, 6, 0, 512, 0, 0, 0, 0, 0, 940, 17, 0> ; Type 5, 46 MB
	772	fd_entry < 615, 4, 0, -1, 0, 0, 0, 0, 0, 615, 17, 0> ; Type 6, 20 MB
	773	fd_entry < 462, 8, 0, 256, 0, 0, 0, 0, 0, 511, 17, 0> ; Type 7, 31 MB
	774	fd_entry < 733, 5, 0, -1, 0, 0, 0, 0, 0, 733, 17, 0> ; Type 8, 30 MB
	775	fd_entry < 900, 15, 0, -1, 0, 8, 0, 0, 0, 901, 17, 0> ; Type 9, 112 MB
	776	fd_entry < 820, 3, 0, -1, 0, 0, 0, 0, 0, 820, 17, 0> ; Type 10, 20 MB
[38699]	777
[95050]	778	fd_entry < 855, 5, 0, -1, 0, 0, 0, 0, 0, 855, 17, 0> ; Type 11, 35 MB
	779	fd_entry < 855, 7, 0, -1, 0, 0, 0, 0, 0, 855, 17, 0> ; Type 12, 49 MB
	780	fd_entry < 306, 8, 0, 128, 0, 0, 0, 0, 0, 319, 17, 0> ; Type 13, 20 MB
	781	fd_entry < 733, 7, 0, -1, 0, 0, 0, 0, 0, 733, 17, 0> ; Type 14, 42 MB
	782	fd_entry < 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0> ; Reserved
	783	fd_entry < 612, 4, 0, -1, 0, 0, 0, 0, 0, 633, 17, 0> ; Type 16, 20 MB
	784	fd_entry < 977, 5, 0, 300, 0, 0, 0, 0, 0, 977, 17, 0> ; Type 17, 40 MB
	785	fd_entry < 977, 7, 0, -1, 0, 0, 0, 0, 0, 977, 17, 0> ; Type 18, 56 MB
	786	fd_entry <1024, 7, 0, 512, 0, 0, 0, 0, 0,1023, 17, 0> ; Type 19, 59 MB
	787	fd_entry < 733, 5, 0, 300, 0, 0, 0, 0, 0, 732, 17, 0> ; Type 20, 30 MB
	788
	789	fd_entry < 733, 7, 0, 300, 0, 0, 0, 0, 0, 732, 17, 0> ; Type 21, 42 MB
	790	fd_entry < 733, 5, 0, 300, 0, 0, 0, 0, 0, 733, 17, 0> ; Type 22, 30 MB
	791	fd_entry < 306, 4, 0, 0, 0, 0, 0, 0, 0, 336, 17, 0> ; Type 23, 10 MB
	792
[38699]	793	;; --------------------------------------------------------
	794	;; INT 19h handler - Boot load service
	795	;; --------------------------------------------------------
[67065]	796	BIOSORG 0E6F2h, 0E6F0h
[38699]	797
	798	int19_handler:
[67065]	799	jmp int19_relocated
[38699]	800
	801
	802
	803	;; --------------------------------------------------------
	804	;; System BIOS Configuration Table
	805	;; --------------------------------------------------------
[67065]	806	BIOSORG_CHECK 0E6F5h ; fixed wrt preceding
[38699]	807	; must match BIOS_CONFIG_TABLE
	808	bios_cfg_table:
[67065]	809	dw 9 ; table size in bytes
	810	db SYS_MODEL_ID
	811	db SYS_SUBMODEL_ID
	812	db BIOS_REVISION
	813	; Feature byte 1
	814	; b7: 1=DMA channel 3 used by hard disk
	815	; b6: 1=2 interrupt controllers present
	816	; b5: 1=RTC present
	817	; b4: 1=BIOS calls int 15h/4Fh for every key
	818	; b3: 1=wait for extern event supported (Int 15h/41h)
	819	; b2: 1=extended BIOS data area used
	820	; b1: 0=AT or ESDI bus, 1=MicroChannel
	821	; b0: 1=Dual bus (MicroChannel + ISA)
[38699]	822	ifdef BX_CALL_INT15_4F
[67065]	823	db 74h; or USE_EBDA
[38699]	824	else
[67065]	825	db 64h; or USE_EBDA
[38699]	826	endif
[67065]	827	; Feature byte 2
	828	; b7: 1=32-bit DMA supported
	829	; b6: 1=int16h, function 9 supported
	830	; b5: 1=int15h/C6h (get POS data) supported
	831	; b4: 1=int15h/C7h (get mem map info) supported
	832	; b3: 1=int15h/C8h (en/dis CPU) supported
	833	; b2: 1=non-8042 kb controller
	834	; b1: 1=data streaming supported
	835	; b0: reserved
	836	db 40h
	837	; Feature byte 3
	838	; b7: not used
	839	; b6: reserved
	840	; b5: reserved
	841	; b4: POST supports ROM-to-RAM enable/disable
	842	; b3: SCSI on system board
	843	; b2: info panel installed
	844	; b1: Initial Machine Load (IML) system - BIOS on disk
	845	; b0: SCSI supported in IML
	846	db 0
	847	; Feature byte 4
	848	; b7: IBM private
	849	; b6: EEPROM present
	850	; b5-3: ABIOS presence (011 = not supported)
	851	; b2: private
	852	; b1: memory split above 16Mb supported
	853	; b0: POSTEXT directly supported by POST
	854	db 0
	855	; Feature byte 5 (IBM)
	856	; b1: enhanced mouse
	857	; b0: flash EPROM
	858	db 0
[38699]	859
	860
	861	;; --------------------------------------------------------
	862	;; Baud Rate Generator Table
	863	;; --------------------------------------------------------
[67065]	864	BIOSORG 0E729h, 0E727h
[38699]	865
	866
	867	;; --------------------------------------------------------
	868	;; INT 14h handler - Serial Communication Service
	869	;; --------------------------------------------------------
[67065]	870	BIOSORG 0E739h, 0E737h
[38699]	871	int14_handler:
[67065]	872	push ds
	873	push es
	874	DO_pusha
	875	C_SETUP
	876	call _int14_function
	877	DO_popa
	878	pop es
	879	pop ds
	880	iret
[38699]	881
	882
	883
	884	;;
	885	;; Handler for unexpected hardware interrupts
	886	;;
	887	dummy_isr:
[67065]	888	push ds
	889	push es
	890	DO_pusha
	891	C_SETUP
	892	call _dummy_isr_function
	893	DO_popa
	894	pop es
	895	pop ds
	896	iret
[38699]	897
	898
[67065]	899	init_pic proc near
[38699]	900
[67065]	901	mov al, 11h ; send init commands
	902	out PIC_MASTER, al
	903	out PIC_SLAVE, al
	904	mov al, 08h ; base 08h
	905	out PIC_MASTER+1, al
	906	mov al, 70h ; base 70h
	907	out PIC_SLAVE+1, al
	908	mov al, 04h ; master PIC
	909	out PIC_MASTER+1, al
	910	mov al, 02h ; slave PIC
	911	out PIC_SLAVE+1, al
	912	mov al, 01h
	913	out PIC_MASTER+1, al
	914	out PIC_SLAVE+1, al
	915	mov al, 0B8h ; unmask IRQs 0/1/2/6
	916	out PIC_MASTER+1, al
	917	mov al, 08Fh
	918	out PIC_SLAVE+1, al ; unmask IRQs 12/13/14
	919	ret
[38699]	920
[67065]	921	init_pic endp
[38699]	922
[67065]	923	ebda_post proc near
[38699]	924
[67065]	925	SET_INT_VECTOR 0Dh, BIOSSEG, dummy_isr ; IRQ 5
	926	SET_INT_VECTOR 0Fh, BIOSSEG, dummy_isr ; IRQ 7
[67888]	927	SET_INT_VECTOR 72h, BIOSSEG, dummy_isr ; IRQ 10
	928	SET_INT_VECTOR 73h, BIOSSEG, dummy_isr ; IRQ 11
[67065]	929	SET_INT_VECTOR 77h, BIOSSEG, dummy_isr ; IRQ 15
[38699]	930
[84901]	931	;; calculate EBDA segment
	932	xor ax, ax
[67065]	933	mov ds, ax
[84901]	934	mov ax, ds:[413h] ; conventional memory size minus EBDA size
	935	mov cx, 64 ; 64 paras per KB
	936	mul cx
	937	;; store EBDA seg in 40:0E
	938	mov word ptr ds:[40Eh], ax
	939	;; store EBDA size in the first word of EBDA
	940	mov ds, ax
[67065]	941	mov byte ptr ds:[0], EBDA_SIZE
[84901]	942	;; must reset DS to zero again
[67065]	943	xor ax, ax
	944	mov ds, ax
	945	ret
[38699]	946
[67065]	947	ebda_post endp
[38699]	948
	949
	950
	951	;; --------------------------------------------------------
	952	;; INT 16h handler - Keyboard service
	953	;; --------------------------------------------------------
[67065]	954	BIOSORG 0E82Eh, 0E82Ch
[38699]	955	int16_handler:
[67065]	956	sti
[67785]	957	;; Flags are saved after enabling interrupts, and with
	958	;; implicitly cleared TF. Software may depend on that.
	959	pushf
[67065]	960	push es
	961	push ds
	962	DO_pusha
[38699]	963
[67065]	964	cmp ah, 0
	965	je int16_F00
[38699]	966
[67065]	967	cmp ah, 10h
	968	je int16_F00
[38699]	969
[67065]	970	C_SETUP
	971	call _int16_function
	972	DO_popa
	973	pop ds
	974	pop es
[67785]	975	add sp, 2 ; Skip saved flags
[67065]	976	iret
[38699]	977
	978	int16_F00:
[67065]	979	mov bx, 40h ; TODO: why 40h here and 0 elsewhere?
	980	mov ds, bx
[38699]	981	int16_wait_for_key:
[67065]	982	cli
	983	mov bx, ds:[1Ah]
	984	cmp bx, ds:[1Ch]
	985	jne int16_key_found
	986	sti
	987	nop
[38699]	988	; TODO: review/enable?
	989	if 0
[67065]	990	push ax
	991	mov ax, 9002h
	992	int 15h
	993	pop ax
[38699]	994	endif
[67065]	995	jmp int16_wait_for_key
[38699]	996
	997	int16_key_found:
[67065]	998	C_SETUP
	999	call _int16_function
	1000	DO_popa
	1001	pop ds
	1002	pop es
[67785]	1003	add sp, 2 ; Skip saved flags
[40721]	1004	; TODO: review/enable? If so, flags should be restored here?
[38699]	1005	if 0
[67065]	1006	push ax
	1007	mov ax, 9202h
	1008	int 15h
	1009	pop ax
[38699]	1010	endif
[67065]	1011	iret
[38699]	1012
	1013
[60422]	1014	if VBOX_BIOS_CPU ge 80386
[38699]	1015	;; Quick and dirty protected mode entry/exit routines
	1016	include pmode.inc
	1017
	1018	;; Initialization code which needs to run in protected mode (LAPIC etc.)
	1019	include pmsetup.inc
[60422]	1020	endif
[38699]	1021
	1022
	1023	;; --------------------------------------------------------
	1024	;; INT 09h handler - Keyboard ISR (IRQ 1)
	1025	;; --------------------------------------------------------
[67065]	1026	BIOSORG 0E987h, 0E985h
[38699]	1027	int09_handler:
[67065]	1028	cli ; TODO: why? they're off already!
	1029	push ax
	1030	mov al, KBDC_DISABLE
	1031	out KBC_CMD, al
[38699]	1032
[67065]	1033	in al, KBC_DATA
	1034	push ds
	1035	DO_pusha
	1036	cld ; Before INT 15h (and any C code)
[38699]	1037	ifdef BX_CALL_INT15_4F
[67065]	1038	mov ah, 4Fh
	1039	stc
	1040	int 15h ; keyboard intercept
	1041	jnc int09_done
[38699]	1042	endif
[67065]	1043	sti ; Only after calling INT 15h
[38699]	1044
[67065]	1045	;; check for extended key
	1046	cmp al, 0E0h
	1047	jne int09_check_pause
	1048	xor ax, ax
	1049	mov ds, ax
	1050	or byte ptr ds:[496h], 2 ; mf2_state \|= 0x02
	1051	jmp int09_done
[38699]	1052
	1053	int09_check_pause:
[67065]	1054	cmp al, 0E1h ; pause key?
	1055	jne int09_process_key
	1056	xor ax, ax
	1057	mov ds, ax
	1058	or byte ptr ds:[496h], 1 ; mf2_state \| 0x01
	1059	jmp int09_done
[38699]	1060
	1061	int09_process_key:
[67065]	1062	push es
	1063	C_SETUP
	1064	call _int09_function
	1065	pop es
[38699]	1066
	1067	int09_done:
[67065]	1068	DO_popa
	1069	pop ds
	1070	cli
	1071	call eoi_master_pic
[38699]	1072
[67065]	1073	mov al, KBDC_ENABLE
	1074	out KBC_CMD, al
	1075	pop ax
	1076	iret
[38699]	1077
	1078
[100658]	1079	if VBOX_BIOS_CPU ge 80286
	1080
[38699]	1081	;; --------------------------------------------------------
[49286]	1082	;; INT 06h handler - Invalid Opcode Exception
	1083	;; --------------------------------------------------------
	1084
	1085	int06_handler:
[67065]	1086	DO_pusha
	1087	push es
	1088	push ds
	1089	C_SETUP
	1090	call _inv_op_handler
	1091	pop ds
	1092	pop es
	1093	DO_popa
	1094	iret
[49286]	1095
[100658]	1096	endif
	1097
[49286]	1098	;; --------------------------------------------------------
[38699]	1099	;; INT 13h handler - Diskette service
	1100	;; --------------------------------------------------------
[67065]	1101	BIOSORG 0EC59h, 0EC57h
[38699]	1102	int13_diskette:
[67065]	1103	jmp int13_noeltorito
[38699]	1104
	1105
	1106
	1107	;; --------------------------------------------------------
	1108	;; INT 13h handler - Disk service
	1109	;; --------------------------------------------------------
	1110	int13_relocated:
[67065]	1111	;; check for an El-Torito function
	1112	cmp ah, 4Ah
	1113	jb int13_not_eltorito
[38699]	1114
[67065]	1115	cmp ah, 4Dh
	1116	ja int13_not_eltorito
[38699]	1117
[67065]	1118	DO_pusha
	1119	push es
	1120	push ds
	1121	C_SETUP ; TODO: setup C envrionment only once?
	1122	DO_JMP_CALL_EX _int13_eltorito, int13_out, jmp_call_ret_int13_out ; ELDX not used
[60441]	1123	if VBOX_BIOS_CPU eq 8086
	1124	jmp_call_ret_int13_out: dw offset int13_out
	1125	endif
[38699]	1126
	1127	int13_not_eltorito:
[67065]	1128	push es
	1129	push ax ; TODO: better register save/restore
	1130	push bx
	1131	push cx
	1132	push dx
[38699]	1133
[67065]	1134	;; check if emulation is active
	1135	call _cdemu_isactive
	1136	cmp al, 0
	1137	je int13_cdemu_inactive
[38699]	1138
[67065]	1139	;; check if access to the emulated drive
	1140	call _cdemu_emulated_drive
	1141	pop dx ; recover dx (destroyed by C code)
	1142	push dx
	1143	cmp al, dl ; INT 13h on emulated drive
	1144	jne int13_nocdemu
[38699]	1145
[67065]	1146	pop dx
	1147	pop cx
	1148	pop bx
	1149	pop ax
	1150	pop es
[38699]	1151
[67065]	1152	DO_pusha
	1153	push es
	1154	push ds
	1155	C_SETUP ; TODO: setup environment only once?
[38699]	1156
[67065]	1157	DO_JMP_CALL_EX _int13_cdemu, int13_out, jmp_call_ret_int13_out ; ELDX not used
[38699]	1158
	1159	int13_nocdemu:
[67065]	1160	and dl, 0E0h ; mask to get device class
	1161	cmp al, dl
	1162	jne int13_cdemu_inactive
[38699]	1163
[67065]	1164	pop dx
	1165	pop cx
	1166	pop bx
	1167	pop ax
	1168	pop es
[38699]	1169
[67065]	1170	push ax
	1171	push cx
	1172	push dx
	1173	push bx
[38699]	1174
[67065]	1175	dec dl ; real drive is dl - 1
	1176	jmp int13_legacy
[38699]	1177
	1178	int13_cdemu_inactive:
[67065]	1179	pop dx
	1180	pop cx
	1181	pop bx
	1182	pop ax
	1183	pop es
[38699]	1184
	1185	int13_noeltorito:
[67065]	1186	push ax
	1187	push cx
	1188	push dx
	1189	push bx
[38699]	1190	int13_legacy:
[67065]	1191	push dx ; push eltorito dx in place of sp
	1192	push bp
	1193	push si
	1194	push di
	1195	push es
	1196	push ds
	1197	C_SETUP ; TODO: setup environment only once?
[38699]	1198
[67065]	1199	;; now the registers can be restored with
	1200	;; pop ds; pop es; DO_popa; iret
	1201	test dl, 80h ; non-removable?
	1202	jnz int13_notfloppy
[38699]	1203
[67065]	1204	DO_JMP_CALL_EX _int13_diskette_function, int13_out, jmp_call_ret_int13_out
[38699]	1205
	1206	int13_notfloppy:
[67065]	1207	cmp dl, 0E0h
	1208	jb int13_notcdrom
[38699]	1209
[67065]	1210	call _int13_cdrom
	1211	jmp int13_out
[38699]	1212
	1213	int13_notcdrom:
	1214	int13_disk:
[67065]	1215	cmp ah,40h
	1216	ja int13x
	1217	call _int13_harddisk
	1218	jmp int13_out
[38699]	1219
	1220	int13x:
[67065]	1221	call _int13_harddisk_ext
[38699]	1222
	1223	int13_out:
[67065]	1224	pop ds
	1225	pop es
	1226	DO_popa
	1227	iret
[38699]	1228
	1229
	1230
	1231	; parallel port detection: port in dx, index in bx, timeout in cl
[67065]	1232	detect_parport proc near
[38699]	1233
[67065]	1234	push dx
	1235	inc dx
	1236	inc dx
	1237	in al, dx
	1238	and al, 0DFh ; clear input mode
	1239	out dx, al
	1240	pop dx
	1241	mov al, 0AAh
	1242	out dx, al
	1243	in al, dx
	1244	cmp al, 0AAh
	1245	jne no_parport
[38699]	1246
[67065]	1247	push bx
	1248	shl bx, 1
	1249	mov [bx+408h], dx ; parallel I/O address
	1250	pop bx
	1251	mov [bx+478h], cl ; parallel printer timeout
	1252	inc bx
[38699]	1253	no_parport:
[67065]	1254	ret
[38699]	1255
[67065]	1256	detect_parport endp
[41084]	1257
[38699]	1258	; setial port detection: port in dx, index in bx, timeout in cl
[67065]	1259	detect_serial proc near
[38699]	1260
[67065]	1261	push dx
	1262	inc dx
	1263	mov al, 2
	1264	out dx, al
	1265	in al, dx
	1266	cmp al, 2
	1267	jne no_serial
[38699]	1268
[67065]	1269	inc dx
	1270	in al, dx
	1271	cmp al, 2
	1272	jne no_serial
[38699]	1273
[67065]	1274	dec dx
	1275	xor al, al
	1276	pop dx
	1277	push bx
	1278	shl bx, 1
	1279	mov [bx+400h], dx ; serial I/O address
	1280	pop bx
	1281	mov [bx+47Ch], cl ; serial timeout
	1282	inc bx
	1283	ret
[38699]	1284
	1285	no_serial:
[67065]	1286	pop dx
	1287	ret
[38699]	1288
[67065]	1289	detect_serial endp
[38699]	1290
	1291
	1292	;;
	1293	;; POST: Floppy drive
	1294	;;
[67065]	1295	floppy_post proc near
[38699]	1296
[67065]	1297	xor ax, ax
	1298	mov ds, ax
[38699]	1299
[67065]	1300	;; TODO: This code is really stupid. Zeroing the BDA byte
	1301	;; by byte is dumb, and it's been already zeroed elsewhere!
	1302	mov al, 0
	1303	mov ds:[43Eh], al ; drive 0/1 uncalibrated, no IRQ
	1304	mov ds:[43Fh], al ; motor status
	1305	mov ds:[440h], al ; motor timeout counter
	1306	mov ds:[441h], al ; controller status return code
	1307	mov ds:[442h], al ; hd/floppy ctlr status register
	1308	mov ds:[443h], al ; controller status register 1
	1309	mov ds:[444h], al ; controller status register 2
	1310	mov ds:[445h], al ; cylinder number
	1311	mov ds:[446h], al ; head number
	1312	mov ds:[447h], al ; sector number
	1313	mov ds:[448h], al ; bytes written
[38699]	1314
[67065]	1315	mov ds:[48Bh], al ; configuration data
[38699]	1316
[67065]	1317	mov al, 10h ; floppy drive type
	1318	out CMOS_ADDR, al
	1319	in al, CMOS_DATA
	1320	mov ah, al ; save drive type byte
[38699]	1321
	1322	look_drive0:
[67065]	1323	; TODO: pre-init bl to reduce jumps
	1324	DO_shr al, 4 ; drive 0 in high nibble
	1325	jz f0_missing ; jump if no drive
	1326	mov bl, 7 ; drv0 determined, multi-rate, chgline
	1327	jmp look_drive1
[38699]	1328
	1329	f0_missing:
[67065]	1330	mov bl, 0 ; no drive 0
[38699]	1331
	1332	look_drive1:
[67065]	1333	mov al, ah ; restore CMOS data
	1334	and al, 0Fh ; drive 1 in low nibble
	1335	jz f1_missing
	1336	or bl, 70h ; drv1 determined, multi-rate, chgline
[38699]	1337	f1_missing:
[67065]	1338	mov ds:[48Fh], bl ; store in BDA
[38699]	1339
[67065]	1340	;; TODO: See above. Dumb and redundant!
	1341	mov al, 0
	1342	mov ds:[490h], al ; drv0 media state
	1343	mov ds:[491h], al ; drv1 media state
	1344	mov ds:[492h], al ; drv0 operational state
	1345	mov ds:[493h], al ; drv1 operational state
	1346	mov ds:[494h], al ; drv0 current cylinder
	1347	mov ds:[495h], al ; drv1 current cylinder
[38699]	1348
[67065]	1349	mov al, 2
	1350	out 0Ah, al ; unmask DMA channel 2
[38699]	1351
[67065]	1352	SET_INT_VECTOR 1Eh, BIOSSEG, _diskette_param_table
	1353	SET_INT_VECTOR 40h, BIOSSEG, int13_diskette
	1354	SET_INT_VECTOR 0Eh, BIOSSEG, int0e_handler ; IRQ 6
[38699]	1355
[67065]	1356	ret
[38699]	1357
[67065]	1358	floppy_post endp
[38699]	1359
	1360
[67065]	1361	bcd_to_bin proc near
[38699]	1362
[67065]	1363	;; in : AL in packed BCD format
	1364	;; out: AL in binary, AH always 0
[60441]	1365	if VBOX_BIOS_CPU ge 80186
[67065]	1366	shl ax, 4
	1367	shr al, 4
[60441]	1368	else
[67065]	1369	push cx
	1370	mov cl, 4
	1371	shl ax, cl
	1372	shr al, cl
	1373	pop cx
[60441]	1374	endif
[67065]	1375	aad
	1376	ret
[38699]	1377
[67065]	1378	bcd_to_bin endp
[38699]	1379
[67065]	1380	rtc_post proc near
[38699]	1381
[60422]	1382	if VBOX_BIOS_CPU lt 80386 ;; @todo fix loopy code below
[67065]	1383	;; get RTC seconds
	1384	mov al, 0
	1385	out CMOS_ADDR, al
	1386	in al, CMOS_DATA ; RTC seconds, in BCD
	1387	call bcd_to_bin ; ax now has seconds in binary
	1388	test al, al
	1389	xor ah, ah
	1390	mov dx, 0x1234 ; 18206507*0x100/1000000 = 0x1234 (4660.865792)
	1391	mul dx
	1392	mov cx, ax ; tick count in dx:cx
[60422]	1393
[67065]	1394	;; get RTC minutes
	1395	mov al, 2
	1396	out CMOS_ADDR, al
	1397	in al, CMOS_DATA ; RTC minutes, in BCD
	1398	call bcd_to_bin ; eax now has minutes in binary
	1399	test al, al
	1400	jz rtc_post_hours
	1401	rtc_pos_min_loop: ; 18206507600x100/1000000 = 0x44463 (279651.94752)
	1402	add cx, 0x4463
	1403	adc dx, 0x0004
	1404	dec al
	1405	jnz rtc_pos_min_loop
[60422]	1406
[67065]	1407	;; get RTC hours
[60422]	1408	rtc_post_hours:
[67065]	1409	mov al, 4
	1410	out CMOS_ADDR, al
	1411	in al, CMOS_DATA ; RTC hours, in BCD
	1412	call bcd_to_bin ; eax now has hours in binary
	1413	test al, al
	1414	jz rtc_pos_shift
	1415	rtc_pos_hour_loop: ; 1820650736000x100/1000000 = 0x100076C (16779116.8512)
	1416	add cx, 0x076C
	1417	adc dx, 0x0100
	1418	dec al
	1419	jnz rtc_pos_hour_loop
[60422]	1420
	1421	rtc_pos_shift:
[67065]	1422	mov cl, ch
	1423	mov ch, dl
	1424	mov dl, dh
	1425	xor dh, dh
	1426	mov ds:[46Ch], cx ; timer tick count
	1427	mov ds:[46Ch+2], dx ; timer tick count
	1428	mov ds:[470h], dh ; rollover flag
[60422]	1429
	1430	else
[67065]	1431	.386
	1432	;; get RTC seconds
	1433	xor eax, eax
	1434	mov al, 0
	1435	out CMOS_ADDR, al
	1436	in al, CMOS_DATA ; RTC seconds, in BCD
	1437	call bcd_to_bin ; eax now has seconds in binary
	1438	mov edx, 18206507
	1439	mul edx
	1440	mov ebx, 1000000
	1441	xor edx, edx
	1442	div ebx
	1443	mov ecx, eax ; total ticks in ecx
[38699]	1444
[67065]	1445	;; get RTC minutes
	1446	xor eax, eax
	1447	mov al, 2
	1448	out CMOS_ADDR, al
	1449	in al, CMOS_DATA ; RTC minutes, in BCD
	1450	call bcd_to_bin ; eax now has minutes in binary
	1451	mov edx, 10923904
	1452	mul edx
	1453	mov ebx, 10000
	1454	xor edx, edx
	1455	div ebx
	1456	add ecx, eax ; add to total ticks
[38699]	1457
[67065]	1458	;; get RTC hours
	1459	xor eax, eax
	1460	mov al, 4
	1461	out CMOS_ADDR, al
	1462	in al, CMOS_DATA ; RTC hours, in BCD
	1463	call bcd_to_bin ; eax now has hours in binary
	1464	mov edx, 65543427
	1465	mul edx
	1466	mov ebx, 1000
	1467	xor edx, edx
	1468	div ebx
	1469	add ecx, eax ; add to total ticks
[38699]	1470
[67065]	1471	mov ds:[46Ch], ecx ; timer tick count
	1472	xor al, al ; TODO: redundant?
	1473	mov ds:[470h], al ; rollover flag
	1474	.286
[60422]	1475	endif
[67065]	1476	ret
[38699]	1477
[67065]	1478	rtc_post endp
[38699]	1479
	1480
	1481
	1482	;; --------------------------------------------------------
	1483	;; INT 0Eh handler - Diskette IRQ 6 ISR
	1484	;; --------------------------------------------------------
[67065]	1485	BIOSORG 0EF57h, 0EF55h
[38699]	1486	int0e_handler:
[67065]	1487	push ax
	1488	push dx
	1489	mov dx, 3F4h
	1490	in al, dx
	1491	and al, 0C0h
	1492	cmp al, 0C0h
	1493	je int0e_normal
	1494	mov dx, 3F5h
	1495	mov al, 08h ; sense interrupt
	1496	out dx, al
[38699]	1497	int0e_loop1:
[67065]	1498	mov dx, 3F4h ; TODO: move out of the loop?
	1499	in al, dx
	1500	and al, 0C0h
	1501	cmp al, 0C0h
	1502	jne int0e_loop1
[38699]	1503
	1504	int0e_loop2:
[67065]	1505	mov dx, 3F5h ; TODO: inc/dec dx instead
	1506	in al, dx
	1507	mov dx, 3F4h
	1508	in al, dx
	1509	and al, 0C0h
	1510	cmp al, 0C0h
	1511	je int0e_loop2
[38699]	1512
	1513	int0e_normal:
[67065]	1514	push ds
	1515	xor ax, ax
	1516	mov ds, ax
	1517	call eoi_master_pic
	1518	; indicate that an interrupt occurred
	1519	or byte ptr ds:[43Eh], 80h
	1520	pop ds
	1521	pop dx
	1522	pop ax
	1523	iret
[38699]	1524
	1525
	1526	;; --------------------------------------------------------
	1527	;; Diskette Parameter Table
	1528	;; --------------------------------------------------------
[67065]	1529	BIOSORG 0EFC7h, 0EFC5h
[38699]	1530	_diskette_param_table:
[67065]	1531	db 0AFh
	1532	db 2 ; HLT=1, DMA mode
	1533	db 025h
	1534	db 2
	1535	db 18 ; SPT (good for 1.44MB media)
	1536	db 01Bh
	1537	db 0FFh
	1538	db 06Ch
	1539	db 0F6h ; format filler
	1540	db 15
	1541	db 8
[38699]	1542
	1543
[38789]	1544
	1545	;; --------------------------------------------------------
	1546	;; INT 17h handler - Printer service
	1547	;; --------------------------------------------------------
[67065]	1548	BIOSORG_CHECK 0EFD2h ; fixed WRT preceding code
[43759]	1549
[67065]	1550	jmp int17_handler ; NT floppy boot workaround
	1551	; see @bugref{6481}
[38789]	1552	int17_handler:
[67065]	1553	push ds
	1554	push es
	1555	DO_pusha
	1556	C_SETUP
	1557	call _int17_function
	1558	DO_popa
	1559	pop es
	1560	pop ds
	1561	iret
[38789]	1562
	1563
[41084]	1564
[38699]	1565	;; Protected mode IDT descriptor
	1566	;;
	1567	;; The limit is 0 to cause a shutdown if an exception occurs
	1568	;; in protected mode. TODO: Is that what we really want?
	1569	;;
	1570	;; Set base to F0000 to correspond to beginning of BIOS,
	1571	;; in case an IDT is defined later.
	1572
	1573	_pmode_IDT:
[67065]	1574	dw 0 ; limit 15:0
	1575	dw 0 ; base 15:0
	1576	dw 0Fh ; base 23:16
[38699]	1577
	1578
	1579	;; Real mode IDT descriptor
	1580	;;
	1581	;; Set to typical real-mode values.
	1582	;; base = 000000
	1583	;; limit = 03ff
	1584
	1585	_rmode_IDT:
[67065]	1586	dw 3FFh ; limit 15:00
	1587	dw 0 ; base 15:00
	1588	dw 0 ; base 23:16
[38699]	1589
	1590
	1591	;;
	1592	;; INT 1Ch
	1593	;;
	1594	;; TODO: Why does this need a special handler?
[67065]	1595	int1c_handler: ;; user timer tick
	1596	iret
[38699]	1597
	1598
	1599
	1600	;; --------------------------------------------------------
	1601	;; INT 10h functions 0-Fh entry point
	1602	;; --------------------------------------------------------
[67065]	1603	BIOSORG 0F045h, 0F043h
[38699]	1604	i10f0f_entry:
[67065]	1605	iret
[38699]	1606
	1607
	1608	;; --------------------------------------------------------
	1609	;; INT 10h handler - MDA/CGA video
	1610	;; --------------------------------------------------------
[67065]	1611	BIOSORG 0F065h, 0F063h
[38699]	1612	int10_handler:
[67065]	1613	;; do nothing - assumes VGA
	1614	iret
[38699]	1615
	1616
	1617	;; --------------------------------------------------------
	1618	;; MDA/CGA Video Parameter Table (INT 1Dh)
	1619	;; --------------------------------------------------------
[67065]	1620	BIOSORG 0F0A4h, 0F0A2h
[38699]	1621	mdacga_vpt:
	1622
	1623
	1624	;;
	1625	;; INT 18h - boot failure
	1626	;;
	1627	int18_handler:
[67065]	1628	C_SETUP
	1629	call _int18_panic_msg
	1630	;; TODO: handle failure better?
[84752]	1631	sti
	1632	stay_here:
[67065]	1633	hlt
[84752]	1634	jmp stay_here
[38699]	1635
	1636	;;
	1637	;; INT 19h - boot service - relocated
	1638	;;
	1639	int19_relocated:
[67065]	1640	;; The C worker function returns the boot drive in bl and
	1641	;; the boot segment in ax. In case of failure, the boot
	1642	;; segment will be zero.
	1643	C_SETUP ; TODO: Here? Now?
	1644	push bp
	1645	mov bp, sp
[38699]	1646
[67065]	1647	;; 1st boot device
	1648	mov ax, 1
	1649	push ax
	1650	call _int19_function
	1651	inc sp
	1652	inc sp
	1653	test ax, ax ; if 0, try next device
	1654	jnz boot_setup
[38699]	1655
[67065]	1656	;; 2nd boot device
	1657	mov ax, 2
	1658	push ax
	1659	call _int19_function
	1660	inc sp
	1661	inc sp
	1662	test ax, ax ; if 0, try next device
	1663	jnz boot_setup
[38699]	1664
[67065]	1665	; 3rd boot device
	1666	mov ax, 3
	1667	push ax
	1668	call _int19_function
	1669	inc sp
	1670	inc sp
	1671	test ax, ax ; if 0, try next device
	1672	jnz boot_setup
[38699]	1673
[67065]	1674	; 4th boot device
	1675	mov ax, 4
	1676	push ax
	1677	call _int19_function
	1678	inc sp
	1679	inc sp
	1680	test ax, ax ; if 0, invoke INT 18h
	1681	jz int18_handler
[38699]	1682
	1683	boot_setup:
	1684	; TODO: the drive should be in dl already??
[67065]	1685	;; mov dl, bl ; tell guest OS what boot drive is
[60422]	1686	if VBOX_BIOS_CPU lt 80386
[67065]	1687	mov [bp], ax
	1688	DO_shl ax, 4
	1689	mov [bp+2], ax ; set ip
	1690	mov ax, [bp]
[60422]	1691	else
[67065]	1692	.386 ; NB: We're getting garbage into high eax bits
	1693	shl eax, 4 ; convert seg to ip
	1694	mov [bp+2], ax ; set ip
[38699]	1695
[67065]	1696	shr eax, 4 ; get cs back
	1697	.286
[60422]	1698	endif
[67065]	1699	and ax, BIOSSEG ; remove what went in ip
	1700	mov [bp+4], ax ; set cs
	1701	xor ax, ax
	1702	mov ds, ax
	1703	mov es, ax
	1704	mov [bp], ax ; TODO: what's this?!
	1705	mov ax, 0AA55h ; set ok flag ; TODO: and this?
[38699]	1706
[67065]	1707	pop bp ; TODO: why'd we just zero it??
	1708	iret ; beam me up scotty
[38699]	1709
[100658]	1710	if VBOX_BIOS_CPU ge 80386
	1711
[38699]	1712	;; PCI BIOS
	1713
	1714	include pcibios.inc
	1715	include pirq.inc
	1716
[100658]	1717	endif
	1718
[95053]	1719	if 0 ; Sample VPD table
[38699]	1720
[95053]	1721	;; IBM style VPD (Vital Product Data) information. Most IBM systems
	1722	;; had a VPD table since about 1992, later the same information was
	1723	;; also reported through DMI.
	1724
	1725	align 16
	1726	db 0AAh, 055h, 'VPD'
	1727	db 48 ; VPD size
	1728	db 'RESERVE' ; reserved... for what?
	1729	db 'INET35WW ' ; BIOS build ID
	1730	db '5238NXU' ; system serial number
	1731	db 'J1Y3581338D' ; unique ID
	1732	db '8643MD0' ; IBM machine type
	1733	db 0 ; checksum (to be calculated)
	1734	endif
	1735
[38699]	1736	;; --------------------------------------------------------
	1737	;; INT 12h handler - Memory size
	1738	;; --------------------------------------------------------
[67065]	1739	BIOSORG 0F841h, 0F83Fh
[38699]	1740	int12_handler:
[67065]	1741	;; Don't touch - fixed size!
	1742	sti
	1743	push ds
	1744	mov ax, 40h
	1745	mov ds, ax
	1746	mov ax, ds:[13h]
	1747	pop ds
	1748	iret
[38699]	1749
	1750
	1751	;; --------------------------------------------------------
	1752	;; INT 11h handler - Equipment list service
	1753	;; --------------------------------------------------------
[67065]	1754	BIOSORG_CHECK 0F84Dh ; fixed wrt preceding code
[38699]	1755	int11_handler:
[67065]	1756	;; Don't touch - fixed size!
	1757	sti
	1758	push ds
	1759	mov ax, 40h
	1760	mov ds, ax
	1761	mov ax, ds:[10h]
	1762	pop ds
	1763	iret
[38699]	1764
	1765
	1766	;; --------------------------------------------------------
	1767	;; INT 15h handler - System services
	1768	;; --------------------------------------------------------
[67065]	1769	BIOSORG_CHECK 0F859h ; fixed wrt preceding code
[38699]	1770	int15_handler:
[60610]	1771
	1772	if VBOX_BIOS_CPU ge 80286
[67065]	1773	cmp ah, 87h
	1774	jne not_blkmove
[69300]	1775
[67065]	1776	;; INT 15h/87h has semi-public interface because software
	1777	;; may use CMOS shutdown status code 9 for its own purposes.
	1778	;; The stack layout has to match.
	1779	pusha
	1780	push es
	1781	push ds
	1782	C_SETUP
	1783	call _int15_blkmove
	1784	pop ds
	1785	pop es
	1786	popa
	1787	iret
[60610]	1788	not_blkmove:
	1789
	1790	endif
	1791
[67065]	1792	pushf
	1793	push ds
	1794	push es
	1795	C_SETUP
[75229]	1796	if VBOX_BIOS_CPU ge 80386
	1797	;; int15_function32 exists in 386+ BIOS only, but INT 15h is
	1798	;; not 386-specific
[67065]	1799	cmp ah, 0E8h
	1800	je int15_handler32
	1801	cmp ah, 0d0h
	1802	je int15_handler32
[75229]	1803	endif
[67065]	1804	DO_pusha
	1805	cmp ah, 53h ; APM function?
	1806	je apm_call
	1807	cmp ah, 0C2h ; PS/2 mouse function?
	1808	je int15_handler_mouse
[38699]	1809
[67065]	1810	call _int15_function
[42770]	1811	int15_handler_popa_ret:
[67065]	1812	DO_popa
[75229]	1813	if VBOX_BIOS_CPU ge 80386
[38699]	1814	int15_handler32_ret:
[75229]	1815	endif
[67065]	1816	pop es
	1817	pop ds
	1818	popf
	1819	jmp iret_modify_cf
[38699]	1820
	1821	apm_call:
[67065]	1822	call _apm_function
	1823	jmp int15_handler_popa_ret
[38699]	1824
	1825	int15_handler_mouse:
[67065]	1826	call _int15_function_mouse
	1827	jmp int15_handler_popa_ret
[38699]	1828
[75229]	1829	if VBOX_BIOS_CPU ge 80386
[38699]	1830	int15_handler32:
[67065]	1831	;; need to save/restore 32-bit registers
	1832	.386
	1833	pushad
	1834	call _int15_function32
	1835	popad
	1836	.286
[75229]	1837	jmp int15_handler32_ret
[60422]	1838	endif
[38699]	1839
	1840	;;
	1841	;; Perform an IRET but retain the current carry flag value
	1842	;;
	1843	iret_modify_cf:
[67065]	1844	jc carry_set
	1845	push bp
	1846	mov bp, sp
	1847	and byte ptr [bp + 6], 0FEh
[67694]	1848	or word ptr [bp + 6], 0200h
[67065]	1849	pop bp
	1850	iret
[38699]	1851	carry_set:
[67065]	1852	push bp
	1853	mov bp, sp
[67694]	1854	or word ptr [bp + 6], 0201h
[67065]	1855	pop bp
	1856	iret
[38699]	1857
	1858	;;
	1859	;; INT 74h handler - PS/2 mouse (IRQ 12)
	1860	;;
[67065]	1861	int74_handler proc
[38699]	1862
[67065]	1863	sti
	1864	DO_pusha
	1865	push es
	1866	push ds
	1867	xor ax, ax
	1868	push ax ; placeholder for status
	1869	push ax ; placeholder for X
	1870	push ax ; placeholder for Y
	1871	push ax ; placeholder for Z
	1872	push ax ; placeholder for make_far_call bool
	1873	C_SETUP
	1874	call _int74_function
	1875	pop cx ; pop make_far_call flag
	1876	jcxz int74_done
[38699]	1877
[67065]	1878	;; make far call to EBDA:0022
[60441]	1879	if VBOX_BIOS_CPU ge 80186
[67065]	1880	push 0
[60441]	1881	else
[67065]	1882	xor ax, ax
	1883	push ax
[60441]	1884	endif
[67065]	1885	pop ds
	1886	push ds:[40Eh]
	1887	pop ds
	1888	call far ptr ds:[22h]
[38699]	1889	int74_done:
[67065]	1890	cli
	1891	call eoi_both_pics
	1892	add sp, 8 ; remove status, X, Y, Z
	1893	pop ds
	1894	pop es
	1895	DO_popa
	1896	iret
[38699]	1897
[67065]	1898	int74_handler endp
[38699]	1899
[67065]	1900	int76_handler proc
[38699]	1901
[67065]	1902	;; record completion in BIOS task complete flag
	1903	push ax
	1904	push ds
	1905	mov ax, 40h
	1906	mov ds, ax
	1907	mov byte ptr ds:[8Eh], 0FFh
	1908	call eoi_both_pics
	1909	pop ds
	1910	pop ax
	1911	iret
[38699]	1912
[67065]	1913	int76_handler endp
[41084]	1914
[60441]	1915
	1916	;;
	1917	;; IRQ 8 handler (RTC)
	1918	;;
	1919	int70_handler:
[67065]	1920	push es
	1921	push ds
	1922	DO_pusha
	1923	C_SETUP
	1924	call _int70_function
	1925	DO_popa
	1926	pop ds
	1927	pop es
	1928	iret
[60441]	1929
	1930
	1931
	1932	if VBOX_BIOS_CPU lt 80386
	1933	;
	1934	; We're tight on space down below in the int08_handler, so put
	1935	; the 16-bit rollover code here.
	1936	;
	1937	int08_maybe_rollover:
[67065]	1938	ja int08_rollover
	1939	cmp ax, 00B0h
	1940	jb int08_rollover_store
	1941	;; there has been a midnight rollover
[60441]	1942	int08_rollover:
[67065]	1943	xor dx, dx
	1944	xor ax, ax
[60441]	1945
[67065]	1946	inc byte ptr ds:[70h] ; increment rollover flag
[60441]	1947	int08_rollover_store:
[67065]	1948	jmp int08_store_ticks
[60441]	1949	endif
	1950
	1951
[38699]	1952	;; --------------------------------------------------------
	1953	;; 8x8 font (first 128 characters)
	1954	;; --------------------------------------------------------
[67065]	1955	BIOSORG 0FA6Eh, 0FA6Ch
[38699]	1956	include font8x8.inc
	1957
	1958
	1959	;; --------------------------------------------------------
	1960	;; INT 1Ah handler - Time of the day + PCI BIOS
	1961	;; --------------------------------------------------------
[67065]	1962	BIOSORG_CHECK 0FE6Eh ; fixed wrt preceding table
[38699]	1963	int1a_handler:
[60422]	1964	if VBOX_BIOS_CPU ge 80386
[67065]	1965	cmp ah, 0B1h
	1966	jne int1a_normal
[38699]	1967
[67065]	1968	push es
	1969	push ds
	1970	C_SETUP
	1971	.386
	1972	pushad
	1973	call _pci16_function
	1974	popad
	1975	.286
	1976	pop ds
	1977	pop es
	1978	iret
[60422]	1979	endif
[38699]	1980
	1981	int1a_normal:
[67065]	1982	push es
	1983	push ds
	1984	DO_pusha
	1985	C_SETUP
[38699]	1986	int1a_callfunction:
[67065]	1987	call _int1a_function
	1988	DO_popa
	1989	pop ds
	1990	pop es
	1991	iret
[38699]	1992
	1993
	1994	;; --------------------------------------------------------
	1995	;; Timer tick - IRQ 0 handler
	1996	;; --------------------------------------------------------
[67065]	1997	BIOSORG 0FEA5h, 0FEA3h
[38699]	1998	int08_handler:
[60422]	1999	if VBOX_BIOS_CPU ge 80386
[67065]	2000	.386
	2001	sti
	2002	push eax
[60422]	2003	else
[67065]	2004	sti
	2005	push ax
[60422]	2006	endif
[67065]	2007	push ds
	2008	push dx
	2009	mov ax, 40h
	2010	mov ds, ax
[38699]	2011
[60422]	2012	if VBOX_BIOS_CPU ge 80386
[67065]	2013	mov eax, ds:[6Ch] ; get ticks dword
	2014	inc eax
[60422]	2015	else
[67065]	2016	mov ax, ds:[6Ch] ; get ticks dword
	2017	mov dx, ds:[6Ch+2]
	2018	inc ax ; inc+jz+inc saves two bytes over add+adc.
	2019	jnz int08_compare
	2020	inc dx
[60433]	2021	int08_compare:
[60422]	2022	endif
[48195]	2023
[67065]	2024	;; compare eax to one day's worth of ticks (at 18.2 Hz)
[60422]	2025	if VBOX_BIOS_CPU ge 80386
[67065]	2026	cmp eax, 1800B0h
	2027	jb int08_store_ticks
[60422]	2028	else
[67065]	2029	cmp dx, 18h
	2030	jb int08_store_ticks
	2031	jmp int08_maybe_rollover
[60422]	2032	endif
[60433]	2033
	2034	if VBOX_BIOS_CPU ge 80386
[67065]	2035	;; there has been a midnight rollover
	2036	xor eax, eax
	2037	inc byte ptr ds:[70h] ; increment rollover flag
[48195]	2038
	2039	int08_store_ticks:
[67065]	2040	mov ds:[6Ch], eax
[60422]	2041	else
[60433]	2042	int08_store_ticks:
[67065]	2043	mov ds:[6Ch], ax
	2044	mov ds:[6Ch+2], dx
[60422]	2045	endif
[48195]	2046
[67065]	2047	;; time to turn off floppy drive motor(s)?
	2048	mov al, ds:[40h]
	2049	or al, al
	2050	jz int08_floppy_off
	2051	dec al
	2052	mov ds:[40h], al
	2053	jnz int08_floppy_off
	2054	;; turn motor(s) off
	2055	mov dx, 03F2h
	2056	in al, dx
	2057	and al, 0CFh
	2058	out dx, al
[38699]	2059	int08_floppy_off:
	2060
[67065]	2061	int 1Ch ; call the user timer handler
[38699]	2062
[67065]	2063	cli
	2064	call eoi_master_pic
	2065	pop dx
	2066	pop ds
[60422]	2067	if VBOX_BIOS_CPU ge 80386
[67065]	2068	pop eax
	2069	.286
[60422]	2070	else
[67065]	2071	pop ax
[60422]	2072	endif
[67065]	2073	iret
[38699]	2074
	2075
	2076	;; --------------------------------------------------------
	2077	;; Initial interrupt vector offsets for POST
	2078	;; --------------------------------------------------------
[67065]	2079	BIOSORG 0FEF3h, 0FEF1h
[38699]	2080	vector_table:
	2081
	2082
	2083
	2084	;; --------------------------------------------------------
	2085	;; BIOS copyright string
	2086	;; --------------------------------------------------------
[67065]	2087	BIOSORG 0FF00h, 0FEFEh
[38699]	2088	bios_string:
[67065]	2089	db BIOS_COPYRIGHT
[38699]	2090
	2091
	2092	;; --------------------------------------------------------
	2093	;; IRET - default interrupt handler
	2094	;; --------------------------------------------------------
[67065]	2095	BIOSORG 0FF53h, 0FF51h
[38699]	2096
	2097	dummy_iret:
[67065]	2098	iret
[38699]	2099
	2100
	2101	;; --------------------------------------------------------
	2102	;; INT 05h - Print Screen service
	2103	;; --------------------------------------------------------
[67065]	2104	BIOSORG_CHECK 0FF54h ; fixed wrt preceding
[38699]	2105	int05_handler:
[67065]	2106	;; Not implemented
	2107	iret
[38699]	2108
	2109	include smidmi.inc
	2110
	2111	;; --------------------------------------------------------
	2112	;; Processor reset entry point
	2113	;; --------------------------------------------------------
[67065]	2114	BIOSORG 0FFF0h, 0FFEEh
[38699]	2115	cpu_reset:
[67065]	2116	;; This is where the CPU starts executing after a reset
	2117	jmp far ptr post
[38699]	2118
[67065]	2119	;; BIOS build date
	2120	db BIOS_BUILD_DATE
[95053]	2121	db 0 ; null terminator
[67065]	2122	;; System model ID
	2123	db SYS_MODEL_ID
	2124	;; Checksum byte
	2125	db 0FFh
[38699]	2126
	2127
[67065]	2128	BIOSSEG ends
[38699]	2129
[67065]	2130	end
[43712]	2131

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

Context Navigation

source: vbox/trunk/src/VBox/Devices/PC/BIOS/orgs.asm

Download in other formats: