include/queue.php

   1 <?php
   2
   3 use \Friendica\Core\Config;
   4
   5 require_once("boot.php");
   6 require_once('include/queue_fn.php');
   7 require_once('include/dfrn.php');
   8 require_once('include/cache.php');
   9
  10 function queue_run(&$argv, &$argc){
  11         global $a, $db;
  12
  13         if (is_null($a)){
  14                 $a = new App;
  15         }
  16
  17         if (is_null($db)){
  18                 @include(".htconfig.php");
  19                 require_once("include/dba.php");
  20                 $db = new dba($db_host, $db_user, $db_pass, $db_data);
  21                 unset($db_host, $db_user, $db_pass, $db_data);
  22         };
  23
  24         require_once("include/session.php");
  25         require_once("include/datetime.php");
  26         require_once('include/items.php');
  27         require_once('include/bbcode.php');
  28         require_once('include/socgraph.php');
  29
  30         Config::load();
  31
  32         // Don't check this stuff if the function is called by the poller
  33         if (App::callstack() != "poller_run")
  34                 if (App::is_already_running('queue', 'include/queue.php', 540))
  35                         return;
  36
  37         $a->set_baseurl(get_config('system','url'));
  38
  39         load_hooks();
  40
  41         if($argc > 1)
  42                 $queue_id = intval($argv[1]);
  43         else
  44                 $queue_id = 0;
  45
  46         $cachekey_deadguy = 'queue_run:deadguy:';
  47         $cachekey_server = 'queue_run:server:';
  48
  49         if (!$queue_id) {
  50
  51                 logger('queue: start');
  52
  53                 // Handling the pubsubhubbub requests
  54                 proc_run(PRIORITY_HIGH,'include/pubsubpublish.php');
  55
  56                 $interval = ((get_config('system','delivery_interval') === false) ? 2 : intval(get_config('system','delivery_interval')));
  57
  58                 // If we are using the worker we don't need a delivery interval
  59                 if (get_config("system", "worker"))
  60                         $interval = false;
  61
  62                 $r = q("select * from deliverq where 1");
  63                 if ($r) {
  64                         foreach ($r as $rr) {
  65                                 logger('queue: deliverq');
  66                                 proc_run(PRIORITY_HIGH,'include/delivery.php',$rr['cmd'],$rr['item'],$rr['contact']);
  67                                 if($interval) {
  68                                         time_sleep_until(microtime(true) + (float) $interval);
  69                                 }
  70                         }
  71                 }
  72
  73                 $r = q("SELECT `queue`.*, `contact`.`name`, `contact`.`uid` FROM `queue`
  74                         INNER JOIN `contact` ON `queue`.`cid` = `contact`.`id`
  75                         WHERE `queue`.`created` < UTC_TIMESTAMP() - INTERVAL 3 DAY");
  76                 if ($r) {
  77                         foreach ($r as $rr) {
  78                                 logger('Removing expired queue item for ' . $rr['name'] . ', uid=' . $rr['uid']);
  79                                 logger('Expired queue data :' . $rr['content'], LOGGER_DATA);
  80                         }
  81                         q("DELETE FROM `queue` WHERE `created` < UTC_TIMESTAMP() - INTERVAL 3 DAY");
  82                 }
  83
  84                 // For the first 12 hours we'll try to deliver every 15 minutes
  85                 // After that, we'll only attempt delivery once per hour.
  86
  87                 $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`");
  88         } else {
  89                 logger('queue: start for id '.$queue_id);
  90
  91                 $r = q("SELECT `id` FROM `queue` WHERE `id` = %d LIMIT 1",
  92                         intval($queue_id)
  93                 );
  94         }
  95
  96         if (!$r){
  97                 return;
  98         }
  99
 100         if (!$queue_id)
 101                 call_hooks('queue_predeliver', $a, $r);
 102
 103
 104         // delivery loop
 105
 106         require_once('include/salmon.php');
 107         require_once('include/diaspora.php');
 108
 109         foreach($r as $q_item) {
 110
 111                 // queue_predeliver hooks may have changed the queue db details,
 112                 // so check again if this entry still needs processing
 113
 114                 if($queue_id)
 115                         $qi = q("SELECT * FROM `queue` WHERE `id` = %d LIMIT 1",
 116                                 intval($queue_id));
 117                 elseif (get_config("system", "worker")) {
 118                         logger('Call queue for id '.$q_item['id']);
 119                         proc_run(PRIORITY_LOW, "include/queue.php", $q_item['id']);
 120                         continue;
 121                 } else
 122                         $qi = q("SELECT * FROM `queue` WHERE `id` = %d AND `last` < UTC_TIMESTAMP() - INTERVAL 15 MINUTE ",
 123                                 intval($q_item['id']));
 124
 125                 if(! count($qi))
 126                         continue;
 127
 128
 129                 $c = q("SELECT * FROM `contact` WHERE `id` = %d LIMIT 1",
 130                         intval($qi[0]['cid'])
 131                 );
 132                 if (! dbm::is_result($c)) {
 133                         remove_queue_item($q_item['id']);
 134                         continue;
 135                 }
 136
 137                 $dead = Cache::get($cachekey_deadguy.$c[0]['notify']);
 138
 139                 if (!is_null($dead) AND $dead) {
 140                         logger('queue: skipping known dead url: '.$c[0]['notify']);
 141                         update_queue_time($q_item['id']);
 142                         continue;
 143                 }
 144
 145                 $server = poco_detect_server($c[0]['url']);
 146
 147                 if ($server != "") {
 148                         $vital = Cache::get($cachekey_server.$server);
 149
 150                         if (is_null($vital)) {
 151                                 logger("Check server ".$server." (".$c[0]["network"].")");
 152
 153                                 $vital = poco_check_server($server, $c[0]["network"], true);
 154                                 Cache::set($cachekey_server.$server, $vital, CACHE_QUARTER_HOUR);
 155                         }
 156
 157                         if (!is_null($vital) AND !$vital) {
 158                                 logger('queue: skipping dead server: '.$server);
 159                                 update_queue_time($q_item['id']);
 160                                 continue;
 161                         }
 162                 }
 163
 164                 $u = q("SELECT `user`.*, `user`.`pubkey` AS `upubkey`, `user`.`prvkey` AS `uprvkey`
 165                         FROM `user` WHERE `uid` = %d LIMIT 1",
 166                         intval($c[0]['uid'])
 167                 );
 168                 if (! dbm::is_result($u)) {
 169                         remove_queue_item($q_item['id']);
 170                         continue;
 171                 }
 172
 173                 $data      = $qi[0]['content'];
 174                 $public    = $qi[0]['batch'];
 175                 $contact   = $c[0];
 176                 $owner     = $u[0];
 177
 178                 $deliver_status = 0;
 179
 180                 switch($contact['network']) {
 181                         case NETWORK_DFRN:
 182                                 logger('queue: dfrndelivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
 183                                 $deliver_status = dfrn::deliver($owner,$contact,$data);
 184
 185                                 if($deliver_status == (-1)) {
 186                                         update_queue_time($q_item['id']);
 187                                         Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
 188                                 } else
 189                                         remove_queue_item($q_item['id']);
 190
 191                                 break;
 192                         case NETWORK_OSTATUS:
 193                                 if($contact['notify']) {
 194                                         logger('queue: slapdelivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
 195                                         $deliver_status = slapper($owner,$contact['notify'],$data);
 196
 197                                         if($deliver_status == (-1)) {
 198                                                 update_queue_time($q_item['id']);
 199                                                 Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
 200                                         } else
 201                                                 remove_queue_item($q_item['id']);
 202                                 }
 203                                 break;
 204                         case NETWORK_DIASPORA:
 205                                 if($contact['notify']) {
 206                                         logger('queue: diaspora_delivery: item '.$q_item['id'].' for '.$contact['name'].' <'.$contact['url'].'>');
 207                                         $deliver_status = Diaspora::transmit($owner,$contact,$data,$public,true);
 208
 209                                         if($deliver_status == (-1)) {
 210                                                 update_queue_time($q_item['id']);
 211                                                 Cache::set($cachekey_deadguy.$contact['notify'], true, CACHE_QUARTER_HOUR);
 212                                         } else
 213                                                 remove_queue_item($q_item['id']);
 214
 215                                 }
 216                                 break;
 217
 218                         default:
 219                                 $params = array('owner' => $owner, 'contact' => $contact, 'queue' => $q_item, 'result' => false);
 220                                 call_hooks('queue_deliver', $a, $params);
 221
 222                                 if($params['result'])
 223                                         remove_queue_item($q_item['id']);
 224                                 else
 225                                         update_queue_time($q_item['id']);
 226
 227                                 break;
 228
 229                 }
 230                 logger('Deliver status '.$deliver_status.' for item '.$q_item['id'].' to '.$contact['name'].' <'.$contact['url'].'>');
 231         }
 232
 233         return;
 234
 235 }
 236
 237 if (array_search(__file__,get_included_files())===0){
 238   queue_run($_SERVER["argv"],$_SERVER["argc"]);
 239   killme();
 240 }