130 lines
1.8 KiB
PHP
130 lines
1.8 KiB
PHP
;; File: fat12.inc
|
|
|
|
ATTR_READ_ONLY = 0x01
|
|
ATTR_HIDDEN = 0x02
|
|
ATTR_SYSTEM = 0x04
|
|
ATTR_VOLUME_ID = 0x08
|
|
ATTR_DIRECTORY = 0x10
|
|
ATTR_ARCHIVE = 0x20
|
|
|
|
struc fat_entry
|
|
{
|
|
.name db 8 dup ?
|
|
.ext db 3 dup ?
|
|
.attrs db ?
|
|
.reserved dw ?
|
|
.creation_time dw ?
|
|
.creation_date dw ?
|
|
.access_date dw ?
|
|
.reserved2 dw ?
|
|
.mod_time dw ?
|
|
.mod_date dw ?
|
|
.start dw ?
|
|
.size dd ?
|
|
}
|
|
defn fat_entry
|
|
|
|
;; Function: fat_load_root
|
|
fat_load_root:
|
|
mov ax, DISK_BUFFER/0x10
|
|
mov es, ax
|
|
|
|
; load root directory
|
|
mov ax, [sectors_per_FAT]
|
|
xor cx, cx
|
|
mov cl, [FAT_count]
|
|
mul cx
|
|
add ax, [reserved_sectors]
|
|
push ax
|
|
|
|
mov bx, [bytes_per_sector]
|
|
mov cl, 0x5
|
|
shr bx, cl
|
|
mov ax, [root_dir_entries]
|
|
xor dx, dx
|
|
div bx
|
|
mov cx, ax
|
|
pop ax
|
|
|
|
mov [data_start], ax
|
|
add [data_start], cx
|
|
|
|
xor bx, bx
|
|
|
|
call disk_read_sectors
|
|
|
|
ret
|
|
|
|
;; Function: fat_search_root
|
|
;;
|
|
;; Parameters:
|
|
;;
|
|
;; SI - file to search
|
|
;;
|
|
fat_search_root:
|
|
mov cx, [root_dir_entries]
|
|
mov di, 0x0
|
|
@@:
|
|
push si
|
|
push cx
|
|
mov cx, 0xB ; name(8) + ext(3)
|
|
push di
|
|
rep cmpsb
|
|
pop di
|
|
pop cx
|
|
pop si
|
|
je .file_found
|
|
add di, 0x20
|
|
loop @b
|
|
; set carry if not found
|
|
stc
|
|
ret
|
|
.file_found:
|
|
mov ax, [es:di + fat_entry.start]
|
|
mov ebx, [es:di + fat_entry.size]
|
|
clc
|
|
ret
|
|
|
|
;; Function: fat_load_binary
|
|
;;
|
|
;; Parameters:
|
|
;; AX - cluster
|
|
;; ES:BX - buffer
|
|
fat_load_binary:
|
|
push ax
|
|
sub ax, 0x2
|
|
xor cx, cx
|
|
mov cl, [sectors_per_cluster]
|
|
mul cx
|
|
|
|
add ax, [data_start]
|
|
xor cx, cx
|
|
mov cl, [sectors_per_cluster]
|
|
call disk_read_sectors
|
|
|
|
pop ax
|
|
mov cx, ax
|
|
mov dx, ax
|
|
shr dx, 0x1
|
|
add cx, dx
|
|
push bx
|
|
mov bx, DISK_BUFFER
|
|
add bx, cx
|
|
mov dx, [bx]
|
|
pop bx
|
|
|
|
test ax, 0x1
|
|
jnz .odd_cluster
|
|
.even_cluster:
|
|
and dx, 0xFFF
|
|
jmp .end
|
|
.odd_cluster:
|
|
shr dx, 0x4
|
|
.end:
|
|
mov ax, dx
|
|
cmp dx, 0xFF0
|
|
jb fat_load_binary
|
|
ret
|
|
|
|
data_start dw 0x0
|