ΗΙΜΕΜ ψαλλσ

Author: Michael Chourdakis

asm.vcxproj

@@ -174,6 +174,7 @@
     <None Include="gdt.asm" />
     <None Include="guest16.asm" />
     <None Include="guest32.asm" />
+    <None Include="himem16.asm" />
     <None Include="idt.asm" />
     <None Include="int16.asm" />
     <None Include="int32.asm" />

asm.vcxproj.filters

@@ -153,5 +153,8 @@
     <None Include="int32.asm">
       <Filter>32 bit code</Filter>
     </None>
+    <None Include="himem16.asm">
+      <Filter>16 bit code</Filter>
+    </None>
   </ItemGroup>
 </Project>

bx_enh_dbg.ini

@@ -19,9 +19,9 @@ isLittleEndian = TRUE
 DefaultAsmLines = 512
 DumpWSIndex = 0
 DockOrder = 0x132
-ListWidthPix[0] = 465
-ListWidthPix[1] = 302
-ListWidthPix[2] = 243
+ListWidthPix[0] = 541
+ListWidthPix[1] = 371
+ListWidthPix[2] = 98
 FontName = System
 FontSize = -16
 MainWindow = 208, 0, 1234, 722

code16.asm

@@ -6,6 +6,7 @@ macro break16
 	xchg bx,bx
 }
 
+INCLUDE 'himem16.asm'
 INCLUDE 'unreal.asm'
 INCLUDE 'page16.asm'
 INCLUDE 'acpi16.asm'
@@ -63,6 +64,13 @@ sti
 mov bx,idt_RM_start
 sidt [bx] 
 
+; --------------------------------------- HIMEM.SYS test ---------------------------------------
+
+call himemthere
+mov edx,1024
+call allochigh
+mov dx,cx
+call freehigh
 
 ; --------------------------------------- A20 line  ---------------------------------------
 
@@ -93,11 +101,23 @@ end if
 
 ; --------------------------------------- Protected Mode Find Page Entry  ---------------------------------------
 xor ecx,ecx
+
+if STATIC_PAGE32 = 0
+; Alloc 32 Pages high, preserve low ram
+mov edx,1024*20
+call allochigh
+mov [Paging32InXMSH],cx
+mov [Paging32InXMS],edi
+end if
+
 LoopPMR:
 xor eax,eax
-mov ax,PAGE32
-shl eax,4
-add eax,Page32Null
+if STATIC_PAGE32 = 1
+	linear eax,Page32Null,PAGE32
+else
+	mov eax,[Paging32InXMS]
+end if
+
 add eax,ecx
 mov ebx,eax
 shr eax,12
@@ -112,12 +132,23 @@ mov [PhysicalPagingOffset32],eax
 ; --------------------------------------- Long Mode Find Page Entry  ---------------------------------------
 if TEST_LONG > 0 
 
+if STATIC_PAGE64 = 0
+; Alloc 64 Pages high, preserve low ram
+mov edx,1024*40
+call allochigh
+mov [Paging64InXMSH],cx
+mov [Paging64InXMS],edi
+end if
+
+
 xor ecx,ecx
 LoopPMR2:
 xor eax,eax
-mov ax,PAGE64
-shl eax,4
-add eax,Page64Null
+if STATIC_PAGE64 = 1
+	linear eax,Page64Null,PAGE64
+else
+	mov eax,[Paging64InXMS]
+end if 
 add eax,ecx
 mov ebx,eax
 shr eax,12
@@ -135,12 +166,23 @@ end if
 ; --------------------------------------- VMX EPT Find Page Entry  ---------------------------------------
 if TEST_VMX_1 > 0 
 
+if STATIC_PAGEVM = 0
+; Alloc VMX Pages high, preserve low ram
+mov edx,1024*100
+call allochigh
+mov [PagingVMInXMSH],cx
+mov [PagingVMInXMS],edi
+end if
+
 xor ecx,ecx
 LoopPMR5:
 xor eax,eax
-mov ax,VMXPAGE64
-shl eax,4
-add eax,Ept64Null
+
+if STATIC_PAGEVM = 1
+	linear eax,Ept64Null,VMXPAGE64
+else
+	mov eax,[PagingVMInXMS]
+end if 
 add eax,ecx
 mov ebx,eax
 shr eax,12
@@ -230,7 +272,7 @@ jnz .nores
     pop ds
 
 	mov ax,0x4c00
-int 0x21
+	int 0x21
 
     mov ax,0x35F0
 	int 0x21
@@ -286,6 +328,24 @@ lidt    [di]
 sti
 ; = END NO DEBUG HERE =
 
+if STATIC_PAGE32 = 0
+; Free Paging 32 bit reserved in XMS
+mov dx,[Paging32InXMSH]
+call freehigh
+end if
+
+if STATIC_PAGE64 = 0
+; Free Paging 64 bit reserved in XMS
+mov dx,[Paging64InXMSH]
+call freehigh
+end if
+
+if STATIC_PAGEVM = 0
+; Free Paging VM bit reserved in XMS
+mov dx,[PagingVMInXMSH]
+call freehigh
+end if
+
 ; --------------------------------------- Quick Unreal ---------------------------------------
 push cs
 cli

config.asm

@@ -5,3 +5,7 @@ TEST_PM_SIPI = 1
 TEST_LM_SIPI = 1
 TEST_VMX_1 = 1
 TEST_VMX_2 = 0
+
+STATIC_PAGE32 =	0
+STATIC_PAGE64 = 0
+STATIC_PAGEVM = 1

data16.asm

@@ -23,6 +23,22 @@ FromThread6 db 0
 of0s dw 0
 of0o dw 0
 
+
+if STATIC_PAGE32 = 0
+Paging32InXMS dd 0
+Paging32InXMSH dw 0
+end if
+
+if STATIC_PAGE64 = 0
+Paging64InXMS dd 0
+Paging64InXMSH dw 0
+end if
+
+if STATIC_PAGEVM = 0
+PagingVMInXMS dd 0
+PagingVMInXMSH dw 0
+end if
+
 ; --------------------------------------- VMX tests---------------------------------------
 vmt1 db 0 ; existence
 vmt2 db 0 ; protected mode guest

data32.asm

@@ -11,9 +11,11 @@ d32 dd 0
 
 
 
+if STATIC_PAGE32 = 1
 ; --------------------------------------- 32 bit Page Segment ---------------------------------------
 SEGMENT PAGE32 USE32
 ORG 0
 
 Page32Null dd 2050 DUP (0)
+end if 
 

data64.asm

@@ -22,23 +22,23 @@ TempData db 128 dup(0)
 ; --------------------------------------- 64 bit Data another segment---------------------------------------
 SEGMENT ABSD64 USE64
 
+
+if STATIC_PAGE64 = 1
 ; --------------------------------------- 64 bit Page Directory ---------------------------------------
 SEGMENT PAGE64 USE64
 ORG 0
 
 Page64Null dq 3000 dup (0)
+end if 
 
+if STATIC_PAGEVM = 1
 ; 
 ; --------------------------------------- VMX 64 bit EPT ---------------------------------------
 SEGMENT VMXPAGE64 USE64
 ORG 0
 
 Ept64Null dq 8192 dup (0);
 
-;EPT_PML4T dq 512 dup (0) ; 512 64-bit entries for EPT Top Level Page Directory 
-;EPT_PDPT dq 512 dup (0) ; 512 64-bit entries for EPT Page Directory Pointer Table
-;EPT_PDT dq 512 dup (0) ; 512 64-bit entries for EPT Page Directory Table
-;EPT_PG dq 512 dup (0) ; 512 64-bit entries for EPT Page Table
-
+end if
 
 

entry.exe

@@ -0,0 +1,85 @@
+
+himaddrx:
+himaddr dd 0
+
+himemthere:
+
+mov ax,0x4300
+int 0x2F
+cmp al,0x80
+jz .hi
+
+ret
+.hi:
+
+mov ax,0x4310
+int 0x2F
+mov word [cs:himaddrx + 2],es
+mov word [cs:himaddrx],bx
+
+mov al,0x80
+ret
+
+allochigh: ; EDX = bytes, return ECX = handle, EDI = linear
+
+xor ecx,ecx
+cmp [cs:himaddr],0
+jnz .useh
+
+.noh:
+mov ecx,0
+mov edi,0
+ret
+
+.useh:
+
+mov ax,0x0900
+shr edx,10
+call far [cs:himaddr]
+cmp dx,0
+jz .noh
+
+mov ax,0x0C00
+mov cx,dx
+xor edx,edx
+xor ebx,ebx
+mov dx,cx
+call far [cs:himaddr]
+cmp ax,1
+jz .okh
+
+mov ax,0x0A00
+mov dx,cx
+call far [cs:himaddr]
+jmp .noh
+
+.okh:
+xor edi,edi
+mov di,dx
+shl edi,16
+add edi,ebx
+
+
+ret
+
+freehigh: ; DX = handle
+
+cmp dx,0
+jz .noh
+
+cmp [cs:himaddr],0
+jnz .useh
+
+.noh:
+
+ret
+
+.useh:
+
+mov ax,0x0D00
+call far [cs:himaddr]
+
+mov ax,0x0A00
+call far [cs:himaddr]
+
+ret