include/queue.php

   1 <?php
   2
   3 use Friendica\Core\Config;
   4 use Friendica\Core\Worker;
   5 use Friendica\Database\DBM;
   6 use Friendica\Protocol\Diaspora;
   7 use Friendica\Protocol\DFRN;
   8
   9 require_once 'include/queue_fn.php';
  10 require_once 'include/datetime.php';
  11 require_once 'include/items.php';
  12 require_once 'include/bbcode.php';
  13 require_once 'include/socgraph.php';
  14 require_once 'include/cache.php';
  15
  16 function queue_run(&$argv, &$argc) {
  17         global $a;
  18
  19         if ($argc > 1) {
  20                 $queue_id = intval($argv[1]);
  21         } else {
  22                 $queue_id = 0;
  23         }
  24
  25         $cachekey_deadguy = 'queue_run:deadguy:';
  26         $cachekey_server = 'queue_run:server:';
  27
  28         if (!$queue_id) {
  29
  30                 logger('queue: start');
  31
  32                 // Handling the pubsubhubbub requests
  33                 Worker::add(array('priority' => PRIORITY_HIGH, 'dont_fork' => true), 'pubsubpublish');
  34
  35                 $r = q("SELECT `queue`.*, `contact`.`name`, `contact`.`uid` FROM `queue`
  36                         INNER JOIN `contact` ON `queue`.`cid` = `contact`.`id`
  37                         WHERE `queue`.`created` < UTC_TIMESTAMP() - INTERVAL 3 DAY");
  38
  39                 if (DBM::is_result($r)) {
  40                         foreach ($r as $rr) {
  41                                 logger('Removing expired queue item for ' . $rr['name'] . ', uid=' . $rr['uid']);
  42                                 logger('Expired queue data: ' . $rr['content'], LOGGER_DATA);
  43                         }
  44                         q("DELETE FROM `queue` WHERE `created` < UTC_TIMESTAMP() - INTERVAL 3 DAY");
  45                 }
  46
  47                 /*
  48                  * For the first 12 hours we'll try to deliver every 15 minutes
  49                  * After that, we'll only attempt delivery once per hour.
  50                  */
  51                 $r = q("SELECT `id` FROM `queue` WHERE ((`created` > UTC_TIMESTAMP() - INTERVAL 12 HOUR AND `last` < UTC_TIMESTAMP() - INTERVAL 15 MINUTE) OR (`last` < UTC_TIMESTAMP() - INTERVAL 1 HOUR)) ORDER BY `cid`, `created`");
  52
  53                 call_hooks('queue_predeliver', $a, $r);
  54
  55                 if (DBM::is_result($r)) {
  56                         foreach ($r as $q_item) {
  57                                 logger('Call queue for id '.$q_item['id']);
  58                                 Worker::add(array('priority' => PRIORITY_LOW, 'dont_fork' => true), "queue", (int)$q_item['id']);
  59                         }
  60                 }
  61                 return;
  62         }
  63
  64
  65         // delivering
  66
  67         require_once 'include/salmon.php';
  68
  69         $r = q("SELECT * FROM `queue` WHERE `id` = %d LIMIT 1",
  70                 intval($queue_id));
  71
  72         if (!DBM::is_result($r)) {
  73                 return;
  74         }
  75
  76         $q_item = $r[0];
  77
  78         $c = q("SELECT * FROM `contact` WHERE `id` = %d LIMIT 1",
  79                 intval($q_item['cid'])
  80         );
  81
  82         if (!DBM::is_result($c)) {
  83                 remove_queue_item($q_item['id']);
  84                 return;
  85         }
  86
  87         $dead = Cache::get($cachekey_deadguy.$c[0]['notify']);
  88
  89         if (!is_null($dead) && $dead) {
  90                 logger('queue: skipping known dead url: '.$c[0]['notify']);
  91                 update_queue_time($q_item['id']);
  92                 return;
  93         }
  94
  95         $server = poco_detect_server($c[0]['url']);
  96
  97         if ($server != "") {
  98                 $vital = Cache::get($cachekey_server.$server);
  99
 100                 if (is_null($vital)) {
 101                         logger("Check server ".$server." (".$c[0]["network"].")");
 102
 103                         $vital = poco_check_server($server, $c[0]["network"], true);
 104                         Cache::set($cachekey_server.$server, $vital, CACHE_QUARTER_HOUR);
 105                 }
 106
 107                 if (!is_null($vital) && !$vital) {
 108                         logger('queue: skipping dead server: '.$server);
 109                         update_queue_time($q_item['id']);
 110                         return;
 111                 }
 112         }
 113
 114         $u = q("SELECT `user`.*, `user`.`pubkey` AS `upubkey`, `user`.`prvkey` AS `uprvkey`
 115                 FROM `user` WHERE `uid` = %d LIMIT 1",
 116                 intval($c[0]['uid'])
 117         );
 118         if (!DBM::is_result($u)) {
 119                 remove_queue_item($q_item['id']);
 120                 return;
 121         }
 122
 123         $data      = $q_item['content'];
 124         $public    = $q_item['batch'];
 125         $contact   = $c[0];
 126         $owner     = $u[0];
 127
 128         $deliver_status = 0;
 129
 130         switch ($contact['network']) {
 131                 case NETWORK_DFRN:
 132                         logger('queue: dfrndelivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
 133                         $deliver_status = DFRN::deliver($owner, $contact, $data);
 134
 135                         if ($deliver_status == (-1)) {
 136                                 update_queue_time($q_item['id']);
 137                                 Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
 138                         } else {
 139                                 remove_queue_item($q_item['id']);
 140                         }
 141                         break;
 142                 case NETWORK_OSTATUS:
 143                         if ($contact['notify']) {
 144                                 logger('queue: slapdelivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
 145                                 $deliver_status = slapper($owner, $contact['notify'], $data);
 146
 147                                 if ($deliver_status == (-1)) {
 148                                         update_queue_time($q_item['id']);
 149                                         Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
 150                                 } else {
 151                                         remove_queue_item($q_item['id']);
 152                                 }
 153                         }
 154                         break;
 155                 case NETWORK_DIASPORA:
 156                         if ($contact['notify']) {
 157                                 logger('queue: diaspora_delivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
 158                                 $deliver_status = Diaspora::transmit($owner, $contact, $data, $public, true);
 159
 160                                 if ($deliver_status == (-1)) {
 161                                         update_queue_time($q_item['id']);
 162                                         Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
 163                                 } else {
 164                                         remove_queue_item($q_item['id']);
 165                                 }
 166                         }
 167                         break;
 168
 169                 default:
 170                         $params = array('owner' => $owner, 'contact' => $contact, 'queue' => $q_item, 'result' => false);
 171                         call_hooks('queue_deliver', $a, $params);
 172
 173                         if ($params['result']) {
 174                                 remove_queue_item($q_item['id']);
 175                         } else {
 176                                 update_queue_time($q_item['id']);
 177                         }
 178                         break;
 179
 180         }
 181         logger('Deliver status '.(int)$deliver_status.' for item '.$q_item['id'].' to '.$contact['name'].' <'.$contact['url'].'>');
 182
 183         return;
 184 }