class CronQueueTest

class CronQueueTest extends KernelTestBase {
  
  /**
   * {@inheritdoc}
   */
  protected static $modules = [
    'system',
    'cron_queue_test',
  ];
  
  /**
   * The database connection.
   *
   * @var \Drupal\Core\Database\Connection
   */
  protected $connection;
  
  /**
   * The cron service.
   *
   * @var \Drupal\Core\Cron
   */
  protected $cron;
  
  /**
   * The fake current time used for queue worker / cron testing purposes.
   *
   * This value should be greater than or equal to zero.
   *
   * @var int
   */
  protected $currentTime = 1000;
  
  /**
   * A logger for testing.
   *
   * @var \Prophecy\Prophecy\ObjectProphecy|\Psr\Log\LoggerInterface
   */
  protected $logger;
  
  /**
   * {@inheritdoc}
   */
  protected function setUp() : void {
    // Setup logger before register() is called.
    $this->logger = $this->prophesize(LoggerInterface::class);
    parent::setUp();
    $this->connection = Database::getConnection();
    $time = $this->prophesize('Drupal\\Component\\Datetime\\TimeInterface');
    $time->getCurrentTime()
      ->willReturn($this->currentTime);
    $time->getCurrentMicroTime()
      ->willReturn(100.0);
    $time->getRequestTime()
      ->willReturn($this->currentTime);
    \Drupal::getContainer()->set('datetime.time', $time->reveal());
    $this->assertEquals($this->currentTime, \Drupal::time()->getCurrentTime());
    $this->assertEquals($this->currentTime, \Drupal::time()->getRequestTime());
    $realQueueFactory = $this->container
      ->get('queue');
    $queue_factory = $this->prophesize(get_class($realQueueFactory));
    $database = new DatabaseQueue('cron_queue_test_database_delay_exception', $this->connection);
    $memory = new Memory('cron_queue_test_memory_delay_exception');
    $queue_factory->get('cron_queue_test_database_delay_exception', Argument::cetera())
      ->willReturn($database);
    $queue_factory->get('cron_queue_test_memory_delay_exception', Argument::cetera())
      ->willReturn($memory);
    $queue_factory->get(Argument::any(), Argument::cetera())
      ->will(function ($args) use ($realQueueFactory) {
      return $realQueueFactory->get($args[0], $args[1] ?? FALSE);
    });
    $this->container
      ->set('queue', $queue_factory->reveal());
    // Instantiate the `cron` service after the mock queue factory is set.
    $this->cron = \Drupal::service('cron');
  }
  
  /**
   * Tests that DelayedRequeueException behaves as expected when running cron.
   */
  public function testDelayException() : void {
    $database = $this->container
      ->get('queue')
      ->get('cron_queue_test_database_delay_exception');
    $memory = $this->container
      ->get('queue')
      ->get('cron_queue_test_memory_delay_exception');
    // Ensure that the queues are of the correct type for this test.
    $this->assertInstanceOf('Drupal\\Core\\Queue\\DelayableQueueInterface', $database);
    $this->assertNotInstanceOf('Drupal\\Core\\Queue\\DelayableQueueInterface', $memory);
    // Get the queue worker plugin manager.
    $manager = $this->container
      ->get('plugin.manager.queue_worker');
    $definitions = $manager->getDefinitions();
    $this->assertNotEmpty($database_lease_time = $definitions['cron_queue_test_database_delay_exception']['cron']['time']);
    $this->assertNotEmpty($memory_lease_time = $definitions['cron_queue_test_memory_delay_exception']['cron']['time']);
    // Create the necessary test data and run cron.
    $database->createItem('test');
    $memory->createItem('test');
    $this->cron
      ->run();
    // Fetch the expiry time for the database queue.
    $query = $this->connection
      ->select('queue');
    $query->condition('name', 'cron_queue_test_database_delay_exception');
    $query->addField('queue', 'expire');
    $query->range(0, 1);
    $expire = $query->execute()
      ->fetchField();
    // Assert that the delay interval is greater than the lease interval. This
    // allows us to assume that (if updated) the new expiry time will be greater
    // than the initial expiry time. We can then also assume that the new expiry
    // time offset will be identical to the delay interval.
    $this->assertGreaterThan($database_lease_time, CronQueueTestDatabaseDelayException::DELAY_INTERVAL);
    $this->assertGreaterThan($this->currentTime + $database_lease_time, $expire);
    $this->assertEquals(CronQueueTestDatabaseDelayException::DELAY_INTERVAL, $expire - $this->currentTime);
    // Ensure that the memory queue expiry time is unchanged after the
    // DelayedRequeueException has been thrown.
    $property = (new \ReflectionClass($memory))->getProperty('queue');
    $memory_queue_internal = $property->getValue($memory);
    $this->assertEquals($this->currentTime + $memory_lease_time, reset($memory_queue_internal)->expire);
  }
  
  /**
   * Tests that leases are expiring correctly, also within the same request.
   */
  public function testLeaseTime() : void {
    $queue = $this->container
      ->get('queue')
      ->get('cron_queue_test_lease_time');
    $queue->createItem([
      $this->randomMachineName() => $this->randomMachineName(),
    ]);
    // Run initial queue job and ensure lease time variable is initialized.
    $this->cron
      ->run();
    static::assertEquals(1, \Drupal::state()->get('cron_queue_test_lease_time'));
    // Ensure the same queue job is not picked up due to the extended lease.
    $this->cron
      ->run();
    static::assertEquals(1, \Drupal::state()->get('cron_queue_test_lease_time'));
    // Set the expiration time to 3 seconds ago, so the lease should
    // automatically expire.
    \Drupal::database()->update(DatabaseQueue::TABLE_NAME)
      ->fields([
      'expire' => $this->currentTime - 3,
    ])
      ->execute();
    // The queue job should now be picked back up since it's lease has expired,
    // and the state variable should be consequently incremented.
    $this->cron
      ->run();
    static::assertEquals(2, \Drupal::state()->get('cron_queue_test_lease_time'));
    // Ensure the same queue job is not picked up again due to the extended
    // lease.
    $this->cron
      ->run();
    static::assertEquals(2, \Drupal::state()->get('cron_queue_test_lease_time'));
  }
  
  /**
   * Tests that non-queue exceptions thrown by workers are handled properly.
   *
   * @see \Drupal\cron_queue_test\Plugin\QueueWorker\CronQueueTestException
   */
  public function testUncaughtExceptions() : void {
    $this->logger
      ->log(RfcLogLevel::ERROR, '%type: @message in %function (line %line of %file).', Argument::that(function (array $args) : bool {
      return $args['@message'] === 'That is not supposed to happen.' && $args['exception'] instanceof \Exception;
    }))
      ->shouldBeCalled();
    $this->logger
      ->log(RfcLogLevel::INFO, 'Cron run completed.', Argument::cetera())
      ->shouldBeCalled();
    // Get the queue to test the normal Exception.
    $queue = $this->container
      ->get('queue')
      ->get(CronQueueTestException::PLUGIN_ID);
    // Enqueue an item for processing.
    $queue->createItem([
      $this->randomMachineName() => $this->randomMachineName(),
    ]);
    // Run cron; the worker for this queue should throw an exception and handle
    // it.
    $this->cron
      ->run();
    $this->assertEquals(1, \Drupal::state()->get('cron_queue_test_exception'));
    // The item should be left in the queue.
    $this->assertEquals(1, $queue->numberOfItems(), 'Failing item still in the queue after throwing an exception.');
    // Expire the queue item manually. system_cron() relies in
    // \Drupal::time()->getRequestTime() to find queue items whose expire field
    // needs to be reset to 0. This is a Kernel test, so
    // \Drupal::time()->getRequestTime() won't change when cron runs.
    // @see system_cron()
    // @see \Drupal\Core\Cron::processQueues()
    $this->connection
      ->update('queue')
      ->condition('name', 'cron_queue_test_exception')
      ->fields([
      'expire' => \Drupal::time()->getRequestTime() - 1,
    ])
      ->execute();
    $this->cron
      ->run();
    $this->assertEquals(2, \Drupal::state()->get('cron_queue_test_exception'));
    $this->assertEquals(0, $queue->numberOfItems(), 'Item was processed and removed from the queue.');
  }
  
  /**
   * Tests suspend queue exception is handled properly.
   *
   * @see \Drupal\cron_queue_test\Plugin\QueueWorker\CronQueueTestSuspendQueue
   * @legacy-covers \Drupal\Core\Queue\SuspendQueueException
   */
  public function testSuspendQueueException() : void {
    $this->logger
      ->log(RfcLogLevel::DEBUG, 'A worker for @queue queue suspended further processing of the queue.', Argument::that(function (array $args) : bool {
      return $args['@queue'] === CronQueueTestSuspendQueue::PLUGIN_ID;
    }))
      ->shouldBeCalled();
    $this->logger
      ->log(RfcLogLevel::INFO, 'Cron run completed.', Argument::cetera())
      ->shouldBeCalled();
    // Get the queue to test the specific SuspendQueueException.
    $queue = \Drupal::queue(CronQueueTestSuspendQueue::PLUGIN_ID);
    // Enqueue several item for processing.
    $queue->createItem('process');
    $queue->createItem('suspend');
    $queue->createItem('ignored');
    // Run cron; the worker for this queue should process as far as the
    // suspending item.
    $this->cron
      ->run();
    // Only one item should have been processed.
    $this->assertEquals(2, $queue->numberOfItems(), 'Suspended queue stopped processing at the suspending item.');
    // Check the items remaining in the queue. The item that throws the
    // exception gets released by cron, so we can claim it again to check it.
    $item = $queue->claimItem();
    $this->assertEquals('suspend', $item->data, 'Suspending item remains in the queue.');
    $item = $queue->claimItem();
    $this->assertEquals('ignored', $item->data, 'Item beyond the suspending item remains in the queue.');
  }
  
  /**
   * Tests requeue exception is handled properly.
   *
   * @see \Drupal\cron_queue_test\Plugin\QueueWorker\CronQueueTestRequeueException
   * @legacy-covers \Drupal\Core\Queue\RequeueException
   */
  public function testRequeueException() : void {
    // Test the requeueing functionality.
    $queue = $this->container
      ->get('queue')
      ->get(CronQueueTestRequeueException::PLUGIN_ID);
    $queue->createItem([]);
    $this->cron
      ->run();
    $this->assertEquals(2, \Drupal::state()->get('cron_queue_test_requeue_exception'));
    $this->assertEquals(0, $queue->numberOfItems());
  }
  
  /**
   * Tests that database queue implementation complies with interfaces specs.
   */
  public function testDatabaseQueueReturnTypes() : void {
    /** @var \Drupal\Core\Queue\DatabaseQueue $queue */
    $queue = $this->container
      ->get('queue')
      ->get('cron_queue_test_database_delay_exception');
    static::assertInstanceOf(DatabaseQueue::class, $queue);
    $queue->createItem(12);
    $item = $queue->claimItem();
    static::assertTrue($queue->delayItem($item, 1));
    static::assertTrue($queue->releaseItem($item));
    $queue->deleteItem($item);
    static::assertFalse($queue->delayItem($item, 1));
    static::assertFalse($queue->releaseItem($item));
  }
  
  /**
   * Test safeguard against invalid annotations in QueueWorkerManager.
   */
  public function testQueueWorkerManagerSafeguard() : void {
    $queue_worker_manager = $this->container
      ->get('plugin.manager.queue_worker');
    $plugin_id = 'test_plugin_id';
    // Ensure if no cron annotation is provided, none is added.
    $definition = [];
    $queue_worker_manager->processDefinition($definition, $plugin_id);
    $this->assertArrayNotHasKey('cron', $definition);
    // Ensure if an empty cron annotation is provided, the default lease time is
    // added.
    $definition = [
      'cron' => [],
    ];
    $queue_worker_manager->processDefinition($definition, $plugin_id);
    $this->assertArrayHasKey('time', $definition['cron']);
    $this->assertEquals(QueueWorkerManagerInterface::DEFAULT_QUEUE_CRON_TIME, $definition['cron']['time']);
    // Ensure if an invalid lease time (less-than 1 second) is provided, it is
    // overridden with the default lease time.
    $definition = [
      'cron' => [
        'time' => 0,
      ],
    ];
    $queue_worker_manager->processDefinition($definition, $plugin_id);
    $this->assertEquals(QueueWorkerManagerInterface::DEFAULT_QUEUE_CRON_TIME, $definition['cron']['time']);
    $definition = [
      'cron' => [
        'time' => -1,
      ],
    ];
    $queue_worker_manager->processDefinition($definition, $plugin_id);
    $this->assertEquals(QueueWorkerManagerInterface::DEFAULT_QUEUE_CRON_TIME, $definition['cron']['time']);
  }
  
  /**
   * Tests that cron queues from derivers work.
   */
  public function testQueueWorkerDeriver() : void {
    $this->assertEquals(0, \Drupal::state()->get(CronQueueTestDeriverQueue::PLUGIN_ID, 0));
    $queue = \Drupal::queue(sprintf('%s:foo', CronQueueTestDeriverQueue::PLUGIN_ID));
    $queue->createItem('foo');
    $this->cron
      ->run();
    $this->assertEquals(1, \Drupal::state()->get(CronQueueTestDeriverQueue::PLUGIN_ID));
  }
  
  /**
   * {@inheritdoc}
   */
  public function register(ContainerBuilder $container) : void {
    parent::register($container);
    $container->register('test_logger', get_class($this->logger
      ->reveal()))
      ->addTag('logger');
    $container->set('test_logger', $this->logger
      ->reveal());
  }

}