feat: mise a nivo pour la gestion des blocs parent

This commit is contained in:
Nicolas Hordé 2004-10-31 11:46:47 +00:00
parent fee0c5a333
commit 056902c2cf
1 changed files with 43 additions and 26 deletions

View File

@ -14,57 +14,74 @@ mov ah,13
int 47h int 47h
mov ah,6 mov ah,6
int 47h int 47h
mov ah,0 mov si,offset menu
int 49h mov ah,13
int 47h
mov ah,18h
int 47h
xor cx,cx xor cx,cx
listmcb: listmcb:
mov ah,06h
int 47h
mov ah,4 mov ah,4
int 49h int 49h
jc fino jc fino
inc cx inc cx
inc bl
push gs push gs
pop ds pop ds
mov bh,0
mov si,MB.Names mov si,MB.Names
mov ah,0Dh mov ah,14h
int 47h
mov ah,05h
int 47h int 47h
mov bh,15
xor edx,edx xor edx,edx
mov dx,ds:[MB.Sizes] mov dx,ds:[MB.Sizes]
shl edx,4 shl edx,4
mov ah,08 mov ah,0Fh
int 47h
mov ah,05h
int 47h int 47h
push cs push cs
pop ds pop ds
mov bh,24
cmp ds:[MB.Sizes],true cmp ds:[MB.Sizes],true
jne notresident jne notresident
mov si,offset resident mov si,offset resident
mov ah,0Dh mov ah,14h
int 47h int 47h
mov ah,05h jmp suitelistmcb
int 47h
jmp listmcb
notresident: notresident:
mov si,offset nonresident mov si,offset nonresident
mov ah,0Dh mov ah,14h
int 47h int 47h
suitelistmcb:
mov bh,30
cmp gs:[MB.Reference],0
je next
cmp gs:[MB.Reference],1000h
jb next
mov ax,gs:[MB.Reference]
dec ax
dec ax
mov ds,ax
mov si,MB.Names
mov ah,14h
int 47h
next:
mov bh,46
xor edx,edx
mov dx,gs
inc dx
inc dx
push cx
mov cx,16
mov ah,11h
int 47h
pop cx
jmp listmcb
fino: fino:
push cs
pop ds
mov si,offset findesprog
mov ah,0Dh
int 47h
mov ax,0
int 16h
db 0CBh db 0CBh
findesprog db '********* FIN ***********',0 resident db 'oui',0
resident db 'Resident',0 nonresident db 'non',0
nonresident db 'Volatile',0 msg db 'Memory manager V1.2',0
msg db 'Memory manager V1.0',0 menu db 'Nom | Taille | Res | Parent | Mem',0
end start end start