include/queue.php

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