Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-11-26 13:49:18 +00:00
Code Issues Projects Releases Wiki Activity

Kernel version 0.9 : Updated/migrated UtherNet2.drv....if someone could give it a try...

Browse Source
This commit is contained in:
Rémy GIBERT 2017-02-17 23:04:53 +01:00
parent 333667e697
commit 245a6e7711
6 changed files with 13 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
A2OSX.BOOT.po
View File

Binary file not shown.

BIN
A2OSX.SRC.po
View File

Binary file not shown.

2
DRV/UTHERNET.DRV.S.txt
View File

@ -133,7 +133,7 @@ ARGS .BS 2
DEV.HEADER .DA DRV.CS.START
.DA #S.DEV.S.BLOCK+S.DEV.S.WRITE+S.DEV.S.READ
DEV.HEADER.NAME .DA #4
.AS "ETH7" NAME
.AS "ETH1" NAME
*--------------------------------------
* Driver Code
*--------------------------------------

6
INC/NET.W5100.I.txt
View File

@ -14,13 +14,13 @@ AUTO 6
sta W5100.AR+1,x
.EM
*--------------------------------------
W5100.MR .EQ $C084-$88 Mode Register
W5100.MR .EQ $C084 Mode Register
W5100.MR.RST .EQ %10000000
W5100.MR.PB .EQ %00010000
W5100.MR.PPPOE .EQ %00001000
W5100.MR.AI .EQ %00000010
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.SUBR .EQ $0005
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.RX.RSR .EQ $0426
W5100.AR.S0.RX.RD .EQ $0428
W5100.DR .EQ $C087-$88
W5100.DR .EQ $C087
*--------------------------------------
TX.BASE .EQ $4000
RX.BASE .EQ $6000

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

@ -258,20 +258,21 @@ SKT.AcceptA jsr SKT.GetA.I
and #S.SOCKET.SO.ACCEPTCONN
beq .99
ldy #S.SOCKET.HQ.HEAD
lda (ZPPtrSKT),y
ldy #S.SOCKET.HQ.TAIL
lda (ZPPtrSKT),y
ldy #S.SOCKET.HQ.HEAD
cmp (ZPPtrSKT),y Queue Empty
beq .9 CC
beq .9 CS
pha
pha save tail...
inc
cmp #S.SOCKET.HQ.MAX
bne .1
lda #0
.1 sta (ZPPtrSKT),y
.1 ldy #S.SOCKET.HQ.TAIL
sta (ZPPtrSKT),y
pla
clc
adc #S.SOCKET.HQ

6
SBIN/HTTPD.S.txt
View File

@ -143,7 +143,6 @@ CS.RUN.SERVER ldy #hSrvSocket
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.AcceptA
bcs .8
pha
ldy #hSockets
@ -182,9 +181,10 @@ CS.RUN.CLIENT >PUSHA hSocket
>PUSHWI UsrBuf256
>PUSHWI 256
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.GetS
bcc .1
bcs .1
>LDYAI UsrBuf256
>SYSCALL CPrintFYA
.1 clc