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


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                              ;;
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
;; Distributed under terms of the GNU General Public License    ;;
;;                                                              ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
$Revision: 5363 $
 
;-----------------------------------------------------------------------------
uglobal
cd_current_pointer_of_input    dd  0
cd_current_pointer_of_input_2  dd  0
cd_mem_location                dd  0
cd_counter_block               dd  0
endg
;-----------------------------------------------------------------------------
reserve_cd:
        cli
        cmp     [cd_status], 0
        je      reserve_ok2
 
        sti
        call    change_task
        jmp     reserve_cd
;-----------------------------------------------------------------------------
reserve_ok2:
        push    eax
        mov     eax, [CURRENT_TASK]
        shl     eax, 5
        mov     eax, [eax+CURRENT_TASK+TASKDATA.pid]
        mov     [cd_status], eax
        pop     eax
        sti
        ret
;-----------------------------------------------------------------------------
reserve_cd_channel:
        pushad
        mov     eax, [cdpos]
        dec     eax
        shr     eax, 2
 
        test    eax, eax
        jnz     .1
 
        cmp     [ChannelNumber], 1
        jne     @f
 
        mov     ecx, ide_channel1_mutex
        jmp     .mutex_lock
;--------------------------------------
@@:
        mov     ecx, ide_channel2_mutex
        jmp     .mutex_lock
;--------------------------------------
.1:
        dec     eax
        jnz     .2
 
        cmp     [ChannelNumber], 1
        jne     @f
 
        mov     ecx, ide_channel3_mutex
        jmp     .mutex_lock
;--------------------------------------
@@:
        mov     ecx, ide_channel4_mutex
        jmp     .mutex_lock
;--------------------------------------
.2:
        cmp     [ChannelNumber], 1
        jne     @f
 
        mov     ecx, ide_channel5_mutex
        jmp     .mutex_lock
;--------------------------------------
@@:
        mov     ecx, ide_channel6_mutex
.mutex_lock:
        call    mutex_lock
        popad
        ret
;-----------------------------------------------------------------------------
free_cd_channel:
        pushad
        mov     eax, [cdpos]
        dec     eax
        shr     eax, 2
 
        test    eax, eax
        jnz     .1
 
        cmp     [ChannelNumber], 1
        jne     @f
 
        mov     ecx, ide_channel1_mutex
        jmp     .mutex_unlock
;--------------------------------------
@@:
        mov     ecx, ide_channel2_mutex
        jmp     .mutex_unlock
;--------------------------------------
.1:
        dec     eax
        jnz     .2
 
        cmp     [ChannelNumber], 1
        jne     @f
 
        mov     ecx, ide_channel3_mutex
        jmp     .mutex_unlock
;--------------------------------------
@@:
        mov     ecx, ide_channel4_mutex
        jmp     .mutex_unlock
;--------------------------------------
.2:
        cmp     [ChannelNumber], 1
        jne     @f
 
        mov     ecx, ide_channel5_mutex
        jmp     .mutex_unlock
;--------------------------------------
@@:
        mov     ecx, ide_channel6_mutex
.mutex_unlock:
        call    mutex_unlock
        popad
        ret
;-----------------------------------------------------------------------------
uglobal
cd_status dd 0
endg
;-----------------------------------------------------------------------------
;
;  fs_CdRead - LFN variant for reading CD disk
;
;  esi  points to filename /dir1/dir2/.../dirn/file,0
;  ebx  pointer to 64-bit number = first wanted byte, 0+
;       may be ebx=0 - start from first byte
;  ecx  number of bytes to read, 0+
;  edx  mem location to return data
;
;  ret ebx = bytes read or 0xffffffff file not found
;      eax = 0 ok read or other = errormsg
;
;-----------------------------------------------------------------------------
fs_CdRead:
        push    edi
        cmp     byte [esi], 0
        jnz     @f
;--------------------------------------
.noaccess:
        pop     edi
;--------------------------------------
.noaccess_2:
        or      ebx, -1
        mov     eax, ERROR_ACCESS_DENIED
        ret
;--------------------------------------
.noaccess_3:
        pop     eax edx ecx edi
        jmp     .noaccess_2
;--------------------------------------
@@:
        call    cd_find_lfn
        jnc     .found
 
        pop     edi
        cmp     [DevErrorCode], 0
        jne     .noaccess_2
 
        or      ebx, -1
        mov     eax, ERROR_FILE_NOT_FOUND
        ret
;--------------------------------------
.found:
        mov     edi, [cd_current_pointer_of_input]
        test    byte [edi+25], 10b; do not allow read directories
        jnz     .noaccess
 
        test    ebx, ebx
        jz      .l1
 
        cmp     dword [ebx+4], 0
        jz      @f
 
        xor     ebx, ebx
;--------------------------------------
.reteof:
        mov     eax, 6; end of file
        pop     edi
        ret
;--------------------------------------
@@:
        mov     ebx, [ebx]
;--------------------------------------
.l1:
        push    ecx edx
        push    0
        mov     eax, [edi+10] ; real size of the file section
        sub     eax, ebx
        jb      .eof
 
        cmp     eax, ecx
        jae     @f
 
        mov     ecx, eax
        mov     byte [esp], 6
;--------------------------------------
@@:
        mov     eax, [edi+2]
        mov     [CDSectorAddress], eax
;--------------------------------------
; now eax=cluster, ebx=position, ecx=count, edx=buffer for data
.new_sector:
        test    ecx, ecx
        jz      .done
 
        sub     ebx, 2048
        jae     .next
 
        add     ebx, 2048
        jnz     .incomplete_sector
 
        cmp     ecx, 2048
        jb      .incomplete_sector
; we may read and memmove complete sector
        mov     [CDDataBuf_pointer], edx
        call    ReadCDWRetr ; read sector of file
        cmp     [DevErrorCode], 0
        jne     .noaccess_3
 
        add     edx, 2048
        sub     ecx, 2048
;--------------------------------------
.next:
        inc     dword [CDSectorAddress]
        jmp     .new_sector
;--------------------------------------
.incomplete_sector:
; we must read and memmove incomplete sector
        mov     [CDDataBuf_pointer], CDDataBuf
        call    ReadCDWRetr ; read sector of file
        cmp     [DevErrorCode], 0
        jne     .noaccess_3
 
        push    ecx
        add     ecx, ebx
        cmp     ecx, 2048
        jbe     @f
 
        mov     ecx, 2048
;--------------------------------------
@@:
        sub     ecx, ebx
        push    edi esi ecx
        mov     edi, edx
        lea     esi, [CDDataBuf + ebx]
        cld
        rep movsb
        pop     ecx esi edi
        add     edx, ecx
        sub     [esp], ecx
        pop     ecx
        xor     ebx, ebx
        jmp     .next
;--------------------------------------
.done:
        mov     ebx, edx
        pop     eax edx ecx edi
        sub     ebx, edx
        ret
;--------------------------------------
.eof:
        mov     ebx, edx
        pop     eax edx ecx
        sub     ebx, edx
        jmp     .reteof
;-----------------------------------------------------------------------------
;
;  fs_CdReadFolder - LFN variant for reading CD disk folder
;
;  esi  points to filename  /dir1/dir2/.../dirn/file,0
;  ebx  pointer to structure 32-bit number = first wanted block, 0+
;                          & flags (bitfields)
; flags: bit 0: 0=ANSI names, 1=UNICODE names
;  ecx  number of blocks to read, 0+
;  edx  mem location to return data
;
;  ret ebx = blocks read or 0xffffffff folder not found
;      eax = 0 ok read or other = errormsg
;
;-----------------------------------------------------------------------------
fs_CdReadFolder:
        push    edi
        call    cd_find_lfn
        jnc     .found
 
        pop     edi
        cmp     [DevErrorCode], 0
        jne     .noaccess_1
 
        or      ebx, -1
        mov     eax, ERROR_FILE_NOT_FOUND
        ret
;--------------------------------------
.found:
        mov     edi, [cd_current_pointer_of_input]
        test    byte [edi+25], 10b    ; do not allow read directories
        jnz     .found_dir
 
        pop     edi
;--------------------------------------
.noaccess_1:
        or      ebx, -1
        mov     eax, ERROR_ACCESS_DENIED
        ret
;--------------------------------------
.found_dir:
        mov     eax, [edi+2]    ; eax=cluster
        mov     [CDSectorAddress], eax
        mov     eax, [edi+10]   ; directory size
;--------------------------------------
.doit:
; init header
        push    eax ecx
        mov     edi, edx
        mov     ecx, 32/4
        xor     eax, eax
        rep stosd
        pop     ecx eax
        mov     byte [edx], 1   ; version
        mov     [cd_mem_location], edx
        add     [cd_mem_location], 32
;.mainloop:
        mov     [cd_counter_block], dword 0
        dec     dword [CDSectorAddress]
        push    ecx
;--------------------------------------
.read_to_buffer:
        inc     dword [CDSectorAddress]
        mov     [CDDataBuf_pointer], CDDataBuf
        call    ReadCDWRetr         ; read sector of directory
        cmp     [DevErrorCode], 0
        jne     .noaccess_1
 
        call    .get_names_from_buffer
        sub     eax, 2048
; directory is over?
        ja      .read_to_buffer
 
        mov     edi, [cd_counter_block]
        mov     [edx+8], edi
        mov     edi, [ebx]
        sub     [edx+4], edi
        xor     eax, eax
        dec     ecx
        js      @f
 
        mov     al, ERROR_END_OF_FILE
;--------------------------------------
@@:
        pop     ecx edi
        mov     ebx, [edx+4]
        ret
;--------------------------------------
.get_names_from_buffer:
        mov     [cd_current_pointer_of_input_2], CDDataBuf
        push    eax esi edi edx
;--------------------------------------
.get_names_from_buffer_1:
        call    cd_get_name
        jc      .end_buffer
 
        inc     dword [cd_counter_block]
        mov     eax, [cd_counter_block]
        cmp     [ebx], eax
        jae     .get_names_from_buffer_1
 
        test    ecx, ecx
        jz      .get_names_from_buffer_1
 
        mov     edi, [cd_counter_block]
        mov     [edx+4], edi
        dec     ecx
        mov     esi, ebp
        mov     edi, [cd_mem_location]
        add     edi, 40
        test    dword [ebx+4], 1; 0=ANSI, 1=UNICODE
        jnz     .unicode
;--------------------------------------
.ansi:
        cmp     [cd_counter_block], 2
        jbe     .ansi_parent_directory
 
        cld
        lodsw
        xchg    ah, al
        call    uni2ansi_char
        cld
        stosb
; check end of file
        mov     ax, [esi]
        cmp     ax, word 3B00h ; separator end of file ';'
        je      .cd_get_parameters_of_file_1
; check for files not ending with separator
        movzx   eax, byte [ebp-33]
        add     eax, ebp
        sub     eax, 34
        cmp     esi, eax
        je      .cd_get_parameters_of_file_1
; check the end of the directory
        movzx   eax, byte [ebp-1]
        add     eax, ebp
        cmp     esi, eax
        jb      .ansi
;--------------------------------------
.cd_get_parameters_of_file_1:
        mov     [edi], byte 0
        call    cd_get_parameters_of_file
        add     [cd_mem_location], 304
        jmp     .get_names_from_buffer_1
;--------------------------------------
.ansi_parent_directory:
        cmp     [cd_counter_block], 2
        je      @f
 
        mov     [edi], byte '.'
        inc     edi
        jmp     .cd_get_parameters_of_file_1
;--------------------------------------
@@:
        mov     [edi], word '..'
        add     edi, 2
        jmp     .cd_get_parameters_of_file_1
;--------------------------------------
.unicode:
        cmp     [cd_counter_block], 2
        jbe     .unicode_parent_directory
 
        cld
        movsw
; check end of file
        mov     ax, [esi]
        cmp     ax, word 3B00h; separator end of file ';'
        je      .cd_get_parameters_of_file_2
; check for files not ending with separator
        movzx   eax, byte [ebp-33]
        add     eax, ebp
        sub     eax, 34
        cmp     esi, eax
        je      .cd_get_parameters_of_file_2
; check the end of the directory
        movzx   eax, byte [ebp-1]
        add     eax, ebp
        cmp     esi, eax
        jb      .unicode
;--------------------------------------
.cd_get_parameters_of_file_2:
        mov     [edi], word 0
        call    cd_get_parameters_of_file
        add     [cd_mem_location], 560
        jmp     .get_names_from_buffer_1
;--------------------------------------
.unicode_parent_directory:
        cmp     [cd_counter_block], 2
        je      @f
 
        mov     [edi], word 2E00h; '.'
        add     edi, 2
        jmp     .cd_get_parameters_of_file_2
;--------------------------------------
@@:
        mov     [edi], dword 2E002E00h; '..'
        add     edi, 4
        jmp     .cd_get_parameters_of_file_2
;--------------------------------------
.end_buffer:
        pop     edx edi esi eax
        ret
;-----------------------------------------------------------------------------
cd_get_parameters_of_file:
        mov     edi, [cd_mem_location]
cd_get_parameters_of_file_1:
; get file attributes
        xor     eax, eax
; file is not archived
        inc     eax
        shl     eax, 1
; is a directory?
        test    [ebp-8], byte 2
        jz      .file
 
        inc     eax
;--------------------------------------
.file:
; not as a volume label in the FAT, in this form not available
; file is not a system
        shl     eax, 3
; file is hidden? (attribute of existence)
        test    [ebp-8], byte 1
        jz      .hidden
 
        inc     eax
;--------------------------------------
.hidden:
        shl     eax, 1
; file is always read-only, as this CD
        inc     eax
        mov     [edi], eax
; get the time to file
; hour
        movzx   eax, byte [ebp-12]
        shl     eax, 8
; minute
        mov     al, [ebp-11]
        shl     eax, 8
; second
        mov     al, [ebp-10]
; file creation time
        mov     [edi+8], eax
; last access time
        mov     [edi+16], eax
; last write time
        mov     [edi+24], eax
; get date for file
; year
        movzx   eax, byte [ebp-15]
        add     eax, 1900
        shl     eax, 8
; month
        mov     al, [ebp-14]
        shl     eax, 8
; day
        mov     al, [ebp-13]
; file creation date
        mov     [edi+12], eax
; last access date
        mov     [edi+20], eax
; last write date 
        mov     [edi+28], eax
; get the data type of name
        xor     eax, eax
        test    dword [ebx+4], 1; 0=ANSI, 1=UNICODE
        jnz     .unicode_1
 
        mov     [edi+4], eax
        jmp     @f
;--------------------------------------
.unicode_1:
        inc     eax
        mov     [edi+4], eax
;--------------------------------------
@@:
; get the file size in bytes
        xor     eax, eax
        mov     [edi+32+4], eax
        mov     eax, [ebp-23]
        mov     [edi+32], eax
        ret
;-----------------------------------------------------------------------------
;
;  fs_CdGetFileInfo - LFN variant for CD
;                     get file/directory attributes structure
;
;-----------------------------------------------------------------------------
fs_CdGetFileInfo:
        cmp     byte [esi], 0
        jnz     @f
 
        mov     eax, 2
        ret
;--------------------------------------
@@:
        push    edi
        call    cd_find_lfn
        pushfd
        cmp     [DevErrorCode], 0
        jz      @f
 
        popfd
        pop     edi
        mov     eax, 11
        ret
;--------------------------------------
@@:
        popfd
        jnc     @f
 
        pop     edi
        mov     eax, ERROR_FILE_NOT_FOUND
        ret
;--------------------------------------
@@:
 
        mov     edi, edx
        push    ebp
        mov     ebp, [cd_current_pointer_of_input]
        add     ebp, 33
        call    cd_get_parameters_of_file_1
        pop     ebp
        and     dword [edi+4], 0
        pop     edi
        xor     eax, eax
        ret
;-----------------------------------------------------------------------------
cd_find_lfn:
        mov     [cd_appl_data], 0
; in: esi+ebp -> name
; out: CF=1 - file not found
; else CF=0 and [cd_current_pointer_of_input] direntry
        push    eax esi
; Sector 16 - start set of volume descriptors
        call    WaitUnitReady
        cmp     [DevErrorCode], 0
        jne     .access_denied
 
        call    prevent_medium_removal
; testing of reading
        mov     [CDSectorAddress], dword 16
        mov     [CDDataBuf_pointer], CDDataBuf
        call    ReadCDWRetr;_1
        cmp     [DevErrorCode], 0
        jne     .access_denied
 
; calculation of the last session
        call    WaitUnitReady
        cmp     [DevErrorCode], 0
        jne     .access_denied
 
        call    Read_TOC
        mov     ah, [CDDataBuf+4+4]
        mov     al, [CDDataBuf+4+5]
        shl     eax, 16
        mov     ah, [CDDataBuf+4+6]
        mov     al, [CDDataBuf+4+7]
        add     eax, 15
        mov     [CDSectorAddress], eax
;  mov  [CDSectorAddress],dword 15
        mov     [CDDataBuf_pointer], CDDataBuf
;--------------------------------------
.start:
        inc     dword [CDSectorAddress]
        call    ReadCDWRetr;_1
        cmp     [DevErrorCode], 0
        jne     .access_denied
 
.start_check:
; checking for "lice"
        cmp     [CDDataBuf+1], dword 'CD00'
        jne     .access_denied
 
        cmp     [CDDataBuf+5], byte '1'
        jne     .access_denied
; sector is the terminator of set of descriptors volumes?
        cmp     [CDDataBuf], byte 0xff
        je      .access_denied
; sector is an additional and improved descriptor of volume?
        cmp     [CDDataBuf], byte 0x2
        jne     .start
; sector is an additional descriptor of volume?
        cmp     [CDDataBuf+6], byte 0x1
        jne     .start
 
; parameters of root directory
        mov     eax, [CDDataBuf+0x9c+2]; start of root directory
        mov     [CDSectorAddress], eax
        mov     eax, [CDDataBuf+0x9c+10]; size of root directory
        cmp     byte [esi], 0
        jnz     @f
 
        mov     [cd_current_pointer_of_input], CDDataBuf+0x9c
        jmp     .done
;--------------------------------------
@@:
; start the search
.mainloop:
        dec     dword [CDSectorAddress]
;--------------------------------------
.read_to_buffer:
        inc     dword [CDSectorAddress]
        mov     [CDDataBuf_pointer], CDDataBuf
        call    ReadCDWRetr      ; read sector of directory
        cmp     [DevErrorCode], 0
        jne     .access_denied
 
        push    ebp
        call    cd_find_name_in_buffer
        pop     ebp
        jnc     .found
 
        sub     eax, 2048
; directory is over?
        cmp     eax, 0
        ja      .read_to_buffer
; desired element of chain is not found
.access_denied:
        pop     esi eax
        mov     [cd_appl_data], 1
        stc
        ret
;--------------------------------------
; desired element of chain found
.found:
; the end of the file path
        cmp     byte [esi-1], 0
        jz      .done
  .nested:
        mov     eax, [cd_current_pointer_of_input]
        push    dword [eax+2]
        pop     dword [CDSectorAddress] ; beginning of the directory
        mov     eax, [eax+2+8] ; size of directory
        jmp     .mainloop
;--------------------------------------
; file pointer found
.done:
        test    ebp, ebp
        jz      @f
 
        mov     esi, ebp
        xor     ebp, ebp
        jmp     .nested
;--------------------------------------
@@:
        pop     esi eax
        mov     [cd_appl_data], 1
        clc
        ret
;-----------------------------------------------------------------------------
cd_find_name_in_buffer:
        mov     [cd_current_pointer_of_input_2], CDDataBuf
;--------------------------------------
.start:
        call    cd_get_name
        jc      .not_found
 
        call    cd_compare_name
        jc      .start
;--------------------------------------
.found:
        clc
        ret
;--------------------------------------
.not_found:
        stc
        ret
;-----------------------------------------------------------------------------
cd_get_name:
        push    eax
        mov     ebp, [cd_current_pointer_of_input_2]
        mov     [cd_current_pointer_of_input], ebp
        mov     eax, [ebp]
        test    eax, eax ; entry's is over?
        jz      .next_sector
 
        cmp     ebp, CDDataBuf+2048  ; buffer is over?
        jae     .next_sector
 
        movzx   eax, byte [ebp]
        add     [cd_current_pointer_of_input_2], eax ; next entry of directory
        add     ebp, 33; pointer is set to the beginning of the name
        pop     eax
        clc
        ret
;--------------------------------------
.next_sector:
        pop     eax
        stc
        ret
;-----------------------------------------------------------------------------
cd_compare_name:
; compares ASCIIZ-names, case-insensitive (cp866 encoding)
; in: esi->name, ebp->name
; out: if names match: ZF=1 and esi->next component of name
;      else: ZF=0, esi is not changed
; destroys eax
        push    esi eax edi
        mov     edi, ebp
;--------------------------------------
.loop:
        cld
        lodsb
        push    eax
        call    char_todown
        call    ansi2uni_char
        xchg    ah, al
        scasw
        pop     eax
        je      .coincides
        call    char_toupper
        call    ansi2uni_char
        xchg    ah, al
        sub     edi, 2
        scasw
        jne     .name_not_coincide
;--------------------------------------
.coincides:
        cmp     [esi], byte '/' ; path separator is end of current element
        je      .done
 
        cmp     [esi], byte 0 ; path separator end of name
        je      .done
 
        jmp     .loop
;--------------------------------------
.name_not_coincide:
        pop     edi eax esi
        stc
        ret
;--------------------------------------
.done:
; check end of file
        cmp     [edi], word 3B00h; separator end of file ';'
        je      .done_1
; check for files not ending with separator
        movzx   eax, byte [ebp-33]
        add     eax, ebp
        sub     eax, 34
        cmp     edi, eax
        je      .done_1
; check the end of directory
        movzx   eax, byte [ebp-1]
        add     eax, ebp
        cmp     edi, eax
        jne     .name_not_coincide
;--------------------------------------
.done_1:
        pop     edi eax
        add     esp, 4
        inc     esi
        clc
        ret
;-----------------------------------------------------------------------------
char_todown:
; convert character to uppercase, using cp866 encoding
; in: al=symbol
; out: al=converted symbol
        cmp     al, 'A'
        jb      .ret
 
        cmp     al, 'Z'
        jbe     .az
 
        cmp     al, 0x80 ; 'А'
        jb      .ret
 
        cmp     al, 0x90 ; 'Р'
        jb      .rus1
 
        cmp     al, 0x9F ; 'Я'
        ja      .ret
; 0x90-0x9F -> 0xE0-0xEF
        add     al, 0xE0-0x90
;--------------------------------------
.ret:
        ret
;--------------------------------------
.rus1:
; 0x80-0x8F -> 0xA0-0xAF
.az:
        add     al, 0x20
        ret
;-----------------------------------------------------------------------------
uni2ansi_char:
; convert UNICODE character in al to ANSI character in ax, using cp866 encoding
; in: ax=UNICODE character
; out: al=converted ANSI character
        cmp     ax, 0x80
        jb      .ascii
 
        cmp     ax, 0x401
        jz      .yo1
 
        cmp     ax, 0x451
        jz      .yo2
 
        cmp     ax, 0x410
        jb      .unk
 
        cmp     ax, 0x440
        jb      .rus1
 
        cmp     ax, 0x450
        jb      .rus2
;--------------------------------------
.unk:
        mov     al, '_'
        jmp     .doit
;--------------------------------------
.yo1:
        mov     al, 0xF0 ; 'Ё' in cp866
        jmp     .doit
;--------------------------------------
.yo2:
        mov     al, 0xF1 ; 'ё' in cp866
        jmp     .doit
;--------------------------------------
.rus1:
; 0x410-0x43F -> 0x80-0xAF
        add     al, 0x70
        jmp     .doit
;--------------------------------------
.rus2:
; 0x440-0x44F -> 0xE0-0xEF
        add     al, 0xA0
;--------------------------------------
.ascii:
.doit:
        ret
;-----------------------------------------------------------------------------

Rev 4700	Rev 5363
1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2	;; ;;	2	;; ;;
3	;; Copyright (C) KolibriOS team 2004-2011. All rights reserved. ;;	3	;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
4	;; Distributed under terms of the GNU General Public License ;;	4	;; Distributed under terms of the GNU General Public License ;;
5	;; ;;	5	;; ;;
6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	6	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
7		7
8	$Revision: 4700 $	8	$Revision: 5363 $
9		9
10	;-----------------------------------------------------------------------------	10	;-----------------------------------------------------------------------------
11	uglobal	11	uglobal
12	cd_current_pointer_of_input dd 0	12	cd_current_pointer_of_input dd 0
13	cd_current_pointer_of_input_2 dd 0	13	cd_current_pointer_of_input_2 dd 0
14	cd_mem_location dd 0	14	cd_mem_location dd 0
15	cd_counter_block dd 0	15	cd_counter_block dd 0
16	endg	16	endg
17	;-----------------------------------------------------------------------------	17	;-----------------------------------------------------------------------------
18	reserve_cd:	18	reserve_cd:
19	cli	19	cli
20	cmp [cd_status], 0	20	cmp [cd_status], 0
21	je reserve_ok2	21	je reserve_ok2
22		22
23	sti	23	sti
24	call change_task	24	call change_task
25	jmp reserve_cd	25	jmp reserve_cd
26	;-----------------------------------------------------------------------------	26	;-----------------------------------------------------------------------------
27	reserve_ok2:	27	reserve_ok2:
28	push eax	28	push eax
29	mov eax, [CURRENT_TASK]	29	mov eax, [CURRENT_TASK]
30	shl eax, 5	30	shl eax, 5
31	mov eax, [eax+CURRENT_TASK+TASKDATA.pid]	31	mov eax, [eax+CURRENT_TASK+TASKDATA.pid]
32	mov [cd_status], eax	32	mov [cd_status], eax
33	pop eax	33	pop eax
34	sti	34	sti
35	ret	35	ret
36	;-----------------------------------------------------------------------------	36	;-----------------------------------------------------------------------------
37	reserve_cd_channel:	37	reserve_cd_channel:
38	pushad	38	pushad
39	mov eax, [cdpos]	39	mov eax, [cdpos]
40	dec eax	40	dec eax
41	shr eax, 2	41	shr eax, 2
42		42
43	test eax, eax	43	test eax, eax
44	jnz .1	44	jnz .1
45		45
46	cmp [ChannelNumber], 1	46	cmp [ChannelNumber], 1
47	jne @f	47	jne @f
48		48
49	mov ecx, ide_channel1_mutex	49	mov ecx, ide_channel1_mutex
50	jmp .mutex_lock	50	jmp .mutex_lock
51	;--------------------------------------	51	;--------------------------------------
52	@@:	52	@@:
53	mov ecx, ide_channel2_mutex	53	mov ecx, ide_channel2_mutex
54	jmp .mutex_lock	54	jmp .mutex_lock
55	;--------------------------------------	55	;--------------------------------------
56	.1:	56	.1:
57	dec eax	57	dec eax
58	jnz .2	58	jnz .2
59		59
60	cmp [ChannelNumber], 1	60	cmp [ChannelNumber], 1
61	jne @f	61	jne @f
62		62
63	mov ecx, ide_channel3_mutex	63	mov ecx, ide_channel3_mutex
64	jmp .mutex_lock	64	jmp .mutex_lock
65	;--------------------------------------	65	;--------------------------------------
66	@@:	66	@@:
67	mov ecx, ide_channel4_mutex	67	mov ecx, ide_channel4_mutex
68	jmp .mutex_lock	68	jmp .mutex_lock
69	;--------------------------------------	69	;--------------------------------------
70	.2:	70	.2:
71	cmp [ChannelNumber], 1	71	cmp [ChannelNumber], 1
72	jne @f	72	jne @f
73		73
74	mov ecx, ide_channel5_mutex	74	mov ecx, ide_channel5_mutex
75	jmp .mutex_lock	75	jmp .mutex_lock
76	;--------------------------------------	76	;--------------------------------------
77	@@:	77	@@:
78	mov ecx, ide_channel6_mutex	78	mov ecx, ide_channel6_mutex
79	.mutex_lock:	79	.mutex_lock:
80	call mutex_lock	80	call mutex_lock
81	popad	81	popad
82	ret	82	ret
83	;-----------------------------------------------------------------------------	83	;-----------------------------------------------------------------------------
84	free_cd_channel:	84	free_cd_channel:
85	pushad	85	pushad
86	mov eax, [cdpos]	86	mov eax, [cdpos]
87	dec eax	87	dec eax
88	shr eax, 2	88	shr eax, 2
89		89
90	test eax, eax	90	test eax, eax
91	jnz .1	91	jnz .1
92		92
93	cmp [ChannelNumber], 1	93	cmp [ChannelNumber], 1
94	jne @f	94	jne @f
95		95
96	mov ecx, ide_channel1_mutex	96	mov ecx, ide_channel1_mutex
97	jmp .mutex_unlock	97	jmp .mutex_unlock
98	;--------------------------------------	98	;--------------------------------------
99	@@:	99	@@:
100	mov ecx, ide_channel2_mutex	100	mov ecx, ide_channel2_mutex
101	jmp .mutex_unlock	101	jmp .mutex_unlock
102	;--------------------------------------	102	;--------------------------------------
103	.1:	103	.1:
104	dec eax	104	dec eax
105	jnz .2	105	jnz .2
106		106
107	cmp [ChannelNumber], 1	107	cmp [ChannelNumber], 1
108	jne @f	108	jne @f
109		109
110	mov ecx, ide_channel3_mutex	110	mov ecx, ide_channel3_mutex
111	jmp .mutex_unlock	111	jmp .mutex_unlock
112	;--------------------------------------	112	;--------------------------------------
113	@@:	113	@@:
114	mov ecx, ide_channel4_mutex	114	mov ecx, ide_channel4_mutex
115	jmp .mutex_unlock	115	jmp .mutex_unlock
116	;--------------------------------------	116	;--------------------------------------
117	.2:	117	.2:
118	cmp [ChannelNumber], 1	118	cmp [ChannelNumber], 1
119	jne @f	119	jne @f
120		120
121	mov ecx, ide_channel5_mutex	121	mov ecx, ide_channel5_mutex
122	jmp .mutex_unlock	122	jmp .mutex_unlock
123	;--------------------------------------	123	;--------------------------------------
124	@@:	124	@@:
125	mov ecx, ide_channel6_mutex	125	mov ecx, ide_channel6_mutex
126	.mutex_unlock:	126	.mutex_unlock:
127	call mutex_unlock	127	call mutex_unlock
128	popad	128	popad
129	ret	129	ret
130	;-----------------------------------------------------------------------------	130	;-----------------------------------------------------------------------------
131	uglobal	131	uglobal
132	cd_status dd 0	132	cd_status dd 0
133	endg	133	endg
134	;-----------------------------------------------------------------------------	134	;-----------------------------------------------------------------------------
135	;	135	;
136	; fs_CdRead - LFN variant for reading CD disk	136	; fs_CdRead - LFN variant for reading CD disk
137	;	137	;
138	; esi points to filename /dir1/dir2/.../dirn/file,0	138	; esi points to filename /dir1/dir2/.../dirn/file,0
139	; ebx pointer to 64-bit number = first wanted byte, 0+	139	; ebx pointer to 64-bit number = first wanted byte, 0+
140	; may be ebx=0 - start from first byte	140	; may be ebx=0 - start from first byte
141	; ecx number of bytes to read, 0+	141	; ecx number of bytes to read, 0+
142	; edx mem location to return data	142	; edx mem location to return data
143	;	143	;
144	; ret ebx = bytes read or 0xffffffff file not found	144	; ret ebx = bytes read or 0xffffffff file not found
145	; eax = 0 ok read or other = errormsg	145	; eax = 0 ok read or other = errormsg
146	;	146	;
147	;-----------------------------------------------------------------------------	147	;-----------------------------------------------------------------------------
148	fs_CdRead:	148	fs_CdRead:
149	push edi	149	push edi
150	cmp byte [esi], 0	150	cmp byte [esi], 0
151	jnz @f	151	jnz @f
152	;--------------------------------------	152	;--------------------------------------
153	.noaccess:	153	.noaccess:
154	pop edi	154	pop edi
155	;--------------------------------------	155	;--------------------------------------
156	.noaccess_2:	156	.noaccess_2:
157	or ebx, -1	157	or ebx, -1
158	mov eax, ERROR_ACCESS_DENIED	158	mov eax, ERROR_ACCESS_DENIED
159	ret	159	ret
160	;--------------------------------------	160	;--------------------------------------
161	.noaccess_3:	161	.noaccess_3:
162	pop eax edx ecx edi	162	pop eax edx ecx edi
163	jmp .noaccess_2	163	jmp .noaccess_2
164	;--------------------------------------	164	;--------------------------------------
165	@@:	165	@@:
166	call cd_find_lfn	166	call cd_find_lfn
167	jnc .found	167	jnc .found
168		168
169	pop edi	169	pop edi
170	cmp [DevErrorCode], 0	170	cmp [DevErrorCode], 0
171	jne .noaccess_2	171	jne .noaccess_2
172		172
173	or ebx, -1	173	or ebx, -1
174	mov eax, ERROR_FILE_NOT_FOUND	174	mov eax, ERROR_FILE_NOT_FOUND
175	ret	175	ret
176	;--------------------------------------	176	;--------------------------------------
177	.found:	177	.found:
178	mov edi, [cd_current_pointer_of_input]	178	mov edi, [cd_current_pointer_of_input]
179	test byte [edi+25], 10b; do not allow read directories	179	test byte [edi+25], 10b; do not allow read directories
180	jnz .noaccess	180	jnz .noaccess
181		181
182	test ebx, ebx	182	test ebx, ebx
183	jz .l1	183	jz .l1
184		184
185	cmp dword [ebx+4], 0	185	cmp dword [ebx+4], 0
186	jz @f	186	jz @f
187		187
188	xor ebx, ebx	188	xor ebx, ebx
189	;--------------------------------------	189	;--------------------------------------
190	.reteof:	190	.reteof:
191	mov eax, 6; end of file	191	mov eax, 6; end of file
192	pop edi	192	pop edi
193	ret	193	ret
194	;--------------------------------------	194	;--------------------------------------
195	@@:	195	@@:
196	mov ebx, [ebx]	196	mov ebx, [ebx]
197	;--------------------------------------	197	;--------------------------------------
198	.l1:	198	.l1:
199	push ecx edx	199	push ecx edx
200	push 0	200	push 0
201	mov eax, [edi+10] ; real size of the file section	201	mov eax, [edi+10] ; real size of the file section
202	sub eax, ebx	202	sub eax, ebx
203	jb .eof	203	jb .eof
204		204
205	cmp eax, ecx	205	cmp eax, ecx
206	jae @f	206	jae @f
207		207
208	mov ecx, eax	208	mov ecx, eax
209	mov byte [esp], 6	209	mov byte [esp], 6
210	;--------------------------------------	210	;--------------------------------------
211	@@:	211	@@:
212	mov eax, [edi+2]	212	mov eax, [edi+2]
213	mov [CDSectorAddress], eax	213	mov [CDSectorAddress], eax
214	;--------------------------------------	214	;--------------------------------------
215	; now eax=cluster, ebx=position, ecx=count, edx=buffer for data	215	; now eax=cluster, ebx=position, ecx=count, edx=buffer for data
216	.new_sector:	216	.new_sector:
217	test ecx, ecx	217	test ecx, ecx
218	jz .done	218	jz .done
219		219
220	sub ebx, 2048	220	sub ebx, 2048
221	jae .next	221	jae .next
222		222
223	add ebx, 2048	223	add ebx, 2048
224	jnz .incomplete_sector	224	jnz .incomplete_sector
225		225
226	cmp ecx, 2048	226	cmp ecx, 2048
227	jb .incomplete_sector	227	jb .incomplete_sector
228	; we may read and memmove complete sector	228	; we may read and memmove complete sector
229	mov [CDDataBuf_pointer], edx	229	mov [CDDataBuf_pointer], edx
230	call ReadCDWRetr ; read sector of file	230	call ReadCDWRetr ; read sector of file
231	cmp [DevErrorCode], 0	231	cmp [DevErrorCode], 0
232	jne .noaccess_3	232	jne .noaccess_3
233		233
234	add edx, 2048	234	add edx, 2048
235	sub ecx, 2048	235	sub ecx, 2048
236	;--------------------------------------	236	;--------------------------------------
237	.next:	237	.next:
238	inc dword [CDSectorAddress]	238	inc dword [CDSectorAddress]
239	jmp .new_sector	239	jmp .new_sector
240	;--------------------------------------	240	;--------------------------------------
241	.incomplete_sector:	241	.incomplete_sector:
242	; we must read and memmove incomplete sector	242	; we must read and memmove incomplete sector
243	mov [CDDataBuf_pointer], CDDataBuf	243	mov [CDDataBuf_pointer], CDDataBuf
244	call ReadCDWRetr ; read sector of file	244	call ReadCDWRetr ; read sector of file
245	cmp [DevErrorCode], 0	245	cmp [DevErrorCode], 0
246	jne .noaccess_3	246	jne .noaccess_3
247		247
248	push ecx	248	push ecx
249	add ecx, ebx	249	add ecx, ebx
250	cmp ecx, 2048	250	cmp ecx, 2048
251	jbe @f	251	jbe @f
252		252
253	mov ecx, 2048	253	mov ecx, 2048
254	;--------------------------------------	254	;--------------------------------------
255	@@:	255	@@:
256	sub ecx, ebx	256	sub ecx, ebx
257	push edi esi ecx	257	push edi esi ecx
258	mov edi, edx	258	mov edi, edx
259	lea esi, [CDDataBuf + ebx]	259	lea esi, [CDDataBuf + ebx]
260	cld	260	cld
261	rep movsb	261	rep movsb
262	pop ecx esi edi	262	pop ecx esi edi
263	add edx, ecx	263	add edx, ecx
264	sub [esp], ecx	264	sub [esp], ecx
265	pop ecx	265	pop ecx
266	xor ebx, ebx	266	xor ebx, ebx
267	jmp .next	267	jmp .next
268	;--------------------------------------	268	;--------------------------------------
269	.done:	269	.done:
270	mov ebx, edx	270	mov ebx, edx
271	pop eax edx ecx edi	271	pop eax edx ecx edi
272	sub ebx, edx	272	sub ebx, edx
273	ret	273	ret
274	;--------------------------------------	274	;--------------------------------------
275	.eof:	275	.eof:
276	mov ebx, edx	276	mov ebx, edx
277	pop eax edx ecx	277	pop eax edx ecx
278	sub ebx, edx	278	sub ebx, edx
279	jmp .reteof	279	jmp .reteof
280	;-----------------------------------------------------------------------------	280	;-----------------------------------------------------------------------------
281	;	281	;
282	; fs_CdReadFolder - LFN variant for reading CD disk folder	282	; fs_CdReadFolder - LFN variant for reading CD disk folder
283	;	283	;
284	; esi points to filename /dir1/dir2/.../dirn/file,0	284	; esi points to filename /dir1/dir2/.../dirn/file,0
285	; ebx pointer to structure 32-bit number = first wanted block, 0+	285	; ebx pointer to structure 32-bit number = first wanted block, 0+
286	; & flags (bitfields)	286	; & flags (bitfields)
287	; flags: bit 0: 0=ANSI names, 1=UNICODE names	287	; flags: bit 0: 0=ANSI names, 1=UNICODE names
288	; ecx number of blocks to read, 0+	288	; ecx number of blocks to read, 0+
289	; edx mem location to return data	289	; edx mem location to return data
290	;	290	;
291	; ret ebx = blocks read or 0xffffffff folder not found	291	; ret ebx = blocks read or 0xffffffff folder not found
292	; eax = 0 ok read or other = errormsg	292	; eax = 0 ok read or other = errormsg
293	;	293	;
294	;-----------------------------------------------------------------------------	294	;-----------------------------------------------------------------------------
295	fs_CdReadFolder:	295	fs_CdReadFolder:
296	push edi	296	push edi
297	call cd_find_lfn	297	call cd_find_lfn
298	jnc .found	298	jnc .found
299		299
300	pop edi	300	pop edi
301	cmp [DevErrorCode], 0	301	cmp [DevErrorCode], 0
302	jne .noaccess_1	302	jne .noaccess_1
303		303
304	or ebx, -1	304	or ebx, -1
305	mov eax, ERROR_FILE_NOT_FOUND	305	mov eax, ERROR_FILE_NOT_FOUND
306	ret	306	ret
307	;--------------------------------------	307	;--------------------------------------
308	.found:	308	.found:
309	mov edi, [cd_current_pointer_of_input]	309	mov edi, [cd_current_pointer_of_input]
310	test byte [edi+25], 10b ; do not allow read directories	310	test byte [edi+25], 10b ; do not allow read directories
311	jnz .found_dir	311	jnz .found_dir
312		312
313	pop edi	313	pop edi
314	;--------------------------------------	314	;--------------------------------------
315	.noaccess_1:	315	.noaccess_1:
316	or ebx, -1	316	or ebx, -1
317	mov eax, ERROR_ACCESS_DENIED	317	mov eax, ERROR_ACCESS_DENIED
318	ret	318	ret
319	;--------------------------------------	319	;--------------------------------------
320	.found_dir:	320	.found_dir:
321	mov eax, [edi+2] ; eax=cluster	321	mov eax, [edi+2] ; eax=cluster
322	mov [CDSectorAddress], eax	322	mov [CDSectorAddress], eax
323	mov eax, [edi+10] ; directory size	323	mov eax, [edi+10] ; directory size
324	;--------------------------------------	324	;--------------------------------------
325	.doit:	325	.doit:
326	; init header	326	; init header
327	push eax ecx	327	push eax ecx
328	mov edi, edx	328	mov edi, edx
329	mov ecx, 32/4	329	mov ecx, 32/4
330	xor eax, eax	330	xor eax, eax
331	rep stosd	331	rep stosd
332	pop ecx eax	332	pop ecx eax
333	mov byte [edx], 1 ; version	333	mov byte [edx], 1 ; version
334	mov [cd_mem_location], edx	334	mov [cd_mem_location], edx
335	add [cd_mem_location], 32	335	add [cd_mem_location], 32
336	;.mainloop:	336	;.mainloop:
337	mov [cd_counter_block], dword 0	337	mov [cd_counter_block], dword 0
338	dec dword [CDSectorAddress]	338	dec dword [CDSectorAddress]
339	push ecx	339	push ecx
340	;--------------------------------------	340	;--------------------------------------
341	.read_to_buffer:	341	.read_to_buffer:
342	inc dword [CDSectorAddress]	342	inc dword [CDSectorAddress]
343	mov [CDDataBuf_pointer], CDDataBuf	343	mov [CDDataBuf_pointer], CDDataBuf
344	call ReadCDWRetr ; read sector of directory	344	call ReadCDWRetr ; read sector of directory
345	cmp [DevErrorCode], 0	345	cmp [DevErrorCode], 0
346	jne .noaccess_1	346	jne .noaccess_1
347		347
348	call .get_names_from_buffer	348	call .get_names_from_buffer
349	sub eax, 2048	349	sub eax, 2048
350	; directory is over?	350	; directory is over?
351	ja .read_to_buffer	351	ja .read_to_buffer
352		352
353	mov edi, [cd_counter_block]	353	mov edi, [cd_counter_block]
354	mov [edx+8], edi	354	mov [edx+8], edi
355	mov edi, [ebx]	355	mov edi, [ebx]
356	sub [edx+4], edi	356	sub [edx+4], edi
357	xor eax, eax	357	xor eax, eax
358	dec ecx	358	dec ecx
359	js @f	359	js @f
360		360
361	mov al, ERROR_END_OF_FILE	361	mov al, ERROR_END_OF_FILE
362	;--------------------------------------	362	;--------------------------------------
363	@@:	363	@@:
364	pop ecx edi	364	pop ecx edi
365	mov ebx, [edx+4]	365	mov ebx, [edx+4]
366	ret	366	ret
367	;--------------------------------------	367	;--------------------------------------
368	.get_names_from_buffer:	368	.get_names_from_buffer:
369	mov [cd_current_pointer_of_input_2], CDDataBuf	369	mov [cd_current_pointer_of_input_2], CDDataBuf
370	push eax esi edi edx	370	push eax esi edi edx
371	;--------------------------------------	371	;--------------------------------------
372	.get_names_from_buffer_1:	372	.get_names_from_buffer_1:
373	call cd_get_name	373	call cd_get_name
374	jc .end_buffer	374	jc .end_buffer
375		375
376	inc dword [cd_counter_block]	376	inc dword [cd_counter_block]
377	mov eax, [cd_counter_block]	377	mov eax, [cd_counter_block]
378	cmp [ebx], eax	378	cmp [ebx], eax
379	jae .get_names_from_buffer_1	379	jae .get_names_from_buffer_1
380		380
381	test ecx, ecx	381	test ecx, ecx
382	jz .get_names_from_buffer_1	382	jz .get_names_from_buffer_1
383		383
384	mov edi, [cd_counter_block]	384	mov edi, [cd_counter_block]
385	mov [edx+4], edi	385	mov [edx+4], edi
386	dec ecx	386	dec ecx
387	mov esi, ebp	387	mov esi, ebp
388	mov edi, [cd_mem_location]	388	mov edi, [cd_mem_location]
389	add edi, 40	389	add edi, 40
390	test dword [ebx+4], 1; 0=ANSI, 1=UNICODE	390	test dword [ebx+4], 1; 0=ANSI, 1=UNICODE
391	jnz .unicode	391	jnz .unicode
392	;--------------------------------------	392	;--------------------------------------
393	.ansi:	393	.ansi:
394	cmp [cd_counter_block], 2	394	cmp [cd_counter_block], 2
395	jbe .ansi_parent_directory	395	jbe .ansi_parent_directory
396		396
397	cld	397	cld
398	lodsw	398	lodsw
399	xchg ah, al	399	xchg ah, al
400	call uni2ansi_char	400	call uni2ansi_char
401	cld	401	cld
402	stosb	402	stosb
403	; check end of file	403	; check end of file
404	mov ax, [esi]	404	mov ax, [esi]
405	cmp ax, word 3B00h ; separator end of file ';'	405	cmp ax, word 3B00h ; separator end of file ';'
406	je .cd_get_parameters_of_file_1	406	je .cd_get_parameters_of_file_1
407	; check for files not ending with separator	407	; check for files not ending with separator
408	movzx eax, byte [ebp-33]	408	movzx eax, byte [ebp-33]
409	add eax, ebp	409	add eax, ebp
410	sub eax, 34	410	sub eax, 34
411	cmp esi, eax	411	cmp esi, eax
412	je .cd_get_parameters_of_file_1	412	je .cd_get_parameters_of_file_1
413	; check the end of the directory	413	; check the end of the directory
414	movzx eax, byte [ebp-1]	414	movzx eax, byte [ebp-1]
415	add eax, ebp	415	add eax, ebp
416	cmp esi, eax	416	cmp esi, eax
417	jb .ansi	417	jb .ansi
418	;--------------------------------------	418	;--------------------------------------
419	.cd_get_parameters_of_file_1:	419	.cd_get_parameters_of_file_1:
420	mov [edi], byte 0	420	mov [edi], byte 0
421	call cd_get_parameters_of_file	421	call cd_get_parameters_of_file
422	add [cd_mem_location], 304	422	add [cd_mem_location], 304
423	jmp .get_names_from_buffer_1	423	jmp .get_names_from_buffer_1
424	;--------------------------------------	424	;--------------------------------------
425	.ansi_parent_directory:	425	.ansi_parent_directory:
426	cmp [cd_counter_block], 2	426	cmp [cd_counter_block], 2
427	je @f	427	je @f
428		428
429	mov [edi], byte '.'	429	mov [edi], byte '.'
430	inc edi	430	inc edi
431	jmp .cd_get_parameters_of_file_1	431	jmp .cd_get_parameters_of_file_1
432	;--------------------------------------	432	;--------------------------------------
433	@@:	433	@@:
434	mov [edi], word '..'	434	mov [edi], word '..'
435	add edi, 2	435	add edi, 2
436	jmp .cd_get_parameters_of_file_1	436	jmp .cd_get_parameters_of_file_1
437	;--------------------------------------	437	;--------------------------------------
438	.unicode:	438	.unicode:
439	cmp [cd_counter_block], 2	439	cmp [cd_counter_block], 2
440	jbe .unicode_parent_directory	440	jbe .unicode_parent_directory
441		441
442	cld	442	cld
443	movsw	443	movsw
444	; check end of file	444	; check end of file
445	mov ax, [esi]	445	mov ax, [esi]
446	cmp ax, word 3B00h; separator end of file ';'	446	cmp ax, word 3B00h; separator end of file ';'
447	je .cd_get_parameters_of_file_2	447	je .cd_get_parameters_of_file_2
448	; check for files not ending with separator	448	; check for files not ending with separator
449	movzx eax, byte [ebp-33]	449	movzx eax, byte [ebp-33]
450	add eax, ebp	450	add eax, ebp
451	sub eax, 34	451	sub eax, 34
452	cmp esi, eax	452	cmp esi, eax
453	je .cd_get_parameters_of_file_2	453	je .cd_get_parameters_of_file_2
454	; check the end of the directory	454	; check the end of the directory
455	movzx eax, byte [ebp-1]	455	movzx eax, byte [ebp-1]
456	add eax, ebp	456	add eax, ebp
457	cmp esi, eax	457	cmp esi, eax
458	jb .unicode	458	jb .unicode
459	;--------------------------------------	459	;--------------------------------------
460	.cd_get_parameters_of_file_2:	460	.cd_get_parameters_of_file_2:
461	mov [edi], word 0	461	mov [edi], word 0
462	call cd_get_parameters_of_file	462	call cd_get_parameters_of_file
463	add [cd_mem_location], 560	463	add [cd_mem_location], 560
464	jmp .get_names_from_buffer_1	464	jmp .get_names_from_buffer_1
465	;--------------------------------------	465	;--------------------------------------
466	.unicode_parent_directory:	466	.unicode_parent_directory:
467	cmp [cd_counter_block], 2	467	cmp [cd_counter_block], 2
468	je @f	468	je @f
469		469
470	mov [edi], word 2E00h; '.'	470	mov [edi], word 2E00h; '.'
471	add edi, 2	471	add edi, 2
472	jmp .cd_get_parameters_of_file_2	472	jmp .cd_get_parameters_of_file_2
473	;--------------------------------------	473	;--------------------------------------
474	@@:	474	@@:
475	mov [edi], dword 2E002E00h; '..'	475	mov [edi], dword 2E002E00h; '..'
476	add edi, 4	476	add edi, 4
477	jmp .cd_get_parameters_of_file_2	477	jmp .cd_get_parameters_of_file_2
478	;--------------------------------------	478	;--------------------------------------
479	.end_buffer:	479	.end_buffer:
480	pop edx edi esi eax	480	pop edx edi esi eax
481	ret	481	ret
482	;-----------------------------------------------------------------------------	482	;-----------------------------------------------------------------------------
483	cd_get_parameters_of_file:	483	cd_get_parameters_of_file:
484	mov edi, [cd_mem_location]	484	mov edi, [cd_mem_location]
485	cd_get_parameters_of_file_1:	485	cd_get_parameters_of_file_1:
486	; get file attributes	486	; get file attributes
487	xor eax, eax	487	xor eax, eax
488	; file is not archived	488	; file is not archived
489	inc eax	489	inc eax
490	shl eax, 1	490	shl eax, 1
491	; is a directory?	491	; is a directory?
492	test [ebp-8], byte 2	492	test [ebp-8], byte 2
493	jz .file	493	jz .file
494		494
495	inc eax	495	inc eax
496	;--------------------------------------	496	;--------------------------------------
497	.file:	497	.file:
498	; not as a volume label in the FAT, in this form not available	498	; not as a volume label in the FAT, in this form not available
499	; file is not a system	499	; file is not a system
500	shl eax, 3	500	shl eax, 3

Subversion Repositories Kolibri OS

(root)/kernel/trunk/fs/iso9660.inc – Rev 4700 → 5363