15955282f6
- ensure es = ds = ss upon exit of each C runtime function - clear upper 16 bits of ebx before setting them to 0x0021, when invoking interrupt_ptr to simulate a RM int 0x21 - make _sys_exists use the transfer buffer (which it needs) - make _sys_rawread properly handle an end-of-file read (zero bytes read) - make argument to _sys_seterrno short --- after a failed int 0x21 call, only the lower 16 bits of eax hold the MS-DOs error code - _sys_rawlseek accepts only 3 longword arguments, not 4 (the offset is only 1 longword) - other minor fixes
69 lines
1.2 KiB
ArmAsm
69 lines
1.2 KiB
ArmAsm
#
|
|
! $Source$
|
|
! $State$
|
|
! $Revision$
|
|
|
|
! Declare segments (the order is important).
|
|
|
|
.sect .text
|
|
.sect .rom
|
|
.sect .data
|
|
.sect .bss
|
|
|
|
.sect .text
|
|
|
|
! Write bytes to/to a file descriptor. These routines do not do any
|
|
! translation between CRLF and LF line endings.
|
|
!
|
|
! Note that, for MS-DOS, a raw "write" request of zero bytes will truncate
|
|
! (or extend) the file to the current file position.
|
|
|
|
.define __sys_rawwrite
|
|
__sys_rawwrite:
|
|
enter 0, 0
|
|
push esi
|
|
push edi
|
|
file_handle = 2*4
|
|
read_buffer = 3*4
|
|
amount_to_write = 4*4
|
|
|
|
mov eax, amount_to_write(ebp)
|
|
mov ecx, 32*1024 ! size of transfer buffer
|
|
cmp eax, ecx
|
|
jge 2f
|
|
mov ecx, eax
|
|
2:
|
|
|
|
! Copy ecx bytes into the transfer buffer.
|
|
|
|
push ecx
|
|
mov esi, read_buffer(ebp)
|
|
movzx edi, (transfer_buffer_ptr)
|
|
mov es, (pmode_ds)
|
|
cld
|
|
rep movsb
|
|
pop ecx
|
|
|
|
! Write from the transfer buffer to DOS.
|
|
|
|
movb ah, 0x40
|
|
o16 mov dx, (transfer_buffer_ptr)
|
|
mov ebx, 0x210000
|
|
o16 mov bx, file_handle(ebp)
|
|
callf (interrupt_ptr)
|
|
jnc exit
|
|
|
|
push eax
|
|
call __sys_seterrno
|
|
pop ecx
|
|
exit:
|
|
pop edi
|
|
pop esi
|
|
push ss
|
|
pop es
|
|
leave
|
|
ret
|
|
|
|
! vim: sw=4 ts=4 et
|
|
|