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 VolDirHdr.size .EQ *-VolDirHdr
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE LIB/LIBBLKDEV.S SAVE /A2OSX.SRC/LIB/LIBBLKDEV.S
ASM ASM

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

@ -1043,7 +1043,20 @@ SKT.GetDataFromSktOut
sta ZPTmpPtr2+1 sta ZPTmpPtr2+1
bra .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 rts
*-------------------------------------- *--------------------------------------
* From TCP.IN * From TCP.IN
@ -1260,6 +1273,6 @@ SKT.CopyDataInToOut
rts rts
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE LIB/LIBTCPIP.S.SKT SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.SKT
LOAD LIB/LIBTCPIP.S LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM ASM

View File

@ -435,7 +435,7 @@ TCP.OUT.SendOpt sta .1+1
TCP.OUT.Send ldy #S.TCP.OPTIONS TCP.OUT.Send ldy #S.TCP.OPTIONS
sta (ZPFrameOutPtr),y sta (ZPFrameOutPtr),y
bit #S.TCP.OPTIONS.ACK bit #S.TCP.OPTIONS.ACK
bne .1 * beq .1
ldx #3 ldx #3
ldy #S.TCP.ACK.NUMBER+3 ldy #S.TCP.ACK.NUMBER+3
@ -449,7 +449,7 @@ TCP.OUT.Send ldy #S.TCP.OPTIONS
.1 ldx #3 .1 ldx #3
ldy #S.TCP.SEQ.NUMBER+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 sta (ZPFrameOutPtr),y
dey dey
dex dex
@ -627,6 +627,6 @@ TCP.ComputeChecksum
rts rts
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE LIB/LIBTCPIP.S.TCP SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.TCP
LOAD LIB/LIBTCPIP.S LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
ASM ASM

View File

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

View File

@ -301,5 +301,5 @@ IP.ID .BS 2
IP.CHECKSUM .BS 4 IP.CHECKSUM .BS 4
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE LIB/LIBTCPIP.S SAVE /A2OSX.SRC/LIB/LIBTCPIP.S
ASM 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" MSG.LOAD >CSTR "INSDRV:Loading %S...\r\n"
*-------------------------------------- *--------------------------------------
MAN MAN
SAVE /A2OSX.BUILD/SBIN/INSDRV.S SAVE /A2OSX.SRC/SBIN/INSDRV.S
ASM ASM

View File

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

View File

@ -10,7 +10,7 @@ AUTO 6
* out : * out :
* A = hMem To loaded LIB * 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 >LDYAI ENV.LIB push ENVNAME=LIB
>SYSCALL GetEnvYA get value for ENV=LIB >SYSCALL GetEnvYA get value for ENV=LIB
bcs .99 bcs .99