include/queue_fn.php

   1 <?php
   2
   3 function update_queue_time($id) {
   4         logger('queue: requeue item ' . $id);
   5         q("UPDATE `queue` SET `last` = '%s' WHERE `id` = %d",
   6                 dbesc(datetime_convert()),
   7                 intval($id)
   8         );
   9 }
  10
  11 function remove_queue_item($id) {
  12         logger('queue: remove queue item ' . $id);
  13         q("DELETE FROM `queue` WHERE `id` = %d",
  14                 intval($id)
  15         );
  16 }
  17
  18 function was_recently_delayed($cid) {
  19
  20         $r = q("SELECT `id` FROM `queue` WHERE `cid` = %d
  21                 and last > UTC_TIMESTAMP() - interval 15 minute limit 1",
  22                 intval($cid)
  23         );
  24         if(dbm::is_result($r))
  25                 return true;
  26
  27         $r = q("select `term-date` from contact where id = %d and `term-date` != '' and `term-date` != '0000-00-00 00:00:00' limit 1",
  28                 intval($cid)
  29         );
  30
  31         return (dbm::is_result($r));
  32 }
  33
  34
  35 function add_to_queue($cid,$network,$msg,$batch = false) {
  36
  37         $max_queue = get_config('system','max_contact_queue');
  38         if($max_queue < 1)
  39                 $max_queue = 500;
  40
  41         $batch_queue = get_config('system','max_batch_queue');
  42         if($batch_queue < 1)
  43                 $batch_queue = 1000;
  44
  45         $r = q("SELECT COUNT(*) AS `total` FROM `queue` INNER JOIN `contact` ON `queue`.`cid` = `contact`.`id`
  46                 WHERE `queue`.`cid` = %d AND `contact`.`self` = 0 ",
  47                 intval($cid)
  48         );
  49         if($r && count($r)) {
  50                 if($batch &&  ($r[0]['total'] > $batch_queue)) {
  51                         logger('add_to_queue: too many queued items for batch server ' . $cid . ' - discarding message');
  52                         return;
  53                 }
  54                 elseif((! $batch) && ($r[0]['total'] > $max_queue)) {
  55                         logger('add_to_queue: too many queued items for contact ' . $cid . ' - discarding message');
  56                         return;
  57                 }
  58         }
  59
  60         q("INSERT INTO `queue` ( `cid`, `network`, `created`, `last`, `content`, `batch`)
  61                 VALUES ( %d, '%s', '%s', '%s', '%s', %d) ",
  62                 intval($cid),
  63                 dbesc($network),
  64                 dbesc(datetime_convert()),
  65                 dbesc(datetime_convert()),
  66                 dbesc($msg),
  67                 intval(($batch) ? 1: 0)
  68         );
  69
  70 }