Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-02-09 02:30:35 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.9.1 : Code reorganization & move to CSTR : now, SBIN commands....

Browse Source
This commit is contained in:
Rémy GIBERT 2017-08-31 08:23:29 +02:00
parent ce434c6fee
commit a4cf170ce6
8 changed files with 30 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

BIN
.Floppies/A2OSX.SRC.po
View File

Binary file not shown.

22
SBIN/GETTY.S.txt
View File

@ -25,7 +25,7 @@ CS.START cld
.DA 0
.DA CS.END-CS.START
.DA DS.END-DS.START Data Segment to Allocate
.DA 0
.DA 16 SS
.DA 0
*--------------------------------------
* Relocation Table
@ -53,7 +53,7 @@ CS.INIT >SYSCALL GetArgC
.1 lda #1
>SYSCALL GetArg.A
>SYSCALL MkNodYA
>SYSCALL MkNod.YA
bcs .9
ldy #S.PS.hStdIn
@ -85,7 +85,7 @@ CS.INIT >SYSCALL GetArgC
CS.RUN jsr Init.Timeout
.66 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcc .1
bcs .66
* jsr Wait.Timeout
@ -95,7 +95,7 @@ CS.RUN jsr Init.Timeout
.10 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .1
@ -106,7 +106,7 @@ CS.RUN jsr Init.Timeout
jmp .2
.11 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .11
ldy #IAC.VERB
@ -115,7 +115,7 @@ CS.RUN jsr Init.Timeout
* jsr PRINT.DEBUG
.12 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .12
ldy #IAC.OPT
@ -134,7 +134,7 @@ CS.RUN jsr Init.Timeout
bne .15 only interested in Term Type, go get IAC,SE
.13 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .13
cmp #SB.IS not a valid reply, go get IAC,SE
@ -144,7 +144,7 @@ CS.RUN jsr Init.Timeout
sta (pData) reset IAC.TERM
.14 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .14
cmp #IAC
@ -161,14 +161,14 @@ CS.RUN jsr Init.Timeout
bra .14
.15 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .15
cmp #IAC
bne .15
.16 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .16
cmp #SE
@ -234,7 +234,7 @@ PRINT.DEBUG phx
pha
lda #2
>SYSCALL GetDevByIDA
>SYSCALL GetDevByID.A
bcs .9
>STYA ZPTmp1

2
SBIN/INSDRV.S.txt
View File

@ -24,7 +24,7 @@ CS.START cld
.DA 0
.DA CS.END-CS.START Code Length To Relocate
.DA 0 Data Segment to Allocate
.DA 0
.DA 16 SS
.DA 0
*--------------------------------------
* Relocation Table

6
SBIN/LOGIN.S.txt
View File

@ -24,7 +24,7 @@ CS.START cld
.DA 0
.DA CS.END-CS.START Code Length To Relocate
.DA DS.END-DS.START Data Segment to Allocate
.DA 0
.DA 16 SS
.DA 0
*--------------------------------------
* Relocation Table
@ -58,7 +58,7 @@ CS.RUN lda #0
jsr INPUT.RESET
.1 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .1 no char
jsr INPUT.CHARIN
jsr INPUT.LINEIN
@ -72,7 +72,7 @@ CS.RUN lda #0
jsr INPUT.RESET
.2 >SYSCALL Sleep
>SYSCALL GetC
>SYSCALL GetChar
bcs .2 no char
jsr INPUT.CHARIN
jsr INPUT.LINEIN

24
SBIN/SHELL.S.CMD.txt
View File

@ -156,7 +156,7 @@ Cmd.Exec.EXT ldy #1
>LDYA L.ENV.PATH push ENVNAME=PATH for search
>SYSCALL GetEnvYA get value for ENV=PATH
>SYSCALL GetEnv.YA get value for ENV=PATH
bcs .1 No PATH, try in CD
>PUSHYA push search list
@ -181,7 +181,7 @@ Cmd.Exec.EXT ldy #1
>PUSHYA
>PUSHW L.CMD replace CMD in TmpBuffer with full path
>SYSCALL PStrCpy
>SYSCALL StrCpy
pla
>SYSCALL FreeMem.A Discard this string...
@ -213,7 +213,7 @@ Cmd.Exec.EXT.TXT
>SYSCALL GetArg.A
>PUSHYA
>PUSHWI UsrBuf256
>SYSCALL PStrCpy
>SYSCALL StrCpy
inc UsrBuf256 Add a space....
ldy UsrBuf256
@ -225,7 +225,7 @@ Cmd.Exec.EXT.TXT
Cmd.Exec.EXT.BIN
>PUSHW L.CMD
>PUSHWI UsrBuf256
>SYSCALL PStrCat
>SYSCALL StrCat
lda ARGS
beq .1
@ -237,7 +237,7 @@ Cmd.Exec.EXT.BIN
>PUSHW L.ARGS
>PUSHWI UsrBuf256
>SYSCALL PStrCat
>SYSCALL StrCat
.1 >LDYAI UsrBuf256
bit bStartProc
@ -272,11 +272,11 @@ Cmd.Exec.CD1 stz UsrBuf256
>SYSCALL GetMemPtr.A
>PUSHYA
>PUSHWI UsrBuf256
>SYSCALL PStrCpy
>SYSCALL StrCpy
.1 >PUSHW L.ARGS Append ARG to buffer
>PUSHWI UsrBuf256
>SYSCALL PStrCat
>SYSCALL StrCat
lda #'/'
ldx UsrBuf256
@ -350,7 +350,7 @@ Cmd.Exec.CD1 stz UsrBuf256
bne Cmd.Exec.ERRSYN
.80 >LDYAI UsrBuf256
>SYSCALL NewPStrYA
>SYSCALL NewStr.YA
bcs .9
phx
@ -438,18 +438,18 @@ Cmd.Exec.SETVAR tax
beq .99 syntax error
>LDYA L.ARGS String is VAR=VALUE...
>SYSCALL PutEnvYA
>SYSCALL PutEnv.YA
rts
.2 dec ARGS String is "VAR=", Remove endig '='
>LDYA L.ARGS String is "VAR"...
>SYSCALL UnsetEnvYA
>SYSCALL UnsetEnv.YA
rts
* Print requested VAR
.3 >LDYA L.ARGS
>SYSCALL GetEnvYA
>SYSCALL GetEnv.YA
bcs .8
>PUSHYA push value
@ -608,7 +608,7 @@ Cmd.Exec.SLEEP lda ARGS
adc pData+1
>PUSHYA
>PUSHW L.ARGS
>SYSCALL AToI
>SYSCALL AToI.YA
bcs .9

2
SBIN/SHELL.S.CSH.txt
View File

@ -519,7 +519,7 @@ CSH.GetNumInACC ldy #0
>PUSHW L.CSH.ACC
>PUSHW L.ARGS
>SYSCALL AToI
>SYSCALL AToL
bcs .9
rts

4
SBIN/SHELL.S.txt
View File

@ -42,7 +42,7 @@ CS.START cld
.DA 0
.DA CS.END-CS.START Code Length To Relocate
.DA DS.END-DS.START Data Segment to Allocate
.DA 0
.DA 64 SS
.DA 0
*--------------------------------------
* Relocation Table
@ -498,7 +498,7 @@ SetPWD ldy #S.PS.hPREFIX
rts
*--------------------------------------
PrintPrompt >LDYA L.ENV.PS1
>SYSCALL GetEnvYA
>SYSCALL GetEnv.YA
>SYSCALL ExpandStr.YA
phx
>PUSHYA