Due to server problems the website is temporarily offline! Visit http://www.smorgasbordet.com/pellesc/ to download Pelles C.
; __________________________________________________________________________________; _______________________ DlgProc __________________________________________________; __________________________________________________________________________________ ALIGN 16DlgProc PROC __hWnd:HWND,__uMsg:DWORD,__wParam:WPARAM,__lParam:LPARAM PARMAREA=4*QWORD LOCAL _hDialog:HWND mov _hDialog,rcx cmp rdx,WM_COMMAND jne @Exit cmp r8d,IDOK je @Go cmp r8d,IDCANCEL je @Cancel xor rax,rax ret; ================================================================================; ================================================================================ ALIGN 16@Go : shr r8,16 and r8,0000ffffh test r8,r8 ;cmp r8,BN_CLICKED jne @Termine mov r8,OFFSET szUrlToScan mov rdx,IDC_EDIT_01 mov QWORD PTR [r8],0 mov r9,SIZEOF szUrlToScan call GetDlgItemTextA test eax,eax jz @Empty mov rcx,OFFSET szUrlToScan call PathIsURLA test rax,rax jz @NotValid mov rdx,IDOK; ================================================================================; ================================================================================@Finished : mov rcx,_hDialog ;<------------------------------------- mov rax,OFFSET @Termine push rax jmp EndDialog; ================================================================================; ================================================================================ ALIGN 16@Termine : xor rax,rax ret; ================================================================================; ================================================================================ ALIGN 16@NotValid :; mov rcx,OFFSET szError_11; call Error mov rcx,_hDialog ;<------------------------------------- mov rdx,IDC_EDIT_01 call GetDlgItem mov rcx,rax call SetFocus ret; ================================================================================; ================================================================================ ALIGN 16@Cancel : shr r8,16 and r8,0000ffffh test r8,r8 ;cmp r8,BN_CLICKED jne @Termine mov rdx,IDCANCEL jmp @Finished; ================================================================================; ================================================================================ ALIGN 16@Empty : mov rcx,__hWnd mov rdx,IDC_EDIT_01 call GetDlgItem mov rcx,rax call SetFocus mov rcx,OFFSET szError_11 call Error ret; ================================================================================; ================================================================================ ALIGN 16@Exit : mov eax,TRUE retDlgProc ENDP
000000A4 mov [rsp+30h], rcx ;<-------------------------------------hDialog000000A9 cmp rdx, 111h000000B0 jnz 00000000000001C0h000000B6 cmp r8d, 01h000000BA jz 00000000000000D0h000000BC cmp r8d, 02h000000C0 jz 0000000000000170h000000C6 xor rax, rax000000C9 add rsp, 38h000000CD ret000000CE nop000000D0 shr r8, 10h000000D4 and r8, FFFFh000000DB test r8, r8000000DE jnz 0000000000000140h000000E0 mov szUrlToScan000000EA mov rdx, 3EEh000000F1 mov qword ptr [r8], 00000000F8 mov r9, 800h000000FF call GetDlgItemTextA00000104 test eax, eax00000106 jz 0000000000000190h0000010C mov szUrlToScan00000116 call PathIsURLA0000011B test rax, rax0000011E jz 0000000000000150h00000120 mov rdx, 01h00000127 mov rcx, [rsp+30h] ;<-------------------------------------hDialog0000012C mov DlgProc.@Termine00000136 push rax00000137 jmp EndDialog0000013C nop00000140 xor rax, rax00000143 add rsp, 38h00000147 ret00000148 nop0000014C nop00000150 mov rcx, [rsp+30h] ;<-------------------------------------hDialog00000155 mov rdx, 3EEh0000015C call GetDlgItem00000161 mov rcx, rax00000164 call SetFocus00000169 add rsp, 38h0000016D ret0000016E nop00000170 shr r8, 10h00000174 and r8, FFFFh0000017B test r8, r80000017E jnz 0000000000000140h00000180 mov rdx, 02h00000187 jmp 0000000000000127h00000189 nop0000018D nop00000190 mov rcx, rcx ;<-------------------------------------00000193 mov rdx, 3EEh0000019A call GetDlgItem0000019F mov rcx, rax000001A2 call SetFocus000001A7 mov szError_11000001B1 call 0000000000000000000001B6 add rsp, 38h000001BA ret000001BB nop000001BE nop000001C0 mov eax, 01h000001C5 add rsp, 38h000001C9 ret
..0000012C mov DlgProc.@Termine
000003B0 mov szRootUrl0000051E mov ShowTheFilePlease.@Exit