First thing to do is to eliminate the effects of segments and make them all 4GB. That way you can use paging in its pure form without the abomination of segments to confuse things.

Table Dir starts at 0x4000 cleared and set to not present: 
[0x00000002] 
[0x00000002] 
[0x00000002] 
[0x00000002] 
cont..

table starting 0x5000: should look like this 
[0x00000003] 
[0x00001003] 
[0x00002003] 
[0x00003003]
cont... 

When I move this table address to the table dir 
[0x00005003] 
[0x00000002] 
[0x00000002] 
[0x00000002] 
[0x00000002] 

    

is professional solution. But one should remember that this technology requires a kernel protection on PDE level. Else user space will be invalid.

Wath strange flag values are you using? Read-only global pages, not-present "global pages", valid page dir entry with active global flag...     

addr &= ~0xFFF;
    

;eax = addr

mov ebx,0xFFF
not ebx
and eax,ebx

    

and eax, not 0xFFF ; Is assembled as AND EAX, 0xFFFFF000    

//align address to 4k (highest 20-bits of address)  
addr &= ~0xFFF;  
pginf.pagetable = addr / 0x400000; // each page table covers 0x400000 bytes in memory  
pginf.page = (addr % 0x400000) / 0x1000; //0x1000 = page size  
return pginf;  
 } 
    

;*******************
;eax = Virtual Addres
;returns:
;eax = page table 
;ebx = page 
;*******************
 
mm_virtaddrtopageindex:
and eax, not 0xFFF
mov ebx,eax
shr eax,22
shl ebx,10
shr ebx,22
ret
    

mm_virtaddrtopageindex:
shr eax, 12
mov ebx,eax
shr eax,10
and ebx, 3FF
ret     

set  

if(page_directory[890] & 1){  

 // page table exists, continue as we did earlier  

unsigned long *page_table = (unsigned long *) page_directory[890] & 0xFFFFF000;   

page_table[727] = 0x00012000 | 3;   

}else{  

 // page table doesn’t exist, so create one  

unsigned long *page_table = (unsigned long *) mm_allocphyspage();  

memsetl(page_table, 2, 1024); // set 1024 dwords to 2 (r/w, not present)   

page_table[727] = 0x00012000 | 3;   

 } 
   
    

;This is conversion of the last post of C code above
;page_directory  = 0x10000   ;set asside an address for the page dir
;page_table dw  0

ckforpage:
mov eax,dword[page_directory+890*4] 
cmp  al,00 
jne page_exist 
;esle does not exist create it 
call malloc_page  ; returns addres in eax 
mov dword[eax],page_table 
mov esi,page_table 
mov eax,2  ;set bits  
mov ecx,1024 ;1024 dwords to set 
call mem_set 
mov dword[page_table*727+4], 0x00012000 or 3;  
jmp if_fin  
page_exist: 
;page exists  
and eax,0xFFFFF000 
mov dword[eax],page_table 
mov dword[page_table+727*4],0x00012000 or 3 
if_fin : 


ret
    

; eax = virt. addr. for mapped page; PDir = virt. addr. of page dir; PTab = virt. addr. of total 4 mb page tabMapPage:push eaxmov edi,eaxshr edi,22 ; index in PDirmov esi,eaxshr esi,12 ; index in PTabtest byte [PDir+edi*4],1jnz @fcall GetZeroedPageadd eax,PDE_FLAGSmov [PDir+edi*4],eax@@:test byte [PTab+esi*4],1jnz @fcall GetPageadd eax,PTE_FLAGSmov [PTab+esi*4],eaxinc [PTabCounters+edi*2] ; can be useful for unmapping@@:pop eaxret