]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - scripts/xmppqueuehandler.php
switch around how XMLStream does processing
[quix0rs-gnu-social.git] / scripts / xmppqueuehandler.php
1 #!/usr/bin/env php
2 <?php
3 /*
4  * Laconica - a distributed open-source microblogging tool
5  * Copyright (C) 2008, Controlez-Vous, Inc.
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU Affero General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU Affero General Public License for more details.
16  *
17  * You should have received a copy of the GNU Affero General Public License
18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 # Abort if called from a web server
22 if (isset($_SERVER) && array_key_exists('REQUEST_METHOD', $_SERVER)) {
23         print "This script must be run from the command line\n";
24         exit();
25 }
26
27 define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
28 define('LACONICA', true);
29
30 require_once(INSTALLDIR . '/lib/common.php');
31 require_once(INSTALLDIR . '/lib/jabber.php');
32 require_once(INSTALLDIR . '/lib/queuehandler.php');
33
34 set_error_handler('common_error_handler');
35
36 class XmppQueueHandler extends QueueHandler {
37
38         var $conn = NULL;
39
40         function transport() {
41                 return 'jabber';
42         }
43
44         function start() {
45                 $this->log(LOG_INFO, "INITIALIZE");
46                 # Low priority; we don't want to receive messages
47                 $this->conn = jabber_connect($this->_id);
48                 if ($this->conn) {
49                         $this->conn->addEventHandler('message', 'forward_message', $this);
50                         jabber_send_presence("Send me a message to post an notice", 'available', NULL, 'available', -1);
51                 }
52                 return !is_null($this->conn);
53         }
54
55         function handle_notice($notice) {
56                 return jabber_broadcast_notice($notice);
57         }
58
59         function idle($timeout=0) {
60                 # Process the queue for a second
61                 $this->conn->processTime($timeout);
62         }
63
64         function finish() {
65         }
66
67         function forward_message(&$pl) {
68                 if ($pl['type'] != 'chat') {
69                     $this->log(LOG_DEBUG, 'Ignoring message of type ' . $pl['type'] . ' from ' . $pl['from']);
70                         return;
71                 }
72                 $listener = $this->listener();
73                 if (strtolower($listener) == strtolower($pl['from'])) {
74                         $this->log(LOG_WARNING, 'Ignoring loop message.');
75                         return;
76                 }
77                 $this->log(LOG_INFO, 'Forwarding message from ' . $pl['from'] . ' to ' . $listener);
78                 $this->conn->message($this->listener(), $pl['body'], 'chat', NULL, $this->ofrom($pl['from']));
79         }
80
81         function ofrom($from) {
82                 $address = "<addresses xmlns='http://jabber.org/protocol/address'>\n";
83                 $address .= "<address type='ofrom' jid='$from' />\n";
84                 $address .= "</addresses>\n";
85                 return $address;
86         }
87
88         function listener() {
89                 if (common_config('xmpp', 'listener')) {
90                         return common_config('xmpp', 'listener');
91                 } else {
92                         return jabber_daemon_address() . '/' . common_config('xmpp','resource') . '-listener';
93                 }
94         }
95 }
96
97 ini_set("max_execution_time", "0");
98 ini_set("max_input_time", "0");
99 set_time_limit(0);
100 mb_internal_encoding('UTF-8');
101
102 $resource = ($argc > 1) ? $argv[1] : (common_config('xmpp','resource') . '-queuehandler');
103
104 $handler = new XmppQueueHandler($resource);
105
106 if ($handler->start()) {
107         $handler->handle_queue();
108 }
109
110 $handler->finish();