3 use Friendica\Core\Config;
5 require_once('include/queue_fn.php');
6 require_once('include/dfrn.php');
7 require_once("include/datetime.php");
8 require_once('include/items.php');
9 require_once('include/bbcode.php');
10 require_once('include/socgraph.php');
11 require_once('include/cache.php');
13 function queue_run(&$argv, &$argc){
17 $queue_id = intval($argv[1]);
22 $cachekey_deadguy = 'queue_run:deadguy:';
23 $cachekey_server = 'queue_run:server:';
27 logger('queue: start');
29 // Handling the pubsubhubbub requests
30 proc_run(PRIORITY_HIGH,'include/pubsubpublish.php');
32 $interval = ((get_config('system','delivery_interval') === false) ? 2 : intval(get_config('system','delivery_interval')));
34 // If we are using the worker we don't need a delivery interval
35 /// @TODO To much get_config() here
36 if (get_config("system", "worker")) {
40 $r = q("select * from deliverq where 1");
43 logger('queue: deliverq');
44 proc_run(PRIORITY_HIGH,'include/delivery.php',$rr['cmd'],$rr['item'],$rr['contact']);
46 time_sleep_until(microtime(true) + (float) $interval);
51 $r = q("SELECT `queue`.*, `contact`.`name`, `contact`.`uid` FROM `queue`
52 INNER JOIN `contact` ON `queue`.`cid` = `contact`.`id`
53 WHERE `queue`.`created` < UTC_TIMESTAMP() - INTERVAL 3 DAY");
54 if (dbm::is_result($r)) {
56 logger('Removing expired queue item for ' . $rr['name'] . ', uid=' . $rr['uid']);
57 logger('Expired queue data: ' . $rr['content'], LOGGER_DATA);
59 q("DELETE FROM `queue` WHERE `created` < UTC_TIMESTAMP() - INTERVAL 3 DAY");
62 // For the first 12 hours we'll try to deliver every 15 minutes
63 // After that, we'll only attempt delivery once per hour.
65 $r = q("SELECT `id` FROM `queue` WHERE ((`created` > UTC_TIMESTAMP() - INTERVAL 12 HOUR && `last` < UTC_TIMESTAMP() - INTERVAL 15 MINUTE) OR (`last` < UTC_TIMESTAMP() - INTERVAL 1 HOUR)) ORDER BY `cid`, `created`");
67 call_hooks('queue_predeliver', $a, $r);
69 if (dbm::is_result($r)) {
70 foreach ($r as $q_item) {
71 logger('Call queue for id '.$q_item['id']);
72 proc_run(PRIORITY_LOW, "include/queue.php", $q_item['id']);
81 require_once('include/salmon.php');
82 require_once('include/diaspora.php');
84 $r = q("SELECT * FROM `queue` WHERE `id` = %d LIMIT 1",
87 if (!dbm::is_result($r)) {
93 $c = q("SELECT * FROM `contact` WHERE `id` = %d LIMIT 1",
94 intval($q_item['cid'])
97 if (!dbm::is_result($c)) {
98 remove_queue_item($q_item['id']);
102 $dead = Cache::get($cachekey_deadguy.$c[0]['notify']);
104 if (!is_null($dead) AND $dead) {
105 logger('queue: skipping known dead url: '.$c[0]['notify']);
106 update_queue_time($q_item['id']);
110 $server = poco_detect_server($c[0]['url']);
113 $vital = Cache::get($cachekey_server.$server);
115 if (is_null($vital)) {
116 logger("Check server ".$server." (".$c[0]["network"].")");
118 $vital = poco_check_server($server, $c[0]["network"], true);
119 Cache::set($cachekey_server.$server, $vital, CACHE_QUARTER_HOUR);
122 if (!is_null($vital) AND !$vital) {
123 logger('queue: skipping dead server: '.$server);
124 update_queue_time($q_item['id']);
129 $u = q("SELECT `user`.*, `user`.`pubkey` AS `upubkey`, `user`.`prvkey` AS `uprvkey`
130 FROM `user` WHERE `uid` = %d LIMIT 1",
133 if (!dbm::is_result($u)) {
134 remove_queue_item($q_item['id']);
138 $data = $q_item['content'];
139 $public = $q_item['batch'];
145 switch ($contact['network']) {
147 logger('queue: dfrndelivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
148 $deliver_status = dfrn::deliver($owner, $contact, $data);
150 if ($deliver_status == (-1)) {
151 update_queue_time($q_item['id']);
152 Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
154 remove_queue_item($q_item['id']);
157 case NETWORK_OSTATUS:
158 if ($contact['notify']) {
159 logger('queue: slapdelivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
160 $deliver_status = slapper($owner, $contact['notify'], $data);
162 if ($deliver_status == (-1)) {
163 update_queue_time($q_item['id']);
164 Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
166 remove_queue_item($q_item['id']);
170 case NETWORK_DIASPORA:
171 if ($contact['notify']) {
172 logger('queue: diaspora_delivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
173 $deliver_status = Diaspora::transmit($owner, $contact, $data, $public, true);
175 if ($deliver_status == (-1)) {
176 update_queue_time($q_item['id']);
177 Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
179 remove_queue_item($q_item['id']);
185 $params = array('owner' => $owner, 'contact' => $contact, 'queue' => $q_item, 'result' => false);
186 call_hooks('queue_deliver', $a, $params);
188 if ($params['result']) {
189 remove_queue_item($q_item['id']);
191 update_queue_time($q_item['id']);
196 logger('Deliver status '.(int)$deliver_status.' for item '.$q_item['id'].' to '.$contact['name'].' <'.$contact['url'].'>');