Function at 0x40f780
Capabilities:
Get hostname

Disassembly:
push ebp
mov ebp, esp
add esp, 0xfffffe6c
push ebx
push esi
push edi
mov dword [ebp - 0x84], ecx
mov dword [ebp - 8], edx
mov dword [ebp - 0x80], eax
mov eax, 0x5a35a8
call fcn.0057c5c8
mov dword [ebp - 0x60], 3
lea edx, [ebp - 8]
lea eax, [ebp - 8]
call fcn.0058f864
inc dword [ebp - 0x60]
mov word [ebp - 0x6c], 8
lea edx, [ebp + 0xc]
lea eax, [ebp + 0xc]
call fcn.0058f864
inc dword [ebp - 0x60]
lea edx, [ebp + 8]
lea eax, [ebp + 8]
call fcn.0058f864
inc dword [ebp - 0x60]
mov byte [ebp - 0x85], 1
cmp dword [0x5eadf8], 2
jle 0x40f810
push 0x30
mov ecx, 0x5a2fab
mov edx, 0x5a2f8a
mov eax, dword [sym.imp.vcl60.bpl__Forms_Application]
mov eax, dword [eax]
call fcn.0058f760
mov byte [ebp - 0x85], 0
mov eax, dword [ebp - 0x80]
call sub.vcl60.bpl__Forms_TCustomForm_Close_qqrv
mov word [ebp - 0x6c], 0x14
lea eax, [ebp - 0xc]
call fcn.004025f4
inc dword [ebp - 0x60]
mov word [ebp - 0x6c], 8
mov word [ebp - 0x6c], 0x20
lea edx, [ebp - 8]
lea eax, [ebp - 0x10]
call fcn.0058f864
inc dword [ebp - 0x60]
mov word [ebp - 0x6c], 8
mov edx, dword [ebp - 0x84]
mov dword [ebp - 0x8c], edx
mov word [ebp - 0x6c], 0x2c
lea edx, [ebp + 0xc]
lea eax, [ebp - 0x14]
call fcn.0058f864
inc dword [ebp - 0x60]
mov word [ebp - 0x6c], 8
mov word [ebp - 0x6c], 0x38
lea edx, [ebp + 8]
lea eax, [ebp - 0x18]
call fcn.0058f864
inc dword [ebp - 0x60]
mov word [ebp - 0x6c], 8
mov word [ebp - 0x6c], 0x44
mov dword [ebp - 0x90], 0xff
lea ecx, [ebp - 0x90]
push ecx
lea eax, [ebp - 0x194]
push eax
call sub.kernel32.dll_GetComputerNameA
mov word [ebp - 0x6c], 0x5c
lea edx, [ebp - 0x194]
lea eax, [ebp - 0x1c]
call fcn.0058f82c
inc dword [ebp - 0x60]
mov word [ebp - 0x6c], 0x50
mov edx, dword [sym.SDERPServer.exe__DMServer]
mov ecx, dword [edx]
mov eax, dword [ecx + 0x58]
mov edx, dword [eax]
call dword [edx + 0x38]
test al, al
je 0x40f8e7
mov ecx, dword [sym.SDERPServer.exe__DMServer]
mov eax, dword [ecx]
mov eax, dword [eax + 0x58]
xor edx, edx
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov word [ebp - 0x6c], 0x68
push dword [ebp - 0x8c]
push dword [ebp - 0x10]
push dword [ebp - 0x18]
push dword [ebp - 0x14]
mov edx, 0x5a2fb0
lea eax, [ebp - 0x20]
call fcn.0058f82c
inc dword [ebp - 0x60]
push dword [eax]
push dword [ebp - 0x1c]
push dword [ebp - 0x80]
lea eax, [ebp - 0x24]
call fcn.004025f4
push eax
inc dword [ebp - 0x60]
call sym.SDERPServer.exe__TSetDBUserForm_GenConnectStr_q17System_AnsiStringt1t1t1t1i
add esp, 0x20
lea edx, [ebp - 0x24]
lea eax, [ebp - 0x28]
call fcn.005913fc
inc dword [ebp - 0x60]
mov edx, dword [eax]
mov ecx, dword [sym.SDERPServer.exe__DMServer]
mov eax, dword [ecx]
mov eax, dword [eax + 0x58]
call sub.adortl60.bpl__Adodb_TADOConnection_SetConnectionString_qqrx17System_WideString
dec dword [ebp - 0x60]
lea eax, [ebp - 0x28]
mov edx, 2
call fcn.00591470
dec dword [ebp - 0x60]
lea eax, [ebp - 0x24]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x20]
mov edx, 2
call fcn.0058fb04
mov ecx, dword [sym.SDERPServer.exe__DMServer]
mov eax, dword [ecx]
mov eax, dword [eax + 0x58]
mov dl, 1
mov ecx, dword [eax]
call dword [ecx + 0x48]
mov word [ebp - 0x6c], 0x74
lea eax, [ebp - 0x34]
call fcn.004025f4
push eax
inc dword [ebp - 0x60]
mov edx, 0x5a2fb7
lea eax, [ebp - 0x30]
call fcn.0058f82c
inc dword [ebp - 0x60]
lea edx, [ebp - 0x30]
push edx
lea eax, [ebp - 0x2c]
call fcn.004025f4
push eax
inc dword [ebp - 0x60]
call fcn.0042b6a4
pop ecx
lea eax, [ebp - 0x2c]
pop edx
pop ecx
call fcn.0058fb5c
lea eax, [ebp - 0x34]
push eax
lea eax, [ebp - 0x3c]
call fcn.004025f4
push eax
inc dword [ebp - 0x60]
mov edx, 0x5a2fbd
lea eax, [ebp - 0x38]
call fcn.0058f82c
inc dword [ebp - 0x60]
lea edx, [ebp - 0x38]
pop ecx
pop eax
call fcn.0058fb5c
lea ecx, [ebp - 0x3c]
mov ecx, dword [ecx]
mov dl, 1
mov eax, dword [sym.imp.rtl60.bpl__Inifiles_TIniFile_]
call fcn.004096cc
mov dword [ebp - 0x94], eax
dec dword [ebp - 0x60]
lea eax, [ebp - 0x3c]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x38]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x34]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x30]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x2c]
mov edx, 2
call fcn.0058fb04
push dword [ebp - 0x10]
mov edx, 0x5a2fce
lea eax, [ebp - 0x44]
call fcn.0058f82c
inc dword [ebp - 0x60]
push dword [eax]
mov word [ebp - 0x6c], pe_nt_image_headers32
mov edx, 0x5a2fca
lea eax, [ebp - 0x40]
call fcn.0058f82c
inc dword [ebp - 0x60]
mov edx, dword [eax]
mov eax, dword [ebp - 0x94]
pop ecx
mov ebx, dword [eax]
call dword [ebx + 4]
dec dword [ebp - 0x60]
lea eax, [ebp - 0x44]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x40]
mov edx, 2
call fcn.0058fb04
push dword [ebp - 0x8c]
mov edx, 0x5a2fde
lea eax, [ebp - 0x4c]
call fcn.0058f82c
inc dword [ebp - 0x60]
push dword [eax]
mov word [ebp - 0x6c], 0x8c
mov edx, 0x5a2fda
lea eax, [ebp - 0x48]
call fcn.0058f82c
inc dword [ebp - 0x60]
mov edx, dword [eax]
mov eax, dword [ebp - 0x94]
pop ecx
mov ebx, dword [eax]
call dword [ebx + 0xc]
dec dword [ebp - 0x60]
lea eax, [ebp - 0x4c]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x48]
mov edx, 2
call fcn.0058fb04
mov ecx, dword [ebp - 0x94]
mov dword [ebp - 0x54], ecx
cmp dword [ebp - 0x54], 0
je 0x40fb42
mov eax, dword [ebp - 0x54]
mov edx, dword [eax]
mov dword [ebp - 0x50], edx
mov word [ebp - 0x6c], 0xa4
mov edx, 3
mov eax, dword [ebp - 0x54]
mov ecx, dword [eax]
call dword [ecx - 4]
mov word [ebp - 0x6c], 0x98
mov byte [ebp - 0x85], 1
mov eax, dword [ebp - 0x80]
call sub.vcl60.bpl__Forms_TCustomForm_Close_qqrv
dec dword [ebp - 0x60]
lea eax, [ebp - 0x1c]
mov edx, 2
call fcn.0058fb04
mov word [ebp - 0x6c], 0x44
mov word [ebp - 0x6c], 8
jmp 0x40fbd5
mov al, byte [ebp - 0x85]
push eax
dec dword [ebp - 0x60]
lea eax, [ebp - 0x18]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x14]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0x10]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 0xc]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp + 8]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp + 0xc]
mov edx, 2
call fcn.0058fb04
dec dword [ebp - 0x60]
lea eax, [ebp - 8]
mov edx, 2
call fcn.0058fb04
pop eax
mov edx, dword [ebp - 0x7c]
mov dword fs:[0], edx
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret 8