Kernel version 0.9 : MEDIA reorganisation #2

This commit is contained in:
Rémy GIBERT 2017-03-30 08:31:12 +02:00
parent c33f940a8b
commit 5157cd75d3
21 changed files with 55 additions and 51 deletions

Binary file not shown.

Binary file not shown.

View File

@ -507,5 +507,5 @@ VolDirHdr.TB .BS 2 Total Blocks
VolDirHdr.size .EQ *-VolDirHdr
*--------------------------------------
MAN
SAVE LIB/LIBBLKDEV.S
SAVE /A2OSX.SRC/LIB/LIBBLKDEV.S
ASM

View File

@ -514,5 +514,5 @@ MD5.K .HS 78A46AD7.56B7C7E8.DB702024.EECEBDC1
MD5.DIGITS .AS "0123456789ABCDEF"
*--------------------------------------
MAN
SAVE LIB/LIBCRYPT.S
SAVE /A2OSX.SRC/LIB/LIBCRYPT.S
ASM

View File

@ -113,5 +113,5 @@ PAT.Arrow .DA #S.BM.F.BBP1
.DA 0
*--------------------------------------
MAN
SAVE LIB/LIBGFX.S
SAVE /A2OSX.SRC/LIB/LIBGFX.S
ASM

View File

@ -50,5 +50,5 @@ LIB.UNLOAD clc
*--------------------------------------
MAN
SAVE LIB/LIBMATH.S
SAVE /A2OSX.SRC/LIB/LIBMATH.S
ASM

View File

@ -649,5 +649,5 @@ PakStat .BS S.PAKSTAT
*--------------------------------------
UnPak.BitMask .HS 8040201008040201
MAN
SAVE LIB/LIBPAK.S
SAVE /A2OSX.SRC/LIB/LIBPAK.S
ASM

View File

@ -356,6 +356,6 @@ ARP.EXPIRE >LDYA L.ARP.CACHE
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.ARP
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.ARP
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -116,6 +116,6 @@ GET.IPCFG >LDYA L.IPCFG
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.CFG
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.CFG
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -540,6 +540,6 @@ DNS.PSTR2DNS lda (ZPPtrDNS)
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.DNS
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.DNS
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -303,6 +303,6 @@ FRM.Retry ldx FRM.QUEUE.Tail
.8 rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.FRM
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.FRM
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -119,6 +119,6 @@ HST.Dec2Hex ldy HST.DecStr
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.HST
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.HST
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -152,6 +152,6 @@ ICMP.ComputeChecksum
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.ICMP
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.ICMP
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -175,6 +175,6 @@ IP.SetDestMAC ldy #S.IP.DST
.99 rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.IP
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.IP
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -1043,7 +1043,20 @@ SKT.GetDataFromSktOut
sta ZPTmpPtr2+1
bra .1
.8 clc
.8 lda SKT.TCBCache+S.TCB.SEQNUM+3
clc
adc ZPDataOutLen
sta SKT.TCBCache+S.TCB.SEQNUM+3
lda SKT.TCBCache+S.TCB.SEQNUM+2
adc ZPDataOutLen+1
sta SKT.TCBCache+S.TCB.SEQNUM+2
bcc .80
inc SKT.TCBCache+S.TCB.SEQNUM+1
bne .80
inc SKT.TCBCache+S.TCB.SEQNUM
.80 clc
rts
*--------------------------------------
* From TCP.IN
@ -1260,6 +1273,6 @@ SKT.CopyDataInToOut
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.SKT
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.SKT
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -429,13 +429,13 @@ TCP.OUT.SendOpt sta .1+1
>LDYAI 0
jsr TCP.NewFrame
bcs TCP.OUT.9
.1 lda #$ff
.1 lda #$ff
TCP.OUT.Send ldy #S.TCP.OPTIONS
sta (ZPFrameOutPtr),y
bit #S.TCP.OPTIONS.ACK
bne .1
* beq .1
ldx #3
ldy #S.TCP.ACK.NUMBER+3
@ -449,7 +449,7 @@ TCP.OUT.Send ldy #S.TCP.OPTIONS
.1 ldx #3
ldy #S.TCP.SEQ.NUMBER+3
.2 lda SKT.TCBCache+S.TCB.NEXTSEQ,x
.2 lda SKT.TCBCache+S.TCB.SEQNUM,x
sta (ZPFrameOutPtr),y
dey
dex
@ -627,6 +627,6 @@ TCP.ComputeChecksum
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.TCP
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.TCP
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -164,6 +164,6 @@ UDP.ComputeChecksum
rts
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S.UDP
LOAD LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.UDP
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -301,5 +301,5 @@ IP.ID .BS 2
IP.CHECKSUM .BS 4
*--------------------------------------
MAN
SAVE LIB/LIBTCPIP.S
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S
ASM

View File

@ -76,5 +76,5 @@ MSG.HELP >CSTR "Usage: insdrv file.drv <args>\r\n"
MSG.LOAD >CSTR "INSDRV:Loading %S...\r\n"
*--------------------------------------
MAN
SAVE /A2OSX.BUILD/SBIN/INSDRV.S
SAVE /A2OSX.SRC/SBIN/INSDRV.S
ASM

View File

@ -59,31 +59,22 @@ CS.INIT >LDYA L.LIBTCPIP
lda IPCFG+S.IPCFG.HOSTNAME
bne .4
ldy #0
ldy DefaultHostName
.2 lda DefaultHostName,y
beq .3
sta IPCFG+S.IPCFG.HOSTNAME,y
iny
bne .2
dey
bpl .2
.3 lda A2osX.TIMER16
jsr A2CharAX
sta IPCFG+S.IPCFG.HOSTNAME,y
iny
txa
sta IPCFG+S.IPCFG.HOSTNAME,y
iny
sta IPCFG+S.IPCFG.HOSTNAME+7
stx IPCFG+S.IPCFG.HOSTNAME+8
lda A2osX.TIMER16+1
jsr A2CharAX
sta IPCFG+S.IPCFG.HOSTNAME,y
iny
txa
sta IPCFG+S.IPCFG.HOSTNAME,y
iny
lda #0
sta IPCFG+S.IPCFG.HOSTNAME,y
sta IPCFG+S.IPCFG.HOSTNAME+9
stx IPCFG+S.IPCFG.HOSTNAME+10
.4 >PUSHW L.IPCFG
>LIBCALL hLIBTCPIP,LIBTCPIP.SET.IPCFG
@ -201,7 +192,7 @@ MSG.CFG.OK >CSTR "OK.\r\n"
HOSTNAME >PSTR "${A2OSX}ETC/HOSTNAME"
TCPIP.CONF >PSTR "${A2OSX}ETC/TCPIP.CONF"
HOSTS >PSTR "${A2OSX}ETC/HOSTS"
DefaultHostName >CSTR "a2osx-"
DefaultHostName >PSTR "a2osx-XXXX"
CFG.Keywords >PSTR "DOMAIN"
>PSTR "IP"
>PSTR "MASK"

View File

@ -10,7 +10,7 @@ AUTO 6
* out :
* A = hMem To loaded LIB
*--------------------------------------
K.LoadLibYA >STYA K.LoadLib.Name save libname for K.FileSearch
K.LoadLibYA >STYA K.LoadLib.Name SAVE /A2OSX.SRC/LIBname for K.FileSearch
>LDYAI ENV.LIB push ENVNAME=LIB
>SYSCALL GetEnvYA get value for ENV=LIB
bcs .99