joyce8/EMBER2024-capa huggingface dataset:
Function at 0x50e81c
Capabilities:
Get session user name

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffff8
push ebx
xor edx, edx
mov dword [ebp - 4], edx
mov ebx, eax
xor eax, eax
push ebp
push 0x50e898
push dword fs:[eax]
mov dword fs:[eax], esp
mov dword [ebp - 8], 0xff
mov edx, dword [ebp - 8]
inc edx
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__WStrSetLength_qqrr17System_WideStringi
lea eax, [ebp - 8]
push eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__WStrToPWChar_qqrx17System_WideString
push eax
call sub.advapi32.dll_GetUserNameW
test eax, eax
je 0x50e879
mov edx, dword [ebp - 8]
dec edx
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__WStrSetLength_qqrr17System_WideStringi
mov eax, ebx
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrFromWStr_qqrr20System_UnicodeStringx17System_WideString
jmp 0x50e882
mov eax, ebx
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x50e89f
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__WStrClr_qqrpv
ret
Function at 0x50edc4
Capabilities:
Get common file path

Disassembly:
push ebx
add esp, 0xfffffe00
mov ebx, eax
push 0xff
lea eax, [esp + 4]
push eax
call sub.kernel32.dll_GetSystemDirectoryW
mov eax, ebx
mov edx, esp
mov ecx, pe_nt_image_headers32
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
add esp, 0x200
pop ebx
ret

Function at 0x50edf4
Capabilities:
Get common file path

Disassembly:
push ebx
add esp, 0xfffffe00
mov ebx, eax
push esp
push 0xff
call sub.kernel32.dll_GetTempPathW
mov eax, ebx
mov edx, esp
mov ecx, pe_nt_image_headers32
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
add esp, 0x200
pop ebx
ret
Function at 0x511ad8
Capabilities:
Query or enumerate registry value

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffe0
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x18], ebx
mov dword [ebp - 0x1c], ebx
mov dword [ebp - 0x20], ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 0xc], ecx
mov dword [ebp - 8], edx
mov ebx, eax
mov esi, dword [ebp + 8]
mov edi, dword [ebp + 0xc]
xor eax, eax
push ebp
push 0x511c09
push dword fs:[eax]
mov dword fs:[eax], esp
movzx eax, byte [edi]
call fcn.00510e7c
mov dword [ebp - 0x10], eax
mov eax, esi
xor edx, edx
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [ebx + 0x1c]
test eax, eax
jne 0x511b2e
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x14], eax
jmp 0x511b31
mov dword [ebp - 0x14], eax
mov eax, dword [ebp - 0x14]
push eax
lea eax, [ebp - 4]
mov ecx, 1
mov edx, dword [0x511aa4]
call sub.rtl120.bpl__System__DynArraySetLength_qqrv
add esp, 4
mov eax, dword [ebp - 4]
mov edx, dword [ebp - 0x14]
call fcn.00402518
lea eax, [ebp - 0x14]
push eax
mov eax, dword [ebp - 4]
push eax
lea eax, [ebp - 0x10]
push eax
push 0
mov eax, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [ebx + 4]
push eax
call sub.advapi32.dll_RegQueryValueExW
mov ebx, eax
test ebx, ebx
jne 0x511b86
mov eax, esi
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrFromPWChar_qqrr20System_UnicodeStringpb
mov eax, dword [esi]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
cmp eax, 0x802
jle 0x511bd6
push 0x511c28
lea edx, [ebp - 0x1c]
mov eax, ebx
call sub.rtl120.bpl__Sysutils_IntToStr_qqri
push dword [ebp - 0x1c]
push 0x511c68
mov eax, dword [esi]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
lea edx, [ebp - 0x20]
call sub.rtl120.bpl__Sysutils_IntToStr_qqri
push dword [ebp - 0x20]
lea eax, [ebp - 0x18]
mov edx, 4
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp - 0x18]
xor ecx, ecx
mov dl, 1
call fcn.00510dcc
mov eax, dword [ebp - 0x10]
call fcn.00510eac
mov byte [edi], al
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x511c10
lea eax, [ebp - 0x20]
mov edx, 3
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
mov edx, dword [0x511aa4]
call sub.rtl120.bpl__System__DynArrayClear_qqrrpvpv
ret
Function at 0x515408
Capabilities:
Get system information on windows

Disassembly:
push ebx
add esp, 0xffffff98
mov ebx, eax
lea eax, [esp + 0x28]
mov edx, 0x40
call fcn.00402518
mov dword [esp + 0x28], 0x40
lea eax, [esp + 0x28]
push eax
call fcn.00515544
mov eax, dword [esp + 0x2c]
mov dword [ebx + 0x30], eax
mov eax, dword [esp + 0x30]
mov dword [ebx + 0x38], eax
mov eax, dword [esp + 0x34]
mov dword [ebx + 0x3c], eax
mov eax, dword [esp + 0x38]
mov dword [ebx + 0x20], eax
mov eax, dword [esp + 0x3c]
mov dword [ebx + 0x24], eax
mov eax, dword [esp + 0x50]
mov dword [ebx + 8], eax
mov eax, dword [esp + 0x54]
mov dword [ebx + 0xc], eax
mov eax, dword [esp + 0x58]
mov dword [ebx + 0x18], eax
mov eax, dword [esp + 0x5c]
mov dword [ebx + 0x1c], eax
mov eax, dword [esp + 0x40]
mov dword [ebx + 0x40], eax
mov eax, dword [esp + 0x44]
mov dword [ebx + 0x44], eax
mov eax, dword [esp + 0x48]
mov dword [ebx + 0x10], eax
mov eax, dword [esp + 0x4c]
mov dword [ebx + 0x14], eax
mov eax, esp
mov edx, 0x24
call fcn.00402518
push esp
call sub.kernel32.dll_GetSystemInfo
mov eax, dword [esp + 0x1c]
mov dword [ebx + 0x28], eax
mov eax, dword [esp + 0xc]
mov dword [ebx + 4], eax
mov eax, dword [esp + 8]
mov dword [ebx + 0x2c], eax
mov eax, dword [esp + 4]
mov dword [ebx + 0x48], eax
add esp, 0x68
pop ebx
ret
Function at 0x521d30
Capabilities:
Delete file

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffe4
push ebx
push esi
push edi
xor ecx, ecx
mov dword [ebp - 0x1c], ecx
mov dword [ebp - 0x14], ecx
mov dword [ebp - 0x18], ecx
mov ebx, edx
mov dword [ebp - 4], eax
xor eax, eax
push ebp
push 0x521eb1
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 5], 0
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x521d75
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_DeleteFileW
call sub.rtl120.bpl__Sysutils_TEncoding_GetUnicode_qqrv
push eax
mov ecx, dword [ebp - 4]
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Inifiles_TMemIniFile_]
call sub.rtl120.bpl__Inifiles_TMemIniFile__bctr_qqrx20System_UnicodeStringp18Sysutils_TEncoding
mov dword [ebp - 0xc], eax
xor edx, edx
push ebp
push 0x521e8f
push dword fs:[edx]
mov dword fs:[edx], esp
mov eax, dword [ebx]
push eax
mov ecx, 0x521ed0
mov edx, 0x521eec
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 4]
mov eax, dword [ebx + 4]
push eax
mov edx, 0x521eec
mov ecx, 0x521f10
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 4]
mov eax, dword [ebx + 8]
push eax
mov edx, 0x521eec
mov ecx, 0x521f28
mov eax, dword [ebp - 0xc]
mov esi, dword [eax]
call dword [esi + 4]
mov eax, dword [ebx + 0xc]
test eax, eax
je 0x521e31
mov dx, 0x7c
call sub.rtl120.bpl__Classes_TStrings_SetNameValueSeparator_qqrxb
mov eax, dword [ebx + 0xc]
mov edx, dword [eax]
call dword [edx + 0x14]
dec eax
test eax, eax
jl 0x521e31
inc eax
mov dword [ebp - 0x10], eax
xor esi, esi
lea ecx, [ebp - 0x14]
mov eax, dword [ebx + 0xc]
mov edx, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov eax, dword [ebp - 0x14]
push eax
lea edx, [ebp - 0x18]
lea eax, [esi + 1]
call sub.rtl120.bpl__Sysutils_IntToStr_qqri
mov ecx, dword [ebp - 0x18]
mov edx, 0x521f4c
mov eax, dword [ebp - 0xc]
mov edi, dword [eax]
call dword [edi + 4]
inc esi
dec dword [ebp - 0x10]
jne 0x521dff
xor eax, eax
push ebp
push 0x521e6f
push dword fs:[eax]
mov dword fs:[eax], esp
lea edx, [ebp - 0x1c]
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_ExtractFilePath_qqrx20System_UnicodeString
mov eax, dword [ebp - 0x1c]
call sub.rtl120.bpl__Sysutils_ForceDirectories_qqr20System_UnicodeString
mov eax, dword [ebp - 0xc]
mov edx, dword [eax]
call dword [edx + 0x58]
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
mov byte [ebp - 5], al
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x521e79
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x521e96
mov eax, dword [ebp - 0xc]
call sub.rtl120.bpl__System_TObject_Free_qqrv
ret
Function at 0x521f58
Capabilities:
Create process on windows

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffb8
push ebx
push esi
push edi
xor ecx, ecx
mov dword [ebp - 0x48], ecx
mov dword [ebp - 4], ecx
mov esi, edx
mov ebx, eax
lea edi, [ebp - 0x44]
xor eax, eax
push ebp
push 0x522041
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, ebx
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x522023
mov eax, esi
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x522023
lea ecx, [ebp - 0x48]
mov dx, 0x22
mov eax, esi
call sub.rtl120.bpl__Sysutils_AnsiQuotedStr_qqrx20System_UnicodeStringb
mov ecx, dword [ebp - 0x48]
lea eax, [ebp - 4]
mov edx, 0x522060
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, edi
mov edx, 0x3c
call fcn.00402518
mov dword [edi], 0x3c
xor eax, eax
mov dword [edi + 8], eax
mov eax, 0x522074
mov dword [edi + 0xc], eax
mov eax, ebx
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [edi + 0x10], eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
mov dword [edi + 0x14], eax
mov dword [edi + 0x1c], 1
mov dword [edi + 4], 0x40
push edi
call sub.shell32.dll_ShellExecuteExW
push 0xffffffffffffffff
mov eax, dword [edi + 0x38]
push eax
call sub.kernel32.dll_WaitForSingleObject
lea eax, [ebp - 8]
push eax
mov eax, dword [edi + 0x38]
push eax
call sub.kernel32.dll_GetExitCodeProcess
mov eax, dword [edi + 0x38]
push eax
call sub.kernel32.dll_CloseHandle
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x522048
lea eax, [ebp - 0x48]
call sub.rtl120.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x522078
Capabilities:
Delete file
Get common file path

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffdec
push ebx
push esi
xor ecx, ecx
mov dword [ebp - 0x214], ecx
mov dword [ebp - 4], ecx
mov esi, edx
mov ebx, eax
xor eax, eax
push ebp
push 0x52215e
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, ebx
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
jne 0x5220b5
mov ebx, 0x3ed
jmp 0x52213d
lea eax, [ebp - 0x20e]
push eax
push 0x104
call sub.kernel32.dll_GetTempPathW
lea eax, [ebp - 0x214]
lea edx, [ebp - 0x20e]
mov ecx, 0x105
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov edx, dword [ebp - 0x214]
lea eax, [ebp - 4]
mov ecx, 0x52217c
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x522109
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_DeleteFileW
mov edx, esi
mov eax, dword [ebp - 4]
call fcn.00521d30
test al, al
je 0x522138
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__Sysutils_FileExists_qqrx20System_UnicodeString
test al, al
je 0x522131
mov edx, dword [ebp - 4]
mov eax, ebx
call fcn.00521f58
mov ebx, eax
jmp 0x52213d
mov ebx, 0x3e8
jmp 0x52213d
mov ebx, 0x3e8
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x522165
lea eax, [ebp - 0x214]
call sub.rtl120.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x52234c
Capabilities:
Enumerate files on windows
Enumerate files recursively

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffd94
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x268], ebx
mov dword [ebp - 0x26c], ebx
mov dword [ebp - 0x260], ebx
mov dword [ebp - 0x264], ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 8], ebx
mov ebx, ecx
mov esi, edx
mov dword [ebp - 0xc], eax
mov edi, dword [ebp + 8]
xor eax, eax
push ebp
push 0x5224d0
push dword fs:[eax]
mov dword fs:[eax], esp
lea edx, [ebp - 8]
mov eax, esi
call sub.rtl120.bpl__Sysutils_IncludeTrailingPathDelimiter_qqrx20System_UnicodeString
lea eax, [ebp - 4]
mov ecx, 0x5224ec
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
lea eax, [ebp - 0x25c]
push eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_FindFirstFileW
mov esi, eax
cmp esi, 0xffffffff
je 0x52249f
cmp word [ebp - 0x230], 0x2e
jne 0x5223e2
cmp word [ebp - 0x22e], 0
je 0x52248a
cmp word [ebp - 0x22e], 0x2e
jne 0x5223fa
cmp word [ebp - 0x22c], 0
je 0x52248a
test dword [ebp - 0x25c], edi
je 0x52243c
lea eax, [ebp - 0x264]
lea edx, [ebp - 0x230]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov ecx, dword [ebp - 0x264]
lea eax, [ebp - 0x260]
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x260]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test byte [ebp - 0x25c], 0x10
setne al
test al, bl
je 0x52248a
mov eax, dword [ebp + 0xc]
push eax
push edi
lea eax, [ebp - 0x26c]
lea edx, [ebp - 0x230]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov ecx, dword [ebp - 0x26c]
lea eax, [ebp - 0x268]
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x268]
mov eax, dword [ebp - 0xc]
mov ecx, ebx
call fcn.0052234c
pop ecx
lea eax, [ebp - 0x25c]
push eax
push esi
call sub.kernel32.dll_FindNextFileW
test eax, eax
jne 0x5223ca
push esi
call sub.kernel32.dll_FindClose
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5224d7
lea eax, [ebp - 0x26c]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret
Function at 0x5224f0
Capabilities:
Enumerate files on windows
Enumerate files recursively

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffd88
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x278], ebx
mov dword [ebp - 0x270], ebx
mov dword [ebp - 0x274], ebx
mov dword [ebp - 0x268], ebx
mov dword [ebp - 0x26c], ebx
mov dword [ebp - 4], ebx
mov dword [ebp - 8], ebx
mov dword [ebp - 0x10], ecx
mov ebx, edx
mov dword [ebp - 0xc], eax
lea edi, [ebp - 0x264]
xor eax, eax
push ebp
push 0x5226ad
push dword fs:[eax]
mov dword fs:[eax], esp
lea edx, [ebp - 8]
mov eax, ebx
call sub.rtl120.bpl__Sysutils_IncludeTrailingPathDelimiter_qqrx20System_UnicodeString
lea eax, [ebp - 4]
mov ecx, 0x5226c8
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov dl, 1
mov eax, dword [sym.imp.rtl120.bpl__Classes_TStringList_]
call sub.rtl120.bpl__Classes_TStringList__bctr_qqrv
mov esi, eax
push edi
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
call sub.kernel32.dll_FindFirstFileW
mov ebx, eax
cmp ebx, 0xffffffff
je 0x522633
cmp word [edi + 0x2c], 0x2e
jne 0x522592
cmp word [edi + 0x2e], 0
je 0x522624
cmp word [edi + 0x2e], 0x2e
jne 0x5225a4
cmp word [edi + 0x30], 0
je 0x522624
mov eax, dword [ebp - 0x10]
and eax, dword [edi]
je 0x5225e2
lea eax, [ebp - 0x26c]
lea edx, [edi + 0x2c]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov ecx, dword [ebp - 0x26c]
lea eax, [ebp - 0x268]
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x268]
mov eax, dword [ebp - 0xc]
mov eax, dword [eax]
mov ecx, dword [eax]
call dword [ecx + 0x38]
test byte [edi], 0x10
je 0x522624
mov eax, dword [ebp + 8]
cmp byte [eax + 0x10], 0
je 0x522624
lea eax, [ebp - 0x274]
lea edx, [edi + 0x2c]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov ecx, dword [ebp - 0x274]
lea eax, [ebp - 0x270]
mov edx, dword [ebp - 8]
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
mov edx, dword [ebp - 0x270]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
push edi
push ebx
call sub.kernel32.dll_FindNextFileW
test eax, eax
jne 0x522580
push ebx
call sub.kernel32.dll_FindClose
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x14]
mov ebx, eax
dec ebx
test ebx, ebx
jl 0x52267b
inc ebx
mov dword [ebp - 0x14], 0
mov eax, dword [ebp + 8]
push eax
lea ecx, [ebp - 0x278]
mov edx, dword [ebp - 0x14]
mov eax, esi
mov edi, dword [eax]
call dword [edi + 0xc]
mov edx, dword [ebp - 0x278]
mov eax, dword [ebp - 0xc]
mov ecx, dword [ebp - 0x10]
call fcn.005224f0
pop ecx
inc dword [ebp - 0x14]
dec ebx
jne 0x52264f
mov eax, esi
call sub.rtl120.bpl__System_TObject_Free_qqrv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x5226b4
lea eax, [ebp - 0x278]
mov edx, 5
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 8]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
ret
Function at 0x52b098
Capabilities:
Check for time delay via gettickcount

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffdc
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x24], ebx
mov dword [ebp - 4], ebx
mov edi, ecx
mov dword [ebp - 8], eax
mov ebx, dword [ebp + 0xc]
mov esi, dword [ebp + 0x14]
xor eax, eax
push ebp
push 0x52b2b8
push dword fs:[eax]
mov dword fs:[eax], esp
xor eax, eax
mov dword [ebp - 0xc], eax
xor eax, eax
mov dword [ebx], eax
xor eax, eax
push ebp
push 0x52b22d
push dword fs:[eax]
mov dword fs:[eax], esp
mov eax, dword [0x806c5c]
cmp dword [eax], 0
jne 0x52b0f7
mov dword [ebp - 0xc], 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x52b29a
push edi
push 0x52b2d8
push dword [ebp + 0x18]
lea eax, [ebp - 4]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
test esi, esi
je 0x52b127
push dword [ebp - 4]
push 0x52b2d8
push esi
lea eax, [ebp - 4]
mov edx, 3
call sub.rtl120.bpl__System__UStrCatN_qqrv
mov eax, dword [ebp + 0x10]
mov esi, dword [eax + 0x4c]
mov eax, esi
and eax, 0x10000000
cmp eax, 0x10000000
jne 0x52b14b
lea eax, [ebp - 4]
mov ecx, dword [ebp - 4]
mov edx, 0x52b2e8
call sub.rtl120.bpl__System__UStrCat3_qqrr20System_UnicodeStringx20System_UnicodeStringt2
test esi, 0x800000
jle 0x52b17d
lea eax, [ebp - 0x10]
push eax
push ebx
mov eax, dword [ebp + 0x10]
mov eax, dword [eax + 0x84]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [0x806944]
mov eax, dword [eax]
call eax
mov esi, eax
jmp 0x52b196
lea eax, [ebp - 0x10]
push eax
push ebx
mov eax, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrToPWChar_qqrx20System_UnicodeString
push eax
mov eax, dword [0x806c5c]
mov eax, dword [eax]
call eax
mov esi, eax
test esi, esi
jne 0x52b1af
call sub.kernel32.dll_GetLastError
mov dword [ebp - 0xc], eax
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x52b29a
call sub.kernel32.dll_GetTickCount
mov edi, eax
cmp dword [ebp - 0x10], 0xffffffff
je 0x52b223
push 0xa
push esi
call sub.kernel32.dll_WaitForSingleObject
mov ebx, eax
cmp ebx, 0x102
jne 0x52b223
push 0x40690000
push 0
push 0x3f847ae1
push 0x47ae147b
xor ecx, ecx
mov edx, dword [0x8391dc]
mov eax, dword [0x8391d4]
call fcn.00411744
cdq
mov dword [0x8391c4], eax
mov dword [0x8391c8], edx
push 0
push 0
or ecx, 0xffffffff
mov edx, dword [ebp + 0x10]
mov eax, dword [ebp - 8]
call fcn.0052b334
call sub.kernel32.dll_GetTickCount
sub eax, edi
cmp eax, dword [ebp + 8]
jb 0x52b1b6
mov dword [ebp - 0xc], 0x5b4
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x52b29a
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x52b2bf
lea eax, [ebp - 0x24]
call sub.rtl120.bpl__System__UStrClr_qqrpv
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret
Function at 0x52bc3c
Capabilities:
Access peb ldr_data

Disassembly:
push ebp
mov ebp, esp
add esp, 0xffffffe8
push ebx
push esi
push edi
xor edx, edx
mov dword [ebp - 0x18], edx
mov dword [ebp - 0x14], edx
mov dword [ebp - 4], edx
mov esi, eax
xor eax, eax
push ebp
push 0x52bd6c
push dword fs:[eax]
mov dword fs:[eax], esp
xor ebx, ebx
test esi, esi
je 0x52bd49
lea eax, [ebp - 4]
mov edx, 0x52bd88
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
xor eax, eax
push ebp
push 0x52bd3d
push dword fs:[eax]
mov dword fs:[eax], esp
lea eax, [ebp - 4]
mov edx, dword [esi]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 4]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 8]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 0xc]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 0x10]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 0x1c]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 0x30]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 0x34]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
mov edx, dword [esi + 0x40]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [esi + 0x14]
mov dword [ebp - 0x10], eax
mov eax, dword [esi + 0x18]
mov dword [ebp - 0xc], eax
push dword [ebp - 0xc]
push dword [ebp - 0x10]
lea eax, [ebp - 0x14]
call sub.rtl120.bpl__Sysutils_DateTimeToStr_qqrx16System_TDateTime
mov edx, dword [ebp - 0x14]
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [esi + 0x20]
mov dword [ebp - 0x10], eax
mov eax, dword [esi + 0x24]
mov dword [ebp - 0xc], eax
push dword [ebp - 0xc]
push dword [ebp - 0x10]
lea eax, [ebp - 0x18]
call sub.rtl120.bpl__Sysutils_DateTimeToStr_qqrx16System_TDateTime
mov edx, dword [ebp - 0x18]
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrCat_qqrr20System_UnicodeStringx20System_UnicodeString
mov bl, 1
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
jmp 0x52bd49
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x52bd73
lea eax, [ebp - 0x18]
mov edx, 2
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret