mirror of
https://github.com/ksherlock/minix.fst.git
synced 2024-09-27 03:54:39 +00:00
always read 512-byte blocks.
This commit is contained in:
parent
f73e1e20e1
commit
55b4d65039
11
device.aii
11
device.aii
@ -36,7 +36,7 @@ device_write proc export
|
|||||||
|
|
||||||
|
|
||||||
;
|
;
|
||||||
; inputs: a = block number. (1024 blocks)
|
; inputs: a = block number. (1024 byte block)
|
||||||
;
|
;
|
||||||
;
|
;
|
||||||
read_data_block proc export
|
read_data_block proc export
|
||||||
@ -59,11 +59,16 @@ loop
|
|||||||
rts
|
rts
|
||||||
|
|
||||||
read_it
|
read_it
|
||||||
|
; a = block num (1024-byte).
|
||||||
|
; multiply x 2 for 512-byte blocks.
|
||||||
|
asl a
|
||||||
sta dev_blk_num
|
sta dev_blk_num
|
||||||
stz dev_blk_num+2
|
lda #0
|
||||||
|
rol a
|
||||||
|
sta dev_blk_num+2
|
||||||
|
|
||||||
lda #1024
|
lda #1024
|
||||||
sta dev_blk_size
|
;sta dev_blk_size
|
||||||
sta dev_req_cnt
|
sta dev_req_cnt
|
||||||
stz dev_req_cnt+2
|
stz dev_req_cnt+2
|
||||||
|
|
||||||
|
@ -238,8 +238,9 @@ init proc
|
|||||||
lda #in_cache
|
lda #in_cache
|
||||||
sta dev_parms.dev_cache_pr
|
sta dev_parms.dev_cache_pr
|
||||||
|
|
||||||
|
; should probably read half-blocks...
|
||||||
lda #1024
|
lda #1024
|
||||||
sta dev_parms.dev_blk_size
|
;sta dev_parms.dev_blk_size
|
||||||
sta dev_parms.dev_req_cnt
|
sta dev_parms.dev_req_cnt
|
||||||
|
|
||||||
|
|
||||||
|
@ -42,7 +42,7 @@ get_file_info procname export
|
|||||||
|
|
||||||
;~DebugSetTrace #1
|
;~DebugSetTrace #1
|
||||||
|
|
||||||
brk $ea
|
;brk $ea
|
||||||
jsr path_to_inode
|
jsr path_to_inode
|
||||||
bcs exit
|
bcs exit
|
||||||
|
|
||||||
@ -165,8 +165,8 @@ load_inode procname export
|
|||||||
sta dev_blk_num
|
sta dev_blk_num
|
||||||
|
|
||||||
lda #512
|
lda #512
|
||||||
|
;sta dev_blk_size
|
||||||
sta dev_req_cnt
|
sta dev_req_cnt
|
||||||
sta dev_blk_size
|
|
||||||
|
|
||||||
; dev_num must already be set up.
|
; dev_num must already be set up.
|
||||||
;lda device ;;;;
|
;lda device ;;;;
|
||||||
|
@ -49,12 +49,13 @@ id_disk procname export
|
|||||||
sta dev_num
|
sta dev_num
|
||||||
|
|
||||||
lda #512
|
lda #512
|
||||||
sta dev_blk_size
|
;sta dev_blk_size
|
||||||
|
sta dev_req_cnt
|
||||||
|
|
||||||
|
|
||||||
lda #SUPER_BLOCK*2
|
lda #SUPER_BLOCK*2
|
||||||
sta dev_blk_num
|
sta dev_blk_num
|
||||||
|
|
||||||
lda #512
|
|
||||||
sta dev_req_cnt
|
|
||||||
|
|
||||||
jsr device_read
|
jsr device_read
|
||||||
bcs exit
|
bcs exit
|
||||||
|
10
main.aii
10
main.aii
@ -219,14 +219,19 @@ app_entry procname
|
|||||||
sta io_buffer+2
|
sta io_buffer+2
|
||||||
sta dev_parms.dev_buff+2
|
sta dev_parms.dev_buff+2
|
||||||
|
|
||||||
|
;
|
||||||
|
; minix uses 1024 byte blocks... however, appledisk3.5 can only read 256, 512, or 524 byte blocks.
|
||||||
|
;
|
||||||
|
lda #512
|
||||||
|
sta dev_parms.dev_blk_size
|
||||||
|
stz dev_parms.dev_blk_size+2
|
||||||
|
|
||||||
stz dev_parms.dev_num
|
stz dev_parms.dev_num
|
||||||
stz dev_parms.dev_callnum
|
stz dev_parms.dev_callnum
|
||||||
stz dev_parms.dev_req_cnt
|
stz dev_parms.dev_req_cnt
|
||||||
stz dev_parms.dev_req_cnt+2
|
stz dev_parms.dev_req_cnt+2
|
||||||
stz dev_parms.dev_blk_num
|
stz dev_parms.dev_blk_num
|
||||||
stz dev_parms.dev_blk_num+2
|
stz dev_parms.dev_blk_num+2
|
||||||
stz dev_parms.dev_blk_size
|
|
||||||
stz dev_parms.dev_blk_size+2
|
|
||||||
|
|
||||||
stz my_fcr
|
stz my_fcr
|
||||||
stz my_fcr+2
|
stz my_fcr+2
|
||||||
@ -239,6 +244,7 @@ app_entry procname
|
|||||||
stz <tool_error
|
stz <tool_error
|
||||||
;stz <device
|
;stz <device
|
||||||
|
|
||||||
|
|
||||||
; fake an rtl address for sys_exit
|
; fake an rtl address for sys_exit
|
||||||
; otherwise, would need to jml sys_exit from functions.
|
; otherwise, would need to jml sys_exit from functions.
|
||||||
pea |(sys_exit-1)>>8
|
pea |(sys_exit-1)>>8
|
||||||
|
Loading…
Reference in New Issue
Block a user