mirror of
https://github.com/A2osX/A2osX.git
synced 2024-07-13 13:29:04 +00:00
Kernel 0.92+
This commit is contained in:
parent
2069187dd2
commit
578f8fc22f
Binary file not shown.
@ -65,6 +65,7 @@ CS.RUN >LDYA L.MemStat
|
|||||||
>PUSHBI 8
|
>PUSHBI 8
|
||||||
>LDYA L.MSG.Stat
|
>LDYA L.MSG.Stat
|
||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
|
>SLEEP
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
>LDYA L.MSG.Aux
|
>LDYA L.MSG.Aux
|
||||||
>SYSCALL puts
|
>SYSCALL puts
|
||||||
@ -83,6 +84,7 @@ CS.RUN >LDYA L.MemStat
|
|||||||
>PUSHBI 8
|
>PUSHBI 8
|
||||||
>LDYA L.MSG.Stat
|
>LDYA L.MSG.Stat
|
||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
|
>SLEEP
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
>LDYA L.MSG.Kernel
|
>LDYA L.MSG.Kernel
|
||||||
>SYSCALL puts
|
>SYSCALL puts
|
||||||
|
@ -115,9 +115,14 @@ CS.RUN
|
|||||||
CS.RUN.LOOP >SLEEP
|
CS.RUN.LOOP >SLEEP
|
||||||
|
|
||||||
jsr CS.RUN.GETLINE
|
jsr CS.RUN.GETLINE
|
||||||
bcs .13
|
bcc .1
|
||||||
|
|
||||||
>INCW.G LineNum
|
tay
|
||||||
|
beq CS.RUN.LOOP
|
||||||
|
|
||||||
|
bra .13
|
||||||
|
|
||||||
|
.1 >INCW.G LineNum
|
||||||
|
|
||||||
>LDA.G LineCount
|
>LDA.G LineCount
|
||||||
bne .22
|
bne .22
|
||||||
@ -185,8 +190,13 @@ CS.RUN.PAUSE >PUSHBI 0
|
|||||||
bne .10
|
bne .10
|
||||||
|
|
||||||
jsr CS.RUN.ERASE
|
jsr CS.RUN.ERASE
|
||||||
|
|
||||||
|
.40 >SLEEP
|
||||||
jsr CS.RUN.GETLINE
|
jsr CS.RUN.GETLINE
|
||||||
bcc .5
|
bcc .5
|
||||||
|
tay
|
||||||
|
beq .40
|
||||||
|
|
||||||
cmp #MLI.E.EOF
|
cmp #MLI.E.EOF
|
||||||
bne .99
|
bne .99
|
||||||
|
|
||||||
@ -228,9 +238,8 @@ CS.RUN.GETLINE >PUSHWI 256
|
|||||||
|
|
||||||
ldy #S.PS.hStdIn
|
ldy #S.PS.hStdIn
|
||||||
lda (pPS),y
|
lda (pPS),y
|
||||||
|
|
||||||
.1 >SYSCALL fgets
|
|
||||||
|
|
||||||
|
.1 >SYSCALL fgets
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
lda (ZPBufPtr)
|
lda (ZPBufPtr)
|
||||||
|
@ -201,7 +201,7 @@ CS.QUIT clc
|
|||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.END
|
CS.END
|
||||||
MSG0 .AZ "\e[7lID CPU% Flags UID PID Command Line"
|
MSG0 .AZ "\e[7lID CPU\% Flags UID PID Command Line\r\n"
|
||||||
MSG1 .AZ "%03d %3d\% %s %03d %03d"
|
MSG1 .AZ "%03d %3d\% %s %03d %03d"
|
||||||
MSG2 .AZ " %s"
|
MSG2 .AZ " %s"
|
||||||
MSG3 .AZ "\r\n"
|
MSG3 .AZ "\r\n"
|
||||||
|
@ -88,6 +88,9 @@ CORE.Run >LDYA ZPInputBufPtr Save Actual cmd for looping
|
|||||||
|
|
||||||
jsr CORE.GetNextCharNB
|
jsr CORE.GetNextCharNB
|
||||||
bcs CORE.Run.CSYN
|
bcs CORE.Run.CSYN
|
||||||
|
bra .3
|
||||||
|
|
||||||
|
.21 jsr IO.Reset
|
||||||
|
|
||||||
.3 cmp #'.'
|
.3 cmp #'.'
|
||||||
bne .4
|
bne .4
|
||||||
@ -117,7 +120,7 @@ CORE.Run >LDYA ZPInputBufPtr Save Actual cmd for looping
|
|||||||
.5 >LDYA L.CORE.IO
|
.5 >LDYA L.CORE.IO
|
||||||
jsr CORE.LookupInputBuf
|
jsr CORE.LookupInputBuf
|
||||||
bcs .6
|
bcs .6
|
||||||
|
|
||||||
jsr CORE.SkipCharsA
|
jsr CORE.SkipCharsA
|
||||||
|
|
||||||
jsr CORE.IO.JMP
|
jsr CORE.IO.JMP
|
||||||
@ -137,6 +140,8 @@ CORE.Run >LDYA ZPInputBufPtr Save Actual cmd for looping
|
|||||||
|
|
||||||
jsr IO.Pipe.Out
|
jsr IO.Pipe.Out
|
||||||
bcs CORE.Run.RTS
|
bcs CORE.Run.RTS
|
||||||
|
|
||||||
|
jsr CORE.IO.AMP run in background
|
||||||
|
|
||||||
bra CORE.ExecCmd.1 Do not skip |
|
bra CORE.ExecCmd.1 Do not skip |
|
||||||
|
|
||||||
@ -177,7 +182,7 @@ CORE.ExecCmd.1 lda #0
|
|||||||
rts
|
rts
|
||||||
|
|
||||||
CORE.ExecExtCmd >PUSHB.G CORE.PSFlags
|
CORE.ExecExtCmd >PUSHB.G CORE.PSFlags
|
||||||
>LDYA ZPArgVBuf
|
>LDYA ZPArgVBuf
|
||||||
>SYSCALL execv
|
>SYSCALL execv
|
||||||
|
|
||||||
CORE.ExecExtCmd.Exit
|
CORE.ExecExtCmd.Exit
|
||||||
@ -388,12 +393,15 @@ CORE.IO.2OUT.1 jsr CORE.IO.Open
|
|||||||
CORE.IO.Open pha Open Mode
|
CORE.IO.Open pha Open Mode
|
||||||
jsr CORE.GetCharNB
|
jsr CORE.GetCharNB
|
||||||
bcs .9 no arg left....
|
bcs .9 no arg left....
|
||||||
|
|
||||||
|
jsr CORE.ArgV.Add Get Filename
|
||||||
|
|
||||||
>PUSHWI 0 Aux type
|
>PUSHWI 0 Aux type
|
||||||
>PUSHBI S.FI.T.TXT ftype
|
>PUSHBI S.FI.T.TXT ftype
|
||||||
pla
|
pla
|
||||||
>PUSHA flags
|
>PUSHA flags
|
||||||
>LDYA ZPInputBufPtr
|
>LDYA ZPArgVBufPrev
|
||||||
|
>STYA ZPArgVBufPtr Discard filename
|
||||||
>SYSCALL fopen
|
>SYSCALL fopen
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
10
BIN/SH.S.txt
10
BIN/SH.S.txt
@ -210,7 +210,6 @@ CS.RUN jsr CL.Init
|
|||||||
>LDYA L.MSG.GREETINGS
|
>LDYA L.MSG.GREETINGS
|
||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
bcs CS.INIT.RTS
|
bcs CS.INIT.RTS
|
||||||
bra CS.RUN.LOOP
|
|
||||||
|
|
||||||
>PUSHEA.G StatBuf
|
>PUSHEA.G StatBuf
|
||||||
>LDYA L.HOME.PROFILE
|
>LDYA L.HOME.PROFILE
|
||||||
@ -306,6 +305,11 @@ CS.RUN.INTERACTIVE
|
|||||||
>LDA.G CL.bReady Something to execute ?
|
>LDA.G CL.bReady Something to execute ?
|
||||||
bpl .1
|
bpl .1
|
||||||
|
|
||||||
|
>PUSHBI 0
|
||||||
|
>LDYA L.MSG.ECHOCRLF
|
||||||
|
>SYSCALL printf
|
||||||
|
bcs .9
|
||||||
|
|
||||||
lda (ZPCLBuf)
|
lda (ZPCLBuf)
|
||||||
beq .8 Empty line
|
beq .8 Empty line
|
||||||
|
|
||||||
@ -360,9 +364,7 @@ CS.RUN.READ jsr CL.RESET
|
|||||||
|
|
||||||
.8 jmp CS.RUN.LOOP.END
|
.8 jmp CS.RUN.LOOP.END
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.BATCH jsr IO.Reset
|
CS.RUN.BATCH >SYSCALL GetChar
|
||||||
|
|
||||||
>SYSCALL GetChar
|
|
||||||
bcs .2
|
bcs .2
|
||||||
|
|
||||||
cmp #3 test Ctrl-c
|
cmp #3 test Ctrl-c
|
||||||
|
@ -224,7 +224,7 @@ MSG.ECHOCRLF .AZ "\r\n"
|
|||||||
MSG.ECHODEL .DA #C.BS,#C.SPACE,#C.BS,#0
|
MSG.ECHODEL .DA #C.BS,#C.SPACE,#C.BS,#0
|
||||||
ENV.SHELL .AZ "SHELL"
|
ENV.SHELL .AZ "SHELL"
|
||||||
ENV.HOME .AZ "HOME"
|
ENV.HOME .AZ "HOME"
|
||||||
SHELL .AZ "${ROOT}BIN/SHELL"
|
SHELL .AZ "${ROOT}BIN/SH"
|
||||||
HOME .AZ "${ROOT}ROOT/"
|
HOME .AZ "${ROOT}ROOT/"
|
||||||
.HS 00
|
.HS 00
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user