chr and blk files -- return the device as the aux type.
This commit is contained in:
parent
e5d9047073
commit
fc29420832
30
params.aii
30
params.aii
|
@ -1,3 +1,5 @@
|
||||||
|
case on
|
||||||
|
|
||||||
include 'gsos.equ'
|
include 'gsos.equ'
|
||||||
include 'minix.equ'
|
include 'minix.equ'
|
||||||
include 'fst.equ'
|
include 'fst.equ'
|
||||||
|
@ -101,11 +103,13 @@ do_file_type proc export
|
||||||
|
|
||||||
lda disk_inode.mode
|
lda disk_inode.mode
|
||||||
and #S_IFMT
|
and #S_IFMT
|
||||||
cmp #S_IFDIR
|
|
||||||
beq dir
|
|
||||||
cmp #S_IFREG
|
cmp #S_IFREG
|
||||||
beq reg
|
beq reg
|
||||||
|
|
||||||
|
cmp #S_IFDIR
|
||||||
|
beq dir
|
||||||
|
|
||||||
|
|
||||||
unknown
|
unknown
|
||||||
lda #$00
|
lda #$00
|
||||||
bra store
|
bra store
|
||||||
|
@ -129,6 +133,28 @@ store
|
||||||
do_aux_type proc export
|
do_aux_type proc export
|
||||||
with dp,fst_parms
|
with dp,fst_parms
|
||||||
|
|
||||||
|
; chr and blk -- return the device type.
|
||||||
|
|
||||||
|
lda disk_inode.mode
|
||||||
|
and #S_IFMT
|
||||||
|
cmp #S_IFCHR
|
||||||
|
beq chr
|
||||||
|
cmp #S_IFBLK
|
||||||
|
beq blk
|
||||||
|
|
||||||
|
lda #0
|
||||||
|
sta [param_blk_ptr],y
|
||||||
|
iny
|
||||||
|
iny
|
||||||
|
sta [param_blk_ptr],y
|
||||||
|
|
||||||
|
rts
|
||||||
|
chr
|
||||||
|
blk
|
||||||
|
lda disk_inode.zone
|
||||||
|
sta [param_blk_ptr],y
|
||||||
|
iny
|
||||||
|
iny
|
||||||
lda #0
|
lda #0
|
||||||
sta [param_blk_ptr],y
|
sta [param_blk_ptr],y
|
||||||
rts
|
rts
|
||||||
|
|
Loading…
Reference in New Issue