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

TCPIP:Cache expiration, retry count....

Browse Source
This commit is contained in:
Rémy GIBERT 2016-03-20 23:16:28 +01:00
parent f6adb05c07
commit 072b0e90a5
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
SBIN/TCPIP.S.txt
View File

@ -127,11 +127,7 @@ CS.INIT.DEV >LDYA L.DEVNAME
bcs .9
>STYA ZPIPDevPtr
ldy #1
lda (ZPIPDevPtr),y
sta DEVFLAGS
iny
ldy #S.DEVINFO.NET.MAC
ldx #S.IPCFG.MAC
.2 lda (ZPIPDevPtr),y
@ -150,9 +146,10 @@ CS.INIT.DEV >LDYA L.DEVNAME
CS.RUN clc
rts
*--------------------------------------
CS.DOEVENT lda (pEvent)
and #S.EVT.F.NET
beq .9
CS.DOEVENT clc
lda (pEvent)
bit #S.EVT.F.NET
beq .1
ldy #S.EVT.hDEV
lda (pEvent),y
@ -164,7 +161,11 @@ CS.DOEVENT lda (pEvent)
>LIBCALL hLIBTCPIP,LIBTCPIP.RCVD.FRAMEA
rts
.9 sec
.1 bit #S.EVT.F.T10TH
beq .9 S.EVT.F.T1SEC
>LIBCALL hLIBTCPIP,LIBTCPIP.PULSEA
.9 sec never discard TIME event
rts
*--------------------------------------
CS.QUIT lda IPCFG+S.IPCFG.HDEV
@ -538,7 +539,6 @@ CFG.Keyword.Map .DA #0 End Of Keyword table and NA Keyword
.DA #S.IPCFG.DNS2
hLIBTCPIP .BS 1
hNetDev .BS 1
DEVFLAGS .BS 1
IPCFG .BS S.IPCFG
CFG.hCfgFile .BS 1
CFG.FileLen .BS 2