joyce8/EMBER2024-capa huggingface dataset:
Function at 0x40f7cc
Capabilities:
Create thread

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov dword [ebp - 4], ecx
mov edi, edx
mov esi, eax
mov eax, 0x14
call sub.rtl120.bpl__System_AllocMem_qqrui
mov ebx, eax
mov eax, 0x40f858
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx], eax
mov eax, esi
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 4], eax
mov eax, edi
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 8], eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 0xc], eax
mov eax, dword [ebp + 8]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 0x10], eax
lea eax, [ebp - 8]
push eax
push 0
push ebx
push 0x40f688
push 0
push 0
call sub.kernel32.dll_CreateThread
push eax
call sub.kernel32.dll_CloseHandle
pop edi
pop esi
pop ebx
pop ecx
pop ecx
pop ebp
ret 4

Function at 0x40f86c
Capabilities:
Create thread

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov dword [ebp - 4], ecx
mov edi, edx
mov esi, eax
mov eax, 0x14
call sub.rtl120.bpl__System_AllocMem_qqrui
mov ebx, eax
mov eax, 0x40f8f8
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx], eax
mov eax, esi
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 4], eax
mov eax, edi
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 8], eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 0xc], eax
mov eax, dword [ebp + 8]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
call sub.rtl120.bpl__Sysutils_StrNew_qqrpxb
mov dword [ebx + 0x10], eax
lea eax, [ebp - 8]
push eax
push 0
push ebx
push 0x40f688
push 0
push 0
call sub.kernel32.dll_CreateThread
push eax
call sub.kernel32.dll_CloseHandle
pop edi
pop esi
pop ebx
pop ecx
pop ecx
pop ebp
ret 4
Function at 0x40fad4
Capabilities:
Terminate process

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffbc0
push ebx
push esi
push edi
xor edx, edx
mov dword [ebp - 4], edx
mov dword [ebp - 8], edx
mov edi, eax
xor eax, eax
push ebp
push 0x40fc2d
push dword fs:[eax]
mov dword fs:[eax], esp
xor ebx, ebx
xor eax, eax
mov dword [ebp - 0xc], eax
xor edx, edx
mov eax, 2
call fcn.0040a698
mov esi, eax
cmp esi, 0xffffffff
je 0x40fc12
mov dword [ebp - 0x238], 0x22c
lea edx, [ebp - 0x238]
mov eax, esi
call fcn.0040a6b8
test eax, eax
je 0x40fbf5
mov eax, dword [ebp - 0x230]
push eax
push 0
push 0x100411
call sub.kernel32.dll_OpenProcess
mov ebx, eax
test ebx, ebx
je 0x40fbe0
lea eax, [ebp - 4]
lea edx, [ebp - 0x214]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
lea eax, [ebp - 8]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
push 0x104
lea ecx, [ebp - 0x440]
xor edx, edx
mov eax, ebx
call fcn.0040ac18
test eax, eax
jbe 0x40fb9a
lea eax, [ebp - 8]
lea edx, [ebp - 0x440]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov edx, dword [ebp - 4]
mov eax, edi
call sub.rtl120.bpl__Sysutils_SameText_qqrx20System_UnicodeStringt1
test al, al
jne 0x40fbb6
mov edx, dword [ebp - 8]
mov eax, edi
call sub.rtl120.bpl__Sysutils_SameText_qqrx20System_UnicodeStringt1
test al, al
je 0x40fbda
inc dword [ebp - 0xc]
push 0
push ebx
call sub.kernel32.dll_TerminateProcess
test eax, eax
je 0x40fbe0
jmp 0x40fbce
push 0xa
call sub.kernel32.dll_Sleep_1
push 0
push ebx
call sub.kernel32.dll_WaitForSingleObject
test eax, eax
jne 0x40fbc7
push ebx
call sub.kernel32.dll_CloseHandle
lea edx, [ebp - 0x238]
mov eax, esi
call fcn.0040a6d8
test eax, eax
jne 0x40fb35
push esi
call sub.kernel32.dll_CloseHandle
cmp dword [ebp - 0xc], 0
je 0x40fc10
mov eax, edi
call fcn.0040f99c
test al, al
je 0x40fc10
xor ebx, ebx
jmp 0x40fc12
mov bl, 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x40fc34
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret
Function at 0x40fce4
Capabilities:
Get common file path
Get file version info

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffdd4
push ebx
push esi
push edi
xor eax, eax
mov dword [ebp - 0x228], eax
mov dword [ebp - 0x22c], eax
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x40fe39
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [sym.imp.rtl120.bpl__Sysutils_Win32MajorVersion]
imul eax, dword [eax], 0x2710
mov edx, dword [sym.imp.rtl120.bpl__Sysutils_Win32MinorVersion]
add eax, dword [edx]
mov dword [ebp - 8], eax
mov eax, dword [ebp - 8]
mov dword [ebp - 0xc], eax
push 0x104
lea eax, [ebp - 0x222]
push eax
call sub.kernel32.dll_GetSystemDirectoryW
lea eax, [ebp - 0x22c]
lea edx, [ebp - 0x222]
mov ecx, 0x105
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov eax, dword [ebp - 0x22c]
lea edx, [ebp - 0x228]
call sub.rtl120.bpl__Sysutils_IncludeTrailingPathDelimiter_qqrx20System_UnicodeString
mov edx, dword [ebp - 0x228]
lea eax, [ebp - 4]
mov ecx, 0x40fe58
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
xor eax, eax
push ebp
push 0x40fe00
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x14]
push eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov esi, eax
push esi
call sub.version.dll_GetFileVersionInfoSizeW
mov dword [ebp - 0x18], eax
cmp dword [ebp - 0x18], 0
jbe 0x40fdf6
mov eax, dword [ebp - 0x18]
call sub.rtl120.bpl__System__GetMem_qqri
mov ebx, eax
push ebx
mov eax, dword [ebp - 0x18]
push eax
push 0
push esi
call sub.version.dll_GetFileVersionInfoW
lea eax, [ebp - 0x18]
push eax
lea eax, [ebp - 0x10]
push eax
push 0x40fe74
push ebx
call sub.version.dll_VerQueryValueW
test eax, eax
je 0x40fdef
mov eax, dword [ebp - 0x10]
mov eax, dword [eax + 8]
call fcn.00402500
movzx eax, ax
imul eax, eax, 0x2710
mov edx, dword [ebp - 0x10]
movzx edx, word [edx + 8]
add eax, edx
mov dword [ebp - 0xc], eax
mov eax, ebx
call sub.rtl120.bpl__System__FreeMem_qqrpv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x40fe0a
mov eax, dword [ebp - 8]
cmp eax, dword [ebp - 0xc]
setb bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x40fe40
lea eax, [ebp - 0x22c]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x40fe78
Capabilities:
Check os version

Disassembly:
push ebx
add esp, 0xfffffee0
xor ebx, ebx
lea eax, [esp + 0xc]
mov edx, 0x114
call fcn.00402518
mov dword [esp + 0xc], 0x114
lea eax, [esp + 0xc]
push eax
call sub.kernel32.dll_GetVersionExW
test eax, eax
je 0x40feb0
cmp dword [esp + 0x10], 6
jae 0x40feb0
mov bl, 1
jmp 0x40fef2
push esp
push 8
call sub.kernel32.dll_GetCurrentProcess
push eax
call sub.advapi32.dll_OpenProcessToken
test eax, eax
je 0x40fef2
lea eax, [esp + 8]
push eax
push 4
lea eax, [esp + 0xc]
push eax
push 0x14
mov eax, dword [esp + 0x10]
push eax
call sub.advapi32.dll_GetTokenInformation
test eax, eax
je 0x40fef2
cmp dword [esp + 8], 4
jne 0x40fee9
mov ebx, dword [esp + 4]
mov eax, dword [esp]
push eax
call sub.kernel32.dll_CloseHandle
mov eax, ebx
add esp, 0x120
pop ebx
ret

Function at 0x4102f0
Capabilities:
Delete file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd8
push ebx
xor edx, edx
mov dword [ebp - 0x28], edx
mov dword [ebp - 4], edx
mov ebx, eax
xor eax, eax
push ebp
push 0x4103c8
push dword fs:[eax]
mov dword fs:[eax], esp
movzx eax, byte [0x4103d8]
push eax
lea eax, [ebp - 4]
push eax
mov ecx, 0x4103e8
mov edx, 0x4103f8
mov eax, ebx
call sub.rtl120.bpl__Sysutils_StringReplace_qqrx20System_UnicodeStringt1t149System__Set_t21Sysutils_Sysutils__15_iuc_0_iuc_1_
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov ebx, eax
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + ebx*2 - 2], 0x5c
jne 0x410367
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov edx, eax
lea eax, [ebp - 4]
mov ecx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
lea eax, [ebp - 0x22]
mov edx, 0x1e
call fcn.00402518
lea eax, [ebp - 0x28]
mov ecx, 0x410408
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 0x28]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [ebp - 0x1a], eax
mov dword [ebp - 0x1e], 3
mov word [ebp - 0x12], 0x614
lea eax, [ebp - 0x22]
push eax
call sub.shell32.dll_SHFileOperationW
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4103cf
lea eax, [ebp - 0x28]
call sub.rtl120.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x41040c
Capabilities:
Copy file
Move file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd0
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 0x30], ecx
mov dword [ebp - 0x2c], ecx
mov dword [ebp - 4], ecx
mov dword [ebp - 8], ecx
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x41056a
push dword fs:[eax]
mov dword fs:[eax], esp
movzx eax, byte [0x41057c]
push eax
lea eax, [ebp - 4]
push eax
mov ecx, 0x41058c
mov edx, 0x41059c
mov eax, ebx
call sub.rtl120.bpl__Sysutils_StringReplace_qqrx20System_UnicodeStringt1t149System__Set_t21Sysutils_Sysutils__15_iuc_0_iuc_1_
movzx eax, byte [0x41057c]
push eax
lea eax, [ebp - 8]
push eax
mov ecx, 0x41058c
mov edx, 0x41059c
mov eax, esi
call sub.rtl120.bpl__Sysutils_StringReplace_qqrx20System_UnicodeStringt1t149System__Set_t21Sysutils_Sysutils__15_iuc_0_iuc_1_
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov ebx, eax
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + ebx*2 - 2], 0x5c
jne 0x4104a9
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov edx, eax
lea eax, [ebp - 4]
mov ecx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov ebx, eax
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + ebx*2 - 2], 0x5c
jne 0x4104e4
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov edx, eax
lea eax, [ebp - 8]
mov ecx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
lea eax, [ebp - 0x26]
mov edx, 0x1e
call fcn.00402518
lea eax, [ebp - 0x2c]
mov ecx, 0x4105ac
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 0x2c]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [ebp - 0x1e], eax
lea eax, [ebp - 0x30]
mov ecx, 0x4105ac
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 0x30]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [ebp - 0x1a], eax
mov dword [ebp - 0x22], 1
mov word [ebp - 0x16], 0x614
lea eax, [ebp - 0x26]
push eax
call sub.shell32.dll_SHFileOperationW
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x410571
lea eax, [ebp - 0x30]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret
Function at 0x4105b0
Capabilities:
Copy file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffd0
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 0x30], ecx
mov dword [ebp - 0x2c], ecx
mov dword [ebp - 4], ecx
mov dword [ebp - 8], ecx
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x41070e
push dword fs:[eax]
mov dword fs:[eax], esp
movzx eax, byte [0x410720]
push eax
lea eax, [ebp - 4]
push eax
mov ecx, 0x410730
mov edx, 0x410740
mov eax, ebx
call sub.rtl120.bpl__Sysutils_StringReplace_qqrx20System_UnicodeStringt1t149System__Set_t21Sysutils_Sysutils__15_iuc_0_iuc_1_
movzx eax, byte [0x410720]
push eax
lea eax, [ebp - 8]
push eax
mov ecx, 0x410730
mov edx, 0x410740
mov eax, esi
call sub.rtl120.bpl__Sysutils_StringReplace_qqrx20System_UnicodeStringt1t149System__Set_t21Sysutils_Sysutils__15_iuc_0_iuc_1_
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov ebx, eax
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + ebx*2 - 2], 0x5c
jne 0x41064d
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov edx, eax
lea eax, [ebp - 4]
mov ecx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov ebx, eax
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
cmp word [eax + ebx*2 - 2], 0x5c
jne 0x410688
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__EnsureUnicodeString_qqrr20System_UnicodeString
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov edx, eax
lea eax, [ebp - 8]
mov ecx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
lea eax, [ebp - 0x26]
mov edx, 0x1e
call fcn.00402518
lea eax, [ebp - 0x2c]
mov ecx, 0x410750
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 0x2c]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [ebp - 0x1e], eax
lea eax, [ebp - 0x30]
mov ecx, 0x410750
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 0x30]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [ebp - 0x1a], eax
mov dword [ebp - 0x22], 4
mov word [ebp - 0x16], 0x614
lea eax, [ebp - 0x26]
push eax
call sub.shell32.dll_SHFileOperationW
test eax, eax
sete bl
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x410715
lea eax, [ebp - 0x30]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret
Function at 0x410dd8
Capabilities:
Check for time delay via gettickcount

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
push esi
push edi
mov dword [ebp - 4], eax
call sub.kernel32.dll_GetTickCount
mov dword [ebp - 8], eax
jmp 0x410e32
push 0
push 0xa
mov eax, dword [ebp - 4]
xor edx, edx
push edx
push eax
call sub.rtl120.bpl__Math_Min_qqrxjxj
push eax
call sub.kernel32.dll_Sleep_1
xor eax, eax
push ebp
push 0x410e28
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [sym.imp.vcl120.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl120.bpl__Forms_TApplication_ProcessMessages_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x410e32
call sub.kernel32.dll_GetTickCount
sub eax, dword [ebp - 8]
cmp eax, dword [ebp - 4]
jb 0x410dee
pop edi
pop esi
pop ebx
pop ecx
pop ecx
pop ebp
ret

Function at 0x4114ac
Capabilities:
Hide graphical window
Log keystrokes

Disassembly:
push ebx
push esi
push edi
mov ebx, eax
call sub.user32.dll_GetForegroundWindow
push 0
push eax
call sub.user32.dll_GetWindowThreadProcessId
mov esi, eax
call sub.kernel32.dll_GetCurrentThreadId
mov edi, eax
push 0xffffffffffffffff
push esi
push edi
call sub.user32.dll_AttachThreadInput
push 5
push ebx
call sub.user32.dll_ShowWindow
push 3
push 0
push 0
push 0
push 0
push 0xffffffffffffffff
push ebx
call sub.user32.dll_SetWindowPos
push 3
push 0
push 0
push 0
push 0
push 0xfffffffffffffffe
push ebx
call sub.user32.dll_SetWindowPos
push ebx
call sub.user32.dll_SetForegroundWindow
cmp eax, 1
sbb eax, eax
inc eax
mov ebx, eax
push 0
push esi
push edi
call sub.user32.dll_AttachThreadInput
mov eax, ebx
pop edi
pop esi
pop ebx
ret

Function at 0x412848
Capabilities:
Get memory capacity

Disassembly:
add esp, 0xffffffa0
push 0x4128b0
push 0x4128dc
call sub.kernel32.dll_GetModuleHandleW_1
push eax
call fcn.00401bd0
test eax, eax
je 0x412875
mov dword [esp + 0x20], 0x40
lea edx, [esp + 0x20]
push edx
call eax
jmp 0x412890
mov dword [esp], 0x20
push esp
call sub.kernel32.dll_GlobalMemoryStatus
mov eax, dword [esp + 0xc]
xor edx, edx
mov dword [esp + 0x30], eax
mov dword [esp + 0x34], edx
push 0
push 0x100000
mov eax, dword [esp + 0x38]
mov edx, dword [esp + 0x3c]
add eax, 0x80000
adc edx, 0
call sub.rtl120.bpl__System___lldiv_qqrv
add esp, 0x60
ret
Function at 0x413320
Capabilities:
Print debug messages
Terminate thread

Disassembly:
push ebp
mov ebp, esp
push 0
push 0
push 0
push ebx
push esi
push edi
xor edx, edx
push ebp
push 0x4133fe
push dword fs:[edx]
mov dword fs:[edx], esp
mov edx, dword [eax]
mov dword [ebp - 4], edx
xor edx, edx
mov dword [eax], edx
cmp dword [ebp - 4], 0
je 0x4133e3
mov eax, dword [ebp - 4]
cmp byte [eax + 0x10], 0
jne 0x4133a5
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Classes_TThread_Terminate_qqrv
push 0
mov eax, dword [ebp - 4]
mov eax, dword [eax + 4]
push eax
call sub.kernel32.dll_TerminateThread
cmp eax, 1
sbb eax, eax
inc eax
test al, al
jne 0x4133a5
call sub.kernel32.dll_GetLastError
xor edx, edx
push edx
push eax
lea eax, [ebp - 0xc]
call sub.rtl120.bpl__Sysutils_IntToStr_qqrj
mov ecx, dword [ebp - 0xc]
lea eax, [ebp - 8]
mov edx, 0x413418
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_OutputDebugStringW
xor edx, edx
push ebp
push 0x4133cd
push dword fs:[edx]
mov dword fs:[edx], esp
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Classes_TThread_WaitFor_qqrv
lea eax, [ebp - 4]
call sub.rtl120.bpl__Sysutils_FreeAndNil_qqrpv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x4133e3
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x413405
lea eax, [ebp - 0xc]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret
Function at 0x415b78
Capabilities:
Hash data with md5

Disassembly:
mov dword [eax], 0x67452301
mov dword [eax + 4], 0xefcdab89
mov dword [eax + 8], 0x98badcfe
mov dword [eax + 0xc], 0x10325476
xor edx, edx
mov dword [eax + 0x10], edx
xor edx, edx
mov dword [eax + 0x14], edx
add eax, 0x18
mov edx, 0x40
call fcn.00402518
ret

Function at 0x415dcc
Capabilities:
Get file size
Read file via mapping

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffff94
mov dword [ebp - 8], edx
mov dword [ebp - 4], eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrAddRef_qqrpv
xor eax, eax
push ebp
push 0x415f1a
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 0x6c]
call fcn.00415b78
push 0
push 0x8000080
push 3
push 0
push 3
push 0x80000000
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_CreateFileW
mov dword [ebp - 0xc], eax
cmp dword [ebp - 0xc], 0xffffffff
je 0x415ef9
xor eax, eax
push ebp
push 0x415ef2
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
push 0
push 0
push 2
push 0
mov eax, dword [ebp - 0xc]
push eax
call sub.kernel32.dll_CreateFileMappingW
mov dword [ebp - 0x10], eax
cmp dword [ebp - 0x10], 0
je 0x415edb
xor eax, eax
push ebp
push 0x415ed4
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
push 0
push 0
push 4
mov eax, dword [ebp - 0x10]
push eax
call sub.kernel32.dll_MapViewOfFile
mov dword [ebp - 0x14], eax
cmp dword [ebp - 0x14], 0
je 0x415ebd
xor eax, eax
push ebp
push 0x415eb6
push dword fs:[eax]
mov dword fs:[eax], esp
push 0
mov eax, dword [ebp - 0xc]
push eax
call sub.kernel32.dll_GetFileSize
mov ecx, eax
lea eax, [ebp - 0x6c]
mov edx, dword [ebp - 0x14]
call fcn.00415bac
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x415ebd
mov eax, dword [ebp - 0x14]
push eax
call sub.kernel32.dll_UnmapViewOfFile
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x415edb
mov eax, dword [ebp - 0x10]
push eax
call sub.kernel32.dll_CloseHandle
ret
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x415ef9
mov eax, dword [ebp - 0xc]
push eax
call sub.kernel32.dll_CloseHandle
ret
mov edx, dword [ebp - 8]
lea eax, [ebp - 0x6c]
call fcn.00415c30
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x415f21
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x417078
Capabilities:
Create thread

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff0
push ebx
push esi
push edi
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x41710b
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebx + 4]
mov edx, dword [ebx + 0xc]
add edx, 0x864
mov ecx, 0x33
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov eax, esi
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [ebp - 0x10], eax
mov eax, dword [ebx + 0xc]
mov dword [ebp - 0xc], eax
xor eax, eax
mov dword [ebp - 8], eax
lea eax, [ebp - 4]
push eax
push 0
lea eax, [ebp - 0x10]
push eax
push 0x417058
push 0
push 0
call sub.kernel32.dll_CreateThread
mov esi, eax
push 0xa
push esi
call sub.kernel32.dll_WaitForSingleObject
mov ebx, eax
cmp ebx, 0x102
jne 0x4170f8
mov eax, dword [sym.imp.vcl120.bpl__Forms_Application]
mov eax, dword [eax]
call sub.vcl120.bpl__Forms_TApplication_ProcessMessages_qqrv
jmp 0x4170d8
push esi
call sub.kernel32.dll_CloseHandle
mov ebx, dword [ebp - 8]
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x41711a
mov eax, ebx
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret