Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-01-01 05:31:51 +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
#INSDRV PIC.DRV
# Network Section
#INSDRV UTHERNET.DRV 000E3A123456
INSDRV UTHERNET.DRV 000E3A123456
#INSDRV UTHERNET2.DRV 0008DC123456
#INSDRV UTHER2.AI.DRV 0008DC123456
#INSDRV LANCEGS.DRV
#STARTPROC TCPIP
#STARTPROC DHCPCLNT
STARTPROC TCPIP
STARTPROC DHCPCLNT
#STARTPROC HTTPD
#TELNETD
#NFSMOUNT 192.168.1.5:/A2OSX /MNT/A2OSX
#CIFSMOUNT 192.168.1.5:/MSSHARE /MNT/MSSHARE
# End Network Section
# GUI Section
#INSDRV DHGR.DRV
#INSDRV MOUSE.DRV
#STARTPROC DESKTOP
INSDRV DHGR.DRV
INSDRV MOUSE.DRV
STARTPROC DESKTOP
# End GUI Section
ECHO *** End A2osX Startup file ***
MAN

2
BIN/ASM.S.txt
View File

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

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

@ -5,7 +5,7 @@ INC 1
AUTO 6
.LIST OFF
.OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.6502
.TF /A2OSX.DEV/BIN/ASM.T.6502
*---------------------------------------
.MA ST
.DA #:1-*-1
@ -17,7 +17,7 @@ AUTO 6
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
T.ADDR.MODES .EQ *
T.ADDR.MODES .EQ *
>ST "(a),Y"
>ST "(a,X)"
>ST "a"

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

@ -5,7 +5,7 @@ INC 1
AUTO 6
.LIST OFF
.OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65816
.TF /A2OSX.DEV/BIN/ASM.T.65816
*---------------------------------------
.MA ST
.DA #:1-*-1
@ -17,7 +17,7 @@ AUTO 6
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
T.ADDR.MODES .EQ *
T.ADDR.MODES .EQ *
>ST "(a)"
>ST "(a),Y"
>ST "(a,S),Y"

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

@ -5,7 +5,7 @@ INC 1
AUTO 6
.LIST OFF
.OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65C02
.TF /A2OSX.DEV/BIN/ASM.T.65C02
*---------------------------------------
.MA ST
.DA #:1-*-1
@ -17,7 +17,7 @@ AUTO 6
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
T.ADDR.MODES .EQ *
T.ADDR.MODES .EQ *
>ST "(a)"
>ST "(a),Y"
>ST "(a,X)"

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

@ -5,7 +5,7 @@ INC 1
AUTO 6
.LIST OFF
.OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65R02
.TF /A2OSX.DEV/BIN/ASM.T.65R02
*---------------------------------------
.MA ST
.DA #:1-*-1
@ -17,7 +17,7 @@ AUTO 6
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
T.ADDR.MODES .EQ *
T.ADDR.MODES .EQ *
>ST "(a)"
>ST "(a),Y"
>ST "(a,X)"

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

@ -5,7 +5,7 @@ INC 1
AUTO 6
.LIST OFF
.OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.65W02
.TF /A2OSX.DEV/BIN/ASM.T.65W02
*---------------------------------------
.MA ST
.DA #:1-*-1
@ -17,7 +17,7 @@ AUTO 6
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
T.ADDR.MODES .EQ *
T.ADDR.MODES .EQ *
>ST "(a)"
>ST "(a),Y"
>ST "(a,X)"

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

@ -5,7 +5,7 @@ INC 1
AUTO 6
.LIST OFF
.OR $0
.TF /A2OSX.BOOT/BIN/ASM.T.SW16
.TF /A2OSX.DEV/BIN/ASM.T.SW16
*---------------------------------------
.MA ST
.DA #:1-*-1
@ -17,7 +17,7 @@ AUTO 6
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
T.ADDR.MODES .EQ *
T.ADDR.MODES .EQ *
>ST "R0"
>ST "R1"
>ST "R2"

4
BIN/LS.S.txt
View File

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

2
BIN/LSDEV.S.txt
View File

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

2
BIN/MD.S.txt
View File

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

4
BIN/NETSTAT.S.txt
View File

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

4
BIN/PS.S.txt
View File

@ -45,7 +45,7 @@ CS.INIT >LDYA L.LIBSTR
clc
rts
*--------------------------------------
CS.RUN >LDYAI TSKMGR.TABLE+S.PS.SIZE
CS.RUN >LDYAI TSKMGR.TABLE+S.PS
>STYA ZPPTR1
stz PS.COUNT
@ -75,7 +75,7 @@ CS.RUN >LDYAI TSKMGR.TABLE+S.PS.SIZE
.4 lda ZPPTR1
clc
adc #S.PS.SIZE
adc #S.PS
sta ZPPTR1
bcc .5
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.PS.MAX .EQ 64
*--------------------------------------
* Aux ZP
* Kernel ZP Aux
*--------------------------------------
ZPKERNEL .EQ $0
*--------------------------------------
ZPMEMMGR .EQ $8
ZPMEMMGR .EQ $10
*--------------------------------------
pCode .EQ $10
pData .EQ $12
pStack .EQ $14
pCode .EQ $20
pData .EQ $22
pStack .EQ $24
pLib .EQ $16
pDrv .EQ $18
pLib .EQ $26
pDrv .EQ $28
pPs .EQ $1A
pDev .EQ $1C
pEvent .EQ $1E
pPs .EQ $2A
pDev .EQ $2C
pEvent .EQ $2E
*--------------------------------------
ZPDRV .EQ $30
ZPBIN .EQ $40
*--------------------------------------
* $3A-$3F ProDOS Block Device Drivers Main
*--------------------------------------
* $5E-$C8 RESERVED APPLESOFT Main/Aux (ROM Call, no need to switch back MainZP)
*--------------------------------------
ZPDRV .EQ $80
ZPBIN .EQ $90
ZPLIB .EQ $A0 32 bytes for TCPIP
ZPLIB .EQ $E0 32 bytes for TCPIP
*--------------------------------------
* Memory Map
*--------------------------------------

13
LIB/LIBGFX.S.txt
View File

@ -54,6 +54,17 @@ InitGFXA sta hDev
.9 stz hDev
sec
rts
*--------------------------------------
InitCursor
*--------------------------------------
SetCursorYA
*--------------------------------------
HideCursor
*--------------------------------------
ShowCursor
clc
rts
*--------------------------------------
.INB LIB/LIBGFX.S.CUR
*--------------------------------------
@ -95,7 +106,7 @@ CUR.Arrow.MASK .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 7 W
.DA 8 H

2
SBIN/DHCPCLNT.S.txt
View File

@ -12,7 +12,7 @@ AUTO 6
.INB INC/A2OSX.I
.INB INC/LIBTCPIP.I
*--------------------------------------
TIMEOUT.MAX .EQ 50 5 sec.
TIMEOUT.MAX .EQ 100 10 sec.
*--------------------------------------
ZPIPCfgPtr .EQ ZPBIN
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
>PULLYA Get Search list
>SYSCALL SYS.ExpandPStrYA Expand it (SYSCALL to BNK1)
* bcs .99
bcc .10
rts
bcs .99
.98 lda K.FileSearch.hSrch Discard Expanded hSrch list
jsr K.FreeMemA
lda #SYSMGR.ERRFNF
sec
rts
.10 stx K.FileSearch.hSrch
stx K.FileSearch.hSrch
>STYA ZPQuickPtr3 ZPQuickPtr2 trashed by K.STAT !!! expanded search list ;
stz K.FileSearch.Index
@ -42,12 +34,11 @@ K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
iny
lda (ZPQuickPtr3),y
cmp #';'
beq .31
beq .3
inx
sta KrnBuf256,x
bra .2
.31 iny skip ';' for next try
.3 txa
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
lda #'!'
>SYSCALL SYS.COutA
>LDYAI KrnBuf256
>SYSCALL SYS.PSTROutYA
>DEBUG
>PUSHWI KrnSTAT
>PUSHWI KrnBuf256
jsr K.STAT
@ -78,15 +63,16 @@ K.FileSearch >PULLW ZPQuickPtr4 ZPQuickPtr1 trashed by ExpandPStrYA
lda K.FileSearch.hSrch Discard Expanded hSrch list
jsr K.FreeMemA
lda #'@'
>SYSCALL SYS.COutA
>LDYAI KrnBuf256
>SYSCALL SYS.PSTROutYA
>DEBUG
>LDYAI KrnBuf256
>SYSCALL SYS.NewPStrYA
.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.Index .BS 1