joyce8/EMBER2024-capa huggingface dataset:
Function at 0x4198e0
Capabilities:
Enumerate gui resources
Terminate process

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
mov esi, edx
mov ebx, eax
mov byte [ebp - 1], 0
call sub.kernel32.dll_GetCurrentProcessId
cmp ebx, eax
je 0x41996d
push ebx
push 0
push 0x100001
call sub.kernel32.dll_OpenProcess
mov dword [ebp - 8], eax
cmp dword [ebp - 8], 0
je 0x41996d
xor eax, eax
push ebp
push 0x419966
push dword fs:[eax]
mov dword fs:[eax], esp
push ebx
push 0x4198b0
call sub.user32.dll_EnumWindows
push esi
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_WaitForSingleObject
test eax, eax
jne 0x41993c
mov byte [ebp - 1], 1
jmp 0x41994f
push 0
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_TerminateProcess
test eax, eax
je 0x41994f
mov byte [ebp - 1], 2
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41996d
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_CloseHandle
ret
mov al, byte [ebp - 1]
pop esi
pop ebx
pop ecx
pop ecx
pop ebp
ret

Function at 0x419cac
Capabilities:
Enumerate gui resources

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff4
push ebx
push esi
mov esi, edx
mov ebx, eax
lea eax, [ebp - 0xc]
mov edx, dword [0x419bd8]
call sub.rtl70.bpl__System__InitializeRecord_qqrpvt1
xor eax, eax
push ebp
push 0x419d13
push dword fs:[eax]
mov dword fs:[eax], esp
mov dword [ebp - 0xc], ebx
lea eax, [ebp - 8]
mov edx, esi
call sub.rtl70.bpl__System__LStrLAsg_qqrpvpxv
xor eax, eax
mov dword [ebp - 4], eax
lea eax, [ebp - 0xc]
push eax
push 0x419bfc
call sub.user32.dll_EnumWindows
mov ebx, dword [ebp - 4]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x419d1a
lea eax, [ebp - 0xc]
mov edx, dword [0x419bd8]
call sub.rtl70.bpl__System__FinalizeRecord_qqrpvt1
ret

Function at 0x419d24
Capabilities:
Persist via winlogon helper dll registry key

Disassembly:
push ebp
mov ebp, esp
push 0
push 0
push ebx
mov ebx, eax
xor eax, eax
push ebp
push 0x419dbd
push dword fs:[eax]
mov dword fs:[eax], esp
cmp byte [sym.P_Interface.bpl__Jclsysinfo_IsWinNT], 0
je 0x419d5e
push 0
push ebx
mov ecx, 0x419dd4
mov edx, 0x419de4
mov eax, 0x80000002
call sym.P_Interface.bpl__Jclregistry_RegReadStringDef_qqrxuix17System_AnsiStringt2t2
jmp 0x419d91
push ebx
lea eax, [ebp - 8]
call sym.P_Interface.bpl__Jclsysinfo_GetWindowsFolder_qqrv
mov eax, dword [ebp - 8]
lea edx, [ebp - 4]
call sym.P_Interface.bpl__Jclfileutils_PathAddSeparator_qqrx17System_AnsiString
lea eax, [ebp - 4]
mov edx, 0x419e24
call sub.rtl70.bpl__System__LStrCat_qqrv
mov eax, dword [ebp - 4]
mov ecx, 0x419dd4
mov edx, 0x419e38
call sym.P_Interface.bpl__Jclinifiles_IniReadString_qqrx17System_AnsiStringt1t1
cmp dword [ebx], 0
jne 0x419da2
mov eax, ebx
mov edx, 0x419e48
call sub.rtl70.bpl__System__LStrAsg_qqrpvpxv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x419dc4
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret
Function at 0x41b23c
Capabilities:
Check os version

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff60
push ebx
xor eax, eax
mov dword [ebp - 0xa0], eax
xor eax, eax
push ebp
push 0x41b2fa
push dword fs:[eax]
mov dword fs:[eax], esp
xor ebx, ebx
mov eax, dword [sym.imp.rtl70.bpl__Sysutils_Win32Platform]
cmp dword [eax], 2
jne 0x41b2a2
mov eax, dword [sym.imp.rtl70.bpl__Sysutils_Win32MajorVersion]
cmp dword [eax], 5
jl 0x41b2a2
lea eax, [ebp - 0x9c]
mov edx, 0x9c
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [ebp - 0x9c], 0x9c
lea eax, [ebp - 0x9c]
push eax
call sub.kernel32.dll_GetVersionExA_1
test eax, eax
je 0x41b2e1
movzx ebx, word [ebp - 8]
jmp 0x41b2e1
push 0
mov ecx, 0x41b310
mov edx, 0x41b324
mov eax, 0x80000002
call sym.P_Interface.bpl__Jclregistry_RegReadIntegerDef_qqrxuix17System_AnsiStringt2i
mov ebx, eax
lea ecx, [ebp - 0xa0]
mov edx, 4
mov eax, ebx
call sub.rtl70.bpl__Sysutils_IntToHex_qqrii
mov eax, dword [ebp - 0xa0]
call sub.rtl70.bpl__Sysutils_StrToInt_qqrx17System_AnsiString
mov ecx, 0x64
cdq
idiv ecx
mov ebx, eax
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41b301
lea eax, [ebp - 0xa0]
call sub.rtl70.bpl__System__LStrClr_qqrpv
ret
Function at 0x41fe64
Capabilities:
Delete file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd8
push ebx
push esi
xor ebx, ebx
mov dword [ebp - 8], ebx
mov byte [ebp - 1], cl
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x41fee7
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x26]
mov edx, 0x1e
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [ebp - 0x26], ebx
mov dword [ebp - 0x22], 3
lea eax, [ebp - 8]
mov ecx, 0x41ff00
mov edx, esi
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x1e], eax
mov al, byte [ebp - 1]
call fcn.0041fe3c
mov word [ebp - 0x16], ax
lea eax, [ebp - 0x26]
push eax
call sub.shell32.dll_SHFileOperationA
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x41feee
lea eax, [ebp - 8]
call sub.rtl70.bpl__System__LStrClr_qqrpv
ret

Function at 0x41ffc0
Capabilities:
Copy file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd4
push ebx
push esi
xor ebx, ebx
mov dword [ebp - 8], ebx
mov dword [ebp - 0xc], ebx
mov byte [ebp - 1], cl
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x42006a
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x2a]
mov edx, 0x1e
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
call sub.user32.dll_GetDesktopWindow
mov dword [ebp - 0x2a], eax
mov dword [ebp - 0x26], 4
lea eax, [ebp - 8]
mov ecx, 0x420084
mov edx, ebx
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea eax, [ebp - 0xc]
mov ecx, 0x420084
mov edx, esi
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x22], eax
mov eax, dword [ebp - 0xc]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x1e], eax
mov al, byte [ebp - 1]
call fcn.0041ffa4
mov word [ebp - 0x1a], ax
lea eax, [ebp - 0x2a]
push eax
call sub.shell32.dll_SHFileOperationA
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x420071
lea eax, [ebp - 0xc]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret
Function at 0x4200bc
Capabilities:
Copy file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd8
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 8], ebx
mov edi, ecx
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x420161
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x26]
mov edx, 0x1e
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [ebp - 0x26], ebx
mov dword [ebp - 0x22], 2
lea eax, [ebp - 4]
mov ecx, 0x42017c
mov edx, esi
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea eax, [ebp - 8]
mov ecx, 0x42017c
mov edx, edi
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x1e], eax
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x1a], eax
mov al, byte [ebp + 8]
call fcn.00420088
mov word [ebp - 0x16], ax
lea eax, [ebp - 0x26]
push eax
call sub.shell32.dll_SHFileOperationA
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x420168
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret

Function at 0x4201b0
Capabilities:
Copy file
Move file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd8
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 8], ebx
mov edi, ecx
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x420255
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x26]
mov edx, 0x1e
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [ebp - 0x26], ebx
mov dword [ebp - 0x22], 1
lea eax, [ebp - 4]
mov ecx, 0x420270
mov edx, esi
call sub.rtl70.bpl__System__LStrCat3_qqrv
lea eax, [ebp - 8]
mov ecx, 0x420270
mov edx, edi
call sub.rtl70.bpl__System__LStrCat3_qqrv
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x1e], eax
mov eax, dword [ebp - 8]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x1a], eax
mov al, byte [ebp + 8]
call fcn.00420180
mov word [ebp - 0x16], ax
lea eax, [ebp - 0x26]
push eax
call sub.shell32.dll_SHFileOperationA
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x42025c
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret
Function at 0x420498
Capabilities:
Get common file path

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffec
push ebx
xor ebx, ebx
mov dword [ebp - 0x10], ebx
mov dword [ebp - 8], ecx
mov byte [ebp - 1], dl
mov ebx, eax
xor eax, eax
push ebp
push 0x4205b3
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 8]
xor ecx, ecx
xor edx, edx
call fcn.0042029c
lea eax, [ebp - 0x10]
push eax
call sub.shell32.dll_SHGetDesktopFolder
call sub.rtl70.bpl__Activex_Succeeded_qqrl
mov byte [ebp - 9], al
cmp byte [ebp - 9], 0
je 0x42055b
test ebx, ebx
jne 0x4204f1
mov eax, dword [ebp - 8]
add eax, 0x18
mov edx, dword [ebp - 0x10]
call sub.rtl70.bpl__System__IntfCopy_qqrr45System__DelphiInterface_t17System_IInterface_x45System__DelphiInterface_t17System_IInter
jmp 0x42055b
lea eax, [ebp - 0x14]
push eax
push ebx
push 0
call sub.shell32.dll_SHGetSpecialFolderLocation
call sub.rtl70.bpl__Activex_Succeeded_qqrl
mov byte [ebp - 9], al
cmp byte [ebp - 9], 0
je 0x42055b
xor eax, eax
push ebp
push 0x420554
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [ebp - 8]
add eax, 0x18
push eax
mov eax, dword [0x697628]
push eax
push 0
mov eax, dword [ebp - 0x14]
push eax
mov eax, dword [ebp - 0x10]
push eax
mov eax, dword [eax]
call dword [eax + 0x14]
call sub.rtl70.bpl__Activex_Succeeded_qqrl
mov byte [ebp - 9], al
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x42055b
mov eax, dword [ebp - 0x14]
push eax
call sub.ole32.dll_CoTaskMemFree
ret
cmp byte [ebp - 9], 0
je 0x42059d
mov eax, dword [ebp - 8]
add eax, 0x14
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
push eax
mov al, byte [ebp - 1]
call fcn.00420274
push eax
push 0
mov eax, dword [ebp - 8]
mov eax, dword [eax + 0x18]
push eax
mov eax, dword [eax]
call dword [eax + 0x10]
mov eax, dword [ebp - 8]
call sym.P_Interface.bpl__Jclshell_SHEnumFolderNext_qqrr23Jclshell_TEnumFolderRec
mov byte [ebp - 9], al
cmp byte [ebp - 9], 0
jne 0x42059d
mov eax, dword [ebp - 8]
call sym.P_Interface.bpl__Jclshell_SHEnumFolderClose_qqrr23Jclshell_TEnumFolderRec
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4205ba
lea eax, [ebp - 0x10]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
ret
Function at 0x420b98
Capabilities:
Create process on windows
Get common file path

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffb4
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x4c], ebx
mov dword [ebp - 0x48], ebx
mov byte [ebp - 1], cl
mov esi, edx
mov edi, eax
xor eax, eax
push ebp
push 0x420c84
push dword fs:[eax]
mov dword fs:[eax], esp
xor ebx, ebx
lea eax, [ebp - 8]
push eax
push edi
push esi
call sub.shell32.dll_SHGetSpecialFolderLocation
call sub.rtl70.bpl__Activex_Succeeded_qqrl
test al, al
je 0x420c69
lea eax, [ebp - 0x44]
mov edx, 0x3c
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [ebp - 0x44], 0x3c
mov dword [ebp - 0x3c], esi
mov dword [ebp - 0x40], 0xc
cmp byte [ebp - 1], 0
je 0x420c06
mov eax, 0x420c94
mov dword [ebp - 0x38], eax
jmp 0x420c0e
mov eax, 0x420c9c
mov dword [ebp - 0x38], eax
mov eax, dword [ebp - 8]
mov dword [ebp - 0x20], eax
mov dword [ebp - 0x28], 1
lea edx, [ebp - 0x48]
mov eax, dword [ebp - 8]
call sym.P_Interface.bpl__Jclshell_PidlToPath_qqrp11_ITEMIDLIST
cmp dword [ebp - 0x48], 0
jne 0x420c3b
mov dword [ebp - 0x40], 0xc
mov eax, dword [ebp - 8]
mov dword [ebp - 0x20], eax
jmp 0x420c51
lea edx, [ebp - 0x4c]
mov eax, dword [ebp - 8]
call sym.P_Interface.bpl__Jclshell_PidlToPath_qqrp11_ITEMIDLIST
mov eax, dword [ebp - 0x4c]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x34], eax
lea eax, [ebp - 0x44]
push eax
call sub.shell32.dll_ShellExecuteExA
cmp eax, 1
sbb ebx, ebx
inc ebx
mov eax, dword [ebp - 8]
push eax
call sub.ole32.dll_CoTaskMemFree
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x420c8b
lea eax, [ebp - 0x4c]
mov edx, 2
call sub.rtl70.bpl__System__LStrArrayClr_qqrpvi
ret
Function at 0x420e80
Capabilities:
Get common file path

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffddc
push ebx
xor ecx, ecx
mov dword [ebp - 0x224], ecx
mov dword [ebp - 0x14], ecx
mov dword [ebp - 4], edx
mov ebx, eax
mov eax, dword [ebp - 4]
test eax, eax
je 0x420ea5
xor edx, edx
mov dword [eax], edx
xor eax, eax
push ebp
push 0x420f9c
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov dword [ebp - 8], eax
lea eax, [ebp - 0x14]
push eax
call sub.shell32.dll_SHGetDesktopFolder
call sub.rtl70.bpl__Activex_Succeeded_qqrl
test al, al
je 0x420f7b
lea eax, [ebp - 0x18]
push eax
push 0x11
push 0
call sub.shell32.dll_SHGetSpecialFolderLocation
call sub.rtl70.bpl__Activex_Succeeded_qqrl
test al, al
je 0x420f72
mov eax, dword [ebp - 4]
push eax
mov eax, dword [0x697628]
push eax
push 0
mov eax, dword [ebp - 0x18]
push eax
mov eax, dword [ebp - 0x14]
push eax
mov eax, dword [eax]
call dword [eax + 0x14]
call sub.rtl70.bpl__Activex_Succeeded_qqrl
test al, al
je 0x420f72
push 0x104
lea eax, [ebp - 0x220]
push eax
push 0xffffffffffffffff
lea edx, [ebp - 0x224]
mov eax, ebx
call sym.P_Interface.bpl__Jclfileutils_PathAddSeparator_qqrx17System_AnsiString
mov eax, dword [ebp - 0x224]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
push 1
push 0
call sub.kernel32.dll_MultiByteToWideChar
xor eax, eax
mov dword [ebp - 0xc], eax
lea eax, [ebp - 0xc]
push eax
lea eax, [ebp - 8]
push eax
lea eax, [ebp - 0x10]
push eax
lea eax, [ebp - 0x220]
push eax
push 0
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax]
push eax
mov eax, dword [eax]
call dword [eax + 0xc]
call sub.rtl70.bpl__Activex_Failed_qqrl
test al, al
je 0x420f72
mov eax, dword [ebp - 4]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
mov eax, dword [ebp - 0x18]
push eax
call sub.ole32.dll_CoTaskMemFree
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x420fa3
lea eax, [ebp - 0x224]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 0x14]
call sub.rtl70.bpl__System__IntfClear_qqrr45System__DelphiInterface_t17System_IInterface_
ret
Function at 0x421580
Capabilities:
Get common file path

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff0
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x10], ebx
mov dword [ebp - 8], ebx
mov edi, ecx
mov ebx, edx
mov esi, eax
xor eax, eax
push ebp
push 0x421653
push dword fs:[eax]
mov dword fs:[eax], esp
mov dword [ebp - 4], 0x80070057
lea eax, [ebp - 8]
mov edx, 0x104
call sub.rtl70.bpl__System__LStrSetLength_qqrv
lea eax, [ebp - 0xc]
push eax
push ebx
push 0
call sub.shell32.dll_SHGetSpecialFolderLocation
call sub.rtl70.bpl__Activex_Succeeded_qqrl
test al, al
je 0x421635
xor eax, eax
push ebp
push 0x42162e
push dword fs:[eax]
mov dword fs:[eax], esp
lea edx, [ebp - 8]
mov eax, dword [ebp - 0xc]
call sym.P_Interface.bpl__Jclshell_PidlToPath_qqrp11_ITEMIDLIST
cmp dword [ebp - 8], 0
je 0x421617
lea eax, [ebp - 8]
call sym.P_Interface.bpl__Jclstrings_StrResetLength_qqrr17System_AnsiString
lea edx, [ebp - 0x10]
mov eax, dword [ebp - 8]
call sym.P_Interface.bpl__Jclfileutils_PathAddSeparator_qqrx17System_AnsiString
lea eax, [ebp - 0x10]
mov edx, edi
call sub.rtl70.bpl__System__LStrCat_qqrv
mov edx, dword [ebp - 0x10]
mov eax, esi
call sym.P_Interface.bpl__Jclshell_ShellLinkCreate_qqrrx19Jclshell_TShellLinkx17System_AnsiString
mov dword [ebp - 4], eax
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x421635
mov eax, dword [ebp - 0xc]
push eax
call sub.ole32.dll_CoTaskMemFree
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x42165a
lea eax, [ebp - 0x10]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 8]
call sub.rtl70.bpl__System__LStrClr_qqrpv
ret
Function at 0x421bf4
Capabilities:
Get file system object information

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffe98
push ebx
push esi
xor edx, edx
mov dword [ebp - 0x168], edx
mov dword [ebp - 4], edx
mov esi, eax
xor eax, eax
push ebp
push 0x421d10
push dword fs:[eax]
mov dword fs:[eax], esp
xor ebx, ebx
lea edx, [ebp - 0x168]
mov eax, dword [esi + 0x18]
call sub.rtl70.bpl__Sysutils_ExtractFileExt_qqrx17System_AnsiString
mov eax, dword [ebp - 0x168]
lea edx, [ebp - 4]
call sub.rtl70.bpl__Sysutils_LowerCase_qqrx17System_AnsiString
mov eax, dword [ebp - 4]
mov edx, 0x421d28
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x421c51
mov eax, dword [esi + 0x18]
call sym.P_Interface.bpl__Jclfileutils_FileExists_qqrx17System_AnsiString
test al, al
test ebx, ebx
jne 0x421c89
mov eax, dword [ebp - 4]
mov edx, 0x421d38
call sub.rtl70.bpl__System__LStrCmp_qqrv
je 0x421c73
mov eax, dword [ebp - 4]
mov edx, 0x421d48
call sub.rtl70.bpl__System__LStrCmp_qqrv
jne 0x421c89
mov eax, dword [esi + 0x1c]
push eax
mov eax, dword [esi + 0x18]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
push 0
call sub.shell32.dll_ExtractIconA
mov ebx, eax
test ebx, ebx
jne 0x421caf
mov eax, dword [esi + 0x10]
call sym.P_Interface.bpl__Jclfileutils_FileExists_qqrx17System_AnsiString
test al, al
je 0x421caf
mov eax, dword [esi + 0x1c]
push eax
mov eax, dword [esi + 0x10]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
push 0
call sub.shell32.dll_ExtractIconA
mov ebx, eax
test ebx, ebx
jne 0x421cef
cmp dword [esi + 0xc], 0
je 0x421cef
lea eax, [ebp - 0x164]
mov edx, 0x160
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
push 0x108
push 0x160
lea eax, [ebp - 0x164]
push eax
push 0
mov eax, dword [esi + 0xc]
push eax
call sub.shell32.dll_SHGetFileInfoA
test eax, eax
je 0x421cef
mov ebx, dword [ebp - 0x164]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x421d17
lea eax, [ebp - 0x168]
call sub.rtl70.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 4]
call sub.rtl70.bpl__System__LStrClr_qqrpv
ret

Function at 0x4220aa
Capabilities:
Get file system object information

Disassembly:
push ebx
push esi
add esp, 0xfffffea0
mov ebx, edx
mov esi, eax
mov eax, esp
mov edx, 0x160
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
test ebx, ebx
jne 0x422099
mov ebx, 4
or ebx, 0x4000
push ebx
push 0x160
lea eax, [esp + 8]
push eax
push 0
push 0x4220cc
call sub.shell32.dll_SHGetFileInfoA
mov ecx, esi
mov edx, eax
xor eax, eax
call fcn.00404340
add esp, 0x160
pop esi
pop ebx
ret
Function at 0x4220d0
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffc4
push ebx
push esi
push edi
mov edi, ecx
mov esi, edx
mov ebx, eax
lea eax, [ebp - 0x3c]
mov edx, 0x3c
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [ebp - 0x3c], 0x3c
mov dword [ebp - 0x38], 0x600
mov eax, ebx
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [ebp - 0x2c], eax
mov eax, esi
call sym.P_Interface.bpl__Jclsysutils_PCharOrNil_qqrx17System_AnsiString
mov dword [ebp - 0x28], eax
mov eax, edi
call sym.P_Interface.bpl__Jclsysutils_PCharOrNil_qqrx17System_AnsiString
mov dword [ebp - 0x30], eax
mov eax, dword [ebp + 8]
mov dword [ebp - 0x20], eax
lea eax, [ebp - 0x3c]
push eax
call sub.shell32.dll_ShellExecuteExA
cmp eax, 1
sbb eax, eax
inc eax
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 4

Function at 0x422138
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
push ebx
push esi
push edi
mov edi, ecx
mov esi, edx
mov ebx, eax
mov eax, dword [ebp + 8]
push eax
mov eax, dword [ebp + 0xc]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
mov eax, dword [ebp + 0x10]
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
mov eax, edi
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
mov eax, esi
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
push eax
push ebx
call sub.shell32.dll_ShellExecuteA
cmp eax, 0x20
seta al
pop edi
pop esi
pop ebx
pop ebp
ret 0xc
Function at 0x422180
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff9c
push ebx
push esi
push edi
mov dword [ebp - 8], ecx
mov dword [ebp - 4], edx
mov ebx, eax
lea esi, [ebp - 0x64]
lea edi, [ebp - 0x48]
mov eax, edi
mov edx, 0x3c
call sym.P_Interface.bpl__Jclsysutils_ResetMemory_qqrpvi
mov dword [edi], 0x3c
mov dword [edi + 4], 0x740
mov eax, ebx
call sub.rtl70.bpl__System__LStrToPChar_qqrx17System_AnsiString
mov dword [edi + 0x10], eax
mov eax, dword [ebp - 4]
call sym.P_Interface.bpl__Jclsysutils_PCharOrNil_qqrx17System_AnsiString
mov dword [edi + 0x14], eax
mov eax, dword [ebp - 8]
call sym.P_Interface.bpl__Jclsysutils_PCharOrNil_qqrx17System_AnsiString
mov dword [edi + 0xc], eax
mov eax, dword [ebp + 0xc]
mov dword [edi + 0x1c], eax
mov eax, dword [ebp + 8]
call sym.P_Interface.bpl__Jclsysutils_PCharOrNil_qqrx17System_AnsiString
mov dword [edi + 0x18], eax
push edi
call sub.shell32.dll_ShellExecuteExA
cmp eax, 1
sbb eax, eax
inc eax
mov byte [ebp - 9], al
cmp byte [ebp - 9], 0
je 0x422248
push 0xffffffffffffffff
mov eax, dword [edi + 0x38]
push eax
call sub.user32.dll_WaitForInputIdle
jmp 0x42222d
xor eax, eax
mov dword [esi], eax
push 1
push 0
push 0
mov eax, dword [edi + 8]
push eax
push esi
call sub.user32.dll_PeekMessageA
mov ebx, eax
test ebx, ebx
je 0x422229
push esi
call sub.user32.dll_TranslateMessage
push esi
call sub.user32.dll_DispatchMessageA
test ebx, ebx
jne 0x422203
push 0xa
mov eax, dword [edi + 0x38]
push eax
call sub.kernel32.dll_WaitForSingleObject
cmp eax, 0x102
je 0x422203
mov eax, dword [edi + 0x38]
push eax
call sub.kernel32.dll_CloseHandle
mov al, byte [ebp - 9]
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 8