mirror of https://github.com/nmlgc/ReC98.git
[Reduction] #66-69: Near data segment space allocation
Neither should that one.
This commit is contained in:
nmlgc
parent
bb2c6c6efe
commit
30d44e6822
|
|
@ -0,0 +1,106 @@
|
|||
MARGIN equ 512
|
||||
|
||||
; int near __brk(void *addr)
|
||||
___brk proc near
|
||||
|
||||
addr = word ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
mov ax, [bp+addr]
|
||||
mov dx, sp
|
||||
sub dx, MARGIN
|
||||
cmp ax, dx
|
||||
jnb short @@brkerr
|
||||
mov word ptr __brklvl@, ax
|
||||
xor ax, ax
|
||||
jmp short @@brkret
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
@@brkerr:
|
||||
mov _errno, 8
|
||||
mov ax, -1
|
||||
|
||||
@@brkret:
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
___brk endp
|
||||
|
||||
; void * near __sbrk(long incr)
|
||||
___sbrk proc near
|
||||
|
||||
incr = dword ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
mov ax, word ptr [bp+incr]
|
||||
mov dx, word ptr [bp+incr+2]
|
||||
add ax, word ptr __brklvl@
|
||||
adc dx, 0
|
||||
mov cx, ax
|
||||
or dx, dx
|
||||
jnz short @@sbrkErr
|
||||
add cx, MARGIN
|
||||
jb short @@sbrkErr
|
||||
cmp cx, sp
|
||||
jnb short @@sbrkErr
|
||||
xchg ax, word ptr __brklvl@
|
||||
jmp short @@sbrkRet
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
@@sbrkErr:
|
||||
mov _errno, 8
|
||||
mov ax, -1
|
||||
|
||||
@@sbrkRet:
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
___sbrk endp
|
||||
|
||||
; int brk(void *addr)
|
||||
_brk proc near
|
||||
|
||||
addr = word ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
push [bp+addr]
|
||||
call ___brk
|
||||
pop cx
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
_brk endp
|
||||
|
||||
; void *sbrk(int incr)
|
||||
_sbrk proc near
|
||||
|
||||
incr = word ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
mov ax, [bp+incr]
|
||||
cwd
|
||||
push dx
|
||||
push ax
|
||||
call ___sbrk
|
||||
pop cx
|
||||
pop cx
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
_sbrk endp
|
||||
127
th01_zunsoft.asm
127
th01_zunsoft.asm
|
|
@ -3866,130 +3866,7 @@ _lseek endp
|
|||
|
||||
include libs/BorlandC/N_LXMUL.ASM
|
||||
include libs/BorlandC/setupio.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
___brk proc near
|
||||
|
||||
arg_0 = word ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
mov ax, [bp+arg_0]
|
||||
mov dx, sp
|
||||
sub dx, 200h
|
||||
cmp ax, dx
|
||||
jnb short loc_1957
|
||||
mov word_21C0, ax
|
||||
xor ax, ax
|
||||
jmp short loc_1960
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_1957:
|
||||
mov _errno, 8
|
||||
mov ax, 0FFFFh
|
||||
|
||||
loc_1960:
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
___brk endp
|
||||
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
___sbrk proc near
|
||||
|
||||
arg_0 = word ptr 4
|
||||
arg_2 = word ptr 6
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
mov ax, [bp+arg_0]
|
||||
mov dx, [bp+arg_2]
|
||||
add ax, word_21C0
|
||||
adc dx, 0
|
||||
mov cx, ax
|
||||
or dx, dx
|
||||
jnz short loc_198C
|
||||
add cx, 200h
|
||||
jb short loc_198C
|
||||
cmp cx, sp
|
||||
jnb short loc_198C
|
||||
xchg ax, word_21C0
|
||||
jmp short loc_1995
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_198C:
|
||||
mov _errno, 8
|
||||
mov ax, 0FFFFh
|
||||
|
||||
loc_1995:
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
___sbrk endp
|
||||
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; int __cdecl brk(void *addr)
|
||||
_brk proc near
|
||||
|
||||
addr = word ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
push [bp+addr]
|
||||
call ___brk
|
||||
pop cx
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
_brk endp
|
||||
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: library function bp-based frame
|
||||
|
||||
; void *__cdecl sbrk(int incr)
|
||||
_sbrk proc near
|
||||
|
||||
incr = word ptr 4
|
||||
|
||||
push bp
|
||||
mov bp, sp
|
||||
push si
|
||||
push di
|
||||
mov ax, [bp+incr]
|
||||
cwd
|
||||
push dx
|
||||
push ax
|
||||
call ___sbrk
|
||||
pop cx
|
||||
pop cx
|
||||
pop di
|
||||
pop si
|
||||
pop bp
|
||||
retn
|
||||
_sbrk endp
|
||||
|
||||
include libs/BorlandC/brk.asm
|
||||
include libs/BorlandC/nearheap.asm
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
@ -4846,7 +4723,7 @@ word_21B6 dw 0
|
|||
word_21B8 dw 0
|
||||
PubSym@ errno, <dw 0>, __CDECL__
|
||||
db 2 dup(0FFh), 0A0h, 33h
|
||||
word_21C0 dw 33A0h
|
||||
PubSym@ __brklvl, <dw edata@>, __CDECL__
|
||||
dw 0
|
||||
word_21C4 dw 0
|
||||
dw 0
|
||||
|
|
|
|||
Loading…
Reference in New Issue