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


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

Subversion Repositories Kolibri OS

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