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


$Revision: 431 $
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                              ;;
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
;; Distributed under terms of the GNU General Public License    ;;
;;                                                              ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
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
IDE_Channel_1                  db  0
IDE_Channel_2                  db  0
endg
 
CDDataBuf equ 0x7000
 
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:
    cmp   [ChannelNumber],1
    jne   .IDE_Channel_2
.IDE_Channel_1:
    cli
    cmp   [IDE_Channel_1],0
    je    .reserve_ok_1
    sti
    call  change_task
    jmp   .IDE_Channel_1
.IDE_Channel_2:
    cli
    cmp   [IDE_Channel_2],0
    je    .reserve_ok_2
    sti
    call  change_task
    jmp   .IDE_Channel_1
.reserve_ok_1:
    mov [IDE_Channel_1],1
    ret
.reserve_ok_2:
    mov [IDE_Channel_2],1
    ret
 
free_cd_channel:
    cmp   [ChannelNumber],1
    jne   .IDE_Channel_2
.IDE_Channel_1:
    mov [IDE_Channel_1],0
    ret
.IDE_Channel_2:
    mov [IDE_Channel_2],0
    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] ; ðåàëüíûé ðàçìåð ôàéëîâîé ñåêöèè
        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      ; ÷èòàåì ñåêòîð ôàéëà
    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      ; ÷èòàåì ñåêòîð ôàéëà
    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]   ; ðàçìåð äèðåêòðîðèè
.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         ; ÷èòàåì ñåêòîð äèðåêòîðèè
        cmp     [DevErrorCode], 0
        jne     .noaccess_1
        call    .get_names_from_buffer
        sub     eax,2048
; äèðåêòîðèÿ çàêîí÷èëàñü?
        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
;    jmp  .unicode
.ansi:
    cmp   [cd_counter_block],2
    jbe   .ansi_parent_directory
    cld
    lodsw
    xchg ah,al
    call uni2ansi_char
    cld
    stosb
; ïðîâåðêà êîíöà ôàéëà
    mov   ax,[esi]
    cmp   ax,word 3B00h ; ñåïàðàòîð êîíöà ôàéëà ';'
    je   .cd_get_parameters_of_file_1
; ïðîâåðêà äëÿ ôàéëîâ íå çàêàí÷èâàþùèõñÿ ñåïàðàòîðîì
    movzx   eax,byte [ebp-33]
    add   eax,ebp
    sub   eax,34
    cmp   esi,eax
    je   .cd_get_parameters_of_file_1
; ïðîâåðêà êîíöà ïàïêè
    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
; ïðîâåðêà êîíöà ôàéëà
    mov   ax,[esi]
    cmp   ax,word 3B00h ; ñåïàðàòîð êîíöà ôàéëà ';'
    je   .cd_get_parameters_of_file_2
; ïðîâåðêà äëÿ ôàéëîâ íå çàêàí÷èâàþùèõñÿ ñåïàðàòîðîì
    movzx   eax,byte [ebp-33]
    add   eax,ebp
    sub   eax,34
    cmp   esi,eax
    je   .cd_get_parameters_of_file_2
; ïðîâåðêà êîíöà ïàïêè
    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:
; ïîëó÷àåì àòðèáóòû ôàéëà
    xor   eax,eax
; ôàéë íå àðõèâèðîâàëñ
    inc   al
    shl   eax,1
; ýòî êàòàëîã?
    test  [ebp-8],byte 2
    jz    .file
    inc   al
.file:
; ìåòêà òîìà íå êàê â FAT, â ýòîì âèäå îòñóòñâóåò
; ôàéë íå ÿâëÿåòñÿ ñèñòåìíûì
    shl   eax,3
; ôàéë ÿâëÿåòñÿ ñêðûòûì? (àòðèáóò ñóùåñòâîâàíèå)
    test  [ebp-8],byte 1
    jz    .hidden
    inc   al
.hidden:
    shl   eax,1
; ôàéë âñåãäà òîëüêî äëÿ ÷òåíèÿ, òàê êàê ýòî CD
    inc   al
    mov   [edi],eax
; ïîëó÷àåì âðåìÿ äëÿ ôàéëà
;÷àñ
    movzx eax,byte [ebp-12]
    shl   eax,8
;ìèíóòà
    mov   al,[ebp-11]
    shl   eax,8
;ñåêóíäà
    mov   al,[ebp-10]
;âðåìÿ ñîçäàíèÿ ôàéëà
    mov   [edi+8],eax
;âðåìÿ ïîñëåäíåãî äîñòóïà
    mov   [edi+16],eax
;âðåìÿ ïîñëåäíåé çàïèñè
    mov   [edi+24],eax
; ïîëó÷àåì äàòó äëÿ ôàéëà
;ãîä
    movzx eax,byte [ebp-15]
    add   eax,1900
    shl   eax,8
;ìåñÿö
    mov   al,[ebp-14]
    shl   eax,8
;äåíü
    mov   al,[ebp-13]
;äàòà ñîçäàíèÿ ôàéëà
    mov   [edi+12],eax
;âðåìÿ ïîñëåäíåãî äîñòóïà
    mov   [edi+20],eax
;âðåìÿ ïîñëåäíåé çàïèñè
    mov   [edi+28],eax
; ïîëó÷àåì òèï äàííûõ èìåíè
    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
@@:
; ïîëó÷àåì ðàçìåð ôàéëà â áàéòàõ
    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 ebp
        call    cd_find_lfn
        pushfd
        cmp     [DevErrorCode], 0
        jz      @f
        popfd
        pop     ebp edi
        mov     eax, 11
        ret
@@:
        popfd
        jnc     @f
        pop     ebp edi
        mov     eax, ERROR_FILE_NOT_FOUND
        ret
@@:
 
        mov     edi, edx
        call    cd_get_parameters_of_file_1
        and     dword [edi+4], 0
        pop     ebp edi
        xor     eax, eax
        ret
 
;----------------------------------------------------------------
;
;  fs_CdExecute - LFN variant for executing from CD
;
;  esi  points to hd filename (e.g. 'dir1/name')
;  ebp  points to full filename (e.g. '/hd0/1/dir1/name')
;  dword [ebx] = flags
;  dword [ebx+4] = cmdline
;
;  ret ebx,edx destroyed
;      eax > 0 - PID, < 0 - error
;
;--------------------------------------------------------------
fs_CdExecute:
        mov     edx, [ebx]
        mov     ebx, [ebx+4]
        test    ebx, ebx
        jz      @f
        add     ebx, std_application_base_address
@@:
 
;----------------------------------------------------------------
;
; fs_CdExecute.flags - second entry
;
;  esi  points to floppy filename (kernel address)
;  ebp  points to full filename
;  edx  flags
;  ebx  cmdline (kernel address)
;
;  ret  eax > 0 - PID, < 0 - error
;
;--------------------------------------------------------------
 
.flags:
        cmp     byte [esi], 0
        jnz     @f
; cannot execute root!
        mov     eax, -ERROR_ACCESS_DENIED
        ret
@@:
        push    edi
        call    cd_find_lfn
        jnc     .found
        pop     edi
        mov     eax, -ERROR_FILE_NOT_FOUND
        cmp     [DevErrorCode], 0
        jz      @f
        mov     al, -11
@@:
        ret
.found:
        mov     edi,[cd_current_pointer_of_input]
        mov    eax,[edi+2]
        push    0
        push    eax
        push    dword [edi+10]          ; size
        push    .DoRead
        call    fs_execute
        add     esp, 16
        pop     edi
        ret
 
.DoRead:
; read next block
; in: eax->parameters, edi->buffer
; out: eax = error code
        pushad
        cmp     dword [eax], 0  ; file size
        jz      .eof
        cmp     [eax+8],dword 0
        jne     @f
        mov     ecx,[eax+4]
        inc     dword [eax+4]
        mov     [CDSectorAddress],ecx
        mov     [CDDataBuf_pointer],CDDataBuf  ;edi
        call    ReadCDWRetr
        cmp     [DevErrorCode], 0
        jnz     .err
@@:
        push    esi edi ecx
        mov     esi,512
        imul    esi,[eax+8]
        add     esi,CDDataBuf
        mov     ecx,512/4
        cld
        rep     movsd
        pop     ecx edi esi
 
        mov     eax, [esp+28]
        mov     ecx, [eax]
        sub     ecx, 512
        jae     @f
        lea     edi, [edi+ecx+512]
        neg     ecx
        push    eax
        xor     eax, eax
        rep     stosb
        pop     eax
@@:
        mov     [eax], ecx
        mov     edx, [eax+8]
        inc     edx
        cmp     edx, 4  ; 2048/512=4
        jb      @f
        xor     edx, edx
@@:
        mov     [eax+8], edx
        popad
        xor     eax, eax
        ret
.eof:
        popad
        mov     eax, 6
        ret
.err:
        popad
        mov     eax, 11
        ret
 
cd_find_lfn:
; in: esi->name
; out: CF=1 - file not found
;      else CF=0 and [cd_current_pointer_of_input] direntry
        push eax esi
; 16 ñåêòîð íà÷àëî íàáîðà äåñêðèïòîðîâ òîìîâ
        mov  [CDSectorAddress],dword 15
.start:
        inc  dword [CDSectorAddress]
       mov  [CDDataBuf_pointer],CDDataBuf
       call  ReadCDWRetr
       cmp   [DevErrorCode],0
       jne   .access_denied
; ïðîâåðêà íà âøèâîñòü
        cmp  [CDDataBuf+1],dword 'CD00'
        jne  .access_denied
        cmp  [CDDataBuf+5],byte '1'
        jne  .access_denied
; ñåêòîð ÿâëÿåòñÿ òåðìèíàòîðîì íàáîð äåñêðèïòîðîâ òîìîâ?
        cmp  [CDDataBuf],byte 0xff
        je  .access_denied
; ñåêòîð ÿâëÿåòñÿ äîïîëíèòåëüíûì è óëó÷øåííûì äåñêðèïòîðîì òîìà?
        cmp  [CDDataBuf],byte 0x2
        jne  .start
; ñåêòîð ÿâëÿåòñÿ äîïîëíèòåëüíûì äåñêðèïòîðîì òîìà?
        cmp  [CDDataBuf+6],byte 0x1
        jne  .start
; ïàðàìåòðû root äèðåêòðîðèè
        mov  eax,[CDDataBuf+0x9c+2] ; íà÷àëî root äèðåêòðîðèè
        mov  [CDSectorAddress],eax
        mov  eax,[CDDataBuf+0x9c+10] ; ðàçìåð root äèðåêòðîðèè
        cmp    byte [esi], 0
        jnz    @f
        mov   [cd_current_pointer_of_input],CDDataBuf+0x9c
        jmp   .done
@@:
; íà÷èíàåì ïîèñê
.mainloop:
        dec  dword [CDSectorAddress]
.read_to_buffer:
        inc  dword [CDSectorAddress]
        mov  [CDDataBuf_pointer],CDDataBuf
        call ReadCDWRetr         ; ÷èòàåì ñåêòîð äèðåêòîðèè
        cmp   [DevErrorCode],0
        jne   .access_denied
        call cd_find_name_in_buffer
        jnc    .found
        sub  eax,2048
; äèðåêòîðèÿ çàêîí÷èëàñü?
        cmp  eax,0
        ja   .read_to_buffer
; íåò èñêîìîãî ýëåìåíòà öåïî÷êè
.access_denied:
        pop  esi eax
        stc
        ret
; èñêîìûé ýëåìåíò öåïî÷êè íàéäåí
  .found:
; êîíåö ïóòè ôàéëà
        cmp    byte [esi-1], 0
        jz    .done
        mov    eax,[cd_current_pointer_of_input]
        push    dword [eax+2]
        pop     dword [CDSectorAddress]       ; íà÷àëî äèðåêòîðèè
        mov    eax,[eax+2+8]  ; ðàçìåð äèðåêòîðèè
        jmp    .mainloop
; óêàçàòåëü ôàéëà íàéäåí
   .done:
        pop  esi eax
        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]
        cmp   eax,0   ; âõîäû çàêîí÷èëèñü?
        je    .next_sector
        cmp   ebp,CDDataBuf+2048     ; áóôåð çàêîí÷èëñÿ?
        jae   .next_sector
        movzx eax, byte [ebp]
        add   [cd_current_pointer_of_input_2],eax ; ñëåäóþùèé âõîä êàòàëîãà
        add   ebp,33 ; óêàçàòåëü óñòàíîâëåí íà íà÷àëî èìåíè
        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 ax
    call char_todown
    call ansi2uni_char
    xchg ah,al
    cld
    scasw
    pop  ax
    je    .coincides
    call char_toupper
    call ansi2uni_char
    xchg ah,al
    cld
    sub  edi,2
    scasw
    jne   .name_not_coincide
.coincides:
    cmp   [esi],byte '/'  ; ðàçäåëèòåëü ïóòè, êîíåö èìåíè òåêóùåãî ýëåìåíòà
    je   .done
    cmp   [esi],byte 0  ; ðàçäåëèòåëü ïóòè, êîíåö èìåíè òåêóùåãî ýëåìåíòà
    je   .done
    jmp   .loop
.name_not_coincide:
    pop    edi eax esi
    stc
    ret
.done:
; ïðîâåðêà êîíöà ôàéëà
    cmp   [edi],word 3B00h ; ñåïàðàòîð êîíöà ôàéëà ';'
    je   .done_1
; ïðîâåðêà äëÿ ôàéëîâ íå çàêàí÷èâàþùèõñÿ ñåïàðàòîðîì
    movzx   eax,byte [ebp-33]
    add   eax,ebp
    sub   eax,34
    cmp   edi,eax
    je   .done_1
; ïðîâåðêà êîíöà ïàïêè
    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, ''
        jb      .ret
        cmp     al, ''
        jb      .rus1
        cmp     al, ''
        ja      .ret
; 0x90-0x9F -> 0xE0-0xEF
        add     al, 'à'-''
.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, 'ð'
        jmp     .doit
.yo2:
        mov     al, 'ñ'
        jmp     .doit
.rus1:
; 0x410-0x43F -> 0x80-0xAF
        add     al, 0x70
        jmp     .doit
.rus2:
; 0x440-0x44F -> 0xE0-0xEF
        add     al, 0xA0
.ascii:
.doit:
        ret

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

Subversion Repositories Kolibri OS

(root)/kernel/trunk/fs/iso9660.inc – Rev 425 → 431