TempleOSTS_130315.ISO

2018-09-08 21:45:37 +02:00
1 parent e57428affb
commit 17b71f1a2d
@@ -0,0 +1,105 @@
+asm {
+#define MODULE_SIZE		1*BLK_SIZE
+#define BOOT_HIGH_LOC	((BOOT_RAM_LIMIT-(BOOT_STK_SIZE+MODULE_SIZE))>>4)
+USE16
+BMHD_START::
+BMHD_CODE::
+	CLD
+
+	MOV	AX,BOOT_HIGH_LOC
+
+	CLI
+	MOV	SS,AX
+	MOV	SP,BOOT_STK_SIZE+MODULE_SIZE
+	STI
+
+	PUSHFW
+	PUSH	DS
+	PUSH	ES
+	PUSH	FS
+	PUSH	GS
+	PUSH	ECX
+	PUSH	EBX
+	PUSH	EDX
+	PUSH	EBP
+
+	MOV	ES,AX
+
+	MOV	AX,VGA_TEXT_MEM_BASE/16
+	MOV	FS,AX
+	MOV	U32 FS:[0],'B'+0x2000+('1'+0x2000)<<16
+	CALL	BMHD_GET_IP
+BMHD_GET_IP:
+	POP	BX
+	SUB	BX,BMHD_GET_IP-BMHD_START
+	MOV	CX,BX
+	SHR	BX,4
+//Copy this bootloader code to just under 0x80000
+	MOV	AX,CS
+	PUSH	AX
+	ADD	AX,BX
+	MOV	DS,AX
+	MOV	U16 [BMHD_OLD_CS_IP-BMHD_START],CX
+	POP	U16 [BMHD_OLD_CS_IP+2-BMHD_START]
+
+	MOV	CX,MODULE_SIZE
+	XOR	SI,SI
+	XOR	DI,DI
+	REP_MOVSB
+
+	MOV	AX,BOOT_HIGH_LOC
+	MOV	DS,AX
+
+//My assembler doesn't support 16-bit very well.
+	DU8	0xEA;	//JMP BOOT_HIGH_LOC:BMHD_HISTART
+	DU16	BMHD_HISTART-BMHD_START,BOOT_HIGH_LOC;
+
+BMHD_BIOS_DRV_NUM:	DU8	0;
+BMHD_OLD_CS_IP:		DU16	0,0;
+//Gets patched by $LK,"MakeOSInstallPrtBootLoader","MN:MakeOSInstallPrtBootLoader"$().
+BMHD_BLK_CNT::		DU16	0;
+
+BMHD_DAP:		DU8	16,0,1,0; //One blk at a time
+BMHD_DAP_BUF:		DU16	0,0;
+//Gets patched by $LK,"MakeOSInstallPrtBootLoader","MN:MakeOSInstallPrtBootLoader"$().
+BMHD_DAP_BLK::	//64-bit
+BMHD_DAP_BLK_LO:	DU32	0;
+BMHD_DAP_BLK_HI:	DU32	0;
+
+BMHD_HISTART:
+	MOV	U8 [BMHD_BIOS_DRV_NUM-BMHD_START],DL //Passed in by BIOS
+	MOV	AX,BOOT_RAM_BASE/16
+	MOV	ES,AX
+	XOR	ECX,ECX
+	MOV	CX,U16 [BMHD_BLK_CNT-BMHD_START]
+
+@@05:	PUSH	CX	//Blk cnt
+
+//READ BLK
+	PUSH	ES	//Buf seg
+	MOV	AX,ES
+	MOV	U16 [BMHD_DAP_BUF+2-BMHD_START],AX //ES:0000
+	MOV	SI,BMHD_DAP-BMHD_START //DS:SI=DAP
+	MOV	AH,0x42
+	MOV	DL,U8 [BMHD_BIOS_DRV_NUM-BMHD_START]
+	INT	0x13
+
+	POP	AX	//ES
+	ADD	AX,BLK_SIZE/16
+	MOV	ES,AX
+	INC	U32 [BMHD_DAP_BLK_LO-BMHD_START]
+	JNZ	@@10
+	INC	U32 [BMHD_DAP_BLK_HI-BMHD_START]
+
+@@10:	POP	CX
+	LOOP	@@05
+
+	MOV	DL,U8 [BMHD_BIOS_DRV_NUM-BMHD_START]
+	MOV	EBX,U32 [BMHD_OLD_CS_IP-BMHD_START]
+//My assembler doesn't support 16-bit very well.
+	DU8	0xEA;	//JMP BOOT_RAM_BASE:0000
+	DU16	0,BOOT_RAM_BASE/16;
+//Continues here $LK,"BMHD2_START","FF:::/TempleOS/Adam/Boot/BootMHD2.CPP,BMHD2_START"$
+BMHD_END::
+#assert BMHD_END-BMHD_START<=440
+}