Function at 0x661020
Capabilities:
Get disk information

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffb70
push ebx
push esi
xor eax, eax
mov dword [ebp - 0x460], eax
mov dword [ebp - 0x45c], eax
mov dword [ebp - 0x458], eax
mov dword [ebp - 0x454], eax
mov ecx, 6
lea eax, [ebp - 0x18]
mov edx, dword [sym.imp.rtl120.bpl___xp_13System_string]
call sub.rtl120.bpl__System__InitializeArray_qqrpvt1ui
xor eax, eax
push ebp
push 0x6612e5
push dword fs:[eax]
mov dword fs:[eax], esp
mov esi, dword [0x78caf0]
mov eax, esi
mov edx, dword [eax]
call dword [edx + 0x44]
xor edx, edx
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
mov edx, 0x661300
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
xor edx, edx
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
push 0
push 0
call sub.kernel32.dll_GetLogicalDriveStringsW
mov ebx, eax
test ebx, ebx
jle 0x6612b4
mov eax, ebx
add eax, eax
call sub.rtl120.bpl__System_AllocMem_qqrui
mov dword [ebp - 0x1c], eax
mov eax, dword [ebp - 0x1c]
push eax
push ebx
call sub.kernel32.dll_GetLogicalDriveStringsW
mov ebx, eax
test ebx, ebx
jle 0x6612ac
mov ebx, dword [ebp - 0x1c]
push ebx
call sub.kernel32.dll_GetDriveTypeW
cmp eax, 3
jne 0x66129f
lea eax, [ebp - 0x450]
xor ecx, ecx
mov edx, 0x208
call sub.rtl120.bpl__System__FillChar_qqrpvib
lea eax, [ebp - 0x248]
xor ecx, ecx
mov edx, 0x208
call sub.rtl120.bpl__System__FillChar_qqrpvib
lea eax, [ebp - 0x18]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x14]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x10]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0xc]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 8]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 4]
xor edx, edx
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x18]
movzx edx, word [ebx]
call sub.rtl120.bpl__System__UStrFromWChar_qqrr20System_UnicodeStringb
push 0x104
lea eax, [ebp - 0x248]
push eax
lea eax, [ebp - 0x28]
push eax
lea eax, [ebp - 0x24]
push eax
lea eax, [ebp - 0x20]
push eax
push 0x104
lea eax, [ebp - 0x450]
push eax
push ebx
call sub.kernel32.dll_GetVolumeInformationW
test eax, eax
je 0x6611ba
lea eax, [ebp - 0x14]
lea edx, [ebp - 0x450]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
mov eax, dword [ebp - 0x20]
xor edx, edx
push edx
push eax
lea edx, [ebp - 0x454]
mov eax, 8
call sub.rtl120.bpl__Sysutils_IntToHex_qqrji
mov edx, dword [ebp - 0x454]
lea eax, [ebp - 0x10]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0xc]
lea edx, [ebp - 0x248]
mov ecx, 0x104
call sub.rtl120.bpl__System__UStrFromWArray_qqrr20System_UnicodeStringpbi
lea eax, [ebp - 0x40]
push eax
lea eax, [ebp - 0x38]
push eax
lea eax, [ebp - 0x30]
push eax
push ebx
mov eax, dword [sym.imp.rtl120.bpl__Sysutils_GetDiskFreeSpaceEx]
mov eax, dword [eax]
call eax
test eax, eax
je 0x661216
push dword [ebp - 0x3c]
push dword [ebp - 0x40]
lea edx, [ebp - 0x458]
mov al, 2
call fcn.0040a500
mov edx, dword [ebp - 0x458]
lea eax, [ebp - 8]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
push dword [ebp - 0x34]
push dword [ebp - 0x38]
lea edx, [ebp - 0x45c]
mov al, 2
call fcn.0040a500
mov edx, dword [ebp - 0x45c]
lea eax, [ebp - 4]
call sub.rtl120.bpl__System__UStrLAsg_qqrr20System_UnicodeStringx20System_UnicodeString
lea eax, [ebp - 0x460]
push eax
mov eax, dword [ebp - 0x18]
mov dword [ebp - 0x490], eax
mov byte [ebp - 0x48c], 0x11
mov eax, dword [ebp - 0x14]
mov dword [ebp - 0x488], eax
mov byte [ebp - 0x484], 0x11
mov eax, dword [ebp - 0x10]
mov dword [ebp - 0x480], eax
mov byte [ebp - 0x47c], 0x11
mov eax, dword [ebp - 0xc]
mov dword [ebp - 0x478], eax
mov byte [ebp - 0x474], 0x11
mov eax, dword [ebp - 8]
mov dword [ebp - 0x470], eax
mov byte [ebp - 0x46c], 0x11
mov eax, dword [ebp - 4]
mov dword [ebp - 0x468], eax
mov byte [ebp - 0x464], 0x11
lea edx, [ebp - 0x490]
mov ecx, 5
mov eax, 0x661334
call fcn.0040fdb0
mov edx, dword [ebp - 0x460]
mov eax, esi
mov ecx, dword [eax]
call dword [ecx + 0x38]
add ebx, 8
cmp word [ebx], 0
jne 0x6610c7
mov eax, dword [ebp - 0x1c]
call sub.rtl120.bpl__System__FreeMem_qqrpv
xor eax, eax
pop edx
pop ecx
pop ecx
mov dword fs:[eax], edx
push 0x6612ec
lea eax, [ebp - 0x460]
mov edx, 4
call sub.rtl120.bpl__System__UStrArrayClr_qqrpvi
lea eax, [ebp - 0x18]
mov ecx, 6
mov edx, dword [sym.imp.rtl120.bpl___xp_13System_string]
call sub.rtl120.bpl__System__FinalizeArray_qqrpvt1ui
ret