Hi,

handrolled is best :)

da ich von icq gar nicht begeistert bin, aber natürlich der generelle gruppenzwang besteht, bin ich dazu übergegangen jabber zu benutzen. such dir einen geeigneten server, der einen ICQ transport unterstützt.
  ich kenne leider nur das Perl Modul, aber ich schätze es sehr. Evtl gibt es ja für PHP etwas Ähnliches.

es gab mal einen recht einfachen artikel bei heise, aber natürlich find ich den auf anhieb nicht ...

gruss

Hi,

Ich bin natürlich mittlerweile fleißig am weiterarbeiten - und da möchte ich für Leute die eventuell über das Archiv auf diesen Thread stoßen noch ein paar Anmerkungen los werden - oder für den Fall, das auch jetzt jemand darüber diskutieren will ;-)

Problem 1: Der Login

Worauf man achten muss ist, dass die ICQ-Server nach zu häufigen Logins und Logouts einen nicht mehr rein lassen, d.h. das Script läuft weiterhin recht fehlerfrei ab, weil der Login in Jabber problemlos klappt, aber der Transport zu ICQ klappt eben nicht und die gesendeten Nachrichten kommen nicht an.

Man wird wenn man so etwas testet wohl nicht mir einem ICQ-Accoutn auskommen ;-) Ich arbeite zur Zeit z.B. mit 4 Accouts, 3 für diese Sache und der eine, den ich selber normal verwende - Schade nur, das ICQ keine Möglichkeit bietet Accounts zu löschen, aber na ja - das ist nicht mein Problem *fg*

Ich arbeite zur Zeit so: ICQ gestartet mit meinem normalen User, PSI gestartet mit dem einen Jabber Account und einem der 3 Test-User für den ICQ-Transport - und dann noch die Kommandozeile vom Server, von dem aus das Script läuft, wie PSI bei mir lokal. Dann schreibe ich mir immer Nachrichten an meinen Hauptaccount in ICQ ;-)

Das Problem mit dem Login ist daran zu erkennen, wenn der verwendete der 3 User in ICQ gar nicht erst onlinen kommt, eventuell eine Fehlermeldung "Turboing, connect later", Lösung: Einfach den nächsten Account nutzen ;-)

Problem 2: Nachrichten mit Umlauten

Sobald ich versucht habe, eine Nachricht mit Umlauten zu senden, hat nichts mehr geklappt, folgendes Phänomen: Der verwendete der drei User ist in ICQ online gekommen, war die 5 Sekunden bis das Script mit dem Versenden der Nachrichten beginnt online und ist mit dem ersten Versenden der Nachrichten offline gegangen. Für diese Nachricht wurde beim Versenden im Script noch Erfolg gemeldet, für die Nachfolgenden Fehlschlag.

Ich habe zuerst versucht, die Umlaute als UTF8 zu kodieren mit utf8_encode(), hat nicht funktioniert, dann habe ich versucht sie mit ü usw. zu kodieren, ebenfalls negativ.

Es scheint ausschließlich zu funktionieren, wenn man alle Sonderzeichen, also alle nicht-alphanumerischen Zeichen als numerische Referenzen notiert, also z.B. für ein kleines ü: ü

Die Länge und Zeilenumbrüche in der Nachricht sind egal - das hatte ich zuerst auch noch als Fehlerkritierien betrachtet, kann ich jetzt aber ausschließen, ich habe jetzt schon Nachrichten über 6000 Zeichen verschickt, ebenfalls mit Zeilenumbruch.

Allerdings scheint aber einer bestimmten Länge eventuell der ICQ-Spam Filter einzuspringen - die Kritieren hierzu konnte ich noch nicht feststellen, Fakt ist, dass Sven (der so freundlich ist mir beim Testen zu helfen, Danke Sven!!) eine Meldung des Spam-Filters bekommen hat und ich nicht, obwohl wir beide die selben Texte zugeschickt bekommen haben.

Empfehlenswert sind Abstände von 5 Sekunden beim Senden der Nachrichten, dann konnte ich bis jetzt beliebig lange Nachrichten verschicken, eventuell sind auch Abstände von 3 Sekunden noch drin, weniger ist aber nicht möglich. Bei Abständen von einer Sekunde ist nach 16 Nachrichten irgendwann Schluss und man fliegt raus - ein sinnvoller Schutz von ICQ gegen Spam!

MfG, Dennis.

Hi liebes Forum,

nachdem ihr mir alle jetzt kräftig geholfen habt, wofür ich mich hiermit nochmmals herzlich Bedanke(!), möchte ich diesen Thread nun schließen. Für später im Archiv suchende stelle ich hiermit noch mein Script zur Verfügung, welches gerne verwendet werden kann. Man benötigt allerdigns für das Script in dieser Form PHP5.

============= Start jabber-bot1.php ============

#!/usr/local/bin/php5  
<?php  
  
// configuration  
define("BOT", "Bot1");  
define("PID_FILE", "run/jabber-bot1.pid");  
define("LOG_FILE", "logs/jabber-bot1.log");  
  
// be nice and say hello  
echo "This is Jabber " . BOT . ", I am starting...\n";  
  
// check if there is already a bot running  
if(file_exists(PID_FILE)) {  
  echo "PID File exists, perhabs there's already a bot running?\n";  
  echo "Aborting...\n";  
  exit;  
}  
  
// fork, so that process is running in the backround  
$pid = pcntl_fork();  
if($pid == -1) {  
  echo "Could not fork, exit.\n";  
  exit;  
}  
elseif($pid) {  
  echo "Jabber Bot forked, its PID is $pid.\n";  
  exit;  
}  
elseif(!posix_setsid()) {  
  echo "Could not detach from terminal, exit.\n";  
  exit;  
}  
else {  
  // write pid into pid file  
  file_put_contents(PID_FILE, posix_getpid());  
  // log startup  
  $log = "[" . date("Y-m-d H:i:s") . "] Started up\n";  
  file_put_contents(LOG_FILE, $log, FILE_APPEND);  
}  
  
// register shutdown and restart functions  
pcntl_signal(SIGTERM, "shutdown");  
pcntl_signal(SIGHUP,  "restart");  
pcntl_signal(SIGINT,  "shutdown");  
  
// load some stuff we need  
require("class.jabber.php");  
$config = parse_ini_file("accounts.conf", true);  
  
// the class for answering  
require("./responds.class.php");  
$responds = new Responds;  
  
// create jabber instance with parameters  
$jabber = new Jabber;  
$jabber->server   = $config['Jabber']['server'];  
$jabber->port     = $config['Jabber']['host'];  
$jabber->resource = "ClassJabberPHP";  
  
// set username and password for this bot  
$jabber->username = $config[BOT]['jabber_id'];  
$jabber->password = $config[BOT]['jabber_pw'];  
  
// connect and log in  
$jabber->Connect() or die("Error while connecting\n");  
$jabber->SendAuth() or die("Error while authenticating\n");  
  
// register transport for ICQ  
@$jabber->TransportRegistration(  
           $config['Jabber']['transport'],  
           array(  
             "username" => $config[BOT]['transport_id'],  
             "password" => $config[BOT]['transport_pw']  
           )  
         );  
  
// need to wait some seconds, till transport is established!  
sleep(10);  
  
// tell them we're online  
$jabber->SendPresence(NULL, NULL, $responds->GetPresence(), "away");  
  
// declare ticks  
declare(ticks=1);  
  
// start with main programm  
while(true) {  
  // get packets that came in  
  $jabber->Listen();  
  // and react to the first one  
  $packet = $jabber->GetFirstFromQueue();  
  if($packet !== false AND isset($packet['message'])) {  
    $from    = $jabber->GetInfoFromMessageFrom($packet);  
    $message = $jabber->GetInfoFromMessageBody($packet);  
    $answer  = $responds->GetRespond($message);  
    $answer  = $responds->escape($answer);  
    $jabber->SendMessage(  
              $from,  
              "chat",  
              NULL,  
              array(  
                "body" => $answer,  
                "thread" => "01"  
              )  
            );  
    $log = "[" . date("Y-m-d H:i:s") . "] Answered to message of " . $from . "\n";  
    file_put_contents(LOG_FILE, $log, FILE_APPEND);  
  }  
  sleep(5);  
}  
  
// what to by shutdown  
function shutdown($sig) {  
  global $jabber;  
  echo BOT . ": Received " . ($sig == SIGTERM ? "SIGTERM" : "SIGINT") . "... \n";  
  // disconnect from jabber  
  $jabber->SendPresence("unavailable", NULL, "offline");  
  $jabber->Disconnect();  
  // delete pid file  
  if(file_exists(PID_FILE)) {  
    unlink(PID_FILE);  
  }  
  // log shutdown  
  $log = "[" . date("Y-m-d H:i:s") . "] Shutted down\n";  
  file_put_contents(LOG_FILE, $log, FILE_APPEND);  
  exit;  
}  
  
// what to do by restarting  
function restart() {  
  // forget messages in queue  
  $jabber->packet_queue = array();  
  // disconnect from jabber  
  $jabber->SendPresence("unavailable", NULL, "offline");  
  $jabber->Disconnect();  
  // connect and log in  
  $jabber->Connect() or die("Error while connecting\n");  
  $jabber->SendAuth() or die("Error while authenticating\n");  
  $jabber->SendPresence(NULL, NULL, $responds->GetPresence(), "away");  
  // log restart  
  $log = "[" . date("Y-m-d H:i:s") . "] Restarted\n";  
  file_put_contents(LOG_FILE, $log, FILE_APPEND);  
}  
  
?>

============= Ende jabber-bot1.php =============

Der Name des Scriptes ist egal - es ist dafür ausgelegt, über Kommandozeile gestartet zu werden!
In den ersten drei Zeilen wird das Script konfiguriert - es muss erst mal festgelegt werden, wie der Bot sich identifiziert. Einfach auf Bot1 lassen, sofern man nicht mehrere Bots parallel verwendet. Anschließend kann noch der Pfad zum PID und zum Log-File festgelegt werden.

Man braucht allerdings noch folgende Datei namens accounts.conf:

============= Start accounts.conf ==============

; Login Information to Jabber Server  
  
[Jabber]  
server = "jabber.freenet.de"  
host = 5222  
transport = "icq.jabber.freenet.de"  
  
; Account Information for Bots  
  
[Bot1]  
jabber_id = "Jabber-ID"  
jabber_pw = "Passwort für Jabber ID"  
transport_id = "ICQ Nummer"  
transport_pw = "Passowrt für ICQ Nummer  
  
; es können weitere Blöcke für weitere Bots  
; folgen, der Name des Bots muss der PHP-Konstante  
; BOT entsprechen.  
  
; EOF

============= Ende jabber-bot.php ==============

Die Informationen im [Jabber] Block müsste man natürlich noch entsprechend anpassen, jenachdem welchen Jabber-Server man verwendet.

Starten lässt sich der Bot (sofern man im Verzeichnis des PHP-Scriptes ist) einfach mit
  ./jabber-bot1.php
Beenden lässt er sich mit
  kill cat run/jabber-bot1.pid
Und neustarten geht mit
  kill -HUP cat run/jabber-bot1.pid
Damit wird auch direkt klar, dass für solche Spielereien Kommandozeilen-Zugriff vorausgesetzt ist ;-)

In diesem Sinne wünsche ich also viel Spaß mit dem Script und self.close() ;-)

MfG, Dennis.