hallo alle zusammen,
ich hab schon mal nach einen PHP-Bot für IRC gegoogelt, aber der will nicht bei mir laufen, vielleicht kann mir einer von euch helfen:
Fehlermeldung
Script:
Alles anzeigen
ich bedanke mich schon mal im Vorraus.
ich hab schon mal nach einen PHP-Bot für IRC gegoogelt, aber der will nicht bei mir laufen, vielleicht kann mir einer von euch helfen:
Fehlermeldung
Warning: fsockopen() has been disabled for security reasons in /usr/export/www/vhosts/funnetwork/hosting/yaroc/Bot/bot.php on line 20
Can't connect to irc.quakenet.org
Script:
Quellcode
- <?PHP
- function cmd($cmd) {
- global $fp;
- fputs($fp,$cmd);
- echo "-> $cmd\r\n";
- }
- $config['server'] = 'irc.quakenet.org';
- $config['port'] = 6668;
- $config['nick'] = 'troubleD[2]';
- $config['anick'] = 'troubleD[2]';
- $config['name'] = 'troubleD[2]';
- $config['email'] = '';
- $config['ident'] = 'troubleD[2]';
- $config['identd'] = false;
- $config['useemailasident'] = true;
- $config['channels'][] = "#GdK";
- $users['admin'][0] = "";
- $raws = array(motd => array('001','002','003','004','005','251','252','253','254','255','372','375','376'));
- $fp = fsockopen($config['server'],$config['port']) OR
- die("Can't connect to {$config['server']}.");
- $firstConnect = true;
- cmd("USER {$config['nick']} {$config['nick']} {$config['nick']} :{$config['nick']}\r\n");
- cmd("NICK {$config['nick']}\r\n");
- while (!feof($fp)) {
- $buffer = fgets($fp, 4096);
- $line = explode(' ', $buffer);
- for ($c = 0;$c <= count($line)-1;$c++) {
- $line[$c] = trim($line[$c],"\r\n");
- }
- if ($line[0] == 'PING') {
- cmd("PONG $line[1]\r\n");
- }
- if (!in_array($line[1],$raws['motd'])) {
- echo "<- ".implode(' ',$line)."\r\n";
- }
- if ($line[1] == '376') {
- foreach($config['channels'] as $chan) {
- cmd("JOIN $chan\r\n");
- }
- }
- elseif ($line[1] == 'PRIVMSG') {
- if (in_array(substr($line[0],1),$users['admin'])) {
- if ($line[3] == ":!lol") {
- cmd("PRIVMSG {$line[2]} :loOoOoOoOol!\n");
- }
- elseif ($line[3] == ":!quit") {
- cmd("QUIT :AS YOU WISH!!1111!1!1\n");
- }
- elseif ($line[3] == ":!join") {
- cmd("JOIN :{$line[4]}\n");
- }
- elseif ($line[3] == ":!part") {
- cmd("PART :{$line[2]}\n");
- }
- elseif ($line[3] == ":!hop") {
- cmd("PART :{$line[2]}\n");
- usleep(500);
- cmd("JOIN :{$line[2]}\n");
- }
- }
- }
- }
ich bedanke mich schon mal im Vorraus.