Apple-2gs-SW
/
hfs-boot
mirror of https://github.com/ksherlock/hfs-boot.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

better handling for empty names, forgot to return

This commit is contained in:
Kelvin Sherlock 2021-07-18 01:02:24 -04:00
parent 7d38d2dd17
commit a9a44bb4c8
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
loader.aii
View File

@ -470,6 +470,7 @@ vector dc.w $ffff
xce xce
plp plp
sec sec
and #$ff
rts rts
endp endp
@ -669,6 +670,8 @@ name_check
lda buffer+HFSCatalogKey.nodeName,y lda buffer+HFSCatalogKey.nodeName,y
sta cat_str_len sta cat_str_len
beq cmp
@loop @loop
lda buffer+HFSCatalogKey.nodeName+1,y lda buffer+HFSCatalogKey.nodeName+1,y
sta cat_str,x sta cat_str,x
@ -677,11 +680,11 @@ name_check
cpx cat_str_len cpx cat_str_len
blt @loop blt @loop
upper upper
; now uppercase it ; now uppercase it
ldy #0 ldy #0
ldx cat_str_len ldx cat_str_len
dex
@loop lda cat_str,y @loop lda cat_str,y
cmp #'z'+1 cmp #'z'+1
bge @next bge @next
@ -692,7 +695,7 @@ upper
@next iny @next iny
dex dex
bpl @loop bne @loop
cmp cmp
@ -728,6 +731,7 @@ gt long m
exit exit
ply ply
plx plx
rts
match ; a match! match ; a match!
; store the file type, aux type, eof, and extent pointers. ; store the file type, aux type, eof, and extent pointers.