mirror of
https://github.com/A2osX/A2osX.git
synced 2024-09-10 22:54:59 +00:00
Kernel version 0.9 : Investigzting Terminal types...
This commit is contained in:
parent
0bbbeac390
commit
a8fec4ccfa
BIN
A2OSX.BOOT.po
BIN
A2OSX.BOOT.po
Binary file not shown.
BIN
A2OSX.SRC.po
BIN
A2OSX.SRC.po
Binary file not shown.
@ -9,13 +9,11 @@ SET PATH=${PATH};/A2OSX.DEV/BIN/
|
|||||||
SET PS1='$PWD'
|
SET PS1='$PWD'
|
||||||
# Main Screen
|
# Main Screen
|
||||||
INSDRV CONSOLE.DRV
|
INSDRV CONSOLE.DRV
|
||||||
ECHO toto
|
|
||||||
STARTPROC GETTY CON ${A2OSX}SBIN/LOGIN
|
STARTPROC GETTY CON ${A2OSX}SBIN/LOGIN
|
||||||
ECHO jojo
|
|
||||||
# Serial Login
|
# Serial Login
|
||||||
#INSDRV SSC.DRV 9600,N,8,1,X
|
#INSDRV SSC.DRV 9600,N,8,1,X
|
||||||
#INSDRV SSC.I.DRV 9600,N,8,1,X
|
INSDRV SSC.I.DRV 9600,N,8,1,X
|
||||||
#STARTPROC GETTY COM2 ${A2OSX}SBIN/LOGIN
|
STARTPROC GETTY COM2 ${A2OSX}SBIN/LOGIN
|
||||||
#INSDRV PIC.DRV
|
#INSDRV PIC.DRV
|
||||||
# Network Section
|
# Network Section
|
||||||
#INSDRV UTHERNET.DRV 000E3A123456
|
#INSDRV UTHERNET.DRV 000E3A123456
|
||||||
|
@ -167,7 +167,7 @@ READ php
|
|||||||
beq .9
|
beq .9
|
||||||
|
|
||||||
lda INBUF,x
|
lda INBUF,x
|
||||||
jsr READ.DEBUG
|
* jsr READ.DEBUG
|
||||||
inx
|
inx
|
||||||
cpx #BUF.SIZE
|
cpx #BUF.SIZE
|
||||||
bne .1
|
bne .1
|
||||||
|
@ -54,7 +54,6 @@ CS.INIT >SYSCALL GetArgC
|
|||||||
>SYSCALL MkNodYA
|
>SYSCALL MkNodYA
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
txa
|
|
||||||
ldy #S.PS.hStdIn
|
ldy #S.PS.hStdIn
|
||||||
sta (pPs),y
|
sta (pPs),y
|
||||||
ldy #S.PS.hStdOut
|
ldy #S.PS.hStdOut
|
||||||
@ -79,39 +78,49 @@ CS.INIT >SYSCALL GetArgC
|
|||||||
CS.RUN
|
CS.RUN
|
||||||
>LDYA L.MSG.TELNETOPT
|
>LDYA L.MSG.TELNETOPT
|
||||||
>SYSCALL CPrintFYA
|
>SYSCALL CPrintFYA
|
||||||
bcs .8
|
bcs *
|
||||||
|
|
||||||
*.10 >SYSCALL GetC
|
lda #$83
|
||||||
* bcc .10
|
jsr PRINT.DEBUG
|
||||||
|
|
||||||
bra .3
|
|
||||||
|
|
||||||
* lda #5 Ctrl-E
|
|
||||||
* >SYSCALL PutCA
|
|
||||||
* bcs .8
|
|
||||||
|
|
||||||
.1 >SYSCALL Sleep
|
.1 >SYSCALL Sleep
|
||||||
>SYSCALL GetC
|
>SYSCALL GetC
|
||||||
bcs .2
|
bcs .2
|
||||||
|
|
||||||
|
jsr PRINT.DEBUG
|
||||||
|
bra .1
|
||||||
|
|
||||||
|
.2 lda #5 Ctrl-E
|
||||||
|
>SYSCALL PutCA
|
||||||
|
bcs *
|
||||||
|
|
||||||
|
lda #$84
|
||||||
|
jsr PRINT.DEBUG
|
||||||
|
|
||||||
|
.3 >SYSCALL Sleep
|
||||||
|
>SYSCALL GetC
|
||||||
|
bcs .4
|
||||||
|
|
||||||
|
jsr PRINT.DEBUG
|
||||||
|
|
||||||
tax
|
tax
|
||||||
lda (pData)
|
lda (pData)
|
||||||
cmp #63
|
cmp #63
|
||||||
beq .2
|
beq .4
|
||||||
inc
|
inc
|
||||||
sta (pData)
|
sta (pData)
|
||||||
tay
|
tay
|
||||||
txa
|
txa
|
||||||
sta (pData),y
|
sta (pData),y
|
||||||
bra .1
|
bra .3
|
||||||
|
|
||||||
.2 lda (pData)
|
.4 lda (pData)
|
||||||
beq .3
|
beq .5
|
||||||
>PUSHW pdata
|
>PUSHW pdata
|
||||||
>PUSHW L.TERM
|
>PUSHW L.TERM
|
||||||
>SYSCALL SetEnv
|
>SYSCALL SetEnv
|
||||||
|
|
||||||
.3 >LDYA L.MSG.GREETINGS
|
.5 >LDYA L.MSG.GREETINGS
|
||||||
>SYSCALL CPrintFYA
|
>SYSCALL CPrintFYA
|
||||||
|
|
||||||
bcs .8 unable to send greetings...loop..
|
bcs .8 unable to send greetings...loop..
|
||||||
@ -139,7 +148,58 @@ CS.QUIT ldy #hBinName
|
|||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
PRINT.DEBUG phx
|
||||||
|
phy
|
||||||
|
pha
|
||||||
|
|
||||||
|
lda #2
|
||||||
|
>SYSCALL GetDevByIDA
|
||||||
|
bcs .9
|
||||||
|
|
||||||
|
>STYA ZPTmp1
|
||||||
|
lda (ZPTmp1)
|
||||||
|
sta PRINT.DEBUG.JMP+1
|
||||||
|
ldy #1
|
||||||
|
lda (ZPTmp1),y
|
||||||
|
sta PRINT.DEBUG.JMP+2
|
||||||
|
|
||||||
|
lda #'{'
|
||||||
|
ldx #DEVMGR.WRITE
|
||||||
|
jsr PRINT.DEBUG.JMP
|
||||||
|
|
||||||
|
pla
|
||||||
|
pha
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
tax
|
||||||
|
lda PRINT.DEBUG.CHAR,x
|
||||||
|
|
||||||
|
ldx #DEVMGR.WRITE
|
||||||
|
jsr PRINT.DEBUG.JMP
|
||||||
|
|
||||||
|
pla
|
||||||
|
pha
|
||||||
|
and #$0F
|
||||||
|
tax
|
||||||
|
lda PRINT.DEBUG.CHAR,x
|
||||||
|
|
||||||
|
ldx #DEVMGR.WRITE
|
||||||
|
jsr PRINT.DEBUG.JMP
|
||||||
|
|
||||||
|
lda #'}'
|
||||||
|
ldx #DEVMGR.WRITE
|
||||||
|
jsr PRINT.DEBUG.JMP
|
||||||
|
|
||||||
|
.9 pla
|
||||||
|
ply
|
||||||
|
plx
|
||||||
|
rts
|
||||||
|
PRINT.DEBUG.JMP jmp $ffff
|
||||||
|
*--------------------------------------
|
||||||
CS.END
|
CS.END
|
||||||
|
PRINT.DEBUG.CHAR .AS "0123456789ABCDEF"
|
||||||
MSG.USAGE >CSTR "GETTY <DEV> <PROGRAM>\r\n"
|
MSG.USAGE >CSTR "GETTY <DEV> <PROGRAM>\r\n"
|
||||||
MSG.TELNETOPT
|
MSG.TELNETOPT
|
||||||
* .DA #IAC,#DO,#TELOPT.LINEMODE
|
* .DA #IAC,#DO,#TELOPT.LINEMODE
|
||||||
@ -148,6 +208,7 @@ MSG.TELNETOPT
|
|||||||
.DA #IAC,#WILL,#TELOPT.ECHO
|
.DA #IAC,#WILL,#TELOPT.ECHO
|
||||||
* .DA #IAC,#WILL,#TELOPT.SGA
|
* .DA #IAC,#WILL,#TELOPT.SGA
|
||||||
* .DA #IAC,#DO,#TELOPT.NAWS
|
* .DA #IAC,#DO,#TELOPT.NAWS
|
||||||
|
.DA #IAC,#DO,TELOPT.TTYPE
|
||||||
.DA #13,#10,#0
|
.DA #13,#10,#0
|
||||||
MSG.GREETINGS >CSTR "\r\nA2osX-GeTTY\r\n"
|
MSG.GREETINGS >CSTR "\r\nA2osX-GeTTY\r\n"
|
||||||
TERM >PSTR "TERM"
|
TERM >PSTR "TERM"
|
||||||
|
@ -191,6 +191,7 @@ CS.END
|
|||||||
MSG.LOGIN >CSTR "\r\nlogin:"
|
MSG.LOGIN >CSTR "\r\nlogin:"
|
||||||
MSG.PASSWORD >CSTR "\r\npassword:"
|
MSG.PASSWORD >CSTR "\r\npassword:"
|
||||||
SHELL >PSTR "${A2OSX}SBIN/SHELL"
|
SHELL >PSTR "${A2OSX}SBIN/SHELL"
|
||||||
|
*--------------------------------------
|
||||||
.DUMMY
|
.DUMMY
|
||||||
.OR 0
|
.OR 0
|
||||||
DS.START
|
DS.START
|
||||||
|
Loading…
Reference in New Issue
Block a user