<?php

define('DRUPAL_ROOT', getcwd());
include_once DRUPAL_ROOT . '/includes/bootstrap.inc';
drupal_bootstrap(DRUPAL_BOOTSTRAP_FULL);

dmemcache_flush('cache');

cache_set('test_123', 'stuff');
$item = cache_get('test_123');
echo 'Initial setting: ' . (($item->data == 'stuff') ? 'PASS' : 'FAIL') . "\n";

cache_clear_all('test', 'cache', TRUE);
$item = dmemcache_get('.prefixes', 'cache');
echo 'Prefix added to directory: ' . (in_array('test', $item) ? 'PASS' : 'FAIL') . "\n";

$item = dmemcache_get('.prefix.test', 'cache');
echo 'Counter set to one: ' . (($item == 1) ? 'PASS' : 'FAIL') . "\n";

$item = cache_get('test_123');
echo 'Item cleared on second retreival: ' . ((!$item) ? 'PASS' : 'FAIL') . "\n";

cache_set('test_123', 'stuff');
$item = cache_get('test_123');
echo 'Second setting: ' . (($item->data == 'stuff') ? 'PASS' : 'FAIL') . "\n";
echo 'Second setting has proper counter: ' . (($item->counters['test'] == 1) ? 'PASS' : 'FAIL') . "\n";

cache_clear_all('test', 'cache', TRUE);
cache_clear_all('test2', 'cache', TRUE);
$item = dmemcache_get('.prefixes', 'cache');
echo 'Prefix still in directory: ' . (in_array('test', $item) ? 'PASS' : 'FAIL') . "\n";

$item = dmemcache_get('.prefix.test', 'cache');
echo 'Counter set to two: ' . (($item == 2) ? 'PASS' : 'FAIL') . "\n";

$item = cache_get('test_123');
echo 'Item cleared on third retreival: ' . ((!$item) ? 'PASS' : 'FAIL') . "\n";

cache_set('test_123', 'stuff');
$item = cache_get('test_123');
echo 'Third setting: ' . (($item->data == 'stuff') ? 'PASS' : 'FAIL') . "\n";
echo 'Third setting has proper counter: ' . (($item->counters['test'] == 2) ? 'PASS' : 'FAIL') . "\n";
echo 'Third setting lacks extraneous counter: ' . (!isset($item->counters['test2']) ? 'PASS' : 'FAIL') . "\n";

cache_clear_all('*', 'cache', TRUE);

$item = cache_get('test_123');
echo 'Item cleared after global clearing: ' . ((!$item) ? 'PASS' : 'FAIL') . "\n";

cache_set('test_123', 'stuff');
cache_set('test2_123', 'stuff');
$item = cache_get('test_123');
$item2 = cache_get('test2_123');
echo 'Fourth setting (test_123): ' . (($item->data == 'stuff') ? 'PASS' : 'FAIL') . "\n";
echo 'Fourth setting (test2_123): ' . (($item2->data == 'stuff') ? 'PASS' : 'FAIL') . "\n";
cache_clear_all('test2', 'cache', TRUE);
$item = cache_get('test_123');
$item2 = cache_get('test2_123');
echo 'test_123 exists after flushing test2*: ' . (($item->data == 'stuff') ? 'PASS' : 'FAIL') . "\n";
echo 'test2_123 does not exist after flushing test2*: ' . ((!$item2) ? 'PASS' : 'FAIL') . "\n";