A2osX/BIN/LSOF.S.txt

118 lines
2.2 KiB
Plaintext
Raw Normal View History

2018-10-05 14:58:38 +00:00
NEW
2020-08-17 20:47:31 +00:00
AUTO 3,1
2018-10-05 14:58:38 +00:00
.LIST OFF
.OP 65C02
.OR $2000
2020-08-17 20:47:31 +00:00
.TF bin/lsof
2018-10-05 14:58:38 +00:00
*--------------------------------------
2020-08-17 20:47:31 +00:00
.INB inc/macros.i
.INB inc/mli.i
.INB inc/a2osx.i
.INB inc/kernel.i
2018-10-05 14:58:38 +00:00
*--------------------------------------
2018-11-19 07:43:00 +00:00
ZPFDPtr .EQ ZPBIN
2020-02-14 07:21:56 +00:00
FILE.ID .EQ ZPBIN+2
2018-10-05 14:58:38 +00:00
*--------------------------------------
* File Header (16 Bytes)
*--------------------------------------
CS.START cld
jmp (.1,x)
.DA #$61 6502,Level 1 (65c02)
.DA #1 BIN Layout Version 1
.DA 0
.DA CS.END-CS.START CS
.DA DS.END-DS.START DS
.DA #16 SS
.DA #4 ZP
.DA 0
*--------------------------------------
* Relocation Table
2019-10-03 06:25:27 +00:00
*--------------------------------------
2018-10-05 14:58:38 +00:00
.1 .DA CS.INIT
.DA CS.RUN
.DA CS.EVENT
.DA CS.QUIT
L.MSG0 .DA MSG0
L.MSG1 .DA MSG1
L.FD.T .DA FD.T.REG
.DA FD.T.DIR
.DA FD.T.CDEV
.DA FD.T.BDEV
.DA FD.T.LNK
.DA FD.T.DSOCK
.DA FD.T.SSOCK
.DA FD.T.PIPE
.DA 0
*--------------------------------------
CS.INIT clc
rts
*--------------------------------------
CS.RUN >LDYA L.MSG0
2020-02-28 07:21:46 +00:00
>SYSCALL PutS
2018-10-05 14:58:38 +00:00
2020-12-15 13:23:22 +00:00
ldx #2
2020-02-14 07:21:56 +00:00
2020-12-15 13:23:22 +00:00
.1 stx FILE.ID
lda Nod.Table.hFD-2,x
2018-10-05 14:58:38 +00:00
beq .7
2020-02-14 07:21:56 +00:00
>PUSHW L.MSG1
2020-12-15 13:23:22 +00:00
txa
2020-02-14 07:21:56 +00:00
>PUSHA
2020-12-15 13:23:22 +00:00
lda Nod.Table.hFD-2,x
2020-02-14 07:21:56 +00:00
>PUSHA
2020-12-15 13:23:22 +00:00
>SYSCALL GetMemPtr
>STYA ZPFDPtr
2020-01-29 21:45:06 +00:00
2018-11-19 07:43:00 +00:00
lda (ZPFDPtr)
2018-10-05 14:58:38 +00:00
tax
>PUSHW L.FD.T,x
2020-02-14 07:21:56 +00:00
2020-12-15 13:23:22 +00:00
lda Nod.Table.hName-2,x
>SYSCALL GetMemPtr
2020-02-14 07:21:56 +00:00
>PUSHYA
2018-10-05 14:58:38 +00:00
>PUSHBI 6
2020-02-14 07:21:56 +00:00
2020-02-28 07:21:46 +00:00
>SYSCALL PrintF
2020-02-14 07:21:56 +00:00
2020-12-15 13:23:22 +00:00
.7 ldx FILE.ID
inx
inx
cpx #K.NOD.MAX*2+2
2018-10-05 14:58:38 +00:00
bne .1
2020-01-29 21:45:06 +00:00
2020-12-15 13:23:22 +00:00
lda #0
2020-01-29 21:45:06 +00:00
sec
2018-10-05 14:58:38 +00:00
.9 rts
*--------------------------------------
CS.EVENT sec
rts
*--------------------------------------
CS.QUIT clc
rts
*--------------------------------------
CS.END
2019-02-26 16:50:42 +00:00
MSG0 .AZ "hFILE hFD Type Filepath"
2020-02-14 07:21:56 +00:00
MSG1 .AZ "%3d %3d %5s %s\r\n"
2018-10-05 14:58:38 +00:00
FD.T.REG .AZ "REG"
FD.T.DIR .AZ "DIR"
FD.T.CDEV .AZ "CDEV"
FD.T.BDEV .AZ "BDEV"
FD.T.LNK .AZ "LNK"
FD.T.DSOCK .AZ "DSOCK"
FD.T.SSOCK .AZ "SSOCK"
FD.T.PIPE .AZ "PIPE"
*--------------------------------------
.DUMMY
.OR 0
DS.START
2020-08-17 20:47:31 +00:00
DS.END .ED
2018-10-05 14:58:38 +00:00
*--------------------------------------
MAN
2020-08-17 20:47:31 +00:00
SAVE usr/src/bin/lsof.s
2018-10-05 14:58:38 +00:00
ASM