2017-12-22 21:24:30 +00:00
|
|
|
|
NEW
|
2017-03-29 15:48:15 +00:00
|
|
|
|
PREFIX /A2OSX.BUILD
|
2017-12-22 21:24:30 +00:00
|
|
|
|
AUTO 4,1
|
2016-10-17 06:21:04 +00:00
|
|
|
|
.LIST OFF
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
* PULLW = PTR to S.IPCFG
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
SET.IPCFG >PULLW ZPTmpPtr1
|
|
|
|
|
ldy #0
|
2017-03-23 16:41:36 +00:00
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
.1 lda (ZPTmpPtr1),y
|
|
|
|
|
sta IPCFG,y
|
|
|
|
|
iny
|
|
|
|
|
cpy #S.IPCFG
|
|
|
|
|
bne .1
|
|
|
|
|
|
|
|
|
|
ldx #5
|
2017-03-23 16:41:36 +00:00
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
.2 lda IPCFG+S.IPCFG.MAC,x
|
|
|
|
|
sta ARP.REQ.SRCMAC,x
|
|
|
|
|
sta ARP.REQ.SHA,x
|
|
|
|
|
sta ARP.REP.SRCMAC,x
|
|
|
|
|
sta ARP.REP.SHA,x
|
|
|
|
|
dex
|
|
|
|
|
bpl .2
|
|
|
|
|
|
|
|
|
|
ldx #3
|
2017-03-23 16:41:36 +00:00
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
.3 lda IPCFG+S.IPCFG.IP,x
|
|
|
|
|
sta ARP.REQ.SPA,x
|
|
|
|
|
sta ARP.REP.SPA,x
|
|
|
|
|
sta DNS.SOCKET.SA,x
|
|
|
|
|
dex
|
|
|
|
|
bpl .3
|
2018-07-23 06:28:47 +00:00
|
|
|
|
|
|
|
|
|
>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
|
2016-10-17 06:21:04 +00:00
|
|
|
|
|
|
|
|
|
>STYA ZPTmpPtr2
|
2018-07-23 06:28:47 +00:00
|
|
|
|
lda DCB.NIC+S.DCB.NIC.FLAGS
|
|
|
|
|
and #S.DCB.NIC.FLAGS.ARPOFFLOAD
|
2016-10-17 06:21:04 +00:00
|
|
|
|
beq .4
|
|
|
|
|
|
2018-07-23 06:28:47 +00:00
|
|
|
|
ldx #11
|
|
|
|
|
|
|
|
|
|
.31 lda IPCFG+S.IPCFG.IP,x
|
|
|
|
|
sta DCB.NIC+S.DCB.NIC.IP,x
|
|
|
|
|
dex
|
|
|
|
|
bpl .31
|
|
|
|
|
|
|
|
|
|
* lda S.IOCTL.CTRLCODE.SETDCB same as lda S.IOCTL.STATCODE.GETDCB
|
|
|
|
|
* sta S.IOCTL.CTRLCODE same as sta S.IOCTL.STATCODE
|
|
|
|
|
|
|
|
|
|
lda IPCFG+S.IPCFG.HDEV
|
|
|
|
|
jsr SET.IPCFG.IOCTL
|
2016-10-17 06:21:04 +00:00
|
|
|
|
|
|
|
|
|
.4 lda hDNSSocket1
|
|
|
|
|
beq .41
|
|
|
|
|
jsr SKT.CLOSEA
|
2017-03-23 16:41:36 +00:00
|
|
|
|
stz hDNSSocket1
|
2016-10-17 06:21:04 +00:00
|
|
|
|
|
|
|
|
|
.41 lda hDNSSocket2
|
|
|
|
|
beq .42
|
|
|
|
|
jsr SKT.CLOSEA
|
2017-03-23 16:41:36 +00:00
|
|
|
|
stz hDNSSocket2
|
2016-10-17 06:21:04 +00:00
|
|
|
|
|
|
|
|
|
.42 lda IPCFG+S.IPCFG.DNS1
|
|
|
|
|
beq .6
|
|
|
|
|
|
|
|
|
|
ldx #3
|
2017-03-23 16:41:36 +00:00
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
.5 lda IPCFG+S.IPCFG.DNS1,x
|
|
|
|
|
sta DNS.SOCKET.DA,x
|
|
|
|
|
dex
|
|
|
|
|
bpl .5
|
|
|
|
|
|
2017-01-30 22:23:16 +00:00
|
|
|
|
stz DNS.SOCKET.SP
|
|
|
|
|
stz DNS.SOCKET.SP+1
|
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
>PUSHW L.DNS.SOCKET
|
2017-02-15 21:46:21 +00:00
|
|
|
|
jsr SKT.New
|
2016-10-17 06:21:04 +00:00
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
stx hDNSSocket1
|
|
|
|
|
|
|
|
|
|
.6 lda IPCFG+S.IPCFG.DNS2
|
|
|
|
|
beq .8
|
|
|
|
|
|
|
|
|
|
ldx #3
|
2017-03-23 16:41:36 +00:00
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
.7 lda IPCFG+S.IPCFG.DNS2,x
|
|
|
|
|
sta DNS.SOCKET.DA,x
|
|
|
|
|
dex
|
|
|
|
|
bpl .7
|
|
|
|
|
|
2017-01-30 22:23:16 +00:00
|
|
|
|
stz DNS.SOCKET.SP
|
|
|
|
|
stz DNS.SOCKET.SP+1
|
|
|
|
|
|
2016-10-17 06:21:04 +00:00
|
|
|
|
>PUSHW L.DNS.SOCKET
|
2017-02-15 21:46:21 +00:00
|
|
|
|
jsr SKT.New
|
2016-10-17 06:21:04 +00:00
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
stx hDNSSocket2
|
|
|
|
|
|
|
|
|
|
.8 >LDYA ZPTmpPtr1
|
|
|
|
|
clc
|
|
|
|
|
.9 rts
|
2018-07-23 06:28:47 +00:00
|
|
|
|
|
|
|
|
|
SET.IPCFG.IOCTL >PUSHW L.IOCTL
|
|
|
|
|
txa
|
|
|
|
|
>PUSHA
|
|
|
|
|
lda IPCFG+S.IPCFG.HDEV
|
|
|
|
|
>SYSCALL IOCTL
|
|
|
|
|
rts
|
2016-10-17 06:21:04 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
* grab a copy on the fly for lib function
|
|
|
|
|
* OUT :
|
|
|
|
|
* Y,A = PTR to S.IPCFG
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
GET.IPCFG >LDYA L.IPCFG
|
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
2017-03-30 06:31:12 +00:00
|
|
|
|
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.CFG
|
|
|
|
|
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
|
2016-10-17 06:21:04 +00:00
|
|
|
|
ASM
|