Kernel 0.93+

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

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
 *--------------------------------------

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