mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-25 03:29:49 +00:00
Kernel 0.93
This commit is contained in:
parent
6b65d47c25
commit
71a87f9f52
Binary file not shown.
|
@ -499,12 +499,12 @@ SKT.GetDataFromSktIn
|
|||
|
||||
.80 jsr SKT.StoreTCB
|
||||
|
||||
* lda #S.TCP.OPTIONS.ACK
|
||||
* jsr TCP.OUT.SendOptA
|
||||
lda #S.TCP.OPTIONS.ACK
|
||||
jsr TCP.OUT.SendOptA
|
||||
|
||||
jsr TCP.SetSocketTCPO.ACK
|
||||
* jsr TCP.SetSocketTCPO.ACK
|
||||
|
||||
jsr TCP.OUT.I SKT.GetTCB already called
|
||||
* jsr TCP.OUT.I SKT.GetTCB already called
|
||||
|
||||
>LDYA ZPDataInLen
|
||||
clc
|
||||
|
|
|
@ -432,11 +432,8 @@ TCP.SENDCLOSE ldx #0
|
|||
plx
|
||||
phx
|
||||
lda SKT.TABLE,x
|
||||
>SYSCALL2 freemem
|
||||
|
||||
plx
|
||||
phx
|
||||
stz SKT.TABLE,x
|
||||
>SYSCALL2 freemem
|
||||
|
||||
.8 plx
|
||||
inx
|
||||
|
|
|
@ -9,7 +9,7 @@ NEW
|
|||
.INB INC/A2OSX.I
|
||||
.INB INC/NET.TELNET.I
|
||||
*--------------------------------------
|
||||
TIMEOUT.MAX .EQ 20 2 sec.
|
||||
TIMEOUT.MAX .EQ 40 4 sec.
|
||||
IAC.BUF.MAX .EQ 32
|
||||
*--------------------------------------
|
||||
.DUMMY
|
||||
|
|
|
@ -120,7 +120,7 @@ CS.RUN.AUTH >LDYA L.LIBCRYPT
|
|||
clc
|
||||
jsr CS.RUN.GetLine
|
||||
bcs .9
|
||||
|
||||
|
||||
>PUSHWZ Dry Run
|
||||
>LDYA ZPGetLinePtr
|
||||
>SYSCALL GetPWName
|
||||
|
@ -136,7 +136,7 @@ CS.RUN.AUTH >LDYA L.LIBCRYPT
|
|||
sec
|
||||
jsr CS.RUN.GetLine
|
||||
bcs .9
|
||||
|
||||
|
||||
>PUSHBI 0
|
||||
>LDYA L.MSG.CRLF
|
||||
>SYSCALL printf
|
||||
|
|
|
@ -179,8 +179,8 @@ S.DCB.TTY.bG1ALT .EQ 15
|
|||
S.DCB.TTY.OUTTAIL .EQ 16
|
||||
S.DCB.TTY.OUTHEAD .EQ 17
|
||||
S.DCB.TTY.INBUFFER .EQ 18
|
||||
S.DCB.TTY.INBUFFER.MAX .EQ 39
|
||||
S.DCB.TTY.OUTBUFFER .EQ 40
|
||||
S.DCB.TTY.INBUFFER.MAX .EQ 31
|
||||
S.DCB.TTY.OUTBUFFER .EQ 32
|
||||
S.DCB.TTY.OUTBUFFER.MAX .EQ 64
|
||||
*
|
||||
S.DCB.TTY .EQ 64
|
||||
|
|
|
@ -268,10 +268,7 @@ IO.CLOSE.SSOCK
|
|||
|
||||
lda IO.hFD
|
||||
|
||||
.1 jsr $FFFF SELF MODIFIED
|
||||
|
||||
lda IO.hFD
|
||||
jmp K.FreeMem
|
||||
.1 jmp $FFFF SELF MODIFIED
|
||||
*--------------------------------------
|
||||
IO.CLOSE.PIPE ldy #S.FD.PIPE.S
|
||||
|
||||
|
|
|
@ -90,7 +90,6 @@ PWD.GetPWName lda PWD.hDB
|
|||
|
||||
.8 iny
|
||||
jsr PWD.NextString skip PASSWORD
|
||||
iny
|
||||
jmp PWD.GetByte get UID
|
||||
*--------------------------------------
|
||||
* ZPPtr2 : pPW (Input)
|
||||
|
@ -430,7 +429,7 @@ PWD.GetByte stz ZPPtr4
|
|||
bra .1
|
||||
|
||||
.8 lda ZPPtr4
|
||||
* clc
|
||||
clc
|
||||
rts
|
||||
*--------------------------------------
|
||||
PWD.StoreRecord sec
|
||||
|
|
Loading…
Reference in New Issue
Block a user