Subversion Repositories Kolibri OS

;; Copyright (C) KolibriOS team 2004-2016. All rights reserved. ;;

;; Copyright (C) KolibriOS team 2004-2016. All rights reserved. ;;

;;  Distributed under terms of the GNU General Public License.  ;;

;;  Distributed under terms of the GNU General Public License.  ;;

;;                                                              ;;

;;                                                              ;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$Revision: 6798 $

$Revision: 6845 $

; FAT external functions

; FAT external functions

;   in:

;   in:

;----------------------------------------------------------------

;----------------------------------------------------------------

fat_Read:

fat_Read:

        call    fat_lock

        call    fat_lock

@@:

        push    edi

.found:

        jc      .notFound

        test    byte [edi+11], 0x10     ; do not allow read directories

        test    byte [edi+11], 0x10     ; do not allow read directories

        jnz     .noaccess

        jnz     .noaccess

@@:

        jnz     .endOfFile

        mov     edx, [ebx+4]    ; file offset

        mov     edx, [ebx+4]    ; file offset

        mov     ecx, [ebx+12]   ; size

        mov     ecx, [ebx+12]   ; size

        mov     ebx, [ebx+16]   ; buffer

        mov     ebx, [ebx+16]   ; buffer

        push    ebx

        push    ebx

        sub     edx, edi

        sub     edx, edi

        jc      @f

        jc      @f

        call    get_FAT

        call    get_FAT

        jc      .noaccess2

        jc      .noaccess2

        jmp     @b

        jmp     @b

@@:

@@:

        mov     esi, eax

        mov     esi, eax

        dec     eax

        dec     eax

        dec     eax

        dec     eax

        imul    eax, [ebp+FAT.SECTORS_PER_CLUSTER]

        imul    eax, [ebp+FAT.SECTORS_PER_CLUSTER]

        jnz     .noaccess3

        jnz     .noaccess3

        pop     ecx

        pop     ecx

        xor     edx, edx

        xor     edx, edx

        jecxz   .done

        jecxz   .done

        jmp     .alignedCluster

        jmp     .alignedCluster

.readEnd:

.readEnd:

        add     ecx, edi

        add     ecx, edi

        mov     edi, ecx

        mov     edi, ecx

        and     ecx, 511

        and     ecx, 511

        shr     edi, 9

        shr     edi, 9

        add     eax, edi

        add     eax, edi

        push    ecx

        push    ecx

        push    eax

        push    eax

        mov     ecx, eax

        mov     ecx, eax

        jmp     .readFragment

        jmp     .readFragment

.noaccess3:

.noaccess3:

        pop     eax

        pop     eax

.noaccess2:

.noaccess2:

        mov     byte [esp], ERROR_DEVICE

        mov     byte [esp], ERROR_DEVICE

.done:

.done:

        call    fat_unlock

        call    fat_unlock

        pop     eax edx edi

        pop     eax edx edi

        sub     ebx, edx

        sub     ebx, edx

        ret

        ret

.fileEnd:

.fileEnd:

        mov     byte [esp], ERROR_END_OF_FILE

        mov     byte [esp], ERROR_END_OF_FILE

        jmp     .done

        jmp     .done

.noaccess4:

.noaccess4:

        mov     byte [esp], ERROR_DEVICE

        mov     byte [esp], ERROR_DEVICE

        jmp     @f

        jmp     @f

.fileEnd2:

.fileEnd2:

        mov     byte [esp], ERROR_END_OF_FILE

        mov     byte [esp], ERROR_END_OF_FILE

@@:

@@:

        inc     esi

        inc     esi

        xor     ecx, ecx

        xor     ecx, ecx

        add     ecx, [eax+4]

        add     ecx, [eax+4]

        mov     eax, ecx

        mov     eax, ecx

        pop     ecx

        pop     ecx

        ret

        ret

;----------------------------------------------------------------

;----------------------------------------------------------------

fat_CreateFolder:

fat_CreateFolder:

        push    1

        push    1

        jmp     @f

        jmp     @f

fat_CreateFile:

fat_CreateFile:

        push    0

        push    0

@@:

@@:

        cmp     byte [esi], 0

        call    fat_lock

        jz      fshrad

        pop     eax

        mov     ecx, [ebx+12]

        mov     ecx, [ebx+12]

        mov     edx, [ebx+16]

        mov     edx, [ebx+16]

        pushad

        pushad

        loop    fat_read_symbols

        loop    fat_read_symbols

        ret

        ret

;----------------------------------------------------------------

;----------------------------------------------------------------

        jz      .access_denied

fat_Write:

        call    fat_lock

        call    fat_lock

        push    edi

        push    edi

.found:     ; FAT does not support files larger than 4GB

        jc      .error

@@:

        jnz     .eof    ; FAT does not support files larger than 4GB

        mov     ecx, [ebx+12]

        mov     ecx, [ebx+12]

        mov     edx, [ebx+16]

        mov     edx, [ebx+16]

        mov     ebx, [ebx+4]

        mov     ebx, [ebx+4]

; now edi points to direntry, ebx=start byte to write,

; now edi points to direntry, ebx=start byte to write,

        jnc     .length_ok

        jnc     .length_ok

        mov     [esp+4], eax

        mov     [esp+4], eax

; hd_extend_file can return three error codes: FAT table error, device error or disk full.

; hd_extend_file can return three error codes: FAT table error, device error or disk full.

; First two cases are fatal errors, in third case we may write some data

; First two cases are fatal errors, in third case we may write some data

        cmp     al, ERROR_DISK_FULL

        cmp     al, ERROR_DISK_FULL

; correct number of bytes to write

; correct number of bytes to write

        mov     ecx, [edi+28]

        mov     ecx, [edi+28]

        cmp     ecx, ebx

        cmp     ecx, ebx

        ja      .length_ok

        ja      .length_ok

        push    0

        push    0

        call    update_disk

        call    update_disk

        test    eax, eax

        test    eax, eax

        jz      @f

        jz      @f

        mov     byte [esp+4], ERROR_DEVICE

        mov     byte [esp+4], ERROR_DEVICE

@@:

@@:

        call    fat_unlock

        call    fat_unlock

        ret

        ret

.length_ok:

.length_ok:

        mov     esi, [edi+28]

        mov     esi, [edi+28]

        mov     eax, [edi+20-2]

        mov     eax, [edi+20-2]

        mov     ax, [edi+26]

        mov     ax, [edi+26]

        mov     edi, eax        ; edi=current cluster

        mov     edi, eax        ; edi=current cluster

        push    ebx

        push    ebx

        lea     ebx, [ebp+FAT.buffer]

        lea     ebx, [ebp+FAT.buffer]

        call    fs_write32_sys

        call    fs_write32_sys

        pop     ebx

        pop     ebx

        test    eax, eax

        test    eax, eax

; now ebx=start pos, ecx=end pos, both lie inside file

; now ebx=start pos, ecx=end pos, both lie inside file

        sub     ecx, ebx

        sub     ecx, ebx

        jz      .ret

        jz      .ret

.write_loop:

.write_loop:

; skip unmodified sectors

; skip unmodified sectors

        push    eax ebx

        push    eax ebx

        lea     ebx, [ebp+FAT.buffer]

        lea     ebx, [ebp+FAT.buffer]

        call    fs_read32_app

        call    fs_read32_app

        test    eax, eax

        test    eax, eax

        pop     ebx eax

        pop     ebx eax

.noread:

.noread:

; zero uninitialized data if file was extended (because hd_extend_file does not this)

; zero uninitialized data if file was extended (because hd_extend_file does not this)

        push    eax ecx edi

        push    eax ecx edi

        xor     eax, eax

        xor     eax, eax

        mov     ecx, 0x200

        mov     ecx, 0x200

;----------------------------------------------------------------

;----------------------------------------------------------------

fat_SetFileEnd:

fat_SetFileEnd:

        call    fat_lock

        call    fat_lock

@@:

        push    edi

@@:

        jc      .reteax

; must not be directory

; must not be directory

        test    byte [edi+11], 10h

        test    byte [edi+11], 10h

        jnz     .access_denied

        jnz     .access_denied

; file size must not exceed 4 Gb

; file size must not exceed 4 Gb

@@:

        jnz     .endOfFile

        push    eax     ; save directory sector

        push    eax     ; save directory sector

; set file modification date/time to current

; set file modification date/time to current

        call    fat_update_datetime

        call    fat_update_datetime

        mov     eax, [ebx+4]

        mov     eax, [ebx+4]

        ja      .expand

        ja      .expand

        pop     eax

        pop     eax

        lea     ebx, [ebp+FAT.buffer]

        lea     ebx, [ebp+FAT.buffer]

        call    fs_write32_sys

        call    fs_write32_sys

        test    eax, eax

        test    eax, eax

        push    0

        push    0

        jmp     .ret

        jmp     .ret

.expand:

.expand:

        push    ebx ebp ecx

        push    ebx ebp ecx

        push    dword [edi+28]  ; save old size

        push    dword [edi+28]  ; save old size

        mov     ecx, eax

        mov     ecx, eax

        call    hd_extend_file

        call    hd_extend_file

        push    eax             ; return code

        push    eax             ; return code

        jnc     .expand_ok

        jnc     .expand_ok

        cmp     al, ERROR_DISK_FULL

        cmp     al, ERROR_DISK_FULL

        mov     eax, [edi+28]

        mov     eax, [edi+28]

        xchg    eax, [esp+20]

        xchg    eax, [esp+20]

        lea     ebx, [ebp+FAT.buffer]

        lea     ebx, [ebp+FAT.buffer]

        call    fs_write32_sys

        call    fs_write32_sys

        test    eax, eax

        test    eax, eax

        mov     eax, [edi+20-2]

        mov     eax, [edi+20-2]

        mov     ax, [edi+26]

        mov     ax, [edi+26]

        mov     edi, eax

        mov     edi, eax

        test    edi, edi

        test    edi, edi

        jz      .pop_ret

        jz      .pop_ret

; now zero new data

; now zero new data

        push    0

        push    0

; edi=current cluster, [esp]=sector in cluster

; edi=current cluster, [esp]=sector in cluster

        mov     eax, edi

        mov     eax, edi

        call    get_FAT

        call    get_FAT

        mov     edi, eax

        mov     edi, eax

        jnc     .zero_loop

        jnc     .zero_loop

        pop     eax

        pop     eax

.truncate:

.truncate:

        mov     [edi+28], eax

        mov     [edi+28], eax

        push    ecx

        push    ecx

        mov     ecx, [edi+20-2]

        mov     ecx, [edi+20-2]

        mov     cx, [edi+26]

        mov     cx, [edi+26]

        push    eax

        push    eax

        test    eax, eax

        test    eax, eax

        jz      .zero_size

        jz      .zero_size

        cmp     ecx, 2

        cmp     ecx, 2

        jb      .error_fat2

        jb      .error_fat2

        cmp     ecx, [ebp+FAT.fatRESERVED]

        cmp     ecx, [ebp+FAT.fatRESERVED]

        jae     .error_fat2

        jae     .error_fat2

        mov     eax, [ebp+FAT.SECTORS_PER_CLUSTER]

        mov     eax, [ebp+FAT.SECTORS_PER_CLUSTER]

        mov     eax, ecx

        mov     eax, ecx

        call    get_FAT

        call    get_FAT

        mov     ecx, eax

        mov     ecx, eax

        jnc     @b

        jnc     @b

.device_err3:

.device_err3:

        call    update_disk

        call    update_disk

@@:

@@:

; we will zero data at the end of last sector - remember it

; we will zero data at the end of last sector - remember it

        push    ecx

        push    ecx

; terminate FAT chain

; terminate FAT chain

        push    edx

        push    edx

        pop     edx

        pop     edx

        jnc     @f

        jnc     @f

.device_err4:

.device_err4:

        pop     ecx

        pop     ecx

        jmp     .device_err3

        jmp     .device_err3

.zero_size:

.zero_size:

        and     word [edi+20], 0

        and     word [edi+20], 0

        and     word [edi+26], 0

        and     word [edi+26], 0

        push    0

        push    0

        mov     eax, ecx

        mov     eax, ecx

        pop     ecx eax edi

        pop     ecx eax edi

        call    update_disk

        call    update_disk

        call    fat_unlock

        call    fat_unlock

        xor     eax, eax

        xor     eax, eax

        ret

        ret

;----------------------------------------------------------------

;----------------------------------------------------------------

fat_GetFileInfo:

fat_GetFileInfo:

        cmp     byte [esi], 0

        cmp     byte [esi], 0

        pop     edi

        pop     edi

        ret

        ret

;----------------------------------------------------------------

;----------------------------------------------------------------

@@:

fat_SetFileInfo:

        push    edi

        push    edi

        call    fat_lock

        call    fat_lock

        call    hd_find_lfn

        call    hd_find_lfn

        jc      .error

        jc      .error

        ret

        ret

;----------------------------------------------------------------

;----------------------------------------------------------------

fat_Delete:

fat_Delete:

@@:

        call    fat_lock

        and     [ebp+FAT.longname_sec1], 0

        and     [ebp+FAT.longname_sec1], 0

        and     [ebp+FAT.longname_sec2], 0

        and     [ebp+FAT.longname_sec2], 0

        push    edi

        push    edi

.found:

        jc      .notFound

        cmp     dword [edi], '.   '

        cmp     dword [edi], '.   '

        jz      .access_denied2

        jz      .access_denied2

        cmp     dword [edi], '..  '

        cmp     dword [edi], '..  '

        jz      .access_denied2

        jz      .access_denied2

        lea     eax, [ebx+0x200]

        lea     eax, [ebx+0x200]

        jz      .checkempty

        jz      .checkempty

.err1:

.err1:

        popad

        popad

.err2:

.err2:

        call    fat_unlock

        call    fat_unlock

        ret

        ret

.error_fat:

.error_fat:

        popad

        popad

.notempty:

.notempty:

        popad

        popad

.access_denied2:

.access_denied2:

.empty:

.empty:

        popad

        popad

        push    eax ebx

        push    eax ebx

        lea     ebx, [ebp+FAT.buffer]

        lea     ebx, [ebp+FAT.buffer]

        call    fs_read32_sys

        call    fs_read32_sys