Teknik DeepScan Morphost Accords
Ditulis oleh Morphic di/pada Mei 11, 2009
Sebenarnya trik yang saya bahas di tutorial ini hanyalah trik biasa dan sederhana. Kenapa? Yah aku yakin banyak juga yang dah tahu teknik ini…
Sekarang banyak AVMaker yang masih make basis data / checksum saja… yah paling ditambah dengan sedikit heuristic…
Tapi menurut pengamatanku masih banyak juga yang belum make teknik ini. Padahal teknik ini lumayan ampuh…
Memang Morphost belum make teknik ini, yah karena saya sendiri masih belum banyak mengumpulkan string-string virus. Tapi yang jelas di versi berikutnya (morphost Accords), trik ini akan saya gunakan.
Teknik ini fungsinya untuk melihat ke dalam tubuh file. Apa yang dilihat? He he he jangan piktor…
Maksudnya disini teknik ini untuk melihat string-string sensitif virus yang ada di dalam tubuh file.
Neh, secara sederhana ini code-nya..
Public Sub Baca(namanyaapa As String)
Dim filedata As String
Dim a As Integer
Open namanyaapa For Binary As #1
filedata = Space$(LOF(1))
Get #1, , filedata
If InStr(1, filedata, “TypeyourStringHere”) > 0 Then
‘MsgBox ”Terinfeksi virus!”
End If
Close #1
End Sub
Tugasmu adalah mengganti ”TypeyourStringhere” dengan string virus apa saja. Yah lebih bagus lagi, tiap virus masing-masing memiliki 2 string. Biar gak false alarm.
Contohnya begini:
Public Sub Baca(namanyaapa As String)
Dim filedata As String
Dim a As Integer
Open namanyaapa For Binary As #1
filedata = Space$(LOF(1))
Get #1, , filedata
If InStr(1, filedata, “TypeyourStringHere”) > 0 Then
If instr( 1, filedata, “TypeyourstriingHeredua”)> 0 then
‘MsgBox “terinfeksi virus!”
End if
End If
Close #1
End Sub
Mau dijadikan sebagai fungsi juga bisa,,, contohnya begini.
function isInfected(namanyaapa As String) as boolean
Dim filedata As String
Dim a As Integer
Open namanyaapa For Binary As #1
filedata = Space$(LOF(1))
Get #1, , filedata
If InStr(1, filedata, “TypeyourStringHere”) > 0 Then
Isinfected = True
End If
Close #1
End function
Ini semua hanya contoh,, kamu juga bisa membuatnya jadi 3 perbandingan string atau lebih…
Teknik ini ampuh unutk mendeteksi alman loh…
BErikut contoh-contoh string virus yang sudah saya teliti dan saya analisa…. He he he
NItaworm=InfeksiFolder,AmbilDirektoriWindow
GavGent=GavGentForm, TmrGavGent
Kspoold=UKURAN_EKSTRAKTOR, kspoold.exe
Aksika=frmalina, httinimsg
By:Morphic
Thanks to:
Morphostlab





