diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index 8330df2f..2ac0bb43 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/BIN/HTTPGET.S.txt b/BIN/HTTPGET.S.txt index 8913b7e7..51512bf6 100644 --- a/BIN/HTTPGET.S.txt +++ b/BIN/HTTPGET.S.txt @@ -1,10 +1,9 @@ NEW -PREFIX -AUTO 4,1 + AUTO 3,1 .LIST OFF .OP 65C02 .OR $2000 - .TF BIN/HTTPGET + .TF bin/httpget *-------------------------------------- .INB INC/MACROS.I .INB INC/A2OSX.I @@ -151,7 +150,14 @@ CS.RUN.HOSTOK >INC.G ArgIndex .1 ldy #1 lda (ZPPtr),y - cmp #'U' + cmp #'a' + bcc .11 + cmp #'z'+1 + bcs .11 + + eor #$20 + +.11 cmp #'U' bne .2 >INC.G ArgIndex @@ -168,7 +174,7 @@ CS.RUN.HOSTOK >INC.G ArgIndex bne CS.RUN.ESYN >INC.G ArgIndex >SYSCALL ArgV - bcs CS.RUN.RTS + bcs .9 pha >PUSHWZ Aux type diff --git a/LIB/LIBTCPIP.S.CFG.txt b/LIB/LIBTCPIP.S.CFG.txt index 971f850a..e561576e 100644 --- a/LIB/LIBTCPIP.S.CFG.txt +++ b/LIB/LIBTCPIP.S.CFG.txt @@ -3,11 +3,14 @@ NEW .LIST OFF *-------------------------------------- CFG.SET >PULLW ZPTmpPtr1 IPCFG + ldy #S.IPCFG-1 + .1 lda (ZPTmpPtr1),y sta IPCFG,y dey bpl .1 + ldx #5 .2 lda IPCFG+S.NETCFG.MAC,x @@ -41,7 +44,8 @@ CFG.SET >PULLW ZPTmpPtr1 IPCFG >PUSHBI IOCTL.STATUS lda IPCFG+S.NETCFG.DevID >SYSCALL2 IOCTL - + bcs .99 + ldx #11 IP/MASK/GW .4 lda IPCFG+S.IPCFG.IP,x @@ -64,17 +68,21 @@ CFG.SET >PULLW ZPTmpPtr1 IPCFG jsr SKT.Shutdown stz hDNSSocket -.6 lda IPCFG+S.IPCFG.DNS1 +.6 lda IPCFG+S.IPCFG.IP no IP address yes...so no DNS socket + beq .8 + + lda IPCFG+S.IPCFG.DNS1 beq .8 >PUSHBI 0 no protocol lda #S.SOCKET.T.DGRAM jsr SKT.Socket - bcs .9 +.99 bcs .9 sta hDNSSocket stz SA.LOCAL+S.SOCKADDR.PORT stz SA.LOCAL+S.SOCKADDR.PORT+1 + >PUSHW L.SA.LOCAL lda hDNSSocket jsr SKT.Bind @@ -85,6 +93,7 @@ CFG.SET >PULLW ZPTmpPtr1 IPCFG >PUSHW L.SA.REMOTE lda hDNSSocket jmp SKT.Connect + .8 clc .9 rts *-------------------------------------- diff --git a/SBIN/NETWORKD.S.txt b/SBIN/NETWORKD.S.txt index 2c65ba25..2488a5ec 100644 --- a/SBIN/NETWORKD.S.txt +++ b/SBIN/NETWORKD.S.txt @@ -123,11 +123,14 @@ CS.INIT.LIBS lda LibCnt ply >SYSCALL LoadLib bcs CS.INIT.LIBS.9 + ldy LibCnt sta hLIBs,y tay ldx #LIBNET.GETCFG jsr A2osX.LIBCALL + bcs CS.INIT.LIBS.9 + >STYA pNETCFG lda DevID @@ -137,17 +140,30 @@ CS.INIT.LIBS lda LibCnt iny S.NETCFG.DevFlags lda DCB.NIC+S.DCB.NIC.FLAGS sta (pNETCFG),y + ldx #5 ldy #S.NETCFG.MAC+5 + .2 lda DCB.NIC+S.DCB.NIC.MAC,x sta (pNETCFG),y dey dex bpl .2 + + >PUSHW pNETCFG + + ldy LibCnt + lda hLIBs,y + tay + ldx #LIBNET.SETCFG + jsr A2osX.LIBCALL + bcs CS.INIT.LIBS.9 + inc LibCnt lda LibCnt cmp #LIB.MAX bne .1 + .8 clc CS.INIT.LIBS.9 rts