Ver Mensaje Individual
  #4 (permalink)  
Antiguo 14/06/2004, 14:35
Avatar de kesthers
kesthers
 
Fecha de Ingreso: mayo-2004
Ubicación: Valencia
Mensajes: 358
Antigüedad: 20 años
Puntos: 2
Muy bien, pues aquí lo teneis:

Código PHP:
<?
// Datos del Bot
$nickname "KesBot";
$powered "Kesthers";
$nombre "KesBot";
$version "v1.0";

$ircserver[address] = "irc.quakenet.org";
$ircserver[port] = "6667";

$red "quakenet";

$directorio[stats] = "/var/log/kesbot/quakenet/";

// Conexion a Base de Datos
mysql_connect("localhost""xxxxx""xxxxx"); mysql_select_db("xxxxx");

## Funciones de Logs & Stats ##
function WriteLogs($canal$mensaje) {
    global 
$directorio;
    
$fp = @fopen($directorio[stats].str_replace("#"""str_replace(":"""$canal)).".log""a");
    
fputs($fp$mensaje."\r\n");
    
fclose($fp);
}

// Conectamos
set_time_limit(0);
for(
$conn=01<=2$conn++) {
    echo
"Conectando...\n";
    
$conexion fsockopen($ircserver[address], $ircserver[port]);
    
socket_set_timeout($conexion31536000);
    if(
$conexion) {
        echo
"Esperando respuesta...\n";
        
$bucle=0$conectado=0$limit=0;
        
set_time_limit(0);
        while (
$read fgets($conexion,512)) {
            
set_time_limit(0);
            
$read str_replace("\n","",$read);
            
$read str_replace("\r","",$read);
            
$array explode(" ",$read);
            
$address explode("!",$array[0]);
            
$nick str_replace(":","",$address[0]);
            
$quit substr($readstrlen($array[0])+strlen($array[1])+3512);
            
$modo substr($readstrlen($array[0])+strlen($array[1])+strlen($array[2])+3512);
            
$mensaje substr($readstrlen($array[0])+strlen($array[1])+strlen($array[2])+4512);
            
$kick substr($readstrlen($array[0])+strlen($array[1])+strlen($array[2])+strlen($array[3])+5512);

            if (
$conectado!==0) {
                switch (
$array[1]) {
                    case 
PRIVMSG:
                    if(
$array[2]!==$nickname) {
                        if(
substr($mensaje07)=="ACTION") {
                            
$count strlen($mensaje)-9;
                            
WriteLogs($array[2], "[".date("H:i")."] * ".$nick." ".substr($mensaje8$count));
                        } else {
                            
WriteLogs($array[2], "[".date("H:i")."] <".$nick."> ".$mensaje);
                        }
                    } else {
                        
$orden explode(" "strtolower($mensaje));
                        switch (
$orden[0]) {
                            case 
"ping":
                            
fputs($conexion"NOTICE ".$nick." :PING ".$orden[1]."\n");
                            break;
                            
                            case 
"version":
                            
fputs($conexion"NOTICE ".$nick." :VERSION ".$version."\n");
                            break;
                            
                            case 
"time":
                            
fputs($conexion"NOTICE ".$nick." :TIME ".date("D M d H:i:s Y")."\n");
                            break;
                            
                            case 
"finger":
                            
fputs($conexion"NOTICE ".$nick." :FINGER ".$nombre."\n");
                            break;

                            case 
admin:
                            if(
mysql_num_rows(mysql_query("SELECT * FROM admins WHERE nick='".strtolower($nick)."'"))==1) {
                                
$accion substr($mensaje6512);
                                
fputs($conexion$accion."\n");
                                if(
$orden[1]=="nick") {
                                    
$nuevo explode(":"$orden[2]);
                                    
$nickname $nuevo[0];
                                }
                            } else {
                                
fputs($conexion"PRIVMSG ".$nick." :\002\0032No estas autorizado/da a usar este comando.\n");
                            }
                            break;

                            case 
info:
                            
fputs($conexion"PRIVMSG ".$nick." :\002\0032Bot de Logs & Stats [Creado por: ".$powered."]\n");
                            
fputs($conexion"PRIVMSG ".$nick." :\002\0032Website: http://www.kesthers.com\n");
                            
fputs($conexion"PRIVMSG ".$nick." :\002\0032E-Mail: [email][email protected][/email]\n");
                            break;

                            case 
op:
                            if(
mysql_num_rows(mysql_query("SELECT * FROM opers WHERE nick='".$orden[1]."' AND password='".$orden[2]."' AND red='".$red."' AND canal='".$orden[3]."'"))=="1") {
                                
fputs($conexion"MODE ".$orden[3]." +o ".$nick."\n");
                            } else {
                                
fputs($conexion"PRIVMSG ".$nick." :\002\0032No te puedo dar op porque los datos no son correctos\n");
                            }
                            break;
                        }
                    }
                    break;
                    
                    case 
NOTICE:
                    if(
$array[2]!==$nickname) {
                        
WriteLogs($array[2], "[".date("H:i")."] *** ".$mensaje." (".$nick.")");
                    }
                    break;
                    
                    case 
NICK:
                    
$query mysql_query("SELECT * FROM online WHERE nick='".$nick."' AND red='".$red."'");
                    while(
$sql mysql_fetch_array($query)) {
                        
WriteLogs($sql[canal], "[".date("H:i")."] *** ".$nick." is now known as ".str_replace(":"""$array[2]));
                    }
                    
mysql_query("UPDATE online SET nick='".str_replace(":"""$array[2])."' WHERE nick='".$nick."' AND red='".$red."'");
                    break;

                    case 
MODE:
                    if(
$array[2]!==$nickname) {
                        
WriteLogs($array[2], "[".date("H:i")."] *** ".$nick." sets mode: ".$modo);
                    }
                    break;

                    case 
JOIN:
                    
WriteLogs($array[2], "[".date("H:i")."] *** ".$nick." (".$address[1].") has joined ".str_replace(":"""$array[2]));
                    
mysql_query("INSERT INTO online (time, nick, canal, red) VALUES ('".time()."', '".$nick."', '".str_replace(":"""$array[2])."', '".$red."');");
                    break;

                    case 
PART:
                    
WriteLogs($array[2], "[".date("H:i")."] *** ".$nick." (".$address[1].") has left ".$array[2]);
                    
mysql_query("DELETE FROM online WHERE nick='".$nick."' AND canal='".$array[2]."' AND red='".$red."'");
                    break;

                    case 
KICK:
                    if(
$array[3]==$nickname) {
                        
fputs($conexion"JOIN ".$array[2]."\n");
                    }
                    
WriteLogs($array[2], "[".date("H:i")."] *** ".$array[3]." was kicked by ".$nick." (".$kick.")");
                    
mysql_query("DELETE FROM online WHERE nick='".$array[3]."' AND canal='".$array[2]."' AND red='".$red."'");
                    break;

                    case 
QUIT:
                    
$query mysql_query("SELECT * FROM online WHERE nick='".$nick."' AND red='".$red."'");
                    while(
$sql mysql_fetch_array($query)) {
                        
WriteLogs($sql[canal], "[".date("H:i")."] *** ".$nick." (".$address[1].") Quit (".$quit.")");
                    }
                    
mysql_query("DELETE FROM online WHERE nick='".$nick."' AND red='".$red."'");
                    break;

                    case 
TOPIC:
                    
WriteLogs($array[2], "[".date("H:i")."] *** ".$nick." changes topic to '".$mensaje."'");
                    
mysql_query("UPDATE canales SET topic='".$mensaje."' WHERE canal='".$array[2]."' AND red='".$red."'");
                    break;
                }
            }


            if (
$bucle==0) {
                
fputs($conexion"NICK $nickname\n\n");
                
fputs($conexion"USER $nickname $powered $powered :$nombre $version\n\n");
                echo
"Identificado.\n";
            }

            if (
$array[0]=="PING") {
                
fputs($conexion"PONG ".str_replace(":","",$array[1])."\n");
            }

            if (
$array[1]==251) {
                
$query mysql_query("SELECT * FROM canales WHERE red='".$red."'");
                while(
$sql mysql_fetch_array($query)) {
                    
$canales .= $sql[canal].",";
                }
                
fputs($conexion"JOIN ".$canales."\n\n");
                echo
"Entrada en canales. ($canales)\n";
                
$conectado++;
            }

            
$bucle++;
        }
    } else {
        echo
"Error al Conectar.\n";
    }
    echo
"Desconectado.\n";
}
?>