ada source nya k minta dunk sptahu bisa dipelajarin................. maap nih klo nglanggar peraturan (gw lupa)
On 12/1/05, riyan <[EMAIL PROTECTED]> wrote: > > Dear All ITCENTER, > sekedar informasi nih ... > > Setelah dilihat struktur file dari virus tersebut ternyata pembuatan > virusnya menggunakan visual basic 6.0 ternyata > buatan VB 6.0 nah ini yang membuat tambah menarik. > > Virus ini terdiri dari 1 form dan 1 Module, dengan nama > > Form -- BrontokForm > Module -- API > > Dengan detail berikut: > > Begin VB.Form BrontokForm > Caption = "Brontok.A" > ForeColor = &H8000000F& > ScaleMode = 1 > BeginProperty Font > Name = "" > Size = 195323.4944 > Charset = 29 > Weight = 774 > EndProperty > > Begin VB.Timer TmrBrontok > Enabled = 0 'False > Interval = 2000 > Left = 2160 > Top = 0 > Width = 57352 > Height = 1 > End > End > > > Dengan nama Project: Brontok.vbp, yang disimpan pada directory: > F:\VPROJECT\REHAB\Re-1\BRONTOK.A > > Jelas sekali bahwa virus ini dibuat oleh sorang program lokal, yang > mempunyai skill Menengah Keatas. > Ada beberapa procedure & function yang digunakan dengan nama: > > Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) > TmrBrontok_Timer() > Subr_004() > CekKoneksiInternet() > ManipulasiExec() > Subr_007() > KeluarDong() > BronReg() > CopyAppData() > DownloadVir() > StartDong() > StartUp() > DecTeks() > MutMutex() > MutCr() > DownloadFile() > CekUpdate() > InfekNetwork() > Judul() > CekRemDisk() > BikinFile() > GetEmailFile() > CekValidMail() > GetTeks() > CekKar() > ListMail() > GetTargetMBhs() > GavMailer() > BrontokMail() > Subr_031() > DataEmail() > DownMIME() > FindFilesAPI() > ListFileGav() > InfekFile() > SmallAttack() > MinggirLoe() > GetHostByNameAlias() > StripNulls() > BikinKredit() > > Dan beberapa fungsi Api yang digunakan anatara lain: > > Fungsi Baca Tulis Ke Register: > Declare Function RegOpenKeyExA Lib "advapi32.dll" () > Declare Function RegSetValueExA Lib "advapi32.dll" () > Declare Function RegCloseKey Lib "advapi32.dll" () > Declare Function RegCreateKeyExA Lib "advapi32.dll" () > > Declare Function Sleep Lib "kernel32" () > > Mendapatkan Spesial Folder: > Declare Function SHGetPathFromIDList Lib "shell32.dll" () > Declare Function SHGetSpecialFolderLocation Lib "shell32.dll" () > > Membaca Isi Halaman Situs: > Declare Function InternetOpenA Lib "wininet.dll" () > Declare Function InternetOpenUrlA Lib "wininet.dll" () > Declare Function InternetReadFile Lib "wininet.dll" () > Declare Function InternetCloseHandle Lib "wininet.dll" () > > Mendapatkan Caption Dari Sebuah Window: > Declare Function GetWindowTextA Lib "user32" () > Declare Function GetWindowTextLengthA Lib "user32" () > > Dapatkan HWND Window aktif: > Declare Function GetForegroundWindow Lib "user32" () > > Shutdown, Reboot, LogOff Windows: > Declare Function ExitWindowsEx Lib "user32" () > Declare Function GetCurrentProcess Lib "kernel32" () > Declare Function OpenProcessToken Lib "advapi32" () > Declare Function LookupPrivilegeValueA Lib "advapi32" () > Declare Function AdjustTokenPrivileges Lib "advapi32" () > > Mendapatkan Jenis Media yang ada spt Removable Disk, CD-Rom dll: > Declare Function GetDriveTypeA Lib "kernel32" () > > Declare Function ShellExecuteA Lib "shell32.dll" () > Declare Function RtlMoveMemory Lib "kernel32" () > > Winsock API: > Declare Function closesocket Lib "wsock32.dll" () > Declare Function connect Lib "wsock32.dll" () > Declare Function htons Lib "wsock32.dll" () > Declare Function inet_addr Lib "wsock32.dll" () > Declare Function recv Lib "wsock32.dll" () > Declare Function send Lib "wsock32.dll" () > Declare Function socket Lib "wsock32.dll" () > Declare Function gethostbyname Lib "wsock32.dll" () > Declare Function WSAStartup Lib "wsock32.dll" () > Declare Function WSACleanup Lib "wsock32.dll" () > Declare Function WSAAsyncSelect Lib "wsock32.dll" () > > Fungsi yang berhubungan dengan file: > Declare Function FindFirstFileA Lib "kernel32" () > Declare Function FindNextFileA Lib "kernel32" () > Declare Function GetFileAttributesA Lib "kernel32" () > Declare Function FindClose Lib "kernel32" () > dll... > > Terlihat jelas pada fungsi-fungsi api yang digunakan bahwa penularan virus > ini brontok menggunakan beberapa cara. > seperti pengiriman lewat email, pencarian nama komputer yang terhubung > kejaringan dengan menyalin dirinya > pada folder yang di sharing dan menyalin dirinya pada window explorer yang > aktif. > kalo gak salah si pembuat virus mempunyai SMTP sendiri (wah ati-ati mas > ntar ketangkep) > > Jika dilihat kembali pada strukturnya ada beberapa kata yang di encrypt, > kemungkinan berupa exploit code atau apalah namanya. hanya allah dan > pembuat virus yang tau. > > Virus ini mempunyai fungsi ExitWindowsEx yang diimport dari file > user32.dll, > fungsi ini biasanya digunakan untuk mematikan windows. > kayaknya sipembuat virus membuat triger yang berisi perintah > mematikan/merestart komputer. > > Selain itu dalam struktur filenya terdapat kata-kata seperti ini: > FOLDER.HTT > RORO > .HTT > .DOC > .CSV > .EML > .CFM > .PHP > .WAB > .EML > .TXT > .HTML > .HTM > MY DATA SOURCES > MY EBOOKS > MY MUSIC > MY SHAPES > MY VIDEOS > MY DOCUMENT > > Dan ada beberapa alamat situs yang diserang, apa DDOS ya...hik..hik..tau > deh. > Selain itu pembuat virus mencantumkan nama: --JowoBot#VM Community -- > > Selanjutnya coba lihat tiga fungsi api berikut: > > Declare Function GetWindowTextA Lib "user32" () > Declare Function GetWindowTextLengthA Lib "user32" () > Declare Function GetForegroundWindow Lib "user32" () > > Sepertinya pembuat virus memanfaatkan windowexplorer untuk memperbanyak > filenya ke folder yang lain. > Dengan cara membaca Caption yang terdapat pada windows aktif yang berisi > nama directory/path. > Dengan menggunakan 2 fungsi diatas (GetWindowTextA & > GetWindowTextLengthA), Sedangkan fungsi GetForegroundWindow digunakan untuk > mendapatkan Handle Window (HWND) yang sedang aktif. > > Jadi kesimpulannya virus ini tidak dapat menyalin dirinya kalo Caption > pada windowExplorer bukan berupa Directory/Path. > Sehinga si pembuat virus menonaktifkan setting pada Folder Options. > > Kemudian yang lebih unik lagi virus ini membaca isi halaman situs yang > terbuka pada sebuah InternetExplorer > dengan menggunakan fungsi: > > Declare Function InternetOpenA Lib "wininet.dll" () > Declare Function InternetOpenUrlA Lib "wininet.dll" () > Declare Function InternetReadFile Lib "wininet.dll" () > Declare Function InternetCloseHandle Lib "wininet.dll" () > > Kalo saya tebak, sepertinya pembuat virus mencari alamat email pada > halaman situs yang terbuka dan > mengirimkan virus nya berdasarkan alamat email yang ditemukan pada halaman > tersebut dengan kata kunci > seperti mailto: ataupun @xxxx.com dll... > > ....Untuk membersihkannya silahkan baca selengkapnya di situs > http://www.vaksin.com/ > > Tapi kalo pengen menonaktifkan virus ini secara cepat, > coba masuk safemode kemudian rename file MSVBVM60.dll menjadi MSVBVM60.dl_ > karena virus ini membutuhkan runtime vb. Nah kalo udah gak aktif baru kita > bisa hapus > beberapa registry entry dan file-file virus brontoknya. > > Sayang sekali virus ini tidak menggunakan program compressor, sehingga > memudahkan orang untuk mengenalinya. > > Maaf kalo ada beberapa informasi yang salah > Semoga bermanfaat,... > > Best Regard, > > riyan > mailto:[EMAIL PROTECTED] > > > > > > -- > www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia > Info, Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED] > :: Hapus bagian yang tidak perlu (footer, dst) saat reply! :: > ## Jobs: itcenter.or.id/jobs ## Bursa: itcenter.or.id/bursa ## > $$ Iklan/promosi : www.itcenter.or.id/sponsorship $$ > > [@@] Jaket ITCENTER tersedia di http://shop.itcenter.or.id > > > Yahoo! Groups Links > > > > > > > [Non-text portions of this message have been removed] -- www.itcenter.or.id - Komunitas Teknologi Informasi Indonesia Info, Gabung, Keluar, Mode Kirim : [EMAIL PROTECTED] :: Hapus bagian yang tidak perlu (footer, dst) saat reply! :: ## Jobs: itcenter.or.id/jobs ## Bursa: itcenter.or.id/bursa ## $$ Iklan/promosi : www.itcenter.or.id/sponsorship $$ [@@] Jaket ITCENTER tersedia di http://shop.itcenter.or.id Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/ITCENTER/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/