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

Kernel 0.94

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

6
LIB/LIBTCPIP.S.CFG.txt
View File

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

11
LIB/LIBTCPIP.S.txt
View File

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