Function at 0x4271b8
Capabilities:
Enumerate pe sections

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffde0
push ebx
push esi
push edi
xor ebx, ebx
mov dword [ebp - 0x220], ebx
mov dword [ebp - 4], ebx
mov esi, edx
mov dword [ebp - 8], eax
xor eax, eax
push ebp
push 0x4274ca
push dword fs:[eax]
mov dword fs:[eax], esp
mov byte [ebp - 9], 0
mov dword [esi], 0xffffffff
mov eax, dword [0x5a916c]
dec eax
test eax, eax
jl 0x427220
inc eax
xor ebx, ebx
mov edx, ebx
add edx, edx
add edx, edx
add edx, edx
sub edx, ebx
mov ecx, dword [0x5a9170]
mov edx, dword [ecx + edx*4]
cmp edx, dword [ebp - 8]
jne 0x42721c
mov byte [ebp - 9], 1
mov dword [esi], ebx
jmp 0x4274a9
inc ebx
dec eax
jne 0x4271f9
call sub.kernel32.dll_GetVersion
test eax, 0x80000000
jne 0x42725f
push 0x104
lea eax, [ebp - 0x21a]
push eax
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_GetModuleFileNameW
test eax, eax
setne bl
test bl, bl
je 0x4272a1
lea eax, [ebp - 4]
lea edx, [ebp - 0x21a]
mov ecx, 0x105
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
jmp 0x4272a1
push 0x104
lea eax, [ebp - 0x21a]
push eax
mov eax, dword [ebp - 8]
push eax
call sub.kernel32.dll_GetModuleFileNameA
test eax, eax
setne bl
test bl, bl
je 0x4272a1
lea eax, [ebp - 0x220]
lea edx, [ebp - 0x21a]
mov ecx, 0
call sub.rtl120.bpl__System__LStrFromPChar_qqrr27System__AnsiStringT_us_i0__pcus
mov edx, dword [ebp - 0x220]
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrFromLStr_qqrr20System_UnicodeStringx27System__AnsiStringT_us_i0__
test bl, bl
je 0x4274a9
mov eax, dword [ebp - 8]
call fcn.0041233c
mov dword [ebp - 0x10], eax
cmp dword [ebp - 0x10], 0
je 0x4274a9
mov byte [ebp - 9], 1
mov eax, dword [0x5a9170]
call sub.rtl120.bpl__System__DynArrayLength_qqrv
cmp eax, dword [0x5a916c]
jne 0x427319
cmp dword [0x5a916c], 0
jne 0x4272f9
push 0x10
mov eax, 0x5a9170
mov ecx, 1
mov edx, dword [0x427148]
call sub.rtl120.bpl__System__DynArraySetLength_qqrv
add esp, 4
jmp 0x427319
mov eax, dword [0x5a916c]
add eax, eax
push eax
mov eax, 0x5a9170
mov ecx, 1
mov edx, dword [0x427148]
call sub.rtl120.bpl__System__DynArraySetLength_qqrv
add esp, 4
mov eax, dword [0x5a916c]
mov dword [esi], eax
inc dword [0x5a916c]
mov eax, dword [esi]
mov edx, eax
add eax, eax
add eax, eax
add eax, eax
sub eax, edx
mov edx, dword [0x5a9170]
lea eax, [edx + eax*4]
mov esi, eax
mov eax, dword [ebp - 8]
mov dword [esi], eax
lea eax, [esi + 4]
mov edx, dword [ebp - 4]
call sub.rtl120.bpl__System__UStrAsg_qqrr20System_UnicodeStringx20System_UnicodeString
mov eax, dword [esi + 4]
call sub.rtl120.bpl__System__UStrLen_qqrx20System_UnicodeString
mov ebx, eax
cmp ebx, 1
jl 0x42737d
mov eax, dword [esi + 4]
cmp word [eax + ebx*2 - 2], 0x5c
jne 0x427378
lea eax, [esi + 4]
mov ecx, ebx
mov edx, 1
call sub.rtl120.bpl__System__UStrDelete_qqrr20System_UnicodeStringii
jmp 0x42737d
dec ebx
test ebx, ebx
jne 0x42735c
mov eax, dword [ebp - 0x10]
movzx eax, word [eax + 0x18]
cmp ax, 0x20b
jne 0x42739a
mov ecx, dword [ebp - 0x10]
add ecx, 0x18
add ecx, 0xf0
mov edx, ecx
jmp 0x4273a8
mov ecx, dword [ebp - 0x10]
add ecx, 0x18
add ecx, 0xe0
mov edx, ecx
test byte [edx + 0x24], 0x20
je 0x4273d2
mov eax, dword [esi]
add eax, dword [edx + 0xc]
mov dword [esi + 8], eax
add eax, dword [edx + 8]
mov dword [esi + 0xc], eax
add edx, 0x28
test byte [edx + 0x24], 0x20
je 0x42740b
mov eax, dword [esi]
add eax, dword [edx + 0xc]
add eax, dword [edx + 8]
mov dword [esi + 0xc], eax
jmp 0x42740b
cmp ax, 0x20b
jne 0x4273f7
mov eax, dword [esi]
mov edx, dword [ebp - 0x10]
add edx, 0x18
add eax, dword [edx + 0x14]
mov dword [esi + 8], eax
mov eax, dword [esi + 8]
mov edx, dword [ebp - 0x10]
add edx, 0x18
add eax, dword [edx + 4]
mov dword [esi + 0xc], eax
jmp 0x42740b
mov eax, dword [esi]
mov edx, dword [ebp - 0x10]
add eax, dword [edx + 0x2c]
mov dword [esi + 8], eax
mov edx, dword [ebp - 0x10]
add eax, dword [edx + 0x1c]
mov dword [esi + 0xc], eax
mov eax, dword [ebp - 0x10]
cmp word [eax + 0x18], 0x20b
jne 0x427470
mov eax, dword [esi + 0xc]
mov dword [esi + 0x10], eax
mov eax, dword [ebp - 0x10]
add eax, 0x108
mov edx, eax
mov eax, dword [ebp - 0x10]
movzx eax, word [eax + 6]
dec eax
test eax, eax
jl 0x427456
inc eax
mov edi, dword [edx + 0x24]
test edi, 0x40
jne 0x427446
test edi, 0x80
je 0x427450
mov eax, dword [esi]
add eax, dword [edx + 0xc]
mov dword [esi + 0x10], eax
jmp 0x427456
add edx, 0x28
dec eax
jne 0x427433
mov eax, dword [esi + 0x10]
mov edx, dword [ebp - 0x10]
add edx, 0x18
add eax, dword [edx + 8]
mov edx, dword [ebp - 0x10]
add edx, 0x18
add eax, dword [edx + 0xc]
mov dword [esi + 0x14], eax
jmp 0x42748a
mov eax, dword [esi]
mov edx, dword [ebp - 0x10]
add eax, dword [edx + 0x30]
mov dword [esi + 0x10], eax
mov edx, dword [ebp - 0x10]
add eax, dword [edx + 0x20]
mov edx, dword [ebp - 0x10]
add eax, dword [edx + 0x24]
mov dword [esi + 0x14], eax
mov eax, dword [ebp - 8]
call fcn.004202f8
mov ebx, eax
mov dword [esi + 0x18], ebx
cmp byte [ebx + 0x3c], 0
jne 0x4274a9
mov eax, ebx
call sub.rtl120.bpl__System_TObject_Free_qqrv
xor eax, eax
mov dword [esi + 0x18], eax
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x4274d1
lea eax, [ebp - 0x220]
call sub.rtl120.bpl__System__LStrClr_qqrpv
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrClr_qqrpv
ret