| 0,0 → 1,1394 |
|---|
| ;***************************************************************************** |
| ; File Browser control for Kolibri OS |
| ; Copyright (c) 2009, Marat Zakiyanov aka Mario79, aka Mario |
| ; All rights reserved. |
| ; |
| ; Redistribution and use in source and binary forms, with or without |
| ; modification, are permitted provided that the following conditions are met: |
| ; * Redistributions of source code must retain the above copyright |
| ; notice, this list of conditions and the following disclaimer. |
| ; * Redistributions in binary form must reproduce the above copyright |
| ; notice, this list of conditions and the following disclaimer in the |
| ; documentation and/or other materials provided with the distribution. |
| ; * Neither the name of the <organization> nor the |
| ; names of its contributors may be used to endorse or promote products |
| ; derived from this software without specific prior written permission. |
| ; |
| ; THIS SOFTWARE IS PROVIDED BY Marat Zakiyanov ''AS IS'' AND ANY |
| ; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED |
| ; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE |
| ; DISCLAIMED. IN NO EVENT SHALL <copyright holder> BE LIABLE FOR ANY |
| ; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES |
| ; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; |
| ; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND |
| ; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| ; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS |
| ; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
| ;***************************************************************************** |
| ;***************************************************************************** |
| macro file_browser_exit |
| { |
| popa |
| ret 4 |
| } |
| ;***************************************************************************** |
| macro use_file_browser |
| { |
| file_browser: |
| fb_type equ dword [edi] ;dword |
| fb_size_x equ [edi+4] ;word |
| fb_start_x equ [edi+6] ;word |
| fb_size_y equ [edi+8] ;word |
| fb_start_y equ [edi+10] ;word |
| fb_icon_size_y equ word [edi+12] ;word |
| fb_icon_size_x equ word [edi+14] ;word |
| fb_line_size_x equ word [edi+16] ;word |
| fb_line_size_y equ word [edi+18] ;word |
| fb_type_size_x equ word [edi+20] ;word |
| fb_size_size_x equ word [edi+22] ;word |
| fb_date_size_x equ word [edi+24] ;word |
| fb_attributes_size_x equ word [edi+26] ;word |
| fb_icon_assoc_area equ dword [edi+28] ;dword |
| fb_icon_raw_area equ dword [edi+32] ;dword |
| fb_resolution_raw equ dword [edi+36] ;dword |
| fb_palette_raw equ dword [edi+40] ;dword |
| fb_directory_path_area equ dword [edi+44] ;dword |
| fb_file_name_area equ dword [edi+48] ;dword |
| fb_select_flag equ dword [edi+52] ;dword |
| fb_background_color equ dword [edi+56] ;dword |
| fb_select_color equ dword [edi+60] ;dword |
| fb_seclect_text_color equ dword [edi+64] ;dword |
| fb_text_color equ dword [edi+68] ;dword |
| fb_reduct_text_color equ dword [edi+72] ;dword |
| fb_marked_text_color equ dword [edi+76] ;dword |
| fb_max_panel_line equ dword [edi+80] ;dword |
| fb_select_panel_counter equ dword [edi+84] ;dword |
| fb_folder_block equ dword [edi+88] ;dword |
| fb_start_draw_line equ dword [edi+92] ;dword |
| fb_start_draw_cursor_line equ word [edi+96] ;word |
| fb_folder_data equ dword [edi+98] ;dword |
| fb_temp_counter equ dword [edi+102] ;dword |
| fb_file_name_length equ dword [edi+106] ;dword |
| fb_marked_file equ dword [edi+110] ;dword |
| fb_extension_size equ dword [edi+114] ;dword |
| fb_extension_start equ dword [edi+118] ;dword |
| fb_type_table equ dword [edi+122] ;dword |
| fb_ini_file_start equ dword [edi+126] ;dword |
| fb_ini_file_end equ dword [edi+130] ;dword |
| fb_draw_scroll_bar equ dword [edi+134] ;dword |
| fb_font_size_y equ word [edi+138] ;dword |
| fb_font_size_x equ word [edi+140] ;dword |
| fb_mouse_keys equ dword [edi+142] ;dword |
| fb_mouse_keys_old equ dword [edi+146] ;dword |
| fb_mouse_pos equ dword [edi+150] ;dword |
| fb_mouse_keys_delta equ dword [edi+154] ;dword |
| fb_mouse_key_delay equ dword [edi+158] ;dword |
| fb_mouse_keys_tick equ dword [edi+162] ;dword |
| fb_start_draw_cursor_line_2 equ word [edi+166] ;dword |
| fb_all_redraw equ dword [edi+168] ;dword |
| fb_selected_BDVK_adress equ dword [edi+172] ;dword |
| fb_key_action equ dword [edi+176] ;dword |
| fb_name_temp_area equ dword [edi+180] ;dword |
| fb_max_name_temp_size equ dword [edi+184] ;dword |
| fb_display_name_max_length equ dword [edi+188] ;dword |
| fb_draw_panel_selection_flag equ dword [edi+192] ;dword |
| fb_mouse_pos_old equ dword [edi+196] ;dword |
| fb_marked_counter equ dword [edi+200] ;dword |
| ;--------------------------------------------------------------------- |
| fb_draw_panel: |
| pusha |
| mov edi,dword [esp+36] |
| call fb_clear_panel |
| call fb_calc_max_panel_line |
| call fb_calc_folder_sysdata |
| call fb_draw_panel_selection |
| call fb_draw_folder_data |
| file_browser_exit |
| ;--------------------------------------------------------------------- |
| fb_draw_panel_1: |
| pusha |
| mov eax,fb_select_color |
| push eax |
| mov eax,fb_seclect_text_color |
| push eax |
| mov ax,fb_start_draw_cursor_line |
| push eax |
| mov eax,fb_background_color |
| mov fb_select_color,eax |
| mov eax,fb_text_color |
| mov fb_seclect_text_color,eax |
| mov ax,fb_start_draw_cursor_line_2 |
| mov fb_start_draw_cursor_line,ax |
| call fb_draw_panel_selection |
| pop eax |
| mov fb_start_draw_cursor_line,ax |
| pop eax |
| mov fb_seclect_text_color,eax |
| pop eax |
| mov fb_select_color,eax |
| call fb_draw_panel_selection |
| call fb_draw_folder_data |
| popa |
| ret |
| ;--------------------------------------------------------------------- |
| fb_clear_panel: |
| cmp fb_all_redraw,dword 1 |
| jne @f |
| xor eax,eax |
| mov fb_max_name_temp_size,eax |
| @@: |
| ret |
| ;--------------------------------------------------------------------- |
| fb_calc_folder_sysdata: |
| mov eax,fb_folder_data |
| mov eax,[eax+4] |
| mov fb_folder_block,eax |
| ret |
| ;--------------------------------------------------------------------- |
| fb_calc_max_panel_line: |
| xor eax,eax |
| xor ebx,ebx |
| mov ax,fb_size_y |
| mov bx,fb_line_size_y |
| test ebx,ebx |
| jnz @f |
| inc ebx |
| @@: |
| xor edx,edx |
| div ebx |
| mov fb_max_panel_line,eax |
| ret |
| ;--------------------------------------------------------------------- |
| fb_draw_panel_selection: |
| cmp fb_all_redraw,dword 2 |
| je .end |
| xor eax,eax |
| cmp fb_select_panel_counter,eax |
| je .end |
| mov eax,fb_folder_block |
| sub eax,fb_start_draw_line |
| mov cx,fb_start_draw_cursor_line |
| call fb_for_all_panel_selection |
| mov eax,fb_folder_block |
| dec eax |
| xor edx,edx |
| mov dx,fb_line_size_y |
| imul eax,edx |
| cmp ax,cx |
| jae @f |
| mov cx,ax |
| @@: |
| mov fb_start_draw_cursor_line,cx |
| mov ebx,fb_size_x |
| add cx,fb_start_y |
| .1: |
| shl ecx,16 |
| mov cx,fb_line_size_y |
| mov edx,fb_select_color |
| xor eax,eax |
| mov ax,fb_icon_size_x |
| add eax,2 |
| sub ebx,eax |
| shl eax,16 |
| push eax |
| add ebx,eax |
| mcall 13 |
| pop ebx |
| cmp fb_all_redraw,dword 0 |
| je .end |
| mov bx,fb_start_x |
| ror ebx,16 |
| mcall 13,,,fb_background_color |
| .end: |
| ret |
| ;--------------------------------------------------------------------- |
| fb_for_all_panel_selection: |
| ; dec eax |
| xor edx,edx |
| mov dx,fb_line_size_y |
| imul eax,edx |
| cmp ax,cx |
| jae @f |
| mov cx,ax |
| @@: |
| mov eax,fb_max_panel_line |
| dec eax |
| imul eax,edx |
| cmp ax,cx |
| jae @f |
| mov cx,ax |
| @@: |
| ret |
| ;--------------------------------------------------------------------- |
| fb_draw_folder_data: |
| mov eax,fb_folder_block |
| sub eax,fb_max_panel_line |
| test eax,0x8000000 |
| jz .ok_left |
| mov fb_start_draw_line,0 |
| jmp @f |
| .ok_left: |
| cmp eax,fb_start_draw_line |
| jae @f |
| mov fb_start_draw_line,eax |
| @@: |
| mov bx,fb_start_x |
| add bx,3 |
| add bx,fb_icon_size_x |
| shl ebx,16 |
| mov bx,fb_start_y |
| mov edx,fb_start_draw_line |
| imul edx,304 |
| add edx,fb_folder_data |
| add edx,32+40 |
| xor eax,eax |
| .start: |
| pusha |
| mov eax,edx |
| sub eax,fb_folder_data |
| sub eax,32+40 |
| xor edx,edx |
| mov ebx,304 |
| div ebx |
| cmp eax,fb_folder_block |
| je .end_1 |
| ;.continue_1: |
| popa |
| cmp eax,fb_max_panel_line |
| je .end_2 |
| mov fb_marked_file,0 |
| cmp [edx+299-40],byte 0 |
| je @f |
| mov fb_marked_file,1 |
| @@: |
| call fb_clear_line |
| call fb_draw_type_size_date |
| cmp fb_all_redraw,dword 2 |
| je .draw_icon |
| cmp fb_all_redraw,dword 0 |
| je @f |
| .draw_icon: |
| call fb_draw_icon |
| @@: |
| push eax |
| xor eax,eax |
| mov ax,fb_size_x |
| push ebx edx |
| xor ebx,ebx |
| mov bx,fb_font_size_x |
| xor edx,edx |
| div ebx |
| pop edx ebx |
| sub eax,23+2+2 |
| mov esi,fb_file_name_length |
| mov fb_temp_counter,0 |
| mov fb_display_name_max_length,eax |
| cmp esi,eax |
| jbe @f |
| mov esi,eax |
| mov fb_temp_counter,1 |
| @@: |
| cmp fb_max_name_temp_size,esi |
| jae @f |
| mov fb_max_name_temp_size,esi |
| inc fb_max_name_temp_size |
| @@: |
| mov ecx,fb_text_color |
| cmp fb_marked_file,0 |
| je @f |
| mov ecx,fb_reduct_text_color ;0xff0000 |
| @@: |
| mov ax,fb_line_size_y |
| sub ax,fb_font_size_y |
| |
| push ebx |
| mov bx,ax |
| shr ax,1 |
| test bx,1b |
| jz @f |
| inc ax |
| @@: |
| pop ebx |
| |
| push ebx |
| add bx,ax |
| call .draw_name_temp_area |
| xor eax,eax |
| mov ax,fb_font_size_x |
| imul eax,fb_display_name_max_length |
| shl eax,16 |
| push edx |
| add ebx,eax |
| mov esi,2 |
| mov ecx,fb_reduct_text_color ;0xff0000 |
| mov edx,dword fb_truncated_filename_char |
| cmp fb_temp_counter,0 |
| jne @f |
| mov edx,dword fb_truncated_filename_clear |
| mov ecx,fb_text_color |
| @@: |
| push edi |
| |
| and ecx,0x30ffffff |
| add ecx,0x40000000 |
| mov eax,fb_background_color |
| cmp fb_draw_panel_selection_flag,1 |
| jne @f |
| mov eax,fb_select_color |
| @@: |
| mov edi,eax |
| mcall 4 |
| pop edi |
| cmp fb_temp_counter,0 |
| je .continue_1 |
| push edi |
| |
| mov eax,fb_background_color |
| cmp fb_draw_panel_selection_flag,1 |
| jne @f |
| mov eax,fb_select_color |
| @@: |
| mov edi,eax |
| |
| add ebx,1 shl 16 |
| mcall 4 |
| pop edi |
| .continue_1: |
| pop edx |
| .continue: |
| pop ebx |
| add bx,fb_line_size_y |
| add edx,304 |
| pop eax |
| inc eax |
| jmp .start |
| ;-------------------------------------- |
| .draw_name_temp_area: |
| pusha |
| mov ebx,esi |
| mov eax,dword ' ' |
| mov ecx,256/4 |
| cld |
| |
| push edi |
| mov edi,fb_name_temp_area |
| rep stosd |
| pop edi |
| |
| mov esi,edx |
| mov ecx,ebx |
| cld |
| mov edi,fb_name_temp_area |
| rep movsb |
| popa |
| |
| pusha |
| mov edx,fb_name_temp_area |
| |
| cmp fb_all_redraw,dword 2 |
| jne .draw_name_temp_area_1 |
| mov esi,fb_max_name_temp_size |
| and ecx,0xffffff |
| add ecx,0x40000000 |
| |
| mov eax,fb_background_color |
| cmp fb_draw_panel_selection_flag,1 |
| jne @f |
| mov eax,fb_select_color |
| @@: |
| mov edi,eax |
| .draw_name_temp_area_1: |
| mcall 4 |
| popa |
| |
| ret |
| ;-------------------------------------- |
| .end_1: |
| popa |
| .end_2: |
| cmp fb_all_redraw,dword 1 |
| jne @f |
| |
| mov ax,fb_start_y |
| add ax,fb_size_y |
| mov cx,bx |
| dec cx |
| rol ecx,16 |
| mov cx,ax |
| mov eax,ecx |
| shr eax,16 |
| sub cx,ax |
| cmp cx,0 |
| jbe @f |
| mov bx,fb_size_x |
| ror ebx,16 |
| sub bx,fb_icon_size_x |
| sub bx,3 |
| rol ebx,16 |
| mov edx,fb_background_color ;0xffffff |
| mcall 13 |
| @@: |
| |
| .end: |
| ; mov fb_draw_scroll_bar,dword 1 |
| ret |
| ;--------------------------------------------------------------------- |
| fb_clear_line: |
| mov fb_draw_panel_selection_flag,0 |
| pusha |
| shl ebx,16 |
| shr ebx,16 |
| ; dec ebx |
| cmp fb_select_panel_counter,0 |
| je .continue |
| mov ax,fb_start_draw_cursor_line |
| add ax,fb_start_y |
| cmp bx,ax |
| jne .continue |
| mov fb_draw_panel_selection_flag,1 |
| jmp .end |
| .continue: |
| cmp fb_all_redraw,dword 2 |
| je .end |
| cmp fb_all_redraw,dword 0 |
| je .end |
| mov ebx,[esp+16] |
| mov cx,bx |
| ; dec cx |
| rol ecx,16 |
| mov cx,fb_line_size_y |
| mov bx,fb_size_x |
| ror ebx,16 |
| sub bx,fb_icon_size_x |
| sub bx,3 |
| rol ebx,16 |
| mov edx,fb_background_color |
| mcall 13 |
| .end: |
| popa |
| ret |
| ;--------------------------------------------------------------------- |
| fb_draw_type_size_date: |
| pusha |
| mov eax,fb_type_table |
| test [edx-40],byte 0x10 |
| jz .copy_type |
| mov [eax],dword '<DIR' |
| mov [eax+4],word '> ' |
| mov fb_file_name_length,0 |
| mov fb_extension_size,0 |
| jmp .start |
| .copy_type: |
| mov [eax],dword ' ' |
| mov [eax+4],word ' ' |
| .start: |
| mov esi,edx |
| xor eax,eax |
| @@: |
| cld |
| lodsb |
| test eax,eax |
| jnz @b |
| mov fb_file_name_length,esi |
| sub fb_file_name_length,edx |
| mov fb_temp_counter,esi |
| test [edx-40],byte 0x10 |
| jnz .size |
| ;@@: |
| dec esi |
| dec edx |
| @@: |
| std |
| lodsb |
| cmp esi,edx |
| je .extension_size_0 |
| cmp al,'.' |
| jnz @b |
| add esi,2 |
| mov fb_extension_start,esi |
| mov ecx,fb_temp_counter |
| sub ecx,esi |
| inc ecx |
| mov fb_extension_size,ecx |
| sub fb_file_name_length,ecx |
| cmp ecx,2 |
| ja @f |
| inc fb_file_name_length |
| @@: |
| sub ecx,2 |
| cmp ecx,4 |
| jbe @f |
| mov ecx,3 |
| mov eax,fb_type_table |
| mov [eax+3],word '..' |
| @@: |
| push edi |
| mov edi,fb_type_table |
| cld |
| rep movsb |
| pop edi |
| inc edx |
| jmp .size |
| .extension_size_0: |
| inc edx |
| mov fb_extension_size,0 |
| .size: |
| mov eax,fb_type_table |
| test [edx-40],byte 0x10 |
| jz .copy_size |
| mov [eax+6],dword '----' |
| mov [eax+6+4],word '- ' |
| jmp .date |
| ;----------------------------------------- |
| .call_decimal_string: |
| mov ebx,fb_type_table |
| add ebx,6 |
| call fb_decimal_string_4 |
| mov [ebx],dl |
| jmp .size_convert_end |
| ;----------------------------------------- |
| .copy_size: |
| ;/0x40000000 - Gb |
| ;/0x100000 - Mb |
| ;/0x400 Kb |
| mov [eax+6],dword ' ' |
| mov [eax+6+4],word ' ' |
| push ebx |
| push edx |
| mov eax,[edx-40+32] |
| mov ebx,eax |
| shr eax,30 ; /(1024*1024*1024) |
| test eax,eax |
| jz @f |
| mov dl,byte 'G' |
| jmp .call_decimal_string |
| @@: |
| mov eax,ebx |
| shr eax,20 ; /(1024*1024) |
| test eax,eax |
| jz @f |
| mov dl,byte 'M' |
| jmp .call_decimal_string |
| @@: |
| mov eax,ebx |
| shr eax,10 ; /1024 |
| test eax,eax |
| jz @f |
| mov dl,byte 'K' |
| jmp .call_decimal_string |
| @@: |
| mov eax,ebx |
| ;.size_convert: |
| mov ebx,fb_type_table |
| add ebx,6 |
| call fb_decimal_string_4 |
| .size_convert_end: |
| mov eax,fb_type_table |
| add eax,6 |
| push edi |
| cmp [eax],byte '0' |
| jne @f |
| mov [eax],byte ' ' |
| @@: |
| add eax,3 |
| @@: |
| cmp [eax+1],byte ' ' |
| jne @f |
| mov esi,eax |
| mov edi,esi |
| inc edi |
| mov ecx,5 |
| std |
| rep movsb |
| jmp @r |
| @@: |
| pop edi |
| pop edx |
| pop ebx |
| ;----------------------------------------- |
| .date: |
| xor eax,eax |
| mov al,[edx-40+28] |
| push ebx |
| mov ebx,fb_type_table |
| add ebx,12 |
| call fb_decimal_string_2 ; day |
| mov al,[edx-40+29] |
| mov ebx,fb_type_table |
| add ebx,12+3 |
| call fb_decimal_string_2 ; month |
| mov ax,[edx-40+30] |
| mov ebx,fb_type_table |
| add ebx,12+15 |
| call fb_decimal_string_4 ; year |
| mov ebx,fb_type_table |
| mov ax,[ebx+12+15+2] |
| mov [ebx+12+6],ax |
| pop ebx |
| ;----------------------------------------- |
| ror ebx,16 |
| add bx,fb_size_x |
| sub ebx,122+12+15 |
| rol ebx,16 |
| mov ecx,fb_text_color |
| cmp fb_marked_file,0 |
| je @f |
| mov ecx,fb_reduct_text_color ;0xff0000 |
| @@: |
| mov edx,fb_type_table |
| mov esi,20 |
| |
| mov ax,fb_line_size_y |
| sub ax,fb_font_size_y |
| |
| push ebx |
| mov bx,ax |
| shr ax,1 |
| test bx,1b |
| jz @f |
| inc ax |
| @@: |
| pop ebx |
| add bx,ax |
| cmp fb_all_redraw,dword 2 |
| jne .draw ;@f |
| and ecx,0xffffff |
| add ecx,0x40000000 |
| |
| mov eax,fb_background_color |
| cmp fb_draw_panel_selection_flag,1 |
| jne @f |
| mov eax,fb_select_color |
| @@: |
| mov edi,eax |
| .draw: |
| mcall 4 |
| popa |
| ret |
| ;--------------------------------------------------------------------- |
| fb_draw_icon: |
| pusha |
| xor eax,eax |
| mov ax,fb_icon_size_y |
| mov ebx,fb_resolution_raw |
| imul eax,ebx |
| mov bx,fb_icon_size_x |
| imul eax,ebx |
| mov ebx,eax |
| shr eax,3 |
| test ebx,111b |
| jz @f |
| inc eax |
| @@: |
| test [edx-40],byte 0x10 |
| jnz .draw_dir_pic |
| |
| call fb_get_icon_number |
| ; mov ebx,2 |
| imul ebx,eax ;16*16*3 |
| jmp .draw |
| .draw_dir_pic: |
| xor ebx,ebx |
| cmp [edx],word '..' |
| jne .draw |
| mov ebx,eax ;16*16*3 |
| .draw: |
| add ebx,fb_icon_raw_area |
| mov cx,fb_icon_size_x |
| shl ecx,16 |
| mov cx,fb_icon_size_y |
| |
| mov edx,[esp+16] |
| ror edx,16 |
| sub edx,2 |
| sub dx,fb_icon_size_x |
| rol edx,16 |
| |
| mov ax,fb_line_size_y |
| sub ax,fb_icon_size_y |
| shr ax,1 |
| add dx,ax |
| |
| mov esi,fb_resolution_raw |
| |
| xor ebp,ebp |
| |
| push edi |
| mov edi,fb_palette_raw |
| mcall 65 |
| pop edi |
| popa |
| ret |
| ;--------------------------------------------------------------------- |
| ; Convert of a binary number in decimal string form |
| ; Input: |
| ; AX - value |
| ; EBX - address of string |
| ; Output: |
| ; string contains the number, marked the end of the code 0 |
| fb_decimal_string_2: |
| push eax ebx ecx edx |
| xor ecx,ecx |
| mov [ebx],byte '0' |
| inc ebx |
| .p3: |
| xor edx,edx |
| push ebx |
| mov ebx,10 |
| div ebx |
| pop ebx |
| add edx,48 |
| push edx |
| inc ecx |
| cmp ax,0 |
| jne .p3 |
| cmp ecx,1 |
| jbe .p4 |
| mov ecx,2 |
| dec ebx |
| .p4: |
| pop edx |
| mov [ebx],dl |
| inc ebx |
| loop .p4 |
| pop edx ecx ebx eax |
| ret |
| ;--------------------------------------------------------------------- |
| fb_decimal_string_4: |
| push eax ecx edx |
| xor ecx,ecx |
| mov [ebx],byte '0' |
| inc ebx |
| .p3: |
| xor edx,edx |
| push ebx |
| mov ebx,10 |
| div ebx |
| pop ebx |
| add edx,48 |
| push edx |
| inc ecx |
| cmp eax,0 |
| jne .p3 |
| cmp ecx,3 |
| jbe .p4 |
| mov ecx,4 |
| dec ebx |
| .p4: |
| pop edx |
| mov [ebx],dl |
| inc ebx |
| loop .p4 |
| pop edx ecx eax |
| ret |
| ;--------------------------------------------------------------------- |
| fb_get_icon_number: |
| push eax |
| mov ebp,fb_extension_size |
| test ebp,ebp |
| je .end |
| dec ebp |
| test ebp,ebp |
| je .end |
| dec ebp |
| test ebp,ebp |
| je .end |
| @@: |
| mov edx,fb_ini_file_end |
| sub edx,ebp |
| mov eax,fb_ini_file_start |
| dec eax |
| .search_association: |
| cmp edx,eax |
| jbe .end |
| mov esi,fb_extension_start |
| inc eax |
| mov ecx,eax |
| mov ebx,eax |
| cld |
| .check: |
| lodsb |
| test al,al |
| jz @f |
| call fb_char_toupper |
| shl ax,8 |
| mov al,[ebx] |
| inc ebx |
| call fb_char_toupper |
| cmp al,ah |
| je .check |
| mov eax,ecx |
| jmp .search_association |
| @@: |
| mov eax,ecx |
| mov esi,eax |
| add esi,ebp |
| cmp [esi],byte '=' |
| jne .search_association |
| inc esi |
| xor ebx,ebx |
| xor eax,eax |
| mov ecx,9 |
| call .calculate |
| cmp al,0x30 |
| jb .end |
| cmp al,0x39 |
| ja .end |
| sub eax,0x30 |
| @@: |
| call .calculate_1 |
| cmp al,0x30 |
| jb @f |
| cmp al,0x39 |
| ja @f |
| sub eax,0x30 |
| |
| lea ebx,[ebx+ebx*4] |
| shl ebx,1 |
| |
| dec ecx |
| jnz @b |
| @@: |
| pop eax |
| ret |
| .end: |
| mov ebx,2 |
| pop eax |
| ret |
| ;--------------------------------------------------------------------- |
| .calculate_1: |
| add ebx,eax |
| .calculate: |
| xor eax,eax |
| cld |
| lodsb |
| ret |
| ;--------------------------------------------------------------------- |
| fb_char_toupper: |
| ; 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 |
| ; 0xE0-0xEF -> 0x90-0x9F |
| sub al, 'à'-'' |
| .ret: |
| ret |
| .rus1: |
| ; 0xA0-0xAF -> 0x80-0x8F |
| .az: |
| and al, not 0x20 |
| ret |
| ;--------------------------------------------------------------------- |
| fb_truncated_filename_char: |
| db '..' |
| fb_truncated_filename_clear: |
| db ' ' |
| ;--------------------------------------------------------------------- |
| ;***************************************************************************** |
| ;***************************************************************************** |
| ; mouse event |
| ;***************************************************************************** |
| ;***************************************************************************** |
| fb_mouse: |
| pusha |
| mov edi,dword [esp+36] |
| ;------------------------------------------------------- |
| mcall 37,2 |
| mov ebx,fb_mouse_keys |
| mov fb_mouse_keys_old,ebx |
| mov fb_mouse_keys,eax |
| |
| mcall 37,1 |
| mov ebx,fb_mouse_pos |
| mov fb_mouse_pos_old,ebx |
| mov fb_mouse_pos,eax |
| |
| test eax,0x80000000 |
| jnz .exit_fb |
| test eax,0x8000 |
| jnz .exit_fb |
| |
| mov ebx,eax |
| shr ebx,16 ; x position |
| shl eax,16 |
| shr eax,16 ; y position |
| |
| mov cx,fb_start_x |
| cmp bx,cx |
| jb .exit_fb |
| |
| add cx,fb_size_x |
| cmp bx,cx |
| ja .exit_fb |
| |
| mov cx,fb_start_y |
| cmp ax,cx |
| jb .exit_fb |
| |
| add cx,fb_size_y |
| cmp ax,cx |
| ja .exit_fb |
| ;------------------------------------------------------- |
| cmp fb_mouse_keys_delta,1 |
| je .enter_1 |
| |
| cmp fb_mouse_keys,0 |
| jz .exit_fb |
| .start: |
| sub ax,fb_start_y |
| xor ebx,ebx |
| mov bx,fb_line_size_y |
| xor edx,edx |
| push eax |
| div ebx |
| pop eax |
| sub eax,edx |
| xor edx,edx |
| cmp fb_select_panel_counter,edx |
| jne @f |
| mov fb_mouse_keys_delta,0 |
| jmp .continue |
| @@: |
| xor edx,edx |
| cmp fb_start_draw_cursor_line,ax |
| jne @f |
| cmp fb_mouse_keys,edx |
| jnz .continue |
| @@: |
| mov fb_mouse_keys_delta,edx |
| .continue: |
| xor ebx,ebx |
| mov bx,fb_line_size_y |
| imul ebx,fb_folder_block |
| cmp eax,ebx |
| jb @f |
| xor edx,edx |
| mov dx,fb_line_size_y |
| sub ebx,edx |
| cmp bx,fb_start_draw_cursor_line |
| je .enter |
| call .store_old_cursor_line |
| mov fb_start_draw_cursor_line,bx |
| jmp .continue_1 |
| @@: |
| cmp ax,fb_start_draw_cursor_line |
| je .enter |
| call .store_old_cursor_line |
| mov fb_start_draw_cursor_line,ax |
| .continue_1: |
| test fb_mouse_keys,10b |
| jne .mark_mouse |
| jmp .enter_1 |
| .continue_2: |
| mov ax,fb_start_draw_cursor_line |
| cmp ax,fb_start_draw_cursor_line_2 |
| je .exit_fb |
| |
| call fb_draw_panel_1 |
| jmp .exit_fb |
| .enter: |
| cmp fb_mouse_keys_delta,2 |
| je .enter_2 |
| cmp fb_mouse_keys_delta,1 |
| je .enter_1 |
| mov eax,fb_mouse_keys_old |
| cmp fb_mouse_keys,eax |
| jz .exit_fb |
| test fb_mouse_keys,10b |
| jne .mark_mouse |
| xor edx,edx |
| inc edx |
| mov fb_mouse_keys_delta,edx |
| jmp .exit_fb |
| .enter_1: |
| mov eax,fb_mouse_keys_old |
| cmp fb_mouse_keys,eax |
| jz .exit_fb |
| test fb_mouse_keys,10b |
| jne .mark_mouse |
| mov edx,2 |
| mov fb_mouse_keys_delta,edx |
| mcall 26,9 |
| add eax,fb_mouse_key_delay |
| mov fb_mouse_keys_tick,eax |
| jmp .continue_2 |
| .enter_2: |
| mcall 26,9 |
| cmp eax,fb_mouse_keys_tick |
| ja @f |
| ; mov eax,fb_mouse_pos_old |
| ; cmp eax,fb_mouse_pos |
| ; jne @f |
| mov eax,fb_mouse_keys_old |
| cmp fb_mouse_keys,eax |
| jz @f |
| test fb_mouse_keys,10b |
| jne .mark_mouse |
| call .enter_3 |
| jmp .exit_fb |
| @@: |
| xor eax,eax |
| inc eax |
| mov fb_mouse_keys_delta,eax |
| ;------------------------------------------------------- |
| .exit_fb: |
| file_browser_exit |
| ;------------------------------------------------------- |
| .mark_mouse: |
| call fb_key.mark_1 |
| call fb_draw_panel_1 |
| xor eax,eax |
| mov fb_mouse_keys_delta,eax |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .enter_3: |
| xor eax,eax |
| mov fb_mouse_keys,eax |
| mov fb_mouse_keys_old,eax |
| mov eax,3 |
| mov fb_mouse_keys_delta,eax |
| xor eax,eax |
| mov ax,fb_start_draw_cursor_line |
| xor ebx,ebx |
| mov bx,fb_line_size_y |
| xor edx,edx |
| div ebx |
| add eax,fb_start_draw_line |
| imul eax,304 |
| add eax,32 |
| add eax,fb_folder_data |
| mov fb_selected_BDVK_adress,eax |
| xor eax,eax |
| mov fb_max_name_temp_size,eax |
| ret |
| ;------------------------------------------------------- |
| .store_old_cursor_line: |
| push eax |
| mov ax,fb_start_draw_cursor_line |
| mov fb_start_draw_cursor_line_2,ax |
| xor eax,eax |
| ; mov fb_mouse_keys_delta,eax |
| pop eax |
| ret |
| ;***************************************************************************** |
| ;***************************************************************************** |
| ; key event |
| ; 1 - arrow down |
| ; 2 - arrow up |
| ; 3 - PageDown |
| ; 4 - PageUp |
| ; 5 - Home |
| ; 6 - End |
| ; 7 - Enter |
| ; 8 - Insert (Mark) |
| ; 9 - Mark All |
| ; 10 - Unmark All |
| ; 11 - Invert Mark |
| ;***************************************************************************** |
| ;***************************************************************************** |
| fb_key: |
| pusha |
| mov edi,dword [esp+36] |
| ;------------------------------------------------------- |
| mov eax,fb_key_action |
| shl eax,2 |
| add eax,dword fb_key_table |
| cmp eax,fb_key_table.end |
| jae .exit_fb |
| cmp [eax],dword 0 |
| je .exit_fb |
| jmp dword [eax] |
| ;------------------------------------------------------- |
| .arrow_down: |
| mov ax,fb_start_draw_cursor_line |
| add ax,fb_line_size_y |
| add ax,fb_line_size_y |
| cmp ax,word fb_size_y |
| jae @f |
| .add_1: |
| call fb_mouse.store_old_cursor_line |
| mov ax,fb_start_draw_cursor_line |
| add ax,fb_line_size_y |
| mov fb_start_draw_cursor_line,ax |
| call fb_draw_panel_1 |
| jmp .exit_fb |
| @@: |
| mov eax,fb_folder_block |
| sub eax,fb_max_panel_line |
| test eax,0x80000000 |
| jnz .page_down_2 |
| |
| call .prepare_data_down |
| ja @f |
| |
| cmp fb_start_draw_line,eax |
| je .exit_fb |
| @@: |
| inc fb_start_draw_line |
| call fb_draw_panel_3 |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .arrow_up: |
| mov ax,fb_start_draw_cursor_line |
| add ax,fb_start_y |
| cmp fb_start_y,ax |
| je @f |
| call fb_mouse.store_old_cursor_line |
| mov ax,fb_start_draw_cursor_line |
| sub ax,fb_line_size_y |
| mov fb_start_draw_cursor_line,ax |
| call fb_draw_panel_1 |
| jmp .exit_fb |
| @@: |
| cmp fb_start_draw_line,0 |
| je .exit_fb |
| dec fb_start_draw_line |
| call fb_draw_panel_3 |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .page_down: |
| mov eax,fb_max_panel_line |
| mov ebx,fb_folder_block |
| sub ebx,eax |
| test ebx,0x80000000 |
| jnz .page_down_2 |
| sub ebx,fb_start_draw_line |
| cmp ebx,eax |
| ja .page_down_3 |
| mov ebx,fb_folder_block |
| sub ebx,eax |
| call .prepare_data_down |
| ja @f |
| cmp ebx,fb_start_draw_line |
| je .exit_fb |
| @@: |
| mov fb_start_draw_line,ebx |
| .page_down_0: |
| dec eax |
| xor ebx,ebx |
| mov bx,fb_line_size_y |
| imul eax,ebx |
| .page_down_1: |
| call fb_mouse.store_old_cursor_line |
| mov fb_start_draw_cursor_line,ax |
| call fb_draw_panel_2 |
| jmp .exit_fb |
| .page_down_2: |
| mov eax,fb_folder_block |
| sub eax,fb_start_draw_line |
| dec eax |
| xor ebx,ebx |
| mov bx,fb_line_size_y |
| imul eax,ebx |
| cmp ax,fb_start_draw_cursor_line |
| jbe .exit_fb |
| jmp .page_down_1 |
| .page_down_3: |
| add fb_start_draw_line,eax |
| call fb_draw_panel_2 |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .prepare_data_down: |
| mov ecx,fb_folder_block |
| sub ecx,fb_start_draw_line |
| dec ecx |
| xor edx,edx |
| mov dx,fb_line_size_y |
| imul ecx,edx |
| cmp cx,fb_start_draw_cursor_line |
| ret |
| ;------------------------------------------------------- |
| .page_up: |
| mov eax,fb_max_panel_line |
| mov ebx,fb_start_draw_line |
| sub ebx,eax |
| test ebx,0x8000000 |
| jz @f |
| cmp fb_start_draw_line,0 |
| jne .page_up_1 |
| cmp fb_start_draw_cursor_line,0 |
| je .exit_fb |
| mov fb_start_draw_cursor_line,0 |
| .page_up_1: |
| mov fb_start_draw_line,0 |
| call fb_draw_panel_2 |
| jmp .exit_fb |
| @@: |
| sub fb_start_draw_line,eax |
| call fb_draw_panel_2 |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .home: |
| cmp fb_start_draw_line,0 |
| jne @f |
| cmp fb_start_draw_cursor_line,0 |
| je .exit_fb |
| @@: |
| mov fb_start_draw_line,0 |
| mov fb_start_draw_cursor_line,0 |
| call fb_mouse.store_old_cursor_line |
| call fb_draw_panel_2 |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .end: |
| mov eax,fb_folder_block |
| sub eax,fb_max_panel_line |
| test eax,0x80000000 |
| jnz .page_down_2 |
| call .prepare_data_down |
| ja @f |
| cmp eax,fb_start_draw_line |
| je .exit_fb |
| @@: |
| mov fb_start_draw_line,eax |
| mov eax,fb_max_panel_line |
| jmp .page_down_0 |
| ;------------------------------------------------------- |
| .enter: |
| call fb_mouse.enter_3 |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .mark: |
| call .mark_1 |
| jmp .arrow_down |
| ;------------------------------------------------------- |
| .mark_1: |
| xor eax,eax |
| mov ax,fb_start_draw_cursor_line |
| xor edx,edx |
| xor ebx,ebx |
| mov bx,fb_line_size_y |
| div ebx |
| mov esi,fb_start_draw_line |
| add esi,eax |
| imul esi,304 |
| add esi,fb_folder_data |
| |
| add esi,32+299 |
| mov al,[esi] |
| and al,1 |
| |
| test al,al |
| jnz @f |
| inc fb_marked_counter |
| jmp .mark_2 |
| @@: |
| dec fb_marked_counter |
| .mark_2: |
| mov al,[esi] |
| inc al |
| and al,1 |
| mov [esi],al |
| ret |
| ;------------------------------------------------------- |
| .mark_all: |
| mov fb_temp_counter,0 |
| .mark_all_1: |
| mov ebp,fb_folder_block |
| .mark_all_2: |
| mov ebx,ebp |
| dec ebx |
| imul ebx,304 |
| add ebx,fb_folder_data |
| add ebx,32+40 |
| cmp [ebx],word '..' |
| jne .mark_all_3 |
| cmp [ebx+2],byte 0 |
| je @f |
| .mark_all_3: |
| call .select_mark_action |
| @@: |
| dec ebp |
| jnz .mark_all_2 |
| |
| call fb_draw_panel_3 |
| cmp fb_temp_counter,0 |
| jne @f |
| mov eax,fb_folder_block |
| jmp .mark_all_4 |
| @@: |
| cmp fb_temp_counter,1 |
| jne @f |
| mov fb_marked_counter,0 |
| jmp .exit_fb |
| @@: |
| mov eax,fb_folder_block |
| sub eax,fb_marked_counter |
| .mark_all_4: |
| dec eax |
| mov fb_marked_counter,eax |
| jmp .exit_fb |
| ;------------------------------------------------------- |
| .select_mark_action: |
| add ebx,299-40 |
| cmp fb_temp_counter,0 |
| jne @f |
| mov [ebx],byte 1 |
| jmp .select_mark_action_1 |
| @@: |
| cmp fb_temp_counter,1 |
| jne @f |
| mov [ebx],byte 0 |
| jmp .select_mark_action_1 |
| @@: |
| mov al,[ebx] |
| inc al |
| and al,1 |
| mov [ebx],al |
| .select_mark_action_1: |
| ret |
| ;------------------------------------------------------- |
| .unmark_all: |
| mov fb_temp_counter,1 |
| jmp .mark_all_1 |
| ;------------------------------------------------------- |
| .invert_mark: |
| mov fb_temp_counter,2 |
| jmp .mark_all_1 |
| ;------------------------------------------------------- |
| .exit_fb: |
| file_browser_exit |
| ;------------------------------------------------------- |
| fb_key_table: |
| dd 0 |
| dd fb_key.arrow_down ; 1 |
| dd fb_key.arrow_up ; 2 |
| dd fb_key.page_down ; 3 |
| dd fb_key.page_up ; 4 |
| dd fb_key.home ; 5 |
| dd fb_key.end ; 6 |
| dd fb_key.enter ; 7 |
| dd fb_key.mark ; 8 |
| dd fb_key.mark_all ; 9 |
| dd fb_key.unmark_all ; 10 |
| dd fb_key.invert_mark ; 11 |
| .end: |
| dd 0 |
| ;------------------------------------------------------- |
| fb_draw_panel_3: |
| mov eax,2 |
| mov fb_all_redraw,eax |
| jmp @f |
| fb_draw_panel_2: |
| xor eax,eax |
| inc eax |
| mov fb_all_redraw,eax |
| call fb_draw_panel_selection |
| @@: |
| call fb_draw_folder_data |
| xor eax,eax |
| mov fb_all_redraw,eax |
| inc eax |
| mov fb_draw_scroll_bar,eax |
| ret |
| |
| } |