Kernel 0.9.2

This commit is contained in:
Rémy GIBERT 2018-07-20 16:10:10 +02:00
parent a9b2c41a33
commit 9de817d12d
20 changed files with 57 additions and 56 deletions

Binary file not shown.

Binary file not shown.

View File

@ -201,7 +201,7 @@ CS.DOEVENT lda (pEvent)
rts rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -237,7 +237,7 @@ CS.RUN.GetFilePath
>SYSCALL GetMemPtr >SYSCALL GetMemPtr
>PUSHYA >PUSHYA
>PUSHW ZPFullPath >LDYA ZPFullPath
>SYSCALL StrCpy >SYSCALL StrCpy

View File

@ -141,7 +141,7 @@ CS.EVENT sec
rts rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -85,7 +85,7 @@ CS.INIT ldy #S.PS.ARGC
bne .5 Already have a dev name...go get VolName bne .5 Already have a dev name...go get VolName
>LDYA ZPPtr1 >LDYA ZPPtr1
>SYSCALL GetDevByName.YA >SYSCALL GetDevByName
bcs .99 bcs .99
txa txa
>STA.G hDev >STA.G hDev
@ -101,7 +101,7 @@ CS.INIT ldy #S.PS.ARGC
beq .99 VolName too long beq .99 VolName too long
.61 >PUSHW ZPPtr1 .61 >PUSHW ZPPtr1
>PUSHEA.G VolName >LEA.G VolName
>SYSCALL StrCpy >SYSCALL StrCpy
jmp .1 success, scan for any other args jmp .1 success, scan for any other args
@ -200,32 +200,25 @@ CS.RUN.InitCat >LDA.G CatSize
.8 clc .8 clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.BuildCat >LDA.G hDev CS.RUN.BuildCat >PUSHEA.G DIB
>LDA.G hDev
>SYSCALL GetDevStatus >SYSCALL GetDevStatus
bcs .99 bcs .99
>STYA ZPPtr1
ldy #S.DIB.SIZE
lda (ZPPtr1),y
>STA.G SizeInBlocks
ldy #S.DIB.SIZE+1
lda (ZPPtr1),y
>STA.G SizeInBlocks+1
>LDA.G hDev >LDA.G hDev
>SYSCALL GetDevByID >SYSCALL GetDevByID
bcs .99 bcs .99
pha pha
tya tya
adc #S.DEV.NAME adc #S.FD.DEV.NAME
sta ZPPtr2 sta ZPPtr2
pla pla
adc /S.DEV.NAME adc /S.FD.DEV.NAME
sta ZPPtr2+1 sta ZPPtr2+1
>PUSHEA.G VolName >PUSHEA.G VolName
>PUSHW.G SizeInBlocks >PUSHW.G DIB+S.DIB.SIZE
>PUSHW ZPPtr2 >PUSHW ZPPtr2
>LDYA L.MSG.INIT >LDYA L.MSG.INIT
@ -248,25 +241,25 @@ CS.RUN.BuildCat >LDA.G hDev
bcs .9 bcs .9
phx phx
>STYA.G BlkParams.Ptr >STYA.G IOCTL+S.IOCTL.BUFPTR
pla pla
>STA.G hBuf >STA.G hBuf
jsr .7 jsr .7
>PUSHEA.G VolName >PUSHEA.G VolName
>PUSHW.G BlkParams.Ptr >PUSHW.G IOCTL+S.IOCTL.BUFPTR
>LIBCALL hLIBBLKDEV,LIBBLKDEV.BuildProDOSCat >LIBCALL hLIBBLKDEV,LIBBLKDEV.BuildProDOSCat
.9 rts .9 rts
.7 >PUSHW.G SizeInBlocks .7 >PUSHW.G DIB+S.DIB.SIZE
>PUSHB.G CatSize >PUSHB.G CatSize
>PUSHB.G CatOptions >PUSHB.G CatOptions
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN.WriteCat >PUSHB.G hDev CS.RUN.WriteCat >PUSHEA.G IOCTL
>PUSHBI DEVMGR.WRITEBLOCK >PUSHBI IOCTL.WRITEBLOCK
>PUSHEA.G BlkParams.Ptr >LDA.G hDev
>SYSCALL IOCTL >SYSCALL IOCTL
bcs .9 bcs .9
@ -274,12 +267,12 @@ CS.RUN.WriteCat >PUSHB.G hDev
lda #'.' lda #'.'
>SYSCALL PutChar >SYSCALL PutChar
>LDA.G BlkParams.Ptr+1 >LDA.G IOCTL+S.IOCTL.BUFPTR+1
clc inc
adc #2 inc
sta (pData),y sta (pData),y
>INC.G BlkParams.Num >INC.G IOCTL+S.IOCTL.BLKNUM
>SLEEP >SLEEP
@ -297,7 +290,7 @@ CS.QUIT >LDA.G hBuf
.1 lda hLIBBLKDEV .1 lda hLIBBLKDEV
beq .8 beq .8
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
.8 clc .8 clc
rts rts
@ -343,13 +336,12 @@ ArgIndex .BS 1
bLL .BS 1 bLL .BS 1
VolName .BS 16 VolName .BS 16
hDev .BS 5 hDev .BS 5
SizeInBlocks .BS 2
CatSize .BS 1 CatSize .BS 1
CatOptions .BS 1 CatOptions .BS 1
BlkCnt .BS 1 BlkCnt .BS 1
BlkParams.Ptr .BS 2 IOCTL .BS S.IOCTL
BlkParams.Num .BS 2
hBuf .BS 1 hBuf .BS 1
DIB .BS S.DIB
DS.END .ED DS.END .ED
*-------------------------------------- *--------------------------------------
MAN MAN

View File

@ -248,7 +248,7 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
beq .8 beq .8
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
.8 clc .8 clc
rts rts

View File

@ -210,7 +210,7 @@ CS.QUIT >LDA.G hFullPath
.7 lda hLIBCRYPT .7 lda hLIBCRYPT
beq .8 beq .8
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
.8 clc .8 clc
rts rts

View File

@ -122,7 +122,7 @@ CS.DOEVENT sec
*-------------------------------------- *--------------------------------------
CS.QUIT lda hLIBTCPIP CS.QUIT lda hLIBTCPIP
beq .8 beq .8
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
.8 clc .8 clc
rts rts

View File

@ -303,7 +303,7 @@ CS.QUIT ldy #hFrame
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA
lda hLIBTCPIP lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -180,7 +180,7 @@ CS.QUIT ldy #hSocket
.1 lda hLIBTCPIP .1 lda hLIBTCPIP
beq .8 beq .8
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
.8 clc .8 clc
rts rts

View File

@ -325,7 +325,7 @@ S.IOCTL.BLKNUM .EQ 4 3 BYTES
S.IOCTL.BYTECNT .EQ 4 2 BYTES S.IOCTL.BYTECNT .EQ 4 2 BYTES
S.IOCTL.ADDRPTR .EQ 6 3 BYTES S.IOCTL.ADDRPTR .EQ 6 3 BYTES
* *
S.IOCTRL .EQ 9 S.IOCTL .EQ 9
*-------------------------------------- *--------------------------------------
S.DIB.S .EQ 0 S.DIB.S .EQ 0
S.DIB.S.BLOCK .EQ %10000000 S.DIB.S.BLOCK .EQ %10000000

View File

@ -4,12 +4,12 @@ AUTO 4,1
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BUILD/LIB/LIBBLKDEV.O .TF LIB/LIBBLKDEV.O
*-------------------------------------- *--------------------------------------
.INB /A2OSX.BUILD/INC/MACROS.I .INB INC/MACROS.I
.INB /A2OSX.BUILD/INC/A2OSX.I .INB INC/A2OSX.I
.INB /A2OSX.BUILD/INC/PRODOS.I .INB INC/PRODOS.I
.INB /A2OSX.BUILD/INC/LIBBLKDEV.I .INB INC/LIBBLKDEV.I
*-------------------------------------- *--------------------------------------
* NIBBLE track len = $1A00 (6656) bytes: * NIBBLE track len = $1A00 (6656) bytes:
* *
@ -79,6 +79,9 @@ LIB.UNLOAD clc
*/-------------------------------------- */--------------------------------------
* # GetProDOSCatSize * # GetProDOSCatSize
* Compute space needed for ProDOS Catalog * Compute space needed for ProDOS Catalog
* ## C
* int getprodoscatsize (short int options, short int catsize, int devsize );
* ## ASM
* **In:** * **In:**
* PUSHW = DevSize (in 512b blocks) * PUSHW = DevSize (in 512b blocks)
* PUSHB = Catalog Size (in blocks) * PUSHB = Catalog Size (in blocks)

View File

@ -8,17 +8,22 @@
+ **A2OSX.BOOT.po** : **(0.9.1)** 140k BOOT disk image with all binaries + **A2OSX.BOOT.po** : **(0.9.1)** 140k BOOT disk image with all binaries
+ **A2OSX.DEV.po** : **(0.9.1)** 140k disk image with ASM binaries, Debug Tools & INClude files + **A2OSX.DEV.po** : **(0.9.1)** 140k disk image with ASM binaries, Debug Tools & INClude files
+ **A2OSX.BUILD.po** : **(0.9.2)** 800k BOOT disk image with S-C MASM 3.0 and all binaries (BOOT+DEV) + **A2OSX.BUILD.po** : **(0.92)** 800k BOOT disk image with S-C MASM 3.0 and all binaries (BOOT+DEV)
+ **A2OSX.SRC.po** : **(0.9.2)** 800k disk image with all sources + **A2OSX.SRC.po** : **(0.92)** 800k disk image with all sources
## Latest News 2018-06-17 ## Latest News 2018-07-20
Kernel & some BINs/SBINs migrated to 0.92.
A2OSX.BOOT.po 0.92 coming soon ...
## News 2018-06-17
Ok, as i'm still the lone developer here, i decided to break the kernel, HAHAHAHAHAHA!!!! Ok, as i'm still the lone developer here, i decided to break the kernel, HAHAHAHAHAHA!!!!
I updated the Calling Convention (see projects), i now setup the header in each KERNEL.S.* file accordingly to generate doc, then i change the code... I updated the Calling Convention (see projects), i now setup the header in each KERNEL.S.* file accordingly to generate doc, then i change the code...
So ....nothing works anymore on the A2OSX.BUILD media... So ....nothing works anymore on the A2OSX.BUILD media...
## Latest News 2018-06-13 ## News 2018-06-13
Previous (relatively!) stable version 0.9.1 has been archived, see link above. Previous (relatively!) stable version 0.9.1 has been archived, see link above.
@ -54,7 +59,7 @@ I need :
+ someone able to build a test plan + someone able to build a test plan
+ ....ideas...help....support....beer, or something stronger! + ....ideas...help....support....beer, or something stronger!
## Latest News 2018-05-29 ## News 2018-05-29
Time to work on STDIO : Time to work on STDIO :
@ -322,7 +327,9 @@ note : '$VAR' does NOT expand Variable
| | | -N : Number all output lines | | | | | -N : Number all output lines | |
| | | -S : Suppress repeated empty output lines | | | | | -S : Suppress repeated empty output lines | |
| EDIT | Working | still missing : find/replace | 0.92 | | EDIT | Working | still missing : find/replace | 0.92 |
| CHTYP | Working | -C : Continue On Error | 0.9.1 | | FORMAT | In Progress | -L : Low-Level Format | 0.92 |
| | | -1..9 : Catalog Size (block count) | |
| CHTYP | Working | -C : Continue On Error | 0.92 |
| | | -R : Recurse subdirectories | | | | | -R : Recurse subdirectories | |
| CHMOD | In Progress | -C : Continue On Error | 0.9 | | CHMOD | In Progress | -C : Continue On Error | 0.9 |
| | | -R : Recurse subdirectories | | | | | -R : Recurse subdirectories | |
@ -330,8 +337,6 @@ note : '$VAR' does NOT expand Variable
| | | -R : Recurse subdirectories | | | | | -R : Recurse subdirectories | |
| CHGRP | In Progress | -C : Continue On Error | 0.9 | | CHGRP | In Progress | -C : Continue On Error | 0.9 |
| | | -R : Recurse subdirectories | | | | | -R : Recurse subdirectories | |
| FORMAT | In Progress | -L : Low-Level Format | 0.9.1 |
| | | -1..9 : Catalog Size (block count) | |
| MD5 | In Progress | -D : String Input | 0.9.1 | | MD5 | In Progress | -D : String Input | 0.9.1 |
| NSCUTIL | Working | Tool for setting time in NSC/DL1216E | 0.9 | | NSCUTIL | Working | Tool for setting time in NSC/DL1216E | 0.9 |

View File

@ -244,7 +244,7 @@ CS.QUIT ldy #hSocket
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CloseA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CloseA
.1 lda hLIBTCPIP .1 lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -239,7 +239,7 @@ CS.QUIT ldx #CONN.MAX
>SYSCALL FreeMem >SYSCALL FreeMem
.3 lda hLIBTCPIP .3 lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -156,7 +156,7 @@ CS.QUIT >LDA.G hDev
>SYSCALL IOCTL >SYSCALL IOCTL
.1 lda hLIBTCPIP .1 lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -250,7 +250,7 @@ CS.QUIT ldx #CONN.MAX
>LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA >LIBCALL hLIBTCPIP,LIBTCPIP.SKT.CLOSEA
.3 lda hLIBTCPIP .3 lda hLIBTCPIP
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------

View File

@ -53,6 +53,7 @@ A2osX.E0 .PH $E000
.INB /A2OSX.SRC/SYS/KERNEL.S.IRQ .INB /A2OSX.SRC/SYS/KERNEL.S.IRQ
.INB /A2OSX.SRC/SYS/KERNEL.S.MEM .INB /A2OSX.SRC/SYS/KERNEL.S.MEM
.INB /A2OSX.SRC/SYS/KERNEL.S.IO .INB /A2OSX.SRC/SYS/KERNEL.S.IO
********* TMP ***** go to A2osX.D1
.INB /A2OSX.SRC/SYS/KERNEL.S.FIO .INB /A2OSX.SRC/SYS/KERNEL.S.FIO
DevMgr.FreeMem .EQ * DevMgr.FreeMem .EQ *
.EP .EP

View File

@ -398,7 +398,7 @@ CS.QUIT >LDA.G PAK.hFileName
>SYSCALL FreeMem >SYSCALL FreeMem
.8 lda hLIBPAK .8 lda hLIBPAK
>SYSCALL UnloadLib.A >SYSCALL UnloadLib
clc clc
rts rts
*-------------------------------------- *--------------------------------------