PR#3 PREFIX /A2OSX.SRC NEW INC 1 AUTO 6 .LIST OFF *-------------------------------------- * KERNEL CONSTANTS DEFINITON *-------------------------------------- K.ENV.SIZE .EQ 256 K.EVT.MAX .EQ 16 K.DEV.MAX .EQ 16 K.FLT.MAX .EQ 8 K.PS.MAX .EQ 64 *-------------------------------------- * Kernel ZP Aux *-------------------------------------- ZPKERNEL .EQ $0 *-------------------------------------- ZPMEMMGR .EQ $10 *-------------------------------------- pCode .EQ $20 pData .EQ $22 pStack .EQ $24 pLib .EQ $26 pDrv .EQ $28 pPs .EQ $2A pDev .EQ $2C pEvent .EQ $2E *-------------------------------------- ZPDRV .EQ $30 ZPBIN .EQ $40 *-------------------------------------- * $3A-$3F ProDOS Block Device Drivers Main *-------------------------------------- * $5E-$C8 RESERVED APPLESOFT Main/Aux (ROM Call, no need to switch back MainZP) *-------------------------------------- ZPLIB .EQ $E0 32 bytes for TCPIP *-------------------------------------- * Memory Map *-------------------------------------- A2osX.SaveSM .EQ $100 Aux A2osX.SaveSX .EQ $101 Aux *-------------------------------------- * Main $200 -> 2FF : (Used By ProDOS,Clock DRV....) * Main $300 -> 3EF : * Main $3F0 -> 3FF : SYS Vectors (reset,IRQ...) * Aux $200 -> 3FD : /RAM Driver * Aux $3FE -> 3FF : IRQ Vector *-------------------------------------- UsrBuf256 .EQ $0200 Main *-------------------------------------- *D.STACK.BASE .EQ $0300 $03EF... D.STACK.TOP .EQ $03F0 ...Down to $0300 *-------------------------------------- *** $3F0-$3FF IRQ Handler.... *** *-------------------------------------- * Main/Aux $400 -> $7FF : Console Screen * Main/Aux $800 -> $BFF : System Screen *-------------------------------------- KrnBuf256 .EQ $0C00 Main *-------------------------------------- MLICALL.PARAMS .EQ $0D00 Main, $12 bytes min !!!! KrnSTAT .EQ $0D12 *-------------------------------------- *** Z80 Reserved $0F00-10FF*** *-------------------------------------- Z80STACK .EQ $0FFF (0FFFFh) Down to $0F00 Z80JMP .EQ $1000 (00000h) Up To $10FF *-------------------------------------- EvtMgr.Table .EQ $1100 K.EVT.MAX*S.EVT.SIZE=32*8=256b *-------------------------------------- DevMgr.Table .EQ $1200 K.DEV.MAX*S.DEV.SIZE=16*16=256b *-------------------------------------- FltMgr.Table .EQ $1300 K.FLT.MAX*S.FLT.SIZE=8*32=256b *-------------------------------------- TskMgr.Table .EQ $1400 K.PS.MAX*S.PS.SIZE=64*16=1k *-------------------------------------- * MemMgr : $1800->$1FFF MAIN/AUX (2 kBytes) *-------------------------------------- MemMgr.Table .EQ $1800 Slot 0 is Reserved MemMgr.LoMem .EQ $1800 MemMgr.Free .EQ $1802 MemMgr.HiMem .EQ $1804 MemMgr.LastSlot .EQ $1806 *-------------------------------------- MemMgr.MLoMem .EQ $2000 MemMgr.MHiMem .EQ $BE00 MemMgr.XLoMem .EQ $2000 MemMgr.XHiMem .EQ $C000 *-------------------------------------- DevMgr.HiMem .EQ $FFFA Protect IRQ vectors in Aux LC *-------------------------------------- * A2osX GLOBAL PAGE * $BE00->$BE0F : Public Vetors *-------------------------------------- A2osX.SYSCALL .EQ $BE00 A2osX.LIBCALL .EQ $BE03 A2osX.MLICALL .EQ $BE06 *-------------------------------------- pCodeJmp .EQ $BE10 pLibJmp .EQ $BE13 pDrvJmp .EQ $BE16 pDevJmp .EQ $BE19 *-------------------------------------- * $BEE0->$BEEF : Public Variables *-------------------------------------- A2osX.ASCREEN .EQ $BEE0 Active Screen A2osX.SCRNDEVS .EQ $BEE1 -> $BEE4 (4 screen devices) A2osX.CPUTYPE .EQ $BEE6 A2osX.CPUSPEED .EQ $BEE7 (->255.99 Mhz) A2osX.Z80SLOT .EQ $BEEA A2osX.TIMER16 .EQ $BEEC A2osX.RANDOM16 .EQ $BEEE *-------------------------------------- * $BEF0->$BEFF : Kernel Config Block *-------------------------------------- A2osX.HZ .EQ $BEF0 *-------------------------------------- H.BIN.HEADER .EQ 0 H.BIN.HEADER.DRV65 .EQ $4CD8 6502:cld,jmp abs H.BIN.HEADER.LIB65 .EQ $7CD8 6502:cld,jmp (abs,x) H.BIN.HEADER.BIN65 .EQ $7CD8 6502:cld,jmp (abs,x) H.BIN.HEADER.LIB80 .EQ $A28D Z80: H.BIN.HEADER.BIN80 .EQ $A28D Z80: H.BIN.JMP .EQ 2 H.BIN.CODE.TYPE .EQ 4 H.BIN.VERSION .EQ 5 H.BIN.CODE.LEN .EQ 8 * H.BIN.EXE.DS.SIZE .EQ 10 H.BIN.EXE.REL.TABLE .EQ 16 * H.BIN.DRV.HEADER.O .EQ 10 H.BIN.DRV.CODE.O .EQ 12 H.BIN.DRV.CODE.LEN .EQ 14 H.BIN.DRV.REL.TABLE .EQ 0 *-------------------------------------- * A2osX.SYSCALL Functions Indexes *-------------------------------------- SYS.FileSearch .EQ $00 SYS.GetFullPathYA .EQ $02 SYS.LoadFile .EQ $04 SYS.SaveFile .EQ $06 * .EQ $08 * .EQ $0A * .EQ $0C * .EQ $0E *-------------------------------------- SYS.LoadDrvYA .EQ $10 SYS.LoadLibYA .EQ $12 SYS.UnloadLibA .EQ $14 SYS.LoadExeYA .EQ $16 SYS.TimeYA .EQ $18 SYS.CTime2Time .EQ $1A SYS.PTime2Time .EQ $1C * .EQ $1E *-------------------------------------- SYS.FOPEN .EQ $20 SYS.FOPEN.R .EQ $01 Open For Read SYS.FOPEN.W .EQ $02 Open For Write SYS.FOPEN.A .EQ $04 Append SYS.FOPEN.T .EQ $08 Open/Append in Text mode SYS.FOPEN.X .EQ $80 Create if not exists SYS.FCLOSEA .EQ $22 SYS.FREAD .EQ $24 SYS.FWRITE .EQ $26 SYS.FFLUSH .EQ $28 SYS.FSEEK .EQ $2A SYS.FSEEK.SET .EQ $00 SYS.FSEEK.CUR .EQ $01 SYS.FSEEK.END .EQ $02 SYS.FTELL .EQ $2C SYS.FEOF .EQ $2E SYS.REMOVE .EQ $30 SYS.RENAME .EQ $32 SYS.STAT .EQ $34 * .EQ $36 SYS.OPENDIRYA .EQ $38 SYS.ReadDirA .EQ $3A SYS.CloseDirA .EQ $3C SYS.MKDirYA .EQ $3E *-------------------------------------- SYS.COutA .EQ $40 SYS.SScanF .EQ $42 * .EQ $44 SYS.PrintFYA .EQ $46 * .EQ $48 SYS.FPUTCA * .EQ $4A SYS.FGETC * .EQ $4C SYS.FPUTSYA * .EQ $4E SYS.FGETS *-------------------------------------- SYS.NewPStrYA .EQ $50 SYS.PStrCpy .EQ $52 SYS.PStrCat .EQ $54 SYS.PStrMatch .EQ $56 SYS.PStrUprYA .EQ $58 SYS.PStrLwrYA .EQ $5A SYS.PStrFTime .EQ $5C SYS.PStr2StrArrayYA .EQ $5E *-------------------------------------- SYS.ExecProcessNewEnvYA .EQ $60 SYS.ExecProcessYA .EQ $62 SYS.CreateProcessNewEnvYA .EQ $64 SYS.CreateProcessYA .EQ $66 SYS.GetPSByIDA .EQ $68 * .EQ $6A SYS.Sleep .EQ $6C * .EQ $6E *-------------------------------------- SYS.GetArgC .EQ $70 SYS.GetArgA .EQ $72 SYS.ExpandPStrYA .EQ $74 * .EQ $76 SYS.PutEnvYA .EQ $78 SYS.SetEnv .EQ $7A SYS.GetEnvYA .EQ $7C SYS.UnsetEnvYA .EQ $7E *-------------------------------------- SYS.GetDevByIDA .EQ $80 SYS.GetDevByNameYA .EQ $82 SYS.GetDevInfoA .EQ $84 * .EQ $86 * .EQ $88 * .EQ $8A * .EQ $8C * .EQ $8E *-------------------------------------- SYS.GetMem .EQ $90 SYS.FreeMemA .EQ $92 SYS.GetMemPtrA .EQ $94 SYS.GetMemByIDA .EQ $96 SYS.GetMemByNameYA .EQ $98 SYS.LoadStockObjectYA .EQ $9A SYS.GetStockObjectA .EQ $9C SYS.FreeStockObject .EQ $9E *-------------------------------------- SYS.SetLoMem .EQ $A0 SYS.GetMemStatYA .EQ $A2 *-------------------------------------- * TO DO : *-------------------------------------- SYS.MKNOD .EQ $FF SYS.MKFIFO .EQ $FF *-------------------------------------- * ProDOS ERROR CODES : $00->$5F * Lib ERROR CODES : $80->$BF * Kernel ERROR CODES : $C0->$FF *-------------------------------------- MEMMGR.ERROOM .EQ $FF Out Of Memory Error MEMMGR.ERROOH .EQ $FE Out Of Handle Error *-------------------------------------- DEVMGR.ERROOM .EQ $EF Out Of Memory Error DEVMGR.ERROOH .EQ $EE Out Of Handle Error DEVMGR.ERRICL .EQ $ED Invalid Command Line DEVMGR.ERRNOHW .EQ $EC No Hardware DEVMGR.ERRDNF .EQ $EB Device Not Found Error DEVMGR.ERRUNSUP .EQ $EA Unsupported Function *-------------------------------------- TSKMGR.ERROOH .EQ $DF Out Of Handle Error TSKMGR.ERRNSP .EQ $DD No Such Process Error *-------------------------------------- SYSMGR.ERRSYN .EQ $CF Syntax Error SYSMGR.ERRENVF .EQ $CE Env is Full SYSMGR.ERRIBIN .EQ $CD Invalid BIN format SYSMGR.ERRFTB .EQ $CC File Too Big Error SYSMGR.ERRFNF .EQ $CB File Not Found Error *-------------------------------------- * MEM STRUCT *-------------------------------------- S.MEM.F .EQ 0 S.MEM.F.AUX .EQ %10000000 Request Stock Object S.MEM.F.INIT0 .EQ %01000000 Fill with "0" S.MEM.F.CODE .EQ %00100000 S.MEM.F.NOMOVE .EQ %00010000 S.MEM.F.ALIGN .EQ %00001000 S.MEM.F.INUSE .EQ %10000000 (Internal Flag) S.MEM.REFCNT .EQ 1 S.MEM.OWNERPID .EQ 2 S.MEM.BIN .EQ 3 S.MEM.PTR .EQ 4 S.MEM.LEN .EQ 6 * S.MEM .EQ 8 *-------------------------------------- * DEV STRUCT *-------------------------------------- S.DEV.CODE .EQ 0 cld,jmp... S.DEV.JMP .EQ 2 ...(code,x) S.DEV.ID .EQ 4 S.DEV.F .EQ 5 S.DEV.F.INUSE .EQ %10000000 S.DEV.F.BUSY .EQ %01000000 S.DEV.F.SHARE .EQ %00100000 Device is shareable S.DEV.F.IRQ .EQ %00010000 Device is irq driven S.DEV.F.EVENT .EQ %00001000 Device is event driven S.DEV.F.COUT .EQ %00000100 Device supports Char OUT S.DEV.F.BLOCK .EQ %00000010 S.DEV.F.CHAR .EQ %00000001 S.DEV.NAME .EQ 6 5 Bytes : LEN+NUL KBD CON COMx LPTx ETHx * S.DEV .EQ 16 *-------------------------------------- S.DEVINFO.TYPE .EQ 0 S.DEVINFO.TYPE.CHAR .EQ %00000001 S.DEVINFO.TYPE.XY .EQ %00000010 S.DEVINFO.TYPE.NET .EQ %00000011 S.DEVINFO.TYPE.GFX .EQ %00000100 S.DEVINFO.FLAGS .EQ 1 S.DEVINFO.NET.FLAGS.ARPOFFLOAD .EQ %00000001 S.DEVINFO.NET.FLAGS.IPOFFLOAD .EQ %00000010 S.DEVINFO.NET.MAC .EQ 2 S.DEVINFO.NET.STATUS .EQ 8 S.DEVINFO.NET.STATUS.OK .EQ $80 S.DEVINFO.NET.STATUS.FD .EQ $40 S.DEVINFO.NET.STATUS.10 .EQ $01 S.DEVINFO.NET.STATUS.100 .EQ $02 S.DEVINFO.NET.STATUS.1000 .EQ $03 *-------------------------------------- * Generic Driver Functions *-------------------------------------- DEVMGR.OPEN .EQ 0 DEVMGR.GETEVENT .EQ 2 DEVMGR.COUT .EQ 4 DEVMGR.CLOSE .EQ 6 DEVMGR.GETINFO .EQ 8 DEVMGR.IRQ .EQ 10 *-------------------------------------- DEVMGR.SELECT .EQ 12 *-------------------------------------- * 'NET' Class Driver Functions *-------------------------------------- DEVMGR.NET.SEND .EQ 12 DEVMGR.SETIPCFG .EQ 14 *-------------------------------------- * 'GFX' Class Driver Functions *-------------------------------------- DEVMGR.GFX.SETPIXEL .EQ 14 DEVMGR.GFX.GETPIXEL .EQ 16 DEVMGR.GFX.HLINE .EQ 18 DEVMGR.GFX.VLINE .EQ 20 DEVMGR.GFX.BITBLT .EQ 22 *-------------------------------------- * PS STRUCT *-------------------------------------- S.PS.F .EQ 0 S.PS.F.INUSE .EQ %10000000 S.PS.F.INIT .EQ %01000000 S.PS.F.HOLD .EQ %00100000 S.PS.F.SLEEP .EQ %00010000 S.PS.F.EVENT .EQ %00001000 S.PS.F.ENV .EQ %00000100 S.PS.ID .EQ 1 S.PS.PID .EQ 2 S.PS.hCS .EQ 3 S.PS.hDS .EQ 4 S.PS.hPREFIX .EQ 5 S.PS.hENV .EQ 6 S.PS.hCMDLINE .EQ 7 S.PS.UID .EQ 8 S.PS.hINDEV .EQ 9 S.PS.hOUTDEV .EQ 10 S.PS.hERRDEV .EQ 11 S.PS.CID .EQ 12 S.PS.LASTERROR .EQ 13 S.PS.PC .EQ 14 * S.PS .EQ 16 *-------------------------------------- * LIB Function Indexes *-------------------------------------- LIBMGR.LOAD .EQ 0 LIBMGR.UNLOAD .EQ 2 *-------------------------------------- * Task Function Indexes *-------------------------------------- TSKMGR.INIT .EQ 0 TSKMGR.RUN .EQ 2 TSKMGR.DOEVENT .EQ 4 TSKMGR.QUIT .EQ 6 *-------------------------------------- * EVENT STRUCT *-------------------------------------- S.EVT.F .EQ 0 S.EVT.F.T10TH .EQ %10000000 S.EVT.F.T1SEC .EQ %01000000 S.EVT.F.hMEM2 .EQ %00100000 Indicates That S.EVT.DATAHI is a hMem S.EVT.F.hMEM1 .EQ %00010000 Indicates That S.EVT.DATALO is a hMem S.EVT.F.NET .EQ %00000100 S.EVT.F.MOUSE .EQ %00000010 S.EVT.F.KEY .EQ %00000001 S.EVT.hDEV .EQ 1 S.EVT.DATA .EQ 2 S.EVT.DATALO .EQ 2 S.EVT.DATAHI .EQ 3 S.EVT.DATAW1 .EQ 4 S.EVT.DATAW2 .EQ 6 * S.EVT .EQ 8 *-------------------------------------- S.TIME.CENTURY .EQ 0 19,20,21.... S.TIME.YEAR .EQ 1 0.99 S.TIME.MONTH .EQ 2 1..12 S.TIME.DAY .EQ 3 1..31 S.TIME.HOUR .EQ 4 0..23 S.TIME.MINUTE .EQ 5 0..59 S.TIME.SECOND .EQ 6 0..61 S.TIME.WDAY .EQ 7 1..7 * S.TIME .EQ 8 *-------------------------------------- * S.STAT *-------------------------------------- S.STAT.MODE .EQ 0 S.STAT.MODE.XO .EQ $0001 S.STAT.MODE.WO .EQ $0002 S.STAT.MODE.RO .EQ $0004 S.STAT.MODE.XG .EQ $0008 S.STAT.MODE.WG .EQ $0010 S.STAT.MODE.RG .EQ $0020 S.STAT.MODE.XU .EQ $0040 S.STAT.MODE.WU .EQ $0080 S.STAT.MODE.RU .EQ $0100 *S.STAT.MODE.SST .EQ $0200 *S.STAT.MODE.SGID .EQ $0400 *S.STAT.MODE.SUID .EQ $0800 S.STAT.MODE.REG .EQ $0000 S.STAT.MODE.FIFO .EQ $1000 S.STAT.MODE.CHR .EQ $2000 S.STAT.MODE.BLK .EQ $2000 S.STAT.MODE.DIR .EQ $4000 S.STAT.MODE.LNK .EQ $5000 S.STAT.MODE.SOCK .EQ $6000 S.STAT.DEV .EQ 2 WORD S.STAT.UID .EQ 4 WORD S.STAT.GID .EQ 6 WORD S.STAT.INO .EQ 8 QWORD S.STAT.NLINK .EQ 16 WORD S.STAT.SIZE .EQ 18 DWORD S.STAT.ATIME .EQ 22 S.TIME S.STAT.MTIME .EQ 30 S.TIME S.STAT.CTIME .EQ 38 S.TIME S.STAT.BLOCKS .EQ 46 DWORD S.STAT.BLKSIZE .EQ 50 WORD S.STAT.PRODOS.TYPE .EQ 52 BYTE S.STAT.PRODOS.AUXTYPE .EQ 53 WORD S.STAT.PRODOS.SLOT .EQ 55 BYTE S.STAT.PRODOS.DRIVE .EQ 56 BYTE S.STAT.PRODOS.DEVSTATUS .EQ 57 BYTE S.STAT.PRODOS.DEVCNFLCT .EQ 58 BYTE S.STAT.PRODOS.DEVBLOCKS .EQ 59 BYTE * S.STAT .EQ 64 *-------------------------------------- * S.FILE for FOPEN,FREAD...... *-------------------------------------- S.FILE.HANDLER .EQ 0 0=KRNL,!0=hDEV,hLIB (LIBNFS,LIBTCPIP.....) S.FILE.TYPE .EQ 1 S.FILE.TYPE.REG .EQ 1 S.FILE.TYPE.DIR .EQ 2 S.FILE.TYPE.BLK .EQ 3 S.FILE.TYPE.CHR .EQ 4 S.FILE.TYPE.LNK .EQ 5 S.FILE.TYPE.SOCK .EQ 6 S.FILE.TYPE.FIFO .EQ 7 S.FILE.PRODOS.REF .EQ 2 S.FILE.PRODOS.IOBUF .EQ 3 * S.FILE.PRODOS .EQ 4 * * no S.FILE,Variable size *-------------------------------------- * S.DIR for OpenDir,ReadDir,CloseDir *-------------------------------------- S.DIR.HANDLER .EQ 0 S.DIR.F .EQ 1 S.DIR.F.NOMORE .EQ $80 S.DIR.PRODOS.REF .EQ 2 S.DIR.PRODOS.IOBUF .EQ 3 S.DIR.PRODOS.EL .EQ 4 S.DIR.PRODOS.EPB .EQ 5 S.DIR.PRODOS.FC .EQ 6 * S.DIR.PRODOS .EQ 8 * no S.DIR *-------------------------------------- * S.DIRENT for ReadDir *-------------------------------------- S.DIRENT.NAME .EQ 0 * Variable size S.DIRENT.STAT .EQ S.STAT *-------------------------------------- S.PFT.PATH .EQ 0 S.PFT.HANDLER .EQ 23 S.PFT.DATA .EQ 24 8 bytes OPAQUE data for handler * S.PFT .EQ 32 *-------------------------------------- S.MEMSTAT.ML .EQ 0 S.MEMSTAT.MF .EQ 2 S.MEMSTAT.MH .EQ 4 * S.MEMSTAT.XL .EQ 8 S.MEMSTAT.XF .EQ 10 S.MEMSTAT.XH .EQ 12 * S.MEMSTAT.DL .EQ 16 S.MEMSTAT.DF .EQ 18 S.MEMSTAT.DH .EQ 20 * S.MEMSTAT .EQ 24 *-------------------------------------- MAN SAVE /A2OSX.DEV/INC/A2OSX.I