2000-05-28 13:40:48 +00:00
|
|
|
;
|
|
|
|
|
; Ullrich von Bassewitz, 17.05.2000
|
|
|
|
|
;
|
|
|
|
|
; int __fastcall__ _osmaperrno (unsigned char oserror);
|
|
|
|
|
; /* Map a system specific error into a system independent code */
|
|
|
|
|
;
|
|
|
|
|
|
|
|
|
|
.export __osmaperrno
|
2002-04-21 14:19:16 +00:00
|
|
|
.include "errno.inc"
|
2000-05-28 13:40:48 +00:00
|
|
|
|
|
|
|
|
.code
|
|
|
|
|
|
|
|
|
|
__osmaperrno:
|
|
|
|
|
ldx #ErrTabSize
|
|
|
|
|
@L1: cmp ErrTab-2,x ; Search for the error code
|
|
|
|
|
beq @L2 ; Jump if found
|
|
|
|
|
dex
|
|
|
|
|
dex
|
|
|
|
|
bne @L1 ; Next entry
|
|
|
|
|
|
|
|
|
|
; Code not found, return EINVAL
|
|
|
|
|
|
|
|
|
|
lda #<EINVAL
|
|
|
|
|
ldx #>EINVAL
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
; Found the code
|
|
|
|
|
|
|
|
|
|
@L2: lda ErrTab-1,x
|
|
|
|
|
ldx #$00 ; High byte always zero
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.rodata
|
|
|
|
|
|
|
|
|
|
ErrTab:
|
|
|
|
|
.byte 1, EMFILE ; Too many open files
|
|
|
|
|
.byte 2, EINVAL ; File is open
|
|
|
|
|
.byte 3, EINVAL ; File not open
|
|
|
|
|
.byte 4, ENOENT ; File not found
|
|
|
|
|
.byte 5, ENODEV ; Device not present
|
|
|
|
|
.byte 6, EINVAL ; File not input
|
|
|
|
|
.byte 7, EINVAL ; File not output
|
|
|
|
|
.byte 8, EINVAL ; Filename missing
|
|
|
|
|
.byte 9, ENODEV ; Ilegal device
|
|
|
|
|
; .byte 20, ; Read error
|
|
|
|
|
; .byte 21, ; Read error
|
|
|
|
|
; .byte 22, ; Read error
|
|
|
|
|
; .byte 23, ; Read error
|
|
|
|
|
; .byte 24, ; Read error
|
|
|
|
|
; .byte 25, ; Write error
|
|
|
|
|
.byte 26, EACCES ; Write protect on
|
|
|
|
|
; .byte 27, ; Read error
|
|
|
|
|
; .byte 28, ; Write error
|
|
|
|
|
; .byte 29, ; Disk ID mismatch
|
|
|
|
|
; .byte 30, ; Syntax error
|
|
|
|
|
; .byte 31, ; Syntax error
|
|
|
|
|
; .byte 32, ; Syntax error
|
|
|
|
|
.byte 33, EINVAL ; Syntax error (invalid file name)
|
|
|
|
|
.byte 34, EINVAL ; Syntax error (no file given)
|
|
|
|
|
; .byte 39, ; Syntax error
|
|
|
|
|
; .byte 50, ; Record not present
|
|
|
|
|
; .byte 51, ; Overflow in record
|
|
|
|
|
; .byte 52, ; File too large
|
|
|
|
|
.byte 60, EINVAL ; Write file open
|
|
|
|
|
.byte 61, EINVAL ; File not open
|
|
|
|
|
.byte 62, ENOENT ; File not found
|
|
|
|
|
.byte 63, EEXIST ; File exists
|
|
|
|
|
.byte 64, EINVAL ; File type mismatch
|
|
|
|
|
; .byte 65, ; No block
|
|
|
|
|
; .byte 66, ; Illegal track or sector
|
|
|
|
|
; .byte 67, ; Illegal system track or sector
|
|
|
|
|
.byte 70, EBUSY ; No channel
|
|
|
|
|
; .byte 71, ; Directory error
|
|
|
|
|
; .byte 72, ; Disk full
|
|
|
|
|
; .byte 73, ; DOS version mismatch
|
|
|
|
|
|
|
|
|
|
ErrTabSize = (* - ErrTab)
|
