MALICIOUS
342
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
T1203 Exploitation for Client Execution
The file contains legacy WordBasic and VBA macros, including AutoOpen and Document_Open, which are designed to execute automatically. Critical heuristics indicate the use of Shell() for execution and a ClamAV detection of 'Doc.Trojan.CMK-1'. The VBA script likely attempts to download and execute a second-stage payload from one of the embedded URLs.
Heuristics 8
-
ClamAV: Doc.Trojan.CMK-1 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Trojan.CMK-1
-
VBA macros detected medium 4 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
-
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.
-
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.
-
Embedded URL info EMBEDDED_URLOne or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.URL http://www.coderz.net/metaphase/A@V In document text (OLE body)
- http://beam.to/lzoA@VIn document text (OLE body)
- http://www.coderz.net/metaphase/In document text (OLE body)
- http://beam.to/lzoIn document text (OLE body)
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) | 63638 bytes |
SHA-256: 2a3021b67a5fa59a0ed971afc01ff878e3d08652b3512614822560060bc740eb |
|||
|
Detection
ClamAV:
Doc.Trojan.CMK-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 = "frmAbout"
Attribute VB_Base = "0{11F61A85-4C3E-11D3-9923-00403393BF25}{11F61A79-4C3E-11D3-9923-00403393BF25}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Private Sub Image1_Click()
frmAbout.Hide
frmMain.Show
End Sub
Private Sub Label1_Click()
frmAbout.Hide
frmMain.Show
End Sub
Private Sub UserForm_Click()
frmAbout.Hide
frmMain.Show
End Sub
Private Sub UserForm_Initialize()
Image1.Picture = frmStart.Picture
End Sub
Attribute VB_Name = "frmDatum"
Attribute VB_Base = "0{11F61ACD-4C3E-11D3-9923-00403393BF25}{11F61A89-4C3E-11D3-9923-00403393BF25}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Private Sub CommandButton1_Click()
Tage = txtTage.Text
Monate = txtMonate.Text
frmDatum.Hide
frmPayload.Show
End Sub
Private Sub SpinButton1_SpinDown()
If Tage = 0 Then GoTo ende_
Tage = Tage - 1
txtTage.Text = Tage
ende_:
End Sub
Private Sub SpinButton1_SpinUp()
If Tage = 31 Then GoTo ende_
Tage = Tage + 1
txtTage.Text = Tage
ende_:
End Sub
Private Sub SpinButton2_SpinDown()
If Monate = 0 Then GoTo ende_
Monate = Monate - 1
txtMonate.Text = Monate
ende_:
End Sub
Private Sub SpinButton2_SpinUp()
If Monate = 12 Then GoTo ende_
Monate = Monate + 1
txtMonate.Text = Monate
ende_:
End Sub
Private Sub UserForm_Initialize()
Tage = Day(Now())
Monate = Month(Now())
txtTage.Text = Tage
txtMonate.Text = Monate
End Sub
Attribute VB_Name = "frmEnd"
Attribute VB_Base = "0{11F61ABF-4C3E-11D3-9923-00403393BF25}{11F61A8E-4C3E-11D3-9923-00403393BF25}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Private Sub UserForm_Click()
ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
End
End Sub
Attribute VB_Name = "frmGreets"
Attribute VB_Base = "0{11F61AD1-4C3E-11D3-9923-00403393BF25}{11F61A93-4C3E-11D3-9923-00403393BF25}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Private Sub UserForm_Click()
frmGreets.Hide
frmMain.Show
End Sub
Attribute VB_Name = "frmJackie"
Attribute VB_Base = "0{11F61AD5-4C3E-11D3-9923-00403393BF25}{11F61A97-4C3E-11D3-9923-00403393BF25}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Private Sub CommandButton1_Click()
frmAbout.Hide
End Sub
Private Sub Image1_Click()
Shell "start http://www.coderz.net/metaphase/"
End Sub
Private Sub Image2_Click()
Shell "start http://beam.to/lzo"
End Sub
Private Sub UserForm_Click()
frmJackie.Hide
frmMain.Show
End Sub
Attribute VB_Name = "frmMain"
Attribute VB_Base = "0{11F61AE3-4C3E-11D3-9923-00403393BF25}{11F61A9C-4C3E-11D3-9923-00403393BF25}"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Private Sub CommandButton1_Click()
frmDatum.Show
End Sub
Private Sub OptionButton12_Click()
End Sub
Private Sub CommandButton2_Click()
frmMain.Hide
frmPayload.Show
End Sub
Private Sub CommandButton3_Click()
PiEPoly = True
frmMain.Hide
frmPiE.Show
End Sub
Private Sub CommandButton4_Click()
frmMain.Hide
frmAbout.Show
End Sub
Private Sub CommandButton5_Click()
frmMain.Hide
frmJackie.Show
End Sub
Private Sub CommandButton6_Click()
frmMain.Hide
frmGreets.Show
End Su
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.