You are here

GarbageCollectionTest.php in Zircon Profile 8

File

core/modules/system/src/Tests/KeyValueStore/GarbageCollectionTest.php
View source
<?php

/**
 * @file
 * Contains \Drupal\system\Tests\KeyValueStore\GarbageCollectionTest.
 */
namespace Drupal\system\Tests\KeyValueStore;

use Drupal\Component\Serialization\PhpSerialize;
use Drupal\Core\Database\Database;
use Drupal\Core\KeyValueStore\DatabaseStorageExpirable;
use Drupal\simpletest\KernelTestBase;

/**
 * Tests garbage collection for the expirable key-value database storage.
 *
 * @group KeyValueStore
 */
class GarbageCollectionTest extends KernelTestBase {

  /**
   * Modules to enable.
   *
   * @var array
   */
  public static $modules = array(
    'system',
  );
  protected function setUp() {
    parent::setUp();

    // These additional tables are necessary due to the call to system_cron().
    $this
      ->installSchema('system', array(
      'key_value_expire',
      'flood',
      'queue',
    ));
  }

  /**
   * Tests garbage collection.
   */
  public function testGarbageCollection() {
    $collection = $this
      ->randomMachineName();
    $store = new DatabaseStorageExpirable($collection, new PhpSerialize(), Database::getConnection());

    // Insert some items and confirm that they're set.
    for ($i = 0; $i <= 3; $i++) {
      $store
        ->setWithExpire('key_' . $i, $this
        ->randomObject(), rand(500, 100000));
    }
    $this
      ->assertIdentical(sizeof($store
      ->getAll()), 4, 'Four items were written to the storage.');

    // Manually expire the data.
    for ($i = 0; $i <= 3; $i++) {
      db_merge('key_value_expire')
        ->keys(array(
        'name' => 'key_' . $i,
        'collection' => $collection,
      ))
        ->fields(array(
        'expire' => REQUEST_TIME - 1,
      ))
        ->execute();
    }

    // Perform a new set operation and then trigger garbage collection.
    $store
      ->setWithExpire('autumn', 'winter', rand(500, 1000000));
    system_cron();

    // Query the database and confirm that the stale records were deleted.
    $result = db_query('SELECT name, value FROM {key_value_expire} WHERE collection = :collection', array(
      ':collection' => $collection,
    ))
      ->fetchAll();
    $this
      ->assertIdentical(count($result), 1, 'Only one item remains after garbage collection');
  }

}

Classes

Namesort descending Description
GarbageCollectionTest Tests garbage collection for the expirable key-value database storage.