Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-07 01:29:33 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.9.2

Browse Source
This commit is contained in:
Rémy GIBERT 2018-07-23 17:28:42 +02:00
parent 1b089829c4
commit 082f899a56
71 changed files with 461 additions and 449 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

BIN
.Floppies/A2OSX.SRC.po
View File

Binary file not shown.

14
A2osX.S.txt
View File

@ -6,14 +6,14 @@ AUTO 8
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/A2OSX.SYSTEM,TSYS .TF A2OSX.SYSTEM,TSYS
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/MONITOR.I .INB INC/MONITOR.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
TmpPtr1 .EQ $0 main & aux ZP TmpPtr1 .EQ $0 main & aux ZP
TmpPtr2 .EQ $2 main & aux ZP TmpPtr2 .EQ $2 main & aux ZP

9
BIN/ARP.S.txt
View File

@ -4,11 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/ARP .TF BIN/ARP
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/ETH.I
.INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 40 40*100ms = 4 sec. TIMEOUT.MAX .EQ 40 40*100ms = 4 sec.
*-------------------------------------- *--------------------------------------

18
BIN/ASM.S.txt
View File

@ -6,8 +6,8 @@ AUTO 4,1
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/DEV/ASM .TF /A2OSX.BUILD/BIN/DEV/ASM
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*--------------------------------------- *---------------------------------------
ZPPtr1 .EQ ZPBIN ZPPtr1 .EQ ZPBIN
ZPPtr2 .EQ ZPBIN+2 ZPPtr2 .EQ ZPBIN+2
@ -364,13 +364,13 @@ CS.QUIT jsr FIO.FileClose
.8 clc .8 clc
rts rts
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.DIR .INB BIN/DEV/ASM.S.DIR
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.EXP .INB BIN/DEV/ASM.S.EXP
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.FIO .INB BIN/DEV/ASM.S.FIO
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.MAC .INB BIN/DEV/ASM.S.MAC
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.OUT .INB BIN/DEV/ASM.S.OUT
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.SRC .INB BIN/DEV/ASM.S.SRC
.INB /A2OSX.BUILD/BIN/DEV/ASM.S.SYM .INB BIN/DEV/ASM.S.SYM
*--------------------------------------- *---------------------------------------
CS.END CS.END
T.DIRECTIVES >PSTR "AC" T.DIRECTIVES >PSTR "AC"

6
BIN/ASM.T.6502.S.txt
View File

@ -3,14 +3,14 @@ PREFIX /A2OSX.BUILD
AUTO 4,1 AUTO 4,1
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BUILD/BIN/DEV/ASM.T.6502 .TF BIN/DEV/ASM.T.6502
*--------------------------------------- *---------------------------------------
.DA T.ADDR.MODES .DA T.ADDR.MODES
.DA T.REGISTERS .DA T.REGISTERS
.DA T.OPCODES .DA T.OPCODES
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.6502.O .INB BIN/DEV/ASM.T.6502.O
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.6502.A .INB BIN/DEV/ASM.T.6502.A
*--------------------------------------- *---------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.6502.S SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.6502.S

6
BIN/ASM.T.65816.S.txt
View File

@ -3,14 +3,14 @@ PREFIX /A2OSX.BUILD
AUTO 4,1 AUTO 4,1
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BUILD/BIN/DEV/ASM.T.65816 .TF BIN/DEV/ASM.T.65816
*--------------------------------------- *---------------------------------------
.DA T.ADDR.MODES .DA T.ADDR.MODES
.DA T.REGISTERS .DA T.REGISTERS
.DA T.OPCODES .DA T.OPCODES
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.65816.O .INB BIN/DEV/ASM.T.65816.O
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.65816.A .INB BIN/DEV/ASM.T.65816.A
*--------------------------------------- *---------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.65816.S SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.65816.S

6
BIN/ASM.T.65C02.S.txt
View File

@ -3,14 +3,14 @@ PREFIX /A2OSX.BUILD
AUTO 4,1 AUTO 4,1
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BUILD/BIN/DEV/ASM.T.65C02 .TF BIN/DEV/ASM.T.65C02
*--------------------------------------- *---------------------------------------
.DA T.ADDR.MODES .DA T.ADDR.MODES
.DA T.REGISTERS .DA T.REGISTERS
.DA T.OPCODES .DA T.OPCODES
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.65C02.O .INB BIN/DEV/ASM.T.65C02.O
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.65C02.A .INB BIN/DEV/ASM.T.65C02.A
*--------------------------------------- *---------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.65C02.S SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.65C02.S

6
BIN/ASM.T.65R02.S.txt
View File

@ -3,14 +3,14 @@ PREFIX /A2OSX.BUILD
AUTO 4,1 AUTO 4,1
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BUILD/BIN/DEV/ASM.T.65R02 .TF BIN/DEV/ASM.T.65R02
*--------------------------------------- *---------------------------------------
.DA T.ADDR.MODES .DA T.ADDR.MODES
.DA T.REGISTERS .DA T.REGISTERS
.DA T.OPCODES .DA T.OPCODES
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.65R02.O .INB BIN/DEV/ASM.T.65R02.O
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.65R02.A .INB BIN/DEV/ASM.T.65R02.A
*--------------------------------------- *---------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.65R02.S SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.65R02.S

6
BIN/ASM.T.SW16.S.txt
View File

@ -3,14 +3,14 @@ PREFIX /A2OSX.BUILD
AUTO 4,1 AUTO 4,1
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BUILD/BIN/DEV/ASM.T.SW16 .TF BIN/DEV/ASM.T.SW16
*--------------------------------------- *---------------------------------------
.DA T.ADDR.MODES .DA T.ADDR.MODES
.DA T.REGISTERS .DA T.REGISTERS
.DA T.OPCODES .DA T.OPCODES
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.SW16.O .INB BIN/DEV/ASM.T.SW16.O
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.SW16.A .INB BIN/DEV/ASM.T.SW16.A
*--------------------------------------- *---------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.SW16.S SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.SW16.S

6
BIN/ASM.T.Z80.S.txt
View File

@ -3,14 +3,14 @@ PREFIX /A2OSX.BUILD
AUTO 4,1 AUTO 4,1
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BUILD/BIN/DEV/ASM.T.Z80 .TF BIN/DEV/ASM.T.Z80
*--------------------------------------- *---------------------------------------
.DA T.ADDR.MODES .DA T.ADDR.MODES
.DA T.REGISTERS .DA T.REGISTERS
.DA T.OPCODES .DA T.OPCODES
*--------------------------------------- *---------------------------------------
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.Z80.O .INB BIN/DEV/ASM.T.Z80.O
.INB /A2OSX.BUILD/BIN/DEV/ASM.T.Z80.A .INB BIN/DEV/ASM.T.Z80.A
*--------------------------------------- *---------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.Z80.S SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.Z80.S

12
BIN/ATBROWSE.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/ATK/ATBROWSE .TF BIN/ATK/ATBROWSE
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/APPLETALK.I .INB INC/APPLETALK.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPPTR2 .EQ ZPBIN+2 ZPPTR2 .EQ ZPBIN+2

12
BIN/ATLOGON.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/ATK/ATLOGON .TF BIN/ATK/ATLOGON
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/APPLETALK.I .INB INC/APPLETALK.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPPTR2 .EQ ZPBIN+2 ZPPTR2 .EQ ZPBIN+2

8
BIN/CAT.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/CAT .TF BIN/CAT
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPBufPtr .EQ ZPBIN+2 ZPBufPtr .EQ ZPBIN+2

8
BIN/CHTYP.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/CHTYP .TF BIN/CHTYP
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
X.COPY.TO.DEST .EQ 0 X.COPY.TO.DEST .EQ 0
X.DELETE.SOURCE .EQ 0 X.DELETE.SOURCE .EQ 0

8
BIN/CP.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/CP .TF BIN/CP
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
X.COPY.TO.DEST .EQ 1 X.COPY.TO.DEST .EQ 1
X.DELETE.SOURCE .EQ 0 X.DELETE.SOURCE .EQ 0

8
BIN/DNSINFO.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/DNSINFO .TF BIN/DNSINFO
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPPTR2 .EQ ZPBIN+2 ZPPTR2 .EQ ZPBIN+2

6
BIN/EDIT.S.txt
View File

@ -4,10 +4,10 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/EDIT .TF BIN/EDIT
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPPTR2 .EQ ZPBIN+2 ZPPTR2 .EQ ZPBIN+2

8
BIN/FORMAT.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/FORMAT .TF BIN/FORMAT
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBBLKDEV.I .INB INC/LIBBLKDEV.I
*-------------------------------------- *--------------------------------------
ZPPtr1 .EQ ZPBIN ZPPtr1 .EQ ZPBIN
ZPPtr2 .EQ ZPBIN+2 ZPPtr2 .EQ ZPBIN+2

99
BIN/IPCONFIG.S.txt
View File

@ -4,16 +4,16 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/IPCONFIG .TF BIN/IPCONFIG
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/NIC.I .INB INC/NIC.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/ETH.I
.INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPIPCfgPtr .EQ ZPBIN ZPIPCfgPtr .EQ ZPBIN
ZPDevPtr .EQ ZPBIN+2 ZPDevPtr .EQ ZPBIN+2
ZPDevStatPtr .EQ ZPBIN+4
*-------------------------------------- *--------------------------------------
* File Header (16 Bytes) * File Header (16 Bytes)
*-------------------------------------- *--------------------------------------
@ -72,74 +72,80 @@ CS.RUN >LDYA L.MSG0
ldy #S.IPCFG.HDEV ldy #S.IPCFG.HDEV
lda (ZPIPCfgPtr),y lda (ZPIPCfgPtr),y
bne CS.RUN.DUMPDEV bne .1
>LDYA L.MSG0.NL >LDYA L.MSG0.NL
>SYSCALL printf >SYSCALL printf
jmp CS.RUN.DONE jmp CS.RUN.DONE
CS.RUN.DUMPDEV >STA.G DevID .1 >STA.G DevID
>SYSCALL GetDevByID >SYSCALL GetDevByID
>STYA ZPDevPtr >STYA ZPDevPtr S.FD
>PUSHEA.G DIB
>LDA.G DevID >LDA.G DevID
>SYSCALL GetDevStatus >SYSCALL GetDevStatus
>STYA ZPDevStatPtr
>LDYA L.MSG0.L >LEA.G DCB.NIC
>STYA IOCTL+S.IOCTL.BUFPTR
lda S.IOCTL.STATCODE.GETDCB
sta S.IOCTL.STATCODE
>PUSHEA.G IOCTL
>PUSHBI IOCTL.STATUS
>LDA.G DevID
>SYSCALL IOCTL
CS.RUN.DUMP >LDYA L.MSG0.L
>SYSCALL printf >SYSCALL printf
ldy #S.DIB.NIC.MAC+5 ldy #5
.1 >PUSHB (ZPDevStatPtr),y .1 >PUSHB DCB.NIC+S.DCB.NIC.MAC,y
dey dey
cpy #S.DIB.NIC.MAC-1 bpl .1
bne .1
lda #S.DEV.NAME >PUSHEA.G DIB+S.DIB.IDS
lda #S.FD.DEV.NAME
clc clc
adc ZPDevPtr adc ZPDevPtr
tay tay
lda /S.DEV.NAME lda /S.FD.DEV.NAME
adc ZPDevPtr+1 adc ZPDevPtr+1
>PUSHYA >PUSHYA
lda ZPDevStatPtr
clc
adc #S.DIB.IDS
tay
lda ZPDevStatPtr+1
adc /S.DIB.IDS
>PUSHYA
>PUSHB.G DevID >PUSHB.G DevID
>LDYA L.MSG1.DEV >LDYA L.MSG1.DEV
>SYSCALL printf >SYSCALL printf
ldy #S.DIB.NIC.FLAGS lda DCB.NIC+S.DCB.NIC.FLAGS
lda (ZPDevStatPtr),y and #S.DCB.NIC.FLAGS.ARPOFFLOAD
and #S.DIB.NIC.FLAGS.ARPOFFLOAD
beq .2 beq .2
lda #1 lda #1
.2 >PUSHA .2 >PUSHA
>LDYA L.MSG1.DEV.ARP >LDYA L.MSG1.DEV.ARP
>SYSCALL printf >SYSCALL printf
ldy #S.DIB.NIC.FLAGS lda DCB.NIC+S.DCB.NIC.FLAGS
lda (ZPDevStatPtr),y and #S.DCB.NIC.FLAGS.IPOFFLOAD
and #S.DIB.NIC.FLAGS.IPOFFLOAD
beq .3 beq .3
lda #1 lda #1
.3 >PUSHA .3
>PUSHA
>LDYA L.MSG1.DEV.IP >LDYA L.MSG1.DEV.IP
>SYSCALL printf >SYSCALL printf
ldy #S.DIB.NIC.STATUS lda DCB.NIC+S.DCB.NIC.LINK
lda (ZPDevStatPtr),y and #S.DCB.NIC.LINK.OK
and #S.DIB.NIC.STATUS.OK
bne CS.RUN.LINK bne CS.RUN.LINK
>PUSHW L.MSG1.LINK.KO >PUSHW L.MSG1.LINK.KO
>LDYA L.MSG1.LINK >LDYA L.MSG1.LINK
>SYSCALL printf >SYSCALL printf
@ -152,8 +158,7 @@ CS.RUN.LINK >PUSHW L.MSG1.LINK.OK
>LDYA L.MSG1.LINKSPEED >LDYA L.MSG1.LINKSPEED
>SYSCALL printf >SYSCALL printf
ldy #S.DIB.NIC.STATUS lda DCB.NIC+S.DCB.NIC.SPEED
lda (ZPDevStatPtr),y
and #$0F and #$0F
tax tax
@ -164,12 +169,13 @@ CS.RUN.LINK >PUSHW L.MSG1.LINK.OK
dex dex
bne .4 bne .4
ldy #S.DIB.NIC.STATUS lda DCB.NIC+S.DCB.NIC.LINK
lda (ZPDevStatPtr),y and #S.DCB.NIC.LINK.FD
and #S.DIB.NIC.STATUS.FD
bne .5 bne .5
>LDYA L.MSG1.DPLX.HD >LDYA L.MSG1.DPLX.HD
bra .6 bra .6
.5 >LDYA L.MSG1.DPLX.FD .5 >LDYA L.MSG1.DPLX.FD
.6 >SYSCALL printf .6 >SYSCALL printf
@ -178,8 +184,10 @@ CS.RUN.DUMPIP >LDYA L.MSG2
lda (ZPIPCfgPtr) lda (ZPIPCfgPtr)
and #S.IPCFG.STATUS.OK and #S.IPCFG.STATUS.OK
beq .11 beq .11
>LDYA L.MSG2.C >LDYA L.MSG2.C
bra .10 bra .10
.11 >LDYA L.MSG2.U .11 >LDYA L.MSG2.U
.10 >SYSCALL printf .10 >SYSCALL printf
@ -260,7 +268,11 @@ MSG0 .AZ "TCP/IP Status : "
MSG0.L .AZ "Loaded\r\n" MSG0.L .AZ "Loaded\r\n"
MSG0.NL .AZ "Not Loaded\r\n" MSG0.NL .AZ "Not Loaded\r\n"
*-------------------------------------- *--------------------------------------
MSG1.DEV .AZ "\r\nDevice Configuration :\r\n DevID : $%h\r\n Device Type : %S\r\n Device Name : %s\r\n HW Address : %02h:%02h:%02h:%02h:%02h:%02h\r\n" MSG1.DEV .AS "\r\nDevice Configuration :\r\n"
.AS " DevID : $%h\r\n"
.AS " Device Name : %s\r\n"
.AS " Device Type : %S\r\n"
.AZ " HW Address : %02h:%02h:%02h:%02h:%02h:%02h\r\n"
MSG1.DEV.ARP .AZ " ARP Offload : %d\r\n" MSG1.DEV.ARP .AZ " ARP Offload : %d\r\n"
MSG1.DEV.IP .AZ " IP Offload : %d\r\n" MSG1.DEV.IP .AZ " IP Offload : %d\r\n"
MSG1.LINK .AZ " Link Status : %s\r\n" MSG1.LINK .AZ " Link Status : %s\r\n"
@ -277,13 +289,16 @@ MSG2.DHCPSRVR .AZ " DHCP Server : %d.%d.%d.%d\r\n"
MSG2.IP .AZ " IP/Mask : %d.%d.%d.%d/%d.%d.%d.%d\r\n" MSG2.IP .AZ " IP/Mask : %d.%d.%d.%d/%d.%d.%d.%d\r\n"
MSG2.GW .AZ " Gateway : %d.%d.%d.%d\r\n" MSG2.GW .AZ " Gateway : %d.%d.%d.%d\r\n"
MSG2.DNS .AZ " DNS : %d.%d.%d.%d,%d.%d.%d.%d\r\n" MSG2.DNS .AZ " DNS : %d.%d.%d.%d,%d.%d.%d.%d\r\n"
MSG2.HOSTNAME .AZ " Hostname : %S.%S\r\n" MSG2.HOSTNAME .AZ " Hostname : %s.%s\r\n"
hLIBTCPIP .BS 1 hLIBTCPIP .BS 1
*-------------------------------------- *--------------------------------------
.DUMMY .DUMMY
.OR 0 .OR 0
DS.START DS.START
DevID .BS 1 DevID .BS 1
IOCTL .BS S.IOCTL
DIB .BS S.DIB
DCB.NIC .BS S.DCB.NIC
DS.END .ED DS.END .ED
*-------------------------------------- *--------------------------------------
MAN MAN

8
BIN/LSDEV.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/LSDEV .TF BIN/LSDEV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPPTR2 .EQ ZPBIN+2 ZPPTR2 .EQ ZPBIN+2

6
BIN/MD.S.txt
View File

@ -4,10 +4,10 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/MD .TF BIN/MD
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*-------------------------------------- *--------------------------------------
* File Header (16 Bytes) * File Header (16 Bytes)
*-------------------------------------- *--------------------------------------

10
BIN/MD5.S.txt
View File

@ -4,12 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/MD5 .TF BIN/MD5
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/LIBCRYPT.I .INB INC/LIBCRYPT.I
*-------------------------------------- *--------------------------------------
FILEBUF.SIZE .EQ 4096 FILEBUF.SIZE .EQ 4096
*-------------------------------------- *--------------------------------------

6
BIN/MEM.S.txt
View File

@ -4,10 +4,10 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/MEM .TF BIN/MEM
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*-------------------------------------- *--------------------------------------
PAGELEN .EQ 22 PAGELEN .EQ 22
FOOTERLEN .EQ 8 FOOTERLEN .EQ 8

6
BIN/MEMDUMP.S.txt
View File

@ -4,10 +4,10 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/DEV/MEMDUMP .TF BIN/DEV/MEMDUMP
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*-------------------------------------- *--------------------------------------
PAGELEN .EQ 22 PAGELEN .EQ 22
FOOTERLEN .EQ 8 FOOTERLEN .EQ 8

8
BIN/MV.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/MV .TF BIN/MV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
X.COPY.TO.DEST .EQ 1 X.COPY.TO.DEST .EQ 1
X.DELETE.SOURCE .EQ 1 X.DELETE.SOURCE .EQ 1

9
BIN/NETSTAT.S.txt
View File

@ -4,11 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/NETSTAT .TF BIN/NETSTAT
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/ETH.I
.INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
*-------------------------------------- *--------------------------------------

8
BIN/NFSMOUNT.S.txt
View File

@ -6,11 +6,11 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/NFSMOUNT .TF BIN/NFSMOUNT
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 40 40*100ms = 4 sec. TIMEOUT.MAX .EQ 40 40*100ms = 4 sec.
*-------------------------------------- *--------------------------------------

8
BIN/NSCUTIL.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/NSCUTIL .TF BIN/NSCUTIL
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
ZPPtr1 .EQ ZPBIN ZPPtr1 .EQ ZPBIN
*-------------------------------------- *--------------------------------------

13
BIN/PING.S.txt
View File

@ -4,11 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/PING .TF BIN/PING
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/ETH.I
.INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 20 2 sec. TIMEOUT.MAX .EQ 20 2 sec.
*-------------------------------------- *--------------------------------------
@ -191,7 +192,7 @@ CS.RUN.WAIT.REPLY
.1 ldy #hSocket .1 ldy #hSocket
lda (pData),y lda (pData),y
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.ReadA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.ReadFrame
bcs .2 bcs .2
ldy #hFrame ldy #hFrame
@ -300,7 +301,7 @@ CS.QUIT ldy #hFrame
.1 ldy #hSocket .1 ldy #hSocket
lda (pData),y lda (pData),y
>DEBUG >DEBUG
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.Close
lda hLIBTCPIP lda hLIBTCPIP
>SYSCALL UnloadLib >SYSCALL UnloadLib

8
BIN/PS.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/PS .TF BIN/PS
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/KERNEL.I .INB INC/KERNEL.I
*-------------------------------------- *--------------------------------------
ZPPtr .EQ ZPBIN ZPPtr .EQ ZPBIN
*-------------------------------------- *--------------------------------------

8
BIN/RM.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/RM .TF BIN/RM
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
X.COPY.TO.DEST .EQ 0 X.COPY.TO.DEST .EQ 0
X.DELETE.SOURCE .EQ 1 X.DELETE.SOURCE .EQ 1

13
BIN/RPCDUMP.S.txt
View File

@ -4,11 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/BIN/DEV/RPCDUMP .TF BIN/DEV/RPCDUMP
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/ETH.I
.INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 40 40*100ms = 4 sec. TIMEOUT.MAX .EQ 40 40*100ms = 4 sec.
*-------------------------------------- *--------------------------------------
@ -130,7 +131,7 @@ CS.RUN jsr Init.Timeout
.5 ldy #hSocket .5 ldy #hSocket
lda (pData),y lda (pData),y
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.ReadA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.ReadFrame
bcc .6 bcc .6
>SLEEP >SLEEP
@ -176,7 +177,7 @@ CS.QUIT ldy #hSocket
lda (pData),y lda (pData),y
beq .1 beq .1
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.Close
.1 lda hLIBTCPIP .1 lda hLIBTCPIP
beq .8 beq .8

12
BMP2PIX.S.txt
View File

@ -4,12 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/ROOT/BMP2PIX .TF ROOT/BMP2PIX
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/GUI.I .INB INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPInputBufPtr .EQ ZPBIN+2 ZPInputBufPtr .EQ ZPBIN+2
@ -323,7 +323,7 @@ CS.QUIT >LDA.G hBuf
*-------------------------------------- *--------------------------------------
CS.END CS.END
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/ROOT/X.TWIST.G .INB ROOT/X.TWIST.G
*-------------------------------------- *--------------------------------------
OptionList >PSTR "Vv" OptionList >PSTR "Vv"
OptionVars .DA #bVerbose,#bVerbose OptionVars .DA #bVerbose,#bVerbose

18
DRV/DHGR.DRV.S.txt
View File

@ -4,16 +4,16 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/DRV/DHGR.DRV .TF DRV/DHGR.DRV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/GFX.I .INB INC/GFX.I
.INB /A2OSX.BUILD/INC/GFX.EVE.I .INB INC/GFX.EVE.I
.INB /A2OSX.BUILD/INC/GUI.I .INB INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPCmdPtr .EQ ZPDRV ZPCmdPtr .EQ ZPDRV
ZPBasePtr .EQ ZPDRV+2 ZPBasePtr .EQ ZPDRV+2

14
DRV/LANCEGS.DRV.S.txt
View File

@ -4,14 +4,14 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/DRV/LANCEGS.DRV .TF DRV/LANCEGS.DRV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NIC.I .INB INC/NIC.I
.INB /A2OSX.BUILD/INC/NIC.91C96.I .INB INC/NIC.91C96.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
Size .EQ ZPDRV+2 Size .EQ ZPDRV+2

12
DRV/MOUSE.DRV.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/DRV/MOUSE.DRV .TF DRV/MOUSE.DRV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/XY.MOUSE.I .INB INC/XY.MOUSE.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPTmpPtr1 .EQ ZPDRV ZPTmpPtr1 .EQ ZPDRV
*-------------------------------------- *--------------------------------------

8
DRV/PIC.DRV.S.txt
View File

@ -6,11 +6,11 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/DRV/PIC.DRV .TF DRV/PIC.DRV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
ZPTmpPtr1 .EQ ZPDRV ZPTmpPtr1 .EQ ZPDRV
*-------------------------------------- *--------------------------------------

8
DRV/SSC.DRV.S.txt
View File

@ -5,10 +5,10 @@ AUTO 4,1
*-------------------------------------- *--------------------------------------
SSCIRQ .EQ 0 SSCIRQ .EQ 0
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/COM.6551.I .INB INC/COM.6551.I
.INB /A2OSX.SRC/DRV/X.SSC.DRV.S .INB /A2OSX.SRC/DRV/X.SSC.DRV.S
*-------------------------------------- *--------------------------------------
MAN MAN

8
DRV/SSC.I.DRV.S.txt
View File

@ -5,10 +5,10 @@ AUTO 4,1
*-------------------------------------- *--------------------------------------
SSCIRQ .EQ 1 SSCIRQ .EQ 1
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/COM.6551.I .INB INC/COM.6551.I
.INB /A2OSX.SRC/DRV/X.SSC.DRV.S .INB /A2OSX.SRC/DRV/X.SSC.DRV.S
*-------------------------------------- *--------------------------------------
MAN MAN

14
DRV/UTHER2.AI.DRV.S.txt
View File

@ -4,14 +4,14 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/DRV/UTHER2.AI.DRV .TF DRV/UTHER2.AI.DRV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NIC.I .INB INC/NIC.I
.INB /A2OSX.BUILD/INC/NIC.W5100.I .INB INC/NIC.W5100.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
RXTX.Size .EQ ZPDRV+2 RXTX.Size .EQ ZPDRV+2

14
DRV/UTHERNET2.DRV.S.txt
View File

@ -4,14 +4,14 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/DRV/UTHERNET2.DRV .TF DRV/UTHERNET2.DRV
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/NIC.I .INB INC/NIC.I
.INB /A2OSX.BUILD/INC/NIC.W5100.I .INB INC/NIC.W5100.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
ZPTmpPTR .EQ ZPDRV ZPTmpPTR .EQ ZPDRV
RXTX.Size .EQ ZPDRV+2 RXTX.Size .EQ ZPDRV+2

4
DRV/X.SSC.DRV.S.txt
View File

@ -5,9 +5,9 @@ AUTO 4,1
.OR $2000 .OR $2000
*-------------------------------------- *--------------------------------------
.DO SSCIRQ=1 .DO SSCIRQ=1
.TF /A2OSX.BUILD/DRV/SSC.I.DRV .TF DRV/SSC.I.DRV
.ELSE .ELSE
.TF /A2OSX.BUILD/DRV/SSC.DRV .TF DRV/SSC.DRV
.FIN .FIN
*-------------------------------------- *--------------------------------------
.DO SSCIRQ=1 .DO SSCIRQ=1

14
FNT2FON.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/ROOT/FNT2FON .TF ROOT/FNT2FON
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/GUI.I .INB INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB INC/LIBGUI.I
.INB /A2OSX.BUILD/ROOT/X.FNT.I .INB ROOT/X.FNT.I
*-------------------------------------- *--------------------------------------
ZPPTR1 .EQ ZPBIN ZPPTR1 .EQ ZPBIN
ZPInputBufPtr .EQ ZPBIN+2 ZPInputBufPtr .EQ ZPBIN+2
@ -808,7 +808,7 @@ CS.QUIT >LDA.G hOutPutBuf
*-------------------------------------- *--------------------------------------
CS.END CS.END
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/ROOT/X.TWIST.G .INB ROOT/X.TWIST.G
*-------------------------------------- *--------------------------------------
OptionList >PSTR "NnVv" OptionList >PSTR "NnVv"
OptionVars .DA #bNoShrink,#bNoShrink,#bVerbose,#bVerbose OptionVars .DA #bNoShrink,#bNoShrink,#bVerbose,#bVerbose

22
INC/LIBTCPIP.I.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
*-------------------------------------- *--------------------------------------
@ -26,7 +24,7 @@ LIBTCPIP.SET.IPCFG .EQ 4
LIBTCPIP.GET.IPCFG .EQ 6 LIBTCPIP.GET.IPCFG .EQ 6
LIBTCPIP.POLL .EQ 8 LIBTCPIP.POLL .EQ 8
LIBTCPIP.PULSEA .EQ 10 LIBTCPIP.PULSE .EQ 10
LIBTCPIP.ARP.Clear .EQ 12 LIBTCPIP.ARP.Clear .EQ 12
LIBTCPIP.ARP.Query .EQ 14 LIBTCPIP.ARP.Query .EQ 14
@ -42,20 +40,16 @@ LIBTCPIP.HST.GetByName .EQ 28
LIBTCPIP.HST.GetByAddr .EQ 30 LIBTCPIP.HST.GetByAddr .EQ 30
LIBTCPIP.SKT.New .EQ 32 LIBTCPIP.SKT.New .EQ 32
LIBTCPIP.SKT.CloseA .EQ 34 LIBTCPIP.SKT.Close .EQ 34
LIBTCPIP.SKT.GetTable .EQ 36 LIBTCPIP.SKT.GetTable .EQ 36
LIBTCPIP.SKT.GetA .EQ 38 LIBTCPIP.SKT.Get .EQ 38
LIBTCPIP.SKT.AcceptA .EQ 40 LIBTCPIP.SKT.Accept .EQ 40
LIBTCPIP.SKT.MkNodA .EQ 42 LIBTCPIP.SKT.MkNod .EQ 42
LIBTCPIP.SKT.Write .EQ 44 LIBTCPIP.SKT.Write .EQ 44
LIBTCPIP.SKT.Read .EQ 46 LIBTCPIP.SKT.Read .EQ 46
LIBTCPIP.SKT.ReadA .EQ 48 LIBTCPIP.SKT.ReadFrame .EQ 48
LIBTCPIP.SKT.PutC .EQ 50
LIBTCPIP.SKT.PutS .EQ 52
LIBTCPIP.SKT.GetC.A .EQ 54
LIBTCPIP.SKT.GetS .EQ 56
*-------------------------------------- *--------------------------------------
ERR.SKT.OOS .EQ $BF ERR.SKT.OOS .EQ $BF
ERR.SKT.BUSY .EQ $BE ERR.SKT.BUSY .EQ $BE

8
LIB/LIBCRYPT.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/LIB/LIBCRYPT.O .TF LIB/LIBCRYPT.O
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBCRYPT.I .INB INC/LIBCRYPT.I
*-------------------------------------- *--------------------------------------
ZPCtxPtr .EQ ZPLIB ZPCtxPtr .EQ ZPLIB
ZPDataPtr .EQ ZPLIB+2 ZPDataPtr .EQ ZPLIB+2

12
LIB/LIBGUI.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/LIB/LIBGUI.O .TF LIB/LIBGUI.O
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/GUI.I .INB INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB INC/LIBGUI.I
.INB /A2OSX.BUILD/INC/GFX.I .INB INC/GFX.I
*-------------------------------------- *--------------------------------------
WND.MAX .EQ 64 WND.MAX .EQ 64
*-------------------------------------- *--------------------------------------

8
LIB/LIBPAK.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/LIB/LIBPAK.O .TF LIB/LIBPAK.O
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBPAK.I .INB INC/LIBPAK.I
*-------------------------------------- *--------------------------------------
ZPSrcPtr .EQ ZPLIB ZPSrcPtr .EQ ZPLIB
ZPSrcWPtr .EQ ZPLIB+2 ZPSrcWPtr .EQ ZPLIB+2

11
LIB/LIBTCPIP.S.ARP.txt
View File

@ -166,7 +166,8 @@ ARP.IN.REQ ldy #S.ARP.SPA+3
bpl .2 bpl .2
>LDYA L.ARP.REP >LDYA L.ARP.REP
jsr FRM.Send.YA jsr ARP.Send.YA
bra ARP.IN.EXIT bra ARP.IN.EXIT
ARP.IN.REP lda #K.ARP.TTL ARP.IN.REP lda #K.ARP.TTL
@ -221,7 +222,7 @@ ARP.QUERY.I jsr ARP.FIND.BY.IP
bpl .4 bpl .4
>LDYA L.ARP.REQ >LDYA L.ARP.REQ
jsr FRM.Send.YA jsr ARP.Send.YA
bcs .99 bcs .99
lda #K.ARP.PENDING.TTL lda #K.ARP.PENDING.TTL
@ -235,6 +236,12 @@ ARP.QUERY.I jsr ARP.FIND.BY.IP
sec sec
.99 rts .99 rts
*-------------------------------------- *--------------------------------------
ARP.Send.YA >STYA IOCTL+S.IOCTL.BUFPTR
>LDYAI S.ARP
>STYA IOCTL+S.IOCTL.BYTECNT
jmp FRM.Send.IOCTL
*--------------------------------------
ARP.FIND.BY.IP >LDYA L.ARP.CACHE ARP.FIND.BY.IP >LDYA L.ARP.CACHE
>STYA ZPCachePtr >STYA ZPCachePtr

29
LIB/LIBTCPIP.S.CFG.txt
View File

@ -5,7 +5,16 @@ AUTO 4,1
*-------------------------------------- *--------------------------------------
* PULLW = PTR to S.IPCFG * PULLW = PTR to S.IPCFG
*-------------------------------------- *--------------------------------------
SET.IPCFG >PULLW ZPTmpPtr1 SET.IPCFG >PULLW ZPTmpPtr1 IPCFG
>LDYA L.DCB.NIC
>STYA IOCTL+S.IOCTL.BUFPTR
lda S.IOCTL.STATCODE.GETDCB
sta S.IOCTL.STATCODE
ldx #IOCTL.STATUS
jsr SET.IPCFG.IOCTL
ldy #0 ldy #0
.1 lda (ZPTmpPtr1),y .1 lda (ZPTmpPtr1),y
@ -16,7 +25,8 @@ SET.IPCFG >PULLW ZPTmpPtr1
ldx #5 ldx #5
.2 lda IPCFG+S.IPCFG.MAC,x .2 lda DCB.NIC+S.DCB.NIC.MAC,x
sta IPCFG+S.IPCFG.MAC,x
sta ARP.REQ.SRCMAC,x sta ARP.REQ.SRCMAC,x
sta ARP.REQ.SHA,x sta ARP.REQ.SHA,x
sta ARP.REP.SRCMAC,x sta ARP.REP.SRCMAC,x
@ -33,15 +43,6 @@ SET.IPCFG >PULLW ZPTmpPtr1
dex dex
bpl .3 bpl .3
>LDYA L.DCB.NIC
>STYA IOCTL+S.IOCTL.BUFPTR
lda S.IOCTL.STATCODE.GETDCB
sta S.IOCTL.STATCODE
ldx IOCTL.STATUS
jsr SET.IPCFG.IOCTL
>STYA ZPTmpPtr2
lda DCB.NIC+S.DCB.NIC.FLAGS lda DCB.NIC+S.DCB.NIC.FLAGS
and #S.DCB.NIC.FLAGS.ARPOFFLOAD and #S.DCB.NIC.FLAGS.ARPOFFLOAD
beq .4 beq .4
@ -56,17 +57,17 @@ SET.IPCFG >PULLW ZPTmpPtr1
* lda S.IOCTL.CTRLCODE.SETDCB same as lda S.IOCTL.STATCODE.GETDCB * lda S.IOCTL.CTRLCODE.SETDCB same as lda S.IOCTL.STATCODE.GETDCB
* sta S.IOCTL.CTRLCODE same as sta S.IOCTL.STATCODE * sta S.IOCTL.CTRLCODE same as sta S.IOCTL.STATCODE
lda IPCFG+S.IPCFG.HDEV ldx #IOCTL.CONTROL
jsr SET.IPCFG.IOCTL jsr SET.IPCFG.IOCTL
.4 lda hDNSSocket1 .4 lda hDNSSocket1
beq .41 beq .41
jsr SKT.CLOSEA jsr SKT.Close
stz hDNSSocket1 stz hDNSSocket1
.41 lda hDNSSocket2 .41 lda hDNSSocket2
beq .42 beq .42
jsr SKT.CLOSEA jsr SKT.Close
stz hDNSSocket2 stz hDNSSocket2
.42 lda IPCFG+S.IPCFG.DNS1 .42 lda IPCFG+S.IPCFG.DNS1

4
LIB/LIBTCPIP.S.DNS.txt
View File

@ -360,13 +360,13 @@ DNS.FREE ldy #S.DNSCACHE.hNAME
DNS.POLL lda hDNSSocket1 DNS.POLL lda hDNSSocket1
beq .8 beq .8
jsr SKT.ReadA jsr SKT.ReadFrame
bcs .8 bcs .8
jsr DNS.DecodeMsg jsr DNS.DecodeMsg
lda hDNSSocket2 lda hDNSSocket2
beq .8 beq .8
jsr SKT.ReadA jsr SKT.ReadFrame
bcs .8 bcs .8
jsr DNS.DecodeMsg jsr DNS.DecodeMsg

22
LIB/LIBTCPIP.S.FRM.txt
View File

@ -211,7 +211,7 @@ FRM.SendIP ldx #3 Copy SRC.IP even if IP offload
bcs FRM.Queue bcs FRM.Queue
.6 >LDYA ZPFrameOutPtr .6 >LDYA ZPFrameOutPtr
jsr FRM.Send.YA jsr FRM.Send.Out
bcs FRM.Queue bcs FRM.Queue
@ -240,6 +240,10 @@ FRM.Queue ldy hFrameOut no hFrame, cannot queue for retry
sta FRM.QUEUE.Retry,y sta FRM.QUEUE.Retry,y
lda hFrameOut lda hFrameOut
sta FRM.QUEUE.hMem,y sta FRM.QUEUE.hMem,y
lda ZPFrameOutLen
sta FRM.QUEUE.LenL,x
lda ZPFrameOutLen+1
sta FRM.QUEUE.LenH,x
clc clc
rts rts
@ -253,6 +257,7 @@ FRM.Retry ldx FRM.QUEUE.Tail
lda FRM.QUEUE.hMem,x lda FRM.QUEUE.hMem,x
>SYSCALL GetMemPtr >SYSCALL GetMemPtr
>STYA ZPFrameOutPtr >STYA ZPFrameOutPtr
>STYA IOCTL+S.IOCTL.BUFPTR
ldx FRM.QUEUE.Tail ldx FRM.QUEUE.Tail
lda FRM.QUEUE.State,x lda FRM.QUEUE.State,x
@ -261,8 +266,12 @@ FRM.Retry ldx FRM.QUEUE.Tail
jsr IP.SetDestMAC Err is ARP or higher, retry getting MAC jsr IP.SetDestMAC Err is ARP or higher, retry getting MAC
bcs .2 still error getting dest MAC bcs .2 still error getting dest MAC
.1 >LDYA ZPFrameOutPtr .1 lda FRM.QUEUE.LenL,x
jsr FRM.Send.YA try sending again to DRV sta IOCTL+S.IOCTL.BYTECNT
lda FRM.QUEUE.LenH,x
sta IOCTL+S.IOCTL.BYTECNT+1
jsr FRM.Send.IOCTL try sending again to DRV
bcc .3 bcc .3
.2 ldx FRM.QUEUE.Tail save error... .2 ldx FRM.QUEUE.Tail save error...
@ -284,9 +293,12 @@ FRM.Retry ldx FRM.QUEUE.Tail
.8 rts .8 rts
*-------------------------------------- *--------------------------------------
FRM.Send.YA *****>PUSHYA FRM.Send.Out >LDYA ZPDataOutPtr
>STYA IOCTL+S.IOCTL.BUFPTR
>LDYA ZPDataOutLen
>STYA IOCTL+S.IOCTL.BYTECNT
>PUSHW L.IOCTL FRM.Send.IOCTL >PUSHW L.IOCTL
>PUSHBI IOCTL.WRITE >PUSHBI IOCTL.WRITE
lda IPCFG+S.IPCFG.HDEV lda IPCFG+S.IPCFG.HDEV

28
LIB/LIBTCPIP.S.SKT.txt
View File

@ -120,13 +120,13 @@ SKT.New.Listen sec
sec sec
.99 rts .99 rts
*/-------------------------------------- */--------------------------------------
* # SKT.CloseA * # SKT.Close
* Close socket * Close socket
* **In:** * **In:**
* A = hSocket * A = hSocket
* **Out:** * **Out:**
*\-------------------------------------- *\--------------------------------------
SKT.CloseA jsr SKT.GetA.I get SKT in ZPPtrSKT, S.SOCKET.SOCK in A SKT.Close jsr SKT.Get.I get SKT in ZPPtrSKT, S.SOCKET.SOCK in A
bcs .99 bcs .99
cmp #S.SOCKET.SOCK.STREAM cmp #S.SOCKET.SOCK.STREAM
@ -184,14 +184,14 @@ SKT.CloseA jsr SKT.GetA.I get SKT in ZPPtrSKT, S.SOCKET.SOCK in A
clc clc
rts rts
*/-------------------------------------- */--------------------------------------
* # SKT.GetA * # SKT.Get
* Get Ptr to socket * Get Ptr to socket
* **In:** * **In:**
* A = hSocket * A = hSocket
* **Out:** * **Out:**
* Y,A = pS.SOCKET * Y,A = pS.SOCKET
*\-------------------------------------- *\--------------------------------------
SKT.GetA jsr SKT.GetA.I SKT.Get jsr SKT.Get.I
bcs .9 bcs .9
@ -199,7 +199,7 @@ SKT.GetA jsr SKT.GetA.I
.9 rts .9 rts
SKT.GetA.I and #$7f SKT.Get.I and #$7f
cmp #K.SKTTABLE.SIZE cmp #K.SKTTABLE.SIZE
bcs .9 bcs .9
@ -252,14 +252,14 @@ SKT.GetTable lda hSocketTable
clc clc
rts rts
*/-------------------------------------- */--------------------------------------
* # SKT.AcceptA * # SKT.Accept
* Check for an incoming connection * Check for an incoming connection
* **In:** * **In:**
* A = hListeningSocket * A = hListeningSocket
* **Out:** * **Out:**
* A = hSocket * A = hSocket
*\-------------------------------------- *\--------------------------------------
SKT.AcceptA jsr SKT.GetA.I SKT.Accept jsr SKT.Get.I
bcs .9 bcs .9
ldy #S.SOCKET.SO ldy #S.SOCKET.SO
lda (ZPPtrSKT),y lda (ZPPtrSKT),y
@ -293,14 +293,14 @@ SKT.AcceptA jsr SKT.GetA.I
sec sec
.9 rts .9 rts
*/-------------------------------------- */--------------------------------------
* # SKT.MkNodA * # SKT.MkNod
* Create a new file from TCP socket * Create a new file from TCP socket
* **In:** * **In:**
* A = hSocket * A = hSocket
* **Out:** * **Out:**
* A = hFile * A = hFile
*\-------------------------------------- *\--------------------------------------
SKT.MkNodA sta .1+1 SKT.MkNod sta .1+1
>LDYAI S.FD.SSOCK >LDYAI S.FD.SSOCK
>SYSCALL getmem0 >SYSCALL getmem0
bcs .9 bcs .9
@ -348,7 +348,7 @@ SKT.Write >PULLW ZPDataInLen
>PULLW ZPDataInPtr >PULLW ZPDataInPtr
>PULLA >PULLA
jsr SKT.GetA.I jsr SKT.Get.I
bcs .9 bcs .9
cmp #S.SOCKET.SOCK.DGRAM cmp #S.SOCKET.SOCK.DGRAM
@ -441,13 +441,13 @@ SKT.Write.TCP ldy #S.SOCKET.TCP.STATUS
sec sec
.99 rts .99 rts
*/-------------------------------------- */--------------------------------------
* # SKT.ReadA (DGRAM,RAW) * # SKT.ReadFrame (DGRAM,RAW)
* **In:** * **In:**
* A = hSocket * A = hSocket
* **Out:** * **Out:**
* A = hFrame * A = hFrame
*\-------------------------------------- *\--------------------------------------
SKT.ReadA jsr SKT.GetA.I SKT.ReadFrame jsr SKT.Get.I
bcs .9 bcs .9
ldy #S.SOCKET.HQ.TAIL ldy #S.SOCKET.HQ.TAIL
@ -515,7 +515,7 @@ SKT.PutS >PULLW ZPDataOutPtr
inc ZPDataInPtr+1 inc ZPDataInPtr+1
SKT.PutS.1 >PULLA SKT.PutS.1 >PULLA
jsr SKT.GetA.I jsr SKT.Get.I
bcs .9 bcs .9
cmp #S.SOCKET.SOCK.STREAM cmp #S.SOCKET.SOCK.STREAM
@ -578,7 +578,7 @@ SKT.Read clc
>PULLW ZPDataOutPtr >PULLW ZPDataOutPtr
>PULLA >PULLA
SKT.Read.I jsr SKT.GetA.I SKT.Read.I jsr SKT.Get.I
bcs .99 bcs .99
cmp #S.SOCKET.SOCK.STREAM cmp #S.SOCKET.SOCK.STREAM
bne .90 bad skt bne .90 bad skt

22
LIB/LIBTCPIP.S.txt
View File

@ -56,7 +56,7 @@ CS.START cld
.DA GET.IPCFG .DA GET.IPCFG
.DA POLL .DA POLL
.DA PULSEA .DA PULSE
.DA ARP.CLEAR .DA ARP.CLEAR
.DA ARP.QUERY .DA ARP.QUERY
@ -72,20 +72,16 @@ CS.START cld
.DA HST.GETBYADDR .DA HST.GETBYADDR
.DA SKT.New .DA SKT.New
.DA SKT.CLOSEA .DA SKT.Close
.DA SKT.GETTABLE .DA SKT.GetTable
.DA SKT.GETA .DA SKT.Get
.DA SKT.AcceptA .DA SKT.Accept
.DA SKT.MkNodA .DA SKT.MkNod
.DA SKT.Write .DA SKT.Write
.DA SKT.Read .DA SKT.Read
.DA SKT.ReadA .DA SKT.ReadFrame
.DA SKT.PutC
.DA SKT.PutS
.DA SKT.GetC.A
.DA SKT.GetS
*-------------------------------------- *--------------------------------------
L.IPCFG .DA IPCFG L.IPCFG .DA IPCFG
L.ARP.REQ .DA ARP.REQ L.ARP.REQ .DA ARP.REQ
@ -185,7 +181,7 @@ POLL >PUSHW L.IOCTL
* Expire = every sec * Expire = every sec
* Retry = every 100 msec * Retry = every 100 msec
*-------------------------------------- *--------------------------------------
PULSEA and #S.EVT.F.T1SEC PULSE and #S.EVT.F.T1SEC
beq .1 beq .1
jsr ARP.EXPIRE jsr ARP.EXPIRE
jsr DNS.EXPIRE jsr DNS.EXPIRE
@ -278,6 +274,8 @@ FRM.QUEUE.Head .BS 1
FRM.QUEUE.hMem .BS K.FRMQUEUE.SIZE FRM.QUEUE.hMem .BS K.FRMQUEUE.SIZE
FRM.QUEUE.State .BS K.FRMQUEUE.SIZE FRM.QUEUE.State .BS K.FRMQUEUE.SIZE
FRM.QUEUE.Retry .BS K.FRMQUEUE.SIZE FRM.QUEUE.Retry .BS K.FRMQUEUE.SIZE
FRM.QUEUE.LenL .BS K.FRMQUEUE.SIZE
FRM.QUEUE.LenH .BS K.FRMQUEUE.SIZE
*-------------------------------------- *--------------------------------------
RefCount .DA #0 RefCount .DA #0
hSocketTable .BS 1 hSocketTable .BS 1

14
README.md
View File

@ -245,9 +245,9 @@ OApple+1,OApple+2,OApple+3 to switch between screens : Kernel Log, text, DHGR.
| GETTY | Working | | 0.92 | | GETTY | Working | | 0.92 |
| LOGIN | In Progress | no auth using /etc/passd yet | 0.92 | | LOGIN | In Progress | no auth using /etc/passd yet | 0.92 |
| SHELL | Working | (See Internal Shell commands) | 0.92 | | SHELL | Working | (See Internal Shell commands) | 0.92 |
| KCONFIG | Working | Kernel Configuration Utility | 0.9.1 | | KCONFIG | Working | Kernel Configuration Utility | 0.92 |
| ---- | ------ | ------- | ----- | | ---- | ------ | ------- | ----- |
| TCPIPD | Working | Socket API.ARP,IP,ICMP,UDP & TCP ok | 0.9.1 | | TCPIPD | Working | Socket API.ARP,IP,ICMP,UDP & TCP ok | 0.92 |
| DHCPCLNT| Working | rewritten to use new Socket API | 0.9.1 | | DHCPCLNT| Working | rewritten to use new Socket API | 0.9.1 |
| TELNETD | In Progress | | 0.9 | | TELNETD | In Progress | | 0.9 |
| HTTPD | In Progress | | 0.9 | | HTTPD | In Progress | | 0.9 |
@ -297,7 +297,7 @@ note : '$VAR' does NOT expand Variable
| DHGR.DRV | Working | 560x192 Mono/16 colors Mixed-Mode support | 0.9.1 | | DHGR.DRV | Working | 560x192 Mono/16 colors Mixed-Mode support | 0.9.1 |
| ---- | ------ | ------- | ----- | | ---- | ------ | ------- | ----- |
| LanCeGS.DRV | Working | | 0.9.1 | | LanCeGS.DRV | Working | | 0.9.1 |
| Uthernet.DRV | Working | | 0.9.1 | | Uthernet.DRV | Working | | 0.92 |
| Uthernet2.DRV | Working | | 0.9.1 | | Uthernet2.DRV | Working | | 0.9.1 |
| Uther2.AI.DRV | In Progress | With ARP/IP Offloading | 0.9 | | Uther2.AI.DRV | In Progress | With ARP/IP Offloading | 0.9 |
@ -336,17 +336,17 @@ note : '$VAR' does NOT expand Variable
| | | -R : Recurse subdirectories | | | | | -R : Recurse subdirectories | |
| CHGRP | In Progress | -C : Continue On Error | 0.9 | | CHGRP | In Progress | -C : Continue On Error | 0.9 |
| | | -R : Recurse subdirectories | | | | | -R : Recurse subdirectories | |
| MD5 | In Progress | -D : String Input | 0.9.1 | | MD5 | In Progress | -D : String Input | 0.92 |
| NSCUTIL | Working | Tool for setting time in NSC/DL1216E | 0.9 | | NSCUTIL | Working | Tool for setting time in NSC/DL1216E | 0.9 |
## Network (TCPIP) tools: ## Network (TCPIP) tools:
| Name | Status | Comment | K.Ver | | Name | Status | Comment | K.Ver |
| ---- | ------ | ------- | ----- | | ---- | ------ | ------- | ----- |
| IPCONFIG | Working | renamed from NETINFO | 0.92 |
| NETSTAT | Working | | 0.92 |
| ARP | Working | dump ARP cache, setup a static ARP entry | 0.9.1 | | ARP | Working | dump ARP cache, setup a static ARP entry | 0.9.1 |
| PING | Working | | 0.9.1 |
| DNSINFO | Working | dump DNS cache, setup a static DNS entry | 0.9.1 | | DNSINFO | Working | dump DNS cache, setup a static DNS entry | 0.9.1 |
| IPCONFIG | Working | renamed from NETINFO | 0.9.1 | | PING | Working | | 0.9.1 |
| NETSTAT | Working | | 0.9.1 |
## DEV tools: ## DEV tools:
| Name | Status | Comment | K.Ver | | Name | Status | Comment | K.Ver |

13
SBIN/DHCPCLNT.S.txt
View File

@ -4,12 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/DHCPCLNT .TF SBIN/DHCPCLNT
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/ETH.I
.INB /A2OSX.BUILD/INC/NET.DHCP.I .INB INC/LIBTCPIP.I
.INB INC/NET.DHCP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 200 20 sec. TIMEOUT.MAX .EQ 200 20 sec.
*-------------------------------------- *--------------------------------------
@ -241,7 +242,7 @@ CS.QUIT ldy #hSocket
lda (pData),y lda (pData),y
beq .1 beq .1
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CloseA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.Close
.1 lda hLIBTCPIP .1 lda hLIBTCPIP
>SYSCALL UnloadLib >SYSCALL UnloadLib

8
SBIN/GETTY.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/GETTY .TF SBIN/GETTY
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/NET.TELNET.I .INB INC/NET.TELNET.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 100 1 sec. TIMEOUT.MAX .EQ 100 1 sec.
*-------------------------------------- *--------------------------------------

12
SBIN/GUI.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/GUI/GUI .TF SBIN/GUI/GUI
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/GUI.I .INB INC/GUI.I
.INB /A2OSX.BUILD/INC/LIBGUI.I .INB INC/LIBGUI.I
*-------------------------------------- *--------------------------------------
ZPPtr1 .EQ ZPBIN ZPPtr1 .EQ ZPBIN
*-------------------------------------- *--------------------------------------

8
SBIN/HTTPD.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/HTTPD .TF SBIN/HTTPD
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 30 30 sec. TIMEOUT.MAX .EQ 30 30 sec.
CONN.MAX .EQ 16 CONN.MAX .EQ 16

6
SBIN/KCONFIG.S.txt
View File

@ -6,10 +6,10 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/KCONFIG .TF SBIN/KCONFIG
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
*-------------------------------------- *--------------------------------------
ZPCfgPtr .EQ ZPBIN ZPCfgPtr .EQ ZPBIN
ZPTmp1 .EQ ZPBIN+2 ZPTmp1 .EQ ZPBIN+2

8
SBIN/NFSD.S.txt
View File

@ -6,11 +6,11 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/NFSD .TF SBIN/NFSD
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 30 30 sec. TIMEOUT.MAX .EQ 30 30 sec.
*-------------------------------------- *--------------------------------------

8
SBIN/SHELL.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/SHELL .TF SBIN/SHELL
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
ZPPtr1 .EQ ZPBIN ZPPtr1 .EQ ZPBIN
ZPPtr2 .EQ ZPBIN+2 ZPPtr2 .EQ ZPBIN+2

46
SBIN/TCPIPD.S.CFG.txt
View File

@ -1,8 +1,6 @@
PR#3
PREFIX /A2OSX.BUILD
NEW NEW
INC 1 PREFIX /A2OSX.BUILD
AUTO 6 AUTO 4,1
.LIST OFF .LIST OFF
*-------------------------------------- *--------------------------------------
CFG.Read >PUSHW L.HOSTNAME CFG.Read >PUSHW L.HOSTNAME
@ -12,7 +10,27 @@ CFG.Read >PUSHW L.HOSTNAME
jsr CFG.Read.HOSTNAME jsr CFG.Read.HOSTNAME
jsr CFG.Read.Result jsr CFG.Read.Result
>PUSHW L.TCPIP.CONF lda IPCFG+S.IPCFG.HOSTNAME
bne .4
ldy DefaultHostName
.2 lda DefaultHostName,y
sta IPCFG+S.IPCFG.HOSTNAME,y
dey
bpl .2
.3 lda A2osX.TIMER16
jsr CFG.A2CharAX
sta IPCFG+S.IPCFG.HOSTNAME+7
stx IPCFG+S.IPCFG.HOSTNAME+8
lda A2osX.TIMER16+1
jsr CFG.A2CharAX
sta IPCFG+S.IPCFG.HOSTNAME+9
stx IPCFG+S.IPCFG.HOSTNAME+10
.4 >PUSHW L.TCPIP.CONF
>LDYA L.MSG.CFG >LDYA L.MSG.CFG
>SYSCALL printf >SYSCALL printf
@ -336,6 +354,24 @@ CFG.Dec2Hex sec
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------
CFG.A2CharAX pha
lsr
lsr
lsr
lsr
ora #$30
cmp #'9'+1
bcc .1
adc #6
.1 tax
pla
and #$0F
ora #$30
cmp #'9'+1
bcc .8
adc #6
.8 rts
*--------------------------------------
MAN MAN
SAVE /A2OSX.SRC/SBIN/TCPIPD.S.CFG SAVE /A2OSX.SRC/SBIN/TCPIPD.S.CFG
LOAD /A2OSX.SRC/SBIN/TCPIPD.S LOAD /A2OSX.SRC/SBIN/TCPIPD.S

74
SBIN/TCPIPD.S.txt
View File

@ -4,13 +4,13 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/TCPIPD .TF SBIN/TCPIPD
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/ETH.I .INB INC/ETH.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
ZPIPCfgPtr .EQ ZPBIN ZPIPCfgPtr .EQ ZPBIN
ZPDevStatusPtr .EQ ZPBIN+2 ZPDevStatusPtr .EQ ZPBIN+2
@ -57,27 +57,7 @@ CS.INIT >LDYA L.LIBTCPIP
jsr CFG.Read continue even if error opening CFG file jsr CFG.Read continue even if error opening CFG file
lda IPCFG+S.IPCFG.HOSTNAME >PUSHW L.IPCFG
bne .4
ldy DefaultHostName
.2 lda DefaultHostName,y
sta IPCFG+S.IPCFG.HOSTNAME,y
dey
bpl .2
.3 lda A2osX.TIMER16
jsr A2CharAX
sta IPCFG+S.IPCFG.HOSTNAME+7
stx IPCFG+S.IPCFG.HOSTNAME+8
lda A2osX.TIMER16+1
jsr A2CharAX
sta IPCFG+S.IPCFG.HOSTNAME+9
stx IPCFG+S.IPCFG.HOSTNAME+10
.4 >PUSHW L.IPCFG
>LIBCALL hLIBTCPIP,LIBTCPIP.SET.IPCFG >LIBCALL hLIBTCPIP,LIBTCPIP.SET.IPCFG
lda (pPs) lda (pPs)
@ -97,6 +77,7 @@ CS.INIT.DEV >LDYA L.DEVNAME
>LDYA L.MSG.DEV.KO >LDYA L.MSG.DEV.KO
>SYSCALL printf >SYSCALL printf
lda #MLI.E.NODEV lda #MLI.E.NODEV
sec sec
rts rts
@ -113,25 +94,6 @@ CS.INIT.DEV >LDYA L.DEVNAME
>PUSHBI IOCTL.OPEN >PUSHBI IOCTL.OPEN
>LDA.G hDev >LDA.G hDev
>SYSCALL IOCTL >SYSCALL IOCTL
bcs .9
>LDA.G hDev
sdfsdfsdfsf >SYSCALL GetDevStatus
bcs .9
>STYA ZPDevStatusPtr
ldy #S.DIB+2 MAC
ldx #S.IPCFG.MAC
.2 lda (ZPDevStatusPtr),y
sta IPCFG,x
iny
inx
cpx #S.IPCFG.MAC+6
bne .2
clc
rts rts
.9 sec .9 sec
@ -143,7 +105,7 @@ CS.RUN >LIBCALL hLIBTCPIP,LIBTCPIP.POLL
*-------------------------------------- *--------------------------------------
CS.DOEVENT lda (pEvent) CS.DOEVENT lda (pEvent)
bpl .9 bpl .9
>LIBCALL hLIBTCPIP,LIBTCPIP.PULSEA >LIBCALL hLIBTCPIP,LIBTCPIP.PULSE
.9 sec never discard TIME event .9 sec never discard TIME event
rts rts
@ -160,24 +122,6 @@ CS.QUIT >LDA.G hDev
>SYSCALL UnloadLib >SYSCALL UnloadLib
clc clc
rts rts
*--------------------------------------
A2CharAX pha
lsr
lsr
lsr
lsr
ora #$30
cmp #'9'+1
bcc .1
adc #6
.1 tax
pla
and #$0F
ora #$30
cmp #'9'+1
bcc .8
adc #6
.8 rts
*-------------------------------------- *--------------------------------------
.INB /A2OSX.SRC/SBIN/TCPIPD.S.CFG .INB /A2OSX.SRC/SBIN/TCPIPD.S.CFG
*-------------------------------------- *--------------------------------------

8
SBIN/TELNETD.S.txt
View File

@ -6,11 +6,11 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SBIN/TELNETD .TF SBIN/TELNETD
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 30 30 sec. TIMEOUT.MAX .EQ 30 30 sec.
CONN.MAX .EQ 16 CONN.MAX .EQ 16

2
SYS/KERNEL.S.INIT.txt
View File

@ -805,7 +805,7 @@ DevMgrInit >LDYAI MSG.DEV
.6 jsr DevMgrInit.BLK .6 jsr DevMgrInit.BLK
lda #A2osX.S.BLK lda #A2osX.S.BLK
.7 ldx FD.BDEV+S.FD.DEV.DEVID .7 ldx FD.BDEV+S.FD.DEV.BUSID
sta A2osX.S,x sta A2osX.S,x
.8 dec DevMgrInit.DEVCNT .8 dec DevMgrInit.DEVCNT

10
SYS/KM.APPLETALK.S.txt
View File

@ -6,12 +6,12 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SYS/KM.APPLETALK .TF SYS/KM.APPLETALK
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/MONITOR.I .INB INC/MONITOR.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
*-------------------------------------- *--------------------------------------
TmpPtr1 .EQ $0 TmpPtr1 .EQ $0
*-------------------------------------- *--------------------------------------

10
SYS/KM.NSC.S.txt
View File

@ -6,12 +6,12 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SYS/KM.NSC .TF SYS/KM.NSC
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/MONITOR.I .INB INC/MONITOR.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
*-------------------------------------- *--------------------------------------
TmpPtr1 .EQ $0 TmpPtr1 .EQ $0
TmpPtr2 .EQ $2 TmpPtr2 .EQ $2

12
SYS/KM.RAMWORKS.S.txt
View File

@ -6,13 +6,13 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SYS/KM.RAMWORKS .TF SYS/KM.RAMWORKS
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/MONITOR.I .INB INC/MONITOR.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
*-------------------------------------- *--------------------------------------
TmpPtr1 .EQ $0 TmpPtr1 .EQ $0
TmpPtr2 .EQ $2 TmpPtr2 .EQ $2

14
SYS/KM.VSDRIVE.S.txt
View File

@ -4,14 +4,14 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/SYS/KM.VSDRIVE .TF SYS/KM.VSDRIVE
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/IO.I .INB INC/IO.I
.INB /A2OSX.BUILD/INC/MONITOR.I .INB INC/MONITOR.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/MLI.ERR.I .INB INC/MLI.ERR.I
.INB /A2OSX.BUILD/INC/COM.6551.I .INB INC/COM.6551.I
*-------------------------------------- *--------------------------------------
TmpPtr1 .EQ $0 TmpPtr1 .EQ $0
ADT.CMD.VSD .EQ $C5 "E": Virtual Drive Command Envelope ADT.CMD.VSD .EQ $C5 "E": Virtual Drive Command Envelope

8
TEST.S.txt
View File

@ -4,11 +4,11 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/ROOT/TEST .TF ROOT/TEST
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/LIBPAK.I .INB INC/LIBPAK.I
*-------------------------------------- *--------------------------------------
ZPPakHdrPtr .EQ ZPBIN ZPPakHdrPtr .EQ ZPBIN
ZPPakDataPtr .EQ ZPBIN+2 ZPPakDataPtr .EQ ZPBIN+2