WebSVN – Kolibri OS – Diff – /kernel/trunk/fs/fs_lfn.inc

 ;; Copyright (C) KolibriOS team 2004-2016. All rights reserved. ;;
 ;;  Distributed under terms of the GNU General Public License.  ;;
 ;;                                                              ;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-$Revision: 6464 $
+$Revision: 6468 $
 ERROR_SUCCESS        = 0
 ERROR_DISK_BASE      = 1
 ERROR_UNSUPPORTED_FS = 2
 ERROR_UNKNOWN_FS     = 3
 ERROR_PARTITION      = 4
 ERROR_FILE_NOT_FOUND = 5
 ERROR_END_OF_FILE    = 6
-ERROR_MEMORY_POINTER = 7
-ERROR_DISK_FULL      = 8
+ERROR_MEMORY_POINTER = 7
-ERROR_FAT_TABLE      = 9 ;deprecated
+ERROR_DISK_FULL      = 8
 ERROR_FS_FAIL        = 9
 ERROR_ACCESS_DENIED  = 10
+ERROR_DEVICE         = 11
+ERROR_OUT_OF_MEMORY  = 12
 ERROR_DEVICE         = 11
-ERROR_OUT_OF_MEMORY  = 12
+maxPathLength = 1000h
 ; 5 = get file info
 ; 6 = set file info
 ; start application
 ; 8 = delete file/folder
 ; 9 = create folder
-        lea     esi, [ebx+20]
+        lea     ebp, [ebx+20]
-        lodsb
-        test    al, al
+        cmp     byte [ebp], 0
         jnz     @f
-        mov     esi, [esi]
+        mov     ebp, [ebx+21]
-        lodsb
 @@:
-        lea     ebp, [esi-1]
-if 0
-        cmp     [ebx], dword 0
-        jne     .1
-        DEBUGF 1,'read file %s\n',ebp
-        jmp     @f
-.1:
-        cmp     [ebx], dword 5
-        jne     @f
-        DEBUGF 1,'get file attributes %s\n',ebp
-@@:
-end if
         cmp     dword[ebx], 7   ; start application
         jne     @f
         mov     edx, [ebx+4]
         mov     ebx, [ebx+8]
         call    fs_execute      ; ebp, ebx, edx
         mov     [image_of_eax], eax
         ret
-@@:
-        cmp     al, '/'
-        jz      .notcurdir
-        dec     esi
-        mov     ebp, esi
-        test    al, al
-        jnz     @f
-        xor     ebp, ebp
-@@:
-        mov     esi, [current_slot]
-        mov     esi, [esi+APPDATA.cur_dir]
-        jmp     .parse_normal
-.notcurdir:
+@@:
-        cmp     byte [esi], 0
+        cmp     word [ebp], '/'
+        jz      .rootdir
+        stdcall kernel_alloc, maxPathLength
+        push    ebx
+        mov     ebx, ebp
+        mov     ebp, eax
+        push    maxPathLength
-        jz      .rootdir
+        push    eax
-        call    process_replace_file_name
+        call    get_full_file_name
+        pop     ebx
-.parse_normal:
+        mov     esi, ebp
-        mov     ax, [esi]
+        mov     ax, [ebp]
         or      ax, 2020h
         cmp     ax, 'cd'
         jz      .CD
         call    dyndisk_handler ; not returns if success
+.notfound:
-.notfound:
+        stdcall kernel_free, ebp
         mov     dword[image_of_eax], ERROR_FILE_NOT_FOUND
         ret
         jnz     .notfound
         cmp     byte [esi], '/'
         jnz     @f
         inc     esi
 @@:
-        cmp     byte [esi], 0
-        jnz     @f
-        test    ebp, ebp
-        jz      @f
-        mov     esi, ebp
-        xor     ebp, ebp
-@@:
         call    reserve_cd
         mov     eax, edi
         bt      eax, 0
         setc    [DiskNumber]
         bt      eax, 1
         mov     dword[image_of_eax], ERROR_UNSUPPORTED_FS
         cmp     eax, fs_NumCdServices
         jae     @f
         add     ebx, 4
         call    dword[fs_CdServices + eax*4]
-        call    free_cd_channel
-        and     [cd_status], 0
         mov     [image_of_eax], eax
         mov     [image_of_ebx], ebx
-        ret
 @@:
         call    free_cd_channel
         and     [cd_status], 0
+        stdcall kernel_free, ebp
         ret
 .nextCD:
         test    eax, eax    ; partition number
         ret
 .maindir:   ; list partitions
         mov     esi, .nextCD
+.maindir_noesi:     ; backjump from dyndisk_handler
+        push    ebp
+        mov     ebp, ecx
-.maindir_noesi:     ; backjump from dyndisk_handler
+        call    kernel_free
         cmp     dword[ebx], 1
         jnz     .access_denied  ; read folder?
+        push    ebp
-        push    ecx
+        pushd   [ebx+4]         ; first block
         mov     ebp, [ebx+12]   ; the number of blocks to read
-        mov     edx, [ebx+16]   ; where to write the result
-        push    dword[ebx+4]    ; first block
+        mov     edx, [ebx+16]   ; buffer
         mov     ebx, [ebx+8]    ; flags
         mov     ecx, 32/4
         mov     edi, edx
         xor     eax, eax
         push    eax
         mov     ecx, 32/4
         add     edi, 8
         xor     eax, eax
         rep stosd
-        push    esi edi
+        push    edi
-        lea     esi, [esp+12]
+        lea     esi, [esp+8]
         cmp     ebx, 1
         jz      .uni2
 @@:
         lodsb
         stosb
         test    eax, eax
         jnz     @b
-        pop     edi esi eax
+        pop     edi eax
         add     edi, 264
         jmp     .rootdir_loop
 .uni2:
         lodsb
         stosw
         test    eax, eax
         jnz     .uni2
-        pop     edi esi eax
+        pop     edi eax
         add     edi, 520
         jmp     .rootdir_loop
 @@:
         mov     [image_of_eax], eax
         mov     [image_of_ebx], ebx
         ret
-fs_NotImplemented:
-        mov     eax, 2
-        ret
-;-----------------------------------------------------------------------------
-fs_CdServices:
-        dd      fs_CdRead
-        dd      fs_CdReadFolder
-        dd      fs_NotImplemented
-        dd      fs_NotImplemented
-        dd      fs_NotImplemented
-        dd      fs_CdGetFileInfo
-        dd      fs_NotImplemented
-        dd      0
-        dd      fs_NotImplemented
-        dd      fs_NotImplemented
 fs_NumCdServices = ($ - fs_CdServices)/4
 ;-----------------------------------------------------------------------------
 process_replace_file_name:
 ; in: [esi] = virtual path
 ; out: [esi]+[ebp] = physical path
         mov     [lock_flag_for_f30_3], 1    ; lock
         popfd
 @@:
         ret
-max_cur_dir equ 0x1000  ; length
 .get:       ; in: ecx -> buffer, edx = length
         mov     ebx, edi    ; buffer
         push    ecx
         push    edi
         xor     eax, eax
-        mov     ecx, max_cur_dir
+        mov     ecx, maxPathLength
         repne scasb
         jnz     .error
         sub     edi, ebx
         inc     edi
         or      dword[esp+32], -1
         ret
 .set:
         pop     eax
-        push    max_cur_dir
+        push    maxPathLength
         push    edi
         push    eax
         mov     ebx, ecx
 get_full_file_name:
 ; in: ebx -> file name, [esp+4] -> destination, [esp+8] = max length
 ; destroys all registers
-        push    ebp
-        mov     esi, [current_slot]
-        mov     esi, [esi+APPDATA.cur_dir]
-        mov     edx, esi
-@@:
-        inc     esi
-        cmp     byte [esi-1], 0
-        jnz     @b
-        dec     esi
+        push    ebp
+        cmp     byte [ebx], '/'
+        jnz     .set_relative
+        lea     esi, [ebx+1]
+        call    process_replace_file_name
+        mov     edi, [esp+8]
+        mov     edx, [esp+12]
+        add     edx, edi
+.set_copy:
+        lodsb
+        stosb
-        cmp     byte [ebx], '/'
+        test    al, al
+        jz      .set_part2
+.set_copy_cont:
+        cmp     edi, edx
+        jb      .set_copy
+.overflow:
+        dec     edi
+.fail:
+        mov     byte [edi], 0
+        xor     eax, eax
+        pop     ebp
+        ret     8
+.set_part2:
+        mov     esi, ebp
+        xor     ebp, ebp
+        test    esi, esi
+        jz      .ret.ok
+        mov     byte [edi-1], '/'
+        jmp     .set_copy_cont
+.set_relative:
+        mov     edi, [current_slot]
+        mov     edi, [edi+APPDATA.cur_dir]
+        mov     edx, edi
+        mov     ecx, [esp+12]
+        xor     eax, eax
+        repnz scasb
+        mov     esi, edi
-        jz      .set_absolute
+        dec     esi
+        mov     edi, [esp+8]
-        mov     edi, [esp+8]
+        jecxz   .fail
 .relative:
         cmp     byte [ebx], 0
         jz      .set_ok
         cmp     word [ebx], '.'
         add     ebx, 3
         jmp     .relative
 .set_ok:
-        cmp     edx, edi        ; is destination equal to APPDATA.cur_dir?
-        jz      .set_ok.cur_dir
-        sub     esi, edx
-        cmp     esi, [esp+12]
-        jb      .set_ok.copy
-.fail:
-        mov     byte [edi], 0
-        xor     eax, eax
-        pop     ebp
+        cmp     edx, edi        ; is destination equal to APPDATA.cur_dir?
-        ret     8
-.set_ok.copy:
+        jz      @f
+        mov     ecx, esi
-        mov     ecx, esi
+        sub     ecx, edx
         mov     esi, edx
         rep movsb
         mov     byte [edi], 0
 .ret.ok:
         mov     al, 1
         pop     ebp
         ret     8
-.set_ok.cur_dir:
+@@:
         mov     byte [esi], 0
         jmp     .ret.ok
-.doset_relative:
-        cmp     edx, edi
-        jz      .doset_relative.cur_dir
-        sub     esi, edx
+.doset_relative:
+        cmp     edx, edi
-        cmp     esi, [esp+12]
+        jz      .doset_relative.cur_dir
-        jae     .fail
+        mov     ecx, esi
-        mov     ecx, esi
+        sub     ecx, edx
         mov     esi, edx
         stosb
         test    al, al
         jz      .ret.ok
         cmp     edi, edx
         jb      @b
-.overflow:
-        dec     edi
-        jmp     .fail
-.set_absolute:
-        lea     esi, [ebx+1]
-        call    process_replace_file_name
-        mov     edi, [esp+8]
-        mov     edx, [esp+12]
-        add     edx, edi
-.set_copy:
-        lodsb
-        stosb
-        test    al, al
-        jz      .set_part2
-.set_copy_cont:
-        cmp     edi, edx
-        jb      .set_copy
         jmp     .overflow
-.set_part2:
-        mov     esi, ebp
-        xor     ebp, ebp
-        test    esi, esi
-        jz      .ret.ok
-        mov     byte [edi-1], '/'
-        jmp     .set_copy_cont
 include "parse_fn.inc"
 include "fs_common.inc"
 include "iso9660.inc"   ; read for CD filesystem
 include "fat.inc"

Subversion Repositories Kolibri OS

(root)/kernel/trunk/fs/fs_lfn.inc – Rev 6464 → 6468