mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-12 04:29:31 +00:00
Kernel 0.94
This commit is contained in:
parent
142e85c8a4
commit
31c023e662
Binary file not shown.
|
@ -9,8 +9,7 @@ DHCP.INIT lda IPCFG+S.NETCFG.STATUS
|
||||||
|
|
||||||
ldx #3
|
ldx #3
|
||||||
|
|
||||||
.1 lda $C064,x
|
.1 eor A2osX.TIMER16,x
|
||||||
eor A2osX.TIMER16,x
|
|
||||||
sta DHCP.DISC.XID,x
|
sta DHCP.DISC.XID,x
|
||||||
sta DHCP.REQ.XID,x
|
sta DHCP.REQ.XID,x
|
||||||
dex
|
dex
|
||||||
|
@ -47,6 +46,8 @@ DHCP.RUN >PUSHBI 0 no protocol
|
||||||
>LIBCALL hLIBTCPIP,LIBTCPIP.Bind
|
>LIBCALL hLIBTCPIP,LIBTCPIP.Bind
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
|
>SLEEP
|
||||||
|
|
||||||
>PUSHWI S.SOCKET.O.BROADCAST
|
>PUSHWI S.SOCKET.O.BROADCAST
|
||||||
lda hSocket
|
lda hSocket
|
||||||
>LIBCALL hLIBTCPIP,LIBTCPIP.setsockopt
|
>LIBCALL hLIBTCPIP,LIBTCPIP.setsockopt
|
||||||
|
@ -181,7 +182,7 @@ DHCP.RUN.SKT.RECV
|
||||||
DHCP.QUIT lda hSocket
|
DHCP.QUIT lda hSocket
|
||||||
beq .1
|
beq .1
|
||||||
|
|
||||||
>LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown
|
* >LIBCALL hLIBTCPIP,LIBTCPIP.Shutdown
|
||||||
.1 clc
|
.1 clc
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
|
|
@ -7,25 +7,25 @@ MBAR.New >LDYAI S.MBAR
|
||||||
>SYSCALL2 getmem
|
>SYSCALL2 getmem
|
||||||
bcs .99
|
bcs .99
|
||||||
|
|
||||||
>STYA ZPMENUPtr
|
>STYA ZPObjPtr
|
||||||
|
|
||||||
lda #S.OBJ.T.MBAR
|
lda #S.OBJ.T.MBAR
|
||||||
sta (ZPMENUPtr) S.OBJ.T
|
sta (ZPObjPtr) S.OBJ.T
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
|
|
||||||
ldy #S.MBAR-1
|
ldy #S.MBAR-1
|
||||||
|
|
||||||
.1 sta (ZPMENUPtr),y
|
.1 sta (ZPObjPtr),y
|
||||||
dey
|
dey
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
>PULLA
|
>PULLA
|
||||||
ldy #S.MBAR.MBITEMS
|
ldy #S.MBAR.MBITEMS
|
||||||
sta (ZPMENUPtr),y
|
sta (ZPObjPtr),y
|
||||||
>PULLA
|
>PULLA
|
||||||
iny
|
iny
|
||||||
sta (ZPMENUPtr),y
|
sta (ZPObjPtr),y
|
||||||
|
|
||||||
|
|
||||||
clc
|
clc
|
||||||
|
|
|
@ -58,7 +58,7 @@ 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 yes...so no DNS socket
|
.5 lda IPCFG+S.IPCFG.IP no IP address yet...so no DNS socket
|
||||||
beq .8
|
beq .8
|
||||||
|
|
||||||
stz SA.LOCAL+S.SOCKADDR.PORT
|
stz SA.LOCAL+S.SOCKADDR.PORT
|
||||||
|
|
Loading…
Reference in New Issue
Block a user