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

Kernel version 0.8 : RUNNING!!! now making BIN/SBIN/DRV/LIB using new API

Browse Source
This commit is contained in:
Rémy GIBERT 2016-10-07 08:09:25 +02:00
parent 16deea2112
commit d0c5f1ce3b
20 changed files with 64 additions and 65 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
A2OSX.BOOT.po
View File

Binary file not shown.

BIN
A2OSX.DEV.po
View File

Binary file not shown.

BIN
A2OSX.SRC.po
View File

Binary file not shown.

12
A2osX.STARTUP.txt
View File

@ -16,21 +16,21 @@ STARTPROC GETTY CON ${A2OSX}SBIN/LOGIN
#STARTPROC GETTY COM2 LOGIN #STARTPROC GETTY COM2 LOGIN
#INSDRV PIC.DRV #INSDRV PIC.DRV
# Network Section # Network Section
#INSDRV UTHERNET.DRV 000E3A123456 INSDRV UTHERNET.DRV 000E3A123456
#INSDRV UTHERNET2.DRV 0008DC123456 #INSDRV UTHERNET2.DRV 0008DC123456
#INSDRV UTHER2.AI.DRV 0008DC123456 #INSDRV UTHER2.AI.DRV 0008DC123456
#INSDRV LANCEGS.DRV #INSDRV LANCEGS.DRV
#STARTPROC TCPIP STARTPROC TCPIP
#STARTPROC DHCPCLNT STARTPROC DHCPCLNT
#STARTPROC HTTPD #STARTPROC HTTPD
#TELNETD #TELNETD
#NFSMOUNT 192.168.1.5:/A2OSX /MNT/A2OSX #NFSMOUNT 192.168.1.5:/A2OSX /MNT/A2OSX
#CIFSMOUNT 192.168.1.5:/MSSHARE /MNT/MSSHARE #CIFSMOUNT 192.168.1.5:/MSSHARE /MNT/MSSHARE
# End Network Section # End Network Section
# GUI Section # GUI Section
#INSDRV DHGR.DRV INSDRV DHGR.DRV
#INSDRV MOUSE.DRV INSDRV MOUSE.DRV
#STARTPROC DESKTOP STARTPROC DESKTOP
# End GUI Section # End GUI Section
ECHO *** End A2osX Startup file *** ECHO *** End A2osX Startup file ***
MAN MAN

2
BIN/ASM.S.txt
View File

@ -6,7 +6,7 @@ AUTO 6
.LIST OFF .LIST OFF
.OP 65C02 .OP 65C02
.OR $2000 .OR $2000
.TF /A2OSX.BOOT/BIN/ASM .TF /A2OSX.DEV/BIN/ASM
*--------------------------------------- *---------------------------------------
.INB INC/MACROS.I .INB INC/MACROS.I
.INB INC/A2OSX.I .INB INC/A2OSX.I

2
BIN/ASM.T.6502.S.txt
View File

@ -5,7 +5,7 @@ INC 1
AUTO 6 AUTO 6
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.6502 .TF /A2OSX.DEV/BIN/ASM.T.6502
*--------------------------------------- *---------------------------------------
.MA ST .MA ST
.DA #:1-*-1 .DA #:1-*-1

2
BIN/ASM.T.65816.S.txt
View File

@ -5,7 +5,7 @@ INC 1
AUTO 6 AUTO 6
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65816 .TF /A2OSX.DEV/BIN/ASM.T.65816
*--------------------------------------- *---------------------------------------
.MA ST .MA ST
.DA #:1-*-1 .DA #:1-*-1

2
BIN/ASM.T.65C02.S.txt
View File

@ -5,7 +5,7 @@ INC 1
AUTO 6 AUTO 6
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65C02 .TF /A2OSX.DEV/BIN/ASM.T.65C02
*--------------------------------------- *---------------------------------------
.MA ST .MA ST
.DA #:1-*-1 .DA #:1-*-1

2
BIN/ASM.T.65R02.S.txt
View File

@ -5,7 +5,7 @@ INC 1
AUTO 6 AUTO 6
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65R02 .TF /A2OSX.DEV/BIN/ASM.T.65R02
*--------------------------------------- *---------------------------------------
.MA ST .MA ST
.DA #:1-*-1 .DA #:1-*-1

2
BIN/ASM.T.65W02.S.txt
View File

@ -5,7 +5,7 @@ INC 1
AUTO 6 AUTO 6
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65W02 .TF /A2OSX.DEV/BIN/ASM.T.65W02
*--------------------------------------- *---------------------------------------
.MA ST .MA ST
.DA #:1-*-1 .DA #:1-*-1

2
BIN/ASM.T.SW16.S.txt
View File

@ -5,7 +5,7 @@ INC 1
AUTO 6 AUTO 6
.LIST OFF .LIST OFF
.OR $0 .OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.SW16 .TF /A2OSX.DEV/BIN/ASM.T.SW16
*--------------------------------------- *---------------------------------------
.MA ST .MA ST
.DA #:1-*-1 .DA #:1-*-1

4
BIN/LS.S.txt
View File

@ -114,7 +114,7 @@ CS.RUN ldy #bCANCEL
adc #0 adc #0
sta ZPPtr2+1 sta ZPPtr2+1
ldy #S.STAT.TYPE ldy #S.STAT.PRODOS.TYPE
lda (ZPPtr2),y lda (ZPPtr2),y
cmp #$0F Directory ? cmp #$0F Directory ?
bne .31 bne .31
@ -125,7 +125,7 @@ CS.RUN ldy #bCANCEL
.31 >LDYA ZPPtr1 .31 >LDYA ZPPtr1
>SYSCALL SYS.PStrOutYA >SYSCALL SYS.PStrOutYA
ldy #S.STAT.TYPE ldy #S.STAT.PRODOS.TYPE
lda (ZPPtr2),y lda (ZPPtr2),y
cmp #$0F Directory ? cmp #$0F Directory ?
beq .32 beq .32

2
BIN/LSDEV.S.txt
View File

@ -79,7 +79,7 @@ CS.INIT >LDYA L.LIBSTR
lda ZPPTR1 lda ZPPTR1
clc clc
adc #S.DEV.SIZE adc #S.DEV
sta ZPPTR1 sta ZPPTR1
bcc .3 bcc .3
inc ZPPTR1+1 inc ZPPTR1+1

2
BIN/MD.S.txt
View File

@ -42,7 +42,7 @@ CS.INIT >SYSCALL SYS.GetArgC
>SYSCALL SYS.GetArgA >SYSCALL SYS.GetArgA
>SYSCALL SYS.GetFullPathYA >SYSCALL SYS.GetFullPathYA
stx hFullPath stx hFullPath
>SYSCALL SYS.MLICreateDirYA >SYSCALL SYS.MKDIRYA
pha save error code pha save error code
jsr .98 jsr .98
pla pla

4
BIN/NETSTAT.S.txt
View File

@ -93,9 +93,9 @@ CS.INIT >LDYA L.LIBSTR
bne .2 bne .2
lda (ZPPTR1) lda (ZPPTR1)
cmp #S.SOCKET.SOCK.SEQPACKET cmp #S.SOCKET.SOCK.STREAM
bcc .3 bcc .3
lda #S.SOCKET.SOCK.SEQPACKET+1 lda #S.SOCKET.SOCK.STREAM
.3 asl .3 asl
tax tax
>PUSHB L.MSG1+1,x >PUSHB L.MSG1+1,x

4
BIN/PS.S.txt
View File

@ -45,7 +45,7 @@ CS.INIT >LDYA L.LIBSTR
clc clc
rts rts
*-------------------------------------- *--------------------------------------
CS.RUN >LDYAI TSKMGR.TABLE+S.PS.SIZE CS.RUN >LDYAI TSKMGR.TABLE+S.PS
>STYA ZPPTR1 >STYA ZPPTR1
stz PS.COUNT stz PS.COUNT
@ -75,7 +75,7 @@ CS.RUN >LDYAI TSKMGR.TABLE+S.PS.SIZE
.4 lda ZPPTR1 .4 lda ZPPTR1
clc clc
adc #S.PS.SIZE adc #S.PS
sta ZPPTR1 sta ZPPTR1
bcc .5 bcc .5
inc ZPPTR1+1 inc ZPPTR1+1

28
INC/A2osX.I.txt
View File

@ -13,29 +13,31 @@ K.DEV.MAX .EQ 16
K.FLT.MAX .EQ 8 K.FLT.MAX .EQ 8
K.PS.MAX .EQ 64 K.PS.MAX .EQ 64
*-------------------------------------- *--------------------------------------
* Aux ZP * Kernel ZP Aux
*-------------------------------------- *--------------------------------------
ZPKERNEL .EQ $0 ZPKERNEL .EQ $0
*-------------------------------------- *--------------------------------------
ZPMEMMGR .EQ $8 ZPMEMMGR .EQ $10
*-------------------------------------- *--------------------------------------
pCode .EQ $10 pCode .EQ $20
pData .EQ $12 pData .EQ $22
pStack .EQ $14 pStack .EQ $24
pLib .EQ $16 pLib .EQ $26
pDrv .EQ $18 pDrv .EQ $28
pPs .EQ $1A pPs .EQ $2A
pDev .EQ $1C pDev .EQ $2C
pEvent .EQ $1E pEvent .EQ $2E
*--------------------------------------
ZPDRV .EQ $30
ZPBIN .EQ $40
*-------------------------------------- *--------------------------------------
* $3A-$3F ProDOS Block Device Drivers Main * $3A-$3F ProDOS Block Device Drivers Main
*--------------------------------------
* $5E-$C8 RESERVED APPLESOFT Main/Aux (ROM Call, no need to switch back MainZP) * $5E-$C8 RESERVED APPLESOFT Main/Aux (ROM Call, no need to switch back MainZP)
*-------------------------------------- *--------------------------------------
ZPDRV .EQ $80 ZPLIB .EQ $E0 32 bytes for TCPIP
ZPBIN .EQ $90
ZPLIB .EQ $A0 32 bytes for TCPIP
*-------------------------------------- *--------------------------------------
* Memory Map * Memory Map
*-------------------------------------- *--------------------------------------

13
LIB/LIBGFX.S.txt
View File

@ -54,6 +54,17 @@ InitGFXA sta hDev
.9 stz hDev .9 stz hDev
sec sec
rts rts
*--------------------------------------
InitCursor
*--------------------------------------
SetCursorYA
*--------------------------------------
HideCursor
*--------------------------------------
ShowCursor
clc
rts
*-------------------------------------- *--------------------------------------
.INB LIB/LIBGFX.S.CUR .INB LIB/LIBGFX.S.CUR
*-------------------------------------- *--------------------------------------
@ -95,7 +106,7 @@ CUR.Arrow.MASK .DA %00000000.000000000
.DA %00000000.000000000 .DA %00000000.000000000
.DA %00000000.000000000 .DA %00000000.000000000
*-------------------------------------- *--------------------------------------
PAT.Arrow .DA #S.BITMAP.F.BBP1 PAT.Arrow .DA #S.BM.F.BBP1
.DA #1 RowBytes .DA #1 RowBytes
.DA 7 W .DA 7 W
.DA 8 H .DA 8 H

2
SBIN/DHCPCLNT.S.txt
View File

@ -12,7 +12,7 @@ AUTO 6
.INB INC/A2OSX.I .INB INC/A2OSX.I
.INB INC/LIBTCPIP.I .INB INC/LIBTCPIP.I
*-------------------------------------- *--------------------------------------
TIMEOUT.MAX .EQ 50 5 sec. TIMEOUT.MAX .EQ 100 10 sec.
*-------------------------------------- *--------------------------------------
ZPIPCfgPtr .EQ ZPBIN ZPIPCfgPtr .EQ ZPBIN
ZPFrameBase .EQ ZPBIN+2 ZPFrameBase .EQ ZPBIN+2

32
SYS/KERNEL.S.FIO.txt
View File

@ -16,17 +16,9 @@ AUTO 6
K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
>PULLYA Get Search list >PULLYA Get Search list
>SYSCALL SYS.ExpandPStrYA Expand it (SYSCALL to BNK1) >SYSCALL SYS.ExpandPStrYA Expand it (SYSCALL to BNK1)
* bcs .99 bcs .99
bcc .10
rts
.98 lda K.FileSearch.hSrch Discard Expanded hSrch list stx K.FileSearch.hSrch
jsr K.FreeMemA
lda #SYSMGR.ERRFNF
sec
rts
.10 stx K.FileSearch.hSrch
>STYA ZPQuickPtr3 ZPQuickPtr2 trashed by K.STAT !!! expanded search list ; >STYA ZPQuickPtr3 ZPQuickPtr2 trashed by K.STAT !!! expanded search list ;
stz K.FileSearch.Index stz K.FileSearch.Index
@ -42,12 +34,11 @@ K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
iny iny
lda (ZPQuickPtr3),y lda (ZPQuickPtr3),y
cmp #';' cmp #';'
beq .31 beq .3
inx inx
sta KrnBuf256,x sta KrnBuf256,x
bra .2 bra .2
.31 iny skip ';' for next try
.3 txa .3 txa
beq .98 String is empty....nothing to try beq .98 String is empty....nothing to try
@ -65,12 +56,6 @@ K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
stx KrnBuf256 set string length stx KrnBuf256 set string length
lda #'!'
>SYSCALL SYS.COutA
>LDYAI KrnBuf256
>SYSCALL SYS.PSTROutYA
>DEBUG
>PUSHWI KrnSTAT >PUSHWI KrnSTAT
>PUSHWI KrnBuf256 >PUSHWI KrnBuf256
jsr K.STAT jsr K.STAT
@ -78,15 +63,16 @@ K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
lda K.FileSearch.hSrch Discard Expanded hSrch list lda K.FileSearch.hSrch Discard Expanded hSrch list
jsr K.FreeMemA jsr K.FreeMemA
lda #'@'
>SYSCALL SYS.COutA
>LDYAI KrnBuf256
>SYSCALL SYS.PSTROutYA
>DEBUG
>LDYAI KrnBuf256 >LDYAI KrnBuf256
>SYSCALL SYS.NewPStrYA >SYSCALL SYS.NewPStrYA
.99 rts .99 rts
.98 lda K.FileSearch.hSrch Discard Expanded hSrch list
jsr K.FreeMemA
lda #SYSMGR.ERRFNF
sec
rts
*-------------------------------------- *--------------------------------------
K.FileSearch.hSrch .BS 1 K.FileSearch.hSrch .BS 1
K.FileSearch.Index .BS 1 K.FileSearch.Index .BS 1