mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-07 17:29:34 +00:00
Kernel 0.93++
This commit is contained in:
parent
0f42912755
commit
055cecb734
Binary file not shown.
|
@ -59,6 +59,10 @@ CS.RUN >LDYA L.MSG0
|
||||||
>PUSHW L.MSG1 format
|
>PUSHW L.MSG1 format
|
||||||
>PUSHB SessionID 1 byte SID
|
>PUSHB SessionID 1 byte SID
|
||||||
|
|
||||||
|
ldx SessionID
|
||||||
|
lda S.Table.hSession-1,x
|
||||||
|
>PUSHA 1 byte hSession
|
||||||
|
|
||||||
>PUSHB (ZPSessionPtr) 1 byte PRIVILEGE
|
>PUSHB (ZPSessionPtr) 1 byte PRIVILEGE
|
||||||
|
|
||||||
ldy #S.SESSION.UID
|
ldy #S.SESSION.UID
|
||||||
|
@ -81,7 +85,7 @@ CS.RUN >LDYA L.MSG0
|
||||||
jsr CS.RUN.GETIO
|
jsr CS.RUN.GETIO
|
||||||
>PUSHYA 2 bytes DEV
|
>PUSHYA 2 bytes DEV
|
||||||
|
|
||||||
>PUSHBI 8 total = 8 ... bytes
|
>PUSHBI 9 total = 9 ... bytes
|
||||||
|
|
||||||
>SYSCALL printf2
|
>SYSCALL printf2
|
||||||
bcs .9
|
bcs .9
|
||||||
|
@ -122,8 +126,8 @@ CS.QUIT clc
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.END
|
CS.END
|
||||||
MSG0 .AZ "SID Privilege UID GID Name Dev"
|
MSG0 .AZ "SID hSD Privilege UID GID Name Dev"
|
||||||
MSG1 .AZ "%3d %b %3d %3d %16s %s\r\n"
|
MSG1 .AZ "%3d $%0h %b %3d %3d %16s %s\r\n"
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
.DUMMY
|
.DUMMY
|
||||||
.OR 0
|
.OR 0
|
||||||
|
|
|
@ -13,8 +13,6 @@ NEW
|
||||||
.DUMMY
|
.DUMMY
|
||||||
.OR ZPBIN
|
.OR ZPBIN
|
||||||
ZS.START
|
ZS.START
|
||||||
ZPUsrID .BS 1
|
|
||||||
|
|
||||||
ZPhBuf .BS 1
|
ZPhBuf .BS 1
|
||||||
ZPBufPtr .BS 2
|
ZPBufPtr .BS 2
|
||||||
|
|
||||||
|
@ -32,7 +30,9 @@ ZPGetLineMax .BS 1
|
||||||
ZPhPW .BS 1
|
ZPhPW .BS 1
|
||||||
ZPPWPtr .BS 2
|
ZPPWPtr .BS 2
|
||||||
|
|
||||||
ZPhSID .BS 1
|
hSession .BS 1
|
||||||
|
ZPNewSID .BS 1
|
||||||
|
ZPOldSID .BS 1
|
||||||
|
|
||||||
ZPhFile .BS 1
|
ZPhFile .BS 1
|
||||||
ZPStrPtr .BS 2
|
ZPStrPtr .BS 2
|
||||||
|
@ -92,8 +92,12 @@ CS.RUN >LDYAI 33 Enough for HASH
|
||||||
jsr CS.RUN.StrOut
|
jsr CS.RUN.StrOut
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
lda #1
|
ldy #S.PS.hSID
|
||||||
sta ZPhSID
|
lda (pPS),y
|
||||||
|
tax
|
||||||
|
|
||||||
|
lda S.Table.hSession-1,x
|
||||||
|
sta hSession
|
||||||
|
|
||||||
jmp CS.RUN.EXEC
|
jmp CS.RUN.EXEC
|
||||||
.9 rts
|
.9 rts
|
||||||
|
@ -170,7 +174,7 @@ CS.RUN.SetUserSession
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>STYA ZPStrPtr
|
>STYA ZPStrPtr
|
||||||
stx ZPhSID
|
stx hSession
|
||||||
|
|
||||||
* clc
|
* clc
|
||||||
|
|
||||||
|
@ -241,32 +245,33 @@ CS.RUN.CHECKPWD rol ZPbValidUser
|
||||||
|
|
||||||
CS.RUN.CHECK.9 rts
|
CS.RUN.CHECK.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.EXEC
|
CS.RUN.EXEC ldx #1
|
||||||
* ldx #1
|
|
||||||
|
|
||||||
*.1 lda S.Table.hSession-1,x
|
.1 lda S.Table.hSession-1,x
|
||||||
* beq .2
|
beq .2
|
||||||
|
|
||||||
* inx
|
inx
|
||||||
* cpx #K.USR.MAX+1
|
cpx #K.USR.MAX+1
|
||||||
* bne .1
|
bne .1
|
||||||
|
|
||||||
* lda #E.OOH
|
lda #E.OOH
|
||||||
** sec
|
* sec
|
||||||
* rts
|
rts
|
||||||
|
|
||||||
*.2 stx ZPUsrID
|
.2 stx ZPNewSID
|
||||||
* txa
|
ldy #S.PS.hSID
|
||||||
* ldy #S.PS.hSID
|
lda (pPS),y
|
||||||
* sta (pPS),y
|
sta ZPOldSID
|
||||||
|
|
||||||
|
txa
|
||||||
|
sta (pPS),y
|
||||||
|
|
||||||
* lda ZPhSID
|
lda hSession
|
||||||
* ldx ZPUsrID
|
sta S.Table.hSession-1,x
|
||||||
* sta S.Table.hSession-1,x
|
|
||||||
|
|
||||||
* ldy #S.PS.hStdIn
|
ldy #S.PS.hStdIn
|
||||||
* lda (pPS),y
|
lda (pPS),y
|
||||||
* sta S.Table.hFILE-1,x
|
sta S.Table.hFILE-1,x
|
||||||
|
|
||||||
>LDYA L.ETCMOTD
|
>LDYA L.ETCMOTD
|
||||||
jsr CS.RUN.DumpFile
|
jsr CS.RUN.DumpFile
|
||||||
|
@ -278,12 +283,16 @@ CS.RUN.EXEC
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>SLEEP
|
>SLEEP
|
||||||
* ldx ZPUsrID
|
ldx ZPNewSID
|
||||||
* lda S.Table.hSession-1,x
|
lda S.Table.hSession-1,x
|
||||||
* stz S.Table.hSession-1,x
|
stz S.Table.hSession-1,x
|
||||||
* stz S.Table.hFILE-1,x
|
stz S.Table.hFILE-1,x
|
||||||
* >SYSCALL freemem
|
>SYSCALL freemem
|
||||||
|
|
||||||
|
ldy #S.PS.hSID
|
||||||
|
lda ZPOldSID
|
||||||
|
sta (pPS),y
|
||||||
|
|
||||||
sec
|
sec
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
|
Loading…
Reference in New Issue
Block a user