Malaysian WackWall Forum
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Malaysian WackWall Forum

Now Malaysian Can Connect Over The World
 
HomePortalGalleryLatest imagesSearchRegisterLog in
Navigation
:: Portal ::
:: Forum ::
 :: Memberlist ::
:: Profile ::
:: FAQ ::
:: Search ::


AlertPay Easy Money Transfer 100% Free to register
 
Log in
Username:
Password:
Log in automatically: 
:: I forgot my password
Google Translator
Latest topics
» IRC Flooder Script For Sale
PHP IRC Bot  EmptyMon Oct 08, 2012 12:39 am by maxi.y.mateo

» utusan.com.my Being DDOS
PHP IRC Bot  EmptyFri Jan 20, 2012 5:33 pm by Penjejak Badai

» PHP IRC Bot
PHP IRC Bot  EmptyFri Dec 02, 2011 11:31 am by siperda

» SQL Injection Scanner By XShimeX
PHP IRC Bot  EmptyMon Oct 24, 2011 6:22 pm by sucide_bomber

» Website Vulnerable Scanner Tools V1.01 By proqrammer
PHP IRC Bot  EmptyMon Oct 24, 2011 6:21 pm by sucide_bomber

» Slowloris or XerXes Leak Version
PHP IRC Bot  EmptyTue Sep 13, 2011 7:45 pm by sucide_bomber

» maisarah wuz here
PHP IRC Bot  EmptyTue Sep 13, 2011 7:32 pm by sucide_bomber

» Sql Injection Tutorial
PHP IRC Bot  EmptyTue Jul 19, 2011 2:56 pm by sucide_bomber

» XerXes Source Codes!!
PHP IRC Bot  EmptyWed Jul 13, 2011 8:55 am by wackwall

» SQL Injection dalam bahasa Malaysia
PHP IRC Bot  EmptyThu Jun 30, 2011 9:11 pm by sucide_bomber

» LFI Scanner ( Perl )
PHP IRC Bot  EmptyMon Jun 27, 2011 8:21 am by wackwall

» Muhasabah diri tingkat kesyukuran, keinsafan umat
PHP IRC Bot  EmptyMon Jun 27, 2011 3:56 am by sucide_bomber

» 5013 Webs With SQL Vuln
PHP IRC Bot  EmptyMon Jun 27, 2011 3:50 am by sucide_bomber

» Saya mencari part time job online?
PHP IRC Bot  EmptyMon Jun 27, 2011 1:19 am by sucide_bomber

» 16 exploits for hacking CC databases
PHP IRC Bot  EmptyMon Jun 13, 2011 1:33 pm by sucide_bomber

Link Exchange
Online News


















Churp2x Campaign
Click Pada Iklan DiBawah & Dapatkan Ganjaran Anda
SEKARANG!



















Mangga Ads
NuffNang Ads

 

 PHP IRC Bot

Go down 
2 posters
AuthorMessage
wackwall
Admin
wackwall


Zodiac : Cancer Chinese zodiac : Rooster
Posts : 159
Points : 5282
Reputation : 2
Join date : 10/12/2010
Age : 42
Location Location : Sarawak

PHP IRC Bot  Empty
PostSubject: PHP IRC Bot    PHP IRC Bot  EmptyTue Mar 22, 2011 11:58 am

Jun Run it Online...

only things i got done was the stats and the md5 function, and a !die function ofcourse

Code:
<?php
//------------------------------------------------------------
//Binary Underground b0t by otak :)
//------------------------------------------------------------
//========================================
//------------------------------------------------------------
//Command list
//------------------------------------------------------------
//!stats  -  shows the site stats
//!md5enc <text>  -  encrypts <text>
//!md5dec <hash>  -  decrypts hash
//
//more to come here!
//say something everytime a new post is made, like New Thread/Post: Blah by blah.
//say something everytime we get a new member, like Newly registerd: name here.
//maybe query the passdb for a exact match?
//any more ideas? lol
//------------------------------------------------------------
//basic setup of teh bot
//------------------------------------------------------------
$me = "Binary-UG";
$nspass = "";
$server = "irc.dal.net";
$chan = "#otak";
//------------------------------------------------------------
//database setup of teh bot
//------------------------------------------------------------
$dbuser = "binary_admin";
$dbpass = "";
$dbname = "binary_vb";
//------------------------------------------------------------




$con = mysql_connect("localhost",$dbuser,$dbpass);
mysql_select_db($dbname, $con);
if (!$con)
  {
  die('Could not connect: ' . mysql_error());
  }

set_time_limit(0);

$socket = fsockopen($server, 6667);

fputs($socket,"USER ".$me." binary-ug.com BUG :BUG-b0t\n");
fputs($socket,"NICK ".$me."\n");
if ( $nspass<>"" ) { fputs($socket,"PRIVMSG NickServ :IDENTIFY ".$nspass."\n"); }
fputs($socket,"JOIN ".$chan."\n");

while(1) {


        while($data = fgets($socket, 128)) {

                echo nl2br($data);
                flush();

                $ex = explode(' ', $data);
//ping
                if($ex[0] == "PING"){
                        fputs($socket, "PONG ".$ex[1]."\n");
                }

                $command = str_replace(array(chr(10), chr(13)), '', $ex[3]);
                $extras = str_replace(array(chr(10), chr(13)), '', $ex[4]);

//stats
                if ($command == ":!stats") {
                        $statthreads=mysql_num_rows(mysql_query("SELECT * FROM thread"));
                        $statposts=mysql_num_rows(mysql_query("SELECT * FROM post"));
                        $statusers=mysql_num_rows(mysql_query("SELECT * FROM user"));
                                fputs($socket, "PRIVMSG ".$ex[2]." :Threads: ".$statthreads.", Posts: ".$statposts.", Users: ".$statusers."\n");
                        }
//md5dec
                if (ereg("^:!md5dec", $command)) {
                        $hash =  $extras;
                        if ($hash != '' && strlen($hash) == 32){
                                $xml = simplexml_load_file('http://gdataonline.com/qkhash.php?mode=xml&hash='.$hash);
                                if ($xml){
                                        foreach($xml->children() as $child){
                                        if ($child->getName() == 'result')
                                                fputs($socket, "PRIVMSG ".$ex[2]." :".$hash." : ".$child."\n");
                                        elseif ($child == 'Hash not found')
                                                fputs($socket, "PRIVMSG ".$ex[2]." :".$hash." was not found in the database.\n");
                                        }
                                }else
                                        fputs($socket, "PRIVMSG ".$ex[2]." :".$hash." was not found in the database.\n");
                        }else
                                fputs($socket, "PRIVMSG ".$ex[2]." :Invalid hash.\n");
                }
//md5enc
                if (ereg("^:!md5enc", $command)) {
                        $hash = md5($extras);
                        fputs($socket, "PRIVMSG ".$ex[2]." :".$hash." : ".$extras."\n");
                }
//die
                if ($command == ":!die") {
                        die('bhai bhai');
                }
               
        }
}
mysql_close($con);
?>


Enjoy!!
Back to top Go down
https://malaysia.1talk.net
siperda

siperda


Posts : 1
Points : 4492
Reputation : 0
Join date : 02/12/2011
Location Location : sky

PHP IRC Bot  Empty
PostSubject: Re: PHP IRC Bot    PHP IRC Bot  EmptyFri Dec 02, 2011 11:31 am

do you have rfi scanner and auto spread it?
Back to top Go down
 
PHP IRC Bot
Back to top 
Page 1 of 1

Permissions in this forum:You cannot reply to topics in this forum
Malaysian WackWall Forum :: Internet :: h4ck3d :: Tools-
Jump to: