forked from KolibriOS/kolibrios
995 lines
20 KiB
NASM
995 lines
20 KiB
NASM
|
;unz - <20><>ᯠ<EFBFBD><E1AFA0><EFBFBD>騪, <20>ᯮ<EFBFBD><E1AFAE><EFBFBD><EFBFBD><EFBFBD>騩 archiver.obj. <20><><EFBFBD><EFBFBD><EFBFBD>ন<EFBFBD><E0A6A8><EFBFBD><EFBFBD> zip <20> 7z.
|
|||
|
|
|
|||
|
|
;unz [-o output path] [-f file for unpack] [-f ...] [-h] file.zip
|
|||
|
|
;-h - hide GUI. If params is empty - do exit.
|
|||
|
|
|
|||
|
|
;unz -o /hd0/1/arci -f text1.txt file.zip -unpack in folder only file text1.txt
|
|||
|
|
;or
|
|||
|
|
;unz -o "/hd0/1/arci" -f "text1.txt" text2.txt "file.zip" -unpack in folder only file text1.txt and text2.txt
|
|||
|
|
|
|||
|
|
|
|||
|
|
;<3B><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
;unz -n "namezone" "file.zip" - open packed file, write list files of main folder in namezone
|
|||
|
|
;namezone:
|
|||
|
|
;dd 0 - <20> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><> 1
|
|||
|
|
;dd cmd - 0 <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
; 1 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᯨ᮪ 䠩<><E4A0A9><EFBFBD>
|
|||
|
|
; 2 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 䠩<>
|
|||
|
|
; 3 <20><>⠭<EFBFBD><E2A0AD><EFBFBD><EFBFBD><EFBFBD> ⥪<>訩 <20><>⠫<EFBFBD><E2A0AB> <20> <20><>娢<EFBFBD>
|
|||
|
|
; 4 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ࠡ<><E0A0A1><EFBFBD>
|
|||
|
|
;data - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
; 1 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ᯨ᮪ 䠩<><E4A0A9><EFBFBD>
|
|||
|
|
; input
|
|||
|
|
; none
|
|||
|
|
; output
|
|||
|
|
; dd numfiles - <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⢮ 䠩<><E4A0A9><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> <20> ⥪<>饬 <20><>⠫<EFBFBD><E2A0AB><EFBFBD>
|
|||
|
|
; strz file1...fileN - ᯨ᮪ <20><>ப, ࠧ<><E0A0A7><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 0
|
|||
|
|
; 2 <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 䠩<>
|
|||
|
|
; input
|
|||
|
|
; dd num bytes
|
|||
|
|
; strz filename (file1.txt of /fold1/file1.txt)
|
|||
|
|
; output
|
|||
|
|
; dd num bytes
|
|||
|
|
; data
|
|||
|
|
|
|||
|
|
use32
|
|||
|
|
org 0
|
|||
|
|
db 'MENUET01'
|
|||
|
|
dd 1, start, init_end, end_mem, stack_top, params, 0
|
|||
|
|
|
|||
|
|
|
|||
|
|
include 'lang.inc'
|
|||
|
|
include '../../macros.inc'
|
|||
|
|
include '../../proc32.inc'
|
|||
|
|
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
|
|||
|
|
include '../../dll.inc'
|
|||
|
|
include 'debug.inc'
|
|||
|
|
|
|||
|
|
version equ '0.65'
|
|||
|
|
version_dword equ 0*10000h + 65
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
SIZE_COPY_BUF = 1024*1024*2
|
|||
|
|
|
|||
|
|
virtual at 0
|
|||
|
|
kfar_info_struc:
|
|||
|
|
.lStructSize dd ?
|
|||
|
|
.kfar_ver dd ?
|
|||
|
|
.open dd ?
|
|||
|
|
.open2 dd ?
|
|||
|
|
.read dd ?
|
|||
|
|
.write dd ?
|
|||
|
|
.seek dd ?
|
|||
|
|
.tell dd ?
|
|||
|
|
.flush dd ?
|
|||
|
|
.filesize dd ?
|
|||
|
|
.close dd ?
|
|||
|
|
.pgalloc dd ?
|
|||
|
|
.pgrealloc dd ?
|
|||
|
|
.pgfree dd ?
|
|||
|
|
.getfreemem dd ?
|
|||
|
|
.pgalloc2 dd ?
|
|||
|
|
.pgrealloc2 dd ?
|
|||
|
|
.pgfree2 dd ?
|
|||
|
|
.menu dd ?
|
|||
|
|
.menu_centered_in dd ?
|
|||
|
|
.DialogBox dd ?
|
|||
|
|
.SayErr dd ?
|
|||
|
|
.Message dd ?
|
|||
|
|
.cur_console_size dd ?
|
|||
|
|
end virtual
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
include 'parse.inc'
|
|||
|
|
include 'fs.inc'
|
|||
|
|
|
|||
|
|
;-- CODE -------------------------------------------------------------------
|
|||
|
|
|
|||
|
|
|
|||
|
|
start:
|
|||
|
|
mcall 68, 11
|
|||
|
|
mcall 40, 100111b + 0C0000000h
|
|||
|
|
stdcall dll.Load, IMPORTS
|
|||
|
|
test eax, eax
|
|||
|
|
jnz exit
|
|||
|
|
mov [pathOut],0
|
|||
|
|
|
|||
|
|
;stdcall SayErr,strErrorExc
|
|||
|
|
;mcall -1
|
|||
|
|
;----------------------------
|
|||
|
|
;1. find input file, clear
|
|||
|
|
;2. find -o, copy data, clear
|
|||
|
|
;3. find -f, add pointer, copy data, clear
|
|||
|
|
;4. find -c, check variable, clear
|
|||
|
|
;1.
|
|||
|
|
call getLastParam
|
|||
|
|
test eax, eax
|
|||
|
|
je wm_redraw
|
|||
|
|
dec eax
|
|||
|
|
je .arbeit
|
|||
|
|
jmp errorParsing
|
|||
|
|
|
|||
|
|
.arbeit:
|
|||
|
|
;2.
|
|||
|
|
call getParam2
|
|||
|
|
cmp eax, 2
|
|||
|
|
je errorParsing
|
|||
|
|
|
|||
|
|
;3.
|
|||
|
|
|
|||
|
|
@@:
|
|||
|
|
mov eax, [iFiles]
|
|||
|
|
shl eax, 2
|
|||
|
|
add eax, files
|
|||
|
|
m2m dword[eax], dword[endPointer]
|
|||
|
|
stdcall getParam, '-f'
|
|||
|
|
cmp eax, 2
|
|||
|
|
je errorParsing
|
|||
|
|
inc [iFiles]
|
|||
|
|
cmp eax, 1
|
|||
|
|
je @b
|
|||
|
|
|
|||
|
|
;4.
|
|||
|
|
mov edi, params
|
|||
|
|
mov ax,'-h'
|
|||
|
|
@@: cmp word [edi], ax
|
|||
|
|
je .check
|
|||
|
|
inc edi
|
|||
|
|
cmp edi, params+1024
|
|||
|
|
je @f
|
|||
|
|
cmp byte[edi],0
|
|||
|
|
je @f
|
|||
|
|
jmp @b
|
|||
|
|
.check:
|
|||
|
|
call startUnpack
|
|||
|
|
mcall -1
|
|||
|
|
@@:
|
|||
|
|
stdcall [OpenDialog_Init],OpenDialog_data
|
|||
|
|
|
|||
|
|
;init edit fields --------------
|
|||
|
|
xor al,al
|
|||
|
|
mov edi,fInp
|
|||
|
|
mov ecx,1024
|
|||
|
|
repne scasb
|
|||
|
|
inc ecx
|
|||
|
|
mov eax,1024
|
|||
|
|
sub eax,ecx
|
|||
|
|
mov dword[edtPack.size],eax
|
|||
|
|
mov dword[edtPack.pos],eax
|
|||
|
|
|
|||
|
|
xor al, al
|
|||
|
|
mov edi, pathOut
|
|||
|
|
mov ecx, 1024
|
|||
|
|
repne scasb
|
|||
|
|
inc ecx
|
|||
|
|
mov eax, 1024
|
|||
|
|
sub eax, ecx
|
|||
|
|
mov dword[edtUnpPath.size], eax
|
|||
|
|
mov dword[edtUnpPath.pos], eax
|
|||
|
|
|
|||
|
|
|
|||
|
|
;main loop --------------------
|
|||
|
|
wm_redraw:
|
|||
|
|
call winRedraw
|
|||
|
|
|
|||
|
|
still:
|
|||
|
|
mcall 10
|
|||
|
|
cmp eax, 1
|
|||
|
|
je wm_redraw
|
|||
|
|
cmp eax, 2
|
|||
|
|
je wm_key
|
|||
|
|
cmp eax, 3
|
|||
|
|
je wm_button
|
|||
|
|
cmp eax, 6
|
|||
|
|
je wm_mouse
|
|||
|
|
|
|||
|
|
jmp still
|
|||
|
|
|
|||
|
|
wm_key:
|
|||
|
|
mcall 2
|
|||
|
|
cmp [bWinChild],0
|
|||
|
|
jne still
|
|||
|
|
|
|||
|
|
stdcall [edit_box_key],edtPack
|
|||
|
|
stdcall [edit_box_key],edtUnpPath
|
|||
|
|
|
|||
|
|
jmp still
|
|||
|
|
|
|||
|
|
|
|||
|
|
wm_button:
|
|||
|
|
mcall 17
|
|||
|
|
cmp [bWinChild],0
|
|||
|
|
jne still
|
|||
|
|
|
|||
|
|
cmp ah, 3
|
|||
|
|
jne @f
|
|||
|
|
call selectInput
|
|||
|
|
jmp wm_redraw
|
|||
|
|
@@:
|
|||
|
|
cmp ah, 4
|
|||
|
|
jne @f
|
|||
|
|
call selectOutFold
|
|||
|
|
jmp wm_redraw
|
|||
|
|
@@:
|
|||
|
|
|
|||
|
|
cmp ah, 2
|
|||
|
|
jne @f
|
|||
|
|
;mcall 51,1,startUnpack,stackUnpack
|
|||
|
|
;mov [bWinChild],1
|
|||
|
|
call startUnpack
|
|||
|
|
jmp wm_redraw
|
|||
|
|
@@:
|
|||
|
|
|
|||
|
|
cmp ah, 1
|
|||
|
|
je exit
|
|||
|
|
jmp still
|
|||
|
|
|
|||
|
|
wm_mouse:
|
|||
|
|
cmp [bWinChild],0
|
|||
|
|
jne still
|
|||
|
|
stdcall [edit_box_mouse],edtPack
|
|||
|
|
stdcall [edit_box_mouse],edtUnpPath
|
|||
|
|
|
|||
|
|
jmp still
|
|||
|
|
|
|||
|
|
exit:
|
|||
|
|
mcall -1
|
|||
|
|
|
|||
|
|
errorParsing:
|
|||
|
|
dps 'errorParsing'
|
|||
|
|
mcall -1
|
|||
|
|
|
|||
|
|
;--- functions ------------------------------------------------------------------
|
|||
|
|
|
|||
|
|
proc winRedraw
|
|||
|
|
mcall 12, 1
|
|||
|
|
mcall 48, 3, sc, sizeof.system_colors
|
|||
|
|
mov edx, [sc.work]
|
|||
|
|
or edx, 0x33000000
|
|||
|
|
mcall 0, <200,320>, <200,130>, , , title
|
|||
|
|
mcall 8, <113,100>,<65,25>,2,[sc.work_button]
|
|||
|
|
mcall 8, <280,15>,<11,14>,3,[sc.work_button]
|
|||
|
|
mcall 8, <280,15>,<33,14>,4,[sc.work_button]
|
|||
|
|
|
|||
|
|
edit_boxes_set_sys_color edtPack,endEdits,sc
|
|||
|
|
stdcall [edit_box_draw],edtPack
|
|||
|
|
stdcall [edit_box_draw],edtUnpPath
|
|||
|
|
|
|||
|
|
|
|||
|
|
cmp [redInput],0
|
|||
|
|
jne @f
|
|||
|
|
mov ecx,[sc.work_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
jmp .l1
|
|||
|
|
@@:
|
|||
|
|
mov ecx,90FF0000h
|
|||
|
|
.l1:
|
|||
|
|
mcall 4, <15,11>, , strInp
|
|||
|
|
mov ecx,[sc.work_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mcall 4, <15,32>, , strPath
|
|||
|
|
mov ecx,[sc.work_button_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mcall 4, <140,70>, , strGo
|
|||
|
|
|
|||
|
|
mcall 12, 2
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
;region
|
|||
|
|
selectInput:
|
|||
|
|
mov [OpenDialog_data.type],0
|
|||
|
|
stdcall [OpenDialog_Start],OpenDialog_data
|
|||
|
|
mov edi,ODAreaPath
|
|||
|
|
xor al,al
|
|||
|
|
or ecx,-1
|
|||
|
|
repne scasb
|
|||
|
|
sub edi,ODAreaPath
|
|||
|
|
dec edi
|
|||
|
|
mov dword[edtPack+12*4],edi
|
|||
|
|
mov ecx,edi
|
|||
|
|
inc ecx
|
|||
|
|
mov edi,fInp
|
|||
|
|
mov esi,ODAreaPath
|
|||
|
|
rep movsb
|
|||
|
|
mov [redInput],0
|
|||
|
|
ret
|
|||
|
|
;endregion
|
|||
|
|
|
|||
|
|
;region
|
|||
|
|
selectOutFold:
|
|||
|
|
mov [OpenDialog_data.type],2
|
|||
|
|
stdcall [OpenDialog_Start],OpenDialog_data
|
|||
|
|
mov edi,ODAreaPath
|
|||
|
|
xor al,al
|
|||
|
|
or ecx,-1
|
|||
|
|
repne scasb
|
|||
|
|
sub edi,ODAreaPath
|
|||
|
|
dec edi
|
|||
|
|
mov dword[edtUnpPath+12*4],edi
|
|||
|
|
mov ecx,edi
|
|||
|
|
inc ecx
|
|||
|
|
mov edi,pathOut
|
|||
|
|
mov esi,ODAreaPath
|
|||
|
|
rep movsb
|
|||
|
|
ret
|
|||
|
|
;endregion
|
|||
|
|
|
|||
|
|
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
|
|||
|
|
allfiles dd 0
|
|||
|
|
succfiles dd 0
|
|||
|
|
numbytes dd 0
|
|||
|
|
|
|||
|
|
proc startUnpack
|
|||
|
|
locals
|
|||
|
|
paramUnp rd 1
|
|||
|
|
sizeUnpack rd 1
|
|||
|
|
hFile rd 1
|
|||
|
|
hFileZip rd 1
|
|||
|
|
hPlugin rd 1
|
|||
|
|
pathFold rb 256
|
|||
|
|
endl
|
|||
|
|
;if input not corrected
|
|||
|
|
cmp [fInp],byte 0
|
|||
|
|
je .errNullInp
|
|||
|
|
|
|||
|
|
; mcall 68, 24, Exception, 0FFFFFFFFh ;??
|
|||
|
|
;init plugin
|
|||
|
|
push ebp
|
|||
|
|
stdcall [aPluginLoad],kfar_info
|
|||
|
|
pop ebp
|
|||
|
|
|
|||
|
|
|
|||
|
|
;set current directory, create folder
|
|||
|
|
cmp [pathOut],0
|
|||
|
|
jne @f
|
|||
|
|
lea eax,[pathFold]
|
|||
|
|
stdcall cpLastName, fInp, eax
|
|||
|
|
lea eax,[pathFold]
|
|||
|
|
mov [fsNewDir.path],eax
|
|||
|
|
mcall 70, fsNewDir
|
|||
|
|
mov ecx, [fsNewDir.path]
|
|||
|
|
|
|||
|
|
mcall 30,4,,1
|
|||
|
|
jmp .n
|
|||
|
|
@@:
|
|||
|
|
mcall 30,4,pathOut,1
|
|||
|
|
.n:
|
|||
|
|
|
|||
|
|
;open and read first 1KB
|
|||
|
|
stdcall open, fInp, O_READ
|
|||
|
|
mov [hFileZip], eax
|
|||
|
|
mcall 70,fsZip
|
|||
|
|
test eax,eax
|
|||
|
|
jnz .errNotFound
|
|||
|
|
mcall 70,fsZipRead
|
|||
|
|
|
|||
|
|
|
|||
|
|
;open pack
|
|||
|
|
push ebp
|
|||
|
|
stdcall [aOpenFilePlugin],[hFileZip],bdvkPack,filedata_buffer,filedata_buffer_size ,0 ,0 , fInp
|
|||
|
|
pop ebp
|
|||
|
|
|
|||
|
|
test eax,eax
|
|||
|
|
jnz @f
|
|||
|
|
cmp ebx,0 ;;/ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!!!!
|
|||
|
|
je .errNotFound ;;<3B><><EFBFBD>祭<EFBFBD><E7A5AD> ebx <20><><EFBFBD><EFBFBD>祭<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>.
|
|||
|
|
cmp ebx,400h ;;<3B><><EFBFBD> <20><><EFBFBD> <20>㤥<EFBFBD> ࠡ<><E0A0A1><EFBFBD><EFBFBD><EFBFBD> <20> <20><>㣨<EFBFBD><E3A3A8> <20><><EFBFBD><EFBFBD><EFBFBD>ﬨ
|
|||
|
|
je .errNotSupp ;;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⥪<EFBFBD> - <20><> <20>᭮!
|
|||
|
|
@@:
|
|||
|
|
mov [hPlugin],eax
|
|||
|
|
|
|||
|
|
;get num of all files
|
|||
|
|
; stdcall calcSizeArch,[hPlugin]
|
|||
|
|
; push ebp
|
|||
|
|
; stdcall [aReadFolder], [hPlugin]
|
|||
|
|
; pop ebp
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
; push ebp
|
|||
|
|
; stdcall [aOpen], [hPlugin], .str1, O_READ
|
|||
|
|
; pop ebp
|
|||
|
|
;
|
|||
|
|
; push ebp
|
|||
|
|
; stdcall [aSetpos],[hPlugin],0,POSEND
|
|||
|
|
; pop ebp
|
|||
|
|
; add [numbytes],eax
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
;unpack
|
|||
|
|
; void __stdcall GetFiles(HANDLE hPlugin, int NumItems, void* items[], void* addfile, void* adddir);
|
|||
|
|
push ebp
|
|||
|
|
stdcall [aGetFiles], [hPlugin], -1, 0, myAddFile, myAddDir
|
|||
|
|
pop ebp
|
|||
|
|
|
|||
|
|
;jmp @f
|
|||
|
|
; .str1 db '/LICENSE.txt',0
|
|||
|
|
;@@:
|
|||
|
|
|
|||
|
|
;HANDLE __stdcall open(HANDLE hPlugin, const char* filename, int mode);
|
|||
|
|
;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 䠩<> filename. <20><>ࠬ<EFBFBD><E0A0AC><EFBFBD> mode <20><>१<EFBFBD>ࢨ<E0A2A8><E0AEA2> <20> <20> ⥪<>饩 <20><><EFBFBD>ᨨ kfar <20>ᥣ<EFBFBD><E1A5A3> ࠢ<><E0A0A2> 1.
|
|||
|
|
; push ebp
|
|||
|
|
; stdcall [aOpen], [hPlugin], .str1, O_READ
|
|||
|
|
; pop ebp
|
|||
|
|
|
|||
|
|
; mov [hFile],eax
|
|||
|
|
;unsigned __stdcall read(HANDLE hFile, void* buf, unsigned size);
|
|||
|
|
;<3B>⥭<EFBFBD><E2A5AD> size <20><><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> buf <20><> 䠩<><E4A0A9> hFile, ࠭<><E0A0AD> <20><><EFBFBD><EFBFBD><EFBFBD>⮣<EFBFBD> <20><>१ open.
|
|||
|
|
;size <20><><EFBFBD>⥭ 512 <20><><EFBFBD><EFBFBD>
|
|||
|
|
;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>頥<EFBFBD><E9A0A5><EFBFBD> <20><><EFBFBD>祭<EFBFBD><E7A5AD>: <20><> <20><><EFBFBD><EFBFBD><EFBFBD>⠭<EFBFBD><E2A0AD><EFBFBD> <20><><EFBFBD><EFBFBD>, -1 <20><><EFBFBD> <20>訡<EFBFBD><E8A8A1>.
|
|||
|
|
; push ebp
|
|||
|
|
; stdcall [aRead], [hFile], copy_buf, SIZE_COPY_BUF
|
|||
|
|
; pop ebp
|
|||
|
|
;
|
|||
|
|
; mcall 70, fsWrite
|
|||
|
|
;void __stdcall close(HANDLE hFile);
|
|||
|
|
push ebp
|
|||
|
|
stdcall [aClose], [hFile]
|
|||
|
|
mov [bWinChild],0
|
|||
|
|
pop ebp
|
|||
|
|
|
|||
|
|
push ebp
|
|||
|
|
stdcall [aClosePlugin], [hPlugin]
|
|||
|
|
mov [bWinChild],0
|
|||
|
|
|
|||
|
|
mov [fsRunNotifyOK.param],strUnpackOk
|
|||
|
|
mcall 70,fsRunNotifyOK
|
|||
|
|
pop ebp
|
|||
|
|
ret ;SUCCESS
|
|||
|
|
|
|||
|
|
|
|||
|
|
.errNotFound:
|
|||
|
|
; stdcall SimpleSayErr,strNotFound
|
|||
|
|
mov [bWinChild],0
|
|||
|
|
mov [fsRunNotifyOK.param],strUnpackFault
|
|||
|
|
mcall 70,fsRunNotifyOK
|
|||
|
|
ret
|
|||
|
|
|
|||
|
|
.errNotSupp:
|
|||
|
|
mov eax,[fsNewDir.path]
|
|||
|
|
mov [fsDelDir.path],eax
|
|||
|
|
mcall 70, fsDelDir
|
|||
|
|
|
|||
|
|
mov [bWinChild],0
|
|||
|
|
mov [fsRunNotifyOK.param],strUnpackFault
|
|||
|
|
mcall 70,fsRunNotifyOK
|
|||
|
|
ret
|
|||
|
|
|
|||
|
|
.errNullInp:
|
|||
|
|
mov [redInput],1
|
|||
|
|
mov [bWinChild],0
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
|
|||
|
|
proc Exception param1:dword
|
|||
|
|
stdcall SimpleSayErr,strErrorExc
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
proc debugInt3
|
|||
|
|
dps '<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>!!!!!!!!!!!!!!!!!!!!!!!!!'
|
|||
|
|
dnl
|
|||
|
|
int3
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
|
|||
|
|
proc calcSizeArch hPlugin:dword
|
|||
|
|
locals
|
|||
|
|
bdwk rb 560
|
|||
|
|
endl
|
|||
|
|
;int __stdcall ReadFolder(HANDLE hPlugin, unsigned dirinfo_start,
|
|||
|
|
; unsigned dirinfo_size, void* dirdata);
|
|||
|
|
int3
|
|||
|
|
push ebp
|
|||
|
|
lea eax,[bdwk]
|
|||
|
|
stdcall [aReadFolder], [hPlugin],1,560,eax
|
|||
|
|
pop ebp
|
|||
|
|
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
|
|||
|
|
;SayErr int num_strings, const char* strings[],
|
|||
|
|
; int num_buttons, const char* buttons[]);
|
|||
|
|
|
|||
|
|
proc SayErr num_strings:dword, strings:dword,num_buttons:dword, buttons:dword
|
|||
|
|
pushad
|
|||
|
|
cmp [num_strings],1
|
|||
|
|
je @f
|
|||
|
|
m2m [errmess0], strErrorExc
|
|||
|
|
jmp .l1
|
|||
|
|
@@:
|
|||
|
|
mov ebx,[strings]
|
|||
|
|
m2m [errmess0], dword [ebx]
|
|||
|
|
.l1:
|
|||
|
|
mcall 51,1,threadSayErr,stackDlg
|
|||
|
|
popad
|
|||
|
|
mov eax,1
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
proc SimpleSayErr str:dword
|
|||
|
|
pushad
|
|||
|
|
m2m [errmess0],[str]
|
|||
|
|
mcall 51,1,threadSayErr,stackDlg
|
|||
|
|
popad
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
|
|||
|
|
proc threadSayErr
|
|||
|
|
mcall 40, 111b+0C000000h
|
|||
|
|
.wm_redraw:
|
|||
|
|
mcall 12, 1
|
|||
|
|
mcall 48, 3, sc, sizeof.system_colors
|
|||
|
|
mov edx, [sc.work]
|
|||
|
|
or edx, 0x33000000
|
|||
|
|
mcall 0, <220,420>, <220,110>, , , title
|
|||
|
|
|
|||
|
|
mov ecx,[sc.work_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mov edx,[errmess0]
|
|||
|
|
mcall 4, <15,11>
|
|||
|
|
|
|||
|
|
mcall 8, <105,100>,<45,25>,1,[sc.work_button]
|
|||
|
|
mov ecx,[sc.work_button_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mcall 4, <147,51>, , strOk
|
|||
|
|
|
|||
|
|
mcall 12, 2
|
|||
|
|
|
|||
|
|
.still:
|
|||
|
|
mcall 10
|
|||
|
|
cmp eax, 1
|
|||
|
|
je .wm_redraw
|
|||
|
|
cmp eax, 2
|
|||
|
|
je .wm_key
|
|||
|
|
cmp eax, 3
|
|||
|
|
je .wm_button
|
|||
|
|
jmp .still
|
|||
|
|
|
|||
|
|
.wm_button:
|
|||
|
|
mcall 17
|
|||
|
|
|
|||
|
|
cmp ah, 1
|
|||
|
|
je .exit
|
|||
|
|
jmp .still
|
|||
|
|
|
|||
|
|
.wm_key:
|
|||
|
|
mcall 2
|
|||
|
|
jmp .still
|
|||
|
|
.exit:
|
|||
|
|
mcall -1
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
; "enter password" dialog for KFar
|
|||
|
|
;password_dlg:
|
|||
|
|
; dd 1 ; use standard dialog colors
|
|||
|
|
; dd -1 ; center window by x
|
|||
|
|
; dd -1 ; center window by y
|
|||
|
|
;.width dd ? ; width (will be filled according to current console width)
|
|||
|
|
; dd 2 ; height
|
|||
|
|
; dd 4, 2 ; border size
|
|||
|
|
; dd aEnterPasswordTitle ; title
|
|||
|
|
; dd ? ; colors (will be set by KFar)
|
|||
|
|
; dd 0 ; used internally by dialog manager, ignored
|
|||
|
|
; dd 0, 0 ; reserved for DlgProc
|
|||
|
|
; dd 2 ; 2 controls
|
|||
|
|
;; the string "enter password"
|
|||
|
|
; dd 1 ; type: static
|
|||
|
|
; dd 1,0 ; upper-left position
|
|||
|
|
;.width1 dd ?,0 ; bottom-right position
|
|||
|
|
; dd aEnterPassword ; data
|
|||
|
|
; dd 0 ; flags
|
|||
|
|
;; editbox for password
|
|||
|
|
; dd 3 ; type: edit
|
|||
|
|
; dd 1,1 ; upper-left position
|
|||
|
|
;.width2 dd ?,0 ; bottom-right position
|
|||
|
|
; dd password_data ; data
|
|||
|
|
; dd 2Ch ; flags
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
proc DialogBox dlgInfo:dword
|
|||
|
|
pushad
|
|||
|
|
mov ebx,[dlgInfo]
|
|||
|
|
mov eax,[ebx+19*4]
|
|||
|
|
mov [forpassword],eax
|
|||
|
|
mov byte[eax], 0
|
|||
|
|
mov [stateDlg], 0
|
|||
|
|
mcall 51,1,threadDialogBox,stackDlg
|
|||
|
|
|
|||
|
|
;wait thread...
|
|||
|
|
@@: cmp [stateDlg],0
|
|||
|
|
jne @f
|
|||
|
|
mcall 5,1
|
|||
|
|
jmp @b
|
|||
|
|
@@:
|
|||
|
|
popad
|
|||
|
|
cmp [stateDlg], 1
|
|||
|
|
jne @f
|
|||
|
|
xor eax, eax
|
|||
|
|
ret
|
|||
|
|
@@:
|
|||
|
|
or eax, -1
|
|||
|
|
ret
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
proc threadDialogBox
|
|||
|
|
|
|||
|
|
mcall 40, 100111b+0C000000h
|
|||
|
|
mov eax,[forpassword]
|
|||
|
|
mov [edtPassword+4*9],eax
|
|||
|
|
xor eax,eax
|
|||
|
|
mov dword[edtPassword.size], eax
|
|||
|
|
mov dword[edtPassword.pos], eax
|
|||
|
|
|
|||
|
|
.wm_redraw:
|
|||
|
|
mcall 12, 1
|
|||
|
|
mcall 48, 3, sc, sizeof.system_colors
|
|||
|
|
mov edx, [sc.work]
|
|||
|
|
or edx, 0x33000000
|
|||
|
|
mcall 0, <200,320>, <200,140>, , , title
|
|||
|
|
|
|||
|
|
edit_boxes_set_sys_color edtPack,endEdits,sc
|
|||
|
|
stdcall [edit_box_draw],edtPassword
|
|||
|
|
|
|||
|
|
|
|||
|
|
mov ecx,[sc.work_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mcall 4, <56,12>, , strGetPass
|
|||
|
|
|
|||
|
|
mcall 8, <70,80>,<74,22>,2,[sc.work_button]
|
|||
|
|
mov ecx,[sc.work_button_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mcall 4, <103,79>, , strOk
|
|||
|
|
|
|||
|
|
mcall 8, <165,80>,<74,22>,1,[sc.work_button]
|
|||
|
|
mov ecx,[sc.work_button_text]
|
|||
|
|
or ecx,90000000h
|
|||
|
|
mcall 4, <182,79>, , strCancel
|
|||
|
|
|
|||
|
|
|
|||
|
|
mcall 12, 2
|
|||
|
|
|
|||
|
|
.still:
|
|||
|
|
mcall 10
|
|||
|
|
cmp eax, 1
|
|||
|
|
je .wm_redraw
|
|||
|
|
cmp eax, 2
|
|||
|
|
je .wm_key
|
|||
|
|
cmp eax, 3
|
|||
|
|
je .wm_button
|
|||
|
|
cmp eax, 6
|
|||
|
|
je .wm_mouse
|
|||
|
|
|
|||
|
|
jmp .still
|
|||
|
|
|
|||
|
|
.wm_key:
|
|||
|
|
mcall 2
|
|||
|
|
stdcall [edit_box_key],edtPassword
|
|||
|
|
jmp .still
|
|||
|
|
|
|||
|
|
|
|||
|
|
.wm_button:
|
|||
|
|
mcall 17
|
|||
|
|
|
|||
|
|
cmp ah, 2 ;OK
|
|||
|
|
jne @f
|
|||
|
|
mov [stateDlg],1
|
|||
|
|
jmp .exit
|
|||
|
|
@@:
|
|||
|
|
|
|||
|
|
cmp ah, 1 ;Close window or Cancel
|
|||
|
|
jne .still
|
|||
|
|
mov [stateDlg],2
|
|||
|
|
jmp .exit
|
|||
|
|
|
|||
|
|
.wm_mouse:
|
|||
|
|
stdcall [edit_box_mouse],edtPassword
|
|||
|
|
|
|||
|
|
|
|||
|
|
jmp .still
|
|||
|
|
|
|||
|
|
.exit:
|
|||
|
|
mcall -1
|
|||
|
|
endp
|
|||
|
|
|
|||
|
|
|
|||
|
|
;-- DATA -------------------------------------------------------------------
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
sc system_colors
|
|||
|
|
|
|||
|
|
|
|||
|
|
title db 'uNZ v0.1 alpha',0
|
|||
|
|
bWinChild db 0 ;1 - <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ॠ<><E0A5A0><EFBFBD><E0AEA2><EFBFBD>
|
|||
|
|
redInput db 0 ;1 - <20><><EFBFBD>ᢥ<EFBFBD><E1A2A5><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|||
|
|
|
|||
|
|
|
|||
|
|
if lang eq ru
|
|||
|
|
strGo db '<27><>ᯠ<EFBFBD><E1AFA0><EFBFBD><EFBFBD><EFBFBD><EFBFBD>',0
|
|||
|
|
strInp db '<27><>娢',0
|
|||
|
|
strPath db '<27>㤠',0
|
|||
|
|
else
|
|||
|
|
strGo db 'Unpack',0
|
|||
|
|
strInp db 'Pack',0
|
|||
|
|
strPath db 'Wohin',0
|
|||
|
|
strError db 'Error',0
|
|||
|
|
strErrorExc db 'Unrecognized error',0
|
|||
|
|
strOk db 'OK',0
|
|||
|
|
strGetPass db 'Password:',0
|
|||
|
|
strCancel db 'Cancel',0
|
|||
|
|
strUnpackOk db 'Unpacked successfuly',0
|
|||
|
|
strUnpackFault db 'Unpacked fault',0
|
|||
|
|
strNotSupport db 'Format not support',0
|
|||
|
|
strNotFound db 'File not found',0
|
|||
|
|
strNull db 0
|
|||
|
|
end if
|
|||
|
|
|
|||
|
|
|
|||
|
|
strDots db '..',0
|
|||
|
|
|
|||
|
|
;--------
|
|||
|
|
; int __stdcall SayErr(int num_strings, const char* strings[],
|
|||
|
|
; int num_buttons, const char* buttons[]);
|
|||
|
|
; int __stdcall DialogBox(DLGDATA* dlg);
|
|||
|
|
|
|||
|
|
forpassword rd 1
|
|||
|
|
stateDlg dd 0 ;0 - in process, 1 - button ok, 2 - button cancel
|
|||
|
|
errmess0 dd strErrorExc
|
|||
|
|
|
|||
|
|
|
|||
|
|
kfar_info:
|
|||
|
|
dd .size
|
|||
|
|
dd version_dword
|
|||
|
|
dd open
|
|||
|
|
dd open2
|
|||
|
|
dd read
|
|||
|
|
dd -1 ; write: to be implemented
|
|||
|
|
dd seek
|
|||
|
|
dd tell
|
|||
|
|
dd -1 ; flush: to be implemented
|
|||
|
|
dd filesize
|
|||
|
|
dd close
|
|||
|
|
dd xpgalloc
|
|||
|
|
dd xpgrealloc
|
|||
|
|
dd pgfree
|
|||
|
|
dd getfreemem
|
|||
|
|
dd debugInt3;libini_alloc
|
|||
|
|
dd debugInt3;libini_realloc
|
|||
|
|
dd debugInt3;libini_free
|
|||
|
|
dd debugInt3;menu
|
|||
|
|
dd debugInt3;menu_centered_in
|
|||
|
|
dd DialogBox;DialogBox
|
|||
|
|
dd SayErr ;SayErr
|
|||
|
|
dd debugInt3;Message
|
|||
|
|
dd 0 ;cur_width
|
|||
|
|
.size = $ - kfar_info
|
|||
|
|
;--------
|
|||
|
|
|
|||
|
|
|
|||
|
|
iFiles dd 0 ;<3B><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>⢮ <20><><EFBFBD><EFBFBD>㦠<EFBFBD><E3A6A0><EFBFBD><EFBFBD> 䠩<><E4A0A9><EFBFBD>
|
|||
|
|
endPointer dd buffer
|
|||
|
|
|
|||
|
|
|
|||
|
|
fsZip:
|
|||
|
|
.cmd dd 5
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
.size dd 0
|
|||
|
|
.buf dd bdvkPack
|
|||
|
|
db 0
|
|||
|
|
dd fInp
|
|||
|
|
|
|||
|
|
fsZipRead:
|
|||
|
|
.cmd dd 0
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
.size dd 1024
|
|||
|
|
.buf dd filedata_buffer
|
|||
|
|
db 0
|
|||
|
|
dd fInp
|
|||
|
|
|
|||
|
|
|
|||
|
|
fsWrite:
|
|||
|
|
.cmd dd 2 ;2 rewrite, 3 - write
|
|||
|
|
.pos dd 0
|
|||
|
|
.hpos dd 0
|
|||
|
|
.size dd SIZE_COPY_BUF
|
|||
|
|
.buf dd copy_buf
|
|||
|
|
db 0
|
|||
|
|
.path dd 0
|
|||
|
|
|
|||
|
|
|
|||
|
|
fsNewDir:
|
|||
|
|
.cmd dd 9
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
db 0
|
|||
|
|
.path dd 0
|
|||
|
|
|
|||
|
|
fsDelDir:
|
|||
|
|
.cmd dd 8
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
dd 0
|
|||
|
|
db 0
|
|||
|
|
.path dd 0
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
fsRunNotifyOK:
|
|||
|
|
.cmd dd 7
|
|||
|
|
dd 0
|
|||
|
|
.param dd strUnpackOk
|
|||
|
|
.size dd 0
|
|||
|
|
.buf dd 0
|
|||
|
|
db '/sys/@notify',0
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
edtPack edit_box 200,70,11 ,0FFFFFFh,06F9480h,0FFh,0h,0x90000000,255,\
|
|||
|
|
fInp, mouse_dd,0,0,0
|
|||
|
|
edtUnpPath edit_box 200,70,33,0FFFFFFh,06F9480h,0FFh,0h,0x90000000,255, \
|
|||
|
|
pathOut, mouse_dd,0,0,0
|
|||
|
|
edtPassword edit_box 200,56,40,0FFFFFFh,06F9480h,0FFh,0h,0x90000000,255, \
|
|||
|
|
password, mouse_dd,0,0,0
|
|||
|
|
endEdits:
|
|||
|
|
|
|||
|
|
;-------------------------------------------------------------------------------
|
|||
|
|
OpenDialog_data:
|
|||
|
|
.type dd 0 ;0-open, 1-save, 2-select folder
|
|||
|
|
.procinfo dd RBProcInfo ;+4
|
|||
|
|
.com_area_name dd communication_area_name ;+8
|
|||
|
|
.com_area dd 0 ;+12
|
|||
|
|
.opendir_pach dd temp_dir_pach ;+16
|
|||
|
|
.dir_default_pach dd communication_area_default_pach ;+20
|
|||
|
|
.start_path dd open_dialog_path ;+24
|
|||
|
|
.draw_window dd winRedraw ;+28
|
|||
|
|
.status dd 0 ;+32
|
|||
|
|
.openfile_pach dd ODAreaPath; ;+36
|
|||
|
|
.filename_area dd 0; ;+40
|
|||
|
|
.filter_area dd Filter
|
|||
|
|
.x:
|
|||
|
|
.x_size dw 420 ;+48 ; Window X size
|
|||
|
|
.x_start dw 100 ;+50 ; Window X position
|
|||
|
|
.y:
|
|||
|
|
.y_size dw 320 ;+52 ; Window y size
|
|||
|
|
.y_start dw 100 ;+54 ; Window Y position
|
|||
|
|
|
|||
|
|
communication_area_name:
|
|||
|
|
db 'FFFFFFFF_open_dialog',0
|
|||
|
|
open_dialog_path:
|
|||
|
|
db '/sys/File managers/opendial',0
|
|||
|
|
|
|||
|
|
communication_area_default_pach:
|
|||
|
|
db '/sys',0
|
|||
|
|
|
|||
|
|
Filter dd 0
|
|||
|
|
|
|||
|
|
|
|||
|
|
; int __stdcall ReadFolder(HANDLE hPlugin,
|
|||
|
|
; unsigned dirinfo_start, unsigned dirinfo_size, void* dirdata);
|
|||
|
|
; void __stdcall ClosePlugin(HANDLE hPlugin);
|
|||
|
|
; bool __stdcall SetFolder(HANDLE hPlugin,
|
|||
|
|
; const char* relative_path, const char* absolute_path);
|
|||
|
|
; void __stdcall GetOpenPluginInfo(HANDLE hPlugin, OpenPluginInfo* info);
|
|||
|
|
; void __stdcall GetFiles(HANDLE hPlugin, int NumItems, void* items[],
|
|||
|
|
; void* addfile, void* adddir);
|
|||
|
|
; bool __stdcall addfile(const char* name, void* bdfe_info, HANDLE hFile);
|
|||
|
|
; bool __stdcall adddir(const char* name, void* bdfe_info);
|
|||
|
|
; int __stdcall getattr(HANDLE hPlugin, const char* filename, void* info);
|
|||
|
|
; HANDLE __stdcall open(HANDLE hPlugin, const char* filename, int mode);
|
|||
|
|
; void __stdcall setpos(HANDLE hFile, __int64 pos);
|
|||
|
|
; unsigned __stdcall read(HANDLE hFile, void* buf, unsigned size);
|
|||
|
|
; void __stdcall close(HANDLE hFile);
|
|||
|
|
IMPORTS:
|
|||
|
|
library archiver, 'archiver.obj',\
|
|||
|
|
box_lib ,'box_lib.obj',\
|
|||
|
|
proc_lib,'proc_lib.obj'
|
|||
|
|
|
|||
|
|
import archiver,\
|
|||
|
|
aPluginLoad , 'plugin_load',\
|
|||
|
|
aOpenFilePlugin , 'OpenFilePlugin',\
|
|||
|
|
aClosePlugin , 'ClosePlugin',\
|
|||
|
|
aReadFolder , 'ReadFolder',\
|
|||
|
|
aSetFolder , 'SetFolder',\
|
|||
|
|
aGetFiles , 'GetFiles',\
|
|||
|
|
aGetOpenPluginInfo , 'GetOpenPluginInfo',\
|
|||
|
|
aGetattr , 'getattr',\
|
|||
|
|
aOpen , 'open',\
|
|||
|
|
aRead , 'read',\
|
|||
|
|
aSetpos , 'setpos',\
|
|||
|
|
aClose , 'close',\
|
|||
|
|
aDeflateUnpack , 'deflate_unpack',\
|
|||
|
|
aDeflateUnpack2 , 'deflate_unpack2'
|
|||
|
|
|
|||
|
|
import proc_lib,\
|
|||
|
|
OpenDialog_Init ,'OpenDialog_init',\
|
|||
|
|
OpenDialog_Start ,'OpenDialog_start'
|
|||
|
|
import box_lib,\
|
|||
|
|
edit_box_draw ,'edit_box',\
|
|||
|
|
edit_box_key ,'edit_box_key',\
|
|||
|
|
edit_box_mouse ,'edit_box_mouse'
|
|||
|
|
|
|||
|
|
|
|||
|
|
IncludeIGlobals
|
|||
|
|
|
|||
|
|
;-- UDATA -----------------------------------------------------------------------------
|
|||
|
|
init_end:
|
|||
|
|
align 16
|
|||
|
|
IncludeUGlobals
|
|||
|
|
|
|||
|
|
|
|||
|
|
;params db 'unz -o "fil epar1" -f "arch1.txt" -f "ar ch2.txt" file1',0
|
|||
|
|
;params db 'unz -o "fil epar1" -f arch1.txt -f "ar ch2.txt" file1',0
|
|||
|
|
;params db '/hd0/1/unz/xboot-1-0-build-14-en-win.zip',0
|
|||
|
|
;rb 4096
|
|||
|
|
|
|||
|
|
fInp rb 1024
|
|||
|
|
pathOut rb 1024
|
|||
|
|
files rd 256
|
|||
|
|
password rb 256
|
|||
|
|
|
|||
|
|
fZipInfo rb 40
|
|||
|
|
|
|||
|
|
mouse_dd rd 1
|
|||
|
|
RBProcInfo rb 1024
|
|||
|
|
temp_dir_pach rb 1024
|
|||
|
|
ODAreaPath rb 1024
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
;--------
|
|||
|
|
|
|||
|
|
copy_buf rb SIZE_COPY_BUF
|
|||
|
|
|
|||
|
|
execdata rb 1024
|
|||
|
|
execdataend:
|
|||
|
|
|
|||
|
|
filedata_buffer_size = 1024
|
|||
|
|
filedata_buffer rb filedata_buffer_size
|
|||
|
|
|
|||
|
|
CopyDestEditBuf rb 12+512+1
|
|||
|
|
.length = $ - CopyDestEditBuf - 13
|
|||
|
|
|
|||
|
|
bdvkPack rb 560
|
|||
|
|
|
|||
|
|
;--------
|
|||
|
|
|
|||
|
|
buffer rb 4096 ;for string of file name or extract
|
|||
|
|
params rb 4096
|
|||
|
|
|
|||
|
|
rb 1024
|
|||
|
|
stackUnpack:
|
|||
|
|
|
|||
|
|
rb 1024
|
|||
|
|
stackDlg:
|
|||
|
|
|
|||
|
|
rb 1024
|
|||
|
|
stack_top:
|
|||
|
|
|
|||
|
|
end_mem:
|
|||
|
|
|
|||
|
|
|