Kernel 0.94

This commit is contained in:
Rémy GIBERT 2020-10-29 13:55:55 +01:00
parent 31c023e662
commit 555da13520
3 changed files with 8 additions and 9 deletions

Binary file not shown.

View File

@ -58,17 +58,13 @@ CFG.SET >PULLW ZPTmpPtr1 IPCFG
jsr CFG.SET.IOCTL
bcs .9
.5 lda IPCFG+S.IPCFG.IP no IP address yet...so no DNS socket
beq .8
stz SA.LOCAL+S.SOCKADDR.PORT
.5 stz SA.LOCAL+S.SOCKADDR.PORT
stz SA.LOCAL+S.SOCKADDR.PORT+1
>PUSHW L.SA.LOCAL
lda hDNSSocket
jmp SKT.Bind
.8 clc
.9 rts
*--------------------------------------
CFG.SET.IOCTL >PUSHB IPCFG+S.NETCFG.DevID

View File

@ -173,14 +173,17 @@ LIB.LOAD ldx RefCount
bcs .9
sta hDNSSocket
pha
>PUSHW L.SA.LOCAL IP/PORT=All ZERO
lda hDNSSocket
jsr SKT.Bind
>LDYAI UDP.PORT.DNS
>STYA SA.REMOTE+S.SOCKADDR.PORT
>PUSHW L.SA.REMOTE
pla
>PUSHW L.SA.REMOTE IP=All ZERO
lda hDNSSocket
jsr SKT.Connect
bcs .9
jsr DNS.CLEAR