feat: finalisation des commandes "execfile" et "projfile" Prise en compte des sections dans la commande execfile

This commit is contained in:
Nicolas Hordé 2007-03-18 20:39:24 +00:00
parent a0c5c481fd
commit d61a193186
1 changed files with 26 additions and 31 deletions

View File

@ -44,6 +44,7 @@ use SYSTEME,mbresident
use SYSTEME,mbfind
use SYSTEME,mbchown
use SYSTEME,mbloadfuncs
use SYSTEME,mbloadsection
endi
@ -147,30 +148,24 @@ PROC execfile FAR
mov dx,[ss:bp+10]
pushad
push ds es fs gs
call projfile
call projfile,dx
jc @@reallyerror
push es
pop gs
mov ah,6
int 49h
mov ah,12
int 49h
call [cs:mbchown],ax,dx
jc @@reallyerror
call [cs:mbloadfuncs],ax
jc @@reallyerror
call [cs:mbloadsection],ax
jc @@reallyerror
push es
push cs
mov ax,offset @@arrive
push ax
push es
cmp [word ptr gs:0h],'EC'
jne @@noce
push size exe
jmp @@wasce
@@noce:
push 0000h
@@wasce:
push es
push es
push es
push ax
pop ds
push cs
push offset @@arrive
push ds
push [word ptr (exe).starting]
push ds
push ds
push ds
pop ds
pop fs
pop gs
@ -180,9 +175,8 @@ PROC execfile FAR
db 0CBh
@@arrive:
cli
pop gs
mov ah,01
int 49h
pop ax
call [cs:mbfree],ax
pop gs fs es ds
popad
pop dx bp
@ -199,7 +193,7 @@ endp execfile
;============projfile (Fonction 17)===============
;Charge le fichier ds:%0 sur un bloc mémoire -> eax taille -> es bloc
;->
;-> ax bloc mémoire
;<- Flag Carry si erreur
;=====================================================
PROC projfile FAR
@ -222,6 +216,7 @@ USES cx,si,di,ds,es
mov eax,[es:(find si).result.filesize]
call loadway,cx,eax,0
jc @@errorload
mov ax,ds
clc
ret
@@errorload: