Modern version of XMPPHP extlib
Original XMPPHP is no longer maintained Therefore I've done some optimizations and imported some commits from birkner and zorn-v forks. None of the forks really looked ready to be adopted...
This commit is contained in:
@@ -1,77 +1,141 @@
|
||||
<?php
|
||||
|
||||
// activate full error reporting
|
||||
//error_reporting(E_ALL & E_STRICT);
|
||||
/**
|
||||
* @file: XMPPHP Cli example
|
||||
*
|
||||
* @info: If this script doesn't work, are you running 64-bit PHP with < 5.2.6?
|
||||
*/
|
||||
|
||||
include 'XMPPHP/XMPP.php';
|
||||
/**
|
||||
* Activate full error reporting
|
||||
* error_reporting(E_ALL & E_STRICT);
|
||||
*
|
||||
* XMPPHP Log levels:
|
||||
*
|
||||
* LEVEL_ERROR = 0;
|
||||
* LEVEL_WARNING = 1;
|
||||
* LEVEL_INFO = 2;
|
||||
* LEVEL_DEBUG = 3;
|
||||
* LEVEL_VERBOSE = 4;
|
||||
*/
|
||||
|
||||
#Use XMPPHP_Log::LEVEL_VERBOSE to get more logging for error reports
|
||||
#If this doesn't work, are you running 64-bit PHP with < 5.2.6?
|
||||
$conn = new XMPPHP_XMPP('talk.google.com', 5222, 'username', 'password', 'xmpphp', 'gmail.com', $printlog=true, $loglevel=XMPPHP_Log::LEVEL_INFO);
|
||||
require '../vendor/autoload.php';
|
||||
|
||||
$conf = array(
|
||||
'server' => 'talk.google.com',
|
||||
'port' => 5222,
|
||||
'username' => 'username',
|
||||
'password' => 'password',
|
||||
'proto' => 'xmpphp',
|
||||
'domain' => 'gmail.com',
|
||||
'printlog' => true,
|
||||
'loglevel' => XMPPHP\Log::LEVEL_VERBOSE,
|
||||
);
|
||||
|
||||
// Easy and simple for access to variables with their names
|
||||
extract($conf);
|
||||
|
||||
$conn = new XMPPHP\XMPP($server, $port, $username, $password, $proto, $domain, $printlog, $loglevel);
|
||||
$conn->autoSubscribe();
|
||||
|
||||
$vcard_request = array();
|
||||
|
||||
try {
|
||||
$conn->connect();
|
||||
while(!$conn->isDisconnected()) {
|
||||
$payloads = $conn->processUntil(array('message', 'presence', 'end_stream', 'session_start', 'vcard'));
|
||||
foreach($payloads as $event) {
|
||||
$pl = $event[1];
|
||||
switch($event[0]) {
|
||||
case 'message':
|
||||
print "---------------------------------------------------------------------------------\n";
|
||||
print "Message from: {$pl['from']}\n";
|
||||
if($pl['subject']) print "Subject: {$pl['subject']}\n";
|
||||
print $pl['body'] . "\n";
|
||||
print "---------------------------------------------------------------------------------\n";
|
||||
$conn->message($pl['from'], $body="Thanks for sending me \"{$pl['body']}\".", $type=$pl['type']);
|
||||
$cmd = explode(' ', $pl['body']);
|
||||
if($cmd[0] == 'quit') $conn->disconnect();
|
||||
if($cmd[0] == 'break') $conn->send("</end>");
|
||||
if($cmd[0] == 'vcard') {
|
||||
if(!($cmd[1])) $cmd[1] = $conn->user . '@' . $conn->server;
|
||||
// take a note which user requested which vcard
|
||||
$vcard_request[$pl['from']] = $cmd[1];
|
||||
// request the vcard
|
||||
$conn->getVCard($cmd[1]);
|
||||
}
|
||||
break;
|
||||
case 'presence':
|
||||
print "Presence: {$pl['from']} [{$pl['show']}] {$pl['status']}\n";
|
||||
break;
|
||||
case 'session_start':
|
||||
print "Session Start\n";
|
||||
$conn->getRoster();
|
||||
$conn->presence($status="Cheese!");
|
||||
break;
|
||||
case 'vcard':
|
||||
// check to see who requested this vcard
|
||||
$deliver = array_keys($vcard_request, $pl['from']);
|
||||
// work through the array to generate a message
|
||||
print_r($pl);
|
||||
$msg = '';
|
||||
foreach($pl as $key => $item) {
|
||||
$msg .= "$key: ";
|
||||
if(is_array($item)) {
|
||||
$msg .= "\n";
|
||||
foreach($item as $subkey => $subitem) {
|
||||
$msg .= " $subkey: $subitem\n";
|
||||
}
|
||||
} else {
|
||||
$msg .= "$item\n";
|
||||
}
|
||||
}
|
||||
// deliver the vcard msg to everyone that requested that vcard
|
||||
foreach($deliver as $sendjid) {
|
||||
// remove the note on requests as we send out the message
|
||||
unset($vcard_request[$sendjid]);
|
||||
$conn->message($sendjid, $msg, 'chat');
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
while (!$conn->isDisconnected()) {
|
||||
$events = array('message', 'presence', 'end_stream', 'session_start', 'vcard');
|
||||
$payloads = $conn->processUntil($events);
|
||||
|
||||
foreach ($payloads as $result) {
|
||||
list($event, $data) = $result;
|
||||
|
||||
if (isset($data)) {
|
||||
extract($data);
|
||||
}
|
||||
|
||||
switch ($event) {
|
||||
|
||||
case 'message':
|
||||
|
||||
if (!$body) {
|
||||
break;
|
||||
}
|
||||
|
||||
echo str_repeat('-', 80);
|
||||
echo "Message from: $from";
|
||||
|
||||
if (isset($subject)) {
|
||||
echo "Subject: $subject";
|
||||
}
|
||||
|
||||
echo $body;
|
||||
echo str_repeat('-', 80);
|
||||
|
||||
$cmd = explode(' ', $body);
|
||||
$body = "Mi no entender! '$body'";
|
||||
$conn->message($from, $body, $type);
|
||||
|
||||
if (isset($cmd[0])) {
|
||||
if ($cmd[0] == 'quit') {
|
||||
$conn->disconnect();
|
||||
}
|
||||
|
||||
if ($cmd[0] == 'break') {
|
||||
$conn->send('</end>');
|
||||
}
|
||||
|
||||
if ($cmd[0] == 'vcard') {
|
||||
if (!isset($cmd[1])) {
|
||||
$cmd[1] = $conn->user;
|
||||
}
|
||||
|
||||
// Take a note which user requested which vcard
|
||||
$vcard_request[$from] = $cmd[1];
|
||||
// Request the vcard
|
||||
$conn->getVCard($cmd[1]);
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
case 'presence':
|
||||
|
||||
echo "Presence: $from [$show] $status\n";
|
||||
break;
|
||||
|
||||
case 'session_start':
|
||||
|
||||
echo "Session start\n";
|
||||
$conn->getRoster();
|
||||
$conn->presence('Quasar!');
|
||||
break;
|
||||
|
||||
case 'vcard':
|
||||
|
||||
$deliver = array_keys($vcard_request, $from);
|
||||
$msg = '';
|
||||
|
||||
foreach ($data as $key => $item) {
|
||||
$msg .= $key . ': ';
|
||||
|
||||
if (is_array($item)) {
|
||||
$msg .= "\n";
|
||||
foreach ($item as $subkey => $subitem) {
|
||||
$msg .= ' ' . $subkey . ':' . $subitem . "\n";
|
||||
}
|
||||
} else {
|
||||
$msg .= $item . "\n";
|
||||
}
|
||||
}
|
||||
|
||||
foreach ($deliver as $sendjid) {
|
||||
unset($vcard_request[$sendjid]);
|
||||
$conn->message($sendjid, $msg, 'chat');
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
} catch(XMPPHP_Exception $e) {
|
||||
} catch (XMPPHP\Exception $e) {
|
||||
die($e->getMessage());
|
||||
}
|
||||
|
Reference in New Issue
Block a user