mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-26 13:49:18 +00:00
Kernel version 0.9 : Updated/migrated UtherNet2.drv....if someone could give it a try...
This commit is contained in:
parent
333667e697
commit
245a6e7711
BIN
A2OSX.BOOT.po
BIN
A2OSX.BOOT.po
Binary file not shown.
BIN
A2OSX.SRC.po
BIN
A2OSX.SRC.po
Binary file not shown.
@ -133,7 +133,7 @@ ARGS .BS 2
|
|||||||
DEV.HEADER .DA DRV.CS.START
|
DEV.HEADER .DA DRV.CS.START
|
||||||
.DA #S.DEV.S.BLOCK+S.DEV.S.WRITE+S.DEV.S.READ
|
.DA #S.DEV.S.BLOCK+S.DEV.S.WRITE+S.DEV.S.READ
|
||||||
DEV.HEADER.NAME .DA #4
|
DEV.HEADER.NAME .DA #4
|
||||||
.AS "ETH7" NAME
|
.AS "ETH1" NAME
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
* Driver Code
|
* Driver Code
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
@ -14,13 +14,13 @@ AUTO 6
|
|||||||
sta W5100.AR+1,x
|
sta W5100.AR+1,x
|
||||||
.EM
|
.EM
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
W5100.MR .EQ $C084-$88 Mode Register
|
W5100.MR .EQ $C084 Mode Register
|
||||||
W5100.MR.RST .EQ %10000000
|
W5100.MR.RST .EQ %10000000
|
||||||
W5100.MR.PB .EQ %00010000
|
W5100.MR.PB .EQ %00010000
|
||||||
W5100.MR.PPPOE .EQ %00001000
|
W5100.MR.PPPOE .EQ %00001000
|
||||||
W5100.MR.AI .EQ %00000010
|
W5100.MR.AI .EQ %00000010
|
||||||
W5100.MR.IND .EQ %00000001
|
W5100.MR.IND .EQ %00000001
|
||||||
W5100.AR .EQ $C085-$88 Memory Pointer
|
W5100.AR .EQ $C085 Memory Pointer
|
||||||
W5100.AR.GAR .EQ $0001
|
W5100.AR.GAR .EQ $0001
|
||||||
W5100.AR.SUBR .EQ $0005
|
W5100.AR.SUBR .EQ $0005
|
||||||
W5100.AR.SHAR .EQ $0009
|
W5100.AR.SHAR .EQ $0009
|
||||||
@ -61,7 +61,7 @@ W5100.AR.S0.TX.RD .EQ $0422
|
|||||||
W5100.AR.S0.TX.WR .EQ $0424
|
W5100.AR.S0.TX.WR .EQ $0424
|
||||||
W5100.AR.S0.RX.RSR .EQ $0426
|
W5100.AR.S0.RX.RSR .EQ $0426
|
||||||
W5100.AR.S0.RX.RD .EQ $0428
|
W5100.AR.S0.RX.RD .EQ $0428
|
||||||
W5100.DR .EQ $C087-$88
|
W5100.DR .EQ $C087
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
TX.BASE .EQ $4000
|
TX.BASE .EQ $4000
|
||||||
RX.BASE .EQ $6000
|
RX.BASE .EQ $6000
|
||||||
|
@ -258,20 +258,21 @@ SKT.AcceptA jsr SKT.GetA.I
|
|||||||
and #S.SOCKET.SO.ACCEPTCONN
|
and #S.SOCKET.SO.ACCEPTCONN
|
||||||
beq .99
|
beq .99
|
||||||
|
|
||||||
ldy #S.SOCKET.HQ.HEAD
|
|
||||||
lda (ZPPtrSKT),y
|
|
||||||
ldy #S.SOCKET.HQ.TAIL
|
ldy #S.SOCKET.HQ.TAIL
|
||||||
|
lda (ZPPtrSKT),y
|
||||||
|
ldy #S.SOCKET.HQ.HEAD
|
||||||
cmp (ZPPtrSKT),y Queue Empty
|
cmp (ZPPtrSKT),y Queue Empty
|
||||||
beq .9 CC
|
beq .9 CS
|
||||||
|
|
||||||
pha
|
pha save tail...
|
||||||
inc
|
inc
|
||||||
cmp #S.SOCKET.HQ.MAX
|
cmp #S.SOCKET.HQ.MAX
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
|
|
||||||
.1 sta (ZPPtrSKT),y
|
.1 ldy #S.SOCKET.HQ.TAIL
|
||||||
|
sta (ZPPtrSKT),y
|
||||||
pla
|
pla
|
||||||
clc
|
clc
|
||||||
adc #S.SOCKET.HQ
|
adc #S.SOCKET.HQ
|
||||||
|
@ -143,7 +143,6 @@ CS.RUN.SERVER ldy #hSrvSocket
|
|||||||
|
|
||||||
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.AcceptA
|
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.AcceptA
|
||||||
bcs .8
|
bcs .8
|
||||||
|
|
||||||
pha
|
pha
|
||||||
|
|
||||||
ldy #hSockets
|
ldy #hSockets
|
||||||
@ -182,9 +181,10 @@ CS.RUN.CLIENT >PUSHA hSocket
|
|||||||
>PUSHWI UsrBuf256
|
>PUSHWI UsrBuf256
|
||||||
>PUSHWI 256
|
>PUSHWI 256
|
||||||
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.GetS
|
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.GetS
|
||||||
bcc .1
|
bcs .1
|
||||||
|
|
||||||
|
|
||||||
|
>LDYAI UsrBuf256
|
||||||
|
>SYSCALL CPrintFYA
|
||||||
|
|
||||||
|
|
||||||
.1 clc
|
.1 clc
|
||||||
|
Loading…
Reference in New Issue
Block a user