Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-12-01 14:50:10 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.93

Browse Source
This commit is contained in:
Rémy GIBERT 2019-05-09 23:00:23 +02:00
parent 8b4384f68d
commit 8134fcb846
4 changed files with 10 additions and 10 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.

2
LIB/LIBTCPIP.S.SKT.txt
View File

@ -612,7 +612,7 @@ SKT.AddDataToSktOut
>ADC16 SKT.Cache+S.SOCKET.TCP.OUTTOSEND,ZPDataInLen >ADC16 SKT.Cache+S.SOCKET.TCP.OUTTOSEND,ZPDataInLen
jsr SKT.StoreTCB jsr SKT.StoreTCB
* jsr TCP.OUT.I SKT.GetTCB called, try to push, ignore error.... jsr TCP.OUT.I SKT.GetTCB called, try to push, ignore error....
>LDYA ZPDataInLen >LDYA ZPDataInLen
clc clc

2
LIB/LIBTCPIP.S.TCP.txt
View File

@ -420,7 +420,7 @@ TCP.OUT.I lda SKT.Cache+S.SOCKET.TCP.OUTTOSEND+1
ldy #S.SOCKET.TCP.O ldy #S.SOCKET.TCP.O
lda (ZPPtrSKT),y lda (ZPPtrSKT),y
bne TCP.OUT.SendOptA a least an option... bne TCP.OUT.SendOptA a least an option...
clc No, data, no flag....exit clc No data, no flag....exit
rts rts
.1 cpy #K.TCP.MSS .1 cpy #K.TCP.MSS

16
SBIN/NETWORKD.S.txt
View File

@ -23,6 +23,12 @@ LIB.MAX .EQ 4
ZS.START ZS.START
pNETCFG .BS 2 pNETCFG .BS 2
pBuf .BS 2 pBuf .BS 2
DevID .BS 1
LibCnt .BS 1
hNetworkFile .BS 1
hLineBuf .BS 1
hFrameIn .BS 1
hLIBs .BS LIB.MAX+1 for ending 0 if MAX libs
ZS.END .ED ZS.END .ED
*-------------------------------------- *--------------------------------------
* File Header (16 Bytes) * File Header (16 Bytes)
@ -35,7 +41,7 @@ CS.START cld
.DA #0 .DA #0
.DA CS.END-CS.START Code Size (without Constants) .DA CS.END-CS.START Code Size (without Constants)
.DA DS.END-DS.START Data SegmentSize .DA DS.END-DS.START Data SegmentSize
.DA #16 Stack Size .DA #64 Stack Size
.DA #ZS.END-ZS.START Zero Page Size .DA #ZS.END-ZS.START Zero Page Size
.DA 0 .DA 0
*-------------------------------------- *--------------------------------------
@ -296,15 +302,9 @@ MSG.RUNNING .AZ "NETWORKD:Already loaded, exiting."
MSG.DEV.KO .AZ "NETWORKD:No Device Found, exiting." MSG.DEV.KO .AZ "NETWORKD:No Device Found, exiting."
MSG.DEV.OK .AZ "NETWORKD:Bound To Device : %s\r\n" MSG.DEV.OK .AZ "NETWORKD:Bound To Device : %s\r\n"
MSG.LIB .AZ "NETWORKD:Loading %s ...\r\n" MSG.LIB .AZ "NETWORKD:Loading %s ...\r\n"
DevID .BS 1 ETCNETWORK .AZ "${ROOT}ETC/NETWORK"
LibCnt .BS 1
hLIBs .BS LIB.MAX+1 for ending 0 if MAX libs
IOCTL .BS S.IOCTL IOCTL .BS S.IOCTL
DCB.NIC .BS S.DCB.NIC DCB.NIC .BS S.DCB.NIC
ETCNETWORK .AZ "${ROOT}ETC/NETWORK"
hNetworkFile .BS 1
hLineBuf .BS 1
hFrameIn .BS 1
*-------------------------------------- *--------------------------------------
.DUMMY .DUMMY
.OR 0 .OR 0