JabberまたはICQボットへの切り替えに関するもう少しの言葉

私自身は無料の技術の支持者として、長い間ジャバーアカウントを開始しましたが、長い間空でした。 ここでは、AOLの最近の問題とXMPPクライアントに関するいくつかのHabratopiksと、人々を誘惑する方法に照らして、私はUINにボットを置くというアイデアを得ました。 インターネットで会話のテーマを検索した後、価値のあるものは見つかりませんでした。 しかし、ICQプロトコルの最小限の機能を実装するPHPのクラスのセットがあるページに出会いました。

考え直すことなく、実際にダウンロードして試してみました。 動作します!!!

そして30分後に次のことを書きました。



icqbot.php

Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  1. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  2. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  3. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  4. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  5. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  6. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  7. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  8. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  9. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  10. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  11. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  12. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  13. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  14. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  15. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  16. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  17. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  18. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  19. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  20. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  21. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  22. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  23. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  24. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  25. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  26. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  27. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  28. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  29. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  30. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  31. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  32. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  33. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  34. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  35. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  36. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  37. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  38. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  39. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  40. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  41. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  42. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  43. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  44. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  45. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  46. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  47. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  48. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  49. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  50. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  51. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  52. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  53. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  54. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  55. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  56. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  57. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  58. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  59. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  60. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  61. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  62. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  63. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  64. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  65. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  66. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  67. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  68. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  69. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  70. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  71. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  72. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  73. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  74. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  75. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  76. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }



  77. Copy Source | Copy HTML #!/usr/bin/php <?php include ( 'icq.php' ); // zendloader require 'Zend/Loader.php' ; Zend_Loader::registerAutoload(); // $config = new Zend_Config_Xml( 'config.xml' ,NULL, true ); // $db = Zend_Db::factory( $config ->dbadapter, $config ->db->toarray()); $db ->query( 'SET CHARACTER SET "' . $config ->dbcharset. '"' ); // $icq = new WebIcqLite(); log_write( "ICQ Bot started" ); // if (! $icq ->connect( $config ->icq->login, $config ->icq->password)) { log_write( $icq ->error); exit (); } log_write( "Connected ok" ); while ( $icq ->is_connected()) { // $msg = $icq ->read_message(); if ( $msg ) { // if ( $msg [ 'message' ]== "icqbotoff" ) { $icq ->disconnect(); log_write( "Exit by admin's command." ); exit (); } log_write( " Message '" . $msg [ 'message' ]. "' from " . $msg [ 'from' ]); // $msg [ 'message' ] = str_replace( array ( '(' , ')' , '/' , ':' , '.' , ',' , '?' , '!' , '@' , '#' , '$' , '%' , '^' , '&' , '*' , '-' , '_' , '=' , '+' , '~' , '`' , ';' , '|' , '\\',' \ '' , '"' ), '' , $msg [ 'message' ]); // $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' ,trim( $msg [ 'message' ]))->where( 'LENGTH(a)>0' )->order( 'RAND()' )->query()->fetch(); if ( $ans ) { // log_write( " Message '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $db ->insert( 'messages' , array ( 'q' => $msg [ 'message' ], 'a' => '' , 'from' => $msg [ 'from' ])); $query = "SELECT *, MATCH q AGAINST ('" . $msg [ 'message' ]. "') as relev FROM messages WHERE LENGTH(a)>0 ORDER BY relev DESC LIMIT 1" ; $ans = $db ->query( $query )->fetch(); if ( $ans [ 'relev' ]> 0 ) { // log_write( "Message (fulltext search) '" . $ans [ 'a' ]. "' sent to " . $msg [ 'from' ]); } else { // . . $ans = $db ->select()->from( 'messages' )->where( 'q LIKE ?' , 'default' )->query()->fetch(); log_write( "Message 'DEFAULT' sent to " . $msg [ 'from' ]); } } $icq ->send_message( $msg [ 'from' ], $ans [ 'a' ]); // } // flush(); sleep( 1 ); } // log_write( "Disconnected by unknown reason." ); $icq ->disconnect(); //----------------------------------------------------------------------------------------// // // function log_write( $str ) { echo date( 'Ymd His' ,time()). " " . $str . "\n" ; }







config.xml

Copy Source | Copy HTML



  1. <? xml version = "1.0" encoding = "UTF-8">
  2. < configdata >
  3. < debug > 0 </ debug >
  4. < db >
  5. < ホスト > localhost </ ホスト >
  6. < ユーザー名 >ルート</ ユーザー名 >
  7. < パスワード > dbpass </ パスワード >
  8. < dbname > icqbot </ dbname > </ db >
  9. < dbcharset > CP1251 </ dbcharset >
  10. < dbadapter > Pdo_Mysql </ dbadapter >
  11. < icq >
  12. < ログイン > UIN </ ログイン >
  13. < パスワード > パスワード </ パスワード >
  14. </ icq >




dump.sql

Copy Source | Copy HTML



  1. `messages`が存在しない場合のテーブルの作成(
  2. `id` int (11) NOT NULL auto_increment、
  3. `q`テキストNOT NULL
  4. `a`テキストNOT NULL
  5. ` from` varchar (16) NOT NULL
  6. 主キー ( `id`)、
  7. 全文キー `q`(` q`)
  8. )エンジン= MyISAM DEFAULT CHARSET = cp1251 AUTO_INCREMENT = 43;
  9. INSERT INTO `messages`(` id`、 `q`、` a`、 `from`)
  10. (1、 'default''あなたがロボットと話している瞬間。私のホストと話したい場合、Jabberサーバーの1つに登録する必要があります。彼はICQに表示されなくなります。 e、1を入力します。ホストのJabberアドレスを見つけるには、2プラスになる金額を書きます。ホストの住所を見つけるには、1〜7の数字をスペースなしで入力します。
  11. (2、 '1234567''My@mail.ri''' )、
  12. (3、 '7''My@jabber.ru''' )、
  13. (4、 '1''人気のあるJabberサーバーの1つ-jabber.ru http://www.jabber.ru/node/247-は、接続するための登録手順を記載したページのアドレスです。Jabberホストアドレスを見つけるには、 2つのプラス5はいくらになるでしょうか。 '、 ' ' )、
  14. (5、 'hello''hello)''' )、
  15. (6、 「お元気ですか」「普通 )、 '' );




そして、ボットZendFrameworkでパパを入れることを忘れないでください



何もコメントしません すべてが非常に簡単です。

深刻なことをするタスクを設定せず、アドレスに送信するだけであることに注意してください(ただし、既に十分なダイアログをダイヤルし、ボットはデフォルトのメッセージをダンプせずに5〜10人の知人とメッセージを既に話していました)。 ボットはRTF形式のメッセージを処理しませんが、この機能はクラスに実装されています(終了できます)。 もちろん、個別のUINとの会話を個別のスレッドにねじ込むこともできました。 しかし、これは別の問題です。 主なアイデア)

この作成はすでに4日間のフライトです。 1日あたり1-2人がjabber連絡先リストに追加されます。

こんな奇跡が起こりました。




All Articles