mirror of https://github.com/nmlgc/ReC98.git
[Reduction] #456: DOSCMD
... I, um, cannot comprehend how the C source code I have for this function could have been compiled into such an assembly.
This commit is contained in:
nmlgc
parent
92046a8021
commit
e54a6ad120
|
|
@ -0,0 +1,142 @@
|
|||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
@@dest = dword ptr -0Eh
|
||||
@@var_A = dword ptr -0Ah
|
||||
@@var_6 = dword ptr -6
|
||||
@@var_2 = word ptr -2
|
||||
@@arg_0 = word ptr 4
|
||||
@@arg_2 = word ptr 6
|
||||
@@arg_4 = dword ptr 8
|
||||
@@arg_8 = word ptr 0Ch
|
||||
@@arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+@@var_2], 3
|
||||
mov ax, word ptr [bp+@@arg_4]
|
||||
or ax, word ptr [bp+@@arg_4+2]
|
||||
jz short @@L1
|
||||
push word ptr [bp+@@arg_4+2]
|
||||
push word ptr [bp+@@arg_4]
|
||||
nopcall _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+@@var_2]
|
||||
inc ax
|
||||
mov [bp+@@var_2], ax
|
||||
|
||||
@@L1:
|
||||
mov dx, [bp+@@arg_2]
|
||||
mov ax, [bp+@@arg_0]
|
||||
mov word ptr [bp+@@var_6+2], dx
|
||||
mov word ptr [bp+@@var_6], ax
|
||||
jmp short @@L3
|
||||
|
||||
@@L2:
|
||||
les bx, [bp+@@var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx]
|
||||
nopcall _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+@@var_2]
|
||||
inc ax
|
||||
mov [bp+@@var_2], ax
|
||||
add word ptr [bp+@@var_6], 4
|
||||
|
||||
@@L3:
|
||||
les bx, [bp+@@var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short @@L2
|
||||
push [bp+@@var_2]
|
||||
nopcall _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+@@var_A+2], dx
|
||||
mov word ptr [bp+@@var_A], ax
|
||||
or ax, dx
|
||||
jnz short @@L4
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp @@ret
|
||||
|
||||
@@L4:
|
||||
mov dx, word ptr [bp+@@var_A+2]
|
||||
mov ax, word ptr [bp+@@var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+@@dest+2], dx
|
||||
mov word ptr [bp+@@dest], ax
|
||||
les bx, [bp+@@dest]
|
||||
mov byte ptr es:[bx], ' '
|
||||
inc word ptr [bp+@@dest]
|
||||
mov ax, word ptr [bp+@@arg_4]
|
||||
or ax, word ptr [bp+@@arg_4+2]
|
||||
jz short @@L5
|
||||
push word ptr [bp+@@arg_4+2]
|
||||
push word ptr [bp+@@arg_4]
|
||||
push word ptr [bp+@@dest+2]
|
||||
push word ptr [bp+@@dest]
|
||||
nopcall _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+@@dest+2], dx
|
||||
mov word ptr [bp+@@dest], ax
|
||||
les bx, [bp+@@dest]
|
||||
mov byte ptr es:[bx], ' '
|
||||
inc word ptr [bp+@@dest]
|
||||
|
||||
@@L5:
|
||||
mov ax, [bp+@@arg_8]
|
||||
or ax, [bp+@@arg_A]
|
||||
jz short @@L8
|
||||
mov dx, [bp+@@arg_2]
|
||||
mov ax, [bp+@@arg_0]
|
||||
mov word ptr [bp+@@var_6+2], dx
|
||||
mov word ptr [bp+@@var_6], ax
|
||||
jmp short @@L7
|
||||
|
||||
@@L6:
|
||||
les bx, [bp+@@var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx]
|
||||
push word ptr [bp+@@dest+2]
|
||||
push word ptr [bp+@@dest]
|
||||
nopcall _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+@@dest+2], dx
|
||||
mov word ptr [bp+@@dest], ax
|
||||
les bx, [bp+@@dest]
|
||||
mov byte ptr es:[bx], ' '
|
||||
inc word ptr [bp+@@dest]
|
||||
add word ptr [bp+@@var_6], 4
|
||||
|
||||
@@L7:
|
||||
les bx, [bp+@@var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short @@L6
|
||||
|
||||
@@L8:
|
||||
les bx, [bp+@@dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+@@dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+@@var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh
|
||||
les bx, [bp+@@var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+@@var_A+2]
|
||||
mov ax, word ptr [bp+@@var_A]
|
||||
|
||||
@@ret:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
160
th01_fuuin.asm
160
th01_fuuin.asm
|
|
@ -7661,165 +7661,7 @@ include libs/BorlandC/xx.asm
|
|||
unknown_libname_3 db 0BAh, 10h, 12h, 0EBh, 3, 0BAh, 15h, 12h, 0B9h, 5, 0
|
||||
db 0B4h, 40h, 0BBh, 2, 0, 0CDh, 21h, 0B9h, 27h, 0, 0BAh
|
||||
db 1Ah, 12h, 0B4h, 40h, 0CDh, 21h, 0E9h, 56h, 8Ch
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
_s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+_s]
|
||||
or ax, word ptr [bp+_s+2]
|
||||
jz short loc_8F5A
|
||||
push word ptr [bp+_s+2]
|
||||
push word ptr [bp+_s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_8F5A:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8F84
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8F68:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8F84:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8F68
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_8FAA
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9060
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8FAA:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+_s]
|
||||
or ax, word ptr [bp+_s+2]
|
||||
jz short loc_8FED
|
||||
push word ptr [bp+_s+2]
|
||||
push word ptr [bp+_s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_8FED:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_903B
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_902F
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9003:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_902F:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9003
|
||||
|
||||
loc_903B:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9060:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th01_op.asm
160
th01_op.asm
|
|
@ -7544,165 +7544,7 @@ include libs/BorlandC/xx.asm
|
|||
unknown_libname_3 db 0BAh, 60h, 0Fh, 0EBh, 3, 0BAh, 65h, 0Fh, 0B9h, 5, 0
|
||||
db 0B4h, 40h, 0BBh, 2, 0, 0CDh, 21h, 0B9h, 27h, 0, 0BAh
|
||||
db 6Ah, 0Fh, 0B4h, 40h, 0CDh, 21h, 0E9h, 9Bh, 8Ah
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
_s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+_s]
|
||||
or ax, word ptr [bp+_s+2]
|
||||
jz short loc_91D5
|
||||
push word ptr [bp+_s+2]
|
||||
push word ptr [bp+_s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_91D5:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_91FF
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_91E3:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_91FF:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_91E3
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_9225
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_92DB
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9225:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+_s]
|
||||
or ax, word ptr [bp+_s+2]
|
||||
jz short loc_9268
|
||||
push word ptr [bp+_s+2]
|
||||
push word ptr [bp+_s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_9268:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_92B6
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_92AA
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_927E:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_92AA:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_927E
|
||||
|
||||
loc_92B6:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_92DB:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th01_reiiden.asm
160
th01_reiiden.asm
|
|
@ -11103,165 +11103,7 @@ include libs/BorlandC/xx.asm
|
|||
unknown_libname_3 db 0BAh, 3Ch, 20h, 0EBh, 3, 0BAh, 41h, 20h, 0B9h, 5, 0
|
||||
db 0B4h, 40h, 0BBh, 2, 0, 0CDh, 21h, 0B9h, 27h, 0, 0BAh
|
||||
db 46h, 20h, 0B4h, 40h, 0CDh, 21h, 0E9h, 0A2h, 7Dh
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
_s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+_s]
|
||||
or ax, word ptr [bp+_s+2]
|
||||
jz short loc_A648
|
||||
push word ptr [bp+_s+2]
|
||||
push word ptr [bp+_s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_A648:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_A672
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A656:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_A672:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_A656
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_A698
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_A74E
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A698:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+_s]
|
||||
or ax, word ptr [bp+_s+2]
|
||||
jz short loc_A6DB
|
||||
push word ptr [bp+_s+2]
|
||||
push word ptr [bp+_s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_A6DB:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_A729
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_A71D
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A6F1:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_A71D:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_A6F1
|
||||
|
||||
loc_A729:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_A74E:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th02_main.asm
160
th02_main.asm
|
|
@ -3963,165 +3963,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_A534
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_A534:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_A55E
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A542:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_A55E:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_A542
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_A584
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_A63A
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A584:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_A5C7
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_A5C7:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_A615
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_A609
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A5DD:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_A609:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_A5DD
|
||||
|
||||
loc_A615:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_A63A:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th02_maine.asm
160
th02_maine.asm
|
|
@ -2020,165 +2020,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8934
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_8934:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_895E
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8942:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_895E:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8942
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_8984
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_8A3A
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8984:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_89C7
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_89C7:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_8A15
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8A09
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_89DD:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8A09:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_89DD
|
||||
|
||||
loc_8A15:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_8A3A:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th02_op.asm
160
th02_op.asm
|
|
@ -1623,165 +1623,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8F81
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_8F81:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8FAB
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8F8F:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8FAB:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8F8F
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_8FD1
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9087
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8FD1:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_9014
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_9014:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_9062
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9056
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_902A:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9056:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_902A
|
||||
|
||||
loc_9062:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9087:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th03_main.asm
160
th03_main.asm
|
|
@ -1542,165 +1542,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8AB6
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_8AB6:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8AE0
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8AC4:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8AE0:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8AC4
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_8B06
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_8BBC
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8B06:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8B49
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_8B49:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_8B97
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8B8B
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8B5F:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8B8B:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8B5F
|
||||
|
||||
loc_8B97:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_8BBC:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th03_mainl.asm
160
th03_mainl.asm
|
|
@ -1756,165 +1756,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8984
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_8984:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_89AE
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8992:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_89AE:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8992
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_89D4
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_8A8A
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_89D4:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8A17
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_8A17:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_8A65
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8A59
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8A2D:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8A59:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8A2D
|
||||
|
||||
loc_8A65:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_8A8A:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th03_op.asm
160
th03_op.asm
|
|
@ -1813,165 +1813,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8C66
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_8C66:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8C90
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8C74:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8C90:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8C74
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_8CB6
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_8D6C
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8CB6:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_8CF9
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_8CF9:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_8D47
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_8D3B
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_8D0F:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_8D3B:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_8D0F
|
||||
|
||||
loc_8D47:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_8D6C:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th04_main.asm
160
th04_main.asm
|
|
@ -2237,165 +2237,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_9EC2
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_9EC2:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9EEC
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9ED0:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9EEC:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9ED0
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_9F12
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9FC8
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9F12:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_9F55
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_9F55:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_9FA3
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9F97
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9F6B:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9F97:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9F6B
|
||||
|
||||
loc_9FA3:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9FC8:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th04_maine.asm
160
th04_maine.asm
|
|
@ -1901,165 +1901,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_942A
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_942A:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9454
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9438:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9454:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9438
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_947A
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9530
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_947A:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_94BD
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_94BD:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_950B
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_94FF
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_94D3:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_94FF:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_94D3
|
||||
|
||||
loc_950B:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9530:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th04_op.asm
160
th04_op.asm
|
|
@ -1684,165 +1684,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_9AEA
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_9AEA:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9B14
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9AF8:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9B14:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9AF8
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_9B3A
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9BF0
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9B3A:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_9B7D
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_9B7D:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_9BCB
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9BBF
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9B93:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9BBF:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9B93
|
||||
|
||||
loc_9BCB:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9BF0:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th05_main.asm
160
th05_main.asm
|
|
@ -2358,165 +2358,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_A1EE
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_A1EE:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_A218
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A1FC:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_A218:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_A1FC
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_A23E
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_A2F4
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A23E:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_A281
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_A281:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_A2CF
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_A2C3
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_A297:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_A2C3:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_A297
|
||||
|
||||
loc_A2CF:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_A2F4:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
159
th05_maine.asm
159
th05_maine.asm
|
|
@ -2053,164 +2053,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_9916
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_9916:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9940
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9924:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9940:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9924
|
||||
push [bp+var_2]
|
||||
nop
|
||||
call _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_9966
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9A1C
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9966:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_99A9
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_99A9:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_99F7
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_99EB
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_99BF:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_99EB:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_99BF
|
||||
|
||||
loc_99F7:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9A1C:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
160
th05_op.asm
160
th05_op.asm
|
|
@ -1957,165 +1957,7 @@ include libs/BorlandC/xfflush.asm
|
|||
include libs/BorlandC/xalloc.asm
|
||||
include libs/BorlandC/xmsg.asm
|
||||
include libs/BorlandC/xx.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __stdcall _DOSCMD(int, int, char *s, int, int)
|
||||
__DOSCMD proc near
|
||||
|
||||
dest = dword ptr -0Eh
|
||||
var_A = dword ptr -0Ah
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
s = dword ptr 8
|
||||
arg_8 = word ptr 0Ch
|
||||
arg_A = word ptr 0Eh
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
sub sp, 0Eh
|
||||
push si
|
||||
push di
|
||||
mov [bp+var_2], 3
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_973A
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
|
||||
loc_973A:
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_9764
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_9748:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; s
|
||||
nop
|
||||
push cs
|
||||
call near ptr _strlen
|
||||
pop cx
|
||||
pop cx
|
||||
add ax, [bp+var_2]
|
||||
inc ax
|
||||
mov [bp+var_2], ax
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_9764:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_9748
|
||||
push [bp+var_2]
|
||||
nop
|
||||
push cs
|
||||
call near ptr _malloc
|
||||
pop cx
|
||||
mov word ptr [bp+var_A+2], dx
|
||||
mov word ptr [bp+var_A], ax
|
||||
or ax, dx
|
||||
jnz short loc_978A
|
||||
xor dx, dx
|
||||
xor ax, ax
|
||||
jmp loc_9840
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_978A:
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
inc ax
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
mov ax, word ptr [bp+s]
|
||||
or ax, word ptr [bp+s+2]
|
||||
jz short loc_97CD
|
||||
push word ptr [bp+s+2]
|
||||
push word ptr [bp+s] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
|
||||
loc_97CD:
|
||||
mov ax, [bp+arg_8]
|
||||
or ax, [bp+arg_A]
|
||||
jz short loc_981B
|
||||
mov dx, [bp+arg_2]
|
||||
mov ax, [bp+arg_0]
|
||||
mov word ptr [bp+var_6+2], dx
|
||||
mov word ptr [bp+var_6], ax
|
||||
jmp short loc_980F
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_97E3:
|
||||
les bx, [bp+var_6]
|
||||
push word ptr es:[bx+2]
|
||||
push word ptr es:[bx] ; src
|
||||
push word ptr [bp+dest+2]
|
||||
push word ptr [bp+dest] ; dest
|
||||
nop
|
||||
call _stpcpy
|
||||
add sp, 8
|
||||
mov word ptr [bp+dest+2], dx
|
||||
mov word ptr [bp+dest], ax
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx], 20h ; ' '
|
||||
inc word ptr [bp+dest]
|
||||
add word ptr [bp+var_6], 4
|
||||
|
||||
loc_980F:
|
||||
les bx, [bp+var_6]
|
||||
mov ax, es:[bx]
|
||||
or ax, es:[bx+2]
|
||||
jnz short loc_97E3
|
||||
|
||||
loc_981B:
|
||||
les bx, [bp+dest]
|
||||
mov byte ptr es:[bx-1], 0Dh
|
||||
mov byte ptr es:[bx], 0
|
||||
mov ax, word ptr [bp+dest]
|
||||
xor dx, dx
|
||||
sub ax, word ptr [bp+var_A]
|
||||
sbb dx, 0
|
||||
add al, 0FEh ; 'þ'
|
||||
les bx, [bp+var_A]
|
||||
mov es:[bx], al
|
||||
mov dx, word ptr [bp+var_A+2]
|
||||
mov ax, word ptr [bp+var_A]
|
||||
|
||||
loc_9840:
|
||||
pop di
|
||||
pop si
|
||||
mov sp, bp
|
||||
pop bp
|
||||
retn 0Ch
|
||||
__DOSCMD endp
|
||||
|
||||
include libs/BorlandC/doscmd.asm
|
||||
include libs/BorlandC/exec.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
|
|||
Loading…
Reference in New Issue