2000-05-28 13:40:48 +00:00
|
|
|
;
|
|
|
|
|
; Christian Groessler, May-2000
|
|
|
|
|
;
|
|
|
|
|
; os specific error code mapping
|
2022-08-28 19:52:53 +00:00
|
|
|
; int __fastcall__ __osmaperrno (unsigned char oserror);
|
2000-05-28 13:40:48 +00:00
|
|
|
;
|
|
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
.include "errno.inc"
|
2022-08-28 19:52:53 +00:00
|
|
|
.export ___osmaperrno
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2022-08-28 19:52:53 +00:00
|
|
|
.proc ___osmaperrno
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
cmp #$80 ; error or success
|
|
|
|
|
bcs errcode ; error, jump
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
lda #0 ; no error, return 0
|
|
|
|
|
tax
|
|
|
|
|
rts
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
errcode:and #$7f ; create index from error number
|
|
|
|
|
tax
|
|
|
|
|
cpx #MAX_OSERR_VAL ; valid number?
|
|
|
|
|
bcs inverr ; no
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
lda maptable,x
|
|
|
|
|
ldx #0
|
|
|
|
|
rts
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
inverr: lda #<EUNKNOWN
|
|
|
|
|
ldx #>EUNKNOWN
|
|
|
|
|
rts
|
2000-05-28 13:40:48 +00:00
|
|
|
|
|
|
|
|
.endproc
|
|
|
|
|
|
|
|
|
|
.rodata
|
2002-04-21 14:19:16 +00:00
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
maptable:
|
2013-05-09 11:56:54 +00:00
|
|
|
.byte EINTR ;BRKABT = 128 ;($80) BREAK key abort
|
|
|
|
|
.byte EBUSY ;PRVOPN = 129 ;($81) IOCB already open error
|
|
|
|
|
.byte ENODEV ;NONDEV = 130 ;($82) nonexistent device error
|
|
|
|
|
.byte EACCES ;WRONLY = 131 ;($83) IOCB opened for write only error
|
|
|
|
|
.byte ENOSYS ;NVALID = 132 ;($84) invalid command error
|
|
|
|
|
.byte EINVAL ;NOTOPN = 133 ;($85) device/file not open error
|
|
|
|
|
.byte EINVAL ;BADIOC = 134 ;($86) invalid IOCB index error
|
|
|
|
|
.byte EACCES ;RDONLY = 135 ;($87) IOCB opened for read only error
|
|
|
|
|
.byte EINVAL ;EOFERR = 136 ;($88) end of file error (should never come,
|
|
|
|
|
; specially handled by read.s)
|
|
|
|
|
.byte EIO ;TRNRCD = 137 ;($89) truncated record error
|
|
|
|
|
.byte EIO ;TIMOUT = 138 ;($8A) peripheral device timeout error
|
|
|
|
|
.byte EIO ;DNACK = 139 ;($8B) device does not acknowledge command
|
|
|
|
|
.byte EIO ;FRMERR = 140 ;($8C) serial bus framing error
|
|
|
|
|
.byte EINVAL ;CRSROR = 141 ;($8D) cursor out of range error
|
|
|
|
|
.byte EIO ;OVRRUN = 142 ;($8E) serial bus data overrun error
|
|
|
|
|
.byte EIO ;CHKERR = 143 ;($8F) serial bus checksum error
|
|
|
|
|
.byte EIO ;DERROR = 144 ;($90) general device failure
|
|
|
|
|
.byte EINVAL ;BADMOD = 145 ;($91) bad screen mode number error
|
|
|
|
|
.byte ENOSYS ;FNCNOT = 146 ;($92) function not implemented in handler
|
|
|
|
|
.byte ENOMEM ;SCRMEM = 147 ;($93) insufficient memory for screen mode
|
2000-05-28 13:40:48 +00:00
|
|
|
; codes below taken from "Mein Atari Computer" (german version of "Your Atari Computer")
|
2001-02-07 23:27:54 +00:00
|
|
|
; also SpartaDOS codes from http://www.atari-central.com/programming/cio_errors.txt
|
2012-01-26 12:12:34 +00:00
|
|
|
; MyDOS and XDOS codes from Stefan Haubenthal
|
2013-05-09 11:56:54 +00:00
|
|
|
.byte EUNKNOWN ; 148 - [SpartaDOS] unrecognized disk format
|
|
|
|
|
.byte EUNKNOWN ; 149 - [SpartaDOS] disk created by incompatible version of SD
|
|
|
|
|
.byte EBUSY ; 150 - serial port already open
|
|
|
|
|
; [SpartaDOS] directory not found
|
|
|
|
|
.byte EACCES ; 151 - concurrent mode I/O not enabled (serial)
|
|
|
|
|
; [SpartaDOS] file exists
|
|
|
|
|
.byte EINVAL ; 152 - invalid buffer address for concurrent mode
|
|
|
|
|
; [SpartaDOS] not binary format
|
|
|
|
|
.byte EAGAIN ; 153 - concurrent mode enabled (and another access tried)
|
|
|
|
|
.byte EACCES ; 154 - concurrent mode I/O not active (serial)
|
|
|
|
|
; [SpartaDOS X] loader symbol not defined
|
|
|
|
|
.byte EUNKNOWN ; 155 - haven't found documentation
|
|
|
|
|
.byte EUNKNOWN ; 156 - [SpartaDOS X] bad parameter
|
|
|
|
|
.byte EUNKNOWN ; 157 - haven't found documentation
|
|
|
|
|
.byte EUNKNOWN ; 158 - [SpartaDOS X] out of memory
|
|
|
|
|
.byte EUNKNOWN ; 159 - haven't found documentation
|
|
|
|
|
.byte ENOENT ; 160 - drive number error (DOS)
|
|
|
|
|
.byte EMFILE ; 161 - too many open files
|
|
|
|
|
.byte ENOSPC ; 162 - disk full
|
|
|
|
|
.byte EIO ; 163 - unrecoverable system data I/O error
|
|
|
|
|
.byte ESPIPE ; 164 - file number mismatch (inv. seek or disk data strucs damaged)
|
|
|
|
|
.byte ENOENT ; 165 - invalid file name (e.g. lowercase)
|
|
|
|
|
.byte ESPIPE ; 166 - point data length error
|
|
|
|
|
.byte EACCES ; 167 - file locked (read-only)
|
|
|
|
|
.byte ENOSYS ; 168 - command invalid for disk
|
|
|
|
|
.byte ENOSPC ; 169 - directory full
|
|
|
|
|
.byte ENOENT ; 170 - file not found
|
|
|
|
|
.byte ESPIPE ; 171 - point command invalid
|
|
|
|
|
.byte EEXIST ; 172 - [MYDOS] already exists in parent directory
|
|
|
|
|
.byte EUNKNOWN ; 173 - bad disk - format couldn't complete
|
|
|
|
|
.byte EUNKNOWN ; 174 - [MYDOS] directory not in parent directory
|
|
|
|
|
.byte EUNKNOWN ; 175 - [MYDOS] directory not empty
|
|
|
|
|
.byte EUNKNOWN ; 176 - [DOS 3] incompatible file system
|
|
|
|
|
.byte EUNKNOWN ; 177 - haven't found documentation
|
|
|
|
|
.byte EUNKNOWN ; 178 - haven't found documentation
|
|
|
|
|
.byte EUNKNOWN ; 179 - haven't found documentation
|
2016-06-13 18:40:01 +00:00
|
|
|
.byte ENOEXEC ; 180 - not a binary file
|
2013-05-09 11:56:54 +00:00
|
|
|
.byte EUNKNOWN ; 181 - [MYDOS] invalid address range
|
|
|
|
|
.byte EUNKNOWN ; 182 - [XDOS] invalid parameter
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
.byte EINVAL ; 183 - dummy (used by cc65 rtl, see sysremove.s)
|
2003-08-17 19:54:05 +00:00
|
|
|
|
2000-05-28 13:40:48 +00:00
|
|
|
MAX_OSERR_VAL = (* - maptable)
|
